#!/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'}

\n"; if ($gconfig{'os_type'} ne 'solaris') { print &text('rbac_esolaris', $gconfig{'real_os_type'}),"

\n"; } elsif (!&supports_rbac()) { if (&foreign_available("cpan")) { print &text('rbac_eperl', "Authen::SolarisRBAC", "../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'})),"

\n"; } else { print &text('rbac_ecpan', "Authen::SolarisRBAC"), "

\n"; } } else { print "$text{'rbac_ok'}

\n"; } &ui_print_footer("", $text{'index_return'});