Network.AGI

Documentation

data Digit

Constructors

Pound

Star

Zero

One

Two

Three

Four

Five

Six

Seven

Eight

Nine

Instances

Enum Digit

Eq Digit

Ord Digit

Read Digit

Show Digit

data AGI a

Instances

Monad AGI

Functor AGI

MonadIO AGI

MonadError IOError AGI

MonadReader [(String, String)] AGI

run :: AGI a -> Handler -> IO a

ppDigit :: Digit -> Char

ppEscapeDigits :: [Digit] -> String

data SoundType

Constructors

WAV

GSM

Instances

Eq SoundType

Show SoundType

sendRecv :: Command -> AGI String

answer

Arguments

:: AGI Bool

True on success, False on failure

answer channel if not already in answer state

hangUp :: Maybe String -> AGI Bool

getData

Arguments

:: FilePath

file to stream

-> Maybe Integer

timout in ms after keypress (default: 2000 ms)

-> Maybe Integer

max

-> AGI (Maybe ([Digit], Bool))

Nothing on failure, Just (digits, timeout) on success

data RecordResult

Constructors

FailureToWrite

FailureOnWaitFor

HangUp

Interrupted Digit

Timeout

RandomError String

Instances

Eq RecordResult

Show RecordResult

sayDigits :: [Digit] -> [Digit] -> AGI (Maybe (Maybe Digit))

sayNumber

Arguments

:: Integer

number to say

-> [Digit]

return early if any of these digits are received

-> AGI (Maybe (Maybe Digit))

Nothing on failure, Just Nothing on success, Just (Just digit) if key is pressed

sayNumber says the specified number

streamFile

Arguments

:: FilePath

file to stream

-> [Digit]

escape digits

-> Maybe Integer

sample offset

-> AGI (Either Integer (Maybe Digit, Integer))

On failure: Left endpos. On success: Right (Maybe Digit, endpos)

waitForDigit

Arguments

:: Integer

timeout in milliseconds, -1 to block indefinitely

-> AGI (Maybe (Maybe Digit))

|Nothing| on error, |Just Nothing| on timeout, |Just (Just digit)| on success

wait for channel to receive a DTMF digit.

record

Arguments

:: FilePath

record to this file

-> SoundType

|GSM | WAV|

-> [Digit]

stop recording if one of these digits is entered

-> Maybe Integer

maximum record time in milliseconds, -1 for no timeout

-> Maybe Integer

offset samples

-> Bool

beep to indicate recording has begun

-> Maybe Integer

stop recording if this many seconds of silence passes

-> AGI (RecordResult, Integer)

exit condition, endpos=offset