Safe Haskell	None
Language	Haskell2010

Lifx.Lan

Synopsis

lifxPort :: PortNumber
sendMessage :: MonadLifx m => HostAddress -> Message -> m ()
data HSBK = HSBK {
- hue :: Word16
- saturation :: Word16
- brightness :: Word16
- kelvin :: Word16
}
newtype Duration = Duration Word32
data Message
- = SetPower Bool
- | SetColor HSBK Duration
- | SetLightPower Bool Duration
type Lifx = LifxT IO
newtype LifxT m a = LifxT {
- unLifxT :: StateT Word8 (ReaderT (Socket, Word32) m) a
}
runLifx :: Lifx a -> IO a
runLifxT :: MonadIO m => LifxT m a -> m a
class MonadIO m => MonadLifx m where
- getSocket :: m Socket
- getSource :: m Word32
- incrementCounter :: m ()
- getCounter :: m Word8
encodeMessage :: Bool -> Word8 -> Word32 -> Message -> ByteString
data Header = Header {
- size :: Word16
- protocol :: Word16
- addressable :: Bool
- tagged :: Bool
- origin :: Word8
- source :: Word32
- target :: Word64
- resRequired :: Bool
- ackRequired :: Bool
- sequenceCounter :: Word8
- packetType :: Word16
}
putHeader :: Header -> Put
messageHeader :: Bool -> Word8 -> Word32 -> Message -> Header
putMessagePayload :: Message -> Put
succ' :: (Eq a, Bounded a, Enum a) => a -> a

Documentation

lifxPort :: PortNumber Source #

sendMessage :: MonadLifx m => HostAddress -> Message -> m () Source #

data HSBK Source #

Constructors

HSBK
Fields hue :: Word16 saturation :: Word16 brightness :: Word16 kelvin :: Word16

Instances

Instances details

