File smbldap-tools-0.9.9-suse-populate.patch of Package smbldap-tools
--- smbldap-tools-0.9.9-orig/smbldap-populate.pl 2012-03-05 09:59:44.000000000 +0100
+++ smbldap-tools-0.9.9/smbldap-populate.pl 2012-09-16 17:32:14.589574710 +0200
@@ -309,7 +309,7 @@
push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Domain Admins,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Domain Admins",
gidNumber => 512,
memberUid => $adminName,
@@ -321,7 +321,7 @@
push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Domain Users,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Domain Users",
gidNumber => 513,
description => "Netbios Domain Users",
@@ -332,7 +332,7 @@
push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Domain Guests,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Domain Guests",
gidNumber => 514,
description => "Netbios Domain Guests Users",
@@ -343,7 +343,7 @@
push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Domain Computers,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Domain Computers",
gidNumber => 515,
description => "Netbios Domain Computers accounts",
@@ -354,7 +354,7 @@
push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Administrators,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Administrators",
gidNumber => 544,
description => "Netbios Domain Members can fully administer the computer/sambaDomainName",
@@ -364,42 +364,42 @@
);
push(@entries, $entry);
-# $entry = Net::LDAP::Entry->new("cn=Users,$config{groupsdn}",
-# objectClass => [qw(top posixGroup sambaGroupMapping)],
-# gidNumber => 545,
-# cn => "Users",
-# description => "Netbios Domain Ordinary users",
-# sambaSID => "S-1-5-32-545",
-# sambaGroupType => 4,
-# displayName => "users",
-# );
-# push(@entries, $entry);
-
-# $entry = Net::LDAP::Entry->new("cn=Guests,$config{groupsdn}",
-# objectClass => [qw(top posixGroup sambaGroupMapping)],
-# gidNumber => 546,
-# cn => "Guests",
-# memberUid => $guestName,
-# description => "Netbios Domain Users granted guest access to the computer/sambaDomainName",
-# sambaSID => "S-1-5-32-546",
-# sambaGroupType => 4,
-# displayName => "Guests",
-# );
-# push(@entries, $entry);
-
-# $entry = Net::LDAP::Entry->new("cn=Power Users,$config{groupsdn}",
-# objectClass => [qw(top posixGroup sambaGroupMapping)],
-# gidNumber => 547,
-# cn => "Power Users",
-# description => "Netbios Domain Members can share directories and printers",
-# sambaSID => "S-1-5-32-547",
-# sambaGroupType => 4,
-# displayName => "Power Users",
-# );
-# push(@entries, $entry);
+ $entry = Net::LDAP::Entry->new("cn=Users,$config{groupsdn}",
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
+ gidNumber => 545,
+ cn => "Users",
+ description => "Netbios Domain Ordinary users",
+ sambaSID => "S-1-5-32-545",
+ sambaGroupType => 4,
+ displayName => "users",
+ );
+ push(@entries, $entry);
+
+ $entry = Net::LDAP::Entry->new("cn=Guests,$config{groupsdn}",
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
+ gidNumber => 546,
+ cn => "Guests",
+ memberUid => $guestName,
+ description => "Netbios Domain Users granted guest access to the computer/sambaDomainName",
+ sambaSID => "S-1-5-32-546",
+ sambaGroupType => 4,
+ displayName => "Guests",
+ );
+ push(@entries, $entry);
+
+ $entry = Net::LDAP::Entry->new("cn=Power Users,$config{groupsdn}",
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
+ gidNumber => 547,
+ cn => "Power Users",
+ description => "Netbios Domain Members can share directories and printers",
+ sambaSID => "S-1-5-32-547",
+ sambaGroupType => 4,
+ displayName => "Power Users",
+ );
+ push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Account Operators,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Account Operators",
gidNumber => 548,
description => "Netbios Domain Users to manipulate users accounts",
@@ -409,19 +409,19 @@
);
push(@entries, $entry);
-# $entry = Net::LDAP::Entry->new("cn=System Operators,$config{groupsdn}",
-# objectClass => [qw(top posixGroup sambaGroupMapping)],
-# gidNumber => 549,
-# cn => "System Operators",
-# description => "Netbios Domain System Operators",
-# sambaSID => "S-1-5-32-549",
-# sambaGroupType => 4,
-# displayName => "System Operators",
-# );
-# push(@entries, $entry);
+ $entry = Net::LDAP::Entry->new("cn=System Operators,$config{groupsdn}",
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
+ gidNumber => 549,
+ cn => "System Operators",
+ description => "Netbios Domain System Operators",
+ sambaSID => "S-1-5-32-549",
+ sambaGroupType => 4,
+ displayName => "System Operators",
+ );
+ push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Print Operators,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Print Operators",
gidNumber => 550,
description => "Netbios Domain Print Operators",
@@ -432,7 +432,7 @@
push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Backup Operators,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Backup Operators",
gidNumber => 551,
description => "Netbios Domain Members can bypass file security to back up files",
@@ -443,7 +443,7 @@
push(@entries, $entry);
$entry = Net::LDAP::Entry->new("cn=Replicators,$config{groupsdn}",
- objectClass => [qw(top posixGroup sambaGroupMapping)],
+ objectClass => [qw(top namedObject posixGroup sambaGroupMapping)],
cn => "Replicators",
gidNumber => 552,
description => "Netbios Domain Supports file replication in a sambaDomainName",
