-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/


-- | Haskell wrapper for textlocal SMS gateway
--   
--   Please see README.md
@package textlocal
@version 0.1.0.2

module Network.Api.Types
data Error
Error :: Int -> Text -> Error
[ecode] :: Error -> Int
[emessage] :: Error -> Text
data Warning
Warning :: Int -> Text -> Warning
[wcode] :: Warning -> Int
[wmessage] :: Warning -> Text
data TLStatus
Success :: TLStatus
Failure :: TLStatus
data TLResponse
TLResponse :: TLStatus -> Maybe [Warning] -> Maybe [Error] -> TLResponse
[status] :: TLResponse -> TLStatus
[warnings] :: TLResponse -> Maybe [Warning]
[errors] :: TLResponse -> Maybe [Error]
instance GHC.Show.Show Network.Api.Types.TLResponse
instance GHC.Classes.Ord Network.Api.Types.TLResponse
instance GHC.Classes.Eq Network.Api.Types.TLResponse
instance GHC.Classes.Ord Network.Api.Types.TLStatus
instance GHC.Classes.Eq Network.Api.Types.TLStatus
instance GHC.Show.Show Network.Api.Types.TLStatus
instance GHC.Show.Show Network.Api.Types.Warning
instance GHC.Classes.Ord Network.Api.Types.Warning
instance GHC.Classes.Eq Network.Api.Types.Warning
instance GHC.Show.Show Network.Api.Types.Error
instance GHC.Classes.Ord Network.Api.Types.Error
instance GHC.Classes.Eq Network.Api.Types.Error
instance Data.Aeson.Types.FromJSON.FromJSON Network.Api.Types.Error
instance Data.Aeson.Types.FromJSON.FromJSON Network.Api.Types.Warning
instance Data.Aeson.Types.FromJSON.FromJSON Network.Api.Types.TLStatus
instance Data.Aeson.Types.FromJSON.FromJSON Network.Api.Types.TLResponse

module Network.Api.TextLocal

-- | Credential for making request to textLocal server.
data Credential

-- | Create <a>Credential</a> for textLocal.
createApiKey :: ByteString -> Credential
createUserHash :: ByteString -> ByteString -> Credential
data SMSSettings

-- | <a>defaultSMSSettings</a> has the default settings, duh! The
--   <a>settingsSender</a> has a value of <a>TXTLCL</a>. The accessors
--   <a>settingsMessage</a>, <a>settingsAuth</a>, <a>settingsNumber</a>
--   contains a value of bottom. They have to be initialized to a proper
--   value before sending SMS.
defaultSMSSettings :: SMSSettings

-- | Use an existing manager instead of creating a new one
setManager :: Manager -> SMSSettings -> SMSSettings
setDestinationNumber :: [ByteString] -> SMSSettings -> SMSSettings
setMessage :: ByteString -> SMSSettings -> SMSSettings
setAuth :: Credential -> SMSSettings -> SMSSettings
runSettings :: Command -> SMSSettings -> IO (Either JSONException TLResponse)
sendSMS :: ByteString -> [ByteString] -> Credential -> IO (Either JSONException TLResponse)
instance GHC.Classes.Ord Network.Api.TextLocal.Command
instance GHC.Classes.Eq Network.Api.TextLocal.Command
instance GHC.Show.Show Network.Api.TextLocal.Command