Ignore:
Timestamp:
06/25/15 15:38:44 (9 years ago)
Author:
nanardon
Message:

Fix id information into Unix base

Location:
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Unix
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Unix/Group.pm

    r1071 r1357  
    5858sub new { 
    5959    my ($class, $base, $id, @args) = @_; 
    60     # we profit of ref, quite easy 
    61     if (exists($base->{groups}{$id}) && $base->{groups}{$id}) { 
     60 
     61    if (exists($base->{groups}{$id})) { 
    6262        if ($base->{groups}{$id}{gid} < ($base->{min_gid} || 0)) { 
     63            $base->log(LA_DEBUG, "gid %d less than minimal %d", $base->{groups}{$id}{gid}, ($base->{min_gid} || 0)); 
    6364            return; 
    6465        } 
    6566        return bless($base->{groups}{$id}, $class); 
    66     } else { return } 
    67 } 
    68  
    69 sub id { 
    70     $_[0]->{group_name} 
     67    } else { 
     68        $base->log(LA_ERR, "Cannot find group $id"); 
     69        return 
     70    } 
    7171} 
    7272 
     
    7575    if ($field eq 'user_list') { 
    7676        return [ keys %{ $self->{'users'} || {} } ]; 
    77     } elsif ($field eq 'goup_name') { 
     77    } elsif ($field eq 'group_name') { 
    7878        return $self->id; 
    7979    } 
     
    8888            if (!(defined($data{$field}) && $data{$field} =~ /^\d+$/)) { 
    8989                $self->base->log(LA_ERR, 
    90                     "Invalid data for $field: " . ($data{$field} || '')); 
     90                    "Invalid Group data for $field: " . (defined($data{$field}) ? $data{$field} : '')); 
    9191                return; 
    9292            } 
  • trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Unix/User.pm

    r1352 r1357  
    8484} 
    8585 
    86 sub id { 
    87     $_[0]->{account} 
    88 } 
    89  
    9086sub get_field { 
    9187    my ($self, $field) = @_; 
     
    115111            if(!(defined($data{$field}) && $data{$field} =~ /^\d+$/)) { 
    116112                $self->base->log(LA_ERR, 
    117                     "Invalid data for $field: " . ($data{$field} || '')); 
     113                    "Invalid data for $field: " . (defined($data{$field}) ? $data{$field} : '(none)')); 
    118114                return; 
    119115            } 
Note: See TracChangeset for help on using the changeset viewer.