xinetd/restart.cgi

   1 #!/usr/local/bin/perl
   2 # restart.cgi
   3 # Restart the running xinetd
   4
   5 require './xinetd-lib.pl';
   6 &ReadParse();
   7 &error_setup($text{'restart_err'});
   8 $pid = &is_xinetd_running();
   9 $pid || &error(&text('restart_epid'));
  10 &kill_logged('USR2', $pid) ||
  11         &error(&text('restart_ekill', $pid, $!));
  12 &webmin_log("apply");
  13 &redirect("");
  14