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
CHANGELOG	2.12 KB	-rw-r--r--	2026-07-17 21:17
acl_security.pl	1.46 KB	-rwxr-xr-x	2026-07-17 21:17
apply.cgi	229 B	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	890 B	-rwxr-xr-x	2026-07-17 21:17
cgi_args.pl	189 B	-rwxr-xr-x	2026-07-17 21:17
config	236 B	-rw-r--r--	2026-07-17 21:17
config-AlmaLinux-7.0-ALL	287 B	-rw-r--r--	2026-07-17 21:17
config-CentOS-Stream-Linux-8.0-ALL	287 B	-rw-r--r--	2026-07-17 21:17
config-CloudLinux-8.0-ALL	287 B	-rw-r--r--	2026-07-17 21:17
config-Oracle-Linux-8.0-ALL	287 B	-rw-r--r--	2026-07-17 21:17
config-Rocky-Linux-7.0-ALL	287 B	-rw-r--r--	2026-07-17 21:17
config-Ubuntu-Linux-18.04-22.10	294 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	246 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-10.0-11.9	294 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-12-ALL	287 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	288 B	-rw-r--r--	2026-07-17 21:17
config-pardus-linux	224 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-24.0-ALL	287 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	277 B	-rw-r--r--	2026-07-17 21:17
config.info	1.43 KB	-rw-r--r--	2026-07-17 21:17
config.info.ca	1.66 KB	-rw-r--r--	2026-07-17 21:17
config.info.cs	1.41 KB	-rw-r--r--	2026-07-17 21:17
config.info.de	1.67 KB	-rw-r--r--	2026-07-17 21:17
config.info.el	967 B	-rw-r--r--	2026-07-17 21:17
config.info.es	450 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	482 B	-rw-r--r--	2026-07-17 21:17
config.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	1.45 KB	-rw-r--r--	2026-07-17 21:17
config.info.no	1.41 KB	-rw-r--r--	2026-07-17 21:17
defaultacl	71 B	-rw-r--r--	2026-07-17 21:17
delete_awl.cgi	1.17 KB	-rwxr-xr-x	2026-07-17 21:22
deleteall_awl.cgi	806 B	-rwxr-xr-x	2026-07-17 21:22
deleteone_awl.cgi	560 B	-rwxr-xr-x	2026-07-17 21:22
edit_amavisd.cgi	4.85 KB	-rwxr-xr-x	2026-07-17 21:22
edit_awl.cgi	3.54 KB	-rwxr-xr-x	2026-07-17 21:22
edit_db.cgi	3.17 KB	-rwxr-xr-x	2026-07-17 21:22
edit_header.cgi	4.55 KB	-rwxr-xr-x	2026-07-17 21:22
edit_manual.cgi	1.06 KB	-rwxr-xr-x	2026-07-17 21:22
edit_priv.cgi	1.2 KB	-rwxr-xr-x	2026-07-17 21:22
edit_procmail.cgi	1.87 KB	-rwxr-xr-x	2026-07-17 21:22
edit_report.cgi	4.3 KB	-rwxr-xr-x	2026-07-17 21:22
edit_score.cgi	3.18 KB	-rwxr-xr-x	2026-07-17 21:22
edit_setup.cgi	1.57 KB	-rwxr-xr-x	2026-07-17 21:22
edit_simple.cgi	1.5 KB	-rwxr-xr-x	2026-07-17 21:22
edit_user.cgi	2.82 KB	-rwxr-xr-x	2026-07-17 21:22
edit_white.cgi	4.45 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	4.05 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	423 B	-rwxr-xr-x	2026-07-17 21:17
langs	718 B	-rw-r--r--	2026-07-17 21:17
locales	69 B	-rw-r--r--	2026-07-17 21:17
log_parser.pl	329 B	-rwxr-xr-x	2026-07-17 21:17
module.info	197 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	219 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	226 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	114 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	21 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	36 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	128 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	154 B	-rw-r--r--	2026-07-17 21:17
module.info.de	141 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	21 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	266 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	129 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	216 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	156 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	40 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	163 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	41 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	129 B	-rw-r--r--	2026-07-17 21:17
module.info.it	0 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	149 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	220 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	185 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	138 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	21 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	34 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	121 B	-rw-r--r--	2026-07-17 21:17
module.info.no	35 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	120 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	172 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	158 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	167 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	235 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	170 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	170 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	177 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	253 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	142 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	151 B	-rw-r--r--	2026-07-17 21:17
save_amavisd.cgi	2.54 KB	-rwxr-xr-x	2026-07-17 21:22
save_db.cgi	1.87 KB	-rwxr-xr-x	2026-07-17 21:22
save_header.cgi	3.1 KB	-rwxr-xr-x	2026-07-17 21:22
save_manual.cgi	727 B	-rwxr-xr-x	2026-07-17 21:22
save_priv.cgi	879 B	-rwxr-xr-x	2026-07-17 21:22
save_procmail.cgi	1.75 KB	-rwxr-xr-x	2026-07-17 21:22
save_report.cgi	2.14 KB	-rwxr-xr-x	2026-07-17 21:22
save_score.cgi	2.05 KB	-rwxr-xr-x	2026-07-17 21:22
save_simple.cgi	2.75 KB	-rwxr-xr-x	2026-07-17 21:22
save_user.cgi	1.64 KB	-rwxr-xr-x	2026-07-17 21:22
save_white.cgi	2.1 KB	-rwxr-xr-x	2026-07-17 21:22
setup.cgi	2.71 KB	-rwxr-xr-x	2026-07-17 21:22
spam-amavis-lib.pl	2.72 KB	-rwxr-xr-x	2026-07-17 21:17
spam-lib.pl	30.19 KB	-rwxr-xr-x	2026-07-17 21:17

