wuss
2.0.2.1
Haskell의 Secure WebSocket (WSS) 클라이언트.
Wuss는 WSS 프로토콜을 통해 안전한 WebSocket 클라이언트를 쉽게 만들 수있는 라이브러리입니다. websockets
패키지에 작은 추가 기능이며 @jaspervdj, @mpickering 및 @elfenlaid가 기존 솔루션에서 조정되었습니다.
패키지의 종속성으로 wuss를 추가하려면 Cabal 파일에 추가하십시오.
build-depends: wuss
다른 사용 사례의 경우 Cabal로 설치하십시오.
$ cabal install wuss
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! " )
Wuss에 대한 자세한 내용은 Haddock 문서를 읽으십시오.