X-Git-Url: http://git.plutz.net/?p=busy;a=blobdiff_plain;f=Wiki.page;fp=Wiki.page;h=0000000000000000000000000000000000000000;hp=07055b3c15f2a78d8f9cdd37b23a08414a0f8386;hb=f485895094cd72318b46f39689c3ba954eb37411;hpb=904730d1782749bfac15b0344fe5782433f3099b diff --git a/Wiki.page b/Wiki.page deleted file mode 100755 index 07055b3..0000000 --- a/Wiki.page +++ /dev/null @@ -1,183 +0,0 @@ -#!/bin/zsh - -info="$(egrep -o '(^|&)(i=)[0-9]{10}_[0-9]{3}(&|$)' <<<"${QUERY_STRING}" |tr -d '&i=')" -edit="$(egrep -o '(^|&)(e=)[0-9]{10}_[0-9]{3}(&|$)' <<<"${QUERY_STRING}" |tr -d '&e=')" -rev="$(egrep -o '(^|&)(r=)[0-9]{10}(&|$)' <<<"${QUERY_STRING}" |tr -d '&r=')" -search="$(egrep -o '(^|&)(s=).+(&|$)' <<<"${QUERY_STRING}" |sed -r 's:^&?s=::;s:\+: :g;s:%:\\x:g')" -search="$(echo -e "${search}" |sed 's:\t: :g;s:\r::g;s:\\:\\\\:g' |head -n1)" - -[ -n "$rev" ] && rev=".$rev" -if [ -n "$search" ]; then - info='' - edit='' - rev='' -fi - -lock="Wiki/$info.lock" -[ -r "$lock" -o -n "$lock" ] && if [ "$(cut -d: -f2 "$lock")" -lt "$(date +%s)" ]; then - rm "$lock" - lock='' -else - lock="$(cut -d: -f1 "$lock")" -fi - -if [ -n "$edit" -a -r "Wiki/${edit}${rev}" ]; then - title="$(egrep -x 'title=.+' "Wiki/$edit.meta" |cut -d= -f2- || echo '(Untitled)')" - cat < -
- Editing $title
- - -
-
-
-
-

$title

- -
-
- - -WikiEND - -elif [ -n "$info" -a -r "Wiki/${info}${rev}" ]; then - title="$(egrep -x 'title=.+' "Wiki/$info.meta" |cut -d= -f2- || echo '(Untitled)')" - - cat < -
- -
- -
-
- - Revisions: - $(rno=1; for each in Wiki/$info.<0000000000-9999999999>; do - revi=$(cut -d. -f2 <<<"$each") - echo "$rno" - rno=$(($rno+1)) - done) Latest
-
- $($LOGIN && if [ -z "$lock" ]; then - [ -z "$rev" ] && echo "edit this page" - [ -n "$rev" ] && echo "Click edit to derive a new page revision from this one." - else - echo "This page is currently being edited by $lockedit anyway" - fi - $LOGIN && echo '
') -

Table of Content

-
- $(cat Wiki/"${info}${rev}" |while read line; do - if (egrep -q '^ *!!!' <<<"$line"); then - echo "$(sed 's,^ *!!!,,' <<<"$line")
" - elif (egrep -q '^ *!!' <<<"$line"); then - echo "$(sed 's,^ *!!,,' <<<"$line")
" - elif (egrep -q '^ *!' <<<"$line"); then - echo "$(sed 's,^ *!,,' <<<"$line")
" - fi - done) -
-
- -
-
-

$title

- $(_wiki Wiki/"${info}${rev}") -
-
-WikiEND - - echo '' - -elif [ -z "$info" ]; then - cat < -
- -
- -
-
-WikiEND - if [ -n "$search" ]; then - echo "

Wiki search results for: $search

" - for each in $(grep -ile "$search" Wiki/<0000000000-9999999999>_<000-999>); do - echo "

$(grep '^title=' "$each.meta" |cut -d= -f2-)

" - grep -C1 -ie "$search" "$each" |sed "s:$search:&:g;s:$:
:g" - echo '
' - done - echo '
' - fi - echo '
' - - stat -c '' Wiki/<0000000000-9999999999>_<000-999> && for each in Wiki/<0000000000-9999999999>_<000-999>; do - info=$(sed 's,Wiki/,,' <<<"$each") - title="$(egrep -x 'title=.+' "$each.meta" |cut -d= -f2- || echo '(Untitled)')" - description="$(egrep -x 'description=.+' "$each.meta" |cut -d= -f2-)" - owner="$(egrep -x 'owner=.+' "$each.meta" |cut -d= -f2-)" - - cat < -
-

$title

 - $description

- View - $($ACL_WIKIEDIT && echo "Change Info") -
-WikiEND - $ACL_WIKIEDIT && cat <
-WikiEND - echo '' - done - echo '' -fi