| Server IP : 49.231.201.246 / Your IP : 216.73.216.149 Web Server : Apache/2.4.18 (Ubuntu) System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64 User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,shell_exec,system,proc_open,popen,pcntl_exec MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/useradmin/ |
Upload File : |
#!/usr/bin/perl
# list_who.cgi
# Display logged-in users
require './user-lib.pl';
$access{'logins'} || &error($text{'who_ecannot'});
if (&foreign_check("mailboxes")) {
&foreign_require("mailboxes");
}
&ui_print_header(undef, $text{'who_title'}, "");
# Build table of users
@whos = &logged_in_users();
@table = ( );
foreach $w (@whos) {
$tm = defined(&mailboxes::parse_mail_date) ?
&mailboxes::parse_mail_date($w->{'when'}) : undef;
push(@table, [
&ui_link("list_logins.cgi?username=".&urlize($w->{'user'}),
&html_escape($w->{'user'}) ),
&html_escape($w->{'tty'}),
&html_escape($tm ? &make_date($tm) : $w->{'when'}),
$w->{'from'} ? &html_escape($w->{'from'})
: $text{'logins_local'},
]);
}
# Show it
print &ui_columns_table(
[ $text{'who_user'}, $text{'who_tty'}, $text{'who_when'},
$text{'who_from'} ],
100,
\@table,
undef,
0,
undef,
$text{'who_none'},
);
&ui_print_footer("", $text{'index_return'});