Hex Artifact Content
Not logged in

Artifact 9a9d53861a48d2732c1e5031a33d6cb3504398a1:

File src/wiki.c part of check-in [50a58adb76] - Many changes and bug fixes in the wiki processing. Moving toward a workable wiki system. The "Home" menu option now takes you to the wiki page whose name is the same as the Project Name. There is a "wcontent" page, but no link to it yet. Many other changes. by drh on 2007-10-10 21:15:17.

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 69 6e 74 20 73 65 65 6e 48 72 20 3d  ;.  int seenHr =
0c10: 20 30 3b 0a 20 20 63 68 61 72 20 2a 7a 50 61 67   0;.  char *zPag
0c20: 65 4e 61 6d 65 3b 0a 20 20 63 68 61 72 20 2a 7a  eName;.  char *z
0c30: 48 74 6d 6c 50 61 67 65 4e 61 6d 65 3b 0a 20 20  HtmlPageName;.  
0c40: 63 68 61 72 20 2a 7a 42 6f 64 79 20 3d 20 6d 70  char *zBody = mp
0c50: 72 69 6e 74 66 28 22 25 73 22 2c 22 3c 69 3e 45  rintf("%s","<i>E
0c60: 6d 70 74 79 20 50 61 67 65 3c 2f 69 3e 22 29 3b  mpty Page</i>");
0c70: 0a 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f  ..  login_check_
0c80: 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20  credentials();. 
0c90: 20 69 66 28 20 21 67 2e 6f 6b 52 64 57 69 6b 69   if( !g.okRdWiki
0ca0: 20 29 7b 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64   ){ login_needed
0cb0: 28 29 3b 20 72 65 74 75 72 6e 3b 20 7d 0a 20 20  (); return; }.  
0cc0: 7a 50 61 67 65 4e 61 6d 65 20 3d 20 6d 70 72 69  zPageName = mpri
0cd0: 6e 74 66 28 22 25 73 22 2c 20 67 2e 7a 45 78 74  ntf("%s", g.zExt
0ce0: 72 61 29 3b 0a 20 20 64 65 68 74 74 70 69 7a 65  ra);.  dehttpize
0cf0: 28 7a 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20 69  (zPageName);.  i
0d00: 66 28 20 63 68 65 63 6b 5f 6e 61 6d 65 28 7a 50  f( check_name(zP
0d10: 61 67 65 4e 61 6d 65 29 20 29 20 72 65 74 75 72  ageName) ) retur
0d20: 6e 3b 0a 20 20 7a 54 61 67 20 3d 20 6d 70 72 69  n;.  zTag = mpri
0d30: 6e 74 66 28 22 77 69 6b 69 2d 25 73 22 2c 20 7a  ntf("wiki-%s", z
0d40: 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20 72 69 64  PageName);.  rid
0d50: 20 3d 20 64 62 5f 69 6e 74 28 30 2c 20 0a 20 20   = db_int(0, .  
0d60: 20 20 22 53 45 4c 45 43 54 20 72 69 64 20 46 52    "SELECT rid FR
0d70: 4f 4d 20 74 61 67 78 72 65 66 22 0a 20 20 20 20  OM tagxref".    
0d80: 22 20 57 48 45 52 45 20 74 61 67 69 64 3d 28 53  " WHERE tagid=(S
0d90: 45 4c 45 43 54 20 74 61 67 69 64 20 46 52 4f 4d  ELECT tagid FROM
0da0: 20 74 61 67 20 57 48 45 52 45 20 74 61 67 6e 61   tag WHERE tagna
0db0: 6d 65 3d 25 51 29 22 0a 20 20 20 20 22 20 4f 52  me=%Q)".    " OR
0dc0: 44 45 52 20 42 59 20 6d 74 69 6d 65 20 44 45 53  DER BY mtime DES
0dd0: 43 22 2c 20 7a 54 61 67 0a 20 20 29 3b 0a 20 20  C", zTag.  );.  
0de0: 66 72 65 65 28 7a 54 61 67 29 3b 0a 20 20 6d 65  free(zTag);.  me
0df0: 6d 73 65 74 28 26 6d 2c 20 30 2c 20 73 69 7a 65  mset(&m, 0, size
0e00: 6f 66 28 6d 29 29 3b 0a 20 20 62 6c 6f 62 5f 7a  of(m));.  blob_z
0e10: 65 72 6f 28 26 6d 2e 63 6f 6e 74 65 6e 74 29 3b  ero(&m.content);
0e20: 0a 20 20 69 66 28 20 72 69 64 20 29 7b 0a 20 20  .  if( rid ){.  
0e30: 20 20 42 6c 6f 62 20 63 6f 6e 74 65 6e 74 3b 0a    Blob content;.
0e40: 20 20 20 20 63 6f 6e 74 65 6e 74 5f 67 65 74 28      content_get(
0e50: 72 69 64 2c 20 26 63 6f 6e 74 65 6e 74 29 3b 0a  rid, &content);.
0e60: 20 20 20 20 6d 61 6e 69 66 65 73 74 5f 70 61 72      manifest_par
0e70: 73 65 28 26 6d 2c 20 26 63 6f 6e 74 65 6e 74 29  se(&m, &content)
0e80: 3b 0a 20 20 20 20 69 66 28 20 6d 2e 74 79 70 65  ;.    if( m.type
0e90: 3d 3d 43 46 54 59 50 45 5f 57 49 4b 49 20 29 7b  ==CFTYPE_WIKI ){
0ea0: 0a 20 20 20 20 20 20 7a 42 6f 64 79 20 3d 20 6d  .      zBody = m
0eb0: 2e 7a 57 69 6b 69 3b 0a 20 20 20 20 7d 0a 20 20  .zWiki;.    }.  
0ec0: 7d 0a 20 20 69 66 28 20 28 72 69 64 20 26 26 20  }.  if( (rid && 
0ed0: 67 2e 6f 6b 57 72 57 69 6b 69 29 20 7c 7c 20 28  g.okWrWiki) || (
0ee0: 21 72 69 64 20 26 26 20 67 2e 6f 6b 4e 65 77 57  !rid && g.okNewW
0ef0: 69 6b 69 29 20 29 7b 0a 20 20 20 20 73 74 79 6c  iki) ){.    styl
0f00: 65 5f 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e  e_submenu_elemen
0f10: 74 28 22 45 64 69 74 22 2c 20 22 45 64 69 74 20  t("Edit", "Edit 
0f20: 57 69 6b 69 20 50 61 67 65 22 2c 20 0a 20 20 20  Wiki Page", .   
0f30: 20 20 20 20 20 20 6d 70 72 69 6e 74 66 28 22 25        mprintf("%
0f40: 73 2f 77 69 6b 69 65 64 69 74 2f 25 73 22 2c 20  s/wikiedit/%s", 
0f50: 67 2e 7a 54 6f 70 2c 20 67 2e 7a 45 78 74 72 61  g.zTop, g.zExtra
0f60: 29 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 67 2e  ));.  }.  if( g.
0f70: 6f 6b 48 69 73 74 6f 72 79 20 29 7b 0a 20 20 20  okHistory ){.   
0f80: 20 73 74 79 6c 65 5f 73 75 62 6d 65 6e 75 5f 65   style_submenu_e
0f90: 6c 65 6d 65 6e 74 28 22 48 69 73 74 6f 72 79 22  lement("History"
0fa0: 2c 20 22 48 69 73 74 6f 72 79 22 2c 20 0a 20 20  , "History", .  
0fb0: 20 20 20 20 20 20 20 6d 70 72 69 6e 74 66 28 22         mprintf("
0fc0: 25 73 2f 77 68 69 73 74 6f 72 79 2f 25 73 22 2c  %s/whistory/%s",
0fd0: 20 67 2e 7a 54 6f 70 2c 20 67 2e 7a 45 78 74 72   g.zTop, g.zExtr
0fe0: 61 29 29 3b 0a 20 20 7d 0a 20 20 7a 48 74 6d 6c  a));.  }.  zHtml
0ff0: 50 61 67 65 4e 61 6d 65 20 3d 20 6d 70 72 69 6e  PageName = mprin
1000: 74 66 28 22 25 68 22 2c 20 7a 50 61 67 65 4e 61  tf("%h", zPageNa
1010: 6d 65 29 3b 0a 20 20 73 74 79 6c 65 5f 68 65 61  me);.  style_hea
1020: 64 65 72 28 7a 48 74 6d 6c 50 61 67 65 4e 61 6d  der(zHtmlPageNam
1030: 65 29 3b 0a 20 20 62 6c 6f 62 5f 69 6e 69 74 28  e);.  blob_init(
1040: 26 77 69 6b 69 2c 20 7a 42 6f 64 79 2c 20 2d 31  &wiki, zBody, -1
1050: 29 3b 0a 20 20 77 69 6b 69 5f 63 6f 6e 76 65 72  );.  wiki_conver
1060: 74 28 26 77 69 6b 69 2c 20 30 29 3b 0a 20 20 62  t(&wiki, 0);.  b
1070: 6c 6f 62 5f 72 65 73 65 74 28 26 77 69 6b 69 29  lob_reset(&wiki)
1080: 3b 0a 20 20 6d 61 6e 69 66 65 73 74 5f 63 6c 65  ;.  manifest_cle
1090: 61 72 28 26 6d 29 3b 0a 23 69 66 20 30 0a 20 20  ar(&m);.#if 0.  
10a0: 69 66 28 20 28 72 69 64 20 26 26 20 67 2e 6f 6b  if( (rid && g.ok
10b0: 57 72 57 69 6b 69 29 20 7c 7c 20 28 21 72 69 64  WrWiki) || (!rid
10c0: 20 26 26 20 67 2e 6f 6b 4e 65 77 57 69 6b 69 29   && g.okNewWiki)
10d0: 20 29 7b 0a 20 20 20 20 40 20 3c 68 72 3e 0a 20   ){.    @ <hr>. 
10e0: 20 20 20 40 20 5b 3c 61 20 68 72 65 66 3d 22 25     @ [<a href="%
10f0: 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 77 69  s(g.zBaseURL)/wi
1100: 6b 69 65 64 69 74 2f 25 73 28 67 2e 7a 45 78 74  kiedit/%s(g.zExt
1110: 72 61 29 22 3e 45 64 69 74 3c 2f 61 3e 5d 0a 20  ra)">Edit</a>]. 
1120: 20 20 20 73 65 65 6e 48 72 20 3d 20 31 3b 0a 20     seenHr = 1;. 
1130: 20 7d 0a 20 20 69 66 28 20 67 2e 6f 6b 48 69 73   }.  if( g.okHis
1140: 74 6f 72 79 20 29 7b 0a 20 20 20 20 69 66 28 20  tory ){.    if( 
1150: 21 73 65 65 6e 48 72 20 29 7b 0a 20 20 20 20 20  !seenHr ){.     
1160: 20 40 20 3c 68 72 3e 0a 20 20 20 20 20 20 73 65   @ <hr>.      se
1170: 65 6e 48 72 20 3d 20 31 3b 0a 20 20 20 20 7d 0a  enHr = 1;.    }.
1180: 20 20 20 20 40 20 5b 3c 61 20 68 72 65 66 3d 22      @ [<a href="
1190: 25 73 28 67 2e 7a 42 61 73 65 55 72 6c 29 2f 77  %s(g.zBaseUrl)/w
11a0: 68 69 73 74 6f 72 79 2f 25 73 28 67 2e 7a 45 78  history/%s(g.zEx
11b0: 74 72 61 29 22 3e 48 69 73 74 6f 72 79 3c 2f 61  tra)">History</a
11c0: 3e 5d 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20  >].  }.#endif.  
11d0: 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a  style_footer();.
11e0: 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45  }../*.** WEBPAGE
11f0: 3a 20 77 69 6b 69 65 64 69 74 0a 2a 2a 20 55 52  : wikiedit.** UR
1200: 4c 3a 20 2f 77 69 6b 69 65 64 69 74 2f 50 41 47  L: /wikiedit/PAG
1210: 45 4e 41 4d 45 0a 2a 2f 0a 76 6f 69 64 20 77 69  ENAME.*/.void wi
1220: 6b 69 65 64 69 74 5f 70 61 67 65 28 76 6f 69 64  kiedit_page(void
1230: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 54 61 67 3b  ){.  char *zTag;
1240: 0a 20 20 69 6e 74 20 72 69 64 3b 0a 20 20 42 6c  .  int rid;.  Bl
1250: 6f 62 20 77 69 6b 69 3b 0a 20 20 4d 61 6e 69 66  ob wiki;.  Manif
1260: 65 73 74 20 6d 3b 0a 20 20 63 68 61 72 20 2a 7a  est m;.  char *z
1270: 50 61 67 65 4e 61 6d 65 3b 0a 20 20 63 68 61 72  PageName;.  char
1280: 20 2a 7a 48 74 6d 6c 50 61 67 65 4e 61 6d 65 3b   *zHtmlPageName;
1290: 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 63 6f 6e 73  .  int n;.  cons
12a0: 74 20 63 68 61 72 20 2a 7a 3b 0a 20 20 63 68 61  t char *z;.  cha
12b0: 72 20 2a 7a 42 6f 64 79 20 3d 20 28 63 68 61 72  r *zBody = (char
12c0: 2a 29 50 28 22 77 22 29 3b 0a 0a 20 20 69 66 28  *)P("w");..  if(
12d0: 20 7a 42 6f 64 79 20 29 7b 0a 20 20 20 20 7a 42   zBody ){.    zB
12e0: 6f 64 79 20 3d 20 6d 70 72 69 6e 74 66 28 22 25  ody = mprintf("%
12f0: 73 22 2c 20 7a 42 6f 64 79 29 3b 0a 20 20 7d 0a  s", zBody);.  }.
1300: 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72    login_check_cr
1310: 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 7a  edentials();.  z
1320: 50 61 67 65 4e 61 6d 65 20 3d 20 6d 70 72 69 6e  PageName = mprin
1330: 74 66 28 22 25 73 22 2c 20 67 2e 7a 45 78 74 72  tf("%s", g.zExtr
1340: 61 29 3b 0a 20 20 64 65 68 74 74 70 69 7a 65 28  a);.  dehttpize(
1350: 7a 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20 69 66  zPageName);.  if
1360: 28 20 63 68 65 63 6b 5f 6e 61 6d 65 28 7a 50 61  ( check_name(zPa
1370: 67 65 4e 61 6d 65 29 20 29 20 72 65 74 75 72 6e  geName) ) return
1380: 3b 0a 20 20 7a 54 61 67 20 3d 20 6d 70 72 69 6e  ;.  zTag = mprin
1390: 74 66 28 22 77 69 6b 69 2d 25 73 22 2c 20 7a 50  tf("wiki-%s", zP
13a0: 61 67 65 4e 61 6d 65 29 3b 0a 20 20 72 69 64 20  ageName);.  rid 
13b0: 3d 20 64 62 5f 69 6e 74 28 30 2c 20 0a 20 20 20  = db_int(0, .   
13c0: 20 22 53 45 4c 45 43 54 20 72 69 64 20 46 52 4f   "SELECT rid FRO
13d0: 4d 20 74 61 67 78 72 65 66 22 0a 20 20 20 20 22  M tagxref".    "
13e0: 20 57 48 45 52 45 20 74 61 67 69 64 3d 28 53 45   WHERE tagid=(SE
13f0: 4c 45 43 54 20 74 61 67 69 64 20 46 52 4f 4d 20  LECT tagid FROM 
1400: 74 61 67 20 57 48 45 52 45 20 74 61 67 6e 61 6d  tag WHERE tagnam
1410: 65 3d 25 51 29 22 0a 20 20 20 20 22 20 4f 52 44  e=%Q)".    " ORD
1420: 45 52 20 42 59 20 6d 74 69 6d 65 20 44 45 53 43  ER BY mtime DESC
1430: 22 2c 20 7a 54 61 67 0a 20 20 29 3b 0a 20 20 66  ", zTag.  );.  f
1440: 72 65 65 28 7a 54 61 67 29 3b 0a 20 20 69 66 28  ree(zTag);.  if(
1450: 20 28 72 69 64 20 26 26 20 21 67 2e 6f 6b 57 72   (rid && !g.okWr
1460: 57 69 6b 69 29 20 7c 7c 20 28 21 72 69 64 20 26  Wiki) || (!rid &
1470: 26 20 21 67 2e 6f 6b 4e 65 77 57 69 6b 69 29 20  & !g.okNewWiki) 
1480: 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65  ){.    login_nee
1490: 64 65 64 28 29 3b 0a 20 20 20 20 72 65 74 75 72  ded();.    retur
14a0: 6e 3b 0a 20 20 7d 0a 20 20 6d 65 6d 73 65 74 28  n;.  }.  memset(
14b0: 26 6d 2c 20 30 2c 20 73 69 7a 65 6f 66 28 6d 29  &m, 0, sizeof(m)
14c0: 29 3b 0a 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 26  );.  blob_zero(&
14d0: 6d 2e 63 6f 6e 74 65 6e 74 29 3b 0a 20 20 69 66  m.content);.  if
14e0: 28 20 72 69 64 20 26 26 20 7a 42 6f 64 79 3d 3d  ( rid && zBody==
14f0: 30 20 29 7b 0a 20 20 20 20 42 6c 6f 62 20 63 6f  0 ){.    Blob co
1500: 6e 74 65 6e 74 3b 0a 20 20 20 20 63 6f 6e 74 65  ntent;.    conte
1510: 6e 74 5f 67 65 74 28 72 69 64 2c 20 26 63 6f 6e  nt_get(rid, &con
1520: 74 65 6e 74 29 3b 0a 20 20 20 20 6d 61 6e 69 66  tent);.    manif
1530: 65 73 74 5f 70 61 72 73 65 28 26 6d 2c 20 26 63  est_parse(&m, &c
1540: 6f 6e 74 65 6e 74 29 3b 0a 20 20 20 20 69 66 28  ontent);.    if(
1550: 20 6d 2e 74 79 70 65 3d 3d 43 46 54 59 50 45 5f   m.type==CFTYPE_
1560: 57 49 4b 49 20 29 7b 0a 20 20 20 20 20 20 7a 42  WIKI ){.      zB
1570: 6f 64 79 20 3d 20 6d 2e 7a 57 69 6b 69 3b 0a 20  ody = m.zWiki;. 
1580: 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 50     }.  }.  if( P
1590: 28 22 73 75 62 6d 69 74 22 29 21 3d 30 20 26 26  ("submit")!=0 &&
15a0: 20 7a 42 6f 64 79 21 3d 30 20 29 7b 0a 20 20 20   zBody!=0 ){.   
15b0: 20 63 68 61 72 20 2a 7a 44 61 74 65 3b 0a 20 20   char *zDate;.  
15c0: 20 20 42 6c 6f 62 20 63 6b 73 75 6d 3b 0a 20 20    Blob cksum;.  
15d0: 20 20 69 6e 74 20 6e 72 69 64 3b 0a 20 20 20 20    int nrid;.    
15e0: 62 6c 6f 62 5f 7a 65 72 6f 28 26 77 69 6b 69 29  blob_zero(&wiki)
15f0: 3b 0a 20 20 20 20 64 62 5f 62 65 67 69 6e 5f 74  ;.    db_begin_t
1600: 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20  ransaction();.  
1610: 20 20 7a 44 61 74 65 20 3d 20 64 62 5f 74 65 78    zDate = db_tex
1620: 74 28 30 2c 20 22 53 45 4c 45 43 54 20 64 61 74  t(0, "SELECT dat
1630: 65 74 69 6d 65 28 27 6e 6f 77 27 29 22 29 3b 0a  etime('now')");.
1640: 20 20 20 20 7a 44 61 74 65 5b 31 30 5d 20 3d 20      zDate[10] = 
1650: 27 54 27 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70  'T';.    blob_ap
1660: 70 65 6e 64 66 28 26 77 69 6b 69 2c 20 22 44 20  pendf(&wiki, "D 
1670: 25 73 5c 6e 22 2c 20 7a 44 61 74 65 29 3b 0a 20  %s\n", zDate);. 
1680: 20 20 20 66 72 65 65 28 7a 44 61 74 65 29 3b 0a     free(zDate);.
1690: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66      blob_appendf
16a0: 28 26 77 69 6b 69 2c 20 22 4c 20 25 46 5c 6e 22  (&wiki, "L %F\n"
16b0: 2c 20 7a 50 61 67 65 4e 61 6d 65 29 3b 0a 20 20  , zPageName);.  
16c0: 20 20 69 66 28 20 72 69 64 20 29 7b 0a 20 20 20    if( rid ){.   
16d0: 20 20 20 63 68 61 72 20 2a 7a 55 75 69 64 20 3d     char *zUuid =
16e0: 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c   db_text(0, "SEL
16f0: 45 43 54 20 75 75 69 64 20 46 52 4f 4d 20 62 6c  ECT uuid FROM bl
1700: 6f 62 20 57 48 45 52 45 20 72 69 64 3d 25 64 22  ob WHERE rid=%d"
1710: 2c 20 72 69 64 29 3b 0a 20 20 20 20 20 20 62 6c  , rid);.      bl
1720: 6f 62 5f 61 70 70 65 6e 64 66 28 26 77 69 6b 69  ob_appendf(&wiki
1730: 2c 20 22 50 20 25 73 5c 6e 22 2c 20 7a 55 75 69  , "P %s\n", zUui
1740: 64 29 3b 0a 20 20 20 20 20 20 66 72 65 65 28 7a  d);.      free(z
1750: 55 75 69 64 29 3b 0a 20 20 20 20 7d 0a 20 20 20  Uuid);.    }.   
1760: 20 69 66 28 20 67 2e 7a 4c 6f 67 69 6e 20 29 7b   if( g.zLogin ){
1770: 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65  .      blob_appe
1780: 6e 64 66 28 26 77 69 6b 69 2c 20 22 55 20 25 46  ndf(&wiki, "U %F
1790: 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69 6e 29 3b 0a  \n", g.zLogin);.
17a0: 20 20 20 20 7d 0a 20 20 20 20 62 6c 6f 62 5f 61      }.    blob_a
17b0: 70 70 65 6e 64 66 28 26 77 69 6b 69 2c 20 22 57  ppendf(&wiki, "W
17c0: 20 25 64 5c 6e 25 73 5c 6e 22 2c 20 73 74 72 6c   %d\n%s\n", strl
17d0: 65 6e 28 7a 42 6f 64 79 29 2c 20 7a 42 6f 64 79  en(zBody), zBody
17e0: 29 3b 0a 20 20 20 20 6d 64 35 73 75 6d 5f 62 6c  );.    md5sum_bl
17f0: 6f 62 28 26 77 69 6b 69 2c 20 26 63 6b 73 75 6d  ob(&wiki, &cksum
1800: 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65  );.    blob_appe
1810: 6e 64 66 28 26 77 69 6b 69 2c 20 22 5a 20 25 62  ndf(&wiki, "Z %b
1820: 5c 6e 22 2c 20 26 63 6b 73 75 6d 29 3b 0a 20 20  \n", &cksum);.  
1830: 20 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 63 6b    blob_reset(&ck
1840: 73 75 6d 29 3b 0a 20 20 20 20 6e 72 69 64 20 3d  sum);.    nrid =
1850: 20 63 6f 6e 74 65 6e 74 5f 70 75 74 28 26 77 69   content_put(&wi
1860: 6b 69 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 64  ki, 0, 0);.    d
1870: 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 49 4e  b_multi_exec("IN
1880: 53 45 52 54 20 4f 52 20 49 47 4e 4f 52 45 20 49  SERT OR IGNORE I
1890: 4e 54 4f 20 75 6e 73 65 6e 74 20 56 41 4c 55 45  NTO unsent VALUE
18a0: 53 28 25 64 29 22 2c 20 6e 72 69 64 29 3b 0a 20  S(%d)", nrid);. 
18b0: 20 20 20 6d 61 6e 69 66 65 73 74 5f 63 72 6f 73     manifest_cros
18c0: 73 6c 69 6e 6b 28 6e 72 69 64 2c 20 26 77 69 6b  slink(nrid, &wik
18d0: 69 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 72 65 73  i);.    blob_res
18e0: 65 74 28 26 77 69 6b 69 29 3b 0a 20 20 20 20 63  et(&wiki);.    c
18f0: 6f 6e 74 65 6e 74 5f 64 65 6c 74 69 66 79 28 72  ontent_deltify(r
1900: 69 64 2c 20 6e 72 69 64 2c 20 30 29 3b 0a 20 20  id, nrid, 0);.  
1910: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63    db_end_transac
1920: 74 69 6f 6e 28 30 29 3b 0a 20 20 20 20 63 67 69  tion(0);.    cgi
1930: 5f 72 65 64 69 72 65 63 74 28 6d 70 72 69 6e 74  _redirect(mprint
1940: 66 28 22 77 69 6b 69 2f 25 73 22 2c 20 67 2e 7a  f("wiki/%s", g.z
1950: 45 78 74 72 61 29 29 3b 0a 20 20 7d 0a 20 20 69  Extra));.  }.  i
1960: 66 28 20 50 28 22 63 61 6e 63 65 6c 22 29 21 3d  f( P("cancel")!=
1970: 30 20 29 7b 0a 20 20 20 20 63 67 69 5f 72 65 64  0 ){.    cgi_red
1980: 69 72 65 63 74 28 6d 70 72 69 6e 74 66 28 22 77  irect(mprintf("w
1990: 69 6b 69 2f 25 73 22 2c 20 67 2e 7a 45 78 74 72  iki/%s", g.zExtr
19a0: 61 29 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b  a));.    return;
19b0: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 42 6f 64 79  .  }.  if( zBody
19c0: 3d 3d 30 20 29 7b 0a 20 20 20 20 7a 42 6f 64 79  ==0 ){.    zBody
19d0: 20 3d 20 6d 70 72 69 6e 74 66 28 22 3c 69 3e 45   = mprintf("<i>E
19e0: 6d 70 74 79 20 50 61 67 65 3c 2f 69 3e 22 29 3b  mpty Page</i>");
19f0: 0a 20 20 7d 0a 20 20 7a 48 74 6d 6c 50 61 67 65  .  }.  zHtmlPage
1a00: 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66 28 22  Name = mprintf("
1a10: 45 64 69 74 3a 20 25 68 22 2c 20 7a 50 61 67 65  Edit: %h", zPage
1a20: 4e 61 6d 65 29 3b 0a 20 20 73 74 79 6c 65 5f 68  Name);.  style_h
1a30: 65 61 64 65 72 28 7a 48 74 6d 6c 50 61 67 65 4e  eader(zHtmlPageN
1a40: 61 6d 65 29 3b 0a 20 20 69 66 28 20 50 28 22 70  ame);.  if( P("p
1a50: 72 65 76 69 65 77 22 29 21 3d 30 20 29 7b 0a 20  review")!=0 ){. 
1a60: 20 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 26 77 69     blob_zero(&wi
1a70: 6b 69 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70  ki);.    blob_ap
1a80: 70 65 6e 64 28 26 77 69 6b 69 2c 20 7a 42 6f 64  pend(&wiki, zBod
1a90: 79 2c 20 2d 31 29 3b 0a 20 20 20 20 40 20 50 72  y, -1);.    @ Pr
1aa0: 65 76 69 65 77 3a 3c 68 72 3e 0a 20 20 20 20 77  eview:<hr>.    w
1ab0: 69 6b 69 5f 63 6f 6e 76 65 72 74 28 26 77 69 6b  iki_convert(&wik
1ac0: 69 2c 20 30 29 3b 0a 20 20 20 20 40 20 3c 68 72  i, 0);.    @ <hr
1ad0: 3e 0a 20 20 20 20 62 6c 6f 62 5f 72 65 73 65 74  >.    blob_reset
1ae0: 28 26 77 69 6b 69 29 3b 0a 20 20 7d 0a 20 20 66  (&wiki);.  }.  f
1af0: 6f 72 28 6e 3d 32 2c 20 7a 3d 7a 42 6f 64 79 3b  or(n=2, z=zBody;
1b00: 20 7a 5b 30 5d 3b 20 7a 2b 2b 29 7b 0a 20 20 20   z[0]; z++){.   
1b10: 20 69 66 28 20 7a 5b 30 5d 3d 3d 27 5c 6e 27 20   if( z[0]=='\n' 
1b20: 29 20 6e 2b 2b 3b 0a 20 20 7d 0a 20 20 69 66 28  ) n++;.  }.  if(
1b30: 20 6e 3c 32 30 20 29 20 6e 20 3d 20 32 30 3b 0a   n<20 ) n = 20;.
1b40: 20 20 69 66 28 20 6e 3e 32 30 30 20 29 20 6e 20    if( n>200 ) n 
1b50: 3d 20 32 30 30 3b 0a 20 20 40 20 3c 66 6f 72 6d  = 200;.  @ <form
1b60: 20 6d 65 74 68 6f 64 3d 22 50 4f 53 54 22 20 61   method="POST" a
1b70: 63 74 69 6f 6e 3d 22 25 73 28 67 2e 7a 42 61 73  ction="%s(g.zBas
1b80: 65 55 52 4c 29 2f 77 69 6b 69 65 64 69 74 2f 25  eURL)/wikiedit/%
1b90: 74 28 67 2e 7a 45 78 74 72 61 29 22 3e 0a 20 20  t(g.zExtra)">.  
1ba0: 40 20 3c 74 65 78 74 61 72 65 61 20 6e 61 6d 65  @ <textarea name
1bb0: 3d 22 77 22 20 63 6c 61 73 73 3d 22 77 69 6b 69  ="w" class="wiki
1bc0: 65 64 69 74 22 20 63 6f 6c 73 3d 22 38 30 22 20  edit" cols="80" 
1bd0: 0a 20 20 40 20 20 72 6f 77 73 3d 22 25 64 28 6e  .  @  rows="%d(n
1be0: 29 22 20 77 72 61 70 3d 22 76 69 72 74 75 61 6c  )" wrap="virtual
1bf0: 22 3e 25 68 28 7a 42 6f 64 79 29 3c 2f 74 65 78  ">%h(zBody)</tex
1c00: 74 61 72 65 61 3e 0a 20 20 40 20 3c 62 72 3e 0a  tarea>.  @ <br>.
1c10: 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d    @ <input type=
1c20: 22 73 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 70  "submit" name="p
1c30: 72 65 76 69 65 77 22 20 76 61 6c 75 65 3d 22 50  review" value="P
1c40: 72 65 76 69 65 77 20 59 6f 75 72 20 43 68 61 6e  review Your Chan
1c50: 67 65 73 22 3e 0a 20 20 40 20 3c 69 6e 70 75 74  ges">.  @ <input
1c60: 20 74 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e   type="submit" n
1c70: 61 6d 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c  ame="submit" val
1c80: 75 65 3d 22 41 70 70 6c 79 20 54 68 65 73 65 20  ue="Apply These 
1c90: 43 68 61 6e 67 65 73 22 3e 0a 20 20 40 20 3c 69  Changes">.  @ <i
1ca0: 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69  nput type="submi
1cb0: 74 22 20 6e 61 6d 65 3d 22 63 61 6e 63 65 6c 22  t" name="cancel"
1cc0: 20 76 61 6c 75 65 3d 22 43 61 6e 63 65 6c 22 3e   value="Cancel">
1cd0: 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 6d  .  @ </form>.  m
1ce0: 61 6e 69 66 65 73 74 5f 63 6c 65 61 72 28 26 6d  anifest_clear(&m
1cf0: 29 3b 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65  );.  style_foote
1d00: 72 28 29 3b 0a 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57  r();..}../*.** W
1d10: 45 42 50 41 47 45 3a 20 77 68 69 73 74 6f 72 79  EBPAGE: whistory
1d20: 0a 2a 2a 0a 2a 2a 20 53 68 6f 77 20 74 68 65 20  .**.** Show the 
1d30: 63 6f 6d 70 6c 65 74 65 20 63 68 61 6e 67 65 20  complete change 
1d40: 68 69 73 74 6f 72 79 20 66 6f 72 20 61 20 73 69  history for a si
1d50: 6e 67 6c 65 20 77 69 6b 69 20 70 61 67 65 2e 20  ngle wiki page. 
1d60: 20 54 68 65 20 6e 61 6d 65 0a 2a 2a 20 6f 66 20   The name.** of 
1d70: 74 68 65 20 77 69 6b 69 20 69 73 20 69 6e 20 67  the wiki is in g
1d80: 2e 7a 45 78 74 72 61 0a 2a 2f 0a 76 6f 69 64 20  .zExtra.*/.void 
1d90: 77 68 69 73 74 6f 72 79 5f 70 61 67 65 28 76 6f  whistory_page(vo
1da0: 69 64 29 7b 0a 20 20 53 74 6d 74 20 71 3b 0a 20  id){.  Stmt q;. 
1db0: 20 63 68 61 72 20 2a 7a 54 69 74 6c 65 3b 0a 20   char *zTitle;. 
1dc0: 20 63 68 61 72 20 2a 7a 53 51 4c 3b 0a 20 20 6c   char *zSQL;.  l
1dd0: 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65  ogin_check_crede
1de0: 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 28 20  ntials();.  if( 
1df0: 21 67 2e 6f 6b 48 69 73 74 6f 72 79 20 29 7b 20  !g.okHistory ){ 
1e00: 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 20  login_needed(); 
1e10: 72 65 74 75 72 6e 3b 20 7d 0a 20 20 7a 54 69 74  return; }.  zTit
1e20: 6c 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 48 69  le = mprintf("Hi
1e30: 73 74 6f 72 79 20 4f 66 20 25 68 22 2c 20 67 2e  story Of %h", g.
1e40: 7a 45 78 74 72 61 29 3b 0a 20 20 73 74 79 6c 65  zExtra);.  style
1e50: 5f 68 65 61 64 65 72 28 7a 54 69 74 6c 65 29 3b  _header(zTitle);
1e60: 0a 20 20 66 72 65 65 28 7a 54 69 74 6c 65 29 3b  .  free(zTitle);
1e70: 0a 0a 20 20 7a 53 51 4c 20 3d 20 6d 70 72 69 6e  ..  zSQL = mprin
1e80: 74 66 28 22 25 73 20 41 4e 44 20 65 76 65 6e 74  tf("%s AND event
1e90: 2e 6f 62 6a 69 64 20 49 4e 20 22 0a 20 20 20 20  .objid IN ".    
1ea0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20               "  
1eb0: 28 53 45 4c 45 43 54 20 72 69 64 20 46 52 4f 4d  (SELECT rid FROM
1ec0: 20 74 61 67 78 72 65 66 20 57 48 45 52 45 20 74   tagxref WHERE t
1ed0: 61 67 69 64 3d 22 0a 20 20 20 20 20 20 20 20 20  agid=".         
1ee0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 28                "(
1ef0: 53 45 4c 45 43 54 20 74 61 67 69 64 20 46 52 4f  SELECT tagid FRO
1f00: 4d 20 74 61 67 20 57 48 45 52 45 20 74 61 67 6e  M tag WHERE tagn
1f10: 61 6d 65 3d 27 77 69 6b 69 2d 25 71 27 29 29 22  ame='wiki-%q'))"
1f20: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
1f30: 20 20 22 4f 52 44 45 52 20 42 59 20 6d 74 69 6d    "ORDER BY mtim
1f40: 65 20 44 45 53 43 22 2c 0a 20 20 20 20 20 20 20  e DESC",.       
1f50: 20 20 20 20 20 20 20 20 20 20 74 69 6d 65 6c 69            timeli
1f60: 6e 65 5f 71 75 65 72 79 5f 66 6f 72 5f 77 77 77  ne_query_for_www
1f70: 28 29 2c 20 67 2e 7a 45 78 74 72 61 29 3b 0a 20  (), g.zExtra);. 
1f80: 20 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c 20   db_prepare(&q, 
1f90: 7a 53 51 4c 29 3b 0a 20 20 66 72 65 65 28 7a 53  zSQL);.  free(zS
1fa0: 51 4c 29 3b 0a 20 20 77 77 77 5f 70 72 69 6e 74  QL);.  www_print
1fb0: 5f 74 69 6d 65 6c 69 6e 65 28 26 71 2c 20 30 2c  _timeline(&q, 0,
1fc0: 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 64 62 5f   0, 0, 0);.  db_
1fd0: 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20  finalize(&q);.  
1fe0: 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a  style_footer();.
1ff0: 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45  }../*.** WEBPAGE
2000: 3a 20 77 63 6f 6e 74 65 6e 74 0a 2a 2a 0a 2a 2a  : wcontent.**.**
2010: 20 4c 69 73 74 20 61 6c 6c 20 61 76 61 69 6c 61   List all availa
2020: 62 6c 65 20 77 69 6b 69 20 70 61 67 65 73 20 77  ble wiki pages w
2030: 69 74 68 20 64 61 74 65 20 63 72 65 61 74 65 64  ith date created
2040: 20 61 6e 64 20 6c 61 73 74 20 6d 6f 64 69 66 69   and last modifi
2050: 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 77 63 6f 6e  ed..*/.void wcon
2060: 74 65 6e 74 5f 70 61 67 65 28 76 6f 69 64 29 7b  tent_page(void){
2070: 0a 20 20 53 74 6d 74 20 71 3b 0a 20 20 6c 6f 67  .  Stmt q;.  log
2080: 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74  in_check_credent
2090: 69 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67  ials();.  if( !g
20a0: 2e 6f 6b 52 64 57 69 6b 69 20 29 7b 20 6c 6f 67  .okRdWiki ){ log
20b0: 69 6e 5f 6e 65 65 64 65 64 28 29 3b 20 72 65 74  in_needed(); ret
20c0: 75 72 6e 3b 20 7d 0a 20 20 73 74 79 6c 65 5f 68  urn; }.  style_h
20d0: 65 61 64 65 72 28 22 41 76 61 69 6c 61 62 6c 65  eader("Available
20e0: 20 57 69 6b 69 20 50 61 67 65 73 22 29 3b 0a 20   Wiki Pages");. 
20f0: 20 40 20 3c 75 6c 3e 0a 20 20 64 62 5f 70 72 65   @ <ul>.  db_pre
2100: 70 61 72 65 28 26 71 2c 20 0a 20 20 20 20 22 53  pare(&q, .    "S
2110: 45 4c 45 43 54 20 73 75 62 73 74 72 28 74 61 67  ELECT substr(tag
2120: 6e 61 6d 65 2c 20 36 2c 20 31 30 30 30 29 20 46  name, 6, 1000) F
2130: 52 4f 4d 20 74 61 67 20 57 48 45 52 45 20 74 61  ROM tag WHERE ta
2140: 67 6e 61 6d 65 20 47 4c 4f 42 20 27 77 69 6b 69  gname GLOB 'wiki
2150: 2d 2a 27 22 0a 20 20 20 20 22 20 4f 52 44 45 52  -*'".    " ORDER
2160: 20 42 59 20 6c 6f 77 65 72 28 74 61 67 6e 61 6d   BY lower(tagnam
2170: 65 29 22 0a 20 20 29 3b 0a 20 20 77 68 69 6c 65  e)".  );.  while
2180: 28 20 64 62 5f 73 74 65 70 28 26 71 29 3d 3d 53  ( db_step(&q)==S
2190: 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20  QLITE_ROW ){.   
21a0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61   const char *zNa
21b0: 6d 65 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74  me = db_column_t
21c0: 65 78 74 28 26 71 2c 20 30 29 3b 0a 20 20 20 20  ext(&q, 0);.    
21d0: 40 20 3c 6c 69 3e 3c 61 20 68 72 65 66 3d 22 25  @ <li><a href="%
21e0: 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 77 69  s(g.zBaseURL)/wi
21f0: 6b 69 2f 25 74 28 7a 4e 61 6d 65 29 22 3e 25 68  ki/%t(zName)">%h
2200: 28 7a 4e 61 6d 65 29 3c 2f 61 3e 3c 2f 6c 69 3e  (zName)</a></li>
2210: 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61 6c 69  .  }.  db_finali
2220: 7a 65 28 26 71 29 3b 0a 20 20 73 74 79 6c 65 5f  ze(&q);.  style_
2230: 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a  footer();.}../*.
2240: 2a 2a 20 57 45 42 50 41 47 45 3a 20 61 6d 62 69  ** WEBPAGE: ambi
2250: 67 75 6f 75 73 0a 2a 2a 0a 2a 2a 20 54 68 69 73  guous.**.** This
2260: 20 69 73 20 74 68 65 20 64 65 73 74 69 6e 61 74   is the destinat
2270: 69 6f 6e 20 66 6f 72 20 55 55 49 44 20 68 79 70  ion for UUID hyp
2280: 65 72 6c 69 6e 6b 73 20 74 68 61 74 20 61 72 65  erlinks that are
2290: 20 61 6d 62 69 67 75 6f 75 73 2e 0a 2a 2a 20 53   ambiguous..** S
22a0: 68 6f 77 20 61 6c 6c 20 70 6f 73 73 69 62 6c 65  how all possible
22b0: 20 63 68 6f 69 63 65 73 20 66 6f 72 20 74 68 65   choices for the
22c0: 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 77 69 74   destination wit
22d0: 68 20 6c 69 6e 6b 73 20 74 6f 20 65 61 63 68 2e  h links to each.
22e0: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 6d 62 69 67  .**.** The ambig
22f0: 75 6f 75 73 20 55 55 49 44 20 70 72 65 66 69 78  uous UUID prefix
2300: 20 69 73 20 69 6e 20 67 2e 7a 45 78 74 72 61 0a   is in g.zExtra.
2310: 2a 2f 0a 76 6f 69 64 20 61 6d 62 69 67 75 6f 75  */.void ambiguou
2320: 73 5f 70 61 67 65 28 76 6f 69 64 29 7b 0a 20 20  s_page(void){.  
2330: 53 74 6d 74 20 71 3b 0a 20 20 73 74 79 6c 65 5f  Stmt q;.  style_
2340: 68 65 61 64 65 72 28 22 41 6d 62 69 67 75 6f 75  header("Ambiguou
2350: 73 20 55 55 49 44 22 29 3b 0a 20 20 40 20 3c 70  s UUID");.  @ <p
2360: 3e 54 68 65 20 6c 69 6e 6b 20 3c 61 20 68 72 65  >The link <a hre
2370: 66 3d 22 25 73 28 67 2e 7a 42 61 73 65 55 52 4c  f="%s(g.zBaseURL
2380: 29 2f 61 6d 62 69 67 75 6f 75 73 2f 25 54 28 67  )/ambiguous/%T(g
2390: 2e 7a 45 78 74 72 61 29 22 3e 0a 20 20 40 20 5b  .zExtra)">.  @ [
23a0: 25 68 28 67 2e 7a 45 78 74 72 61 29 5d 3c 2f 61  %h(g.zExtra)]</a
23b0: 3e 20 69 73 20 61 6d 62 69 67 75 6f 75 73 2e 20  > is ambiguous. 
23c0: 20 49 74 20 6d 69 67 68 74 20 6d 65 61 6e 20 61   It might mean a
23d0: 6e 79 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77  ny of the follow
23e0: 69 6e 67 3a 3c 2f 70 3e 0a 20 20 40 20 3c 75 6c  ing:</p>.  @ <ul
23f0: 3e 0a 20 20 64 62 5f 70 72 65 70 61 72 65 28 26  >.  db_prepare(&
2400: 71 2c 20 22 53 45 4c 45 43 54 20 75 75 69 64 2c  q, "SELECT uuid,
2410: 20 72 69 64 20 46 52 4f 4d 20 62 6c 6f 62 20 57   rid FROM blob W
2420: 48 45 52 45 20 75 75 69 64 3e 3d 25 51 20 41 4e  HERE uuid>=%Q AN
2430: 44 20 75 75 69 64 3c 27 25 71 7a 27 22 0a 20 20  D uuid<'%qz'".  
2440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22                 "
2450: 20 4f 52 44 45 52 20 42 59 20 75 75 69 64 22 2c   ORDER BY uuid",
2460: 20 67 2e 7a 45 78 74 72 61 2c 20 67 2e 7a 45 78   g.zExtra, g.zEx
2470: 74 72 61 29 3b 0a 20 20 77 68 69 6c 65 28 20 64  tra);.  while( d
2480: 62 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49  b_step(&q)==SQLI
2490: 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 63 6f  TE_ROW ){.    co
24a0: 6e 73 74 20 63 68 61 72 20 2a 7a 55 75 69 64 20  nst char *zUuid 
24b0: 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74  = db_column_text
24c0: 28 26 71 2c 20 30 29 3b 0a 20 20 20 20 69 6e 74  (&q, 0);.    int
24d0: 20 72 69 64 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e   rid = db_column
24e0: 5f 69 6e 74 28 26 71 2c 20 31 29 3b 0a 20 20 20  _int(&q, 1);.   
24f0: 20 40 20 3c 6c 69 3e 20 25 73 28 7a 55 75 69 64   @ <li> %s(zUuid
2500: 29 20 2d 20 25 64 28 72 69 64 29 0a 20 20 7d 0a  ) - %d(rid).  }.
2510: 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26 71    db_finalize(&q
2520: 29 3b 0a 20 20 40 20 3c 2f 75 6c 3e 0a 20 20 73  );.  @ </ul>.  s
2530: 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d  tyle_footer();.}
2540: 0a                                               .