![[BACK]](/icons/back.gif){kind=icon}
Return to loncontrol CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / init.d|
Return to loncontrol CVS log | Up to [LON-CAPA] / loncom / init.d |
| version 1.31, 2007/06/02 03:40:02 | version 1.32, 2007/06/12 23:45:42 |
|---|---|
| Line 144 sub stop_daemon { | Line 144 sub stop_daemon { |
| my $daemonpid=<PIDFILE>; | my $daemonpid=<PIDFILE>; |
| chomp($daemonpid); | chomp($daemonpid); |
| kill TERM => $daemonpid; | kill TERM => $daemonpid; |
| sleep 1; | my $count=0; |
| while ($count++ < 5 && kill(0 => $daemonpid)) { | |
| sleep 1; | |
| } | |
| if (kill 0 => $daemonpid) { | if (kill 0 => $daemonpid) { |
| kill KILL => $daemonpid; | kill KILL => $daemonpid; |
| sleep 1; | sleep 1; |