HsDev.Server.Commands

Documentation

data ServerCommand

Server control command

Constructors

Version

Start ServerOpts

Run ServerOpts

Stop ClientOpts

Connect ClientOpts

Remote ClientOpts Bool Command

Instances

Show ServerCommand

Methods

showsPrec :: Int -> ServerCommand -> ShowS

show :: ServerCommand -> String

showList :: [ServerCommand] -> ShowS

FromCmd ServerCommand

Methods

cmdP :: Parser ServerCommand

data ServerOpts

Server options

Constructors

ServerOpts

Fields

• serverPort :: ConnectionPort
• serverTimeout :: Int
• serverLog :: Maybe FilePath
• serverLogLevel :: String
• serverDbFile :: Maybe FilePath
• serverSilent :: Bool

Instances

Show ServerOpts

Methods

showsPrec :: Int -> ServerOpts -> ShowS

show :: ServerOpts -> String

showList :: [ServerOpts] -> ShowS

Default ServerOpts

Methods

def :: ServerOpts

FromCmd ServerOpts

Methods

cmdP :: Parser ServerOpts

data ClientOpts

Client options

Constructors

ClientOpts

Fields

• clientPort :: ConnectionPort
• clientPretty :: Bool
• clientStdin :: Bool
• clientTimeout :: Int
• clientSilent :: Bool

Instances

Show ClientOpts

Methods

showsPrec :: Int -> ClientOpts -> ShowS

show :: ClientOpts -> String

showList :: [ClientOpts] -> ShowS

Default ClientOpts

Methods

def :: ClientOpts

FromCmd ClientOpts

Methods

cmdP :: Parser ClientOpts

data Request

Constructors

Request

Fields

• requestCommand :: Command
• requestDirectory :: FilePath
• requestNoFile :: Bool
• requestTimeout :: Int
• requestSilent :: Bool

Instances

Show Request

Methods

showsPrec :: Int -> Request -> ShowS

show :: Request -> String

showList :: [Request] -> ShowS

ToJSON Request

Methods

toJSON :: Request -> Value

toEncoding :: Request -> Encoding

toJSONList :: [Request] -> Value

toEncodingList :: [Request] -> Encoding

FromJSON Request

Methods

parseJSON :: Value -> Parser Request

parseJSONList :: Value -> Parser [Request]

type Msg a = (Bool, a)

isLisp :: Lens' (Msg a) Bool

msg :: Lens (Msg a) (Msg b) a b

jsonMsg :: a -> Msg a

lispMsg :: a -> Msg a

encodeMessage :: ToJSON a => Msg (Message a) -> ByteString

decodeMessage :: FromJSON a => ByteString -> Either (Msg String) (Msg (Message a))

Decode lisp or json request

sendCommand :: ClientOpts -> Bool -> Command -> (Notification -> IO a) -> IO Result

runServerCommand :: ServerCommand -> IO ()

findPath :: MonadIO m => CommandOptions -> FilePath -> m FilePath

processRequest :: SessionMonad m => CommandOptions -> Command -> m Result

Process request, notifications can be sent during processing

processClient :: SessionMonad m => String -> Chan ByteString -> (ByteString -> IO ()) -> m ()

Process client, listen for requests and process them

processClientSocket :: SessionMonad m => String -> Socket -> m ()

Process client by socket

module HsDev.Server.Types