Gecko [ www.thearyasamaj.org ]

Name	Size	Permission
help	[ DIR ]	drwxr-xr-x
images	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
CHANGELOG	528 B	-rw-r--r--
backup_config.pl	630 B	-rwxr-xr-x
cgi_args.pl	221 B	-rwxr-xr-x
config	67 B	-rw-r--r--
config-ALL-linux	67 B	-rw-r--r--
config-debian-linux	93 B	-rw-r--r--
config-freebsd	142 B	-rw-r--r--
config-open-linux	71 B	-rw-r--r--
config-redhat-linux	93 B	-rw-r--r--
config-solaris-10-ALL	132 B	-rw-r--r--
config-syno-linux	67 B	-rw-r--r--
config.info	288 B	-rw-r--r--
config.info.ca	358 B	-rw-r--r--
config.info.cs	342 B	-rw-r--r--
config.info.de	345 B	-rw-r--r--
config.info.es	272 B	-rw-r--r--
config.info.fr	390 B	-rw-r--r--
config.info.hu	0 B	-rw-r--r--
config.info.ja	398 B	-rw-r--r--
config.info.ko	276 B	-rw-r--r--
config.info.nl	321 B	-rw-r--r--
config.info.no	325 B	-rw-r--r--
config.info.pl	334 B	-rw-r--r--
config.info.sk	356 B	-rw-r--r--
config.info.tr	288 B	-rw-r--r--
delete_logs.cgi	642 B	-rwxr-xr-x
edit_log.cgi	7.12 KB	-rwxr-xr-x
edit_sched.cgi	1.4 KB	-rwxr-xr-x
force.cgi	619 B	-rwxr-xr-x
index.cgi	3.34 KB	-rwxr-xr-x
install_check.pl	331 B	-rwxr-xr-x
log_parser.pl	605 B	-rwxr-xr-x
logrotate-lib.pl	9.36 KB	-rwxr-xr-x
module.info	203 B	-rw-r--r--
module.info.af	0 B	-rw-r--r--
module.info.af.auto	132 B	-rw-r--r--
module.info.ar	0 B	-rw-r--r--
module.info.ar.auto	186 B	-rw-r--r--
module.info.be	0 B	-rw-r--r--
module.info.be.auto	226 B	-rw-r--r--
module.info.bg	0 B	-rw-r--r--
module.info.bg.auto	223 B	-rw-r--r--
module.info.ca	145 B	-rw-r--r--
module.info.ca.auto	17 B	-rw-r--r--
module.info.cs	32 B	-rw-r--r--
module.info.cs.auto	114 B	-rw-r--r--
module.info.da	0 B	-rw-r--r--
module.info.da.auto	133 B	-rw-r--r--
module.info.de	126 B	-rw-r--r--
module.info.de.auto	18 B	-rw-r--r--
module.info.el	0 B	-rw-r--r--
module.info.el.auto	256 B	-rw-r--r--
module.info.es	40 B	-rw-r--r--
module.info.es.auto	120 B	-rw-r--r--
module.info.eu	0 B	-rw-r--r--
module.info.eu.auto	163 B	-rw-r--r--
module.info.fa	0 B	-rw-r--r--
module.info.fa.auto	179 B	-rw-r--r--
module.info.fi	0 B	-rw-r--r--
module.info.fi.auto	139 B	-rw-r--r--
module.info.fr	36 B	-rw-r--r--
module.info.fr.auto	120 B	-rw-r--r--
module.info.he	0 B	-rw-r--r--
module.info.he.auto	195 B	-rw-r--r--
module.info.hr	0 B	-rw-r--r--
module.info.hr.auto	141 B	-rw-r--r--
module.info.hu	45 B	-rw-r--r--
module.info.hu.auto	125 B	-rw-r--r--
module.info.it	0 B	-rw-r--r--
module.info.it.auto	152 B	-rw-r--r--
module.info.ja	0 B	-rw-r--r--
module.info.ja.auto	210 B	-rw-r--r--
module.info.ko	29 B	-rw-r--r--
module.info.ko.auto	127 B	-rw-r--r--
module.info.lt	0 B	-rw-r--r--
module.info.lt.auto	164 B	-rw-r--r--
module.info.lv	0 B	-rw-r--r--
module.info.lv.auto	147 B	-rw-r--r--
module.info.ms	119 B	-rw-r--r--
module.info.ms.auto	18 B	-rw-r--r--
module.info.mt	0 B	-rw-r--r--
module.info.mt.auto	142 B	-rw-r--r--
module.info.nl	25 B	-rw-r--r--
module.info.nl.auto	112 B	-rw-r--r--
module.info.no	25 B	-rw-r--r--
module.info.no.auto	109 B	-rw-r--r--
module.info.pl	115 B	-rw-r--r--
module.info.pl.auto	18 B	-rw-r--r--
module.info.pt	0 B	-rw-r--r--
module.info.pt.auto	151 B	-rw-r--r--
module.info.pt_BR	0 B	-rw-r--r--
module.info.pt_BR.auto	160 B	-rw-r--r--
module.info.ro	0 B	-rw-r--r--
module.info.ro.auto	163 B	-rw-r--r--
module.info.ru	0 B	-rw-r--r--
module.info.ru.auto	213 B	-rw-r--r--
module.info.sk	44 B	-rw-r--r--
module.info.sk.auto	130 B	-rw-r--r--
module.info.sl	0 B	-rw-r--r--
module.info.sl.auto	143 B	-rw-r--r--
module.info.sv	0 B	-rw-r--r--
module.info.sv.auto	137 B	-rw-r--r--
module.info.th	0 B	-rw-r--r--
module.info.th.auto	241 B	-rw-r--r--
module.info.tr	0 B	-rw-r--r--
module.info.tr.auto	162 B	-rw-r--r--
module.info.uk	0 B	-rw-r--r--
module.info.uk.auto	226 B	-rw-r--r--
module.info.ur	0 B	-rw-r--r--
module.info.ur.auto	218 B	-rw-r--r--
module.info.vi	0 B	-rw-r--r--
module.info.vi.auto	169 B	-rw-r--r--
module.info.zh	0 B	-rw-r--r--
module.info.zh.auto	129 B	-rw-r--r--
module.info.zh_TW	0 B	-rw-r--r--
module.info.zh_TW.auto	138 B	-rw-r--r--
prefs.info	18 B	-rw-r--r--
save_log.cgi	6.03 KB	-rwxr-xr-x
save_sched.cgi	936 B	-rwxr-xr-x

