#!/bin/bash -e # # pacman-db-upgrade - upgrade the local pacman db to a newer format # @configure_input@ # # Copyright (c) 2010-2014 Pacman Development Team <pacman-dev@archlinux.org> # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program 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, see <http://www.gnu.org/licenses/>. # # gettext initialization export TEXTDOMAIN='pacman-scripts' export TEXTDOMAINDIR='@localedir@' declare -r myver='@PACKAGE_VERSION@' m4_include(library/output_format.sh) m4_include(library/parseopts.sh) usage() { printf "pacman-db-upgrade (pacman) %s\n" "${myver}" echo printf -- "$(gettext "Upgrade the local pacman database to a newer format")\n" echo printf -- "$(gettext "Usage: %s [options]")\n" "$0" echo printf -- "$(gettext "options:")\n" printf -- "$(gettext " -b, --dbpath <path> set an alternate database location")\n" printf -- "$(gettext " -h, --help show this help message and exit")\n" printf -- "$(gettext " -r, --root <path> set an alternate installation root")\n" printf -- "$(gettext " -V, --version show version information and exit")\n" printf -- "$(gettext " --config <path> set an alternate configuration file")\n" printf -- "$(gettext " --nocolor disable colorized output messages")\n" echo } version() { printf "pacman-db-upgrade (pacman) %s\n" "$myver" printf -- "$(gettext "\ Copyright (c) 2010-2014 Pacman Development Team <pacman-dev@archlinux.org>.\n\ This is free software; see the source for copying conditions.\n\ There is NO WARRANTY, to the extent permitted by law.\n")" } die() { error "$@" exit 1 } die_r() { rm -f "$lockfile" die "$@" } get_opt_from_config() { local keyname="$1" conffile="$2" local key value while IFS=$'= \t' read -r key value _; do if [[ $key = $keyname ]]; then echo "$value" return fi done <"$conffile" } resolve_dir() { local d="$(cd "$1"; pwd -P)" [[ $d == */ ]] || d+=/ printf "%s" "$d" } # PROGRAM START # determine whether we have gettext; make it a no-op if we do not if ! type gettext &>/dev/null; then gettext() { echo "$@" } fi USE_COLOR='y' OPT_SHORT="d:hr:V" OPT_LONG=('config:' 'dbpath:' 'help' 'nocolor' 'root:' 'version') if ! parseopts "$OPT_SHORT" "${OPT_LONG[@]}" -- "$@"; then exit 1 # E_INVALID_OPTION fi set -- "${OPTRET[@]}" unset OPT_SHORT OPT_LONG OPTRET while true; do case "$1" in --config) shift; conffile="$1" ;; -d|--dbpath) shift; dbroot="$1" ;; -r|--root) shift; pacroot="$1" ;; -h|--help) usage; exit 0 ;; --nocolor) USE_COLOR='n' ;; -V|--version) version; exit 0 ;; -- ) shift; break 2 ;; esac shift done conffile=${conffile:-@sysconfdir@/pacman.conf} [[ -z $pacroot ]] && pacroot="$(get_opt_from_config "RootDir" "$conffile")" [[ -z $dbroot ]] && dbroot="$(get_opt_from_config "DBPath" "$conffile")" [[ -z $dbroot && -n $pacroot ]] && dbroot="$pacroot/@localstatedir@/lib/pacman" [[ -z $pacroot ]] && pacroot="@rootdir@" [[ -z $dbroot ]] && dbroot="@localstatedir@/lib/pacman/" m4_include(library/term_colors.sh) if [[ ! -d $dbroot ]]; then die "$(gettext "%s does not exist or is not a directory.")" "$dbroot" fi if [[ ! -d $dbroot/local ]]; then die "$(gettext "%s is not a pacman database directory.")" "$dbroot" fi if [[ ! -w $dbroot ]]; then die "$(gettext "You must have correct permissions to upgrade the database.")" fi # strip any trailing slash from our dbroot dbroot="${dbroot%/}" # form the path to our lockfile location lockfile="${dbroot}/db.lck" # make sure pacman isn't running if [[ -f $lockfile ]]; then die "$(gettext "Pacman lock file was found. Cannot run while pacman is running.")" fi # do not let pacman run while we do this touch "$lockfile" if [[ -f "${dbroot}"/local/ALPM_DB_VERSION ]]; then db_version=$(cat "${dbroot}"/local/ALPM_DB_VERSION) fi if [[ -z "$db_version" ]]; then # pacman-3.4 to 3.5 upgrade - merge depends into desc if [[ $(find "$dbroot"/local -name depends) ]]; then msg "$(gettext "Pre-3.5 database format detected - upgrading...")" for i in "$dbroot"/local/*; do if [[ -f "$i"/depends ]]; then cat "$i"/depends >> "$i"/desc rm "$i"/depends fi done msg "$(gettext "Done.")" fi # pacman 4.1 to 4.2 upgrade - remove directory symlink support dirlist=() unset GREP_OPTIONS while IFS= read -r dir; do dirlist+=("${pacroot}${dir%/}") done < <(grep -h '/$' "$dbroot"/local/*/files | sort -ru) mapfile -t dirlist < <(find "${dirlist[@]}" -maxdepth 0 -type l) if [[ ${#dirlist[@]} != 0 ]]; then msg "$(gettext "Pre-4.2 database format detected - upgrading...")" pacroot="$(resolve_dir "$pacroot")" for dir in "${dirlist[@]}"; do realdir="$(resolve_dir "$dir")" # verify realdir is inside root if [[ ${realdir:0:${#pacroot}} != $pacroot ]]; then warning "$(gettext "symlink '%s' points outside pacman root, manual repair required")" "$dir" continue fi # convert to an appropriate form for the replacement olddir="${dir:${#pacroot}}/" newdir="${realdir:${#pacroot}}" # construct the parents of the new directory parents="" parent="$(dirname "$newdir")" while [[ $parent != "." ]]; do parents+="$parent/\n" parent="$(dirname "$parent")" done for f in "$dbroot"/local/*/files; do awk -v "olddir=$olddir" -v "newdir=$newdir" -v "parents=$parents" ' function print_path(path) { if (path != "" && !(path in seen)) { seen[path] = 1 print path } } BEGIN { oldlen = length(olddir) + 1 file = substr(newdir, 0, length(newdir) - 1) } { if ($0 == "") { # end of section, clear seen paths and print as-is for ( i in seen ) { delete seen[i] } print } else if ($0 == olddir) { # replace symlink with its target, including parents split(parents, paths, "\n") for (i in paths) { print_path(paths[i]) } print_path(newdir) } else if ($0 == file) { # newdir already existed as a file, skip it } else if (index($0, olddir) == 1) { # update paths that were under olddir print_path(newdir substr($0, oldlen)) } else { # print everything else as-is print_path($0) } }' "$f" > "$f.tmp" mv "$f.tmp" "$f" done done fi fi echo "9" > "$dbroot"/local/ALPM_DB_VERSION # remove the lock file rm -f "$lockfile" # vim: set noet: