diff options
Diffstat (limited to 'app-admin/eselect-unison/files/unison.eselect-0.1')
-rw-r--r-- | app-admin/eselect-unison/files/unison.eselect-0.1 | 152 |
1 files changed, 152 insertions, 0 deletions
diff --git a/app-admin/eselect-unison/files/unison.eselect-0.1 b/app-admin/eselect-unison/files/unison.eselect-0.1 new file mode 100644 index 000000000000..26d68521a597 --- /dev/null +++ b/app-admin/eselect-unison/files/unison.eselect-0.1 @@ -0,0 +1,152 @@ +# Copyright 1999-2007 Gentoo Foundation +# Distributed under the terms of the GNU General Public License v2 +# $Id: unison.eselect-0.1,v 1.1 2008/04/07 21:29:18 aballier Exp $ + +DESCRIPTION="Manage /usr/bin/unison versions" +MAINTAINER="ml@gentoo.org" +SVN_DATE='$Date: 2008/04/07 21:29:18 $' +VERSION=$(svn_date_to_version "${SVN_DATE}" ) + +# find a list of unison symlink targets, best first +find_targets() { + local f + for f in "${ROOT}"/usr/bin/unison-[0-9]*; do + if [[ -f ${f} ]] ; then + echo "${f##*/unison-}" + fi + done | tac +} + +# find version number of currently symlinked version +identify_target() { + local f + f="$(canonicalise "${ROOT}"/usr/bin/unison)" + echo "${f##*/unison-}" +} + +# try to remove the unison symlink +remove_symlinks() { + rm -f "${ROOT}"/usr/bin/unison &>/dev/null +} + +# set the unison symlink +set_symlinks() { + local target="${1}" targets + if is_number "${target}" && [[ ${target} -ge 1 ]] ; then + targets=( $(find_targets ) ) + target=${targets[$(( ${target} - 1 ))]} + fi + if [[ -f "${ROOT}/usr/bin/unison-${target}" ]] ; then + remove_symlinks + ln -s "unison-${target}" "${ROOT}/usr/bin/unison" || \ + die "Could not set ${target} /usr/bin/unison symlink" + else + die -q "Target \"${target}\" doesn't appear to be valid!" + fi +} + +### show action ### + +describe_show() { + echo "Show the current unison version" +} + +do_show() { + [[ -z "${@}" ]] || die -q "Too many parameters" + + write_list_start "Current unison verson:" + if [[ -L "${ROOT}/usr/bin/unison" ]] ; then + write_kv_list_entry "$(identify_target)" "" + elif [[ -e "${ROOT}/usr/bin/unison" ]] ; then + write_kv_list_entry "(not a symlink)" "" + else + write_kv_list_entry "(unset)" "" + fi +} + +### list action ### + +describe_list() { + echo "List available unison versions" +} + +do_list() { + [[ -z "${@}" ]] || die -q "Too many parameters" + + local i targets current + targets=( $(find_targets ) ) + current=$(identify_target) + if [[ -n ${targets[@]} ]] ; then + for (( i = 0 ; i < ${#targets[@]} ; i = i + 1 )) ; do + [[ ${targets[${i}]} == ${current} ]] && \ + targets[${i}]="${targets[${i}]} $(highlight '*' )" + done + write_list_start "Available unison versions:" + write_numbered_list "${targets[@]}" + else + write_kv_list_entry "(none found)" "" + fi +} + +### set action ### + +describe_set() { + echo "Set a new unison version" +} + +describe_set_options() { + echo "target : Target version number or index from 'list' action" +} + +describe_set_parameters() { + echo "<target>" +} + +do_set() { + if [[ -z "${1}" ]] ; then + die -q "You didn't give me a version number" + + elif [[ -n "${2}" ]] ; then + die -q "Too many parameters" + + elif [[ -L "${ROOT}/usr/bin/unison" ]] ; then + if ! remove_symlinks ; then + die -q "Can't remove existing version symlink" + elif ! set_symlinks "${1}" ; then + die -q "Can't set new version" + fi + + elif [[ -e "${ROOT}/usr/bin/unison" ]] ; then + die -q "${ROOT}/usr/bin/unison seems to be from an old ebuild, please remove manually" + + else + set_symlinks "${1}" || die -q "Can't set new version" + fi +} + +### update action ### + +describe_update() { + echo "Automatically update the unison version number" +} + +describe_update_options() { + echo "--if-unset : Do not override currently selected version" +} + +do_update() { + [[ -z "${1}" ]] || ( [[ -z "${2}" ]] && [[ "${1}" == "--if-unset" ]] ) || \ + die -q "Usage error" + + if [[ -L "${ROOT}/usr/bin/unison" ]] ; then + [[ ${1} == "--if-unset" ]] && return + remove_symlinks || die -q "Can't remove existing symlink" + fi + if [[ -e "${ROOT}/usr/bin/unison" ]] ; then + die -q "${ROOT}/usr/bin/unison seems to be from an old ebuild, please remove manually" + elif ! [[ -z $(find_targets ) ]] ; then + set_symlinks 1 || die -q "Can't set a new version" + fi +} + +# vim: set ft=eselect : |