Code Editor : edit_log.cgi

#!/usr/bin/perl
# edit_log.cgi
# Show a form for creating or editing a log

require './logrotate-lib.pl';
&ReadParse();
$conf = &get_config();
if ($in{'global'}) {
	&ui_print_header(undef, $text{'global_title'}, "", "global");
	$lconf = $conf;
	}
elsif ($in{'new'}) {
	&ui_print_header(undef, $text{'edit_title2'}, "", "create");
	$log = $conf->[$in{'clone'}], $lconf = $log->{'members'}
	    if ($in{'clone'});
	}
else {
	&ui_print_header(undef, $text{'edit_title1'}, "", "edit");
	$log = $conf->[$in{'idx'}];
	$lconf = $log->{'members'};
	}

print &ui_form_start("save_log.cgi", "post");
print &ui_hidden("new", $in{'new'}),"\n";
print &ui_hidden("idx", $in{'idx'}),"\n";
print &ui_hidden("global", $in{'global'}),"\n";

if (!$in{'global'}) {
	print &ui_table_start($text{'edit_header'}, "width=100%", 2);
	print &ui_table_row($text{'edit_file'},
			    &ui_textarea("file",
				join("\n", @{$log->{'name'}}), 3, 60)." ".
			    &file_chooser_button("file"));
	}
else {
	print &ui_table_start($text{'global_header'}, "width=100%", 2);
	}

