Changeset 92 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad/objects.pm

Timestamp:

05/12/09 16:40:07 (15 years ago)

Author:

nanardon

Message:

• allow to set memberUID everywhere

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad/objects.pm (modified) (2 diffs)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad/objects.pm

@@ -108 +108 @@
 
     $field eq 'dn' and return $self->{entry}->dn;
-    return $self->{entry}->get_value($field);
+    my ($first, @others) = $self->{entry}->get_value($field);
+    return @others ? [ sort($first, @others) ] : $first;
 }
 
@@ -132 +133 @@
 }
 
-sub get_group_users {
-    my ($self, $groupname, @searchargs) = @_;
-    my $gr = $self->get_group($groupname, attrs => [ qw(cn member) ]);
-
-    my @res;
-    foreach my $dnu (@{ $gr->get_value('member', asref => 1) || [] }) {
-        my $mesg = $self->search(
-            filter => '(objectClass=*)', # TODO can we get something else than user ?
-            @searchargs,
-            base => $dnu,
-        );
-
-        $mesg->code and return; # ensure error is propagate here
-        foreach my $entry ($mesg->entries) {
-           push(@res, $entry);
-       } 
-    }
-    @res
-}
-
-sub get_user_groups {
-    my ($self, $username, @searchargs) = @_;
-    my $user = $self->get_user($username);
-
-    my @res;
-    $self->unlimited_search(
-        base => $self->top_dn,
-        filter => sprintf(
-            '(&(objectClass=group)(member=%s))',
-            escape_filter_value($user->dn),
-        ),
-        @searchargs,
-        callback => sub {
-            my ($mesg, $entry) = @_;
-            ref $entry eq 'Net::LDAP::Entry' or return;
-            push(@res, $entry);
-        },
-    );
-
-    @res
-}
-
-sub add_user_group {
-    my ($self, $username, $groupname) = @_;
-
-    my $user = $self->get_user($username) or return;
-    my $group = $self->get_group($groupname) or return;
-
-    $group->add(member => $user->dn);
-
-    my $mesg = $group->update($self);
-    if ($mesg->code) {
-        warn $mesg->error;
-        return;
-    } else { return 1 };
-}
-
 1;