head	1.8;
access;
symbols
	RELEASE_7_1_0:1.7
	RELEASE_6_4_0:1.7
	RELEASE_5_EOL:1.7
	RELEASE_7_0_0:1.7
	RELEASE_6_3_0:1.7
	PRE_XORG_7:1.7
	RELEASE_4_EOL:1.7
	RELEASE_6_2_0:1.7
	RELEASE_6_1_0:1.7
	RELEASE_5_5_0:1.7
	RELEASE_6_0_0:1.7
	RELEASE_5_4_0:1.7
	RELEASE_4_11_0:1.7
	RELEASE_5_3_0:1.7
	RELEASE_4_10_0:1.7
	RELEASE_5_2_1:1.7
	RELEASE_5_2_0:1.7
	RELEASE_4_9_0:1.7
	RELEASE_5_1_0:1.7
	RELEASE_4_8_0:1.7
	RELEASE_5_0_0:1.7
	RELEASE_4_7_0:1.7
	RELEASE_4_6_2:1.6
	RELEASE_4_6_1:1.6
	RELEASE_4_6_0:1.6
	RELEASE_5_0_DP1:1.6
	RELEASE_4_5_0:1.6
	RELEASE_4_4_0:1.6
	RELEASE_4_3_0:1.6
	RELEASE_4_2_0:1.4
	RELEASE_4_1_1:1.4
	RELEASE_4_1_0:1.4
	RELEASE_3_5_0:1.4
	RELEASE_4_0_0:1.4
	RELEASE_3_4_0:1.4
	RELEASE_3_3_0:1.4
	RELEASE_3_2_0:1.4
	RELEASE_3_1_0:1.4
	RELEASE_2_2_8:1.4
	RELEASE_3_0_0:1.4
	RELEASE_2_2_7:1.3
	RELEASE_2_2_6:1.3
	RELEASE_2_2_5:1.3
	RELEASE_2_2_1:1.2
	RELEASE_2_2_2:1.2;
locks; strict;
comment	@# @;


1.8
date	2009.02.01.19.43.10;	author skv;	state dead;
branches;
next	1.7;

1.7
date	2002.06.02.21.22.25;	author tobez;	state Exp;
branches;
next	1.6;

1.6
date	2001.04.10.19.57.49;	author markm;	state Exp;
branches;
next	1.5;

1.5
date	2001.03.22.15.17.46;	author markm;	state Exp;
branches;
next	1.4;

1.4
date	98.08.06.10.43.21;	author markm;	state Exp;
branches;
next	1.3;

1.3
date	97.05.23.20.07.01;	author markm;	state Exp;
branches;
next	1.2;

1.2
date	96.11.13.18.23.52;	author markm;	state Exp;
branches;
next	1.1;

1.1
date	96.11.01.19.00.24;	author markm;	state Exp;
branches;
next	;


desc
@@


1.8
log
@Rename: lang/perl5 -> lang/perl5.6

PR:		ports/131046
@
text
@$FreeBSD: ports/lang/perl5/files/patch-ad,v 1.7 2002/06/02 21:22:25 tobez Exp $

--- perl.h.ORIG	Thu Mar 22 07:05:02 2001
+++ perl.h	Tue Apr 10 20:29:46 2001
@@@@ -151,6 +151,15 @@@@
 
 */
 
+/* needed for IAMSUID case for 4.4BSD systems 
+ * XXX there should probably be a Configure variable
+ */
+
+#ifdef I_SYS_PARAM
+#if (defined (BSD) && (BSD >= 199306))
+#   include <sys/mount.h>
+#endif /* !BSD */
+#endif /* !I_SYS_PARAM */
 
 class CPerlObj;
 
@


