You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
449 lines
16 KiB
449 lines
16 KiB
#include "ws_decode.h"
|
|
|
|
#include <syslog.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
|
|
#define WS_HYBI_MASK_LEN 4
|
|
|
|
|
|
static int
|
|
hybiRemaining(ws_ctx_t *wsctx)
|
|
{
|
|
return wsctx->nToRead - wsctx->nReadRaw;
|
|
}
|
|
|
|
void
|
|
hybiDecodeCleanup(ws_ctx_t *wsctx)
|
|
{
|
|
wsctx->header.payloadLen = 0;
|
|
wsctx->header.mask.u = 0;
|
|
wsctx->nReadRaw = 0;
|
|
wsctx->nToRead= 0;
|
|
wsctx->carrylen = 0;
|
|
wsctx->readPos = (unsigned char *)wsctx->codeBufDecode;
|
|
wsctx->readlen = 0;
|
|
wsctx->hybiDecodeState = WS_HYBI_STATE_HEADER_PENDING;
|
|
wsctx->writePos = NULL;
|
|
rfbLog("cleaned up wsctx\n");
|
|
}
|
|
|
|
/**
|
|
* Return payload data that has been decoded/unmasked from
|
|
* a websocket frame.
|
|
*
|
|
* @param[out] dst destination buffer
|
|
* @param[in] len bytes to copy to destination buffer
|
|
* @param[in,out] wsctx internal state of decoding procedure
|
|
* @param[out] number of bytes actually written to dst buffer
|
|
* @return next hybi decoding state
|
|
*/
|
|
static int
|
|
hybiReturnData(char *dst, int len, ws_ctx_t *wsctx, int *nWritten)
|
|
{
|
|
int nextState = WS_HYBI_STATE_ERR;
|
|
|
|
/* if we have something already decoded copy and return */
|
|
if (wsctx->readlen > 0) {
|
|
/* simply return what we have */
|
|
if (wsctx->readlen > len) {
|
|
rfbLog("copy to %d bytes to dst buffer; readPos=%p, readLen=%d\n", len, wsctx->readPos, wsctx->readlen);
|
|
memcpy(dst, wsctx->readPos, len);
|
|
*nWritten = len;
|
|
wsctx->readlen -= len;
|
|
wsctx->readPos += len;
|
|
nextState = WS_HYBI_STATE_DATA_AVAILABLE;
|
|
} else {
|
|
rfbLog("copy to %d bytes to dst buffer; readPos=%p, readLen=%d\n", wsctx->readlen, wsctx->readPos, wsctx->readlen);
|
|
memcpy(dst, wsctx->readPos, wsctx->readlen);
|
|
*nWritten = wsctx->readlen;
|
|
wsctx->readlen = 0;
|
|
wsctx->readPos = NULL;
|
|
if (hybiRemaining(wsctx) == 0) {
|
|
nextState = WS_HYBI_STATE_FRAME_COMPLETE;
|
|
} else {
|
|
nextState = WS_HYBI_STATE_DATA_NEEDED;
|
|
}
|
|
}
|
|
rfbLog("after copy: readPos=%p, readLen=%d\n", wsctx->readPos, wsctx->readlen);
|
|
} else if (wsctx->hybiDecodeState == WS_HYBI_STATE_CLOSE_REASON_PENDING) {
|
|
nextState = WS_HYBI_STATE_CLOSE_REASON_PENDING;
|
|
}
|
|
return nextState;
|
|
}
|
|
|
|
/**
|
|
* Read an RFC 6455 websocket frame (IETF hybi working group).
|
|
*
|
|
* Internal state is updated according to bytes received and the
|
|
* decoding of header information.
|
|
*
|
|
* @param[in] cl client ptr with ptr to raw socket and ws_ctx_t ptr
|
|
* @param[out] sockRet emulated recv return value
|
|
* @return next hybi decoding state; WS_HYBI_STATE_HEADER_PENDING indicates
|
|
* that the header was not received completely.
|
|
*/
|
|
static int
|
|
hybiReadHeader(ws_ctx_t *wsctx, int *sockRet)
|
|
{
|
|
int ret;
|
|
char *headerDst = wsctx->codeBufDecode + wsctx->nReadRaw;
|
|
int n = WSHLENMAX - wsctx->nReadRaw;
|
|
|
|
rfbLog("header_read to %p with len=%d\n", headerDst, n);
|
|
//ret = ws_read(cl, headerDst, n);
|
|
ret = wsctx->ctxInfo.readFunc(wsctx->ctxInfo.ctxPtr, headerDst, n);
|
|
rfbLog("read %d bytes from socket\n", ret);
|
|
if (ret <= 0) {
|
|
if (-1 == ret) {
|
|
/* save errno because rfbErr() will tamper it */
|
|
int olderrno = errno;
|
|
rfbErr("%s: peek; %m\n", __func__);
|
|
errno = olderrno;
|
|
*sockRet = -1;
|
|
} else {
|
|
*sockRet = 0;
|
|
}
|
|
return WS_HYBI_STATE_ERR;
|
|
}
|
|
|
|
wsctx->nReadRaw += ret;
|
|
if (wsctx->nReadRaw < 2) {
|
|
/* cannot decode header with less than two bytes */
|
|
errno = EAGAIN;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_HEADER_PENDING;
|
|
}
|
|
|
|
/* first two header bytes received; interpret header data and get rest */
|
|
wsctx->header.data = (ws_header_t *)wsctx->codeBufDecode;
|
|
|
|
wsctx->header.opcode = wsctx->header.data->b0 & 0x0f;
|
|
|
|
/* fin = (header->b0 & 0x80) >> 7; */ /* not used atm */
|
|
wsctx->header.payloadLen = wsctx->header.data->b1 & 0x7f;
|
|
rfbLog("first header bytes received; opcode=%d lenbyte=%d\n", wsctx->header.opcode, wsctx->header.payloadLen);
|
|
|
|
/*
|
|
* 4.3. Client-to-Server Masking
|
|
*
|
|
* The client MUST mask all frames sent to the server. A server MUST
|
|
* close the connection upon receiving a frame with the MASK bit set to 0.
|
|
**/
|
|
if (!(wsctx->header.data->b1 & 0x80)) {
|
|
rfbErr("%s: got frame without mask ret=%d\n", __func__, ret);
|
|
syslog(LOG_ERR, "%s: got frame without mask; ret=%d\n", __func__, ret);
|
|
errno = EIO;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_ERR;
|
|
}
|
|
|
|
if (wsctx->header.payloadLen < 126 && wsctx->nReadRaw >= 6) {
|
|
wsctx->header.headerLen = 2 + WS_HYBI_MASK_LEN;
|
|
wsctx->header.mask = wsctx->header.data->u.m;
|
|
} else if (wsctx->header.payloadLen == 126 && 8 <= wsctx->nReadRaw) {
|
|
wsctx->header.headerLen = 4 + WS_HYBI_MASK_LEN;
|
|
wsctx->header.payloadLen = WS_NTOH16(wsctx->header.data->u.s16.l16);
|
|
wsctx->header.mask = wsctx->header.data->u.s16.m16;
|
|
} else if (wsctx->header.payloadLen == 127 && 14 <= wsctx->nReadRaw) {
|
|
wsctx->header.headerLen = 10 + WS_HYBI_MASK_LEN;
|
|
wsctx->header.payloadLen = WS_NTOH64(wsctx->header.data->u.s64.l64);
|
|
wsctx->header.mask = wsctx->header.data->u.s64.m64;
|
|
} else {
|
|
/* Incomplete frame header, try again */
|
|
rfbErr("%s: incomplete frame header; ret=%d\n", __func__, ret);
|
|
errno = EAGAIN;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_HEADER_PENDING;
|
|
}
|
|
|
|
/* absolute length of frame */
|
|
wsctx->nToRead = wsctx->header.headerLen + wsctx->header.payloadLen;
|
|
|
|
/* update write position for next bytes */
|
|
wsctx->writePos = wsctx->codeBufDecode + wsctx->nReadRaw;
|
|
|
|
/* set payload pointer just after header */
|
|
wsctx->readPos = (unsigned char *)(wsctx->codeBufDecode + wsctx->header.headerLen);
|
|
|
|
rfbLog("header complete: state=%d flen=%d writeTo=%p\n", wsctx->hybiDecodeState, wsctx->nToRead, wsctx->writePos);
|
|
|
|
return WS_HYBI_STATE_DATA_NEEDED;
|
|
}
|
|
|
|
static int
|
|
hybiWsFrameComplete(ws_ctx_t *wsctx)
|
|
{
|
|
return wsctx != NULL && hybiRemaining(wsctx) == 0;
|
|
}
|
|
|
|
static char *
|
|
hybiPayloadStart(ws_ctx_t *wsctx)
|
|
{
|
|
return wsctx->codeBufDecode + wsctx->header.headerLen;
|
|
}
|
|
|
|
|
|
/**
|
|
* Read the remaining payload bytes from associated raw socket.
|
|
*
|
|
* - try to read remaining bytes from socket
|
|
* - unmask all multiples of 4
|
|
* - if frame incomplete but some bytes are left, these are copied to
|
|
* the carry buffer
|
|
* - if opcode is TEXT: Base64-decode all unmasked received bytes
|
|
* - set state for reading decoded data
|
|
* - reset write position to begin of buffer (+ header)
|
|
* --> before we retrieve more data we let the caller clear all bytes
|
|
* from the reception buffer
|
|
* - execute return data routine
|
|
*
|
|
* Sets errno corresponding to what it gets from the underlying
|
|
* socket or EIO if some internal sanity check fails.
|
|
*
|
|
* @param[in] cl client ptr with raw socket reference
|
|
* @param[out] dst destination buffer
|
|
* @param[in] len size of destination buffer
|
|
* @param[out] sockRet emulated recv return value
|
|
* @return next hybi decode state
|
|
*/
|
|
static int
|
|
hybiReadAndDecode(ws_ctx_t *wsctx, char *dst, int len, int *sockRet)
|
|
{
|
|
int n;
|
|
int i;
|
|
int toReturn;
|
|
int toDecode;
|
|
int bufsize;
|
|
int nextRead;
|
|
unsigned char *data;
|
|
uint32_t *data32;
|
|
|
|
/* if data was carried over, copy to start of buffer */
|
|
memcpy(wsctx->writePos, wsctx->carryBuf, wsctx->carrylen);
|
|
wsctx->writePos += wsctx->carrylen;
|
|
|
|
/* -1 accounts for potential '\0' terminator for base64 decoding */
|
|
bufsize = wsctx->codeBufDecode + ARRAYSIZE(wsctx->codeBufDecode) - wsctx->writePos - 1;
|
|
if (hybiRemaining(wsctx) > bufsize) {
|
|
nextRead = bufsize;
|
|
} else {
|
|
nextRead = hybiRemaining(wsctx);
|
|
}
|
|
|
|
rfbLog("calling read with buf=%p and len=%d (decodebuf=%p headerLen=%d)\n", wsctx->writePos, nextRead, wsctx->codeBufDecode, wsctx->header.headerLen);
|
|
|
|
if (wsctx->nReadRaw < wsctx->nToRead) {
|
|
/* decode more data */
|
|
//if (-1 == (n = ws_read(cl, wsctx->writePos, nextRead))) {
|
|
if (-1 == (n = wsctx->ctxInfo.readFunc(wsctx->ctxInfo.ctxPtr, wsctx->writePos, nextRead))) {
|
|
int olderrno = errno;
|
|
rfbErr("%s: read; %m", __func__);
|
|
errno = olderrno;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_ERR;
|
|
} else if (n == 0) {
|
|
*sockRet = 0;
|
|
return WS_HYBI_STATE_ERR;
|
|
}
|
|
wsctx->nReadRaw += n;
|
|
rfbLog("read %d bytes from socket; nRead=%d\n", n, wsctx->nReadRaw);
|
|
} else {
|
|
n = 0;
|
|
}
|
|
|
|
wsctx->writePos += n;
|
|
|
|
if (wsctx->nReadRaw >= wsctx->nToRead) {
|
|
if (wsctx->nReadRaw > wsctx->nToRead) {
|
|
rfbErr("%s: internal error, read past websocket frame", __func__);
|
|
errno=EIO;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_ERR;
|
|
}
|
|
}
|
|
|
|
toDecode = wsctx->writePos - hybiPayloadStart(wsctx);
|
|
rfbLog("toDecode=%d from n=%d carrylen=%d headerLen=%d\n", toDecode, n, wsctx->carrylen, wsctx->header.headerLen);
|
|
if (toDecode < 0) {
|
|
rfbErr("%s: internal error; negative number of bytes to decode: %d", __func__, toDecode);
|
|
errno=EIO;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_ERR;
|
|
}
|
|
|
|
/* for a possible base64 decoding, we decode multiples of 4 bytes until
|
|
* the whole frame is received and carry over any remaining bytes in the carry buf*/
|
|
data = (unsigned char *)hybiPayloadStart(wsctx);
|
|
data32= (uint32_t *)data;
|
|
|
|
for (i = 0; i < (toDecode >> 2); i++) {
|
|
data32[i] ^= wsctx->header.mask.u;
|
|
}
|
|
rfbLog("mask decoding; i=%d toDecode=%d\n", i, toDecode);
|
|
|
|
if (wsctx->hybiDecodeState == WS_HYBI_STATE_FRAME_COMPLETE) {
|
|
/* process the remaining bytes (if any) */
|
|
for (i*=4; i < toDecode; i++) {
|
|
data[i] ^= wsctx->header.mask.c[i % 4];
|
|
}
|
|
|
|
/* all data is here, no carrying */
|
|
wsctx->carrylen = 0;
|
|
} else {
|
|
/* carry over remaining, non-multiple-of-four bytes */
|
|
wsctx->carrylen = toDecode - (i * 4);
|
|
if (wsctx->carrylen < 0 || wsctx->carrylen > ARRAYSIZE(wsctx->carryBuf)) {
|
|
syslog(LOG_ERR, "%s: internal error, invalid carry over size: carrylen=%d, toDecode=%d, i=%d", __func__, wsctx->carrylen, toDecode, i);
|
|
*sockRet = -1;
|
|
errno = EIO;
|
|
return WS_HYBI_STATE_ERR;
|
|
}
|
|
rfbLog("carrying over %d bytes from %p to %p\n", wsctx->carrylen, wsctx->writePos + (i * 4), wsctx->carryBuf);
|
|
memcpy(wsctx->carryBuf, data + (i * 4), wsctx->carrylen);
|
|
}
|
|
|
|
toReturn = toDecode - wsctx->carrylen;
|
|
|
|
switch (wsctx->header.opcode) {
|
|
case WS_OPCODE_CLOSE:
|
|
|
|
/* this data is not returned as payload data */
|
|
if (hybiWsFrameComplete(wsctx)) {
|
|
rfbLog("got closure, reason %d\n", WS_NTOH16(((uint16_t *)data)[0]));
|
|
rfbLog("got close cmd, reason %d\n", WS_NTOH16(((uint16_t *)data)[0]));
|
|
errno = ECONNRESET;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_FRAME_COMPLETE;
|
|
} else {
|
|
rfbErr("%s: close reason with long frame not supported", __func__);
|
|
errno = EIO;
|
|
*sockRet = -1;
|
|
return WS_HYBI_STATE_ERR;
|
|
}
|
|
break;
|
|
case WS_OPCODE_TEXT_FRAME:
|
|
data[toReturn] = '\0';
|
|
rfbLog("Initiate Base64 decoding in %p with max size %d and '\\0' at %p\n", data, bufsize, data + toReturn);
|
|
if (-1 == (wsctx->readlen = b64_pton((char *)data, data, bufsize))) {
|
|
syslog(LOG_ERR, "Base64 decode error in %s; data=%p bufsize=%d", __func__, data, bufsize);
|
|
rfbErr("%s: Base64 decode error; %m\n", __func__);
|
|
}
|
|
wsctx->writePos = hybiPayloadStart(wsctx);
|
|
break;
|
|
case WS_OPCODE_BINARY_FRAME:
|
|
wsctx->readlen = toReturn;
|
|
wsctx->writePos = hybiPayloadStart(wsctx);
|
|
rfbLog("set readlen=%d writePos=%p\n", wsctx->readlen, wsctx->writePos);
|
|
break;
|
|
default:
|
|
rfbErr("%s: unhandled opcode %d, b0: %02x, b1: %02x\n", __func__, (int)wsctx->header.opcode, wsctx->header.data->b0, wsctx->header.data->b1);
|
|
}
|
|
wsctx->readPos = data;
|
|
|
|
return hybiReturnData(dst, len, wsctx, sockRet);
|
|
}
|
|
|
|
/**
|
|
* Read function for websocket-socket emulation.
|
|
*
|
|
* 0 1 2 3
|
|
* 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
|
|
* +-+-+-+-+-------+-+-------------+-------------------------------+
|
|
* |F|R|R|R| opcode|M| Payload len | Extended payload length |
|
|
* |I|S|S|S| (4) |A| (7) | (16/64) |
|
|
* |N|V|V|V| |S| | (if payload len==126/127) |
|
|
* | |1|2|3| |K| | |
|
|
* +-+-+-+-+-------+-+-------------+ - - - - - - - - - - - - - - - +
|
|
* | Extended payload length continued, if payload len == 127 |
|
|
* + - - - - - - - - - - - - - - - +-------------------------------+
|
|
* | |Masking-key, if MASK set to 1 |
|
|
* +-------------------------------+-------------------------------+
|
|
* | Masking-key (continued) | Payload Data |
|
|
* +-------------------------------- - - - - - - - - - - - - - - - +
|
|
* : Payload Data continued ... :
|
|
* + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
|
|
* | Payload Data continued ... |
|
|
* +---------------------------------------------------------------+
|
|
*
|
|
* Using the decode buffer, this function:
|
|
* - reads the complete header from the underlying socket
|
|
* - reads any remaining data bytes
|
|
* - unmasks the payload data using the provided mask
|
|
* - decodes Base64 encoded text data
|
|
* - copies len bytes of decoded payload data into dst
|
|
*
|
|
* Emulates a read call on a socket.
|
|
*/
|
|
int
|
|
webSocketsDecodeHybi(ws_ctx_t *wsctx, char *dst, int len)
|
|
{
|
|
int result = -1;
|
|
/* int fin; */ /* not used atm */
|
|
|
|
/* rfbLog(" <== %s[%d]: %d cl: %p, wsctx: %p-%p (%d)\n", __func__, gettid(), len, cl, wsctx, (char *)wsctx + sizeof(ws_ctx_t), sizeof(ws_ctx_t)); */
|
|
rfbLog("%s_enter: len=%d; "
|
|
"CTX: readlen=%d readPos=%p "
|
|
"writeTo=%p "
|
|
"state=%d toRead=%d remaining=%d "
|
|
" nReadRaw=%d carrylen=%d carryBuf=%p\n",
|
|
__func__, len,
|
|
wsctx->readlen, wsctx->readPos,
|
|
wsctx->writePos,
|
|
wsctx->hybiDecodeState, wsctx->nToRead, hybiRemaining(wsctx),
|
|
wsctx->nReadRaw, wsctx->carrylen, wsctx->carryBuf);
|
|
|
|
switch (wsctx->hybiDecodeState){
|
|
case WS_HYBI_STATE_HEADER_PENDING:
|
|
wsctx->hybiDecodeState = hybiReadHeader(wsctx, &result);
|
|
if (wsctx->hybiDecodeState == WS_HYBI_STATE_ERR) {
|
|
goto spor;
|
|
}
|
|
if (wsctx->hybiDecodeState != WS_HYBI_STATE_HEADER_PENDING) {
|
|
|
|
/* when header is complete, try to read some more data */
|
|
wsctx->hybiDecodeState = hybiReadAndDecode(wsctx, dst, len, &result);
|
|
}
|
|
break;
|
|
case WS_HYBI_STATE_DATA_AVAILABLE:
|
|
wsctx->hybiDecodeState = hybiReturnData(dst, len, wsctx, &result);
|
|
break;
|
|
case WS_HYBI_STATE_DATA_NEEDED:
|
|
wsctx->hybiDecodeState = hybiReadAndDecode(wsctx, dst, len, &result);
|
|
break;
|
|
case WS_HYBI_STATE_CLOSE_REASON_PENDING:
|
|
wsctx->hybiDecodeState = hybiReadAndDecode(wsctx, dst, len, &result);
|
|
break;
|
|
default:
|
|
/* invalid state */
|
|
rfbErr("%s: called with invalid state %d\n", wsctx->hybiDecodeState);
|
|
result = -1;
|
|
errno = EIO;
|
|
wsctx->hybiDecodeState = WS_HYBI_STATE_ERR;
|
|
}
|
|
|
|
/* single point of return, if someone has questions :-) */
|
|
spor:
|
|
/* rfbLog("%s: ret: %d/%d\n", __func__, result, len); */
|
|
if (wsctx->hybiDecodeState == WS_HYBI_STATE_FRAME_COMPLETE) {
|
|
rfbLog("frame received successfully, cleaning up: read=%d hlen=%d plen=%d\n", wsctx->header.nRead, wsctx->header.headerLen, wsctx->header.payloadLen);
|
|
/* frame finished, cleanup state */
|
|
hybiDecodeCleanup(wsctx);
|
|
} else if (wsctx->hybiDecodeState == WS_HYBI_STATE_ERR) {
|
|
hybiDecodeCleanup(wsctx);
|
|
}
|
|
rfbLog("%s_exit: len=%d; "
|
|
"CTX: readlen=%d readPos=%p "
|
|
"writePos=%p "
|
|
"state=%d toRead=%d remaining=%d "
|
|
"nRead=%d carrylen=%d carryBuf=%p "
|
|
"result=%d\n",
|
|
__func__, len,
|
|
wsctx->readlen, wsctx->readPos,
|
|
wsctx->writePos,
|
|
wsctx->hybiDecodeState, wsctx->nToRead, hybiRemaining(wsctx),
|
|
wsctx->nReadRaw, wsctx->carrylen, wsctx->carryBuf,
|
|
result);
|
|
return result;
|
|
}
|