One Hat Cyber Team

Your IP: 216.73.216.93
Server IP: 65.108.141.171
Server: Linux server.heloix.com 5.4.0-214-generic #234-Ubuntu SMP Fri Mar 14 23:50:27 UTC 2025 x86_64
Server Software: Apache
PHP Version: 7.4.33
Buat File | Buat Folder

View File Name : edit_acl.cgi

#!/usr/bin/perl
# edit_acl.cgi
# Choose visible usermin modules

require './usermin-lib.pl';
$access{'acl'} || &error($text{'acl_ecannot'});
&ui_print_header(undef, $text{'acl_title'}, "");

&read_usermin_acl(\%acl);
print "$text{'acl_desc'}<p>\n";
print &ui_form_start("save_acl.cgi");
@mods = &list_modules();
@grid = ( );
foreach $m (@mods) {
	push(@grid, &ui_checkbox("mod", $m->{'dir'}, &html_escape($m->{'desc'}),
				 $acl{'user',$m->{'dir'}}));
	}
print &ui_grid_table(\@grid, 3, 100, [ "width=33%", "width=33%", "width=33%" ]);
print &ui_form_end([ [ undef, $text{'save'} ] ]);

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