Attachment #57672 for bug #87004

View | Details | Raw Unified | Return to bug 87004
Collapse All | Expand All




#

PORTNAME=	Unix-Statgrab
PORTVERSION=	0.04
PORTREVISION=	1
CATEGORIES=	devel perl5
MASTER_SITES=	${MASTER_SITE_PERL_CPAN}


.include <bsd.port.pre.mk>

post-patch:
.if ${PERL_LEVEL} < 500600
post-patch:
	@${PERL} -i -pe 's/}\(/}->(/' ${WRKSRC}/lib/Unix/Statgrab.pm
.endif
	@${RM} ${WRKSRC}/lib/Unix/Statgrab.pm.orig

.include <bsd.port.post.mk>

Lines 1-2 Link Here

(-)distinfo (-2 / +2 lines)
1	MD5 (Unix-Statgrab-0.03.tar.gz) = 089380f21fa7e3d4b7a1bc55d658fd9c	1	MD5 (Unix-Statgrab-0.04.tar.gz) = 94787010e27183ce5cf354c58c465d0d
2	SIZE (Unix-Statgrab-0.03.tar.gz) = 23264	2	SIZE (Unix-Statgrab-0.04.tar.gz) = 23653




diff -ruN Unix-Statgrab-0.03/Statgrab.xs Unix-Statgrab-0.03.new/Statgrab.xs
--- Statgrab.xs	Sun Apr  3 06:32:41 2005
+++ Statgrab.xs	Sat Jul 30 12:10:10 2005
@@ -1113,13 +1113,13 @@
 	RETVAL
 
 IV
-dup (self, num = 0)
+duplex (self, num = 0)
 	sg_network_iface_stats_my *self;
 	int num;
     CODE:
 	if (num < 0 || num >= self->nifs)
 	    XSRETURN_UNDEF;
-	RETVAL = IF(num)->dup;
+	RETVAL = IF(num)->duplex;
     OUTPUT:
 	RETVAL
 
diff -ruN Unix-Statgrab-0.03/lib/Unix/Statgrab.pm Unix-Statgrab-0.03.new/lib/Unix/Statgrab.pm
--- lib/Unix/Statgrab.pm	Sun Apr  3 06:45:44 2005
+++ lib/Unix/Statgrab.pm	Sat Jul 30 12:09:53 2005
@@ -479,7 +479,7 @@
 
 The speed of the interface, in megabits/sec
 
-=item * B<dup($if)>
+=item * B<duplex($if)>
 
 One of C<SG_IFACE_DUPLEX_FULL>, C<SG_IFACE_DUPLEX_HALF> and C<SG_IFACE_DUPLEX_UNKNOWN>. Unknown could mean that duplex hasn't been negotiated yet.
 
diff -ruN Unix-Statgrab-0.03/t/Unix-Statgrab.t Unix-Statgrab-0.03.new/t/Unix-Statgrab.t
--- t/Unix-Statgrab.t	Sun Apr  3 06:35:08 2005
+++ t/Unix-Statgrab.t	Sat Jul 30 12:09:29 2005
@@ -50,7 +50,7 @@
 					ierrors oerrors collisions systime/ ],
     get_network_io_stats_diff	=> [ qw/num_ifaces interface_name tx rx ipackets opackets
 					ierrors oerrors collisions systime/ ],
-    get_network_iface_stats	=> [ qw/num_ifaces interface_name speed dup up/ ],
+    get_network_iface_stats	=> [ qw/num_ifaces interface_name speed duplex up/ ],
     get_page_stats		=> [ qw/pages_pagein pages_pageout systime/ ],
     get_page_stats_diff		=> [ qw/pages_pagein pages_pageout systime/ ],
     get_user_stats		=> [ qw/num_entries name_list/ ],

Return to bug 87004

Lines 6-12 Link Here

