gnu: isc-dhcp: Add debianutils as an input.

dhclient provides a hook mechanism for users.  In order to run these hooks,
dhclient-script uses run-parts to run all the executable files found in
requested directory. run-parts is part of debianutils packages.

* gnu/packages/admin.scm (isc-dhcp)[inputs]: Add "debianutils" to provide
access to run-parts.

Signed-off-by: Christopher Baines <mail@cbaines.net>
Change-Id: I2057881da57a6065d65d1de95e51ed1c8b19e15f
This commit is contained in:
Alexey Abramov 2024-04-19 08:30:38 +02:00 committed by Christopher Baines
parent b1de64812a
commit 7d6d54202a
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577

View file

@ -122,6 +122,7 @@ (define-module (gnu packages admin)
#:use-module (gnu packages curl) #:use-module (gnu packages curl)
#:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages cyrus-sasl)
#:use-module (gnu packages datastructures) #:use-module (gnu packages datastructures)
#:use-module (gnu packages debian)
#:use-module (gnu packages dns) #:use-module (gnu packages dns)
#:use-module (gnu packages elf) #:use-module (gnu packages elf)
#:use-module (gnu packages file) #:use-module (gnu packages file)
@ -1563,7 +1564,8 @@ (define-public isc-dhcp
(coreutils (assoc-ref inputs "coreutils*")) (coreutils (assoc-ref inputs "coreutils*"))
(inetutils (assoc-ref inputs "inetutils")) (inetutils (assoc-ref inputs "inetutils"))
(grep (assoc-ref inputs "grep*")) (grep (assoc-ref inputs "grep*"))
(sed (assoc-ref inputs "sed*"))) (sed (assoc-ref inputs "sed*"))
(debianutils (assoc-ref inputs "debianutils")))
(substitute* "client/scripts/linux" (substitute* "client/scripts/linux"
(("/sbin/ip") (("/sbin/ip")
(search-input-file inputs "/sbin/ip"))) (search-input-file inputs "/sbin/ip")))
@ -1578,7 +1580,7 @@ (define-public isc-dhcp
,(map (lambda (dir) ,(map (lambda (dir)
(string-append dir "/bin:" (string-append dir "/bin:"
dir "/sbin")) dir "/sbin"))
(list inetutils coreutils grep sed)))))))))) (list inetutils coreutils grep sed debianutils))))))))))
(native-inputs (native-inputs
(list config perl file)) (list config perl file))
@ -1589,6 +1591,10 @@ (define-public isc-dhcp
'() '()
`(("iproute" ,iproute))) `(("iproute" ,iproute)))
;; dhclient-script provides hooks to users and uses run-parts in
;; order to list users defined hooks.
("debianutils" ,debianutils)
;; isc-dhcp bundles a copy of BIND, which has proved vulnerable ;; isc-dhcp bundles a copy of BIND, which has proved vulnerable
;; in the past. Use a BIND-VERSION of our choosing instead. ;; in the past. Use a BIND-VERSION of our choosing instead.
("bind-source-tarball" ("bind-source-tarball"