| Commit message (Collapse) | Author | Age | Files | Lines |
|---|
| |
|
|
|
|
|
| |
* web/socket/client.scm (generate-websocket-nonce): Rename to...
(generate-client-key): ...this.
(make-handshake-request): Change argument list.
(handshake): Validate accept key.
|
| |
|
|
|
| |
* web/socket/client.scm (generate-masking-key): New procedure.
(websocket-send): Mask the frame to be sent.
|
| |
|
|
|
|
|
| |
* 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.
|
| |
|
|
|
|
|
| |
* web/socket/client.scm (<websocket>)[entropy-port]: New field.
(open-entropy-port): New procedure.
(make-websocket): Open entropy port.
(close-websocket): Close entropy port.
|
| |
|
|
|
| |
* web/socket/client.scm (display-websocket): New procedure.
(<websocket>): Set custom record type printer.
|
| |
|
|
|
|
|
|
|
|
|
| |
* 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.
|
| |
|
|
|
| |
* web/socket/client.scm (close-websocket): Wait for server to close the
connection for a reasonable amount of time.
|
| |
|
