[patch] Patch to add suid USE flag

perl-5.8.4-r1-suid.patch (text/plain), 1.28 KB, created by Andy Grundman on 2004-09-24 10:26:03 UTC

--- perl-5.8.4-r1.ebuild.orig	2004-09-22 14:07:53.000000000 -0400
+++ perl-5.8.4-r1.ebuild	2004-09-24 13:19:31.470333455 -0400
@@ -17,7 +17,7 @@
 LICENSE="Artistic GPL-2"
 SLOT="0"
 KEYWORDS="x86 ~ppc sparc mips alpha arm ~hppa amd64 ~ia64 ~ppc64 ~s390"
-IUSE="berkdb doc gdbm ithreads uclibc"
+IUSE="berkdb doc gdbm ithreads uclibc suid"
 
 DEPEND="!uclibc? ( sys-apps/groff )
 	berkdb? ( sys-libs/db )
@@ -172,6 +172,11 @@
 		ewarn "Perl will not be built with berkdb support, use gcc if you needed it..."
 		myconf="${myconf} -Ui_db -Ui_ndbm"
 	fi
+	if use suid
+	then
+		ewarn "Perl will be built with suid support.  This may be a security risk!"
+		myconf="${myconf} -Dd_dosuid "
+	fi
 
 	# These are temporary fixes. Need to edit the build so that that libraries created
 	# only get compiled with -fPIC, since they get linked into shared objects, they
@@ -191,7 +196,6 @@
 		-Dlocincpth=' ' \
 		-Doptimize="${CFLAGS}" \
 		-Duselargefiles \
-		-Dd_dosuid \
 		-Dd_semctl_semun \
 		-Dscriptdir=/usr/bin \
 		-Dman1dir=/usr/share/man/man1 \
@@ -257,8 +261,6 @@
 	# delete suidperl entirely.  if this causes outrage, here's where
 	# to fix.
 
-	rm ${D}/usr/bin/sperl${PV}
-	rm ${D}/usr/bin/suidperl
 	rm ${D}/usr/bin/perl
 	ln -s perl${PV} ${D}/usr/bin/perl