Jak złapać sygnał KILL, HUP lub przerwania przez użytkownika?

Question

Mam skrypt działający w tle mojego serwera linuksowego i chciałbym przechwycić sygnały takie jak restart lub cokolwiek, co zabiłoby ten skrypt i zamiast tego zapisz wszystkie ważne informacje zanim faktycznie wyjdę.

Myślę, że większość tego, co potrzebuję złapać, to SIGINT, SIGTERM, SIGHUP, SIGKILL.

Jak złapać którykolwiek z tych sygnałów i zlecić wykonanie funkcji wyjścia, w przeciwnym razie należy wykonać to, co robił?

pseudo kod Perl:

#!/usr/bin/perl 

use stricts; 
use warnings; 

while (true) 
{ 
    #my happy code is running 
    #my happy code will sleep for a few until its breath is back to keep running. 
} 

#ops I have detected an evil force trying to kill me 
#let's call the safe exit. 
sub safe_exit() 
{ 
    # save stuff 
    exit(1); 
} 

pseudo kod php:

<?php 

while (1) 
{ 
    #my happy code is running 
    #my happy code will sleep for a few until its breath is back to keep running. 
} 

#ops I have detected an evil force trying to kill me 
#let's call the safe exit. 

function safe_exit() 
{ 
    # save stuff 
    exit(1); 
} 
?> 

Answer 1

PHP używa pcntl_signal zarejestrować obsługi sygnału, więc coś takiego:

declare(ticks = 1); 

function sig_handler($sig) { 
    switch($sig) { 
     case SIGINT: 
     # one branch for signal... 
    } 
} 

pcntl_signal(SIGINT, "sig_handler"); 
pcntl_signal(SIGTERM, "sig_handler"); 
pcntl_signal(SIGHUP, "sig_handler"); 
# Nothing for SIGKILL as it won't work and trying to will give you a warning. 

Answer 2

Dla wersji Perl, zobaczyć perldoc -q signal - zasadniczo ustawiony $SIG{signal} do odniesienia sub.

Answer 3

Perl:

@SIG{qw(INT TERM HUP)} = \&safe_exit; 

SIGKILL nie można złapać. Nie jest wysyłany do procesu.

%SIG jest udokumentowane w perlvar. Zobacz także perlipc