xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-10-31 19:32:31 +00:00
Code Issues Releases Wiki Activity

-Fix AD machine account creation

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5223 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso
2010-02-15 20:53:22 +00:00
parent f13dc5f225
commit ecfa05d977
1 changed files with 2 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -19,7 +19,7 @@ objectClass: person
objectClass: organizationalPerson
objectClass: user
objectClass: computer
cn: ##UPCASENODENAME##
cn: ##UPCASENODENAME##
distinguishedName: CN=##UPCASENODENAME##,##OU##
objectCategory: CN=Computer,CN=Schema,CN=Configuration##REALMDCS##
instanceType: 4
@@ -95,15 +95,7 @@ sub add_machine_account {
return {error=>"Unknown error $rc"};
}
$rc = system("echo '$ldif'|ldapmodify -H ldaps://$directoryserver");
return {password=>$newpassword};
}
use Data::Dumper;
print Dumper(add_machine_account(node=>'v6.xcat.e1350',directoryserver=>'v4.xcat.e1350'));
print Dumper(add_machine_account(node=>'v6.xcat.e1350',directoryserver=>'v4.xcat.e1350',ou=>'ou=wharbl'));