Bug#964284: guile-gnutls: update to use guile 3.0

[Rob Browning]

Ludovic Courtès <ludo at gnu.org> writes:

> On the ‘gnutls_3_6_X’ branch, I can run the following loop for a while
> without experiencing the issue (on x86_64-linux-gnu):
>
>   while make check TESTS=tests/reauth.scm ; do : ; done

I was just able reproduce it again in a bullseye (testing) amd64 VM
while building both debian's 3.6.15-5 and 3.7.0-2 packages, though it
seemed a bit harder to trigger this time, at least with 3.7.0-2.

And it seems like redirecting stdin from /dev/null may make it more
likely.  In any case, ihe command that worked, fom a build in an "apt
source" unpacked tree in /dev/tmp/gnutls28 (which is symlinked to
/dev/shm/gnutls28) as described by Andreas in
https://bugs.debian.org/969672 was the command that's also described
there, i.e. if the initial "debian/rules build < /dev/null" didn't hang,
I could re-run this afterward and eventually get it to block:

  env GUILE_AUTO_COMPILE=0 make -C b4deb/guile/ \
    check TESTS="tests/reauth.scm" VERBOSE=1 < /dev/null

I'm still not certain that /dev/shm is critical (or maybe that just
makes things run fast enough to hit trouble), but I haven't reproduced
it in any arrangment other than the one Andreas describes yet.

Of course it's also possible that the debian build flags or debian
tools/libs are relevant.

I did manage to capture the reauth.scm.log this time when it hung:

  throw to `gnutls-error' with args (#<gnutls-error-enum Public key signing has failed.> read_from_session_record_port)
            15 (primitive-load "/dev/shm/gnutls28/gnutls28-3.7.0/b4deb…")
  In ice-9/eval.scm:
      155:9 14 (_ _)
  In ice-9/boot-9.scm:
    1731:15 13 (with-exception-handler #<procedure 7facc7265930 at ic…> …)
    1736:10 12 (with-exception-handler _ _ #:unwind? _ # _)
      142:2 11 (dynamic-wind _ _ #<procedure 7facc5eccb20 at ice-9/eva…>)
  In ice-9/eval.scm:
      155:9 10 (_ _)
     279:15  9 (_ #(#(#<directory (gnutls build tests) 7facc6e825a0> …)))
      619:8  8 (_ #(#(#(#<directory (guile-user) 7facc6e82f00> # …)) …))
     293:34  7 (_ #(#(#(#<directory (guile-user) 7facc6e82f00> # …)) …))
  In unknown file:
             6 (read #<input-output: string 7facc5ecee70>)
  In ice-9/boot-9.scm:
    1669:16  5 (raise-exception _ #:continuable? _)
    1764:13  4 (_ #<&compound-exception components: (#<&error> #<&irri…>)
  In ice-9/eval.scm:
      619:8  3 (_ #(#(#<directory (gnutls build tests) 7facc6e825a0>) …))
  In ice-9/boot-9.scm:
      142:2  2 (dynamic-wind #<procedure 7facc5ecc0e0 at ice-9/eval.s…> …)
  In ice-9/eval.scm:
      159:9  1 (_ #(#(#<directory (gnutls build tests) 7facc6e825a0> …)))
  In unknown file:
             0 (make-stack #t)

When I get a bit more time, I can try to attach gdb as you suggested.

Thanks
-- 
Rob Browning
rlb @defaultvalue.org and @debian.org
GPG as of 2011-07-10 E6A9 DA3C C9FD 1FF8 C676 D2C4 C0F0 39E9 ED1B 597A
GPG as of 2002-11-03 14DD 432F AE39 534D B592 F9A0 25C8 D377 8C7E 73A4