Handle hostnames with upper-case letters
[webmin.git] / status / webmin-monitor.pl
1 # webmin-monitor.pl
2 # Monitor the webmin server on this host
3
4 # Check the PID file to see if webmin is running
5 sub get_webmin_status
6 {
7 local %miniserv;
8 &get_miniserv_config(\%miniserv);
9 if (open(PID, $miniserv{'pidfile'}) && chop($pid = <PID>) && kill(0, $pid)) {
10         return { 'up' => 1 };
11         }
12 else {
13         return { 'up' => 0 };
14         }
15 }
16
17 sub parse_webmin_dialog
18 {
19 }
20
21 1;
22