Changeset 1702 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ldap

Timestamp:

02/02/16 09:26:38 (8 years ago)

Author:

nanardon

Message:

Add to cn both id and "real name" on ldap base

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ldap/User.pm (modified) (2 diffs)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ldap/User.pm

@@ -166 +166 @@
     $entry->replace(objectClass =>
         [ $class->_my_ldap_classes ],);
-    $data{cn} ||= $data{sn} || $id; # cn is mandatory
+    $data{cn} ||= [ grep { $_ }
+        join(' ', $data{givenName},$data{sn}),
+        $id
+    ]; # cn is mandatory
     $data{sn} ||= $id; # sn is mandatory
     $data{uid} ||= $id; # uid is mandatory
@@ -220 +223 @@
     };
     $self->SUPER::get_field($field);
+}
+
+sub set_fields {
+    my ($self, %fields) = @_;
+
+    if (exists($fields{givenName}) || exists($fields{sn})) {
+        my $gn = $fields{givename} || $self->_get_attributes('givenName');
+        my $sn = $fields{sn} || $self->_get_attributes('sn');
+        my @cn = grep { $_ } (
+            join(' ', $gn, $sn),
+            $self->id);
+        $self->_populate_entry($self->{entry}, 'cn', \@cn);
+    }
+
+    $self->SUPER::set_fields(%fields);
 }