r16429 - in /trunk/libipc-sharelite-perl: ./ debian/ inc/ lib/ t/
tincho-guest at users.alioth.debian.org
tincho-guest at users.alioth.debian.org
Mon Mar 3 23:00:33 UTC 2008
Author: tincho-guest
Date: Mon Mar 3 23:00:32 2008
New Revision: 16429
URL: http://svn.debian.org/wsvn/?sc=1&rev=16429
Log:
* New upstream version.
* Bumbed debhelper version to 5.
* debian/control: added myself to Uploaders, bumped Standards-Version (no
changes), added libtest-pod-perl to B-D to enable POD tests.
* debian/copyright: updated CP info, new format.
* debian/watch: make it accept v-style versions.
* debian/rules: remade from templates.
Added:
trunk/libipc-sharelite-perl/META.yml
- copied unchanged from r16428, branches/upstream/libipc-sharelite-perl/current/META.yml
trunk/libipc-sharelite-perl/SIGNATURE
- copied unchanged from r16428, branches/upstream/libipc-sharelite-perl/current/SIGNATURE
trunk/libipc-sharelite-perl/inc/
- copied from r16428, branches/upstream/libipc-sharelite-perl/current/inc/
trunk/libipc-sharelite-perl/lib/
- copied from r16428, branches/upstream/libipc-sharelite-perl/current/lib/
trunk/libipc-sharelite-perl/sharestuff.c
- copied unchanged from r16428, branches/upstream/libipc-sharelite-perl/current/sharestuff.c
trunk/libipc-sharelite-perl/sharestuff.h
- copied unchanged from r16428, branches/upstream/libipc-sharelite-perl/current/sharestuff.h
trunk/libipc-sharelite-perl/t/
- copied from r16428, branches/upstream/libipc-sharelite-perl/current/t/
Removed:
trunk/libipc-sharelite-perl/Configure
trunk/libipc-sharelite-perl/MANIFEST.SKIP
trunk/libipc-sharelite-perl/ShareLite.pm
trunk/libipc-sharelite-perl/TODO
trunk/libipc-sharelite-perl/config_h.SH
trunk/libipc-sharelite-perl/sharelite.c
trunk/libipc-sharelite-perl/sharelite.h
trunk/libipc-sharelite-perl/test.pl
Modified:
trunk/libipc-sharelite-perl/Changes
trunk/libipc-sharelite-perl/MANIFEST
trunk/libipc-sharelite-perl/Makefile.PL
trunk/libipc-sharelite-perl/ShareLite.xs
trunk/libipc-sharelite-perl/debian/changelog
trunk/libipc-sharelite-perl/debian/compat
trunk/libipc-sharelite-perl/debian/control
trunk/libipc-sharelite-perl/debian/copyright
trunk/libipc-sharelite-perl/debian/rules
trunk/libipc-sharelite-perl/debian/watch
trunk/libipc-sharelite-perl/typemap
Modified: trunk/libipc-sharelite-perl/Changes
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/Changes?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/Changes (original)
+++ trunk/libipc-sharelite-perl/Changes Mon Mar 3 23:00:32 2008
@@ -1,4 +1,17 @@
Revision history for Perl extension IPC::ShareLite.
+
+0.12 2008-02-25
+ - Use Devel::CheckLib to verify that we have a C compiler.
+
+0.11 2008-02-25
+ - Removed POD coverage test. Dynamic constants make it flaky.
+
+0.10 2008-02-24
+ - Use Perl's malloc wrappers
+ - moved test into t/sharelite.t
+ - made test use Test::More
+ - removed Configure mechanism
+ - assorted minor tidying
0.09 Wed Dec 4 13:51:05 PST 2002
- fixed bug in size() thanks to Craig Manley <c.manley at skybound.nl>
Modified: trunk/libipc-sharelite-perl/MANIFEST
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/MANIFEST?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/MANIFEST (original)
+++ trunk/libipc-sharelite-perl/MANIFEST Mon Mar 3 23:00:32 2008
@@ -1,14 +1,16 @@
Changes
+inc/Devel/CheckLib.pm
+inc/IO/CaptureOutput.pm
+lib/IPC/ShareLite.pm
+Makefile.PL
MANIFEST
-MANIFEST.SKIP
README
-Configure
-config_h.SH
-Makefile.PL
-ShareLite.pm
ShareLite.xs
-sharelite.h
-sharelite.c
+sharestuff.c
+sharestuff.h
+t/00-load.t
+t/pod.t
+t/sharelite.t
typemap
-test.pl
-TODO
+META.yml Module meta-data (added by MakeMaker)
+SIGNATURE Public-key signature (added by MakeMaker)
Modified: trunk/libipc-sharelite-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/Makefile.PL?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/Makefile.PL (original)
+++ trunk/libipc-sharelite-perl/Makefile.PL Mon Mar 3 23:00:32 2008
@@ -1,17 +1,47 @@
+use 5.006001;
+
+use strict;
+
+use lib qw(inc);
+use Config;
+use Devel::CheckLib;
use ExtUtils::MakeMaker;
-system('./Configure');
+if ( $^O =~ /^(MS)?Win32$/ ) {
+ warn "IPC::ShareLite doesn't work on Windows.\nStopping.\n";
+ exit 0; # == NA test result
+}
-# See lib/ExtUtils/MakeMaker.pm for details of how to influence
-# the contents of the Makefile that is written.
-WriteMakefile(
- 'NAME' => 'IPC::ShareLite',
- 'VERSION_FROM' => 'ShareLite.pm', # finds $VERSION
- 'LIBS' => [''], # e.g., '-lm'
- 'DEFINE' => '', # e.g., '-DHAVE_SOMETHING'
- 'INC' => '', # e.g., '-I/usr/include/other'
- 'OBJECT' => 'sharelite.o ShareLite.o',
- 'dist' => {
- COMPRESS => 'gzip', SUFFIX => 'gz',
- },
+if ( $^O =~ /^VMS$/ ) {
+ warn "IPC::ShareLite doesn't work on VMS.\nStopping.\n";
+ exit 0; # == NA test result
+}
+
+# Check that we have a C compiler
+check_lib_or_exit();
+
+my %mm_args = (
+ ( MM->can( 'signature_target' ) ? ( SIGN => 1 ) : () ),
+ NAME => 'IPC::ShareLite',
+ AUTHOR => 'Maurice Aubrey <maurice at cpan.org>',
+ VERSION_FROM => 'lib/IPC/ShareLite.pm',
+ ABSTRACT_FROM => 'lib/IPC/ShareLite.pm',
+ PL_FILES => {},
+ PREREQ_PM => { 'Test::More' => 0, },
+ LIBS => [''],
+ DEFINE => '',
+ INC => '',
+ OBJECT => 'sharestuff.o ShareLite.o',
+ dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
+ clean => { FILES => 'IPC-ShareLite-*' },
);
+
+{
+ local $^W = 0; # Silence warning about non-numeric version
+ if ( $ExtUtils::MakeMaker::VERSION >= '6.31' ) {
+ $mm_args{LICENSE} = 'perl';
+ }
+}
+
+WriteMakefile( %mm_args );
+
Modified: trunk/libipc-sharelite-perl/ShareLite.xs
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/ShareLite.xs?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/ShareLite.xs (original)
+++ trunk/libipc-sharelite-perl/ShareLite.xs Mon Mar 3 23:00:32 2008
@@ -7,361 +7,334 @@
#ifdef __cplusplus
}
#endif
-
#include <sys/shm.h>
#include <sys/sem.h>
-#include <sys/ipc.h>
-#include "sharelite.h"
-
+#include <sys/ipc.h>
+#include "sharestuff.h"
/*
* Some perl version compatibility stuff.
* Taken from HTML::Parser
*/
#include "patchlevel.h"
-#if PATCHLEVEL <= 4 /* perl5.004_XX */
-
+#if PATCHLEVEL <= 4 /* perl5.004_XX */
#ifndef PL_sv_undef
- #define PL_sv_undef sv_undef
- #define PL_sv_yes sv_yes
-#endif
-
+#define PL_sv_undef sv_undef
+#define PL_sv_yes sv_yes
+#endif
#ifndef PL_hexdigit
- #define PL_hexdigit hexdigit
-#endif
-
+#define PL_hexdigit hexdigit
+#endif
#if (PATCHLEVEL == 4 && SUBVERSION <= 4)
-/* The newSVpvn function was introduced in perl5.004_05 */
-static SV *
-newSVpvn(char *s, STRLEN len)
-{
- register SV *sv = newSV(0);
- sv_setpvn(sv,s,len);
+/* The newSVpvn function was introduced in perl5.004_05 */ static SV *
+newSVpvn( char *s, STRLEN len ) {
+ register SV *sv = newSV( 0 );
+ sv_setpvn( sv, s, len );
return sv;
}
-#endif /* not perl5.004_05 */
-#endif /* perl5.004_XX */
-
-static int
-not_here(s)
-char *s;
-{
- croak("%s not implemented on this architecture", s);
- return -1;
+#endif /* not perl5.004_05 */
+#endif /* perl5.004_XX */
+
+static double
+constant( char *name, int arg ) {
+ errno = 0;
+ switch ( *name ) {
+ case 'A':
+ break;
+ case 'B':
+ break;
+ case 'C':
+ break;
+ case 'D':
+ break;
+ case 'E':
+ break;
+ case 'F':
+ break;
+ case 'G':
+ if ( strEQ( name, "GETALL" ) )
+#ifdef GETALL
+ return GETALL;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "GETNCNT" ) )
+#ifdef GETNCNT
+ return GETNCNT;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "GETPID" ) )
+#ifdef GETPID
+ return GETPID;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "GETVAL" ) )
+#ifdef GETVAL
+ return GETVAL;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "GETZCNT" ) )
+#ifdef GETZCNT
+ return GETZCNT;
+#else
+ goto not_there;
+#endif
+ break;
+ case 'H':
+ break;
+ case 'I':
+ if ( strEQ( name, "IPC_ALLOC" ) )
+#ifdef IPC_ALLOC
+ return IPC_ALLOC;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_CREAT" ) )
+#ifdef IPC_CREAT
+ return IPC_CREAT;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_EXCL" ) )
+#ifdef IPC_EXCL
+ return IPC_EXCL;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_NOWAIT" ) )
+#ifdef IPC_NOWAIT
+ return IPC_NOWAIT;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_O_RMID" ) )
+#ifdef IPC_O_RMID
+ return IPC_O_RMID;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_O_SET" ) )
+#ifdef IPC_O_SET
+ return IPC_O_SET;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_O_STAT" ) )
+#ifdef IPC_O_STAT
+ return IPC_O_STAT;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_PRIVATE" ) )
+#ifdef IPC_PRIVATE
+ return IPC_PRIVATE;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_RMID" ) )
+#ifdef IPC_RMID
+ return IPC_RMID;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_SET" ) )
+#ifdef IPC_SET
+ return IPC_SET;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "IPC_STAT" ) )
+#ifdef IPC_STAT
+ return IPC_STAT;
+#else
+ goto not_there;
+#endif
+ break;
+ case 'J':
+ break;
+ case 'K':
+ break;
+ case 'L':
+ if ( strEQ( name, "LOCK_EX" ) )
+#ifdef LOCK_EX
+ return LOCK_EX;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "LOCK_SH" ) )
+#ifdef LOCK_SH
+ return LOCK_SH;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "LOCK_NB" ) )
+#ifdef LOCK_NB
+ return LOCK_NB;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "LOCK_UN" ) )
+#ifdef LOCK_UN
+ return LOCK_UN;
+#else
+ goto not_there;
+#endif
+ break;
+ case 'M':
+ break;
+ case 'N':
+ break;
+ case 'O':
+ break;
+ case 'P':
+ break;
+ case 'Q':
+ break;
+ case 'R':
+ break;
+ case 'S':
+ if ( strEQ( name, "SEM_A" ) )
+#ifdef SEM_A
+ return SEM_A;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SEM_R" ) )
+#ifdef SEM_R
+ return SEM_R;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SEM_UNDO" ) )
+#ifdef SEM_UNDO
+ return SEM_UNDO;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SETALL" ) )
+#ifdef SETALL
+ return SETALL;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SETVAL" ) )
+#ifdef SETVAL
+ return SETVAL;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SHM_LOCK" ) )
+#ifdef SHM_LOCK
+ return SHM_LOCK;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SHM_R" ) )
+#ifdef SHM_R
+ return SHM_R;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SHM_RDONLY" ) )
+#ifdef SHM_RDONLY
+ return SHM_RDONLY;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SHM_RND" ) )
+#ifdef SHM_RND
+ return SHM_RND;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SHM_SHARE_MMU" ) )
+#ifdef SHM_SHARE_MMU
+ return SHM_SHARE_MMU;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SHM_UNLOCK" ) )
+#ifdef SHM_UNLOCK
+ return SHM_UNLOCK;
+#else
+ goto not_there;
+#endif
+ if ( strEQ( name, "SHM_W" ) )
+#ifdef SHM_W
+ return SHM_W;
+#else
+ goto not_there;
+#endif
+ break;
+ case 'T':
+ break;
+ case 'U':
+ break;
+ case 'V':
+ break;
+ case 'W':
+ break;
+ case 'X':
+ break;
+ case 'Y':
+ break;
+ case 'Z':
+ break;
+ }
+ errno = EINVAL;
+ return 0;
+
+ not_there:
+ errno = ENOENT;
+ return 0;
}
-static double
-constant(name, arg)
- char *name;
- int arg;
-{
- errno = 0;
- switch (*name) {
- case 'A':
- break;
- case 'B':
- break;
- case 'C':
- break;
- case 'D':
- break;
- case 'E':
- break;
- case 'F':
- break;
- case 'G':
- if (strEQ(name, "GETALL"))
-#ifdef GETALL
- return GETALL;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "GETNCNT"))
-#ifdef GETNCNT
- return GETNCNT;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "GETPID"))
-#ifdef GETPID
- return GETPID;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "GETVAL"))
-#ifdef GETVAL
- return GETVAL;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "GETZCNT"))
-#ifdef GETZCNT
- return GETZCNT;
-#else
- goto not_there;
-#endif
- break;
- case 'H':
- break;
- case 'I':
- if (strEQ(name, "IPC_ALLOC"))
-#ifdef IPC_ALLOC
- return IPC_ALLOC;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_CREAT"))
-#ifdef IPC_CREAT
- return IPC_CREAT;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_EXCL"))
-#ifdef IPC_EXCL
- return IPC_EXCL;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_NOWAIT"))
-#ifdef IPC_NOWAIT
- return IPC_NOWAIT;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_O_RMID"))
-#ifdef IPC_O_RMID
- return IPC_O_RMID;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_O_SET"))
-#ifdef IPC_O_SET
- return IPC_O_SET;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_O_STAT"))
-#ifdef IPC_O_STAT
- return IPC_O_STAT;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_PRIVATE"))
-#ifdef IPC_PRIVATE
- return IPC_PRIVATE;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_RMID"))
-#ifdef IPC_RMID
- return IPC_RMID;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_SET"))
-#ifdef IPC_SET
- return IPC_SET;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "IPC_STAT"))
-#ifdef IPC_STAT
- return IPC_STAT;
-#else
- goto not_there;
-#endif
- break;
- case 'J':
- break;
- case 'K':
- break;
- case 'L':
- if (strEQ(name, "LOCK_EX"))
-#ifdef LOCK_EX
- return LOCK_EX;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "LOCK_SH"))
-#ifdef LOCK_SH
- return LOCK_SH;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "LOCK_NB"))
-#ifdef LOCK_NB
- return LOCK_NB;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "LOCK_UN"))
-#ifdef LOCK_UN
- return LOCK_UN;
-#else
- goto not_there;
-#endif
- break;
- case 'M':
- break;
- case 'N':
- break;
- case 'O':
- break;
- case 'P':
- break;
- case 'Q':
- break;
- case 'R':
- break;
- case 'S':
- if (strEQ(name, "SEM_A"))
-#ifdef SEM_A
- return SEM_A;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SEM_R"))
-#ifdef SEM_R
- return SEM_R;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SEM_UNDO"))
-#ifdef SEM_UNDO
- return SEM_UNDO;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SETALL"))
-#ifdef SETALL
- return SETALL;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SETVAL"))
-#ifdef SETVAL
- return SETVAL;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SHM_LOCK"))
-#ifdef SHM_LOCK
- return SHM_LOCK;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SHM_R"))
-#ifdef SHM_R
- return SHM_R;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SHM_RDONLY"))
-#ifdef SHM_RDONLY
- return SHM_RDONLY;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SHM_RND"))
-#ifdef SHM_RND
- return SHM_RND;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SHM_SHARE_MMU"))
-#ifdef SHM_SHARE_MMU
- return SHM_SHARE_MMU;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SHM_UNLOCK"))
-#ifdef SHM_UNLOCK
- return SHM_UNLOCK;
-#else
- goto not_there;
-#endif
- if (strEQ(name, "SHM_W"))
-#ifdef SHM_W
- return SHM_W;
-#else
- goto not_there;
-#endif
- break;
- case 'T':
- break;
- case 'U':
- break;
- case 'V':
- break;
- case 'W':
- break;
- case 'X':
- break;
- case 'Y':
- break;
- case 'Z':
- break;
- }
- errno = EINVAL;
- return 0;
-
- not_there:
- errno = ENOENT;
- return 0;
-}
-
-MODULE = IPC::ShareLite PACKAGE = IPC::ShareLite
+/* *INDENT-OFF* */
+
+MODULE = IPC::ShareLite PACKAGE = IPC::ShareLite
+
+PROTOTYPES: DISABLE
double
-constant(name,arg)
- char * name
- int arg
+constant( char *name, int arg)
Share*
-new_share(key, segment_size, flags)
- key_t key
- int segment_size
- int flags
-
-int
-write_share(share, data, length)
- Share* share
- char* data
- int length
+new_share(key_t key, int segment_size, int flags)
+
+int
+write_share(Share *share, char *data, int length)
char*
-read_share(share)
- Share* share
+read_share(Share *share)
PREINIT:
char* data;
int length;
CODE:
- share = (Share *)SvIV(ST(0));
length = read_share(share, &data);
ST(0) = sv_newmortal();
if (length >= 0) {
- sv_usepvn((SV*)ST(0), data, length);
+#ifdef sv_usepvn_flags
+ sv_usepvn_flags((SV*)ST(0), data, length, SV_HAS_TRAILING_NUL);
+#else
+ sv_usepvn((SV*)ST(0), data, length);
+#endif
} else {
- sv_setsv(ST(0), &PL_sv_undef);
+ sv_setsv(ST(0), &PL_sv_undef);
}
int
-destroy_share(share, rmid)
- Share* share
- int rmid
-
-int
-sharelite_lock(share, flags)
- Share* share
- int flags
-
-int
-sharelite_unlock(share)
- Share* share
+destroy_share(Share *share, int rmid)
+
+int
+sharelite_lock(Share *share, int flags)
+
+int
+sharelite_unlock(Share *share)
unsigned int
-sharelite_version(share)
- Share* share
-
-int
-sharelite_num_segments(share)
- Share* share
+sharelite_version(Share *share)
+
+int
+sharelite_num_segments(Share *share)
Modified: trunk/libipc-sharelite-perl/debian/changelog
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/debian/changelog?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/debian/changelog (original)
+++ trunk/libipc-sharelite-perl/debian/changelog Mon Mar 3 23:00:32 2008
@@ -1,4 +1,4 @@
-libipc-sharelite-perl (0.09-4) UNRELEASED; urgency=low
+libipc-sharelite-perl (0.12-1) unstable; urgency=low
[ gregor herrmann ]
* debian/control: Added: Vcs-Svn field (source stanza); Vcs-Browser
@@ -9,8 +9,15 @@
[ MartÃn Ferrari ]
* Moving source changes to a proper patch file.
+ * New upstream version.
+ * Bumbed debhelper version to 5.
+ * debian/control: added myself to Uploaders, bumped Standards-Version (no
+ changes), added libtest-pod-perl to B-D to enable POD tests.
+ * debian/copyright: updated CP info, new format.
+ * debian/watch: make it accept v-style versions.
+ * debian/rules: remade from templates.
- -- gregor herrmann <gregor+debian at comodo.priv.at> Sat, 01 Dec 2007 18:55:00 +0100
+ -- MartÃn Ferrari <martin.ferrari at gmail.com> Mon, 03 Mar 2008 20:57:39 -0200
libipc-sharelite-perl (0.09-3) unstable; urgency=low
Modified: trunk/libipc-sharelite-perl/debian/compat
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/debian/compat?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/debian/compat (original)
+++ trunk/libipc-sharelite-perl/debian/compat Mon Mar 3 23:00:32 2008
@@ -1,1 +1,1 @@
-4
+5
Modified: trunk/libipc-sharelite-perl/debian/control
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/debian/control?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/debian/control (original)
+++ trunk/libipc-sharelite-perl/debian/control Mon Mar 3 23:00:32 2008
@@ -1,20 +1,21 @@
Source: libipc-sharelite-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: Jay Bonci <jaybonci at debian.org>
+Uploaders: Jay Bonci <jaybonci at debian.org>,
+ MartÃn Ferrari <martin.ferrari at gmail.com>
Section: perl
Priority: optional
-Standards-Version: 3.6.1.0
+Standards-Version: 3.7.3
Homepage: http://search.cpan.org/dist/IPC-ShareLite/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libipc-sharelite-perl/
Vcs-Browser: http://svn.debian.org/wsvn/pkg-perl/trunk/libipc-sharelite-perl/
-Build-Depends: perl (>= 5.8.0-7), debhelper (>= 4.0)
+Build-Depends: perl (>= 5.8.0-7), debhelper (>= 5), libtest-pod-perl
Package: libipc-sharelite-perl
Architecture: any
Depends: ${perl:Depends}, ${shlibs:Depends}
Description: Perl module that provides a simple interface to shared memory
IPC::ShareLite provides a simple interface to shared memory, allowing
- data to be efficiently communicated between processes. Your operating
+ data to be efficiently communicated between processes. Your operating
system must support SysV IPC (shared memory and semaphores) in order to
use this module.
Modified: trunk/libipc-sharelite-perl/debian/copyright
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/debian/copyright?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/debian/copyright (original)
+++ trunk/libipc-sharelite-perl/debian/copyright Mon Mar 3 23:00:32 2008
@@ -1,39 +1,45 @@
-This is Debian GNU/Linux's prepackaged IPC::ShareLite.
-IPC::ShareLite provides a simple interface to shared memory, allowing
-data to be efficiently communicated between processes. Your operating
-system must support SysV IPC (shared memory and semaphores) in order to
-use this module.
+This package was put together by Christopher C. Chimelis <chris at debian.org>.
+It was downloaded from http://search.cpan.org/dist/IPC-ShareLite/.
+Upstream author: Maurice Aubrey <maurice at hevanet.com>.
-This package was put together by Christopher C. Chimelis
-<chris at debian.org>. The original sources should always be available
-from the Comprehensive Perl Archive Network (CPAN). Visit
-<URL:http://www.perl.com/CPAN/> to find a CPAN site near you.
+Files: *
+Copyright: © 1998-2002 Maurice Aubrey <maurice at hevanet.com>
+License: GPL-1+ | Artistic
+ Copyright 1998-2002, Maurice Aubrey <maurice at hevanet.com>.
+ All rights reserved.
+ This release by Andy Armstrong <andy at hexten.net>.
+ .
+ This module is free software; you may redistribute it and/or
+ modify it under the same terms as Perl itself.
-The only change for the Debian package was the addition of the debian/
-files.
+Files: inc/Devel/CheckLib.pm
+Copyright: © 2007 David Cantrell.
+ © 2007 David Golden.
+License: GPL-1+ | Artistic
+ Copyright 2007 David Cantrell. Portions copyright 2007 David Golden.
+ .
+ This module is free-as-in-speech software, and may be used, distributed,
+ and modified under the same conditions as perl itself.
-The IPC::ShareLite copyright is explicitely stated below. The phrase
-'under the same terms as Perl itself' refers to the Perl license, which is
-located on your system at /usr/share/doc/perl/copyright.
+Files: inc/IO/CaptureOutput.pm
+Copyright: © 2004, 2005 Simon Flack.
+ © 2007 David Golden.
+ Portions copyright 2004, 2005 Simon Flack. Portions copyright 2007 David
+ Golden. All rights reserved.
+ .
+ You may distribute under the terms of either the GNU General Public License or
+ the Artistic License, as specified in the Perl README file.
-The IPC::ShareLite copyright is as follows:
+Files: debian/*
+Copyright: © 2008 Debian Perl Group
+ <pkg-perl-maintainers at lists.alioth.debian.org>
+ © 2004 Jay Bonci <jaybonci at debian.org>
+ © 2000-2002 Christopher C. Chimelis <chris at debian.org>
+License: other
+ It is assumed that the previous maintainers did choose a license compatible
+ with the software.
- Copyright (C) 1998, Maurice Aubrey <maurice at hevanet.com>.
- All rights reserved.
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of either:
-
- a) the GNU General Public License as published by the Free
- Software Foundation; either version 1, or (at your option) any
- later version, or
-
- b) the "Artistic License"
-
- See:
-
- /usr/share/common-licenses/Artistic
- /usr/share/common-licenses/GPL
-
- For more information regarding these licensing options
+The complete text of the Artistic and GPL licenses can be found on Debian
+systems in /usr/share/common-licenses/Artistic and
+/usr/share/common-licenses/GPL.
Modified: trunk/libipc-sharelite-perl/debian/rules
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/debian/rules?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/debian/rules (original)
+++ trunk/libipc-sharelite-perl/debian/rules Mon Mar 3 23:00:32 2008
@@ -1,53 +1,71 @@
#!/usr/bin/make -f
-# Sample debian/rules that uses debhelper.
-# GNU copyright 1997 to 1999 by Joey Hess.
# Uncomment this to turn on verbose mode.
#export DH_VERBOSE=1
-# This is the debhelper compatibility version to use.
-# export DH_COMPAT=4
+# If set to a true value then MakeMaker's prompt function will
+# always return the default without waiting for user input.
+export PERL_MM_USE_DEFAULT=1
-PACKAGE=`pwd | sed -e "s/.*\/\\(.*\\)-.*/\\1/"`
+PACKAGE = $(shell dh_listpackages)
+PERL ?= /usr/bin/perl
+TMP = $(CURDIR)/debian/$(PACKAGE)
-build:
+# Allow disabling build optimation by setting noopt in
+# $DEB_BUILD_OPTIONS
+CFLAGS = -Wall -g
+ifneq (,$(findstring noopt,$(DEB_BUILD_OPTIONS)))
+ CFLAGS += -O0
+else
+ CFLAGS += -O2
+endif
+
+build: build-stamp
+build-stamp:
dh_testdir
- # Add here commands to compile the package.
- perl Makefile.PL verbose INSTALLDIRS=vendor
+ $(PERL) Makefile.PL INSTALLDIRS=vendor
+ $(MAKE) OPTIMIZE="$(CFLAGS)" LD_RUN_PATH=""
+ $(MAKE) test
+ touch $@
+
clean:
dh_testdir
dh_testroot
+ dh_clean build-stamp install-stamp
+ [ ! -f Makefile ] || $(MAKE) realclean
- -$(MAKE) clean
- rm -f Makefile.old
- dh_clean
-
-install:
+install: install-stamp
+install-stamp: build-stamp
dh_testdir
dh_testroot
dh_clean -k
- dh_installdirs
+ $(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
+ [ ! -d $(TMP)/usr/share/perl5 ] || \
+ rmdir --ignore-fail-on-non-empty --parents --verbose \
+ $(TMP)/usr/share/perl5
+ touch $@
- $(MAKE) PREFIX=$(CURDIR)/debian/$(PACKAGE)/usr OPTIMIZE="-O2 -g -Wall" test install
- [ ! -d $(CURDIR)/debian/$(shell dh_listpackages)/usr/share/perl5 ] || rmdir --ignore-fail-on-non-empty --parents --verbose $(CURDIR)/debian/$(shell dh_listpackages)/usr/share/perl5
+binary-indep: build install
+# We have nothing to do here for an architecture-dependent package
-binary-indep:;
binary-arch: build install
dh_testdir
dh_testroot
dh_installdocs
- dh_installman
dh_installchangelogs Changes
- dh_link
+ dh_shlibdeps
dh_strip
+ dh_perl
dh_compress
dh_fixperms
dh_installdeb
- dh_perl
dh_gencontrol
dh_md5sums
dh_builddeb
+source diff:
+ @echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
+
binary: binary-indep binary-arch
-.PHONY: build clean binary-indep binary-arch binary install configure
+.PHONY: build clean binary-indep binary-arch binary
Modified: trunk/libipc-sharelite-perl/debian/watch
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/debian/watch?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/debian/watch (original)
+++ trunk/libipc-sharelite-perl/debian/watch Mon Mar 3 23:00:32 2008
@@ -1,2 +1,3 @@
version=3
-http://search.cpan.org/dist/IPC-ShareLite/ .*/IPC-ShareLite-([[:digit:]].*)\.tar\.gz
+http://search.cpan.org/dist/IPC-ShareLite/ \
+ .*/IPC-ShareLite-v?(\d.*)\.tar\.gz
Modified: trunk/libipc-sharelite-perl/typemap
URL: http://svn.debian.org/wsvn/trunk/libipc-sharelite-perl/typemap?rev=16429&op=diff
==============================================================================
--- trunk/libipc-sharelite-perl/typemap (original)
+++ trunk/libipc-sharelite-perl/typemap Mon Mar 3 23:00:32 2008
@@ -1,14 +1,10 @@
TYPEMAP
-Share* SHARE
+Share* T_PTROBJ
key_t KEY
INPUT
-SHARE
- $var = (Share *)SvIV($arg);
KEY
$var = (key_t) SvIV($arg);
OUTPUT
-SHARE
- sv_setiv($arg, (I32) $var);
More information about the Pkg-perl-cvs-commits
mailing list