bug#55335: openssh-service no longer listens on IPv6

[Ludovic Courtès]

Ludovic Courtès <ludo@gnu.org> skribis:

> + (make <service>
> +   #:provides '(test-inetd6)
> +   #:start (make-inetd-constructor %command
> +                                   (list
> +                                    (endpoint (make-socket-address
> +                                               AF_INET
> +                                               INADDR_LOOPBACK
> +                                               $PORT))
> +                                    (endpoint (make-socket-address
> +                                               AF_INET6
> +                                               IN6ADDR_LOOPBACK
> +                                               $PORT))))
> +   #:stop  (make-inetd-destructor))
> + (make <service>
> +   #:provides '(test-inetd-v6-only)
> +   #:start (make-inetd-constructor %command
> +                                   (list
> +                                    (endpoint (make-socket-address
> +                                               AF_INET6
> +                                               IN6ADDR_LOOPBACK
> +                                               $PORT))))
> +   #:stop  (make-inetd-destructor))

I should point out that this new test hangs with Fibers 1.1.0; we need
this fix:

  
https://github.com/wingo/fibers/commit/c25dcb9cc4b5b977474ffe555b40ce2f1d0d1edc

I’ve contacted Aleix to see if we could release Fibers 1.1.1.  Otherwise
we’ll use a snapshot in Guix.

Ludo’.