Mercurial > hg > nginx-tests

comparison lib/Test/Nginx.pm @ 1613:d7ec131d305a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: reworked proxy_unfinished.t to use http_content(). This somewhat simplifies tests and makes it possible to better check for unexpected corruption of chunked responses, such as the one recently fixed in nginx-quic experimental branch.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 17 Nov 2020 17:39:11 +0300
parents 8659123d2d37
children a1874249496d
comparison
equal deleted inserted replaced
1612:8659123d2d37 1613:d7ec131d305a
851 if ($headers !~ /Transfer-Encoding: chunked/i) { 851 if ($headers !~ /Transfer-Encoding: chunked/i) {
852 return $body; 852 return $body;
853 } 853 }
854 854
855 my $content = ''; 855 my $content = '';
856 my $len = -1;
857
856 while ($body =~ /\G\x0d?\x0a?([0-9a-f]+)\x0d\x0a?/gcmsi) { 858 while ($body =~ /\G\x0d?\x0a?([0-9a-f]+)\x0d\x0a?/gcmsi) {
857 my $len = hex($1); 859 $len = hex($1);
858 $content .= substr($body, pos($body), $len); 860 $content .= substr($body, pos($body), $len);
859 pos($body) += $len; 861 pos($body) += $len;
862 }
863
864 if ($len != 0) {
865 $content .= '[no-last-chunk]';
860 } 866 }
861 867
862 return $content; 868 return $content;
863 } 869 }
864 870