$period = &get_period($lconf);
$defperiod = &get_period($conf) if (!$in{'global'});
$dptext = $text{"period_".$defperiod} || $text{'period_never'};
print &ui_table_row($text{'edit_sched'},
		    &ui_select("sched", $period,
				[ [ '', &deftext($dptext)  ],
				  [ 'daily', $text{'period_daily'} ],
				  [ 'weekly', $text{'period_weekly'} ],
				  [ 'monthly', $text{'period_monthly'} ] ]));

$size = &find_value("size", $lconf);
print &ui_table_row($text{'edit_size'},
		    &ui_opt_textbox("size", $size, 10,
				    &deftext(&find_default("size") ||
					     $text{'period_never'})).
		    " ".$text{'period_bytes'});

$minsize = &find_value("minsize", $lconf);
print &ui_table_row($text{'edit_minsize'},
		    &ui_opt_textbox("minsize", $minsize, 10,
				    &deftext(&find_default("minsize") ||
					     $text{'edit_nominsize'})).
		    " ".$text{'period_bytes'});

print &ui_table_hr();

$rotate = &find_value("rotate", $lconf);
print &ui_table_row($text{'edit_rotate'},
		    &ui_opt_textbox("rotate", $rotate, 5,
				    &deftext(&find_default("rotate"))));

&yesno_option("compress", "nocompress", $lconf);
&yesno_option("delaycompress", "nodelaycompress", $lconf);
&yesno_option("copytruncate", "nocopytruncate", $lconf);
&yesno_option("ifempty", "notifempty", $lconf);
&yesno_option("missingok", "nomissingok", $lconf);

print &ui_table_hr();

$create = &find_value("create", $lconf);
$nocreate = &find("nocreate", $lconf);
($mode, $user, $group) = split(/\s+/, $create);
$dcr = &find_default("create");
@crinputs = ( "createmode", "createuser", "creategroup" );
print &ui_table_row($text{'edit_create'},
 &ui_radio("create", defined($create) ? 2 : $nocreate ? 1 : 0,
	 [ [ 2, &text('edit_createas',
		 &ui_textbox("createmode", $mode, 4, !defined($create)),
		 &ui_user_textbox("createuser", $user, 0,
				 !defined($create)),
		 &ui_group_textbox("creategroup", $group, 0,
				 !defined($create)))." ",
		 &js_disable_inputs([ ], \@crinputs, "onClick") ],
		[ 1, $text{'edit_createno'}." ",
		 &js_disable_inputs(\@crinputs, [ ], "onClick") ],
		[ 0, &deftext($dcr ne '' ? $dcr :
		 defined($dcr) ? $text{'edit_createsame'} :
				$text{'edit_createno'}),
		 &js_disable_inputs(\@crinputs, [ ], "onClick") ] ]));

$olddir = &find_value("olddir", $lconf);
$noolddir = &find("noolddir", $lconf);
print &ui_table_row($text{'edit_olddir'},
 &ui_radio("olddir", $olddir ? 2 : $noolddir ? 1 : 0,
	 [ [ 2, $text{'edit_olddirto'}." ".
		 &ui_textbox("olddirto", $olddir, 30, !$olddir)." ".
		 &file_chooser_button("olddirto", 1)." ",
		 &js_disable_inputs([ ], [ "olddirto" ], "onClick") ],
		[ 1, $text{'edit_olddirsame'}." ",
		 &js_disable_inputs([ "olddirto" ], [ ], "onClick") ],
		[ 0, &deftext(&find_default("olddir") ||
			 $text{'edit_olddirsame'}),
		 &js_disable_inputs([ "olddirto" ], [ ], "onClick") ] ]));

$ext = &find_value("extension", $lconf);
print &ui_table_row($text{'edit_ext'},
    &ui_opt_textbox("ext", $ext, 10,
		    &deftext(&find_default("ext"))));

&yesno_option("dateext", "nodateext", $lconf);

print &ui_table_hr();

