/[gentoo-x86]/eclass/perl-module.eclass
Gentoo

Diff of /eclass/perl-module.eclass

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.96 Revision 1.108
1# Copyright 1999-2004 Gentoo Foundation 1# Copyright 1999-2004 Gentoo Foundation
2# Distributed under the terms of the GNU General Public License v2 2# Distributed under the terms of the GNU General Public License v2
3# $Header: /var/cvsroot/gentoo-x86/eclass/perl-module.eclass,v 1.96 2006/06/12 20:11:39 mcummings Exp $ 3# $Header: /var/cvsroot/gentoo-x86/eclass/perl-module.eclass,v 1.108 2007/08/20 08:21:58 ian Exp $
4# 4#
5# Author: Seemant Kulleen <seemant@gentoo.org> 5# Author: Seemant Kulleen <seemant@gentoo.org>
6# Maintained by the Perl herd <perl@gentoo.org> 6# Maintained by the Perl herd <perl@gentoo.org>
7# 7#
8# The perl-module eclass is designed to allow easier installation of perl 8# The perl-module eclass is designed to allow easier installation of perl
9# modules, and their incorporation into the Gentoo Linux system. 9# modules, and their incorporation into the Gentoo Linux system.
10 10
11inherit base
11 12
12EXPORT_FUNCTIONS pkg_setup pkg_preinst pkg_postinst pkg_prerm pkg_postrm src_compile src_install src_test 13EXPORT_FUNCTIONS pkg_setup pkg_preinst pkg_postinst pkg_prerm pkg_postrm src_compile src_install src_test src_unpack
13 14
15# 2007.08.19 ian
16# Added ${myconf} - bug #176818
17#
14# 2005.04.28 mcummings 18# 2005.04.28 mcummings
15# Mounting problems with src_test functions has forced me to make the 19# Mounting problems with src_test functions has forced me to make the
16# compilation of perl modules honor the FEATURES maketest flag rather than what 20# compilation of perl modules honor the FEATURES maketest flag rather than what
17# is generally necessary. I've left a block to make sure we still need to set 21# is generally necessary. I've left a block to make sure we still need to set
18# the SRC_TEST="do" flag on the suspicion that otherwise we will face 10 times 22# the SRC_TEST="do" flag on the suspicion that otherwise we will face 10 times
19# as many bug reports as we have lately. 23# as many bug reports as we have lately.
20 24#
21# 2004.05.10 rac 25# 2004.05.10 rac
22# block on makemaker versions earlier than that in the 5.8.2 core. in 26# block on makemaker versions earlier than that in the 5.8.2 core. in
23# actuality, this should be handled in the perl ebuild, so every perl 27# actuality, this should be handled in the perl ebuild, so every perl
24# ebuild should block versions of MakeMaker older than the one it 28# ebuild should block versions of MakeMaker older than the one it
25# carries. in the meantime, since we have dumped support for MakeMaker 29# carries. in the meantime, since we have dumped support for MakeMaker
58# Fix for proper handling of $mydoc - thanks to stkn for noticing we were 62# Fix for proper handling of $mydoc - thanks to stkn for noticing we were
59# bombing out there 63# bombing out there
60# 64#
61# 2005.07.19 mcummings 65# 2005.07.19 mcummings
62# Providing an override var for the use of Module::Build. While it is being 66# Providing an override var for the use of Module::Build. While it is being
63# incorporated in more and more modules, not module authors have working 67# incorporated in more and more modules, not all module authors have working
64# Build.PL's in place. The override is to allow for a fallback to the "classic" 68# Build.PL's in place. The override is to allow for a fallback to the "classic"
65# Makfile.PL - example is Class::MethodMaker, which provides a Build.PL that is 69# Makfile.PL - example is Class::MethodMaker, which provides a Build.PL that is
66# severely broken. 70# severely broken.
67# 71#
68# 2006.02.11 mcummings 72# 2006.02.11 mcummings
69# Per a conversation with solar, adding a change to the dep/rdep lines for 73# Per a conversation with solar, adding a change to the dep/rdep lines for
70# minimal. Should fix bug 68367 and bug 83622, as well as other embedded builds 74# minimal. Should fix bug 68367 and bug 83622, as well as other embedded builds
71# that use perl components without providing perl 75# that use perl components without providing perl
76#
77# 2006.06.13 mcummings
78# I've reordered and extended the logic on when to invoke module-build versus
79# MakeMaker. The problem that has arisen is that some modules provide a
80# Makefile.PL that passes all arguments on to a Build.PL - including PREFIX,
81# which causes module-build to build with a target of /usr/usr/
82# (how broken is that?). Current logic is if there is a Build.PL and we aren't
83# overriding, use it; otherwise use the Makefile.PL; otherwise return (maybe we
84# want all the functionality of the perl-module eclass without needing to
85# compile??).
72 86
73 87
74IUSE="minimal"
75DEPEND=">=dev-lang/perl-5.8.2 !<perl-core/ExtUtils-MakeMaker-6.17"
76RDEPEND="!minimal? ( ${DEPEND} )"
77SRC_PREP="no" 88SRC_PREP="no"
78SRC_TEST="skip" 89SRC_TEST="skip"
79USE_BUILDER="yes" 90PREFER_BUILDPL="yes"
80 91
81PERL_VERSION="" 92PERL_VERSION=""
82SITE_ARCH="" 93SITE_ARCH=""
83SITE_LIB="" 94SITE_LIB=""
84VENDOR_LIB="" 95VENDOR_LIB=""
85VENDOR_ARCH="" 96VENDOR_ARCH=""
86ARCH_LIB="" 97ARCH_LIB=""
87POD_DIR="" 98POD_DIR=""
88BUILDER_VER="" 99BUILDER_VER=""
100pm_echovar=""
101
102perl-module_src_unpack() {
103 if [[ -n ${PATCHES} ]]; then
104 base_src_unpack unpack
105 base_src_unpack autopatch
106 else
107 base_src_unpack unpack
108 fi
109}
89 110
90perl-module_src_prep() { 111perl-module_src_prep() {
91 112
92 perlinfo 113 perlinfo
93 114
95 # Disable ExtUtils::AutoInstall from prompting 116 # Disable ExtUtils::AutoInstall from prompting
96 export PERL_EXTUTILS_AUTOINSTALL="--skipdeps" 117 export PERL_EXTUTILS_AUTOINSTALL="--skipdeps"
97 118
98 119
99 SRC_PREP="yes" 120 SRC_PREP="yes"
121 find ${S} -type d -name "\.svn" -exec /bin/rm -rf {} \; 2>/dev/null
122 if [ "${PREFER_BUILDPL}" == "yes" ] && ( [ -f Build.PL ] || [ ${PN} == "module-build" ] ); then
123 einfo "Using Module::Build"
124 echo "$pm_echovar" | perl Build.PL ${myconf} --installdirs=vendor --destdir=${D} --libdoc= || die "Unable to build! (are you using USE=\"build\"?)"
100 if [ -f Makefile.PL ] && [ ! ${PN} == "module-build" ]; then 125 elif [ -f Makefile.PL ] && [ ! ${PN} == "module-build" ]; then
101 einfo "Using ExtUtils::MakeMaker" 126 einfo "Using ExtUtils::MakeMaker"
102 #perl Makefile.PL ${myconf} \
103 perl Makefile.PL ${myconf} INSTALLMAN3DIR='none'\ 127 echo "$pm_echovar" | perl Makefile.PL ${myconf} INSTALLMAN3DIR='none'\
104 PREFIX=/usr INSTALLDIRS=vendor DESTDIR=${D} || die "Unable to build! (are you using USE=\"build\"?)" 128 PREFIX=/usr INSTALLDIRS=vendor DESTDIR=${D} || die "Unable to build! (are you using USE=\"build\"?)"
105 fi
106 if [ -f Build.PL ] && ( [ ! -f Makefile.PL ] || [ ${PN} == "module-build" ]); then
107 einfo "Using Module::Build"
108 perl Build.PL --installdirs=vendor --destdir=${D} --libdoc= || die "Unable to build! (are you using USE=\"build\"?)"
109 fi 129 fi
110 if [ ! -f Build.PL ] && [ ! -f Makefile.PL ]; then 130 if [ ! -f Build.PL ] && [ ! -f Makefile.PL ]; then
111 einfo "No Make or Build file detected..." 131 einfo "No Make or Build file detected..."
112 return 132 return
113 fi 133 fi
120 if [ -f Makefile ]; then 140 if [ -f Makefile ]; then
121 make ${mymake} || die "compilation failed" 141 make ${mymake} || die "compilation failed"
122 elif [ -f Build ]; then 142 elif [ -f Build ]; then
123 perl Build build || die "compilation failed" 143 perl Build build || die "compilation failed"
124 fi 144 fi
145 fixlocalpod
125 146
126} 147}
127 148
128perl-module_src_test() { 149perl-module_src_test() {
129 if [ "${SRC_TEST}" == "do" ]; then 150 if [ "${SRC_TEST}" == "do" ]; then
146 make ${myinst} ${mytargets} || die 167 make ${myinst} ${mytargets} || die
147 elif [ -f Build ]; then 168 elif [ -f Build ]; then
148 perl ${S}/Build install 169 perl ${S}/Build install
149 fi 170 fi
150 171
172
173 einfo "Cleaning out stray man files"
174 for FILE in `find ${D} -type f -name "*.3pm*"`; do
175 rm -rf ${FILE}
176 done
177 find ${D}/usr/share/man -depth -type d 2>/dev/null | xargs -r rmdir 2>/dev/null
178
151 fixlocalpod 179 fixlocalpod
152 180
153 for FILE in `find ${D} -type f |grep -v '.so'`; do 181 for FILE in `find ${D} -type f |grep -v '.so'`; do
154 STAT=`file $FILE| grep -i " text"` 182 STAT=`file $FILE| grep -i " text"`
155 if [ "${STAT}x" != "x" ]; then 183 if [ "${STAT}x" != "x" ]; then
215 243
216 local installvendorarch 244 local installvendorarch
217 eval `perl '-V:installvendorarch'` 245 eval `perl '-V:installvendorarch'`
218 VENDOR_ARCH=${installvendorarch} 246 VENDOR_ARCH=${installvendorarch}
219 247
220 if [ "${USE_BUILDER}" == "yes" ]; then 248 if [ "${PREFER_BUILDPL}" == "yes" ]; then
221 if [ ! -f ${S}/Makefile.PL ] || [ ${PN} == "module-build" ]; then 249 if [ ! -f ${S}/Makefile.PL ] || [ ${PN} == "module-build" ]; then
222 if [ -f ${S}/Build.PL ]; then 250 if [ -f ${S}/Build.PL ]; then
223 if [ ${PN} == "module-build" ]; then 251 if [ ${PN} == "module-build" ]; then
224 BUILDER_VER="1" # A bootstrapping if you will 252 BUILDER_VER="1" # A bootstrapping if you will
225 else 253 else
226 BUILDER_VER=`perl -MModule::Build -e 'print "$Module::Build::VERSION;"' ` 254 BUILDER_VER=`perl -MModule::Build -e 'print "$Module::Build::VERSION;"' `
255 fi
227 fi 256 fi
228 fi 257 fi
229 fi
230 fi 258 fi
231 259
232 if [ -f /usr/bin/perl ] 260 if [ -f /usr/bin/perl ]
233 then 261 then
234 POD_DIR="/usr/share/perl/gentoo-pods/${version}" 262 POD_DIR="/usr/share/perl/gentoo-pods/${version}"
235 fi 263 fi
236} 264}
237 265
238fixlocalpod() { 266fixlocalpod() {
239 perlinfo 267 perlinfo
240 dodir ${POD_DIR}
241 268
242 if [ -f ${D}${ARCH_LIB}/perllocal.pod ]; 269 if [ -f ${D}${ARCH_LIB}/perllocal.pod ];
243 then 270 then
244 touch ${D}/${POD_DIR}/${P}.pod
245 sed -e "s:${D}::g" \
246 ${D}${ARCH_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
247 touch ${D}/${POD_DIR}/${P}.pod.arch
248 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.arch
249 rm -f ${D}/${ARCH_LIB}/perllocal.pod 271 rm -f ${D}/${ARCH_LIB}/perllocal.pod
250 fi 272 fi
251 273
252 if [ -f ${D}${SITE_LIB}/perllocal.pod ]; 274 if [ -f ${D}${SITE_LIB}/perllocal.pod ];
253 then 275 then
254 touch ${D}/${POD_DIR}/${P}.pod
255 sed -e "s:${D}::g" \
256 ${D}${SITE_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
257 touch ${D}/${POD_DIR}/${P}.pod.site
258 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.site
259 rm -f ${D}/${SITE_LIB}/perllocal.pod 276 rm -f ${D}/${SITE_LIB}/perllocal.pod
260 fi 277 fi
261 278
262 if [ -f ${D}${VENDOR_LIB}/perllocal.pod ]; 279 if [ -f ${D}${VENDOR_LIB}/perllocal.pod ];
263 then 280 then
264 touch ${D}/${POD_DIR}/${P}.pod
265 sed -e "s:${D}::g" \
266 ${D}${VENDOR_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
267 touch ${D}/${POD_DIR}/${P}.pod.vendor
268 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.vendor
269 rm -f ${D}/${VENDOR_LIB}/perllocal.pod 281 rm -f ${D}/${VENDOR_LIB}/perllocal.pod
270 fi 282 fi
271} 283}
272 284
273updatepod() { 285updatepod() {
274 perlinfo 286 perlinfo
275 287
276 if [ -d "${POD_DIR}" ] 288 if [ -d "${POD_DIR}" ]
277 then 289 then
278 for FILE in `find ${POD_DIR} -type f -name "*.pod.arch"`; do 290 for FILE in `find ${POD_DIR} -type f -name "*.pod.arch"`; do
279 cat ${FILE} >> ${ARCH_LIB}/perllocal.pod 291 cat ${FILE} >> ${ARCH_LIB}/perllocal.pod
280 rm -f ${FILE} 292 rm -f ${FILE}
281 done 293 done
282 for FILE in `find ${POD_DIR} -type f -name "*.pod.site"`; do 294 for FILE in `find ${POD_DIR} -type f -name "*.pod.site"`; do
283 cat ${FILE} >> ${SITE_LIB}/perllocal.pod 295 cat ${FILE} >> ${SITE_LIB}/perllocal.pod
284 rm -f ${FILE} 296 rm -f ${FILE}
285 done 297 done
286 for FILE in `find ${POD_DIR} -type f -name "*.pod.vendor"`; do 298 for FILE in `find ${POD_DIR} -type f -name "*.pod.vendor"`; do
287 cat ${FILE} >> ${VENDOR_LIB}/perllocal.pod 299 cat ${FILE} >> ${VENDOR_LIB}/perllocal.pod
288 rm -f ${FILE} 300 rm -f ${FILE}
289 done 301 done
290 fi 302 fi
291} 303}

Legend:
Removed from v.1.96  
changed lines
  Added in v.1.108

  ViewVC Help
Powered by ViewVC 1.1.20