+
+(define-public xdg-dbus-proxy
+ (package
+ (name "xdg-dbus-proxy")
+ (version "0.1.2")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "https://github.com/flatpak/xdg-dbus-proxy"
+ "/releases/download/" version
+ "/xdg-dbus-proxy-" version ".tar.xz"))
+ (sha256
+ (base32
+ "03sj1h0c2l08xa8phw013fnxr4fgav7l2mkjhzf9xk3dykwxcj8p"))))
+ (build-system gnu-build-system)
+ (native-inputs
+ `(("pkg-config" ,pkg-config)
+
+ ;; For tests.
+ ("dbus" ,dbus)
+
+ ;; These are required to build the manual.
+ ("docbook-xml" ,docbook-xml-4.3)
+ ("docbook-xsl" ,docbook-xsl)
+ ("libxml2" ,libxml2)
+ ("xsltproc" ,libxslt)))
+ (inputs
+ `(("glib" ,glib)))
+ (home-page "https://github.com/flatpak/xdg-dbus-proxy")
+ (synopsis "D-Bus connection proxy")
+ (description
+ "xdg-dbus-proxy is a filtering proxy for D-Bus connections. It can be
+used to create D-Bus sockets inside a Linux container that forwards requests
+to the host system, optionally with filters applied.")
+ (license license:lgpl2.1+)))
+
+(define-public dbus-test-runner
+ (package
+ (name "dbus-test-runner")
+ (version "19.04.0")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append
+ "https://launchpad.net/dbus-test-runner/"
+ (version-major+minor version) "/" version
+ "/+download/dbus-test-runner-" version ".tar.gz"))
+ (sha256
+ (base32
+ "0xnbay58xn0hav208mdsg8dd176w57dcpw1q2k0g5fh9v7xk4nk4"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:phases
+ (modify-phases %standard-phases
+ (add-before 'configure 'fix-test-paths
+ ;; add missing space
+ (lambda* (#:key outputs #:allow-other-keys)
+ (substitute* "Makefile.in"
+ (("#!/bin/bash") (string-append "#!" (which "bash"))))
+ (substitute* "tests/Makefile.in"
+ (("/bin/sh") (which "sh"))
+ (("#!/bin/bash") (string-append "#!" (which "bash")))
+ (("echo cat") (string-append "echo " (which "cat")))
+ (("/bin/true") (which "true")))
+ #t)))))
+ (inputs
+ `(("gtk+" ,gtk+)
+ ("glib" ,glib)
+ ("dbus-glib" ,dbus-glib)))
+ (native-inputs
+ `(("glib:bin" ,glib "bin")
+ ("intltool" ,intltool)
+ ("pkg-config" ,pkg-config)
+ ;; following used for tests
+ ("python" ,python)
+ ("python-dbusmock" ,python-dbusmock)
+ ("xvfb" ,xorg-server-for-tests)))
+ (home-page "https://launchpad.net/dbus-test-runner")
+ (synopsis "Run a executables under a new DBus session for testing")
+ (description "A small little utility to run a couple of executables under a
+new DBus session for testing.")
+ (license license:gpl3)))