Gecko [ 122.154.134.11 ]

Name	Size	Permission
images	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
CHANGELOG	468 B	-rw-r--r--
acl_security.pl	1.63 KB	-rwxr-xr-x
backup_config.pl	838 B	-rwxr-xr-x
cgi_args.pl	696 B	-rwxr-xr-x
check.cgi	1.54 KB	-rwxr-xr-x
check.pl	2.47 KB	-rwxr-xr-x
config	113 B	-rw-r--r--
config-cobalt-linux	113 B	-rw-r--r--
config-coherent-linux	113 B	-rw-r--r--
config-corel-linux	113 B	-rw-r--r--
config-debian-linux	113 B	-rw-r--r--
config-gentoo-linux	113 B	-rw-r--r--
config-mandrake-linux	113 B	-rw-r--r--
config-msc-linux	113 B	-rw-r--r--
config-open-linux	113 B	-rw-r--r--
config-openmamba-linux	113 B	-rw-r--r--
config-redhat-linux	113 B	-rw-r--r--
config-slackware-linux	113 B	-rw-r--r--
config-sol-linux	113 B	-rw-r--r--
config-suse-linux	113 B	-rw-r--r--
config-syno-linux	137 B	-rw-r--r--
config-trustix-linux	113 B	-rw-r--r--
config-turbo-linux	113 B	-rw-r--r--
config-united-linux	113 B	-rw-r--r--
config.info	603 B	-rw-r--r--
config.info.bg	745 B	-rw-r--r--
config.info.bg.UTF-8	1.14 KB	-rw-r--r--
config.info.ca	697 B	-rw-r--r--
config.info.ca.UTF-8	705 B	-rw-r--r--
config.info.cz	364 B	-rw-r--r--
config.info.cz.UTF-8	386 B	-rw-r--r--
config.info.de	730 B	-rw-r--r--
config.info.de.UTF-8	730 B	-rw-r--r--
config.info.es	276 B	-rw-r--r--
config.info.es.UTF-8	277 B	-rw-r--r--
config.info.it	746 B	-rw-r--r--
config.info.it.UTF-8	746 B	-rw-r--r--
config.info.nl	707 B	-rw-r--r--
config.info.nl.UTF-8	707 B	-rw-r--r--
config.info.no	667 B	-rw-r--r--
config.info.no.UTF-8	667 B	-rw-r--r--
config.info.pl	757 B	-rw-r--r--
config.info.pl.UTF-8	777 B	-rw-r--r--
config.info.ru.UTF-8	544 B	-rw-r--r--
config.info.ru_RU	360 B	-rw-r--r--
config.info.ru_RU.UTF-8	544 B	-rw-r--r--
config.info.ru_SU	360 B	-rw-r--r--
config.info.uk_UA	370 B	-rw-r--r--
config.info.uk_UA.UTF-8	544 B	-rw-r--r--
config.info.zh_TW.Big5	223 B	-rw-r--r--
config.info.zh_TW.UTF-8	265 B	-rw-r--r--
defaultacl	41 B	-rw-r--r--
edit_cron.cgi	1.95 KB	-rwxr-xr-x
edit_global.cgi	2.72 KB	-rwxr-xr-x
edit_poll.cgi	7.16 KB	-rwxr-xr-x
edit_user.cgi	549 B	-rwxr-xr-x
feedback_files.pl	266 B	-rwxr-xr-x
fetchmail-lib.pl	8.02 KB	-rwxr-xr-x
index.cgi	4.63 KB	-rwxr-xr-x
install_check.pl	355 B	-rwxr-xr-x
log_parser.pl	1.35 KB	-rwxr-xr-x
module.info	213 B	-rw-r--r--
module.info.ca	152 B	-rw-r--r--
module.info.ca.UTF-8	165 B	-rw-r--r--
module.info.cz	40 B	-rw-r--r--
module.info.cz.UTF-8	50 B	-rw-r--r--
module.info.de	152 B	-rw-r--r--
module.info.de.UTF-8	164 B	-rw-r--r--
module.info.es	39 B	-rw-r--r--
module.info.es.UTF-8	45 B	-rw-r--r--
module.info.hu	124 B	-rw-r--r--
module.info.hu.UTF-8	145 B	-rw-r--r--
module.info.it	39 B	-rw-r--r--
module.info.it.UTF-8	45 B	-rw-r--r--
module.info.ja_JP.UTF-8	43 B	-rw-r--r--
module.info.ja_JP.euc	36 B	-rw-r--r--
module.info.ko_KR.UTF-8	42 B	-rw-r--r--
module.info.ko_KR.euc	36 B	-rw-r--r--
module.info.ms_MY	144 B	-rw-r--r--
module.info.ms_MY.UTF-8	156 B	-rw-r--r--
module.info.nl	34 B	-rw-r--r--
module.info.nl.UTF-8	40 B	-rw-r--r--
module.info.no	32 B	-rw-r--r--
module.info.no.UTF-8	38 B	-rw-r--r--
module.info.pl	150 B	-rw-r--r--
module.info.pl.UTF-8	163 B	-rw-r--r--
module.info.ru.UTF-8	50 B	-rw-r--r--
module.info.ru_RU	35 B	-rw-r--r--
module.info.ru_RU.UTF-8	53 B	-rw-r--r--
module.info.ru_SU	35 B	-rw-r--r--
module.info.zh_TW.Big5	34 B	-rw-r--r--
save_cron.cgi	1.73 KB	-rwxr-xr-x
save_global.cgi	1.53 KB	-rwxr-xr-x
save_poll.cgi	3.33 KB	-rwxr-xr-x
start.cgi	1015 B	-rwxr-xr-x
stop.cgi	730 B	-rwxr-xr-x

