Hex Artifact Content
Not logged in

Artifact 020ff2a0d62a3d29a1159d92df19b0ca58d56191:

File src/setup.c part of check-in [a48474bc75] - Improvements to the shunning algorithm. Add the shun page and an opportunity to shun or unshun artifacts in the artifact viewer. by drh on 2008-05-29 01:58:15.

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 61  lic.** License a
00b0: 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 20 74  s published by t
00c0: 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65  he Free Software
00d0: 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74   Foundation; eit
00e0: 68 65 72 0a 2a 2a 20 76 65 72 73 69 6f 6e 20 32  her.** version 2
00f0: 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c   of the License,
0100: 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74   or (at your opt
0110: 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76  ion) any later v
0120: 65 72 73 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68  ersion..**.** Th
0130: 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69  is program is di
0140: 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65  stributed in the
0150: 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69   hope that it wi
0160: 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a  ll be useful,.**
0170: 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59   but WITHOUT ANY
0180: 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f   WARRANTY; witho
0190: 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c  ut even the impl
01a0: 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a  ied warranty of.
01b0: 2a 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49  ** MERCHANTABILI
01c0: 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f  TY or FITNESS FO
01d0: 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50  R A PARTICULAR P
01e0: 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65  URPOSE.  See the
01f0: 20 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20   GNU.** General 
0200: 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66  Public License f
0210: 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e  or more details.
0220: 0a 2a 2a 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 6c  .**.** You shoul
0230: 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20  d have received 
0240: 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e  a copy of the GN
0250: 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63  U General Public
0260: 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e  .** License alon
0270: 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72  g with this libr
0280: 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69  ary; if not, wri
0290: 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65  te to the.** Fre
02a0: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
02b0: 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20  ation, Inc., 59 
02c0: 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53  Temple Place - S
02d0: 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73  uite 330,.** Bos
02e0: 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31  ton, MA  02111-1
02f0: 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20  307, USA..**.** 
0300: 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69  Author contact i
0310: 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20  nformation:.**  
0320: 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a   drh@hwaci.com.*
0330: 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68  *   http://www.h
0340: 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a  waci.com/drh/.**
0350: 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  .***************
0360: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0370: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0380: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0390: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
03a0: 0a 2a 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  .**.** Implement
03b0: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 53 65 74  ation of the Set
03c0: 75 70 20 70 61 67 65 0a 2a 2f 0a 23 69 6e 63 6c  up page.*/.#incl
03d0: 75 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a 23  ude <assert.h>.#
03e0: 69 6e 63 6c 75 64 65 20 22 63 6f 6e 66 69 67 2e  include "config.
03f0: 68 22 0a 23 69 6e 63 6c 75 64 65 20 22 73 65 74  h".#include "set
0400: 75 70 2e 68 22 0a 0a 0a 2f 2a 0a 2a 2a 20 4f 75  up.h".../*.** Ou
0410: 74 70 75 74 20 61 20 73 69 6e 67 6c 65 20 65 6e  tput a single en
0420: 74 72 79 20 66 6f 72 20 61 20 6d 65 6e 75 20 67  try for a menu g
0430: 65 6e 65 72 61 74 65 64 20 75 73 69 6e 67 20 61  enerated using a
0440: 6e 20 48 54 4d 4c 20 74 61 62 6c 65 2e 0a 2a 2a  n HTML table..**
0450: 20 49 66 20 7a 4c 69 6e 6b 20 69 73 20 6e 6f 74   If zLink is not
0460: 20 4e 55 4c 4c 20 6f 72 20 61 6e 20 65 6d 70 74   NULL or an empt
0470: 79 20 73 74 72 69 6e 67 2c 20 74 68 65 6e 20 69  y string, then i
0480: 74 20 69 73 20 74 68 65 20 70 61 67 65 20 74 68  t is the page th
0490: 61 74 0a 2a 2a 20 74 68 65 20 6d 65 6e 75 20 65  at.** the menu e
04a0: 6e 74 72 79 20 77 69 6c 6c 20 68 79 70 65 72 6c  ntry will hyperl
04b0: 69 6e 6b 20 74 6f 2e 20 20 49 66 20 7a 4c 69 6e  ink to.  If zLin
04c0: 6b 20 69 73 20 4e 55 4c 4c 20 6f 72 20 22 22 2c  k is NULL or "",
04d0: 20 74 68 65 6e 0a 2a 2a 20 74 68 65 20 6d 65 6e   then.** the men
04e0: 75 20 65 6e 74 72 79 20 68 61 73 20 6e 6f 20 68  u entry has no h
04f0: 79 70 65 72 6c 69 6e 6b 20 2d 20 69 74 20 69 73  yperlink - it is
0500: 20 64 69 73 61 62 6c 65 64 2e 0a 2a 2f 0a 76 6f   disabled..*/.vo
0510: 69 64 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65 6e  id setup_menu_en
0520: 74 72 79 28 0a 20 20 63 6f 6e 73 74 20 63 68 61  try(.  const cha
0530: 72 20 2a 7a 54 69 74 6c 65 2c 0a 20 20 63 6f 6e  r *zTitle,.  con
0540: 73 74 20 63 68 61 72 20 2a 7a 4c 69 6e 6b 2c 0a  st char *zLink,.
0550: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44    const char *zD
0560: 65 73 63 0a 29 7b 0a 20 20 40 20 3c 74 72 3e 3c  esc.){.  @ <tr><
0570: 74 64 20 76 61 6c 69 67 6e 3d 22 74 6f 70 22 20  td valign="top" 
0580: 61 6c 69 67 6e 3d 22 72 69 67 68 74 22 3e 0a 20  align="right">. 
0590: 20 69 66 28 20 7a 4c 69 6e 6b 20 26 26 20 7a 4c   if( zLink && zL
05a0: 69 6e 6b 5b 30 5d 20 29 7b 0a 20 20 20 20 40 20  ink[0] ){.    @ 
05b0: 3c 61 20 68 72 65 66 3d 22 25 73 28 7a 4c 69 6e  <a href="%s(zLin
05c0: 6b 29 22 3e 25 68 28 7a 54 69 74 6c 65 29 3c 2f  k)">%h(zTitle)</
05d0: 61 3e 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  a>.  }else{.    
05e0: 40 20 25 68 28 7a 54 69 74 6c 65 29 0a 20 20 7d  @ %h(zTitle).  }
05f0: 0a 20 20 40 20 3c 2f 74 64 3e 3c 74 64 20 76 61  .  @ </td><td va
0600: 6c 69 67 6e 3d 22 74 6f 70 22 3e 25 68 28 7a 44  lign="top">%h(zD
0610: 65 73 63 29 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 7d  esc)</td></tr>.}
0620: 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a  ../*.** WEBPAGE:
0630: 20 2f 73 65 74 75 70 0a 2a 2f 0a 76 6f 69 64 20   /setup.*/.void 
0640: 73 65 74 75 70 5f 70 61 67 65 28 76 6f 69 64 29  setup_page(void)
0650: 7b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f  {.  login_check_
0660: 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20  credentials();. 
0670: 20 69 66 28 20 21 67 2e 6f 6b 53 65 74 75 70 20   if( !g.okSetup 
0680: 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65  ){.    login_nee
0690: 64 65 64 28 29 3b 0a 20 20 7d 0a 0a 20 20 73 74  ded();.  }..  st
06a0: 79 6c 65 5f 68 65 61 64 65 72 28 22 53 65 74 75  yle_header("Setu
06b0: 70 22 29 3b 0a 20 20 40 20 3c 74 61 62 6c 65 20  p");.  @ <table 
06c0: 62 6f 72 64 65 72 3d 22 30 22 20 63 65 6c 6c 73  border="0" cells
06d0: 70 61 63 69 6e 67 3d 22 32 30 22 3e 0a 20 20 73  pacing="20">.  s
06e0: 65 74 75 70 5f 6d 65 6e 75 5f 65 6e 74 72 79 28  etup_menu_entry(
06f0: 22 55 73 65 72 73 22 2c 20 22 73 65 74 75 70 5f  "Users", "setup_
0700: 75 6c 69 73 74 22 2c 0a 20 20 20 20 22 47 72 61  ulist",.    "Gra
0710: 6e 74 20 70 72 69 76 69 6c 65 67 65 73 20 74 6f  nt privileges to
0720: 20 69 6e 64 69 76 69 64 75 61 6c 20 75 73 65 72   individual user
0730: 73 2e 22 29 3b 0a 20 20 73 65 74 75 70 5f 6d 65  s.");.  setup_me
0740: 6e 75 5f 65 6e 74 72 79 28 22 41 63 63 65 73 73  nu_entry("Access
0750: 22 2c 20 22 73 65 74 75 70 5f 61 63 63 65 73 73  ", "setup_access
0760: 22 2c 0a 20 20 20 20 22 43 6f 6e 74 72 6f 6c 20  ",.    "Control 
0770: 61 63 63 65 73 73 20 73 65 74 74 69 6e 67 73 2e  access settings.
0780: 22 29 3b 0a 20 20 73 65 74 75 70 5f 6d 65 6e 75  ");.  setup_menu
0790: 5f 65 6e 74 72 79 28 22 43 6f 6e 66 69 67 75 72  _entry("Configur
07a0: 61 74 69 6f 6e 22 2c 20 22 73 65 74 75 70 5f 63  ation", "setup_c
07b0: 6f 6e 66 69 67 22 2c 0a 20 20 20 20 22 43 6f 6e  onfig",.    "Con
07c0: 66 69 67 75 72 65 20 74 68 65 20 57 57 57 20 63  figure the WWW c
07d0: 6f 6d 70 6f 6e 65 6e 74 73 20 6f 66 20 74 68 65  omponents of the
07e0: 20 72 65 70 6f 73 69 74 6f 72 79 22 29 3b 0a 20   repository");. 
07f0: 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65 6e 74 72   setup_menu_entr
0800: 79 28 22 54 69 6d 65 6c 69 6e 65 22 2c 20 22 73  y("Timeline", "s
0810: 65 74 75 70 5f 74 69 6d 65 6c 69 6e 65 22 2c 0a  etup_timeline",.
0820: 20 20 20 20 22 54 69 6d 65 6c 69 6e 65 20 64 69      "Timeline di
0830: 73 70 6c 61 79 20 70 72 65 66 65 72 65 6e 63 65  splay preference
0840: 73 22 29 3b 0a 20 20 73 65 74 75 70 5f 6d 65 6e  s");.  setup_men
0850: 75 5f 65 6e 74 72 79 28 22 54 69 63 6b 65 74 73  u_entry("Tickets
0860: 22 2c 20 22 74 6b 74 73 65 74 75 70 22 2c 0a 20  ", "tktsetup",. 
0870: 20 20 20 22 43 6f 6e 66 69 67 75 72 65 20 74 68     "Configure th
0880: 65 20 74 72 6f 75 62 6c 65 2d 74 69 63 6b 65 74  e trouble-ticket
0890: 69 6e 67 20 73 79 73 74 65 6d 20 66 6f 72 20 74  ing system for t
08a0: 68 69 73 20 72 65 70 6f 73 69 74 6f 72 79 22 29  his repository")
08b0: 3b 0a 20 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65  ;.  setup_menu_e
08c0: 6e 74 72 79 28 22 43 53 53 22 2c 20 22 73 65 74  ntry("CSS", "set
08d0: 75 70 5f 65 64 69 74 63 73 73 22 2c 0a 20 20 20  up_editcss",.   
08e0: 20 22 45 64 69 74 20 74 68 65 20 43 61 73 63 61   "Edit the Casca
08f0: 64 69 6e 67 20 53 74 79 6c 65 20 53 68 65 65 74  ding Style Sheet
0900: 20 75 73 65 64 20 62 79 20 61 6c 6c 20 70 61 67   used by all pag
0910: 65 73 20 6f 66 20 74 68 69 73 20 72 65 70 6f 73  es of this repos
0920: 69 74 6f 72 79 22 29 3b 0a 20 20 73 65 74 75 70  itory");.  setup
0930: 5f 6d 65 6e 75 5f 65 6e 74 72 79 28 22 48 65 61  _menu_entry("Hea
0940: 64 65 72 22 2c 20 22 73 65 74 75 70 5f 68 65 61  der", "setup_hea
0950: 64 65 72 22 2c 0a 20 20 20 20 22 45 64 69 74 20  der",.    "Edit 
0960: 48 54 4d 4c 20 74 65 78 74 20 69 6e 73 65 72 74  HTML text insert
0970: 65 64 20 61 74 20 74 68 65 20 74 6f 70 20 6f 66  ed at the top of
0980: 20 65 76 65 72 79 20 70 61 67 65 22 29 3b 0a 20   every page");. 
0990: 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65 6e 74 72   setup_menu_entr
09a0: 79 28 22 46 6f 6f 74 65 72 22 2c 20 22 73 65 74  y("Footer", "set
09b0: 75 70 5f 66 6f 6f 74 65 72 22 2c 0a 20 20 20 20  up_footer",.    
09c0: 22 45 64 69 74 20 48 54 4d 4c 20 74 65 78 74 20  "Edit HTML text 
09d0: 69 6e 73 65 72 74 65 64 20 61 74 20 74 68 65 20  inserted at the 
09e0: 62 6f 74 74 6f 6d 20 6f 66 20 65 76 65 72 79 20  bottom of every 
09f0: 70 61 67 65 22 29 3b 0a 20 20 73 65 74 75 70 5f  page");.  setup_
0a00: 6d 65 6e 75 5f 65 6e 74 72 79 28 22 53 68 75 6e  menu_entry("Shun
0a10: 6e 65 64 22 2c 20 22 73 68 75 6e 22 2c 0a 20 20  ned", "shun",.  
0a20: 20 20 22 53 68 6f 77 20 61 72 74 69 66 61 63 74    "Show artifact
0a30: 73 20 74 68 61 74 20 61 72 65 20 73 68 75 6e 6e  s that are shunn
0a40: 65 64 20 62 79 20 74 68 69 73 20 72 65 70 6f 73  ed by this repos
0a50: 69 74 6f 72 79 22 29 3b 0a 20 20 73 65 74 75 70  itory");.  setup
0a60: 5f 6d 65 6e 75 5f 65 6e 74 72 79 28 22 53 74 61  _menu_entry("Sta
0a70: 74 73 22 2c 20 22 73 74 61 74 22 2c 0a 20 20 20  ts", "stat",.   
0a80: 20 22 44 69 73 70 6c 61 79 20 72 65 70 6f 73 69   "Display reposi
0a90: 74 6f 72 79 20 73 74 61 74 69 73 74 69 63 73 22  tory statistics"
0aa0: 29 3b 0a 20 20 40 20 3c 2f 74 61 62 6c 65 3e 0a  );.  @ </table>.
0ab0: 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28  .  style_footer(
0ac0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50  );.}../*.** WEBP
0ad0: 41 47 45 3a 20 73 65 74 75 70 5f 75 6c 69 73 74  AGE: setup_ulist
0ae0: 0a 2a 2a 0a 2a 2a 20 53 68 6f 77 20 61 20 6c 69  .**.** Show a li
0af0: 73 74 20 6f 66 20 75 73 65 72 73 2e 20 20 43 6c  st of users.  Cl
0b00: 69 63 6b 69 6e 67 20 6f 6e 20 61 6e 79 20 75 73  icking on any us
0b10: 65 72 20 6a 75 6d 70 73 20 74 6f 20 74 68 65 20  er jumps to the 
0b20: 65 64 69 74 0a 2a 2a 20 73 63 72 65 65 6e 20 66  edit.** screen f
0b30: 6f 72 20 74 68 61 74 20 75 73 65 72 2e 0a 2a 2f  or that user..*/
0b40: 0a 76 6f 69 64 20 73 65 74 75 70 5f 75 6c 69 73  .void setup_ulis
0b50: 74 28 76 6f 69 64 29 7b 0a 20 20 53 74 6d 74 20  t(void){.  Stmt 
0b60: 73 3b 0a 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63  s;..  login_chec
0b70: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
0b80: 0a 20 20 69 66 28 20 21 67 2e 6f 6b 53 65 74 75  .  if( !g.okSetu
0b90: 70 20 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e  p ){.    login_n
0ba0: 65 65 64 65 64 28 29 3b 0a 20 20 20 20 72 65 74  eeded();.    ret
0bb0: 75 72 6e 3b 0a 20 20 7d 0a 0a 20 20 73 74 79 6c  urn;.  }..  styl
0bc0: 65 5f 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e  e_submenu_elemen
0bd0: 74 28 22 41 64 64 22 2c 20 22 41 64 64 20 55 73  t("Add", "Add Us
0be0: 65 72 22 2c 20 22 73 65 74 75 70 5f 75 65 64 69  er", "setup_uedi
0bf0: 74 22 29 3b 0a 20 20 73 74 79 6c 65 5f 68 65 61  t");.  style_hea
0c00: 64 65 72 28 22 55 73 65 72 20 4c 69 73 74 22 29  der("User List")
0c10: 3b 0a 20 20 40 20 3c 74 61 62 6c 65 20 62 6f 72  ;.  @ <table bor
0c20: 64 65 72 3d 22 30 22 20 63 65 6c 6c 70 61 64 64  der="0" cellpadd
0c30: 69 6e 67 3d 22 30 22 20 63 65 6c 6c 73 70 61 63  ing="0" cellspac
0c40: 69 6e 67 3d 22 32 35 22 3e 0a 20 20 40 20 3c 74  ing="25">.  @ <t
0c50: 72 3e 3c 74 64 20 76 61 6c 69 67 6e 3d 22 74 6f  r><td valign="to
0c60: 70 22 3e 0a 20 20 40 20 3c 62 3e 55 73 65 72 73  p">.  @ <b>Users
0c70: 3a 3c 2f 62 3e 0a 20 20 40 20 3c 74 61 62 6c 65  :</b>.  @ <table
0c80: 20 62 6f 72 64 65 72 3d 22 31 22 20 63 65 6c 6c   border="1" cell
0c90: 70 61 64 64 69 6e 67 3d 22 31 30 22 3e 3c 74 72  padding="10"><tr
0ca0: 3e 3c 74 64 3e 0a 20 20 40 20 3c 74 61 62 6c 65  ><td>.  @ <table
0cb0: 20 63 65 6c 6c 73 70 61 63 69 6e 67 3d 30 20 63   cellspacing=0 c
0cc0: 65 6c 6c 70 61 64 64 69 6e 67 3d 30 20 62 6f 72  ellpadding=0 bor
0cd0: 64 65 72 3d 30 3e 0a 20 20 40 20 3c 74 72 3e 0a  der=0>.  @ <tr>.
0ce0: 20 20 40 20 20 20 3c 74 68 20 61 6c 69 67 6e 3d    @   <th align=
0cf0: 22 72 69 67 68 74 22 3e 55 73 65 72 26 6e 62 73  "right">User&nbs
0d00: 70 3b 49 44 3c 2f 74 68 3e 3c 74 64 20 77 69 64  p;ID</th><td wid
0d10: 74 68 3d 22 32 30 22 3e 26 6e 62 73 70 3b 3c 2f  th="20">&nbsp;</
0d20: 74 64 3e 0a 20 20 40 20 20 20 3c 74 68 3e 43 61  td>.  @   <th>Ca
0d30: 70 61 62 69 6c 69 74 69 65 73 3c 2f 74 68 3e 3c  pabilities</th><
0d40: 74 64 20 77 69 64 74 68 3d 22 31 35 22 3e 26 6e  td width="15">&n
0d50: 62 73 70 3b 3c 2f 74 64 3e 0a 20 20 40 20 20 20  bsp;</td>.  @   
0d60: 3c 74 68 3e 43 6f 6e 74 61 63 74 26 6e 62 73 70  <th>Contact&nbsp
0d70: 3b 49 6e 66 6f 3c 2f 74 68 3e 0a 20 20 40 20 3c  ;Info</th>.  @ <
0d80: 2f 74 72 3e 0a 20 20 64 62 5f 70 72 65 70 61 72  /tr>.  db_prepar
0d90: 65 28 26 73 2c 20 22 53 45 4c 45 43 54 20 75 69  e(&s, "SELECT ui
0da0: 64 2c 20 6c 6f 67 69 6e 2c 20 63 61 70 2c 20 69  d, login, cap, i
0db0: 6e 66 6f 20 46 52 4f 4d 20 75 73 65 72 20 4f 52  nfo FROM user OR
0dc0: 44 45 52 20 42 59 20 6c 6f 67 69 6e 22 29 3b 0a  DER BY login");.
0dd0: 20 20 77 68 69 6c 65 28 20 64 62 5f 73 74 65 70    while( db_step
0de0: 28 26 73 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57  (&s)==SQLITE_ROW
0df0: 20 29 7b 0a 20 20 20 20 40 20 3c 74 72 3e 0a 20   ){.    @ <tr>. 
0e00: 20 20 20 40 20 3c 74 64 20 61 6c 69 67 6e 3d 22     @ <td align="
0e10: 72 69 67 68 74 22 3e 0a 20 20 20 20 69 66 28 20  right">.    if( 
0e20: 67 2e 6f 6b 41 64 6d 69 6e 20 29 7b 0a 20 20 20  g.okAdmin ){.   
0e30: 20 20 20 40 20 3c 61 20 68 72 65 66 3d 22 73 65     @ <a href="se
0e40: 74 75 70 5f 75 65 64 69 74 3f 69 64 3d 25 64 28  tup_uedit?id=%d(
0e50: 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 73  db_column_int(&s
0e60: 2c 30 29 29 22 3e 0a 20 20 20 20 7d 0a 20 20 20  ,0))">.    }.   
0e70: 20 40 20 3c 6e 6f 62 72 3e 25 68 28 64 62 5f 63   @ <nobr>%h(db_c
0e80: 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 73 2c 31 29  olumn_text(&s,1)
0e90: 29 3c 2f 6e 6f 62 72 3e 0a 20 20 20 20 69 66 28  )</nobr>.    if(
0ea0: 20 67 2e 6f 6b 41 64 6d 69 6e 20 29 7b 0a 20 20   g.okAdmin ){.  
0eb0: 20 20 20 20 40 20 3c 2f 61 3e 0a 20 20 20 20 7d      @ </a>.    }
0ec0: 0a 20 20 20 20 40 20 3c 2f 74 64 3e 3c 74 64 3e  .    @ </td><td>
0ed0: 26 6e 62 73 70 3b 26 6e 62 73 70 3b 26 6e 62 73  &nbsp;&nbsp;&nbs
0ee0: 70 3b 3c 2f 74 64 3e 0a 20 20 20 20 40 20 3c 74  p;</td>.    @ <t
0ef0: 64 20 61 6c 69 67 6e 3d 22 63 65 6e 74 65 72 22  d align="center"
0f00: 3e 25 73 28 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65  >%s(db_column_te
0f10: 78 74 28 26 73 2c 32 29 29 3c 2f 74 64 3e 0a 20  xt(&s,2))</td>. 
0f20: 20 20 20 40 20 3c 74 64 3e 26 6e 62 73 70 3b 26     @ <td>&nbsp;&
0f30: 6e 62 73 70 3b 26 6e 62 73 70 3b 3c 2f 74 64 3e  nbsp;&nbsp;</td>
0f40: 0a 20 20 20 20 40 20 3c 74 64 20 61 6c 69 67 6e  .    @ <td align
0f50: 3d 22 6c 65 66 74 22 3e 25 73 28 64 62 5f 63 6f  ="left">%s(db_co
0f60: 6c 75 6d 6e 5f 74 65 78 74 28 26 73 2c 33 29 29  lumn_text(&s,3))
0f70: 3c 2f 74 64 3e 0a 20 20 20 20 40 20 3c 2f 74 72  </td>.    @ </tr
0f80: 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 61 62 6c  >.  }.  @ </tabl
0f90: 65 3e 3c 2f 74 64 3e 3c 2f 74 72 3e 3c 2f 74 61  e></td></tr></ta
0fa0: 62 6c 65 3e 0a 20 20 40 20 3c 74 64 20 76 61 6c  ble>.  @ <td val
0fb0: 69 67 6e 3d 22 74 6f 70 22 3e 0a 20 20 40 20 3c  ign="top">.  @ <
0fc0: 62 3e 4e 6f 74 65 73 3a 3c 2f 62 3e 0a 20 20 40  b>Notes:</b>.  @
0fd0: 20 3c 6f 6c 3e 0a 20 20 40 20 3c 6c 69 3e 3c 70   <ol>.  @ <li><p
0fe0: 3e 54 68 65 20 70 65 72 6d 69 73 73 69 6f 6e 20  >The permission 
0ff0: 66 6c 61 67 73 20 61 72 65 20 61 73 20 66 6f 6c  flags are as fol
1000: 6c 6f 77 73 3a 3c 2f 70 3e 0a 20 20 40 20 3c 6f  lows:</p>.  @ <o
1010: 6c 20 74 79 70 65 3d 22 61 22 3e 0a 20 20 40 20  l type="a">.  @ 
1020: 3c 6c 69 20 76 61 6c 75 65 3d 22 31 22 3e 3c 62  <li value="1"><b
1030: 3e 41 64 6d 69 6e 3c 2f 62 3e 3a 20 43 72 65 61  >Admin</b>: Crea
1040: 74 65 20 61 6e 64 20 64 65 6c 65 74 65 20 75 73  te and delete us
1050: 65 72 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69  ers</li>.  @ <li
1060: 20 76 61 6c 75 65 3d 22 33 22 3e 3c 62 3e 41 70   value="3"><b>Ap
1070: 70 65 6e 64 2d 54 6b 74 3c 2f 62 3e 3a 20 41 70  pend-Tkt</b>: Ap
1080: 70 65 6e 64 20 74 6f 20 74 69 63 6b 65 74 73 3c  pend to tickets<
1090: 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c  /li>.  @ <li val
10a0: 75 65 3d 22 34 22 3e 3c 62 3e 44 65 6c 65 74 65  ue="4"><b>Delete
10b0: 3c 2f 62 3e 3a 20 44 65 6c 65 74 65 20 77 69 6b  </b>: Delete wik
10c0: 69 20 61 6e 64 20 74 69 63 6b 65 74 73 3c 2f 6c  i and tickets</l
10d0: 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65  i>.  @ <li value
10e0: 3d 22 35 22 3e 3c 62 3e 45 6d 61 69 6c 3c 2f 62  ="5"><b>Email</b
10f0: 3e 3a 20 56 69 65 77 20 45 4d 61 69 6c 20 61 64  >: View EMail ad
1100: 64 72 65 73 73 65 73 20 6f 6e 20 74 69 63 6b 65  dresses on ticke
1110: 74 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20  ts</li>.  @ <li 
1120: 76 61 6c 75 65 3d 22 36 22 3e 3c 62 3e 4e 65 77  value="6"><b>New
1130: 2d 57 69 6b 69 3c 2f 62 3e 3a 20 43 72 65 61 74  -Wiki</b>: Creat
1140: 65 20 6e 65 77 20 77 69 6b 69 20 70 61 67 65 73  e new wiki pages
1150: 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61  </li>.  @ <li va
1160: 6c 75 65 3d 22 37 22 3e 3c 62 3e 43 6c 6f 6e 65  lue="7"><b>Clone
1170: 3c 2f 62 3e 3a 20 43 6c 6f 6e 65 20 74 68 65 20  </b>: Clone the 
1180: 72 65 70 6f 73 69 74 6f 72 79 3c 2f 6c 69 3e 0a  repository</li>.
1190: 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22 38    @ <li value="8
11a0: 22 3e 3c 62 3e 48 69 73 74 6f 72 79 3c 2f 62 3e  "><b>History</b>
11b0: 3a 20 56 69 65 77 20 64 65 74 61 69 6c 20 72 65  : View detail re
11c0: 70 6f 73 69 74 6f 72 79 20 68 69 73 74 6f 72 79  pository history
11d0: 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61  </li>.  @ <li va
11e0: 6c 75 65 3d 22 39 22 3e 3c 62 3e 43 68 65 63 6b  lue="9"><b>Check
11f0: 2d 49 6e 3c 2f 62 3e 3a 20 43 6f 6d 6d 69 74 20  -In</b>: Commit 
1200: 6e 65 77 20 76 65 72 73 69 6f 6e 73 20 69 6e 20  new versions in 
1210: 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 3c 2f  the repository</
1220: 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75  li>.  @ <li valu
1230: 65 3d 22 31 30 22 3e 3c 62 3e 52 65 61 64 2d 57  e="10"><b>Read-W
1240: 69 6b 69 3c 2f 62 3e 3a 20 56 69 65 77 20 77 69  iki</b>: View wi
1250: 6b 69 20 70 61 67 65 73 3c 2f 6c 69 3e 0a 20 20  ki pages</li>.  
1260: 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22 31 31 22  @ <li value="11"
1270: 3e 3c 62 3e 57 72 69 74 65 2d 57 69 6b 69 3c 2f  ><b>Write-Wiki</
1280: 62 3e 3a 20 45 64 69 74 20 77 69 6b 69 20 70 61  b>: Edit wiki pa
1290: 67 65 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69  ges</li>.  @ <li
12a0: 20 76 61 6c 75 65 3d 22 31 33 22 3e 3c 62 3e 41   value="13"><b>A
12b0: 70 70 65 6e 64 2d 57 69 6b 69 3c 2f 62 3e 3a 20  ppend-Wiki</b>: 
12c0: 41 70 70 65 6e 64 20 74 6f 20 77 69 6b 69 20 70  Append to wiki p
12d0: 61 67 65 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c  ages</li>.  @ <l
12e0: 69 20 76 61 6c 75 65 3d 22 31 34 22 3e 3c 62 3e  i value="14"><b>
12f0: 4e 65 77 2d 54 6b 74 3c 2f 62 3e 3a 20 43 72 65  New-Tkt</b>: Cre
1300: 61 74 65 20 6e 65 77 20 74 69 63 6b 65 74 73 3c  ate new tickets<
1310: 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c  /li>.  @ <li val
1320: 75 65 3d 22 31 35 22 3e 3c 62 3e 43 68 65 63 6b  ue="15"><b>Check
1330: 2d 4f 75 74 3c 2f 62 3e 3a 20 43 68 65 63 6b 20  -Out</b>: Check 
1340: 6f 75 74 20 76 65 72 73 69 6f 6e 73 3c 2f 6c 69  out versions</li
1350: 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d  >.  @ <li value=
1360: 22 31 36 22 3e 3c 62 3e 50 61 73 73 77 6f 72 64  "16"><b>Password
1370: 3c 2f 62 3e 3a 20 43 68 61 6e 67 65 20 79 6f 75  </b>: Change you
1380: 72 20 6f 77 6e 20 70 61 73 73 77 6f 72 64 3c 2f  r own password</
1390: 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75  li>.  @ <li valu
13a0: 65 3d 22 31 37 22 3e 3c 62 3e 51 75 65 72 79 3c  e="17"><b>Query<
13b0: 2f 62 3e 3a 20 43 72 65 61 74 65 20 6e 65 77 20  /b>: Create new 
13c0: 71 75 65 72 69 65 73 20 61 67 61 69 6e 73 74 20  queries against 
13d0: 74 69 63 6b 65 74 73 3c 2f 6c 69 3e 0a 20 20 40  tickets</li>.  @
13e0: 20 3c 6c 69 20 76 61 6c 75 65 3d 22 31 38 22 3e   <li value="18">
13f0: 3c 62 3e 52 65 61 64 2d 54 6b 74 3c 2f 62 3e 3a  <b>Read-Tkt</b>:
1400: 20 56 69 65 77 20 74 69 63 6b 65 74 73 3c 2f 6c   View tickets</l
1410: 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65  i>.  @ <li value
1420: 3d 22 31 39 22 3e 3c 62 3e 53 65 74 75 70 3a 3c  ="19"><b>Setup:<
1430: 2f 62 3e 20 53 65 74 75 70 20 61 6e 64 20 63 6f  /b> Setup and co
1440: 6e 66 69 67 75 72 65 20 74 68 69 73 20 77 65 62  nfigure this web
1450: 73 69 74 65 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c  site</li>.  @ <l
1460: 69 20 76 61 6c 75 65 3d 22 32 30 22 3e 3c 62 3e  i value="20"><b>
1470: 54 6b 74 2d 52 65 70 6f 72 74 3a 3c 2f 62 3e 20  Tkt-Report:</b> 
1480: 43 72 65 61 74 65 20 6e 65 77 20 62 75 67 20 73  Create new bug s
1490: 75 6d 6d 61 72 79 20 72 65 70 6f 72 74 73 3c 2f  ummary reports</
14a0: 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75  li>.  @ <li valu
14b0: 65 3d 22 32 33 22 3e 3c 62 3e 57 72 69 74 65 2d  e="23"><b>Write-
14c0: 54 6b 74 3c 2f 62 3e 3a 20 45 64 69 74 20 74 69  Tkt</b>: Edit ti
14d0: 63 6b 65 74 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c  ckets</li>.  @ <
14e0: 2f 6f 6c 3e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c  /ol>.  @ </p></l
14f0: 69 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c  i>.  @.  @ <li><
1500: 70 3e 0a 20 20 40 20 45 76 65 72 79 20 75 73 65  p>.  @ Every use
1510: 72 2c 20 6c 6f 67 67 65 64 20 69 6e 20 6f 72 20  r, logged in or 
1520: 6e 6f 74 2c 20 68 61 73 20 74 68 65 20 70 72 69  not, has the pri
1530: 76 69 6c 65 67 65 73 20 6f 66 20 3c 62 3e 6e 6f  vileges of <b>no
1540: 62 6f 64 79 3c 2f 62 3e 2e 0a 20 20 40 20 41 6e  body</b>..  @ An
1550: 79 20 68 75 6d 61 6e 20 63 61 6e 20 6c 6f 67 69  y human can logi
1560: 6e 20 61 73 20 3c 62 3e 61 6e 6f 6e 79 6d 6f 75  n as <b>anonymou
1570: 73 3c 2f 62 3e 20 73 69 6e 63 65 20 74 68 65 20  s</b> since the 
1580: 70 61 73 73 77 6f 72 64 20 69 73 0a 20 20 40 20  password is.  @ 
1590: 63 6c 65 61 72 6c 79 20 64 69 73 70 6c 61 79 65  clearly displaye
15a0: 64 20 6f 6e 20 74 68 65 20 6c 6f 67 69 6e 20 70  d on the login p
15b0: 61 67 65 20 66 6f 72 20 74 68 65 6d 20 74 6f 20  age for them to 
15c0: 74 79 70 65 2e 20 20 54 68 65 20 70 75 72 70 6f  type.  The purpo
15d0: 73 65 0a 20 20 40 20 6f 66 20 72 65 71 75 69 72  se.  @ of requir
15e0: 69 6e 67 20 61 6e 6f 6e 79 6d 6f 75 73 20 74 6f  ing anonymous to
15f0: 20 6c 6f 67 20 69 6e 20 69 73 20 74 6f 20 70 72   log in is to pr
1600: 65 76 65 6e 74 20 61 63 63 65 73 73 20 62 79 20  event access by 
1610: 73 70 69 64 65 72 73 2e 0a 20 20 40 20 3c 2f 70  spiders..  @ </p
1620: 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20 40 20 3c  ></li>.  @.  @ <
1630: 2f 6f 6c 3e 0a 20 20 40 20 3c 2f 74 64 3e 3c 2f  /ol>.  @ </td></
1640: 74 72 3e 3c 2f 74 61 62 6c 65 3e 0a 20 20 73 74  tr></table>.  st
1650: 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a  yle_footer();.}.
1660: 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20  ./*.** WEBPAGE: 
1670: 2f 73 65 74 75 70 5f 75 65 64 69 74 0a 2a 2f 0a  /setup_uedit.*/.
1680: 76 6f 69 64 20 75 73 65 72 5f 65 64 69 74 28 76  void user_edit(v
1690: 6f 69 64 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68  oid){.  const ch
16a0: 61 72 20 2a 7a 49 64 2c 20 2a 7a 4c 6f 67 69 6e  ar *zId, *zLogin
16b0: 2c 20 2a 7a 49 6e 66 6f 2c 20 2a 7a 43 61 70 3b  , *zInfo, *zCap;
16c0: 0a 20 20 63 68 61 72 20 2a 6f 61 61 2c 20 2a 6f  .  char *oaa, *o
16d0: 61 73 2c 20 2a 6f 61 72 2c 20 2a 6f 61 77 2c 20  as, *oar, *oaw, 
16e0: 2a 6f 61 6e 2c 20 2a 6f 61 69 2c 20 2a 6f 61 6a  *oan, *oai, *oaj
16f0: 2c 20 2a 6f 61 6f 2c 20 2a 6f 61 70 3b 0a 20 20  , *oao, *oap;.  
1700: 63 68 61 72 20 2a 6f 61 6b 2c 20 2a 6f 61 64 2c  char *oak, *oad,
1710: 20 2a 6f 61 71 2c 20 2a 6f 61 63 2c 20 2a 6f 61   *oaq, *oac, *oa
1720: 66 2c 20 2a 6f 61 6d 2c 20 2a 6f 61 68 2c 20 2a  f, *oam, *oah, *
1730: 6f 61 67 2c 20 2a 6f 61 65 3b 0a 20 20 63 68 61  oag, *oae;.  cha
1740: 72 20 2a 6f 61 74 3b 0a 20 20 69 6e 74 20 64 6f  r *oat;.  int do
1750: 57 72 69 74 65 3b 0a 20 20 69 6e 74 20 75 69 64  Write;.  int uid
1760: 3b 0a 20 20 69 6e 74 20 68 69 67 68 65 72 55 73  ;.  int higherUs
1770: 65 72 20 3d 20 30 3b 20 20 2f 2a 20 54 72 75 65  er = 0;  /* True
1780: 20 69 66 20 75 73 65 72 20 62 65 69 6e 67 20 65   if user being e
1790: 64 69 74 65 64 20 69 73 20 53 45 54 55 50 20 61  dited is SETUP a
17a0: 6e 64 20 74 68 65 20 2a 2f 0a 20 20 20 20 20 20  nd the */.      
17b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
17c0: 20 2f 2a 20 75 73 65 72 20 64 6f 69 6e 67 20 74   /* user doing t
17d0: 68 65 20 65 64 69 74 69 6e 67 20 69 73 20 41 44  he editing is AD
17e0: 4d 49 4e 2e 20 20 44 69 73 61 6c 6c 6f 77 20 65  MIN.  Disallow e
17f0: 64 69 74 69 6e 67 20 2a 2f 0a 0a 20 20 2f 2a 20  diting */..  /* 
1800: 4d 75 73 74 20 68 61 76 65 20 41 44 4d 49 4e 20  Must have ADMIN 
1810: 70 72 69 76 6c 65 67 65 73 20 74 6f 20 61 63 63  privleges to acc
1820: 65 73 73 20 74 68 69 73 20 70 61 67 65 0a 20 20  ess this page.  
1830: 2a 2f 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b  */.  login_check
1840: 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a  _credentials();.
1850: 20 20 69 66 28 20 21 67 2e 6f 6b 41 64 6d 69 6e    if( !g.okAdmin
1860: 20 29 7b 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64   ){ login_needed
1870: 28 29 3b 20 72 65 74 75 72 6e 3b 20 7d 0a 0a 20  (); return; }.. 
1880: 20 2f 2a 20 43 68 65 63 6b 20 74 6f 20 73 65 65   /* Check to see
1890: 20 69 66 20 61 6e 20 41 44 4d 49 4e 20 75 73 65   if an ADMIN use
18a0: 72 20 69 73 20 74 72 79 69 6e 67 20 74 6f 20 65  r is trying to e
18b0: 64 69 74 20 61 20 53 45 54 55 50 20 61 63 63 6f  dit a SETUP acco
18c0: 75 6e 74 2e 0a 20 20 2a 2a 20 44 6f 6e 27 74 20  unt..  ** Don't 
18d0: 61 6c 6c 6f 77 20 74 68 61 74 2e 0a 20 20 2a 2f  allow that..  */
18e0: 0a 20 20 7a 49 64 20 3d 20 50 44 28 22 69 64 22  .  zId = PD("id"
18f0: 2c 20 22 30 22 29 3b 0a 20 20 75 69 64 20 3d 20  , "0");.  uid = 
1900: 61 74 6f 69 28 7a 49 64 29 3b 0a 20 20 69 66 28  atoi(zId);.  if(
1910: 20 7a 49 64 20 26 26 20 21 67 2e 6f 6b 53 65 74   zId && !g.okSet
1920: 75 70 20 26 26 20 75 69 64 3e 30 20 29 7b 0a 20  up && uid>0 ){. 
1930: 20 20 20 63 68 61 72 20 2a 7a 4f 6c 64 43 61 70     char *zOldCap
1940: 73 3b 0a 20 20 20 20 7a 4f 6c 64 43 61 70 73 20  s;.    zOldCaps 
1950: 3d 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53 45  = db_text(0, "SE
1960: 4c 45 43 54 20 63 61 70 73 20 46 52 4f 4d 20 75  LECT caps FROM u
1970: 73 65 72 20 57 48 45 52 45 20 75 69 64 3d 25 64  ser WHERE uid=%d
1980: 22 2c 75 69 64 29 3b 0a 20 20 20 20 68 69 67 68  ",uid);.    high
1990: 65 72 55 73 65 72 20 3d 20 7a 4f 6c 64 43 61 70  erUser = zOldCap
19a0: 73 20 26 26 20 73 74 72 63 68 72 28 7a 4f 6c 64  s && strchr(zOld
19b0: 43 61 70 73 2c 27 73 27 29 3b 0a 20 20 7d 0a 0a  Caps,'s');.  }..
19c0: 20 20 69 66 28 20 50 28 22 63 61 6e 22 29 20 29    if( P("can") )
19d0: 7b 0a 20 20 20 20 63 67 69 5f 72 65 64 69 72 65  {.    cgi_redire
19e0: 63 74 28 22 73 65 74 75 70 5f 75 6c 69 73 74 22  ct("setup_ulist"
19f0: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  );.    return;. 
1a00: 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 77 65 20 68   }..  /* If we h
1a10: 61 76 65 20 61 6c 6c 20 74 68 65 20 6e 65 63 65  ave all the nece
1a20: 73 73 61 72 79 20 69 6e 66 6f 72 6d 61 74 69 6f  ssary informatio
1a30: 6e 2c 20 77 72 69 74 65 20 74 68 65 20 6e 65 77  n, write the new
1a40: 20 6f 72 0a 20 20 2a 2a 20 6d 6f 64 69 66 69 65   or.  ** modifie
1a50: 64 20 75 73 65 72 20 72 65 63 6f 72 64 2e 20 20  d user record.  
1a60: 41 66 74 65 72 20 77 72 69 74 69 6e 67 20 74 68  After writing th
1a70: 65 20 75 73 65 72 20 72 65 63 6f 72 64 2c 20 72  e user record, r
1a80: 65 64 69 72 65 63 74 0a 20 20 2a 2a 20 74 6f 20  edirect.  ** to 
1a90: 74 68 65 20 70 61 67 65 20 74 68 61 74 20 64 69  the page that di
1aa0: 73 70 6c 61 79 73 20 61 20 6c 69 73 74 20 6f 66  splays a list of
1ab0: 20 75 73 65 72 73 2e 0a 20 20 2a 2f 0a 20 20 64   users..  */.  d
1ac0: 6f 57 72 69 74 65 20 3d 20 63 67 69 5f 61 6c 6c  oWrite = cgi_all
1ad0: 28 22 6c 6f 67 69 6e 22 2c 22 69 6e 66 6f 22 2c  ("login","info",
1ae0: 22 70 77 22 29 20 26 26 20 21 68 69 67 68 65 72  "pw") && !higher
1af0: 55 73 65 72 3b 0a 20 20 69 66 28 20 64 6f 57 72  User;.  if( doWr
1b00: 69 74 65 20 29 7b 0a 20 20 20 20 63 6f 6e 73 74  ite ){.    const
1b10: 20 63 68 61 72 20 2a 7a 50 77 3b 0a 20 20 20 20   char *zPw;.    
1b20: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 6f 67  const char *zLog
1b30: 69 6e 3b 0a 20 20 20 20 63 68 61 72 20 7a 43 61  in;.    char zCa
1b40: 70 5b 35 30 5d 3b 0a 20 20 20 20 69 6e 74 20 69  p[50];.    int i
1b50: 20 3d 20 30 3b 0a 20 20 20 20 69 6e 74 20 61 61   = 0;.    int aa
1b60: 20 3d 20 50 28 22 61 61 22 29 21 3d 30 3b 0a 20   = P("aa")!=0;. 
1b70: 20 20 20 69 6e 74 20 61 64 20 3d 20 50 28 22 61     int ad = P("a
1b80: 64 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20  d")!=0;.    int 
1b90: 61 65 20 3d 20 50 28 22 61 65 22 29 21 3d 30 3b  ae = P("ae")!=0;
1ba0: 0a 20 20 20 20 69 6e 74 20 61 69 20 3d 20 50 28  .    int ai = P(
1bb0: 22 61 69 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e  "ai")!=0;.    in
1bc0: 74 20 61 6a 20 3d 20 50 28 22 61 6a 22 29 21 3d  t aj = P("aj")!=
1bd0: 30 3b 0a 20 20 20 20 69 6e 74 20 61 6b 20 3d 20  0;.    int ak = 
1be0: 50 28 22 61 6b 22 29 21 3d 30 3b 0a 20 20 20 20  P("ak")!=0;.    
1bf0: 69 6e 74 20 61 6e 20 3d 20 50 28 22 61 6e 22 29  int an = P("an")
1c00: 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 6f 20  !=0;.    int ao 
1c10: 3d 20 50 28 22 61 6f 22 29 21 3d 30 3b 0a 20 20  = P("ao")!=0;.  
1c20: 20 20 69 6e 74 20 61 70 20 3d 20 50 28 22 61 70    int ap = P("ap
1c30: 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61  ")!=0;.    int a
1c40: 71 20 3d 20 50 28 22 61 71 22 29 21 3d 30 3b 0a  q = P("aq")!=0;.
1c50: 20 20 20 20 69 6e 74 20 61 72 20 3d 20 50 28 22      int ar = P("
1c60: 61 72 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74  ar")!=0;.    int
1c70: 20 61 73 20 3d 20 67 2e 6f 6b 53 65 74 75 70 20   as = g.okSetup 
1c80: 26 26 20 50 28 22 61 73 22 29 21 3d 30 3b 0a 20  && P("as")!=0;. 
1c90: 20 20 20 69 6e 74 20 61 77 20 3d 20 50 28 22 61     int aw = P("a
1ca0: 77 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20  w")!=0;.    int 
1cb0: 61 63 20 3d 20 50 28 22 61 63 22 29 21 3d 30 3b  ac = P("ac")!=0;
1cc0: 0a 20 20 20 20 69 6e 74 20 61 66 20 3d 20 50 28  .    int af = P(
1cd0: 22 61 66 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e  "af")!=0;.    in
1ce0: 74 20 61 6d 20 3d 20 50 28 22 61 6d 22 29 21 3d  t am = P("am")!=
1cf0: 30 3b 0a 20 20 20 20 69 6e 74 20 61 68 20 3d 20  0;.    int ah = 
1d00: 50 28 22 61 68 22 29 21 3d 30 3b 0a 20 20 20 20  P("ah")!=0;.    
1d10: 69 6e 74 20 61 67 20 3d 20 50 28 22 61 67 22 29  int ag = P("ag")
1d20: 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 74 20  !=0;.    int at 
1d30: 3d 20 50 28 22 61 74 22 29 21 3d 30 3b 0a 20 20  = P("at")!=0;.  
1d40: 20 20 69 66 28 20 61 61 20 29 7b 20 7a 43 61 70    if( aa ){ zCap
1d50: 5b 69 2b 2b 5d 20 3d 20 27 61 27 3b 20 7d 0a 20  [i++] = 'a'; }. 
1d60: 20 20 20 69 66 28 20 61 63 20 29 7b 20 7a 43 61     if( ac ){ zCa
1d70: 70 5b 69 2b 2b 5d 20 3d 20 27 63 27 3b 20 7d 0a  p[i++] = 'c'; }.
1d80: 20 20 20 20 69 66 28 20 61 64 20 29 7b 20 7a 43      if( ad ){ zC
1d90: 61 70 5b 69 2b 2b 5d 20 3d 20 27 64 27 3b 20 7d  ap[i++] = 'd'; }
1da0: 0a 20 20 20 20 69 66 28 20 61 65 20 29 7b 20 7a  .    if( ae ){ z
1db0: 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 65 27 3b 20  Cap[i++] = 'e'; 
1dc0: 7d 0a 20 20 20 20 69 66 28 20 61 66 20 29 7b 20  }.    if( af ){ 
1dd0: 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 66 27 3b  zCap[i++] = 'f';
1de0: 20 7d 0a 20 20 20 20 69 66 28 20 61 68 20 29 7b   }.    if( ah ){
1df0: 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 68 27   zCap[i++] = 'h'
1e00: 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 67 20 29  ; }.    if( ag )
1e10: 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 67  { zCap[i++] = 'g
1e20: 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 69 20  '; }.    if( ai 
1e30: 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27  ){ zCap[i++] = '
1e40: 69 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 6a  i'; }.    if( aj
1e50: 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20   ){ zCap[i++] = 
1e60: 27 6a 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61  'j'; }.    if( a
1e70: 6b 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d  k ){ zCap[i++] =
1e80: 20 27 6b 27 3b 20 7d 0a 20 20 20 20 69 66 28 20   'k'; }.    if( 
1e90: 61 6d 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20  am ){ zCap[i++] 
1ea0: 3d 20 27 6d 27 3b 20 7d 0a 20 20 20 20 69 66 28  = 'm'; }.    if(
1eb0: 20 61 6e 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d   an ){ zCap[i++]
1ec0: 20 3d 20 27 6e 27 3b 20 7d 0a 20 20 20 20 69 66   = 'n'; }.    if
1ed0: 28 20 61 6f 20 29 7b 20 7a 43 61 70 5b 69 2b 2b  ( ao ){ zCap[i++
1ee0: 5d 20 3d 20 27 6f 27 3b 20 7d 0a 20 20 20 20 69  ] = 'o'; }.    i
1ef0: 66 28 20 61 70 20 29 7b 20 7a 43 61 70 5b 69 2b  f( ap ){ zCap[i+
1f00: 2b 5d 20 3d 20 27 70 27 3b 20 7d 0a 20 20 20 20  +] = 'p'; }.    
1f10: 69 66 28 20 61 71 20 29 7b 20 7a 43 61 70 5b 69  if( aq ){ zCap[i
1f20: 2b 2b 5d 20 3d 20 27 71 27 3b 20 7d 0a 20 20 20  ++] = 'q'; }.   
1f30: 20 69 66 28 20 61 72 20 29 7b 20 7a 43 61 70 5b   if( ar ){ zCap[
1f40: 69 2b 2b 5d 20 3d 20 27 72 27 3b 20 7d 0a 20 20  i++] = 'r'; }.  
1f50: 20 20 69 66 28 20 61 73 20 29 7b 20 7a 43 61 70    if( as ){ zCap
1f60: 5b 69 2b 2b 5d 20 3d 20 27 73 27 3b 20 7d 0a 20  [i++] = 's'; }. 
1f70: 20 20 20 69 66 28 20 61 74 20 29 7b 20 7a 43 61     if( at ){ zCa
1f80: 70 5b 69 2b 2b 5d 20 3d 20 27 74 27 3b 20 7d 0a  p[i++] = 't'; }.
1f90: 20 20 20 20 69 66 28 20 61 77 20 29 7b 20 7a 43      if( aw ){ zC
1fa0: 61 70 5b 69 2b 2b 5d 20 3d 20 27 77 27 3b 20 7d  ap[i++] = 'w'; }
1fb0: 0a 0a 20 20 20 20 7a 43 61 70 5b 69 5d 20 3d 20  ..    zCap[i] = 
1fc0: 30 3b 0a 20 20 20 20 7a 50 77 20 3d 20 50 28 22  0;.    zPw = P("
1fd0: 70 77 22 29 3b 0a 20 20 20 20 69 66 28 20 7a 50  pw");.    if( zP
1fe0: 77 3d 3d 30 20 7c 7c 20 7a 50 77 5b 30 5d 3d 3d  w==0 || zPw[0]==
1ff0: 30 20 29 7b 0a 20 20 20 20 20 20 7a 50 77 20 3d  0 ){.      zPw =
2000: 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c   db_text(0, "SEL
2010: 45 43 54 20 70 77 20 46 52 4f 4d 20 75 73 65 72  ECT pw FROM user
2020: 20 57 48 45 52 45 20 75 69 64 3d 25 64 22 2c 20   WHERE uid=%d", 
2030: 75 69 64 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20  uid);.    }.    
2040: 7a 4c 6f 67 69 6e 20 3d 20 50 28 22 6c 6f 67 69  zLogin = P("logi
2050: 6e 22 29 3b 0a 20 20 20 20 69 66 28 20 75 69 64  n");.    if( uid
2060: 3e 30 20 26 26 0a 20 20 20 20 20 20 20 20 64 62  >0 &&.        db
2070: 5f 65 78 69 73 74 73 28 22 53 45 4c 45 43 54 20  _exists("SELECT 
2080: 31 20 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52  1 FROM user WHER
2090: 45 20 6c 6f 67 69 6e 3d 25 51 20 41 4e 44 20 75  E login=%Q AND u
20a0: 69 64 21 3d 25 64 22 2c 20 7a 4c 6f 67 69 6e 2c  id!=%d", zLogin,
20b0: 20 75 69 64 29 0a 20 20 20 20 29 7b 0a 20 20 20   uid).    ){.   
20c0: 20 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28     style_header(
20d0: 22 55 73 65 72 20 43 72 65 61 74 69 6f 6e 20 45  "User Creation E
20e0: 72 72 6f 72 22 29 3b 0a 20 20 20 20 20 20 40 20  rror");.      @ 
20f0: 3c 66 6f 6e 74 20 63 6f 6c 6f 72 3d 22 72 65 64  <font color="red
2100: 22 3e 4c 6f 67 69 6e 20 22 25 68 28 7a 4c 6f 67  ">Login "%h(zLog
2110: 69 6e 29 22 20 69 73 20 61 6c 72 65 61 64 79 20  in)" is already 
2120: 75 73 65 64 20 62 79 20 61 20 64 69 66 66 65 72  used by a differ
2130: 65 6e 74 0a 20 20 20 20 20 20 40 20 75 73 65 72  ent.      @ user
2140: 2e 3c 2f 66 6f 6e 74 3e 0a 20 20 20 20 20 20 40  .</font>.      @
2150: 0a 20 20 20 20 20 20 40 20 3c 70 3e 3c 61 20 68  .      @ <p><a h
2160: 72 65 66 3d 22 73 65 74 75 70 5f 75 65 64 69 74  ref="setup_uedit
2170: 3f 69 64 3d 25 64 28 75 69 64 29 29 3e 5b 42 75  ?id=%d(uid))>[Bu
2180: 6d 6d 65 72 5d 3c 2f 61 3e 3c 2f 70 3e 0a 20 20  mmer]</a></p>.  
2190: 20 20 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72      style_footer
21a0: 28 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e  ();.      return
21b0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 62 5f 6d  ;.    }.    db_m
21c0: 75 6c 74 69 5f 65 78 65 63 28 0a 20 20 20 20 20  ulti_exec(.     
21d0: 20 20 22 52 45 50 4c 41 43 45 20 49 4e 54 4f 20    "REPLACE INTO 
21e0: 75 73 65 72 28 75 69 64 2c 6c 6f 67 69 6e 2c 69  user(uid,login,i
21f0: 6e 66 6f 2c 70 77 2c 63 61 70 29 20 22 0a 20 20  nfo,pw,cap) ".  
2200: 20 20 20 20 20 22 56 41 4c 55 45 53 28 6e 75 6c       "VALUES(nul
2210: 6c 69 66 28 25 64 2c 30 29 2c 25 51 2c 25 51 2c  lif(%d,0),%Q,%Q,
2220: 25 51 2c 27 25 73 27 29 22 2c 0a 20 20 20 20 20  %Q,'%s')",.     
2230: 20 75 69 64 2c 20 50 28 22 6c 6f 67 69 6e 22 29   uid, P("login")
2240: 2c 20 50 28 22 69 6e 66 6f 22 29 2c 20 7a 50 77  , P("info"), zPw
2250: 2c 20 7a 43 61 70 0a 20 20 20 20 29 3b 0a 20 20  , zCap.    );.  
2260: 20 20 63 67 69 5f 72 65 64 69 72 65 63 74 28 22    cgi_redirect("
2270: 73 65 74 75 70 5f 75 6c 69 73 74 22 29 3b 0a 20  setup_ulist");. 
2280: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 0a     return;.  }..
2290: 20 20 2f 2a 20 4c 6f 61 64 20 74 68 65 20 65 78    /* Load the ex
22a0: 69 73 74 69 6e 67 20 69 6e 66 6f 72 6d 61 74 69  isting informati
22b0: 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 75 73 65  on about the use
22c0: 72 2c 20 69 66 20 61 6e 79 0a 20 20 2a 2f 0a 20  r, if any.  */. 
22d0: 20 7a 4c 6f 67 69 6e 20 3d 20 22 22 3b 0a 20 20   zLogin = "";.  
22e0: 7a 49 6e 66 6f 20 3d 20 22 22 3b 0a 20 20 7a 43  zInfo = "";.  zC
22f0: 61 70 20 3d 20 22 22 3b 0a 20 20 6f 61 61 20 3d  ap = "";.  oaa =
2300: 20 6f 61 63 20 3d 20 6f 61 64 20 3d 20 6f 61 65   oac = oad = oae
2310: 20 3d 20 6f 61 66 20 3d 20 6f 61 67 20 3d 20 6f   = oaf = oag = o
2320: 61 68 20 3d 20 6f 61 69 20 3d 20 6f 61 6a 20 3d  ah = oai = oaj =
2330: 20 6f 61 6b 20 3d 20 6f 61 6d 20 3d 0a 20 20 20   oak = oam =.   
2340: 20 20 20 20 20 6f 61 6e 20 3d 20 6f 61 6f 20 3d       oan = oao =
2350: 20 6f 61 70 20 3d 20 6f 61 71 20 3d 20 6f 61 72   oap = oaq = oar
2360: 20 3d 20 6f 61 73 20 3d 20 6f 61 74 20 3d 20 6f   = oas = oat = o
2370: 61 77 20 3d 20 22 22 3b 0a 20 20 69 66 28 20 75  aw = "";.  if( u
2380: 69 64 20 29 7b 0a 20 20 20 20 7a 4c 6f 67 69 6e  id ){.    zLogin
2390: 20 3d 20 64 62 5f 74 65 78 74 28 22 22 2c 20 22   = db_text("", "
23a0: 53 45 4c 45 43 54 20 6c 6f 67 69 6e 20 46 52 4f  SELECT login FRO
23b0: 4d 20 75 73 65 72 20 57 48 45 52 45 20 75 69 64  M user WHERE uid
23c0: 3d 25 64 22 2c 20 75 69 64 29 3b 0a 20 20 20 20  =%d", uid);.    
23d0: 7a 49 6e 66 6f 20 3d 20 64 62 5f 74 65 78 74 28  zInfo = db_text(
23e0: 22 22 2c 20 22 53 45 4c 45 43 54 20 69 6e 66 6f  "", "SELECT info
23f0: 20 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52 45   FROM user WHERE
2400: 20 75 69 64 3d 25 64 22 2c 20 75 69 64 29 3b 0a   uid=%d", uid);.
2410: 20 20 20 20 7a 43 61 70 20 3d 20 64 62 5f 74 65      zCap = db_te
2420: 78 74 28 22 22 2c 20 22 53 45 4c 45 43 54 20 63  xt("", "SELECT c
2430: 61 70 20 46 52 4f 4d 20 75 73 65 72 20 57 48 45  ap FROM user WHE
2440: 52 45 20 75 69 64 3d 25 64 22 2c 20 75 69 64 29  RE uid=%d", uid)
2450: 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72  ;.    if( strchr
2460: 28 7a 43 61 70 2c 20 27 61 27 29 20 29 20 6f 61  (zCap, 'a') ) oa
2470: 61 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a  a = " checked";.
2480: 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a      if( strchr(z
2490: 43 61 70 2c 20 27 63 27 29 20 29 20 6f 61 63 20  Cap, 'c') ) oac 
24a0: 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20  = " checked";.  
24b0: 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61    if( strchr(zCa
24c0: 70 2c 20 27 64 27 29 20 29 20 6f 61 64 20 3d 20  p, 'd') ) oad = 
24d0: 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20  " checked";.    
24e0: 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c  if( strchr(zCap,
24f0: 20 27 65 27 29 20 29 20 6f 61 65 20 3d 20 22 20   'e') ) oae = " 
2500: 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66  checked";.    if
2510: 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27  ( strchr(zCap, '
2520: 66 27 29 20 29 20 6f 61 66 20 3d 20 22 20 63 68  f') ) oaf = " ch
2530: 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20  ecked";.    if( 
2540: 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 67 27  strchr(zCap, 'g'
2550: 29 20 29 20 6f 61 67 20 3d 20 22 20 63 68 65 63  ) ) oag = " chec
2560: 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74  ked";.    if( st
2570: 72 63 68 72 28 7a 43 61 70 2c 20 27 68 27 29 20  rchr(zCap, 'h') 
2580: 29 20 6f 61 68 20 3d 20 22 20 63 68 65 63 6b 65  ) oah = " checke
2590: 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63  d";.    if( strc
25a0: 68 72 28 7a 43 61 70 2c 20 27 69 27 29 20 29 20  hr(zCap, 'i') ) 
25b0: 6f 61 69 20 3d 20 22 20 63 68 65 63 6b 65 64 22  oai = " checked"
25c0: 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72  ;.    if( strchr
25d0: 28 7a 43 61 70 2c 20 27 6a 27 29 20 29 20 6f 61  (zCap, 'j') ) oa
25e0: 6a 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a  j = " checked";.
25f0: 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a      if( strchr(z
2600: 43 61 70 2c 20 27 6b 27 29 20 29 20 6f 61 6b 20  Cap, 'k') ) oak 
2610: 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20  = " checked";.  
2620: 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61    if( strchr(zCa
2630: 70 2c 20 27 6d 27 29 20 29 20 6f 61 6d 20 3d 20  p, 'm') ) oam = 
2640: 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20  " checked";.    
2650: 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c  if( strchr(zCap,
2660: 20 27 6e 27 29 20 29 20 6f 61 6e 20 3d 20 22 20   'n') ) oan = " 
2670: 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66  checked";.    if
2680: 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27  ( strchr(zCap, '
2690: 6f 27 29 20 29 20 6f 61 6f 20 3d 20 22 20 63 68  o') ) oao = " ch
26a0: 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20  ecked";.    if( 
26b0: 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 70 27  strchr(zCap, 'p'
26c0: 29 20 29 20 6f 61 70 20 3d 20 22 20 63 68 65 63  ) ) oap = " chec
26d0: 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74  ked";.    if( st
26e0: 72 63 68 72 28 7a 43 61 70 2c 20 27 71 27 29 20  rchr(zCap, 'q') 
26f0: 29 20 6f 61 71 20 3d 20 22 20 63 68 65 63 6b 65  ) oaq = " checke
2700: 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63  d";.    if( strc
2710: 68 72 28 7a 43 61 70 2c 20 27 72 27 29 20 29 20  hr(zCap, 'r') ) 
2720: 6f 61 72 20 3d 20 22 20 63 68 65 63 6b 65 64 22  oar = " checked"
2730: 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72  ;.    if( strchr
2740: 28 7a 43 61 70 2c 20 27 73 27 29 20 29 20 6f 61  (zCap, 's') ) oa
2750: 73 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a  s = " checked";.
2760: 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a      if( strchr(z
2770: 43 61 70 2c 20 27 74 27 29 20 29 20 6f 61 74 20  Cap, 't') ) oat 
2780: 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20  = " checked";.  
2790: 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61    if( strchr(zCa
27a0: 70 2c 20 27 77 27 29 20 29 20 6f 61 77 20 3d 20  p, 'w') ) oaw = 
27b0: 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 7d 0a  " checked";.  }.
27c0: 0a 20 20 2f 2a 20 42 65 67 69 6e 20 67 65 6e 65  .  /* Begin gene
27d0: 72 61 74 69 6e 67 20 74 68 65 20 70 61 67 65 0a  rating the page.
27e0: 20 20 2a 2f 0a 20 20 73 74 79 6c 65 5f 73 75 62    */.  style_sub
27f0: 6d 65 6e 75 5f 65 6c 65 6d 65 6e 74 28 22 43 61  menu_element("Ca
2800: 6e 63 65 6c 22 2c 20 22 43 61 6e 63 65 6c 22 2c  ncel", "Cancel",
2810: 20 22 73 65 74 75 70 5f 75 6c 69 73 74 22 29 3b   "setup_ulist");
2820: 0a 20 20 69 66 28 20 75 69 64 20 29 7b 0a 20 20  .  if( uid ){.  
2830: 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 6d    style_header(m
2840: 70 72 69 6e 74 66 28 22 45 64 69 74 20 55 73 65  printf("Edit Use
2850: 72 20 25 68 22 2c 20 7a 4c 6f 67 69 6e 29 29 3b  r %h", zLogin));
2860: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73 74  .  }else{.    st
2870: 79 6c 65 5f 68 65 61 64 65 72 28 22 41 64 64 20  yle_header("Add 
2880: 41 20 4e 65 77 20 55 73 65 72 22 29 3b 0a 20 20  A New User");.  
2890: 7d 0a 20 20 40 20 3c 74 61 62 6c 65 20 61 6c 69  }.  @ <table ali
28a0: 67 6e 3d 22 6c 65 66 74 22 20 68 73 70 61 63 65  gn="left" hspace
28b0: 3d 22 32 30 22 20 76 73 70 61 63 65 3d 22 31 30  ="20" vspace="10
28c0: 22 3e 3c 74 72 3e 3c 74 64 3e 0a 20 20 40 20 3c  "><tr><td>.  @ <
28d0: 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73 28  form action="%s(
28e0: 67 2e 7a 50 61 74 68 29 22 20 6d 65 74 68 6f 64  g.zPath)" method
28f0: 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20 3c 74 61  ="POST">.  @ <ta
2900: 62 6c 65 3e 0a 20 20 40 20 3c 74 72 3e 0a 20 20  ble>.  @ <tr>.  
2910: 40 20 20 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72  @   <td align="r
2920: 69 67 68 74 22 3e 3c 6e 6f 62 72 3e 55 73 65 72  ight"><nobr>User
2930: 20 49 44 3a 3c 2f 6e 6f 62 72 3e 3c 2f 74 64 3e   ID:</nobr></td>
2940: 0a 20 20 69 66 28 20 75 69 64 20 29 7b 0a 20 20  .  if( uid ){.  
2950: 20 20 40 20 20 20 3c 74 64 3e 25 64 28 75 69 64    @   <td>%d(uid
2960: 29 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 68  ) <input type="h
2970: 69 64 64 65 6e 22 20 6e 61 6d 65 3d 22 69 64 22  idden" name="id"
2980: 20 76 61 6c 75 65 3d 22 25 64 28 75 69 64 29 22   value="%d(uid)"
2990: 3e 3c 2f 74 64 3e 0a 20 20 7d 65 6c 73 65 7b 0a  ></td>.  }else{.
29a0: 20 20 20 20 40 20 20 20 3c 74 64 3e 28 6e 65 77      @   <td>(new
29b0: 20 75 73 65 72 29 3c 69 6e 70 75 74 20 74 79 70   user)<input typ
29c0: 65 3d 22 68 69 64 64 65 6e 22 20 6e 61 6d 65 3d  e="hidden" name=
29d0: 22 69 64 22 20 76 61 6c 75 65 3d 30 3e 3c 2f 74  "id" value=0></t
29e0: 64 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 72 3e  d>.  }.  @ </tr>
29f0: 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20 20 20  .  @ <tr>.  @   
2a00: 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69 67 68 74  <td align="right
2a10: 22 3e 3c 6e 6f 62 72 3e 4c 6f 67 69 6e 3a 3c 2f  "><nobr>Login:</
2a20: 6e 6f 62 72 3e 3c 2f 74 64 3e 0a 20 20 40 20 20  nobr></td>.  @  
2a30: 20 3c 74 64 3e 3c 69 6e 70 75 74 20 74 79 70 65   <td><input type
2a40: 3d 22 74 65 78 74 22 20 6e 61 6d 65 3d 22 6c 6f  ="text" name="lo
2a50: 67 69 6e 22 20 76 61 6c 75 65 3d 22 25 68 28 7a  gin" value="%h(z
2a60: 4c 6f 67 69 6e 29 22 3e 3c 2f 74 64 3e 0a 20 20  Login)"></td>.  
2a70: 40 20 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e  @ </tr>.  @ <tr>
2a80: 0a 20 20 40 20 20 20 3c 74 64 20 61 6c 69 67 6e  .  @   <td align
2a90: 3d 22 72 69 67 68 74 22 3e 3c 6e 6f 62 72 3e 43  ="right"><nobr>C
2aa0: 6f 6e 74 61 63 74 26 6e 62 73 70 3b 49 6e 66 6f  ontact&nbsp;Info
2ab0: 3a 3c 2f 6e 6f 62 72 3e 3c 2f 74 64 3e 0a 20 20  :</nobr></td>.  
2ac0: 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74 20 74  @   <td><input t
2ad0: 79 70 65 3d 22 74 65 78 74 22 20 6e 61 6d 65 3d  ype="text" name=
2ae0: 22 69 6e 66 6f 22 20 73 69 7a 65 3d 34 30 20 76  "info" size=40 v
2af0: 61 6c 75 65 3d 22 25 68 28 7a 49 6e 66 6f 29 22  alue="%h(zInfo)"
2b00: 3e 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74 72 3e  ></td>.  @ </tr>
2b10: 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20 20 20  .  @ <tr>.  @   
2b20: 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69 67 68 74  <td align="right
2b30: 22 20 76 61 6c 69 67 6e 3d 22 74 6f 70 22 3e 43  " valign="top">C
2b40: 61 70 61 62 69 6c 69 74 69 65 73 3a 3c 2f 74 64  apabilities:</td
2b50: 3e 0a 20 20 40 20 20 20 3c 74 64 3e 0a 20 20 69  >.  @   <td>.  i
2b60: 66 28 20 67 2e 6f 6b 53 65 74 75 70 20 29 7b 0a  f( g.okSetup ){.
2b70: 20 20 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74      @     <input
2b80: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
2b90: 20 6e 61 6d 65 3d 22 61 73 22 25 73 28 6f 61 73   name="as"%s(oas
2ba0: 29 3e 53 65 74 75 70 3c 2f 69 6e 70 75 74 3e 3c  )>Setup</input><
2bb0: 62 72 3e 0a 20 20 7d 0a 20 20 40 20 20 20 20 20  br>.  }.  @     
2bc0: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65  <input type="che
2bd0: 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 61 22  ckbox" name="aa"
2be0: 25 73 28 6f 61 61 29 3e 41 64 6d 69 6e 3c 2f 69  %s(oaa)>Admin</i
2bf0: 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20  nput><br>.  @   
2c00: 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63    <input type="c
2c10: 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61  heckbox" name="a
2c20: 64 22 25 73 28 6f 61 64 29 3e 44 65 6c 65 74 65  d"%s(oad)>Delete
2c30: 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40  </input><br>.  @
2c40: 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65       <input type
2c50: 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65  ="checkbox" name
2c60: 3d 22 61 65 22 25 73 28 6f 61 64 29 3e 45 6d 61  ="ae"%s(oad)>Ema
2c70: 69 6c 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20  il</input><br>. 
2c80: 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79   @     <input ty
2c90: 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61  pe="checkbox" na
2ca0: 6d 65 3d 22 61 70 22 25 73 28 6f 61 70 29 3e 50  me="ap"%s(oap)>P
2cb0: 61 73 73 77 6f 72 64 3c 2f 69 6e 70 75 74 3e 3c  assword</input><
2cc0: 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70  br>.  @     <inp
2cd0: 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f  ut type="checkbo
2ce0: 78 22 20 6e 61 6d 65 3d 22 61 71 22 25 73 28 6f  x" name="aq"%s(o
2cf0: 61 71 29 3e 51 75 65 72 79 3c 2f 69 6e 70 75 74  aq)>Query</input
2d00: 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69  ><br>.  @     <i
2d10: 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b  nput type="check
2d20: 62 6f 78 22 20 6e 61 6d 65 3d 22 61 69 22 25 73  box" name="ai"%s
2d30: 28 6f 61 69 29 3e 43 68 65 63 6b 2d 49 6e 3c 2f  (oai)>Check-In</
2d40: 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20  input><br>.  @  
2d50: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2d60: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2d70: 61 6f 22 25 73 28 6f 61 6f 29 3e 43 68 65 63 6b  ao"%s(oao)>Check
2d80: 2d 4f 75 74 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e  -Out</input><br>
2d90: 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20  .  @     <input 
2da0: 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20  type="checkbox" 
2db0: 6e 61 6d 65 3d 22 61 68 22 25 73 28 6f 61 68 29  name="ah"%s(oah)
2dc0: 3e 48 69 73 74 6f 72 79 3c 2f 69 6e 70 75 74 3e  >History</input>
2dd0: 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e  <br>.  @     <in
2de0: 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62  put type="checkb
2df0: 6f 78 22 20 6e 61 6d 65 3d 22 61 67 22 25 73 28  ox" name="ag"%s(
2e00: 6f 61 67 29 3e 43 6c 6f 6e 65 3c 2f 69 6e 70 75  oag)>Clone</inpu
2e10: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
2e20: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
2e30: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 6a 22 25  kbox" name="aj"%
2e40: 73 28 6f 61 6a 29 3e 52 65 61 64 20 57 69 6b 69  s(oaj)>Read Wiki
2e50: 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40  </input><br>.  @
2e60: 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65       <input type
2e70: 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65  ="checkbox" name
2e80: 3d 22 61 66 22 25 73 28 6f 61 66 29 3e 4e 65 77  ="af"%s(oaf)>New
2e90: 20 57 69 6b 69 3c 2f 69 6e 70 75 74 3e 3c 62 72   Wiki</input><br
2ea0: 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74  >.  @     <input
2eb0: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
2ec0: 20 6e 61 6d 65 3d 22 61 6d 22 25 73 28 6f 61 6d   name="am"%s(oam
2ed0: 29 3e 41 70 70 65 6e 64 20 57 69 6b 69 3c 2f 69  )>Append Wiki</i
2ee0: 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20  nput><br>.  @   
2ef0: 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63    <input type="c
2f00: 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61  heckbox" name="a
2f10: 6b 22 25 73 28 6f 61 6b 29 3e 57 72 69 74 65 20  k"%s(oak)>Write 
2f20: 57 69 6b 69 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e  Wiki</input><br>
2f30: 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20  .  @     <input 
2f40: 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20  type="checkbox" 
2f50: 6e 61 6d 65 3d 22 61 72 22 25 73 28 6f 61 72 29  name="ar"%s(oar)
2f60: 3e 52 65 61 64 20 54 6b 74 3c 2f 69 6e 70 75 74  >Read Tkt</input
2f70: 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69  ><br>.  @     <i
2f80: 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b  nput type="check
2f90: 62 6f 78 22 20 6e 61 6d 65 3d 22 61 6e 22 25 73  box" name="an"%s
2fa0: 28 6f 61 6e 29 3e 4e 65 77 20 54 6b 74 3c 2f 69  (oan)>New Tkt</i
2fb0: 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20  nput><br>.  @   
2fc0: 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63    <input type="c
2fd0: 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61  heckbox" name="a
2fe0: 63 22 25 73 28 6f 61 63 29 3e 41 70 70 65 6e 64  c"%s(oac)>Append
2ff0: 20 54 6b 74 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e   Tkt</input><br>
3000: 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20  .  @     <input 
3010: 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20  type="checkbox" 
3020: 6e 61 6d 65 3d 22 61 77 22 25 73 28 6f 61 77 29  name="aw"%s(oaw)
3030: 3e 57 72 69 74 65 20 54 6b 74 3c 2f 69 6e 70 75  >Write Tkt</inpu
3040: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
3050: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
3060: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 74 22 25  kbox" name="at"%
3070: 73 28 6f 61 74 29 3e 54 6b 74 20 52 65 70 6f 72  s(oat)>Tkt Repor
3080: 74 3c 2f 69 6e 70 75 74 3e 0a 20 20 40 20 20 20  t</input>.  @   
3090: 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74 72 3e 0a  </td>.  @ </tr>.
30a0: 20 20 40 20 3c 74 72 3e 0a 20 20 40 20 20 20 3c    @ <tr>.  @   <
30b0: 74 64 20 61 6c 69 67 6e 3d 22 72 69 67 68 74 22  td align="right"
30c0: 3e 50 61 73 73 77 6f 72 64 3a 3c 2f 74 64 3e 0a  >Password:</td>.
30d0: 20 20 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74    @   <td><input
30e0: 20 74 79 70 65 3d 22 70 61 73 73 77 6f 72 64 22   type="password"
30f0: 20 6e 61 6d 65 3d 22 70 77 22 20 76 61 6c 75 65   name="pw" value
3100: 3d 22 22 3e 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f  =""></td>.  @ </
3110: 74 72 3e 0a 20 20 69 66 28 20 21 68 69 67 68 65  tr>.  if( !highe
3120: 72 55 73 65 72 20 29 7b 0a 20 20 20 20 40 20 3c  rUser ){.    @ <
3130: 74 72 3e 0a 20 20 20 20 40 20 20 20 3c 74 64 3e  tr>.    @   <td>
3140: 26 6e 62 73 70 3c 2f 74 64 3e 0a 20 20 20 20 40  &nbsp</td>.    @
3150: 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74 20 74 79     <td><input ty
3160: 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d 65  pe="submit" name
3170: 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d  ="submit" value=
3180: 22 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e  "Apply Changes">
3190: 0a 20 20 20 20 40 20 3c 2f 74 72 3e 0a 20 20 7d  .    @ </tr>.  }
31a0: 0a 20 20 40 20 3c 2f 74 61 62 6c 65 3e 3c 2f 74  .  @ </table></t
31b0: 64 3e 3c 2f 74 72 3e 3c 2f 74 61 62 6c 65 3e 0a  d></tr></table>.
31c0: 20 20 40 20 3c 70 3e 3c 62 3e 4e 6f 74 65 73 3a    @ <p><b>Notes:
31d0: 3c 2f 62 3e 3c 2f 70 3e 0a 20 20 40 20 3c 6f 6c  </b></p>.  @ <ol
31e0: 3e 0a 20 20 69 66 28 20 68 69 67 68 65 72 55 73  >.  if( higherUs
31f0: 65 72 20 29 7b 0a 20 20 20 20 40 20 3c 6c 69 3e  er ){.    @ <li>
3200: 3c 70 3e 0a 20 20 20 20 40 20 55 73 65 72 20 25  <p>.    @ User %
3210: 68 28 7a 49 64 29 20 68 61 73 20 53 65 74 75 70  h(zId) has Setup
3220: 20 70 72 69 76 69 6c 65 67 65 73 20 61 6e 64 20   privileges and 
3230: 79 6f 75 20 6f 6e 6c 79 20 68 61 76 65 20 41 64  you only have Ad
3240: 6d 69 6e 20 70 72 69 76 69 6c 65 67 65 73 0a 20  min privileges. 
3250: 20 20 20 40 20 73 6f 20 79 6f 75 20 61 72 65 20     @ so you are 
3260: 6e 6f 74 20 70 65 72 6d 69 74 74 65 64 20 74 6f  not permitted to
3270: 20 6d 61 6b 65 20 63 68 61 6e 67 65 73 20 74 6f   make changes to
3280: 20 25 68 28 7a 49 64 29 2e 0a 20 20 20 20 40 20   %h(zId)..    @ 
3290: 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 20 20 40 0a  </p></li>.    @.
32a0: 20 20 7d 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e    }.  @.  @ <li>
32b0: 3c 70 3e 0a 20 20 40 20 54 68 65 20 3c 62 3e 44  <p>.  @ The <b>D
32c0: 65 6c 65 74 65 3c 2f 62 3e 20 70 72 69 76 69 6c  elete</b> privil
32d0: 65 67 65 20 67 69 76 65 20 74 68 65 20 75 73 65  ege give the use
32e0: 72 20 74 68 65 20 61 62 69 6c 69 74 79 20 74 6f  r the ability to
32f0: 20 65 72 61 73 65 0a 20 20 40 20 77 69 6b 69 2c   erase.  @ wiki,
3300: 20 74 69 63 6b 65 74 73 2c 20 61 6e 64 20 61 74   tickets, and at
3310: 74 74 61 63 68 6d 65 6e 74 73 20 74 68 61 74 20  ttachments that 
3320: 68 61 76 65 20 62 65 65 6e 20 61 64 64 65 64 20  have been added 
3330: 62 79 20 61 6e 6f 6e 79 6d 6f 75 73 0a 20 20 40  by anonymous.  @
3340: 20 75 73 65 72 73 2e 20 20 54 68 69 73 20 63 61   users.  This ca
3350: 70 61 62 69 6c 69 74 79 20 69 73 20 69 6e 74 65  pability is inte
3360: 6e 64 65 64 20 66 6f 72 20 64 65 6c 65 74 69 6f  nded for deletio
3370: 6e 20 6f 66 20 73 70 61 6d 2e 20 20 54 68 65 0a  n of spam.  The.
3380: 20 20 40 20 64 65 6c 65 74 65 20 63 61 70 61 62    @ delete capab
3390: 69 6c 69 74 79 20 69 73 20 6f 6e 6c 79 20 69 6e  ility is only in
33a0: 20 65 66 66 65 63 74 20 66 6f 72 20 32 34 20 68   effect for 24 h
33b0: 6f 75 72 73 20 61 66 74 65 72 20 74 68 65 20 69  ours after the i
33c0: 74 65 6d 0a 20 20 40 20 69 73 20 66 69 72 73 74  tem.  @ is first
33d0: 20 70 6f 73 74 65 64 2e 20 20 54 68 65 20 53 65   posted.  The Se
33e0: 74 75 70 20 75 73 65 72 20 63 61 6e 20 64 65 6c  tup user can del
33f0: 65 74 65 20 61 6e 79 74 68 69 6e 67 20 61 74 20  ete anything at 
3400: 61 6e 79 20 74 69 6d 65 2e 0a 20 20 40 20 3c 2f  any time..  @ </
3410: 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20 40 20  p></li>.  @.  @ 
3420: 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20 54 68 65 20  <li><p>.  @ The 
3430: 3c 62 3e 51 75 65 72 79 3c 2f 62 3e 20 70 72 69  <b>Query</b> pri
3440: 76 69 6c 65 67 65 20 61 6c 6c 6f 77 73 20 74 68  vilege allows th
3450: 65 20 75 73 65 72 20 74 6f 20 63 72 65 61 74 65  e user to create
3460: 20 6f 72 20 65 64 69 74 0a 20 20 40 20 72 65 70   or edit.  @ rep
3470: 6f 72 74 20 66 6f 72 6d 61 74 73 20 62 79 20 73  ort formats by s
3480: 70 65 63 69 66 79 69 6e 67 20 61 70 70 72 6f 70  pecifying approp
3490: 72 69 61 74 65 20 53 51 4c 2e 20 20 55 73 65 72  riate SQL.  User
34a0: 73 20 63 61 6e 20 72 75 6e 0a 20 20 40 20 65 78  s can run.  @ ex
34b0: 69 73 74 69 6e 67 20 72 65 70 6f 72 74 73 20 77  isting reports w
34c0: 69 74 68 6f 75 74 20 74 68 65 20 51 75 65 72 79  ithout the Query
34d0: 20 70 72 69 76 69 6c 65 67 65 2e 0a 20 20 40 20   privilege..  @ 
34e0: 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20  </p></li>.  @.  
34f0: 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20 41 6e  @ <li><p>.  @ An
3500: 20 3c 62 3e 41 64 6d 69 6e 3c 2f 62 3e 20 75 73   <b>Admin</b> us
3510: 65 72 20 63 61 6e 20 61 64 64 20 6f 74 68 65 72  er can add other
3520: 20 75 73 65 72 73 2c 20 63 72 65 61 74 65 20 6e   users, create n
3530: 65 77 20 74 69 63 6b 65 74 20 72 65 70 6f 72 74  ew ticket report
3540: 0a 20 20 40 20 66 6f 72 6d 61 74 73 2c 20 61 6e  .  @ formats, an
3550: 64 20 63 68 61 6e 67 65 20 73 79 73 74 65 6d 20  d change system 
3560: 64 65 66 61 75 6c 74 73 2e 20 20 42 75 74 20 6f  defaults.  But o
3570: 6e 6c 79 20 74 68 65 20 3c 62 3e 53 65 74 75 70  nly the <b>Setup
3580: 3c 2f 62 3e 20 75 73 65 72 0a 20 20 40 20 69 73  </b> user.  @ is
3590: 20 61 62 6c 65 20 74 6f 20 63 68 61 6e 67 65 20   able to change 
35a0: 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 74  the repository t
35b0: 6f 0a 20 20 40 20 77 68 69 63 68 20 74 68 69 73  o.  @ which this
35c0: 20 70 72 6f 67 72 61 6d 20 69 73 20 6c 69 6e 6b   program is link
35d0: 65 64 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69  ed..  @ </p></li
35e0: 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70  >.  @.  @ <li><p
35f0: 3e 0a 20 20 40 20 54 68 65 20 3c 62 3e 48 69 73  >.  @ The <b>His
3600: 74 6f 72 79 3c 2f 62 3e 20 70 72 69 76 69 6c 65  tory</b> privile
3610: 67 65 20 61 6c 6c 6f 77 73 20 61 20 75 73 65 72  ge allows a user
3620: 20 74 6f 20 73 65 65 20 61 20 74 69 6d 65 6c 69   to see a timeli
3630: 6e 65 0a 20 20 40 20 77 69 74 68 20 68 79 70 65  ne.  @ with hype
3640: 72 6c 69 6e 6b 73 20 74 6f 20 76 65 72 73 69 6f  rlinks to versio
3650: 6e 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2c 20 74  n information, t
3660: 6f 20 64 6f 77 6e 6c 6f 61 64 20 5a 49 50 20 61  o download ZIP a
3670: 72 63 68 69 76 65 73 0a 20 20 40 20 6f 66 20 69  rchives.  @ of i
3680: 6e 64 69 76 69 64 75 61 6c 20 76 65 72 73 69 6f  ndividual versio
3690: 6e 73 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69  ns..  @ </p></li
36a0: 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70  >.  @.  @ <li><p
36b0: 3e 0a 20 20 40 20 4e 6f 20 6c 6f 67 69 6e 20 69  >.  @ No login i
36c0: 73 20 72 65 71 75 69 72 65 64 20 66 6f 72 20 75  s required for u
36d0: 73 65 72 20 22 3c 62 3e 6e 6f 62 6f 64 79 3c 2f  ser "<b>nobody</
36e0: 62 3e 22 2e 20 20 54 68 65 20 63 61 70 61 62 69  b>".  The capabi
36f0: 6c 69 74 69 65 73 0a 20 20 40 20 6f 66 20 74 68  lities.  @ of th
3700: 69 73 20 75 73 65 72 20 61 72 65 20 61 76 61 69  is user are avai
3710: 6c 61 62 6c 65 20 74 6f 20 61 6e 79 6f 6e 65 20  lable to anyone 
3720: 77 69 74 68 6f 75 74 20 73 75 70 70 6c 79 69 6e  without supplyin
3730: 67 20 61 20 75 73 65 72 6e 61 6d 65 20 6f 72 0a  g a username or.
3740: 20 20 40 20 70 61 73 73 77 6f 72 64 2e 20 20 54    @ password.  T
3750: 6f 20 64 69 73 61 62 6c 65 20 6e 6f 62 6f 64 79  o disable nobody
3760: 20 61 63 63 65 73 73 2c 20 6d 61 6b 65 20 73 75   access, make su
3770: 72 65 20 74 68 65 72 65 20 69 73 20 6e 6f 20 75  re there is no u
3780: 73 65 72 0a 20 20 40 20 77 69 74 68 20 61 6e 20  ser.  @ with an 
3790: 49 44 20 6f 66 20 3c 62 3e 6e 6f 62 6f 64 79 3c  ID of <b>nobody<
37a0: 2f 62 3e 20 6f 72 20 74 68 61 74 20 74 68 65 20  /b> or that the 
37b0: 6e 6f 62 6f 64 79 20 75 73 65 72 20 68 61 73 20  nobody user has 
37c0: 6e 6f 0a 20 20 40 20 63 61 70 61 62 69 6c 69 74  no.  @ capabilit
37d0: 69 65 73 20 65 6e 61 62 6c 65 64 2e 20 20 54 68  ies enabled.  Th
37e0: 65 20 70 61 73 73 77 6f 72 64 20 66 6f 72 20 6e  e password for n
37f0: 6f 62 6f 64 79 20 69 73 20 69 67 6e 6f 72 65 2e  obody is ignore.
3800: 20 20 54 6f 0a 20 20 40 20 61 76 6f 69 64 20 70    To.  @ avoid p
3810: 72 6f 62 6c 65 6d 73 20 77 69 74 68 20 73 70 69  roblems with spi
3820: 64 65 72 73 20 6f 76 65 72 6c 6f 61 64 69 6e 67  ders overloading
3830: 20 74 68 65 20 73 65 72 76 65 72 2c 20 69 74 20   the server, it 
3840: 69 73 20 73 75 67 67 65 73 74 65 64 0a 20 20 40  is suggested.  @
3850: 20 74 68 61 74 20 74 68 65 20 27 68 27 20 28 48   that the 'h' (H
3860: 69 73 74 6f 72 79 29 20 63 61 70 61 62 69 6c 69  istory) capabili
3870: 74 79 20 62 65 20 74 75 72 6e 65 64 20 6f 66 66  ty be turned off
3880: 20 66 6f 72 20 75 73 65 72 20 6e 6f 62 6f 64 79   for user nobody
3890: 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a  ..  @ </p></li>.
38a0: 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a    @.  @ <li><p>.
38b0: 20 20 40 20 4c 6f 67 69 6e 20 69 73 20 72 65 71    @ Login is req
38c0: 75 69 72 65 64 20 66 6f 72 20 75 73 65 72 20 22  uired for user "
38d0: 3c 62 3e 61 6e 6f 6e 79 6d 6f 75 73 3c 2f 62 3e  <b>anonymous</b>
38e0: 22 20 62 75 74 20 74 68 65 20 70 61 73 73 77 6f  " but the passwo
38f0: 72 64 0a 20 20 40 20 69 73 20 64 69 73 70 6c 61  rd.  @ is displa
3900: 79 65 64 20 6f 6e 20 74 68 65 20 6c 6f 67 69 6e  yed on the login
3910: 20 73 63 72 65 65 6e 20 62 65 73 69 64 65 20 74   screen beside t
3920: 68 65 20 70 61 73 73 77 6f 72 64 20 65 6e 74 72  he password entr
3930: 79 20 62 6f 78 0a 20 20 40 20 73 6f 20 61 6e 79  y box.  @ so any
3940: 62 6f 64 79 20 77 68 6f 20 63 61 6e 20 72 65 61  body who can rea
3950: 64 20 73 68 6f 75 6c 64 20 62 65 20 61 62 6c 65  d should be able
3960: 20 74 6f 20 6c 6f 67 69 6e 20 61 73 20 61 6e 6f   to login as ano
3970: 6e 79 6d 6f 75 73 2e 0a 20 20 40 20 4f 6e 20 74  nymous..  @ On t
3980: 68 65 20 6f 74 68 65 72 20 68 61 6e 64 2c 20 73  he other hand, s
3990: 70 69 64 65 72 73 20 61 6e 64 20 77 65 62 2d 63  piders and web-c
39a0: 72 61 77 6c 65 72 73 20 77 69 6c 6c 20 74 79 70  rawlers will typ
39b0: 69 63 61 6c 6c 79 20 6e 6f 74 0a 20 20 40 20 62  ically not.  @ b
39c0: 65 20 61 62 6c 65 20 74 6f 20 6c 6f 67 69 6e 2e  e able to login.
39d0: 20 20 53 65 74 20 74 68 65 20 63 61 70 61 62 69    Set the capabi
39e0: 6c 69 74 69 65 73 20 6f 66 20 74 68 65 20 61 6e  lities of the an
39f0: 6f 6e 79 6d 6f 75 73 20 75 73 65 72 0a 20 20 40  onymous user.  @
3a00: 20 74 6f 20 74 68 69 6e 67 73 20 74 68 61 74 20   to things that 
3a10: 79 6f 75 20 77 61 6e 74 20 61 6e 79 20 68 75 6d  you want any hum
3a20: 61 6e 20 74 6f 20 62 65 20 61 62 6c 65 20 74 6f  an to be able to
3a30: 20 64 6f 2c 20 62 75 74 20 6e 6f 74 20 61 6e 79   do, but not any
3a40: 0a 20 20 40 20 73 70 69 64 65 72 2e 0a 20 20 40  .  @ spider..  @
3a50: 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 20 3c   </p></li>.  @ <
3a60: 2f 66 6f 72 6d 3e 0a 20 20 73 74 79 6c 65 5f 66  /form>.  style_f
3a70: 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 0a 2f 2a 0a  ooter();.}.../*.
3a80: 2a 2a 20 47 65 6e 65 72 61 74 65 20 61 20 63 68  ** Generate a ch
3a90: 65 63 6b 62 6f 78 20 66 6f 72 20 61 6e 20 61 74  eckbox for an at
3aa0: 74 72 69 62 75 74 65 2e 0a 2a 2f 0a 73 74 61 74  tribute..*/.stat
3ab0: 69 63 20 76 6f 69 64 20 6f 6e 6f 66 66 5f 61 74  ic void onoff_at
3ac0: 74 72 69 62 75 74 65 28 0a 20 20 63 6f 6e 73 74  tribute(.  const
3ad0: 20 63 68 61 72 20 2a 7a 4c 61 62 65 6c 2c 20 20   char *zLabel,  
3ae0: 20 2f 2a 20 54 68 65 20 74 65 78 74 20 6c 61 62   /* The text lab
3af0: 65 6c 20 6f 6e 20 74 68 65 20 63 68 65 63 6b 62  el on the checkb
3b00: 6f 78 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68  ox */.  const ch
3b10: 61 72 20 2a 7a 56 61 72 2c 20 20 20 20 20 2f 2a  ar *zVar,     /*
3b20: 20 54 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69   The correspondi
3b30: 6e 67 20 72 6f 77 20 69 6e 20 74 68 65 20 56 41  ng row in the VA
3b40: 52 20 74 61 62 6c 65 20 2a 2f 0a 20 20 63 6f 6e  R table */.  con
3b50: 73 74 20 63 68 61 72 20 2a 7a 51 50 61 72 6d 2c  st char *zQParm,
3b60: 20 20 20 2f 2a 20 54 68 65 20 71 75 65 72 79 20     /* The query 
3b70: 70 61 72 61 6d 65 74 65 72 20 2a 2f 0a 20 20 69  parameter */.  i
3b80: 6e 74 20 64 66 6c 74 56 61 6c 20 20 20 20 20 20  nt dfltVal      
3b90: 20 20 20 20 20 2f 2a 20 44 65 66 61 75 6c 74 20       /* Default 
3ba0: 76 61 6c 75 65 20 69 66 20 56 41 52 20 74 61 62  value if VAR tab
3bb0: 6c 65 20 65 6e 74 72 79 20 64 6f 65 73 20 6e 6f  le entry does no
3bc0: 74 20 65 78 69 73 74 20 2a 2f 0a 29 7b 0a 20 20  t exist */.){.  
3bd0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 6c  const char *zVal
3be0: 20 3d 20 64 62 5f 67 65 74 28 7a 56 61 72 2c 20   = db_get(zVar, 
3bf0: 30 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  0);.  const char
3c00: 20 2a 7a 51 20 3d 20 50 28 7a 51 50 61 72 6d 29   *zQ = P(zQParm)
3c10: 3b 0a 20 20 69 6e 74 20 69 56 61 6c 3b 0a 20 20  ;.  int iVal;.  
3c20: 69 66 28 20 7a 56 61 6c 20 29 7b 0a 20 20 20 20  if( zVal ){.    
3c30: 69 56 61 6c 20 3d 20 61 74 6f 69 28 7a 56 61 6c  iVal = atoi(zVal
3c40: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
3c50: 69 56 61 6c 20 3d 20 64 66 6c 74 56 61 6c 3b 0a  iVal = dfltVal;.
3c60: 20 20 7d 0a 20 20 69 66 28 20 7a 51 3d 3d 30 20    }.  if( zQ==0 
3c70: 26 26 20 50 28 22 73 75 62 6d 69 74 22 29 20 29  && P("submit") )
3c80: 7b 0a 20 20 20 20 7a 51 20 3d 20 22 6f 66 66 22  {.    zQ = "off"
3c90: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 51 20 29  ;.  }.  if( zQ )
3ca0: 7b 0a 20 20 20 20 69 6e 74 20 69 51 20 3d 20 73  {.    int iQ = s
3cb0: 74 72 63 6d 70 28 7a 51 2c 22 6f 6e 22 29 3d 3d  trcmp(zQ,"on")==
3cc0: 30 20 7c 7c 20 61 74 6f 69 28 7a 51 29 3b 0a 20  0 || atoi(zQ);. 
3cd0: 20 20 20 69 66 28 20 69 51 21 3d 69 56 61 6c 20     if( iQ!=iVal 
3ce0: 29 7b 0a 20 20 20 20 20 20 64 62 5f 73 65 74 28  ){.      db_set(
3cf0: 7a 56 61 72 2c 20 69 51 20 3f 20 22 31 22 20 3a  zVar, iQ ? "1" :
3d00: 20 22 30 22 2c 20 30 29 3b 0a 20 20 20 20 20 20   "0", 0);.      
3d10: 69 56 61 6c 20 3d 20 69 51 3b 0a 20 20 20 20 7d  iVal = iQ;.    }
3d20: 0a 20 20 7d 0a 20 20 69 66 28 20 69 56 61 6c 20  .  }.  if( iVal 
3d30: 29 7b 0a 20 20 20 20 40 20 3c 69 6e 70 75 74 20  ){.    @ <input 
3d40: 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20  type="checkbox" 
3d50: 6e 61 6d 65 3d 22 25 73 28 7a 51 50 61 72 6d 29  name="%s(zQParm)
3d60: 22 20 63 68 65 63 6b 65 64 3e 3c 62 3e 25 73 28  " checked><b>%s(
3d70: 7a 4c 61 62 65 6c 29 3c 2f 62 3e 3c 2f 69 6e 70  zLabel)</b></inp
3d80: 75 74 3e 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ut>.  }else{.   
3d90: 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22   @ <input type="
3da0: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
3db0: 25 73 28 7a 51 50 61 72 6d 29 22 3e 3c 62 3e 25  %s(zQParm)"><b>%
3dc0: 73 28 7a 4c 61 62 65 6c 29 3c 2f 62 3e 3c 2f 69  s(zLabel)</b></i
3dd0: 6e 70 75 74 3e 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  nput>.  }.}../*.
3de0: 2a 2a 20 47 65 6e 65 72 61 74 65 20 61 6e 20 65  ** Generate an e
3df0: 6e 74 72 79 20 62 6f 78 20 66 6f 72 20 61 6e 20  ntry box for an 
3e00: 61 74 74 72 69 62 75 74 65 2e 0a 2a 2f 0a 73 74  attribute..*/.st
3e10: 61 74 69 63 20 76 6f 69 64 20 65 6e 74 72 79 5f  atic void entry_
3e20: 61 74 74 72 69 62 75 74 65 28 0a 20 20 63 6f 6e  attribute(.  con
3e30: 73 74 20 63 68 61 72 20 2a 7a 4c 61 62 65 6c 2c  st char *zLabel,
3e40: 20 20 20 2f 2a 20 54 68 65 20 74 65 78 74 20 6c     /* The text l
3e50: 61 62 65 6c 20 6f 6e 20 74 68 65 20 65 6e 74 72  abel on the entr
3e60: 79 20 62 6f 78 20 2a 2f 0a 20 20 69 6e 74 20 77  y box */.  int w
3e70: 69 64 74 68 2c 20 20 20 20 20 20 20 20 20 20 20  idth,           
3e80: 20 2f 2a 20 57 69 64 74 68 20 6f 66 20 74 68 65   /* Width of the
3e90: 20 65 6e 74 72 79 20 62 6f 78 20 2a 2f 0a 20 20   entry box */.  
3ea0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 72  const char *zVar
3eb0: 2c 20 20 20 20 20 2f 2a 20 54 68 65 20 63 6f 72  ,     /* The cor
3ec0: 72 65 73 70 6f 6e 64 69 6e 67 20 72 6f 77 20 69  responding row i
3ed0: 6e 20 74 68 65 20 56 41 52 20 74 61 62 6c 65 20  n the VAR table 
3ee0: 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  */.  const char 
3ef0: 2a 7a 51 50 61 72 6d 2c 20 20 20 2f 2a 20 54 68  *zQParm,   /* Th
3f00: 65 20 71 75 65 72 79 20 70 61 72 61 6d 65 74 65  e query paramete
3f10: 72 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 44 66  r */.  char *zDf
3f20: 6c 74 20 20 20 20 20 2f 2a 20 44 65 66 61 75 6c  lt     /* Defaul
3f30: 74 20 76 61 6c 75 65 20 69 66 20 56 41 52 20 74  t value if VAR t
3f40: 61 62 6c 65 20 65 6e 74 72 79 20 64 6f 65 73 20  able entry does 
3f50: 6e 6f 74 20 65 78 69 73 74 20 2a 2f 0a 29 7b 0a  not exist */.){.
3f60: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56    const char *zV
3f70: 61 6c 20 3d 20 64 62 5f 67 65 74 28 7a 56 61 72  al = db_get(zVar
3f80: 2c 20 7a 44 66 6c 74 29 3b 0a 20 20 63 6f 6e 73  , zDflt);.  cons
3f90: 74 20 63 68 61 72 20 2a 7a 51 20 3d 20 50 28 7a  t char *zQ = P(z
3fa0: 51 50 61 72 6d 29 3b 0a 20 20 69 66 28 20 7a 51  QParm);.  if( zQ
3fb0: 20 26 26 20 73 74 72 63 6d 70 28 7a 51 2c 7a 56   && strcmp(zQ,zV
3fc0: 61 6c 29 21 3d 30 20 29 7b 0a 20 20 20 20 64 62  al)!=0 ){.    db
3fd0: 5f 73 65 74 28 7a 56 61 72 2c 20 7a 51 2c 20 30  _set(zVar, zQ, 0
3fe0: 29 3b 0a 20 20 20 20 7a 56 61 6c 20 3d 20 7a 51  );.    zVal = zQ
3ff0: 3b 0a 20 20 7d 0a 20 20 40 20 3c 69 6e 70 75 74  ;.  }.  @ <input
4000: 20 74 79 70 65 3d 22 74 65 78 74 22 20 6e 61 6d   type="text" nam
4010: 65 3d 22 25 73 28 7a 51 50 61 72 6d 29 22 20 76  e="%s(zQParm)" v
4020: 61 6c 75 65 3d 22 25 68 28 7a 56 61 6c 29 22 20  alue="%h(zVal)" 
4030: 73 69 7a 65 3d 22 25 64 28 77 69 64 74 68 29 22  size="%d(width)"
4040: 3e 0a 20 20 40 20 3c 62 3e 25 73 28 7a 4c 61 62  >.  @ <b>%s(zLab
4050: 65 6c 29 3c 2f 62 3e 0a 7d 0a 0a 2f 2a 0a 2a 2a  el)</b>.}../*.**
4060: 20 47 65 6e 65 72 61 74 65 20 61 20 74 65 78 74   Generate a text
4070: 20 62 6f 78 20 66 6f 72 20 61 6e 20 61 74 74 72   box for an attr
4080: 69 62 75 74 65 2e 0a 2a 2f 0a 73 74 61 74 69 63  ibute..*/.static
4090: 20 76 6f 69 64 20 74 65 78 74 61 72 65 61 5f 61   void textarea_a
40a0: 74 74 72 69 62 75 74 65 28 0a 20 20 63 6f 6e 73  ttribute(.  cons
40b0: 74 20 63 68 61 72 20 2a 7a 4c 61 62 65 6c 2c 20  t char *zLabel, 
40c0: 20 20 2f 2a 20 54 68 65 20 74 65 78 74 20 6c 61    /* The text la
40d0: 62 65 6c 20 6f 6e 20 74 68 65 20 74 65 78 74 61  bel on the texta
40e0: 72 65 61 20 2a 2f 0a 20 20 69 6e 74 20 72 6f 77  rea */.  int row
40f0: 73 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 2f  s,             /
4100: 2a 20 52 6f 77 73 20 69 6e 20 74 68 65 20 74 65  * Rows in the te
4110: 78 74 61 72 65 61 20 2a 2f 0a 20 20 69 6e 74 20  xtarea */.  int 
4120: 63 6f 6c 73 2c 20 20 20 20 20 20 20 20 20 20 20  cols,           
4130: 20 20 2f 2a 20 43 6f 6c 75 6d 6e 73 20 69 6e 20    /* Columns in 
4140: 74 68 65 20 74 65 78 74 61 72 65 61 20 2a 2f 0a  the textarea */.
4150: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56    const char *zV
4160: 61 72 2c 20 20 20 20 20 2f 2a 20 54 68 65 20 63  ar,     /* The c
4170: 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 72 6f 77  orresponding row
4180: 20 69 6e 20 74 68 65 20 56 41 52 20 74 61 62 6c   in the VAR tabl
4190: 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61  e */.  const cha
41a0: 72 20 2a 7a 51 50 2c 20 20 20 20 20 20 2f 2a 20  r *zQP,      /* 
41b0: 54 68 65 20 71 75 65 72 79 20 70 61 72 61 6d 65  The query parame
41c0: 74 65 72 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63  ter */.  const c
41d0: 68 61 72 20 2a 7a 44 66 6c 74 20 20 20 20 20 2f  har *zDflt     /
41e0: 2a 20 44 65 66 61 75 6c 74 20 76 61 6c 75 65 20  * Default value 
41f0: 69 66 20 56 41 52 20 74 61 62 6c 65 20 65 6e 74  if VAR table ent
4200: 72 79 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73  ry does not exis
4210: 74 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  t */.){.  const 
4220: 63 68 61 72 20 2a 7a 20 3d 20 64 62 5f 67 65 74  char *z = db_get
4230: 28 7a 56 61 72 2c 20 28 63 68 61 72 2a 29 7a 44  (zVar, (char*)zD
4240: 66 6c 74 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68  flt);.  const ch
4250: 61 72 20 2a 7a 51 20 3d 20 50 28 7a 51 50 29 3b  ar *zQ = P(zQP);
4260: 0a 20 20 69 66 28 20 7a 51 20 26 26 20 73 74 72  .  if( zQ && str
4270: 63 6d 70 28 7a 51 2c 7a 29 21 3d 30 20 29 7b 0a  cmp(zQ,z)!=0 ){.
4280: 20 20 20 20 64 62 5f 73 65 74 28 7a 56 61 72 2c      db_set(zVar,
4290: 20 7a 51 2c 20 30 29 3b 0a 20 20 20 20 7a 20 3d   zQ, 0);.    z =
42a0: 20 7a 51 3b 0a 20 20 7d 0a 20 20 69 66 28 20 72   zQ;.  }.  if( r
42b0: 6f 77 73 3e 30 20 26 26 20 63 6f 6c 73 3e 30 20  ows>0 && cols>0 
42c0: 29 7b 0a 20 20 20 20 40 20 3c 74 65 78 74 61 72  ){.    @ <textar
42d0: 65 61 20 6e 61 6d 65 3d 22 25 73 28 7a 51 50 29  ea name="%s(zQP)
42e0: 22 20 72 6f 77 73 3d 22 25 64 28 72 6f 77 73 29  " rows="%d(rows)
42f0: 22 20 63 6f 6c 73 3d 22 25 64 28 63 6f 6c 73 29  " cols="%d(cols)
4300: 22 3e 25 68 28 7a 29 3c 2f 74 65 78 74 61 72 65  ">%h(z)</textare
4310: 61 3e 0a 20 20 20 20 40 20 3c 62 3e 25 73 28 7a  a>.    @ <b>%s(z
4320: 4c 61 62 65 6c 29 3c 2f 62 3e 0a 20 20 7d 0a 7d  Label)</b>.  }.}
4330: 0a 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45  .../*.** WEBPAGE
4340: 3a 20 73 65 74 75 70 5f 61 63 63 65 73 73 0a 2a  : setup_access.*
4350: 2f 0a 76 6f 69 64 20 73 65 74 75 70 5f 61 63 63  /.void setup_acc
4360: 65 73 73 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67  ess(void){.  log
4370: 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74  in_check_credent
4380: 69 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67  ials();.  if( !g
4390: 2e 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20  .okSetup ){.    
43a0: 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a  login_needed();.
43b0: 20 20 7d 0a 0a 20 20 73 74 79 6c 65 5f 68 65 61    }..  style_hea
43c0: 64 65 72 28 22 41 63 63 65 73 73 20 43 6f 6e 74  der("Access Cont
43d0: 72 6f 6c 20 53 65 74 74 69 6e 67 73 22 29 3b 0a  rol Settings");.
43e0: 20 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73    db_begin_trans
43f0: 61 63 74 69 6f 6e 28 29 3b 0a 20 20 40 20 3c 66  action();.  @ <f
4400: 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73 28 67  orm action="%s(g
4410: 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65 74 75 70  .zBaseURL)/setup
4420: 5f 61 63 63 65 73 73 22 20 6d 65 74 68 6f 64 3d  _access" method=
4430: 22 50 4f 53 54 22 3e 0a 0a 20 20 40 20 3c 68 72  "POST">..  @ <hr
4440: 3e 0a 20 20 6f 6e 6f 66 66 5f 61 74 74 72 69 62  >.  onoff_attrib
4450: 75 74 65 28 22 52 65 71 75 69 72 65 20 70 61 73  ute("Require pas
4460: 73 77 6f 72 64 20 66 6f 72 20 6c 6f 63 61 6c 20  sword for local 
4470: 61 63 63 65 73 73 22 2c 0a 20 20 20 20 20 22 6c  access",.     "l
4480: 6f 63 61 6c 61 75 74 68 22 2c 20 22 6c 6f 63 61  ocalauth", "loca
4490: 6c 61 75 74 68 22 2c 20 31 29 3b 0a 20 20 40 20  lauth", 1);.  @ 
44a0: 3c 70 3e 57 68 65 6e 20 65 6e 61 62 6c 65 64 2c  <p>When enabled,
44b0: 20 74 68 65 20 70 61 73 73 77 6f 72 64 20 73 69   the password si
44c0: 67 6e 2d 69 6e 20 69 73 20 72 65 71 75 69 72 65  gn-in is require
44d0: 64 20 66 6f 72 0a 20 20 40 20 77 65 62 20 61 63  d for.  @ web ac
44e0: 63 65 73 73 20 63 6f 6d 69 6e 67 20 66 72 6f 6d  cess coming from
44f0: 20 31 32 37 2e 30 2e 30 2e 31 2e 20 20 57 68 65   127.0.0.1.  Whe
4500: 6e 20 64 69 73 61 62 6c 65 64 2c 20 77 65 62 20  n disabled, web 
4510: 61 63 63 65 73 73 0a 20 20 40 20 66 72 6f 6d 20  access.  @ from 
4520: 31 32 37 2e 30 2e 30 2e 31 20 69 73 20 61 6c 6c  127.0.0.1 is all
4530: 6f 77 73 20 77 69 74 68 6f 75 74 20 61 6e 79 20  ows without any 
4540: 6c 6f 67 69 6e 20 2d 20 74 68 65 20 75 73 65 72  login - the user
4550: 20 69 64 20 69 73 20 73 65 6c 65 63 74 65 64 0a   id is selected.
4560: 20 20 40 20 66 72 6f 6d 20 74 68 65 20 7e 2f 2e    @ from the ~/.
4570: 66 6f 73 73 69 6c 20 64 61 74 61 62 61 73 65 2e  fossil database.
4580: 20 50 61 73 73 77 6f 72 64 20 6c 6f 67 69 6e 20   Password login 
4590: 69 73 20 61 6c 77 61 79 73 20 72 65 71 75 69 72  is always requir
45a0: 65 64 0a 20 20 40 20 66 6f 72 20 69 6e 63 6f 6d  ed.  @ for incom
45b0: 69 6e 67 20 77 65 62 20 63 6f 6e 6e 65 63 74 69  ing web connecti
45c0: 6f 6e 73 20 6f 6e 20 69 6e 74 65 72 6e 65 74 20  ons on internet 
45d0: 61 64 64 72 65 73 73 65 73 20 6f 74 68 65 72 20  addresses other 
45e0: 74 68 61 6e 0a 20 20 40 20 31 32 37 2e 30 2e 30  than.  @ 127.0.0
45f0: 2e 31 2e 3c 2f 70 3e 3c 2f 6c 69 3e 0a 0a 20 20  .1.</p></li>..  
4600: 40 20 3c 68 72 3e 0a 20 20 65 6e 74 72 79 5f 61  @ <hr>.  entry_a
4610: 74 74 72 69 62 75 74 65 28 22 4c 6f 67 69 6e 20  ttribute("Login 
4620: 65 78 70 69 72 61 74 69 6f 6e 20 74 69 6d 65 22  expiration time"
4630: 2c 20 36 2c 20 22 63 6f 6f 6b 69 65 2d 65 78 70  , 6, "cookie-exp
4640: 69 72 65 22 2c 20 22 63 65 78 22 2c 20 22 38 37  ire", "cex", "87
4650: 36 36 22 29 3b 0a 20 20 40 20 3c 70 3e 54 68 65  66");.  @ <p>The
4660: 20 6e 75 6d 62 65 72 20 6f 66 20 68 6f 75 72 73   number of hours
4670: 20 66 6f 72 20 77 68 69 63 68 20 61 20 6c 6f 67   for which a log
4680: 69 6e 20 69 73 20 76 61 6c 69 64 2e 20 20 54 68  in is valid.  Th
4690: 69 73 20 6d 75 73 74 20 62 65 20 61 0a 20 20 40  is must be a.  @
46a0: 20 70 6f 73 69 74 69 76 65 20 6e 75 6d 62 65 72   positive number
46b0: 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 69  .  The default i
46c0: 73 20 38 37 36 30 20 68 6f 75 72 73 20 77 68 69  s 8760 hours whi
46d0: 63 68 20 69 73 20 61 70 70 72 6f 78 69 6d 61 74  ch is approximat
46e0: 65 6c 79 20 65 71 75 61 6c 0a 20 20 40 20 74 6f  ely equal.  @ to
46f0: 20 61 20 79 65 61 72 2e 3c 2f 70 3e 0a 0a 20 20   a year.</p>..  
4700: 40 20 3c 68 72 3e 0a 20 20 65 6e 74 72 79 5f 61  @ <hr>.  entry_a
4710: 74 74 72 69 62 75 74 65 28 22 44 6f 77 6e 6c 6f  ttribute("Downlo
4720: 61 64 20 70 61 63 6b 65 74 20 6c 69 6d 69 74 22  ad packet limit"
4730: 2c 20 31 30 2c 20 22 6d 61 78 2d 64 6f 77 6e 6c  , 10, "max-downl
4740: 6f 61 64 22 2c 20 22 6d 78 64 77 6e 22 2c 0a 20  oad", "mxdwn",. 
4750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4760: 20 22 35 30 30 30 30 30 30 22 29 3b 0a 20 20 40   "5000000");.  @
4770: 20 3c 70 3e 46 6f 73 73 69 6c 20 74 72 69 65 73   <p>Fossil tries
4780: 20 74 6f 20 6c 69 6d 69 74 20 6f 75 74 2d 62 6f   to limit out-bo
4790: 75 6e 64 20 73 79 6e 63 2c 20 63 6c 6f 6e 65 2c  und sync, clone,
47a0: 20 61 6e 64 20 70 75 6c 6c 20 70 61 63 6b 65 74   and pull packet
47b0: 73 0a 20 20 40 20 74 6f 20 74 68 69 73 20 6d 61  s.  @ to this ma
47c0: 6e 79 20 62 79 74 65 73 2c 20 75 6e 63 6f 6d 70  ny bytes, uncomp
47d0: 72 65 73 73 65 64 2e 20 20 49 66 20 74 68 65 20  ressed.  If the 
47e0: 63 6c 69 65 6e 74 20 72 65 71 75 69 72 65 73 20  client requires 
47f0: 6d 6f 72 65 20 64 61 74 61 0a 20 20 40 20 74 68  more data.  @ th
4800: 61 6e 20 74 68 69 73 2c 20 74 68 65 6e 20 74 68  an this, then th
4810: 65 20 63 6c 69 65 6e 74 20 77 69 6c 6c 20 69 73  e client will is
4820: 73 75 65 20 6d 75 6c 74 69 70 6c 65 20 48 54 54  sue multiple HTT
4830: 50 20 72 65 71 75 65 73 74 73 2e 0a 20 20 40 20  P requests..  @ 
4840: 56 61 6c 75 65 73 20 62 65 6c 6f 77 20 31 20 6d  Values below 1 m
4850: 69 6c 6c 69 6f 6e 20 61 72 65 20 6e 6f 74 20 72  illion are not r
4860: 65 63 6f 6d 6d 65 6e 64 65 64 2e 20 20 35 20 6d  ecommended.  5 m
4870: 69 6c 6c 69 6f 6e 20 69 73 20 61 20 0a 20 20 40  illion is a .  @
4880: 20 72 65 61 73 6f 6e 61 62 6c 65 20 6e 75 6d 62   reasonable numb
4890: 65 72 2e 3c 2f 70 3e 0a 0a 20 20 40 20 3c 68 72  er.</p>..  @ <hr
48a0: 3e 0a 20 20 40 20 3c 70 3e 3c 69 6e 70 75 74 20  >.  @ <p><input 
48b0: 74 79 70 65 3d 22 73 75 62 6d 69 74 22 20 20 6e  type="submit"  n
48c0: 61 6d 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c  ame="submit" val
48d0: 75 65 3d 22 41 70 70 6c 79 20 43 68 61 6e 67 65  ue="Apply Change
48e0: 73 22 3e 3c 2f 70 3e 0a 20 20 40 20 3c 2f 66 6f  s"></p>.  @ </fo
48f0: 72 6d 3e 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61  rm>.  db_end_tra
4900: 6e 73 61 63 74 69 6f 6e 28 30 29 3b 0a 20 20 73  nsaction(0);.  s
4910: 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d  tyle_footer();.}
4920: 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a  ../*.** WEBPAGE:
4930: 20 73 65 74 75 70 5f 74 69 6d 65 6c 69 6e 65 0a   setup_timeline.
4940: 2a 2f 0a 76 6f 69 64 20 73 65 74 75 70 5f 74 69  */.void setup_ti
4950: 6d 65 6c 69 6e 65 28 76 6f 69 64 29 7b 0a 20 20  meline(void){.  
4960: 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64  login_check_cred
4970: 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 28  entials();.  if(
4980: 20 21 67 2e 6f 6b 53 65 74 75 70 20 29 7b 0a 20   !g.okSetup ){. 
4990: 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28     login_needed(
49a0: 29 3b 0a 20 20 7d 0a 0a 20 20 73 74 79 6c 65 5f  );.  }..  style_
49b0: 68 65 61 64 65 72 28 22 54 69 6d 65 6c 69 6e 65  header("Timeline
49c0: 20 44 69 73 70 6c 61 79 20 50 72 65 66 65 72 65   Display Prefere
49d0: 6e 63 65 73 22 29 3b 0a 20 20 64 62 5f 62 65 67  nces");.  db_beg
49e0: 69 6e 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29  in_transaction()
49f0: 3b 0a 20 20 40 20 3c 66 6f 72 6d 20 61 63 74 69  ;.  @ <form acti
4a00: 6f 6e 3d 22 25 73 28 67 2e 7a 42 61 73 65 55 52  on="%s(g.zBaseUR
4a10: 4c 29 2f 73 65 74 75 70 5f 74 69 6d 65 6c 69 6e  L)/setup_timelin
4a20: 65 22 20 6d 65 74 68 6f 64 3d 22 50 4f 53 54 22  e" method="POST"
4a30: 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20 20 6f 6e  >..  @ <hr>.  on
4a40: 6f 66 66 5f 61 74 74 72 69 62 75 74 65 28 22 42  off_attribute("B
4a50: 6c 6f 63 6b 20 6d 61 72 6b 75 70 20 69 6e 20 74  lock markup in t
4a60: 69 6d 65 6c 69 6e 65 22 2c 0a 20 20 20 20 20 20  imeline",.      
4a70: 20 20 20 20 20 20 20 20 20 20 20 20 22 74 69 6d              "tim
4a80: 65 6c 69 6e 65 2d 62 6c 6f 63 6b 2d 6d 61 72 6b  eline-block-mark
4a90: 75 70 22 2c 20 22 74 62 6d 22 2c 20 30 29 3b 0a  up", "tbm", 0);.
4aa0: 20 20 40 20 3c 70 3e 49 6e 20 74 69 6d 65 6c 69    @ <p>In timeli
4ab0: 6e 65 20 64 69 73 70 6c 61 79 73 2c 20 63 68 65  ne displays, che
4ac0: 63 6b 2d 69 6e 20 63 6f 6d 6d 65 6e 74 73 20 63  ck-in comments c
4ad0: 61 6e 20 62 65 20 64 69 73 70 6c 61 79 65 64 20  an be displayed 
4ae0: 77 69 74 68 20 6f 72 0a 20 20 40 20 77 69 74 68  with or.  @ with
4af0: 6f 75 74 20 62 6c 6f 63 6b 20 6d 61 72 6b 75 70  out block markup
4b00: 20 28 70 61 72 61 67 72 61 70 68 73 2c 20 74 61   (paragraphs, ta
4b10: 62 6c 65 73 2c 20 65 74 63 2e 29 3c 2f 70 3e 0a  bles, etc.)</p>.
4b20: 0a 20 20 40 20 3c 68 72 3e 0a 20 20 65 6e 74 72  .  @ <hr>.  entr
4b30: 79 5f 61 74 74 72 69 62 75 74 65 28 22 4d 61 78  y_attribute("Max
4b40: 20 74 69 6d 65 6c 69 6e 65 20 63 6f 6d 6d 65 6e   timeline commen
4b50: 74 20 6c 65 6e 67 74 68 22 2c 20 36 2c 20 0a 20  t length", 6, . 
4b60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4b70: 20 22 74 69 6d 65 6c 69 6e 65 2d 6d 61 78 2d 63   "timeline-max-c
4b80: 6f 6d 6d 65 6e 74 22 2c 20 22 74 6d 63 22 2c 20  omment", "tmc", 
4b90: 22 30 22 29 3b 0a 20 20 40 20 3c 70 3e 54 68 65  "0");.  @ <p>The
4ba0: 20 6d 61 78 69 6d 75 6d 20 6c 65 6e 67 74 68 20   maximum length 
4bb0: 6f 66 20 61 20 63 6f 6d 6d 65 6e 74 20 74 6f 20  of a comment to 
4bc0: 62 65 20 64 69 73 70 6c 61 79 65 64 20 69 6e 20  be displayed in 
4bd0: 61 20 74 69 6d 65 6c 69 6e 65 2e 0a 20 20 40 20  a timeline..  @ 
4be0: 22 30 22 20 74 68 65 72 65 20 69 73 20 6e 6f 20  "0" there is no 
4bf0: 6c 65 6e 67 74 68 20 6c 69 6d 69 74 2e 3c 2f 70  length limit.</p
4c00: 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20 20 40 20  >..  @ <hr>.  @ 
4c10: 3c 70 3e 3c 69 6e 70 75 74 20 74 79 70 65 3d 22  <p><input type="
4c20: 73 75 62 6d 69 74 22 20 20 6e 61 6d 65 3d 22 73  submit"  name="s
4c30: 75 62 6d 69 74 22 20 76 61 6c 75 65 3d 22 41 70  ubmit" value="Ap
4c40: 70 6c 79 20 43 68 61 6e 67 65 73 22 3e 3c 2f 70  ply Changes"></p
4c50: 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20  >.  @ </form>.  
4c60: 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69  db_end_transacti
4c70: 6f 6e 28 30 29 3b 0a 20 20 73 74 79 6c 65 5f 66  on(0);.  style_f
4c80: 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  ooter();.}../*.*
4c90: 2a 20 57 45 42 50 41 47 45 3a 20 73 65 74 75 70  * WEBPAGE: setup
4ca0: 5f 63 6f 6e 66 69 67 0a 2a 2f 0a 76 6f 69 64 20  _config.*/.void 
4cb0: 73 65 74 75 70 5f 63 6f 6e 66 69 67 28 76 6f 69  setup_config(voi
4cc0: 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63  d){.  login_chec
4cd0: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
4ce0: 0a 20 20 69 66 28 20 21 67 2e 6f 6b 53 65 74 75  .  if( !g.okSetu
4cf0: 70 20 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e  p ){.    login_n
4d00: 65 65 64 65 64 28 29 3b 0a 20 20 7d 0a 0a 20 20  eeded();.  }..  
4d10: 73 74 79 6c 65 5f 68 65 61 64 65 72 28 22 57 57  style_header("WW
4d20: 57 20 43 6f 6e 66 69 67 75 72 61 74 69 6f 6e 22  W Configuration"
4d30: 29 3b 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 72  );.  db_begin_tr
4d40: 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 40  ansaction();.  @
4d50: 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25   <form action="%
4d60: 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65  s(g.zBaseURL)/se
4d70: 74 75 70 5f 63 6f 6e 66 69 67 22 20 6d 65 74 68  tup_config" meth
4d80: 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20 3c  od="POST">.  @ <
4d90: 68 72 20 2f 3e 0a 20 20 65 6e 74 72 79 5f 61 74  hr />.  entry_at
4da0: 74 72 69 62 75 74 65 28 22 50 72 6f 6a 65 63 74  tribute("Project
4db0: 20 4e 61 6d 65 22 2c 20 36 30 2c 20 22 70 72 6f   Name", 60, "pro
4dc0: 6a 65 63 74 2d 6e 61 6d 65 22 2c 20 22 70 6e 22  ject-name", "pn"
4dd0: 2c 20 22 22 29 3b 0a 20 20 40 20 3c 70 3e 47 69  , "");.  @ <p>Gi
4de0: 76 65 20 79 6f 75 72 20 70 72 6f 6a 65 63 74 20  ve your project 
4df0: 61 20 6e 61 6d 65 20 73 6f 20 76 69 73 69 74 6f  a name so visito
4e00: 72 73 20 6b 6e 6f 77 20 77 68 61 74 20 74 68 69  rs know what thi
4e10: 73 20 73 69 74 65 20 69 73 20 61 62 6f 75 74 2e  s site is about.
4e20: 0a 20 20 40 20 54 68 65 20 70 72 6f 6a 65 63 74  .  @ The project
4e30: 20 6e 61 6d 65 20 77 69 6c 6c 20 61 6c 73 6f 20   name will also 
4e40: 62 65 20 75 73 65 64 20 61 73 20 74 68 65 20 52  be used as the R
4e50: 53 53 20 66 65 65 64 20 74 69 74 6c 65 2e 3c 2f  SS feed title.</
4e60: 70 3e 0a 20 20 40 20 3c 68 72 20 2f 3e 0a 20 20  p>.  @ <hr />.  
4e70: 74 65 78 74 61 72 65 61 5f 61 74 74 72 69 62 75  textarea_attribu
4e80: 74 65 28 22 50 72 6f 6a 65 63 74 20 44 65 73 63  te("Project Desc
4e90: 72 69 70 74 69 6f 6e 22 2c 20 35 2c 20 36 30 2c  ription", 5, 60,
4ea0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
4eb0: 20 20 20 20 20 20 22 70 72 6f 6a 65 63 74 2d 64        "project-d
4ec0: 65 73 63 72 69 70 74 69 6f 6e 22 2c 20 22 70 64  escription", "pd
4ed0: 22 2c 20 22 22 29 3b 0a 20 20 40 20 3c 70 3e 44  ", "");.  @ <p>D
4ee0: 65 73 63 72 69 62 65 20 79 6f 75 72 20 70 72 6f  escribe your pro
4ef0: 6a 65 63 74 2e 20 54 68 69 73 20 77 69 6c 6c 20  ject. This will 
4f00: 62 65 20 75 73 65 64 20 69 6e 20 70 61 67 65 20  be used in page 
4f10: 68 65 61 64 65 72 73 20 66 6f 72 20 73 65 61 72  headers for sear
4f20: 63 68 0a 20 20 40 20 65 6e 67 69 6e 65 73 20 61  ch.  @ engines a
4f30: 73 20 77 65 6c 6c 20 61 73 20 61 20 73 68 6f 72  s well as a shor
4f40: 74 20 52 53 53 20 64 65 73 63 72 69 70 74 69 6f  t RSS descriptio
4f50: 6e 2e 3c 2f 70 3e 0a 20 20 40 20 3c 68 72 20 2f  n.</p>.  @ <hr /
4f60: 3e 0a 20 20 65 6e 74 72 79 5f 61 74 74 72 69 62  >.  entry_attrib
4f70: 75 74 65 28 22 49 6e 64 65 78 20 50 61 67 65 22  ute("Index Page"
4f80: 2c 20 36 30 2c 20 22 69 6e 64 65 78 2d 70 61 67  , 60, "index-pag
4f90: 65 22 2c 20 22 69 64 78 70 67 22 2c 20 22 2f 68  e", "idxpg", "/h
4fa0: 6f 6d 65 22 29 3b 0a 20 20 40 20 3c 70 3e 45 6e  ome");.  @ <p>En
4fb0: 74 65 72 20 74 68 65 20 70 61 74 68 6e 61 6d 65  ter the pathname
4fc0: 20 6f 66 20 74 68 65 20 70 61 67 65 20 74 6f 20   of the page to 
4fd0: 64 69 73 70 6c 61 79 20 77 68 65 6e 20 74 68 65  display when the
4fe0: 20 22 48 6f 6d 65 22 20 6d 65 6e 75 0a 20 20 40   "Home" menu.  @
4ff0: 20 6f 70 74 69 6f 6e 20 69 73 20 73 65 6c 65 63   option is selec
5000: 74 65 64 20 61 6e 64 20 77 68 65 6e 20 6e 6f 20  ted and when no 
5010: 70 61 74 68 6e 61 6d 65 20 69 73 0a 20 20 40 20  pathname is.  @ 
5020: 73 70 65 63 69 66 69 65 64 20 69 6e 20 74 68 65  specified in the
5030: 20 55 52 4c 2e 20 20 46 6f 72 20 65 78 61 6d 70   URL.  For examp
5040: 6c 65 2c 20 69 66 20 79 6f 75 20 76 69 73 69 74  le, if you visit
5050: 20 74 68 65 20 75 72 6c 3a 3c 2f 70 3e 0a 20 20   the url:</p>.  
5060: 40 0a 20 20 40 20 3c 62 6c 6f 63 6b 71 75 6f 74  @.  @ <blockquot
5070: 65 3e 25 68 28 67 2e 7a 42 61 73 65 55 52 4c 29  e>%h(g.zBaseURL)
5080: 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e 0a 20 20  </blockquote>.  
5090: 40 0a 20 20 40 20 3c 70 3e 41 6e 64 20 79 6f 75  @.  @ <p>And you
50a0: 20 68 61 76 65 20 73 70 65 63 69 66 69 65 64 20   have specified 
50b0: 61 6e 20 69 6e 64 65 78 20 70 61 67 65 20 6f 66  an index page of
50c0: 20 22 2f 68 6f 6d 65 22 20 74 68 65 20 61 62 6f   "/home" the abo
50d0: 76 65 20 77 69 6c 6c 0a 20 20 40 20 61 75 74 6f  ve will.  @ auto
50e0: 6d 61 74 69 63 61 6c 6c 79 20 72 65 64 69 72 65  matically redire
50f0: 63 74 20 74 6f 3a 3c 2f 70 3e 0a 20 20 40 0a 20  ct to:</p>.  @. 
5100: 20 40 20 3c 62 6c 6f 63 6b 71 75 6f 74 65 3e 25   @ <blockquote>%
5110: 68 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 68 6f  h(g.zBaseURL)/ho
5120: 6d 65 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e 0a  me</blockquote>.
5130: 20 20 40 0a 20 20 40 20 3c 70 3e 54 68 65 20 64    @.  @ <p>The d
5140: 65 66 61 75 6c 74 20 22 2f 68 6f 6d 65 22 20 70  efault "/home" p
5150: 61 67 65 20 64 69 73 70 6c 61 79 73 20 61 20 57  age displays a W
5160: 69 6b 69 20 70 61 67 65 20 77 69 74 68 20 74 68  iki page with th
5170: 65 20 73 61 6d 65 20 6e 61 6d 65 0a 20 20 40 20  e same name.  @ 
5180: 61 73 20 74 68 65 20 50 72 6f 6a 65 63 74 20 4e  as the Project N
5190: 61 6d 65 20 73 70 65 63 69 66 69 65 64 20 61 62  ame specified ab
51a0: 6f 76 65 2e 20 20 53 6f 6d 65 20 73 69 74 65 73  ove.  Some sites
51b0: 20 70 72 65 66 65 72 20 74 6f 20 72 65 64 69 72   prefer to redir
51c0: 65 63 74 0a 20 20 40 20 74 6f 20 61 20 64 6f 63  ect.  @ to a doc
51d0: 75 6d 65 6e 74 61 74 69 6f 6e 20 70 61 67 65 20  umentation page 
51e0: 28 65 78 3a 20 22 2f 64 6f 63 2f 74 69 70 2f 69  (ex: "/doc/tip/i
51f0: 6e 64 65 78 2e 77 69 6b 69 22 29 20 6f 72 20 74  ndex.wiki") or t
5200: 6f 20 22 2f 74 69 6d 65 6c 69 6e 65 22 2e 3c 2f  o "/timeline".</
5210: 70 3e 0a 20 20 40 20 3c 68 72 20 2f 3e 0a 20 20  p>.  @ <hr />.  
5220: 40 20 3c 70 3e 3c 69 6e 70 75 74 20 74 79 70 65  @ <p><input type
5230: 3d 22 73 75 62 6d 69 74 22 20 20 6e 61 6d 65 3d  ="submit"  name=
5240: 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d 22  "submit" value="
5250: 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e 3c  Apply Changes"><
5260: 2f 70 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a  /p>.  @ </form>.
5270: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63    db_end_transac
5280: 74 69 6f 6e 28 30 29 3b 0a 20 20 73 74 79 6c 65  tion(0);.  style
5290: 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a  _footer();.}../*
52a0: 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 73 65 74  .** WEBPAGE: set
52b0: 75 70 5f 65 64 69 74 63 73 73 0a 2a 2f 0a 76 6f  up_editcss.*/.vo
52c0: 69 64 20 73 65 74 75 70 5f 65 64 69 74 63 73 73  id setup_editcss
52d0: 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f  (void){.  login_
52e0: 63 68 65 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c  check_credential
52f0: 73 28 29 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b  s();.  if( !g.ok
5300: 53 65 74 75 70 20 29 7b 0a 20 20 20 20 6c 6f 67  Setup ){.    log
5310: 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20 20 7d  in_needed();.  }
5320: 0a 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28  .  style_header(
5330: 22 45 64 69 74 20 43 53 53 22 29 3b 0a 20 20 40  "Edit CSS");.  @
5340: 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25   <form action="%
5350: 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65  s(g.zBaseURL)/se
5360: 74 75 70 5f 65 64 69 74 63 73 73 22 20 6d 65 74  tup_editcss" met
5370: 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20  hod="POST">.  @ 
5380: 45 64 69 74 20 74 68 65 20 43 53 53 3a 3c 62 72  Edit the CSS:<br
5390: 20 2f 3e 0a 20 20 74 65 78 74 61 72 65 61 5f 61   />.  textarea_a
53a0: 74 74 72 69 62 75 74 65 28 22 22 2c 20 34 30 2c  ttribute("", 40,
53b0: 20 38 30 2c 20 22 63 73 73 22 2c 20 22 63 73 73   80, "css", "css
53c0: 22 2c 20 7a 44 65 66 61 75 6c 74 43 53 53 29 3b  ", zDefaultCSS);
53d0: 0a 20 20 40 20 3c 62 72 20 2f 3e 0a 20 20 40 20  .  @ <br />.  @ 
53e0: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62  <input type="sub
53f0: 6d 69 74 22 20 6e 61 6d 65 3d 22 73 75 62 6d 69  mit" name="submi
5400: 74 22 20 76 61 6c 75 65 3d 22 41 70 70 6c 79 20  t" value="Apply 
5410: 43 68 61 6e 67 65 73 22 3e 0a 20 20 40 20 3c 2f  Changes">.  @ </
5420: 66 6f 72 6d 3e 0a 20 20 40 20 3c 68 72 3e 0a 20  form>.  @ <hr>. 
5430: 20 40 20 48 65 72 65 20 69 73 20 74 68 65 20 64   @ Here is the d
5440: 65 66 61 75 6c 74 20 43 53 53 3a 0a 20 20 40 20  efault CSS:.  @ 
5450: 3c 62 6c 6f 63 6b 71 75 6f 74 65 3e 3c 70 72 65  <blockquote><pre
5460: 3e 0a 20 20 40 20 25 68 28 7a 44 65 66 61 75 6c  >.  @ %h(zDefaul
5470: 74 43 53 53 29 0a 20 20 40 20 3c 2f 70 72 65 3e  tCSS).  @ </pre>
5480: 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e 0a 20 20  </blockquote>.  
5490: 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a  style_footer();.
54a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45  }../*.** WEBPAGE
54b0: 3a 20 73 65 74 75 70 5f 68 65 61 64 65 72 0a 2a  : setup_header.*
54c0: 2f 0a 76 6f 69 64 20 73 65 74 75 70 5f 68 65 61  /.void setup_hea
54d0: 64 65 72 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67  der(void){.  log
54e0: 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74  in_check_credent
54f0: 69 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67  ials();.  if( !g
5500: 2e 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20  .okSetup ){.    
5510: 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a  login_needed();.
5520: 20 20 7d 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74    }.  db_begin_t
5530: 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20  ransaction();.  
5540: 69 66 28 20 50 28 22 63 6c 65 61 72 22 29 21 3d  if( P("clear")!=
5550: 30 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74  0 ){.    db_mult
5560: 69 5f 65 78 65 63 28 22 44 45 4c 45 54 45 20 46  i_exec("DELETE F
5570: 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45  ROM config WHERE
5580: 20 6e 61 6d 65 3d 27 68 65 61 64 65 72 27 22 29   name='header'")
5590: 3b 0a 20 20 20 20 63 67 69 5f 72 65 70 6c 61 63  ;.    cgi_replac
55a0: 65 5f 70 61 72 61 6d 65 74 65 72 28 22 68 65 61  e_parameter("hea
55b0: 64 65 72 22 2c 20 7a 44 65 66 61 75 6c 74 48 65  der", zDefaultHe
55c0: 61 64 65 72 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  ader);.  }else{.
55d0: 20 20 20 20 74 65 78 74 61 72 65 61 5f 61 74 74      textarea_att
55e0: 72 69 62 75 74 65 28 30 2c 20 30 2c 20 30 2c 20  ribute(0, 0, 0, 
55f0: 22 68 65 61 64 65 72 22 2c 20 22 68 65 61 64 65  "header", "heade
5600: 72 22 2c 20 7a 44 65 66 61 75 6c 74 48 65 61 64  r", zDefaultHead
5610: 65 72 29 3b 0a 20 20 7d 0a 20 20 73 74 79 6c 65  er);.  }.  style
5620: 5f 68 65 61 64 65 72 28 22 45 64 69 74 20 50 61  _header("Edit Pa
5630: 67 65 20 48 65 61 64 65 72 22 29 3b 0a 20 20 40  ge Header");.  @
5640: 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25   <form action="%
5650: 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65  s(g.zBaseURL)/se
5660: 74 75 70 5f 68 65 61 64 65 72 22 20 6d 65 74 68  tup_header" meth
5670: 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20 3c  od="POST">.  @ <
5680: 70 3e 45 64 69 74 20 48 54 4d 4c 20 74 65 78 74  p>Edit HTML text
5690: 20 77 69 74 68 20 65 6d 62 65 64 64 65 64 20 54   with embedded T
56a0: 48 31 20 28 61 20 54 43 4c 20 64 69 61 6c 65 63  H1 (a TCL dialec
56b0: 74 29 20 74 68 61 74 20 77 69 6c 6c 20 62 65 20  t) that will be 
56c0: 75 73 65 64 20 74 6f 0a 20 20 40 20 67 65 6e 65  used to.  @ gene
56d0: 72 61 74 65 20 74 68 65 20 62 65 67 69 6e 6e 69  rate the beginni
56e0: 6e 67 20 6f 66 20 65 76 65 72 79 20 70 61 67 65  ng of every page
56f0: 20 74 68 72 6f 75 67 68 20 73 74 61 72 74 20 6f   through start o
5700: 66 20 74 68 65 20 6d 61 69 6e 0a 20 20 40 20 6d  f the main.  @ m
5710: 65 6e 75 2e 3c 2f 70 3e 0a 20 20 74 65 78 74 61  enu.</p>.  texta
5720: 72 65 61 5f 61 74 74 72 69 62 75 74 65 28 22 22  rea_attribute(""
5730: 2c 20 34 30 2c 20 38 30 2c 20 22 68 65 61 64 65  , 40, 80, "heade
5740: 72 22 2c 20 22 68 65 61 64 65 72 22 2c 20 7a 44  r", "header", zD
5750: 65 66 61 75 6c 74 48 65 61 64 65 72 29 3b 0a 20  efaultHeader);. 
5760: 20 40 20 3c 62 72 20 2f 3e 0a 20 20 40 20 3c 69   @ <br />.  @ <i
5770: 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69  nput type="submi
5780: 74 22 20 6e 61 6d 65 3d 22 73 75 62 6d 69 74 22  t" name="submit"
5790: 20 76 61 6c 75 65 3d 22 41 70 70 6c 79 20 43 68   value="Apply Ch
57a0: 61 6e 67 65 73 22 3e 0a 20 20 40 20 3c 69 6e 70  anges">.  @ <inp
57b0: 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69 74 22  ut type="submit"
57c0: 20 6e 61 6d 65 3d 22 63 6c 65 61 72 22 20 76 61   name="clear" va
57d0: 6c 75 65 3d 22 52 65 76 65 72 74 20 54 6f 20 44  lue="Revert To D
57e0: 65 66 61 75 6c 74 22 3e 0a 20 20 40 20 3c 2f 66  efault">.  @ </f
57f0: 6f 72 6d 3e 0a 20 20 40 20 3c 68 72 3e 0a 20 20  orm>.  @ <hr>.  
5800: 40 20 48 65 72 65 20 69 73 20 74 68 65 20 64 65  @ Here is the de
5810: 66 61 75 6c 74 20 70 61 67 65 20 68 65 61 64 65  fault page heade
5820: 72 3a 0a 20 20 40 20 3c 62 6c 6f 63 6b 71 75 6f  r:.  @ <blockquo
5830: 74 65 3e 3c 70 72 65 3e 0a 20 20 40 20 25 68 28  te><pre>.  @ %h(
5840: 7a 44 65 66 61 75 6c 74 48 65 61 64 65 72 29 0a  zDefaultHeader).
5850: 20 20 40 20 3c 2f 70 72 65 3e 3c 2f 62 6c 6f 63    @ </pre></bloc
5860: 6b 71 75 6f 74 65 3e 0a 20 20 64 62 5f 65 6e 64  kquote>.  db_end
5870: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 3b  _transaction(0);
5880: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47  .}../*.** WEBPAG
5890: 45 3a 20 73 65 74 75 70 5f 66 6f 6f 74 65 72 0a  E: setup_footer.
58a0: 2a 2f 0a 76 6f 69 64 20 73 65 74 75 70 5f 66 6f  */.void setup_fo
58b0: 6f 74 65 72 28 76 6f 69 64 29 7b 0a 20 20 6c 6f  oter(void){.  lo
58c0: 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e  gin_check_creden
58d0: 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21  tials();.  if( !
58e0: 67 2e 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20  g.okSetup ){.   
58f0: 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b   login_needed();
5900: 0a 20 20 7d 0a 20 20 64 62 5f 62 65 67 69 6e 5f  .  }.  db_begin_
5910: 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20  transaction();. 
5920: 20 69 66 28 20 50 28 22 63 6c 65 61 72 22 29 21   if( P("clear")!
5930: 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c  =0 ){.    db_mul
5940: 74 69 5f 65 78 65 63 28 22 44 45 4c 45 54 45 20  ti_exec("DELETE 
5950: 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52  FROM config WHER
5960: 45 20 6e 61 6d 65 3d 27 66 6f 6f 74 65 72 27 22  E name='footer'"
5970: 29 3b 0a 20 20 20 20 63 67 69 5f 72 65 70 6c 61  );.    cgi_repla
5980: 63 65 5f 70 61 72 61 6d 65 74 65 72 28 22 66 6f  ce_parameter("fo
5990: 6f 74 65 72 22 2c 20 7a 44 65 66 61 75 6c 74 46  oter", zDefaultF
59a0: 6f 6f 74 65 72 29 3b 0a 20 20 7d 65 6c 73 65 7b  ooter);.  }else{
59b0: 0a 20 20 20 20 74 65 78 74 61 72 65 61 5f 61 74  .    textarea_at
59c0: 74 72 69 62 75 74 65 28 30 2c 20 30 2c 20 30 2c  tribute(0, 0, 0,
59d0: 20 22 66 6f 6f 74 65 72 22 2c 20 22 66 6f 6f 74   "footer", "foot
59e0: 65 72 22 2c 20 7a 44 65 66 61 75 6c 74 46 6f 6f  er", zDefaultFoo
59f0: 74 65 72 29 3b 0a 20 20 7d 0a 20 20 73 74 79 6c  ter);.  }.  styl
5a00: 65 5f 68 65 61 64 65 72 28 22 45 64 69 74 20 50  e_header("Edit P
5a10: 61 67 65 20 46 6f 6f 74 65 72 22 29 3b 0a 20 20  age Footer");.  
5a20: 40 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22  @ <form action="
5a30: 25 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 73  %s(g.zBaseURL)/s
5a40: 65 74 75 70 5f 66 6f 6f 74 65 72 22 20 6d 65 74  etup_footer" met
5a50: 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20  hod="POST">.  @ 
5a60: 3c 70 3e 45 64 69 74 20 48 54 4d 4c 20 74 65 78  <p>Edit HTML tex
5a70: 74 20 77 69 74 68 20 65 6d 62 65 64 64 65 64 20  t with embedded 
5a80: 54 48 31 20 28 61 20 54 43 4c 20 64 69 61 6c 65  TH1 (a TCL diale
5a90: 63 74 29 20 74 68 61 74 20 77 69 6c 6c 20 62 65  ct) that will be
5aa0: 20 75 73 65 64 20 74 6f 0a 20 20 40 20 67 65 6e   used to.  @ gen
5ab0: 65 72 61 74 65 20 74 68 65 20 65 6e 64 20 6f 66  erate the end of
5ac0: 20 65 76 65 72 79 20 70 61 67 65 2e 3c 2f 70 3e   every page.</p>
5ad0: 0a 20 20 74 65 78 74 61 72 65 61 5f 61 74 74 72  .  textarea_attr
5ae0: 69 62 75 74 65 28 22 22 2c 20 32 30 2c 20 38 30  ibute("", 20, 80
5af0: 2c 20 22 66 6f 6f 74 65 72 22 2c 20 22 66 6f 6f  , "footer", "foo
5b00: 74 65 72 22 2c 20 7a 44 65 66 61 75 6c 74 46 6f  ter", zDefaultFo
5b10: 6f 74 65 72 29 3b 0a 20 20 40 20 3c 62 72 20 2f  oter);.  @ <br /
5b20: 3e 0a 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70  >.  @ <input typ
5b30: 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d 65 3d  e="submit" name=
5b40: 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d 22  "submit" value="
5b50: 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e 0a  Apply Changes">.
5b60: 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d    @ <input type=
5b70: 22 73 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 63  "submit" name="c
5b80: 6c 65 61 72 22 20 76 61 6c 75 65 3d 22 52 65 76  lear" value="Rev
5b90: 65 72 74 20 54 6f 20 44 65 66 61 75 6c 74 22 3e  ert To Default">
5ba0: 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 40  .  @ </form>.  @
5bb0: 20 3c 68 72 3e 0a 20 20 40 20 48 65 72 65 20 69   <hr>.  @ Here i
5bc0: 73 20 74 68 65 20 64 65 66 61 75 6c 74 20 70 61  s the default pa
5bd0: 67 65 20 66 6f 6f 74 65 72 3a 0a 20 20 40 20 3c  ge footer:.  @ <
5be0: 62 6c 6f 63 6b 71 75 6f 74 65 3e 3c 70 72 65 3e  blockquote><pre>
5bf0: 0a 20 20 40 20 25 68 28 7a 44 65 66 61 75 6c 74  .  @ %h(zDefault
5c00: 46 6f 6f 74 65 72 29 0a 20 20 40 20 3c 2f 70 72  Footer).  @ </pr
5c10: 65 3e 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e 0a  e></blockquote>.
5c20: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63    db_end_transac
5c30: 74 69 6f 6e 28 30 29 3b 0a 7d 0a                 tion(0);.}.