Commit 660fb59d authored by Clément OUDOT's avatar Clément OUDOT

List of overloaded methods to develop

git-svn-id: svn://svn.forge.objectweb.org/svnroot/lemonldap/trunk@73 1dbb9719-a921-0410-b57f-c3a383c2c641
parent 7c77ff47
......@@ -24,48 +24,100 @@ our @ISA = qw(Lemonldap::NG::Portal::SharedConf);
# Overloaded methods
#==============================================================================
# Main process as described in Portal::Simple module
# 1. Retrieve source URL
# Not overloaded
# 2. Control existing sessions
# Not overloaded
# 3. Retrieve user credentials
# Test here if the user was authenticated by IdP
sub extractFormInfo {
# extraction des données du XML s'il est présent, sinon
# on appelle la routine normale. Si on est pas en LA,
# toutes les routines suivantes doivent lancer le
# procédé normal ($self->SUPER::extractFormInfo)
# IdP redirect
return PE_OK;
}
# 4. LDAP format filter for attributes reading
# We must retrive user DN in SAML response
# Or use WSF to retrieve attributes
sub formateFilter {
# If user is authenticated with LA, it's OK
return PE_OK;
}
my $self = shift;
sub connectLDAP {
# If user is authenticated with LA, abort LDAP connection
return PE_OK;
}
# Get DN in SAML response (TODO)
my $dn = "uid=clement,ou=personnes,dc=linagora,dc=com";
sub bind {
# No need to bind
return PE_OK;
}
# Explode DN to build RDN
my @rdn = split /,/ , $dn;
$self->{filter}="(".shift(@rdn).")";
sub search {
# vérifie la chaîne de confiance LA
return PE_OK;
}
sub setSessionInfo {
# We have to get user information here
# Use disco service with attribute provider ?
# 5. LDAP connection
# Overload only if WSF is used to retrieve attributes
#sub connectLDAP {
# return PE_OK;
#}
# 6. LDAP bind (with Directory Manager or anonymous)
# Overload only if WSF is used to retrieve attributes
#sub bind {
# return PE_OK;
#}
# 7. Search the DN
# Overload only if WSF is used to retrieve attributes
#sub search {
# return PE_OK;
#}
# 8. Load parameters
# Overload only if WSF is used to retrieve attributes
#sub setSessionInfo {
# # Use WSF to get "exprotedVars"
# return PE_OK;
#}
# 9. Set macros
# Not overloaded
# 10. Set groups
# Not overloaded
# 11. LDAP unbind
# Overload only if WSF is used to retrieve attributes
#sub unbind {
# return PE_OK;
#}
# 12. Authentication
# Authentication is done by IdP, so we disable this step
sub authenticate {
return PE_OK;
}
sub unbind {
# No need to unbind
return PE_OK;
}
# 13. Store parameters in session
# Not overloaded
# 14. Build cookie
# Not overloaded
# 15. Log
# Not overloaded
# 16. Redirection
# Not overloaded
1;
__END__
=head1 NAME
Lemonldap::NG::Portal::SharedConf::LA - Provide Liberty Alliance Authentication
Lemonldap::NG::Portal::AuthLA - Provide Liberty Alliance Authentication
=head1 SYNOPSIS
......@@ -78,7 +130,7 @@ L<Lemonldap::NG::Handler>, L<Lemonldap::NG::Manager>
=head1 AUTHOR
Xavier Guimard, E<lt>x.guimard@free.frE<gt>
Clement Oudot, E<lt>coudot@linagora.comE<gt>
=head1 COPYRIGHT AND LICENSE
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment