HsDev.Server.Message

Documentation

data Message a

Message with id to link request and response

Constructors

Message

Fields

messageId :: Maybe String

message :: a

Instances

Functor Message

Foldable Message

Traversable Message

Eq a => Eq (Message a)

Ord a => Ord (Message a)

ToJSON a => ToJSON (Message a)

FromJSON a => FromJSON (Message a)

messagesById :: Maybe String -> [Message a] -> [a]

Get messages by id

data Request

Request from client

Constructors

Request

Fields

requestCommand :: String

requestArgs :: [String]

requestOpts :: Opts String

Instances

ToJSON Request

FromJSON Request

requestToArgs :: Request -> Args

withOpts :: Request -> [Opts String] -> Request

Add options to request

withoutOpts :: Request -> [String] -> Request

Remove options from request

data Notification

Notification from server

Constructors

Notification Value

Instances

ToJSON Response

ToJSON Notification

FromJSON Response

FromJSON Notification

data Result

Result from server

Constructors

Result Value

Result

Error String (Map String Value)

Error

Instances

ToJSON Response

ToJSON Result

FromJSON Response

FromJSON Result

data ResultPart

Part of result list, returns via notification

Constructors

ResultPart Value

Instances

ToJSON ResultPart

FromJSON ResultPart

type Response = Either Notification Result

isNotification :: Response -> Bool

notification :: ToJSON a => a -> Response

result :: ToJSON a => a -> Response

responseError :: String -> [Pair] -> Response

resultPart :: ToJSON a => a -> Notification

groupResponses :: [Response] -> [([Notification], Result)]

responsesById :: Maybe String -> [Message Response] -> [([Notification], Result)]