Gecko [ 122.154.134.11 ]

Name	Size	Permission
images	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
CHANGELOG	855 B	-rw-r--r--
acl_security.pl	1.15 KB	-rwxr-xr-x
backup_config.pl	1.58 KB	-rwxr-xr-x
cgi_args.pl	787 B	-rwxr-xr-x
config	158 B	-rw-r--r--
config-ALL-linux	107 B	-rw-r--r--
config-debian-linux-4.0-ALL	172 B	-rw-r--r--
config-freebsd	176 B	-rw-r--r--
config-gentoo-linux	107 B	-rw-r--r--
config-mandrake-linux-10.3-ALL	107 B	-rw-r--r--
config-netbsd	120 B	-rw-r--r--
config-openbsd	179 B	-rw-r--r--
config-openmamba-linux	113 B	-rw-r--r--
config-solaris-10-ALL	175 B	-rw-r--r--
config-syno-linux	222 B	-rw-r--r--
config.info	425 B	-rw-r--r--
config.info.ca	505 B	-rw-r--r--
config.info.ca.UTF-8	514 B	-rw-r--r--
config.info.cz	220 B	-rw-r--r--
config.info.cz.UTF-8	226 B	-rw-r--r--
config.info.de	475 B	-rw-r--r--
config.info.de.UTF-8	475 B	-rw-r--r--
config.info.es	330 B	-rw-r--r--
config.info.es.UTF-8	330 B	-rw-r--r--
config.info.fa	496 B	-rw-r--r--
config.info.fi	0 B	-rw-r--r--
config.info.fr	481 B	-rw-r--r--
config.info.fr.UTF-8	481 B	-rw-r--r--
config.info.hr	0 B	-rw-r--r--
config.info.hu	383 B	-rw-r--r--
config.info.hu.UTF-8	407 B	-rw-r--r--
config.info.ms_MY	387 B	-rw-r--r--
config.info.ms_MY.UTF-8	387 B	-rw-r--r--
config.info.nl	396 B	-rw-r--r--
config.info.nl.UTF-8	396 B	-rw-r--r--
config.info.no	379 B	-rw-r--r--
config.info.no.UTF-8	379 B	-rw-r--r--
config.info.pl	474 B	-rw-r--r--
config.info.pl.UTF-8	488 B	-rw-r--r--
config.info.ru.UTF-8	308 B	-rw-r--r--
config.info.ru_RU	213 B	-rw-r--r--
config.info.ru_RU.UTF-8	308 B	-rw-r--r--
config.info.ru_SU	213 B	-rw-r--r--
config.info.tr	372 B	-rw-r--r--
config.info.uk_UA	220 B	-rw-r--r--
config.info.uk_UA.UTF-8	310 B	-rw-r--r--
defaultacl	46 B	-rw-r--r--
edit_global.cgi	4.75 KB	-rwxr-xr-x
edit_log.cgi	3.62 KB	-rwxr-xr-x
index.cgi	5.08 KB	-rwxr-xr-x
install_check.pl	492 B	-rwxr-xr-x
log_parser.pl	654 B	-rwxr-xr-x
mass.cgi	1.76 KB	-rwxr-xr-x
module.info	201 B	-rw-r--r--
module.info.ca	155 B	-rw-r--r--
module.info.ca.UTF-8	168 B	-rw-r--r--
module.info.cz	43 B	-rw-r--r--
module.info.cz.UTF-8	52 B	-rw-r--r--
module.info.de	113 B	-rw-r--r--
module.info.de.UTF-8	125 B	-rw-r--r--
module.info.es	60 B	-rw-r--r--
module.info.es.UTF-8	66 B	-rw-r--r--
module.info.fr	45 B	-rw-r--r--
module.info.fr.UTF-8	51 B	-rw-r--r--
module.info.hu	35 B	-rw-r--r--
module.info.hu.UTF-8	43 B	-rw-r--r--
module.info.ms_MY	124 B	-rw-r--r--
module.info.ms_MY.UTF-8	136 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	33 B	-rw-r--r--
module.info.no.UTF-8	39 B	-rw-r--r--
module.info.pl	90 B	-rw-r--r--
module.info.pl.UTF-8	103 B	-rw-r--r--
module.info.ru_RU	41 B	-rw-r--r--
module.info.ru_RU.UTF-8	62 B	-rw-r--r--
module.info.zh_TW.Big5	25 B	-rw-r--r--
save_global.cgi	4.09 KB	-rwxr-xr-x
save_log.cgi	5.33 KB	-rwxr-xr-x
view_log.cgi	1.69 KB	-rwxr-xr-x
webalizer-lib.pl	8.7 KB	-rwxr-xr-x
webalizer.pl	769 B	-rwxr-xr-x

Code Editor : edit_global.cgi

#!/usr/bin/perl
# edit_global.cgi
# Display options from a webalizer.conf file

use strict;
use warnings;
our (%text, %config, %gconfig, %access, $module_name, %in, $remote_user);
require './webalizer-lib.pl';
&ReadParse();
$access{'view'} && &error($text{'edit_ecannot'});

if ($in{'file'}) {
	&can_edit_log($in{'file'}) || &error($text{'edit_ecannot'});
	&ui_print_header(&text('global_for', "<tt>$in{'file'}</tt>"),
			 $text{'global_title2'}, "");
	}
else {
	$access{'global'} || &error($text{'edit_ecannot'});
	&ui_print_header(undef, $text{'global_title'}, "");
	}
my $conf = &get_config($in{'file'});
my $cfile = &config_file_name($in{'file'}) if ($in{'file'});

