Commit 81810313 by Michael Brachmann

debugging websockets

parent ff7462d6
......@@ -58,7 +58,6 @@ begin
if Msg.MessageType <> TWebSocketMessageType.Text then
begin
Logger.Log(1, 'websocket auth failed - expected text token-------');
WebSocket.SendClose(WebSocketStatusCodes.NormalClosure);
Exit;
end;
MsgStr := TEncoding.Default.GetString(Msg.Data);
......@@ -87,7 +86,7 @@ begin
//TODO: store connection in map with device id, implement message protocol
end;
TWebSocketMessageType.Close:
WebSocket.SendClose(WebSocketStatusCodes.NormalClosure);
Break;
end;
end;
finally
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment