diff options
Diffstat (limited to 'contrib/cmdline/makequery')
| -rwxr-xr-x | contrib/cmdline/makequery | 108 |
1 files changed, 0 insertions, 108 deletions
diff --git a/contrib/cmdline/makequery b/contrib/cmdline/makequery deleted file mode 100755 index b34efb841..000000000 --- a/contrib/cmdline/makequery +++ /dev/null @@ -1,108 +0,0 @@ -#!/bin/sh -# The contents of this file are subject to the Mozilla Public -# License Version 1.1 (the "License"); you may not use this file -# except in compliance with the License. You may obtain a copy of -# the License at http://www.mozilla.org/MPL/ -# -# Software distributed under the License is distributed on an "AS -# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or -# implied. See the License for the specific language governing -# rights and limitations under the License. -# -# The Original Code is the Bugzilla Bug Tracking System. -# -# The Initial Developer of the Original Code is -# Andreas Franke <afranke@mathweb.org>. -# Corporation. Portions created by Andreas Franke are -# Copyright (C) 2001,2005 Andreas Franke. All -# Rights Reserved. -# -# Contributor(s): - -conf="`dirname $0`/query.conf" - -query="https://bugzilla.mozilla.org/buglist.cgi?ctype=csv" - -chart=0 -and=0 -while test "X$1" != "X"; do - arg="$1" - shift - if test 0 != `expr "X$arg" : 'X--[^=]*\$'`; then - # long option: --name val (without '=') - name=`expr "X$arg" : 'X--\(.*\)'` - val="$1" - shift - elif test 0 != `expr "X$arg" : 'X--[^=][^=]*='`; then - # long option: --name=val - name=`expr "X$arg" : 'X--\([^=]*\)'` - val=`expr "X$arg" : 'X--[^=]*=\(.*\)'` - elif test 0 != `expr "X$arg" : 'X-[a-zA-Z]\$'`; then - # short option like -X foo (with space in between) - name=`expr "X$arg" : 'X-\(.\)'` - val="$1" - shift - elif test 0 != `expr "X$arg" : 'X-[a-zA-Z]='`; then - # reject things like -X=foo - echo "Unrecognized option $arg" 1>&2 - echo "Use -Xfoo or -X foo instead of -X=foo" 1>&2 - exit 1 - elif test 0 != `expr "X$arg" : 'X-[a-zA-Z]'`; then - # short option like -Xfoo (without space) - name=`expr "X$arg" : 'X-\(.\)'` - val=`expr "X$arg" : 'X-.\(.*\)'` - else - name="default" - val="$arg" - #echo "Unrecognized option $arg" 1>&2 - #exit 1 - fi - - # plausibility check: val must not be empty, nor start with '-' - if test "X$val" = "X"; then - echo "No value found for '$name'!" 1>&2 - exit 1 - elif test 0 != `expr "X$val" : "X-"` && \ - test 0 = `expr "X$val" : "X---"`; then - echo "Suspicious value for '$name': '$val' looks like an option!" 1>&2 - exit 1 - fi - - # find field and comparison type for option ${name} - field=`grep "\"$name\"" "$conf" | awk '{printf $1}'` - type=`grep "\"$name\"" "$conf" | awk '{printf $2}'` - if test "X$field" = "X" || test "X$type" = "X"; then - if test "X$name" = "Xdefault"; then - echo 1>&2 "Error: unexpected argument '$arg'" - cat 1>&2 <<EOF -Use short options like -P1 or long options like --priority=1 , -or enable the 'default' behaviour in the 'query.conf' file. -EOF - else - echo "Unknown field name '$name'." 1>&2 - fi - exit 1 - fi - - # split val into comma-separated alternative values - or=0 - while test "X$val" != "X"; do - # val1 gets everything before the first comma; val gets the rest - if test 0 != `expr "X$val" : 'X[^,]*,'`; then - val1=`expr "X$val" : 'X\([^,]*\),'` - val=`expr "X$val" : 'X[^,]*,\(.*\)'` - else - val1="$val" - val="" - fi - # append to query - query="${query}&field${chart}-${and}-${or}=${field}" - query="${query}&type${chart}-${and}-${or}=${type}" - query="${query}&value${chart}-${and}-${or}=${val1}" - #echo "----- ${name} : ${field} : ${type} : ${val1} -----" 1>&2 - or=`expr ${or} + 1` - done - chart=`expr ${chart} + 1` -done - -echo "${query}" |