diff --git a/nongnu/packages/printers.scm b/nongnu/packages/printers.scm index 93abf1e..9404d77 100644 --- a/nongnu/packages/printers.scm +++ b/nongnu/packages/printers.scm @@ -2,16 +2,23 @@ ;;; Copyright © 2021 Petr Hodina ;;; Copyright © 2021 Kahka F ;;; Copyright © 2021 Jonathan Brielmaier +;;; Copyright © 2023 EuAndreh (define-module (nongnu packages printers) #:use-module (gnu packages) + #:use-module (gnu packages cpio) #:use-module (gnu packages cups) + #:use-module (gnu packages image) + #:use-module (gnu packages package-management) #:use-module (guix gexp) #:use-module (guix packages) #:use-module (guix utils) #:use-module (srfi srfi-1) #:use-module (guix download) - #:use-module (guix build utils)) + #:use-module (guix build utils) + #:use-module (guix build-system gnu) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (nonguix licenses)) (define-public hplip-plugin (package @@ -155,3 +162,75 @@ version=~A (substitute* (string-append out "/etc/hp/hplip.conf") (("/usr") out))))))))))) + +(define-public epson-201401w + (package + (name "epson-201401w") + (version "1.0.0") + (source + (origin + (method url-fetch) + (uri + (string-append + "https://download3.ebz.epson.net/dsc/f/03/00/03/45/41/92e9c9254f0ee4230a069545ba27ec2858a2c457/epson-inkjet-printer-201401w-" + version + "-1lsb3.2.src.rpm")) + (sha256 + (base32 "0c60m1sd59s4sda38dc5nniwa7dh1b0kv1maajr0x9d38gqlyk3x")))) + (build-system gnu-build-system) + (arguments + (list + #:phases + #~(modify-phases %standard-phases + (replace 'unpack + (lambda* (#:key outputs #:allow-other-keys) + (mkdir "source") + (chdir "source") + (system (string-append "rpm2cpio " #$source " | cpio -idv")) + (invoke "tar" "-xvf" (string-append "epson-inkjet-printer-201401w-" #$version ".tar.gz")) + (invoke "tar" "-xvf" (string-append "epson-inkjet-printer-filter-" #$version ".tar.gz")) + (substitute* (find-files (string-append "epson-inkjet-printer-201401w-" #$version "/ppds/")) + (("/opt/epson-inkjet-printer-201401w/cups/lib") + (string-append (assoc-ref outputs "out") + "/lib/cups"))) + (chdir (string-append "epson-inkjet-printer-filter-" #$version)))) + (add-after 'install 'install-extra-files + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (model-dir (string-append out "/share/cups/model/epson-inkjet-printer-201401w"))) + (chdir (string-append "../epson-inkjet-printer-201401w-" #$version)) + (mkdir-p model-dir) + (invoke "cp" "-a" "ppds" model-dir) + (invoke "cp" "-a" "lib64" "resource" "watermark" out))))))) + (native-inputs + (list + cpio + cups-minimal + libjpeg-turbo + rpm)) + (synopsis + "Epson printer driver for L series devices") + (description + "This software is a filter program used with the Common UNIX Printing +System (CUPS) under Linux. It supplies high quality printing with +Seiko Epson Color Ink Jet Printers. + +Supported printers are: +@itemize +@item L456 +@item L455 +@item L366 +@item L365 +@item L362 +@item L360 +@item L312 +@item L310 +@item L222 +@item L220 +@item L132 +@item L130 +@end itemize") + (home-page "http://download.ebz.epson.net/dsc/du/02/DriverDownloadInfo.do?LG2=FR&CN2=&DSCMI=34541&DSCCHK=4aa5c50773bc3611620a9c42dd549a72c42693a2") + (license ; SEIKO EPSON CORPORATION SOFTWARE LICENSE AGREEMENT + (list (nonfree "https://epson.com/SoftwareLicenseAgreement") + license:lgpl2.1))))