Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	3.94 KB	-rw-r--r--	2026-07-17 21:17
acl_security.pl	1.39 KB	-rwxr-xr-x	2026-07-17 21:17
backup_config.pl	2.17 KB	-rwxr-xr-x	2026-07-17 21:17
bootup.cgi	1.12 KB	-rwxr-xr-x	2026-07-17 21:22
cgi_args.pl	160 B	-rwxr-xr-x	2026-07-17 21:17
change_access.cgi	922 B	-rwxr-xr-x	2026-07-17 21:22
change_advanced.cgi	1.59 KB	-rwxr-xr-x	2026-07-17 21:22
change_anon.cgi	758 B	-rwxr-xr-x	2026-07-17 21:22
change_bind.cgi	3.3 KB	-rwxr-xr-x	2026-07-17 21:22
change_lang.cgi	489 B	-rwxr-xr-x	2026-07-17 21:22
change_mobile.cgi	989 B	-rwxr-xr-x	2026-07-17 21:22
change_os.cgi	1.9 KB	-rwxr-xr-x	2026-07-17 21:22
change_referers.cgi	462 B	-rwxr-xr-x	2026-07-17 21:22
change_session.cgi	5.19 KB	-rwxr-xr-x	2026-07-17 21:22
change_ssl.cgi	2.44 KB	-rwxr-xr-x	2026-07-17 21:22
change_theme.cgi	675 B	-rwxr-xr-x	2026-07-17 21:22
change_twofactor.cgi	1.07 KB	-rwxr-xr-x	2026-07-17 21:22
change_ui.cgi	1.61 KB	-rwxr-xr-x	2026-07-17 21:22
change_users.cgi	1.19 KB	-rwxr-xr-x	2026-07-17 21:22
change_web.cgi	2.8 KB	-rwxr-xr-x	2026-07-17 21:22
clear_blocked.cgi	126 B	-rwxr-xr-x	2026-07-17 21:22
clone_mod.cgi	1.67 KB	-rwxr-xr-x	2026-07-17 21:22
config	85 B	-rw-r--r--	2026-07-17 21:17
config.info	242 B	-rw-r--r--	2026-07-17 21:17
config.info.ar	315 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	287 B	-rw-r--r--	2026-07-17 21:17
config.info.cs	287 B	-rw-r--r--	2026-07-17 21:17
config.info.de	275 B	-rw-r--r--	2026-07-17 21:17
config.info.es	298 B	-rw-r--r--	2026-07-17 21:17
config.info.fa	221 B	-rw-r--r--	2026-07-17 21:17
config.info.fi	273 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	300 B	-rw-r--r--	2026-07-17 21:17
config.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
config.info.it	304 B	-rw-r--r--	2026-07-17 21:17
config.info.ja	275 B	-rw-r--r--	2026-07-17 21:17
config.info.ms	264 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	266 B	-rw-r--r--	2026-07-17 21:17
config.info.no	244 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	290 B	-rw-r--r--	2026-07-17 21:17
config.info.pt_BR	54 B	-rw-r--r--	2026-07-17 21:17
config.info.ru	62 B	-rw-r--r--	2026-07-17 21:17
config.info.uk	63 B	-rw-r--r--	2026-07-17 21:17
config.info.zh_TW	34 B	-rw-r--r--	2026-07-17 21:17
copycert.cgi	1.52 KB	-rwxr-xr-x	2026-07-17 21:22
defaultacl	269 B	-rw-r--r--	2026-07-17 21:17
delete_mod.cgi	2.21 KB	-rwxr-xr-x	2026-07-17 21:22
delete_session.cgi	317 B	-rwxr-xr-x	2026-07-17 21:22
download_cert.cgi	575 B	-rwxr-xr-x	2026-07-17 21:22
edit_access.cgi	1.3 KB	-rwxr-xr-x	2026-07-17 21:22
edit_acl.cgi	634 B	-rwxr-xr-x	2026-07-17 21:22
edit_advanced.cgi	2.1 KB	-rwxr-xr-x	2026-07-17 21:22
edit_anon.cgi	807 B	-rwxr-xr-x	2026-07-17 21:22
edit_assignment.cgi	1.19 KB	-rwxr-xr-x	2026-07-17 21:22
edit_bind.cgi	2.66 KB	-rwxr-xr-x	2026-07-17 21:22
edit_blocked.cgi	892 B	-rwxr-xr-x	2026-07-17 21:22
edit_categories.cgi	2.04 KB	-rwxr-xr-x	2026-07-17 21:22
edit_configs.cgi	2.7 KB	-rwxr-xr-x	2026-07-17 21:22
edit_dav.cgi	1.75 KB	-rwxr-xr-x	2026-07-17 21:22
edit_defacl.cgi	692 B	-rwxr-xr-x	2026-07-17 21:22
edit_descs.cgi	846 B	-rwxr-xr-x	2026-07-17 21:22
edit_ipkey.cgi	1.62 KB	-rwxr-xr-x	2026-07-17 21:22
edit_lang.cgi	1.81 KB	-rwxr-xr-x	2026-07-17 21:22
edit_logout.cgi	1.16 KB	-rwxr-xr-x	2026-07-17 21:22
edit_mobile.cgi	1.16 KB	-rwxr-xr-x	2026-07-17 21:22
edit_mods.cgi	4.54 KB	-rwxr-xr-x	2026-07-17 21:22
edit_os.cgi	3.04 KB	-rwxr-xr-x	2026-07-17 21:22
edit_referers.cgi	937 B	-rwxr-xr-x	2026-07-17 21:22
edit_restrict.cgi	2.07 KB	-rwxr-xr-x	2026-07-17 21:22
edit_session.cgi	6.2 KB	-rwxr-xr-x	2026-07-17 21:22
edit_ssl.cgi	6.21 KB	-rwxr-xr-x	2026-07-17 21:22
edit_themes.cgi	3.82 KB	-rwxr-xr-x	2026-07-17 21:22
edit_twofactor.cgi	1.65 KB	-rwxr-xr-x	2026-07-17 21:22
edit_ui.cgi	3.14 KB	-rwxr-xr-x	2026-07-17 21:22
edit_upgrade.cgi	4.05 KB	-rwxr-xr-x	2026-07-17 21:22
edit_users.cgi	1.19 KB	-rwxr-xr-x	2026-07-17 21:22
edit_web.cgi	3.08 KB	-rwxr-xr-x	2026-07-17 21:22
export_mod.cgi	1.34 KB	-rwxr-xr-x	2026-07-17 21:22
feedback_files.pl	137 B	-rwxr-xr-x	2026-07-17 21:17
index.cgi	3.65 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	530 B	-rwxr-xr-x	2026-07-17 21:17
install_mod.cgi	2.68 KB	-rwxr-xr-x	2026-07-17 21:22
install_theme.cgi	2.19 KB	-rwxr-xr-x	2026-07-17 21:22
list_configs.cgi	803 B	-rwxr-xr-x	2026-07-17 21:22
list_restrict.cgi	1.51 KB	-rwxr-xr-x	2026-07-17 21:22
list_sessions.cgi	1.42 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	1.64 KB	-rwxr-xr-x	2026-07-17 21:17
module.info	217 B	-rw-r--r--	2026-07-17 21:17
module.info.ar	133 B	-rw-r--r--	2026-07-17 21:17
module.info.ar.auto	16 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	251 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	131 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	16 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	29 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	116 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	129 B	-rw-r--r--	2026-07-17 21:17
module.info.de	122 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	16 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	212 B	-rw-r--r--	2026-07-17 21:17
module.info.es	34 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	127 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	164 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	190 B	-rw-r--r--	2026-07-17 21:17
module.info.fi	26 B	-rw-r--r--	2026-07-17 21:17
module.info.fi.auto	103 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	33 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	123 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	154 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	31 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	120 B	-rw-r--r--	2026-07-17 21:17
module.info.it	34 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	114 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	23 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	135 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	140 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	120 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	16 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	29 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	103 B	-rw-r--r--	2026-07-17 21:17
module.info.no	30 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	119 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	120 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	16 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	153 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	37 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	125 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	35 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	200 B	-rw-r--r--	2026-07-17 21:17
module.info.sk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sk.auto	146 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	142 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	150 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	258 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	114 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	25 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	98 B	-rw-r--r--	2026-07-17 21:17
move.cgi	606 B	-rwxr-xr-x	2026-07-17 21:22
newkey.cgi	2.69 KB	-rwxr-xr-x	2026-07-17 21:22
restart.cgi	110 B	-rwxr-xr-x	2026-07-17 21:22
save_acl.cgi	355 B	-rwxr-xr-x	2026-07-17 21:22
save_assignment.cgi	588 B	-rwxr-xr-x	2026-07-17 21:22
save_categories.cgi	1.07 KB	-rwxr-xr-x	2026-07-17 21:22
save_configs.cgi	751 B	-rwxr-xr-x	2026-07-17 21:22
save_dav.cgi	1019 B	-rwxr-xr-x	2026-07-17 21:22
save_defacl.cgi	626 B	-rwxr-xr-x	2026-07-17 21:22
save_descs.cgi	585 B	-rwxr-xr-x	2026-07-17 21:22
save_ipkey.cgi	1.49 KB	-rwxr-xr-x	2026-07-17 21:22
save_logout.cgi	1022 B	-rwxr-xr-x	2026-07-17 21:22
save_restrict.cgi	1.31 KB	-rwxr-xr-x	2026-07-17 21:22
save_uconfigs.cgi	1.38 KB	-rwxr-xr-x	2026-07-17 21:22
savekey.cgi	2.4 KB	-rwxr-xr-x	2026-07-17 21:22
start.cgi	200 B	-rwxr-xr-x	2026-07-17 21:22
stop.cgi	203 B	-rwxr-xr-x	2026-07-17 21:22
switch.cgi	281 B	-rwxr-xr-x	2026-07-17 21:22
syslog_logs.pl	651 B	-rwxr-xr-x	2026-07-17 21:17
uninstall.pl	350 B	-rwxr-xr-x	2026-07-17 21:17
update.cgi	3.63 KB	-rwxr-xr-x	2026-07-17 21:22
update.pl	4.1 KB	-rwxr-xr-x	2026-07-17 21:22
update_sched.cgi	2.01 KB	-rwxr-xr-x	2026-07-17 21:22
upgrade.cgi	10.11 KB	-rwxr-xr-x	2026-07-17 21:22
usermin-lib.pl	28.51 KB	-rwxr-xr-x	2026-07-17 21:17

