Date: Sun, 11 Aug 2013 18:36:46 GMT From: Darren Henderson <darren.henderson@gmail.com> To: freebsd-gnats-submit@FreeBSD.org Subject: ports/181229: p5-SNMP_Session-1.13_1 has an undefined subroutine call for pack_sockaddr_in6 Message-ID: <201308111836.r7BIaknY042402@oldred.freebsd.org> Resent-Message-ID: <201308111840.r7BIe0pK070431@freefall.freebsd.org>
next in thread | raw e-mail | index | archive | help
>Number: 181229
>Category: ports
>Synopsis: p5-SNMP_Session-1.13_1 has an undefined subroutine call for pack_sockaddr_in6
>Confidential: no
>Severity: non-critical
>Priority: low
>Responsible: freebsd-ports-bugs
>State: open
>Quarter:
>Keywords:
>Date-Required:
>Class: sw-bug
>Submitter-Id: current-users
>Arrival-Date: Sun Aug 11 18:40:00 UTC 2013
>Closed-Date:
>Last-Modified:
>Originator: Darren Henderson
>Release: 9.1-STABLE
>Organization:
>Environment:
FreeBSD zzz.zzz.zzz 9.1-STABLE FreeBSD 9.1-STABLE #0 r249490: Mon Apr 15 09:57:04 EDT 2013 darren@zzz.zzz:/usr/obj/usr/src/sys/GENERIC amd64
>Description:
Portupgrade of p5-SNMP_Session to 1.13_1 yesterday resulted in failures of mrtg runs with the following:
Undefined subroutine &SNMP_Session::pack_sockaddr_in6 called at /usr/loca/lib/p erl5/site_perl/5.12/SNMP_Session.pm line 150.
BEGIN failed--compilation aborted at /usr/local/lib/perl5/site_perl/5.12/SNMP_Se ssion.pm line 154.
Compilation failed in require at /usr/local/lib/perl5/site_perl/5.12/SNMP_util.p m line 44.
BEGIN failed--compilation aborted at /usr/local/lib/perl5/site_perl/5.12/SNMP_ut il.pm line 44.
Compilation failed in require at /usr/local/lib/perl5/site_perl/5.12/MRTG_lib.pm line 662.
System had already moved from using the x.xx.xx to the x.xx model lib path for perl. Running perl 5.12.5
>How-To-Repeat:
>Fix:
Change call of pack_sockaddr_in6 in /usr/local/lib/perl5/site_perl/5.12/Session_SNMP.pm to Socket6::pack_sockaddr_in6
Patch attached with submission follows:
--- SNMP_Session.pm.orig 2013-08-11 12:41:21.000000000 -0400
+++ SNMP_Session.pm 2013-08-11 14:09:24.000000000 -0400
@@ -147,7 +147,7 @@
if (eval {local $SIG{__DIE__};require Socket6;} &&
eval {local $SIG{__DIE__};require IO::Socket::INET6; IO::Socket::INET6->VERSION("1.26");}) {
Socket6->import(qw(inet_pton inet_ntop getaddrinfo));
- $ipv6_addr_len = length(pack_sockaddr_in6(161, inet_pton(AF_INET6(), "::1")));
+ $ipv6_addr_len = length(Socket6::pack_sockaddr_in6(161, inet_pton(AF_INET6(), "::1")));
$SNMP_Session::ipv6available = 1;
}
eval 'local $SIG{__DIE__};local $SIG{__WARN__};$dont_wait_flags = MSG_DONTWAIT();';
>Release-Note:
>Audit-Trail:
>Unformatted:
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201308111836.r7BIaknY042402>