[PATCH] gnu: Add Nmap.

[taylanbayirli@gmail.com ("Taylan Ulrich Bayırlı/Kammer")]

Many distros separate Zenmap from the Nmap package.  Should we do the
same?  If yes, I'll need some help.  This recipe builds it together
with the rest of the suite.

===File /home/tub/media/src/guix/0001-gnu-Add-Nmap.patch====
From d2d36938b679818f42a66590f25766cfc321245f Mon Sep 17 00:00:00 2001
From: Taylan Ulrich B <taylanbayirli@gmail.com>
Date: Sat, 22 Nov 2014 22:47:26 +0100
Subject: [PATCH] gnu: Add Nmap.

* gnu/packages/nmap.scm: New file.
* gnu-system.am (GNU_SYSTEM_MODULES): Add nmap.scm.
---
 gnu-system.am         |  1 +
 gnu/packages/nmap.scm | 62 +++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 63 insertions(+)
 create mode 100644 gnu/packages/nmap.scm

diff --git a/gnu-system.am b/gnu-system.am
index d3b822c..a4094b2 100644
--- a/gnu-system.am
+++ b/gnu-system.am
@@ -186,6 +186,7 @@ GNU_SYSTEM_MODULES =				\
   gnu/packages/ncurses.scm			\
   gnu/packages/netpbm.scm			\
   gnu/packages/nettle.scm			\
+  gnu/packages/nmap.scm				\
   gnu/packages/node.scm				\
   gnu/packages/noweb.scm			\
   gnu/packages/ntp.scm				\
diff --git a/gnu/packages/nmap.scm b/gnu/packages/nmap.scm
new file mode 100644
index 0000000..2137ee7
--- /dev/null
+++ b/gnu/packages/nmap.scm
@@ -0,0 +1,62 @@
+;;; GNU Guix --- Functional package management for GNU
+;;; Copyright © 2014 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
+;;;
+;;; This file is part of GNU Guix.
+;;;
+;;; GNU Guix is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or (at
+;;; your option) any later version.
+;;;
+;;; GNU Guix is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;; GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+
+(define-module (gnu packages nmap)
+  #:use-module (guix packages)
+  #:use-module (guix download)
+  #:use-module (guix build-system gnu)
+  #:use-module ((guix licenses) #:prefix l:)
+  #:use-module (gnu packages openssl)
+  #:use-module ((gnu packages admin) #:select (libpcap))
+  #:use-module (gnu packages pcre)
+  #:use-module (gnu packages lua)
+  #:use-module (gnu packages python))
+
+(define-public nmap
+  (package
+    (name "nmap")
+    (version "6.47")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "http://nmap.org/dist/nmap-" version
+                                  ".tar.bz2"))
+              (sha256
+               (base32
+                "14d53aji4was68c01pf105n5ylha257wmdbx40ddiqiw42g1x8cg"))))
+    (build-system gnu-build-system)
+    (inputs `(("openssl" ,openssl)
+              ("libpcap" ,libpcap)
+              ("pcre" ,pcre)
+              ("lua" ,lua)
+              ("python-2" ,python-2)
+              ;; FIXME: Add liblinear here once it's packaged.  (Nmap uses its
+              ;; own version when it can't find it.)
+              ))
+    (arguments
+     ;; Tests require network access, which build processes don't have.
+     `(#:tests? #f))
+    (synopsis "Network discovery and security auditing tool")
+    (description
+     "Nmap (\"Network Mapper\") is a network discovery and security auditing
+tool.  It is also useful for tasks such as network inventory, managing service
+upgrade schedules, and monitoring host or service uptime.  It also provides an
+advanced netcat implementation (ncat), a utility for comparing scan
+results (ndiff), a packet generation and response analysis tool (nping), and
+the Zenmap GUI and results viewer.")
+    (home-page "http://nmap.org/")
+    (license l:gpl2)))
-- 
2.1.2

============================================================