static long webSocketTimeOut = 60000;

static O eleu_webSocket_onMessage, eleu_webSocket_new;

static O eleu_webSocket_handler;

svoid eleu_webSocket_init {
  if (webServerPort != 0) pcall {
    //serveHttp(webServerPort);
    serveHttpWithWebsockets(webServerPort, eleu_webSocket_handler());
  }
}

static O eleu_webSocket_handler() {
  if (eleu_webSocket_handler == null)
    eleu_webSocket_handler = func(NanoHTTPD.IHTTPSession handshake) {
      WebSocket ws = new WebSocket(handshake) {
        L<S> msgs = synchroList();
        volatile long lastMessage = sysNow();
        
        protected void onPong(WebSocketFrame pongFrame) {
          // don't use WebSocket ping/pong
        }
        
        protected void onMessage(WebSocketFrame messageFrame) {
          //print("websocket msg: " + messageFrame.getTextPayload());
          lastMessage = sysNow();
          S s = messageFrame.getTextPayload();
          msgs.add(s);
          if (eq(s, "ping")) incAtomicLong(webSocketPongs);
          pcallF(eleu_webSocket_onMessage, this, s);
        }
        
        protected void onClose(WebSocketFrame.CloseCode code, String reason, boolean initiatedByRemote) {
          //print("websocket close");
          webSockets.remove(this);
        }
        protected void onException(IOException e) { printStackTrace(e); }
        
        void closeMe() ctex {
          webSockets.remove(this);
          close(WebSocketFrame.CloseCode.NormalClosure, "");
        }
        
        void clean() {
          if (sysNow() >= lastMessage + webSocketTimeOut) {
            webSockets.remove(this);
            pcall { close(WebSocketFrame.CloseCode.NormalClosure, "timeout"); }
          }
        }
      };
      webSockets.add(ws);
      pcallF(eleu_webSocket_new, ws);
      ret ws;
    };
  ret eleu_webSocket_handler;
}