From mboxrd@z Thu Jan 1 00:00:00 1970 From: John Darrington Subject: [PATCH] gnu: Add bind Date: Sun, 11 Sep 2016 00:06:26 +0200 Message-ID: <1473545186-6899-1-git-send-email-jmd@gnu.org> References: <20160910192545.GA3904@jasmine> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:42547) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1biqQB-0005s6-WE for guix-devel@gnu.org; Sat, 10 Sep 2016 18:06:49 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1biqQ8-0003z5-Od for guix-devel@gnu.org; Sat, 10 Sep 2016 18:06:47 -0400 In-Reply-To: <20160910192545.GA3904@jasmine> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org Cc: John Darrington * gnu/packags/dns.scm (bind): New variable --- gnu/packages/dns.scm | 69 ++++++++++++++++++++++++++++++++++++++++++++++= ++++++ 1 file changed, 69 insertions(+) diff --git a/gnu/packages/dns.scm b/gnu/packages/dns.scm index 819343a..dad8079 100644 --- a/gnu/packages/dns.scm +++ b/gnu/packages/dns.scm @@ -3,6 +3,7 @@ ;;; Copyright =C2=A9 2016 Mark H Weaver ;;; Copyright =C2=A9 2016 Ricardo Wurmus ;;; Copyright =C2=A9 2016 Efraim Flashner +;;; Copyright =C2=A9 2016 John Darrington ;;; ;;; This file is part of GNU Guix. ;;; @@ -63,6 +64,74 @@ and BOOTP/TFTP for network booting of diskless machine= s.") ;; Source files only say GPL2 and GPL3 are allowed. (license (list license:gpl2 license:gpl3)))) =20 +(define-public bind + (package + (name "bind") + (version "9.10.4-P2") + (source (origin + (method url-fetch) + (uri (string-append + "ftp://ftp.isc.org/isc/bind9/" version "/" name "-" + version ".tar.gz")) + (sha256 + (base32 + "08s48h5p916ixjiwgar4w6skc20crmg7yj1y7g89c083zvw8lnxk"))= )) + (build-system gnu-build-system) + (arguments + `(#:configure-flags + (list (string-append "--with-openssl=3D" + (assoc-ref %build-inputs "openssl")) + (string-append "--with-dlz-mysql=3D" + (assoc-ref %build-inputs "mysql")) + (string-append "--with-pkcs11=3D" + (assoc-ref %build-inputs "p11-kit"))) + #:phases + ;; When and if guix provides user namespaces for the build proces= s, + ;; then the following can be uncommented and the subsequent "forc= e-test" + ;; will not be necessary. + ;; + ;; (modify-phases %standard-phases + ;; (add-before 'check 'set-up-loopback + ;; (lambda _ + ;; (system "bin/tests/system/ifconfig.sh up")))) + (modify-phases %standard-phases + (add-after 'strip 'move-to-utils + (lambda _ + (for-each + (lambda (file) + (let ((target (string-append (assoc-ref %outputs "utils= ") file)) + (src (string-append (assoc-ref %outputs "out") fi= le))) + (mkdir-p (dirname target)) + (link src target) + (delete-file src))) + '("/bin/dig" "/bin/delv" "/bin/nslookup" "/bin/host" "/bin= /nsupdate" + "/share/man/man1/dig.1" + "/share/man/man1/host.1" + "/share/man/man1/nslookup.1" + "/share/man/man1/nsupdate.1")))) + (replace 'check + (lambda _ + (zero? (system* "make" "force-test"))))))) + (outputs `("out" "utils")) + (inputs + ;; it would be nice to add GeoIP and gssapi once there is package + `(("libcap" ,libcap) + ("libxml2" ,libxml2) + ("mysql" ,mysql) + ("openssl" ,openssl) + ("p11-kit" ,p11-kit))) + (native-inputs `(("perl" ,perl) + ("net-tools" ,net-tools))) + (synopsis "An implementation of the Domain Name System") + (description "BIND is an implementation of the Domain Name System (D= NS) +protocols for the Internet. It is a reference implementation of those +protocols, but it is also production-grade software, suitable for use in +high-volume and high-reliability applications. The name BIND stands for +\"Berkeley Internet Name Domain\", because the software originated in th= e early +1980s at the University of California at Berkeley.") + (home-page "https://www.isc.org/downloads/bind") + (license (list license:isc)))) + (define-public bind-utils (package (name "bind-utils") --=20 2.1.4