diff options
author | Michael Cummings <mcummings@gentoo.org> | 2005-12-06 17:16:01 +0000 |
---|---|---|
committer | Michael Cummings <mcummings@gentoo.org> | 2005-12-06 17:16:01 +0000 |
commit | 08a569a4150200ef41b8ff5bcc1454a28ecf2115 (patch) | |
tree | 8e06f590335dfd28926d27b0241cd18d0ce65085 /dev-lang | |
parent | Bug #105380 - RPATH again. Bug #113770 - Selinux support. (diff) | |
download | gentoo-2-08a569a4150200ef41b8ff5bcc1454a28ecf2115.tar.gz gentoo-2-08a569a4150200ef41b8ff5bcc1454a28ecf2115.tar.bz2 gentoo-2-08a569a4150200ef41b8ff5bcc1454a28ecf2115.zip |
Bug 114113. Changelog has the tests.
(Portage version: 2.0.53)
Diffstat (limited to 'dev-lang')
-rw-r--r-- | dev-lang/perl/ChangeLog | 20 | ||||
-rw-r--r-- | dev-lang/perl/Manifest | 8 | ||||
-rw-r--r-- | dev-lang/perl/files/digest-perl-5.8.6-r8 | 1 | ||||
-rw-r--r-- | dev-lang/perl/files/digest-perl-5.8.7-r3 | 1 | ||||
-rw-r--r-- | dev-lang/perl/files/perl-exp_intwrap.patch | 58 | ||||
-rw-r--r-- | dev-lang/perl/perl-5.8.6-r8.ebuild | 628 | ||||
-rw-r--r-- | dev-lang/perl/perl-5.8.7-r3.ebuild | 659 |
7 files changed, 1360 insertions, 15 deletions
diff --git a/dev-lang/perl/ChangeLog b/dev-lang/perl/ChangeLog index 7e88b78a8bbd..9fe059cfecfd 100644 --- a/dev-lang/perl/ChangeLog +++ b/dev-lang/perl/ChangeLog @@ -1,6 +1,14 @@ # ChangeLog for dev-lang/perl # Copyright 2002-2005 Gentoo Foundation; Distributed under the GPL v2 -# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/ChangeLog,v 1.173 2005/12/05 16:01:26 mcummings Exp $ +# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/ChangeLog,v 1.174 2005/12/06 17:16:01 mcummings Exp $ + +*perl-5.8.7-r3 (06 Dec 2005) + + 06 Dec 2005; <mcumming@gentoo.org> files/perl-exp_intwrap.patch, + +perl-5.8.7-r3.ebuild: + More bug 114113 work. Patch updated, segfaults are all handled now with + cleaner exit/messages. test with perl -e 'printf("%2147483647$n");' or perl + -e 'printf "%4294967295d"' before and after upgrading to demonstrate 05 Dec 2005; <mcumming@gentoo.org> perl-5.8.6-r5.ebuild, perl-5.8.6-r6.ebuild, perl-5.8.6-r7.ebuild, perl-5.8.7-r1.ebuild, @@ -42,13 +50,13 @@ Backported some get_libdir functionality from 5.8.7 to 5.8.6-r6 to resolve bug #112243. This is mainly a multi-lib support fix it seems. - 02 Oct 2005; Bryan ÃÂstergaard <kloeri@gentoo.org> perl-5.8.7-r1.ebuild: + 02 Oct 2005; Bryan ÃÂÃÂstergaard <kloeri@gentoo.org> perl-5.8.7-r1.ebuild: Stable on ia64, bug 106678. 29 Sep 2005; Aaron Walker <ka0ttic@gentoo.org> perl-5.8.6-r6.ebuild: Stable on mips for bug #106678. - 23 Sep 2005; Bryan ÃÂstergaard <kloeri@gentoo.org> perl-5.8.7-r1.ebuild: + 23 Sep 2005; Bryan ÃÂÃÂstergaard <kloeri@gentoo.org> perl-5.8.7-r1.ebuild: Stable on alpha, bug 106678. 21 Sep 2005; Seemant Kulleen <seemant@gentoo.org> perl-5.8.6-r6.ebuild: @@ -138,7 +146,7 @@ 03 Jul 2005; Michael Hanselmann <hansmi@gentoo.org> perl-5.8.6-r5.ebuild: Stable on ppc. - 02 Jul 2005; Bryan ÃÂstergaard <kloeri@gentoo.org> perl-5.8.6-r5.ebuild: + 02 Jul 2005; Bryan ÃÂÃÂstergaard <kloeri@gentoo.org> perl-5.8.6-r5.ebuild: Stable on alpha. 02 Jul 2005; Rene Nussbaumer <killerfox@gentoo.org> perl-5.8.6-r5.ebuild: @@ -341,7 +349,7 @@ 06 Dec 2004; Gustavo Zacarias <gustavoz@gentoo.org> perl-5.8.5-r2.ebuild: Stable on sparc wrt #66360 - 05 Dec 2004; Bryan ÃÂstergaard <kloeri@gentoo.org> perl-5.8.5-r2.ebuild: + 05 Dec 2004; Bryan ÃÂÃÂstergaard <kloeri@gentoo.org> perl-5.8.5-r2.ebuild: Stable on alpha, bug 66360. 05 Dec 2004; Markus Rothe <corsair@gentoo.org> perl-5.8.5-r2.ebuild: @@ -436,7 +444,7 @@ 18 Aug 2004; Aron Griffis <agriffis@gentoo.org> perl-5.8.4-r1.ebuild: stable on alpha - 13 Aug 2004; Bryan ÃÂstergaard <kloeri@gentoo.org> perl-5.8.4.ebuild: + 13 Aug 2004; Bryan ÃÂÃÂstergaard <kloeri@gentoo.org> perl-5.8.4.ebuild: Stable on alpha. 07 Aug 2004; Robert Coie <rac@gentoo.org> perl-5.8.2-r1.ebuild, diff --git a/dev-lang/perl/Manifest b/dev-lang/perl/Manifest index f776dae6ddd2..70bf5c38f18a 100644 --- a/dev-lang/perl/Manifest +++ b/dev-lang/perl/Manifest @@ -1,12 +1,14 @@ -MD5 01bb61fe738860776d1d58982059852a ChangeLog 45370 +MD5 cee240d8092d10931ddcdec77019ca6b ChangeLog 45756 MD5 bd75f0242e3b7791803d089c38a3f920 files/CAN-2005-0156-suid.patch 703 MD5 2bd41aec5e22962224dc9376e27bdde3 files/CAN-2005-0448-rmtree.patch 7629 MD5 0a07934d74ccb1133cf0f3650cb94efc files/digest-perl-5.8.6-r5 64 MD5 0a07934d74ccb1133cf0f3650cb94efc files/digest-perl-5.8.6-r6 64 MD5 0a07934d74ccb1133cf0f3650cb94efc files/digest-perl-5.8.6-r7 64 +MD5 0a07934d74ccb1133cf0f3650cb94efc files/digest-perl-5.8.6-r8 64 MD5 c10e44e47d7f702efe7d4009064a97ca files/digest-perl-5.8.7 64 MD5 c10e44e47d7f702efe7d4009064a97ca files/digest-perl-5.8.7-r1 64 MD5 c10e44e47d7f702efe7d4009064a97ca files/digest-perl-5.8.7-r2 64 +MD5 c10e44e47d7f702efe7d4009064a97ca files/digest-perl-5.8.7-r3 64 MD5 154013a841cbb251d7b63fb006b4006f files/file_path_rmtree.patch 1068 MD5 44e1f1420947cc552c66fb434ba4c855 files/perl-5.8.4-NDBM-GDBM-compat.patch 428 MD5 5dfd23c2236b382d031a9513bc12f3f1 files/perl-5.8.5-tempfiles.patch 2113 @@ -16,7 +18,7 @@ MD5 044b90a8895f8a03bef8e4cf5759eecc files/perl-5.8.7-MakeMaker-RUNPATH.patch 85 MD5 528fa2521c530d5a47df32b663e629af files/perl-5.8.7-regexp-nossp.patch 460 MD5 26a1e7c48c7f68f39db4262500f6a1d8 files/perl-5.8.7-tempfiles.patch 1007 MD5 c2612d59f380ad6e0c2de4d941e83dfd files/perl-cleaner 8879 -MD5 4f510dbfd29d9e49673a64508d453d23 files/perl-exp_intwrap.patch 392 +MD5 cc54c9f18cd584f4cac0ec109eae9335 files/perl-exp_intwrap.patch 1635 MD5 060e9f10466fdc1268c75a7cf4dcbc7c files/perl-h2ph-ansi-header.patch 446 MD5 076dcbef37263d6dd7af719b55cfc2de files/perl-noksh.patch 611 MD5 01af75daf3d222a668059e90d78a1f9d files/perl-nonblock.patch 400 @@ -30,6 +32,8 @@ MD5 e2d8f1bf77722def1dd432e26455c818 metadata.xml 305 MD5 5629b922f2a4ce997ae4ae25014451cf perl-5.8.6-r5.ebuild 17658 MD5 4a6d2527f08696b59e7d5f0f7d2a72a6 perl-5.8.6-r6.ebuild 18036 MD5 45b2cc80281b071a098c2ec40818e19e perl-5.8.6-r7.ebuild 18104 +MD5 3209e0e26ae56f9ea2b7c1e3c540d8f8 perl-5.8.6-r8.ebuild 18013 MD5 36f0bd0344966231663c7d99c94d3997 perl-5.8.7-r1.ebuild 19456 MD5 3f172d664435893f2cfaaf21865c6cb7 perl-5.8.7-r2.ebuild 19525 +MD5 494895139f745a16041d4c72c6c94fe7 perl-5.8.7-r3.ebuild 19430 MD5 8617318edb0a9de62024383369894fd2 perl-5.8.7.ebuild 19224 diff --git a/dev-lang/perl/files/digest-perl-5.8.6-r8 b/dev-lang/perl/files/digest-perl-5.8.6-r8 new file mode 100644 index 000000000000..666169141e1e --- /dev/null +++ b/dev-lang/perl/files/digest-perl-5.8.6-r8 @@ -0,0 +1 @@ +MD5 3d030b6ff2a433840edb1a407d18dc0a perl-5.8.6.tar.bz2 9693085 diff --git a/dev-lang/perl/files/digest-perl-5.8.7-r3 b/dev-lang/perl/files/digest-perl-5.8.7-r3 new file mode 100644 index 000000000000..7407844a5a36 --- /dev/null +++ b/dev-lang/perl/files/digest-perl-5.8.7-r3 @@ -0,0 +1 @@ +MD5 9a175d6ccbb5d9b41ffac5073ff9cc3c perl-5.8.7.tar.bz2 9839086 diff --git a/dev-lang/perl/files/perl-exp_intwrap.patch b/dev-lang/perl/files/perl-exp_intwrap.patch index 1a0283e37696..44c4d4ced361 100644 --- a/dev-lang/perl/files/perl-exp_intwrap.patch +++ b/dev-lang/perl/files/perl-exp_intwrap.patch @@ -1,14 +1,58 @@ ---- perl-5.9.2/sv.c 2005-04-01 01:43:09.000000000 -0800 -+++ perl-5.9.2/sv.c.modified 2005-11-10 16:27:17.000000000 -0800 -@@ -9357,7 +9357,10 @@ +--- sv.c.orig 2005-12-05 06:45:46.000000000 -0500 ++++ sv.c 2005-12-06 11:56:42.000000000 -0500 +@@ -8519,7 +8519,10 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const cha if (EXPECT_NUMBER(q, width)) { if (*q == '$') { ++q; - efix = width; -+ if (width > INT_MAX) -+ efix=INT_MAX; -+ else -+ efix = width; ++ if (width > INT_MAX) ++ efix=INT_MAX; ++ else ++ efix = width; } else { goto gotwidth; } +@@ -8707,9 +8710,10 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const cha + + if (vectorize) + argsv = vecsv; +- else if (!args) +- argsv = (efix ? efix <= svmax : svix < svmax) ? +- svargs[efix ? efix-1 : svix++] : &PL_sv_undef; ++ else if (!args) { ++ I32 i = efix ? efix-1 : svix++; ++ argsv = (i >= 0 && i < svmax) ? svargs[i] : &PL_sv_undef; ++ } + + switch (c = *q++) { + +@@ -8972,6 +8976,8 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const cha + *--eptr = '0'; + break; + case 2: ++ if (!uv) ++ alt = FALSE; + do { + dig = uv & 1; + *--eptr = '0' + dig; +@@ -9274,6 +9280,8 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const cha + + /* calculate width before utf8_upgrade changes it */ + have = esignlen + zeros + elen; ++ if (have < zeros) ++ Perl_croak_nocontext(PL_memory_wrap); + + if (is_utf8 != has_utf8) { + if (is_utf8) { +@@ -9301,6 +9309,11 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const cha + need = (have > width ? have : width); + gap = need - have; + ++#ifdef PERL_MALLOC_WRAP ++ if (need >= (((STRLEN)~0) - SvCUR(sv) - dotstrlen - 1)) { ++ Perl_croak_nocontext(PL_memory_wrap); ++ } ++#endif + SvGROW(sv, SvCUR(sv) + need + dotstrlen + 1); + p = SvEND(sv); + if (esignlen && fill == '0') { diff --git a/dev-lang/perl/perl-5.8.6-r8.ebuild b/dev-lang/perl/perl-5.8.6-r8.ebuild new file mode 100644 index 000000000000..a3c75091a296 --- /dev/null +++ b/dev-lang/perl/perl-5.8.6-r8.ebuild @@ -0,0 +1,628 @@ +# Copyright 1999-2005 Gentoo Foundation +# Distributed under the terms of the GNU General Public License v2 +# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/perl-5.8.6-r8.ebuild,v 1.1 2005/12/06 17:16:01 mcummings Exp $ + +inherit eutils flag-o-matic toolchain-funcs multilib + +# The slot of this binary compat version of libperl.so +PERLSLOT="1" + +SHORT_PV="${PV%.*}" +MY_P="perl-${PV/_rc/-RC}" +DESCRIPTION="Larry Wall's Practical Extraction and Reporting Language" +S="${WORKDIR}/${MY_P}" +SRC_URI="ftp://ftp.perl.org/pub/CPAN/src/${MY_P}.tar.bz2" +HOMEPAGE="http://www.perl.org/" +LIBPERL="libperl.so.${PERLSLOT}.${SHORT_PV}" + +LICENSE="Artistic GPL-2" +SLOT="0" +KEYWORDS="~alpha ~amd64 ~arm ~hppa ~ia64 ~m68k ~mips ~ppc ~ppc64 ~s390 ~sh ~sparc ~x86" +IUSE="berkdb debug doc gdbm ithreads perlsuid build minimal" +PERL_OLDVERSEN="5.8.0 5.8.2 5.8.4 5.8.5" + +DEPEND="berkdb? ( sys-libs/db ) + gdbm? ( >=sys-libs/gdbm-1.8.3 ) + >=sys-devel/libperl-${PV}-r1 + !<perl-core/ExtUtils-MakeMaker-6.17 + !<perl-core/File-Spec-0.87 + !<perl-core/Test-Simple-0.47-r1" + +RDEPEND=">=sys-devel/libperl-${PV}-r1 + berkdb? ( sys-libs/db ) + gdbm? ( >=sys-libs/gdbm-1.8.3 )" + +PDEPEND="app-admin/perl-cleaner" + +pkg_setup() { + # I think this should rather be displayed if you *have* 'ithreads' + # in USE if it could break things ... + if use ithreads + then + ewarn "PLEASE NOTE: You are compiling ${MY_P} with" + ewarn "interpreter-level threading enabled." + ewarn "Threading is not supported by all applications " + ewarn "that compile against perl. You use threading at " + ewarn "your own discretion. " + epause 5 + fi + + if use minimal + then + ewarn "You have the minimal USE flag set. The resulting" + ewarn "perl is stripped of most of its module functionality" + ewarn "and is intended for minmal use case where you need" + ewarn "just the perl interpreter, no extras." + fi + + if [ ! -f "${ROOT}/usr/$(get_libdir)/${LIBPERL}" ] + then + # Make sure we have libperl installed ... + eerror "Cannot find ${ROOT}/usr/$(get_libdir)/${LIBPERL}! Make sure that you" + eerror "have sys-libs/libperl installed properly ..." + die "Cannot find ${ROOT}/usr/$(get_libdir)/${LIBPERL}!" + fi +} + +src_unpack() { + unpack ${A} + + # Get -lpthread linked before -lc. This is needed + # when using glibc >= 2.3, or else runtime signal + # handling breaks. Fixes bug #14380. + # <rac@gentoo.org> (14 Feb 2003) + # reinstated to try to avoid sdl segfaults 03.10.02 + cd ${S}; epatch ${FILESDIR}/${PN}-prelink-lpthread.patch + + # Patch perldoc to not abort when it attempts to search + # nonexistent directories; fixes bug #16589. + # <rac@gentoo.org> (28 Feb 2003) + + cd ${S}; epatch ${FILESDIR}/${PN}-perldoc-emptydirs.patch + + # this lays the groundwork for solving the issue of what happens + # when people (or ebuilds) install different versiosn of modules + # that are in the core, by rearranging the @INC directory to look + # site -> vendor -> core. + cd ${S}; epatch ${FILESDIR}/${PN}-reorder-INC.patch + + # some well-intentioned stuff in http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&selm=Pine.SOL.4.10.10205231231200.5399-100000%40maxwell.phys.lafayette.edu + # attempts to avoid bringing cccdlflags to bear on static + # extensions (like DynaLoader). i believe this is + # counterproductive on a Gentoo system which has both a shared + # and static libperl, so effectively revert this here. + cd ${S}; epatch ${FILESDIR}/${PN}-picdl.patch + + # Configure makes an unwarranted assumption that /bin/ksh is a + # good shell. This patch makes it revert to using /bin/sh unless + # /bin/ksh really is executable. Should fix bug 42665. + # rac 2004.06.09 + cd ${S}; epatch ${FILESDIR}/${PN}-noksh.patch + + # uclibc support + epatch ${FILESDIR}/${PN}-uclibc.patch + + # this one only affects sparc64, as best weeve and rac can tell, + # but seems sane for all linux. we don't have to worry about + # drifting into obscure SysV non-posix semantics, and the current + # code in IO.xs that checks for this sort of thing dies in LDAP on + # sparc64. + + #epatch ${FILESDIR}/${PN}-nonblock.patch + + # since we build in non-world-writeable portage directories, none + # of the .t sections of the original version of this patch matter + # much. the PPPort section is apparently obsolete, because i see + # no /tmp in there now. ditto on perlbug.SH, which has secure + # tempfile handling if resources are present. originally from bug + # 66360. + + epatch ${FILESDIR}/${P}-tempfiles.patch + + # An additional tempfile patch, bug 75696 + #epatch ${FILESDIR}/file_path_rmtree.patch + + # We do not want the build root in the linked perl module's RUNPATH, so + # strip paths containing PORTAGE_TMPDIR if its set. This is for the + # MakeMaker module, bug #105054. + epatch ${FILESDIR}/${PN}-5.8.7-MakeMaker-RUNPATH.patch + + # Bug 80460, perlsuid vulnerability + if use perlsuid + then + epatch ${FILESDIR}/CAN-2005-0156-suid.patch + fi + + # Bug 114113 + cd ${S}; epatch ${FILESDIR}/perl-exp_intwrap.patch + +} + +src_configure() { + + # some arches and -O do not mix :) + use arm && replace-flags -O? -O1 + use ppc && replace-flags -O? -O1 + use ia64 && replace-flags -O? -O1 + # Perl has problems compiling with -Os in your flags with glibc + use elibc_uclibc || replace-flags "-Os" "-O2" + # This flag makes compiling crash in interesting ways + filter-flags -malign-double + # Fixes bug #97645 + use ppc && filter-flags -mpowerpc-gpopt + + export LC_ALL="C" + local myconf="" + + case ${CHOST} in + *-freebsd*) osname="freebsd" ;; + *-netbsd*) osname="netbsd" ;; + *-openbsd*) osname="openbsd" ;; + *-darwin*) osname="darwin" ;; + + *) osname="linux" ;; + esac + + if use ithreads + then + einfo "using ithreads" + mythreading="-multi" + myconf="-Dusethreads ${myconf}" + myarch=$(get_abi_CHOST) + myarch="${myarch%%-*}-${osname}-thread" + else + myarch=$(get_abi_CHOST) + myarch="${myarch%%-*}-${osname}" + fi + + local inclist=$(for v in $PERL_OLDVERSEN; do echo -n "$v $v/$myarch$mythreading "; done) + + # allow either gdbm to provide ndbm (in <gdbm/ndbm.h>) or db1 + + myndbm='U' + mygdbm='U' + mydb='U' + + if use gdbm + then + mygdbm='D' + myndbm='D' + fi + if use berkdb + then + mydb='D' + has_version '=sys-libs/db-1*' && myndbm='D' + fi + + myconf="${myconf} -${myndbm}i_ndbm -${mygdbm}i_gdbm -${mydb}i_db" + + if use mips + then + # this is needed because gcc 3.3-compiled kernels will hang + # the machine trying to run this test - check with `Kumba + # <rac@gentoo.org> 2003.06.26 + myconf="${myconf} -Dd_u32align" + fi + + if use perlsuid + then + myconf="${myconf} -Dd_dosuid" + ewarn "You have enabled Perl's suid compile. Please" + ewarn "read http://perldoc.com/perl5.8.2/INSTALL.html#suidperl" + epause 3 + fi + + if use debug + then + CFLAGS="${CFLAGS} -g" + fi + + if use sparc + then + myconf="${myconf} -Ud_longdbl" + fi + + if use alpha && "$(tc-getCC)" == "ccc" + then + ewarn "Perl will not be built with berkdb support, use gcc if you needed it..." + myconf="${myconf} -Ui_db -Ui_ndbm" + fi + + [ -n "${ABI}" ] && myconf="${myconf} -Dusrinc=$(get_ml_incdir)" + + [[ ${ELIBC} == "FreeBSD" ]] && myconf="${myconf} -Dlibc=/usr/lib/libc.a" + + if [[ $(get_libdir) != "lib" ]] ; then + myconf="${myconf} -Dlibpth='/usr/local/$(get_libdir) /$(get_libdir) \ + /usr/$(get_libdir)'" + fi + + + sh Configure -des \ + -Darchname="${myarch}" \ + -Dcccdlflags='-fPIC' \ + -Dccdlflags='-rdynamic' \ + -Dcc="$(tc-getCC)" \ + -Dprefix='/usr' \ + -Dvendorprefix='/usr' \ + -Dsiteprefix='/usr' \ + -Dlocincpth=' ' \ + -Doptimize="${CFLAGS}" \ + -Duselargefiles \ + -Dd_semctl_semun \ + -Dscriptdir=/usr/bin \ + -Dman1dir=/usr/share/man/man1 \ + -Dman3dir=/usr/share/man/man3 \ + -Dinstallman1dir=/usr/share/man/man1 \ + -Dinstallman3dir=/usr/share/man/man3 \ + -Dman1ext='1' \ + -Dman3ext='3pm' \ + -Dinc_version_list="$inclist" \ + -Dcf_by='Gentoo' \ + -Ud_csh \ + ${myconf} || die "Unable to configure" +} + +src_compile() { + + # would like to bracket this with a test for the existence of a + # dotfile, but can't clean it automatically now. + + src_configure + + emake -j1 || die "Unable to make" +} + +src_test() { + use elibc_uclibc && export MAKEOPTS="${MAKEOPTS} -j1" + emake -i test CCDLFLAGS= || die "test failed" +} + +src_install() { + + export LC_ALL="C" + + # Need to do this, else apps do not link to dynamic version of + # the library ... + local coredir="/usr/lib/perl5/${PV}/${myarch}${mythreading}/CORE" + dodir ${coredir} + dosym ../../../../../$(get_libdir)/${LIBPERL} ${coredir}/${LIBPERL} + dosym ../../../../../$(get_libdir)/${LIBPERL} ${coredir}/libperl.so.${PERLSLOT} + dosym ../../../../../$(get_libdir)/${LIBPERL} ${coredir}/libperl.so + + # Fix for "stupid" modules and programs + dodir /usr/lib/perl5/site_perl/${PV}/${myarch}${mythreading} + + local installtarget=install + if use minimal || use build ; then + installtarget=install.perl + fi + make DESTDIR="${D}" ${installtarget} || die "Unable to make ${installtarget}" + + # 2004.07.28 rac + + # suidperl has had a history of security trouble, and the + # perldelta has recommended against using it for a while. genone + # alerted me to the fact that the hardlinks aren't carrying + # through the staging directory, and we end up with four copies of + # perl, basically. two normal, two suid. fix this up here, and + # delete suidperl entirely. if this causes outrage, here's where + # to fix. + + # Moved to a use flag enablement - bug 64823 - mcummings + #rm ${D}/usr/bin/sperl${PV} + #rm ${D}/usr/bin/suidperl + rm ${D}/usr/bin/perl + ln -s perl${PV} ${D}/usr/bin/perl + + cp -f utils/h2ph utils/h2ph_patched + epatch ${FILESDIR}/${PN}-h2ph-ansi-header.patch + + LD_LIBRARY_PATH=. ./perl -Ilib utils/h2ph_patched \ + -a -d ${D}/usr/lib/perl5/${PV}/${myarch}${mythreading} <<EOF +asm/termios.h +syscall.h +syslimits.h +syslog.h +sys/ioctl.h +sys/socket.h +sys/time.h +wait.h +EOF + + # This is to fix a missing c flag for backwards compat + for i in `find ${D}/usr/lib/perl5 -iname "Config.pm"`;do + sed -e "s:ccflags=':ccflags='-DPERL5 :" \ + -e "s:cppflags=':cppflags='-DPERL5 :" \ + ${i} > ${i}.new &&\ + mv ${i}.new ${i} || die "Sed failed" + done + + # A poor fix for the miniperl issues + dosed 's:./miniperl:/usr/bin/perl:' /usr/lib/perl5/${PV}/ExtUtils/xsubpp + fperms 0444 /usr/lib/perl5/${PV}/ExtUtils/xsubpp + dosed 's:./miniperl:/usr/bin/perl:' /usr/bin/xsubpp + fperms 0755 /usr/bin/xsubpp + + # This removes ${D} from Config.pm and .packlist + for i in `find ${D} -iname "Config.pm"` `find ${D} -iname ".packlist"`;do + einfo "Removing ${D} from ${i}..." + sed -e "s:${D}::" ${i} > ${i}.new &&\ + mv ${i}.new ${i} || die "Sed failed" + done + + # Note: find out from psm why we would need/want this. + # ( use berkdb && has_version '=sys-libs/db-1*' ) || + # find ${D} -name "*NDBM*" | xargs rm -f + + dodoc Changes* Artistic Copying README Todo* AUTHORS + + if use doc + then + # HTML Documentation + # We expect errors, warnings, and such with the following. + + dodir /usr/share/doc/${PF}/html + ./perl installhtml \ + --podroot='.' \ + --podpath='lib:ext:pod:vms' \ + --recurse \ + --htmldir="${D}/usr/share/doc/${PF}/html" \ + --libpods='perlfunc:perlguts:perlvar:perlrun:perlop' + fi + cd `find ${D} -name Path.pm|sed -e 's/Path.pm//'` + # CAN patch in bug 79685 + epatch ${FILESDIR}/CAN-2005-0448-rmtree.patch + + if use minimal || use build ; then + src_remove_extra_files + fi + +} + +src_remove_extra_files() +{ + local prefix="./usr" # ./ is important + local bindir="${prefix}/bin" + local perlroot="${prefix}/lib/perl5" # perl installs per-arch dirs + local prV="${perlroot}/${PV}" + # myarch and mythreading are defined inside src_configure() + local prVA="${prV}/${myarch}${mythreading}" + + # I made this list from the Mandr*, Debian and ex-Connectiva perl-base list + # Then, I added several files to get GNU autotools running + # FIXME: should this be in a separated file to be sourced? + local MINIMAL_PERL_INSTALL=" + ${bindir}/h2ph + ${bindir}/perl + ${bindir}/perl${PV} + ${bindir}/pod2man + ${prV}/attributes.pm + ${prV}/AutoLoader.pm + ${prV}/autouse.pm + ${prV}/base.pm + ${prV}/bigint.pm + ${prV}/bignum.pm + ${prV}/bigrat.pm + ${prV}/blib.pm + ${prV}/bytes_heavy.pl + ${prV}/bytes.pm + ${prV}/Carp/Heavy.pm + ${prV}/Carp.pm + ${prV}/charnames.pm + ${prV}/Class/Struct.pm + ${prV}/constant.pm + ${prV}/diagnostics.pm + ${prV}/DirHandle.pm + ${prV}/Exporter/Heavy.pm + ${prV}/Exporter.pm + ${prV}/fields.pm + ${prV}/File/Basename.pm + ${prV}/File/Compare.pm + ${prV}/File/Copy.pm + ${prV}/File/Find.pm + ${prV}/FileHandle.pm + ${prV}/File/Path.pm + ${prV}/File/Spec.pm + ${prV}/File/Spec/Unix.pm + ${prV}/File/stat.pm + ${prV}/filetest.pm + ${prVA}/attrs.pm + ${prVA}/auto/attrs + ${prVA}/auto/Cwd/Cwd.so + ${prVA}/auto/Data/Dumper/Dumper.so + ${prVA}/auto/DynaLoader/dl_findfile.al + ${prVA}/auto/Fcntl/Fcntl.so + ${prVA}/auto/File/Glob/Glob.so + ${prVA}/auto/IO/IO.so + ${prVA}/auto/POSIX/autosplit.ix + ${prVA}/auto/POSIX/fstat.al + ${prVA}/auto/POSIX/load_imports.al + ${prVA}/auto/POSIX/POSIX.bs + ${prVA}/auto/POSIX/POSIX.so + ${prVA}/auto/POSIX/stat.al + ${prVA}/auto/POSIX/tmpfile.al + ${prVA}/auto/re/re.so + ${prVA}/auto/Socket/Socket.so + ${prVA}/auto/Storable/autosplit.ix + ${prVA}/auto/Storable/_retrieve.al + ${prVA}/auto/Storable/retrieve.al + ${prVA}/auto/Storable/Storable.so + ${prVA}/auto/Storable/_store.al + ${prVA}/auto/Storable/store.al + ${prVA}/B/Deparse.pm + ${prVA}/B.pm + ${prVA}/Config.pm + ${prVA}/Config_heavy.pl + ${prVA}/CORE/libperl.so + ${prVA}/Cwd.pm + ${prVA}/Data/Dumper.pm + ${prVA}/DynaLoader.pm + ${prVA}/encoding.pm + ${prVA}/Errno.pm + ${prVA}/Fcntl.pm + ${prVA}/File/Glob.pm + ${prVA}/_h2ph_pre.ph + ${prVA}/IO/File.pm + ${prVA}/IO/Handle.pm + ${prVA}/IO/Pipe.pm + ${prVA}/IO.pm + ${prVA}/IO/Seekable.pm + ${prVA}/IO/Select.pm + ${prVA}/IO/Socket.pm + ${prVA}/lib.pm + ${prVA}/NDBM_File.pm + ${prVA}/ops.pm + ${prVA}/POSIX.pm + ${prVA}/re.pm + ${prVA}/Socket.pm + ${prVA}/Storable.pm + ${prVA}/threads + ${prVA}/threads.pm + ${prVA}/XSLoader.pm + ${prV}/Getopt/Long.pm + ${prV}/Getopt/Std.pm + ${prV}/if.pm + ${prV}/integer.pm + ${prV}/IO/Socket/INET.pm + ${prV}/IO/Socket/UNIX.pm + ${prV}/IPC/Open2.pm + ${prV}/IPC/Open3.pm + ${prV}/less.pm + ${prV}/List/Util.pm + ${prV}/locale.pm + ${prV}/open.pm + ${prV}/overload.pm + ${prV}/Pod/InputObjects.pm + ${prV}/Pod/Man.pm + ${prV}/Pod/ParseLink.pm + ${prV}/Pod/Parser.pm + ${prV}/Pod/Select.pm + ${prV}/Pod/Text.pm + ${prV}/Pod/Usage.pm + ${prV}/PerlIO.pm + ${prV}/Scalar/Util.pm + ${prV}/SelectSaver.pm + ${prV}/sigtrap.pm + ${prV}/sort.pm + ${prV}/stat.pl + ${prV}/strict.pm + ${prV}/subs.pm + ${prV}/Symbol.pm + ${prV}/Text/ParseWords.pm + ${prV}/Text/Tabs.pm + ${prV}/Text/Wrap.pm + ${prV}/Time/Local.pm + ${prV}/unicore/Canonical.pl + ${prV}/unicore/Exact.pl + ${prV}/unicore/lib/gc_sc/Digit.pl + ${prV}/unicore/lib/gc_sc/Word.pl + ${prV}/unicore/PVA.pl + ${prV}/unicore/To/Fold.pl + ${prV}/unicore/To/Lower.pl + ${prV}/unicore/To/Upper.pl + ${prV}/utf8_heavy.pl + ${prV}/utf8.pm + ${prV}/vars.pm + ${prV}/vmsish.pm + ${prV}/warnings + ${prV}/warnings.pm + ${prV}/warnings/register.pm" + + if use perlsuid ; then + MINIMAL_PERL_INSTALL="${MINIMAL_PERL_INSTALL} + ${bindir}/suidperl + ${bindir}/sperl${PV}" + fi + + pushd ${D} > /dev/null + # Remove cruft + einfo "Removing files that are not in the minimal install" + for f in $(find . -type f); do + has ${f} ${MINIMAL_PERL_INSTALL} || rm -f ${f} + done + # Remove empty directories + find . -depth -type d | xargs -r rmdir &> /dev/null + popd > /dev/null +} + +pkg_postinst() { + # Make sure we do not have stale/invalid libperl.so 's ... + if [ -f "${ROOT}usr/$(get_libdir)/libperl.so" -a ! -L "${ROOT}usr/$(get_libdir)/libperl.so" ] + then + mv -f ${ROOT}usr/$(get_libdir)/libperl.so ${ROOT}usr/$(get_libdir)/libperl.so.old + fi + + local perllib="`readlink -f ${ROOT}usr/$(get_libdir)/libperl.so | sed -e 's:^.*/::'`" + + # If we are installing perl, we need the /usr/lib/libperl.so symlink to + # point to the version of perl we are running, else builing something + # against libperl.so will break ... + if [ "${perllib}" != "${LIBPERL}" ] + then + # Delete stale symlinks + rm -f ${ROOT}usr/$(get_libdir)/libperl.so + rm -f ${ROOT}usr/$(get_libdir)/libperl.so.${PERLSLOT} + # Regenerate libperl.so.${PERLSLOT} + ln -snf ${LIBPERL} ${ROOT}usr/$(get_libdir)/libperl.so.${PERLSLOT} + # Create libperl.so (we use the *soname* versioned lib here ..) + ln -snf libperl.so.${PERLSLOT} ${ROOT}usr/$(get_libdir)/libperl.so + fi + + INC=$(perl -e 'for $line (@INC) { next if $line eq "."; next if $line =~ m/'${PV}'|etc|local|perl$/; print "$line\n" }') + if [ "${ROOT}" = "/" ] + then + ebegin "Removing old .ph files" + for DIR in $INC; do + if [ -d ${ROOT}/$DIR ]; then + for file in $(find ${ROOT}/$DIR -name "*.ph" -type f); do + rm ${ROOT}/$file + einfo "<< $file" + done + fi + done + # Silently remove the now empty dirs + for DIR in $INC; do + if [ -d ${ROOT}/$DIR ]; then + find ${ROOT}/$DIR -depth -type d | xargs -r rmdir &> /dev/null + fi + done + ebegin "Converting C header files to the corresponding Perl format" + cd /usr/include; + h2ph * sys/* arpa/* netinet/* bits/* security/* asm/* gnu/* linux/* + cd /usr/include/linux; + h2ph * + fi + +# This has been moved into a function because rumor has it that a future release +# of portage will allow us to check what version was just removed - which means +# we will be able to invoke this only as needed :) + # Tried doing this via -z, but $INC is too big... + if [ "${INC}x" != "x" ]; then + cleaner_msg + epause 10 + fi +} + +cleaner_msg() { + eerror "You have had multiple versions of perl. It is recommended" + eerror "that you run perl-cleaner now. perl-cleaner will" + eerror "assist with this transition. This script is capable" + eerror "of cleaning out old .ph files, rebuilding modules for " + eerror "your new version of perl, as well as re-emerging" + eerror "applications that compiled against your old libperl.so" + eerror + eerror "PLEASE DO NOT INTERRUPT THE RUNNING OF THIS SCRIPT." + eerror "Part of the rebuilding of applications compiled against " + eerror "your old libperl involves temporarily unmerging" + eerror "them - interruptions could leave you with unmerged" + eerror "packages before they can be remerged." + eerror "" + eerror "If you have run perl-cleaner and a package still gives" + eerror "you trouble, and re-emerging it fails to correct" + eerror "the problem, please check http://bugs.gentoo.org/" + eerror "for more information or to report a bug." + eerror "" + eerror "" + +} diff --git a/dev-lang/perl/perl-5.8.7-r3.ebuild b/dev-lang/perl/perl-5.8.7-r3.ebuild new file mode 100644 index 000000000000..913eab87bf55 --- /dev/null +++ b/dev-lang/perl/perl-5.8.7-r3.ebuild @@ -0,0 +1,659 @@ +# Copyright 1999-2005 Gentoo Foundation +# Distributed under the terms of the GNU General Public License v2 +# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/perl-5.8.7-r3.ebuild,v 1.1 2005/12/06 17:16:01 mcummings Exp $ + +inherit eutils flag-o-matic toolchain-funcs multilib + +# The slot of this binary compat version of libperl.so +PERLSLOT="1" + +SHORT_PV="${PV%.*}" +MY_P="perl-${PV/_rc/-RC}" +DESCRIPTION="Larry Wall's Practical Extraction and Reporting Language" +S="${WORKDIR}/${MY_P}" +SRC_URI="ftp://ftp.perl.org/pub/CPAN/src/${MY_P}.tar.bz2" +HOMEPAGE="http://www.perl.org/" +LIBPERL="libperl$(get_libname ${PERLSLOT}.${SHORT_PV})" + +LICENSE="Artistic GPL-2" +SLOT="0" +KEYWORDS="~alpha ~amd64 ~arm ~hppa ~ia64 ~mips ~ppc ~ppc-macos ~ppc64 ~s390 ~sh ~sparc ~x86" +IUSE="berkdb debug doc gdbm ithreads perlsuid build minimal" +PERL_OLDVERSEN="5.8.0 5.8.2 5.8.4 5.8.5 5.8.6" + +DEPEND="berkdb? ( sys-libs/db ) + gdbm? ( >=sys-libs/gdbm-1.8.3 ) + >=sys-devel/libperl-${PV} + !<perl-core/ExtUtils-MakeMaker-6.17 + !<perl-core/File-Spec-0.87 + !<perl-core/Test-Simple-0.47-r1" + +RDEPEND=">=sys-devel/libperl-${PV} + berkdb? ( sys-libs/db ) + gdbm? ( >=sys-libs/gdbm-1.8.3 )" + +PDEPEND="app-admin/perl-cleaner" + +pkg_setup() { + # I think this should rather be displayed if you *have* 'ithreads' + # in USE if it could break things ... + if use ithreads + then + ewarn "PLEASE NOTE: You are compiling ${MY_P} with" + ewarn "interpreter-level threading enabled." + ewarn "Threading is not supported by all applications " + ewarn "that compile against perl. You use threading at " + ewarn "your own discretion. " + epause 5 + fi + + if use minimal + then + ewarn "You have the minimal USE flag set. The resulting" + ewarn "perl is stripped of most of its module functionality" + ewarn "and is intended for minmal use case where you need" + ewarn "just the perl interpreter, no extras." + fi + + if [ ! -f "${ROOT}/usr/$(get_libdir)/${LIBPERL}" ] + then + # Make sure we have libperl installed ... + eerror "Cannot find ${ROOT}/usr/$(get_libdir)/${LIBPERL}! Make sure that you" + eerror "have sys-libs/libperl installed properly ..." + die "Cannot find ${ROOT}/usr/$(get_libdir)/${LIBPERL}!" + fi +} + +src_unpack() { + unpack ${A} + + # Get -lpthread linked before -lc. This is needed + # when using glibc >= 2.3, or else runtime signal + # handling breaks. Fixes bug #14380. + # <rac@gentoo.org> (14 Feb 2003) + # reinstated to try to avoid sdl segfaults 03.10.02 + cd ${S}; epatch ${FILESDIR}/${PN}-prelink-lpthread.patch + + # Patch perldoc to not abort when it attempts to search + # nonexistent directories; fixes bug #16589. + # <rac@gentoo.org> (28 Feb 2003) + + cd ${S}; epatch ${FILESDIR}/${PN}-perldoc-emptydirs.patch + + # this lays the groundwork for solving the issue of what happens + # when people (or ebuilds) install different versiosn of modules + # that are in the core, by rearranging the @INC directory to look + # site -> vendor -> core. + cd ${S}; epatch ${FILESDIR}/${PN}-reorder-INC.patch + + # some well-intentioned stuff in http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&selm=Pine.SOL.4.10.10205231231200.5399-100000%40maxwell.phys.lafayette.edu + # attempts to avoid bringing cccdlflags to bear on static + # extensions (like DynaLoader). i believe this is + # counterproductive on a Gentoo system which has both a shared + # and static libperl, so effectively revert this here. + cd ${S}; epatch ${FILESDIR}/${PN}-picdl.patch + + # Configure makes an unwarranted assumption that /bin/ksh is a + # good shell. This patch makes it revert to using /bin/sh unless + # /bin/ksh really is executable. Should fix bug 42665. + # rac 2004.06.09 + cd ${S}; epatch ${FILESDIR}/${PN}-noksh.patch + + # this one only affects sparc64, as best weeve and rac can tell, + # but seems sane for all linux. we don't have to worry about + # drifting into obscure SysV non-posix semantics, and the current + # code in IO.xs that checks for this sort of thing dies in LDAP on + # sparc64. + + #epatch ${FILESDIR}/${PN}-nonblock.patch + + # since we build in non-world-writeable portage directories, none + # of the .t sections of the original version of this patch matter + # much. the PPPort section is apparently obsolete, because i see + # no /tmp in there now. ditto on perlbug.SH, which has secure + # tempfile handling if resources are present. originally from bug + # 66360. + + epatch ${FILESDIR}/${P}-tempfiles.patch + + # We do not want the build root in the linked perl module's RUNPATH, so + # strip paths containing PORTAGE_TMPDIR if its set. This is for the + # MakeMaker module, bug #105054. + epatch ${FILESDIR}/${PN}-5.8.7-MakeMaker-RUNPATH.patch + + # Starting and hopefully ending with 5.8.7 we observe stack + # corruption with the regexp handling in perls DynaLoader code + # with ssp enabled. This become fatal during compile time so we + # temporally disable ssp on two regexp files till upstream has a + # chance to work it out. Bug #97452 + use userland_Darwin || epatch "${FILESDIR}"/${P}-regexp-nossp.patch + + # Bug 114113 + cd ${S}; epatch ${FILESDIR}/perl-exp_intwrap.patch + +} + +src_configure() { + + # some arches and -O do not mix :) + use arm && replace-flags -O? -O1 + use ppc && replace-flags -O? -O1 + use ia64 && replace-flags -O? -O1 + # Perl has problems compiling with -Os in your flags with glibc + use elibc_uclibc || replace-flags "-Os" "-O2" + # This flag makes compiling crash in interesting ways + filter-flags -malign-double + # Fixes bug #97645 + use ppc && filter-flags -mpowerpc-gpopt + + export LC_ALL="C" + local myconf="" + + case ${CHOST} in + *-freebsd*) osname="freebsd" ;; + *-netbsd*) osname="netbsd" ;; + *-openbsd*) osname="openbsd" ;; + *-darwin*) osname="darwin" ;; + + *) osname="linux" ;; + esac + + if use ithreads + then + einfo "using ithreads" + mythreading="-multi" + myconf="-Dusethreads ${myconf}" + myarch=$(get_abi_CHOST) + myarch="${myarch%%-*}-${osname}-thread" + else + myarch=$(get_abi_CHOST) + myarch="${myarch%%-*}-${osname}" + fi + + local inclist=$(for v in $PERL_OLDVERSEN; do echo -n "$v $v/$myarch$mythreading "; done) + + # allow either gdbm to provide ndbm (in <gdbm/ndbm.h>) or db1 + + myndbm='U' + mygdbm='U' + mydb='U' + + if use gdbm + then + mygdbm='D' + myndbm='D' + fi + if use berkdb + then + mydb='D' + has_version '=sys-libs/db-1*' && myndbm='D' + fi + + myconf="${myconf} -${myndbm}i_ndbm -${mygdbm}i_gdbm -${mydb}i_db" + + if use mips + then + # this is needed because gcc 3.3-compiled kernels will hang + # the machine trying to run this test - check with `Kumba + # <rac@gentoo.org> 2003.06.26 + myconf="${myconf} -Dd_u32align" + fi + + if use perlsuid + then + myconf="${myconf} -Dd_dosuid" + ewarn "You have enabled Perl's suid compile. Please" + ewarn "read http://perldoc.com/perl5.8.2/INSTALL.html#suidperl" + epause 3 + fi + + if use debug + then + CFLAGS="${CFLAGS} -g" + fi + + if use sparc + then + myconf="${myconf} -Ud_longdbl" + fi + + if use alpha && "$(tc-getCC)" == "ccc" + then + ewarn "Perl will not be built with berkdb support, use gcc if you needed it..." + myconf="${myconf} -Ui_db -Ui_ndbm" + fi + + [ -n "${ABI}" ] && myconf="${myconf} -Dusrinc=$(get_ml_incdir)" + + [[ ${ELIBC} == "FreeBSD" ]] && myconf="${myconf} -Dlibc=/usr/lib/libc.a" + + if [[ $(get_libdir) != "lib" ]] ; then + myconf="${myconf} -Dlibpth='/usr/local/$(get_libdir) /$(get_libdir) \ + /usr/$(get_libdir)'" + fi + + sh Configure -des \ + -Darchname="${myarch}" \ + -Dcccdlflags='-fPIC' \ + -Dccdlflags='-rdynamic' \ + -Dcc="$(tc-getCC)" \ + -Dprefix='/usr' \ + -Dvendorprefix='/usr' \ + -Dsiteprefix='/usr' \ + -Dlocincpth=' ' \ + -Doptimize="${CFLAGS}" \ + -Duselargefiles \ + -Dd_semctl_semun \ + -Dscriptdir=/usr/bin \ + -Dman1dir=/usr/share/man/man1 \ + -Dman3dir=/usr/share/man/man3 \ + -Dinstallman1dir=/usr/share/man/man1 \ + -Dinstallman3dir=/usr/share/man/man3 \ + -Dman1ext='1' \ + -Dman3ext='3pm' \ + -Dinc_version_list="$inclist" \ + -Dcf_by='Gentoo' \ + -Ud_csh \ + ${myconf} || die "Unable to configure" +} + +src_compile() { + + # would like to bracket this with a test for the existence of a + # dotfile, but can't clean it automatically now. + + src_configure + + emake -j1 || die "Unable to make" +} + +src_test() { + use elibc_uclibc && export MAKEOPTS="${MAKEOPTS} -j1" + emake -i test CCDLFLAGS= || die "test failed" +} + +src_install() { + + export LC_ALL="C" + + # Need to do this, else apps do not link to dynamic version of + # the library ... + local coredir="/usr/lib/perl5/${PV}/${myarch}${mythreading}/CORE" + dodir ${coredir} + dosym ../../../../../$(get_libdir)/${LIBPERL} ${coredir}/${LIBPERL} + dosym ../../../../../$(get_libdir)/${LIBPERL} ${coredir}/libperl$(get_libname ${PERLSLOT}) + dosym ../../../../../$(get_libdir)/${LIBPERL} ${coredir}/libperl$(get_libname) + + # Fix for "stupid" modules and programs + dodir /usr/lib/perl5/site_perl/${PV}/${myarch}${mythreading} + + local installtarget=install + if use minimal || use build ; then + installtarget=install.perl + fi + make DESTDIR="${D}" ${installtarget} || die "Unable to make ${installtarget}" + + # 2004.07.28 rac + + # suidperl has had a history of security trouble, and the + # perldelta has recommended against using it for a while. genone + # alerted me to the fact that the hardlinks aren't carrying + # through the staging directory, and we end up with four copies of + # perl, basically. two normal, two suid. fix this up here, and + # delete suidperl entirely. if this causes outrage, here's where + # to fix. + + # Moved to a use flag enablement - bug 64823 - mcummings + #rm ${D}/usr/bin/sperl${PV} + #rm ${D}/usr/bin/suidperl + rm ${D}/usr/bin/perl + ln -s perl${PV} ${D}/usr/bin/perl + + cp -f utils/h2ph utils/h2ph_patched + epatch ${FILESDIR}/${PN}-h2ph-ansi-header.patch + + + LD_LIBRARY_PATH=. ./perl -Ilib utils/h2ph_patched \ + -a -d ${D}/usr/lib/perl5/${PV}/${myarch}${mythreading} <<EOF +asm/termios.h +syscall.h +syslimits.h +syslog.h +sys/ioctl.h +sys/socket.h +sys/time.h +wait.h +EOF + + # This is to fix a missing c flag for backwards compat + for i in `find ${D}/usr/lib/perl5 -iname "Config.pm"`;do + sed -e "s:ccflags=':ccflags='-DPERL5 :" \ + -e "s:cppflags=':cppflags='-DPERL5 :" \ + ${i} > ${i}.new &&\ + mv ${i}.new ${i} || die "Sed failed" + done + + # A poor fix for the miniperl issues + dosed 's:./miniperl:/usr/bin/perl:' /usr/lib/perl5/${PV}/ExtUtils/xsubpp + fperms 0444 /usr/lib/perl5/${PV}/ExtUtils/xsubpp + dosed 's:./miniperl:/usr/bin/perl:' /usr/bin/xsubpp + fperms 0755 /usr/bin/xsubpp + + # This removes ${D} from Config.pm and .packlist + for i in `find ${D} -iname "Config.pm"` `find ${D} -iname ".packlist"`;do + einfo "Removing ${D} from ${i}..." + sed -e "s:${D}::" ${i} > ${i}.new &&\ + mv ${i}.new ${i} || die "Sed failed" + done + + # Note: find out from psm why we would need/want this. + # ( use berkdb && has_version '=sys-libs/db-1*' ) || + # find ${D} -name "*NDBM*" | xargs rm -f + + dodoc Changes* Artistic Copying README Todo* AUTHORS + + if use doc + then + # HTML Documentation + # We expect errors, warnings, and such with the following. + + dodir /usr/share/doc/${PF}/html + ./perl installhtml \ + --podroot='.' \ + --podpath='lib:ext:pod:vms' \ + --recurse \ + --htmldir="${D}/usr/share/doc/${PF}/html" \ + --libpods='perlfunc:perlguts:perlvar:perlrun:perlop' + fi + cd `find ${D} -name Path.pm|sed -e 's/Path.pm//'` + # CAN patch in bug 79685 + epatch ${FILESDIR}/${P}-CAN-2005-0448-rmtree.patch + + if use minimal || use build ; then + src_remove_extra_files + fi + +} + +src_remove_extra_files() +{ + local prefix="./usr" # ./ is important + local bindir="${prefix}/bin" + local perlroot="${prefix}/lib/perl5" # perl installs per-arch dirs + local prV="${perlroot}/${PV}" + # myarch and mythreading are defined inside src_configure() + local prVA="${prV}/${myarch}${mythreading}" + + # I made this list from the Mandr*, Debian and ex-Connectiva perl-base list + # Then, I added several files to get GNU autotools running + # FIXME: should this be in a separated file to be sourced? + local MINIMAL_PERL_INSTALL=" + ${bindir}/h2ph + ${bindir}/perl + ${bindir}/perl${PV} + ${bindir}/pod2man + ${prV}/attributes.pm + ${prV}/AutoLoader.pm + ${prV}/autouse.pm + ${prV}/base.pm + ${prV}/bigint.pm + ${prV}/bignum.pm + ${prV}/bigrat.pm + ${prV}/blib.pm + ${prV}/bytes_heavy.pl + ${prV}/bytes.pm + ${prV}/Carp/Heavy.pm + ${prV}/Carp.pm + ${prV}/charnames.pm + ${prV}/Class/Struct.pm + ${prV}/constant.pm + ${prV}/diagnostics.pm + ${prV}/DirHandle.pm + ${prV}/Exporter/Heavy.pm + ${prV}/Exporter.pm + ${prV}/ExtUtils/Command.pm + ${prV}/ExtUtils/Constant.pm + ${prV}/ExtUtils/Embed.pm + ${prV}/ExtUtils/Installed.pm + ${prV}/ExtUtils/Install.pm + ${prV}/ExtUtils/Liblist.pm + ${prV}/ExtUtils/MakeMaker.pm + ${prV}/ExtUtils/Manifest.pm + ${prV}/ExtUtils/Mkbootstrap.pm + ${prV}/ExtUtils/Mksymlists.pm + ${prV}/ExtUtils/MM_Any.pm + ${prV}/ExtUtils/MM_MacOS.pm + ${prV}/ExtUtils/MM.pm + ${prV}/ExtUtils/MM_Unix.pm + ${prV}/ExtUtils/MY.pm + ${prV}/ExtUtils/Packlist.pm + ${prV}/ExtUtils/testlib.pm + ${prV}/ExtUtils/Miniperl.pm + ${prV}/ExtUtils/Command/MM.pm + ${prV}/ExtUtils/Constant/Base.pm + ${prV}/ExtUtils/Constant/Utils.pm + ${prV}/ExtUtils/Constant/XS.pm + ${prV}/ExtUtils/Liblist/Kid.pm + ${prV}/ExtUtils/MakeMaker/bytes.pm + ${prV}/ExtUtils/MakeMaker/vmsish.pm + ${prV}/fields.pm + ${prV}/File/Basename.pm + ${prV}/File/Compare.pm + ${prV}/File/Copy.pm + ${prV}/File/Find.pm + ${prV}/FileHandle.pm + ${prV}/File/Path.pm + ${prV}/File/Spec.pm + ${prV}/File/Spec/Unix.pm + ${prV}/File/stat.pm + ${prV}/filetest.pm + ${prVA}/attrs.pm + ${prVA}/auto/attrs + ${prVA}/auto/Cwd/Cwd.$(get_libname) + ${prVA}/auto/Data/Dumper/Dumper.$(get_libname) + ${prVA}/auto/DynaLoader/dl_findfile.al + ${prVA}/auto/Fcntl/Fcntl.$(get_libname) + ${prVA}/auto/File/Glob/Glob.$(get_libname) + ${prVA}/auto/IO/IO.$(get_libname) + ${prVA}/auto/POSIX/autosplit.ix + ${prVA}/auto/POSIX/fstat.al + ${prVA}/auto/POSIX/load_imports.al + ${prVA}/auto/POSIX/POSIX.bs + ${prVA}/auto/POSIX/POSIX.$(get_libname) + ${prVA}/auto/POSIX/stat.al + ${prVA}/auto/POSIX/tmpfile.al + ${prVA}/auto/re/re.$(get_libname) + ${prVA}/auto/Socket/Socket.$(get_libname) + ${prVA}/auto/Storable/autosplit.ix + ${prVA}/auto/Storable/_retrieve.al + ${prVA}/auto/Storable/retrieve.al + ${prVA}/auto/Storable/Storable.$(get_libname) + ${prVA}/auto/Storable/_store.al + ${prVA}/auto/Storable/store.al + ${prVA}/B/Deparse.pm + ${prVA}/B.pm + ${prVA}/Config.pm + ${prVA}/Config_heavy.pl + ${prVA}/CORE/libperl$(get_libname) + ${prVA}/Cwd.pm + ${prVA}/Data/Dumper.pm + ${prVA}/DynaLoader.pm + ${prVA}/encoding.pm + ${prVA}/Errno.pm + ${prVA}/Fcntl.pm + ${prVA}/File/Glob.pm + ${prVA}/_h2ph_pre.ph + ${prVA}/IO/File.pm + ${prVA}/IO/Handle.pm + ${prVA}/IO/Pipe.pm + ${prVA}/IO.pm + ${prVA}/IO/Seekable.pm + ${prVA}/IO/Select.pm + ${prVA}/IO/Socket.pm + ${prVA}/lib.pm + ${prVA}/NDBM_File.pm + ${prVA}/ops.pm + ${prVA}/POSIX.pm + ${prVA}/re.pm + ${prVA}/Socket.pm + ${prVA}/Storable.pm + ${prVA}/threads + ${prVA}/threads.pm + ${prVA}/XSLoader.pm + ${prV}/Getopt/Long.pm + ${prV}/Getopt/Std.pm + ${prV}/if.pm + ${prV}/integer.pm + ${prV}/IO/Socket/INET.pm + ${prV}/IO/Socket/UNIX.pm + ${prV}/IPC/Open2.pm + ${prV}/IPC/Open3.pm + ${prV}/less.pm + ${prV}/List/Util.pm + ${prV}/locale.pm + ${prV}/open.pm + ${prV}/overload.pm + ${prV}/Pod/InputObjects.pm + ${prV}/Pod/Man.pm + ${prV}/Pod/ParseLink.pm + ${prV}/Pod/Parser.pm + ${prV}/Pod/Select.pm + ${prV}/Pod/Text.pm + ${prV}/Pod/Usage.pm + ${prV}/PerlIO.pm + ${prV}/Scalar/Util.pm + ${prV}/SelectSaver.pm + ${prV}/sigtrap.pm + ${prV}/sort.pm + ${prV}/stat.pl + ${prV}/strict.pm + ${prV}/subs.pm + ${prV}/Symbol.pm + ${prV}/Text/ParseWords.pm + ${prV}/Text/Tabs.pm + ${prV}/Text/Wrap.pm + ${prV}/Time/Local.pm + ${prV}/unicore/Canonical.pl + ${prV}/unicore/Exact.pl + ${prV}/unicore/lib/gc_sc/Digit.pl + ${prV}/unicore/lib/gc_sc/Word.pl + ${prV}/unicore/PVA.pl + ${prV}/unicore/To/Fold.pl + ${prV}/unicore/To/Lower.pl + ${prV}/unicore/To/Upper.pl + ${prV}/utf8_heavy.pl + ${prV}/utf8.pm + ${prV}/vars.pm + ${prV}/vmsish.pm + ${prV}/warnings + ${prV}/warnings.pm + ${prV}/warnings/register.pm" + + # Catch the headers in CORE + if use minimal ; then + for header in `find ${D}${prVA} -name "*.h"|sed -e "s:${D}::g"`; do + #header=`echo $head|sed -e "s:${D}::g"` + MINIMAL_PERL_INSTALL="${MINIMAL_PERL_INSTALL} + $header" + done + fi + + if use perlsuid ; then + MINIMAL_PERL_INSTALL="${MINIMAL_PERL_INSTALL} + ${bindir}/suidperl + ${bindir}/sperl${PV}" + fi + + pushd ${D} > /dev/null + # Remove cruft + einfo "Removing files that are not in the minimal install" + echo "${MINIMAL_PERL_INSTALL}" + sleep 120 + for f in $(find . -type f); do + has ${f} ${MINIMAL_PERL_INSTALL} || rm -f ${f} + done + # Remove empty directories + find . -depth -type d | xargs -r rmdir &> /dev/null + popd > /dev/null +} + +pkg_postinst() { + # Make sure we do not have stale/invalid libperl.so 's ... + if [ -f "${ROOT}usr/$(get_libdir)/libperl$(get_libname)" -a ! -L "${ROOT}usr/$(get_libdir)/libperl$(get_libname)" ] + then + mv -f ${ROOT}usr/$(get_libdir)/libperl$(get_libname) ${ROOT}usr/$(get_libdir)/libperl$(get_libname).old + fi + + local perllib="`readlink -f ${ROOT}usr/$(get_libdir)/libperl$(get_libname) | sed -e 's:^.*/::'`" + + # If we are installing perl, we need the /usr/lib/libperl.so symlink to + # point to the version of perl we are running, else builing something + # against libperl.so will break ... + if [ "${perllib}" != "${LIBPERL}" ] + then + # Delete stale symlinks + rm -f ${ROOT}usr/$(get_libdir)/libperl$(get_libname) + rm -f ${ROOT}usr/$(get_libdir)/libperl$(get_libname ${PERLSLOT}) + # Regenerate libperl.so.${PERLSLOT} + ln -snf ${LIBPERL} ${ROOT}usr/$(get_libdir)/libperl$(get_libname).${PERLSLOT} + # Create libperl.so (we use the *soname* versioned lib here ..) + ln -snf libperl$(get_libname ${PERLSLOT}) ${ROOT}usr/$(get_libdir)/libperl$(get_libname) + fi + + INC=$(perl -e 'for $line (@INC) { next if $line eq "."; next if $line =~ m/'${PV}'|etc|local|perl$/; print "$line\n" }') + if [ "${ROOT}" = "/" ] + then + ebegin "Removing old .ph files" + for DIR in $INC; do + if [ -d ${ROOT}/$DIR ]; then + for file in $(find ${ROOT}/$DIR -name "*.ph" -type f); do + rm ${ROOT}/$file + einfo "<< $file" + done + fi + done + # Silently remove the now empty dirs + for DIR in $INC; do + if [ -d ${ROOT}/$DIR ]; then + find ${ROOT}/$DIR -depth -type d | xargs -r rmdir &> /dev/null + fi + done + ebegin "Converting C header files to the corresponding Perl format" + cd /usr/include; + h2ph * sys/* arpa/* netinet/* bits/* security/* asm/* gnu/* linux/* + cd /usr/include/linux; + h2ph * + fi + +# This has been moved into a function because rumor has it that a future release +# of portage will allow us to check what version was just removed - which means +# we will be able to invoke this only as needed :) + # Tried doing this via -z, but $INC is too big... + if [ "${INC}x" != "x" ]; then + cleaner_msg + epause 5 + fi +} + +cleaner_msg() { + eerror "You have had multiple versions of perl. It is recommended" + eerror "that you run perl-cleaner now. perl-cleaner will" + eerror "assist with this transition. This script is capable" + eerror "of cleaning out old .ph files, rebuilding modules for " + eerror "your new version of perl, as well as re-emerging" + eerror "applications that compiled against your old libperl$(get_libname)" + eerror + eerror "PLEASE DO NOT INTERRUPT THE RUNNING OF THIS SCRIPT." + eerror "Part of the rebuilding of applications compiled against " + eerror "your old libperl involves temporarily unmerging" + eerror "them - interruptions could leave you with unmerged" + eerror "packages before they can be remerged." + eerror "" + eerror "If you have run perl-cleaner and a package still gives" + eerror "you trouble, and re-emerging it fails to correct" + eerror "the problem, please check http://bugs.gentoo.org/" + eerror "for more information or to report a bug." + eerror "" + eerror "" + +} |