[cl-plus-ssl-devel] Possible bug in test-https-server (2008-11-04)

[David Lichteblau]

Quoting John McAleely (john at mcaleely.com):
> Currently all code paths appear to call make-bio-lisp method via  
> ensure-initialised (in two possible places, in fact!). Commenting  
> these out results in a cl+ssl that fails (in the same unwrap-strategy  
> nil tests, and my portableaserve installation) with an error:

Sorry, the function I meant is called bio-new-lisp (which is called at
runtime for unrecognized streams), not make-bio-lisp-method (which is a
harmless initialization step).

> However, while the cl+ssl test suite, and portable aserve, fail *in  
> the same way* I think I've not reached this point yet.
> 
> Anywhere else I should be commenting out attempts to use the BIO?

How about this?  It just warns loudly.

Index: streams.lisp
===================================================================
RCS file: /project/cl-plus-ssl/cvsroot/cl+ssl/streams.lisp,v
retrieving revision 1.12
diff -u -u -r1.12 streams.lisp
--- streams.lisp	17 Apr 2008 20:58:29 -0000	1.12
+++ streams.lisp	21 Jan 2009 13:54:45 -0000
@@ -193,6 +193,7 @@
      (install-nonblock-flag socket)
      (ssl-set-fd handle socket))
     (stream
+     (warn "unrecognized stream, using the Lisp BIO")
      (ssl-set-bio handle (bio-new-lisp) (bio-new-lisp))))
   (ssl-ctx-ctrl handle
 		+SSL_CTRL_MODE+