# HG changeset patch
# User Maxim Dounin <mdounin@mdounin.ru>
# Date 1505183671 -10800
# Node ID 24e175025ad81335acfef965a186f6c686b54f1a
# Parent  7df2265e61be9a4d57e74b248f6bbda416433b13
Tests: minimal handling of HTTP/2 dynamic table size update.

diff --git a/lib/Test/Nginx/HTTP2.pm b/lib/Test/Nginx/HTTP2.pm
--- a/lib/Test/Nginx/HTTP2.pm
+++ b/lib/Test/Nginx/HTTP2.pm
@@ -730,7 +730,7 @@ sub hunpack {
 	my $table = $ctx->{dynamic_decode};
 	my %headers;
 	my $skip = 0;
-	my ($index, $name, $value);
+	my ($index, $name, $value, $size);
 
 	my $field = sub {
 		my ($b) = @_;
@@ -782,6 +782,15 @@ sub hunpack {
 			$add->(\%headers, $name, $value);
 			next;
 		}
+
+		if (substr($ib, 0, 3) eq '001') {
+			($size, $skip) = iunpack(5, $data, $skip);
+
+			# TODO: handle dynamic table size update
+
+			next;
+		}
+
 		last;
 	}