Browse Source

[tests] skip time-sensitive test during CI testing

master
Glenn Strauss 1 week ago
parent
commit
9a37ba54d1
  1. 12
      tests/mod-fastcgi.t
  2. 12
      tests/mod-scgi.t

12
tests/mod-fastcgi.t

@ -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');

12
tests/mod-scgi.t

@ -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');

Loading…
Cancel
Save