[tests] skip time-sensitive test during CI testing

personal/stbuehler/tests-path
Glenn Strauss 2021-09-09 04:55:26 -04:00
parent f99cb7d7ab
commit 9a37ba54d1
2 changed files with 24 additions and 0 deletions

View File

@ -189,11 +189,23 @@ EOF
ok($tf->handle_http($t) == 0, 'SCRIPT_NAME (wsgi)');
# skip timing-sensitive test during CI testing, but run for user 'gps'
my $user = `id -un`;
chomp($user) if $user;
if (($user || "") eq "gps") {
$t->{REQUEST} = ( <<EOF
GET /index.fcgi?die-at-end HTTP/1.0
Host: www.example.org
EOF
);
}
else {
$t->{REQUEST} = ( <<EOF
GET /index.fcgi?crlf HTTP/1.0
Host: www.example.org
EOF
);
}
$t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.0', 'HTTP-Status' => 200, 'HTTP-Content' => 'test123' } ];
ok($tf->handle_http($t) == 0, 'killing fastcgi and wait for restart');

View File

@ -71,11 +71,23 @@ EOF
ok($tf->handle_http($t) == 0, 'SCRIPT_NAME (wsgi)');
# skip timing-sensitive test during CI testing, but run for user 'gps'
my $user = `id -un`;
chomp($user) if $user;
if (($user || "") eq "gps") {
$t->{REQUEST} = ( <<EOF
GET /index.scgi?die-at-end HTTP/1.0
Host: www.example.org
EOF
);
}
else {
$t->{REQUEST} = ( <<EOF
GET /index.scgi?crlf HTTP/1.0
Host: www.example.org
EOF
);
}
$t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.0', 'HTTP-Status' => 200, 'HTTP-Content' => 'test123' } ];
ok($tf->handle_http($t) == 0, 'killing scgi and wait for restart');