Subject: [PATCH] gnu: isc-dhcp: Make dhclien-script hooks work.

From: Alexey Abramov <[email-masked]>
Date: Fri, 19 Apr 2024 08:30:38 +0200

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.
---
 gnu/packages/admin.scm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index b60857b264..0bf96af835 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -122,6 +122,7 @@ (define-module (gnu packages admin)
   #:use-module (gnu packages curl)
   #:use-module (gnu packages cyrus-sasl)
   #:use-module (gnu packages datastructures)
+  #:use-module (gnu packages debian)
   #:use-module (gnu packages dns)
   #:use-module (gnu packages elf)
   #:use-module (gnu packages file)
@@ -1563,7 +1564,8 @@ (define-public isc-dhcp
                       (coreutils (assoc-ref inputs "coreutils*"))
                       (inetutils (assoc-ref inputs "inetutils"))
                       (grep      (assoc-ref inputs "grep*"))
-                      (sed       (assoc-ref inputs "sed*")))
+                      (sed       (assoc-ref inputs "sed*"))
+                      (debianutils (assoc-ref inputs "debianutils")))
                  (substitute* "client/scripts/linux"
                    (("/sbin/ip")
                     (search-input-file inputs "/sbin/ip")))
@@ -1578,7 +1580,7 @@ (define-public isc-dhcp
                      ,(map (lambda (dir)
                              (string-append dir "/bin:"
                                             dir "/sbin"))
-                           (list inetutils coreutils grep sed))))))))))
+                           (list inetutils coreutils grep sed debianutils))))))))))
 
       (native-inputs
        (list config perl file))
@@ -1589,6 +1591,10 @@ (define-public isc-dhcp
                       '()
                       `(("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
                 ;; in the past.  Use a BIND-VERSION of our choosing instead.
                 ("bind-source-tarball"
-- 
2.41.0