diff options
Diffstat (limited to 'support/scripts/install.sh')
-rw-r--r-- | support/scripts/install.sh | 125 |
1 files changed, 125 insertions, 0 deletions
diff --git a/support/scripts/install.sh b/support/scripts/install.sh new file mode 100644 index 0000000000..0a3c6aef1d --- /dev/null +++ b/support/scripts/install.sh @@ -0,0 +1,125 @@ +########################################################-*-Shell-script-*-#### +# Install Function +############################################################################## +# $Id$ + +source ${0%/*}/stdlib.sh; + +############################################################################## +# install + +function install-args() { + case "$1" in + --version ) echo "install (bash script) $version"; exit 0;; + -d ) directory="true"; return 1;; + --directory ) directory="true"; return 1;; + -D ) leading="true"; return 1;; + -o ) args-option-value owner "$@";; + --owner=* ) args-inline-value owner "$@";; + -g ) args-option-value group "$@";; + --group=* ) args-inline-value group "$@";; + -m ) args-option-value mode "$@";; + --mode=* ) args-inline-value mode "$@";; + -* ) args-option-unknown "$@";; + * ) args-append-array files "$@";; + esac; +} + +function install-mkdir() { + local dstpath="$1"; shift 1; + if [ "$dstpath" != "." ]; then + run mkdir -p "$dstpath"; + fi; +} + +function install-copy() { + local srcfile="$1"; shift 1; + local dstfile="$1"; shift 1; + run cp "$srcfile" "$dstfile"; +} + +function install-attr() { + local file="$1"; + if [ -n "$mode" ]; then + run chmod "$mode" "$file"; + fi; + if [ -n "$owner" -a -n "$group" ]; then + run chmod "$owner:$group" "$file"; + elif [ -n "$owner" ]; then + run chmod "$owner" "$file"; + elif [ -n "$group" ]; then + run chmod "$USER:$group" "$file"; + fi; +} + +function install-dirs() { + while [ $# -gt 0 ]; do + local dstpath="$1"; shift 1; + install-mkdir "$dstpath"; + install-attr "$dstpath"; + done; +} + +function install-file() { + local srcfile="$1"; shift 1; + local dstfile="$1"; shift 1; + local dstpath="`dirname "$dstfile"`"; + if [ "$leading" == "true" ]; then + install-mkdir "$dstpath"; + fi; + install-copy "$srcfile" "$dstfile"; + install-attr "$dstfile"; +} + +function install-files() { + local dstpath="$1"; shift 1; + while [ $# -gt 0 ]; do + local srcfile="$1"; shift 1; + local dstfile="$dstpath/`basename "$srcfile"`"; + install-copy "$srcfile" "$dstfile"; + install-attr "$dstfile"; + done; +} + +function install() { + local version="1.00"; + local directory="false"; + local leading="false"; + local owner=""; + local group=""; + local mode=""; + local -a files; + + args-loop "$FUNCNAME" "$@"; + + local count="${#files[@]}"; + if [ $count -lt 1 ]; then + if [ "$directory" == "true" ]; then + abort "$FUNCNAME: missing target directory"; + else + abort "$FUNCNAME: missing source file"; + fi; + fi; + + if [ "$directory" == "true" ]; then + install-dirs "${files[@]}"; + else + if [ $count -lt 2 ]; then + abort "$FUNCNAME: missing destination"; + fi; + + local last="${files[$(($count-1))]}"; + if [ -d "$last" ]; then + unset files[$(($count-1))]; + install-files "$last" "${files[@]}"; + elif [ $count -eq 2 ]; then + install-file "${files[@]}"; + else + local text1="$FUNCNAME: installing multiple files, but last"; + local text2="argument, \`$last' is not a directory"; + abort "$text1 $text2"; + fi; + fi; +} + +############################################################################## |