(-)Makefile (-3 / +2 lines)
6	#	6	#
7		7
8	PORTNAME= Unix-Statgrab	8	PORTNAME= Unix-Statgrab
9	PORTVERSION= 0.03	9	PORTVERSION= 0.04
10	PORTREVISION= 1	10	PORTREVISION= 1
11	CATEGORIES= devel perl5	11	CATEGORIES= devel perl5
12	MASTER_SITES= ${MASTER_SITE_PERL_CPAN}	12	MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
Lines 28-37 Link Here
28		28
29	.include <bsd.port.pre.mk>	29	.include <bsd.port.pre.mk>
30		30
31	post-patch:
32	.if ${PERL_LEVEL} < 500600	31	.if ${PERL_LEVEL} < 500600
		32	post-patch:
33	@${PERL} -i -pe 's/}\(/}->(/' ${WRKSRC}/lib/Unix/Statgrab.pm	33	@${PERL} -i -pe 's/}\(/}->(/' ${WRKSRC}/lib/Unix/Statgrab.pm
34	.endif	34	.endif
35	@${RM} ${WRKSRC}/lib/Unix/Statgrab.pm.orig
36		35
37	.include <bsd.port.post.mk>	36	.include <bsd.port.post.mk>

Removed Link Here

(-)files/patch-libstatgrab-0.12 (-43 lines)
1	diff -ruN Unix-Statgrab-0.03/Statgrab.xs Unix-Statgrab-0.03.new/Statgrab.xs
2	--- Statgrab.xs Sun Apr 3 06:32:41 2005
3	+++ Statgrab.xs Sat Jul 30 12:10:10 2005
4	@@ -1113,13 +1113,13 @@
5	RETVAL
6
7	IV
8	-dup (self, num = 0)
9	+duplex (self, num = 0)
10	sg_network_iface_stats_my *self;
11	int num;
12	CODE:
13	if (num < 0 \|\| num >= self->nifs)
14	XSRETURN_UNDEF;
15	- RETVAL = IF(num)->dup;
16	+ RETVAL = IF(num)->duplex;
17	OUTPUT:
18	RETVAL
19
20	diff -ruN Unix-Statgrab-0.03/lib/Unix/Statgrab.pm Unix-Statgrab-0.03.new/lib/Unix/Statgrab.pm
21	--- lib/Unix/Statgrab.pm Sun Apr 3 06:45:44 2005
22	+++ lib/Unix/Statgrab.pm Sat Jul 30 12:09:53 2005
23	@@ -479,7 +479,7 @@
24
25	The speed of the interface, in megabits/sec
26
27	-=item * B<dup($if)>
28	+=item * B<duplex($if)>
29
30	One of C<SG_IFACE_DUPLEX_FULL>, C<SG_IFACE_DUPLEX_HALF> and C<SG_IFACE_DUPLEX_UNKNOWN>. Unknown could mean that duplex hasn't been negotiated yet.
31
32	diff -ruN Unix-Statgrab-0.03/t/Unix-Statgrab.t Unix-Statgrab-0.03.new/t/Unix-Statgrab.t
33	--- t/Unix-Statgrab.t Sun Apr 3 06:35:08 2005
34	+++ t/Unix-Statgrab.t Sat Jul 30 12:09:29 2005
35	@@ -50,7 +50,7 @@
36	ierrors oerrors collisions systime/ ],
37	get_network_io_stats_diff => [ qw/num_ifaces interface_name tx rx ipackets opackets
38	ierrors oerrors collisions systime/ ],
39	- get_network_iface_stats => [ qw/num_ifaces interface_name speed dup up/ ],
40	+ get_network_iface_stats => [ qw/num_ifaces interface_name speed duplex up/ ],
41	get_page_stats => [ qw/pages_pagein pages_pageout systime/ ],
42	get_page_stats_diff => [ qw/pages_pagein pages_pageout systime/ ],
43	get_user_stats => [ qw/num_entries name_list/ ],