blob: f3f91b7cf61490c557b08d9c8fcdc1d14e777f64 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
#!/usr/bin/env bash
# vim: set sw=4 sts=4 et :
# Copyright (c) 2007, 2008 David Leverton
#
# Based in part upon ebuild.sh from Portage, which is Copyright 1995-2005
# Gentoo Foundation and distributed under the terms of the GNU General
# Public License v2.
#
# This file is part of the Paludis package manager. Paludis is free software;
# you can redistribute it and/or modify it under the terms of the GNU General
# Public License, version 2, as published by the Free Software Foundation.
#
# Paludis is distributed in the hope that it will be useful, but WITHOUT ANY
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
# FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
# details.
#
# You should have received a copy of the GNU General Public License along with
# this program; if not, write to the Free Software Foundation, Inc., 59 Temple
# Place, Suite 330, Boston, MA 02111-1307 USA
ebuild_need_extglob()
{
eval "_ebuild_need_extglob_$(declare -f ${1})"
eval "
${1}()
{
eval \"
shopt -s extglob
_ebuild_need_extglob_${1} \\\"\\\${@}\\\"
eval \\\"\$(shopt -p extglob); return \\\${?}\\\"
\"
}"
}
ebuild_safe_source()
{
set -- "${@}" '[^a-zA-Z_]*' '*[^a-zA-Z0-9_]*' \
EUID PPID UID FUNCNAME GROUPS SHELLOPTS BASHOPTS IFS \
'BASH_@(ARGC|ARGV|LINENO|SOURCE|VERSINFO|REMATCH)' \
'BASH_COMPLETION?(_DIR)' 'bash+([0-9])?([a-z])' \
EBUILD_KILL_PID PALUDIS_LOADSAVEENV_DIR PALUDIS_DO_NOTHING_SANDBOXY SANDBOX_ACTIVE \
PALUDIS_IGNORE_PIVOT_ENV_FUNCTIONS PALUDIS_IGNORE_PIVOT_ENV_VARIABLES
trap DEBUG
set -T
shopt -s extdebug
trap "[[ \${BASH_COMMAND%%=*} == ?(*[[:space:]])!($(IFS='|'; shift; echo "${*}")) ||
\${BASH_COMMAND%%[[:space:]]*} != @(*=*|export|declare) ]]" DEBUG
source "${1}"
eval "trap DEBUG; shopt -u extdebug; set +T; return ${?}"
}
ebuild_need_extglob ebuild_safe_source
ebuild_verify_not_changed_from_global_scope()
{
local v vv_orig
for v in "$@" ; do
vv_orig=PALUDIS_SAVE_GLOBAL_SCOPE_$v
vv_orig=${!vv_orig}
[[ "${vv_orig}" == "$(declare -p "${v}" 2>/dev/null)" ]] || die "Variable $v must be set to an invariant value in global scope"
done
}
|