Rename

#!/usr/bin/perl
# update.pl
# Find and install updated usermin modules, and email out the result

$no_acl_check++;
require './usermin-lib.pl';
if (!-r "$config{'usermin_dir'}/miniserv.conf") {
	# Usermin not installed
	exit(0);
	}
my $ssl = $update_ssl;

# Get the update source
if ($config{'upsource'}) {
	($host, $port, $page, $ssl) =
		&parse_http_url($config{'upsource'});
	$host && $ssl != 2 || die "Invalid update source URL!";
	}
else {
	$host = $update_host;
	$port = $update_port;
	$page = $update_page;
	}

# Retrieve the updates list (format is  module version url support description )
$temp = &transname();
&http_download($host, $port, $page, $temp, undef, undef, $ssl);
open(UPDATES, "<".$temp);
while(<UPDATES>) {
	if (/^([^\t]+)\t+([^\t]+)\t+([^\t]+)\t+([^\t]+)\t+(.*)/) {
		push(@updates, [ $1, $2, $3, $4, $5 ]);
		}
	}
close(UPDATES);
unlink($temp);

# Go through the results
foreach $u (@updates) {
	next if ($u->[1] >= &get_usermin_base_version() + .01 ||
		 $u->[1] < &get_usermin_base_version());
	local %minfo = &get_usermin_module_info($u->[0]);
	local %tinfo = &get_usermin_theme_info($u->[0]);
	if (!%minfo && !%tinfo && !$config{'upmissing'}) {
		$rv .= &text('update_mmissing', $u->[0])."\n"
			if (!$config{'upquiet'});
		next;
		}
	if (%minfo && $minfo{'version'} >= $u->[1]) {
		$rv .= &text('update_malready', $u->[0])."\n"
			if (!$config{'upquiet'});
		next;
		}
	if (%tinfo && $tinfo{'version'} >= $u->[1]) {
		$rv .= &text('update_malready', $u->[0])."\n"
			if (!$config{'upquiet'});
		next;
		}
	local $osinfo = { 'os_support' => $u->[3] };
	if (!&check_usermin_os_support($osinfo)) {
		$rv .= &text('update_mos', $u->[0])."\n"
			if (!$config{'upquiet'});
		next;
		}
	if ($config{'upshow'}) {
		# Just tell the user what would be done
		$rv .= &text('update_mshow', $u->[0], $u->[1])."\n".
		       $text{'update_fixes'}." : ".$u->[4]."\n\n";
		}
	else {
		# Actually do the update ..
		local (@mdescs, @mdirs, @msizes);
		$rv .= &text('update_mok', $u->[0], $u->[1])."\n".
		       $text{'update_fixes'}." : ".$u->[4]."\n\n";
		if ($u->[2] =~ /^http:\/\/([^:\/]+)(:(\d+))?(\/\S+)$/) {
			$mssl = 0;
			$mhost = $1;
			$mport = $2 ? $3 : 80;
			$mpage = $4;
			}
		elsif ($u->[2] =~ /^https:\/\/([^:\/]+)(:(\d+))?(\/\S+)$/) {
			$mssl = 1;
			$mhost = $1;
			$mport = $2 ? $3 : 443;
			$mpage = $4;
			}
		elsif ($u->[2] =~ /^\/\S+$/) {
			$mssl = $ssl;
			$mhost = $host;
			$mport = $port;
			$mpage = $u->[2];
			}
		else {
			$mssl = $ssl;
			$mhost = $host;
			$mport = $port;
			($mpage = $page) =~ s/[^\/]+$//;
			$mpage .= $u->[2];
			}
		$mtemp = &transname();
		&http_download($mhost, $mport, $mpage, $mtemp,
			       \$error, undef, $mssl);
		if ($error) {
			$rv .= "$error\n\n";
			last;
			}
		else {
			$irv = &install_usermin_module($mtemp, 1, 0);
			if (!ref($irv)) {
				$irv =~ s/<[^>]*>//g;
				$irv .= &text('update_failed', $irv)."\n\n";
				}
			else {
				$irv .= &text('update_mdesc', $irv->[0]->[0],
					      $irv->[2]->[0])."\n\n";
				}
			}
		}
	}

