ffs

   1 #!/bin/execlineb -WS0
   2
   3 ifelse { test ${#} -eq 0 } {
   4         ${0} u
   5 }
   6         backtick -in progname { basename ${0} } importas -u progname progname
   7         ifelse { test ${progname} = ffm } {
   8                 sv ${1} web-mail
   9         } ifelse { test ${progname} = ffs } {
  10                 sv ${1} web-strict
  11         } ifelse { test ${progname} = ffu } {
  12                 sv ${1} web-UNSAFE
  13         } ifelse { test ${progname} = ffw } {
  14                 sv ${1} web-work
  15         } # else
  16                 fdmove -c 1 2
  17                 foreground { echo ${progname}: unsupported profile }
  18                 exit 1