Code Editor : index.cgi

#!/usr/bin/perl
# index.cgi
# Show fetchmail configurations

require './fetchmail-lib.pl';

# Check if fetchmail is installed
if (!&has_command($config{'fetchmail_path'})) {
	&ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1, 0,
		&help_search_link("fetchmail", "doc", "man", "google"));
	print "<p>",&text('index_efetchmail',
			  "<tt>$config{'fetchmail_path'}</tt>",
			  "$gconfig{'webprefix'}/config.cgi?$module_name"),"<p>\n";
	&ui_print_footer("/", $text{'index'});
	exit;
	}

# Get and show the version
$ver = &get_fetchmail_version();
&ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1, 0,
	&help_search_link("fetchmail", "doc", "man", "google"), undef, undef,
	&text('index_version', $ver));

if ($config{'config_file'}) {
	# Just read one config file
	@conf = &parse_config_file($config{'config_file'});
	@conf = grep { $_->{'poll'} } @conf;
	print "<b>",&text('index_file',
			  "<tt>$config{'config_file'}</tt>"),"</b><p>\n";
	&show_polls(\@conf, $config{'config_file'}, $config{'daemon_user'});

local @uinfo = getpwnam($config{'daemon_user'});
	print &ui_hr();
	print "<table width=100%>\n";

if (&foreign_installed("cron") && $access{'cron'}) {
		# Show button to manage cron job
		print "<form action=edit_cron.cgi>\n";
		print "<tr> <td><input type=submit ",
		      "value='$text{'index_cron'}'></td>\n";
		print "<td>$text{'index_crondesc'}</td> </tr></form>\n";
		}

# Show the fetchmail daemon form
	foreach $pf ($config{'pid_file'},
		     "$uinfo[7]/.fetchmail.pid", "$uinfo[7]/.fetchmail") {
		if (open(PID, $pf) && ($line=<PID>) &&
		    (($pid,$interval) = split(/\s+/, $line)) && $pid &&
		    kill(0, $pid)) {
			$running++;
			last;
			}
		}
	print "<tr><td>\n";
	if ($running) {
		# daemon is running - offer to stop it
		print "<form action=stop.cgi>\n";
		print "<input type=submit value='$text{'index_stop'}'></td>\n";
		print "<td>",&text('index_stopmsg',
				   "<tt>$config{'daemon_user'}</tt>",
				   $interval),"</td>\n";
		}
	else {
		# daemon isn't running - offer to start it
		print "<form action=start.cgi>\n";
		print "<input type=submit value='$text{'index_start'}'></td>\n";
		print "<td>",&text('index_startmsg',
				   "<input name=interval size=5 value='60'>",
				   "<tt>$config{'daemon_user'}</tt>"),"</td>\n";
		}
	print "</td></tr></table></form>\n";
	}
else {
	# Build a list of users with fetchmail configurations
	$ucount = 0;
	setpwent();
	while(@uinfo = getpwent()) {
		next if ($donehome{$uinfo[7]}++);
		next if (!&can_edit_user($uinfo[0]));
		local @conf = &parse_config_file("$uinfo[7]/.fetchmailrc");
		@conf = grep { $_->{'poll'} } @conf;
		if (@conf) {
			push(@users, [ \@conf, [ @uinfo ] ]);
			}
		$ucount++;
		last if ($config{'max_users'} &&
			 $ucount > $config{'max_users'});
		}
	endpwent() if ($gconfig{'os_type'} ne 'hpux');
	@users = sort { $a->[1]->[0] cmp $b->[1]->[0] } @users;
	if (!@users) {
		# None found
		print "<br><b>$text{'index_none'}</b><p>\n";
		}
	elsif ($config{'max_users'} && $ucount > $config{'max_users'}) {
		# Show user search form
		print "$text{'index_toomany'}<p>\n";
		print &ui_form_start("edit_user.cgi");
		print "<b>$text{'index_search'}</b>\n";
		print &ui_user_textbox("user", undef, 20),"\n";
		print &ui_submit($text{'index_show'}),"\n";
		print &ui_form_end();
		$toomany = 1;
		}
	elsif (!$config{'view_mode'}) {
		# Full details
		&show_button();
		print "<table border width=100%>\n";
		print "<tr $tb> <td><b>$text{'index_user'}</b></td> <td><b>$text{'index_conf'}</b></td> </tr>\n";
		foreach $u (@users) {
			print "<tr $cb>\n";
			print "<td valign=top><b>",&html_escape($u->[1]->[0]),
			      "</b></td> <td>\n";
			&show_polls($u->[0], "$u->[1]->[7]/.fetchmailrc",
				    $u->[1]->[0]);
			print "</td> </tr>\n";
			}
		print "</table>\n";
		}
	else {
		# Just show usernames
		print &ui_table_start($text{'index_header'}, "width=100%", 1);
		$i = 0;
		foreach $u (@users) {
			print "<tr>\n" if ($i%4 == 0);
			print &ui_link("edit_user.cgi?user=$u->[1]->[0]","$u->[1]->[0]")."</td>\n";
			print "</tr>\n" if ($i%4 == 3);
			$i++;
			}
		print &ui_table_end();
		}
	&show_button() if (!$toomany);

if (&foreign_installed("cron") && $access{'cron'}) {
		# Show button to manage global cron job
		print &ui_hr();
		print &ui_buttons_start();
		print &ui_buttons_row("edit_cron.cgi",
				      $text{'index_cron'}, $text{'index_crondesc2'});
		print &ui_buttons_end();
		}
	}

&ui_print_footer("/", $text{'index'});

sub show_button
{
if ($access{'mode'} != 3 || !$doneheader) {
	print "<form action=edit_poll.cgi>\n";
	print "<input type=hidden name=new value=1>\n";
	print "<input type=submit value='$text{'index_ok'}'>\n";
	print &unix_user_input("user");
	print "</form>\n";
	}
}

${this.title}

Code Editor : index.cgi