Happstack.Server.Internal.TLS

core functions and types for HTTPS support

Documentation

log' :: Priority -> String -> IO ()

wrapper around logM for this module

data TLSConf

configuration for using https://

Constructors

TLSConf

Fields

tlsPort :: Int

tlsCert :: FilePath

tlsKey :: FilePath

tlsCA :: Maybe FilePath

tlsTimeout :: Int

tlsLogAccess :: Maybe (LogAccess UTCTime)

tlsValidator :: Maybe (Response -> IO Response)

a function to validate the output on-the-fly

nullTLSConf :: TLSConf

a partially complete TLSConf . You must sete tlsCert and tlsKey at a mininum.

data HTTPS

record that holds the Socket and SSLContext needed to start the https:// event loop. Used with simpleHTTPWithSocket'

see also: httpOnSocket

Constructors

HTTPS

Fields

httpsSocket :: Socket

sslContext :: SSLContext

httpsOnSocket

Arguments

:: FilePath

path to ssl certificate

-> FilePath

path to ssl private key

-> Maybe FilePath

path to PEM encoded list of CA certificates

-> Socket

listening socket (on which listen() has been called, but not accept())

-> IO HTTPS

generate the HTTPS record needed to start the https:// event loop

acceptTLS

Arguments

:: Socket

the socket returned from acceptLite

-> SSLContext

-> IO SSL

accept a TLS connection

listenTLS

Arguments

:: TLSConf

tls configuration

-> (Request -> IO Response)

request handler

-> IO ()

https:/ RequestResponse loop

This function initializes SSL, and starts accepting and handling Requests and sending Respones.

Each Request is processed in a separate thread.

listenTLS' :: Int -> Maybe (LogAccess UTCTime) -> HTTPS -> (Request -> IO Response) -> IO ()

low-level https:/ RequestResponse loop

This is the low-level loop that reads Requests and sends Respones. It assumes that SSL has already been initialized and that socket is listening.

Each Request is processed in a separate thread.

see also: listenTLS