IO::Interface adds object-methods to IO::Socket objects to allow

them to get and set operational characteristics of network interface
cards, such as IP addresses, net masks, and so forth.  It is useful
for identifying runtime characteristics of cards, such as broadcast
addresses, and finding interfaces that satisfy certain criteria,
such as the ability to multicast.

PR:	ports/26876

7 files changed, 66 insertions, 0 deletions

diff --git a/net/Makefile b/net/Makefile
index 2ee6cab..919be0f 100644
--- a/net/Makefile
+++ b/net/Makefile
@@ -226,6 +226,7 @@
     SUBDIR += p5-Archie
     SUBDIR += p5-Cflow
     SUBDIR += p5-Frontier-RPC
+    SUBDIR += p5-IO-Interface
     SUBDIR += p5-Mon
     SUBDIR += p5-Net
     SUBDIR += p5-Net-DNS
diff --git a/net/p5-IO-Interface/Makefile b/net/p5-IO-Interface/Makefile
new file mode 100644
index 0000000..3c11093
--- /dev/null
+++ b/net/p5-IO-Interface/Makefile
@@ -0,0 +1,22 @@
+# New ports collection makefile for:	net/p5-IO-Interface
+# Date created:				26 April 2001
+# Whom:					Anton Berezin <tobez@tobez.org>
+#
+# $FreeBSD$
+#
+
+PORTNAME=	IO-Interface
+PORTVERSION=	0.94
+CATEGORIES=	net perl5
+MASTER_SITES=	${MASTER_SITE_PERL_CPAN}
+MASTER_SITE_SUBDIR=	IO
+PKGNAMEPREFIX=	p5-
+
+MAINTAINER=	tobez@tobez.org
+
+PERL_CONFIGURE=	yes
+
+MAN3=		IO::Interface.3
+MANPREFIX=	${PREFIX}/lib/perl5/${PERL_VERSION}
+
+.include <bsd.port.mk>
diff --git a/net/p5-IO-Interface/distinfo b/net/p5-IO-Interface/distinfo
new file mode 100644
index 0000000..36001a4
--- /dev/null
+++ b/net/p5-IO-Interface/distinfo
@@ -0,0 +1 @@
+MD5 (IO-Interface-0.94.tar.gz) = 3488c7120239b1f257728793f092d903
diff --git a/net/p5-IO-Interface/files/patch-OSIOCGIFCONF b/net/p5-IO-Interface/files/patch-OSIOCGIFCONF
new file mode 100644
index 0000000..9c168ee
--- /dev/null
+++ b/net/p5-IO-Interface/files/patch-OSIOCGIFCONF
@@ -0,0 +1,24 @@
+--- Interface.xs.orig	Wed Apr 25 15:45:43 2001
++++ Interface.xs	Wed Apr 25 15:47:13 2001
+@@ -13,6 +13,12 @@
+ #include <sys/sockio.h>
+ #endif
+ 
++#ifdef OSIOCGIFCONF
++#define MY_SIOCGIFCONF OSIOCGIFCONF
++#else
++#define MY_SIOCGIFCONF SIOCGIFCONF
++#endif
++
+ #ifdef PerlIO
+ typedef PerlIO * InputStream;
+ #else
+@@ -581,7 +587,7 @@
+ 	   croak("Couldn't malloc buffer for ioctl: %s",strerror(errno));
+ 	 ifc.ifc_len = len;
+ 	 ifc.ifc_buf = buf;
+-	 if (ioctl(PerlIO_fileno(sock),SIOCGIFCONF,&ifc) < 0) {
++	 if (ioctl(PerlIO_fileno(sock),MY_SIOCGIFCONF,&ifc) < 0) {
+ 	   if (errno != EINVAL || lastlen != 0)
+ 	     XSRETURN_EMPTY;
+ 	 } else {
diff --git a/net/p5-IO-Interface/pkg-comment b/net/p5-IO-Interface/pkg-comment
new file mode 100644
index 0000000..f66ee23
--- /dev/null
+++ b/net/p5-IO-Interface/pkg-comment
@@ -0,0 +1 @@
+Perl extension for access to network card configuration information
diff --git a/net/p5-IO-Interface/pkg-descr b/net/p5-IO-Interface/pkg-descr
new file mode 100644
index 0000000..708b25e
--- /dev/null
+++ b/net/p5-IO-Interface/pkg-descr
@@ -0,0 +1,9 @@
+IO::Interface adds object-methods to IO::Socket objects to allow
+them to get and set operational characteristics of network interface
+cards, such as IP addresses, net masks, and so forth.  It is useful
+for identifying runtime characteristics of cards, such as broadcast
+addresses, and finding interfaces that satisfy certain criteria,
+such as the ability to multicast.
+
+-Anton
+<tobez@tobez.org>
diff --git a/net/p5-IO-Interface/pkg-plist b/net/p5-IO-Interface/pkg-plist
new file mode 100644
index 0000000..57a092c
--- /dev/null
+++ b/net/p5-IO-Interface/pkg-plist
@@ -0,0 +1,8 @@
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/IO/Interface.pm
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/IO/Interface/.packlist
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/IO/Interface/Interface.bs
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/IO/Interface/Interface.so
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/IO/Interface/autosplit.ix
+@dirrm lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/IO/Interface
+@unexec rmdir %D/lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/IO 2>/dev/null || true
+@unexec rmdir %D/lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/IO 2>/dev/null || true