GNU bug report logs - #24075
tls/https support in Guile (through r6rs binary ports?)

Previous Next

Package: guile;

Reported by: Christopher Allan Webber <cwebber <at> dustycloud.org>

Date: Tue, 26 Jul 2016 15:57:01 UTC

Severity: normal

Done: Christopher Allan Webber <cwebber <at> dustycloud.org>

Bug is archived. No further changes may be made.

Full log

Message #32 received at 24075 <at> debbugs.gnu.org (full text, mbox):

From: Christopher Allan Webber <cwebber <at> dustycloud.org>
To: Ludovic Courtès <ludo <at> gnu.org>
Cc: Andy Wingo <wingo <at> pobox.com>, 24075 <at> debbugs.gnu.org
Subject: Re: bug#24075: tls/https support in Guile (through r6rs binary ports?)
Date: Sun, 06 Nov 2016 22:40:40 -0600

Ludovic Courtès writes:

> Christopher Allan Webber <cwebber <at> dustycloud.org> skribis:
>
>> First of all, the response body starts in the wrong place... it should
>> start with "<!DOCTYPE html>".  Then, somewhere in the middle it switches
>> to garbage output.  I'm not sure why.
>
> [...]
>
>> +    (let ((record ((gnutls-ref 'session-record-port) session)))
>> +      (define (read! bv start count)
>> +        (define read-bv (get-bytevector-n record count))
>> +        (if (eof-object? read-bv)
>> +            0  ; read! returns 0 on eof-object
>> +            (let ((read-bv-len (bytevector-length read-bv)))
>> +              (bytevector-copy! read-bv 0 bv 0 read-bv-len)
>> +              read-bv-len)))
>
> Looks like ‘start’ is ignored here.  Could that be the reason?
>
> Ludo’.

... that was absolutely it.  What an omission on my part!  Thanks for
catching it. :)
This bug report was last modified 8 years and 197 days ago.

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.