/[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.83 Revision 1.103
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.83 2006/02/28 02:56:48 vapier Exp $ 3# $Header: /var/cvsroot/gentoo-x86/eclass/perl-module.eclass,v 1.103 2006/10/14 20:27:21 swegener 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 perlinfo fixlocalpod updatepod 13EXPORT_FUNCTIONS pkg_setup pkg_preinst pkg_postinst pkg_prerm pkg_postrm src_compile src_install src_test src_unpack
13 14
14# 2005.04.28 mcummings 15# 2005.04.28 mcummings
15# Mounting problems with src_test functions has forced me to make the 16# 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 17# 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 18# is generally necessary. I've left a block to make sure we still need to set
58# Fix for proper handling of $mydoc - thanks to stkn for noticing we were 59# Fix for proper handling of $mydoc - thanks to stkn for noticing we were
59# bombing out there 60# bombing out there
60# 61#
61# 2005.07.19 mcummings 62# 2005.07.19 mcummings
62# Providing an override var for the use of Module::Build. While it is being 63# 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 64# 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" 65# 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 66# Makfile.PL - example is Class::MethodMaker, which provides a Build.PL that is
66# severely broken. 67# severely broken.
67# 68#
68# 2006.02.11 mcummings 69# 2006.02.11 mcummings
69# Per a conversation with solar, adding a change to the dep/rdep lines for 70# 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 71# minimal. Should fix bug 68367 and bug 83622, as well as other embedded builds
71# that use perl components without providing perl 72# that use perl components without providing perl
73#
74# 2006.06.13 mcummings
75# I've reordered and extended the logic on when to invoke module-build versus
76# MakeMaker. The problem that has arisen is that some modules provide a
77# Makefile.PL that passes all arguments on to a Build.PL - including PREFIX,
78# which causes module-build to build with a target of /usr/usr/
79# (how broken is that?). Current logic is if there is a Build.PL and we aren't
80# overriding, use it; otherwise use the Makefile.PL; otherwise return (maybe we
81# want all the functionality of the perl-module eclass without needing to
82# compile??).
72 83
73 84
74IUSE="minimal"
75DEPEND=">=dev-lang/perl-5.8.2 !<perl-core/ExtUtils-MakeMaker-6.17"
76RDEPEND="!minimal? ( ${DEPEND} )"
77SRC_PREP="no" 85SRC_PREP="no"
78SRC_TEST="skip" 86SRC_TEST="skip"
79USE_BUILDER="yes" 87PREFER_BUILDPL="yes"
80 88
81PERL_VERSION="" 89PERL_VERSION=""
82SITE_ARCH="" 90SITE_ARCH=""
83SITE_LIB="" 91SITE_LIB=""
84VENDOR_LIB="" 92VENDOR_LIB=""
85VENDOR_ARCH="" 93VENDOR_ARCH=""
86ARCH_LIB="" 94ARCH_LIB=""
87POD_DIR="" 95POD_DIR=""
88BUILDER_VER="" 96BUILDER_VER=""
97pm_echovar=""
98
99perl-module_src_unpack() {
100 if [[ -n ${PATCHES} ]]; then
101 base_src_unpack unpack
102 base_src_unpack autopatch
103 else
104 base_src_unpack unpack
105 fi
106}
89 107
90perl-module_src_prep() { 108perl-module_src_prep() {
91 109
92 perlinfo 110 perlinfo
93 111
94 export PERL_MM_USE_DEFAULT=1 112 export PERL_MM_USE_DEFAULT=1
113 # Disable ExtUtils::AutoInstall from prompting
114 export PERL_EXTUTILS_AUTOINSTALL="--skipdeps"
95 115
96 116
97 SRC_PREP="yes" 117 SRC_PREP="yes"
98 if [ -f ${S}/Build.PL ] && [ "${USE_BUILDER}" == "yes" ]; then 118 pwd
119 if [ "${PREFER_BUILDPL}" == "yes" ] && ( [ -f Build.PL ] || [ ${PN} == "module-build" ] ); then
99 einfo "Using Module::Build" 120 einfo "Using Module::Build"
100 if [ -z ${BUILDER_VER} ]; then 121 echo "$pm_echovar" | perl Build.PL --installdirs=vendor --destdir=${D} --libdoc= || die "Unable to build! (are you using USE=\"build\"?)"
101 eerror 122 elif [ -f Makefile.PL ] && [ ! ${PN} == "module-build" ]; then
102 eerror "Please post a bug on http://bugs.gentoo.org assigned to"
103 eerror "perl@gentoo.org - ${P} was added without a dependancy"
104 eerror "on dev-perl/module-build"
105 eerror "${BUILDER_VER}"
106 eerror
107 die
108 else
109 perl ${S}/Build.PL installdirs=vendor destdir=${D} libdoc=
110 fi
111 else
112 einfo "Using ExtUtils::MakeMaker" 123 einfo "Using ExtUtils::MakeMaker"
113 #perl Makefile.PL ${myconf} \
114 perl Makefile.PL ${myconf} INSTALLMAN3DIR='none'\ 124 echo "$pm_echovar" | perl Makefile.PL ${myconf} INSTALLMAN3DIR='none'\
115 PREFIX=/usr INSTALLDIRS=vendor DESTDIR=${D} 125 PREFIX=/usr INSTALLDIRS=vendor DESTDIR=${D} || die "Unable to build! (are you using USE=\"build\"?)"
126 fi
127 if [ ! -f Build.PL ] && [ ! -f Makefile.PL ]; then
128 einfo "No Make or Build file detected..."
129 return
116 fi 130 fi
117} 131}
118 132
119perl-module_src_compile() { 133perl-module_src_compile() {
120 134
121 perlinfo 135 perlinfo
122 [ "${SRC_PREP}" != "yes" ] && perl-module_src_prep 136 [ "${SRC_PREP}" != "yes" ] && perl-module_src_prep
123 if [ -z ${BUILDER_VER} ]; then 137 if [ -f Makefile ]; then
124 make ${mymake} || die "compilation failed" 138 make ${mymake} || die "compilation failed"
125 else 139 elif [ -f Build ]; then
126 perl ${S}/Build build 140 perl Build build || die "compilation failed"
127 fi 141 fi
128 142
129} 143}
130 144
131perl-module_src_test() { 145perl-module_src_test() {
132 if [ "${SRC_TEST}" == "do" ]; then 146 if [ "${SRC_TEST}" == "do" ]; then
133 perlinfo 147 perlinfo
134 if [ -z ${BUILDER_VER} ]; then 148 if [ -f Makefile ]; then
135 make test || die "test failed" 149 make test || die "test failed"
136 else 150 elif [ -f Build ]; then
137 perl ${S}/Build test || die "test failed" 151 perl Build test || die "test failed"
138 fi 152 fi
139 fi 153 fi
140} 154}
141 155
142perl-module_src_install() { 156perl-module_src_install() {
143 157
144 perlinfo 158 perlinfo
145 159
146 test -z ${mytargets} && mytargets="install" 160 test -z ${mytargets} && mytargets="install"
147 161
148 if [ -z ${BUILDER_VER} ]; then 162 if [ -f Makefile ]; then
149 make ${myinst} ${mytargets} || die 163 make ${myinst} ${mytargets} || die
150 else 164 elif [ -f Build ]; then
151 perl ${S}/Build install 165 perl ${S}/Build install
152 fi 166 fi
167
168
169 einfo "Cleaning out stray man files"
170 for FILE in `find ${D} -type f -name "*.3pm*"`; do
171 rm -rf ${FILE}
172 done
173 find ${D}/usr/share/man -depth -type d 2>/dev/null | xargs -r rmdir 2>/dev/null
153 174
154 fixlocalpod 175 fixlocalpod
155 176
156 for FILE in `find ${D} -type f |grep -v '.so'`; do 177 for FILE in `find ${D} -type f |grep -v '.so'`; do
157 STAT=`file $FILE| grep -i " text"` 178 STAT=`file $FILE| grep -i " text"`
177 perlinfo 198 perlinfo
178} 199}
179 200
180perl-module_pkg_postinst() { 201perl-module_pkg_postinst() {
181 202
203 einfo "Man pages are not installed for most modules now."
204 einfo "Please use perldoc instead."
182 updatepod 205 updatepod
183} 206}
184 207
185perl-module_pkg_prerm() { 208perl-module_pkg_prerm() {
186 209
216 239
217 local installvendorarch 240 local installvendorarch
218 eval `perl '-V:installvendorarch'` 241 eval `perl '-V:installvendorarch'`
219 VENDOR_ARCH=${installvendorarch} 242 VENDOR_ARCH=${installvendorarch}
220 243
221 if [ "${USE_BUILDER}" == "yes" ]; then 244 if [ "${PREFER_BUILDPL}" == "yes" ]; then
245 if [ ! -f ${S}/Makefile.PL ] || [ ${PN} == "module-build" ]; then
222 if [ -f ${S}/Build.PL ]; then 246 if [ -f ${S}/Build.PL ]; then
223 if [ ${PN} == "module-build" ]; then 247 if [ ${PN} == "module-build" ]; then
224 BUILDER_VER="1" # A bootstrapping if you will 248 BUILDER_VER="1" # A bootstrapping if you will
225 else 249 else
226 BUILDER_VER=`perl -MModule::Build -e 'print "$Module::Build::VERSION;"' ` 250 BUILDER_VER=`perl -MModule::Build -e 'print "$Module::Build::VERSION;"' `
251 fi
227 fi 252 fi
228 fi 253 fi
229 fi 254 fi
230 255
231 if [ -f /usr/bin/perl ] 256 if [ -f /usr/bin/perl ]
234 fi 259 fi
235} 260}
236 261
237fixlocalpod() { 262fixlocalpod() {
238 perlinfo 263 perlinfo
239 dodir ${POD_DIR}
240 264
241 if [ -f ${D}${ARCH_LIB}/perllocal.pod ]; 265 if [ -f ${D}${ARCH_LIB}/perllocal.pod ];
242 then 266 then
243 touch ${D}/${POD_DIR}/${P}.pod
244 sed -e "s:${D}::g" \
245 ${D}${ARCH_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
246 touch ${D}/${POD_DIR}/${P}.pod.arch
247 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.arch
248 rm -f ${D}/${ARCH_LIB}/perllocal.pod 267 rm -f ${D}/${ARCH_LIB}/perllocal.pod
249 fi 268 fi
250 269
251 if [ -f ${D}${SITE_LIB}/perllocal.pod ]; 270 if [ -f ${D}${SITE_LIB}/perllocal.pod ];
252 then 271 then
253 touch ${D}/${POD_DIR}/${P}.pod
254 sed -e "s:${D}::g" \
255 ${D}${SITE_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
256 touch ${D}/${POD_DIR}/${P}.pod.site
257 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.site
258 rm -f ${D}/${SITE_LIB}/perllocal.pod 272 rm -f ${D}/${SITE_LIB}/perllocal.pod
259 fi 273 fi
260 274
261 if [ -f ${D}${VENDOR_LIB}/perllocal.pod ]; 275 if [ -f ${D}${VENDOR_LIB}/perllocal.pod ];
262 then 276 then
263 touch ${D}/${POD_DIR}/${P}.pod
264 sed -e "s:${D}::g" \
265 ${D}${VENDOR_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
266 touch ${D}/${POD_DIR}/${P}.pod.vendor
267 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.vendor
268 rm -f ${D}/${VENDOR_LIB}/perllocal.pod 277 rm -f ${D}/${VENDOR_LIB}/perllocal.pod
269 fi 278 fi
270} 279}
271 280
272updatepod() { 281updatepod() {
273 perlinfo 282 perlinfo
274 283
275 if [ -d "${POD_DIR}" ] 284 if [ -d "${POD_DIR}" ]
276 then 285 then
277 for FILE in `find ${POD_DIR} -type f -name "*.pod.arch"`; do 286 for FILE in `find ${POD_DIR} -type f -name "*.pod.arch"`; do
278 cat ${FILE} >> ${ARCH_LIB}/perllocal.pod 287 cat ${FILE} >> ${ARCH_LIB}/perllocal.pod
279 rm -f ${FILE} 288 rm -f ${FILE}
280 done 289 done
281 for FILE in `find ${POD_DIR} -type f -name "*.pod.site"`; do 290 for FILE in `find ${POD_DIR} -type f -name "*.pod.site"`; do
282 cat ${FILE} >> ${SITE_LIB}/perllocal.pod 291 cat ${FILE} >> ${SITE_LIB}/perllocal.pod
283 rm -f ${FILE} 292 rm -f ${FILE}
284 done 293 done
285 for FILE in `find ${POD_DIR} -type f -name "*.pod.vendor"`; do 294 for FILE in `find ${POD_DIR} -type f -name "*.pod.vendor"`; do
286 cat ${FILE} >> ${VENDOR_LIB}/perllocal.pod 295 cat ${FILE} >> ${VENDOR_LIB}/perllocal.pod
287 rm -f ${FILE} 296 rm -f ${FILE}
288 done 297 done
289 fi 298 fi
290} 299}

Legend:
Removed from v.1.83  
changed lines
  Added in v.1.103

  ViewVC Help
Powered by ViewVC 1.1.20