Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
help	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
services	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	6.42 KB	-rw-r--r--	2026-07-17 21:17
WEBMIN-STATUS-MIB.txt	1.52 KB	-rw-r--r--	2026-07-17 21:17
acl_security.pl	508 B	-rwxr-xr-x	2026-07-17 21:17
alive-monitor.pl	261 B	-rwxr-xr-x	2026-07-17 21:17
apache-monitor.pl	714 B	-rwxr-xr-x	2026-07-17 21:17
backup_config.pl	801 B	-rwxr-xr-x	2026-07-17 21:17
bind8-monitor.pl	710 B	-rwxr-xr-x	2026-07-17 21:17
cgi_args.pl	321 B	-rwxr-xr-x	2026-07-17 21:17
change-monitor.pl	791 B	-rwxr-xr-x	2026-07-17 21:17
config	182 B	-rw-r--r--	2026-07-17 21:17
config-ALL-linux	210 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	225 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-3.0	216 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-3.1-ALL	216 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	195 B	-rw-r--r--	2026-07-17 21:17
config-hpux	182 B	-rw-r--r--	2026-07-17 21:17
config-netbsd	182 B	-rw-r--r--	2026-07-17 21:17
config-solaris	182 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	197 B	-rw-r--r--	2026-07-17 21:17
config.info	1.09 KB	-rw-r--r--	2026-07-17 21:17
config.info.ca	1.31 KB	-rw-r--r--	2026-07-17 21:17
config.info.cs	802 B	-rw-r--r--	2026-07-17 21:17
config.info.de	1.28 KB	-rw-r--r--	2026-07-17 21:17
config.info.es	659 B	-rw-r--r--	2026-07-17 21:17
config.info.fa	994 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	1.42 KB	-rw-r--r--	2026-07-17 21:17
config.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
config.info.it	0 B	-rw-r--r--	2026-07-17 21:17
config.info.ja	1.04 KB	-rw-r--r--	2026-07-17 21:17
config.info.ko	764 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	984 B	-rw-r--r--	2026-07-17 21:17
config.info.no	962 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	1021 B	-rw-r--r--	2026-07-17 21:17
config.info.ru	486 B	-rw-r--r--	2026-07-17 21:17
config.info.sv	99 B	-rw-r--r--	2026-07-17 21:17
config.info.tr	567 B	-rw-r--r--	2026-07-17 21:17
config.info.uk	479 B	-rw-r--r--	2026-07-17 21:17
config.info.zh	86 B	-rw-r--r--	2026-07-17 21:17
config.info.zh_TW	229 B	-rw-r--r--	2026-07-17 21:17
consume-monitor.pl	1.89 KB	-rwxr-xr-x	2026-07-17 21:17
defaultacl	15 B	-rw-r--r--	2026-07-17 21:17
delete_mons.cgi	1.52 KB	-rwxr-xr-x	2026-07-17 21:22
delete_tmpls.cgi	712 B	-rwxr-xr-x	2026-07-17 21:22
dhcpd-monitor.pl	616 B	-rwxr-xr-x	2026-07-17 21:17
dns-monitor.pl	1.3 KB	-rwxr-xr-x	2026-07-17 21:17
dovecot-monitor.pl	302 B	-rwxr-xr-x	2026-07-17 21:17
du-monitor.pl	790 B	-rw-r--r--	2026-07-17 21:17
edit_mon.cgi	9.75 KB	-rwxr-xr-x	2026-07-17 21:22
edit_sched.cgi	4.62 KB	-rwxr-xr-x	2026-07-17 21:22
edit_tmpl.cgi	1.81 KB	-rwxr-xr-x	2026-07-17 21:22
exec-monitor.pl	1.52 KB	-rwxr-xr-x	2026-07-17 21:17
fail2ban-monitor.pl	516 B	-rwxr-xr-x	2026-07-17 21:17
feedback_files.pl	175 B	-rwxr-xr-x	2026-07-17 21:17
file-monitor.pl	3.35 KB	-rwxr-xr-x	2026-07-17 21:17
firewalld-monitor.pl	242 B	-rw-r--r--	2026-07-17 21:17
ftp-monitor.pl	3.05 KB	-rwxr-xr-x	2026-07-17 21:17
hostsentry-monitor.pl	521 B	-rwxr-xr-x	2026-07-17 21:17
http-monitor.pl	4.24 KB	-rwxr-xr-x	2026-07-17 21:17
iface-monitor.pl	908 B	-rwxr-xr-x	2026-07-17 21:17
imap-monitor.pl	1.78 KB	-rw-r--r--	2026-07-17 21:17
index.cgi	5 KB	-rwxr-xr-x	2026-07-17 21:22
inetd-monitor.pl	399 B	-rwxr-xr-x	2026-07-17 21:17
init-monitor.pl	576 B	-rw-r--r--	2026-07-17 21:17
ldap-monitor.pl	1.51 KB	-rwxr-xr-x	2026-07-17 21:17
list_tmpls.cgi	1.07 KB	-rwxr-xr-x	2026-07-17 21:22
load-monitor.pl	1.1 KB	-rwxr-xr-x	2026-07-17 21:17
log_parser.pl	723 B	-rwxr-xr-x	2026-07-17 21:17
mailq-monitor.pl	1.3 KB	-rwxr-xr-x	2026-07-17 21:17
memory-monitor.pl	1.55 KB	-rwxr-xr-x	2026-07-17 21:17
module.info	168 B	-rw-r--r--	2026-07-17 21:17
module.info.ar	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ar.auto	167 B	-rw-r--r--	2026-07-17 21:17
module.info.bg	0 B	-rw-r--r--	2026-07-17 21:17
module.info.bg.auto	247 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	118 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	14 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	33 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	105 B	-rw-r--r--	2026-07-17 21:17
module.info.da	0 B	-rw-r--r--	2026-07-17 21:17
module.info.da.auto	120 B	-rw-r--r--	2026-07-17 21:17
module.info.de	121 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	15 B	-rw-r--r--	2026-07-17 21:17
module.info.el	0 B	-rw-r--r--	2026-07-17 21:17
module.info.el.auto	274 B	-rw-r--r--	2026-07-17 21:17
module.info.es	40 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	95 B	-rw-r--r--	2026-07-17 21:17
module.info.eu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.eu.auto	132 B	-rw-r--r--	2026-07-17 21:17
module.info.fa	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fa.auto	185 B	-rw-r--r--	2026-07-17 21:17
module.info.fi	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fi.auto	134 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	42 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	107 B	-rw-r--r--	2026-07-17 21:17
module.info.hr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hr.auto	134 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	37 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	99 B	-rw-r--r--	2026-07-17 21:17
module.info.it	39 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	96 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	57 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	130 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	36 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	92 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	119 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	15 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	33 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	97 B	-rw-r--r--	2026-07-17 21:17
module.info.no	32 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	96 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	97 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	15 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	133 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	142 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	56 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	165 B	-rw-r--r--	2026-07-17 21:17
module.info.sk	33 B	-rw-r--r--	2026-07-17 21:17
module.info.sk.auto	106 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	33 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	92 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	32 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	105 B	-rw-r--r--	2026-07-17 21:17
module.info.uk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.uk.auto	208 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	36 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	76 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	40 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	82 B	-rw-r--r--	2026-07-17 21:17
mon-monitor.pl	431 B	-rwxr-xr-x	2026-07-17 21:17
monitor.pl	18.03 KB	-rwxr-xr-x	2026-07-17 21:22
mysql-monitor.pl	450 B	-rwxr-xr-x	2026-07-17 21:17
nfs-monitor.pl	410 B	-rwxr-xr-x	2026-07-17 21:17
oldfile-monitor.pl	864 B	-rwxr-xr-x	2026-07-17 21:17
phpini-monitor.pl	1.32 KB	-rw-r--r--	2026-07-17 21:17
ping-monitor.pl	6.89 KB	-rwxr-xr-x	2026-07-17 21:17
portsentry-monitor.pl	535 B	-rwxr-xr-x	2026-07-17 21:17
postfix-monitor.pl	509 B	-rwxr-xr-x	2026-07-17 21:17
postgresql-monitor.pl	480 B	-rwxr-xr-x	2026-07-17 21:17
prefs.info	58 B	-rw-r--r--	2026-07-17 21:17
proc-monitor.pl	1.7 KB	-rwxr-xr-x	2026-07-17 21:17
proftpd-monitor.pl	842 B	-rwxr-xr-x	2026-07-17 21:17
qmailadmin-monitor.pl	424 B	-rwxr-xr-x	2026-07-17 21:17
query-monitor.pl	5.08 KB	-rwxr-xr-x	2026-07-17 21:17
raid-monitor.pl	1.66 KB	-rwxr-xr-x	2026-07-17 21:17
reboot-monitor.pl	503 B	-rw-r--r--	2026-07-17 21:17
refresh.cgi	550 B	-rwxr-xr-x	2026-07-17 21:22
rssh-monitor.pl	2.63 KB	-rwxr-xr-x	2026-07-17 21:17
safeacl	15 B	-rw-r--r--	2026-07-17 21:17
samba-monitor.pl	453 B	-rwxr-xr-x	2026-07-17 21:17
save_mon.cgi	3.27 KB	-rwxr-xr-x	2026-07-17 21:22
save_sched.cgi	2.96 KB	-rwxr-xr-x	2026-07-17 21:22
save_tmpl.cgi	1.25 KB	-rwxr-xr-x	2026-07-17 21:22
sendmail-monitor.pl	682 B	-rwxr-xr-x	2026-07-17 21:17
sensors-monitor.pl	3.9 KB	-rwxr-xr-x	2026-07-17 21:17
slapd-monitor.pl	606 B	-rwxr-xr-x	2026-07-17 21:17
smtp-monitor.pl	5.22 KB	-rw-r--r--	2026-07-17 21:17
space-monitor.pl	3.09 KB	-rwxr-xr-x	2026-07-17 21:17
squid-monitor.pl	881 B	-rwxr-xr-x	2026-07-17 21:17
sshd-monitor.pl	817 B	-rwxr-xr-x	2026-07-17 21:17
sslcert-monitor.pl	4.54 KB	-rwxr-xr-x	2026-07-17 21:17
status-lib.pl	18.02 KB	-rwxr-xr-x	2026-07-17 21:17
status_monitor_api.pl	593 B	-rwxr-xr-x	2026-07-17 21:17
system_info.pl	1.49 KB	-rw-r--r--	2026-07-17 21:17
tcp-monitor.pl	1.32 KB	-rwxr-xr-x	2026-07-17 21:17
traffic-monitor.pl	2.4 KB	-rwxr-xr-x	2026-07-17 21:17
uninstall.pl	434 B	-rwxr-xr-x	2026-07-17 21:17
usermin-monitor.pl	496 B	-rwxr-xr-x	2026-07-17 21:17
webmin-monitor.pl	363 B	-rwxr-xr-x	2026-07-17 21:17
xinetd-monitor.pl	491 B	-rwxr-xr-x	2026-07-17 21:17

