`#'!m4_indir(`_SHELL_')
# 愛 - __NOEDIT__
m4_changequote(``,'')mydir=`dirname $0`
. $mydir/s4-funcs.sh
: ${S4TYPE:?Set \$S4TYPE in s4-config.sh to one of sns/basic1/default}

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}
. scripts/s4-$S4TYPE.case

putfooter