Changeset 916

Timestamp:

03/22/12 18:49:38 (12 years ago)

Author:

nanardon

Message:

• change exported/unexported attributes of revaliases in same time than user, meaning destroyed user don't have revalias anymore

Location:

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql

Files:

• Revaliases.pm (modified) (1 diff)
• User.pm (modified) (4 diffs)

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

@@ -57 +57 @@
     my ($class, $base, $id, %data) = @_;
 
-    $base->get_object('user', $id) or do {
+    my $uobj = $base->get_object('user', $id) or do {
         $base->log(LA_ERR, 'Cannot create revaliases %s: no such user', $id);
         return;
     };
+    $data{exported} = $uobj->get_attributes('exported') || 0;
 
     $class->SUPER::_create($base, $id, %data);

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

@@ -106 +106 @@
             },
             revaliases => {
-                reference => 'revaliases',
                 formtype => 'TEXT',
             },
@@ -416 +415 @@
     my $res = 0;
     foreach my $attr (keys %data) {
+        $attr =~ /^(un)?exported$/ and do {
+            if (my $obj = $self->base->
+                get_object('revaliases', $self->id)) {
+                my $ares = $obj->set_c_fields(
+                    ($attr eq 'exported' ? 'exported' : 'unexported') => $data{$attr}
+                );
+                if (defined($ares)) {
+                    $res+=$ares;
+                } else {
+                    $self->base->log(LA_ERR,
+                        'Cannot set revaliases exported attribute for user %s',
+                        $self->id);
+                }
+            }
+        };
         $attr eq 'gidnumber' && $data{$attr} !~ /^\d+$/ and do {
             my $group = $self->base->get_object('group', $data{$attr}) or do {
@@ -515 +529 @@
                 if (my $obj = $self->base->
                         get_object('revaliases', $self->id)) {
-                    my $ares = $obj->set_c_fields('as', $data{$attr});
+                    my $ares = $obj->set_c_fields(
+                        'as' => $data{$attr},
+                        'exported' => ($self->get_attributes('exported') || 0)
+                    );
                     if (defined($ares)) {
                         $res+=$ares;
@@ -526 +543 @@
                         'revaliases',
                         $self->id, as => $data{$attr},
+                        'exported' => ($self->get_attributes('exported') || 0)
                     )) {
                         $res++;