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	110 B	-rw-r--r--	2026-07-17 21:17
atboot.cgi	919 B	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	771 B	-rwxr-xr-x	2026-07-17 21:17
config	100 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	118 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux	118 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	100 B	-rw-r--r--	2026-07-17 21:17
config.info	196 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	249 B	-rw-r--r--	2026-07-17 21:17
config.info.de	202 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	231 B	-rw-r--r--	2026-07-17 21:17
config.info.ms	201 B	-rw-r--r--	2026-07-17 21:17
config.info.no	203 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	232 B	-rw-r--r--	2026-07-17 21:17
delete_actions.cgi	877 B	-rwxr-xr-x	2026-07-17 21:22
delete_filters.cgi	877 B	-rwxr-xr-x	2026-07-17 21:22
delete_jails.cgi	624 B	-rwxr-xr-x	2026-07-17 21:22
edit_action.cgi	2.12 KB	-rwxr-xr-x	2026-07-17 21:22
edit_config.cgi	3.01 KB	-rwxr-xr-x	2026-07-17 21:22
edit_filter.cgi	1.67 KB	-rwxr-xr-x	2026-07-17 21:22
edit_jail.cgi	4.51 KB	-rwxr-xr-x	2026-07-17 21:22
edit_jaildef.cgi	2.71 KB	-rwxr-xr-x	2026-07-17 21:22
edit_manual.cgi	1.05 KB	-rwxr-xr-x	2026-07-17 21:22
fail2ban-lib.pl	19.28 KB	-rw-r--r--	2026-07-17 21:17
index.cgi	2.15 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	465 B	-rwxr-xr-x	2026-07-17 21:17
jail_blocks.cgi	2.18 KB	-rwxr-xr-x	2026-07-17 21:22
list_actions.cgi	1.15 KB	-rwxr-xr-x	2026-07-17 21:22
list_filters.cgi	1.2 KB	-rwxr-xr-x	2026-07-17 21:22
list_jails.cgi	1.55 KB	-rwxr-xr-x	2026-07-17 21:22
list_status.cgi	3.02 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	804 B	-rwxr-xr-x	2026-07-17 21:17
module.info	201 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	233 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	239 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	149 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	0 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	161 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	157 B	-rw-r--r--	2026-07-17 21:17
module.info.de	138 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	291 B	-rw-r--r--	2026-07-17 21:17
module.info.es	0 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	152 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	157 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	220 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	175 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	180 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	141 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	159 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	163 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	187 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	167 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	161 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	0 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	156 B	-rw-r--r--	2026-07-17 21:17
module.info.no	36 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	114 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	158 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	161 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	249 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	174 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	164 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	173 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	236 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	118 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	124 B	-rw-r--r--	2026-07-17 21:17
restart.cgi	334 B	-rwxr-xr-x	2026-07-17 21:22
save_action.cgi	1.86 KB	-rwxr-xr-x	2026-07-17 21:22
save_config.cgi	1.23 KB	-rwxr-xr-x	2026-07-17 21:22
save_filter.cgi	1.69 KB	-rwxr-xr-x	2026-07-17 21:22
save_jail.cgi	4.41 KB	-rwxr-xr-x	2026-07-17 21:22
save_jaildef.cgi	1.57 KB	-rwxr-xr-x	2026-07-17 21:22
save_manual.cgi	620 B	-rwxr-xr-x	2026-07-17 21:22
start.cgi	326 B	-rwxr-xr-x	2026-07-17 21:22
stop.cgi	322 B	-rwxr-xr-x	2026-07-17 21:22
syslog_logs.pl	599 B	-rwxr-xr-x	2026-07-17 21:17
unblock_jail.cgi	578 B	-rwxr-xr-x	2026-07-17 21:22
unblock_jailed_ip.cgi	666 B	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# Show all global config options

use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
require './fail2ban-lib.pl';
our (%in, %text);

my $conf = &get_config();
my ($def) = grep { $_->{'name'} eq 'Definition' } @$conf;
$def || &error($text{'config_edef'});

&ui_print_header(undef, $text{'config_title'}, "");

print &ui_form_start("save_config.cgi", "post");
print &ui_table_start($text{'config_header'}, undef, 2);

# Logging level
my $logsymbsupp = &compare_version_numbers(&get_fail2ban_version(), "0.9") >= 0;
my $loglevel = &find_value("loglevel", $def) || ($logsymbsupp ? "INFO" : 3);
my @loglevels;
if ($logsymbsupp) {
	@loglevels = ( "CRITICAL", "ERROR", "WARNING",
		       "NOTICE", "INFO", "DEBUG" );
	}
else {
	@loglevels = ( [ 1, "ERROR" ], [ 2, "WARN" ],
		       [ 3, "INFO" ], [ 4, "DEBUG" ] );
	}
print &ui_table_row($text{'config_loglevel'},
	&ui_select("loglevel", $loglevel, \@loglevels));

# Log file
my $logtarget = &find_value("logtarget", $def);
my $mode = $logtarget eq "" ? "" :
	   $logtarget =~ /^STDOUT|STDERR|SYSLOG$/ ? $logtarget : "file";
print &ui_table_row($text{'config_logtarget'},
		&ui_radio_row('logtarget_def', $mode,
		[ [ "", [ $text{'config_default'} ] ],
		  [ "STDOUT", [ "STDOUT" ] ],
		  [ "STDERR", [ "STDERR" ] ],
		  [ "SYSLOG", [ $text{'config_syslog'} ] ],
		  [ "file", [ $text{'config_file'},
		      &ui_textbox("logtarget",
				  $mode eq "file" ? $logtarget : "", 50) ] ]
		  ], 1));

# Socket file
my $socket = &find_value("socket", $def);
print &ui_table_row($text{'config_socket'},
	&ui_opt_textbox("socket", $socket, 40, $text{'default'}));

# DB Purge Age
if ($def) {
	my $dbpurgeage = &find_value("dbpurgeage", $def);
	$dbpurgeage ||= 86400;
	my @dbpurgeages = (
			[ '', '' ],
			[ '900', $text{'config_dbpurgeage_15m'} ],
			[ '1800', $text{'config_dbpurgeage_30m'} ],
			[ '3600', $text{'config_dbpurgeage_1h'} ],
			[ '21600', $text{'config_dbpurgeage_6h'} ],
			[ '43200', $text{'config_dbpurgeage_12h'} ],
			[ '86400', $text{'config_dbpurgeage_1d'} ],
			[ '259200', $text{'config_dbpurgeage_3d'} ],
			[ '604800', $text{'config_dbpurgeage_1w'} ],
			[ '1209600', $text{'config_dbpurgeage_2w'} ],
			[ '2629800', $text{'config_dbpurgeage_1mo'} ] );

# Check of $dbpurgeage is in @dbpurgeages
	my $time_in_seconds = &time_to_seconds($dbpurgeage);
	my $dbpurgestd = grep { $_->[0] eq $time_in_seconds } @dbpurgeages;
	my $dbpurge_def = $time_in_seconds == 86400 ? 1 : $dbpurgestd ? 0 : 2;
	my $depurgeagelabeled = $dbpurge_def == 2
		? &seconds_to_time($dbpurgeage) 
		: undef;
	print &ui_table_row($text{'config_dbpurgeage'},
		&ui_radio_row('dbpurgeage', $dbpurge_def,
		[ [ 1, [ $text{'config_dbpurgeagedef'} ] ],
		  [ 0, [ $text{'config_dbpurgeagesel'},
		  	 &ui_select("dbpurgeagesel",
			 	$time_in_seconds, \@dbpurgeages) ] ],
		  [ 2, [ $text{'config_dbpurgeagecus'},
		  	&ui_textbox("dbpurgeagecus", $depurgeagelabeled, 15) ] ]
		]));
	}

print &ui_table_end();
print &ui_form_end([ [ undef, $text{'save'} ] ]);

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