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
ulang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	2.13 KB	-rw-r--r--	2026-07-19 16:26
config	316 B	-rw-r--r--	2026-07-19 16:26
config-debian-linux	311 B	-rw-r--r--	2026-07-19 16:26
config-freebsd	303 B	-rw-r--r--	2026-07-19 16:26
config.info	1.9 KB	-rw-r--r--	2026-07-19 16:26
config.info.ca	2.27 KB	-rwxr-xr-x	2026-07-19 16:26
config.info.de	1.08 KB	-rw-r--r--	2026-07-19 16:26
config.info.el	2.09 KB	-rw-r--r--	2026-07-19 16:26
config.info.nl	2.04 KB	-rwxr-xr-x	2026-07-19 16:26
config.info.no	2 KB	-rw-r--r--	2026-07-19 16:26
defaultuconfig	38 B	-rw-r--r--	2026-07-19 16:26
delete_all.cgi	257 B	-rwxr-xr-x	2026-07-19 16:28
delete_awl.cgi	1.17 KB	-rwxr-xr-x	2026-07-19 16:28
deleteone_awl.cgi	560 B	-rwxr-xr-x	2026-07-19 16:28
detach.cgi	940 B	-rwxr-xr-x	2026-07-19 16:28
edit_awl.cgi	3.54 KB	-rwxr-xr-x	2026-07-19 16:28
edit_header.cgi	4.55 KB	-rwxr-xr-x	2026-07-19 16:28
edit_procmail.cgi	1.87 KB	-rwxr-xr-x	2026-07-19 16:28
edit_razor.cgi	875 B	-rwxr-xr-x	2026-07-19 16:28
edit_report.cgi	4.3 KB	-rwxr-xr-x	2026-07-19 16:28
edit_score.cgi	3.18 KB	-rwxr-xr-x	2026-07-19 16:28
edit_setup.cgi	1.57 KB	-rwxr-xr-x	2026-07-19 16:28
edit_simple.cgi	1.5 KB	-rwxr-xr-x	2026-07-19 16:28
edit_user.cgi	2.82 KB	-rwxr-xr-x	2026-07-19 16:28
edit_white.cgi	4.45 KB	-rwxr-xr-x	2026-07-19 16:28
index.cgi	4.05 KB	-rwxr-xr-x	2026-07-19 16:28
install_check.pl	400 B	-rwxr-xr-x	2026-07-19 16:26
langs	718 B	-rw-r--r--	2026-07-19 16:26
locales	69 B	-rw-r--r--	2026-07-19 16:26
mail.cgi	4.66 KB	-rwxr-xr-x	2026-07-19 16:28
mail_search.cgi	5 KB	-rwxr-xr-x	2026-07-19 16:28
module.info	181 B	-rw-r--r--	2026-07-19 16:26
module.info.ar	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ar.auto	203 B	-rw-r--r--	2026-07-19 16:26
module.info.bg	0 B	-rw-r--r--	2026-07-19 16:26
module.info.bg.auto	220 B	-rw-r--r--	2026-07-19 16:26
module.info.ca	38 B	-rw-r--r--	2026-07-19 16:26
module.info.ca.auto	135 B	-rw-r--r--	2026-07-19 16:26
module.info.cs	36 B	-rw-r--r--	2026-07-19 16:26
module.info.cs.auto	126 B	-rw-r--r--	2026-07-19 16:26
module.info.da	0 B	-rw-r--r--	2026-07-19 16:26
module.info.da.auto	151 B	-rw-r--r--	2026-07-19 16:26
module.info.de	141 B	-rw-r--r--	2026-07-19 16:26
module.info.el	0 B	-rw-r--r--	2026-07-19 16:26
module.info.el.auto	334 B	-rw-r--r--	2026-07-19 16:26
module.info.es	0 B	-rw-r--r--	2026-07-19 16:26
module.info.es.auto	163 B	-rw-r--r--	2026-07-19 16:26
module.info.eu	0 B	-rw-r--r--	2026-07-19 16:26
module.info.eu.auto	165 B	-rw-r--r--	2026-07-19 16:26
module.info.fa	0 B	-rw-r--r--	2026-07-19 16:26
module.info.fa.auto	193 B	-rw-r--r--	2026-07-19 16:26
module.info.fi	0 B	-rw-r--r--	2026-07-19 16:26
module.info.fi.auto	145 B	-rw-r--r--	2026-07-19 16:26
module.info.fr	0 B	-rw-r--r--	2026-07-19 16:26
module.info.fr.auto	161 B	-rw-r--r--	2026-07-19 16:26
module.info.hr	0 B	-rw-r--r--	2026-07-19 16:26
module.info.hr.auto	159 B	-rw-r--r--	2026-07-19 16:26
module.info.hu	41 B	-rw-r--r--	2026-07-19 16:26
module.info.hu.auto	128 B	-rw-r--r--	2026-07-19 16:26
module.info.it	0 B	-rw-r--r--	2026-07-19 16:26
module.info.it.auto	147 B	-rw-r--r--	2026-07-19 16:26
module.info.ja	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ja.auto	199 B	-rw-r--r--	2026-07-19 16:26
module.info.ko	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ko.auto	186 B	-rw-r--r--	2026-07-19 16:26
module.info.ms	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ms.auto	155 B	-rw-r--r--	2026-07-19 16:26
module.info.nl	34 B	-rw-r--r--	2026-07-19 16:26
module.info.no	35 B	-rw-r--r--	2026-07-19 16:26
module.info.no.auto	117 B	-rw-r--r--	2026-07-19 16:26
module.info.pl	35 B	-rw-r--r--	2026-07-19 16:26
module.info.pl.auto	133 B	-rw-r--r--	2026-07-19 16:26
module.info.pt	0 B	-rw-r--r--	2026-07-19 16:26
module.info.pt.auto	149 B	-rw-r--r--	2026-07-19 16:26
module.info.pt_BR	0 B	-rw-r--r--	2026-07-19 16:26
module.info.pt_BR.auto	158 B	-rw-r--r--	2026-07-19 16:26
module.info.ru	32 B	-rw-r--r--	2026-07-19 16:26
module.info.ru.auto	205 B	-rw-r--r--	2026-07-19 16:26
module.info.sk	0 B	-rw-r--r--	2026-07-19 16:26
module.info.sk.auto	182 B	-rw-r--r--	2026-07-19 16:26
module.info.sv	0 B	-rw-r--r--	2026-07-19 16:26
module.info.sv.auto	160 B	-rw-r--r--	2026-07-19 16:26
module.info.tr	0 B	-rw-r--r--	2026-07-19 16:26
module.info.tr.auto	171 B	-rw-r--r--	2026-07-19 16:26
module.info.uk	0 B	-rw-r--r--	2026-07-19 16:26
module.info.uk.auto	279 B	-rw-r--r--	2026-07-19 16:26
module.info.zh	0 B	-rw-r--r--	2026-07-19 16:26
module.info.zh.auto	151 B	-rw-r--r--	2026-07-19 16:26
module.info.zh_TW	0 B	-rw-r--r--	2026-07-19 16:26
module.info.zh_TW.auto	160 B	-rw-r--r--	2026-07-19 16:26
process.cgi	2.84 KB	-rwxr-xr-x	2026-07-19 16:28
save_header.cgi	3.1 KB	-rwxr-xr-x	2026-07-19 16:28
save_procmail.cgi	1.75 KB	-rwxr-xr-x	2026-07-19 16:28
save_report.cgi	2.14 KB	-rwxr-xr-x	2026-07-19 16:28
save_score.cgi	2.05 KB	-rwxr-xr-x	2026-07-19 16:28
save_simple.cgi	2.75 KB	-rwxr-xr-x	2026-07-19 16:28
save_user.cgi	1.64 KB	-rwxr-xr-x	2026-07-19 16:28
save_white.cgi	2.1 KB	-rwxr-xr-x	2026-07-19 16:28
setup.cgi	2.71 KB	-rwxr-xr-x	2026-07-19 16:28
setup_razor.cgi	1.15 KB	-rwxr-xr-x	2026-07-19 16:28
spam-lib.pl	30.19 KB	-rwxr-xr-x	2026-07-19 16:26
uconfig.info	378 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.ca	448 B	-rwxr-xr-x	2026-07-19 16:26
uconfig.info.cs	367 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.de	486 B	-rwxr-xr-x	2026-07-19 16:26
uconfig.info.fr	533 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.nl	420 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.no	388 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.pl	0 B	-rw-r--r--	2026-07-19 16:26
view_mail.cgi	8 KB	-rwxr-xr-x	2026-07-19 16:28

