mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-19 14:07:01 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: samba: Prepare for tests.

Browse source 
* gnu/packages/samba.scm (samba)[arguments]: Update comment regarding the test
suite failure.
[make-flags]: Run the test suite with the '--quick' option, as it is very slow otherwise.
[phases]{configure}: Add the '--enable-selftest' argument.
[inputs]: Add libtirpc.
This commit is contained in:
Maxim Cournoyer 2020-11-02 22:03:18 -05:00
parent 3185c29ac1
commit 25e811583f
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/packages/samba.scm
View file

@ -197,7 +197,8 @@ (define-public samba
#t)))) #t))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases `(#:make-flags '("TEST_OPTIONS=--quick") ;some tests are very long
#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-before 'configure 'setup-docbook-stylesheets (add-before 'configure 'setup-docbook-stylesheets
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
@ -219,6 +220,7 @@ (define-public samba
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(libdir (string-append out "/lib"))) (libdir (string-append out "/lib")))
(invoke "./configure" (invoke "./configure"
"--enable-selftest"
"--enable-fhs" "--enable-fhs"
(string-append "--prefix=" out) (string-append "--prefix=" out)
"--sysconfdir=/etc" "--sysconfdir=/etc"
@ -232,9 +234,8 @@ (define-public samba
(substitute* "dynconfig/wscript" (substitute* "dynconfig/wscript"
(("bld\\.INSTALL_DIR.*") "")) (("bld\\.INSTALL_DIR.*") ""))
#t))) #t)))
;; XXX: The test infrastructure attempts to set password with ;; FIXME: The test suite seemingly hangs after failing to provision the
;; smbpasswd, which fails with "smbpasswd -L can only be used by root." ;; test environment.
;; So disable tests until there's a workaround.
#:tests? #f)) #:tests? #f))
(inputs (inputs
`(("acl" ,acl) `(("acl" ,acl)
@ -247,6 +248,7 @@ (define-public samba
("heimdal" ,heimdal) ("heimdal" ,heimdal)
("jansson" ,jansson) ("jansson" ,jansson)
("libarchive" ,libarchive) ("libarchive" ,libarchive)
("libtirpc" ,libtirpc)
("linux-pam" ,linux-pam) ("linux-pam" ,linux-pam)
("lmdb" ,lmdb) ("lmdb" ,lmdb)
("openldap" ,openldap) ("openldap" ,openldap)