1.7
log
@Put SITEARCH and SITELIB paths in front of ARCHLIB and PRIVLIB in the
@@INC array. This takes care of the infamous problem of updating the
packages already in the perl distribution. With this change, no tricks
are any longer necessary for such p5 ports, except the usual tweaking of
INSTALLDIRS in Makefile.PL. This last one can also be taken care of by
an appropriate BSDPAN modifications, but until we have the `natural'
@@INC order in the 4.X base system perl, it is meaningless.

Do not include iconv.h and do not link with libiconv. Iconv is not used
by perl in any way currently, but it used to link it if found.

Fix perl on freebsd/sparc64.

PR:		33212 (iconv), 37605 (iconv), 38813 (sparc64)
Reported by:	Vivek Khera <khera@@kciLink.com> (iconv),
		Martin Nilsson <martin@@gneto.com> (iconv)
Submitted by:	jake (sparc64)
@
text
@d1 1
a1 1
$FreeBSD$
@


1.6
log
@Update for Perl 5.6.1.

As before, this is a "guru only" port. If you know what you are
doing, go ahead and use it. If not - HANDS OFF!

Perl 5.6.1 will be committed to "base" FreeBSD in a week or 2.
@
text
@d1 2
@


1.5
log
@Upgrade this to perl5.6.0 for _knowledgeable_  folks in STABLE who
really want it.

This is still marked FORBIDDEN as there may be all sorts of horrible
incompatabilities with the perl5 in "base", but folks who are willing
to override this and experiment are welcome.

Consider this to be only partially supported. I'll happily commit
patches and fixes, but I don't want to answer too many questions.

Sorry!
@
text
@d1 5
a5 5
--- perl.h.ORIG	Thu Jul 30 17:04:42 1998
+++ perl.h	Thu Jul 30 17:06:34 1998
@@@@ -361,6 +361,15 @@@@
 #   include <sys/param.h>
 #endif
d17 2
a18 2
 /* Use all the "standard" definitions? */
 #if defined(STANDARD_C) && defined(I_STDLIB)
@


1.4
log
@Update to Perl 5.005_01.
@
text
@a18 23
--- perl.c.ORIG	Thu Jul 30 17:04:23 1998
+++ perl.c	Thu Jul 30 17:04:57 1998
@@@@ -2124,6 +2124,20 @@@@
 		croak("Can't swap uid and euid");	/* really paranoid */
 	    if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0)
 		croak("Permission denied");	/* testing full pathname here */
+#if (defined(BSD) && (BSD >= 199306))
+#ifdef IAMSUID
+	{
+	    struct statfs stfs;
+
+	    if (fstatfs(fileno(PL_rsfp),&stfs) < 0)
+		croak("Can't statfs filesystem of script \"%s\"",PL_origfilename);
+
+	    if (stfs.f_flags & MNT_NOSUID)
+		croak("Permission denied");
+	}
+#endif /* IAMSUID */
+#endif /* BSD */
+
 	    if (tmpstatbuf.st_dev != PL_statbuf.st_dev ||
 		tmpstatbuf.st_ino != PL_statbuf.st_ino) {
 		(void)PerlIO_close(PL_rsfp);
@


1.3
log
@Upgrade to Perl5.004. SUID Perl Works for 3.0-current and 2.2.2!
@
text
@d1 3
a3 3
--- perl.h.ORIG	Mon Apr 28 17:36:10 1997
+++ perl.h	Fri May 23 11:56:49 1997
@@@@ -223,6 +223,15 @@@@
d19 3
a21 3
--- perl5.004/perl.c.ORIG	Fri May 16 00:14:03 1997
+++ perl.c	Fri May 23 11:56:49 1997
@@@@ -1917,6 +1917,20 @@@@
d23 1
a23 1
 	    if (Stat(SvPVX(GvSV(curcop->cop_filegv)),&tmpstatbuf) < 0)
d27 2
a28 2
+        {
+            struct statfs stfs;
d30 2
a31 2
+            if (fstatfs(fileno(rsfp),&stfs) < 0)
+                croak("Can't statfs filesystem of script \"%s\"",origfilename);
d33 3
a35 3
+            if (stfs.f_flags & MNT_NOSUID)
+                croak("Permission denied");
+        }
d39 3
a41 3
 	    if (tmpstatbuf.st_dev != statbuf.st_dev ||
 		tmpstatbuf.st_ino != statbuf.st_ino) {
 		(void)PerlIO_close(rsfp);
@


1.2
log
@Correct my idea of what "FreeBSD after 2.2 needs". SuidPerl failed to
compile.
@
text
@d1 5
a5 43
--- hints/freebsd.sh.orig	Mon Feb 12 21:52:51 1996
+++ hints/freebsd.sh	Wed Oct 23 18:00:16 1996
@@@@ -43,16 +43,39 @@@@
 	d_setruid='undef'
 	;;
 #
-# Trying to cover 2.0.5, 2.1-current and future 2.1
+# Trying to cover 2.0.5, 2.1-current and future 2.1/2.2
 # It does not covert all 2.1-current versions as the output of uname
 # changed a few times.
 #
+# Even though seteuid/setegid are available, they've been turned off
+# because perl isn't coded with saved set[ug]id variables in mind.
+# In addition, a small patch is requried to suidperl to avoid a security
+# problem with FreeBSD.
+#
 2.0.5*|2.0-built*|2.1*)
  	usevfork='true'
+	d_dosuid='define'
+	d_setregid='define'
+	d_setreuid='define'
+	d_setegid='undef'
+	d_seteuid='undef'
+	;;
+#
+# 2.2 and above have phkmalloc(3).
+2.2*)
+ 	usevfork='true'
+	usemymalloc='n'
+	d_dosuid='define'
+	d_setregid='define'
+	d_setreuid='define'
+	d_setegid='undef'
+	d_seteuid='undef'
 	;;
 #
-# Guesses at what will be needed after 2.1
+# Guesses at what will be needed after 2.2
 *)	usevfork='true'
+	usemymalloc='n'
+	d_dosuid='define'
 	;;
 esac
d7 35
@


1.1
log
@Use phkmalloc instead of Perl's own malloc. Also clean up the FreeBSD
hints file for future releases. This will be submitted to the Perl
maintainers.
@
text
@d3 1
a3 1
@@@@ -43,16 +43,38 @@@@
d41 1
@
