Mercurial > hg > nginx-tests

comparison h2.t @ 670:944b87756cab

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: fixed GOAWAY and PING frames parsing in HTTP/2 tests.
author Sergey Kandaurov <pluknet@nginx.com>
date Wed, 02 Sep 2015 13:05:57 +0300
parents 0c442e551ba1
children 0c70eb166a3a
comparison
equal deleted inserted replaced
669:0c442e551ba1 670:944b87756cab
1738 return \%payload; 1738 return \%payload;
1739 } 1739 }
1740 1740
1741 sub ping { 1741 sub ping {
1742 my ($ctx, $buf, $len) = @_; 1742 my ($ctx, $buf, $len) = @_;
1743 return { value => unpack "a8", $buf }; 1743 return { value => unpack "A$len", $buf };
1744 } 1744 }
1745 1745
1746 sub rst_stream { 1746 sub rst_stream {
1747 my ($ctx, $buf, $len) = @_; 1747 my ($ctx, $buf, $len) = @_;
1748 return { code => unpack "N", $buf }; 1748 return { code => unpack "N", $buf };
1756 substr($stream, 0, 1) = 0; 1756 substr($stream, 0, 1) = 0;
1757 $stream = unpack("N", pack("B32", $stream)); 1757 $stream = unpack("N", pack("B32", $stream));
1758 $payload{last_sid} = $stream; 1758 $payload{last_sid} = $stream;
1759 1759
1760 $len -= 4; 1760 $len -= 4;
1761 $payload{debug} = unpack "x4 A$len", $buf; 1761 $payload{code} = unpack "x4 N", $buf;
1762 $payload{debug} = unpack "x8 A$len", $buf;
1762 return \%payload; 1763 return \%payload;
1763 } 1764 }
1764 1765
1765 sub window_update { 1766 sub window_update {
1766 my ($ctx, $buf, $len) = @_; 1767 my ($ctx, $buf, $len) = @_;