t/lei-sigpipe.t: ensure SIGPIPE is not ignored instead of not blocked

Ignoring a signal is different than blocking a signal, and the
"IgnoreSIGPIPE" option of systemd ignores.

[ew: note systemd behavior]

Acked-by: Eric Wong <e@80x24.org>

diff --git a/t/lei-sigpipe.t b/t/lei-sigpipe.t
index 7fab9aebb0ff0a1faae0a57b2532ff9d2853aa7b..55c208e2740c039327f26855964c94e12bcb5c5e 100644 (file)
--- a/t/lei-sigpipe.t
+++ b/t/lei-sigpipe.t
@@ -4,20 +4,16 @@
 use strict;
 use v5.10.1;
 use PublicInbox::TestCommon;
 use strict;
 use v5.10.1;
 use PublicInbox::TestCommon;

-use POSIX qw(WTERMSIG WIFSIGNALED SIGPIPE SIG_UNBLOCK SIG_SETMASK sigprocmask);
+use POSIX qw(WTERMSIG WIFSIGNALED SIGPIPE);

 use PublicInbox::OnDestroy;
 
 use PublicInbox::OnDestroy;
 

-# undo systemd (and similar) blocking SIGPIPE, since lei expects to be run
+# undo systemd (and similar) ignoring SIGPIPE, since lei expects to be run

 # from an interactive terminal:
 # https://public-inbox.org/meta/20220227080422.gyqowrxomzu6gyin@sourcephile.fr/
 # from an interactive terminal:
 # https://public-inbox.org/meta/20220227080422.gyqowrxomzu6gyin@sourcephile.fr/

-my $set = POSIX::SigSet->new;
-my $old = POSIX::SigSet->new;
-$set->emptyset or xbail "sigemptyset $!";
-$old->emptyset or xbail "sigemptyset $!";
-$set->addset(SIGPIPE);
-sigprocmask(SIG_UNBLOCK, $set, $old) or xbail "SIG_UNBLOCK: $!";
+my $oldSIGPIPE = $SIG{PIPE};
+$SIG{PIPE} = 'DEFAULT';

 my $cleanup = PublicInbox::OnDestroy->new($$, sub {
 my $cleanup = PublicInbox::OnDestroy->new($$, sub {

-       sigprocmask(SIG_SETMASK, $old);
+       $SIG{PIPE} = $oldSIGPIPE;

 });
 
 test_lei(sub {
 });
 
 test_lei(sub {