diff options
| -rw-r--r-- | gnu/packages/networking.scm | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm index 52bd0c4cf6..ac8867352d 100644 --- a/gnu/packages/networking.scm +++ b/gnu/packages/networking.scm @@ -48,6 +48,7 @@ #:use-module (gnu packages gettext) #:use-module (gnu packages gnupg) #:use-module (gnu packages gtk) + #:use-module (gnu packages libidn) #:use-module (gnu packages linux) #:use-module (gnu packages lua) #:use-module (gnu packages mit-krb5) @@ -424,6 +425,44 @@ and up to 1 Mbit/s downstream.") ;; src/md5.[ch] is released under the zlib license (license (list license:isc license:zlib)))) +(define-public whois + (package + (name "whois") + (version "5.2.12") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://debian/pool/main/w/whois/" + name "_" version ".tar.xz")) + (sha256 + (base32 + "1wfdyqi64l5x56j259jrrlbh19b7q7i6r83a8q8rjzcqp0kl0vdj")))) + (build-system gnu-build-system) + ;; TODO: unbundle mkpasswd binary + its po files. + (arguments + `(#:tests? #f ; Does not exist + #:make-flags (list "CC=gcc" + (string-append "prefix=" (assoc-ref %outputs "out"))) + #:phases + (modify-phases %standard-phases + (delete 'configure) ; No configure + (add-before 'build 'setenv + (lambda _ + (setenv "HAVE_ICONV" "1") + (setenv "HAVE_LIBIDN" "1")))))) + (inputs + `(("libidn" ,libidn))) + (native-inputs + `(("gettext" ,gnu-gettext) + ("perl" ,perl))) + (synopsis "Improved whois client") + (description "This whois client is intelligent and can +automatically select the appropriate whois server for most queries. +Because of historical reasons this also includes a tool called mkpasswd +which can be used to encrypt a password with @code{crypt(3)}.") + (home-page "https://github.com/rfc1036/whois") + (license license:gpl2+))) + (define-public wireshark (package (name "wireshark") |