## @file
# Relay authentication module
## @class
# Relay authentication module: It simply call another Lemonldap::NG portal by
# SOAP using credentials
package Lemonldap::NG::Portal::AuthRelay;
use strict;
use Lemonldap::NG::Portal::_Relay;
use Lemonldap::NG::Portal::_WebForm;
use Lemonldap::NG::Portal::Simple;
use base qw(Lemonldap::NG::Portal::_WebForm Lemonldap::NG::Portal::_Relay);
our $VERSION = '0.1';
## @apmethod int authInit()
# Call Lemonldap::NG::Portal::_Relay::relayInit();
# @return Lemonldap::NG::Portal constant
*authInit = *Lemonldap::NG::Portal::_Relay::relayInit;
## @apmethod int authenticate()
# Call Lemonldap::NG::Portal::_Relay::relayQuery()
# @return Lemonldap::NG::Portal constant
*authenticate = *Lemonldap::NG::Portal::_Relay::relayQuery;
## @apmethod int setAuthSessionInfo()
# Call Lemonldap::NG::Portal::_Relay::setSessionInfo()
# @return Lemonldap::NG::Portal constant
*setAuthSessionInfo = *Lemonldap::NG::Portal::_Relay::setSessionInfo;
1;
__END__
=head1 NAME
Lemonldap::NG::Portal::AuthRelay - Authentication module for Lemonldap::NG
that delegates authentication to a remote Lemonldap::NG portal.
=head1 SYNOPSIS
use Lemonldap::NG::Portal::Simple;
my $portal = new Lemonldap::NG::Portal::Simple(
# AUTHENTICATION PART
authentication => 'Relay',
);
=head1 DESCRIPTION
Authentication module for Lemonldap::NG portal that forward credentials to a
remote portal using SOAP.
=head1 SEE ALSO
L
L
=head1 AUTHOR
Xavier Guimard, Ex.guimard@free.frE
=head1 COPYRIGHT AND LICENSE
Copyright (C) 2009 by Xavier Guimard
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.10.0 or,
at your option, any later version of Perl 5 you may have available.
=cut