t/git-http-backend.t | 5 +++++ diff --git a/t/git-http-backend.t b/t/git-http-backend.t index 5ac0a4a53255f6b35ea7d96fd2adfacaa6c7f72e..fc2d5462db345ee9638f59833b38b7737c5dd4c8 100644 --- a/t/git-http-backend.t +++ b/t/git-http-backend.t @@ -1,5 +1,8 @@ # Copyright (C) 2016-2018 all contributors # License: AGPL-3.0+ +# +# Ensure buffering behavior in -httpd doesn't cause runaway memory use +# or data corruption use strict; use warnings; use Test::More; @@ -77,6 +80,8 @@ $http->write_request(GET => $url); my ($code, $mess, %h) = $http->read_response_headers; is(200, $code, 'got 200 success for pack'); is($max, $h{'Content-Length'}, 'got expected Content-Length for pack'); + + # no $http->read_entity_body, here, since we want to force buffering foreach my $i (1..3) { sleep 1; my $diff = $get_maxrss->() - $mem_a;