ports/156844: [PATCH] net/p5-Net-ext: fix CPAN Bug #43071

[Frank Wall]

>Number:         156844
>Category:       ports
>Synopsis:       [PATCH] net/p5-Net-ext: fix CPAN Bug #43071
>Confidential:   no
>Severity:       serious
>Priority:       medium
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          change-request
>Submitter-Id:   current-users
>Arrival-Date:   Fri May 06 09:50:12 UTC 2011
>Closed-Date:
>Last-Modified:
>Originator:     Frank Wall
>Release:        7.3-RELEASE-p2
>Organization:
>Environment:
FreeBSD 7.3-RELEASE-p2 FreeBSD 7.3-RELEASE-p2 #0: Mon Jul 12 19:23:19 UTC 2010     root at amd64-builder.daemonology.net:/usr/obj/usr/src/sys/GENERIC  amd64

>Description:
The current version of net/p5-Net-ext has a bug that makes it partial incompatible with perl 5.10. A patch exists since 2009, but was not applied yet.

Since perl 5.10 is our default version we should apply the patch.

References:
http://rt.cpan.org/Public/Bug/Display.html?id=43071
http://lists.opensuse.org/opensuse-bugs/2009-09/msg04661.html

>How-To-Repeat:
1. make sure you have perl 5.10 installed: pkg_info -xI perl-5.10
2. install net/p5-Net-ext
3. issue the command: perl -w and then:
use Net::TCP;

Result:

panic: no address for 'Net::TCP::TCP_RPTR2RXT' in 'Gen.c' at /usr/local/lib/perl5/5.10.1/mach/DynaLoader.pm line 223.
BEGIN failed--compilation aborted at /usr/local/lib/perl5/site_perl/5.10.1/mach/Net/Gen.pm line 194.
Compilation failed in require at /usr/local/lib/perl5/site_perl/5.10.1/mach/Net/Inet.pm line 33.
BEGIN failed--compilation aborted at /usr/local/lib/perl5/site_perl/5.10.1/mach/Net/Inet.pm line 33.
Compilation failed in require at /usr/local/lib/perl5/site_perl/5.10.1/mach/Net/UDP.pm line 32.
BEGIN failed--compilation aborted at /usr/local/lib/perl5/site_perl/5.10.1/mach/Net/UDP.pm line 32.

>Fix:
- apply the attached patch

Patch attached with submission follows:

--- net/p5-Net-ext/files/does_not_exist	1970-01-01 01:00:00.000000000 +0100
+++ net/p5-Net-ext/files/patch-Gen.xs	2011-05-06 11:33:07.000000000 +0200
@@ -0,0 +1,11 @@
+--- Gen.xs.orig	2002-04-10 13:05:58.000000000 +0200
++++ Gen.xs	2011-05-06 11:32:45.000000000 +0200
+@@ -146,7 +146,7 @@
+     CV *cv;
+     klen = strlen(name);
+     (void) hv_fetch(missing, name, klen, TRUE);
+-    cv = newXS(name, NULL, file); /* newSUB with no block */
++    cv = newXS(name, Perl_cv_undef, file); /* newSUB with no block */
+     sv_setsv((SV*)cv, &PL_sv_no); /* prototype it as "()" */
+ }
+ 
--- net/p5-Net-ext/Makefile.orig	2008-04-17 16:27:42.000000000 +0200
+++ net/p5-Net-ext/Makefile	2011-05-06 11:35:26.000000000 +0200
@@ -7,6 +7,7 @@
 
 PORTNAME=	Net-ext
 PORTVERSION=	1.011
+PORTREVISION=	1
 CATEGORIES=	net perl5
 MASTER_SITES=	CPAN
 PKGNAMEPREFIX=	p5-


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