add internal module as backdoor for hidden function/definition.
also export core sendPacket/recvPacket
This commit is contained in:
parent
476b0a8f82
commit
74633cd68f
4 changed files with 47 additions and 1 deletions
|
@ -7,7 +7,26 @@
|
|||
--
|
||||
module Network.TLS
|
||||
(
|
||||
module Network.TLS.Core
|
||||
-- * Context configuration
|
||||
TLSParams(..)
|
||||
, defaultParams
|
||||
|
||||
-- * Context object
|
||||
, TLSCtx
|
||||
, ctxHandle
|
||||
|
||||
-- * Creating a context
|
||||
, client
|
||||
, server
|
||||
|
||||
-- * Initialisation and Termination of context
|
||||
, bye
|
||||
, handshake
|
||||
|
||||
-- * High level API
|
||||
, sendData
|
||||
, recvData
|
||||
|
||||
-- * Crypto Key
|
||||
, PrivateKey(..)
|
||||
-- * Crypto RNG
|
||||
|
|
|
@ -16,6 +16,10 @@ module Network.TLS.Core
|
|||
, TLSCtx
|
||||
, ctxHandle
|
||||
|
||||
-- * Internal packet sending and receiving
|
||||
, sendPacket
|
||||
, recvPacket
|
||||
|
||||
-- * Creating a context
|
||||
, client
|
||||
, server
|
||||
|
|
22
Network/TLS/Internal.hs
Normal file
22
Network/TLS/Internal.hs
Normal file
|
@ -0,0 +1,22 @@
|
|||
{-# OPTIONS_HADDOCK hide #-}
|
||||
-- |
|
||||
-- Module : Network.TLS.Internal
|
||||
-- License : BSD-style
|
||||
-- Maintainer : Vincent Hanquez <vincent@snarc.org>
|
||||
-- Stability : experimental
|
||||
-- Portability : unknown
|
||||
--
|
||||
module Network.TLS.Internal
|
||||
( module Network.TLS.Struct
|
||||
, module Network.TLS.Packet
|
||||
, module Network.TLS.Receiving
|
||||
, module Network.TLS.Sending
|
||||
, sendPacket
|
||||
, recvPacket
|
||||
) where
|
||||
|
||||
import Network.TLS.Struct
|
||||
import Network.TLS.Packet
|
||||
import Network.TLS.Receiving
|
||||
import Network.TLS.Sending
|
||||
import Network.TLS.Core (sendPacket, recvPacket)
|
|
@ -43,6 +43,7 @@ Library
|
|||
Exposed-modules: Network.TLS
|
||||
Network.TLS.Cipher
|
||||
Network.TLS.Compression
|
||||
Network.TLS.Internal
|
||||
other-modules: Network.TLS.Cap
|
||||
Network.TLS.SRandom
|
||||
Network.TLS.Struct
|
||||
|
|
Loading…
Reference in a new issue