mirror of
https://github.com/webmin/webmin.git
synced 2026-02-09 00:39:57 +00:00
28 lines
803 B
Perl
Executable File
28 lines
803 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Show RBAC status
|
|
|
|
require './acl-lib.pl';
|
|
$access{'rbacenable'} || &error($text{'rbac_ecannot'});
|
|
&ui_print_header(undef, $text{'rbac_title'}, "");
|
|
|
|
print "$text{'rbac_desc'}<p>\n";
|
|
if ($gconfig{'os_type'} ne 'solaris') {
|
|
print &text('rbac_esolaris', $gconfig{'real_os_type'}),"<p>\n";
|
|
}
|
|
elsif (!&supports_rbac()) {
|
|
if (&foreign_available("cpan")) {
|
|
print &text('rbac_eperl', "<tt>Authen::SolarisRBAC</tt>",
|
|
"../cpan/download.cgi?source=0&local=$module_root_directory/Authen-SolarisRBAC-0.1.tar.gz&mode=2&return=/$module_name/&returndesc=".&urlize($text{'index_return'})),"<p>\n";
|
|
}
|
|
else {
|
|
print &text('rbac_ecpan', "<tt>Authen::SolarisRBAC</tt>"),
|
|
"<p>\n";
|
|
}
|
|
}
|
|
else {
|
|
print "$text{'rbac_ok'}<p>\n";
|
|
}
|
|
|
|
&ui_print_footer("", $text{'index_return'});
|
|
|