Rename

# file-monitor.pl
# Check the status of some file

sub get_file_status
{
local @files;
if ($_[0]->{'file'} =~ /\*|\?/) {
	@files = glob($_[0]->{'file'});
	}
else {
	@files = ( $_[0]->{'file'} );
	}
my $allup = 1;
my @badsizes;
my @badowners;
my @badgroups;
my @badperms;
my @allsizes;
foreach my $f (@files) {
	local @st = stat($f);

# Check file size
	local $size;
	local $up;
	if ($_[0]->{'test'} >= 2) {
		$size = -d $f ? &disk_usage_kb($f)*1024 : $st[7];
		}
	if ($_[0]->{'test'} == 0) {
		$up = @st ? 1 : 0;
		}
	elsif ($_[0]->{'test'} == 1) {
		$up = @st ? 0 : 1;
		}
	elsif ($_[0]->{'test'} == 2) {
		$up = $size > $_[0]->{'greater'} ? 1 : 0;
		}
	elsif ($_[0]->{'test'} == 3) {
		$up = $size < $_[0]->{'lesser'} ? 1 : 0;
		}
	if (!$up) {
		$allup = 0;
		push(@badsizes, $f);
		}

if ($_[0]->{'owner'}) {
		# Check for owner
		my $u = getpwuid($st[4]);
		if ($st[4] ne $_[0]->{'owner'} &&
		    $u ne $_[0]->{'owner'}) {
			$allup = 0;
			push(@badowners, $f);
			}
		}

if ($_[0]->{'group'}) {
		# Check for group
		my $g = getgrgid($st[5]);
		if ($st[5] ne $_[0]->{'group'} &&
		    $g ne $_[0]->{'group'}) {
			$allup = 0;
			push(@badgroups, $f);
			}
		}

if ($_[0]->{'perms'}) {
		# Check for permissions
		if (($st[2]&0777) != oct($_[0]->{'perms'})) {
			$allup = 0;
			push(@badperms, $f);
			}
		}

push(@allsizes, $size) if (defined($size));
	}

# Construct error message
my @descs;
if (@badsizes) {
	my $desc = join(" ", @badsizes);
	if ($_[0]->{'test'} == 2) {
		$desc = &text('file_esmall', $desc);
		}
	elsif ($_[0]->{'test'} == 3) {
		$desc = &text('file_elarge', $desc);
		}
	push(@descs, $desc);
	}
if (@badowners) {
	push(@descs, &text('file_eowner', join(" ", @badowners)));
	}
if (@badgroups) {
	push(@descs, &text('file_egroup', join(" ", @badgroups)));
	}
if (@badperms) {
	push(@descs, &text('file_eperm', join(" ", @badperms)));
	}

my $rv = { 'up' => $allup,
	   'desc' => join(", ", @descs) };
if (@allsizes == 1) {
	$rv->{'value'} = $allsizes[0];
	$rv->{'nice_value'} = &nice_size($allsizes[0]);
	}
return $rv;
}

