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

* Inheritance instead of @EXPORT

Browse Source 
* Purge CGI::Session dependency (LA)
This commit is contained in:
Xavier Guimard 2010-02-26 10:53:43 +00:00
parent 7eefc6af1f
commit 58c28c5732
8 changed files with 10 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
build/lemonldap-ng/debian/control
View File

@ -5,10 +5,9 @@ Maintainer: Xavier Guimard <x.guimard@free.fr>
DM-Upload-Allowed: yes DM-Upload-Allowed: yes
Build-Depends: debhelper (>= 7), po-debconf Build-Depends: debhelper (>= 7), po-debconf
Build-Depends-Indep:libapache-session-perl, libnet-ldap-perl, libdbi-perl, Build-Depends-Indep:libapache-session-perl, libnet-ldap-perl, libdbi-perl,
libwww-perl, libcache-cache-perl, libcgi-session-perl, libcrypt-rijndael-perl, libwww-perl, libcache-cache-perl, libcrypt-rijndael-perl, libxml-libxslt-perl,
libxml-libxslt-perl, libio-string-perl, libregexp-assemble-perl, liburi-perl, libio-string-perl, libregexp-assemble-perl, liburi-perl, libstring-random-perl,
libstring-random-perl, libmime-lite-perl, libsoap-lite-perl, libmime-lite-perl, libsoap-lite-perl, libconfig-inifiles-perl
libconfig-inifiles-perl
Standards-Version: 3.8.3 Standards-Version: 3.8.3
Homepage: http://lemonldap.ow2.org/ Homepage: http://lemonldap.ow2.org/
@ -79,7 +78,7 @@ Depends: ${misc:Depends}, libapache-session-perl, libnet-ldap-perl,
libxml-libxml-perl, libxml-libxslt-perl, libstring-random-perl, libxml-libxml-perl, libxml-libxslt-perl, libstring-random-perl,
libsoap-lite-perl libsoap-lite-perl
Recommends: libmime-lite-perl, libemail-date-format-perl Recommends: libmime-lite-perl, libemail-date-format-perl
Suggests: liblasso-perl, libcgi-session-perl, slapd Suggests: liblasso-perl, slapd
Description: Lemonldap::NG authentication portal part Description: Lemonldap::NG authentication portal part
Lemonldap::NG is a complete Web-SSO system that can run with reverse-proxies Lemonldap::NG is a complete Web-SSO system that can run with reverse-proxies
or directly on application Apache servers. or directly on application Apache servers.

1
modules/lemonldap-ng-portal/META.yml
View File

@ -13,7 +13,6 @@ build_requires:
requires: requires:
Apache::Session: 0 Apache::Session: 0
CGI: 3.08 CGI: 3.08
CGI::Session: 0
HTML::Template: 0 HTML::Template: 0
IO::String: 0 IO::String: 0
Lemonldap::NG::Common: 0.93 Lemonldap::NG::Common: 0.93

1
modules/lemonldap-ng-portal/Makefile.PL
View File

@ -19,7 +19,6 @@ WriteMakefile(
'Apache::Session' => 0, 'Apache::Session' => 0,
'Net::LDAP' => 0, 'Net::LDAP' => 0,
'CGI' => 3.08, 'CGI' => 3.08,
'CGI::Session' => 0,
'HTML::Template' => 0, 'HTML::Template' => 0,
'Lemonldap::NG::Common' => 0.93, 'Lemonldap::NG::Common' => 0.93,
'Lemonldap::NG::Handler' => 0.91, 'Lemonldap::NG::Handler' => 0.91,

1
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthSAML.pm
View File

@ -11,6 +11,7 @@ use Lemonldap::NG::Portal::_SAML; #inherits
use Lemonldap::NG::Common::Conf::SAML::Metadata; use Lemonldap::NG::Common::Conf::SAML::Metadata;
our $VERSION = '0.1'; our $VERSION = '0.1';
our @ISA = qw(Lemonldap::NG::Portal::_SAML);
## @apmethod int authInit() ## @apmethod int authInit()
# Load Lasso and metadata # Load Lasso and metadata

2
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/IssuerDBSAML.pm
View File

@ -7,6 +7,8 @@ package Lemonldap::NG::Portal::IssuerDBSAML;
use strict; use strict;
use Lemonldap::NG::Portal::Simple; use Lemonldap::NG::Portal::Simple;
use Lemonldap::NG::Portal::_SAML;
our @ISA = qw(Lemonldap::NG::Portal::_SAML);
our $VERSION = '0.01'; our $VERSION = '0.01';

1
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm
View File

@ -138,6 +138,7 @@ our $self; # Safe cannot share a variable declared with my
#@return Lemonldap::NG::Portal::Simple object #@return Lemonldap::NG::Portal::Simple object
sub new { sub new {
@ISA = qw(Lemonldap::NG::Common::CGI Exporter);
binmode( STDOUT, ":utf8" ); binmode( STDOUT, ":utf8" );
my $class = shift; my $class = shift;
return $class if ( ref($class) ); return $class if ( ref($class) );

2
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/UserDBSAML.pm
View File

@ -7,6 +7,8 @@ package Lemonldap::NG::Portal::UserDBSAML;
use strict; use strict;
use Lemonldap::NG::Portal::Simple; use Lemonldap::NG::Portal::Simple;
use Lemonldap::NG::Portal::_SAML;
our @ISA = qw(Lemonldap::NG::Portal::_SAML);
our $VERSION = '0.01'; our $VERSION = '0.01';

14
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/_SAML.pm
View File

@ -6,25 +6,11 @@
package Lemonldap::NG::Portal::_SAML; package Lemonldap::NG::Portal::_SAML;
use strict; use strict;
use base qw(Exporter);
use XML::Simple; use XML::Simple;
use MIME::Base64; use MIME::Base64;
use LWP::UserAgent; # SOAP call use LWP::UserAgent; # SOAP call
use HTTP::Request; # SOAP call use HTTP::Request; # SOAP call
our @EXPORT = qw(
loadLasso checkLassoError createServer addIDP addProvider getOrganizationName
createAuthnRequest createLogin getHttpMethod initAuthnRequest
buildAuthnRequestMsg processAuthnResponseMsg getNameIdentifier
createIdentity createSession acceptSSO
storeRelayState extractRelayState
getAssertion getAttributeValue validateConditions
createLogoutRequest createLogout initLogoutRequest buildLogoutRequestMsg
setSessionFromDump getMetaDataURL processLogoutResponseMsg processLogoutRequestMsg
validateLogoutRequest buildLogoutResponseMsg replayProtection
resolveArtifact processArtResponseMsg sendSOAPMessage
);
our $VERSION = '0.01'; our $VERSION = '0.01';
our $_samlCache; our $_samlCache;