- correcting old style specific handlers (reinjecting modification from


			
			
				environments/ppa-mbqj77/deployments/1
			
			
		
David COUTADEUR 11 years ago
parent 2408e9e4af
commit 1c5d4d8c32
  1. 4
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/AuthBasic.pm
  2. 6
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/DefaultHandler.pm
  3. 13
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/SecureToken.pm
  4. 3
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/SpecificHandlers/AuthBasic.pm
  5. 3
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/SpecificHandlers/SecureToken.pm
  6. 3
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/SpecificHandlers/SympaAutoLogin.pm
  7. 3
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/SpecificHandlers/UpdateCookie.pm
  8. 3
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/SpecificHandlers/ZimbraPreAuth.pm
  9. 13
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/SympaAutoLogin.pm
  10. 4
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/UpdateCookie.pm
  11. 13
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/ZimbraPreAuth.pm

@ -3,6 +3,10 @@
##@class
# Auth-basic authentication with Lemonldap::NG rights management
# This specific handler is intended to be called by a handler caller
# old working, kept for compatibility with previous 1.4.0 versions
package Lemonldap::NG::Handler::AuthBasic;
use strict;

@ -41,6 +41,10 @@ our $reloadTime;
our $lmConf;
our $localConfig;
my $conf = defined($GLOBAL::testInput)
? $GLOBAL::testInput
: {};
BEGIN {
if ( MP() == 2 ) {
eval {
@ -258,7 +262,7 @@ sub refresh($$) {
return OK;
}
__PACKAGE__->init( {} );
__PACKAGE__->init( $conf );
1;
__END__

@ -5,6 +5,10 @@
# Secure Token
#
# Create a secure token used to resolve user identity by a protected application
# This specific handler is intended to be called by a handler caller
# old working, kept for compatibility with previous 1.4.0 versions
package Lemonldap::NG::Handler::SecureToken;
use strict;
@ -32,6 +36,15 @@ BEGIN {
};
}
## @imethod protected void globalInit(hashRef args)
# Overload globalInit to launch this class defaultValuesInit
# @param $args reference to the configuration hash
sub globalInit {
my $class = shift;
__PACKAGE__->defaultValuesInit(@_);
$class->SUPER::globalInit(@_);
}
## @imethod protected void defaultValuesInit(hashRef args)
# Overload defaultValuesInit
# @param $args reference to the configuration hash

@ -3,6 +3,9 @@
##@class
# Auth-basic authentication with Lemonldap::NG rights management
# This specific handler is intended to be called directly by Apache
package Lemonldap::NG::Handler::SpecificHandlers::AuthBasic;
use strict;

@ -5,6 +5,9 @@
# Secure Token
#
# Create a secure token used to resolve user identity by a protected application
# This specific handler is intended to be called directly by Apache
package Lemonldap::NG::Handler::SpecificHandlers::SecureToken;
use strict;

@ -5,6 +5,9 @@
# Sympa autologin
#
# Build Sympa cookie and send it to Sympa
# This specific handler is intended to be called directly by Apache
package Lemonldap::NG::Handler::SpecificHandlers::SympaAutoLogin;
use strict;

@ -3,6 +3,9 @@
## @class
# Lemonldap::NG special handler
# This specific handler is intended to be called directly by Apache
package Lemonldap::NG::Handler::SpecificHandlers::UpdateCookie;
use strict;

@ -5,6 +5,9 @@
# Zimbra preauthentication
#
# It will build Zimbra preauth URL
# This specific handler is intended to be called directly by Apache
package Lemonldap::NG::Handler::SpecificHandlers::ZimbraPreAuth;
use strict;

@ -5,6 +5,10 @@
# Sympa autologin
#
# Build Sympa cookie and send it to Sympa
# This specific handler is intended to be called by a handler caller
# old working, kept for compatibility with previous 1.4.0 versions
package Lemonldap::NG::Handler::SympaAutoLogin;
use strict;
@ -19,6 +23,15 @@ our $VERSION = '1.1.2';
# Shared variables
our ( $sympaSecret, $sympaMailKey );
## @imethod protected void globalInit(hashRef args)
# Overload globalInit to launch this class defaultValuesInit
# @param $args reference to the configuration hash
sub globalInit {
my $class = shift;
__PACKAGE__->defaultValuesInit(@_);
$class->SUPER::globalInit(@_);
}
## @imethod protected void defaultValuesInit(hashRef args)
# Overload defaultValuesInit
# @param $args reference to the configuration hash

@ -3,6 +3,10 @@
## @class
# Lemonldap::NG special handler
# This specific handler is intended to be called by a handler caller
# old working, kept for compatibility with previous 1.4.0 versions
package Lemonldap::NG::Handler::UpdateCookie;
use strict;

@ -5,6 +5,10 @@
# Zimbra preauthentication
#
# It will build Zimbra preauth URL
# This specific handler is intended to be called by a handler caller
# old working, kept for compatibility with previous 1.4.0 versions
package Lemonldap::NG::Handler::ZimbraPreAuth;
use strict;
@ -20,6 +24,15 @@ our $VERSION = '1.0.0';
our ( $zimbraPreAuthKey, $zimbraAccountKey, $zimbraBy, $zimbraUrl,
$zimbraSsoUrl, $timeout );
## @imethod protected void globalInit(hashRef args)
# Overload globalInit to launch this class defaultValuesInit
# @param $args reference to the configuration hash
sub globalInit {
my $class = shift;
__PACKAGE__->defaultValuesInit(@_);
$class->SUPER::globalInit(@_);
}
## @imethod protected void defaultValuesInit(hashRef args)
# Overload defaultValuesInit
# @param $args reference to the configuration hash

Loading…
Cancel
Save