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	5.15 KB	-rw-r--r--	2026-07-17 21:17
acl-lib.pl	68.57 KB	-rwxr-xr-x	2026-07-17 21:17
acl_security.pl	2.33 KB	-rwxr-xr-x	2026-07-17 21:17
backup_config.pl	2.64 KB	-rwxr-xr-x	2026-07-17 21:17
cert_form.cgi	1.53 KB	-rwxr-xr-x	2026-07-17 21:22
cert_issue.cgi	1.71 KB	-rwxr-xr-x	2026-07-17 21:22
cert_output.cgi	461 B	-rwxr-xr-x	2026-07-17 21:22
cgi_args.pl	761 B	-rwxr-xr-x	2026-07-17 21:17
config	61 B	-rw-r--r--	2026-07-17 21:17
config-ALL-linux	42 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	42 B	-rw-r--r--	2026-07-17 21:17
config-macos	42 B	-rw-r--r--	2026-07-17 21:17
config-netbsd	42 B	-rw-r--r--	2026-07-17 21:17
config-openbsd	42 B	-rw-r--r--	2026-07-17 21:17
config-solaris-10-ALL	46 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	51 B	-rw-r--r--	2026-07-17 21:17
config.info	258 B	-rw-r--r--	2026-07-17 21:17
config.info.ar	385 B	-rw-r--r--	2026-07-17 21:17
config.info.bg	397 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	295 B	-rw-r--r--	2026-07-17 21:17
config.info.cs	265 B	-rw-r--r--	2026-07-17 21:17
config.info.da	259 B	-rw-r--r--	2026-07-17 21:17
config.info.de	273 B	-rw-r--r--	2026-07-17 21:17
config.info.es	265 B	-rw-r--r--	2026-07-17 21:17
config.info.eu	298 B	-rw-r--r--	2026-07-17 21:17
config.info.fa	394 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	308 B	-rw-r--r--	2026-07-17 21:17
config.info.hr	0 B	-rw-r--r--	2026-07-17 21:17
config.info.hu	353 B	-rw-r--r--	2026-07-17 21:17
config.info.it	279 B	-rw-r--r--	2026-07-17 21:17
config.info.ja	319 B	-rw-r--r--	2026-07-17 21:17
config.info.ko	233 B	-rw-r--r--	2026-07-17 21:17
config.info.ms	248 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	268 B	-rw-r--r--	2026-07-17 21:17
config.info.no	260 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	270 B	-rw-r--r--	2026-07-17 21:17
config.info.pt_BR	271 B	-rw-r--r--	2026-07-17 21:17
config.info.ru	439 B	-rw-r--r--	2026-07-17 21:17
config.info.sk	278 B	-rw-r--r--	2026-07-17 21:17
config.info.sv	53 B	-rw-r--r--	2026-07-17 21:17
config.info.tr	309 B	-rw-r--r--	2026-07-17 21:17
config.info.uk	303 B	-rw-r--r--	2026-07-17 21:17
config.info.zh	47 B	-rw-r--r--	2026-07-17 21:17
config.info.zh_TW	146 B	-rw-r--r--	2026-07-17 21:17
convert.cgi	3.81 KB	-rwxr-xr-x	2026-07-17 21:22
convert_form.cgi	1.61 KB	-rwxr-xr-x	2026-07-17 21:22
defaultacl	226 B	-rw-r--r--	2026-07-17 21:17
delete_group.cgi	1.37 KB	-rwxr-xr-x	2026-07-17 21:22
delete_groups.cgi	1.47 KB	-rwxr-xr-x	2026-07-17 21:22
delete_session.cgi	501 B	-rwxr-xr-x	2026-07-17 21:22
delete_user.cgi	684 B	-rwxr-xr-x	2026-07-17 21:22
delete_users.cgi	2.95 KB	-rwxr-xr-x	2026-07-17 21:22
edit_acl.cgi	2.5 KB	-rwxr-xr-x	2026-07-17 21:22
edit_group.cgi	4.4 KB	-rwxr-xr-x	2026-07-17 21:22
edit_pass.cgi	1.83 KB	-rwxr-xr-x	2026-07-17 21:22
edit_sql.cgi	3.79 KB	-rwxr-xr-x	2026-07-17 21:22
edit_sync.cgi	1.24 KB	-rwxr-xr-x	2026-07-17 21:22
edit_unix.cgi	3.1 KB	-rwxr-xr-x	2026-07-17 21:22
edit_user.cgi	15.29 KB	-rwxr-xr-x	2026-07-17 21:22
feedback_files.pl	336 B	-rwxr-xr-x	2026-07-17 21:17
forgot_form.cgi	1.06 KB	-rwxr-xr-x	2026-07-17 21:22
forgot_send.cgi	2.71 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	8.52 KB	-rwxr-xr-x	2026-07-17 21:22
list_sessions.cgi	2.48 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	2.14 KB	-rwxr-xr-x	2026-07-17 21:17
makedn.cgi	1.77 KB	-rwxr-xr-x	2026-07-17 21:22
maketables.cgi	1.24 KB	-rwxr-xr-x	2026-07-17 21:22
md5-lib.pl	7.73 KB	-rwxr-xr-x	2026-07-17 21:17
module.info	187 B	-rw-r--r--	2026-07-17 21:17
module.info.ar	193 B	-rw-r--r--	2026-07-17 21:17
module.info.ar.auto	19 B	-rw-r--r--	2026-07-17 21:17
module.info.bg	43 B	-rw-r--r--	2026-07-17 21:17
module.info.bg.auto	192 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	129 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	19 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	28 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	116 B	-rw-r--r--	2026-07-17 21:17
module.info.da	23 B	-rw-r--r--	2026-07-17 21:17
module.info.da.auto	115 B	-rw-r--r--	2026-07-17 21:17
module.info.de	146 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	19 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	253 B	-rw-r--r--	2026-07-17 21:17
module.info.es	125 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	24 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	159 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	238 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	150 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	28 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	154 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	147 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	30 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	152 B	-rw-r--r--	2026-07-17 21:17
module.info.it	22 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	123 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	25 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	137 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	25 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	128 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	120 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	19 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	26 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	119 B	-rw-r--r--	2026-07-17 21:17
module.info.no	23 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	113 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	133 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	19 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	31 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	126 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	31 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	132 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	40 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	190 B	-rw-r--r--	2026-07-17 21:17
module.info.sk	29 B	-rw-r--r--	2026-07-17 21:17
module.info.sk.auto	129 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	26 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	122 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	32 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	152 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	246 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	28 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	106 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	28 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	112 B	-rw-r--r--	2026-07-17 21:17
negativeacl	13 B	-rw-r--r--	2026-07-17 21:17
openssl.cnf	6.02 KB	-rw-r--r--	2026-07-17 21:17
postinstall.pl	1012 B	-rwxr-xr-x	2026-07-17 21:17
prefs.info	22 B	-rw-r--r--	2026-07-17 21:17
save_acl.cgi	2.74 KB	-rwxr-xr-x	2026-07-17 21:22
save_group.cgi	3.77 KB	-rwxr-xr-x	2026-07-17 21:22
save_pass.cgi	1.74 KB	-rwxr-xr-x	2026-07-17 21:22
save_sql.cgi	3.4 KB	-rwxr-xr-x	2026-07-17 21:22
save_sync.cgi	746 B	-rwxr-xr-x	2026-07-17 21:22
save_twofactor.cgi	2.74 KB	-rwxr-xr-x	2026-07-17 21:22
save_unix.cgi	2.24 KB	-rwxr-xr-x	2026-07-17 21:22
save_user.cgi	11.52 KB	-rwxr-xr-x	2026-07-17 21:22
schema.cgi	628 B	-rwxr-xr-x	2026-07-17 21:22
switch.cgi	742 B	-rwxr-xr-x	2026-07-17 21:22
system_info.pl	2.59 KB	-rw-r--r--	2026-07-17 21:17
test_twofactor.cgi	1.42 KB	-rwxr-xr-x	2026-07-17 21:22
twofactor.pl	876 B	-rwxr-xr-x	2026-07-17 21:22
twofactor_form.cgi	2.03 KB	-rwxr-xr-x	2026-07-17 21:22
useradmin_update.pl	3.12 KB	-rwxr-xr-x	2026-07-17 21:17
webmin.schema	1.34 KB	-rw-r--r--	2026-07-17 21:17

