s4: s4.cgi.m4 annotate

s4

Forget s4.cgi

author	HIROSE Yuuji <yuuji@gentei.org>
date	Sat, 06 Apr 2019 17:59:01 +0900
parents	15d7f2d34e6a
children

rev	line source
yuuji@89	1 `#'!m4_indir(`_SHELL_')
yuuji@524	2 # 愛 - __NOEDIT__
yuuji@89	3 m4_changequote(``,'')mydir=`dirname $0`
yuuji@89	4 . $mydir/s4-funcs.sh
yuuji@524	5 : ${S4TYPE:?Set \$S4TYPE in s4-config.sh to one of sns/basic1/default}
yuuji@89	6
yuuji@89	7 cgiinit
yuuji@89	8 if [ -z "$guestonlymode" ]; then
yuuji@89	9 if [ x"$1" = x"reg" ]; then
yuuji@89	10 contenttype; echo
yuuji@89	11 regist $2
yuuji@89	12 putfooter
yuuji@89	13 exit
yuuji@89	14 fi
yuuji@89	15
yuuji@89	16 dologin
yuuji@89	17 fi
yuuji@89	18
yuuji@89	19 case ${SERVER_SOFTWARE} in
yuuji@89	20 bozohttp*) # Ugly workaround for bozohttpd, which can't send
yuuji@89	21 # two or more arguments.
yuuji@89	22 set -- `echo "$@"\|(IFS=+ read a b c d e f g; echo $a $b $c $d $e $f $g)`
yuuji@89	23 ;;
yuuji@89	24 esac
yuuji@89	25
yuuji@89	26 # err 1=$1 2=$2 3=$3 4=$4
yuuji@89	27 stage=`getpar stage`
yuuji@89	28 stage=${stage:-$1}
yuuji@524	29 . scripts/s4-$S4TYPE.case
yuuji@89	30
yuuji@89	31 putfooter