summaryrefslogtreecommitdiff
path: root/web
Commit message (Collapse)AuthorAgeFilesLines
* client: Validate accept key when handshaking.David Thompson2016-03-251-25/+25
| | | | | | | * web/socket/client.scm (generate-websocket-nonce): Rename to... (generate-client-key): ...this. (make-handshake-request): Change argument list. (handshake): Validate accept key.
* Extract accept key generation to a new module.David Thompson2016-03-252-13/+45
| | | | | | | * web/socket/server.scm (handshake): Moved. (make-handshake-response): Use new make-accept-key procedure. * web/socket/utils.scm: New file. * Makefile.am (SOURCES): Add it.
* client: Mask sent frames.David Thompson2016-03-251-2/+6
| | | | | * web/socket/client.scm (generate-masking-key): New procedure. (websocket-send): Mask the frame to be sent.
* client: Generate random nonce for handshake.David Thompson2016-03-251-5/+11
| | | | | | | * web/socket/client.scm (generate-websocket-nonce): New procedure. (make-handshake-request): Change argument from uri to websocket. Generate a real nonce for Sec-WebSocket-Key header. (handshake): Adjust make-handshake-request call.
* client: Add entropy source.David Thompson2016-03-251-2/+14
| | | | | | | * web/socket/client.scm (<websocket>)[entropy-port]: New field. (open-entropy-port): New procedure. (make-websocket): Open entropy port. (close-websocket): Close entropy port.
* client: Add custom printer for <websocket>.David Thompson2016-03-251-0/+8
| | | | | * web/socket/client.scm (display-websocket): New procedure. (<websocket>): Set custom record type printer.
* client: Keep track of socket state.David Thompson2016-03-251-12/+37
| | | | | | | | | | | * web/socket/client.scm (<websocket>)[state]: New field. (websocket-state, set-websocket-state!): New field accessors. (websocket-connecting?, websocket-open?, websocket-closing?, websocket-closed?): New procedures. (handshake): Set socket to 'open' state after successful handshake. (make-websocket): Set socket to 'connecting' state initially. (close-websocket): Set socket to 'closing' before sending close frame, and then to 'closed' underlying TCP socket is closed.
* frame: Fix typo in error message.David Thompson2016-03-251-1/+1
| | | | * web/socket/frame.scm (read-frame): s/to/too/
* client: Wait for server to close connection.David Thompson2016-03-251-1/+12
| | | | | * web/socket/client.scm (close-websocket): Wait for server to close the connection for a reasonable amount of time.
* server: Handle client disconnects in a more robust manner.David Thompson2016-03-251-3/+14
| | | | | | * web/socket/server.scm (serve-client): Handle EOF object and client sockets that have closed while trying to echo the close frame. (run-server): Ignore SIGPIPE to prevent server crashes.
* Add client module.David Thompson2016-03-241-0/+143
|
* Add missing "Lesser" in licensing comments.David Thompson2015-12-092-6/+6
|
* Move base64 and SHA-1 modules to (web socket) namespace.David Thompson2015-12-093-2/+587
|
* frame: Fix masking error in write-frame.David Thompson2015-12-021-2/+1
| | | | | * web/socket/frame.scm (write-frame)[masked-data]: Correctly copy the source bytevector.
* frame: Add make-ping-frame.David Thompson2015-12-021-4/+11
| | | | * web/socket/frame.scm (make-ping-frame): New procedure.
* Add LGPL license information.David Thompson2015-11-082-0/+50
|
* frame: Improve doc strings and comments.David Thompson2015-11-081-3/+14
|
* server: Allow handler to ignore messages.David Thompson2015-11-081-9/+13
|
* Fix typo.David Thompson2015-11-071-1/+1
|
* Add (web socket server) module.David Thompson2015-11-071-0/+116
|
* Improve frame module.David Thompson2015-11-071-17/+87
|
* Add (web socket frame) module.David Thompson2015-11-071-0/+263