MINI SHELL

Server : Apache/2.2.2 (Fedora)
System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686
User : apache ( 48)
PHP Version : 5.2.9
Disable Function : NONE
Directory :  /usr/libexec/webmin/status/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //usr/libexec/webmin/status/proftpd-monitor.pl
# proftpd-monitor.pl
# Monitor the ProFTPD server on this host

# Check the PID file to see if proftpd is running
sub get_proftpd_status
{
return { 'up' => -1 } if (!&foreign_check($_[1]));
local %pconfig = &foreign_config($_[1]);
-r $pconfig{'proftpd_path'} || return { 'up' => -1 };
&foreign_require($_[1], "proftpd-lib.pl");
local $r = &foreign_call($_[1], "is_proftpd_running");
if ($r < 0) {
	return { 'up' => -1 };
	}
elsif ($r > 0) {
	return { 'up' => 1 };
	}
else {
	return { 'up' => 0 };
	}
}

sub parse_proftpd_dialog
{
&error($text{'proftpd_etype'}) if (&run_from_inetd());
}

sub run_from_inetd
{
local $m = $_[0]->{'clone'} || "proftpd";
&foreign_require($m, "proftpd-lib.pl");
local $conf = &foreign_call($m, "get_config");
local $st = &foreign_call($m, "find_directive", "ServerType", $conf);
return lc($st) eq 'inetd';
}

1;


Anon7 - 2021