s4

changeset 89:15d7f2d34e6a

find changesets by author, revision, files, or words in the commit message
s4.cgi.m4 added
author HIROSE Yuuji <yuuji@gentei.org>
date Mon, 03 Aug 2015 17:38:36 +0900
parents e475a74e2699
children 883c455093ac
files s4.cgi.m4
diffstat 1 files changed, 31 insertions(+), 0 deletions(-) [+]
line diff
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/s4.cgi.m4	Mon Aug 03 17:38:36 2015 +0900
     1.3 @@ -0,0 +1,31 @@
     1.4 +`#'!m4_indir(`_SHELL_')
     1.5 +# 愛
     1.6 +m4_changequote(``,'')mydir=`dirname $0`
     1.7 +. $mydir/s4-funcs.sh
     1.8 +
     1.9 +cgiinit
    1.10 +if [ -z "$guestonlymode" ]; then
    1.11 +  if [ x"$1" = x"reg" ]; then
    1.12 +    contenttype; echo
    1.13 +    regist $2
    1.14 +    putfooter
    1.15 +    exit
    1.16 +  fi
    1.17 +
    1.18 +  dologin
    1.19 +fi
    1.20 +
    1.21 +case ${SERVER_SOFTWARE} in
    1.22 +  bozohttp*)	# Ugly workaround for bozohttpd, which can't send
    1.23 +    		# two or more arguments.
    1.24 +    set -- `echo "$@"|(IFS=+ read a b c d e f g; echo $a $b $c $d $e $f $g)`
    1.25 +    ;;
    1.26 +esac
    1.27 +
    1.28 +# err 1=$1 2=$2 3=$3 4=$4
    1.29 +stage=`getpar stage`
    1.30 +stage=${stage:-$1}
    1.31 +case ${stage} in
    1.32 +m4_sinclude(_CASE_)esac
    1.33 +
    1.34 +putfooter