After thorough study of RFC 6455, I am perplexed as to why the handshake with the server keeps failing. Despite checking the communication with the Firefox add-on "HTTP Live Headers" and finding everything in order...
I conducted tests using FireFox.
For the Server/Perl:
use IO::Socket::INET;
use Digest::SHA1 qw(sha1_base64);
$| = 1;
my $sock = IO::Socket::INET->new(LocalPort=>6060, Listen=>1, ReuseAddr=>1);
while(my $client = $sock->accept) {
my $key = undef;
sysread $client, my $buf, 10000;
while($buf =~s/(.*)\r\n//) {
my $line = $1;
print "line='$line'\n";
if($line =~/^Sec\-WebSocket\-Key:\s+(.*)$/i) {
$key = $1;
}
}
$key .= '258EAFA5-E914-47DA-95CA-C5AB0DC85B11';
my $return_key = sha1_base64($key);
print $client "HTTP/1.1 101 Switching Protocols\r\n";
print $client "Upgrade: websocket\r\n";
print $client "Connection: Upgrade\r\n";
print $client "Sec-WebSocket-Accept: $return_key\r\n";
print $client "\r\n";
}
Client/JavaScript
if("WebSocket" in window ) {
sock = new WebSocket("ws://localhost:6060");
sock.onopen = function() { /*this never fires*/ };
sock.onerror = function() { /*the problem: this always fires*/ };
}