Hex Artifact Content
Not logged in

Artifact c34537ff45231689368a418d5046f513731f1f3b:

File src/wiki.c part of check-in [61ce5e3685] - Get rid of the "locking" capability on wiki pages. Assume that anybody who can write or append to a wiki page can do so to any wiki page. Add the /wikiappend page for appending comments to the end of wiki. by drh on 2007-10-10 23:10:48.

0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20  /*.** Copyright 
0010: 28 63 29 20 32 30 30 37 20 44 2e 20 52 69 63 68  (c) 2007 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54  ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66  his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f  ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75  u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20  te it and/or.** 
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20  modify it under 
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65  the terms of the
0090: 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62   GNU General Pub
00a0: 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 76  lic.** License v
00b0: 65 72 73 69 6f 6e 20 32 20 61 73 20 70 75 62 6c  ersion 2 as publ
00c0: 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65  ished by the Fre
00d0: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
00e0: 61 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68 69  ation..**.** Thi
00f0: 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73  s program is dis
0100: 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20  tributed in the 
0110: 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c  hope that it wil
0120: 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20  l be useful,.** 
0130: 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20  but WITHOUT ANY 
0140: 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75  WARRANTY; withou
0150: 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69  t even the impli
0160: 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a  ed warranty of.*
0170: 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54  * MERCHANTABILIT
0180: 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52  Y or FITNESS FOR
0190: 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55   A PARTICULAR PU
01a0: 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20  RPOSE.  See the 
01b0: 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20 50  GNU.** General P
01c0: 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f  ublic License fo
01d0: 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a  r more details..
01e0: 2a 2a 20 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 6c  ** .** You shoul
01f0: 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20  d have received 
0200: 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e  a copy of the GN
0210: 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63  U General Public
0220: 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e  .** License alon
0230: 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72  g with this libr
0240: 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69  ary; if not, wri
0250: 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65  te to the.** Fre
0260: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
0270: 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20  ation, Inc., 59 
0280: 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53  Temple Place - S
0290: 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73  uite 330,.** Bos
02a0: 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31  ton, MA  02111-1
02b0: 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20  307, USA..**.** 
02c0: 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69  Author contact i
02d0: 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20  nformation:.**  
02e0: 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a   drh@hwaci.com.*
02f0: 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68  *   http://www.h
0300: 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a  waci.com/drh/.**
0310: 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  .***************
0320: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0330: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0340: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0350: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0360: 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69 6c 65  .**.** This file
0370: 20 63 6f 6e 74 61 69 6e 73 20 63 6f 64 65 20 74   contains code t
0380: 6f 20 64 6f 20 66 6f 72 6d 61 74 74 69 6e 67 20  o do formatting 
0390: 6f 66 20 77 69 6b 69 20 74 65 78 74 2e 0a 2a 2f  of wiki text..*/
03a0: 0a 23 69 6e 63 6c 75 64 65 20 3c 61 73 73 65 72  .#include <asser
03b0: 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 22 63  t.h>.#include "c
03c0: 6f 6e 66 69 67 2e 68 22 0a 23 69 6e 63 6c 75 64  onfig.h".#includ
03d0: 65 20 22 77 69 6b 69 2e 68 22 0a 0a 2f 2a 0a 2a  e "wiki.h"../*.*
03e0: 2a 20 52 65 74 75 72 6e 20 74 72 75 65 20 69 66  * Return true if
03f0: 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e   the input strin
0400: 67 20 69 73 20 61 20 77 65 6c 6c 2d 66 6f 72 6d  g is a well-form
0410: 65 64 20 77 69 6b 69 20 70 61 67 65 20 6e 61 6d  ed wiki page nam
0420: 65 2e 0a 2a 2a 0a 2a 2a 20 57 65 6c 6c 2d 66 6f  e..**.** Well-fo
0430: 72 6d 65 64 20 77 69 6b 69 20 70 61 67 65 20 6e  rmed wiki page n
0440: 61 6d 65 73 20 64 6f 20 6e 6f 74 20 62 65 67 69  ames do not begi
0450: 6e 20 6f 72 20 65 6e 64 20 77 69 74 68 20 77 68  n or end with wh
0460: 69 74 65 73 70 61 63 65 2c 0a 2a 2a 20 61 6e 64  itespace,.** and
0470: 20 64 6f 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20   do not contain 
0480: 74 61 62 73 20 6f 72 20 6f 74 68 65 72 20 63 6f  tabs or other co
0490: 6e 74 72 6f 6c 20 63 68 61 72 61 63 74 65 72 73  ntrol characters
04a0: 20 61 6e 64 20 64 6f 20 6e 6f 74 0a 2a 2a 20 63   and do not.** c
04b0: 6f 6e 74 61 69 6e 20 6d 6f 72 65 20 74 68 61 6e  ontain more than
04c0: 20 61 20 73 69 6e 67 6c 65 20 73 70 61 63 65 20   a single space 
04d0: 63 68 61 72 61 63 74 65 72 20 69 6e 20 61 20 72  character in a r
04e0: 6f 77 2e 20 20 57 65 6c 6c 2d 66 6f 72 6d 65 64  ow.  Well-formed
04f0: 0a 2a 2a 20 6e 61 6d 65 73 20 6d 75 73 74 20 62  .** names must b
0500: 65 20 62 65 74 77 65 65 6e 20 33 20 61 6e 64 20  e between 3 and 
0510: 31 30 30 20 63 68 72 61 63 74 65 72 73 20 69 6e  100 chracters in
0520: 20 6c 65 6e 67 74 68 2c 20 69 6e 63 6c 75 73 69   length, inclusi
0530: 76 65 2e 0a 2a 2f 0a 69 6e 74 20 77 69 6b 69 5f  ve..*/.int wiki_
0540: 6e 61 6d 65 5f 69 73 5f 77 65 6c 6c 66 6f 72 6d  name_is_wellform
0550: 65 64 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  ed(const char *z
0560: 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69 66  ){.  int i;.  if
0570: 28 20 7a 5b 30 5d 3c 3d 30 78 32 30 20 29 7b 0a  ( z[0]<=0x20 ){.
0580: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20      return 0;.  
0590: 7d 0a 20 20 66 6f 72 28 69 3d 31 3b 20 7a 5b 69  }.  for(i=1; z[i
05a0: 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28  ]; i++){.    if(
05b0: 20 7a 5b 69 5d 3c 30 78 32 30 20 29 20 72 65 74   z[i]<0x20 ) ret
05c0: 75 72 6e 20 30 3b 0a 20 20 20 20 69 66 28 20 7a  urn 0;.    if( z
05d0: 5b 69 5d 3d 3d 30 78 32 30 20 26 26 20 7a 5b 69  [i]==0x20 && z[i
05e0: 2d 31 5d 3d 3d 30 78 32 30 20 29 20 72 65 74 75  -1]==0x20 ) retu
05f0: 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20  rn 0;.  }.  if( 
0600: 7a 5b 69 2d 31 5d 3d 3d 27 20 27 20 29 20 72 65  z[i-1]==' ' ) re
0610: 74 75 72 6e 20 30 3b 0a 20 20 69 66 28 20 69 3c  turn 0;.  if( i<
0620: 33 20 7c 7c 20 69 3e 31 30 30 20 29 20 72 65 74  3 || i>100 ) ret
0630: 75 72 6e 20 30 3b 0a 20 20 72 65 74 75 72 6e 20  urn 0;.  return 
0640: 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68 65 63  1;.}../*.** Chec
0650: 6b 20 61 20 77 69 6b 69 20 6e 61 6d 65 2e 20 20  k a wiki name.  
0660: 49 66 20 69 74 20 69 73 20 6e 6f 74 20 77 65 6c  If it is not wel
0670: 6c 2d 66 6f 72 6d 65 64 2c 20 74 68 65 6e 20 69  l-formed, then i
0680: 73 73 75 65 20 61 6e 20 65 72 72 6f 72 0a 2a 2a  ssue an error.**
0690: 20 61 6e 64 20 72 65 74 75 72 6e 20 74 72 75 65   and return true
06a0: 2e 20 20 49 66 20 69 74 20 69 73 20 77 65 6c 6c  .  If it is well
06b0: 2d 66 6f 72 6d 65 64 2c 20 72 65 74 75 72 6e 20  -formed, return 
06c0: 66 61 6c 73 65 2e 0a 2a 2f 0a 73 74 61 74 69 63  false..*/.static
06d0: 20 69 6e 74 20 63 68 65 63 6b 5f 6e 61 6d 65 28   int check_name(
06e0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 29 7b 0a  const char *z){.
06f0: 20 20 69 66 28 20 21 77 69 6b 69 5f 6e 61 6d 65    if( !wiki_name
0700: 5f 69 73 5f 77 65 6c 6c 66 6f 72 6d 65 64 28 7a  _is_wellformed(z
0710: 29 20 29 7b 0a 20 20 20 20 73 74 79 6c 65 5f 68  ) ){.    style_h
0720: 65 61 64 65 72 28 22 57 69 6b 69 20 50 61 67 65  eader("Wiki Page
0730: 20 4e 61 6d 65 20 45 72 72 6f 72 22 29 3b 0a 20   Name Error");. 
0740: 20 20 20 40 20 54 68 65 20 77 69 6b 69 20 6e 61     @ The wiki na
0750: 6d 65 20 22 3c 62 3e 25 68 28 7a 29 3c 2f 62 3e  me "<b>%h(z)</b>
0760: 22 20 69 73 20 6e 6f 74 20 77 65 6c 6c 2d 66 6f  " is not well-fo
0770: 72 6d 65 64 2e 20 20 52 75 6c 65 73 20 66 6f 72  rmed.  Rules for
0780: 0a 20 20 20 20 40 20 77 69 6b 69 20 70 61 67 65  .    @ wiki page
0790: 20 6e 61 6d 65 73 3a 0a 20 20 20 20 40 20 3c 75   names:.    @ <u
07a0: 6c 3e 0a 20 20 20 20 40 20 3c 6c 69 3e 20 4d 75  l>.    @ <li> Mu
07b0: 73 74 20 6e 6f 74 20 62 65 67 69 6e 20 6f 72 20  st not begin or 
07c0: 65 6e 64 20 77 69 74 68 20 61 20 73 70 61 63 65  end with a space
07d0: 2e 0a 20 20 20 20 40 20 3c 6c 69 3e 20 4d 75 73  ..    @ <li> Mus
07e0: 74 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20 61 6e  t not contain an
07f0: 79 20 63 6f 6e 74 72 6f 6c 20 63 68 61 72 61 63  y control charac
0800: 74 65 72 73 2c 20 69 6e 63 6c 75 64 69 6e 67 20  ters, including 
0810: 74 61 62 20 6f 72 0a 20 20 20 20 40 20 20 20 20  tab or.    @    
0820: 20 20 6e 65 77 6c 69 6e 65 2e 0a 20 20 20 20 40    newline..    @
0830: 20 3c 6c 69 3e 20 4d 75 73 74 20 6e 6f 74 20 68   <li> Must not h
0840: 61 76 65 20 74 77 6f 20 6f 72 20 6d 6f 72 65 20  ave two or more 
0850: 73 70 61 63 65 73 20 69 6e 20 61 20 72 6f 77 20  spaces in a row 
0860: 69 6e 74 65 72 6e 61 6c 6c 79 2e 0a 20 20 20 20  internally..    
0870: 40 20 3c 6c 69 3e 20 4d 75 73 74 20 62 65 20 62  @ <li> Must be b
0880: 65 74 77 65 65 6e 20 33 20 61 6e 64 20 31 30 30  etween 3 and 100
0890: 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 20 6c   characters in l
08a0: 65 6e 67 74 68 2e 0a 20 20 20 20 40 20 3c 2f 75  ength..    @ </u
08b0: 6c 3e 0a 20 20 20 20 73 74 79 6c 65 5f 66 6f 6f  l>.    style_foo
08c0: 74 65 72 28 29 3b 0a 20 20 20 20 72 65 74 75 72  ter();.    retur
08d0: 6e 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72  n 1;.  }.  retur
08e0: 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45  n 0;.}../*.** WE
08f0: 42 50 41 47 45 3a 20 68 6f 6d 65 0a 2a 2a 20 57  BPAGE: home.** W
0900: 45 42 50 41 47 45 3a 20 69 6e 64 65 78 0a 2a 2a  EBPAGE: index.**
0910: 20 57 45 42 50 41 47 45 3a 20 6e 6f 74 5f 66 6f   WEBPAGE: not_fo
0920: 75 6e 64 0a 2a 2f 0a 76 6f 69 64 20 68 6f 6d 65  und.*/.void home
0930: 5f 70 61 67 65 28 76 6f 69 64 29 7b 0a 20 20 63  _page(void){.  c
0940: 68 61 72 20 2a 7a 50 61 67 65 4e 61 6d 65 20 3d  har *zPageName =
0950: 20 64 62 5f 67 65 74 28 22 70 72 6f 6a 65 63 74   db_get("project
0960: 2d 6e 61 6d 65 22 2c 30 29 3b 0a 20 20 69 66 28  -name",0);.  if(
0970: 20 7a 50 61 67 65 4e 61 6d 65 20 29 7b 0a 20 20   zPageName ){.  
0980: 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72    login_check_cr
0990: 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 20  edentials();.   
09a0: 20 67 2e 7a 45 78 74 72 61 20 3d 20 7a 50 61 67   g.zExtra = zPag
09b0: 65 4e 61 6d 65 3b 0a 20 20 20 20 67 2e 6f 6b 52  eName;.    g.okR
09c0: 64 57 69 6b 69 20 3d 20 31 3b 0a 20 20 20 20 67  dWiki = 1;.    g
09d0: 2e 6f 6b 41 70 6e 64 57 69 6b 69 20 3d 20 30 3b  .okApndWiki = 0;
09e0: 0a 20 20 20 20 67 2e 6f 6b 57 72 57 69 6b 69 20  .    g.okWrWiki 
09f0: 3d 20 30 3b 0a 20 20 20 20 67 2e 6f 6b 48 69 73  = 0;.    g.okHis
0a00: 74 6f 72 79 20 3d 20 30 3b 0a 20 20 20 20 77 69  tory = 0;.    wi
0a10: 6b 69 5f 70 61 67 65 28 29 3b 0a 20 20 20 20 72  ki_page();.    r
0a20: 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 73 74 79  eturn;.  }.  sty
0a30: 6c 65 5f 68 65 61 64 65 72 28 22 48 6f 6d 65 22  le_header("Home"
0a40: 29 3b 0a 20 20 40 20 3c 70 3e 54 68 69 73 20 69  );.  @ <p>This i
0a50: 73 20 61 20 73 74 75 62 20 68 6f 6d 65 2d 70 61  s a stub home-pa
0a60: 67 65 20 66 6f 72 20 74 68 65 20 70 72 6f 6a 65  ge for the proje
0a70: 63 74 2e 0a 20 20 40 20 54 6f 20 66 69 6c 6c 20  ct..  @ To fill 
0a80: 69 6e 20 74 68 69 73 20 70 61 67 65 2c 20 66 69  in this page, fi
0a90: 72 73 74 20 67 6f 20 74 6f 0a 20 20 40 20 3c 61  rst go to.  @ <a
0aa0: 20 68 72 65 66 3d 22 25 73 28 67 2e 7a 42 61 73   href="%s(g.zBas
0ab0: 65 55 52 4c 29 2f 73 65 74 75 70 5f 63 6f 6e 66  eURL)/setup_conf
0ac0: 69 67 22 3e 73 65 74 75 70 2f 63 6f 6e 66 69 67  ig">setup/config
0ad0: 3c 2f 61 3e 0a 20 20 40 20 61 6e 64 20 65 73 74  </a>.  @ and est
0ae0: 61 62 6c 69 73 68 20 61 20 22 50 72 6f 6a 65 63  ablish a "Projec
0af0: 74 20 4e 61 6d 65 22 2e 20 20 54 68 65 6e 20 63  t Name".  Then c
0b00: 72 65 61 74 65 20 61 0a 20 20 40 20 77 69 6b 69  reate a.  @ wiki
0b10: 20 70 61 67 65 20 77 69 74 68 20 74 68 61 74 20   page with that 
0b20: 6e 61 6d 65 2e 20 20 54 68 65 20 63 6f 6e 74 65  name.  The conte
0b30: 6e 74 20 6f 66 20 74 68 61 74 20 77 69 6b 69 20  nt of that wiki 
0b40: 70 61 67 65 0a 20 20 40 20 77 69 6c 6c 20 62 65  page.  @ will be
0b50: 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20 70 6c   displayed in pl
0b60: 61 63 65 20 6f 66 20 74 68 69 73 20 6d 65 73 73  ace of this mess
0b70: 61 67 65 2e 0a 20 20 73 74 79 6c 65 5f 66 6f 6f  age..  style_foo
0b80: 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  ter();.}../*.** 
0b90: 57 45 42 50 41 47 45 3a 20 77 69 6b 69 0a 2a 2a  WEBPAGE: wiki.**
0ba0: 20 55 52 4c 3a 20 2f 77 69 6b 69 2f 50 41 47 45   URL: /wiki/PAGE
0bb0: 4e 41 4d 45 0a 2a 2f 0a 76 6f 69 64 20 77 69 6b  NAME.*/.void wik
0bc0: 69 5f 70 61 67 65 28 76 6f 69 64 29 7b 0a 20 20  i_page(void){.  
0bd0: 63 68 61 72 20 2a 7a 54 61 67 3b 0a 20 20 69 6e  char *zTag;.  in
0be0: 74 20 72 69 64 3b 0a 20 20 42 6c 6f 62 20 77 69  t rid;.  Blob wi
0bf0: 6b 69 3b 0a 20 20 4d 61 6e 69 66 65 73 74 20 6d  ki;.  Manifest m
0c00: 3b 0a 20 20 63 68 61 72 20 2a 7a 50 61 67 65 4e  ;.  char *zPageN
0c10: 61 6d 65 3b 0a 20 20 63 68 61 72 20 2a 7a 48 74  ame;.  char *zHt
0c20: 6d 6c 50 61 67 65 4e 61 6d 65 3b 0a 20 20 63 68  mlPageName;.  ch
0c30: 61 72 20 2a 7a 42 6f 64 79 20 3d 20 6d 70 72 69  ar *zBody = mpri
0c40: 6e 74 66 28 22 25 73 22 2c 22 3c 69 3e 45 6d 70  ntf("%s","<i>Emp
0c50: 74 79 20 50 61 67 65 3c 2f 69 3e 22 29 3b 0a 0a  ty Page</i>");..
0c60: 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72    login_check_cr
0c70: 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69  edentials();.  i
0c80: 66 28 20 21 67 2e 6f 6b 52 64 57 69 6b 69 20 29  f( !g.okRdWiki )
0c90: 7b 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29  { login_needed()
0ca0: 3b 20 72 65 74 75 72 6e 3b 20 7d 0a 20 20 7a 50  ; return; }.  zP
0cb0: 61 67 65 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74  ageName = mprint
0cc0: 66 28 22 25 73 22 2c 20 67 2e 7a 45 78 74 72 61  f("%s", g.zExtra
0cd0: 29 3b 0a 20 20 64 65 68 74 74 70 69 7a 65 28 7a  );.  dehttpize(z
0ce0: 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20 69 66 28  PageName);.  if(
0cf0: 20 63 68 65 63 6b 5f 6e 61 6d 65 28 7a 50 61 67   check_name(zPag
0d00: 65 4e 61 6d 65 29 20 29 20 72 65 74 75 72 6e 3b  eName) ) return;
0d10: 0a 20 20 7a 54 61 67 20 3d 20 6d 70 72 69 6e 74  .  zTag = mprint
0d20: 66 28 22 77 69 6b 69 2d 25 73 22 2c 20 7a 50 61  f("wiki-%s", zPa
0d30: 67 65 4e 61 6d 65 29 3b 0a 20 20 72 69 64 20 3d  geName);.  rid =
0d40: 20 64 62 5f 69 6e 74 28 30 2c 20 0a 20 20 20 20   db_int(0, .    
0d50: 22 53 45 4c 45 43 54 20 72 69 64 20 46 52 4f 4d  "SELECT rid FROM
0d60: 20 74 61 67 78 72 65 66 22 0a 20 20 20 20 22 20   tagxref".    " 
0d70: 57 48 45 52 45 20 74 61 67 69 64 3d 28 53 45 4c  WHERE tagid=(SEL
0d80: 45 43 54 20 74 61 67 69 64 20 46 52 4f 4d 20 74  ECT tagid FROM t
0d90: 61 67 20 57 48 45 52 45 20 74 61 67 6e 61 6d 65  ag WHERE tagname
0da0: 3d 25 51 29 22 0a 20 20 20 20 22 20 4f 52 44 45  =%Q)".    " ORDE
0db0: 52 20 42 59 20 6d 74 69 6d 65 20 44 45 53 43 22  R BY mtime DESC"
0dc0: 2c 20 7a 54 61 67 0a 20 20 29 3b 0a 20 20 66 72  , zTag.  );.  fr
0dd0: 65 65 28 7a 54 61 67 29 3b 0a 20 20 6d 65 6d 73  ee(zTag);.  mems
0de0: 65 74 28 26 6d 2c 20 30 2c 20 73 69 7a 65 6f 66  et(&m, 0, sizeof
0df0: 28 6d 29 29 3b 0a 20 20 62 6c 6f 62 5f 7a 65 72  (m));.  blob_zer
0e00: 6f 28 26 6d 2e 63 6f 6e 74 65 6e 74 29 3b 0a 20  o(&m.content);. 
0e10: 20 69 66 28 20 72 69 64 20 29 7b 0a 20 20 20 20   if( rid ){.    
0e20: 42 6c 6f 62 20 63 6f 6e 74 65 6e 74 3b 0a 20 20  Blob content;.  
0e30: 20 20 63 6f 6e 74 65 6e 74 5f 67 65 74 28 72 69    content_get(ri
0e40: 64 2c 20 26 63 6f 6e 74 65 6e 74 29 3b 0a 20 20  d, &content);.  
0e50: 20 20 6d 61 6e 69 66 65 73 74 5f 70 61 72 73 65    manifest_parse
0e60: 28 26 6d 2c 20 26 63 6f 6e 74 65 6e 74 29 3b 0a  (&m, &content);.
0e70: 20 20 20 20 69 66 28 20 6d 2e 74 79 70 65 3d 3d      if( m.type==
0e80: 43 46 54 59 50 45 5f 57 49 4b 49 20 29 7b 0a 20  CFTYPE_WIKI ){. 
0e90: 20 20 20 20 20 7a 42 6f 64 79 20 3d 20 6d 2e 7a       zBody = m.z
0ea0: 57 69 6b 69 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  Wiki;.    }.  }.
0eb0: 20 20 69 66 28 20 28 72 69 64 20 26 26 20 67 2e    if( (rid && g.
0ec0: 6f 6b 57 72 57 69 6b 69 29 20 7c 7c 20 28 21 72  okWrWiki) || (!r
0ed0: 69 64 20 26 26 20 67 2e 6f 6b 4e 65 77 57 69 6b  id && g.okNewWik
0ee0: 69 29 20 29 7b 0a 20 20 20 20 73 74 79 6c 65 5f  i) ){.    style_
0ef0: 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e 74 28  submenu_element(
0f00: 22 45 64 69 74 22 2c 20 22 45 64 69 74 20 57 69  "Edit", "Edit Wi
0f10: 6b 69 20 50 61 67 65 22 2c 20 0a 20 20 20 20 20  ki Page", .     
0f20: 20 20 6d 70 72 69 6e 74 66 28 22 25 73 2f 77 69    mprintf("%s/wi
0f30: 6b 69 65 64 69 74 2f 25 73 22 2c 20 67 2e 7a 54  kiedit/%s", g.zT
0f40: 6f 70 2c 20 67 2e 7a 45 78 74 72 61 29 29 3b 0a  op, g.zExtra));.
0f50: 20 20 7d 0a 20 20 69 66 28 20 72 69 64 20 26 26    }.  if( rid &&
0f60: 20 67 2e 6f 6b 41 70 6e 64 57 69 6b 69 20 29 7b   g.okApndWiki ){
0f70: 0a 20 20 20 20 73 74 79 6c 65 5f 73 75 62 6d 65  .    style_subme
0f80: 6e 75 5f 65 6c 65 6d 65 6e 74 28 22 41 70 70 65  nu_element("Appe
0f90: 6e 64 22 2c 20 22 41 64 64 20 41 20 43 6f 6d 6d  nd", "Add A Comm
0fa0: 65 6e 74 22 2c 20 0a 20 20 20 20 20 20 20 6d 70  ent", .       mp
0fb0: 72 69 6e 74 66 28 22 25 73 2f 77 69 6b 69 61 70  rintf("%s/wikiap
0fc0: 70 65 6e 64 2f 25 73 22 2c 20 67 2e 7a 54 6f 70  pend/%s", g.zTop
0fd0: 2c 20 67 2e 7a 45 78 74 72 61 29 29 3b 0a 20 20  , g.zExtra));.  
0fe0: 7d 0a 20 20 69 66 28 20 67 2e 6f 6b 48 69 73 74  }.  if( g.okHist
0ff0: 6f 72 79 20 29 7b 0a 20 20 20 20 73 74 79 6c 65  ory ){.    style
1000: 5f 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e 74  _submenu_element
1010: 28 22 48 69 73 74 6f 72 79 22 2c 20 22 48 69 73  ("History", "His
1020: 74 6f 72 79 22 2c 20 0a 20 20 20 20 20 20 20 20  tory", .        
1030: 20 6d 70 72 69 6e 74 66 28 22 25 73 2f 77 68 69   mprintf("%s/whi
1040: 73 74 6f 72 79 2f 25 73 22 2c 20 67 2e 7a 54 6f  story/%s", g.zTo
1050: 70 2c 20 67 2e 7a 45 78 74 72 61 29 29 3b 0a 20  p, g.zExtra));. 
1060: 20 7d 0a 20 20 7a 48 74 6d 6c 50 61 67 65 4e 61   }.  zHtmlPageNa
1070: 6d 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 68  me = mprintf("%h
1080: 22 2c 20 7a 50 61 67 65 4e 61 6d 65 29 3b 0a 20  ", zPageName);. 
1090: 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 7a 48   style_header(zH
10a0: 74 6d 6c 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20  tmlPageName);.  
10b0: 62 6c 6f 62 5f 69 6e 69 74 28 26 77 69 6b 69 2c  blob_init(&wiki,
10c0: 20 7a 42 6f 64 79 2c 20 2d 31 29 3b 0a 20 20 77   zBody, -1);.  w
10d0: 69 6b 69 5f 63 6f 6e 76 65 72 74 28 26 77 69 6b  iki_convert(&wik
10e0: 69 2c 20 30 29 3b 0a 20 20 62 6c 6f 62 5f 72 65  i, 0);.  blob_re
10f0: 73 65 74 28 26 77 69 6b 69 29 3b 0a 20 20 6d 61  set(&wiki);.  ma
1100: 6e 69 66 65 73 74 5f 63 6c 65 61 72 28 26 6d 29  nifest_clear(&m)
1110: 3b 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72  ;.  style_footer
1120: 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42  ();.}../*.** WEB
1130: 50 41 47 45 3a 20 77 69 6b 69 65 64 69 74 0a 2a  PAGE: wikiedit.*
1140: 2a 20 55 52 4c 3a 20 2f 77 69 6b 69 65 64 69 74  * URL: /wikiedit
1150: 2f 50 41 47 45 4e 41 4d 45 0a 2a 2f 0a 76 6f 69  /PAGENAME.*/.voi
1160: 64 20 77 69 6b 69 65 64 69 74 5f 70 61 67 65 28  d wikiedit_page(
1170: 76 6f 69 64 29 7b 0a 20 20 63 68 61 72 20 2a 7a  void){.  char *z
1180: 54 61 67 3b 0a 20 20 69 6e 74 20 72 69 64 3b 0a  Tag;.  int rid;.
1190: 20 20 42 6c 6f 62 20 77 69 6b 69 3b 0a 20 20 4d    Blob wiki;.  M
11a0: 61 6e 69 66 65 73 74 20 6d 3b 0a 20 20 63 68 61  anifest m;.  cha
11b0: 72 20 2a 7a 50 61 67 65 4e 61 6d 65 3b 0a 20 20  r *zPageName;.  
11c0: 63 68 61 72 20 2a 7a 48 74 6d 6c 50 61 67 65 4e  char *zHtmlPageN
11d0: 61 6d 65 3b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20  ame;.  int n;.  
11e0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 3b 0a 20  const char *z;. 
11f0: 20 63 68 61 72 20 2a 7a 42 6f 64 79 20 3d 20 28   char *zBody = (
1200: 63 68 61 72 2a 29 50 28 22 77 22 29 3b 0a 0a 20  char*)P("w");.. 
1210: 20 69 66 28 20 7a 42 6f 64 79 20 29 7b 0a 20 20   if( zBody ){.  
1220: 20 20 7a 42 6f 64 79 20 3d 20 6d 70 72 69 6e 74    zBody = mprint
1230: 66 28 22 25 73 22 2c 20 7a 42 6f 64 79 29 3b 0a  f("%s", zBody);.
1240: 20 20 7d 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63    }.  login_chec
1250: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
1260: 0a 20 20 7a 50 61 67 65 4e 61 6d 65 20 3d 20 6d  .  zPageName = m
1270: 70 72 69 6e 74 66 28 22 25 73 22 2c 20 67 2e 7a  printf("%s", g.z
1280: 45 78 74 72 61 29 3b 0a 20 20 64 65 68 74 74 70  Extra);.  dehttp
1290: 69 7a 65 28 7a 50 61 67 65 4e 61 6d 65 29 3b 0a  ize(zPageName);.
12a0: 20 20 69 66 28 20 63 68 65 63 6b 5f 6e 61 6d 65    if( check_name
12b0: 28 7a 50 61 67 65 4e 61 6d 65 29 20 29 20 72 65  (zPageName) ) re
12c0: 74 75 72 6e 3b 0a 20 20 7a 54 61 67 20 3d 20 6d  turn;.  zTag = m
12d0: 70 72 69 6e 74 66 28 22 77 69 6b 69 2d 25 73 22  printf("wiki-%s"
12e0: 2c 20 7a 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20  , zPageName);.  
12f0: 72 69 64 20 3d 20 64 62 5f 69 6e 74 28 30 2c 20  rid = db_int(0, 
1300: 0a 20 20 20 20 22 53 45 4c 45 43 54 20 72 69 64  .    "SELECT rid
1310: 20 46 52 4f 4d 20 74 61 67 78 72 65 66 22 0a 20   FROM tagxref". 
1320: 20 20 20 22 20 57 48 45 52 45 20 74 61 67 69 64     " WHERE tagid
1330: 3d 28 53 45 4c 45 43 54 20 74 61 67 69 64 20 46  =(SELECT tagid F
1340: 52 4f 4d 20 74 61 67 20 57 48 45 52 45 20 74 61  ROM tag WHERE ta
1350: 67 6e 61 6d 65 3d 25 51 29 22 0a 20 20 20 20 22  gname=%Q)".    "
1360: 20 4f 52 44 45 52 20 42 59 20 6d 74 69 6d 65 20   ORDER BY mtime 
1370: 44 45 53 43 22 2c 20 7a 54 61 67 0a 20 20 29 3b  DESC", zTag.  );
1380: 0a 20 20 66 72 65 65 28 7a 54 61 67 29 3b 0a 20  .  free(zTag);. 
1390: 20 69 66 28 20 28 72 69 64 20 26 26 20 21 67 2e   if( (rid && !g.
13a0: 6f 6b 57 72 57 69 6b 69 29 20 7c 7c 20 28 21 72  okWrWiki) || (!r
13b0: 69 64 20 26 26 20 21 67 2e 6f 6b 4e 65 77 57 69  id && !g.okNewWi
13c0: 6b 69 29 20 29 7b 0a 20 20 20 20 6c 6f 67 69 6e  ki) ){.    login
13d0: 5f 6e 65 65 64 65 64 28 29 3b 0a 20 20 20 20 72  _needed();.    r
13e0: 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 6d 65 6d  eturn;.  }.  mem
13f0: 73 65 74 28 26 6d 2c 20 30 2c 20 73 69 7a 65 6f  set(&m, 0, sizeo
1400: 66 28 6d 29 29 3b 0a 20 20 62 6c 6f 62 5f 7a 65  f(m));.  blob_ze
1410: 72 6f 28 26 6d 2e 63 6f 6e 74 65 6e 74 29 3b 0a  ro(&m.content);.
1420: 20 20 69 66 28 20 72 69 64 20 26 26 20 7a 42 6f    if( rid && zBo
1430: 64 79 3d 3d 30 20 29 7b 0a 20 20 20 20 42 6c 6f  dy==0 ){.    Blo
1440: 62 20 63 6f 6e 74 65 6e 74 3b 0a 20 20 20 20 63  b content;.    c
1450: 6f 6e 74 65 6e 74 5f 67 65 74 28 72 69 64 2c 20  ontent_get(rid, 
1460: 26 63 6f 6e 74 65 6e 74 29 3b 0a 20 20 20 20 6d  &content);.    m
1470: 61 6e 69 66 65 73 74 5f 70 61 72 73 65 28 26 6d  anifest_parse(&m
1480: 2c 20 26 63 6f 6e 74 65 6e 74 29 3b 0a 20 20 20  , &content);.   
1490: 20 69 66 28 20 6d 2e 74 79 70 65 3d 3d 43 46 54   if( m.type==CFT
14a0: 59 50 45 5f 57 49 4b 49 20 29 7b 0a 20 20 20 20  YPE_WIKI ){.    
14b0: 20 20 7a 42 6f 64 79 20 3d 20 6d 2e 7a 57 69 6b    zBody = m.zWik
14c0: 69 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69  i;.    }.  }.  i
14d0: 66 28 20 50 28 22 73 75 62 6d 69 74 22 29 21 3d  f( P("submit")!=
14e0: 30 20 26 26 20 7a 42 6f 64 79 21 3d 30 20 29 7b  0 && zBody!=0 ){
14f0: 0a 20 20 20 20 63 68 61 72 20 2a 7a 44 61 74 65  .    char *zDate
1500: 3b 0a 20 20 20 20 42 6c 6f 62 20 63 6b 73 75 6d  ;.    Blob cksum
1510: 3b 0a 20 20 20 20 69 6e 74 20 6e 72 69 64 3b 0a  ;.    int nrid;.
1520: 20 20 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 26 77      blob_zero(&w
1530: 69 6b 69 29 3b 0a 20 20 20 20 64 62 5f 62 65 67  iki);.    db_beg
1540: 69 6e 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29  in_transaction()
1550: 3b 0a 20 20 20 20 7a 44 61 74 65 20 3d 20 64 62  ;.    zDate = db
1560: 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 54  _text(0, "SELECT
1570: 20 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 29   datetime('now')
1580: 22 29 3b 0a 20 20 20 20 7a 44 61 74 65 5b 31 30  ");.    zDate[10
1590: 5d 20 3d 20 27 54 27 3b 0a 20 20 20 20 62 6c 6f  ] = 'T';.    blo
15a0: 62 5f 61 70 70 65 6e 64 66 28 26 77 69 6b 69 2c  b_appendf(&wiki,
15b0: 20 22 44 20 25 73 5c 6e 22 2c 20 7a 44 61 74 65   "D %s\n", zDate
15c0: 29 3b 0a 20 20 20 20 66 72 65 65 28 7a 44 61 74  );.    free(zDat
15d0: 65 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70  e);.    blob_app
15e0: 65 6e 64 66 28 26 77 69 6b 69 2c 20 22 4c 20 25  endf(&wiki, "L %
15f0: 46 5c 6e 22 2c 20 7a 50 61 67 65 4e 61 6d 65 29  F\n", zPageName)
1600: 3b 0a 20 20 20 20 69 66 28 20 72 69 64 20 29 7b  ;.    if( rid ){
1610: 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a 55 75  .      char *zUu
1620: 69 64 20 3d 20 64 62 5f 74 65 78 74 28 30 2c 20  id = db_text(0, 
1630: 22 53 45 4c 45 43 54 20 75 75 69 64 20 46 52 4f  "SELECT uuid FRO
1640: 4d 20 62 6c 6f 62 20 57 48 45 52 45 20 72 69 64  M blob WHERE rid
1650: 3d 25 64 22 2c 20 72 69 64 29 3b 0a 20 20 20 20  =%d", rid);.    
1660: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26    blob_appendf(&
1670: 77 69 6b 69 2c 20 22 50 20 25 73 5c 6e 22 2c 20  wiki, "P %s\n", 
1680: 7a 55 75 69 64 29 3b 0a 20 20 20 20 20 20 66 72  zUuid);.      fr
1690: 65 65 28 7a 55 75 69 64 29 3b 0a 20 20 20 20 7d  ee(zUuid);.    }
16a0: 0a 20 20 20 20 69 66 28 20 67 2e 7a 4c 6f 67 69  .    if( g.zLogi
16b0: 6e 20 29 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f  n ){.      blob_
16c0: 61 70 70 65 6e 64 66 28 26 77 69 6b 69 2c 20 22  appendf(&wiki, "
16d0: 55 20 25 46 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69  U %F\n", g.zLogi
16e0: 6e 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 62 6c  n);.    }.    bl
16f0: 6f 62 5f 61 70 70 65 6e 64 66 28 26 77 69 6b 69  ob_appendf(&wiki
1700: 2c 20 22 57 20 25 64 5c 6e 25 73 5c 6e 22 2c 20  , "W %d\n%s\n", 
1710: 73 74 72 6c 65 6e 28 7a 42 6f 64 79 29 2c 20 7a  strlen(zBody), z
1720: 42 6f 64 79 29 3b 0a 20 20 20 20 6d 64 35 73 75  Body);.    md5su
1730: 6d 5f 62 6c 6f 62 28 26 77 69 6b 69 2c 20 26 63  m_blob(&wiki, &c
1740: 6b 73 75 6d 29 3b 0a 20 20 20 20 62 6c 6f 62 5f  ksum);.    blob_
1750: 61 70 70 65 6e 64 66 28 26 77 69 6b 69 2c 20 22  appendf(&wiki, "
1760: 5a 20 25 62 5c 6e 22 2c 20 26 63 6b 73 75 6d 29  Z %b\n", &cksum)
1770: 3b 0a 20 20 20 20 62 6c 6f 62 5f 72 65 73 65 74  ;.    blob_reset
1780: 28 26 63 6b 73 75 6d 29 3b 0a 20 20 20 20 6e 72  (&cksum);.    nr
1790: 69 64 20 3d 20 63 6f 6e 74 65 6e 74 5f 70 75 74  id = content_put
17a0: 28 26 77 69 6b 69 2c 20 30 2c 20 30 29 3b 0a 20  (&wiki, 0, 0);. 
17b0: 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63     db_multi_exec
17c0: 28 22 49 4e 53 45 52 54 20 4f 52 20 49 47 4e 4f  ("INSERT OR IGNO
17d0: 52 45 20 49 4e 54 4f 20 75 6e 73 65 6e 74 20 56  RE INTO unsent V
17e0: 41 4c 55 45 53 28 25 64 29 22 2c 20 6e 72 69 64  ALUES(%d)", nrid
17f0: 29 3b 0a 20 20 20 20 6d 61 6e 69 66 65 73 74 5f  );.    manifest_
1800: 63 72 6f 73 73 6c 69 6e 6b 28 6e 72 69 64 2c 20  crosslink(nrid, 
1810: 26 77 69 6b 69 29 3b 0a 20 20 20 20 62 6c 6f 62  &wiki);.    blob
1820: 5f 72 65 73 65 74 28 26 77 69 6b 69 29 3b 0a 20  _reset(&wiki);. 
1830: 20 20 20 63 6f 6e 74 65 6e 74 5f 64 65 6c 74 69     content_delti
1840: 66 79 28 72 69 64 2c 20 6e 72 69 64 2c 20 30 29  fy(rid, nrid, 0)
1850: 3b 0a 20 20 20 20 64 62 5f 65 6e 64 5f 74 72 61  ;.    db_end_tra
1860: 6e 73 61 63 74 69 6f 6e 28 30 29 3b 0a 20 20 20  nsaction(0);.   
1870: 20 63 67 69 5f 72 65 64 69 72 65 63 74 28 6d 70   cgi_redirect(mp
1880: 72 69 6e 74 66 28 22 77 69 6b 69 2f 25 73 22 2c  rintf("wiki/%s",
1890: 20 67 2e 7a 45 78 74 72 61 29 29 3b 0a 20 20 7d   g.zExtra));.  }
18a0: 0a 20 20 69 66 28 20 50 28 22 63 61 6e 63 65 6c  .  if( P("cancel
18b0: 22 29 21 3d 30 20 29 7b 0a 20 20 20 20 63 67 69  ")!=0 ){.    cgi
18c0: 5f 72 65 64 69 72 65 63 74 28 6d 70 72 69 6e 74  _redirect(mprint
18d0: 66 28 22 77 69 6b 69 2f 25 73 22 2c 20 67 2e 7a  f("wiki/%s", g.z
18e0: 45 78 74 72 61 29 29 3b 0a 20 20 20 20 72 65 74  Extra));.    ret
18f0: 75 72 6e 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a  urn;.  }.  if( z
1900: 42 6f 64 79 3d 3d 30 20 29 7b 0a 20 20 20 20 7a  Body==0 ){.    z
1910: 42 6f 64 79 20 3d 20 6d 70 72 69 6e 74 66 28 22  Body = mprintf("
1920: 3c 69 3e 45 6d 70 74 79 20 50 61 67 65 3c 2f 69  <i>Empty Page</i
1930: 3e 22 29 3b 0a 20 20 7d 0a 20 20 7a 48 74 6d 6c  >");.  }.  zHtml
1940: 50 61 67 65 4e 61 6d 65 20 3d 20 6d 70 72 69 6e  PageName = mprin
1950: 74 66 28 22 45 64 69 74 3a 20 25 68 22 2c 20 7a  tf("Edit: %h", z
1960: 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20 73 74 79  PageName);.  sty
1970: 6c 65 5f 68 65 61 64 65 72 28 7a 48 74 6d 6c 50  le_header(zHtmlP
1980: 61 67 65 4e 61 6d 65 29 3b 0a 20 20 69 66 28 20  ageName);.  if( 
1990: 50 28 22 70 72 65 76 69 65 77 22 29 21 3d 30 20  P("preview")!=0 
19a0: 29 7b 0a 20 20 20 20 62 6c 6f 62 5f 7a 65 72 6f  ){.    blob_zero
19b0: 28 26 77 69 6b 69 29 3b 0a 20 20 20 20 62 6c 6f  (&wiki);.    blo
19c0: 62 5f 61 70 70 65 6e 64 28 26 77 69 6b 69 2c 20  b_append(&wiki, 
19d0: 7a 42 6f 64 79 2c 20 2d 31 29 3b 0a 20 20 20 20  zBody, -1);.    
19e0: 40 20 50 72 65 76 69 65 77 3a 3c 68 72 3e 0a 20  @ Preview:<hr>. 
19f0: 20 20 20 77 69 6b 69 5f 63 6f 6e 76 65 72 74 28     wiki_convert(
1a00: 26 77 69 6b 69 2c 20 30 29 3b 0a 20 20 20 20 40  &wiki, 0);.    @
1a10: 20 3c 68 72 3e 0a 20 20 20 20 62 6c 6f 62 5f 72   <hr>.    blob_r
1a20: 65 73 65 74 28 26 77 69 6b 69 29 3b 0a 20 20 7d  eset(&wiki);.  }
1a30: 0a 20 20 66 6f 72 28 6e 3d 32 2c 20 7a 3d 7a 42  .  for(n=2, z=zB
1a40: 6f 64 79 3b 20 7a 5b 30 5d 3b 20 7a 2b 2b 29 7b  ody; z[0]; z++){
1a50: 0a 20 20 20 20 69 66 28 20 7a 5b 30 5d 3d 3d 27  .    if( z[0]=='
1a60: 5c 6e 27 20 29 20 6e 2b 2b 3b 0a 20 20 7d 0a 20  \n' ) n++;.  }. 
1a70: 20 69 66 28 20 6e 3c 32 30 20 29 20 6e 20 3d 20   if( n<20 ) n = 
1a80: 32 30 3b 0a 20 20 69 66 28 20 6e 3e 32 30 30 20  20;.  if( n>200 
1a90: 29 20 6e 20 3d 20 32 30 30 3b 0a 20 20 40 20 3c  ) n = 200;.  @ <
1aa0: 66 6f 72 6d 20 6d 65 74 68 6f 64 3d 22 50 4f 53  form method="POS
1ab0: 54 22 20 61 63 74 69 6f 6e 3d 22 25 73 28 67 2e  T" action="%s(g.
1ac0: 7a 42 61 73 65 55 52 4c 29 2f 77 69 6b 69 65 64  zBaseURL)/wikied
1ad0: 69 74 2f 25 74 28 67 2e 7a 45 78 74 72 61 29 22  it/%t(g.zExtra)"
1ae0: 3e 0a 20 20 40 20 3c 74 65 78 74 61 72 65 61 20  >.  @ <textarea 
1af0: 6e 61 6d 65 3d 22 77 22 20 63 6c 61 73 73 3d 22  name="w" class="
1b00: 77 69 6b 69 65 64 69 74 22 20 63 6f 6c 73 3d 22  wikiedit" cols="
1b10: 38 30 22 20 0a 20 20 40 20 20 72 6f 77 73 3d 22  80" .  @  rows="
1b20: 25 64 28 6e 29 22 20 77 72 61 70 3d 22 76 69 72  %d(n)" wrap="vir
1b30: 74 75 61 6c 22 3e 25 68 28 7a 42 6f 64 79 29 3c  tual">%h(zBody)<
1b40: 2f 74 65 78 74 61 72 65 61 3e 0a 20 20 40 20 3c  /textarea>.  @ <
1b50: 62 72 3e 0a 20 20 40 20 3c 69 6e 70 75 74 20 74  br>.  @ <input t
1b60: 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d  ype="submit" nam
1b70: 65 3d 22 70 72 65 76 69 65 77 22 20 76 61 6c 75  e="preview" valu
1b80: 65 3d 22 50 72 65 76 69 65 77 20 59 6f 75 72 20  e="Preview Your 
1b90: 43 68 61 6e 67 65 73 22 3e 0a 20 20 40 20 3c 69  Changes">.  @ <i
1ba0: 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69  nput type="submi
1bb0: 74 22 20 6e 61 6d 65 3d 22 73 75 62 6d 69 74 22  t" name="submit"
1bc0: 20 76 61 6c 75 65 3d 22 41 70 70 6c 79 20 54 68   value="Apply Th
1bd0: 65 73 65 20 43 68 61 6e 67 65 73 22 3e 0a 20 20  ese Changes">.  
1be0: 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 73  @ <input type="s
1bf0: 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 63 61 6e  ubmit" name="can
1c00: 63 65 6c 22 20 76 61 6c 75 65 3d 22 43 61 6e 63  cel" value="Canc
1c10: 65 6c 22 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e  el">.  @ </form>
1c20: 0a 20 20 6d 61 6e 69 66 65 73 74 5f 63 6c 65 61  .  manifest_clea
1c30: 72 28 26 6d 29 3b 0a 20 20 73 74 79 6c 65 5f 66  r(&m);.  style_f
1c40: 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  ooter();.}../*.*
1c50: 2a 20 41 70 70 65 6e 64 20 74 68 65 20 77 69 6b  * Append the wik
1c60: 69 20 74 65 78 74 20 66 6f 72 20 61 6e 20 72 65  i text for an re
1c70: 6d 61 72 6b 20 74 6f 20 74 68 65 20 65 6e 64 20  mark to the end 
1c80: 6f 66 20 74 68 65 20 67 69 76 65 6e 20 42 4c 4f  of the given BLO
1c90: 42 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  B..*/.static voi
1ca0: 64 20 61 70 70 65 6e 64 52 65 6d 61 72 6b 28 42  d appendRemark(B
1cb0: 6c 6f 62 20 2a 70 29 7b 0a 20 20 63 68 61 72 20  lob *p){.  char 
1cc0: 2a 7a 44 61 74 65 3b 0a 20 20 63 6f 6e 73 74 20  *zDate;.  const 
1cd0: 63 68 61 72 20 2a 7a 55 73 65 72 3b 0a 20 20 63  char *zUser;.  c
1ce0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 65 6d 61  onst char *zRema
1cf0: 72 6b 3b 0a 0a 20 20 7a 44 61 74 65 20 3d 20 64  rk;..  zDate = d
1d00: 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43  b_text(0, "SELEC
1d10: 54 20 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27  T datetime('now'
1d20: 29 22 29 3b 0a 20 20 62 6c 6f 62 5f 61 70 70 65  )");.  blob_appe
1d30: 6e 64 66 28 70 2c 20 22 4f 6e 20 25 73 20 55 54  ndf(p, "On %s UT
1d40: 43 20 25 68 22 2c 20 7a 44 61 74 65 2c 20 67 2e  C %h", zDate, g.
1d50: 7a 4c 6f 67 69 6e 29 3b 0a 20 20 66 72 65 65 28  zLogin);.  free(
1d60: 7a 44 61 74 65 29 3b 0a 20 20 7a 55 73 65 72 20  zDate);.  zUser 
1d70: 3d 20 50 44 28 22 75 22 2c 67 2e 7a 4c 6f 67 69  = PD("u",g.zLogi
1d80: 6e 29 3b 0a 20 20 69 66 28 20 7a 55 73 65 72 5b  n);.  if( zUser[
1d90: 30 5d 20 26 26 20 73 74 72 63 6d 70 28 7a 55 73  0] && strcmp(zUs
1da0: 65 72 2c 67 2e 7a 4c 6f 67 69 6e 29 20 29 7b 0a  er,g.zLogin) ){.
1db0: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66      blob_appendf
1dc0: 28 70 2c 20 22 20 28 63 6c 61 69 6d 69 6e 67 20  (p, " (claiming 
1dd0: 74 6f 20 62 65 20 25 68 29 22 2c 20 7a 55 73 65  to be %h)", zUse
1de0: 72 29 3b 0a 20 20 7d 0a 20 20 7a 52 65 6d 61 72  r);.  }.  zRemar
1df0: 6b 20 3d 20 50 44 28 22 72 22 2c 22 22 29 3b 0a  k = PD("r","");.
1e00: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 70    blob_appendf(p
1e10: 2c 20 22 20 61 64 64 65 64 3a 5c 6e 5c 6e 25 73  , " added:\n\n%s
1e20: 22 2c 20 7a 52 65 6d 61 72 6b 29 3b 0a 7d 0a 0a  ", zRemark);.}..
1e30: 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 77  /*.** WEBPAGE: w
1e40: 69 6b 69 61 70 70 65 6e 64 0a 2a 2a 20 55 52 4c  ikiappend.** URL
1e50: 3a 20 2f 77 69 6b 69 61 70 70 65 6e 64 2f 50 41  : /wikiappend/PA
1e60: 47 45 4e 41 4d 45 0a 2a 2f 0a 76 6f 69 64 20 77  GENAME.*/.void w
1e70: 69 6b 69 61 70 70 65 6e 64 5f 70 61 67 65 28 76  ikiappend_page(v
1e80: 6f 69 64 29 7b 0a 20 20 63 68 61 72 20 2a 7a 54  oid){.  char *zT
1e90: 61 67 3b 0a 20 20 69 6e 74 20 72 69 64 3b 0a 20  ag;.  int rid;. 
1ea0: 20 63 68 61 72 20 2a 7a 50 61 67 65 4e 61 6d 65   char *zPageName
1eb0: 3b 0a 20 20 63 68 61 72 20 2a 7a 48 74 6d 6c 50  ;.  char *zHtmlP
1ec0: 61 67 65 4e 61 6d 65 3b 0a 20 20 63 6f 6e 73 74  ageName;.  const
1ed0: 20 63 68 61 72 20 2a 7a 55 73 65 72 3b 0a 0a 20   char *zUser;.. 
1ee0: 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65   login_check_cre
1ef0: 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 7a 50  dentials();.  zP
1f00: 61 67 65 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74  ageName = mprint
1f10: 66 28 22 25 73 22 2c 20 67 2e 7a 45 78 74 72 61  f("%s", g.zExtra
1f20: 29 3b 0a 20 20 64 65 68 74 74 70 69 7a 65 28 7a  );.  dehttpize(z
1f30: 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20 69 66 28  PageName);.  if(
1f40: 20 63 68 65 63 6b 5f 6e 61 6d 65 28 7a 50 61 67   check_name(zPag
1f50: 65 4e 61 6d 65 29 20 29 20 72 65 74 75 72 6e 3b  eName) ) return;
1f60: 0a 20 20 7a 54 61 67 20 3d 20 6d 70 72 69 6e 74  .  zTag = mprint
1f70: 66 28 22 77 69 6b 69 2d 25 73 22 2c 20 7a 50 61  f("wiki-%s", zPa
1f80: 67 65 4e 61 6d 65 29 3b 0a 20 20 72 69 64 20 3d  geName);.  rid =
1f90: 20 64 62 5f 69 6e 74 28 30 2c 20 0a 20 20 20 20   db_int(0, .    
1fa0: 22 53 45 4c 45 43 54 20 72 69 64 20 46 52 4f 4d  "SELECT rid FROM
1fb0: 20 74 61 67 78 72 65 66 22 0a 20 20 20 20 22 20   tagxref".    " 
1fc0: 57 48 45 52 45 20 74 61 67 69 64 3d 28 53 45 4c  WHERE tagid=(SEL
1fd0: 45 43 54 20 74 61 67 69 64 20 46 52 4f 4d 20 74  ECT tagid FROM t
1fe0: 61 67 20 57 48 45 52 45 20 74 61 67 6e 61 6d 65  ag WHERE tagname
1ff0: 3d 25 51 29 22 0a 20 20 20 20 22 20 4f 52 44 45  =%Q)".    " ORDE
2000: 52 20 42 59 20 6d 74 69 6d 65 20 44 45 53 43 22  R BY mtime DESC"
2010: 2c 20 7a 54 61 67 0a 20 20 29 3b 0a 20 20 66 72  , zTag.  );.  fr
2020: 65 65 28 7a 54 61 67 29 3b 0a 20 20 69 66 28 20  ee(zTag);.  if( 
2030: 21 72 69 64 20 29 7b 0a 20 20 20 20 63 67 69 5f  !rid ){.    cgi_
2040: 72 65 64 69 72 65 63 74 28 22 69 6e 64 65 78 22  redirect("index"
2050: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  );.    return;. 
2060: 20 7d 0a 20 20 69 66 28 20 21 67 2e 6f 6b 41 70   }.  if( !g.okAp
2070: 6e 64 57 69 6b 69 20 29 7b 0a 20 20 20 20 6c 6f  ndWiki ){.    lo
2080: 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20 20  gin_needed();.  
2090: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20    return;.  }.  
20a0: 69 66 28 20 50 28 22 73 75 62 6d 69 74 22 29 21  if( P("submit")!
20b0: 3d 30 20 26 26 20 50 28 22 72 22 29 21 3d 30 20  =0 && P("r")!=0 
20c0: 26 26 20 50 28 22 75 22 29 21 3d 30 20 29 7b 0a  && P("u")!=0 ){.
20d0: 20 20 20 20 63 68 61 72 20 2a 7a 44 61 74 65 3b      char *zDate;
20e0: 0a 20 20 20 20 42 6c 6f 62 20 63 6b 73 75 6d 3b  .    Blob cksum;
20f0: 0a 20 20 20 20 69 6e 74 20 6e 72 69 64 3b 0a 20  .    int nrid;. 
2100: 20 20 20 42 6c 6f 62 20 62 6f 64 79 3b 0a 20 20     Blob body;.  
2110: 20 20 42 6c 6f 62 20 63 6f 6e 74 65 6e 74 3b 0a    Blob content;.
2120: 20 20 20 20 42 6c 6f 62 20 77 69 6b 69 3b 0a 20      Blob wiki;. 
2130: 20 20 20 4d 61 6e 69 66 65 73 74 20 6d 3b 0a 0a     Manifest m;..
2140: 20 20 20 20 63 6f 6e 74 65 6e 74 5f 67 65 74 28      content_get(
2150: 72 69 64 2c 20 26 63 6f 6e 74 65 6e 74 29 3b 0a  rid, &content);.
2160: 20 20 20 20 6d 61 6e 69 66 65 73 74 5f 70 61 72      manifest_par
2170: 73 65 28 26 6d 2c 20 26 63 6f 6e 74 65 6e 74 29  se(&m, &content)
2180: 3b 0a 20 20 20 20 62 6c 6f 62 5f 7a 65 72 6f 28  ;.    blob_zero(
2190: 26 62 6f 64 79 29 3b 0a 20 20 20 20 69 66 28 20  &body);.    if( 
21a0: 6d 2e 74 79 70 65 3d 3d 43 46 54 59 50 45 5f 57  m.type==CFTYPE_W
21b0: 49 4b 49 20 29 7b 0a 20 20 20 20 20 20 62 6c 6f  IKI ){.      blo
21c0: 62 5f 61 70 70 65 6e 64 66 28 26 62 6f 64 79 2c  b_appendf(&body,
21d0: 20 6d 2e 7a 57 69 6b 69 2c 20 2d 31 29 3b 0a 20   m.zWiki, -1);. 
21e0: 20 20 20 7d 0a 20 20 20 20 6d 61 6e 69 66 65 73     }.    manifes
21f0: 74 5f 63 6c 65 61 72 28 26 6d 29 3b 0a 20 20 20  t_clear(&m);.   
2200: 20 62 6c 6f 62 5f 7a 65 72 6f 28 26 77 69 6b 69   blob_zero(&wiki
2210: 29 3b 0a 20 20 20 20 64 62 5f 62 65 67 69 6e 5f  );.    db_begin_
2220: 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20  transaction();. 
2230: 20 20 20 7a 44 61 74 65 20 3d 20 64 62 5f 74 65     zDate = db_te
2240: 78 74 28 30 2c 20 22 53 45 4c 45 43 54 20 64 61  xt(0, "SELECT da
2250: 74 65 74 69 6d 65 28 27 6e 6f 77 27 29 22 29 3b  tetime('now')");
2260: 0a 20 20 20 20 7a 44 61 74 65 5b 31 30 5d 20 3d  .    zDate[10] =
2270: 20 27 54 27 3b 0a 20 20 20 20 62 6c 6f 62 5f 61   'T';.    blob_a
2280: 70 70 65 6e 64 66 28 26 77 69 6b 69 2c 20 22 44  ppendf(&wiki, "D
2290: 20 25 73 5c 6e 22 2c 20 7a 44 61 74 65 29 3b 0a   %s\n", zDate);.
22a0: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66      blob_appendf
22b0: 28 26 77 69 6b 69 2c 20 22 4c 20 25 46 5c 6e 22  (&wiki, "L %F\n"
22c0: 2c 20 7a 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20  , zPageName);.  
22d0: 20 20 69 66 28 20 72 69 64 20 29 7b 0a 20 20 20    if( rid ){.   
22e0: 20 20 20 63 68 61 72 20 2a 7a 55 75 69 64 20 3d     char *zUuid =
22f0: 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c   db_text(0, "SEL
2300: 45 43 54 20 75 75 69 64 20 46 52 4f 4d 20 62 6c  ECT uuid FROM bl
2310: 6f 62 20 57 48 45 52 45 20 72 69 64 3d 25 64 22  ob WHERE rid=%d"
2320: 2c 20 72 69 64 29 3b 0a 20 20 20 20 20 20 62 6c  , rid);.      bl
2330: 6f 62 5f 61 70 70 65 6e 64 66 28 26 77 69 6b 69  ob_appendf(&wiki
2340: 2c 20 22 50 20 25 73 5c 6e 22 2c 20 7a 55 75 69  , "P %s\n", zUui
2350: 64 29 3b 0a 20 20 20 20 20 20 66 72 65 65 28 7a  d);.      free(z
2360: 55 75 69 64 29 3b 0a 20 20 20 20 7d 0a 20 20 20  Uuid);.    }.   
2370: 20 69 66 28 20 67 2e 7a 4c 6f 67 69 6e 20 29 7b   if( g.zLogin ){
2380: 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65  .      blob_appe
2390: 6e 64 66 28 26 77 69 6b 69 2c 20 22 55 20 25 46  ndf(&wiki, "U %F
23a0: 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69 6e 29 3b 0a  \n", g.zLogin);.
23b0: 20 20 20 20 7d 0a 20 20 20 20 62 6c 6f 62 5f 61      }.    blob_a
23c0: 70 70 65 6e 64 66 28 26 62 6f 64 79 2c 20 22 5c  ppendf(&body, "\
23d0: 6e 3c 68 72 3e 5c 6e 22 29 3b 0a 20 20 20 20 61  n<hr>\n");.    a
23e0: 70 70 65 6e 64 52 65 6d 61 72 6b 28 26 62 6f 64  ppendRemark(&bod
23f0: 79 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70  y);.    blob_app
2400: 65 6e 64 66 28 26 77 69 6b 69 2c 20 22 57 20 25  endf(&wiki, "W %
2410: 64 5c 6e 25 73 5c 6e 22 2c 20 62 6c 6f 62 5f 73  d\n%s\n", blob_s
2420: 69 7a 65 28 26 62 6f 64 79 29 2c 20 62 6c 6f 62  ize(&body), blob
2430: 5f 73 74 72 28 26 62 6f 64 79 29 29 3b 0a 20 20  _str(&body));.  
2440: 20 20 6d 64 35 73 75 6d 5f 62 6c 6f 62 28 26 77    md5sum_blob(&w
2450: 69 6b 69 2c 20 26 63 6b 73 75 6d 29 3b 0a 20 20  iki, &cksum);.  
2460: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26    blob_appendf(&
2470: 77 69 6b 69 2c 20 22 5a 20 25 62 5c 6e 22 2c 20  wiki, "Z %b\n", 
2480: 26 63 6b 73 75 6d 29 3b 0a 20 20 20 20 62 6c 6f  &cksum);.    blo
2490: 62 5f 72 65 73 65 74 28 26 63 6b 73 75 6d 29 3b  b_reset(&cksum);
24a0: 0a 20 20 20 20 6e 72 69 64 20 3d 20 63 6f 6e 74  .    nrid = cont
24b0: 65 6e 74 5f 70 75 74 28 26 77 69 6b 69 2c 20 30  ent_put(&wiki, 0
24c0: 2c 20 30 29 3b 0a 20 20 20 20 64 62 5f 6d 75 6c  , 0);.    db_mul
24d0: 74 69 5f 65 78 65 63 28 22 49 4e 53 45 52 54 20  ti_exec("INSERT 
24e0: 4f 52 20 49 47 4e 4f 52 45 20 49 4e 54 4f 20 75  OR IGNORE INTO u
24f0: 6e 73 65 6e 74 20 56 41 4c 55 45 53 28 25 64 29  nsent VALUES(%d)
2500: 22 2c 20 6e 72 69 64 29 3b 0a 20 20 20 20 6d 61  ", nrid);.    ma
2510: 6e 69 66 65 73 74 5f 63 72 6f 73 73 6c 69 6e 6b  nifest_crosslink
2520: 28 6e 72 69 64 2c 20 26 77 69 6b 69 29 3b 0a 20  (nrid, &wiki);. 
2530: 20 20 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 77     blob_reset(&w
2540: 69 6b 69 29 3b 0a 20 20 20 20 63 6f 6e 74 65 6e  iki);.    conten
2550: 74 5f 64 65 6c 74 69 66 79 28 72 69 64 2c 20 6e  t_deltify(rid, n
2560: 72 69 64 2c 20 30 29 3b 0a 20 20 20 20 64 62 5f  rid, 0);.    db_
2570: 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28  end_transaction(
2580: 30 29 3b 0a 20 20 20 20 63 67 69 5f 72 65 64 69  0);.    cgi_redi
2590: 72 65 63 74 28 6d 70 72 69 6e 74 66 28 22 77 69  rect(mprintf("wi
25a0: 6b 69 2f 25 73 22 2c 20 67 2e 7a 45 78 74 72 61  ki/%s", g.zExtra
25b0: 29 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 50 28  ));.  }.  if( P(
25c0: 22 63 61 6e 63 65 6c 22 29 21 3d 30 20 29 7b 0a  "cancel")!=0 ){.
25d0: 20 20 20 20 63 67 69 5f 72 65 64 69 72 65 63 74      cgi_redirect
25e0: 28 6d 70 72 69 6e 74 66 28 22 77 69 6b 69 2f 25  (mprintf("wiki/%
25f0: 73 22 2c 20 67 2e 7a 45 78 74 72 61 29 29 3b 0a  s", g.zExtra));.
2600: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
2610: 20 20 7a 48 74 6d 6c 50 61 67 65 4e 61 6d 65 20    zHtmlPageName 
2620: 3d 20 6d 70 72 69 6e 74 66 28 22 41 70 70 65 6e  = mprintf("Appen
2630: 64 20 43 6f 6d 6d 65 6e 74 20 54 6f 3a 20 25 68  d Comment To: %h
2640: 22 2c 20 7a 50 61 67 65 4e 61 6d 65 29 3b 0a 20  ", zPageName);. 
2650: 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 7a 48   style_header(zH
2660: 74 6d 6c 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20  tmlPageName);.  
2670: 69 66 28 20 50 28 22 70 72 65 76 69 65 77 22 29  if( P("preview")
2680: 21 3d 30 20 29 7b 0a 20 20 20 20 42 6c 6f 62 20  !=0 ){.    Blob 
2690: 70 72 65 76 69 65 77 3b 0a 20 20 20 20 62 6c 6f  preview;.    blo
26a0: 62 5f 7a 65 72 6f 28 26 70 72 65 76 69 65 77 29  b_zero(&preview)
26b0: 3b 0a 20 20 20 20 61 70 70 65 6e 64 52 65 6d 61  ;.    appendRema
26c0: 72 6b 28 26 70 72 65 76 69 65 77 29 3b 0a 20 20  rk(&preview);.  
26d0: 20 20 40 20 50 72 65 76 69 65 77 3a 3c 68 72 3e    @ Preview:<hr>
26e0: 0a 20 20 20 20 77 69 6b 69 5f 63 6f 6e 76 65 72  .    wiki_conver
26f0: 74 28 26 70 72 65 76 69 65 77 2c 20 30 29 3b 0a  t(&preview, 0);.
2700: 20 20 20 20 40 20 3c 68 72 3e 0a 20 20 20 20 62      @ <hr>.    b
2710: 6c 6f 62 5f 72 65 73 65 74 28 26 70 72 65 76 69  lob_reset(&previ
2720: 65 77 29 3b 0a 20 20 7d 0a 20 20 7a 55 73 65 72  ew);.  }.  zUser
2730: 20 3d 20 50 44 28 22 75 22 2c 20 67 2e 7a 4c 6f   = PD("u", g.zLo
2740: 67 69 6e 29 3b 0a 20 20 40 20 3c 66 6f 72 6d 20  gin);.  @ <form 
2750: 6d 65 74 68 6f 64 3d 22 50 4f 53 54 22 20 61 63  method="POST" ac
2760: 74 69 6f 6e 3d 22 25 73 28 67 2e 7a 42 61 73 65  tion="%s(g.zBase
2770: 55 52 4c 29 2f 77 69 6b 69 61 70 70 65 6e 64 2f  URL)/wikiappend/
2780: 25 74 28 67 2e 7a 45 78 74 72 61 29 22 3e 0a 20  %t(g.zExtra)">. 
2790: 20 40 20 59 6f 75 72 20 4e 61 6d 65 3a 0a 20 20   @ Your Name:.  
27a0: 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 74  @ <input type="t
27b0: 65 78 74 22 20 6e 61 6d 65 3d 22 75 22 20 73 69  ext" name="u" si
27c0: 7a 65 3d 22 32 30 22 20 76 61 6c 75 65 3d 22 25  ze="20" value="%
27d0: 68 28 7a 55 73 65 72 29 22 3e 3c 62 72 3e 0a 20  h(zUser)"><br>. 
27e0: 20 40 20 43 6f 6d 6d 65 6e 74 20 74 6f 20 61 70   @ Comment to ap
27f0: 70 65 6e 64 3a 3c 62 72 3e 0a 20 20 40 20 3c 74  pend:<br>.  @ <t
2800: 65 78 74 61 72 65 61 20 6e 61 6d 65 3d 22 72 22  extarea name="r"
2810: 20 63 6c 61 73 73 3d 22 77 69 6b 69 65 64 69 74   class="wikiedit
2820: 22 20 63 6f 6c 73 3d 22 38 30 22 20 0a 20 20 40  " cols="80" .  @
2830: 20 20 72 6f 77 73 3d 22 31 30 22 20 77 72 61 70    rows="10" wrap
2840: 3d 22 76 69 72 74 75 61 6c 22 3e 25 68 28 50 44  ="virtual">%h(PD
2850: 28 22 72 22 2c 22 22 29 29 3c 2f 74 65 78 74 61  ("r",""))</texta
2860: 72 65 61 3e 0a 20 20 40 20 3c 62 72 3e 0a 20 20  rea>.  @ <br>.  
2870: 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 73  @ <input type="s
2880: 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 70 72 65  ubmit" name="pre
2890: 76 69 65 77 22 20 76 61 6c 75 65 3d 22 50 72 65  view" value="Pre
28a0: 76 69 65 77 20 59 6f 75 72 20 43 6f 6d 6d 65 6e  view Your Commen
28b0: 74 22 3e 0a 20 20 40 20 3c 69 6e 70 75 74 20 74  t">.  @ <input t
28c0: 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d  ype="submit" nam
28d0: 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65  e="submit" value
28e0: 3d 22 41 70 70 65 6e 64 20 59 6f 75 72 20 43 68  ="Append Your Ch
28f0: 61 6e 67 65 73 22 3e 0a 20 20 40 20 3c 69 6e 70  anges">.  @ <inp
2900: 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69 74 22  ut type="submit"
2910: 20 6e 61 6d 65 3d 22 63 61 6e 63 65 6c 22 20 76   name="cancel" v
2920: 61 6c 75 65 3d 22 43 61 6e 63 65 6c 22 3e 0a 20  alue="Cancel">. 
2930: 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 73 74 79   @ </form>.  sty
2940: 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a  le_footer();.}..
2950: 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 77  /*.** WEBPAGE: w
2960: 68 69 73 74 6f 72 79 0a 2a 2a 0a 2a 2a 20 53 68  history.**.** Sh
2970: 6f 77 20 74 68 65 20 63 6f 6d 70 6c 65 74 65 20  ow the complete 
2980: 63 68 61 6e 67 65 20 68 69 73 74 6f 72 79 20 66  change history f
2990: 6f 72 20 61 20 73 69 6e 67 6c 65 20 77 69 6b 69  or a single wiki
29a0: 20 70 61 67 65 2e 20 20 54 68 65 20 6e 61 6d 65   page.  The name
29b0: 0a 2a 2a 20 6f 66 20 74 68 65 20 77 69 6b 69 20  .** of the wiki 
29c0: 69 73 20 69 6e 20 67 2e 7a 45 78 74 72 61 0a 2a  is in g.zExtra.*
29d0: 2f 0a 76 6f 69 64 20 77 68 69 73 74 6f 72 79 5f  /.void whistory_
29e0: 70 61 67 65 28 76 6f 69 64 29 7b 0a 20 20 53 74  page(void){.  St
29f0: 6d 74 20 71 3b 0a 20 20 63 68 61 72 20 2a 7a 54  mt q;.  char *zT
2a00: 69 74 6c 65 3b 0a 20 20 63 68 61 72 20 2a 7a 53  itle;.  char *zS
2a10: 51 4c 3b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63  QL;.  login_chec
2a20: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
2a30: 0a 20 20 69 66 28 20 21 67 2e 6f 6b 48 69 73 74  .  if( !g.okHist
2a40: 6f 72 79 20 29 7b 20 6c 6f 67 69 6e 5f 6e 65 65  ory ){ login_nee
2a50: 64 65 64 28 29 3b 20 72 65 74 75 72 6e 3b 20 7d  ded(); return; }
2a60: 0a 20 20 7a 54 69 74 6c 65 20 3d 20 6d 70 72 69  .  zTitle = mpri
2a70: 6e 74 66 28 22 48 69 73 74 6f 72 79 20 4f 66 20  ntf("History Of 
2a80: 25 68 22 2c 20 67 2e 7a 45 78 74 72 61 29 3b 0a  %h", g.zExtra);.
2a90: 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 7a    style_header(z
2aa0: 54 69 74 6c 65 29 3b 0a 20 20 66 72 65 65 28 7a  Title);.  free(z
2ab0: 54 69 74 6c 65 29 3b 0a 0a 20 20 7a 53 51 4c 20  Title);..  zSQL 
2ac0: 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 20 41 4e  = mprintf("%s AN
2ad0: 44 20 65 76 65 6e 74 2e 6f 62 6a 69 64 20 49 4e  D event.objid IN
2ae0: 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20   ".             
2af0: 20 20 20 20 22 20 20 28 53 45 4c 45 43 54 20 72      "  (SELECT r
2b00: 69 64 20 46 52 4f 4d 20 74 61 67 78 72 65 66 20  id FROM tagxref 
2b10: 57 48 45 52 45 20 74 61 67 69 64 3d 22 0a 20 20  WHERE tagid=".  
2b20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
2b30: 20 20 20 20 20 22 28 53 45 4c 45 43 54 20 74 61       "(SELECT ta
2b40: 67 69 64 20 46 52 4f 4d 20 74 61 67 20 57 48 45  gid FROM tag WHE
2b50: 52 45 20 74 61 67 6e 61 6d 65 3d 27 77 69 6b 69  RE tagname='wiki
2b60: 2d 25 71 27 29 29 22 0a 20 20 20 20 20 20 20 20  -%q'))".        
2b70: 20 20 20 20 20 20 20 20 20 22 4f 52 44 45 52 20           "ORDER 
2b80: 42 59 20 6d 74 69 6d 65 20 44 45 53 43 22 2c 0a  BY mtime DESC",.
2b90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
2ba0: 20 74 69 6d 65 6c 69 6e 65 5f 71 75 65 72 79 5f   timeline_query_
2bb0: 66 6f 72 5f 77 77 77 28 29 2c 20 67 2e 7a 45 78  for_www(), g.zEx
2bc0: 74 72 61 29 3b 0a 20 20 64 62 5f 70 72 65 70 61  tra);.  db_prepa
2bd0: 72 65 28 26 71 2c 20 7a 53 51 4c 29 3b 0a 20 20  re(&q, zSQL);.  
2be0: 66 72 65 65 28 7a 53 51 4c 29 3b 0a 20 20 77 77  free(zSQL);.  ww
2bf0: 77 5f 70 72 69 6e 74 5f 74 69 6d 65 6c 69 6e 65  w_print_timeline
2c00: 28 26 71 2c 20 30 2c 20 30 2c 20 30 2c 20 30 29  (&q, 0, 0, 0, 0)
2c10: 3b 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28  ;.  db_finalize(
2c20: 26 71 29 3b 0a 20 20 73 74 79 6c 65 5f 66 6f 6f  &q);.  style_foo
2c30: 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  ter();.}../*.** 
2c40: 57 45 42 50 41 47 45 3a 20 77 63 6f 6e 74 65 6e  WEBPAGE: wconten
2c50: 74 0a 2a 2a 0a 2a 2a 20 4c 69 73 74 20 61 6c 6c  t.**.** List all
2c60: 20 61 76 61 69 6c 61 62 6c 65 20 77 69 6b 69 20   available wiki 
2c70: 70 61 67 65 73 20 77 69 74 68 20 64 61 74 65 20  pages with date 
2c80: 63 72 65 61 74 65 64 20 61 6e 64 20 6c 61 73 74  created and last
2c90: 20 6d 6f 64 69 66 69 65 64 2e 0a 2a 2f 0a 76 6f   modified..*/.vo
2ca0: 69 64 20 77 63 6f 6e 74 65 6e 74 5f 70 61 67 65  id wcontent_page
2cb0: 28 76 6f 69 64 29 7b 0a 20 20 53 74 6d 74 20 71  (void){.  Stmt q
2cc0: 3b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f  ;.  login_check_
2cd0: 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20  credentials();. 
2ce0: 20 69 66 28 20 21 67 2e 6f 6b 52 64 57 69 6b 69   if( !g.okRdWiki
2cf0: 20 29 7b 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64   ){ login_needed
2d00: 28 29 3b 20 72 65 74 75 72 6e 3b 20 7d 0a 20 20  (); return; }.  
2d10: 73 74 79 6c 65 5f 68 65 61 64 65 72 28 22 41 76  style_header("Av
2d20: 61 69 6c 61 62 6c 65 20 57 69 6b 69 20 50 61 67  ailable Wiki Pag
2d30: 65 73 22 29 3b 0a 20 20 40 20 3c 75 6c 3e 0a 20  es");.  @ <ul>. 
2d40: 20 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c 20   db_prepare(&q, 
2d50: 0a 20 20 20 20 22 53 45 4c 45 43 54 20 73 75 62  .    "SELECT sub
2d60: 73 74 72 28 74 61 67 6e 61 6d 65 2c 20 36 2c 20  str(tagname, 6, 
2d70: 31 30 30 30 29 20 46 52 4f 4d 20 74 61 67 20 57  1000) FROM tag W
2d80: 48 45 52 45 20 74 61 67 6e 61 6d 65 20 47 4c 4f  HERE tagname GLO
2d90: 42 20 27 77 69 6b 69 2d 2a 27 22 0a 20 20 20 20  B 'wiki-*'".    
2da0: 22 20 4f 52 44 45 52 20 42 59 20 6c 6f 77 65 72  " ORDER BY lower
2db0: 28 74 61 67 6e 61 6d 65 29 22 0a 20 20 29 3b 0a  (tagname)".  );.
2dc0: 20 20 77 68 69 6c 65 28 20 64 62 5f 73 74 65 70    while( db_step
2dd0: 28 26 71 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57  (&q)==SQLITE_ROW
2de0: 20 29 7b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68   ){.    const ch
2df0: 61 72 20 2a 7a 4e 61 6d 65 20 3d 20 64 62 5f 63  ar *zName = db_c
2e00: 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 30  olumn_text(&q, 0
2e10: 29 3b 0a 20 20 20 20 40 20 3c 6c 69 3e 3c 61 20  );.    @ <li><a 
2e20: 68 72 65 66 3d 22 25 73 28 67 2e 7a 42 61 73 65  href="%s(g.zBase
2e30: 55 52 4c 29 2f 77 69 6b 69 2f 25 74 28 7a 4e 61  URL)/wiki/%t(zNa
2e40: 6d 65 29 22 3e 25 68 28 7a 4e 61 6d 65 29 3c 2f  me)">%h(zName)</
2e50: 61 3e 3c 2f 6c 69 3e 0a 20 20 7d 0a 20 20 64 62  a></li>.  }.  db
2e60: 5f 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 20  _finalize(&q);. 
2e70: 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b   style_footer();
2e80: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47  .}../*.** WEBPAG
2e90: 45 3a 20 61 6d 62 69 67 75 6f 75 73 0a 2a 2a 0a  E: ambiguous.**.
2ea0: 2a 2a 20 54 68 69 73 20 69 73 20 74 68 65 20 64  ** This is the d
2eb0: 65 73 74 69 6e 61 74 69 6f 6e 20 66 6f 72 20 55  estination for U
2ec0: 55 49 44 20 68 79 70 65 72 6c 69 6e 6b 73 20 74  UID hyperlinks t
2ed0: 68 61 74 20 61 72 65 20 61 6d 62 69 67 75 6f 75  hat are ambiguou
2ee0: 73 2e 0a 2a 2a 20 53 68 6f 77 20 61 6c 6c 20 70  s..** Show all p
2ef0: 6f 73 73 69 62 6c 65 20 63 68 6f 69 63 65 73 20  ossible choices 
2f00: 66 6f 72 20 74 68 65 20 64 65 73 74 69 6e 61 74  for the destinat
2f10: 69 6f 6e 20 77 69 74 68 20 6c 69 6e 6b 73 20 74  ion with links t
2f20: 6f 20 65 61 63 68 2e 0a 2a 2a 0a 2a 2a 20 54 68  o each..**.** Th
2f30: 65 20 61 6d 62 69 67 75 6f 75 73 20 55 55 49 44  e ambiguous UUID
2f40: 20 70 72 65 66 69 78 20 69 73 20 69 6e 20 67 2e   prefix is in g.
2f50: 7a 45 78 74 72 61 0a 2a 2f 0a 76 6f 69 64 20 61  zExtra.*/.void a
2f60: 6d 62 69 67 75 6f 75 73 5f 70 61 67 65 28 76 6f  mbiguous_page(vo
2f70: 69 64 29 7b 0a 20 20 53 74 6d 74 20 71 3b 0a 20  id){.  Stmt q;. 
2f80: 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 22 41   style_header("A
2f90: 6d 62 69 67 75 6f 75 73 20 55 55 49 44 22 29 3b  mbiguous UUID");
2fa0: 0a 20 20 40 20 3c 70 3e 54 68 65 20 6c 69 6e 6b  .  @ <p>The link
2fb0: 20 3c 61 20 68 72 65 66 3d 22 25 73 28 67 2e 7a   <a href="%s(g.z
2fc0: 42 61 73 65 55 52 4c 29 2f 61 6d 62 69 67 75 6f  BaseURL)/ambiguo
2fd0: 75 73 2f 25 54 28 67 2e 7a 45 78 74 72 61 29 22  us/%T(g.zExtra)"
2fe0: 3e 0a 20 20 40 20 5b 25 68 28 67 2e 7a 45 78 74  >.  @ [%h(g.zExt
2ff0: 72 61 29 5d 3c 2f 61 3e 20 69 73 20 61 6d 62 69  ra)]</a> is ambi
3000: 67 75 6f 75 73 2e 20 20 49 74 20 6d 69 67 68 74  guous.  It might
3010: 20 6d 65 61 6e 20 61 6e 79 20 6f 66 20 74 68 65   mean any of the
3020: 20 66 6f 6c 6c 6f 77 69 6e 67 3a 3c 2f 70 3e 0a   following:</p>.
3030: 20 20 40 20 3c 75 6c 3e 0a 20 20 64 62 5f 70 72    @ <ul>.  db_pr
3040: 65 70 61 72 65 28 26 71 2c 20 22 53 45 4c 45 43  epare(&q, "SELEC
3050: 54 20 75 75 69 64 2c 20 72 69 64 20 46 52 4f 4d  T uuid, rid FROM
3060: 20 62 6c 6f 62 20 57 48 45 52 45 20 75 75 69 64   blob WHERE uuid
3070: 3e 3d 25 51 20 41 4e 44 20 75 75 69 64 3c 27 25  >=%Q AND uuid<'%
3080: 71 7a 27 22 0a 20 20 20 20 20 20 20 20 20 20 20  qz'".           
3090: 20 20 20 20 20 20 22 20 4f 52 44 45 52 20 42 59        " ORDER BY
30a0: 20 75 75 69 64 22 2c 20 67 2e 7a 45 78 74 72 61   uuid", g.zExtra
30b0: 2c 20 67 2e 7a 45 78 74 72 61 29 3b 0a 20 20 77  , g.zExtra);.  w
30c0: 68 69 6c 65 28 20 64 62 5f 73 74 65 70 28 26 71  hile( db_step(&q
30d0: 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b  )==SQLITE_ROW ){
30e0: 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20  .    const char 
30f0: 2a 7a 55 75 69 64 20 3d 20 64 62 5f 63 6f 6c 75  *zUuid = db_colu
3100: 6d 6e 5f 74 65 78 74 28 26 71 2c 20 30 29 3b 0a  mn_text(&q, 0);.
3110: 20 20 20 20 69 6e 74 20 72 69 64 20 3d 20 64 62      int rid = db
3120: 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c 20  _column_int(&q, 
3130: 31 29 3b 0a 20 20 20 20 40 20 3c 6c 69 3e 20 25  1);.    @ <li> %
3140: 73 28 7a 55 75 69 64 29 20 2d 20 25 64 28 72 69  s(zUuid) - %d(ri
3150: 64 29 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61  d).  }.  db_fina
3160: 6c 69 7a 65 28 26 71 29 3b 0a 20 20 40 20 3c 2f  lize(&q);.  @ </
3170: 75 6c 3e 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74  ul>.  style_foot
3180: 65 72 28 29 3b 0a 7d 0a                          er();.}.