git.plutz.net Git - shellwiki/blob - macros/newpage

   1 #!/bin/sh
   2
   3 . "$_EXEC/cgilite/cgilite.sh"
   4 . "$_EXEC/acl.sh"
   5 . "$_EXEC/tools.sh"
   6
   7 pattern=./%%s
   8 template=''
   9 label='New Page'
  10
  11 while [ $# -gt 0 ]; do case $1 in
  12   template=*) template="${1#*=}"; shift 1;;
  13   --template) template="$2"; shift 2;;
  14   label=*) label="${1#*=}"; shift 1;;
  15   --label) label="$2"; shift 2;;
  16   *) pattern="$1"; shift 1;;
  17 esac; done
  18
  19 if acl_write "$(page_abs "$pattern")"; then
  20   cat <<-EOF
  21         <form class="macro newpage" method=POST action="[newpage]">
  22           <input type=hidden name=pattern value="$(HTML "$pattern")">
  23           <input type=hidden name=template value="$(HTML "$template")">
  24           $([ ! "${pattern##*%%s*}" ] \
  25             && printf '<input name=page placeholder="page name">'
  26           )<button type=submit name=action value=newpage>$(HTML "$label")</button>
  27         </form>
  28         EOF
  29 fi