Network.Mail.Pool

SMTP is s an incredibly stable and well supported protocol. Using this rather then API's prevents vendorlocking.

This module provides a ready to go connection pool for SMTP. Which has been used in various deployments already.

Documentation

sendEmail :: MonadIO m => Pool SMTPConnection -> Mail -> m ()

Send a Mail with help of a connection pool.

smtpPool :: PoolSettings -> IO (Pool SMTPConnection)

Construct a connection pool from settings.

defSettings :: SmtpCred -> PoolSettings

Create settings with good defaults from SmtpCred.

data SmtpCred

Authentication information for the SMTP connection

Constructors

SmtpCred

Fields

• _smtpPassword :: String
• _smtpLogin :: String
• _smtpHost :: String
• _smtpPort :: PortNumber

Instances

FromJSON SmtpCred

Defined in Network.Mail.Pool

Methods

parseJSON :: Value -> Parser SmtpCred

parseJSONList :: Value -> Parser [SmtpCred]

omittedField :: Maybe SmtpCred

Show SmtpCred

Defined in Network.Mail.Pool

Methods

showsPrec :: Int -> SmtpCred -> ShowS

show :: SmtpCred -> String

showList :: [SmtpCred] -> ShowS

data PoolSettings

This allows you to override the default settings from defSettings

Constructors

PoolSettings

Fields

• _poolCred :: SmtpCred

  credentials for smtp connection

• _poolConnf :: SmtpCred -> IO SMTPConnection

  allows overriding of the opening function, for example openPlain or openTls

• _poolUnused :: Double

  specify how long connections are kept open.

• _poolStripeMax :: Int

  how many connections per stripe.

specify connection type

openTls :: SmtpCred -> IO SMTPConnection

openPlain :: SmtpCred -> IO SMTPConnection

openTls' :: Settings -> SmtpCred -> IO SMTPConnection

createPoolConfig :: PoolSettings -> PoolConfig SMTPConnection

allows manipulation of the underlying resourcepool config

optparse applicative

emailOptions :: Parser SmtpCred

lenses

poolCred :: Lens' PoolSettings SmtpCred

poolConnf :: Lens' PoolSettings (SmtpCred -> IO SMTPConnection)

poolUnused :: Lens' PoolSettings Double

poolStripeMax :: Lens' PoolSettings Int

smtpHost :: Lens' SmtpCred String

smtpLogin :: Lens' SmtpCred String

smtpPassword :: Lens' SmtpCred String

smtpPort :: Lens' SmtpCred PortNumber

Exceptions

data ServiceAuthFailure a

Failed to authetnicate with some upstream service (smtp for example)

Instances

(Typeable a, Show a) => Exception (ServiceAuthFailure a)

Defined in Network.Mail.Pool

Methods

toException :: ServiceAuthFailure a -> SomeException

fromException :: SomeException -> Maybe (ServiceAuthFailure a)

displayException :: ServiceAuthFailure a -> String

Show a => Show (ServiceAuthFailure a)

Defined in Network.Mail.Pool

Methods

showsPrec :: Int -> ServiceAuthFailure a -> ShowS

show :: ServiceAuthFailure a -> String

showList :: [ServiceAuthFailure a] -> ShowS

re exports

module Network.HaskellNet.SMTP.SSL

module Network.HaskellNet.SMTP

module Data.Pool