# Check if a new version of usermin itself is available
$file = &transname();
my ($index_host, $index_port, $index_page, $index_ssl) =
	&parse_http_url($latest_page_url);
&http_download($index_host, $index_port, $index_page, $file,
	       undef, undef, $index_ssl);
open(FILE, "<".$file);
while(<FILE>) {
	if (/usermin-([0-9\.]+)\.tar\.gz/) {
		$version = $1;
		last;
		}
	}
close(FILE);
unlink($file);
if ($version > &get_usermin_version()) {
	$rv .= &text('update_version', $version)."\n";
	}

# Send off a results email
if ($config{'upemail'} && $rv && &foreign_check("mailboxes")) {
	# Construct and send the email
	&foreign_require("mailboxes", "mailboxes-lib.pl");
	local $data;
	local $type = $gconfig{'real_os_type'} || $gconfig{'os_type'};
	local $version = $gconfig{'real_os_version'} || $gconfig{'os_version'};
	local $myhost = &get_system_hostname();
	$data .= "$myhost ($type $version)\n\n";
	$data .= &text('update_rv',
		       ($ssl ? "https://" : "http://").
		       "$host:$port$page")."\n\n";
	$data .= $rv;
	&mailboxes::send_text_mail(&mailboxes::get_from_address(),
				   $config{'upemail'},
				   undef,
				   $text{'update_subject'},
				   $data);
	}