[patches] tzselect patch: Remove ksh dependency

[Peter Seebach <peter.seebach@xxxxxxxxxxxxx>]

The enclosed patch makes tzselect work in ash, the shell used with  
busybox.  It probably also works in any "reasonably modern" (SVR3 and  
later) Bourne shell.  At least, the part I'm contributing does.

The substantive chunk (func_select) was released into the public  
domain by the author (me).  It's not Wind River IP.  (It comes from my  
shell scripting book.)  I don't think anyone cares about the two-line  
diffs to change "select" to "while func_select".

--- tzselect.ksh
+++ tzselect.sh
@@ -1,6 +1,6 @@
-#! @KSH@
+#! @SH@

-# '@(#)tzselect.ksh	8.1'
+# '@(#)tzselect.sh	8.1'

 # Ask the user about the time zone, and output the resulting TZ  
value to stdout.
 # Interact with the user via stderr and stdin.
@@ -9,18 +9,6 @@

 # Porting notes:
 #
-# This script requires several features of the Korn shell.
-# If your host lacks the Korn shell,
-# you can use either of the following free programs instead:
-#
-#	<a href=ftp://ftp.gnu.org/pub/gnu/>
-#	Bourne-Again shell (bash)
-#	</a>
-#
-#	<a href=ftp://ftp.cs.mun.ca/pub/pdksh/pdksh.tar.gz>
-#	Public domain ksh
-#	</a>
-#
 # This script also uses several features of modern awk programs.
 # If your host lacks awk, or has an old awk that does not conform to  
Posix.2,
 # you can use either of the following free programs instead:
@@ -33,6 +21,71 @@
 #	mawk
 #	</a>

+# Distilled from autoconf.
+case `echo -n foo\c` in
+*n*c*)	echo_n() { echo "$@"; };;
+*n*)	echo_n() { echo "$@\c"; };;
+*)	echo_n() { echo -n "$@"; };;
+esac
+
+func_select () {
+    func_select_args=0
+    case $1 in
+    [!_a-zA-Z]* | *[!_a-zA-Z0-9]* )
+        echo >&2 "func_select: '$1' is not a valid variable name."
+        return 1
+        ;;
+    esac
+    func_select_var=$1
+    shift
+
+    case $1 in
+    in) shift;;
+    *) echo >&2 "func_select: usage: func_select var in ..."; return  
1;;
+    esac
+
+    case $# in
+    0) echo >&2 "func_select: usage: func_select var in ..."; return  
1;;
+    esac
+    for func_select_arg
+    do
+        func_select_args=`expr $func_select_args + 1`
+        eval func_select_a_$func_select_args=\$func_select_arg
+    done
+    REPLY=""
+    while :
+    do
+        if test -z "$REPLY"; then
+            func_select_i=1
+            while test $func_select_i -le $func_select_args
+            do
+                eval echo "\"\$func_select_i) \$func_select_a_ 
$func_select_i\""
+                func_select_i=`expr $func_select_i + 1`
+            done
+        fi
+        echo_n >&2 "${PS3:-#? }"
+        if read REPLY; then
+            if test -n "${REPLY}"; then
+                case $REPLY in
+                0* | *[!0-9]* )
+                    eval $func_select_var=
+                    ;;
+                *)
+                    if test "$REPLY" -ge 1 && test "$REPLY" -le  
$func_select_args; then
+                        eval $func_select_var=\$func_select_a_$REPLY
+                    else
+                        eval $func_select_var=
+                    fi
+                    ;;
+                esac
+                return 0
+            fi
+        else
+            eval $func_select_var=
+            return 1
+        fi
+    done
+}

 # Specify default values for environment variables if they are unset.
 : ${AWK=awk}
@@ -62,7 +115,7 @@


 # Work around a bug in bash 1.14.7 and earlier, where $PS3 is sent  
to stdout.
-case $(echo 1 | (select x in x; do break; done) 2>/dev/null) in
+case $(echo 1 | (while func_select x in x; do break; done) 2>/dev/ 
null) in
 ?*) PS3=
 esac

@@ -82,7 +135,7 @@

 	echo >&2 'Please select a continent or ocean.'

-	select continent in \
+	while func_select continent in \
 	    Africa \
 	    Americas \
 	    Antarctica \
@@ -162,7 +215,7 @@
 		case $countries in
 		*"$newline"*)
 			echo >&2 'Please select a country.'
-			select country in $countries
+			while func_select country in $countries
 			do
 			    case $country in
 			    '') echo >&2 'Please enter a number in range.';;
@@ -201,7 +254,7 @@
 		*"$newline"*)
 			echo >&2 'Please select one of the following' \
 				'time zone regions.'
-			select region in $regions
+			while func_select region in $regions
 			do
 				case $region in
 				'') echo >&2 'Please enter a number in range.';;
@@ -278,7 +331,7 @@
 	echo >&2 "Is the above information OK?"

 	ok=
-	select ok in Yes No
+	while func_select ok in Yes No
 	do
 	    case $ok in
 	    '') echo >&2 'Please enter 1 for Yes, or 2 for No.';;

--
Peter Seebach <peter.seebach@xxxxxxxxxxxxx>
Listen, get this.  Nobody with a good compiler needs to be justified.