ports/181291: [PATCH] mail/postgrey: make postgrey work with perl 5.18

[Yasuhiro KIMURA]

>Number:         181291
>Category:       ports
>Synopsis:       [PATCH] mail/postgrey: make postgrey work with perl 5.18
>Confidential:   no
>Severity:       serious
>Priority:       medium
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          sw-bug
>Submitter-Id:   current-users
>Arrival-Date:   Wed Aug 14 14:00:00 UTC 2013
>Closed-Date:
>Last-Modified:
>Originator:     Yasuhiro KIMURA
>Release:        FreeBSD 9.1-RELEASE-p5 amd64
>Organization:
>Environment:
System: FreeBSD xxxx 9.1-RELEASE-p5 FreeBSD 9.1-RELEASE-p5 #0 r253699: Sat Jul 27 17:47:48 JST 2013 xxxx amd64


	
>Description:
	Make postgrey work with perl 5.18.

	Patch is based on following issue report:

	https://github.com/schweikert/postgrey/issues/3

	
>How-To-Repeat:
	
>Fix:

	

--- patch-postgrey begins here ---
Index: Makefile
===================================================================
--- Makefile	(revision 324716)
+++ Makefile	(working copy)
@@ -3,7 +3,7 @@
 
 PORTNAME=	postgrey
 PORTVERSION=	1.34
-PORTREVISION=	6
+PORTREVISION=	7
 CATEGORIES=	mail
 MASTER_SITES=	http://postgrey.schweikert.ch/pub/ \
 		http://postgrey.schweikert.ch/pub/old/
Index: files/patch-postgrey
===================================================================
--- files/patch-postgrey	(revision 0)
+++ files/patch-postgrey	(working copy)
@@ -0,0 +1,19 @@
+--- postgrey.dist	2011-05-05 05:54:15.000000000 +0900
++++ postgrey	2013-08-14 21:45:43.000000000 +0900
+@@ -557,6 +557,16 @@
+     if($opt{dbdir}) {
+         $opt{dbdir} =~ /^(.*)$/; $opt{dbdir} = $1;
+     }
++    # untaint what is given on --pidfile. It is not security sensitive since
++    # it is provided by the admin
++    if($opt{pidfile}) {
++        $opt{pidfile} =~ /^(.*)$/; $opt{pidfile} = $1;
++    }
++    # untaint what is given on --inet. It is not security sensitive since
++    # it is provided by the admin
++    if($opt{inet}) {
++        $opt{inet} =~ /^(.*)$/; $opt{inet} = $1;
++    }
+ 
+     # determine proper "logsock" for Sys::Syslog
+     my $syslog_logsock;
--- patch-postgrey ends here ---


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