Eq HSBK Source #
Instance details Defined in Lifx.Lan Methods (==) :: HSBK -> HSBK -> Bool # (/=) :: HSBK -> HSBK -> Bool #
Ord HSBK Source #
Instance details Defined in Lifx.Lan Methods compare :: HSBK -> HSBK -> Ordering # (<) :: HSBK -> HSBK -> Bool # (<=) :: HSBK -> HSBK -> Bool # (>) :: HSBK -> HSBK -> Bool # (>=) :: HSBK -> HSBK -> Bool # max :: HSBK -> HSBK -> HSBK # min :: HSBK -> HSBK -> HSBK #
Show HSBK Source #
Instance details Defined in Lifx.Lan Methods showsPrec :: Int -> HSBK -> ShowS # show :: HSBK -> String # showList :: [HSBK] -> ShowS #
Generic HSBK Source #
Instance details Defined in Lifx.Lan Associated Types type Rep HSBK :: Type -> Type # Methods from :: HSBK -> Rep HSBK x # to :: Rep HSBK x -> HSBK #
type Rep HSBK Source #
Instance details Defined in Lifx.Lan type Rep HSBK = D1 ('MetaData "HSBK" "Lifx.Lan" "lifx-lan-0.1.0.0-EZ3PzMpiR8lHI36pXr4BIp" 'False) (C1 ('MetaCons "HSBK" 'PrefixI 'True) ((S1 ('MetaSel ('Just "hue") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Word16) :: S1 ('MetaSel ('Just "saturation") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Word16)) :: (S1 ('MetaSel ('Just "brightness") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Word16) :*: S1 ('MetaSel ('Just "kelvin") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Word16))))

newtype Duration Source #

Constructors

Duration Word32

Instances

Instances details

Eq Duration Source #
Instance details Defined in Lifx.Lan Methods (==) :: Duration -> Duration -> Bool # (/=) :: Duration -> Duration -> Bool #
Ord Duration Source #
Instance details Defined in Lifx.Lan Methods compare :: Duration -> Duration -> Ordering # (<) :: Duration -> Duration -> Bool # (<=) :: Duration -> Duration -> Bool # (>) :: Duration -> Duration -> Bool # (>=) :: Duration -> Duration -> Bool # max :: Duration -> Duration -> Duration # min :: Duration -> Duration -> Duration #
Show Duration Source #
Instance details Defined in Lifx.Lan Methods showsPrec :: Int -> Duration -> ShowS # show :: Duration -> String # showList :: [Duration] -> ShowS #
Generic Duration Source #
Instance details Defined in Lifx.Lan Associated Types type Rep Duration :: Type -> Type # Methods from :: Duration -> Rep Duration x # to :: Rep Duration x -> Duration #
type Rep Duration Source #
Instance details Defined in Lifx.Lan type Rep Duration = D1 ('MetaData "Duration" "Lifx.Lan" "lifx-lan-0.1.0.0-EZ3PzMpiR8lHI36pXr4BIp" 'True) (C1 ('MetaCons "Duration" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Word32)))

data Message Source #

https://lan.developer.lifx.com/docs/changing-a-device

Constructors

SetPower Bool
SetColor HSBK Duration
SetLightPower Bool Duration

type Lifx = LifxT IO Source #

newtype LifxT m a Source #

Constructors

LifxT
Fields unLifxT :: StateT Word8 (ReaderT (Socket, Word32) m) a

Instances

Instances details

Monad m => MonadState Word8 (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods get :: LifxT m Word8 # put :: Word8 -> LifxT m () # state :: (Word8 -> (a, Word8)) -> LifxT m a #
Monad m => Monad (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods (>>=) :: LifxT m a -> (a -> LifxT m b) -> LifxT m b # (>>) :: LifxT m a -> LifxT m b -> LifxT m b # return :: a -> LifxT m a #
Functor m => Functor (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods fmap :: (a -> b) -> LifxT m a -> LifxT m b # (<$) :: a -> LifxT m b -> LifxT m a #
Monad m => Applicative (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods pure :: a -> LifxT m a # (<>) :: LifxT m (a -> b) -> LifxT m a -> LifxT m b # liftA2 :: (a -> b -> c) -> LifxT m a -> LifxT m b -> LifxT m c # (>) :: LifxT m a -> LifxT m b -> LifxT m b # (<*) :: LifxT m a -> LifxT m b -> LifxT m a #
MonadIO m => MonadIO (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods liftIO :: IO a -> LifxT m a #
MonadIO m => MonadLifx (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods getSocket :: LifxT m Socket Source # getSource :: LifxT m Word32 Source # incrementCounter :: LifxT m () Source # getCounter :: LifxT m Word8 Source #
Monad m => MonadReader (Socket, Word32) (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods ask :: LifxT m (Socket, Word32) # local :: ((Socket, Word32) -> (Socket, Word32)) -> LifxT m a -> LifxT m a # reader :: ((Socket, Word32) -> a) -> LifxT m a #

runLifx :: Lifx a -> IO a Source #

runLifxT :: MonadIO m => LifxT m a -> m a Source #

class MonadIO m => MonadLifx m where Source #

Methods

getSocket :: m Socket Source #

getSource :: m Word32 Source #

incrementCounter :: m () Source #

getCounter :: m Word8 Source #

Instances

Instances details

MonadIO m => MonadLifx (LifxT m) Source #
Instance details Defined in Lifx.Lan Methods getSocket :: LifxT m Socket Source # getSource :: LifxT m Word32 Source # incrementCounter :: LifxT m () Source # getCounter :: LifxT m Word8 Source #
MonadLifx m => MonadLifx (ReaderT e m) Source #
Instance details Defined in Lifx.Lan Methods getSocket :: ReaderT e m Socket Source # getSource :: ReaderT e m Word32 Source # incrementCounter :: ReaderT e m () Source # getCounter :: ReaderT e m Word8 Source #
MonadLifx m => MonadLifx (StateT s m) Source #
Instance details Defined in Lifx.Lan Methods getSocket :: StateT s m Socket Source # getSource :: StateT s m Word32 Source # incrementCounter :: StateT s m () Source # getCounter :: StateT s m Word8 Source #

encodeMessage :: Bool -> Word8 -> Word32 -> Message -> ByteString Source #

data Header Source #

https://lan.developer.lifx.com/docs/encoding-a-packet

Constructors

Header
Fields size :: Word16 protocol :: Word16 addressable :: Bool tagged :: Bool origin :: Word8 source :: Word32 target :: Word64 resRequired :: Bool ackRequired :: Bool sequenceCounter :: Word8 packetType :: Word16

putHeader :: Header -> Put Source #

messageHeader :: Bool -> Word8 -> Word32 -> Message -> Header Source #

putMessagePayload :: Message -> Put Source #

succ' :: (Eq a, Bounded a, Enum a) => a -> a Source #

Safe, wraparound variant of succ.