Mercurial > hg > nginx-tests
changeset 911:2668f30181eb
Tests: HTTP/2 server frames logging.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Wed, 20 Apr 2016 17:39:01 +0300 |
parents | 49579dd88e3f |
children | 03e6f4bd35fd |
files | lib/Test/Nginx/HTTP2.pm |
diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/Test/Nginx/HTTP2.pm +++ b/lib/Test/Nginx/HTTP2.pm @@ -23,6 +23,7 @@ use Test::More qw//; use IO::Select; use IO::Socket; use Socket qw/ CRLF /; +use Data::Dumper; use Test::Nginx; @@ -265,6 +266,8 @@ sub h2_read { my $s = $sess->{socket}; my $buf = ''; + local $Data::Dumper::Terse = 1; + while (1) { $buf = raw_read($s, $buf, 9); last if length $buf < 9; @@ -290,6 +293,8 @@ sub h2_read { $frame->{sid} = $stream; push @got, $frame; + Test::Nginx::log_core('||', $_) for split "\n", Dumper $frame; + $buf = substr($buf, $length); last unless $extra{all} && test_fin($got[-1], $extra{all});