wuss

Carpeta

CLIENTES SEGUROS WebSocket (WSS) en Haskell.

---

Wuss es una biblioteca que le permite crear fácilmente clientes de WebSocket seguros a través del protocolo WSS. Es una pequeña adición al paquete websockets y está adaptada de las soluciones existentes por @JasPerVDJ, @mpickering y @elfenlaid.

• Instalación
• Uso

Instalación

Para agregar Wuss como dependencia de su paquete, agréguelo a su archivo de camarilla.

 build-depends: wuss

Para otros casos de uso, instálelo con camarilla.

$ cabal install wuss

Uso

 import Wuss

import Control.Concurrent ( forkIO )
import Control.Monad ( forever , unless , void )
import Data.Text ( Text , pack )
import Network.WebSockets ( ClientApp , receiveData , sendClose , sendTextData )

main :: IO ()
main = runSecureClient " echo.websocket.org " 443 " / " ws

ws :: ClientApp ()
ws connection = do
    putStrLn " Connected! "

    void . forkIO . forever $ do
        message <- receiveData connection
        print (message :: Text )

    let loop = do
            line <- getLine
            unless ( null line) $ do
                sendTextData connection (pack line)
                loop
    loop

    sendClose connection (pack " Bye! " )

Para obtener más información sobre Wuss, lea la documentación de Haddock.