Handle hostnames with upper-case letters
[webmin.git] / status / qmailadmin-monitor.pl
1 # qmailadmin-monitor.pl
2 # Monitor the qmail server on this host
3
4 # Check the PID file to see if qmail is running
5 sub get_qmailadmin_status
6 {
7 local %qconfig = &foreign_config($_[1]);
8 -d $qconfig{'qmail_dir'} || return { 'up' => -1 };
9 local ($pid) = &find_byname("qmail-send");
10 if ($pid) {
11         return { 'up' => 1 };
12         }
13 else {
14         return { 'up' => 0 };
15         }
16 }
17
18 sub parse_qmailadmin_dialog
19 {
20 &depends_check($_[0], "qmailadmin");
21 }
22
23 1;
24