Changeset 3

Show
Ignore:
Timestamp:
11/19/07 04:07:25 (1 year ago)
Author:
twidi
Message:

rajout conf mode_demon.wait, changement pid_file

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • sys_alive.conf

    r2 r3  
    3333%mode_demon = ( 
    3434        'actif'    => 1, 
    35         'name'     => 'sys_alived', 
    36         'pid_file' => '/var/run/sys_alived.pid', 
     35        'pid_file' => '/var/run/sys_alive.pid', 
     36        'wait'     => 60, 
    3737); 
    3838 

  • sys_alive.pl

    r2 r3  
    129129sub mode_demon { 
    130130        my $current_pid; 
    131         eval { $current_pid = hold_pid_file($main::mode_demon{'pid_file'}); }; 
    132         WriteLog('ProblÚme en accédant au fichier pid : '.$@, 1) if $@; 
    133         WriteLog('Sys_alive est déjà lancé en mode démon (pid='.$current_pid.')', 1) if $current_pid; 
     131        eval { $current_pid = hold_pid_file($main::mode_demon{'pid_file'} || '/var/run/sys_alive.pid'); }; 
     132        WriteLog('Erreur : ProblÚme en accédant au fichier pid : '.$@, 1) if $@; 
     133        WriteLog('Erreur : Sys_alive est déjà lancé en mode démon (pid='.$current_pid.')', 1) if $current_pid; 
    134134        WriteLog('Sys_alive lancé en mode démon (pid='.$$.')'); 
    135135        while(1) { 
    136136                sys_alive(); 
    137                 sleep 60; 
     137                sleep($main::mode_demon{'wait'} || 60); 
    138138        } 
    139139} # fin de sub mode_demon