From owner-freebsd-ports-bugs@FreeBSD.ORG Wed Feb 1 17:10:09 2006 Return-Path: X-Original-To: freebsd-ports-bugs@hub.freebsd.org Delivered-To: freebsd-ports-bugs@hub.freebsd.org Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125]) by hub.freebsd.org (Postfix) with ESMTP id B0E1516A420 for ; Wed, 1 Feb 2006 17:10:09 +0000 (GMT) (envelope-from gnats@FreeBSD.org) Received: from freefall.freebsd.org (freefall.freebsd.org [216.136.204.21]) by mx1.FreeBSD.org (Postfix) with ESMTP id B623643D49 for ; Wed, 1 Feb 2006 17:10:06 +0000 (GMT) (envelope-from gnats@FreeBSD.org) Received: from freefall.freebsd.org (gnats@localhost [127.0.0.1]) by freefall.freebsd.org (8.13.4/8.13.4) with ESMTP id k11HA6aD098079 for ; Wed, 1 Feb 2006 17:10:06 GMT (envelope-from gnats@freefall.freebsd.org) Received: (from gnats@localhost) by freefall.freebsd.org (8.13.4/8.13.4/Submit) id k11HA6uq098078; Wed, 1 Feb 2006 17:10:06 GMT (envelope-from gnats) Resent-Date: Wed, 1 Feb 2006 17:10:06 GMT Resent-Message-Id: <200602011710.k11HA6uq098078@freefall.freebsd.org> Resent-From: FreeBSD-gnats-submit@FreeBSD.org (GNATS Filer) Resent-To: freebsd-ports-bugs@FreeBSD.org Resent-Reply-To: FreeBSD-gnats-submit@FreeBSD.org, Eric Stith Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125]) by hub.freebsd.org (Postfix) with ESMTP id 701EB16A420 for ; Wed, 1 Feb 2006 17:05:01 +0000 (GMT) (envelope-from root@obscura.dname.net) Received: from obscura.dname.net (host-133-52-111-24.midco.net [24.111.52.133]) by mx1.FreeBSD.org (Postfix) with ESMTP id 844A943D45 for ; Wed, 1 Feb 2006 17:05:00 +0000 (GMT) (envelope-from root@obscura.dname.net) Received: from obscura.dname.net (localhost [127.0.0.1]) by obscura.dname.net (8.13.4/8.13.4) with ESMTP id k11H9mWD049065 for ; Wed, 1 Feb 2006 11:09:48 -0600 (CST) (envelope-from root@obscura.dname.net) Received: (from root@localhost) by obscura.dname.net (8.13.4/8.13.4/Submit) id k11H9mQ8049064; Wed, 1 Feb 2006 11:09:48 -0600 (CST) (envelope-from root) Message-Id: <200602011709.k11H9mQ8049064@obscura.dname.net> Date: Wed, 1 Feb 2006 11:09:48 -0600 (CST) From: Eric Stith To: FreeBSD-gnats-submit@FreeBSD.org X-Send-Pr-Version: 3.113 Cc: Subject: ports/92693: New Port: graphics/Geo-Proj4, a Perl wrapper for the proj library X-BeenThere: freebsd-ports-bugs@freebsd.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Ports bug reports List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 01 Feb 2006 17:10:09 -0000 >Number: 92693 >Category: ports >Synopsis: New Port: graphics/Geo-Proj4, a Perl wrapper for the proj library >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: Wed Feb 01 17:10:03 GMT 2006 >Closed-Date: >Last-Modified: >Originator: Eric Stith >Release: FreeBSD 6.0-RELEASE i386 >Organization: Meridian Environmental Technology, Inc. >Environment: System: FreeBSD obscura.dname.net 6.0-RELEASE FreeBSD 6.0-RELEASE #0: Thu Nov 3 09:36:13 UTC 2005 root@x64.samsco.home:/usr/obj/usr/src/sys/GENERIC i386 >Description: >How-To-Repeat: >Fix: # 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: # # /usr/ports/graphics/p5-Geo-Proj4 # /usr/ports/graphics/p5-Geo-Proj4/Makefile # /usr/ports/graphics/p5-Geo-Proj4/pkg-descr # /usr/ports/graphics/p5-Geo-Proj4/pkg-plist # /usr/ports/graphics/p5-Geo-Proj4/distinfo # /usr/ports/graphics/p5-Geo-Proj4/files # /usr/ports/graphics/p5-Geo-Proj4/files/patch-Makefile.PL # /usr/ports/graphics/p5-Geo-Proj4/files/patch-const-c.inc # /usr/ports/graphics/p5-Geo-Proj4/files/patch-const-xs.inc # echo c - /usr/ports/graphics/p5-Geo-Proj4 mkdir -p /usr/ports/graphics/p5-Geo-Proj4 > /dev/null 2>&1 echo x - /usr/ports/graphics/p5-Geo-Proj4/Makefile sed 's/^X//' >/usr/ports/graphics/p5-Geo-Proj4/Makefile << 'END-of-/usr/ports/graphics/p5-Geo-Proj4/Makefile' X# New ports collection makefile for: p5-Geo-Point X# Date created: 27 January 2006 X# Whom: estith X# X# $FreeBSD$ X# X XPORTNAME= Geo-Proj4 XPORTVERSION= 0.96 XCATEGORIES= graphics devel perl5 XMASTER_SITES= ${MASTER_SITE_PERL_CPAN} XMASTER_SITE_SUBDIR= Geo XPKGNAMEPREFIX= p5- X XMAINTAINER= estith.freebsd.ports@thelunarempire.net XCOMMENT= Perl cartographic projections wrapper for Proj library X XLIB_DEPENDS= proj:${PORTSDIR}/graphics/proj X XPATCHDIR= ${FILESDIR} X XMAN3= Geo::Proj4.3 XCFLAGS+= -I ${PREFIX}/include # XXX - This seems ugly XPERL_CONFIGURE= yes X X.include X X.if ${PERL_LEVEL} < 500600 XIGNORE= requires perl 5.6.x or later. Install lang/perl5 then try again X.endif X X.include END-of-/usr/ports/graphics/p5-Geo-Proj4/Makefile echo x - /usr/ports/graphics/p5-Geo-Proj4/pkg-descr sed 's/^X//' >/usr/ports/graphics/p5-Geo-Proj4/pkg-descr << 'END-of-/usr/ports/graphics/p5-Geo-Proj4/pkg-descr' XThe Open Source PROJ.4 library converts between geographic coordinate systems. XIt is able to convert between geodetic latitude and longitude (LL, most commonly Xthe WGS84 projection), into an enormous variety of other cartographic Xprojections (XY, usually UTM). X XWWW: http://search.cpan.org/dist/Geo-Proj4/ END-of-/usr/ports/graphics/p5-Geo-Proj4/pkg-descr echo x - /usr/ports/graphics/p5-Geo-Proj4/pkg-plist sed 's/^X//' >/usr/ports/graphics/p5-Geo-Proj4/pkg-plist << 'END-of-/usr/ports/graphics/p5-Geo-Proj4/pkg-plist' Xlib/perl5/site_perl/5.8.7/mach/Geo/Proj4.pm Xlib/perl5/site_perl/5.8.7/mach/Geo/Proj4.pod Xlib/perl5/site_perl/5.8.7/mach/auto/Geo/Proj4/.packlist Xlib/perl5/site_perl/5.8.7/mach/auto/Geo/Proj4/Proj4.bs Xlib/perl5/site_perl/5.8.7/mach/auto/Geo/Proj4/Proj4.so X@dirrm lib/perl5/site_perl/5.8.7/mach/auto/Geo/Proj4 X@dirrm lib/perl5/site_perl/5.8.7/mach/auto/Geo END-of-/usr/ports/graphics/p5-Geo-Proj4/pkg-plist echo x - /usr/ports/graphics/p5-Geo-Proj4/distinfo sed 's/^X//' >/usr/ports/graphics/p5-Geo-Proj4/distinfo << 'END-of-/usr/ports/graphics/p5-Geo-Proj4/distinfo' XMD5 (Geo-Proj4-0.96.tar.gz) = ad97612158c95562cee43485910fbf40 XSHA256 (Geo-Proj4-0.96.tar.gz) = f010153d3b1d3c017759b7fb7f2cfc61a9dce4662073cf6228872bff7b606e00 XSIZE (Geo-Proj4-0.96.tar.gz) = 18698 END-of-/usr/ports/graphics/p5-Geo-Proj4/distinfo echo c - /usr/ports/graphics/p5-Geo-Proj4/files mkdir -p /usr/ports/graphics/p5-Geo-Proj4/files > /dev/null 2>&1 echo x - /usr/ports/graphics/p5-Geo-Proj4/files/patch-Makefile.PL sed 's/^X//' >/usr/ports/graphics/p5-Geo-Proj4/files/patch-Makefile.PL << 'END-of-/usr/ports/graphics/p5-Geo-Proj4/files/patch-Makefile.PL' Xdiff -ru Makefile.PL.orig Makefile.PL X--- Makefile.PL.orig Fri Dec 9 18:31:40 2005 X+++ Makefile.PL Fri Jan 27 16:00:01 2006 X@@ -1,34 +1,35 @@ X+use 5.008007; X use ExtUtils::MakeMaker; X- X-require 5.006; X X-my $libversion = '4.4.9'; X-my $FWTools = $ENV{GEOPROJ_FWTOOLS_DIR} || '.'; X- X-# This is very UNIX/Linux centric. Please help me with the X-# required windows tests. X- X-my $FWbin = "$FWTools/bin_safe"; X-my $cs2cs = -x "$FWbin/cs2cs" ? "$FWbin/cs2cs" : 'cs2cs'; X- X-die "ERROR: proj library too old or not found: require $libversion\n" X- unless open DIR, "$cs2cs -v 2>&1 |"; X- X-my $got = ; X- X-die "ERROR: proj library version not known\n" X- unless $got =~ m/\ ([\d.]+)\,/; X- X-my $version = $1; X- X-die "ERROR: libproj too old, found $version required is $libversion\n" X- if $version lt $libversion; X- X-WriteMakefile X- ( NAME => 'Geo::Proj4' X- , VERSION_FROM => 'lib/Geo/Proj4.pm' X- , AUTHOR => 'Mark Overmeer, Schuyler Erle, Rich Gibson' X- , ABSTRACT => 'Proj4 library for carthographic projections' X- , CCFLAGS => "-I$FWTools/include" X- , LIBS => [ "-L$FWTools/lib -lproj" ] X- ); X+WriteMakefile( X+ NAME => 'Geo::Proj4', X+ VERSION_FROM => 'lib/Geo/Proj4.pm', # finds $VERSION, X+ AUTHOR => 'Mark Overmeer, Schuyler Erle, Rich Gibson', X+ LIBS => ['-lproj'], X+ DEFINE => '', X+ INC => '-I.', # e.g., '-I. -I/usr/include/other' X+); X+if (eval {require ExtUtils::Constant; 1}) { X+ # If you edit these definitions to change the constants used by this module, X+ # you will need to use the generated const-c.inc and const-xs.inc X+ # files to replace their "fallback" counterparts before distributing your X+ # changes. X+ my @names = (qw()); X+ ExtUtils::Constant::WriteConstants( X+ NAME => 'Geo::Proj4', X+ NAMES => \@names, X+ DEFAULT_TYPE => 'IV', X+ LIBS => '-lproj', X+ C_FILE => 'const-c.inc', X+ XS_FILE => 'const-xs.inc', X+ ); X+ X+} X+else { X+ use File::Copy; X+ use File::Spec; X+ foreach my $file ('const-c.inc', 'const-xs.inc') { X+ my $fallback = File::Spec->catfile('fallback', $file); X+ copy ($fallback, $file) or die "Can't copy $fallback to $file: $!"; X+ } X+} END-of-/usr/ports/graphics/p5-Geo-Proj4/files/patch-Makefile.PL echo x - /usr/ports/graphics/p5-Geo-Proj4/files/patch-const-c.inc sed 's/^X//' >/usr/ports/graphics/p5-Geo-Proj4/files/patch-const-c.inc << 'END-of-/usr/ports/graphics/p5-Geo-Proj4/files/patch-const-c.inc' Xdiff -ru const-c.inc.orig const-c.inc X--- const-c.inc.orig Fri Jan 27 13:03:30 2006 X+++ const-c.inc Fri Jan 27 16:25:32 2006 X@@ -0,0 +1,55 @@ X+#define PERL_constant_NOTFOUND 1 X+#define PERL_constant_NOTDEF 2 X+#define PERL_constant_ISIV 3 X+#define PERL_constant_ISNO 4 X+#define PERL_constant_ISNV 5 X+#define PERL_constant_ISPV 6 X+#define PERL_constant_ISPVN 7 X+#define PERL_constant_ISSV 8 X+#define PERL_constant_ISUNDEF 9 X+#define PERL_constant_ISUV 10 X+#define PERL_constant_ISYES 11 X+ X+#ifndef NVTYPE X+typedef double NV; /* 5.6 and later define NVTYPE, and typedef NV to it. */ X+#endif X+#ifndef aTHX_ X+#define aTHX_ /* 5.6 or later define this for threading support. */ X+#endif X+#ifndef pTHX_ X+#define pTHX_ /* 5.6 or later define this for threading support. */ X+#endif X+ X+static int X+constant (pTHX_ const char *name, STRLEN len) { X+ /* Initially switch on the length of the name. */ X+ /* When generated this function returned values for the list of names given X+ in this section of perl code. Rather than manually editing these functions X+ to add or remove constants, which would result in this comment and section X+ of code becoming inaccurate, we recommend that you edit this section of X+ code, and use it to regenerate a new set of constant functions which you X+ then use to replace the originals. X+ X+ Regenerate these constant functions by feeding this entire source file to X+ perl -x X+ X+#!perl -w X+use ExtUtils::Constant qw (constant_types C_constant XS_constant); X+ X+my $types = {map {($_, 1)} qw()}; X+my @names = (qw()); X+ X+print constant_types(); # macro defs X+foreach (C_constant ("Geo::Proj4", 'constant', 'IV', $types, undef, 3, @names) ) { X+ print $_, "\n"; # C constant subs X+} X+print "#### XS Section:\n"; X+print XS_constant ("Geo::Proj4", $types); X+__END__ X+ */ X+ X+ switch (len) { X+ } X+ return PERL_constant_NOTFOUND; X+} X+ END-of-/usr/ports/graphics/p5-Geo-Proj4/files/patch-const-c.inc echo x - /usr/ports/graphics/p5-Geo-Proj4/files/patch-const-xs.inc sed 's/^X//' >/usr/ports/graphics/p5-Geo-Proj4/files/patch-const-xs.inc << 'END-of-/usr/ports/graphics/p5-Geo-Proj4/files/patch-const-xs.inc' Xdiff -ru const-xs.inc Geo-Proj4-0.96.new/const-xs.inc X--- const-xs.inc.orig Fri Jan 27 13:03:30 2006 X+++ const-xs.inc Fri Jan 27 16:25:32 2006 X@@ -0,0 +1,87 @@ X+void X+constant(sv) X+ PREINIT: X+#ifdef dXSTARG X+ dXSTARG; /* Faster if we have it. */ X+#else X+ dTARGET; X+#endif X+ STRLEN len; X+ int type; X+ /* IV iv; Uncomment this if you need to return IVs */ X+ /* NV nv; Uncomment this if you need to return NVs */ X+ /* const char *pv; Uncomment this if you need to return PVs */ X+ INPUT: X+ SV * sv; X+ const char * s = SvPV(sv, len); X+ PPCODE: X+ type = constant(aTHX_ s, len); X+ /* Return 1 or 2 items. First is error message, or undef if no error. X+ Second, if present, is found value */ X+ switch (type) { X+ case PERL_constant_NOTFOUND: X+ sv = sv_2mortal(newSVpvf("%s is not a valid Geo::Proj4 macro", s)); X+ PUSHs(sv); X+ break; X+ case PERL_constant_NOTDEF: X+ sv = sv_2mortal(newSVpvf( X+ "Your vendor has not defined Geo::Proj4 macro %s, used", s)); X+ PUSHs(sv); X+ break; X+ /* Uncomment this if you need to return IVs X+ case PERL_constant_ISIV: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHi(iv); X+ break; */ X+ /* Uncomment this if you need to return NOs X+ case PERL_constant_ISNO: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHs(&PL_sv_no); X+ break; */ X+ /* Uncomment this if you need to return NVs X+ case PERL_constant_ISNV: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHn(nv); X+ break; */ X+ /* Uncomment this if you need to return PVs X+ case PERL_constant_ISPV: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHp(pv, strlen(pv)); X+ break; */ X+ /* Uncomment this if you need to return PVNs X+ case PERL_constant_ISPVN: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHp(pv, iv); X+ break; */ X+ /* Uncomment this if you need to return SVs X+ case PERL_constant_ISSV: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHs(sv); X+ break; */ X+ /* Uncomment this if you need to return UNDEFs X+ case PERL_constant_ISUNDEF: X+ break; */ X+ /* Uncomment this if you need to return UVs X+ case PERL_constant_ISUV: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHu((UV)iv); X+ break; */ X+ /* Uncomment this if you need to return YESs X+ case PERL_constant_ISYES: X+ EXTEND(SP, 1); X+ PUSHs(&PL_sv_undef); X+ PUSHs(&PL_sv_yes); X+ break; */ X+ default: X+ sv = sv_2mortal(newSVpvf( X+ "Unexpected return type %d while processing Geo::Proj4 macro %s, used", X+ type, s)); X+ PUSHs(sv); X+ } END-of-/usr/ports/graphics/p5-Geo-Proj4/files/patch-const-xs.inc exit >Release-Note: >Audit-Trail: >Unformatted: