# HG changeset patch
# User Christophe Lincoln <pankso@slitaz.org>
# Date 1302463693 -7200
# Node ID cb8779b378d4bb3ef241d8ae05ff93e71a3aa465
# Parent  730f8bcacabc0f305dd21823a7c60cfefa6f0373
Add a debug page and a QUERY_STRING parser so we can use names CASE WANT VAR_1 VAR_2

diff -r 730f8bcacabc -r cb8779b378d4 index.cgi
--- a/index.cgi	Sun Apr 10 11:23:06 2011 +0000
+++ b/index.cgi	Sun Apr 10 21:28:13 2011 +0200
@@ -20,6 +20,8 @@
 TEXTDOMAIN='tazpanel'
 export TEXTDOMAIN
 
+
+
 #
 # Things to do before displaying the page
 #
@@ -36,6 +38,23 @@
 #
 
 case "$QUERY_STRING" in
+	debug*)
+		TITLE="- Debug"
+		query_string_parser
+		xhtml_header
+		cat << EOT
+<pre>
+QUERY_STRING="$QUERY_STRING" 
+
+Fuction: query_string_parser (<a href="?debug=test=var1=var2">test</a>)
+
+CASE="$CASE"
+WANT="$WANT"
+VAR_1="$VAR_1"
+VAR_2="$VAR_2"
+</pre>
+EOT
+		;;
 	*)
 		#
 		# Default xHTML content
@@ -82,6 +101,10 @@
 		<input type="password" name="panel-pass"/>
 	</div>
 </form>
+<p>
+$(gettext "TazPanel provide a debuging mode and page:")
+<a href='$SCRIPT_NAME?debug'>debug</a>
+</p>
 
 EOT
 		;;
diff -r 730f8bcacabc -r cb8779b378d4 lib/libtazpanel
--- a/lib/libtazpanel	Sun Apr 10 11:23:06 2011 +0000
+++ b/lib/libtazpanel	Sun Apr 10 21:28:13 2011 +0200
@@ -20,6 +20,22 @@
 		exit 1
 }
 
+# TazPanel QUERY_STRING parser ruturns: CASE WANT VAR_1 VAR_4
+# we use that to help getting URL string variable an use names
+query_string_parser() {
+	id=0
+	for var in $(echo "$QUERY_STRING" | sed s'@=@ @'g)
+	do
+		id=$((id + 1))
+		case "$id" in
+			'1') CASE=${var% } ;;
+			'2') WANT=${var% } ;;
+			'3') VAR_1=${var% } ;;
+			'4') VAR_2=${var% } ;;
+		esac
+	done
+}
+
 # DEBUG mode
 debug_info() {
 	if [ $DEBUG == "1" ]; then