|
Server : Apache/2.2.2 (Fedora) System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686 User : apache ( 48) PHP Version : 5.2.9 Disable Function : NONE Directory : /proc/self/root/proc/self/root/usr/libexec/webmin/useradmin/ |
Upload File : |
#!/usr/bin/perl
# list_who.cgi
# Display logged-in users
require './user-lib.pl';
$access{'logins'} || &error($text{'who_ecannot'});
&ui_print_header(undef, $text{'who_title'}, "");
# Build table of users
@whos = &logged_in_users();
@table = ( );
foreach $w (@whos) {
push(@table, [
"<a href='list_logins.cgi?username=".&urlize($w->{'user'})."'>".
&html_escape($w->{'user'})."</a>",
&html_escape($w->{'tty'}),
&html_escape($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'});