[PATCH 4/4] cindex: leave SIGTSTP and SIGCONT unblocked

[Eric Wong]

This makes it easier to pause and restart long-running indexing
jobs which use our event loop.
---
 lib/PublicInbox/CodeSearchIdx.pm | 3 ++-
 lib/PublicInbox/DS.pm            | 5 +++--
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/lib/PublicInbox/CodeSearchIdx.pm b/lib/PublicInbox/CodeSearchIdx.pm
index f60af015..8d57ec10 100644
--- a/lib/PublicInbox/CodeSearchIdx.pm
+++ b/lib/PublicInbox/CodeSearchIdx.pm
@@ -841,7 +841,8 @@ sub cidx_run { # main entry point
        my ($self) = @_;
        my $restore_umask = prep_umask($self);
        local $DEFER = [];
-       local $SIGSET = PublicInbox::DS::block_signals();
+       local $SIGSET = PublicInbox::DS::block_signals(
+                                       POSIX::SIGTSTP, POSIX::SIGCONT);
        my $restore = PublicInbox::OnDestroy->new($$,
                \&PublicInbox::DS::sig_setmask, $SIGSET);
        local $LIVE = {};
diff --git a/lib/PublicInbox/DS.pm b/lib/PublicInbox/DS.pm
index 340086fc..98084b5c 100644
--- a/lib/PublicInbox/DS.pm
+++ b/lib/PublicInbox/DS.pm
@@ -193,10 +193,11 @@ sub RunTimers {
 
 sub sig_setmask { sigprocmask(SIG_SETMASK, @_) or die "sigprocmask: $!" }
 
-sub block_signals () {
-       my $oldset = POSIX::SigSet->new;
+sub block_signals { # anything in @_ stays unblocked
        my $newset = POSIX::SigSet->new;
        $newset->fillset or die "fillset: $!";
+       $newset->delset($_) for @_;
+       my $oldset = POSIX::SigSet->new;
        sig_setmask($newset, $oldset);
        $oldset;
 }