Merge branch 'epson' into 'master'

nongnu: Add epson-201401w.

See merge request nonguix/nonguix!292
This commit is contained in:
EuAndreh 2023-12-13 06:27:12 +00:00
commit bae8596437

View File

@ -2,16 +2,23 @@
;;; Copyright © 2021 Petr Hodina <phodina@protonmail.com>
;;; Copyright © 2021 Kahka F
;;; Copyright © 2021 Jonathan Brielmaier <jonathan.brielmaier@web.de>
;;; Copyright © 2023 EuAndreh <eu@euandre.org>
(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
@ -159,3 +166,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))))