I've just commited my new implementation of OptionParser. The new functionallity can be found in the short log, but I thought I might give some examples to clear things up. Using Compile as an example, valid calls are:
Compile -bS Foo Compile Foo --no-sign Compile -VnFooBar --version=2.3 Foo Compile -xppc Foo Compile -bGc"--no-app --without-lib" Foo For the arguments there are a new array, $Arg, to be used instead of $1, $2 in combinations with shift. $Arg[0] is the same as $0 and then the arguments are numbered in the order of appearance. Even though there's a new way of accessing arguments this commit didn't break the old one, but people should try to change the way arguments are handled in the existing scripts, using $Arg instead of $1 etc. Questions, views, objections? - Please! :) /Jonas On Mon, 20 Nov 2006 00:47:12 +0100, Jonas Karlsson <[EMAIL PROTECTED]> wrote: > CVSROOT: /sources/goboscripts > Module name: tools > Changes by: Jonas Karlsson <mohjive> 06/11/19 23:47:12 > > Modified files: > Scripts/Functions: OptionParser > > Log message: > Commited the new option parser > Short log > * short options can be stacked > * long options can be with or without = > * arguments are reachable from $Arg[n] (to be used instead of $1 and > shifts) > * arguments can come in any order (for scripts that use $Arg[n]) > * everything after '--' is considered arguments > > CVSWeb URLs: > http://cvs.savannah.gnu.org/viewcvs/tools/Scripts/Functions/OptionParser?cvsroot=goboscripts&r1=1.5&r2=1.6 > > Patches: > Index: OptionParser > =================================================================== > RCS file: /sources/goboscripts/tools/Scripts/Functions/OptionParser,v > retrieving revision 1.5 > retrieving revision 1.6 > diff -u -b -r1.5 -r1.6 > --- OptionParser 18 Nov 2006 22:50:48 -0000 1.5 > +++ OptionParser 19 Nov 2006 23:47:12 -0000 1.6 > @@ -51,8 +51,6 @@ > fi > } > - > - > function Entry() { > local i > for i in `seq $optionsListSize` > @@ -259,8 +257,9 @@ > exit 0 > } > -function Parse_Options() { > +function Parse_Options_Old() { > local i > + export parsedArguments=0 > savedOptions=("$@") > if [ "$1" = "--help" -o "$1" = "-h" ] || [ "$helpOnNoArguments" -a > -z "$*" ] > then Show_Help > @@ -319,6 +318,111 @@ > } > } > +function Parse_Options() { > + Arg[0]=$0 > + if [ "$helpOnNoArguments" -a -z "$*" ] > + then Show_Help > + fi > + > + for (( i = 1; i <= $# ; i++ )) > + do > + eval option=\$$i > + > + if [ "${option:0:1}" = "-" ]; then > + if [ "${option:1:1}" = "-" ]; then > + if [ -z "${option:2:1}" ]; then > + for (( l = 1; l <= $[$#-$i] ; l++ )) > + do > + eval Arg[$[${#Arg}+$l]]=\$$[$l+$i] > + done > + break > + fi > + if echo "$option" | grep -q = - ; then > + opt=`echo $option | cut -d= -f1` > + else > + opt=$option > + fi > + export parsedArguments=$[parsedArguments+1] > + for j in `seq $optionsListSize` > + do > + if [ "$opt" = "--${optionsLongList[j]}" ] > + then > + case "${optionsTypeList[j]}" in > + "Boolean") > + optionsStateList[j]="on" > + ;; > + "Entry"|"List") > + if echo "$option" | grep -q = - ; then > + val=`echo $option | cut -d= -f2` > + else > + i=$[i+1] > + eval val=\$$i > + export parsedArguments=$[parsedArguments+1] > + fi > + if [ -z "$val" ] > + then > + Log_Error "Unknown option: $opt requires an > argument." > + Show_Help > + exit 1 > + fi > + optionsStateList[j]="$val" > + ;; > + esac > + break > + fi > + done > + else > + for (( k = 1; k <= ${#option} ; k++ )) > + do > + opt=${option:$k:1} > + for j in `seq $optionsListSize` > + do > + if [ "$opt" = "${optionsShortList[j]}" ] > + then > + case "${optionsTypeList[j]}" in > + "Boolean") > + optionsStateList[j]="on" > + break > + ;; > + "Entry"|"List") > + if [ ! -z "${option:$[k+1]:1}" ]; then > + val=${option:$[k+1]:${#option}} > + else > + i=$[i+1] > + eval val=\$$i > + export parsedArguments=$[parsedArguments+1] > + fi > + if [ -z "$val" ] > + then > + Log_Error "Unknown option: $opt requires an > argument." > + Show_Help > + exit 1 > + fi > + optionsStateList[j]="$val" > + break 2 > + ;; > + esac > + fi > + done > + done > + export parsedArguments=$[parsedArguments+1] > + fi > + else > + [EMAIL PROTECTED] > + fi > + if Boolean help > + then Show_Help > + fi > + if Boolean version > + then Show_Version > + fi > + if Boolean list-options > + then List_Options > + fi > + done > +# Parse_Options_Old "$@" > +} > + > Add_Option_Boolean "h" "help" "Shows this help." > Add_Option_Boolean "v" "version" "Show program version." > Add_Option_Boolean "V" "verbose" "Enable verbose mode." > _______________________________________________ > gobolinux-commits mailing list > [EMAIL PROTECTED] > http://lists.gobolinux.org/mailman/listinfo/gobolinux-commits -- Using Opera's revolutionary e-mail client: http://www.opera.com/mail/ _______________________________________________ gobolinux-devel mailing list gobolinux-devel@lists.gobolinux.org http://lists.gobolinux.org/mailman/listinfo/gobolinux-devel
