From a15cf65c44d5c224169c32ef5495b68c758134b7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=B6rg=20Frings-F=C3=BCrst?= Date: Sun, 18 May 2014 16:08:14 +0200 Subject: Imported Upstream version 3.3.0.2 --- build-0.3/dialog.bash | 249 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 249 insertions(+) create mode 100644 build-0.3/dialog.bash (limited to 'build-0.3/dialog.bash') diff --git a/build-0.3/dialog.bash b/build-0.3/dialog.bash new file mode 100644 index 0000000..17cced0 --- /dev/null +++ b/build-0.3/dialog.bash @@ -0,0 +1,249 @@ +# file : build/dialog.bash +# author : Boris Kolpackov +# copyright : Copyright (c) 2004-2010 Code Synthesis Tools CC +# license : GNU GPL v2; see accompanying LICENSE file + +# bld_root - build root +# MAKE - GNU make executable +# + +#@@ can't I do exec 1>&2 or something? +# +function echo_error () +{ + echo "$*" 1>&2 +} + +echo=echo_error + +function abspath_old () +{ + local r=`eval echo $1` # for tilde-expansion + + if [ "`echo $r | sed -e 's%^/.*$%%'`" ]; then + + r=`pwd`/$r + fi + + # remove trailing `/' + # + r=`echo $r | sed -e 's%^\(.\+\)/$%\1%'` + + echo $r +} + +# Get rid of jobserver info. See GNU make bug #12229. +# +MAKEFLAGS=`echo $MAKEFLAGS | sed -e 's/--jobserver-fds=[^ ]* *//g'` +MAKEFLAGS=`echo $MAKEFLAGS | sed -e 's/-j *//g'` + + +function abspath () +{ + local r=`eval echo $1` # for tilde-expansion + + $MAKE --no-print-directory -f $bld_root/abspath.make $r +} + +# $1 Default answer ('y' or 'n'). [optional] +# +function read_y_n () +{ + local r + + while [ -z "$r" ]; do + + read -p "[$1]: " r + + if [ -z "$r" ]; then + r=$1 + fi + + case "$r" in + y) ;; + n) ;; + *) r= ;; + esac + done + + echo $r +} + +# $1 Default answer. [optional] +# +function read_value () +{ + local r + + read -p "[$1]: " r + + if [ -z "$r" ]; then + r=$1 + fi + + echo $r +} + +# $1 Space-separated list of options. +# $2 Default answer from the list of options. [optional] +# +function read_option () +{ + local d o r i + + if [ "$2" ]; then + + d=1 + + for o in $1; do + + if [ "$o" = "$2" ]; then break; fi + + d=$(($d + 1)) + done + fi + + while [ -z "$r" ]; do + + read -p "[$d]: " r + + if [ -z "$r" ]; then + + r=$d + fi + + i=1 + + for o in $1; do + + if [ "$i" = "$r" ]; then + + echo $o + return 0 + fi + + i=$(($i + 1)) + done + + # User must have entered some junk so let's ask her again. + # + r= + done +} + + +# $1 Default answer. [optional] +# +# --command - path to be read is a command (implies --exist) +# +# --directory - path to be read is a directory +# +# --exist - path to be read should exist +# +# +function read_path () +{ + local command=0 + local directory=0 + local exist=0 + + # Parse options + # + while [ "$1" ]; do + case $1 in + + --command) + + command=1 + exist=1 + shift + ;; + + --directory) + + directory=1 + shift + ;; + + --exist) + + exist=1 + shift + ;; + + *) + + break + ;; + + esac + done + + local r tmp + + while [ -z "$r" ]; do + + read -e -p "[$1]: " r + + if [ -z "$r" ]; then + + r=$1 + fi + + if [ -z "$r" ]; then + + continue + fi + + + if [ $command == 1 ]; then + + # Do tilde expansion. + # + r=`eval echo $r` + + # Extract first word. + # + local cmd=`echo $r | cut -d " " -f 1` + + type -p $cmd 1>/dev/null 2>&1 + + if [ $? != 0 ]; then + + $echo "$r: command not found" + r= + + fi + + continue + fi + + # abspath & checks + # + r=`abspath $r` + + if [ $exist == 1 ]; then + + if [ $directory == 1 ]; then + + if [ ! -d "$r" ]; then + + $echo "$r: no such directory" + r= + continue + fi + + else # something else + + if [ ! -e "$r" ]; then + + $echo "$r: no such file or directory" + r= + continue + fi + fi + fi + done + + echo $r +} -- cgit v1.2.3