[armedbear] #464: drakma / cl+ssl failure

[armedbear]

#464: drakma / cl+ssl failure
----------------------------+---------------------------------
      Reporter:  charmon    |       Type:  defect
        Status:  new        |   Priority:  major
     Milestone:             |  Component:  compiler
       Version:  1.6.0-dev  |   Keywords:  cl+ssl, ssl, drakma
Parent Tickets:             |
----------------------------+---------------------------------
 This is probably a cl+ssl/cffi issue rather than a drakma issue, but when
 I try to do, e.g.,


 {{{
 (drakma:http-request "https://common-lisp.net/")
 }}}

 I get the following error:
 {{{
 A failure in the SSL library occurred on handle #<com.sun.jna.Pointer
 native at 0x7fa96089a760 {41501C8A}> (return code: 1).
 SSL error queue:
 error:20080078:BIO routines:bio_write_intern:uninitialized
    [Condition of type CL+SSL::SSL-ERROR-SSL]

 Restarts:
  0: [RETRY] Retry SLIME REPL evaluation request.
  1: [*ABORT] Return to SLIME's top level.
  2: [ABORT] Abort thread.

 Backtrace:
   0: (#<FUNCTION {63F35033}> #<CL+SSL::SSL-ERROR-SSL {5769AA74}>
 #<FUNCTION {63F35033}>)
   1: (APPLY #<FUNCTION {63F35033}> (#<CL+SSL::SSL-ERROR-SSL {5769AA74}>
 #<FUNCTION {63F35033}>))
   2: (SYSTEM::RUN-HOOK SYSTEM::*INVOKE-DEBUGGER-HOOK* #<CL+SSL::SSL-ERROR-
 SSL {5769AA74}> #<FUNCTION {63F35033}>)
   3: (INVOKE-DEBUGGER #<CL+SSL::SSL-ERROR-SSL {5769AA74}>)
   4: (ERROR CL+SSL::SSL-ERROR-SSL :HANDLE #<com.sun.jna.Pointer
 native at 0x7fa96089a760 {41501C8A}> :RET 1 ...)
   5: (CL+SSL:MAKE-SSL-CLIENT-STREAM #<TWO-WAY-STREAM {50E6169D}> :VERIFY
 NIL :HOSTNAME "common-lisp.net" ...)
   6: (#<FUNCTION {4A462CFF}>)
   7: (CL+SSL::CALL-WITH-GLOBAL-CONTEXT #<com.sun.jna.Pointer
 native at 0x7fa9609829d0 {BB3CD71}> NIL #<FUNCTION {4A462CFF}>)
   8: (DRAKMA::MAKE-SSL-STREAM #<TWO-WAY-STREAM {50E6169D}> :HOSTNAME
 "common-lisp.net" :CERTIFICATE NIL ...)
   9: (DRAKMA:HTTP-REQUEST "https://common-lisp.net/")
  10: (SYSTEM::%EVAL (DRAKMA:HTTP-REQUEST "https://common-lisp.net/"))
  11: (EVAL (DRAKMA:HTTP-REQUEST "https://common-lisp.net/"))
 }}}

--
Ticket URL: <http://abcl.org/trac/ticket/464>
armedbear <http://abcl.org>
armedbear