Rename

#!/usr/bin/perl
# save_white.cgi
# Save white and black lists of to and from addresses

require './spam-lib.pl';
&error_setup($text{'white_err'});
&ReadParseMime();
&set_config_file_in(\%in);
&can_use_check("white");
&execute_before("white");
&lock_spam_files();
$conf = &get_config();

&parse_textbox($conf, "whitelist_from");

&parse_textbox($conf, 'unwhitelist_from');

@rcvd = &parse_table("whitelist_from_rcvd", \&rcvd_parser);
&save_directives($conf, 'whitelist_from_rcvd', \@rcvd, 1);

&parse_textbox($conf, 'blacklist_from');

&parse_textbox($conf, 'unblacklist_from');

@to = &parse_table("whitelist_to", \&to_parser);
@oldto = ( &find("whitelist_to", $conf),
	   &find("more_spam_to", $conf),
	   &find("all_spam_to", $conf) );
&save_directives($conf, \@oldto, \@to, 0);

# Add any imported addresses
if ($in{'import'}) {
	@addrs = ( );
	while($in{'import'} =~ s/((([^<>()[\]\\.,;:\s@\"]+(\.[^<>()[\]\\.,;:\s@\"]+)*)|(\".+\"))@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\])|(([a-zA-Z\-0-9]+\.)+([a-zA-Z]{2,})+)))//) {
		push(@addrs, $1);
		}
	@addrs || &error($text{'import_enone'});
	@addrs = &unique(@addrs);

@from = map { @{$_->{'words'}} } &find("whitelist_from", $conf);
	%already = map { lc($_), 1 } @from;
	@newaddrs = grep { !$already{lc($_)} } @addrs;
	push(@from, @newaddrs);
	if ($in{'sort'}) {
		@from = sort { ($ua, $da) = split(/\@/, $a);
			       ($ub, $db) = split(/\@/, $b);
			       lc($da) cmp lc($db) || lc($ua) cmp lc($ub) }
			     @from;
		}
	&save_directives($conf, 'whitelist_from', \@from, 1);
	}

&flush_file_lines();
&unlock_spam_files();
&execute_after("white");
&webmin_log("white");
&redirect($redirect_url);

sub from_parser
{
return undef if (!$_[1]);
$_[1] =~ /^\S+$/ || &error(&text('white_efrom', $_[1]));
return $_[1];
}

sub rcvd_parser
{
local $a = &from_parser($_[0], $_[1]);
return undef if (!$a);
$_[2] =~ /^[A-Za-z0-9\.\-]+$/ || &error(&text('white_ercvd', $_[2]));
return "$a $_[2]";
}

sub to_parser
{
local $a = &from_parser($_[0], $_[1]);
return undef if (!$a);
return { 'name' => $_[2] == 0 ? 'whitelist_to' :
		   $_[2] == 1 ? 'more_spam_to' : 'all_spam_to',
	 'value' => $a };
}