Change CDA parameter to cda.

This commit is contained in:
Xavier Guimard 2009-06-15 14:13:09 +00:00
parent e06976c642
commit 36c9aa2409
5 changed files with 10 additions and 16 deletions

View File

@ -36,10 +36,11 @@ cross-domain-authentication mechanism and generates the cookie
=cut
use Lemonldap::NG::Portal::CDA;
use Lemonldap::NG::Portal::SharedConf;
my $portal = Lemonldap::NG::Portal::CDA->new(
my $portal = Lemonldap::NG::Portal::SharedConf->new(
{
cda => 1,
# SUBROUTINES OVERLOAD
# 2 cases :
# 1 - If LDAP search is not needed (the master SSO gives all

View File

@ -480,11 +480,6 @@ Liberty-Alliance mechanisms to authenticate users
to read portal configuration from a central database. It inherits from
L<Lemonldap::NG::Portal::Simple>. It's the more used module.
=item * L<Lemonldap::NG::Portal::CDA>: this module inherits from
L<Lemonldap::NG::Portal::SharedConf> and provides the capability to use
handlers in different domains that the portal itself. See
L<Lemonldap::NG::Portal::CDA> for more.
=back
=head1 SEE ALSO

View File

@ -3,7 +3,7 @@ package Lemonldap::NG::Portal::CDA;
use strict;
use Lemonldap::NG::Portal::SharedConf qw(:all);
our $VERSION = '0.05';
our $VERSION = '0.1';
use base ('Lemonldap::NG::Portal::SharedConf');
*EXPORT_OK = *Lemonldap::NG::Portal::SharedConf::EXPORT_OK;
@ -17,7 +17,7 @@ use base ('Lemonldap::NG::Portal::SharedConf');
sub new {
my $class = shift;
my $self = $class->SUPER::new(@_);
$self->{CDA} = 1;
$self->{cda} = 1;
return $self;
}
@ -33,6 +33,7 @@ compatible portals with Cross Domain Authentication.
use Lemonldap::NG::Portal::SharedConf;
my $portal = new Lemonldap::NG::Portal::SharedConf( {
cda => 1,
configStorage => {
type => 'DBI',
dbiChain => "dbi:mysql:...",
@ -76,11 +77,8 @@ Modify your httpd.conf:
=head1 DESCRIPTION
This library just overload few methods of L<Lemonldap::NG::Portal::SharedConf>
to add Cross Domain Authentication. Handlers that are not used in the same
domain than the portal must inherit from L<Lemonldap::NG::Handler::CDA>.
See L<Lemonldap::NG::Portal::SharedConf> for usage and other methods.
This file is maintened only for compatibility. Now set "cda => 1" in the
portal.
=head1 SEE ALSO

View File

@ -889,7 +889,7 @@ sub autoRedirect {
{
# Cross-domain mechanism
if ( $self->{CDA}
if ( $self->{cda}
and $self->{id}
and $self->{urldc} !~ m#^https?://[^/]*$self->{domain}/#oi )
{

View File

@ -34,5 +34,5 @@ ok(
'Portal object'
);
ok( $p->{CDA}, 'CDA is set' );
ok( $p->{cda}, 'CDA is set' );