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.19 KB	-rw-r--r--	2026-07-17 21:17
autoreply.pl	12.68 KB	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	826 B	-rwxr-xr-x	2026-07-17 21:17
boxes-lib.pl	85.02 KB	-rwxr-xr-x	2026-07-17 21:17
config	218 B	-rw-r--r--	2026-07-17 21:17
config-sol-linux	221 B	-rw-r--r--	2026-07-17 21:17
config.info	1.15 KB	-rw-r--r--	2026-07-17 21:17
config.info.ca	1.28 KB	-rw-r--r--	2026-07-17 21:17
config.info.cs	877 B	-rw-r--r--	2026-07-17 21:17
config.info.de	1.34 KB	-rw-r--r--	2026-07-17 21:17
config.info.es	282 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	1.32 KB	-rw-r--r--	2026-07-17 21:17
config.info.no	1.21 KB	-rw-r--r--	2026-07-17 21:17
config.info.ru	1.38 KB	-rw-r--r--	2026-07-17 21:17
config.info.uk	1.41 KB	-rw-r--r--	2026-07-17 21:17
delete_aliases.cgi	347 B	-rwxr-xr-x	2026-07-17 21:22
delete_assigns.cgi	422 B	-rwxr-xr-x	2026-07-17 21:22
delete_queue.cgi	576 B	-rwxr-xr-x	2026-07-17 21:22
delete_queues.cgi	1.02 KB	-rwxr-xr-x	2026-07-17 21:22
delete_routes.cgi	410 B	-rwxr-xr-x	2026-07-17 21:22
delete_virts.cgi	404 B	-rwxr-xr-x	2026-07-17 21:22
detach_queue.cgi	425 B	-rwxr-xr-x	2026-07-17 21:22
edit_afile.cgi	1.06 KB	-rwxr-xr-x	2026-07-17 21:22
edit_alias.cgi	267 B	-rwxr-xr-x	2026-07-17 21:22
edit_assign.cgi	302 B	-rwxr-xr-x	2026-07-17 21:22
edit_ffile.cgi	2.03 KB	-rwxr-xr-x	2026-07-17 21:22
edit_rfile.cgi	3.04 KB	-rwxr-xr-x	2026-07-17 21:22
edit_route.cgi	286 B	-rwxr-xr-x	2026-07-17 21:22
edit_virt.cgi	279 B	-rwxr-xr-x	2026-07-17 21:22
feedback_files.pl	120 B	-rwxr-xr-x	2026-07-17 21:17
filter.pl	1.53 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	2.32 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	382 B	-rwxr-xr-x	2026-07-17 21:17
list_aliases.cgi	2.53 KB	-rwxr-xr-x	2026-07-17 21:22
list_assigns.cgi	2.06 KB	-rwxr-xr-x	2026-07-17 21:22
list_bads.cgi	718 B	-rwxr-xr-x	2026-07-17 21:22
list_locals.cgi	1 KB	-rwxr-xr-x	2026-07-17 21:22
list_opts.cgi	3.24 KB	-rwxr-xr-x	2026-07-17 21:22
list_percents.cgi	760 B	-rwxr-xr-x	2026-07-17 21:22
list_queue.cgi	2.55 KB	-rwxr-xr-x	2026-07-17 21:22
list_rcpts.cgi	1.27 KB	-rwxr-xr-x	2026-07-17 21:22
list_routes.cgi	2.65 KB	-rwxr-xr-x	2026-07-17 21:22
list_virts.cgi	2.1 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	1.48 KB	-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	144 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	181 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	124 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	26 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	119 B	-rw-r--r--	2026-07-17 21:17
module.info.de	113 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	14 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	253 B	-rw-r--r--	2026-07-17 21:17
module.info.es	32 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	105 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	134 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	165 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	128 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	146 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	151 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	28 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	109 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	129 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	144 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	134 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	123 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	14 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	27 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	102 B	-rw-r--r--	2026-07-17 21:17
module.info.no	28 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	93 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	125 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	141 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	150 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	33 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	143 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	136 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	121 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	137 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	197 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	130 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	139 B	-rw-r--r--	2026-07-17 21:17
prefs.info	80 B	-rw-r--r--	2026-07-17 21:17
qmail-lib.pl	20.75 KB	-rwxr-xr-x	2026-07-17 21:17
save_afile.cgi	563 B	-rwxr-xr-x	2026-07-17 21:22
save_alias.cgi	2.29 KB	-rwxr-xr-x	2026-07-17 21:22
save_assign.cgi	1.38 KB	-rwxr-xr-x	2026-07-17 21:22
save_bads.cgi	345 B	-rwxr-xr-x	2026-07-17 21:22
save_defroute.cgi	648 B	-rwxr-xr-x	2026-07-17 21:22
save_ffile.cgi	843 B	-rwxr-xr-x	2026-07-17 21:22
save_locals.cgi	372 B	-rwxr-xr-x	2026-07-17 21:22
save_opts.cgi	1.5 KB	-rwxr-xr-x	2026-07-17 21:22
save_percents.cgi	364 B	-rwxr-xr-x	2026-07-17 21:22
save_rcpts.cgi	615 B	-rwxr-xr-x	2026-07-17 21:22
save_rfile.cgi	1.26 KB	-rwxr-xr-x	2026-07-17 21:22
save_route.cgi	992 B	-rwxr-xr-x	2026-07-17 21:22
save_virt.cgi	1.64 KB	-rwxr-xr-x	2026-07-17 21:22
start.cgi	187 B	-rwxr-xr-x	2026-07-17 21:22
stop.cgi	183 B	-rwxr-xr-x	2026-07-17 21:22
view_queue.cgi	2.23 KB	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# edit_rfile.cgi
# Display the contents of an autoreply file

require (-r 'sendmail-lib.pl' ? './sendmail-lib.pl' :
	 -r 'qmail-lib.pl' ? './qmail-lib.pl' :
			     './postfix-lib.pl');
&ReadParse();
if (!&is_under_directory($access{'apath'}, $in{'file'})) {
	&error(&text('rfile_efile', $in{'file'}));
	}

&ui_print_header(undef, $text{'rfile_title'}, "");
&open_readfile(FILE, $in{'file'});
while(<FILE>) {
	if (/^Reply-Tracking:\s*(.*)/) {
		$replies = $1;
		}
	elsif (/^Reply-Period:\s*(.*)/) {
		$period = $1;
		}
	elsif (/^No-Autoreply:\s*(.*)/) {
		$no_autoreply = $1;
		}
	elsif (/^No-Autoreply-Regexp:\s*(.*)/) {
		push(@no_regexp, $1);
		}
	elsif (/^From:\s*(.*)/) {
		$from = $1;
		}
	else {
		push(@lines, $_);
		}
	}
close(FILE);

print &text('rfile_desc', "<tt>$in{'file'}</tt>"),"<p>\n";
print "$text{'rfile_desc2'}<p>\n";

print "<form action=save_rfile.cgi method=post enctype=multipart/form-data>\n";
print "<input type=hidden name=file value=\"$in{'file'}\">\n";
print "<input type=hidden name=num value=\"$in{'num'}\">\n";
print "<input type=hidden name=name value=\"$in{'name'}\">\n";
print "<textarea name=text rows=20 cols=80 $config{'wrap_mode'}>",
	join("", @lines),"</textarea>\n";

print "<table>\n";

# Show From: address
print "<tr> <td>$text{'rfile_from'}</td>\n";
printf "<td><input type=radio name=from_def value=1 %s> %s\n",
	$from eq '' ? "checked" : "", $text{'rfile_auto'};
printf "<input type=radio name=from_def value=0 %s>\n",
	$from eq '' ? "" :"checked";
printf "<input name=from size=30 value='%s'></td> </tr>\n",
	$from;
print "<tr> <td></td> <td><font size=-1>$text{'rfile_fromdesc'}</font></td> </tr>\n";

# Show reply-tracking file
print "<tr> <td>$text{'rfile_replies'}</td>\n";
printf "<td><input type=radio name=replies_def value=1 %s> %s\n",
	$replies eq '' ? "checked" : "", $text{'rfile_none'};
printf "<input type=radio name=replies_def value=0 %s> %s\n",
	$replies eq '' ? "" :"checked", $text{'rfile_file'};
printf "<input name=replies size=30 value='%s'> %s</td> </tr>\n",
	$replies, &file_chooser_button("replies");
print "&nbsp;" x 3;

# Show reply-tracking period
print "<tr> <td>&nbsp;&nbsp;&nbsp;$text{'rfile_period'}</td>\n";
printf "<td><input type=radio name=period_def value=1 %s> %s\n",
	$period eq '' ? "checked" : "", $text{'rfile_default'};
printf "<input type=radio name=period_def value=0 %s>\n",
	$period eq '' ? "" :"checked";
printf "<input name=period size=5 value='%s'> %s</td> </tr>\n",
	$period, $text{'rfile_secs'};

# Show people to not autoreply to
print "<tr> <td>$text{'rfile_no_autoreply'}</td>\n";
printf "<td><input name=no_autoreply size=40 value='%s'></td> </tr>\n",
	$no_autoreply;

# Show regexps to not autoreply to
print "<tr> <td>$text{'rfile_no_regexp'}</td>\n";
print "<td>",&ui_textarea("no_regexp", join("\n", @no_regexp), 3, 40),"</td> </tr>\n";

print "</table>\n";

print "<input type=submit value=\"$text{'save'}\"> ",
      "<input type=reset value=\"$text{'rfile_undo'}\">\n";
print "</form>\n";

&ui_print_footer("edit_alias.cgi?name=$in{'name'}&num=$in{'num'}", $text{'aform_return'});