$mail = &find_value("mail", $lconf);
$nomail = &find("nomail", $lconf);
$mmode = $mail ? 2 : $nomail ? 1 : 0;
print &ui_table_row($text{'edit_mail'},
	 &ui_radio("mail", $mmode,
		 [ [ 2, $text{'edit_mailto'}." ".
			 &ui_textbox("mailto", $mail, 30, $mmode != 2).
			 " ",
			 &js_disable_inputs([ ], [ "mailto" ], "onClick") ],
			[ 1, $text{'edit_mailno'}." ",
			 &js_disable_inputs([ "mailto" ], [ ], "onClick") ],
			[ 0, &deftext(&find_default("mail") ||
				 $text{'edit_mailno'}),
			 &js_disable_inputs([ "mailto" ], [ ], "onClick") ] ]));

$mailfirst = &find("mailfirst", $lconf);
$maillast = &find("maillast", $lconf);
print &ui_table_row($text{'edit_mailfl'},
		 &ui_radio("mailfirst", $mailfirst ? 2 : $maillast ? 1 : 0,
			 [ [ 2, $text{'edit_mailfirst'}." " ],
				[ 1, $text{'edit_maillast'}." " ],
				[ 0, &deftext(defined(
					&find_default("mailfirst")) ?
						$text{'edit_mailfirst'} :
						$text{'edit_maillast'}) ] ]));

if (&compare_version_numbers(&get_logrotate_version(), 3.6) < 0) {
	$errors = &find_value("errors", $lconf);
	print &ui_table_row($text{'edit_errors'},
			 &ui_opt_textbox("errors", $errors, 30,
				 &deftext(&find_default("errors") ||
					 $text{'edit_errorsno'})." ",
				 $text{'edit_errorsto'}));
	}

print &ui_table_hr();

$pre = &find_value("prerotate", $lconf);
print &ui_table_row($text{'edit_pre'},
		    &ui_textarea("pre", $pre, 3, 60));

$post = &find_value("postrotate", $lconf);
print &ui_table_row($text{'edit_post'},
		    &ui_textarea("post", $post, 3, 60));

if (&compare_version_numbers(&get_logrotate_version(), 3.4) >= 0) {
	&yesno_option("sharedscripts", "nosharedscripts", $lconf);
	}

print &ui_table_end();
if ($in{'global'}) {
	print &ui_form_end([ [ 'save', $text{'save'} ] ], "100%");
	}
elsif ($in{'new'}) {
	print &ui_form_end([ [ 'create', $text{'create'} ] ], "100%");
	}
else {
	print &ui_form_end([ [ 'save', $text{'save'} ],
			     [ 'now', $text{'edit_now'} ],
			     [ 'delete', $text{'delete'} ] ], "100%");

print &ui_form_start("edit_log.cgi",
	    undef, undef, undef, 'ui_form ui_table_end_submit_right');
	print &ui_hidden("clone", $in{'idx'});
	print &ui_hidden("new", 1);
	print &ui_submit($text{'edit_clone'});
	print &ui_form_end();
	}

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

# yesno_option(name1, name2, &conf)
sub yesno_option
{
local $y = &find($_[0], $_[2]);
local $n = &find($_[1], $_[2]);
local $yd = &find_default($_[0]);
local $nd = &find_default($_[1]);
print &ui_table_row($text{'edit_'.$_[0]},
		    &ui_radio($_[0], $y ? 2 : $n ? 1 : 0,
			      [ [ 2, $text{'yes'} ],
			 	[ 1, $text{'no'} ],
			 	[ 0, &deftext(defined($yd) ? $text{'yes'} : $text{'no'}) ] ]), 1);
}

# find_default(name, [global])
sub find_default
{
if ($in{'global'} || $_[1]) {
	# Return global hard-coded default
	return $global_default{$_[0]};
	}
else {
	# Look at global first
	local $rv = &find_value($_[0], $conf);
	return $rv if (defined($rv));
	return &find_default($_[0], 1);
	}
}

sub deftext
{
return $_[0] ? &text('edit_default', $_[0]) : $text{'default'};
}

${this.title}

Code Editor : edit_log.cgi