Changeset 163 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm

Timestamp:

05/23/09 04:52:03 (15 years ago)

Author:

nanardon

Message:

• change db structure again

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm (modified) (3 diffs)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm

@@ -74 +74 @@
         my $sth = $self->db->prepare_cached(
             q{
-            select value from user_attributes_groups
-            join user_attributes_list on
-            user_attributes_groups.attr = user_attributes_list.ikey
-            where id = ? and canonical = ?
+            select id from group_attributes_users
+            join group_attributes_list on
+            group_attributes_users.attr = group_attributes_list.ikey
+            where value = ? and canonical = ?
             }
         );
-        $sth->execute($self->id, 'memberOf');
+        $sth->execute($self->id, 'memberUID');
         my @res;
         while (my $res = $sth->fetchrow_hashref) {
-            push(@res, $res->{value});
+            push(@res, $res->{id});
         }
         return \@res;
@@ -124 +124 @@
     foreach my $attr (keys %data) {
         $attr =~ /^memberOf$/ and do {
-            my $attrid = $self->_get_field_name_db('memberOf', $self->base) or next;
+            my $cl = $self->base->_load_obj_class('group') or next;
+            my $attrid = $cl->_get_field_name_db('memberUID', $self->base) or next;
             my %member;
             foreach (@{ $self->get_field('memberOf') }) {
@@ -138 +139 @@
                 if ($member{$_}{n}) {
                     my $sth = $self->db->prepare_cached(
-                        q{insert into user_attributes_groups (id, attr, value) values (?,?,?)}
+                        q{insert into group_attributes_users (value, attr, id) values (?,?,?)}
                     );
                     $sth->execute($self->id, $attrid, $_);
                 } elsif ($member{$_}{c}) {
                     my $sth = $self->db->prepare_cached(
-                        q{delete from user_attributes_groups where id = ? and attr = ? and value = ?}
+                        q{delete from group_attributes_users where value = ? and attr = ? and id = ?}
                     );
                     $sth->execute($self->id, $attrid, $_);