Author: rhafer Date: Thu Jul 31 17:15:01 2008 New Revision: 49547 URL: http://svn.opensuse.org/viewcvs/yast?rev=49547&view=rev Log: Add ppolicy.schema when first ppolicy overlay is configured Modified: trunk/ldap-server/src/LdapServer.pm Modified: trunk/ldap-server/src/LdapServer.pm URL: http://svn.opensuse.org/viewcvs/yast/trunk/ldap-server/src/LdapServer.pm?rev... ============================================================================== --- trunk/ldap-server/src/LdapServer.pm (original) +++ trunk/ldap-server/src/LdapServer.pm Thu Jul 31 17:15:01 2008 @@ -935,11 +935,24 @@ { my ($self, $dbIndex, $ppolicy ) = @_; y2milestone("AddPasswordPolicy: ".Data::Dumper->Dump([$ppolicy])." ". scalar(keys %{$ppolicy}) ); + if ( 0 < scalar(keys %{$ppolicy}) ) { $ppolicy->{'hashClearText'} = YaST::YCP::Boolean($ppolicy->{'hashClearText'}); $ppolicy->{'useLockout'} = YaST::YCP::Boolean($ppolicy->{'useLockout'}); + + # slapo-ppolicy requires ppolicy schema to be loaded + my @schema = $self->GetSchemaList(); + if ( grep( !/^ppolicy$/, @schema ) ) + { + my $rc = $self->AddSchemaToSchemaList("/etc/openldap/schema/ppolicy.schema"); + if ( ! $rc ) + { + return $rc; + } + } } + if ( ! SCR->Write(".ldapserver.database.{".$dbIndex."}.ppolicy", $ppolicy ) ) { my $err = SCR->Error(".ldapserver"); $self->SetError( $err->{'summary'}, $err->{'description'} ); -- To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org For additional commands, e-mail: yast-commit+help@opensuse.org