One Hat Cyber Team

Your IP: 216.73.216.133
Server IP: 185.119.109.197
Server: Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.1.33
Buat File | Buat Folder

Dir : ~/proc/self/root/usr/share/webmin/apache/

View File Name : useradmin_update.pl

do 'apache-lib.pl';
do 'auth-lib.pl';

foreach $k (keys %config) {
	if ($k =~ /^sync_(.*)$/) {
		push(@sync, [ $1, $config{$k} ]);
		}
	}

# useradmin_create_user(&details)
sub useradmin_create_user
{
foreach $s (@sync) {
	if ($s->[1] =~ /create/ && !&get_authuser($s->[0], $_[0]->{'user'})) {
		&lock_file($s->[0]);
		&create_authuser($s->[0], { 'user' => $_[0]->{'user'},
					    'pass' => $_[0]->{'pass'} });
		&unlock_file($s->[0]);
		}
	}
}

# useradmin_delete_user(&details)
sub useradmin_delete_user
{
foreach $s (@sync) {
	if ($s->[1] =~ /delete/) {
		&lock_file($s->[0]);
		&delete_authuser($s->[0], $_[0]->{'user'});
		&unlock_file($s->[0]);
		}
	}
}

# useradmin_modify_user(&details)
sub useradmin_modify_user
{
foreach $s (@sync) {
	if ($s->[1] =~ /modify/) {
		&lock_file($s->[0]);
		&save_authuser($s->[0], $_[0]->{'olduser'},
			       { 'user' => $_[0]->{'user'},
				 'pass' => $_[0]->{'pass'} });
		&unlock_file($s->[0]);
		}
	}
}

1;