r24047 - in /branches/upstream/libapache-session-perl/current: CHANGES META.yml Makefile.PL README Session.pm Session/Generate/MD5.pm Session/Lock/Semaphore.pm t/99flex.t t/99semaphore.t
rmayorga-guest at users.alioth.debian.org
rmayorga-guest at users.alioth.debian.org
Sun Aug 10 04:50:06 UTC 2008
Author: rmayorga-guest
Date: Sun Aug 10 04:49:42 2008
New Revision: 24047
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=24047
Log:
[svn-upgrade] Integrating new upstream version, libapache-session-perl (1.87)
Modified:
branches/upstream/libapache-session-perl/current/CHANGES
branches/upstream/libapache-session-perl/current/META.yml
branches/upstream/libapache-session-perl/current/Makefile.PL
branches/upstream/libapache-session-perl/current/README
branches/upstream/libapache-session-perl/current/Session.pm
branches/upstream/libapache-session-perl/current/Session/Generate/MD5.pm
branches/upstream/libapache-session-perl/current/Session/Lock/Semaphore.pm
branches/upstream/libapache-session-perl/current/t/99flex.t
branches/upstream/libapache-session-perl/current/t/99semaphore.t
Modified: branches/upstream/libapache-session-perl/current/CHANGES
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/CHANGES?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/CHANGES (original)
+++ branches/upstream/libapache-session-perl/current/CHANGES Sun Aug 10 04:49:42 2008
@@ -1,7 +1,20 @@
-In some distant future Apache::Session may require perl 5.6.
+In near future Apache::Session may require perl 5.6.
If you use perl older than 5.6 - write to alexchorny[AT]gmail.com
and tell me what version do you use, why and will you need newer versions
of Apache::Session.
+
+1.87=1.86_03 2008-08-08
+1.86_03 2008-08-03 by Alexandr Ciornii
+ - disabled 99semaphore.t. Help needed.
+
+1.86_02 2008-06-27 by Alexandr Ciornii
+ - correct number of tests in 99semaphore.t
+
+1.86_01 2008-06-20 by Alexandr Ciornii
+ - use Carp::confess in Apache::Session::Lock::Semaphore
+ - more info in die message in Apache::Session::Generate::MD5 (RT#36412, by Knut Arne Bjorndal)
+ - semaphore tests check for semctl availability
+ - Makefile.PL prints message if perl version < 5.006
1.86 2008-02-01 by Alexandr Ciornii
- Default number of semaphores for *BSD is 8 in Apache::Session::Lock::Semaphore
Modified: branches/upstream/libapache-session-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/META.yml?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/META.yml (original)
+++ branches/upstream/libapache-session-perl/current/META.yml Sun Aug 10 04:49:42 2008
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Apache-Session
-version: 1.86
+version: 1.87
abstract: A persistence framework for session data
license: perl
generated_by: ExtUtils::MakeMaker version 6.32
Modified: branches/upstream/libapache-session-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/Makefile.PL?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/Makefile.PL (original)
+++ branches/upstream/libapache-session-perl/current/Makefile.PL Sun Aug 10 04:49:42 2008
@@ -1,5 +1,7 @@
-use 5.003_07; #earliest version on CPAN
-#Symbol.pm requires 5.002
+use 5.002; #Symbol.pm requires 5.002
+#5.004 almost 11 years ago
+#5.003_07 earliest version on CPAN
+
use ExtUtils::MakeMaker;
print << 'EOT';
@@ -8,15 +10,20 @@
Please use Test::Reporter to report test results - it's the only way to measure
popularity of distribution.
-If you use perl older than 5.6 - write to alexchorny[AT]gmail.com
+EOT
+
+if ($]<5.006) {
+ print << 'EOT1';
+If you really use perl older than 5.6 - write to alexchorny[AT]gmail.com
and tell me what version do you use, and why.
-
-EOT
+EOT1
+ prompt('continue','y');
+}
WriteMakefile(
NAME => "Apache::Session",
VERSION_FROM => "Session.pm",
- ($ExtUtils::MakeMaker::VERSION gt '6.30'?
+ ($ExtUtils::MakeMaker::VERSION ge '6.31'?
('LICENSE' => 'perl', ) : ()),
PREREQ_PM => {
'Test::More' => '0.47',
Modified: branches/upstream/libapache-session-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/README?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/README (original)
+++ branches/upstream/libapache-session-perl/current/README Sun Aug 10 04:49:42 2008
@@ -7,12 +7,15 @@
DESCRIPTION
-----------
-This is Apache::Session 1.84
+This is Apache::Session 1.86
These modules provide persistent storage for arbitrary data, in arbitrary
backing stores. The details of interacting with the backing store are
abstracted to make all backing stores behave alike. The programmer simply
interacts with a tied hash.
+
+COPYRIGHT AND LICENSE
+---------------------
Apache::Session is Copyright (c) 1998, 1999, 2000, 2001, 2004 Jeffrey William
Baker <jwbaker at acm.org>. Distribute under the same terms as Perl itself.
@@ -23,8 +26,10 @@
PREREQUISITES
-------------
-No particular modules are required, but most of Apache::Session's functions
-require Digest::MD5 and Storable.
+Required for testing: Test::More, Test::Deep, Test::Exception, File::Temp
+Required for work: Storable, constant
+
+Most of Apache::Session's functions require Digest::MD5.
If you wish to use the DBI backing stores, you need the latest version of DBI
and the driver for your database. Currently MySQL, Postgres, and Oracle are
@@ -32,9 +37,14 @@
INSTALLATION
------------
+Auto
+Use CPAN's or CPANPLUS's shell.
-tar -xvzf Apache-Session-1.6.tar.gz
-cd Apache-Session-1.6
+Manual:
+
+
+tar -xvzf Apache-Session-1.86.tar.gz
+cd Apache-Session-1.86
perl Makefile.PL
make
make test
Modified: branches/upstream/libapache-session-perl/current/Session.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/Session.pm?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/Session.pm (original)
+++ branches/upstream/libapache-session-perl/current/Session.pm Sun Aug 10 04:49:42 2008
@@ -256,6 +256,10 @@
Session - OO interface to Apache::Session
+=head1 LICENSE
+
+Same as Perl.
+
=head1 AUTHORS
Jeffrey Baker <jwbaker at acm.org> is the author of
@@ -319,7 +323,7 @@
use strict;
use vars qw($VERSION);
-$VERSION = '1.86';
+$VERSION = '1.87';
$VERSION = eval $VERSION;
#State constants
Modified: branches/upstream/libapache-session-perl/current/Session/Generate/MD5.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/Session/Generate/MD5.pm?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/Session/Generate/MD5.pm (original)
+++ branches/upstream/libapache-session-perl/current/Session/Generate/MD5.pm Sun Aug 10 04:49:42 2008
@@ -13,7 +13,7 @@
use vars qw($VERSION);
use Digest::MD5;
-$VERSION = '2.1';
+$VERSION = '2.11';
sub generate {
my $session = shift;
@@ -37,7 +37,7 @@
my $session = shift;
if ($session->{data}->{_session_id} !~ /^[a-fA-F0-9]+$/) {
- die;
+ die "Invalid session ID: ".$session->{data}->{_session_id};
}
}
Modified: branches/upstream/libapache-session-perl/current/Session/Lock/Semaphore.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/Session/Lock/Semaphore.pm?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/Session/Lock/Semaphore.pm (original)
+++ branches/upstream/libapache-session-perl/current/Session/Lock/Semaphore.pm Sun Aug 10 04:49:42 2008
@@ -13,6 +13,7 @@
use Config;
use IPC::SysV qw(IPC_PRIVATE IPC_CREAT S_IRWXU SEM_UNDO);
use IPC::Semaphore;
+use Carp qw/croak confess/;
use vars qw($VERSION);
$VERSION = '1.04';
@@ -63,9 +64,9 @@
return if $self->{write};
if (!$self->{sem}) {
- $self->{sem} = new IPC::Semaphore(
+ $self->{sem} = IPC::Semaphore->new(
defined($self->{sem_key})?$self->{sem_key}:IPC_PRIVATE, $self->{nsems},
- IPC_CREAT | S_IRWXU) || die "Cannot create semaphore with key $self->{sem_key}: $!";
+ IPC_CREAT | S_IRWXU) || confess("Cannot create semaphore with key $self->{sem_key}; NSEMS: $self->{nsems}: $!");
}
if (!defined $self->{read_sem}) {
@@ -101,9 +102,9 @@
return if($self->{write});
if (!$self->{sem}) {
- $self->{sem} = new IPC::Semaphore(
+ $self->{sem} = IPC::Semaphore->new(
defined($self->{sem_key})?$self->{sem_key}:IPC_PRIVATE, $self->{nsems},
- IPC_CREAT | S_IRWXU) || die "Cannot create semaphore with key $self->{sem_key}: $!";
+ IPC_CREAT | S_IRWXU) || confess "Cannot create semaphore with key $self->{sem_key}; NSEMS: $self->{nsems}: $!";
}
if (!defined $self->{read_sem}) {
Modified: branches/upstream/libapache-session-perl/current/t/99flex.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/t/99flex.t?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/t/99flex.t (original)
+++ branches/upstream/libapache-session-perl/current/t/99flex.t Sun Aug 10 04:49:42 2008
@@ -47,6 +47,7 @@
SKIP: { #Flex that uses IPC
skip "semget not implemented",5 unless $Config{d_semget};
+ skip "semctl not implemented",5 unless $Config{d_semctl};
skip "Cygserver is not running",5
if $^O eq 'cygwin' && (!exists $ENV{'CYGWIN'} || $ENV{'CYGWIN'} !~ /server/i);
skip "*BSD & Solaris do not like anonymous semaphores",5
Modified: branches/upstream/libapache-session-perl/current/t/99semaphore.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapache-session-perl/current/t/99semaphore.t?rev=24047&op=diff
==============================================================================
--- branches/upstream/libapache-session-perl/current/t/99semaphore.t (original)
+++ branches/upstream/libapache-session-perl/current/t/99semaphore.t Sun Aug 10 04:49:42 2008
@@ -1,5 +1,6 @@
+use strict;
use Test::More;
-use Test::Exception;
+#use Test::Exception;
use File::Temp qw[tempdir];
#use Cwd qw[getcwd];
use Config;
@@ -8,6 +9,9 @@
plan skip_all => "semget not implemented" unless $Config{d_semget};
#Darwin may not have semaphores, see
#http://sysnet.ucsd.edu/~bellardo/darwin/sysvsem.html
+ plan skip_all => "semctl not implemented" unless $Config{d_semctl};
+ plan skip_all => "Can't tune this test. Help needed.";
+
plan skip_all => "Optional modules (IPC::SysV, IPC::Semaphore) not installed"
unless eval {
require IPC::SysV;
@@ -49,6 +53,7 @@
ok(defined($semnum),'$locker->{read_sem} is defined');
my $sem = IPC::Semaphore->new($semkey, $number++, S_IRWXU);
+ diag("NSems: $iter, error: $!") unless defined($sem);
isa_ok $sem, 'IPC::Semaphore';
More information about the Pkg-perl-cvs-commits
mailing list