⚝
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
Eksekusi
Dir :
~
/
usr
/
share
/
webmin
/
acl
/
Edit File: postinstall.pl
use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; require 'acl-lib.pl'; our ($config_directory); # Rename the .acl files for any groups to .gacl files sub module_install { # Fix up .acl files my @mods = &get_all_module_infos(); my %isuser = map { $_->{'name'}, 1 } &list_users(); foreach my $g (&list_groups()) { next if ($isuser{$g->{'name'}}); next if ($g->{'proto'}); foreach my $m (@mods) { if (-r "$config_directory/$m->{'dir'}/$g->{'name'}.acl") { rename("$config_directory/$m->{'dir'}/$g->{'name'}.acl", "$config_directory/$m->{'dir'}/$g->{'name'}.gacl"); } } } # Update sub-groups in webmin.groups file to use @ names foreach my $g (&list_groups()) { my (@newmembers, $any); foreach my $u (@{$g->{'members'}}) { if ($u !~ /^\@/ && !$isuser{$u}) { push(@newmembers, '@'.$u); $any = 1; } else { push(@newmembers, $u); } } $g->{'members'} = \@newmembers; if ($any) { &modify_group($g->{'name'}, $g); } } }
Simpan