Fw: ssl support

[José Ronquillo]

Hello Hans,  my setup is



common lisp implementation: SBCL 1.1.14
Linux 3.10.5 i686 and Linux 3.10 amd64

Hunchentoot version 1.2.24


This code can help you to reproduce the problem:



(ql:quickload "hunchentoot")

(defvar *acceptor* nil "El acceptor de hunchentoot")

(defun inicia-ht (&optional (port 4242))
  (format t "Iniciando el servidor en el puerto ~5,'0d~%" port)
  (setf *acceptor* (make-instance 'hunchentoot:easy-ssl-acceptor
  :port port
  :ssl-certificate-file "./server.crt"
  :ssl-privatekey-file "./server.key"))
;  (setf *acceptor* (make-instance 'hunchentoot:easy-acceptor
;  :port port)
  (setf (hunchentoot:acceptor-document-root *acceptor*) (pathname "/var/www/"))
  (hunchentoot:start *acceptor*))

(inicia-ht)



You can test with ab with and without ssl


ab -n 1000 -c 10 https://localhost:4242/index.html

ab -n 1000 -c 10 http://localhost:4242/index.html
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/tbnl-devel/attachments/20140118/b6d723fb/attachment.html>