ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: Add pcsc-tools.

Browse source 
* gnu/packages/security-token.scm (pcsc-tools): New variable.

Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Modified-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
This commit is contained in:
Jake Leporte 2023-03-05 19:30:27 -06:00 committed by Maxim Cournoyer
parent 608b26699f
commit f5d502f7f4
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 58 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

58
gnu/packages/security-token.scm
View file

@ -17,6 +17,7 @@
;;; Copyright © 2022 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2022 Petr Hodina <phodina@protonmail.com>
;;; Copyright © 2022 Denis 'GNUtoo' Carikli <GNUtoo@cyberdimension.org>
;;; Copyright © 2023 Jake Leporte <jakeleporte@outlook.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -48,6 +49,7 @@ (define-module (gnu packages security-token)
#:use-module (guix build-system python)
#:use-module (gnu packages autotools)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
#:use-module (gnu packages curl)
#:use-module (gnu packages check)
#:use-module (gnu packages compression)
@ -253,6 +255,62 @@ (define-public pcsc-lite
license:isc ; src/strlcat.c src/strlcpy.c
license:gpl3+)))) ; src/spy/*
(define-public pcsc-tools
(package
(name "pcsc-tools")
(version "1.6.2")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://salsa.debian.org/rousseau/pcsc-tools.git/")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"16kvw8y5289fp6y3z8l5w61gfrk872kd500a27sgr5k5dpr9vfbk"))))
(build-system gnu-build-system)
(arguments
(list #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-data-paths
(lambda _
(substitute* "ATR_analysis"
(((string-append
"\"/usr/local/pcsc/smartcard_list.txt\", "
"\"/usr/share/pcsc/smartcard_list.txt\", "
"\"/usr/local/share/pcsc/smartcard_list.txt\""))
(string-append "\"" #$output
"/share/pcsc/smartcard_list.txt\"")))
(substitute* "ATR_analysis.1p"
(("^(\\.IR \\./) ,\n$" _ cwd)
(string-append cwd "\n"))
(("^\\.I /usr/local/pcsc/\n$")
"")
(("/usr/share/pcsc/\n$")
(string-append #$output "/share/pcsc/\n")))))
(add-after 'patch-shebangs 'wrap-programs
(lambda _
(for-each
(lambda (prog)
(wrap-program (string-append #$output "/bin/" prog)
`("PERL5LIB" = (,(getenv "PERL5LIB")))))
'("ATR_analysis" "gscriptor" "scriptor"))
(wrap-program (string-append #$output "/bin/gscriptor")
`("GI_TYPELIB_PATH" = (,(getenv "GI_TYPELIB_PATH")))))))))
(native-inputs (list autoconf automake libtool gnu-gettext pkg-config))
(inputs (list bash-minimal ;for wrap-program
perl
perl-gtk3
pcsc-lite
perl-pcsc))
(synopsis "Smart cards and PC/SC tools")
(description "This package provides the @command{pcsc_scan},
@command{ATR_analysis}, @command{scriptor}, and @command{gscriptor} commands,
which are useful tools to test a PC/SC driver, card or reader or send commands
in a friendly environment (text or graphical user interface).")
(home-page "https://pcsc-tools.apdu.fr/")
(license license:gpl2+)))
(define-public ykclient
(package
(name "ykclient")