Commit e55a4868 authored by Xavier Guimard's avatar Xavier Guimard

Beginning 0.9.4 publication works : version update

parent d0dfdf0b
package Lemonldap::NG::Common;
our $VERSION='0.92';
our $VERSION='0.93';
use strict;
......
......@@ -10,6 +10,8 @@ package Lemonldap::NG::Common::Apache::Session;
use strict;
use Storable qw(thaw);
our $VERSION = 0.2;
BEGIN {
sub Apache::Session::get_key_from_all_sessions {
......
......@@ -8,7 +8,7 @@ package Lemonldap::NG::Common::Apache::Session::SOAP;
use strict;
use SOAP::Lite;
our $VERSION = 0.3;
our $VERSION = 0.4;
#parameter proxy Url of SOAP service
#parameter proxyOptions SOAP::Lite options
......
......@@ -2,6 +2,8 @@ package Lemonldap::NG::Common::BuildWSDL;
use Lemonldap::NG::Common::Conf;
our $VERSION = '0.1';
sub new {
my ( $class, $configStorage ) = @_;
my $self = bless {}, $class;
......
......@@ -13,7 +13,7 @@ use CGI;
#parameter syslog Indicates syslog facility for logging user actions
our $VERSION = '0.4';
our $VERSION = '0.5';
use base qw(CGI);
......
......@@ -10,7 +10,7 @@ package Lemonldap::NG::Common::CGI::SOAPServer;
use SOAP::Transport::HTTP;
use base qw(SOAP::Transport::HTTP::Server);
our $VERSION = '0.2';
our $VERSION = '0.3';
## @method protected void DESTROY()
# Call SOAP::Trace::objects().
......
......@@ -7,6 +7,8 @@ package Lemonldap::NG::Common::CGI::SOAPService;
require SOAP::Lite;
our $VERSION = '0.2';
## @cmethod Lemonldap::NG::Common::CGI::SOAPService new(object obj,string @func)
# Constructor
# @param $obj object which will be called for SOAP authorizated methods
......
......@@ -21,7 +21,7 @@ use Regexp::Assemble;
use constant DEFAULTCONFFILE => "/etc/lemonldap-ng/storage.conf";
our $VERSION = 0.51;
our $VERSION = 0.6;
our $msg;
our %_confFiles;
......
......@@ -3,7 +3,7 @@ package Lemonldap::NG::Common::Conf::File;
use strict;
use Lemonldap::NG::Common::Conf::Constants; #inherits
our $VERSION = 0.22;
our $VERSION = 0.23;
sub prereq {
my $self = shift;
......
......@@ -3,7 +3,7 @@ package Lemonldap::NG::Common::Conf::SOAP;
use strict;
use SOAP::Lite;
our $VERSION = 0.2;
our $VERSION = 0.21;
#parameter proxy Url of SOAP service
#parameter proxyOptions SOAP::Lite parameters
......
......@@ -10,6 +10,9 @@ use strict;
use Crypt::Rijndael;
use MIME::Base64;
use base qw(Crypt::Rijndael);
our $VERSION = '0.1';
our $msg;
## @cmethod Lemonldap::NG::Common::Crypto new(array param)
......
......@@ -16,7 +16,7 @@ use base qw(Lemonldap::NG::Handler::SharedConf);
use utf8;
no utf8;
our $VERSION = '0.1';
our $VERSION = '0.2';
# We need just this constant, that's why Portal is 'required' but not 'used'
*PE_OK = *Lemonldap::NG::Portal::SharedConf::PE_OK;
......
......@@ -9,7 +9,7 @@ use strict;
use Lemonldap::NG::Handler::SharedConf qw(:all);
our $VERSION = '0.1';
our $VERSION = '0.2';
use base qw(Lemonldap::NG::Handler::SharedConf);
......
......@@ -18,7 +18,7 @@ use Lemonldap::NG::Handler::SharedConf qw(:all);
our $_handler;
our $VERSION = '0.21';
our $VERSION = '0.3';
## @cmethod Lemonldap::NG::Handler::CGI new(hashRef args)
# Constructor.
......
......@@ -10,7 +10,7 @@ use strict;
use Lemonldap::NG::Handler::Simple qw(:apache :headers);
use LWP::UserAgent;
our $VERSION = '0.4';
our $VERSION = '0.41';
##########################################
# COMPATIBILITY WITH APACHE AND APACHE 2 #
......
......@@ -25,7 +25,7 @@ use Cache::Cache qw($EXPIRES_NEVER);
use base qw(Lemonldap::NG::Handler::Vhost Lemonldap::NG::Handler::Simple);
#parameter reloadTime Time in second between 2 configuration check (600)
our $VERSION = '0.7';
our $VERSION = '0.71';
our $cfgNum = 0;
our $lastReload = 0;
our $reloadTime;
......
......@@ -8,7 +8,7 @@ use POSIX;
use Data::Dumper;
#inherits Cache::Cache
our $VERSION = "0.2";
our $VERSION = "0.21";
our $status = {};
our $activity = [];
......
......@@ -5,6 +5,8 @@ use Lemonldap::NG::Handler::SharedConf qw(:all);
our @ISA = qw(Lemonldap::NG::Handler::SharedConf);
use Digest::MD5;
our $VERSION = '0.1';
open S, '/etc/lemonldap-ng/sympa.secret' or die "Unable to open /etc/lemonldap-ng/sympa.secret";
our $sympaSecret = join('',<S>);
close S;
......
......@@ -9,7 +9,7 @@ use Lemonldap::NG::Handler::Simple qw(:locationRules :headers); #inherits
use strict;
use MIME::Base64;
our $VERSION = '0.54';
our $VERSION = '0.55';
## @cmethod void locationRulesInit(hashRef args)
# Compile rules.
......
......@@ -26,7 +26,7 @@ use MIME::Base64;
use base qw(Lemonldap::NG::Common::CGI);
our @ISA;
our $VERSION = '0.88';
our $VERSION = '0.89';
# Secure jail
our $safe;
......
......@@ -6,7 +6,7 @@
package Lemonldap::NG::Manager::Help;
use AutoLoader qw(AUTOLOAD);
our $VERSION = '0.36';
our $VERSION = '0.4';
## @fn void import(string lang)
# Import help messages subroutines in Lemonldap::NG::Manager in the wanted language.
......
......@@ -11,7 +11,7 @@ use Lemonldap::NG::Manager;
use Lemonldap::NG::Common::Conf::Constants; #inherits
use base qw(Lemonldap::NG::Manager);
our $VERSION = "0.1";
our $VERSION = '0.11';
## @cmethod Lemonldap::NG::Manager::Restricted new(hashref args)
# Constructor
......
......@@ -2,6 +2,8 @@ package Lemonldap::NG::Manager::SOAPServer;
use strict;
our $VERSION = '0.2';
die 'This module is now obsolete. You have to use the portal as "proxy".
See http://wiki.lemonldap.ow2.org/xwiki/bin/view/NG/DocSOAP';
__END__
......
......@@ -14,7 +14,7 @@ use Lemonldap::NG::Common::Apache::Session; #inherits
our $whatToTrace;
*whatToTrace = \$Lemonldap::NG::Handler::_CGI::whatToTrace;
our $VERSION = '0.1';
our $VERSION = '0.11';
use base qw(Lemonldap::NG::Handler::CGI);
......
......@@ -13,7 +13,7 @@ use AutoLoader qw(AUTOLOAD);
require Lemonldap::NG::Manager::_i18n; #inherits
use Lemonldap::NG::Common::Conf::Constants; #inherits
our $VERSION = '0.31';
our $VERSION = '0.32';
# TODO: Delete buttons in headers and rules if 'read-only'
......
......@@ -5,7 +5,7 @@
# Prepare Lemonldap::NG::Manager response for new configurations
package Lemonldap::NG::Manager::_Response;
our $VERSION = '0.1';
our $VERSION = '0.11';
## @cmethod Lemonldap::NG::Manager::_Response new()
# Constructor
......
......@@ -8,7 +8,7 @@ package Lemonldap::NG::Manager::_i18n;
# Developer warning : this file must be utf8 encoded
use AutoLoader qw(AUTOLOAD);
our $VERSION = '0.33';
our $VERSION = '0.34';
## @fn void import(string lang)
# Import messages
......
......@@ -5,7 +5,7 @@
# Alias for Lemonldap::NG::SharedConf
package Lemonldap::NG::Portal;
our $VERSION = "0.87";
our $VERSION = '0.88';
use Lemonldap::NG::Portal::SharedConf;
use base 'Lemonldap::NG::Portal::SharedConf';
......
......@@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::AuthApache;
use strict;
use Lemonldap::NG::Portal::Simple;
our $VERSION = '0.11';
our $VERSION = '0.2';
## @apmethod int authInit()
# @return Lemonldap::NG::Portal constant
......
......@@ -9,7 +9,7 @@ use strict;
use Lemonldap::NG::Portal::Simple;
use AuthCAS;
our $VERSION = '0.04';
our $VERSION = '0.1';
## @apmethod int authInit()
# Does nothing.
......
......@@ -37,7 +37,7 @@ use UNIVERSAL qw( isa can VERSION );
*EXPORT_TAGS = *Lemonldap::NG::Portal::SharedConf::EXPORT_TAGS;
*EXPORT = *Lemonldap::NG::Portal::SharedConf::EXPORT;
our $VERSION = '0.32';
our $VERSION = '0.33';
use base qw(Lemonldap::NG::Portal::SharedConf);
#===============================================================================
......
......@@ -10,7 +10,7 @@ use Lemonldap::NG::Portal::_LDAP 'ldap'; #link protected ldap
use Lemonldap::NG::Portal::_WebForm;
use Lemonldap::NG::Portal::UserDBLDAP; #inherits
our $VERSION = '0.2';
our $VERSION = '0.3';
use base qw(Lemonldap::NG::Portal::_WebForm);
*_formateFilter = *Lemonldap::NG::Portal::UserDBLDAP::formateFilter;
......
......@@ -2,6 +2,8 @@ package Lemonldap::NG::Portal::AuthMulti;
use Lemonldap::NG::Portal::_Multi;
our $VERSION = '0.1';
sub authInit {
my $self = shift;
return $self->_multi->try('authInit',0);
......
......@@ -11,6 +11,8 @@ use Lemonldap::NG::Portal::_Remote;
use Lemonldap::NG::Portal::Simple;
use base qw(Lemonldap::NG::Portal::_Remote);
our $VERSION = '0.1';
*authInit = *Lemonldap::NG::Portal::_Remote::init;
## @apmethod int extractFormInfo()
......
......@@ -8,6 +8,8 @@ package Lemonldap::NG::Portal::AuthSAML;
use strict;
use Lemonldap::NG::Portal::Simple;
our $VERSION = '0.1';
## @apmethod int authInit()
# TODO
# Check SAML Consumer configuration.
......
......@@ -11,7 +11,7 @@ use Lemonldap::NG::Portal::AuthLDAP;
use base qw(Lemonldap::NG::Portal::AuthLDAP);
our $VERSION = '0.11';
our $VERSION = '0.2';
## @apmethod int authInit()
# Check if SSL environment variables are set.
......
......@@ -20,7 +20,7 @@ use Lemonldap::NG::Portal::PasswordDBLDAP; #inherits
*_modifyPassword = *Lemonldap::NG::Portal::PasswordDBLDAP::modifyPassword;
*_passwordDBInit = *Lemonldap::NG::Portal::PasswordDBLDAP::passwordDBInit;
our $VERSION = '0.04';
our $VERSION = '0.1';
### ACCESS CONTROL DISPLAY SYSTEM
......
......@@ -9,6 +9,8 @@ use strict;
use Time::Local;
use DBI;
our $VERSION = '0.1';
## @method boolean prereq()
# Check if DBI parameters are set.
# @return true if all is OK
......
......@@ -6,9 +6,10 @@
package Lemonldap::NG::Portal::Notification::File;
use strict;
use MIME::Base64;
our $VERSION = '0.1';
## @method boolean prereq()
# Check if parameters are set and if storage directory exists.
# @return true if all is OK
......
......@@ -13,7 +13,7 @@ use Lemonldap::NG::Common::Conf; #link protected lmConf Configuration
*EXPORT_TAGS = *Lemonldap::NG::Portal::Simple::EXPORT_TAGS;
*EXPORT = *Lemonldap::NG::Portal::Simple::EXPORT;
our $VERSION = "0.5";
our $VERSION = '0.6';
use base qw(Lemonldap::NG::Portal::Simple);
##################
......
......@@ -2,6 +2,8 @@ package Lemonldap::NG::Portal::UserDBMulti;
use Lemonldap::NG::Portal::_Multi;
our $VERSION = '0.1';
sub userDBInit {
my $self = shift;
return $self->_multi->try('userDBInit',1);
......
......@@ -8,6 +8,8 @@ package Lemonldap::NG::Portal::UserDBNull;
use strict;
use Lemonldap::NG::Portal::Simple;
our $VERSION = '0.1';
## @apmethod int userDBInit()
# Do nothing
# @return Lemonldap::NG::Portal constant
......
......@@ -10,6 +10,8 @@ use Lemonldap::NG::Portal::_Remote;
use Lemonldap::NG::Portal::Simple;
use base qw(Lemonldap::NG::Portal::_Remote);
our $VERSION = '0.1';
## @apmethod int userDBInit()
# Call Lemonldap::NG::Portal::_Remote::init();
# @return Lemonldap::NG::Portal constant
......
......@@ -13,7 +13,7 @@ use strict;
our @EXPORT = qw(ldap);
our $VERSION = '0.11';
our $VERSION = '0.2';
## @cmethod Lemonldap::NG::Portal::_LDAP new(Lemonldap::NG::Portal::Simple portal)
# Build a Net::LDAP object using parameters issued from $portal
......
......@@ -12,6 +12,8 @@ package Lemonldap::NG::Portal::_Multi;
use Lemonldap::NG::Portal::Simple;
our $VERSION = '0.1';
## @cmethod Lemonldap::NG::Portal::_Multi new(Lemonldap::NG::Portal::Simple portal)
# Constructor
# @param $portal Lemonldap::NG::Portal::Simple object
......
......@@ -9,6 +9,8 @@ use strict;
use Lemonldap::NG::Portal::Simple;
use MIME::Base64;
our $VERSION = '0.1';
## @apmethod int init()
# Checks if remote portal parameters are set.
# @return Lemonldap::NG::Portal constant
......
......@@ -9,6 +9,8 @@ use strict;
use Lemonldap::NG::Portal::Simple;
require SOAP::Lite;
our $VERSION = '0.1';
## @method void startSoapServices()
# Check the URI requested (PATH_INFO environment variable) and launch the
# corresponding SOAP methods using soapTest().
......
......@@ -8,6 +8,8 @@ package Lemonldap::NG::Portal::_WebForm;
use Lemonldap::NG::Portal::Simple qw(:all);
use strict;
our $VERSION = '0.2';
## @apmethod int authInit()
# Does nothing.
# @return Lemonldap::NG::Portal constant
......
......@@ -8,7 +8,7 @@ package Lemonldap::NG::Portal::_i18n;
# Developpers warning : this file must stay UTF-8 encoded
use AutoLoader qw(AUTOLOAD);
our $VERSION = '0.3';
our $VERSION = '0.4';
## @fn string error(int error,string lang)
# @param $error Number of error to resolve
......
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