Rename

use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
our (%text, $remote_user, %sessiondb, $module_name);
do 'acl-lib.pl';

# list_system_info(&data, &in)
# Show recent logins
sub list_system_info
{
my ($data, $in) = @_;
my @rv;
my %miniserv;
&get_miniserv_config(\%miniserv);
&open_session_db(\%miniserv);
my @logins;
foreach my $k (keys %sessiondb) {
	next if ($k =~ /^1111111/);
	next if (!$sessiondb{$k});
	my ($user, $ltime, $lip) = split(/\s+/, $sessiondb{$k});
	next if (&webmin_user_is_admin()
		? ($user eq "!" ||
		   ($user ne $remote_user &&
		    # Show all logins for past 3 days for admin
		    $ltime && $ltime < time() - 3*24*60*60))
		: ($user ne $remote_user && $user ne "!".$remote_user));
	push(@logins, [ $user, $ltime, $lip, $k ]);
	}
if (@logins) {
	@logins = sort { $b->[1] <=> $a->[1] } @logins;
	if (@logins > 5) {
		@logins = @logins[0..4];
		}
	my $html = &ui_columns_start([ $text{'sessions_host'},
				       $text{'sessions_user'},
				       $text{'sessions_login_ago'},
				       $text{'sessions_state'},
				       $text{'sessions_action'} ]);
	my $open = 0;
	foreach my $l (@logins) {
		my $state;
		my $candel = 0;
		if ($l->[0] =~ /^\!/) {
			$state = $text{'sessions_out'};
			}
		elsif ($l->[3] eq $main::session_id ||
		       $l->[3] eq &hash_session_id($main::session_id)) {
			$state = "<font color=green>$text{'sessions_this'}</a>";
			}
		else {
			$state = $text{'sessions_in'};
			$candel = 1;
			if ($l->[2] ne $ENV{'REMOTE_HOST'}) {
				$open++;
				$state = "<font color=orange>$state</font>";
				}
			}
		my @links;
		if (&foreign_available("webminlog")) {
		      push(@links,
		         &ui_link("@{[&get_webprefix()]}/webminlog/search.cgi?uall=1&mall=1&tall=1&wall=1&fall=1&sid=$l->[3]",
		         $text{'sessions_lview'}))
			}
		if ($candel) {
		      push(@links,
		         &ui_link("@{[&get_webprefix()]}/acl/delete_session.cgi?id=$l->[3]&redirect_ref=1",
		         $text{'sessions_kill'}))
			}
		my $user = $l->[0];
		$user =~ s/^\!//;
		$html .= &ui_columns_row([
		          $l->[2],
		          $user,
		          &make_date_relative($l->[1]).
			  	"&nbsp;".&ui_help(&make_date($l->[1])),
		          $state,
			  &ui_links_row(\@links) ]);
		}
	$html .= &ui_columns_end();
	if (&foreign_available("acl")) {
		$html .= &ui_link("@{[&get_webprefix()]}/acl/list_sessions.cgi",
				  $text{'sessions_all'}, undef,
				  "title=\"$text{'sessions_title'}\"");
		}
	push(@rv, { 'type' => 'html',
		    'desc' => $text{'logins_title'},
		    'open' => $open,
		    'id' => $module_name.'_logins',
		    'priority' => -100,
		    'html' => $html });
	}
return @rv;
}