LEMONLDAP::NG : version 0.8.2.1. Bug correction in DBI configuration access
This commit is contained in:
parent
046b90dbd9
commit
3b70838704
|
@ -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
|
- Priority: Low Status: In progress Created: 2007\05\03 10-41-36
|
||||||
Modify install to make a running example as debian install
|
Modify install to make a running example as debian install
|
||||||
- Priority: Low Status: Planning Created: 2007\04\23 21-26-18
|
- 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
|
- Priority: Low Status: N/A Created: 2007\04\21 13-14-55
|
||||||
Simplified manager interface fo rules:
|
Simplified manager interface fo rules:
|
||||||
* simplified regexp (* instead of .*,...)
|
* simplified regexp (* instead of .*,...)
|
||||||
|
|
|
@ -2,8 +2,10 @@ lemonldap-ng (0.8.2.1) unstable; urgency=low
|
||||||
|
|
||||||
* More documentation
|
* More documentation
|
||||||
* Virtual host names control
|
* 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
|
lemonldap-ng (0.8.2) unstable; urgency=low
|
||||||
|
|
||||||
|
|
|
@ -8,6 +8,10 @@ use Lemonldap::NG::Manager::Conf::Constants;
|
||||||
|
|
||||||
our $VERSION = 0.14;
|
our $VERSION = 0.14;
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
*Lemonldap::NG::Manager::Conf::dbh = \&dbh;
|
||||||
|
}
|
||||||
|
|
||||||
sub prereq {
|
sub prereq {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
unless ( $self->{dbiChain} ) {
|
unless ( $self->{dbiChain} ) {
|
||||||
|
|
|
@ -2,7 +2,7 @@ package Lemonldap::NG::Manager::Help;
|
||||||
|
|
||||||
use AutoLoader qw(AUTOLOAD);
|
use AutoLoader qw(AUTOLOAD);
|
||||||
use UNIVERSAL qw(can);
|
use UNIVERSAL qw(can);
|
||||||
our $VERSION = '0.33';
|
our $VERSION = '0.34';
|
||||||
|
|
||||||
sub import {
|
sub import {
|
||||||
my ($caller_package) = caller;
|
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
|
<li>LDAP server : Name (or IP address) of the LDAP server. To use LDAPS, set
|
||||||
here :
|
here :
|
||||||
<pre> ldaps://server/</pre>
|
<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
|
<li>LDAP account : optional, must be set if anonymous connection cannot
|
||||||
access to the wanted LDAP attributes. This account is used before LDAP
|
access to the wanted LDAP attributes. This account is used before LDAP
|
||||||
authentication to find user's dn ;
|
authentication to find user's dn ;
|
||||||
|
@ -217,7 +219,10 @@ réalisée par un autre moyen (SSL par exemple).</p>
|
||||||
<li>Serveur LDAP : Nom (ou adresse IP) du serveur LDAP. Pour une connexion
|
<li>Serveur LDAP : Nom (ou adresse IP) du serveur LDAP. Pour une connexion
|
||||||
LDAPS, indiquez ici :
|
LDAPS, indiquez ici :
|
||||||
<pre> ldaps://server/</pre>
|
<pre> ldaps://server/</pre>
|
||||||
et n'oubliez pas de changer le port (636 en général)</li>
|
et n'oubliez pas de changer le port (636 en géné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, à renseigner si les attributs LDAP
|
<li>Compte de connexion LDAP : optionnel, à renseigner si les attributs LDAP
|
||||||
utilisés ne sont pas accessibles par une session anonyme. Ce compte est
|
utilisés ne sont pas accessibles par une session anonyme. Ce compte est
|
||||||
utilisé avant l'authentification pour trouver le dn de l'utilisateur ;
|
utilisé avant l'authentification pour trouver le dn de l'utilisateur ;
|
||||||
|
|
|
@ -1,5 +1,8 @@
|
||||||
Revision history for Perl extension Lemonldap::NG::Portal.
|
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
|
0.73 Fri Apr 20 8:48:06 2007
|
||||||
- Bug fix in test (AuthCAS failed)
|
- Bug fix in test (AuthCAS failed)
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,7 @@ package Lemonldap::NG::Portal;
|
||||||
|
|
||||||
print STDERR
|
print STDERR
|
||||||
"See Lemonldap::NG::Portal(3) to know which Lemonldap::NG::Portal::* module to use.";
|
"See Lemonldap::NG::Portal(3) to know which Lemonldap::NG::Portal::* module to use.";
|
||||||
our $VERSION = "0.73";
|
our $VERSION = "0.74";
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
||||||
|
|
|
@ -13,7 +13,7 @@ use CGI::Cookie;
|
||||||
require POSIX;
|
require POSIX;
|
||||||
use Lemonldap::NG::Portal::_i18n;
|
use Lemonldap::NG::Portal::_i18n;
|
||||||
|
|
||||||
our $VERSION = '0.72';
|
our $VERSION = '0.74';
|
||||||
|
|
||||||
our @ISA = qw(CGI Exporter);
|
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.
|
# 5. First LDAP connexion used to find user DN with the filter defined before.
|
||||||
sub connectLDAP {
|
sub connectLDAP {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
return PE_LDAPCONNECTFAILED
|
return PE_OK if ( $self->{ldap} );
|
||||||
unless (
|
foreach my $server ( split /[\s,]+/, $self->{ldapServer} ) {
|
||||||
$self->{ldap}
|
last if $self->{ldap} = Net::LDAP->new(
|
||||||
or $self->{ldap} = Net::LDAP->new(
|
$server,
|
||||||
$self->{ldapServer},
|
|
||||||
port => $self->{ldapPort},
|
port => $self->{ldapPort},
|
||||||
onerror => undef,
|
onerror => undef,
|
||||||
)
|
);
|
||||||
);
|
}
|
||||||
|
return PE_LDAPCONNECTFAILED unless ( $self->{ldap} );
|
||||||
PE_OK;
|
PE_OK;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -457,7 +457,7 @@ Lemonldap::NG::Portal::Simple - Base module for building Lemonldap::NG compatibl
|
||||||
LockUserName => 'db_user',
|
LockUserName => 'db_user',
|
||||||
LockPassword => 'db_password',
|
LockPassword => 'db_password',
|
||||||
},
|
},
|
||||||
ldapServer => 'ldap.domaine.com',
|
ldapServer => 'ldap.domaine.com,ldap-backup.domaine.com',
|
||||||
securedCookie => 1,
|
securedCookie => 1,
|
||||||
exportedVars => ["uid","cn","mail","appli"],
|
exportedVars => ["uid","cn","mail","appli"],
|
||||||
);
|
);
|
||||||
|
@ -504,8 +504,9 @@ Lemonldap::Portal::* libraries.
|
||||||
|
|
||||||
=over
|
=over
|
||||||
|
|
||||||
=item * ldapServer: server used to retrive session informations and to valid
|
=item * ldapServer: server(s) used to retrive session informations and to valid
|
||||||
credentials (localhost by default).
|
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.
|
=item * ldapPort: tcp port used by ldap server.
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue