sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-01-10 01:18:15 +03:00
Code

selftest: Abort early on SIGPIPE.

Browse Source
This commit is contained in:
Jelmer Vernooij 2010-09-28 07:40:27 +02:00
parent 7ac4a71072
commit 36ffe4f467
2 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
selftest/filter-subunit
View File

@ -53,4 +53,5 @@ msg_ops = subunithelper.FilterOps(out, opts.prefix, expected_failures,
try:
sys.exit(subunithelper.parse_results(msg_ops, statistics, sys.stdin))
except subunithelper.ImmediateFail:
sys.stdout.flush()
sys.exit(1)

8
selftest/selftest.pl
View File

@ -166,6 +166,14 @@ my $prefix = "./st";
my @includes = ();
my @excludes = ();
sub pipe_handler {
my $sig = shift @_;
print STDERR "Exiting early because of SIGPIPE.\n";
exit(1);
}
$SIG{PIPE} = \&pipe_handler;
sub find_in_list($$)
{
my ($list, $fullname) = @_;