print &ui_form_start("save_global.cgi", "post");
print &ui_hidden("file", $in{'file'});
print &ui_hidden("type", $in{'type'});
print &ui_hidden("custom", $in{'custom'});
print &ui_table_start($text{'global_header'}, "width=100%", 2);

# Report name
my $report = &find_value("ReportTitle", $conf);
print &ui_table_row($text{'global_report'},
	&ui_opt_textbox("report", $report, 40, $text{'default'}));

if ($in{'file'}) {
	# Hostname for report
	my $host = &find_value("HostName", $conf);
	print &ui_table_row($text{'global_host'},
		&ui_opt_textbox("host", $host, 30, $text{'default'}));
	}

my @page = &find_value("PageType", $conf);
print &ui_table_row($text{'global_page'},
	&ui_textbox("page", join(" ", @page), 60));

my @index = &find_value("IndexAlias", $conf);
print &ui_table_row($text{'global_index'},
	&ui_textbox("index", join(" ", @index), 60));

my $gmt = &find_value("GMTTime", $conf);
print &ui_table_row($text{'global_gmt'},
	&ui_yesno_radio("gmt", $gmt && $gmt =~ /^y/i ? 1 : 0));

my $fold = &find_value("FoldSeqErr", $conf);
print &ui_table_row($text{'global_fold'},
	&ui_yesno_radio("fold", $fold && $fold =~ /^y/i ? 1 : 0));

my $visit = &find_value("VisitTimeout", $conf);
print &ui_table_row($text{'global_visit'},
	&ui_opt_textbox("visit", $visit, 6, $text{'default'})." ".
	$text{'global_secs'});

my $dns = &find_value("DNSChildren", $conf);
print &ui_table_row($text{'global_dns'},
	&ui_opt_textbox("dns", $dns, 6, $text{'global_none'}));

print &ui_table_hr();

my $history = &find_value("HistoryName", $conf);
print &ui_table_row($text{'global_history'},
	&ui_opt_textbox("history", $history, 60, $text{'default'}), 3);

my $current = &find_value("IncrementalName", $conf);
print &ui_table_row($text{'global_current'},
	&ui_opt_textbox("current", $current, 60, $text{'default'}), 3);

my $cache = &find_value("DNSCache", $conf);
print &ui_table_row($text{'global_cache'},
	&ui_opt_textbox("cache", $cache, 60, $text{'default'}), 3);

print &ui_table_hr();

my @grid;
foreach my $g ('DailyGraph', 'DailyStats', 'HourlyGraph',
	       'HourlyStats', 'CountryGraph', 'GraphLegend') {
	my $v = &find_value($g, $conf);
	push(@grid, &ui_checkbox($g, 1, $text{"global_$g"},
				 $v && $v =~ /^n/i ? 0 : 1));
	}
print &ui_table_row($text{'global_display'}, &ui_grid_table(\@grid, 4));

@grid = ( );
foreach my $t ('TopSites', 'TopKSites', 'TopURLs', 'TopKURLs', 'TopReferrers',
	       'TopAgents', 'TopCountries', 'TopEntry', 'TopExit',
	       'TopSearch', 'TopUsers') {
	my $v = &find_value($t, $conf);
	push(@grid, "<b>".$text{'global_'.$t}."</b>");
	push(@grid, &ui_radio($t."_def",
			      !defined($v) || $v eq "" ? 1 : $v eq "0" ? 2 : 0,
			      [ [ 1, $text{'default'} ],
				[ 2, $text{'global_none'} ],
				[ 0, &ui_textbox($t, $v ? $v : "", 4) ] ]));
	}
print &ui_table_row($text{'global_tables'}, &ui_grid_table(\@grid, 4));

@grid = ( );
foreach my $a ('AllSites', 'AllURLs', 'AllReferrers', 'AllAgents',
	       'AllSearchStr', 'AllUsers') {
	my $v = &find_value($a, $conf);
	push(@grid, &ui_checkbox($a, 1, $text{"global_$a"},
				 $v && $v =~ /^y/i ? 1 : 0));
	}
print &ui_table_row($text{'global_all'}, &ui_grid_table(\@grid, 4));

print &ui_table_hr();

foreach my $hid ("HideURL", "HideSite", "HideReferrer",
	         "HideUser", "HideAgent") {
	my @hidv = &find_value($hid, $conf);
	print &ui_table_row($text{'global_'.lc($hid)},
		&ui_textbox(lc($hid), join(" ", @hidv), 60));
	}

print &ui_table_hr();

foreach my $ign ("IgnoreURL", "IgnoreSite", "IgnoreReferrer",
	         "IgnoreUser", "IgnoreAgent") {
	my @ignv = &find_value($ign, $conf);
	print &ui_table_row($text{'global_'.lc($ign)},
		&ui_textbox(lc($ign), join(" ", @ignv), 60));
	}

print &ui_table_hr();

foreach my $inc ("IncludeURL", "IncludeSite", "IncludeReferrer",
	         "IncludeUser", "IncludeAgent") {
	my @incv = &find_value($inc, $conf);
	print &ui_table_row($text{'global_'.lc($inc)},
                &ui_textbox(lc($inc), join(" ", @incv), 60));
	}

print &ui_table_end();
my @b;
push(@b, [ undef, $text{'save'} ]);
push(@b, [ 'delete', $text{'global_delete'} ]) if ($in{'file'} && -r $cfile);
print &ui_form_end(\@b);

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

${this.title}

Code Editor : edit_global.cgi