Handle hostnames with upper-case letters
[webmin.git] / frox / stop.cgi
1 #!/usr/local/bin/perl
2 # Stop the Frox proxy
3
4 require './frox-lib.pl';
5 &error_setup($text{'stop_err'});
6
7 if ($config{'stop_cmd'}) {
8         $out = &backquote_logged("($config{'stop_cmd'}) 2>&1 </dev/null");
9         if ($?) {
10                 &error("<pre>$out</pre>");
11                 }
12         }
13 else {
14         $pid = &is_frox_running();
15         $pid || &error($text{'stop_egone'});
16         &kill_logged('TERM', $pid);
17         }
18 &webmin_log("stop");
19 &redirect("");
20