arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

-Function skeleton for deleting users in AD

Browse Source 
-Fix bug where a user in AD was missed


git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5368 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2010-03-04 19:41:01 +00:00
parent 64115e1c66
commit a4d8f9b458
1 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
xCAT-server/lib/perl/xCAT/ADUtils.pm
View File

@ -136,8 +136,20 @@ sub list_user_accounts { #provide enough data to construct an /etc/passwd lookin
}
}
if ($failure) { return undef; }
foreach(keys %currvalues) {
$userhash{$currvalues{accountname}}->{$_} = $currvalues{$_};
}
return \%userhash;
}
sub delete_user_account { #provide enough data to construct an /etc/passwd looking output
my %args = @_;
my $directoryserver = $args{directoryserver};
my $dnsdomain = $args{dnsdomain};
my $username = $args{username};
unless ($dnsdomain and $directoryserver $username) {
die "Invalid arguments";
}
}
=cut
example: add_user_account(username=>'fred',fullname=>'fred the great');
=cut