# HG changeset patch # User HIROSE Yuuji # Date 1438591116 -32400 # Node ID 15d7f2d34e6a9d1284107a69ea5d66b7cad587c8 # Parent e475a74e2699b5689ba2024aeb8457cc7ef5c8ca s4.cgi.m4 added diff -r e475a74e2699 -r 15d7f2d34e6a s4.cgi.m4 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/s4.cgi.m4 Mon Aug 03 17:38:36 2015 +0900 @@ -0,0 +1,31 @@ +`#'!m4_indir(`_SHELL_') +# 愛 +m4_changequote(``,'')mydir=`dirname $0` +. $mydir/s4-funcs.sh + +cgiinit +if [ -z "$guestonlymode" ]; then + if [ x"$1" = x"reg" ]; then + contenttype; echo + regist $2 + putfooter + exit + fi + + dologin +fi + +case ${SERVER_SOFTWARE} in + bozohttp*) # Ugly workaround for bozohttpd, which can't send + # two or more arguments. + set -- `echo "$@"|(IFS=+ read a b c d e f g; echo $a $b $c $d $e $f $g)` + ;; +esac + +# err 1=$1 2=$2 3=$3 4=$4 +stage=`getpar stage` +stage=${stage:-$1} +case ${stage} in +m4_sinclude(_CASE_)esac + +putfooter