Changeset 1616
- Timestamp:
- 01/08/16 21:20:39 (8 years ago)
- Location:
- trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ldap
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ldap/User.pm
r1603 r1616 81 81 post => sub { 82 82 my ($self, $value) = @_; 83 if (!grep { $_ eq 'sambaSamAccount' } $self->object->_get_attributes('objectClass')) { 84 $self->_update_class( 85 sambaSID => $self->base->sambaSID(_computeSSID($value)) 86 ); 87 } else { 88 $self->object->set_fields(sambaSID => $self->object->base->sambaSID(_computeSSID($value))); 89 } 83 $self->object->set_fields(sambaSID => $self->object->base->sambaSID(_computeSSID($value))); 90 84 }, 91 85 }, … … 143 137 sambaLMPassword => { readable => 0, }, 144 138 sambaNTPassword => { readable => 0, }, 145 sambaS id=> { ro => 1 },139 sambaSID => { ro => 1 }, 146 140 } 141 ); 142 } 143 144 sub _update_class { 145 my ($self) = @_; 146 147 $self->SUPER::_update_class( 148 sambaSID => $self->base->sambaSID( 149 _computeSSID($self->_get_attributes('uidNumber')) 150 ) 147 151 ); 148 152 } … … 283 287 my ($lm, $nt) = ntlmgen $clear_pass; 284 288 285 if (!grep { $_ eq 'sambaSamAccount' } $self->get_attributes('objectClass')) {286 $self->_update_class(287 sambaSID => $self->base->sambaSID($self->_get_attributes('uidNumber') * 2 + 1000)288 );289 }290 291 289 my $res = $self->set_fields( 292 290 userPassword => $md5, -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ldap/objects.pm
r1603 r1616 202 202 my $cclass = join(',', sort $self->_my_ldap_classes); 203 203 if ($oclass ne $cclass) { 204 $self->{entry}->replace( 205 'objectClass' => [ $self->_my_ldap_classes ] 206 ); 204 $self->_update_class(); 207 205 } 208 206 }
Note: See TracChangeset
for help on using the changeset viewer.