X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fsigfd.t;h=a1ab222c0c4daeaeb5ead02f8f2f35ad820782c9;hb=41c3eed65eb03256b0916cfdbf43723e070a633a;hp=8daf3137427b5f2dfd64fcdbcb2e81f3e88a0b1b;hpb=62068fafcb40c2f91d31cf3fa5e775ecc52a6ba8;p=public-inbox.git
diff --git a/t/sigfd.t b/t/sigfd.t
index 8daf3137..a1ab222c 100644
--- a/t/sigfd.t
+++ b/t/sigfd.t
@@ -1,20 +1,19 @@
-# Copyright (C) 2019-2020 all contributors
+# Copyright (C) 2019-2021 all contributors
use strict;
use Test::More;
use IO::Handle;
use POSIX qw(:signal_h);
use Errno qw(ENOSYS);
-use PublicInbox::Syscall qw($SFD_NONBLOCK);
+use PublicInbox::Syscall qw(SFD_NONBLOCK);
require_ok 'PublicInbox::Sigfd';
+use PublicInbox::DS;
SKIP: {
if ($^O ne 'linux' && !eval { require IO::KQueue }) {
skip 'signalfd requires Linux or IO::KQueue to emulate', 10;
}
- my $new = POSIX::SigSet->new;
- $new->fillset or die "sigfillset: $!";
- my $old = POSIX::SigSet->new;
- sigprocmask(SIG_SETMASK, $new, $old) or die "sigprocmask $!";
+
+ my $old = PublicInbox::DS::block_signals();
my $hit = {};
my $sig = {};
local $SIG{HUP} = sub { $hit->{HUP}->{normal}++ };
@@ -25,7 +24,6 @@ SKIP: {
}
my $sigfd = PublicInbox::Sigfd->new($sig, 0);
if ($sigfd) {
- require PublicInbox::DS;
ok($sigfd, 'Sigfd->new works');
kill('HUP', $$) or die "kill $!";
kill('INT', $$) or die "kill $!";
@@ -42,14 +40,15 @@ SKIP: {
}
$sigfd = undef;
- my $nbsig = PublicInbox::Sigfd->new($sig, $SFD_NONBLOCK);
- ok($nbsig, 'Sigfd->new $SFD_NONBLOCK works');
+ my $nbsig = PublicInbox::Sigfd->new($sig, SFD_NONBLOCK);
+ ok($nbsig, 'Sigfd->new SFD_NONBLOCK works');
is($nbsig->wait_once, undef, 'nonblocking ->wait_once');
ok($! == Errno::EAGAIN, 'got EAGAIN');
kill('HUP', $$) or die "kill $!";
PublicInbox::DS->SetPostLoopCallback(sub {}); # loop once
PublicInbox::DS->EventLoop;
- is($hit->{HUP}->{sigfd}, 2, 'HUP sigfd fired in event loop');
+ is($hit->{HUP}->{sigfd}, 2, 'HUP sigfd fired in event loop') or
+ diag explain($hit); # sometimes fails on FreeBSD 11.x
kill('TERM', $$) or die "kill $!";
kill('HUP', $$) or die "kill $!";
PublicInbox::DS->EventLoop;