/[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.70 Revision 1.106
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.70 2005/05/17 14:36:13 mcummings Exp $ 3# $Header: /var/cvsroot/gentoo-x86/eclass/perl-module.eclass,v 1.106 2007/07/17 11:59:18 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
11ECLASS=perl-module 11inherit base
12INHERITED="${INHERITED} ${ECLASS}"
13 12
14EXPORT_FUNCTIONS pkg_setup pkg_preinst pkg_postinst pkg_prerm pkg_postrm \ 13EXPORT_FUNCTIONS pkg_setup pkg_preinst pkg_postinst pkg_prerm pkg_postrm src_compile src_install src_test src_unpack
15 src_compile src_install src_test \
16 perlinfo updatepod
17 14
18# 2005.04.28 mcummings 15# 2005.04.28 mcummings
19# 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
20# 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
21# 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
… …
42# Updated eclass to include a specific function for dealing with perlocal.pods - 39# Updated eclass to include a specific function for dealing with perlocal.pods -
43# this should avoid the conflicts we've been running into with the introduction 40# this should avoid the conflicts we've been running into with the introduction
44# of file collision features by giving us a single exportable function to deal 41# of file collision features by giving us a single exportable function to deal
45# with the pods. Modifications to the eclass provided by Yaakov S 42# with the pods. Modifications to the eclass provided by Yaakov S
46# <yselkowitz@hotmail.com> in bug 83622 43# <yselkowitz@hotmail.com> in bug 83622
47# 44#
48# <later the same day> 45# <later the same day>
49# The long awaited (by me) fix for automagically detecting and dealing 46# The long awaited (by me) fix for automagically detecting and dealing
50# with module-build dependancies. I've chosen not to make it a default dep since 47# with module-build dependancies. I've chosen not to make it a default dep since
51# this adds overhead to people that might not otherwise need it, and instead 48# this adds overhead to people that might not otherwise need it, and instead
52# modified the eclass to detect the existence of a Build.PL and behave 49# modified the eclass to detect the existence of a Build.PL and behave
… …
55# only one module that needed to be hacked for this, Class-MethodMaker-2.05, but 52# only one module that needed to be hacked for this, Class-MethodMaker-2.05, but
56# that module has a bad Build.PL to begin with. Ebuilds should continue to 53# that module has a bad Build.PL to begin with. Ebuilds should continue to
57# DEPEND on module-build<-version> as needed, but there should be no need for 54# DEPEND on module-build<-version> as needed, but there should be no need for
58# the style directive any more (especially since it isn't in the eclass 55# the style directive any more (especially since it isn't in the eclass
59# anymore). Enjoy! 56# anymore). Enjoy!
57#
58# 2005.07.18 mcummings
59# Fix for proper handling of $mydoc - thanks to stkn for noticing we were
60# bombing out there
61#
62# 2005.07.19 mcummings
63# Providing an override var for the use of Module::Build. While it is being
64# incorporated in more and more modules, not all module authors have working
65# Build.PL's in place. The override is to allow for a fallback to the "classic"
66# Makfile.PL - example is Class::MethodMaker, which provides a Build.PL that is
67# severely broken.
68#
69# 2006.02.11 mcummings
70# Per a conversation with solar, adding a change to the dep/rdep lines for
71# minimal. Should fix bug 68367 and bug 83622, as well as other embedded builds
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??).
60 83
61 84
62
63DEPEND=">=dev-lang/perl-5.8.2 !<dev-perl/ExtUtils-MakeMaker-6.17"
64SRC_PREP="no" 85SRC_PREP="no"
65SRC_TEST="skip" 86SRC_TEST="skip"
87PREFER_BUILDPL="yes"
66 88
67PERL_VERSION="" 89PERL_VERSION=""
68SITE_ARCH="" 90SITE_ARCH=""
69SITE_LIB="" 91SITE_LIB=""
70VENDOR_LIB="" 92VENDOR_LIB=""
71VENDOR_ARCH="" 93VENDOR_ARCH=""
72ARCH_LIB="" 94ARCH_LIB=""
73POD_DIR="" 95POD_DIR=""
74BUILDER_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}
75 107
76perl-module_src_prep() { 108perl-module_src_prep() {
77 109
78 perlinfo 110 perlinfo
79 111
80 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"
81 115
82 116
83 SRC_PREP="yes" 117 SRC_PREP="yes"
84 if [ -f ${S}/Build.PL ]; then 118 find ${S} -type d -name "\.svn" -exec /bin/rm -rf {} \; 2>/dev/null
85 if [ -z ${BUILDER_VER} ]; then 119 if [ "${PREFER_BUILDPL}" == "yes" ] && ( [ -f Build.PL ] || [ ${PN} == "module-build" ] ); then
86 eerror 120 einfo "Using Module::Build"
87 eerror "Please post a bug on http://bugs.gentoo.org assigned to" 121 echo "$pm_echovar" | perl Build.PL --installdirs=vendor --destdir=${D} --libdoc= || die "Unable to build! (are you using USE=\"build\"?)"
88 eerror "perl@gentoo.org - ${P} was added without a dependancy" 122 elif [ -f Makefile.PL ] && [ ! ${PN} == "module-build" ]; then
89 eerror "on dev-perl/module-build" 123 einfo "Using ExtUtils::MakeMaker"
90 eerror "${BUILDER_VER}" 124 echo "$pm_echovar" | perl Makefile.PL ${myconf} INSTALLMAN3DIR='none'\
91 eerror 125 PREFIX=/usr INSTALLDIRS=vendor DESTDIR=${D} || die "Unable to build! (are you using USE=\"build\"?)"
92 die
93 else
94 perl ${S}/Build.PL installdirs=vendor destdir=${D}
95 fi 126 fi
96 else 127 if [ ! -f Build.PL ] && [ ! -f Makefile.PL ]; then
97 perl Makefile.PL ${myconf} \ 128 einfo "No Make or Build file detected..."
98 PREFIX=/usr INSTALLDIRS=vendor DESTDIR=${D} 129 return
99 fi 130 fi
100} 131}
101 132
102perl-module_src_compile() { 133perl-module_src_compile() {
103 134
104 perlinfo 135 perlinfo
105 [ "${SRC_PREP}" != "yes" ] && perl-module_src_prep 136 [ "${SRC_PREP}" != "yes" ] && perl-module_src_prep
106 if [ -z ${BUILDER_VER} ]; then 137 if [ -f Makefile ]; then
107 make ${mymake} || die "compilation failed" 138 make ${mymake} || die "compilation failed"
108 else 139 elif [ -f Build ]; then
109 perl ${S}/Build build 140 perl Build build || die "compilation failed"
110 fi 141 fi
142 fixlocalpod
111 143
112} 144}
113 145
114perl-module_src_test() { 146perl-module_src_test() {
115 if [ "${SRC_TEST}" == "do" ]; then 147 if [ "${SRC_TEST}" == "do" ]; then
116 perlinfo 148 perlinfo
117 if [ -z ${BUILDER_VER} ]; then 149 if [ -f Makefile ]; then
118 make test || die "test failed" 150 make test || die "test failed"
119 else 151 elif [ -f Build ]; then
120 perl ${S}/Build test || die "test failed" 152 perl Build test || die "test failed"
121 fi 153 fi
122 fi 154 fi
123} 155}
124 156
125perl-module_src_install() { 157perl-module_src_install() {
126 158
127 perlinfo 159 perlinfo
128 160
129 test -z ${mytargets} && mytargets="install" 161 test -z ${mytargets} && mytargets="install"
130 162
131 if [ -z ${BUILDER_VER} ]; then 163 if [ -f Makefile ]; then
132 make ${myinst} ${mytargets} || die 164 make ${myinst} ${mytargets} || die
133 else 165 elif [ -f Build ]; then
134 perl ${S}/Build install 166 perl ${S}/Build install
135 fi 167 fi
168
169
170 einfo "Cleaning out stray man files"
171 for FILE in `find ${D} -type f -name "*.3pm*"`; do
172 rm -rf ${FILE}
173 done
174 find ${D}/usr/share/man -depth -type d 2>/dev/null | xargs -r rmdir 2>/dev/null
136 175
137 fixlocalpod 176 fixlocalpod
138 177
139 for FILE in `find ${D} -type f |grep -v '.so'`; do 178 for FILE in `find ${D} -type f |grep -v '.so'`; do
140 STAT=`file $FILE| grep -i " text"` 179 STAT=`file $FILE| grep -i " text"`
141 if [ "${STAT}x" != "x" ]; then 180 if [ "${STAT}x" != "x" ]; then
142 sed -i -e "s:${D}:/:g" ${FILE} 181 sed -i -e "s:${D}:/:g" ${FILE}
143 fi 182 fi
144 done 183 done
145 184
146 for doc in Change* MANIFEST* README*; do 185 for doc in Change* MANIFEST* README* ${mydoc}; do
147 [ -s "$doc" ] && dodoc $doc 186 [ -s "$doc" ] && dodoc $doc
148 done 187 done
149 if [ -s "${mydoc}" ]; then
150 dodoc ${mydoc}
151 fi
152} 188}
153 189
154 190
155perl-module_pkg_setup() { 191perl-module_pkg_setup() {
156 192
157 perlinfo 193 perlinfo
158} 194}
159 195
160 196
161perl-module_pkg_preinst() { 197perl-module_pkg_preinst() {
162 198
163 perlinfo 199 perlinfo
164} 200}
165 201
166perl-module_pkg_postinst() { 202perl-module_pkg_postinst() {
167 203
204 einfo "Man pages are not installed for most modules now."
205 einfo "Please use perldoc instead."
168 updatepod 206 updatepod
169} 207}
170 208
171perl-module_pkg_prerm() { 209perl-module_pkg_prerm() {
172 210
173 updatepod 211 updatepod
174} 212}
175 213
176perl-module_pkg_postrm() { 214perl-module_pkg_postrm() {
177 215
178 updatepod 216 updatepod
179} 217}
180 218
181perlinfo() { 219perlinfo() {
182 220
221 local version
183 eval `perl '-V:version'` 222 eval `perl '-V:version'`
184 PERL_VERSION=${version} 223 PERL_VERSION=${version}
185 224
225 local installsitearch
186 eval `perl '-V:installsitearch'` 226 eval `perl '-V:installsitearch'`
187 SITE_ARCH=${installsitearch} 227 SITE_ARCH=${installsitearch}
188 228
229 local installsitelib
189 eval `perl '-V:installsitearch'` 230 eval `perl '-V:installsitelib'`
190 SITE_LIB=${installsitearch} 231 SITE_LIB=${installsitelib}
191 232
233 local installarchlib
192 eval `perl '-V:installarchlib'` 234 eval `perl '-V:installarchlib'`
193 ARCH_LIB=${installarchlib} 235 ARCH_LIB=${installarchlib}
194 236
237 local installvendorlib
195 eval `perl '-V:installvendorlib'` 238 eval `perl '-V:installvendorlib'`
196 VENDOR_LIB=${installvendorlib} 239 VENDOR_LIB=${installvendorlib}
197 240
241 local installvendorarch
198 eval `perl '-V:installvendorarch'` 242 eval `perl '-V:installvendorarch'`
199 VENDOR_ARCH=${installvendorarch} 243 VENDOR_ARCH=${installvendorarch}
200 244
245 if [ "${PREFER_BUILDPL}" == "yes" ]; then
246 if [ ! -f ${S}/Makefile.PL ] || [ ${PN} == "module-build" ]; then
201 if [ -f ${S}/Build.PL ]; then 247 if [ -f ${S}/Build.PL ]; then
202 if [ ${PN} == "module-build" ]; then 248 if [ ${PN} == "module-build" ]; then
203 BUILDER_VER="1" # A bootstrapping if you will 249 BUILDER_VER="1" # A bootstrapping if you will
204 else 250 else
205 BUILDER_VER=`perl -MModule::Build -e 'print "$Module::Build::VERSION;"' ` 251 BUILDER_VER=`perl -MModule::Build -e 'print "$Module::Build::VERSION;"' `
252 fi
253 fi
206 fi 254 fi
207 fi 255 fi
208 256
209 if [ -f /usr/bin/perl ] 257 if [ -f /usr/bin/perl ]
210 then 258 then
211 POD_DIR="/usr/share/perl/gentoo-pods/${version}" 259 POD_DIR="/usr/share/perl/gentoo-pods/${version}"
212 fi 260 fi
213} 261}
214 262
215fixlocalpod() { 263fixlocalpod() {
216 perlinfo 264 perlinfo
217 dodir ${POD_DIR}
218 265
219 if [ -f ${D}${ARCH_LIB}/perllocal.pod ]; 266 if [ -f ${D}${ARCH_LIB}/perllocal.pod ];
220 then 267 then
221 touch ${D}/${POD_DIR}/${P}.pod
222 sed -e "s:${D}::g" \
223 ${D}${ARCH_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
224 touch ${D}/${POD_DIR}/${P}.pod.arch
225 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.arch
226 rm -f ${D}/${ARCH_LIB}/perllocal.pod 268 rm -f ${D}/${ARCH_LIB}/perllocal.pod
227 fi 269 fi
228 270
229 if [ -f ${D}${SITE_LIB}/perllocal.pod ]; 271 if [ -f ${D}${SITE_LIB}/perllocal.pod ];
230 then 272 then
231 touch ${D}/${POD_DIR}/${P}.pod
232 sed -e "s:${D}::g" \
233 ${D}${SITE_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
234 touch ${D}/${POD_DIR}/${P}.pod.site
235 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.site
236 rm -f ${D}/${SITE_LIB}/perllocal.pod 273 rm -f ${D}/${SITE_LIB}/perllocal.pod
237 fi 274 fi
238 275
239 if [ -f ${D}${VENDOR_LIB}/perllocal.pod ]; 276 if [ -f ${D}${VENDOR_LIB}/perllocal.pod ];
240 then 277 then
241 touch ${D}/${POD_DIR}/${P}.pod
242 sed -e "s:${D}::g" \
243 ${D}${VENDOR_LIB}/perllocal.pod >> ${D}/${POD_DIR}/${P}.pod
244 touch ${D}/${POD_DIR}/${P}.pod.vendor
245 cat ${D}/${POD_DIR}/${P}.pod >>${D}/${POD_DIR}/${P}.pod.vendor
246 rm -f ${D}/${VENDOR_LIB}/perllocal.pod 278 rm -f ${D}/${VENDOR_LIB}/perllocal.pod
247 fi 279 fi
248} 280}
249 281
250updatepod() { 282updatepod() {
251 perlinfo 283 perlinfo
252 284
253 if [ -d "${POD_DIR}" ] 285 if [ -d "${POD_DIR}" ]
254 then 286 then
255 for FILE in `find ${POD_DIR} -type f -name "*.pod.arch"`; do 287 for FILE in `find ${POD_DIR} -type f -name "*.pod.arch"`; do
256 cat ${FILE} >> ${ARCH_LIB}/perllocal.pod 288 cat ${FILE} >> ${ARCH_LIB}/perllocal.pod
257 rm -f ${FILE} 289 rm -f ${FILE}
258 done 290 done
259 for FILE in `find ${POD_DIR} -type f -name "*.pod.site"`; do 291 for FILE in `find ${POD_DIR} -type f -name "*.pod.site"`; do
260 cat ${FILE} >> ${SITE_LIB}/perllocal.pod 292 cat ${FILE} >> ${SITE_LIB}/perllocal.pod
261 rm -f ${FILE} 293 rm -f ${FILE}
262 done 294 done
263 for FILE in `find ${POD_DIR} -type f -name "*.pod.vendor"`; do 295 for FILE in `find ${POD_DIR} -type f -name "*.pod.vendor"`; do
264 cat ${FILE} >> ${VENDOR_LIB}/perllocal.pod 296 cat ${FILE} >> ${VENDOR_LIB}/perllocal.pod
265 rm -f ${FILE} 297 rm -f ${FILE}
266 done 298 done
267 fi 299 fi
268} 300}
Legend:
Removed from v.1.70  
changed lines
  Added in v.1.106
  ViewVC Help
Powered by ViewVC 1.1.13