gnu: networking: Return #t from all phases.

* gnu/packages/networking.scm (miredo, tcp-wrappers, librdkafka, ifstatus)
(iodine, httpstat, perl-socket6, perl-netaddr-ip, libproxy, openvswitch)
(libnet, asio): Return #t from all phases.
This commit is contained in:
Mark H Weaver 2018-06-27 20:51:35 -04:00
parent 9922278b25
commit 366c1cbbc6
No known key found for this signature in database
GPG key ID: 7CEF29847562C516

View file

@ -144,7 +144,8 @@ (define-public miredo
'check 'disable-checkconf-test
(lambda _
(substitute* "src/Makefile"
(("^TESTS = .*") "TESTS = \n")))))))
(("^TESTS = .*") "TESTS = \n"))
#t)))))
(home-page "http://www.remlab.net/miredo/")
(synopsis "Teredo IPv6 tunneling software")
(description
@ -216,7 +217,7 @@ (define-public tcp-wrappers
(substitute* "scaffold.c"
(("extern char .malloc.*;") ""))
;; This, believe it or not, is the recommended way to build!
(zero? (system* "make" "REAL_DAEMON_DIR=/etc" "linux"))))
(invoke "make" "REAL_DAEMON_DIR=/etc" "linux")))
;; There is no make install stage, so we have to do it ourselves.
(replace 'install
(lambda _
@ -251,7 +252,8 @@ (define-public tcp-wrappers
(for-each
(lambda (x)
(install-file x (string-append out "/bin/")))
bins)))))))
bins))
#t)))))
(home-page "http://www.porcupine.org")
(synopsis "Monitor and filter incoming requests for network services")
(description "With this package you can monitor and filter incoming requests for
@ -373,8 +375,8 @@ (define-public librdkafka
;; librdkafka++.so lacks RUNPATH for librdkafka.so
(setenv "LDFLAGS"
(string-append "-Wl,-rpath=" out "/lib"))
(zero? (system* "./configure"
(string-append "--prefix=" out)))))))))
(invoke "./configure"
(string-append "--prefix=" out))))))))
(native-inputs
`(("python" ,python-wrapper)))
(propagated-inputs
@ -457,7 +459,8 @@ (define-public ifstatus
(bin (string-append out "/bin")))
(mkdir-p bin)
(copy-file "ifstatus"
(string-append bin "/ifstatus"))))))))
(string-append bin "/ifstatus")))
#t)))))
(inputs `(("ncurses" ,ncurses)))
(home-page "http://ifstatus.sourceforge.net/graphic/index.html")
(synopsis "Text based network interface status monitor")
@ -511,14 +514,16 @@ (define-public iodine
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/tun.c"
(("PATH=[^ ]* ")
(string-append (assoc-ref inputs "net-tools") "/bin/")))))
(string-append (assoc-ref inputs "net-tools") "/bin/")))
#t))
(add-before 'check 'delete-failing-tests
;; Avoid https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=802105.
(lambda _
(substitute* "tests/common.c"
(("tcase_add_test\\(tc, \
test_parse_format_ipv(4(|_listen_all|_mapped_ipv6)|6)\\);")
"")))))
""))
#t)))
#:make-flags (list "CC=gcc"
(string-append "prefix=" (assoc-ref %outputs "out")))
#:test-target "test"))
@ -779,7 +784,8 @@ (define-public httpstat
(("ENV_CURL_BIN.get\\('curl'\\)")
(string-append "ENV_CURL_BIN.get('"
(assoc-ref inputs "curl")
"/bin/curl')"))))))))
"/bin/curl')")))
#t)))))
(home-page "https://github.com/reorx/httpstat")
(synopsis "Visualize curl statistics")
(description
@ -949,7 +955,7 @@ (define-public perl-socket6
,(string-append "PREFIX=" out)
"INSTALLDIRS=site")))
(setenv "CONFIG_SHELL" (which "sh"))
(zero? (apply system* "perl" args))))))))
(apply invoke "perl" args)))))))
(home-page "https://metacpan.org/release/Socket6")
(synopsis
"IPv6 related part of the C socket.h defines and structure manipulators for Perl")
@ -1009,7 +1015,7 @@ (define-public perl-netaddr-ip
,(string-append "PREFIX=" out)
"INSTALLDIRS=site")))
(setenv "CONFIG_SHELL" (which "sh"))
(zero? (apply system* "perl" args))))))))
(apply invoke "perl" args)))))))
(home-page
"https://metacpan.org/release/NetAddr-IP")
(synopsis
@ -1145,7 +1151,7 @@ (define-public libproxy
(modify-phases %standard-phases
(replace 'check
(lambda _
(zero? (system* "ctest" "-E" "url-test")))))))
(invoke "ctest" "-E" "url-test"))))))
(synopsis "Library providing automatic proxy configuration management")
(description "Libproxy handles the details of HTTP/HTTPS proxy
configuration for applications across all scenarios. Applications using
@ -1416,13 +1422,13 @@ (define-public openvswitch
(modify-phases %standard-phases
(replace 'install
(lambda _
(zero? (system* "make"
;; Don't try to create directories under /var.
"RUNDIR=/tmp"
"PKIDIR=/tmp"
"LOGDIR=/tmp"
"DBDIR=/tmp"
"install")))))))
(invoke "make"
;; Don't try to create directories under /var.
"RUNDIR=/tmp"
"PKIDIR=/tmp"
"LOGDIR=/tmp"
"DBDIR=/tmp"
"install"))))))
(native-inputs
`(("perl" ,perl)
("pkg-config" ,pkg-config)
@ -1723,8 +1729,8 @@ (define-public libnet
(lambda _ (chdir "libnet") #t))
(add-before 'build 'build-doc
(lambda* (#:key make-flags #:allow-other-keys)
(zero? (apply system* "make" "-C" "doc" "doc"
make-flags)))))))
(apply invoke "make" "-C" "doc" "doc"
make-flags))))))
(native-inputs
`(("autoconf" ,autoconf)
("automake" ,automake)