aboutsummaryrefslogtreecommitdiff
path: root/paludis/repositories/gentoo/ebuild/builtin_unmerge.bash
blob: e358d8a3aa575fa9ede80f36c0ff624d4921f5dc (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
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
#!/bin/bash
# vim: set sw=4 sts=4 et :

# Copyright (c) 2006 Ciaran McCreesh <ciaranm@ciaranm.org>
#
# 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

builtin_unmerge()
{
    local v=$(${PALUDIS_COMMAND} --configuration-variable installed location 2>/dev/null )
    if [[ -z "${v}" ]] ; then
        v=${ROOT}/var/db/pkg
    fi

    local dbdir="${v}/${CATEGORY}/${PF}" entry
    [[ -d "${dbdir}" ]] || die "couldn't find pkg db directory (\"${dbdir}\")"

    for v in CATEGORY CBUILD CHOST DEPEND DESCRIPTION EAPI \
        FEATURES HOMEPAGE INHERITED IUSE KEYWORDS LICENSE PDEPEND PF \
        PROVIDE RDEPEND SLOT SRC_URI USE CONFIG_PROTECT CONFIG_PROTECT_MASK \
        VDB_FORMAT ASFLAGS CBUILD CC CFLAGS CHOST CTARGET CXX CXXFLAGS \
        EXTRA_ECONF EXTRA_EINSTALL EXTRA_EMAKE LDFLAGS LIBCXXFLAGS \
        REPOSITORY ; do
        if [[ -f "${dbdir}/${v}" ]] ; then
            eval "${v}=\$(< ${dbdir}/${v} ) || die \"Load key ${v} failed\""
        else
            eval "${v}="
        fi
    done

    if [[ -f ${dbdir}/CONFIG_PROTECT ]]; then
        CONFIG_PROTECT="$(< ${dbdir}/CONFIG_PROTECT) ${CONFIG_PROTECT}"
        if [[ -f ${dbdir}/CONFIG_PROTECT_MASK ]]; then
            CONFIG_PROTECT_MASK="$(< ${dbdir}/CONFIG_PROTECT_MASK)"
        fi
    else
        local old_CONFIG_PROTECT="${CONFIG_PROTECT:+${CONFIG_PROTECT} }/etc"
        eval $(bzcat "${dbdir}/environment.bz2" | while read line; do
            line=${line//\'}
            if [[ ${line%%=*} == CONFIG_PROTECT ]]; then
                echo "CONFIG_PROTECT='${line#*=} ${CONFIG_PROTECT}'"
            elif [[ ${line%%=*} == CONFIG_PROTECT_MASK ]]; then
                echo "CONFIG_PROTECT_MASK='${line#*=}'"
            fi
        done)

        # catalyst creates things with an empty CONFIG_PROTECT...
        if [[ -z "${CONFIG_PROTECT// }" ]] ; then
            ewarn "CONFIG_PROTECT from environment.bz2 is empty"
            ewarn "Using a fallback of '${old_CONFIG_PROTECT}'"
            CONFIG_PROTECT="${old_CONFIG_PROTECT}"
        fi
    fi

    if [[ -n ${PALUDIS_EBUILD_OVERRIDE_CONFIG_PROTECT} ]]; then
        CONFIG_PROTECT=${PALUDIS_EBUILD_OVERRIDE_CONFIG_PROTECT}
    fi
    if [[ -n ${PALUDIS_EBUILD_OVERRIDE_CONFIG_PROTECT_MASK} ]]; then
        CONFIG_PROTECT_MASK=${PALUDIS_EBUILD_OVERRIDE_CONFIG_PROTECT_MASK}
    fi

    export CONFIG_PROTECT="${CONFIG_PROTECT}"
    export CONFIG_PROTECT_MASK="${CONFIG_PROTECT_MASK}"

    local unmerge=${PALUDIS_EBUILD_DIR}/unmerge
    [[ -x "${unmerge}" ]] || unmerge="${PALUDIS_EBUILD_DIR_FALLBACK}"/unmerge
    [[ -x "${unmerge}" ]] || die "Couldn't find unmerge"

    ${unmerge} "${ROOT}/" "${dbdir}/CONTENTS" || die "unmerge failed"

    echo hash -r
    hash -r

    if ! /bin/sh -c 'echo Good, our shell is still usable' ; then
        echo "Looks like our shell broke. Trying an ldconfig to fix it..."
        ldconfig -r ${ROOT}
    fi

    rm -fr "${dbdir}"
}

ebuild_f_unmerge()
{
    local old_sandbox_write="${SANDBOX_WRITE}"
    [[ -z "${PALUDIS_DO_NOTHING_SANDBOXY}" ]] && SANDBOX_WRITE="${SANDBOX_WRITE+${SANDBOX_WRITE}:}${ROOT%/}/"
    local old_sandbox_on="${SANDBOX_ON}"
    [[ -z "${PALUDIS_DO_NOTHING_SANDBOXY}" ]] && [[ "$(canonicalise ${ROOT} )" != "/" ]] || SANDBOX_ON=0

    if hasq "unmerge" ${RESTRICT} ; then
        ebuild_section "Skipping builtin_unmerge (RESTRICT)"
    elif hasq "unmerge" ${SKIP_FUNCTIONS} ; then
        ebuild_section "Skipping builtin_unmerge (SKIP_FUNCTIONS)"
    else
        ebuild_section "Starting builtin_unmerge"
        builtin_unmerge
        ebuild_section "Done builtin_unmerge"
    fi

    [[ -z "${PALUDIS_DO_NOTHING_SANDBOXY}" ]] && SANDBOX_WRITE="${old_sandbox_write}"
    [[ -z "${PALUDIS_DO_NOTHING_SANDBOXY}" ]] && SANDBOX_ON="${old_sandbox_on}"
    true
}