dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Manage CAS URLs (#101)

Browse Source
This commit is contained in:
Clément Oudot 2010-08-23 16:41:38 +00:00
parent 5877fa95d6
commit c6c8024326
3 changed files with 35 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
build/lemonldap-ng/_example/etc/portal-apache.conf
View File

@ -59,6 +59,12 @@
RewriteRule ^/saml/.* /index.pl
</IfModule>
# CAS
<IfModule mod_rewrite.c>
RewriteEngine On
RewriteRule ^/cas/.* /index.pl
</IfModule>
</VirtualHost>
# Best performance under ModPerl::Registry

6
build/lemonldap-ng/_example/etc/portal-apache2.conf
View File

@ -59,6 +59,12 @@
RewriteRule ^/saml/.* /index.pl
</IfModule>
# CAS
<IfModule mod_rewrite.c>
RewriteEngine On
RewriteRule ^/cas/.* /index.pl
</IfModule>
</VirtualHost>
# Best performance under ModPerl::Registry

27
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/IssuerDBCAS.pm
View File

@ -11,7 +11,7 @@ use Lemonldap::NG::Portal::Simple;
our $VERSION = '0.01';
## @method void issuerDBInit()
# TODO
# Nothing to do
# @return Lemonldap::NG::Portal error code
sub issuerDBInit {
my $self = shift;
@ -19,18 +19,36 @@ sub issuerDBInit {
}
## @apmethod int issuerForUnAuthUser()
# TODO
# Manage CAS request for unauthenticated user
# @return Lemonldap::NG::Portal error code
sub issuerForUnAuthUser {
my $self = shift;
# CAS URLs
my $cas_login_url = $self->{portal} . '/cas/login';
my $cas_logout_url = $self->{portal} . '/cas/logout';
my $cas_validate_url = $self->{portal} . '/cas/validate';
my $cas_serviceValidate_url = $self->{portal} . '/cas/serviceValidate';
my $cas_proxyValidate_url = $self->{portal} . '/cas/proxyValidate';
my $cas_proxy_url = $self->{portal} . '/cas/proxy';
PE_OK;
}
## @apmethod int issuerForAuthUser()
# TODO
# Manage CAS request for unauthenticated user
# @return Lemonldap::NG::Portal error code
sub issuerForAuthUser {
my $self = shift;
# CAS URLs
my $cas_login_url = $self->{portal} . '/cas/login';
my $cas_logout_url = $self->{portal} . '/cas/logout';
my $cas_validate_url = $self->{portal} . '/cas/validate';
my $cas_serviceValidate_url = $self->{portal} . '/cas/serviceValidate';
my $cas_proxyValidate_url = $self->{portal} . '/cas/proxyValidate';
my $cas_proxy_url = $self->{portal} . '/cas/proxy';
PE_OK;
}
@ -38,6 +56,7 @@ sub issuerForAuthUser {
# Do nothing
# @return Lemonldap::NG::Portal error code
sub issuerLogout {
my $self = shift;
PE_OK;
}
@ -62,7 +81,7 @@ http://www.jasig.org/cas/protocol
=head1 AUTHOR
Clement OUDOT, E<lt>clement@oodo.,etE<gt>
Clement OUDOT, E<lt>clement@oodo.netE<gt>
=head1 COPYRIGHT AND LICENSE