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	1.49 KB	-rw-r--r--	2026-07-17 21:17
apply.cgi	199 B	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	735 B	-rwxr-xr-x	2026-07-17 21:17
bootup.cgi	416 B	-rwxr-xr-x	2026-07-17 21:22
cgi_args.pl	150 B	-rwxr-xr-x	2026-07-17 21:17
config	135 B	-rw-r--r--	2026-07-17 21:17
config-AlmaLinux-7.0-ALL	128 B	-rw-r--r--	2026-07-17 21:17
config-Amazon-Linux	124 B	-rw-r--r--	2026-07-17 21:17
config-CentOS-Stream-Linux-8.0-ALL	128 B	-rw-r--r--	2026-07-17 21:17
config-CloudLinux-8.0-ALL	128 B	-rw-r--r--	2026-07-17 21:17
config-Oracle-Linux-8.0-ALL	128 B	-rw-r--r--	2026-07-17 21:17
config-Rocky-Linux-7.0-ALL	128 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	124 B	-rw-r--r--	2026-07-17 21:17
config-freebsd-8.0-8.9	150 B	-rw-r--r--	2026-07-17 21:17
config-freebsd-9-ALL	142 B	-rw-r--r--	2026-07-17 21:17
config-gentoo-linux	104 B	-rw-r--r--	2026-07-17 21:17
config-mandrake-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-openSUSE-Linux-15.0-ALL	124 B	-rw-r--r--	2026-07-17 21:17
config-openmamba-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-pardus-linux	104 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-11.0-23.0	142 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-24.0-ALL	146 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux	124 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	162 B	-rw-r--r--	2026-07-17 21:17
config.info	240 B	-rw-r--r--	2026-07-17 21:17
config.info.bg	306 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	225 B	-rw-r--r--	2026-07-17 21:17
config.info.cs	208 B	-rw-r--r--	2026-07-17 21:17
config.info.de	187 B	-rw-r--r--	2026-07-17 21:17
config.info.es	218 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	0 B	-rw-r--r--	2026-07-17 21:17
config.info.hr	0 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	185 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	186 B	-rw-r--r--	2026-07-17 21:17
config.info.no	179 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	189 B	-rw-r--r--	2026-07-17 21:17
config.info.zh_TW	192 B	-rw-r--r--	2026-07-17 21:17
config_info.pl	371 B	-rw-r--r--	2026-07-17 21:17
dovecot-lib.pl	15.84 KB	-rwxr-xr-x	2026-07-17 21:17
edit_login.cgi	7.87 KB	-rwxr-xr-x	2026-07-17 21:22
edit_mail.cgi	5.29 KB	-rwxr-xr-x	2026-07-17 21:22
edit_manual.cgi	928 B	-rwxr-xr-x	2026-07-17 21:22
edit_net.cgi	1.87 KB	-rwxr-xr-x	2026-07-17 21:22
edit_ssl.cgi	2.84 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	1.96 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	370 B	-rwxr-xr-x	2026-07-17 21:17
log_parser.pl	424 B	-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	120 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	178 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	116 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	80 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	94 B	-rw-r--r--	2026-07-17 21:17
module.info.de	102 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	200 B	-rw-r--r--	2026-07-17 21:17
module.info.es	39 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	82 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	121 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	135 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	111 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	122 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	127 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	36 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	74 B	-rw-r--r--	2026-07-17 21:17
module.info.it	33 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	73 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	126 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	119 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	113 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	69 B	-rw-r--r--	2026-07-17 21:17
module.info.no	33 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	54 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	116 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	119 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	125 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	41 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	98 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	108 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	105 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	109 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	135 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	99 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	105 B	-rw-r--r--	2026-07-17 21:17
save_login.cgi	6.19 KB	-rwxr-xr-x	2026-07-17 21:22
save_mail.cgi	3.47 KB	-rwxr-xr-x	2026-07-17 21:22
save_manual.cgi	520 B	-rwxr-xr-x	2026-07-17 21:22
save_net.cgi	1.77 KB	-rwxr-xr-x	2026-07-17 21:22
save_ssl.cgi	2.62 KB	-rwxr-xr-x	2026-07-17 21:22
start.cgi	194 B	-rwxr-xr-x	2026-07-17 21:22
stop.cgi	190 B	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# Update login options

require './dovecot-lib.pl';
&ReadParse();
&error_setup($text{'login_err'});
$conf = &get_config();
&lock_dovecot_files($conf);

# Allowed and default realm
&save_directive($conf, "auth_realms",
		$in{'realms_def'} ? undef : $in{'realms'});
&save_directive($conf,
		&version_atleast("2.4")
			? "auth_default_domain"
			: "auth_default_realm",
		$in{'realm_def'} ? undef : $in{'realm'});

# Authentication mechanisms
if (&find("auth_mechanisms", $conf, 2)) {
	&save_directive($conf, "auth_mechanisms",
			$in{'mechs'}
				? join(" ", split(/\0/, $in{'mechs'}))
				: undef);
	}
else {
	&save_directive($conf, "mechanisms",
			join(" ", split(/\0/, $in{'mechs'})), "auth","default");
	}

if (&version_below("2.4")) {
	# User database
	$userdb = $in{'usermode'};
	if ($in{'usermode'} eq 'passwd-file') {
		-r $in{'passwdfile'} || &error($text{'login_epasswdfile'});
		$userdb .= " ".$in{'passwdfile'};
		}
	elsif ($in{'usermode'} eq 'static') {
		$in{'uid'} =~ /^\d+$/ || &error($text{'login_euid'});
		$in{'gid'} =~ /^\d+$/ || &error($text{'login_egid'});
		$in{'home'} || &error($text{'login_ehome'});
		$userdb .= " uid=".$in{'uid'}." gid=".$in{'gid'}.
			" home=".$in{'home'};
		}
	elsif ($in{'usermode'} eq 'ldap') {
		-r $in{'ldap'} || &error($text{'login_eldap'});
		$userdb .= " ".$in{'ldap'};
		}
	elsif ($in{'usermode'} eq 'pgsql') {
		-r $in{'pgsql'} || &error($text{'login_epgsql'});
		$userdb .= " ".$in{'pgsql'};
		}
	elsif ($in{'usermode'} eq 'sql') {
		-r $in{'sql'} || &error($text{'login_esql'});
		$userdb .= " ".$in{'sql'};
		}
	elsif ($in{'usermode'} eq '') {
		$userdb = $in{'other'};
		}
	if ($usec = &find_section("userdb", $conf, undef, "auth", "default")) {
		# Version 1.0.alpha format, which has a userdb *section*
		($svalue, $args) = split(/\s+/, $userdb, 2);
		$usec->{'value'} = $svalue;
		$usec->{'members'} = [ grep { $_->{'name'} ne 'args' }
					@{$usec->{'members'}} ];
		if ($args) {
			$usec->{'members'} = [ { 'name' => 'args',
						'value' => $args } ];
			}
		&save_section($conf, $usec);
		}
	elsif (&find("auth_userdb", $conf, 2)) {
		# Version 0.99 format
		&save_directive($conf, "auth_userdb", $userdb);
		}
	elsif (&find_value("driver", $conf, 2, "userdb")) {
		# Version 2.0 format
		$args = $userdb =~ s/\s+(\S.*)$// ? $1 : undef;
		&save_directive($conf, "driver", $userdb, "userdb");
		&save_directive($conf, "args", $args, "userdb");
		}
	else {
		# Version 1.0 format
		&save_directive($conf, "userdb", $userdb, "auth", "default");
		}

# Password mode
	$passdb = $in{'passmode'};
	if ($in{'passmode'} eq 'dpam') {
		$passdb = "pam";
		}
	elsif ($in{'passmode'} eq 'pam') {
		$in{'ppam'} =~ /^\S+$/ || &error($text{'login_edpam'});
		if (defined($in{'ppam_ckey'}) && !$in{'ppam_ckey_def'}) {
			$ckey = $in{'ppam_ckey'};
			$ckey =~ /^\S+$/ || &error($text{'login_eckey'});
			}
		$passdb .= ($in{'ppam_session'} ? " -session" : "").
			($ckey ? " cache_key=$ckey" : "").
			" ".$in{'ppam'};
		}
	elsif ($in{'passmode'} eq 'passwd-file') {
		-r $in{'ppasswdfile'} || &error($text{'login_epasswdfile'});
		$passdb .= " ".$in{'ppasswdfile'};
		}
	elsif ($in{'passmode'} eq 'ldap') {
		-r $in{'pldap'} || &error($text{'login_eldap'});
		$passdb .= " ".$in{'pldap'};
		}
	elsif ($in{'passmode'} eq 'pgsql') {
		-r $in{'ppgsql'} || &error($text{'login_epgsql'});
		$passdb .= " ".$in{'ppgsql'};
		}
	elsif ($in{'passmode'} eq 'sql') {
		-r $in{'psql'} || &error($text{'login_esql'});
		$passdb .= " ".$in{'psql'};
		}
	elsif ($in{'passmode'} eq 'bsdauth') {
		$in{'bsdauth_ckey_def'} || $in{'bsdauth_ckey'} =~ /^\S+$/ ||
			&error($text{'login_eckey'});
		$passdb .= " cache_key=$in{'bsdauth_ckey'}"
			if (!$in{'bsdauth_ckey_def'});
		}
	elsif ($in{'passmode'} eq 'checkpassword') {
		-x $in{'checkpassword'} || &error($text{'login_echeckpassword'});
		$passdb .= " ".$in{'checkpassword'};
		}
	elsif ($in{'passmode'} eq '') {
		$passdb = $in{'other'};
		}
	# XXX other modes
	if ($psec = &find_section("passdb", $conf, undef, "auth", "default")) {
		# Version 1.0.alpha format
		($svalue, $args) = split(/\s+/, $passdb, 2);
		$psec->{'value'} = $svalue;
		$psec->{'members'} = [ grep { $_->{'name'} ne 'args' }
					@{$psec->{'members'}} ];
		if ($args) {
			$psec->{'members'} = [ { 'name' => 'args',
						'value' => $args } ];
			}
		&save_section($conf, $psec);
		}
	elsif (&find("auth_passdb", $conf, 2)) {
		# Version 0.99 format
		&save_directive($conf, "auth_passdb", $passdb);
		}
	elsif (&find_value("driver", $conf, 2, "passdb")) {
		# Version 2.0 format
		$args = $passdb =~ s/\s+(\S.*)$// ? $1 : undef;
		&save_directive($conf, "driver", $passdb, "passdb");
		&save_directive($conf, "args", $args, "passdb");
		}
	else {
		# Version 1.0 format
		&save_directive($conf, "passdb", $passdb, "auth", "default");
		}
	}

