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

Contents of /eclass/eutils.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.404 - (hide annotations) (download)
Thu Sep 27 17:12:34 2012 UTC (18 months, 2 weeks ago) by axs
Branch: MAIN
Changes since 1.403: +6 -2 lines
Made 'usex' declaration conditional on lack of PM or EAPI5+ support

1 ulm 1.378 # Copyright 1999-2012 Gentoo Foundation
2 azarah 1.1 # Distributed under the terms of the GNU General Public License v2
3 axs 1.404 # $Header: /var/cvsroot/gentoo-x86/eclass/eutils.eclass,v 1.403 2012/09/15 16:16:53 zmedico Exp $
4 vapier 1.283
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 swegener 1.286 #
15 vapier 1.283 # Due to the nature of this eclass, some functions may have maintainers
16     # different from the overall eclass!
17 azarah 1.1
18 vapier 1.371 if [[ ${___ECLASS_ONCE_EUTILS} != "recur -_+^+_- spank" ]] ; then
19     ___ECLASS_ONCE_EUTILS="recur -_+^+_- spank"
20    
21 mgorny 1.395 inherit multilib toolchain-funcs user
22 azarah 1.1
23 betelgeuse 1.329 if has "${EAPI:-0}" 0 1 2; then
24    
25 vapier 1.283 # @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 betelgeuse 1.329 # don't wait at all. Defined in EAPIs 0 1 and 2.
32 ciaranm 1.98 epause() {
33 vapier 1.245 [[ -z ${EPAUSE_IGNORE} ]] && sleep ${1:-5}
34 ciaranm 1.98 }
35    
36 vapier 1.283 # @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 betelgeuse 1.329 # don't beep at all. Defined in EAPIs 0 1 and 2.
43 ciaranm 1.98 ebeep() {
44     local n
45 vapier 1.245 if [[ -z ${EBEEP_IGNORE} ]] ; then
46 ciaranm 1.98 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 reavertm 1.331 else
56    
57 reavertm 1.332 ebeep() {
58 reavertm 1.337 ewarn "QA Notice: ebeep is not defined in EAPI=${EAPI}, please file a bug at http://bugs.gentoo.org"
59 reavertm 1.332 }
60 reavertm 1.331
61 reavertm 1.332 epause() {
62 reavertm 1.337 ewarn "QA Notice: epause is not defined in EAPI=${EAPI}, please file a bug at http://bugs.gentoo.org"
63 reavertm 1.332 }
64 reavertm 1.331
65 betelgeuse 1.329 fi
66    
67 betelgeuse 1.348 # @FUNCTION: eqawarn
68     # @USAGE: [message]
69     # @DESCRIPTION:
70 mgorny 1.363 # 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 betelgeuse 1.348 if ! declare -F eqawarn >/dev/null ; then
74     eqawarn() {
75 mgorny 1.363 has qa ${PORTAGE_ELOG_CLASSES} && ewarn "$@"
76 ferringb 1.370 :
77 betelgeuse 1.348 }
78     fi
79    
80 hollow 1.298 # @FUNCTION: ecvs_clean
81 vapier 1.299 # @USAGE: [list of dirs]
82 hollow 1.298 # @DESCRIPTION:
83 vapier 1.299 # Remove CVS directories recursiveley. Useful when a source tarball contains
84     # internal CVS directories. Defaults to $PWD.
85 hollow 1.298 ecvs_clean() {
86 vapier 1.299 [[ -z $* ]] && set -- .
87 hollow 1.298 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 vapier 1.299 # @USAGE: [list of dirs]
93 hollow 1.298 # @DESCRIPTION:
94 vapier 1.299 # Remove .svn directories recursiveley. Useful when a source tarball contains
95     # internal Subversion directories. Defaults to $PWD.
96 hollow 1.298 esvn_clean() {
97 vapier 1.299 [[ -z $* ]] && set -- .
98 hollow 1.298 find "$@" -type d -name '.svn' -prune -print0 | xargs -0 rm -rf
99     }
100    
101 vapier 1.373 # @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 vapier 1.376 eval local __estack_i=\${#${__estack_name}\[@\]}
139 vapier 1.373 # 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 vapier 1.376 eval ${__estack_retvar}=\"\${${__estack_name}\[${__estack_i}\]}\"
145 vapier 1.373 fi
146 vapier 1.376 eval unset ${__estack_name}\[${__estack_i}\]
147 vapier 1.373 }
148    
149 vapier 1.322 # @FUNCTION: eshopts_push
150 vapier 1.330 # @USAGE: [options to `set` or `shopt`]
151 vapier 1.322 # @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 vapier 1.330 # 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 vapier 1.322 # 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 vapier 1.376 # eshopts_push -s noglob
164 vapier 1.322 # 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 vapier 1.330 if [[ $1 == -[su] ]] ; then
174 vapier 1.376 estack_push eshopts "$(shopt -p)"
175 vapier 1.330 [[ $# -eq 0 ]] && return 0
176 vapier 1.375 shopt "$@" || die "${FUNCNAME}: bad options to shopt: $*"
177 vapier 1.330 else
178 vapier 1.376 estack_push eshopts $-
179 vapier 1.330 [[ $# -eq 0 ]] && return 0
180 vapier 1.375 set "$@" || die "${FUNCNAME}: bad options to set: $*"
181 vapier 1.330 fi
182 vapier 1.322 }
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 vapier 1.376 local s
191     estack_pop eshopts s || die "${FUNCNAME}: unbalanced push"
192 vapier 1.330 if [[ ${s} == "shopt -"* ]] ; then
193 vapier 1.375 eval "${s}" || die "${FUNCNAME}: sanity: invalid shopt options: ${s}"
194 vapier 1.330 else
195 vapier 1.375 set +$- || die "${FUNCNAME}: sanity: invalid shell settings: $-"
196     set -${s} || die "${FUNCNAME}: sanity: unable to restore saved shell settings: ${s}"
197 vapier 1.330 fi
198 vapier 1.322 }
199    
200 vapier 1.373 # @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 vapier 1.382 [[ $# -eq 0 ]] || die "${FUNCNAME}: we take no options"
216 vapier 1.373 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 vapier 1.325 # @VARIABLE: EPATCH_SOURCE
222     # @DESCRIPTION:
223     # Default directory to search for patches.
224 azarah 1.2 EPATCH_SOURCE="${WORKDIR}/patch"
225 vapier 1.325 # @VARIABLE: EPATCH_SUFFIX
226     # @DESCRIPTION:
227     # Default extension for patches (do not prefix the period yourself).
228 azarah 1.2 EPATCH_SUFFIX="patch.bz2"
229 vapier 1.325 # @VARIABLE: EPATCH_OPTS
230     # @DESCRIPTION:
231 vapier 1.391 # 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 vapier 1.325 # @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 vapier 1.391 EPATCH_COMMON_OPTS="-g0 -E --no-backup-if-mismatch"
246 vapier 1.325 # @VARIABLE: EPATCH_EXCLUDE
247     # @DESCRIPTION:
248 mr_bones_ 1.308 # List of patches not to apply. Note this is only file names,
249 vapier 1.325 # and not the full path. Globs accepted.
250 azarah 1.6 EPATCH_EXCLUDE=""
251 vapier 1.325 # @VARIABLE: EPATCH_SINGLE_MSG
252     # @DESCRIPTION:
253 azarah 1.9 # Change the printed message for a single patch.
254     EPATCH_SINGLE_MSG=""
255 vapier 1.325 # @VARIABLE: EPATCH_MULTI_MSG
256     # @DESCRIPTION:
257 vapier 1.173 # Change the printed message for multiple patches.
258     EPATCH_MULTI_MSG="Applying various patches (bugfixes/updates) ..."
259 vapier 1.325 # @VARIABLE: EPATCH_FORCE
260     # @DESCRIPTION:
261     # Only require patches to match EPATCH_SUFFIX rather than the extended
262     # arch naming style.
263 azarah 1.29 EPATCH_FORCE="no"
264 azarah 1.2
265 vapier 1.325 # @FUNCTION: epatch
266 vapier 1.391 # @USAGE: [options] [patches] [dirs of patches]
267 vapier 1.325 # @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 azarah 1.2 #
274 vapier 1.391 # 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 azarah 1.2 #
281 vapier 1.325 # When processing directories, epatch will apply all patches that match:
282     # @CODE
283 vapier 1.350 # if ${EPATCH_FORCE} != "yes"
284 vapier 1.325 # ??_${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 azarah 1.2 #
294 vapier 1.325 # If EPATCH_SUFFIX is empty, then no period before it is implied when searching
295     # for patches to apply.
296 azarah 1.2 #
297 vapier 1.325 # Refer to the other EPATCH_xxx variables for more customization of behavior.
298 azarah 1.2 epatch() {
299 swegener 1.231 _epatch_draw_line() {
300 vapier 1.325 # create a line of same length as input string
301 agriffis 1.229 [[ -z $1 ]] && set "$(printf "%65s" '')"
302     echo "${1//?/=}"
303 vapier 1.219 }
304 azarah 1.3
305 vapier 1.195 unset P4CONFIG P4PORT P4USER # keep perforce at bay #56402
306    
307 vapier 1.391 # 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 vapier 1.325 # 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 vapier 1.94 for m in "$@" ; do
325     epatch "${m}"
326     done
327     return 0
328 azarah 1.3 fi
329    
330 vapier 1.325 local SINGLE_PATCH="no"
331     # no args means process ${EPATCH_SOURCE}
332     [[ $# -eq 0 ]] && set -- "${EPATCH_SOURCE}"
333    
334     if [[ -f $1 ]] ; then
335 azarah 1.3 SINGLE_PATCH="yes"
336 vapier 1.325 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 danarmak 1.32
345 vapier 1.359 elif [[ -f ${EPATCH_SOURCE}/$1 ]] ; then
346     # Re-use EPATCH_SOURCE as a search dir
347     epatch "${EPATCH_SOURCE}/$1"
348     return $?
349    
350 azarah 1.3 else
351 vapier 1.325 # 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 azarah 1.3 fi
361 azarah 1.2
362 vapier 1.391 # 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 vapier 1.325 local PIPE_CMD
367 azarah 1.2 case ${EPATCH_SUFFIX##*\.} in
368 vapier 1.325 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 azarah 1.2 esac
375    
376 vapier 1.325 [[ ${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 flameeyes 1.266 # ???_arch_foo.patch
389 vapier 1.325 # Else, skip this input altogether
390     local a=${patchname#*_} # strip the ???_
391     a=${a%%_*} # strip the _foo.patch
392     if ! [[ ${SINGLE_PATCH} == "yes" || \
393 ulm 1.354 ${EPATCH_FORCE} == "yes" || \
394     ${a} == all || \
395     ${a} == ${ARCH} ]]
396 azarah 1.2 then
397 vapier 1.325 continue
398     fi
399 azarah 1.6
400 vapier 1.325 # 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 scarabeus 1.328 local ex
406 vapier 1.325 for ex in ${EPATCH_EXCLUDE} ; do
407 scarabeus 1.328 if [[ ${patchname} == ${ex} ]] ; then
408     eshopts_pop
409     continue 2
410     fi
411 vapier 1.325 done
412 vapier 1.326
413 vapier 1.325 eshopts_pop
414     fi
415 danarmak 1.32
416 vapier 1.325 if [[ ${SINGLE_PATCH} == "yes" ]] ; then
417     if [[ -n ${EPATCH_SINGLE_MSG} ]] ; then
418     einfo "${EPATCH_SINGLE_MSG}"
419 azarah 1.3 else
420 vapier 1.325 einfo "Applying ${patchname} ..."
421 azarah 1.3 fi
422 vapier 1.325 else
423     einfo " ${patchname} ..."
424     fi
425 azarah 1.2
426 vapier 1.325 # 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 azarah 1.2
433 vapier 1.369 printf "***** %s *****\nPWD: %s\n\n" "${patchname}" "${PWD}" > "${STDERR_TARGET}"
434 vapier 1.304
435 vapier 1.325 # 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 vapier 1.304
442 vapier 1.325 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 vapier 1.305 fi
449 vapier 1.325 else
450     PATCH_TARGET=${x}
451     fi
452 vapier 1.305
453 vapier 1.325 # 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 vapier 1.353 # 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 vapier 1.325
470     # Dynamically detect the correct -p# ... i'm lazy, so shoot me :/
471 vapier 1.383 local patch_cmd
472 vapier 1.325 while [[ ${count} -lt 5 ]] ; do
473 naota 1.386 patch_cmd="${BASH_ALIASES[patch]:-patch} -p${count} ${EPATCH_OPTS}"
474 vapier 1.383
475 vapier 1.325 # Generate some useful debug info ...
476     (
477     _epatch_draw_line "***** ${patchname} *****"
478     echo
479 vapier 1.383 echo "PATCH COMMAND: ${patch_cmd} < '${PATCH_TARGET}'"
480 vapier 1.325 echo
481     _epatch_draw_line "***** ${patchname} *****"
482 vapier 1.383 ${patch_cmd} --dry-run -f < "${PATCH_TARGET}" 2>&1
483 vapier 1.360 ret=$?
484     echo
485     echo "patch program exited with status ${ret}"
486     exit ${ret}
487 vapier 1.325 ) >> "${STDERR_TARGET}"
488 azarah 1.8
489 vapier 1.360 if [ $? -eq 0 ] ; then
490 vapier 1.325 (
491     _epatch_draw_line "***** ${patchname} *****"
492     echo
493     echo "ACTUALLY APPLYING ${patchname} ..."
494     echo
495     _epatch_draw_line "***** ${patchname} *****"
496 vapier 1.383 ${patch_cmd} < "${PATCH_TARGET}" 2>&1
497 vapier 1.360 ret=$?
498     echo
499     echo "patch program exited with status ${ret}"
500     exit ${ret}
501 vapier 1.325 ) >> "${STDERR_TARGET}"
502 danarmak 1.32
503 vapier 1.325 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 azarah 1.2 fi
510 vapier 1.325 break
511 azarah 1.8 fi
512    
513 vapier 1.325 : $(( count++ ))
514     done
515 azarah 1.8
516 vapier 1.325 # 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 azarah 1.3
521 vapier 1.325 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 azarah 1.2 fi
532 vapier 1.325
533 vapier 1.383 # if everything worked, delete the full debug patch log
534 vapier 1.325 rm -f "${STDERR_TARGET}"
535 vapier 1.383
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 vapier 1.325 eend 0
544 azarah 1.2 done
545 vapier 1.325
546     [[ ${SINGLE_PATCH} == "no" ]] && einfo "Done with patching"
547     : # everything worked
548 azarah 1.26 }
549 vapier 1.361
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>/, where the first
555     # of these three directories to exist will be the one to use, ignoring
556 vapier 1.387 # any more general directories which might exist as well. They must end
557     # in ".patch" to be applied.
558 vapier 1.361 #
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 vapier 1.318 epatch_user() {
578     [[ $# -ne 0 ]] && die "epatch_user takes no options"
579    
580 vapier 1.361 # Allow multiple calls to this function; ignore all but the first
581 vapier 1.383 local applied="${T}/epatch_user.log"
582 vapier 1.361 [[ -e ${applied} ]] && return 2
583    
584 vapier 1.318 # don't clobber any EPATCH vars that the parent might want
585 zmedico 1.323 local EPATCH_SOURCE check base=${PORTAGE_CONFIGROOT%/}/etc/portage/patches
586 ulm 1.378 for check in ${CATEGORY}/{${P}-${PR},${P},${PN}}; do
587 vapier 1.318 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 vapier 1.361 echo "${EPATCH_SOURCE}" > "${applied}"
597 vapier 1.349 return 0
598 vapier 1.318 fi
599     done
600 vapier 1.361 echo "none" > "${applied}"
601 vapier 1.349 return 1
602 vapier 1.318 }
603 azarah 1.26
604 vapier 1.283 # @FUNCTION: emktemp
605     # @USAGE: [temp dir]
606     # @DESCRIPTION:
607 vapier 1.52 # Cheap replacement for when debianutils (and thus mktemp)
608 vapier 1.283 # does not exist on the users system.
609 vapier 1.117 emktemp() {
610 vapier 1.119 local exe="touch"
611 vapier 1.194 [[ $1 == -d ]] && exe="mkdir" && shift
612     local topdir=$1
613 mr_bones_ 1.100
614 vapier 1.194 if [[ -z ${topdir} ]] ; then
615     [[ -z ${T} ]] \
616 vapier 1.117 && topdir="/tmp" \
617 vapier 1.194 || topdir=${T}
618 vapier 1.117 fi
619    
620 vapier 1.280 if ! type -P mktemp > /dev/null ; then
621     # system lacks `mktemp` so we have to fake it
622 vapier 1.117 local tmp=/
623 vapier 1.194 while [[ -e ${tmp} ]] ; do
624     tmp=${topdir}/tmp.${RANDOM}.${RANDOM}.${RANDOM}
625 vapier 1.117 done
626 vapier 1.194 ${exe} "${tmp}" || ${exe} -p "${tmp}"
627 vapier 1.117 echo "${tmp}"
628 vapier 1.52 else
629 vapier 1.280 # the args here will give slightly wierd names on BSD,
630     # but should produce a usable file on all userlands
631 flameeyes 1.223 if [[ ${exe} == "touch" ]] ; then
632 vapier 1.280 TMPDIR="${topdir}" mktemp -t tmp.XXXXXXXXXX
633 flameeyes 1.223 else
634 vapier 1.280 TMPDIR="${topdir}" mktemp -dt tmp.XXXXXXXXXX
635 flameeyes 1.223 fi
636 vapier 1.52 fi
637     }
638    
639 vapier 1.283 # @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 vapier 1.24 edos2unix() {
647 vapier 1.366 [[ $# -eq 0 ]] && return 0
648     sed -i 's/\r$//' -- "$@" || die
649 vapier 1.39 }
650    
651 jlec 1.377 # @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 vapier 1.401 # icon: the icon to use in the menu entry
660 jlec 1.377 # 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 vapier 1.341 # fields: extra fields to append to the desktop file; a printf string
667 jlec 1.377 # @CODE
668 vapier 1.39 make_desktop_entry() {
669 vapier 1.341 [[ -z $1 ]] && die "make_desktop_entry: You must specify the executable"
670 vapier 1.39
671 vapier 1.158 local exec=${1}
672     local name=${2:-${PN}}
673 wolf31o2 1.293 local icon=${3:-${PN}}
674 vapier 1.158 local type=${4}
675 vapier 1.341 local fields=${5}
676 vapier 1.158
677     if [[ -z ${type} ]] ; then
678     local catmaj=${CATEGORY%%-*}
679     local catmin=${CATEGORY##*-}
680     case ${catmaj} in
681     app)
682     case ${catmin} in
683 pacho 1.384 accessibility) type="Utility;Accessibility";;
684 vapier 1.338 admin) type=System;;
685     antivirus) type=System;;
686 pacho 1.384 arch) type="Utility;Archiving";;
687     backup) type="Utility;Archiving";;
688     cdr) type="AudioVideo;DiscBurning";;
689     dicts) type="Office;Dictionary";;
690 vapier 1.338 doc) type=Documentation;;
691 pacho 1.384 editors) type="Utility;TextEditor";;
692     emacs) type="Development;TextEditor";;
693     emulation) type="System;Emulator";;
694     laptop) type="Settings;HardwareSettings";;
695 vapier 1.338 office) type=Office;;
696 pacho 1.384 pda) type="Office;PDA";;
697     vim) type="Development;TextEditor";;
698     xemacs) type="Development;TextEditor";;
699 vapier 1.158 esac
700 azarah 1.59 ;;
701 vapier 1.158
702     dev)
703 vapier 1.159 type="Development"
704 vapier 1.158 ;;
705    
706     games)
707     case ${catmin} in
708 wolf31o2 1.265 action|fps) type=ActionGame;;
709 vapier 1.338 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 vapier 1.158 simulation) type=Simulation;;
717 vapier 1.338 sports) type=SportsGame;;
718     strategy) type=StrategyGame;;
719 vapier 1.158 esac
720 vapier 1.159 type="Game;${type}"
721 vapier 1.158 ;;
722    
723 vapier 1.284 gnome)
724     type="Gnome;GTK"
725     ;;
726    
727     kde)
728     type="KDE;Qt"
729     ;;
730    
731 vapier 1.158 mail)
732 vapier 1.159 type="Network;Email"
733 vapier 1.158 ;;
734    
735     media)
736     case ${catmin} in
737 vapier 1.339 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 vapier 1.158 esac
750 wolf31o2 1.65 ;;
751 vapier 1.158
752     net)
753     case ${catmin} in
754     dialup) type=Dialup;;
755 vapier 1.338 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 vapier 1.158 esac
764 vapier 1.159 type="Network;${type}"
765 vapier 1.158 ;;
766    
767     sci)
768     case ${catmin} in
769 vapier 1.284 astro*) type=Astronomy;;
770 vapier 1.338 bio*) type=Biology;;
771     calc*) type=Calculator;;
772     chem*) type=Chemistry;;
773 vapier 1.284 elec*) type=Electronics;;
774 vapier 1.338 geo*) type=Geology;;
775     math*) type=Math;;
776 vapier 1.284 physics) type=Physics;;
777     visual*) type=DataVisualization;;
778 vapier 1.159 esac
779 abcd 1.336 type="Education;Science;${type}"
780 vapier 1.158 ;;
781    
782 vapier 1.284 sys)
783     type="System"
784     ;;
785    
786 vapier 1.158 www)
787     case ${catmin} in
788     client) type=WebBrowser;;
789     esac
790 abcd 1.336 type="Network;${type}"
791 azarah 1.59 ;;
792 vapier 1.158
793 azarah 1.59 *)
794     type=
795     ;;
796 vapier 1.39 esac
797     fi
798 carlo 1.177 if [ "${SLOT}" == "0" ] ; then
799     local desktop_name="${PN}"
800     else
801     local desktop_name="${PN}-${SLOT}"
802     fi
803 vapier 1.272 local desktop="${T}/$(echo ${exec} | sed 's:[[:space:]/:]:_:g')-${desktop_name}.desktop"
804 vapier 1.271 #local desktop=${T}/${exec%% *:-${desktop_name}}.desktop
805 vapier 1.39
806 abcd 1.336 # 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 vapier 1.271 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 abcd 1.336 Categories=${type}
826 vapier 1.271 EOF
827 vapier 1.39
828 vapier 1.341 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 vapier 1.342 [[ -n ${fields} ]] && printf '%b\n' "${fields}" >> "${desktop}"
834 wolf31o2 1.293
835 vapier 1.204 (
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 vapier 1.340 ) || die "installing desktop file failed"
841 danarmak 1.32 }
842    
843 vapier 1.283 # @FUNCTION: validate_desktop_entries
844     # @USAGE: [directories]
845     # @MAINTAINER:
846     # Carsten Lohrke <carlo@gentoo.org>
847     # @DESCRIPTION:
848 carlo 1.278 # Validate desktop entries using desktop-file-utils
849 carlo 1.277 validate_desktop_entries() {
850     if [[ -x /usr/bin/desktop-file-validate ]] ; then
851     einfo "Checking desktop entry validity"
852     local directories=""
853 carlo 1.279 for d in /usr/share/applications $@ ; do
854     [[ -d ${D}${d} ]] && directories="${directories} ${D}${d}"
855 carlo 1.277 done
856 carlo 1.279 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 carlo 1.277 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 vapier 1.283 # @FUNCTION: make_session_desktop
872 vapier 1.314 # @USAGE: <title> <command> [command args...]
873 vapier 1.283 # @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 vapier 1.314 #
877     # You can set the name of the file via the ${wm} variable.
878 lanius 1.133 make_session_desktop() {
879 vapier 1.314 [[ -z $1 ]] && eerror "$0: You must specify the title" && return 1
880     [[ -z $2 ]] && eerror "$0: You must specify the command" && return 1
881 lanius 1.133
882 vapier 1.167 local title=$1
883     local command=$2
884 vapier 1.314 local desktop=${T}/${wm:-${PN}}.desktop
885     shift 2
886 lanius 1.133
887 vapier 1.271 cat <<-EOF > "${desktop}"
888     [Desktop Entry]
889     Name=${title}
890     Comment=This session logs you into ${title}
891 vapier 1.314 Exec=${command} $*
892 vapier 1.271 TryExec=${command}
893 vapier 1.314 Type=XSession
894 vapier 1.271 EOF
895 lanius 1.133
896 vapier 1.271 (
897     # wrap the env here so that the 'insinto' call
898     # doesn't corrupt the env of the caller
899 lanius 1.133 insinto /usr/share/xsessions
900     doins "${desktop}"
901 vapier 1.271 )
902 lanius 1.133 }
903    
904 vapier 1.283 # @FUNCTION: domenu
905     # @USAGE: <menus>
906     # @DESCRIPTION:
907     # Install the list of .desktop menu files into the appropriate directory
908     # (/usr/share/applications).
909 lanius 1.133 domenu() {
910 vapier 1.271 (
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 lanius 1.133 insinto /usr/share/applications
915 vapier 1.167 for i in "$@" ; do
916     if [[ -f ${i} ]] ; then
917     doins "${i}"
918 vapier 1.271 ((ret+=$?))
919 vapier 1.167 elif [[ -d ${i} ]] ; then
920     for j in "${i}"/*.desktop ; do
921     doins "${j}"
922 vapier 1.271 ((ret+=$?))
923 lanius 1.133 done
924 vapier 1.285 else
925     ((++ret))
926 swegener 1.190 fi
927 lanius 1.133 done
928 vapier 1.271 exit ${ret}
929     )
930 lanius 1.133 }
931 vapier 1.283
932     # @FUNCTION: newmenu
933     # @USAGE: <menu> <newname>
934     # @DESCRIPTION:
935     # Like all other new* functions, install the specified menu as newname.
936 vapier 1.167 newmenu() {
937 vapier 1.271 (
938     # wrap the env here so that the 'insinto' call
939     # doesn't corrupt the env of the caller
940 vapier 1.167 insinto /usr/share/applications
941 vapier 1.271 newins "$@"
942     )
943 vapier 1.167 }
944 lanius 1.133
945 hasufell 1.394 # @FUNCTION: _iconins
946     # @INTERNAL
947 vapier 1.283 # @DESCRIPTION:
948 hasufell 1.394 # function for use in doicon and newicon
949     _iconins() {
950 vapier 1.271 (
951     # wrap the env here so that the 'insinto' call
952     # doesn't corrupt the env of the caller
953 hasufell 1.394 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 lanius 1.133 done
1006 hasufell 1.394 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 hasufell 1.398 # example 1: doicon foobar.png fuqbar.svg suckbar.png
1034 hasufell 1.394 # results in: insinto /usr/share/pixmaps
1035 hasufell 1.398 # doins foobar.png fuqbar.svg suckbar.png
1036 hasufell 1.394 #
1037 ssuominen 1.399 # example 2: doicon -s 48 foobar.png fuqbar.png blobbar.png
1038 hasufell 1.394 # results in: insinto /usr/share/icons/hicolor/48x48/apps
1039 ssuominen 1.399 # doins foobar.png fuqbar.png blobbar.png
1040 hasufell 1.394 # @CODE
1041     doicon() {
1042     _iconins ${FUNCNAME} "$@"
1043 lanius 1.133 }
1044 vapier 1.283
1045     # @FUNCTION: newicon
1046 hasufell 1.394 # @USAGE: [options] <icon> <newname>
1047 vapier 1.283 # @DESCRIPTION:
1048 hasufell 1.394 # 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 vapier 1.167 newicon() {
1060 hasufell 1.394 _iconins ${FUNCNAME} "$@"
1061 vapier 1.167 }
1062 lanius 1.133
1063 vapier 1.287 # @FUNCTION: strip-linguas
1064     # @USAGE: [<allow LINGUAS>|<-i|-u> <directories of .po files>]
1065     # @DESCRIPTION:
1066 mr_bones_ 1.100 # Make sure that LINGUAS only contains languages that
1067 vapier 1.287 # 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 vapier 1.92 strip-linguas() {
1074 vapier 1.242 local ls newls nols
1075 vapier 1.154 if [[ $1 == "-i" ]] || [[ $1 == "-u" ]] ; then
1076     local op=$1; shift
1077 vapier 1.315 ls=$(find "$1" -name '*.po' -exec basename {} .po ';'); shift
1078 vapier 1.92 local d f
1079     for d in "$@" ; do
1080 vapier 1.154 if [[ ${op} == "-u" ]] ; then
1081     newls=${ls}
1082 vapier 1.92 else
1083     newls=""
1084     fi
1085 vapier 1.315 for f in $(find "$d" -name '*.po' -exec basename {} .po ';') ; do
1086 vapier 1.154 if [[ ${op} == "-i" ]] ; then
1087 ssuominen 1.358 has ${f} ${ls} && newls="${newls} ${f}"
1088 vapier 1.92 else
1089 ssuominen 1.358 has ${f} ${ls} || newls="${newls} ${f}"
1090 vapier 1.92 fi
1091     done
1092 vapier 1.154 ls=${newls}
1093 vapier 1.92 done
1094     else
1095 vapier 1.236 ls="$@"
1096 vapier 1.92 fi
1097    
1098 vapier 1.242 nols=""
1099 vapier 1.92 newls=""
1100     for f in ${LINGUAS} ; do
1101 ssuominen 1.358 if has ${f} ${ls} ; then
1102 vapier 1.120 newls="${newls} ${f}"
1103 vapier 1.92 else
1104 vapier 1.242 nols="${nols} ${f}"
1105 vapier 1.92 fi
1106     done
1107 vapier 1.244 [[ -n ${nols} ]] \
1108 pacho 1.388 && einfo "Sorry, but ${PN} does not support the LINGUAS:" ${nols}
1109 vapier 1.237 export LINGUAS=${newls:1}
1110 vapier 1.92 }
1111 iggy 1.110
1112 vapier 1.283 # @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 eradicator 1.111 # 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 vapier 1.283 # solution, so instead you can call this from pkg_preinst. See also the
1120     # preserve_old_lib_notify function.
1121 eradicator 1.111 preserve_old_lib() {
1122 vapier 1.268 if [[ ${EBUILD_PHASE} != "preinst" ]] ; then
1123 vapier 1.267 eerror "preserve_old_lib() must be called from pkg_preinst() only"
1124 vapier 1.276 die "Invalid preserve_old_lib() usage"
1125 vapier 1.267 fi
1126     [[ -z $1 ]] && die "Usage: preserve_old_lib <library to preserve> [more libraries to preserve]"
1127    
1128 vapier 1.297 # let portage worry about it
1129     has preserve-libs ${FEATURES} && return 0
1130    
1131 vapier 1.267 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 eradicator 1.111 }
1140    
1141 vapier 1.283 # @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 eradicator 1.111 preserve_old_lib_notify() {
1146 vapier 1.268 if [[ ${EBUILD_PHASE} != "postinst" ]] ; then
1147 vapier 1.267 eerror "preserve_old_lib_notify() must be called from pkg_postinst() only"
1148 vapier 1.276 die "Invalid preserve_old_lib_notify() usage"
1149 vapier 1.267 fi
1150    
1151 vapier 1.297 # let portage worry about it
1152     has preserve-libs ${FEATURES} && return 0
1153    
1154 vapier 1.267 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 phajdan.jr 1.393 ewarn " # revdep-rebuild --library '${lib}' && rm '${lib}'"
1167 vapier 1.267 done
1168 eradicator 1.111 }
1169 vapier 1.125
1170 vapier 1.283 # @FUNCTION: built_with_use
1171     # @USAGE: [--hidden] [--missing <action>] [-a|-o] <DEPEND ATOM> <List of USE flags>
1172     # @DESCRIPTION:
1173 betelgeuse 1.329 #
1174     # Deprecated: Use EAPI 2 use deps in DEPEND|RDEPEND and with has_version calls.
1175     #
1176 vapier 1.283 # 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 opfer 1.302 # while the -o flag means at least one of the listed IUSE flags must be
1185 vapier 1.283 # 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 swegener 1.286 #
1189 vapier 1.283 # Remember that this function isn't terribly intelligent so order of optional
1190     # flags matter.
1191 vapier 1.125 built_with_use() {
1192 vapier 1.275 local hidden="no"
1193     if [[ $1 == "--hidden" ]] ; then
1194     hidden="yes"
1195     shift
1196     fi
1197    
1198 vapier 1.269 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 vapier 1.130 local opt=$1
1209     [[ ${opt:0:1} = "-" ]] && shift || opt="-a"
1210    
1211     local PKG=$(best_version $1)
1212 vapier 1.247 [[ -z ${PKG} ]] && die "Unable to resolve $1 to an installed package"
1213 vapier 1.130 shift
1214    
1215 vapier 1.213 local USEFILE=${ROOT}/var/db/pkg/${PKG}/USE
1216 vapier 1.249 local IUSEFILE=${ROOT}/var/db/pkg/${PKG}/IUSE
1217 vapier 1.213
1218 cardoe 1.273 # if the IUSE file doesn't exist, the read will error out, we need to handle
1219     # this gracefully
1220 vapier 1.275 if [[ ! -e ${USEFILE} ]] || [[ ! -e ${IUSEFILE} && ${hidden} == "no" ]] ; then
1221 cardoe 1.273 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 vapier 1.275 if [[ ${hidden} == "no" ]] ; then
1229 zmedico 1.301 local IUSE_BUILT=( $(<"${IUSEFILE}") )
1230 vapier 1.275 # 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 zmedico 1.301 if ! has $1 ${IUSE_BUILT[@]#[-+]} ; then
1240 vapier 1.275 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 vapier 1.269 fi
1247 vapier 1.250 fi
1248 vapier 1.249
1249 vapier 1.125 local USE_BUILT=$(<${USEFILE})
1250 vapier 1.130 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 vapier 1.125 shift
1257     done
1258 vapier 1.130 [[ ${opt} = "-a" ]]
1259 vapier 1.125 }
1260 vapier 1.126
1261 vapier 1.289 # @FUNCTION: epunt_cxx
1262 vapier 1.283 # @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 vapier 1.126 epunt_cxx() {
1269 vapier 1.127 local dir=$1
1270     [[ -z ${dir} ]] && dir=${S}
1271     ebegin "Removing useless C++ checks"
1272     local f
1273 vapier 1.294 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 vapier 1.127 done
1276     eend 0
1277 vapier 1.126 }
1278 ka0ttic 1.143
1279 vapier 1.283 # @FUNCTION: make_wrapper
1280 wolf31o2 1.295 # @USAGE: <wrapper> <target> [chdir] [libpaths] [installpath]
1281 vapier 1.283 # @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 wolf31o2 1.160 make_wrapper() {
1287 wolf31o2 1.164 local wrapper=$1 bin=$2 chdir=$3 libdir=$4 path=$5
1288 wolf31o2 1.160 local tmpwrapper=$(emktemp)
1289 vapier 1.202 # We don't want to quote ${bin} so that people can pass complex
1290     # things as $bin ... "./someprog --args"
1291 wolf31o2 1.160 cat << EOF > "${tmpwrapper}"
1292     #!/bin/sh
1293 vapier 1.201 cd "${chdir:-.}"
1294 vapier 1.210 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 vapier 1.201 fi
1301 vapier 1.202 exec ${bin} "\$@"
1302 wolf31o2 1.160 EOF
1303     chmod go+rx "${tmpwrapper}"
1304 vapier 1.201 if [[ -n ${path} ]] ; then
1305 vapier 1.283 (
1306 vapier 1.201 exeinto "${path}"
1307 wolf31o2 1.164 newexe "${tmpwrapper}" "${wrapper}"
1308 vapier 1.283 ) || die
1309 wolf31o2 1.164 else
1310 vapier 1.283 newbin "${tmpwrapper}" "${wrapper}" || die
1311 wolf31o2 1.164 fi
1312 wolf31o2 1.160 }
1313 mr_bones_ 1.311
1314 vapier 1.351 # @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 mgorny 1.364
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 vapier 1.365
1360 vapier 1.367 # @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 vapier 1.365 # @FUNCTION: usex
1372     # @USAGE: <USE flag> [true output] [false output] [true suffix] [false suffix]
1373     # @DESCRIPTION:
1374 axs 1.404 # 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 vapier 1.365 # If USE flag is set, echo [true output][true suffix] (defaults to "yes"),
1377     # otherwise echo [false output][false suffix] (defaults to "no").
1378 axs 1.404 if ! declare -F usex >/dev/null ; then
1379     usex() { use "$1" && echo "${2-yes}$4" || echo "${3-no}$5" ; } #382963
1380     fi
1381 vapier 1.371
1382 mgorny 1.395 # @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 mgorny 1.402 # Note: if your package installs both static libraries and .pc files,
1401     # you need to add pkg-config to your DEPEND.
1402 mgorny 1.395 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     while IFS= read -r -d '' f; do # for all .la files
1418     local archivefile=${f/%.la/.a}
1419    
1420     [[ ${f} != ${archivefile} ]] || die 'regex sanity check failed'
1421    
1422     # Remove static libs we're not supposed to link against.
1423     if grep -q '^shouldnotlink=yes$' "${f}"; then
1424 mgorny 1.400 if [[ -f ${archivefile} ]]; then
1425     einfo "Removing unnecessary ${archivefile#${D%/}} (static plugin)"
1426     rm -f "${archivefile}"
1427     fi
1428 mgorny 1.395
1429     # The .la file may be used by a module loader, so avoid removing it
1430     # unless explicitly requested.
1431     [[ ${removing_all} ]] || continue
1432     fi
1433    
1434     # Remove .la files when:
1435     # - user explicitly wants us to remove all .la files,
1436     # - respective static archive doesn't exist,
1437     # - they are covered by a .pc file already,
1438     # - they don't provide any new information (no libs & no flags).
1439 mgorny 1.402 local reason pkgconfig_scanned
1440 mgorny 1.395 if [[ ${removing_all} ]]; then
1441     reason='requested'
1442     elif [[ ! -f ${archivefile} ]]; then
1443     reason='no static archive'
1444     elif [[ ! $(sed -nre \
1445     "s/^(dependency_libs|inherited_linker_flags)='(.*)'$/\2/p" \
1446     "${f}") ]]; then
1447     reason='no libs & flags'
1448 mgorny 1.402 else
1449     if [[ ! ${pkgconfig_scanned} ]]; then
1450     # Create a list of all .pc-covered libs.
1451     local pc_libs=()
1452     if [[ ! ${removing_all} ]]; then
1453     local f
1454     local tf=${T}/prune-lt-files.pc
1455     local pkgconf=$(tc-getPKG_CONFIG)
1456    
1457     while IFS= read -r -d '' f; do # for all .pc files
1458     local arg
1459    
1460     sed -e '/^Requires:/d' "${f}" > "${tf}"
1461     for arg in $("${pkgconf}" --libs "${tf}"); do
1462     [[ ${arg} == -l* ]] && pc_libs+=( lib${arg#-l}.la )
1463     done
1464     done < <(find "${D}" -type f -name '*.pc' -print0)
1465    
1466     rm -f "${tf}"
1467     fi
1468    
1469     pkgconfig_scanned=1
1470     fi
1471    
1472     has "${f##*/}" "${pc_libs[@]}" && reason='covered by .pc'
1473 mgorny 1.395 fi
1474    
1475     if [[ ${reason} ]]; then
1476     einfo "Removing unnecessary ${f#${D%/}} (${reason})"
1477     rm -f "${f}"
1478     fi
1479     done < <(find "${D}" -type f -name '*.la' -print0)
1480     }
1481    
1482 vapier 1.372 check_license() { die "you no longer need this as portage supports ACCEPT_LICENSE itself"; }
1483    
1484 vapier 1.371 fi

  ViewVC Help
Powered by ViewVC 1.1.20