undef instances to avoid deadlock in global destruction

This commit is contained in:
Kazuho Oku 2024-12-21 11:17:27 +09:00
parent cb6d613aec
commit b24bb47c19
15 changed files with 45 additions and 7 deletions

View File

@ -42,6 +42,8 @@ subtest "header-values-with-surronding-space" => sub {
is get_status(), 400;
};
undef $server;
done_testing;
# connect, send (broken) request, read something

View File

@ -110,8 +110,6 @@ EOT
$doit->("ascii");
};
done_testing;
my $server;
sub spawn_with {
@ -136,3 +134,7 @@ sub test {
or die "failed to parse the output of s_client:{{{$lines}}}";
$1;
}
undef $server;
done_testing;

View File

@ -285,4 +285,6 @@ subtest "connect" => sub {
while (waitpid($upstream_pid, 0) != $upstream_pid) {}
};
undef $server;
done_testing;

View File

@ -78,4 +78,6 @@ for my $w (1 .. 5) {
doit("5\r\nHello\r\n5\r\nThere\r\n", "HelloThere", 14);
$socket->close();
undef $server;
done_testing();

View File

@ -100,4 +100,6 @@ subtest "forcing gzip or br also works" => sub {
};
$socket->close();
undef $server;
done_testing();

View File

@ -68,4 +68,6 @@ subtest "gzip + weak" => sub {
};
$upstream_listener->close();
undef $server;
done_testing();

View File

@ -149,4 +149,7 @@ subtest 'http1' => sub {
# };
# };
undef $http1_upstream;
undef $http2_upstream;
done_testing();

View File

@ -52,5 +52,7 @@ foreach my $cl (@clopts) {
}
}
done_testing();
undef $upstream;
undef $server;
done_testing();

View File

@ -77,5 +77,8 @@ EOR
test(0);
test(1);
done_testing();
undef $upstream;
undef $server;
done_testing();

View File

@ -86,5 +86,7 @@ subtest 'streaming' => sub {
doit(1);
};
done_testing();
undef $upstream;
undef $server;
done_testing();

View File

@ -68,4 +68,9 @@ for my $i (1..30) {
isnt $unexpected, 1;
is((2 * $access_count1), $access_count2, "load balanced");
undef $guard1;
undef $guard2;
undef $server;
done_testing();

View File

@ -62,5 +62,8 @@ foreach my $iter ((1, 10, 100)) {
}
}
}
done_testing();
undef $upstream;
undef $server;
done_testing();

View File

@ -68,5 +68,8 @@ foreach my $iter ((1, 10, 100)) {
}
}
}
done_testing();
undef $upstream;
undef $server;
done_testing();

View File

@ -65,4 +65,7 @@ sub send_request {
$resp;
}
undef $upstream;
undef $server;
done_testing();

View File

@ -91,4 +91,6 @@ subtest "HTTP/2" => sub {
};
$socket->close();
undef $server;
done_testing();