Language.Haskell.LSP.Test

Provides the framework to start functionally testing Language Server Protocol servers. You should import Language.Haskell.LSP.Types alongside this.

Sessions

type Session = ParserStateReader FromServerMessage SessionState SessionContext IO

A session representing one instance of launching and connecting to a server.

You can send and receive messages to the server within Session via message, sendRequest and sendNotification.

runSession

Arguments

:: String

The command to run the server.

-> ClientCapabilities

The capabilities that the client should declare.

-> FilePath

The filepath to the root directory for the session.

-> Session a

The session to run.

-> IO a

Starts a new session.

runSession "hie" fullCaps "path/to/root/dir" $ do
  doc <- openDoc "Desktop/simple.hs" "haskell"
  diags <- waitForDiagnostics
  let pos = Position 12 5
      params = TextDocumentPositionParams doc
  hover <- request TextDocumentHover params

Config

runSessionWithConfig

Arguments

:: SessionConfig

Configuration options for the session.

-> String

The command to run the server.

-> ClientCapabilities

The capabilities that the client should declare.

-> FilePath

The filepath to the root directory for the session.

-> Session a

The session to run.

-> IO a

Starts a new sesion with a custom configuration.

data SessionConfig

Stuff you can configure for a Session.

Constructors

SessionConfig

Fields

• messageTimeout :: Int

  Maximum time to wait for a message in seconds, defaults to 60.

• logStdErr :: Bool

  Redirect the server's stderr to this stdout, defaults to False.

• logMessages :: Bool

  Trace the messages sent and received to stdout, defaults to False.

• logColor :: Bool

  Add ANSI color to the logged messages, defaults to True.

• lspConfig :: Maybe Value

  The initial LSP config as JSON value, defaults to Nothing.

Instances

Default SessionConfig

Defined in Language.Haskell.LSP.Test.Session

Methods

def :: SessionConfig

defaultConfig :: SessionConfig

The configuration used in runSession.

fullCaps :: ClientCapabilities

The whole shebang. The real deal. Capabilities for full conformance to the current (v3.10) LSP specification.

Exceptions

data SessionException

An exception that can be thrown during a Session

Constructors

Timeout

NoContentLengthHeader

UnexpectedMessage String FromServerMessage

ReplayOutOfOrder FromServerMessage [FromServerMessage]

UnexpectedDiagnostics

IncorrectApplyEditRequest String

UnexpectedResponseError LspIdRsp ResponseError

UnexpectedServerTermination

Instances

Eq SessionException

Defined in Language.Haskell.LSP.Test.Exceptions

Methods

(==) :: SessionException -> SessionException -> Bool

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

Show SessionException

Defined in Language.Haskell.LSP.Test.Exceptions

Methods

showsPrec :: Int -> SessionException -> ShowS

show :: SessionException -> String

showList :: [SessionException] -> ShowS

Exception SessionException

Defined in Language.Haskell.LSP.Test.Exceptions

Methods

toException :: SessionException -> SomeException

fromException :: SomeException -> Maybe SessionException

displayException :: SessionException -> String

anySessionException :: SessionException -> Bool

A predicate that matches on any SessionException

withTimeout :: Int -> Session a -> Session a

Execute a block f that will throw a Timeout exception after duration seconds. This will override the global timeout for waiting for messages to arrive defined in SessionConfig.

Sending

request :: (ToJSON params, FromJSON a) => ClientMethod -> params -> Session (ResponseMessage a)

Sends a request to the server and waits for its response. Will skip any messages in between the request and the response rsp <- request TextDocumentDocumentSymbol params :: Session DocumentSymbolsResponse Note: will skip any messages in between the request and the response.

request_ :: ToJSON params => ClientMethod -> params -> Session ()

The same as sendRequest, but discard the response.

sendRequest

Arguments

:: ToJSON params

=> ClientMethod

The request method.

-> params

The request parameters.

-> Session LspId

The id of the request that was sent.

Sends a request to the server. Unlike request, this doesn't wait for the response.

sendNotification

Arguments

:: ToJSON a

=> ClientMethod

The notification method.

-> a

The notification parameters.

-> Session ()

Sends a notification to the server.

sendResponse :: ToJSON a => ResponseMessage a -> Session ()

Sends a response to the server.

Receving

To receive a message, just specify the type that expect:

msg1 <- message :: Session ApplyWorkspaceEditRequest
msg2 <- message :: Session HoverResponse

Session is actually just a parser that operates on messages under the hood. This means that you can create and combine parsers to match speicifc sequences of messages that you expect.

For example, if you wanted to match either a definition or references request:

defOrImpl = (message :: Session DefinitionRequest)
         <|> (message :: Session ReferencesRequest)

If you wanted to match any number of telemetry notifications immediately followed by a response:

logThenDiags =
 skipManyTill (message :: Session TelemetryNotification)
              anyResponse

satisfy :: (FromServerMessage -> Bool) -> Session FromServerMessage

Consumes and returns the next message, if it satisfies the specified predicate.

Since: 0.5.2.0

