Data.Foscam.File.DeviceId

Documentation

data DeviceId

Constructors

DeviceId DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter DeviceIdCharacter

Instances

Eq DeviceId

Methods

(==) :: DeviceId -> DeviceId -> Bool

(/=) :: DeviceId -> DeviceId -> Bool

Ord DeviceId

Methods

compare :: DeviceId -> DeviceId -> Ordering

(<) :: DeviceId -> DeviceId -> Bool

(<=) :: DeviceId -> DeviceId -> Bool

(>) :: DeviceId -> DeviceId -> Bool

(>=) :: DeviceId -> DeviceId -> Bool

max :: DeviceId -> DeviceId -> DeviceId

min :: DeviceId -> DeviceId -> DeviceId

Show DeviceId

Methods

showsPrec :: Int -> DeviceId -> ShowS

show :: DeviceId -> String

showList :: [DeviceId] -> ShowS

((~) (* -> * -> *) p (->), Applicative f) => AsDeviceIdCharacter p f DeviceId

Methods

_DeviceIdCharacter :: Optic' * * p f DeviceId DeviceIdCharacter

AsDeviceId p f DeviceId

Methods

_DeviceId :: Optic' * * p f DeviceId DeviceId

class AsDeviceId p f s where

Methods

_DeviceId :: Optic' p f s DeviceId

Instances

(Choice p, Applicative f) => AsDeviceId p f String

Methods

_DeviceId :: Optic' * * p f String DeviceId

AsDeviceId p f DeviceId

Methods

_DeviceId :: Optic' * * p f DeviceId DeviceId

((~) (* -> * -> *) p (->), Functor f) => AsDeviceId p f Filename

Methods

_DeviceId :: Optic' * * p f Filename DeviceId

deviceId :: (Monad f, CharParsing f) => f DeviceId

>>> parse deviceId "test" "AB0934233DEF"
Right (DeviceId (DeviceIdCharacter 'A') (DeviceIdCharacter 'B') (DeviceIdCharacter '0') (DeviceIdCharacter '9') (DeviceIdCharacter '3') (DeviceIdCharacter '4') (DeviceIdCharacter '2') (DeviceIdCharacter '3') (DeviceIdCharacter '3') (DeviceIdCharacter 'D') (DeviceIdCharacter 'E') (DeviceIdCharacter 'F'))

>>> parse deviceId "test" "AB0934233DEFabc"
Right (DeviceId (DeviceIdCharacter 'A') (DeviceIdCharacter 'B') (DeviceIdCharacter '0') (DeviceIdCharacter '9') (DeviceIdCharacter '3') (DeviceIdCharacter '4') (DeviceIdCharacter '2') (DeviceIdCharacter '3') (DeviceIdCharacter '3') (DeviceIdCharacter 'D') (DeviceIdCharacter 'E') (DeviceIdCharacter 'F'))

>>> parse deviceId "test" "AB0934233DX"
Left "test" (line 1, column 12):
not a device ID character: X

>>> parse deviceId "test" "AB0934233DEf"
Left "test" (line 1, column 13):
not a device ID character: f

>>> parse deviceId "test" ""
Left "test" (line 1, column 1):
unexpected end of input
expecting device ID

getDeviceIdCharacters :: Fold DeviceId Char