[PATCH 2/2] gnu: Add nmap.

[Leo Famulari <leo@famulari.name>]

* gnu/packages/admin.scm (nmap): New variable.
---
 gnu/packages/admin.scm | 56 +++++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 55 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 69802e9..2415a8d 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -64,7 +64,9 @@
   #:use-module (gnu packages xorg)
   #:use-module (gnu packages python)
   #:use-module (gnu packages man)
-  #:use-module (gnu packages autotools))
+  #:use-module (gnu packages autotools)
+  #:use-module (gnu packages pcre)
+  #:use-module (gnu packages lua))
 
 (define-public dmd
   ;; Deprecated.  Kept around "just in case."
@@ -1497,3 +1499,55 @@ for writing audit records to the disk.  Viewing the logs is done with the
 @code{ausearch} or @code{aureport} utilities.  Configuring the audit rules is
 done with the @code{auditctl} utility.")
     (license license:gpl2+)))
+
+(define-public nmap
+  (package
+    (name "nmap")
+    (version "7.01")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://nmap.org/dist/nmap-"
+                                  version ".tar.bz2"))
+              (sha256
+               (base32
+                "01bpc820fmjl1vd08a3j9fpa84psaa7c3cxc8wpzabms8ckcs7yg"))
+              (modules '((guix build utils)))
+              (snippet
+               '(map delete-file-recursively
+                 ;; Remove bundled lua, pcap, and pcre libraries.
+                 ;; FIXME: Removed bundled liblinear once packaged.
+                 '("liblua"
+                   "libpcap"
+                   "libpcre"
+                   ;; Remove pre-compiled binaries.
+                   "mswin32")))))
+    (build-system gnu-build-system)
+    ;; TODO: Build "zenmap" GUI interface in "gui" output.
+    (arguments
+     `(#:configure-flags
+       (list (string-append "--prefix=" (assoc-ref %outputs "out"))
+             "--without-ncat"
+             "--without-nmap-update"
+             "--without-zenmap")))
+    (inputs
+     `(;("liblinear" ,liblinear)
+       ("libpcap" ,libpcap)
+       ("lua" ,lua)
+       ("openssl" ,openssl)
+       ("pcre" ,pcre)
+       ;; For 'ndiff'
+       ("python-2" ,python-2)))
+    (synopsis "Network discovery and auditing tool")
+    (description "Nmap is a network discovery and auditing tool.  It provides
+several features for probing computer networks, including host discovery,
+service, and operating system detection.  These features are extensible by
+scripts that provide more advanced service detection, vulnerability detection,
+and other features.  Nmap is also capable of adapting to network conditions
+including latency and congestion during a scan.")
+    (home-page "https://nmap.org")
+    ;; The nmap license is based on the GPL 2.0, with several exceptions and
+    ;; modifications.  It is incompatible with the GPL 2.0.
+    ;; Nmap's source tarball bundles the source code of many of its
+    ;; dependencies.  This package uses nmap's modified version of libdnet and
+    ;; liblinear, which both use a 3-clause BSD license.
+    (license (list license:nmap license:bsd-3))))
-- 
2.6.3