LEMONLDAP::NG : version 0.8.2.1. Bug correction in DBI configuration access

This commit is contained in:
Xavier Guimard 2007-05-15 04:31:10 +00:00
parent 046b90dbd9
commit 3b70838704
7 changed files with 32 additions and 17 deletions

View File

@ -9,7 +9,7 @@ Modify example to use nameVirtualHost instead of 127.0.0.x adresses
- Priority: Low Status: In progress Created: 2007\05\03 10-41-36
Modify install to make a running example as debian install
- Priority: Low Status: Planning Created: 2007\04\23 21-26-18
TLS in LDAP connection. SSL works, but start_tls cannot yet be called.
TLS in LDAP connections
- Priority: Low Status: N/A Created: 2007\04\21 13-14-55
Simplified manager interface fo rules:
* simplified regexp (* instead of .*,...)

View File

@ -2,8 +2,10 @@ lemonldap-ng (0.8.2.1) unstable; urgency=low
* More documentation
* Virtual host names control
* Portal can now use more than one LDAP server
* Bug in DBI.pm
-- Xavier Guimard <x.guimard@free.fr> Fri, 11 May 2007 09:49:20 +0200
-- Xavier Guimard <x.guimard@free.fr> Tue, 15 May 2007 06:19:23 +0200
lemonldap-ng (0.8.2) unstable; urgency=low

View File

@ -8,6 +8,10 @@ use Lemonldap::NG::Manager::Conf::Constants;
our $VERSION = 0.14;
BEGIN {
*Lemonldap::NG::Manager::Conf::dbh = \&dbh;
}
sub prereq {
my $self = shift;
unless ( $self->{dbiChain} ) {

View File

@ -2,7 +2,7 @@ package Lemonldap::NG::Manager::Help;
use AutoLoader qw(AUTOLOAD);
use UNIVERSAL qw(can);
our $VERSION = '0.33';
our $VERSION = '0.34';
sub import {
my ($caller_package) = caller;
@ -193,7 +193,9 @@ authentication is done by another system (SSL for example).</p>
<li>LDAP server : Name (or IP address) of the LDAP server. To use LDAPS, set
here&nbsp;:
<pre> ldaps://server/</pre>
and don't forget to change port (636 for example)</li>
and don't forget to change port (636 for example). You can specify more than
one server separated by commas. They will be tried in the specified order.
</li>
<li>LDAP account : optional, must be set if anonymous connection cannot
access to the wanted LDAP attributes. This account is used before LDAP
authentication to find user's dn&nbsp;;
@ -217,7 +219,10 @@ r&eacute;alis&eacute;e par un autre moyen (SSL par exemple).</p>
<li>Serveur LDAP : Nom (ou adresse IP) du serveur LDAP. Pour une connexion
LDAPS, indiquez ici&nbsp;:
<pre> ldaps://server/</pre>
et n'oubliez pas de changer le port (636 en g&eacute;n&eacute;ral)</li>
et n'oubliez pas de changer le port (636 en g&eacute;n&eacute;ral). Vous
pouvez indiquer plusieurs serveurs ici séparés par des virgules. Ils seront
testés dans l'ordre indiqué.
</li>
<li>Compte de connexion LDAP : optionnel, &agrave; renseigner si les attributs LDAP
utilis&eacute;s ne sont pas accessibles par une session anonyme. Ce compte est
utilis&eacute; avant l'authentification pour trouver le dn de l'utilisateur&nbsp;;

View File

@ -1,5 +1,8 @@
Revision history for Perl extension Lemonldap::NG::Portal.
0.74 Mon May 14 7:04:48 2007
- Multiple ldap servers can be used
0.73 Fri Apr 20 8:48:06 2007
- Bug fix in test (AuthCAS failed)

View File

@ -2,7 +2,7 @@ package Lemonldap::NG::Portal;
print STDERR
"See Lemonldap::NG::Portal(3) to know which Lemonldap::NG::Portal::* module to use.";
our $VERSION = "0.73";
our $VERSION = "0.74";
1;

View File

@ -13,7 +13,7 @@ use CGI::Cookie;
require POSIX;
use Lemonldap::NG::Portal::_i18n;
our $VERSION = '0.72';
our $VERSION = '0.74';
our @ISA = qw(CGI Exporter);
@ -263,15 +263,15 @@ sub formateFilter {
# 5. First LDAP connexion used to find user DN with the filter defined before.
sub connectLDAP {
my $self = shift;
return PE_LDAPCONNECTFAILED
unless (
$self->{ldap}
or $self->{ldap} = Net::LDAP->new(
$self->{ldapServer},
return PE_OK if ( $self->{ldap} );
foreach my $server ( split /[\s,]+/, $self->{ldapServer} ) {
last if $self->{ldap} = Net::LDAP->new(
$server,
port => $self->{ldapPort},
onerror => undef,
)
);
);
}
return PE_LDAPCONNECTFAILED unless ( $self->{ldap} );
PE_OK;
}
@ -457,7 +457,7 @@ Lemonldap::NG::Portal::Simple - Base module for building Lemonldap::NG compatibl
LockUserName => 'db_user',
LockPassword => 'db_password',
},
ldapServer => 'ldap.domaine.com',
ldapServer => 'ldap.domaine.com,ldap-backup.domaine.com',
securedCookie => 1,
exportedVars => ["uid","cn","mail","appli"],
);
@ -504,8 +504,9 @@ Lemonldap::Portal::* libraries.
=over
=item * ldapServer: server used to retrive session informations and to valid
credentials (localhost by default).
=item * ldapServer: server(s) used to retrive session informations and to valid
credentials (localhost by default). More than one server can be set here
separated by commas. The servers will be tested in the specifies order.
=item * ldapPort: tcp port used by ldap server.