Skip site navigation (1)Skip section navigation (2)
Date:      Fri, 14 Mar 2014 19:22:35 +0400
From:      Yuri Perezhilin <yuri@rivera.ru>
To:        FreeBSD-gnats-submit@freebsd.org
Subject:   ports/187579: Relive port: databases/p5-DBD-InterBase perl5 Interbase/Firebird DBI access module
Message-ID:  <E1WOTwR-0002vm-W3@mail.dnlab.ru>
Resent-Message-ID: <201403141550.s2EFo0YC042455@freefall.freebsd.org>

next in thread | raw e-mail | index | archive | help

>Number:         187579
>Category:       ports
>Synopsis:       Relive port: databases/p5-DBD-InterBase perl5 Interbase/Firebird DBI access module
>Confidential:   no
>Severity:       non-critical
>Priority:       medium
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          change-request
>Submitter-Id:   current-users
>Arrival-Date:   Fri Mar 14 15:50:00 UTC 2014
>Closed-Date:
>Last-Modified:
>Originator:     Yuri Perezhilin
>Release:        FreeBSD 10.0-RELEASE amd64
>Organization:
dnlab.ru
>Environment:
System: FreeBSD 10.0-RELEASE FreeBSD 10.0-RELEASE #0 r260789: Thu Jan 16 22:34:59 UTC 2014 root@snap.freebsd.org:/usr/obj/usr/src/sys/GENERIC amd64
>Description:
	DBD::InterBase is a Perl module which works with the DBI module to
provide access to InterBase databases.

WWW: http://search.cpan.org/dist/DBD-InterBase/

>How-To-Repeat:
>Fix:

--- p5-DBD-InterBase.shar begins here ---
# 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
--- p5-DBD-InterBase.shar ends here ---


>Release-Note:
>Audit-Trail:
>Unformatted:



Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?E1WOTwR-0002vm-W3>