Rename

#!/usr/bin/perl
# save_report.cgi
# Save report generation options

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

&save_directives($conf, 'clear_report_template',
		$in{'clear_report'} ? [ "" ] : [ ], 1);
$in{'report'} =~ s/\r//g;
@report = split(/\n/, $in{'report'});
&save_directives($conf, 'report', \@report, 1);

&save_directives($conf, 'clear_terse_report_template',
		$in{'clear_terse'} ? [ "" ] : [ ], 1);
$in{'terse'} =~ s/\r//g;
@terse = split(/\n/, $in{'terse'});
&save_directives($conf, 'terse_report', \@terse, 1);

if (&version_atleast(3.0)) {
	foreach $h ("subject", "from", "to") {
		if (!$in{"rewrite_header_${h}_def"}) {
			push(@rheader, { 'name' => 'rewrite_header',
			    'value' => $h." ".$in{"rewrite_header_${h}"} });
			}
		}
	&save_directives($conf, "rewrite_header", \@rheader);
	}
else {
	&parse_yes_no($conf, "rewrite_subject");
	&parse_opt($conf, "subject_tag", undef);
	#&parse_yes_no($conf, "report_header");
	&parse_yes_no($conf, "use_terse_report");
	&parse_yes_no($conf, "spam_level_stars");
	&parse_opt($conf, "spam_level_char", \&char_check);
	}
&parse_yes_no($conf, "fold_headers");
&parse_yes_no($conf, "detailed_phrase_score")
	if (defined($in{'detailed_phrase_score'}));
&parse_yes_no($conf, "defang_mime") if (defined($in{'defang_mime'}));
&parse_option($conf, "report_safe") if (defined($in{'report_safe'}));

if (&version_atleast(2.6)) {
	for($i=0; defined($addfor = $in{"addfor_$i"}); $i++) {
		next if (!$addfor);
		$addheader = $in{"addheader_$i"};
		$addtext = $in{"addtext_$i"};
		$addheader =~ /^\S+$/ ||
			&error(&text('report_eaddheader', $i+1));
		push(@adds, "$addfor $addheader $addtext");
		}
	if (!$in{"spam_level_char_def"} && &char_check($in{"spam_level_char"})) {
		push(@adds, "all Level _STARS(".$in{ "spam_level_char"} .")_" );
		}
	&save_directives($conf, "add_header", \@adds, 1);
	}

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

sub char_check
{
$_[0] =~ /^\S$/ || &error($text{'report_echar'});
}