# signal the current running spong-server program.
sub handle_signals {
-
+
+ # Clear out signal mask in case we inherit any blocked sigs
+
+ my $sigset = POSIX::SigSet->new;
+ sigprocmask(SIG_SETMASK, $sigset );
+
# Set up some signal handlers to handle our death gracefully, and also
# listen for the HUP signal, and if we se that, we re-exec ourself.
use Sys::Hostname;
use Net::Ping;
use Socket;
+use POSIX;
use Spong::Daemon;
use Spong::Status qw(status);
sub handle_signals {
+ # Clear out signal mask in case we inherit any blocked sigs
+
+ my $sigset = POSIX::SigSet->new;
+ sigprocmask(SIG_SETMASK, $sigset );
+
# Set up some signal handlers to handle our death gracefully, and also
# listen for the HUP signal, and if we se that, we re-exec ourself.
use Socket;
use Config;
use IO::Socket;
+use POSIX;
if( $ARGV[0] eq "--debug" ) { $debug = 1; shift; }
if( $ARGV[0] eq "--restart" ) { $restart = 1; shift; }
sub handle_signals {
+ # Clear out signal mask in case we inherit any blocked sigs
+
+ my $sigset = POSIX::SigSet->new;
+ sigprocmask(SIG_SETMASK, $sigset );
+
# Set up some signal handlers to handle our death gracefully, and also
# listen for the HUP signal, and if we see that, we re-exec ourself.