/[gentoo-x86]/eclass/eutils.eclass
Gentoo

Contents of /eclass/eutils.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.407 - (show annotations) (download)
Thu Oct 11 16:50:53 2012 UTC (21 months, 1 week ago) by mgorny
Branch: MAIN
Changes since 1.406: +9 -4 lines
prune_libtool_files(): fix removing symlinked .la files.

1 # Copyright 1999-2012 Gentoo Foundation
2 # Distributed under the terms of the GNU General Public License v2
3 # $Header: /var/cvsroot/gentoo-x86/eclass/eutils.eclass,v 1.406 2012/10/07 06:22:01 vapier Exp $
4
5 # @ECLASS: eutils.eclass
6 # @MAINTAINER:
7 # base-system@gentoo.org
8 # @BLURB: many extra (but common) functions that are used in ebuilds
9 # @DESCRIPTION:
10 # The eutils eclass contains a suite of functions that complement
11 # the ones that ebuild.sh already contain. The idea is that the functions
12 # are not required in all ebuilds but enough utilize them to have a common
13 # home rather than having multiple ebuilds implementing the same thing.
14 #
15 # Due to the nature of this eclass, some functions may have maintainers
16 # different from the overall eclass!
17
18 if [[ ${___ECLASS_ONCE_EUTILS} != "recur -_+^+_- spank" ]] ; then
19 ___ECLASS_ONCE_EUTILS="recur -_+^+_- spank"
20
21 inherit multilib toolchain-funcs user
22
23 if has "${EAPI:-0}" 0 1 2; then
24
25 # @FUNCTION: epause
26 # @USAGE: [seconds]
27 # @DESCRIPTION:
28 # Sleep for the specified number of seconds (default of 5 seconds). Useful when
29 # printing a message the user should probably be reading and often used in
30 # conjunction with the ebeep function. If the EPAUSE_IGNORE env var is set,
31 # don't wait at all. Defined in EAPIs 0 1 and 2.
32 epause() {
33 [[ -z ${EPAUSE_IGNORE} ]] && sleep ${1:-5}
34 }
35
36 # @FUNCTION: ebeep
37 # @USAGE: [number of beeps]
38 # @DESCRIPTION:
39 # Issue the specified number of beeps (default of 5 beeps). Useful when
40 # printing a message the user should probably be reading and often used in
41 # conjunction with the epause function. If the EBEEP_IGNORE env var is set,
42 # don't beep at all. Defined in EAPIs 0 1 and 2.
43 ebeep() {
44 local n
45 if [[ -z ${EBEEP_IGNORE} ]] ; then
46 for ((n=1 ; n <= ${1:-5} ; n++)) ; do
47 echo -ne "\a"
48 sleep 0.1 &>/dev/null ; sleep 0,1 &>/dev/null
49 echo -ne "\a"
50 sleep 1
51 done
52 fi
53 }
54
55 else
56
57 ebeep() {
58 ewarn "QA Notice: ebeep is not defined in EAPI=${EAPI}, please file a bug at http://bugs.gentoo.org"
59 }
60
61 epause() {
62 ewarn "QA Notice: epause is not defined in EAPI=${EAPI}, please file a bug at http://bugs.gentoo.org"
63 }
64
65 fi
66
67 # @FUNCTION: eqawarn
68 # @USAGE: [message]
69 # @DESCRIPTION:
70 # Proxy to ewarn for package managers that don't provide eqawarn and use the PM
71 # implementation if available. Reuses PORTAGE_ELOG_CLASSES as set by the dev
72 # profile.
73 if ! declare -F eqawarn >/dev/null ; then
74 eqawarn() {
75 has qa ${PORTAGE_ELOG_CLASSES} && ewarn "$@"
76 :
77 }
78 fi
79
80 # @FUNCTION: ecvs_clean
81 # @USAGE: [list of dirs]
82 # @DESCRIPTION:
83 # Remove CVS directories recursiveley. Useful when a source tarball contains
84 # internal CVS directories. Defaults to $PWD.
85 ecvs_clean() {
86 [[ -z $* ]] && set -- .
87 find "$@" -type d -name 'CVS' -prune -print0 | xargs -0 rm -rf
88 find "$@" -type f -name '.cvs*' -print0 | xargs -0 rm -rf
89 }
90
91 # @FUNCTION: esvn_clean
92 # @USAGE: [list of dirs]
93 # @DESCRIPTION:
94 # Remove .svn directories recursiveley. Useful when a source tarball contains
95 # internal Subversion directories. Defaults to $PWD.
96 esvn_clean() {
97 [[ -z $* ]] && set -- .
98 find "$@" -type d -name '.svn' -prune -print0 | xargs -0 rm -rf
99 }
100
101 # @FUNCTION: estack_push
102 # @USAGE: <stack> [items to push]
103 # @DESCRIPTION:
104 # Push any number of items onto the specified stack. Pick a name that
105 # is a valid variable (i.e. stick to alphanumerics), and push as many
106 # items as you like onto the stack at once.
107 #
108 # The following code snippet will echo 5, then 4, then 3, then ...
109 # @CODE
110 # estack_push mystack 1 2 3 4 5
111 # while estack_pop mystack i ; do
112 # echo "${i}"
113 # done
114 # @CODE
115 estack_push() {
116 [[ $# -eq 0 ]] && die "estack_push: incorrect # of arguments"
117 local stack_name="__ESTACK_$1__" ; shift
118 eval ${stack_name}+=\( \"\$@\" \)
119 }
120
121 # @FUNCTION: estack_pop
122 # @USAGE: <stack> [variable]
123 # @DESCRIPTION:
124 # Pop a single item off the specified stack. If a variable is specified,
125 # the popped item is stored there. If no more items are available, return
126 # 1, else return 0. See estack_push for more info.
127 estack_pop() {
128 [[ $# -eq 0 || $# -gt 2 ]] && die "estack_pop: incorrect # of arguments"
129
130 # We use the fugly __estack_xxx var names to avoid collision with
131 # passing back the return value. If we used "local i" and the
132 # caller ran `estack_pop ... i`, we'd end up setting the local
133 # copy of "i" rather than the caller's copy. The __estack_xxx
134 # garbage is preferable to using $1/$2 everywhere as that is a
135 # bit harder to read.
136 local __estack_name="__ESTACK_$1__" ; shift
137 local __estack_retvar=$1 ; shift
138 eval local __estack_i=\${#${__estack_name}\[@\]}
139 # Don't warn -- let the caller interpret this as a failure
140 # or as normal behavior (akin to `shift`)
141 [[ $(( --__estack_i )) -eq -1 ]] && return 1
142
143 if [[ -n ${__estack_retvar} ]] ; then
144 eval ${__estack_retvar}=\"\${${__estack_name}\[${__estack_i}\]}\"
145 fi
146 eval unset ${__estack_name}\[${__estack_i}\]
147 }
148
149 # @FUNCTION: eshopts_push
150 # @USAGE: [options to `set` or `shopt`]
151 # @DESCRIPTION:
152 # Often times code will want to enable a shell option to change code behavior.
153 # Since changing shell options can easily break other pieces of code (which
154 # assume the default state), eshopts_push is used to (1) push the current shell
155 # options onto a stack and (2) pass the specified arguments to set.
156 #
157 # If the first argument is '-s' or '-u', we assume you want to call `shopt`
158 # rather than `set` as there are some options only available via that.
159 #
160 # A common example is to disable shell globbing so that special meaning/care
161 # may be used with variables/arguments to custom functions. That would be:
162 # @CODE
163 # eshopts_push -s noglob
164 # for x in ${foo} ; do
165 # if ...some check... ; then
166 # eshopts_pop
167 # return 0
168 # fi
169 # done
170 # eshopts_pop
171 # @CODE
172 eshopts_push() {
173 if [[ $1 == -[su] ]] ; then
174 estack_push eshopts "$(shopt -p)"
175 [[ $# -eq 0 ]] && return 0
176 shopt "$@" || die "${FUNCNAME}: bad options to shopt: $*"
177 else
178 estack_push eshopts $-
179 [[ $# -eq 0 ]] && return 0
180 set "$@" || die "${FUNCNAME}: bad options to set: $*"
181 fi
182 }
183
184 # @FUNCTION: eshopts_pop
185 # @USAGE:
186 # @DESCRIPTION:
187 # Restore the shell options to the state saved with the corresponding
188 # eshopts_push call. See that function for more details.
189 eshopts_pop() {
190 local s
191 estack_pop eshopts s || die "${FUNCNAME}: unbalanced push"
192 if [[ ${s} == "shopt -"* ]] ; then
193 eval "${s}" || die "${FUNCNAME}: sanity: invalid shopt options: ${s}"
194 else
195 set +$- || die "${FUNCNAME}: sanity: invalid shell settings: $-"
196 set -${s} || die "${FUNCNAME}: sanity: unable to restore saved shell settings: ${s}"
197 fi
198 }
199
200 # @FUNCTION: eumask_push
201 # @USAGE: <new umask>
202 # @DESCRIPTION:
203 # Set the umask to the new value specified while saving the previous
204 # value onto a stack. Useful for temporarily changing the umask.
205 eumask_push() {
206 estack_push eumask "$(umask)"
207 umask "$@" || die "${FUNCNAME}: bad options to umask: $*"
208 }
209
210 # @FUNCTION: eumask_pop
211 # @USAGE:
212 # @DESCRIPTION:
213 # Restore the previous umask state.
214 eumask_pop() {
215 [[ $# -eq 0 ]] || die "${FUNCNAME}: we take no options"
216 local s
217 estack_pop eumask s || die "${FUNCNAME}: unbalanced push"
218 umask ${s} || die "${FUNCNAME}: sanity: could not restore umask: ${s}"
219 }
220
221 # @VARIABLE: EPATCH_SOURCE
222 # @DESCRIPTION:
223 # Default directory to search for patches.
224 EPATCH_SOURCE="${WORKDIR}/patch"
225 # @VARIABLE: EPATCH_SUFFIX
226 # @DESCRIPTION:
227 # Default extension for patches (do not prefix the period yourself).
228 EPATCH_SUFFIX="patch.bz2"
229 # @VARIABLE: EPATCH_OPTS
230 # @DESCRIPTION:
231 # Options to pass to patch. Meant for ebuild/package-specific tweaking
232 # such as forcing the patch level (-p#) or fuzz (-F#) factor. Note that
233 # for single patch tweaking, you can also pass flags directly to epatch.
234 EPATCH_OPTS=""
235 # @VARIABLE: EPATCH_COMMON_OPTS
236 # @DESCRIPTION:
237 # Common options to pass to `patch`. You probably should never need to
238 # change these. If you do, please discuss it with base-system first to
239 # be sure.
240 # @CODE
241 # -g0 - keep RCS, ClearCase, Perforce and SCCS happy #24571
242 # --no-backup-if-mismatch - do not leave .orig files behind
243 # -E - automatically remove empty files
244 # @CODE
245 EPATCH_COMMON_OPTS="-g0 -E --no-backup-if-mismatch"
246 # @VARIABLE: EPATCH_EXCLUDE
247 # @DESCRIPTION:
248 # List of patches not to apply. Note this is only file names,
249 # and not the full path. Globs accepted.
250 EPATCH_EXCLUDE=""
251 # @VARIABLE: EPATCH_SINGLE_MSG
252 # @DESCRIPTION:
253 # Change the printed message for a single patch.
254 EPATCH_SINGLE_MSG=""
255 # @VARIABLE: EPATCH_MULTI_MSG
256 # @DESCRIPTION:
257 # Change the printed message for multiple patches.
258 EPATCH_MULTI_MSG="Applying various patches (bugfixes/updates) ..."
259 # @VARIABLE: EPATCH_FORCE
260 # @DESCRIPTION:
261 # Only require patches to match EPATCH_SUFFIX rather than the extended
262 # arch naming style.
263 EPATCH_FORCE="no"
264
265 # @FUNCTION: epatch
266 # @USAGE: [options] [patches] [dirs of patches]
267 # @DESCRIPTION:
268 # epatch is designed to greatly simplify the application of patches. It can
269 # process patch files directly, or directories of patches. The patches may be
270 # compressed (bzip/gzip/etc...) or plain text. You generally need not specify
271 # the -p option as epatch will automatically attempt -p0 to -p5 until things
272 # apply successfully.
273 #
274 # If you do not specify any patches/dirs, then epatch will default to the
275 # directory specified by EPATCH_SOURCE.
276 #
277 # Any options specified that start with a dash will be passed down to patch
278 # for this specific invocation. As soon as an arg w/out a dash is found, then
279 # arg processing stops.
280 #
281 # When processing directories, epatch will apply all patches that match:
282 # @CODE
283 # if ${EPATCH_FORCE} != "yes"
284 # ??_${ARCH}_foo.${EPATCH_SUFFIX}
285 # else
286 # *.${EPATCH_SUFFIX}
287 # @CODE
288 # The leading ?? are typically numbers used to force consistent patch ordering.
289 # The arch field is used to apply patches only for the host architecture with
290 # the special value of "all" means apply for everyone. Note that using values
291 # other than "all" is highly discouraged -- you should apply patches all the
292 # time and let architecture details be detected at configure/compile time.
293 #
294 # If EPATCH_SUFFIX is empty, then no period before it is implied when searching
295 # for patches to apply.
296 #
297 # Refer to the other EPATCH_xxx variables for more customization of behavior.
298 epatch() {
299 _epatch_draw_line() {
300 # create a line of same length as input string
301 [[ -z $1 ]] && set "$(printf "%65s" '')"
302 echo "${1//?/=}"
303 }
304
305 unset P4CONFIG P4PORT P4USER # keep perforce at bay #56402
306
307 # First process options. We localize the EPATCH_OPTS setting
308 # from above so that we can pass it on in the loop below with
309 # any additional values the user has specified.
310 local EPATCH_OPTS=( ${EPATCH_OPTS[*]} )
311 while [[ $# -gt 0 ]] ; do
312 case $1 in
313 -*) EPATCH_OPTS+=( "$1" ) ;;
314 *) break ;;
315 esac
316 shift
317 done
318
319 # Let the rest of the code process one user arg at a time --
320 # each arg may expand into multiple patches, and each arg may
321 # need to start off with the default global EPATCH_xxx values
322 if [[ $# -gt 1 ]] ; then
323 local m
324 for m in "$@" ; do
325 epatch "${m}"
326 done
327 return 0
328 fi
329
330 local SINGLE_PATCH="no"
331 # no args means process ${EPATCH_SOURCE}
332 [[ $# -eq 0 ]] && set -- "${EPATCH_SOURCE}"
333
334 if [[ -f $1 ]] ; then
335 SINGLE_PATCH="yes"
336 set -- "$1"
337 # Use the suffix from the single patch (localize it); the code
338 # below will find the suffix for us
339 local EPATCH_SUFFIX=$1
340
341 elif [[ -d $1 ]] ; then
342 # Some people like to make dirs of patches w/out suffixes (vim)
343 set -- "$1"/*${EPATCH_SUFFIX:+."${EPATCH_SUFFIX}"}
344
345 elif [[ -f ${EPATCH_SOURCE}/$1 ]] ; then
346 # Re-use EPATCH_SOURCE as a search dir
347 epatch "${EPATCH_SOURCE}/$1"
348 return $?
349
350 else
351 # sanity check ... if it isn't a dir or file, wtf man ?
352 [[ $# -ne 0 ]] && EPATCH_SOURCE=$1
353 echo
354 eerror "Cannot find \$EPATCH_SOURCE! Value for \$EPATCH_SOURCE is:"
355 eerror
356 eerror " ${EPATCH_SOURCE}"
357 eerror " ( ${EPATCH_SOURCE##*/} )"
358 echo
359 die "Cannot find \$EPATCH_SOURCE!"
360 fi
361
362 # Now that we know we're actually going to apply something, merge
363 # all of the patch options back in to a single variable for below.
364 EPATCH_OPTS="${EPATCH_COMMON_OPTS} ${EPATCH_OPTS[*]}"
365
366 local PIPE_CMD
367 case ${EPATCH_SUFFIX##*\.} in
368 xz) PIPE_CMD="xz -dc" ;;
369 lzma) PIPE_CMD="lzma -dc" ;;
370 bz2) PIPE_CMD="bzip2 -dc" ;;
371 gz|Z|z) PIPE_CMD="gzip -dc" ;;
372 ZIP|zip) PIPE_CMD="unzip -p" ;;
373 *) ;;
374 esac
375
376 [[ ${SINGLE_PATCH} == "no" ]] && einfo "${EPATCH_MULTI_MSG}"
377
378 local x
379 for x in "$@" ; do
380 # If the patch dir given contains subdirs, or our EPATCH_SUFFIX
381 # didn't match anything, ignore continue on
382 [[ ! -f ${x} ]] && continue
383
384 local patchname=${x##*/}
385
386 # Apply single patches, or forced sets of patches, or
387 # patches with ARCH dependant names.
388 # ???_arch_foo.patch
389 # Else, skip this input altogether
390 local a=${patchname#*_} # strip the ???_
391 a=${a%%_*} # strip the _foo.patch
392 if ! [[ ${SINGLE_PATCH} == "yes" || \
393 ${EPATCH_FORCE} == "yes" || \
394 ${a} == all || \
395 ${a} == ${ARCH} ]]
396 then
397 continue
398 fi
399
400 # Let people filter things dynamically
401 if [[ -n ${EPATCH_EXCLUDE} ]] ; then
402 # let people use globs in the exclude
403 eshopts_push -o noglob
404
405 local ex
406 for ex in ${EPATCH_EXCLUDE} ; do
407 if [[ ${patchname} == ${ex} ]] ; then
408 eshopts_pop
409 continue 2
410 fi
411 done
412
413 eshopts_pop
414 fi
415
416 if [[ ${SINGLE_PATCH} == "yes" ]] ; then
417 if [[ -n ${EPATCH_SINGLE_MSG} ]] ; then
418 einfo "${EPATCH_SINGLE_MSG}"
419 else
420 einfo "Applying ${patchname} ..."
421 fi
422 else
423 einfo " ${patchname} ..."
424 fi
425
426 # most of the time, there will only be one run per unique name,
427 # but if there are more, make sure we get unique log filenames
428 local STDERR_TARGET="${T}/${patchname}.out"
429 if [[ -e ${STDERR_TARGET} ]] ; then
430 STDERR_TARGET="${T}/${patchname}-$$.out"
431 fi
432
433 printf "***** %s *****\nPWD: %s\n\n" "${patchname}" "${PWD}" > "${STDERR_TARGET}"
434
435 # Decompress the patch if need be
436 local count=0
437 local PATCH_TARGET
438 if [[ -n ${PIPE_CMD} ]] ; then
439 PATCH_TARGET="${T}/$$.patch"
440 echo "PIPE_COMMAND: ${PIPE_CMD} ${x} > ${PATCH_TARGET}" >> "${STDERR_TARGET}"
441
442 if ! (${PIPE_CMD} "${x}" > "${PATCH_TARGET}") >> "${STDERR_TARGET}" 2>&1 ; then
443 echo
444 eerror "Could not extract patch!"
445 #die "Could not extract patch!"
446 count=5
447 break
448 fi
449 else
450 PATCH_TARGET=${x}
451 fi
452
453 # Check for absolute paths in patches. If sandbox is disabled,
454 # people could (accidently) patch files in the root filesystem.
455 # Or trigger other unpleasantries #237667. So disallow -p0 on
456 # such patches.
457 local abs_paths=$(egrep -n '^[-+]{3} /' "${PATCH_TARGET}" | awk '$2 != "/dev/null" { print }')
458 if [[ -n ${abs_paths} ]] ; then
459 count=1
460 printf "NOTE: skipping -p0 due to absolute paths in patch:\n%s\n" "${abs_paths}" >> "${STDERR_TARGET}"
461 fi
462 # Similar reason, but with relative paths.
463 local rel_paths=$(egrep -n '^[-+]{3} [^ ]*[.][.]/' "${PATCH_TARGET}")
464 if [[ -n ${rel_paths} ]] ; then
465 eqawarn "QA Notice: Your patch uses relative paths '../'."
466 eqawarn " In the future this will cause a failure."
467 eqawarn "${rel_paths}"
468 fi
469
470 # Dynamically detect the correct -p# ... i'm lazy, so shoot me :/
471 local patch_cmd
472 while [[ ${count} -lt 5 ]] ; do
473 patch_cmd="${BASH_ALIASES[patch]:-patch} -p${count} ${EPATCH_OPTS}"
474
475 # Generate some useful debug info ...
476 (
477 _epatch_draw_line "***** ${patchname} *****"
478 echo
479 echo "PATCH COMMAND: ${patch_cmd} < '${PATCH_TARGET}'"
480 echo
481 _epatch_draw_line "***** ${patchname} *****"
482 ${patch_cmd} --dry-run -f < "${PATCH_TARGET}" 2>&1
483 ret=$?
484 echo
485 echo "patch program exited with status ${ret}"
486 exit ${ret}
487 ) >> "${STDERR_TARGET}"
488
489 if [ $? -eq 0 ] ; then
490 (
491 _epatch_draw_line "***** ${patchname} *****"
492 echo
493 echo "ACTUALLY APPLYING ${patchname} ..."
494 echo
495 _epatch_draw_line "***** ${patchname} *****"
496 ${patch_cmd} < "${PATCH_TARGET}" 2>&1
497 ret=$?
498 echo
499 echo "patch program exited with status ${ret}"
500 exit ${ret}
501 ) >> "${STDERR_TARGET}"
502
503 if [ $? -ne 0 ] ; then
504 echo
505 eerror "A dry-run of patch command succeeded, but actually"
506 eerror "applying the patch failed!"
507 #die "Real world sux compared to the dreamworld!"
508 count=5
509 fi
510 break
511 fi
512
513 : $(( count++ ))
514 done
515
516 # if we had to decompress the patch, delete the temp one
517 if [[ -n ${PIPE_CMD} ]] ; then
518 rm -f "${PATCH_TARGET}"
519 fi
520
521 if [[ ${count} -ge 5 ]] ; then
522 echo
523 eerror "Failed Patch: ${patchname} !"
524 eerror " ( ${PATCH_TARGET} )"
525 eerror
526 eerror "Include in your bugreport the contents of:"
527 eerror
528 eerror " ${STDERR_TARGET}"
529 echo
530 die "Failed Patch: ${patchname}!"
531 fi
532
533 # if everything worked, delete the full debug patch log
534 rm -f "${STDERR_TARGET}"
535
536 # then log away the exact stuff for people to review later
537 cat <<-EOF >> "${T}/epatch.log"
538 PATCH: ${x}
539 CMD: ${patch_cmd}
540 PWD: ${PWD}
541
542 EOF
543 eend 0
544 done
545
546 [[ ${SINGLE_PATCH} == "no" ]] && einfo "Done with patching"
547 : # everything worked
548 }
549
550 # @FUNCTION: epatch_user
551 # @USAGE:
552 # @DESCRIPTION:
553 # Applies user-provided patches to the source tree. The patches are
554 # taken from /etc/portage/patches/<CATEGORY>/<PF|P|PN>[:SLOT]/, where the first
555 # of these three directories to exist will be the one to use, ignoring
556 # any more general directories which might exist as well. They must end
557 # in ".patch" to be applied.
558 #
559 # User patches are intended for quick testing of patches without ebuild
560 # modifications, as well as for permanent customizations a user might
561 # desire. Obviously, there can be no official support for arbitrarily
562 # patched ebuilds. So whenever a build log in a bug report mentions that
563 # user patches were applied, the user should be asked to reproduce the
564 # problem without these.
565 #
566 # Not all ebuilds do call this function, so placing patches in the
567 # stated directory might or might not work, depending on the package and
568 # the eclasses it inherits and uses. It is safe to call the function
569 # repeatedly, so it is always possible to add a call at the ebuild
570 # level. The first call is the time when the patches will be
571 # applied.
572 #
573 # Ideally, this function should be called after gentoo-specific patches
574 # have been applied, so that their code can be modified as well, but
575 # before calls to e.g. eautoreconf, as the user patches might affect
576 # autotool input files as well.
577 epatch_user() {
578 [[ $# -ne 0 ]] && die "epatch_user takes no options"
579
580 # Allow multiple calls to this function; ignore all but the first
581 local applied="${T}/epatch_user.log"
582 [[ -e ${applied} ]] && return 2
583
584 # don't clobber any EPATCH vars that the parent might want
585 local EPATCH_SOURCE check base=${PORTAGE_CONFIGROOT%/}/etc/portage/patches
586 for check in ${CATEGORY}/{${P}-${PR},${P},${PN}}{,:${SLOT}}; do
587 EPATCH_SOURCE=${base}/${CTARGET}/${check}
588 [[ -r ${EPATCH_SOURCE} ]] || EPATCH_SOURCE=${base}/${CHOST}/${check}
589 [[ -r ${EPATCH_SOURCE} ]] || EPATCH_SOURCE=${base}/${check}
590 if [[ -d ${EPATCH_SOURCE} ]] ; then
591 EPATCH_SOURCE=${EPATCH_SOURCE} \
592 EPATCH_SUFFIX="patch" \
593 EPATCH_FORCE="yes" \
594 EPATCH_MULTI_MSG="Applying user patches from ${EPATCH_SOURCE} ..." \
595 epatch
596 echo "${EPATCH_SOURCE}" > "${applied}"
597 return 0
598 fi
599 done
600 echo "none" > "${applied}"
601 return 1
602 }
603
604 # @FUNCTION: emktemp
605 # @USAGE: [temp dir]
606 # @DESCRIPTION:
607 # Cheap replacement for when debianutils (and thus mktemp)
608 # does not exist on the users system.
609 emktemp() {
610 local exe="touch"
611 [[ $1 == -d ]] && exe="mkdir" && shift
612 local topdir=$1
613
614 if [[ -z ${topdir} ]] ; then
615 [[ -z ${T} ]] \
616 && topdir="/tmp" \
617 || topdir=${T}
618 fi
619
620 if ! type -P mktemp > /dev/null ; then
621 # system lacks `mktemp` so we have to fake it
622 local tmp=/
623 while [[ -e ${tmp} ]] ; do
624 tmp=${topdir}/tmp.${RANDOM}.${RANDOM}.${RANDOM}
625 done
626 ${exe} "${tmp}" || ${exe} -p "${tmp}"
627 echo "${tmp}"
628 else
629 # the args here will give slightly wierd names on BSD,
630 # but should produce a usable file on all userlands
631 if [[ ${exe} == "touch" ]] ; then
632 TMPDIR="${topdir}" mktemp -t tmp.XXXXXXXXXX
633 else
634 TMPDIR="${topdir}" mktemp -dt tmp.XXXXXXXXXX
635 fi
636 fi
637 }
638
639 # @FUNCTION: edos2unix
640 # @USAGE: <file> [more files ...]
641 # @DESCRIPTION:
642 # A handy replacement for dos2unix, recode, fixdos, etc... This allows you
643 # to remove all of these text utilities from DEPEND variables because this
644 # is a script based solution. Just give it a list of files to convert and
645 # they will all be changed from the DOS CRLF format to the UNIX LF format.
646 edos2unix() {
647 [[ $# -eq 0 ]] && return 0
648 sed -i 's/\r$//' -- "$@" || die
649 }
650
651 # @FUNCTION: make_desktop_entry
652 # @USAGE: make_desktop_entry(<command>, [name], [icon], [type], [fields])
653 # @DESCRIPTION:
654 # Make a .desktop file.
655 #
656 # @CODE
657 # binary: what command does the app run with ?
658 # name: the name that will show up in the menu
659 # icon: the icon to use in the menu entry
660 # this can be relative (to /usr/share/pixmaps) or
661 # a full path to an icon
662 # type: what kind of application is this?
663 # for categories:
664 # http://standards.freedesktop.org/menu-spec/latest/apa.html
665 # if unset, function tries to guess from package's category
666 # fields: extra fields to append to the desktop file; a printf string
667 # @CODE
668 make_desktop_entry() {
669 [[ -z $1 ]] && die "make_desktop_entry: You must specify the executable"
670
671 local exec=${1}
672 local name=${2:-${PN}}
673 local icon=${3:-${PN}}
674 local type=${4}
675 local fields=${5}
676
677 if [[ -z ${type} ]] ; then
678 local catmaj=${CATEGORY%%-*}
679 local catmin=${CATEGORY##*-}
680 case ${catmaj} in
681 app)
682 case ${catmin} in
683 accessibility) type="Utility;Accessibility";;
684 admin) type=System;;
685 antivirus) type=System;;
686 arch) type="Utility;Archiving";;
687 backup) type="Utility;Archiving";;
688 cdr) type="AudioVideo;DiscBurning";;
689 dicts) type="Office;Dictionary";;
690 doc) type=Documentation;;
691 editors) type="Utility;TextEditor";;
692 emacs) type="Development;TextEditor";;
693 emulation) type="System;Emulator";;
694 laptop) type="Settings;HardwareSettings";;
695 office) type=Office;;
696 pda) type="Office;PDA";;
697 vim) type="Development;TextEditor";;
698 xemacs) type="Development;TextEditor";;
699 esac
700 ;;
701
702 dev)
703 type="Development"
704 ;;
705
706 games)
707 case ${catmin} in
708 action|fps) type=ActionGame;;
709 arcade) type=ArcadeGame;;
710 board) type=BoardGame;;
711 emulation) type=Emulator;;
712 kids) type=KidsGame;;
713 puzzle) type=LogicGame;;
714 roguelike) type=RolePlaying;;
715 rpg) type=RolePlaying;;
716 simulation) type=Simulation;;
717 sports) type=SportsGame;;
718 strategy) type=StrategyGame;;
719 esac
720 type="Game;${type}"
721 ;;
722
723 gnome)
724 type="Gnome;GTK"
725 ;;
726
727 kde)
728 type="KDE;Qt"
729 ;;
730
731 mail)
732 type="Network;Email"
733 ;;
734
735 media)
736 case ${catmin} in
737 gfx)
738 type=Graphics
739 ;;
740 *)
741 case ${catmin} in
742 radio) type=Tuner;;
743 sound) type=Audio;;
744 tv) type=TV;;
745 video) type=Video;;
746 esac
747 type="AudioVideo;${type}"
748 ;;
749 esac
750 ;;
751
752 net)
753 case ${catmin} in
754 dialup) type=Dialup;;
755 ftp) type=FileTransfer;;
756 im) type=InstantMessaging;;
757 irc) type=IRCClient;;
758 mail) type=Email;;
759 news) type=News;;
760 nntp) type=News;;
761 p2p) type=FileTransfer;;
762 voip) type=Telephony;;
763 esac
764 type="Network;${type}"
765 ;;
766
767 sci)
768 case ${catmin} in
769 astro*) type=Astronomy;;
770 bio*) type=Biology;;
771 calc*) type=Calculator;;
772 chem*) type=Chemistry;;
773 elec*) type=Electronics;;
774 geo*) type=Geology;;
775 math*) type=Math;;
776 physics) type=Physics;;
777 visual*) type=DataVisualization;;
778 esac
779 type="Education;Science;${type}"
780 ;;
781
782 sys)
783 type="System"
784 ;;
785
786 www)
787 case ${catmin} in
788 client) type=WebBrowser;;
789 esac
790 type="Network;${type}"
791 ;;
792
793 *)
794 type=
795 ;;
796 esac
797 fi
798 if [ "${SLOT}" == "0" ] ; then
799 local desktop_name="${PN}"
800 else
801 local desktop_name="${PN}-${SLOT}"
802 fi
803 local desktop="${T}/$(echo ${exec} | sed 's:[[:space:]/:]:_:g')-${desktop_name}.desktop"
804 #local desktop=${T}/${exec%% *:-${desktop_name}}.desktop
805
806 # Don't append another ";" when a valid category value is provided.
807 type=${type%;}${type:+;}
808
809 eshopts_push -s extglob
810 if [[ -n ${icon} && ${icon} != /* ]] && [[ ${icon} == *.xpm || ${icon} == *.png || ${icon} == *.svg ]]; then
811 ewarn "As described in the Icon Theme Specification, icon file extensions are not"
812 ewarn "allowed in .desktop files if the value is not an absolute path."
813 icon=${icon%.@(xpm|png|svg)}
814 fi
815 eshopts_pop
816
817 cat <<-EOF > "${desktop}"
818 [Desktop Entry]
819 Name=${name}
820 Type=Application
821 Comment=${DESCRIPTION}
822 Exec=${exec}
823 TryExec=${exec%% *}
824 Icon=${icon}
825 Categories=${type}
826 EOF
827
828 if [[ ${fields:-=} != *=* ]] ; then
829 # 5th arg used to be value to Path=
830 ewarn "make_desktop_entry: update your 5th arg to read Path=${fields}"
831 fields="Path=${fields}"
832 fi
833 [[ -n ${fields} ]] && printf '%b\n' "${fields}" >> "${desktop}"
834
835 (
836 # wrap the env here so that the 'insinto' call
837 # doesn't corrupt the env of the caller
838 insinto /usr/share/applications
839 doins "${desktop}"
840 ) || die "installing desktop file failed"
841 }
842
843 # @FUNCTION: validate_desktop_entries
844 # @USAGE: [directories]
845 # @MAINTAINER:
846 # Carsten Lohrke <carlo@gentoo.org>
847 # @DESCRIPTION:
848 # Validate desktop entries using desktop-file-utils
849 validate_desktop_entries() {
850 if [[ -x /usr/bin/desktop-file-validate ]] ; then
851 einfo "Checking desktop entry validity"
852 local directories=""
853 for d in /usr/share/applications $@ ; do
854 [[ -d ${D}${d} ]] && directories="${directories} ${D}${d}"
855 done
856 if [[ -n ${directories} ]] ; then
857 for FILE in $(find ${directories} -name "*\.desktop" \
858 -not -path '*.hidden*' | sort -u 2>/dev/null)
859 do
860 local temp=$(desktop-file-validate ${FILE} | grep -v "warning:" | \
861 sed -e "s|error: ||" -e "s|${FILE}:|--|g" )
862 [[ -n $temp ]] && elog ${temp/--/${FILE/${D}/}:}
863 done
864 fi
865 echo ""
866 else
867 einfo "Passing desktop entry validity check. Install dev-util/desktop-file-utils, if you want to help to improve Gentoo."
868 fi
869 }
870
871 # @FUNCTION: make_session_desktop
872 # @USAGE: <title> <command> [command args...]
873 # @DESCRIPTION:
874 # Make a GDM/KDM Session file. The title is the file to execute to start the
875 # Window Manager. The command is the name of the Window Manager.
876 #
877 # You can set the name of the file via the ${wm} variable.
878 make_session_desktop() {
879 [[ -z $1 ]] && eerror "$0: You must specify the title" && return 1
880 [[ -z $2 ]] && eerror "$0: You must specify the command" && return 1
881
882 local title=$1
883 local command=$2
884 local desktop=${T}/${wm:-${PN}}.desktop
885 shift 2
886
887 cat <<-EOF > "${desktop}"
888 [Desktop Entry]
889 Name=${title}
890 Comment=This session logs you into ${title}
891 Exec=${command} $*
892 TryExec=${command}
893 Type=XSession
894 EOF
895
896 (
897 # wrap the env here so that the 'insinto' call
898 # doesn't corrupt the env of the caller
899 insinto /usr/share/xsessions
900 doins "${desktop}"
901 )
902 }
903
904 # @FUNCTION: domenu
905 # @USAGE: <menus>
906 # @DESCRIPTION:
907 # Install the list of .desktop menu files into the appropriate directory
908 # (/usr/share/applications).
909 domenu() {
910 (
911 # wrap the env here so that the 'insinto' call
912 # doesn't corrupt the env of the caller
913 local i j ret=0
914 insinto /usr/share/applications
915 for i in "$@" ; do
916 if [[ -f ${i} ]] ; then
917 doins "${i}"
918 ((ret+=$?))
919 elif [[ -d ${i} ]] ; then
920 for j in "${i}"/*.desktop ; do
921 doins "${j}"
922 ((ret+=$?))
923 done
924 else
925 ((++ret))
926 fi
927 done
928 exit ${ret}
929 )
930 }
931
932 # @FUNCTION: newmenu
933 # @USAGE: <menu> <newname>
934 # @DESCRIPTION:
935 # Like all other new* functions, install the specified menu as newname.
936 newmenu() {
937 (
938 # wrap the env here so that the 'insinto' call
939 # doesn't corrupt the env of the caller
940 insinto /usr/share/applications
941 newins "$@"
942 )
943 }
944
945 # @FUNCTION: _iconins
946 # @INTERNAL
947 # @DESCRIPTION:
948 # function for use in doicon and newicon
949 _iconins() {
950 (
951 # wrap the env here so that the 'insinto' call
952 # doesn't corrupt the env of the caller
953 local funcname=$1; shift
954 local size dir
955 local context=apps
956 local theme=hicolor
957
958 while [[ $# -gt 0 ]] ; do
959 case $1 in
960 -s|--size)
961 if [[ ${2%%x*}x${2%%x*} == "$2" ]] ; then
962 size=${2%%x*}
963 else
964 size=${2}
965 fi
966 case ${size} in
967 16|22|24|32|36|48|64|72|96|128|192|256)
968 size=${size}x${size};;
969 scalable)
970 ;;
971 *)
972 eerror "${size} is an unsupported icon size!"
973 exit 1;;
974 esac
975 shift 2;;
976 -t|--theme)
977 theme=${2}
978 shift 2;;
979 -c|--context)
980 context=${2}
981 shift 2;;
982 *)
983 if [[ -z ${size} ]] ; then
984 insinto /usr/share/pixmaps
985 else
986 insinto /usr/share/icons/${theme}/${size}/${context}
987 fi
988
989 if [[ ${funcname} == doicon ]] ; then
990 if [[ -f $1 ]] ; then
991 doins "${1}"
992 elif [[ -d $1 ]] ; then
993 shopt -s nullglob
994 doins "${1}"/*.{png,svg}
995 shopt -u nullglob
996 else
997 eerror "${1} is not a valid file/directory!"
998 exit 1
999 fi
1000 else
1001 break
1002 fi
1003 shift 1;;
1004 esac
1005 done
1006 if [[ ${funcname} == newicon ]] ; then
1007 newins "$@"
1008 fi
1009 ) || die
1010 }
1011
1012 # @FUNCTION: doicon
1013 # @USAGE: [options] <icons>
1014 # @DESCRIPTION:
1015 # Install icon into the icon directory /usr/share/icons or into
1016 # /usr/share/pixmaps if "--size" is not set.
1017 # This is useful in conjunction with creating desktop/menu files.
1018 #
1019 # @CODE
1020 # options:
1021 # -s, --size
1022 # !!! must specify to install into /usr/share/icons/... !!!
1023 # size of the icon, like 48 or 48x48
1024 # supported icon sizes are:
1025 # 16 22 24 32 36 48 64 72 96 128 192 256 scalable
1026 # -c, --context
1027 # defaults to "apps"
1028 # -t, --theme
1029 # defaults to "hicolor"
1030 #
1031 # icons: list of icons
1032 #
1033 # example 1: doicon foobar.png fuqbar.svg suckbar.png
1034 # results in: insinto /usr/share/pixmaps
1035 # doins foobar.png fuqbar.svg suckbar.png
1036 #
1037 # example 2: doicon -s 48 foobar.png fuqbar.png blobbar.png
1038 # results in: insinto /usr/share/icons/hicolor/48x48/apps
1039 # doins foobar.png fuqbar.png blobbar.png
1040 # @CODE
1041 doicon() {
1042 _iconins ${FUNCNAME} "$@"
1043 }
1044
1045 # @FUNCTION: newicon
1046 # @USAGE: [options] <icon> <newname>
1047 # @DESCRIPTION:
1048 # Like doicon, install the specified icon as newname.
1049 #
1050 # @CODE
1051 # example 1: newicon foobar.png NEWNAME.png
1052 # results in: insinto /usr/share/pixmaps
1053 # newins foobar.png NEWNAME.png
1054 #
1055 # example 2: newicon -s 48 foobar.png NEWNAME.png
1056 # results in: insinto /usr/share/icons/hicolor/48x48/apps
1057 # newins foobar.png NEWNAME.png
1058 # @CODE
1059 newicon() {
1060 _iconins ${FUNCNAME} "$@"
1061 }
1062
1063 # @FUNCTION: strip-linguas
1064 # @USAGE: [<allow LINGUAS>|<-i|-u> <directories of .po files>]
1065 # @DESCRIPTION:
1066 # Make sure that LINGUAS only contains languages that
1067 # a package can support. The first form allows you to
1068 # specify a list of LINGUAS. The -i builds a list of po
1069 # files found in all the directories and uses the
1070 # intersection of the lists. The -u builds a list of po
1071 # files found in all the directories and uses the union
1072 # of the lists.
1073 strip-linguas() {
1074 local ls newls nols
1075 if [[ $1 == "-i" ]] || [[ $1 == "-u" ]] ; then
1076 local op=$1; shift
1077 ls=$(find "$1" -name '*.po' -exec basename {} .po ';'); shift
1078 local d f
1079 for d in "$@" ; do
1080 if [[ ${op} == "-u" ]] ; then
1081 newls=${ls}
1082 else
1083 newls=""
1084 fi
1085 for f in $(find "$d" -name '*.po' -exec basename {} .po ';') ; do
1086 if [[ ${op} == "-i" ]] ; then
1087 has ${f} ${ls} && newls="${newls} ${f}"
1088 else
1089 has ${f} ${ls} || newls="${newls} ${f}"
1090 fi
1091 done
1092 ls=${newls}
1093 done
1094 else
1095 ls="$@"
1096 fi
1097
1098 nols=""
1099 newls=""
1100 for f in ${LINGUAS} ; do
1101 if has ${f} ${ls} ; then
1102 newls="${newls} ${f}"
1103 else
1104 nols="${nols} ${f}"
1105 fi
1106 done
1107 [[ -n ${nols} ]] \
1108 && einfo "Sorry, but ${PN} does not support the LINGUAS:" ${nols}
1109 export LINGUAS=${newls:1}
1110 }
1111
1112 # @FUNCTION: preserve_old_lib
1113 # @USAGE: <libs to preserve> [more libs]
1114 # @DESCRIPTION:
1115 # These functions are useful when a lib in your package changes ABI SONAME.
1116 # An example might be from libogg.so.0 to libogg.so.1. Removing libogg.so.0
1117 # would break packages that link against it. Most people get around this
1118 # by using the portage SLOT mechanism, but that is not always a relevant
1119 # solution, so instead you can call this from pkg_preinst. See also the
1120 # preserve_old_lib_notify function.
1121 preserve_old_lib() {
1122 if [[ ${EBUILD_PHASE} != "preinst" ]] ; then
1123 eerror "preserve_old_lib() must be called from pkg_preinst() only"
1124 die "Invalid preserve_old_lib() usage"
1125 fi
1126 [[ -z $1 ]] && die "Usage: preserve_old_lib <library to preserve> [more libraries to preserve]"
1127
1128 # let portage worry about it
1129 has preserve-libs ${FEATURES} && return 0
1130
1131 local lib dir
1132 for lib in "$@" ; do
1133 [[ -e ${ROOT}/${lib} ]] || continue
1134 dir=${lib%/*}
1135 dodir ${dir} || die "dodir ${dir} failed"
1136 cp "${ROOT}"/${lib} "${D}"/${lib} || die "cp ${lib} failed"
1137 touch "${D}"/${lib}
1138 done
1139 }
1140
1141 # @FUNCTION: preserve_old_lib_notify
1142 # @USAGE: <libs to notify> [more libs]
1143 # @DESCRIPTION:
1144 # Spit helpful messages about the libraries preserved by preserve_old_lib.
1145 preserve_old_lib_notify() {
1146 if [[ ${EBUILD_PHASE} != "postinst" ]] ; then
1147 eerror "preserve_old_lib_notify() must be called from pkg_postinst() only"
1148 die "Invalid preserve_old_lib_notify() usage"
1149 fi
1150
1151 # let portage worry about it
1152 has preserve-libs ${FEATURES} && return 0
1153
1154 local lib notice=0
1155 for lib in "$@" ; do
1156 [[ -e ${ROOT}/${lib} ]] || continue
1157 if [[ ${notice} -eq 0 ]] ; then
1158 notice=1
1159 ewarn "Old versions of installed libraries were detected on your system."
1160 ewarn "In order to avoid breaking packages that depend on these old libs,"
1161 ewarn "the libraries are not being removed. You need to run revdep-rebuild"
1162 ewarn "in order to remove these old dependencies. If you do not have this"
1163 ewarn "helper program, simply emerge the 'gentoolkit' package."
1164 ewarn
1165 fi
1166 ewarn " # revdep-rebuild --library '${lib}' && rm '${lib}'"
1167 done
1168 }
1169
1170 # @FUNCTION: built_with_use
1171 # @USAGE: [--hidden] [--missing <action>] [-a|-o] <DEPEND ATOM> <List of USE flags>
1172 # @DESCRIPTION:
1173 #
1174 # Deprecated: Use EAPI 2 use deps in DEPEND|RDEPEND and with has_version calls.
1175 #
1176 # A temporary hack until portage properly supports DEPENDing on USE
1177 # flags being enabled in packages. This will check to see if the specified
1178 # DEPEND atom was built with the specified list of USE flags. The
1179 # --missing option controls the behavior if called on a package that does
1180 # not actually support the defined USE flags (aka listed in IUSE).
1181 # The default is to abort (call die). The -a and -o flags control
1182 # the requirements of the USE flags. They correspond to "and" and "or"
1183 # logic. So the -a flag means all listed USE flags must be enabled
1184 # while the -o flag means at least one of the listed IUSE flags must be
1185 # enabled. The --hidden option is really for internal use only as it
1186 # means the USE flag we're checking is hidden expanded, so it won't be found
1187 # in IUSE like normal USE flags.
1188 #
1189 # Remember that this function isn't terribly intelligent so order of optional
1190 # flags matter.
1191 built_with_use() {
1192 local hidden="no"
1193 if [[ $1 == "--hidden" ]] ; then
1194 hidden="yes"
1195 shift
1196 fi
1197
1198 local missing_action="die"
1199 if [[ $1 == "--missing" ]] ; then
1200 missing_action=$2
1201 shift ; shift
1202 case ${missing_action} in
1203 true|false|die) ;;
1204 *) die "unknown action '${missing_action}'";;
1205 esac
1206 fi
1207
1208 local opt=$1
1209 [[ ${opt:0:1} = "-" ]] && shift || opt="-a"
1210
1211 local PKG=$(best_version $1)
1212 [[ -z ${PKG} ]] && die "Unable to resolve $1 to an installed package"
1213 shift
1214
1215 local USEFILE=${ROOT}/var/db/pkg/${PKG}/USE
1216 local IUSEFILE=${ROOT}/var/db/pkg/${PKG}/IUSE
1217
1218 # if the IUSE file doesn't exist, the read will error out, we need to handle
1219 # this gracefully
1220 if [[ ! -e ${USEFILE} ]] || [[ ! -e ${IUSEFILE} && ${hidden} == "no" ]] ; then
1221 case ${missing_action} in
1222 true) return 0;;
1223 false) return 1;;
1224 die) die "Unable to determine what USE flags $PKG was built with";;
1225 esac
1226 fi
1227
1228 if [[ ${hidden} == "no" ]] ; then
1229 local IUSE_BUILT=( $(<"${IUSEFILE}") )
1230 # Don't check USE_EXPAND #147237
1231 local expand
1232 for expand in $(echo ${USE_EXPAND} | tr '[:upper:]' '[:lower:]') ; do
1233 if [[ $1 == ${expand}_* ]] ; then
1234 expand=""
1235 break
1236 fi
1237 done
1238 if [[ -n ${expand} ]] ; then
1239 if ! has $1 ${IUSE_BUILT[@]#[-+]} ; then
1240 case ${missing_action} in
1241 true) return 0;;
1242 false) return 1;;
1243 die) die "$PKG does not actually support the $1 USE flag!";;
1244 esac
1245 fi
1246 fi
1247 fi
1248
1249 local USE_BUILT=$(<${USEFILE})
1250 while [[ $# -gt 0 ]] ; do
1251 if [[ ${opt} = "-o" ]] ; then
1252 has $1 ${USE_BUILT} && return 0
1253 else
1254 has $1 ${USE_BUILT} || return 1
1255 fi
1256 shift
1257 done
1258 [[ ${opt} = "-a" ]]
1259 }
1260
1261 # @FUNCTION: epunt_cxx
1262 # @USAGE: [dir to scan]
1263 # @DESCRIPTION:
1264 # Many configure scripts wrongly bail when a C++ compiler could not be
1265 # detected. If dir is not specified, then it defaults to ${S}.
1266 #
1267 # http://bugs.gentoo.org/73450
1268 epunt_cxx() {
1269 local dir=$1
1270 [[ -z ${dir} ]] && dir=${S}
1271 ebegin "Removing useless C++ checks"
1272 local f
1273 find "${dir}" -name configure | while read f ; do
1274 patch --no-backup-if-mismatch -p0 "${f}" "${PORTDIR}/eclass/ELT-patches/nocxx/nocxx.patch" > /dev/null
1275 done
1276 eend 0
1277 }
1278
1279 # @FUNCTION: make_wrapper
1280 # @USAGE: <wrapper> <target> [chdir] [libpaths] [installpath]
1281 # @DESCRIPTION:
1282 # Create a shell wrapper script named wrapper in installpath
1283 # (defaults to the bindir) to execute target (default of wrapper) by
1284 # first optionally setting LD_LIBRARY_PATH to the colon-delimited
1285 # libpaths followed by optionally changing directory to chdir.
1286 make_wrapper() {
1287 local wrapper=$1 bin=$2 chdir=$3 libdir=$4 path=$5
1288 local tmpwrapper=$(emktemp)
1289 # We don't want to quote ${bin} so that people can pass complex
1290 # things as $bin ... "./someprog --args"
1291 cat << EOF > "${tmpwrapper}"
1292 #!/bin/sh
1293 cd "${chdir:-.}"
1294 if [ -n "${libdir}" ] ; then
1295 if [ "\${LD_LIBRARY_PATH+set}" = "set" ] ; then
1296 export LD_LIBRARY_PATH="\${LD_LIBRARY_PATH}:${libdir}"
1297 else
1298 export LD_LIBRARY_PATH="${libdir}"
1299 fi
1300 fi
1301 exec ${bin} "\$@"
1302 EOF
1303 chmod go+rx "${tmpwrapper}"
1304 if [[ -n ${path} ]] ; then
1305 (
1306 exeinto "${path}"
1307 newexe "${tmpwrapper}" "${wrapper}"
1308 ) || die
1309 else
1310 newbin "${tmpwrapper}" "${wrapper}" || die
1311 fi
1312 }
1313
1314 # @FUNCTION: path_exists
1315 # @USAGE: [-a|-o] <paths>
1316 # @DESCRIPTION:
1317 # Check if the specified paths exist. Works for all types of paths
1318 # (files/dirs/etc...). The -a and -o flags control the requirements
1319 # of the paths. They correspond to "and" and "or" logic. So the -a
1320 # flag means all the paths must exist while the -o flag means at least
1321 # one of the paths must exist. The default behavior is "and". If no
1322 # paths are specified, then the return value is "false".
1323 path_exists() {
1324 local opt=$1
1325 [[ ${opt} == -[ao] ]] && shift || opt="-a"
1326
1327 # no paths -> return false
1328 # same behavior as: [[ -e "" ]]
1329 [[ $# -eq 0 ]] && return 1
1330
1331 local p r=0
1332 for p in "$@" ; do
1333 [[ -e ${p} ]]
1334 : $(( r += $? ))
1335 done
1336
1337 case ${opt} in
1338 -a) return $(( r != 0 )) ;;
1339 -o) return $(( r == $# )) ;;
1340 esac
1341 }
1342
1343 # @FUNCTION: in_iuse
1344 # @USAGE: <flag>
1345 # @DESCRIPTION:
1346 # Determines whether the given flag is in IUSE. Strips IUSE default prefixes
1347 # as necessary.
1348 #
1349 # Note that this function should not be used in the global scope.
1350 in_iuse() {
1351 debug-print-function ${FUNCNAME} "${@}"
1352 [[ ${#} -eq 1 ]] || die "Invalid args to ${FUNCNAME}()"
1353
1354 local flag=${1}
1355 local liuse=( ${IUSE} )
1356
1357 has "${flag}" "${liuse[@]#[+-]}"
1358 }
1359
1360 # @FUNCTION: use_if_iuse
1361 # @USAGE: <flag>
1362 # @DESCRIPTION:
1363 # Return true if the given flag is in USE and IUSE.
1364 #
1365 # Note that this function should not be used in the global scope.
1366 use_if_iuse() {
1367 in_iuse $1 || return 1
1368 use $1
1369 }
1370
1371 # @FUNCTION: usex
1372 # @USAGE: <USE flag> [true output] [false output] [true suffix] [false suffix]
1373 # @DESCRIPTION:
1374 # Proxy to declare usex for package managers or EAPIs that do not provide it
1375 # and use the package manager implementation when available (i.e. EAPI >= 5).
1376 # If USE flag is set, echo [true output][true suffix] (defaults to "yes"),
1377 # otherwise echo [false output][false suffix] (defaults to "no").
1378 if has "${EAPI:-0}" 0 1 2 3 4; then
1379 usex() { use "$1" && echo "${2-yes}$4" || echo "${3-no}$5" ; } #382963
1380 fi
1381
1382 # @FUNCTION: prune_libtool_files
1383 # @USAGE: [--all]
1384 # @DESCRIPTION:
1385 # Locate unnecessary libtool files (.la) and libtool static archives
1386 # (.a) and remove them from installation image.
1387 #
1388 # By default, .la files are removed whenever the static linkage can
1389 # either be performed using pkg-config or doesn't introduce additional
1390 # flags.
1391 #
1392 # If '--all' argument is passed, all .la files are removed. This is
1393 # usually useful when the package installs plugins and does not use .la
1394 # files for loading them.
1395 #
1396 # The .a files are only removed whenever corresponding .la files state
1397 # that they should not be linked to, i.e. whenever these files
1398 # correspond to plugins.
1399 #
1400 # Note: if your package installs both static libraries and .pc files,
1401 # you need to add pkg-config to your DEPEND.
1402 prune_libtool_files() {
1403 debug-print-function ${FUNCNAME} "$@"
1404
1405 local removing_all opt
1406 for opt; do
1407 case "${opt}" in
1408 --all)
1409 removing_all=1
1410 ;;
1411 *)
1412 die "Invalid argument to ${FUNCNAME}(): ${opt}"
1413 esac
1414 done
1415
1416 local f
1417 local queue=()
1418 while IFS= read -r -d '' f; do # for all .la files
1419 local archivefile=${f/%.la/.a}
1420
1421 [[ ${f} != ${archivefile} ]] || die 'regex sanity check failed'
1422
1423 # Remove static libs we're not supposed to link against.
1424 if grep -q '^shouldnotlink=yes$' "${f}"; then
1425 if [[ -f ${archivefile} ]]; then
1426 einfo "Removing unnecessary ${archivefile#${D%/}} (static plugin)"
1427 queue+=( "${archivefile}" )
1428 fi
1429
1430 # The .la file may be used by a module loader, so avoid removing it
1431 # unless explicitly requested.
1432 [[ ${removing_all} ]] || continue
1433 fi
1434
1435 # Remove .la files when:
1436 # - user explicitly wants us to remove all .la files,
1437 # - respective static archive doesn't exist,
1438 # - they are covered by a .pc file already,
1439 # - they don't provide any new information (no libs & no flags).
1440 local reason pkgconfig_scanned
1441 if [[ ${removing_all} ]]; then
1442 reason='requested'
1443 elif [[ ! -f ${archivefile} ]]; then
1444 reason='no static archive'
1445 elif [[ ! $(sed -nre \
1446 "s/^(dependency_libs|inherited_linker_flags)='(.*)'$/\2/p" \
1447 "${f}") ]]; then
1448 reason='no libs & flags'
1449 else
1450 if [[ ! ${pkgconfig_scanned} ]]; then
1451 # Create a list of all .pc-covered libs.
1452 local pc_libs=()
1453 if [[ ! ${removing_all} ]]; then
1454 local f
1455 local tf=${T}/prune-lt-files.pc
1456 local pkgconf=$(tc-getPKG_CONFIG)
1457
1458 while IFS= read -r -d '' f; do # for all .pc files
1459 local arg
1460
1461 sed -e '/^Requires:/d' "${f}" > "${tf}"
1462 for arg in $("${pkgconf}" --libs "${tf}"); do
1463 [[ ${arg} == -l* ]] && pc_libs+=( lib${arg#-l}.la )
1464 done
1465 done < <(find "${D}" -type f -name '*.pc' -print0)
1466
1467 rm -f "${tf}"
1468 fi
1469
1470 pkgconfig_scanned=1
1471 fi
1472
1473 has "${f##*/}" "${pc_libs[@]}" && reason='covered by .pc'
1474 fi
1475
1476 if [[ ${reason} ]]; then
1477 einfo "Removing unnecessary ${f#${D%/}} (${reason})"
1478 queue+=( "${f}" )
1479 fi
1480 done < <(find "${D}" -xtype f -name '*.la' -print0)
1481
1482 if [[ ${queue[@]} ]]; then
1483 rm -f "${queue[@]}"
1484 fi
1485 }
1486
1487 check_license() { die "you no longer need this as portage supports ACCEPT_LICENSE itself"; }
1488
1489 fi

  ViewVC Help
Powered by ViewVC 1.1.20