anchor.diff:      Digit2 = Num3 rem 256,
       Digit1 = Num3 div 256,
       [Digit1, Digit2, Digit3, Digit4].
  -					  
  +
   unpack_length(Binary, LenBytes, Length) ->
       <<_, _:LenBytes/bytes, B, _/bitstring>> = Binary,
       B_v = B band 16#7F,
  
positive.code: 			undefined -> "ws://" ++ Host ++ Path;
  			_ -> "wss://" ++ Host ++ Path
  		end,
  	    Handshake = handshake(ProtocolVersion, Arg, CliSock, WebSocketLocation, Origin, Protocol),
  	    case SC#sconf.ssl of
  		undefined ->
  		    gen_tcp:send(CliSock, Handshake),
  
negative.code:      "WebSocket-Location: ", WebSocketLocation, "\r\n",
       "\r\n"].
  
  ws_version(Headers) ->
      case query_header("sec-websocket-key1", Headers) of
  	undefined ->  ws_75;
  	_         ->  ws_76
      end.
  
  %% This should take care of all the Data Framing scenarios specified in
  %% http://tools.ietf.org/html/draft-hixie-thewebsocketprotocol-66#page-26
  