X-Git-Url: http://git.plutz.net/?p=busy;a=blobdiff_plain;f=cgi.sh;fp=cgi.sh;h=0000000000000000000000000000000000000000;hp=7a19a102c276f2563adc2b7dd93e12cb7a515616;hb=3dc2211d159746a8a0475c3be163cb992b5380af;hpb=350be4926dcd92b90854554767d423639f216481

diff --git a/cgi.sh b/cgi.sh
deleted file mode 100755
index 7a19a10..0000000
--- a/cgi.sh
+++ /dev/null
@@ -1,61 +0,0 @@
-#!/bin/zsh
-
-# Copyright 2014 Paul Hänsch
-#
-# This file is part of Confetti.
-# 
-# Confetti is free software: you can redistribute it and/or modify
-# it under the terms of the GNU Affero General Public License as published by
-# the Free Software Foundation, either version 3 of the License, or
-# (at your option) any later version.
-# 
-# Confetti is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU Affero General Public License for more details.
-# 
-# You should have received a copy of the GNU Affero General Public License
-# along with Confetti.  If not, see <http://www.gnu.org/licenses/>. 
-
-declare -A _GET
-declare -A _POST
-declare -A _REF
-
-[ -z "$HTTP_REFERER" ] && HTTP_REFERER="./"
-
-cgi_get() {  # parse HTTP GET string
-  debug "== CGI DATA: GET =="
-  echo "$QUERY_STRING" |tr '&' '\n' |while read query; do
-    key="$(echo -E "$query" |sed -r 's:^([a-zA-Z0-9_-]*)=(.*)$:\1:')"
-    val="$(echo -E "$query" |sed -r 's:^([a-zA-Z0-9_-]*)=(.*)$:\2:')"
-    _GET["$key"]="$(echo -e "$(echo -E "$val" |sed 's:+: :g;s:\\:\\\\:g;s:%:\\x:g')")"
-    debug "_GET[$key] => $val"
-  done
-}
-
-cgi_post() {  # parse HTTP POST string
-  debug "== CGI DATA: POST =="
-  sed -u 1q |tr '&' '\n' |while read query; do
-    key="$(echo -E "$query" |sed -r 's:^([a-zA-Z0-9_-]*)=(.*)$:\1:')"
-    val="$(echo -E "$query" |sed -r 's:^([a-zA-Z0-9_-]*)=(.*)$:\2:')"
-    value="$(echo -e "$(echo -E "$val" |sed 's:+: :g;s:\\:\\\\:g;s:%:\\x:g;')")"
-    if [ -n "$_POST[\"$key\"]" ]; then
-      n=0
-      while [ -n "$_POST[\"$key$n\"]" ]; do n=$(($n + 1)); done
-      _POST["$key$n"]="$value"
-    else
-      _POST["$key"]="$value"
-    fi
-    debug "_POST[$key] => $value"
-  done
-}
-
-cgi_refdata() { # Parse GET data from referer
-  debug "== CGI DATA: REFERER =="
-  echo "$HTTP_REFERER" |cut -d'?' -f2- |tr '&' '\n' |while read query; do
-    key="$(echo -E "$query" |sed -r 's:^([a-zA-Z0-9_-]*)=(.*)$:\1:')"
-    val="$(echo -E "$query" |sed -r 's:^([a-zA-Z0-9_-]*)=(.*)$:\2:')"
-    _REF["$key"]="$(echo -e "$(echo -E "$val" |sed 's:+: :g;s:\\:\\\\:g;s:%:\\x:g')")"
-    debug "_REF[$key] => $val"
-  done
-}