status/samba-monitor.pl

   1 # samba-monitor.pl
   2 # Monitor the samba servers on this host
   3
   4 # Check if samba is running
   5 sub get_samba_status
   6 {
   7 return { 'up' => -1 } if (!&foreign_check($_[1]));
   8 &foreign_require($_[1], "samba-lib.pl");
   9 local %sconfig = &foreign_config($_[1]);
  10 return { 'up' => -1 } if (!-x $sconfig{'samba_server'});
  11 local $r = &foreign_call($_[1], "is_samba_running");
  12 return { 'up' => $r ? 1 : 0 };
  13 }
  14
  15 sub parse_samba_dialog
  16 {
  17 &depends_check($_[0], "samba");
  18 }
  19
  20 1;
  21