produce whole dn in SQL queries so we don't have to mungle it in code
authorDobrica Pavlinusic <dpavlin@rot13.org>
Wed, 29 Apr 2009 12:22:40 +0000 (12:22 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Wed, 29 Apr 2009 12:22:40 +0000 (12:22 +0000)
lib/LDAP/Koha.pm
sql/group.sql
sql/hreduperson.sql
sql/organizationalunit.sql

index 38e4428..e0b70bf 100644 (file)
@@ -131,12 +131,12 @@ sub _dn_attributes {
        my $dn = delete( $row->{dn} ) || die "no dn in ",dump( $row );
 
        # this does some sanity cleanup for our data
        my $dn = delete( $row->{dn} ) || die "no dn in ",dump( $row );
 
        # this does some sanity cleanup for our data
-       my $base_as_domain = $base;
-       $base_as_domain =~ s{dn=}{.};
-       $base_as_domain =~ s{^\.}{@};
-       $dn =~ s{$base_as_domain$}{};
-
-       $dn .= ',' . $base unless $dn =~ m{,}; # add base if none present
+#      my $base_as_domain = $base;
+#      $base_as_domain =~ s{dn=}{.};
+#      $base_as_domain =~ s{^\.}{@};
+#      $dn =~ s{$base_as_domain$}{};
+#
+#      $dn .= ',' . $base unless $dn =~ m{,}; # add base if none present
 
        return ($dn, $row);
 }
 
        return ($dn, $row);
 }
index e98e8f4..47c28b8 100644 (file)
@@ -1,7 +1,7 @@
 select
 select
-       concat('cn=',c.categorycode,',ou=',c.categorycode     as dn,
+       concat('cn=',c.categorycode,',ou=',c.categorycode,',dc=ffzg,dc=hr')     as dn,
        'group'                         as objectClass,
        'group'                         as objectClass,
-       'groups'                        as ou,
+       c.categorycode                  as ou,
        c.categorycode                  as cn,
        description                     as description,
 
        c.categorycode                  as cn,
        description                     as description,
 
index b068bd7..cbf0811 100644 (file)
@@ -1,6 +1,6 @@
 
 select
 
 select
-       concat('uid=',trim(userid))                     as dn,
+       concat('uid=',trim(userid),',ou=',categorycode,',dc=ffzg,dc=hr')        as dn,
        'person
        organizationalPerson
        inetOrgPerson
        'person
        organizationalPerson
        inetOrgPerson
index 21d4912..8c07ff9 100644 (file)
@@ -1,6 +1,6 @@
 
 select
 
 select
-       concat('ou=',c.categorycode,'dc=ffzg,dc=hr')    as dn,
+       concat('ou=',c.categorycode,',dc=ffzg,dc=hr')   as dn,
        'organizationalunit'            as objectClass,
        c.categorycode                  as ou,
        c.description                   as description
        'organizationalunit'            as objectClass,
        c.categorycode                  as ou,
        c.description                   as description