gnu-pw-mgr.scm 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263
  1. ;;; GNU Guix --- Functional package management for GNU
  2. ;;; Copyright © 2013 Eric Bavier <bavier@member.fsf.org>
  3. ;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
  4. ;;; Copyright © 2016, 2018 Efraim Flashner <efraim@flashner.co.il>
  5. ;;;
  6. ;;; This file is part of GNU Guix.
  7. ;;;
  8. ;;; GNU Guix is free software; you can redistribute it and/or modify it
  9. ;;; under the terms of the GNU General Public License as published by
  10. ;;; the Free Software Foundation; either version 3 of the License, or (at
  11. ;;; your option) any later version.
  12. ;;;
  13. ;;; GNU Guix is distributed in the hope that it will be useful, but
  14. ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  15. ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  16. ;;; GNU General Public License for more details.
  17. ;;;
  18. ;;; You should have received a copy of the GNU General Public License
  19. ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
  20. (define-module (gnu packages gnu-pw-mgr)
  21. #:use-module (guix packages)
  22. #:use-module (guix licenses)
  23. #:use-module (guix download)
  24. #:use-module (guix build-system gnu)
  25. #:use-module (gnu packages)
  26. #:use-module (gnu packages base)
  27. #:use-module (gnu packages autogen))
  28. (define-public gnu-pw-mgr
  29. (package
  30. (name "gnu-pw-mgr")
  31. (version "2.4.2")
  32. (source
  33. (origin
  34. (method url-fetch)
  35. (uri (string-append "mirror://gnu/gnu-pw-mgr/gnu-pw-mgr-"
  36. version ".tar.xz"))
  37. (sha256
  38. (base32
  39. "1yvdzc5w37qrjrkby5699ygj9bhkvgi3zk9k9jcjry1j6b7wdl17"))))
  40. (build-system gnu-build-system)
  41. (arguments
  42. '(#:phases
  43. (modify-phases %standard-phases
  44. (add-after 'patch-source-shebangs 'patch-more-shebangs
  45. (lambda _
  46. (substitute* "tests/dom.test"
  47. (("/usr/bin/printf") (which "printf")))
  48. #t)))))
  49. (native-inputs
  50. `(("which" ,which)
  51. ("autogen" ,autogen)))
  52. (home-page "https://www.gnu.org/software/gnu-pw-mgr/")
  53. (synopsis "Retrieve login credentials without recording passwords")
  54. (description
  55. "This program is designed to make it easy to reconstruct difficult
  56. passwords when they are needed while limiting the risk of attack. The
  57. user of this program inputs a self-defined transformation of a web
  58. site URL and obtains the password and user name hint for that web
  59. site.")
  60. (license gpl3+)))