bug#31789: nss-mdns test is failing

[Sarah Morgensen]

Hello,

Thanks for the report.  Apologies that it's taken two years (!) for a
response.  I can not replicate this; does this still occur for you?

Clément Lassieur <clement@lassieur.org> writes:

> nss-mdns test is failing.  Here is the output:
>
> %%%% Starting test avahi
> Group begin: avahi
> Test begin:
>   test-name: "wait for services"
>   source-file: "/gnu/store/b5gvmlh78s40xvxq73dpdqr7sv0skhmy-nss-mdns-builder"
>   source-line: 1
>   source-form: (test-assert "wait for services" (marionette-eval (quote 
> (begin (use-modules (gnu services herd)) (start-service (quote nscd)) (let 
> ((sock (socket PF_UNIX SOCK_STREAM 0))) (let try () (catch (quote 
> system-error) (lambda () (connect sock AF_UNIX "/var/run/nscd/socket") 
> (close-port sock) (format #t "nscd is ready~%")) (lambda args (format #t 
> "waiting for nscd...~%") (usleep 500000) (try))))) (start-service (quote 
> avahi-daemon)) (start-service (quote networking)) #t)) marionette))
> Test end:
>   result-kind: pass
>   actual-value: #t
> Test begin:
>   test-name: "avahi-resolve-host-name"
>   source-file: "/gnu/store/b5gvmlh78s40xvxq73dpdqr7sv0skhmy-nss-mdns-builder"
>   source-line: 1
>   source-form: (test-equal "avahi-resolve-host-name" 0 (marionette-eval 
> (quote (system* "/run/current-system/profile/bin/avahi-resolve-host-name" 
> "-v" "komputilo.local")) marionette))
> Test end:
>   result-kind: pass
>   actual-value: 0
>   expected-value: 0
> Test begin:
>   test-name: "avahi-browse"
>   source-file: "/gnu/store/b5gvmlh78s40xvxq73dpdqr7sv0skhmy-nss-mdns-builder"
>   source-line: 1
>   source-form: (test-equal "avahi-browse" 0 (marionette-eval (quote (system* 
> "avahi-browse" "-avt")) marionette))
> Test end:
>   result-kind: pass
>   actual-value: 0
>   expected-value: 0
> Test begin:
>   test-name: "getaddrinfo .local"
>   source-file: "/gnu/store/b5gvmlh78s40xvxq73dpdqr7sv0skhmy-nss-mdns-builder"
>   source-line: 1
>   source-form: (test-assert "getaddrinfo .local" (match (marionette-eval 
> (quote (getaddrinfo "komputilo.local")) marionette) (((? vector? addrinfos) 
> ..1) (pk (quote getaddrinfo) addrinfos) (and (any (lambda (ai) (= AF_INET 
> (addrinfo:fam ai))) addrinfos) (any (lambda (ai) (= AF_INET6 (addrinfo:fam 
> ai))) addrinfos)))))
> Test end:
>   result-kind: fail
>   actual-value: #f
>   actual-error: (match-error "match" "no matching pattern" #f)
> Test begin:
>   test-name: "gethostbyname .local"
>   source-file: "/gnu/store/b5gvmlh78s40xvxq73dpdqr7sv0skhmy-nss-mdns-builder"
>   source-line: 1
>   source-form: (test-assert "gethostbyname .local" (match (pk (quote 
> gethostbyname) (marionette-eval (quote (gethostbyname "komputilo.local")) 
> marionette)) ((? vector? result) (and (string=? (hostent:name result) 
> "komputilo.local") (= (hostent:addrtype result) AF_INET)))))
> Test end:
>   result-kind: fail
>   actual-value: #f
>   actual-error: (match-error "match" "no matching pattern" #f)
> Group end: avahi
> # of expected passes      3
> # of unexpected failures  2

--
Sarah