gnu: libvirt: Use absolute dnsmasq.

Fixes <https://bugs.gnu.org/57272>.
Reported by Lars-Dominik Braun <lars@6xq.net>.

* gnu/packages/virtualization.scm (libvirt)[arguments]: Substitute the
absolute dnsmasq file name.  Disable one test.

Co-authored-by: Marius Bakke <marius@gnu.org>

diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index d451b85..005421a 100644 (file)
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -1311,9 +1311,16 @@ pretty simple, REST API.")
               (substitute* "scripts/meson-install-dirs.py"
                 (("destdir = .*")
                  "destdir = '/tmp'"))))
+          (add-after 'unpack 'use-absolute-dnsmasq
+            (lambda* (#:key inputs #:allow-other-keys)
+              (let ((dnsmasq (search-input-file inputs "sbin/dnsmasq")))
+                (substitute* "src/util/virdnsmasq.c"
+                  (("#define DNSMASQ \"dnsmasq\"")
+                   (string-append "#define DNSMASQ \"" dnsmasq "\""))))))
           (add-before 'configure 'disable-broken-tests
             (lambda _
               (let ((tests (list "commandtest"         ; hangs idly
+                                 "networkxml2conftest" ; fails with absolute dnsmasq
                                  "qemuxml2argvtest"    ; fails
                                  "virnetsockettest"))) ; tries to network
                 (substitute* "tests/meson.build"