sub show_file_dialog
{
print &ui_table_row($text{'file_file'},
	&ui_textbox("file", $_[0]->{'file'}, 50), 3);

print &ui_table_row($text{'file_test'},
	&ui_radio("test", int($_[0]->{'test'}),
		[ [ 0, $text{'file_test_0'}."<br>" ],
		  [ 1, $text{'file_test_1'}."<br>" ],
		  [ 2, $text{'file_test_2'}.
		       &ui_textbox("greater", $_[0]->{'greater'}, 10)." ".
		       $text{'file_bytes'}."<br>" ],
		  [ 3, $text{'file_test_3'}.
		       &ui_textbox("lesser", $_[0]->{'lesser'}, 10)." ".
		       $text{'file_bytes'}."<br>" ] ]), 3);

print &ui_table_row($text{'file_owner'},
	&ui_opt_textbox("owner", $_[0]->{'owner'}, 20,
			$text{'file_nocheck'}), 3);

print &ui_table_row($text{'file_group'},
	&ui_opt_textbox("group", $_[0]->{'group'}, 20,
			$text{'file_nocheck'}), 3);

print &ui_table_row($text{'file_perms'},
	&ui_opt_textbox("perms", $_[0]->{'perms'}, 4,
			$text{'file_nocheck'}), 3);
}

sub parse_file_dialog
{
$in{'file'} || &error($text{'file_efile'});
$_[0]->{'file'} = $in{'file'};
$_[0]->{'test'} = $in{'test'};
$in{'greater'} =~ /^\d*$/ && $in{'lesser'} =~ /^\d*$/ ||
&error($text{'file_esize'});
$_[0]->{'greater'} = $in{'greater'};
$_[0]->{'lesser'} = $in{'lesser'};
$_[0]->{'owner'} = $in{'owner_def'} ? undef : $in{'owner'};
$_[0]->{'group'} = $in{'group_def'} ? undef : $in{'group'};
$_[0]->{'perms'} = $in{'perms_def'} ? undef : $in{'perms'};
}