# Allowed UIDs and GIDs
$in{'fuid_def'} || $in{'fuid'} =~ /^\d+$/ || &error($text{'login_efuid'});
&save_directive($conf, "first_valid_uid",
		$in{'fuid_def'} ? undef : $in{'fuid'});

$in{'luid_def'} || $in{'luid'} =~ /^\d+$/ || &error($text{'login_eluid'});
&save_directive($conf, "last_valid_uid",
		$in{'luid_def'} ? undef : $in{'luid'});

$in{'fgid_def'} || $in{'fgid'} =~ /^\d+$/ || &error($text{'login_efgid'});
&save_directive($conf, "first_valid_gid",
		$in{'fgid_def'} ? undef : $in{'fgid'});

$in{'lgid_def'} || $in{'lgid'} =~ /^\d+$/ || &error($text{'login_elgid'});
&save_directive($conf, "last_valid_gid",
		$in{'lgid_def'} ? undef : $in{'lgid'});

&save_directive($conf,
		&version_atleast("2")
			? "mail_access_groups"
			: "mail_extra_groups",
		$in{'extra_def'} ? undef : $in{'extra'});

$in{'chroot_def'} || -d $in{'chroot'} || &error($text{'login_echroot'});
&save_directive($conf, "mail_chroot",
		$in{'chroot_def'} ? undef : $in{'chroot'});

if (&find("login_max_processes_count", $conf, 2)) {
	$in{'procs_def'} || $in{'procs'} =~ /^\d+$/ ||
		&error($text{'login_eprocs'});
	&save_directive($conf, "login_max_processes_count",
			$in{'procs_def'} ? undef : $in{'procs'});
	}

if (&find("login_processes_count", $conf, 2)) {
	$in{'count_def'} || $in{'count'} =~ /^\d+$/ ||
		&error($text{'login_ecount'});
	&save_directive($conf, "login_processes_count",
			$in{'count_def'} ? undef : $in{'count'});
	}

&flush_file_lines();
&unlock_dovecot_files($conf);
&webmin_log("login");
&redirect("");