message :: forall a. (Typeable a, FromJSON a) => Session a

Matches a message of type a.

anyRequest :: Session FromServerMessage

Matches if the message is a request.

anyResponse :: Session FromServerMessage

Matches if the message is a response.

anyNotification :: Session FromServerMessage

Matches if the message is a notification.

anyMessage :: Session FromServerMessage

Matches any type of message.

loggingNotification :: Session FromServerMessage

Matches if the message is a log message notification or a show message notification/request.

publishDiagnosticsNotification :: Session PublishDiagnosticsNotification

Matches a PublishDiagnosticsNotification (textDocument/publishDiagnostics) notification.

responseForId :: forall a. FromJSON a => LspId -> Session (ResponseMessage a)

Matches a response for a specific id.

Utilities

Quick helper functions for common tasks. ** Initialization

initializeResponse :: Session InitializeResponse

Returns the initialize response that was received from the server. The initialize requests and responses are not included the session, so if you need to test it use this.

Documents

openDoc :: FilePath -> String -> Session TextDocumentIdentifier

Opens a text document and sends a notification to the client.

openDoc' :: FilePath -> String -> Text -> Session TextDocumentIdentifier

This is a variant of openDoc that takes the file content as an argument.

closeDoc :: TextDocumentIdentifier -> Session ()

Closes a text document and sends a notification to the client.

changeDoc :: TextDocumentIdentifier -> [TextDocumentContentChangeEvent] -> Session ()

Changes a text document and sends a notification to the client

documentContents :: TextDocumentIdentifier -> Session Text

The current text contents of a document.

getDocumentEdit :: TextDocumentIdentifier -> Session Text

Parses an ApplyEditRequest, checks that it is for the passed document and returns the new content

getDocUri :: FilePath -> Session Uri

Gets the Uri for the file corrected to the session directory.

getVersionedDoc :: TextDocumentIdentifier -> Session VersionedTextDocumentIdentifier

Adds the current version to the document, as tracked by the session.

Symbols

getDocumentSymbols :: TextDocumentIdentifier -> Session (Either [DocumentSymbol] [SymbolInformation])

Returns the symbols in a document.

Diagnostics

waitForDiagnostics :: Session [Diagnostic]

Waits for diagnostics to be published and returns them.

waitForDiagnosticsSource :: String -> Session [Diagnostic]

The same as waitForDiagnostics, but will only match a specific $sel:_source:Diagnostic.

noDiagnostics :: Session ()

Expects a PublishDiagnosticsNotification and throws an UnexpectedDiagnostics exception if there are any diagnostics returned.

getCurrentDiagnostics :: TextDocumentIdentifier -> Session [Diagnostic]

Returns the current diagnostics that have been sent to the client. Note that this does not wait for more to come in.

Commands

executeCommand :: Command -> Session ()

Executes a command.

Code Actions

getCodeActions :: TextDocumentIdentifier -> Range -> Session [CAResult]

Returns the code actions in the specified range.

getAllCodeActions :: TextDocumentIdentifier -> Session [CAResult]

Returns all the code actions in a document by querying the code actions at each of the current diagnostics' positions.

executeCodeAction :: CodeAction -> Session ()

Executes a code action. Matching with the specification, if a code action contains both an edit and a command, the edit will be applied first.

Completions

getCompletions :: TextDocumentIdentifier -> Position -> Session [CompletionItem]

Returns the completions for the position in the document.

References

getReferences

Arguments

:: TextDocumentIdentifier

The document to lookup in.

-> Position

The position to lookup.

-> Bool

Whether to include declarations as references.

-> Session [Location]

The locations of the references.

Returns the references for the position in the document.

Definitions

getDefinitions

Arguments

:: TextDocumentIdentifier

The document the term is in.

-> Position

The position the term is at.

-> Session [Location]

The location(s) of the definitions

Returns the definition(s) for the term at the specified position.

getTypeDefinitions

Arguments

:: TextDocumentIdentifier

The document the term is in.

-> Position

The position the term is at.

-> Session [Location]

The location(s) of the definitions

Returns the type definition(s) for the term at the specified position.

Renaming

rename :: TextDocumentIdentifier -> Position -> String -> Session ()

Renames the term at the specified position.

Hover

getHover :: TextDocumentIdentifier -> Position -> Session (Maybe Hover)

Returns the hover information at the specified position.

Highlights

getHighlights :: TextDocumentIdentifier -> Position -> Session [DocumentHighlight]

Returns the highlighted occurences of the term at the specified position

Formatting

formatDoc :: TextDocumentIdentifier -> FormattingOptions -> Session ()

Applies formatting to the specified document.

formatRange :: TextDocumentIdentifier -> FormattingOptions -> Range -> Session ()

Applies formatting to the specified range in a document.

Edits

applyEdit :: TextDocumentIdentifier -> TextEdit -> Session VersionedTextDocumentIdentifier

Applys an edit to the document and returns the updated document version.

Code lenses

getCodeLenses :: TextDocumentIdentifier -> Session [CodeLens]

Returns the code lenses for the specified document.