Attachment 140859 Details for Bug 187579 – p5-DBD-InterBase.shar

p5-DBD-InterBase.shar

p5-DBD-InterBase.shar (text/plain), 6.84 KB, created by Yuri Perejilin on 2014-03-14 15:50:00 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Yuri Perejilin

Created: 2014-03-14 15:50:00 UTC

Size: 6.84 KB

patch

obsolete

># This is a shell archive.  Save it in a file, remove anything before
># this line, and then unpack it by entering "sh file".  Note, it may
># create directories; files and directories will be owned by you and
># have default permissions.
>#
># This archive contains:
>#
>#	p5-DBD-InterBase
>#	p5-DBD-InterBase/Makefile
>#	p5-DBD-InterBase/distinfo
>#	p5-DBD-InterBase/pkg-descr
>#	p5-DBD-InterBase/pkg-plist
>#	p5-DBD-InterBase/files
>#	p5-DBD-InterBase/files/patch-Makefile.PL
>#	p5-DBD-InterBase/files/patch-dbdimp.c
>#
>echo c - p5-DBD-InterBase
>mkdir -p p5-DBD-InterBase > /dev/null 2>&1
>echo x - p5-DBD-InterBase/Makefile
>sed 's/^X//' >p5-DBD-InterBase/Makefile << '576518d811578218fef8be587715b779'
>X# New ports collection makefile for:	DBD::InterBase
>X# Date created:		15 Oct 2001
>X# Whom:			Sergey Skvortsov <skv@protey.ru>
>X# Date created:		14 March 2014
>X# Whom:			Yuri Perezhilin <yuri@rivera.ru>
>X#
>X# $FreeBSD: $
>X#
>X
>XPORTNAME=	DBD-InterBase
>XPORTVERSION=	0.48
>XCATEGORIES=	databases perl5
>XMASTER_SITES=	CPAN
>XMASTER_SITE_SUBDIR=	DBD
>XPKGNAMEPREFIX=	p5-
>X
>XMAINTAINER=	yuri@rivera.ru
>XCOMMENT=	DBI driver for InterBase/Firebird/Yaffil RDBMS server
>X
>XBUILD_DEPENDS=	p5-DBI>=0:${PORTSDIR}/databases/p5-DBI
>XRUN_DEPENDS:=	${BUILD_DEPENDS}
>X
>XUSE_FIREBIRD=	yes
>X
>XUSES=		perl5
>XUSE_PERL5=	configure
>X
>Xpost-patch:
>X		@${PERL} -pi -e 's,%%IB_BASE%%,${LOCALBASE},g' \
>X			${WRKSRC}/Makefile.PL
>X
>XMAN3=		DBD::InterBase.3
>X
>X.include <bsd.port.pre.mk>
>X.if ${PERL_LEVEL} < 501400
>XBROKEN=	This port for perl version >= 5.14
>X.endif
>X.include <bsd.port.post.mk>
>576518d811578218fef8be587715b779
>echo x - p5-DBD-InterBase/distinfo
>sed 's/^X//' >p5-DBD-InterBase/distinfo << 'c140f136c1145e2f79dab91e1613df37'
>XSHA256 (DBD-InterBase-0.48.tar.gz) = 40b1dba601f10c5d66b26bb235424d398882740b3586a30405123735bc4bec44
>XSIZE (DBD-InterBase-0.48.tar.gz) = 88658
>c140f136c1145e2f79dab91e1613df37
>echo x - p5-DBD-InterBase/pkg-descr
>sed 's/^X//' >p5-DBD-InterBase/pkg-descr << '897f4db4cb24a9ad384ef802cbeac412'
>XDBD::InterBase is a Perl module which works with the DBI module to
>Xprovide access to InterBase/Firebird/Yaffil databases.
>X
>XWWW: http://search.cpan.org/dist/DBD-InterBase/
>897f4db4cb24a9ad384ef802cbeac412
>echo x - p5-DBD-InterBase/pkg-plist
>sed 's/^X//' >p5-DBD-InterBase/pkg-plist << '732ffc66060159b3065faec76dfc172d'
>X%%SITE_PERL%%/%%PERL_ARCH%%/auto/DBD/InterBase/.packlist
>X%%SITE_PERL%%/%%PERL_ARCH%%/DBD/InterBase.pm
>X%%SITE_PERL%%/%%PERL_ARCH%%/DBD/InterBase/GetInfo.pm
>X%%SITE_PERL%%/%%PERL_ARCH%%/DBD/InterBase/TypeInfo.pm
>X%%SITE_PERL%%/%%PERL_ARCH%%/auto/DBD/InterBase/InterBase.bs
>X%%SITE_PERL%%/%%PERL_ARCH%%/auto/DBD/InterBase/InterBase.so
>X@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/DBD/InterBase
>X@dirrmtry %%SITE_PERL%%/%%PERL_ARCH%%/DBD
>X@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/DBD/InterBase
>X@dirrmtry %%SITE_PERL%%/%%PERL_ARCH%%/auto/DBD
>732ffc66060159b3065faec76dfc172d
>echo c - p5-DBD-InterBase/files
>mkdir -p p5-DBD-InterBase/files > /dev/null 2>&1
>echo x - p5-DBD-InterBase/files/patch-Makefile.PL
>sed 's/^X//' >p5-DBD-InterBase/files/patch-Makefile.PL << '6f9d8846a6b7a5865679d767be975462'
>X--- Makefile.PL.orig	Sat Nov 22 06:12:11 2003
>X+++ Makefile.PL	Mon Dec  8 20:01:27 2003
>X@@ -28,7 +28,7 @@
>X use DBI::DBD;   # DBD creation tools
>X 
>X my $ib_dir_prefix;
>X-
>X+=rem
>X # init stuff
>X my $IB_Bin_path = '';
>X my $isql_name;
>X@@ -82,7 +82,12 @@
>X     @ib_bin_dirs = (qw(/usr/interbase/bin /opt/interbase/bin /opt/firebird/bin /usr/bin /usr/local/bin));
>X     @ib_inc_dirs = (qw(/usr/interbase/include /opt/interbase/include /opt/firebird/include /usr/include));
>X }
>X-
>X+=cut
>X+my $IB_BASE='%%IB_BASE%%';
>X+my $IB_Bin_path = $IB_BASE.'/bin';
>X+my $isql_name = 'isql';
>X+my $ib_lib_dir = $IB_BASE.'/lib';
>X+my $ib_inc = $IB_BASE.'/include';
>X sub locate_dbi_arch_dir {
>X     my $dbidir = dbd_dbi_dir();
>X     my @try = map { "$_/auto/DBI" } @INC;
>X@@ -91,7 +96,7 @@
>X     Carp::carp( "Multiple copies of Driver.xst found in: @xst") if @xst > 1;
>X     return $xst[0];
>X }
>X-
>X+=rem
>X ################################################################################
>X # sub test_files - checks if at least one of the files in the list exists
>X # Paramters:
>X@@ -296,13 +301,13 @@
>X 
>X # prompt for InterBase bin directory
>X $IB_Bin_path = dir_choice("InterBase/Firebird bin directory", [@ib_bin_dirs], [qw(gfix gfix.exe)]);
>X-
>X+=cut
>X unless(-x $IB_Bin_path)
>X {
>X     carp "I cannot find your InterBase/Firebird installation.\nDBD::InterBase cannot build or run without InterBase.\n";
>X     exit 1;
>X }
>X-
>X+=rem
>X # get InterBase version
>X my $IBVERSION;
>X my $GFIX_PATH = $IB_Bin_path . "/" . test_files($IB_Bin_path, [qw(gfix gfix.exe)]);
>X@@ -312,7 +317,7 @@
>X 
>X # prompt for IB include dir
>X my $ib_inc = dir_choice("InterBase/Firebird include directory", [@ib_inc_dirs], [qw(gds.h ibase.h)]);
>X-
>X+=cut
>X 
>X # we use a hash for the MakeMaker parameters
>X my %MakeParams = (
>X@@ -323,14 +328,14 @@
>X     'CCFLAGS'       => '',
>X     'INC'           => qq(-I"$ib_inc" -I"${\locate_dbi_arch_dir()}"),
>X     'OBJECT'        => "InterBase.o dbdimp.o",
>X-    'LIBS'          => [''],
>X+    'LIBS'          => "-L$ib_lib_dir -lgds",
>X     'OPTIMIZE'      => $Config::Config{'optimize'},
>X     'XSPROTOARG'    => '-noprototypes',
>X     'dist'          => {COMPRESS=>'gzip -9f', SUFFIX=>'gz'},
>X     'clean'         => {FILES => "*.xsi *.old t/*.old *~ t/*~ trace.txt t/trace.txt lib/DBD/InterBase/*~ lib/DBD/InterBase/*.old lib/Bundle/DBD/*~ lib/Bundle/DBD/*.old"},
>X     'realclean'     => {FILES => "t/test.conf"},
>X );
>X-
>X+=rem
>X # the OS specific build environment setup
>X my $os = $Config::Config{'osname'};
>X if ($os eq 'MSWin32')
>X@@ -530,7 +535,7 @@
>X 
>X # create the test config file
>X make_test_conf();
>X-
>X+=cut
>X # and last but not least write the makefile
>X WriteMakefile(%MakeParams);
>X 
>6f9d8846a6b7a5865679d767be975462
>echo x - p5-DBD-InterBase/files/patch-dbdimp.c
>sed 's/^X//' >p5-DBD-InterBase/files/patch-dbdimp.c << '754bd142b4501fea0d8d076b4de9cbf8'
>X--- dbdimp.c.orig	2008-01-08 09:02:45.000000000 +0300
>X+++ dbdimp.c		2014-01-27 13:58:49.202445490 +0400
>X@@ -113,7 +113,7 @@
>X 
>X     if (DBIc_TRACE_LEVEL(imp_xxh) >= 2)
>X         PerlIO_printf(DBIc_LOGPIO(imp_xxh), "%s error %d recorded: %s\n", 
>X-            what, rc, SvPV(errstr,na));
>X+            what, rc, SvPV(errstr,PL_na));
>X }
>X 
>X #define CALC_AVAILABLE(buff) sizeof(buff) - strlen(buff) - 1
>X@@ -693,7 +693,7 @@
>X         return Nullsv;
>X     else
>X     {
>X-        if ((result == &sv_yes) || (result == &sv_no))
>X+        if ((result == &PL_sv_yes) || (result == &PL_sv_no))
>X             return result;
>X         else
>X             return sv_2mortal(result);
>X@@ -1991,8 +1991,8 @@
>X         DBIh_EVENT2(drh, ERROR_event, DBIc_ERR(imp_drh), DBIc_ERRSTR(imp_drh));
>X         return FALSE;
>X     }
>X-    if (perl_destruct_level)
>X-        perl_destruct_level = 0;
>X+    if (PL_perl_destruct_level)
>X+        PL_perl_destruct_level = 0;
>X     return FALSE;
>X }
>X
>754bd142b4501fea0d8d076b4de9cbf8
>exit

Actions: View

Attachments on bug 187579: 140859