use POSIX();
-#workaround to suppress a warning when a variable is used only once
-my @dummy = ( ${Header::table2colour} );
-undef (@dummy);
-
my %cgiparams=();
my %logsettings=();
my $errormessage = '';
'ssh' => '(sshd(?:\(.*\))?\[.*\]: )',
'auth' => '(\w+\(pam_unix\)\[.*\]: )',
'kernel' => '(kernel: (?!DROP_))',
- 'ipsec' => '(ipsec_[\w_]+: |pluto\[.*\]: |vpnwatch: )',
+ 'ipsec' => '(ipsec_[\w_]+: |pluto\[.*\]: |charon: |vpnwatch: )',
'openvpn' => '(openvpnserver)\[.*\]: ',
- 'pakfire' => '(pakfire:) '
+ 'pakfire' => '(pakfire:) ',
+ 'wireless' => '(hostapd:|kernel: ath.*:|kernel: wifi[0-9]:) '
);
# Translations for the %sections array.
'ipsec' => 'IPSec',
'openvpn' => 'OpenVPN',
'pakfire' => 'Pakfire',
+ 'wireless' => 'Wireless'
);
# calculate end of active week (saturday 23H59)
my @then = ();
@then = localtime(time());
- my $sunday = POSIX::mktime( 0, 0, 0, @then[3], @then[4], @then[5]);
+ my $sunday = POSIX::mktime( 0, 0, 0, $then[3], $then[4], $then[5]);
$sunday += (6-$then[6]) * 86400;
# Convert delta in second to full weeks