[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Chicken-users] OpenSSL bindings

From: Thomas Chust
Subject: [Chicken-users] OpenSSL bindings
Date: Wed, 05 Oct 2005 14:21:28 -0000
User-agent: Opera M2/8.02 (MacPPC, build 2148)


a preliminary version of my OpenSSL SSL/TLS library bindings for chicken is available at
so far only the client side is implemented and verification of peer certificates is useless, because you cannot load certificate chains, yet. For simple applications it's already useful, though:

-----BEGIN FILE: "openssl-example.scm"-----
(use openssl http-client htmlprag)

(define https-server "")

(define-values (in out) (ssl-connect https-server 443))
(let-values (((result headers i o)
               (string-append "https://"; https-server "/") in out)))
  (print "Result code from server: " result)
  (print "Headers from server:")
  (pp headers)
  (print "---")
  (print "Content as SXML:")
  (pp (html->sxml in))
  (print "---"))

(close-input-port in)
(close-output-port out)
-----END FILE:   "openssl-example.scm"-----

Documentation for the full interface as it will be (in a few days or so) is at


reply via email to

[Prev in Thread] Current Thread [Next in Thread]