Update versions
This commit is contained in:
parent
1584b3bcc4
commit
7ac07074ae
|
@ -1,6 +1,6 @@
|
||||||
package Lemonldap::NG::Common;
|
package Lemonldap::NG::Common;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
|
|
|
@ -15,7 +15,7 @@ use Lemonldap::NG::Common::Apache::Session::Serialize::JSON;
|
||||||
use Lemonldap::NG::Common::Apache::Session::Store;
|
use Lemonldap::NG::Common::Apache::Session::Store;
|
||||||
use Lemonldap::NG::Common::Apache::Session::Lock;
|
use Lemonldap::NG::Common::Apache::Session::Lock;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub _load {
|
sub _load {
|
||||||
my ( $backend, $func ) = @_;
|
my ( $backend, $func ) = @_;
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Common::Apache::Session::SOAP;
|
||||||
use strict;
|
use strict;
|
||||||
use SOAP::Lite;
|
use SOAP::Lite;
|
||||||
|
|
||||||
our $VERSION = '1.4.1';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
#parameter proxy Url of SOAP service
|
#parameter proxy Url of SOAP service
|
||||||
#parameter proxyOptions SOAP::Lite options
|
#parameter proxyOptions SOAP::Lite options
|
||||||
|
|
|
@ -4,7 +4,7 @@ use strict;
|
||||||
use vars qw($VERSION);
|
use vars qw($VERSION);
|
||||||
use JSON;
|
use JSON;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub serialize {
|
sub serialize {
|
||||||
my $session = shift;
|
my $session = shift;
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
|
|
||||||
package Lemonldap::NG::Common::Apache::Session::Store;
|
package Lemonldap::NG::Common::Apache::Session::Store;
|
||||||
|
|
||||||
our $VERSION = 1.4.0;
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub new {
|
sub new {
|
||||||
my $class = shift;
|
my $class = shift;
|
||||||
|
|
|
@ -17,7 +17,7 @@ use Net::CIDR::Lite;
|
||||||
|
|
||||||
#parameter syslog Indicates syslog facility for logging user actions
|
#parameter syslog Indicates syslog facility for logging user actions
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our $_SUPER;
|
our $_SUPER;
|
||||||
our @ISA;
|
our @ISA;
|
||||||
|
|
||||||
|
|
|
@ -11,7 +11,7 @@ use SOAP::Transport::HTTP;
|
||||||
use base qw(SOAP::Transport::HTTP::Server);
|
use base qw(SOAP::Transport::HTTP::Server);
|
||||||
use bytes;
|
use bytes;
|
||||||
|
|
||||||
our $VERSION = '1.0.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method protected void DESTROY()
|
## @method protected void DESTROY()
|
||||||
# Call SOAP::Trace::objects().
|
# Call SOAP::Trace::objects().
|
||||||
|
|
|
@ -7,7 +7,7 @@ package Lemonldap::NG::Common::CGI::SOAPService;
|
||||||
|
|
||||||
require SOAP::Lite;
|
require SOAP::Lite;
|
||||||
|
|
||||||
our $VERSION = '1.0.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @cmethod Lemonldap::NG::Common::CGI::SOAPService new(object obj,string @func)
|
## @cmethod Lemonldap::NG::Common::CGI::SOAPService new(object obj,string @func)
|
||||||
# Constructor
|
# Constructor
|
||||||
|
|
|
@ -6,7 +6,7 @@
|
||||||
|
|
||||||
package Lemonldap::NG::Common::Captcha;
|
package Lemonldap::NG::Common::Captcha;
|
||||||
|
|
||||||
our $VERSION = 1.4.0;
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Common::Session;
|
use Lemonldap::NG::Common::Session;
|
||||||
|
|
|
@ -23,7 +23,7 @@ use Config::IniFiles;
|
||||||
#inherits Lemonldap::NG::Common::Conf::SOAP
|
#inherits Lemonldap::NG::Common::Conf::SOAP
|
||||||
#inherits Lemonldap::NG::Common::Conf::LDAP
|
#inherits Lemonldap::NG::Common::Conf::LDAP
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
our $msg = '';
|
our $msg = '';
|
||||||
our $iniObj;
|
our $iniObj;
|
||||||
|
|
||||||
|
|
|
@ -5,7 +5,7 @@ use utf8;
|
||||||
use JSON;
|
use JSON;
|
||||||
use Lemonldap::NG::Common::Conf::_DBI;
|
use Lemonldap::NG::Common::Conf::_DBI;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Common::Conf::_DBI);
|
our @ISA = qw(Lemonldap::NG::Common::Conf::_DBI);
|
||||||
|
|
||||||
sub store {
|
sub store {
|
||||||
|
|
|
@ -5,7 +5,7 @@ use strict;
|
||||||
use Exporter 'import';
|
use Exporter 'import';
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# CONSTANTS
|
# CONSTANTS
|
||||||
|
|
||||||
|
|
|
@ -5,7 +5,7 @@ use utf8;
|
||||||
use Lemonldap::NG::Common::Conf::Serializer;
|
use Lemonldap::NG::Common::Conf::Serializer;
|
||||||
use Lemonldap::NG::Common::Conf::_DBI;
|
use Lemonldap::NG::Common::Conf::_DBI;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Common::Conf::_DBI);
|
our @ISA = qw(Lemonldap::NG::Common::Conf::_DBI);
|
||||||
|
|
||||||
sub store {
|
sub store {
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
# This file is generated by Lemonldap::NG::Manager::Build. Don't modify it by hand
|
# This file is generated by Lemonldap::NG::Manager::Build. Don't modify it by hand
|
||||||
package Lemonldap::NG::Common::Conf::DefaultValues;
|
package Lemonldap::NG::Common::Conf::DefaultValues;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub defaultValues {
|
sub defaultValues {
|
||||||
return {
|
return {
|
||||||
|
|
|
@ -5,7 +5,7 @@ use Lemonldap::NG::Common::Conf::Constants; #inherits
|
||||||
use JSON;
|
use JSON;
|
||||||
use Encode;
|
use Encode;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
sub Lemonldap::NG::Common::Conf::_lock {
|
sub Lemonldap::NG::Common::Conf::_lock {
|
||||||
|
|
|
@ -12,7 +12,7 @@ use Lemonldap::NG::Common::Conf::Constants; #inherits
|
||||||
use Lemonldap::NG::Common::Conf::Serializer;
|
use Lemonldap::NG::Common::Conf::Serializer;
|
||||||
use Encode;
|
use Encode;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
*Lemonldap::NG::Common::Conf::ldap = \&ldap;
|
*Lemonldap::NG::Common::Conf::ldap = \&ldap;
|
||||||
|
|
|
@ -5,7 +5,7 @@ use utf8;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Common::Conf::Serializer;
|
use Lemonldap::NG::Common::Conf::Serializer;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
sub prereq {
|
sub prereq {
|
||||||
|
|
|
@ -5,7 +5,7 @@ use utf8;
|
||||||
use Lemonldap::NG::Common::Conf::Serializer;
|
use Lemonldap::NG::Common::Conf::Serializer;
|
||||||
use Lemonldap::NG::Common::Conf::_DBI;
|
use Lemonldap::NG::Common::Conf::_DBI;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Common::Conf::_DBI);
|
our @ISA = qw(Lemonldap::NG::Common::Conf::_DBI);
|
||||||
|
|
||||||
sub store {
|
sub store {
|
||||||
|
|
|
@ -17,7 +17,7 @@ use XML::Simple;
|
||||||
use Safe;
|
use Safe;
|
||||||
use Encode;
|
use Encode;
|
||||||
|
|
||||||
our $VERSION = '1.2.1';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @cmethod Lemonldap::NG::Common::Conf::SAML::Metadata new(hashRef args)
|
## @cmethod Lemonldap::NG::Common::Conf::SAML::Metadata new(hashRef args)
|
||||||
# Class constructor.
|
# Class constructor.
|
||||||
|
|
|
@ -4,7 +4,7 @@ use strict;
|
||||||
use utf8;
|
use utf8;
|
||||||
use SOAP::Lite;
|
use SOAP::Lite;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
#parameter proxy Url of SOAP service
|
#parameter proxy Url of SOAP service
|
||||||
#parameter proxyOptions SOAP::Lite parameters
|
#parameter proxyOptions SOAP::Lite parameters
|
||||||
|
|
|
@ -6,7 +6,7 @@ use Encode;
|
||||||
use JSON;
|
use JSON;
|
||||||
use Lemonldap::NG::Common::Conf::Constants;
|
use Lemonldap::NG::Common::Conf::Constants;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
*Lemonldap::NG::Common::Conf::normalize = \&normalize;
|
*Lemonldap::NG::Common::Conf::normalize = \&normalize;
|
||||||
|
|
|
@ -5,7 +5,7 @@ use utf8;
|
||||||
use DBI;
|
use DBI;
|
||||||
use Lemonldap::NG::Common::Conf::Constants; #inherits
|
use Lemonldap::NG::Common::Conf::Constants; #inherits
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Common::Conf::Constants);
|
our @ISA = qw(Lemonldap::NG::Common::Conf::Constants);
|
||||||
our ( @EXPORT, %EXPORT_TAGS );
|
our ( @EXPORT, %EXPORT_TAGS );
|
||||||
|
|
||||||
|
|
|
@ -14,7 +14,7 @@ use MIME::Base64;
|
||||||
use Digest::MD5 qw(md5);
|
use Digest::MD5 qw(md5);
|
||||||
use bytes;
|
use bytes;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
our $msg;
|
our $msg;
|
||||||
|
|
||||||
|
|
|
@ -15,7 +15,7 @@ use Scalar::Util 'weaken';
|
||||||
#inherits Lemonldap::NG::Common::Notification::DBI
|
#inherits Lemonldap::NG::Common::Notification::DBI
|
||||||
#inherits Lemonldap::NG::Common::Notification::File
|
#inherits Lemonldap::NG::Common::Notification::File
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
our ( $msg, $parser );
|
our ( $msg, $parser );
|
||||||
|
|
||||||
## @cmethod Lemonldap::NG::Common::Notification new(hashref storage)
|
## @cmethod Lemonldap::NG::Common::Notification new(hashref storage)
|
||||||
|
|
|
@ -10,7 +10,7 @@ use Time::Local;
|
||||||
use DBI;
|
use DBI;
|
||||||
use utf8;
|
use utf8;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method boolean prereq()
|
## @method boolean prereq()
|
||||||
# Check if DBI parameters are set.
|
# Check if DBI parameters are set.
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Common::Notification::File;
|
||||||
use strict;
|
use strict;
|
||||||
use MIME::Base64;
|
use MIME::Base64;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method boolean prereq()
|
## @method boolean prereq()
|
||||||
# Check if parameters are set and if storage directory exists.
|
# Check if parameters are set and if storage directory exists.
|
||||||
|
|
|
@ -12,7 +12,7 @@ use MIME::Base64;
|
||||||
use Net::LDAP;
|
use Net::LDAP;
|
||||||
use utf8;
|
use utf8;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method boolean prereq()
|
## @method boolean prereq()
|
||||||
# Check if LDAP parameters are set.
|
# Check if LDAP parameters are set.
|
||||||
|
|
|
@ -6,7 +6,7 @@ use JSON;
|
||||||
use Lemonldap::NG::Common::PSGI::Constants;
|
use Lemonldap::NG::Common::PSGI::Constants;
|
||||||
use Lemonldap::NG::Common::PSGI::Request;
|
use Lemonldap::NG::Common::PSGI::Request;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
our $_json = JSON->new->allow_nonref;
|
our $_json = JSON->new->allow_nonref;
|
||||||
|
|
||||||
|
|
|
@ -4,7 +4,7 @@ use strict;
|
||||||
use Exporter 'import';
|
use Exporter 'import';
|
||||||
|
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# CONSTANTS
|
# CONSTANTS
|
||||||
|
|
||||||
|
|
|
@ -5,7 +5,7 @@ use Mouse;
|
||||||
use JSON;
|
use JSON;
|
||||||
use URI::Escape;
|
use URI::Escape;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# http :// server / path ? query # fragment
|
# http :// server / path ? query # fragment
|
||||||
# m|(?:([^:/?#]+):)?(?://([^/?#]*))?([^?#]*)(?:\?([^#]*))?(?:#(.*))?|;
|
# m|(?:([^:/?#]+):)?(?://([^/?#]*))?([^?#]*)(?:\?([^#]*))?(?:#(.*))?|;
|
||||||
|
|
|
@ -4,7 +4,7 @@ use Mouse;
|
||||||
use Lemonldap::NG::Common::PSGI;
|
use Lemonldap::NG::Common::PSGI;
|
||||||
use Lemonldap::NG::Common::PSGI::Constants;
|
use Lemonldap::NG::Common::PSGI::Constants;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Common::PSGI';
|
extends 'Lemonldap::NG::Common::PSGI';
|
||||||
|
|
||||||
|
|
|
@ -10,7 +10,7 @@ use base qw(Safe);
|
||||||
use constant SAFEWRAP => ( Safe->can("wrap_code_ref") ? 1 : 0 );
|
use constant SAFEWRAP => ( Safe->can("wrap_code_ref") ? 1 : 0 );
|
||||||
use Scalar::Util 'weaken';
|
use Scalar::Util 'weaken';
|
||||||
|
|
||||||
our $VERSION = 1.4.0;
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
our $self; # Safe cannot share a variable declared with my
|
our $self; # Safe cannot share a variable declared with my
|
||||||
|
|
||||||
|
|
|
@ -11,7 +11,7 @@ use MIME::Base64;
|
||||||
|
|
||||||
#use AutoLoader qw(AUTOLOAD);
|
#use AutoLoader qw(AUTOLOAD);
|
||||||
|
|
||||||
our $VERSION = '1.4.6';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# Set here all the names of functions that must be available in Safe objects.
|
# Set here all the names of functions that must be available in Safe objects.
|
||||||
# Not that only functions, not methods, can be written here
|
# Not that only functions, not methods, can be written here
|
||||||
|
|
|
@ -6,7 +6,7 @@
|
||||||
|
|
||||||
package Lemonldap::NG::Common::Session;
|
package Lemonldap::NG::Common::Session;
|
||||||
|
|
||||||
our $VERSION = 1.9.0;
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Common::Apache::Session;
|
use Lemonldap::NG::Common::Apache::Session;
|
||||||
|
|
|
@ -5,7 +5,7 @@
|
||||||
# Handler module
|
# Handler module
|
||||||
package Lemonldap::NG::Handler;
|
package Lemonldap::NG::Handler;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use Lemonldap::NG::Handler::SharedConf;
|
use Lemonldap::NG::Handler::SharedConf;
|
||||||
@ISA = qw(Lemonldap::NG::Handler::SharedConf);
|
@ISA = qw(Lemonldap::NG::Handler::SharedConf);
|
||||||
|
|
|
@ -2,7 +2,7 @@ package Lemonldap::NG::Handler::API;
|
||||||
|
|
||||||
use Exporter 'import';
|
use Exporter 'import';
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our ( %EXPORT_TAGS, @EXPORT_OK, @EXPORT );
|
our ( %EXPORT_TAGS, @EXPORT_OK, @EXPORT );
|
||||||
our $mode;
|
our $mode;
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
package Lemonldap::NG::Handler::API::ApacheMP1;
|
package Lemonldap::NG::Handler::API::ApacheMP1;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# Specific modules and constants for Apache Mod_Perl 1
|
# Specific modules and constants for Apache Mod_Perl 1
|
||||||
use Apache;
|
use Apache;
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
package Lemonldap::NG::Handler::API::ApacheMP2;
|
package Lemonldap::NG::Handler::API::ApacheMP2;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# Specific modules and constants for Apache Mod_Perl 2
|
# Specific modules and constants for Apache Mod_Perl 2
|
||||||
use strict;
|
use strict;
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
package Lemonldap::NG::Handler::API::CGI;
|
package Lemonldap::NG::Handler::API::CGI;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# Specific modules and constants for Test or CGI
|
# Specific modules and constants for Test or CGI
|
||||||
use constant FORBIDDEN => 403;
|
use constant FORBIDDEN => 403;
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
package Lemonldap::NG::Handler::API::Nginx;
|
package Lemonldap::NG::Handler::API::Nginx;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use constant FORBIDDEN => 403;
|
use constant FORBIDDEN => 403;
|
||||||
use constant HTTP_UNAUTHORIZED => 401;
|
use constant HTTP_UNAUTHORIZED => 401;
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
package Lemonldap::NG::Handler::API::PSGI;
|
package Lemonldap::NG::Handler::API::PSGI;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# Specific modules and constants for Test or CGI
|
# Specific modules and constants for Test or CGI
|
||||||
use constant FORBIDDEN => 403;
|
use constant FORBIDDEN => 403;
|
||||||
|
|
|
@ -7,7 +7,7 @@ use Lemonldap::NG::Common::CGI;
|
||||||
use Lemonldap::NG::Handler::SharedConf qw(:all);
|
use Lemonldap::NG::Handler::SharedConf qw(:all);
|
||||||
use base qw(Lemonldap::NG::Common::CGI Lemonldap::NG::Handler::SharedConf);
|
use base qw(Lemonldap::NG::Common::CGI Lemonldap::NG::Handler::SharedConf);
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @cmethod Lemonldap::NG::Handler::CGI new(hashRef args)
|
## @cmethod Lemonldap::NG::Handler::CGI new(hashRef args)
|
||||||
# Constructor.
|
# Constructor.
|
||||||
|
|
|
@ -14,7 +14,7 @@ use constant SKIP => 2;
|
||||||
#inherits Apache::Session
|
#inherits Apache::Session
|
||||||
#link Lemonldap::NG::Common::Apache::Session::SOAP protected globalStorage
|
#link Lemonldap::NG::Common::Apache::Session::SOAP protected globalStorage
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
our ( %EXPORT_TAGS, @EXPORT_OK, @EXPORT );
|
our ( %EXPORT_TAGS, @EXPORT_OK, @EXPORT );
|
||||||
|
|
||||||
our $tsv = {}; # Hash ref containing thread-shared values, filled
|
our $tsv = {}; # Hash ref containing thread-shared values, filled
|
||||||
|
|
|
@ -14,7 +14,7 @@ has useSafeJail => ( is => 'rw', isa => 'Maybe[Int]' );
|
||||||
|
|
||||||
has jail => ( is => 'rw' );
|
has jail => ( is => 'rw' );
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use Lemonldap::NG::Handler::Main '$datas';
|
use Lemonldap::NG::Handler::Main '$datas';
|
||||||
use Lemonldap::NG::Handler::API ':functions';
|
use Lemonldap::NG::Handler::API ':functions';
|
||||||
|
|
|
@ -5,7 +5,7 @@ use Mouse;
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Handler::PSGI::Base', 'Lemonldap::NG::Common::PSGI';
|
extends 'Lemonldap::NG::Handler::PSGI::Base', 'Lemonldap::NG::Common::PSGI';
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my $tmp = $_[0]->Lemonldap::NG::Common::PSGI::init( $_[1] )
|
my $tmp = $_[0]->Lemonldap::NG::Common::PSGI::init( $_[1] )
|
||||||
|
|
|
@ -4,7 +4,7 @@ use 5.10.0;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Handler::SharedConf qw(:tsv :variables :jailSharedVars);
|
use Lemonldap::NG::Handler::SharedConf qw(:tsv :variables :jailSharedVars);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
has protection => ( is => 'rw', isa => 'Str' );
|
has protection => ( is => 'rw', isa => 'Str' );
|
||||||
has rule => ( is => 'rw', isa => 'Str' );
|
has rule => ( is => 'rw', isa => 'Str' );
|
||||||
|
|
|
@ -6,7 +6,7 @@ use Mouse;
|
||||||
extends 'Lemonldap::NG::Handler::PSGI::Base',
|
extends 'Lemonldap::NG::Handler::PSGI::Base',
|
||||||
'Lemonldap::NG::Common::PSGI::Router';
|
'Lemonldap::NG::Common::PSGI::Router';
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my $tmp = $_[0]->Lemonldap::NG::Common::PSGI::Router::init( $_[1] )
|
my $tmp = $_[0]->Lemonldap::NG::Common::PSGI::Router::init( $_[1] )
|
||||||
|
|
|
@ -11,7 +11,7 @@ use Lemonldap::NG::Handler::Main::Logger;
|
||||||
use Lemonldap::NG::Handler::API qw(:httpCodes);
|
use Lemonldap::NG::Handler::API qw(:httpCodes);
|
||||||
use Lemonldap::NG::Common::Crypto;
|
use Lemonldap::NG::Common::Crypto;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @imethod void configReload(hashRef conf, hashRef tsv)
|
## @imethod void configReload(hashRef conf, hashRef tsv)
|
||||||
# Given a Lemonldap::NG configuration $conf, computes values used to
|
# Given a Lemonldap::NG configuration $conf, computes values used to
|
||||||
|
|
|
@ -26,7 +26,7 @@ use Lemonldap::NG::Common::Conf::Constants; #inherits
|
||||||
|
|
||||||
use base qw(Lemonldap::NG::Handler::Main);
|
use base qw(Lemonldap::NG::Handler::Main);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
our $lmConf; # Lemonldap::NG::Common::Conf object to get config
|
our $lmConf; # Lemonldap::NG::Common::Conf object to get config
|
||||||
our $localConfig; # Local configuration parameters, i.e. defined
|
our $localConfig; # Local configuration parameters, i.e. defined
|
||||||
# in lemonldap-ng.ini or in startup parameters
|
# in lemonldap-ng.ini or in startup parameters
|
||||||
|
|
|
@ -18,7 +18,7 @@ use Lemonldap::NG::Common::Session;
|
||||||
|
|
||||||
use base qw(Lemonldap::NG::Handler::SharedConf);
|
use base qw(Lemonldap::NG::Handler::SharedConf);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub handler {
|
sub handler {
|
||||||
my ( $class, $request ) = ( __PACKAGE__, shift );
|
my ( $class, $request ) = ( __PACKAGE__, shift );
|
||||||
|
|
|
@ -18,7 +18,7 @@ use Cache::Memcached;
|
||||||
use Apache::Session::Generate::MD5;
|
use Apache::Session::Generate::MD5;
|
||||||
use Lemonldap::NG::Handler::Main::Logger;
|
use Lemonldap::NG::Handler::Main::Logger;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# Shared variables
|
# Shared variables
|
||||||
our $secureTokenMemcachedConnection;
|
our $secureTokenMemcachedConnection;
|
||||||
|
|
|
@ -17,7 +17,7 @@ use base qw(Lemonldap::NG::Handler::SharedConf);
|
||||||
use Digest::HMAC_SHA1 qw(hmac_sha1 hmac_sha1_hex);
|
use Digest::HMAC_SHA1 qw(hmac_sha1 hmac_sha1_hex);
|
||||||
use Lemonldap::NG::Handler::Main::Logger;
|
use Lemonldap::NG::Handler::Main::Logger;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub handler {
|
sub handler {
|
||||||
my ( $class, $request ) = ( __PACKAGE__, shift );
|
my ( $class, $request ) = ( __PACKAGE__, shift );
|
||||||
|
|
|
@ -7,7 +7,7 @@ use strict;
|
||||||
use POSIX qw(setuid setgid);
|
use POSIX qw(setuid setgid);
|
||||||
use Data::Dumper;
|
use Data::Dumper;
|
||||||
|
|
||||||
our $VERSION = '1.4.1';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
our $status = {};
|
our $status = {};
|
||||||
our $activity = [];
|
our $activity = [];
|
||||||
|
|
|
@ -13,7 +13,7 @@ package Lemonldap::NG::Manager;
|
||||||
use 5.10.0;
|
use 5.10.0;
|
||||||
use utf8;
|
use utf8;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
use Lemonldap::NG::Common::Conf::Constants;
|
use Lemonldap::NG::Common::Conf::Constants;
|
||||||
use Lemonldap::NG::Common::PSGI::Constants;
|
use Lemonldap::NG::Common::PSGI::Constants;
|
||||||
|
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
# This file is generated by Lemonldap::NG::Manager::Build. Don't modify it by hand
|
# This file is generated by Lemonldap::NG::Manager::Build. Don't modify it by hand
|
||||||
package Lemonldap::NG::Manager::Attributes;
|
package Lemonldap::NG::Manager::Attributes;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub types {
|
sub types {
|
||||||
return {
|
return {
|
||||||
|
|
|
@ -6,7 +6,7 @@
|
||||||
|
|
||||||
package Lemonldap::NG::Manager::Build::Attributes;
|
package Lemonldap::NG::Manager::Build::Attributes;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
use strict;
|
use strict;
|
||||||
use Regexp::Common qw/URI/;
|
use Regexp::Common qw/URI/;
|
||||||
|
|
||||||
|
|
|
@ -13,7 +13,7 @@
|
||||||
|
|
||||||
package Lemonldap::NG::Manager::Build::Tree;
|
package Lemonldap::NG::Manager::Build::Tree;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
# TODO: Missing:
|
# TODO: Missing:
|
||||||
# * activeTimer
|
# * activeTimer
|
||||||
|
|
|
@ -5,7 +5,7 @@ use strict;
|
||||||
use Exporter 'import';
|
use Exporter 'import';
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
our %EXPORT_TAGS = ( 'all' => [qw($simpleHashKeys $specialNodeKeys $oidcOPMetaDataNodeKeys $oidcRPMetaDataNodeKeys $samlIDPMetaDataNodeKeys $samlSPMetaDataNodeKeys $virtualHostKeys $specialNodeHash @sessionTypes)] );
|
our %EXPORT_TAGS = ( 'all' => [qw($simpleHashKeys $specialNodeKeys $oidcOPMetaDataNodeKeys $oidcRPMetaDataNodeKeys $samlIDPMetaDataNodeKeys $samlSPMetaDataNodeKeys $virtualHostKeys $specialNodeHash @sessionTypes)] );
|
||||||
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
|
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
|
||||||
|
|
|
@ -13,7 +13,7 @@ has 'configStorage' => ( is => 'rw', isa => 'HashRef', default => sub { {} } );
|
||||||
has 'currentConf' => ( is => 'rw', required => 1, default => sub { {} } );
|
has 'currentConf' => ( is => 'rw', required => 1, default => sub { {} } );
|
||||||
has 'protection' => ( is => 'rw', isa => 'Str', default => 'manager' );
|
has 'protection' => ( is => 'rw', isa => 'Str', default => 'manager' );
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method Lemonldap::NG::Common::Conf confAcc()
|
## @method Lemonldap::NG::Common::Conf confAcc()
|
||||||
# Configuration access object
|
# Configuration access object
|
||||||
|
|
|
@ -13,7 +13,7 @@ use feature 'state';
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Manager::Lib';
|
extends 'Lemonldap::NG::Manager::Lib';
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
has _notifAccess => ( is => 'rw' );
|
has _notifAccess => ( is => 'rw' );
|
||||||
|
|
||||||
|
|
|
@ -18,7 +18,7 @@ extends 'Lemonldap::NG::Manager::Lib';
|
||||||
|
|
||||||
has conf => ( is => 'rw', isa => 'HashRef', default => sub { {} } );
|
has conf => ( is => 'rw', isa => 'HashRef', default => sub { {} } );
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
#############################
|
#############################
|
||||||
# I. INITIALIZATION METHODS #
|
# I. INITIALIZATION METHODS #
|
||||||
|
|
|
@ -5,7 +5,7 @@
|
||||||
# Alias for Lemonldap::NG::SharedConf
|
# Alias for Lemonldap::NG::SharedConf
|
||||||
package Lemonldap::NG::Portal;
|
package Lemonldap::NG::Portal;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
use Lemonldap::NG::Portal::SharedConf;
|
use Lemonldap::NG::Portal::SharedConf;
|
||||||
use base 'Lemonldap::NG::Portal::SharedConf';
|
use base 'Lemonldap::NG::Portal::SharedConf';
|
||||||
|
|
||||||
|
|
|
@ -7,7 +7,7 @@ package Lemonldap::NG::Portal::AuthAD;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use base qw(Lemonldap::NG::Portal::AuthLDAP);
|
use base qw(Lemonldap::NG::Portal::AuthLDAP);
|
||||||
|
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::AuthApache;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
# @return Lemonldap::NG::Portal constant
|
# @return Lemonldap::NG::Portal constant
|
||||||
|
|
|
@ -12,7 +12,7 @@ use HTTP::Request;
|
||||||
use JSON;
|
use JSON;
|
||||||
|
|
||||||
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
||||||
our $VERSION = '1.3.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
# Enables Browser ID (required for templates)
|
# Enables Browser ID (required for templates)
|
||||||
|
|
|
@ -9,7 +9,7 @@ use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use URI::Escape;
|
use URI::Escape;
|
||||||
|
|
||||||
our $VERSION = '1.2.3';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -11,7 +11,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
#inherits Lemonldap::NG::Portal::_Choice
|
#inherits Lemonldap::NG::Portal::_Choice
|
||||||
|
|
||||||
our $VERSION = '1.0.2';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
# Build authentication loop
|
# Build authentication loop
|
||||||
|
|
|
@ -9,7 +9,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
use base qw(Lemonldap::NG::Portal::_WebForm Lemonldap::NG::Portal::_DBI);
|
use base qw(Lemonldap::NG::Portal::_WebForm Lemonldap::NG::Portal::_DBI);
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -9,7 +9,7 @@ use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use base qw(Lemonldap::NG::Portal::_WebForm);
|
use base qw(Lemonldap::NG::Portal::_WebForm);
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
# Initialize demo accounts
|
# Initialize demo accounts
|
||||||
|
|
|
@ -15,7 +15,7 @@ use Lemonldap::NG::Portal::_Browser;
|
||||||
use URI::Escape;
|
use URI::Escape;
|
||||||
|
|
||||||
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -15,7 +15,7 @@ use constant AXSPECURL => 'http://openid.net/srv/ax/1.0';
|
||||||
use constant GOOGLEENDPOINT => 'https://www.google.com/accounts/o8/id';
|
use constant GOOGLEENDPOINT => 'https://www.google.com/accounts/o8/id';
|
||||||
|
|
||||||
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
our $googleEndPoint;
|
our $googleEndPoint;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -10,7 +10,7 @@ use Lemonldap::NG::Portal::_LDAP 'ldap'; #link protected ldap
|
||||||
use Lemonldap::NG::Portal::_WebForm;
|
use Lemonldap::NG::Portal::_WebForm;
|
||||||
use Lemonldap::NG::Portal::UserDBLDAP; #inherits
|
use Lemonldap::NG::Portal::UserDBLDAP; #inherits
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
use base qw(Lemonldap::NG::Portal::_WebForm);
|
use base qw(Lemonldap::NG::Portal::_WebForm);
|
||||||
|
|
||||||
*_formateFilter = *Lemonldap::NG::Portal::UserDBLDAP::formateFilter;
|
*_formateFilter = *Lemonldap::NG::Portal::UserDBLDAP::formateFilter;
|
||||||
|
|
|
@ -7,7 +7,7 @@ package Lemonldap::NG::Portal::AuthMulti;
|
||||||
|
|
||||||
use Lemonldap::NG::Portal::_Multi; #inherits
|
use Lemonldap::NG::Portal::_Multi; #inherits
|
||||||
|
|
||||||
our $VERSION = '1.4.6';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
sub authInit {
|
sub authInit {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::AuthNull;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
# Does nothing
|
# Does nothing
|
||||||
|
|
|
@ -13,7 +13,7 @@ use Lemonldap::NG::Portal::_Browser;
|
||||||
use Cache::FileCache;
|
use Cache::FileCache;
|
||||||
|
|
||||||
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
our @ISA = (qw(Lemonldap::NG::Portal::_Browser));
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -10,7 +10,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
use MIME::Base64;
|
use MIME::Base64;
|
||||||
use base qw(Lemonldap::NG::Portal::_OpenIDConnect);
|
use base qw(Lemonldap::NG::Portal::_OpenIDConnect);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
# Get configuration data
|
# Get configuration data
|
||||||
|
|
|
@ -12,7 +12,7 @@ use Lemonldap::NG::Portal::_WebForm;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use base qw(Lemonldap::NG::Portal::_WebForm Lemonldap::NG::Portal::_Proxy);
|
use base qw(Lemonldap::NG::Portal::_WebForm Lemonldap::NG::Portal::_Proxy);
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
# Call Lemonldap::NG::Portal::_Proxy::proxyInit();
|
# Call Lemonldap::NG::Portal::_Proxy::proxyInit();
|
||||||
|
|
|
@ -10,7 +10,7 @@ package Lemonldap::NG::Portal::AuthRadius;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use Lemonldap::NG::Portal::_WebForm;
|
use Lemonldap::NG::Portal::_WebForm;
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
use base qw(Lemonldap::NG::Portal::_WebForm);
|
use base qw(Lemonldap::NG::Portal::_WebForm);
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
|
|
|
@ -11,7 +11,7 @@ use Lemonldap::NG::Portal::_Remote;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use base qw(Lemonldap::NG::Portal::_Remote);
|
use base qw(Lemonldap::NG::Portal::_Remote);
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
*authInit = *Lemonldap::NG::Portal::_Remote::init;
|
*authInit = *Lemonldap::NG::Portal::_Remote::init;
|
||||||
|
|
||||||
|
|
|
@ -11,7 +11,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
use Lemonldap::NG::Portal::_SAML; #inherits
|
use Lemonldap::NG::Portal::_SAML; #inherits
|
||||||
use Lemonldap::NG::Common::Conf::SAML::Metadata;
|
use Lemonldap::NG::Common::Conf::SAML::Metadata;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Portal::_SAML);
|
our @ISA = qw(Lemonldap::NG::Portal::_SAML);
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
|
|
|
@ -9,7 +9,7 @@ use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use Lemonldap::NG::Portal::AuthNull;
|
use Lemonldap::NG::Portal::AuthNull;
|
||||||
|
|
||||||
our $VERSION = '1.4.1';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Portal::AuthNull);
|
our @ISA = qw(Lemonldap::NG::Portal::AuthNull);
|
||||||
|
|
||||||
## @apmethod int authInit()
|
## @apmethod int authInit()
|
||||||
|
|
|
@ -10,7 +10,7 @@ use Lemonldap::NG::Portal::_Slave;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use Lemonldap::NG::Portal::AuthNull;
|
use Lemonldap::NG::Portal::AuthNull;
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Portal::AuthNull);
|
our @ISA = qw(Lemonldap::NG::Portal::AuthNull);
|
||||||
|
|
||||||
## @apmethod int extractFormInfo()
|
## @apmethod int extractFormInfo()
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::AuthTwitter;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -11,7 +11,7 @@ use Lemonldap::NG::Portal::AuthSSL;
|
||||||
use Lemonldap::NG::Common::Regexp;
|
use Lemonldap::NG::Common::Regexp;
|
||||||
use Regexp::Assemble;
|
use Regexp::Assemble;
|
||||||
|
|
||||||
our $VERSION = '1.4.1';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Portal::AuthSSL);
|
our @ISA = qw(Lemonldap::NG::Portal::AuthSSL);
|
||||||
our $initDone;
|
our $initDone;
|
||||||
our $reWebIDWhitelist;
|
our $reWebIDWhitelist;
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::AuthYubikey;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
our $VERSION = '1.2.0';
|
our $VERSION = '1.9.1';
|
||||||
our $yubikeyInitDone;
|
our $yubikeyInitDone;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::CDA;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Portal::SharedConf qw(:all);
|
use Lemonldap::NG::Portal::SharedConf qw(:all);
|
||||||
|
|
||||||
our $VERSION = '1.0.0';
|
our $VERSION = '1.9.1';
|
||||||
use base ('Lemonldap::NG::Portal::SharedConf');
|
use base ('Lemonldap::NG::Portal::SharedConf');
|
||||||
|
|
||||||
*EXPORT_OK = *Lemonldap::NG::Portal::SharedConf::EXPORT_OK;
|
*EXPORT_OK = *Lemonldap::NG::Portal::SharedConf::EXPORT_OK;
|
||||||
|
|
|
@ -11,7 +11,7 @@ use MIME::Base64;
|
||||||
use Lemonldap::NG::Portal::SharedConf; # inherits
|
use Lemonldap::NG::Portal::SharedConf; # inherits
|
||||||
use Lemonldap::NG::Portal::_SAML; # inherits
|
use Lemonldap::NG::Portal::_SAML; # inherits
|
||||||
|
|
||||||
our $VERSION = '1.0.0';
|
our $VERSION = '1.9.1';
|
||||||
our @ISA = qw(Lemonldap::NG::Portal::_SAML Lemonldap::NG::Portal::SharedConf);
|
our @ISA = qw(Lemonldap::NG::Portal::_SAML Lemonldap::NG::Portal::SharedConf);
|
||||||
|
|
||||||
## @method int process()
|
## @method int process()
|
||||||
|
|
|
@ -9,7 +9,7 @@ use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
use utf8;
|
use utf8;
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method array display()
|
## @method array display()
|
||||||
# Call portal process and set template parameters
|
# Call portal process and set template parameters
|
||||||
|
|
|
@ -10,7 +10,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
use Lemonldap::NG::Portal::_CAS;
|
use Lemonldap::NG::Portal::_CAS;
|
||||||
use base qw(Lemonldap::NG::Portal::_CAS Lemonldap::NG::Portal::_LibAccess);
|
use base qw(Lemonldap::NG::Portal::_CAS Lemonldap::NG::Portal::_LibAccess);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method void issuerDBInit()
|
## @method void issuerDBInit()
|
||||||
# Nothing to do
|
# Nothing to do
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::IssuerDBNull;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
our $VERSION = '1.0.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method void issuerDBInit()
|
## @method void issuerDBInit()
|
||||||
# Do nothing
|
# Do nothing
|
||||||
|
|
|
@ -13,7 +13,7 @@ use Lemonldap::NG::Common::Regexp;
|
||||||
#inherits Lemonldap::NG::Portal::OpenID::Server
|
#inherits Lemonldap::NG::Portal::OpenID::Server
|
||||||
#link Lemonldap::NG::Portal::OpenID::SREG protected sreg_extension
|
#link Lemonldap::NG::Portal::OpenID::SREG protected sreg_extension
|
||||||
|
|
||||||
our $VERSION = '1.4.2';
|
our $VERSION = '1.9.1';
|
||||||
our $initDone;
|
our $initDone;
|
||||||
|
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
|
|
@ -10,7 +10,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
use String::Random qw(random_string);
|
use String::Random qw(random_string);
|
||||||
use base qw(Lemonldap::NG::Portal::_OpenIDConnect);
|
use base qw(Lemonldap::NG::Portal::_OpenIDConnect);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method void issuerDBInit()
|
## @method void issuerDBInit()
|
||||||
# Get configuration data
|
# Get configuration data
|
||||||
|
|
|
@ -11,7 +11,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
use Lemonldap::NG::Portal::_SAML;
|
use Lemonldap::NG::Portal::_SAML;
|
||||||
our @ISA = qw(Lemonldap::NG::Portal::_SAML);
|
our @ISA = qw(Lemonldap::NG::Portal::_SAML);
|
||||||
|
|
||||||
our $VERSION = '1.9.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @method void issuerDBInit()
|
## @method void issuerDBInit()
|
||||||
# Load and check SAML configuration
|
# Load and check SAML configuration
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::MailReset;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
our $VERSION = '1.4.5';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use Lemonldap::NG::Portal::Simple qw(:all);
|
use Lemonldap::NG::Portal::Simple qw(:all);
|
||||||
use base qw(Lemonldap::NG::Portal::SharedConf Exporter);
|
use base qw(Lemonldap::NG::Portal::SharedConf Exporter);
|
||||||
|
|
|
@ -13,7 +13,7 @@ use Lemonldap::NG::Portal::_LibAccess;
|
||||||
use base qw(Lemonldap::NG::Portal::_LibAccess);
|
use base qw(Lemonldap::NG::Portal::_LibAccess);
|
||||||
use Clone qw(clone);
|
use Clone qw(clone);
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
our $catlevel = 0;
|
our $catlevel = 0;
|
||||||
|
|
||||||
## @method void menuInit()
|
## @method void menuInit()
|
||||||
|
|
|
@ -13,7 +13,7 @@ use Lemonldap::NG::Common::Regexp;
|
||||||
|
|
||||||
use constant DEBUG => 0;
|
use constant DEBUG => 0;
|
||||||
|
|
||||||
our $VERSION = '1.4.2';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
my $OPENID2_NS = qq!http://specs.openid.net/auth/2.0!;
|
my $OPENID2_NS = qq!http://specs.openid.net/auth/2.0!;
|
||||||
my $OPENID2_ID_SELECT = qq!http://specs.openid.net/auth/2.0/identifier_select!;
|
my $OPENID2_ID_SELECT = qq!http://specs.openid.net/auth/2.0/identifier_select!;
|
||||||
|
|
|
@ -10,7 +10,7 @@ use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
#inherits Lemonldap::NG::Portal::_SMTP
|
#inherits Lemonldap::NG::Portal::_SMTP
|
||||||
|
|
||||||
our $VERSION = '1.3.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
use base qw(Lemonldap::NG::Portal::PasswordDBLDAP);
|
use base qw(Lemonldap::NG::Portal::PasswordDBLDAP);
|
||||||
|
|
||||||
|
|
|
@ -9,7 +9,7 @@ use strict;
|
||||||
use Lemonldap::NG::Portal::_Choice;
|
use Lemonldap::NG::Portal::_Choice;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
our $VERSION = '1.4.0';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int passwordDBInit()
|
## @apmethod int passwordDBInit()
|
||||||
# Does nothing
|
# Does nothing
|
||||||
|
|
|
@ -12,7 +12,7 @@ use base qw(Lemonldap::NG::Portal::_DBI );
|
||||||
|
|
||||||
#inherits Lemonldap::NG::Portal::_SMTP
|
#inherits Lemonldap::NG::Portal::_SMTP
|
||||||
|
|
||||||
our $VERSION = '1.3.2';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int passwordDBInit()
|
## @apmethod int passwordDBInit()
|
||||||
# Load SMTP functions and call DBI authInit()
|
# Load SMTP functions and call DBI authInit()
|
||||||
|
|
|
@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::PasswordDBDemo;
|
||||||
use strict;
|
use strict;
|
||||||
use Lemonldap::NG::Portal::Simple;
|
use Lemonldap::NG::Portal::Simple;
|
||||||
|
|
||||||
our $VERSION = '1.2.2';
|
our $VERSION = '1.9.1';
|
||||||
|
|
||||||
## @apmethod int passwordDBInit()
|
## @apmethod int passwordDBInit()
|
||||||
# Check the use of AuthDemo
|
# Check the use of AuthDemo
|
||||||
|
|
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user