Game.LambdaHack.Server.Action

Game action monads and basic building blocks for human and computer player actions. Has no access to the the main action type. Does not export the liftIO operation nor a few other implementation details.

Action monads

class MonadActionRO m => MonadServer m where

Methods

getServer :: m StateServer

getsServer :: (StateServer -> a) -> m a

modifyServer :: (StateServer -> StateServer) -> m ()

putServer :: StateServer -> m ()

saveServer :: m ()

Instances

MonadServer ActionSer

class MonadServer m => MonadConnServer m

Instances

MonadConnServer ActionSer

tryRestore :: MonadServer m => COps -> DebugModeSer -> m (Maybe (State, StateServer))

updateConn :: (MonadAtomic m, MonadConnServer m) => (FactionId -> ChanFrontend -> ChanServer CmdClientUI CmdSer -> IO ()) -> (FactionId -> ChanServer CmdClientAI CmdTakeTimeSer -> IO ()) -> m ()

Update connections to the new definition of factions. Connect to clients in old or newly spawned threads that read and write directly to the channels.

killAllClients :: (MonadAtomic m, MonadConnServer m) => m ()

speedupCOps :: Bool -> COps -> COps

Compute and insert auxiliary optimized components into game content, to be used in time-critical sections of the code.

Communication

sendUpdateAI :: MonadConnServer m => FactionId -> CmdClientAI -> m ()

sendQueryAI :: MonadConnServer m => FactionId -> ActorId -> m CmdTakeTimeSer

sendPingAI :: MonadConnServer m => FactionId -> m ()

sendUpdateUI :: MonadConnServer m => FactionId -> CmdClientUI -> m ()

sendQueryUI :: MonadConnServer m => FactionId -> ActorId -> m CmdSer

sendPingUI :: MonadConnServer m => FactionId -> m ()

Assorted primitives

debugPrint :: MonadServer m => Text -> m ()

dumpRngs :: MonadServer m => m ()

Dumps RNG states from the start of the game to a file.

getSetGen :: MonadServer m => Maybe StdGen -> m StdGen

Gets a random generator from the arguments or, if not present, generates one.

restoreScore :: MonadServer m => COps -> m ScoreTable

Read the high scores table. Return the empty table if no file.

revealItems :: (MonadAtomic m, MonadServer m) => Maybe FactionId -> Maybe Actor -> m ()

deduceQuits :: (MonadAtomic m, MonadServer m) => Actor -> Status -> m ()

rndToAction :: MonadServer m => Rnd a -> m a

Invoke pseudo-random computation with the generator kept in the state.

resetSessionStart :: MonadServer m => m ()

resetGameStart :: MonadServer m => m ()

elapsedSessionTimeGT :: MonadServer m => Int -> m Bool

tellAllClipPS :: MonadServer m => m ()

tellGameClipPS :: MonadServer m => m ()

resetFidPerception :: MonadServer m => FactionId -> LevelId -> m ()

Update the cached perception for the selected level, for a faction. The assumption is the level, and only the level, has changed since the previous perception calculation.

getPerFid :: MonadServer m => FactionId -> LevelId -> m Perception

childrenServer :: MVar [MVar ()]