Hex Artifact Content
Not logged in

Artifact 9b54ba173ac9ef2f5463dfc739a1e9d10085d452:

File src/setup.c part of check-in [ce277cadda] - Incremental work on tickets and especially ticket configuration. by drh on 2008-05-25 19:36:47.

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 74 61 74  menu_entry("Stat
0a10: 73 22 2c 20 22 73 74 61 74 22 2c 0a 20 20 20 20  s", "stat",.    
0a20: 22 44 69 73 70 6c 61 79 20 72 65 70 6f 73 69 74  "Display reposit
0a30: 6f 72 79 20 73 74 61 74 69 73 74 69 63 73 22 29  ory statistics")
0a40: 3b 0a 20 20 40 20 3c 2f 74 61 62 6c 65 3e 0a 0a  ;.  @ </table>..
0a50: 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29    style_footer()
0a60: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41  ;.}../*.** WEBPA
0a70: 47 45 3a 20 73 65 74 75 70 5f 75 6c 69 73 74 0a  GE: setup_ulist.
0a80: 2a 2a 0a 2a 2a 20 53 68 6f 77 20 61 20 6c 69 73  **.** Show a lis
0a90: 74 20 6f 66 20 75 73 65 72 73 2e 20 20 43 6c 69  t of users.  Cli
0aa0: 63 6b 69 6e 67 20 6f 6e 20 61 6e 79 20 75 73 65  cking on any use
0ab0: 72 20 6a 75 6d 70 73 20 74 6f 20 74 68 65 20 65  r jumps to the e
0ac0: 64 69 74 0a 2a 2a 20 73 63 72 65 65 6e 20 66 6f  dit.** screen fo
0ad0: 72 20 74 68 61 74 20 75 73 65 72 2e 0a 2a 2f 0a  r that user..*/.
0ae0: 76 6f 69 64 20 73 65 74 75 70 5f 75 6c 69 73 74  void setup_ulist
0af0: 28 76 6f 69 64 29 7b 0a 20 20 53 74 6d 74 20 73  (void){.  Stmt s
0b00: 3b 0a 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b  ;..  login_check
0b10: 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a  _credentials();.
0b20: 20 20 69 66 28 20 21 67 2e 6f 6b 53 65 74 75 70    if( !g.okSetup
0b30: 20 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65   ){.    login_ne
0b40: 65 64 65 64 28 29 3b 0a 20 20 20 20 72 65 74 75  eded();.    retu
0b50: 72 6e 3b 0a 20 20 7d 0a 0a 20 20 73 74 79 6c 65  rn;.  }..  style
0b60: 5f 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e 74  _submenu_element
0b70: 28 22 41 64 64 22 2c 20 22 41 64 64 20 55 73 65  ("Add", "Add Use
0b80: 72 22 2c 20 22 73 65 74 75 70 5f 75 65 64 69 74  r", "setup_uedit
0b90: 22 29 3b 0a 20 20 73 74 79 6c 65 5f 68 65 61 64  ");.  style_head
0ba0: 65 72 28 22 55 73 65 72 20 4c 69 73 74 22 29 3b  er("User List");
0bb0: 0a 20 20 40 20 3c 74 61 62 6c 65 20 62 6f 72 64  .  @ <table bord
0bc0: 65 72 3d 22 30 22 20 63 65 6c 6c 70 61 64 64 69  er="0" cellpaddi
0bd0: 6e 67 3d 22 30 22 20 63 65 6c 6c 73 70 61 63 69  ng="0" cellspaci
0be0: 6e 67 3d 22 32 35 22 3e 0a 20 20 40 20 3c 74 72  ng="25">.  @ <tr
0bf0: 3e 3c 74 64 20 76 61 6c 69 67 6e 3d 22 74 6f 70  ><td valign="top
0c00: 22 3e 0a 20 20 40 20 3c 62 3e 55 73 65 72 73 3a  ">.  @ <b>Users:
0c10: 3c 2f 62 3e 0a 20 20 40 20 3c 74 61 62 6c 65 20  </b>.  @ <table 
0c20: 62 6f 72 64 65 72 3d 22 31 22 20 63 65 6c 6c 70  border="1" cellp
0c30: 61 64 64 69 6e 67 3d 22 31 30 22 3e 3c 74 72 3e  adding="10"><tr>
0c40: 3c 74 64 3e 0a 20 20 40 20 3c 74 61 62 6c 65 20  <td>.  @ <table 
0c50: 63 65 6c 6c 73 70 61 63 69 6e 67 3d 30 20 63 65  cellspacing=0 ce
0c60: 6c 6c 70 61 64 64 69 6e 67 3d 30 20 62 6f 72 64  llpadding=0 bord
0c70: 65 72 3d 30 3e 0a 20 20 40 20 3c 74 72 3e 0a 20  er=0>.  @ <tr>. 
0c80: 20 40 20 20 20 3c 74 68 20 61 6c 69 67 6e 3d 22   @   <th align="
0c90: 72 69 67 68 74 22 3e 55 73 65 72 26 6e 62 73 70  right">User&nbsp
0ca0: 3b 49 44 3c 2f 74 68 3e 3c 74 64 20 77 69 64 74  ;ID</th><td widt
0cb0: 68 3d 22 32 30 22 3e 26 6e 62 73 70 3b 3c 2f 74  h="20">&nbsp;</t
0cc0: 64 3e 0a 20 20 40 20 20 20 3c 74 68 3e 43 61 70  d>.  @   <th>Cap
0cd0: 61 62 69 6c 69 74 69 65 73 3c 2f 74 68 3e 3c 74  abilities</th><t
0ce0: 64 20 77 69 64 74 68 3d 22 31 35 22 3e 26 6e 62  d width="15">&nb
0cf0: 73 70 3b 3c 2f 74 64 3e 0a 20 20 40 20 20 20 3c  sp;</td>.  @   <
0d00: 74 68 3e 43 6f 6e 74 61 63 74 26 6e 62 73 70 3b  th>Contact&nbsp;
0d10: 49 6e 66 6f 3c 2f 74 68 3e 0a 20 20 40 20 3c 2f  Info</th>.  @ </
0d20: 74 72 3e 0a 20 20 64 62 5f 70 72 65 70 61 72 65  tr>.  db_prepare
0d30: 28 26 73 2c 20 22 53 45 4c 45 43 54 20 75 69 64  (&s, "SELECT uid
0d40: 2c 20 6c 6f 67 69 6e 2c 20 63 61 70 2c 20 69 6e  , login, cap, in
0d50: 66 6f 20 46 52 4f 4d 20 75 73 65 72 20 4f 52 44  fo FROM user ORD
0d60: 45 52 20 42 59 20 6c 6f 67 69 6e 22 29 3b 0a 20  ER BY login");. 
0d70: 20 77 68 69 6c 65 28 20 64 62 5f 73 74 65 70 28   while( db_step(
0d80: 26 73 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20  &s)==SQLITE_ROW 
0d90: 29 7b 0a 20 20 20 20 40 20 3c 74 72 3e 0a 20 20  ){.    @ <tr>.  
0da0: 20 20 40 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72    @ <td align="r
0db0: 69 67 68 74 22 3e 0a 20 20 20 20 69 66 28 20 67  ight">.    if( g
0dc0: 2e 6f 6b 41 64 6d 69 6e 20 29 7b 0a 20 20 20 20  .okAdmin ){.    
0dd0: 20 20 40 20 3c 61 20 68 72 65 66 3d 22 73 65 74    @ <a href="set
0de0: 75 70 5f 75 65 64 69 74 3f 69 64 3d 25 64 28 64  up_uedit?id=%d(d
0df0: 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 73 2c  b_column_int(&s,
0e00: 30 29 29 22 3e 0a 20 20 20 20 7d 0a 20 20 20 20  0))">.    }.    
0e10: 40 20 3c 6e 6f 62 72 3e 25 68 28 64 62 5f 63 6f  @ <nobr>%h(db_co
0e20: 6c 75 6d 6e 5f 74 65 78 74 28 26 73 2c 31 29 29  lumn_text(&s,1))
0e30: 3c 2f 6e 6f 62 72 3e 0a 20 20 20 20 69 66 28 20  </nobr>.    if( 
0e40: 67 2e 6f 6b 41 64 6d 69 6e 20 29 7b 0a 20 20 20  g.okAdmin ){.   
0e50: 20 20 20 40 20 3c 2f 61 3e 0a 20 20 20 20 7d 0a     @ </a>.    }.
0e60: 20 20 20 20 40 20 3c 2f 74 64 3e 3c 74 64 3e 26      @ </td><td>&
0e70: 6e 62 73 70 3b 26 6e 62 73 70 3b 26 6e 62 73 70  nbsp;&nbsp;&nbsp
0e80: 3b 3c 2f 74 64 3e 0a 20 20 20 20 40 20 3c 74 64  ;</td>.    @ <td
0e90: 20 61 6c 69 67 6e 3d 22 63 65 6e 74 65 72 22 3e   align="center">
0ea0: 25 73 28 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78  %s(db_column_tex
0eb0: 74 28 26 73 2c 32 29 29 3c 2f 74 64 3e 0a 20 20  t(&s,2))</td>.  
0ec0: 20 20 40 20 3c 74 64 3e 26 6e 62 73 70 3b 26 6e    @ <td>&nbsp;&n
0ed0: 62 73 70 3b 26 6e 62 73 70 3b 3c 2f 74 64 3e 0a  bsp;&nbsp;</td>.
0ee0: 20 20 20 20 40 20 3c 74 64 20 61 6c 69 67 6e 3d      @ <td align=
0ef0: 22 6c 65 66 74 22 3e 25 73 28 64 62 5f 63 6f 6c  "left">%s(db_col
0f00: 75 6d 6e 5f 74 65 78 74 28 26 73 2c 33 29 29 3c  umn_text(&s,3))<
0f10: 2f 74 64 3e 0a 20 20 20 20 40 20 3c 2f 74 72 3e  /td>.    @ </tr>
0f20: 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 61 62 6c 65  .  }.  @ </table
0f30: 3e 3c 2f 74 64 3e 3c 2f 74 72 3e 3c 2f 74 61 62  ></td></tr></tab
0f40: 6c 65 3e 0a 20 20 40 20 3c 74 64 20 76 61 6c 69  le>.  @ <td vali
0f50: 67 6e 3d 22 74 6f 70 22 3e 0a 20 20 40 20 3c 62  gn="top">.  @ <b
0f60: 3e 4e 6f 74 65 73 3a 3c 2f 62 3e 0a 20 20 40 20  >Notes:</b>.  @ 
0f70: 3c 6f 6c 3e 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e  <ol>.  @ <li><p>
0f80: 54 68 65 20 70 65 72 6d 69 73 73 69 6f 6e 20 66  The permission f
0f90: 6c 61 67 73 20 61 72 65 20 61 73 20 66 6f 6c 6c  lags are as foll
0fa0: 6f 77 73 3a 3c 2f 70 3e 0a 20 20 40 20 3c 6f 6c  ows:</p>.  @ <ol
0fb0: 20 74 79 70 65 3d 22 61 22 3e 0a 20 20 40 20 3c   type="a">.  @ <
0fc0: 6c 69 20 76 61 6c 75 65 3d 22 31 22 3e 3c 62 3e  li value="1"><b>
0fd0: 41 64 6d 69 6e 3c 2f 62 3e 3a 20 43 72 65 61 74  Admin</b>: Creat
0fe0: 65 20 61 6e 64 20 64 65 6c 65 74 65 20 75 73 65  e and delete use
0ff0: 72 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20  rs</li>.  @ <li 
1000: 76 61 6c 75 65 3d 22 33 22 3e 3c 62 3e 41 70 70  value="3"><b>App
1010: 65 6e 64 2d 54 6b 74 3c 2f 62 3e 3a 20 41 70 70  end-Tkt</b>: App
1020: 65 6e 64 20 74 6f 20 74 69 63 6b 65 74 73 3c 2f  end to tickets</
1030: 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75  li>.  @ <li valu
1040: 65 3d 22 34 22 3e 3c 62 3e 44 65 6c 65 74 65 3c  e="4"><b>Delete<
1050: 2f 62 3e 3a 20 44 65 6c 65 74 65 20 77 69 6b 69  /b>: Delete wiki
1060: 20 61 6e 64 20 74 69 63 6b 65 74 73 3c 2f 6c 69   and tickets</li
1070: 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d  >.  @ <li value=
1080: 22 35 22 3e 3c 62 3e 45 6d 61 69 6c 3c 2f 62 3e  "5"><b>Email</b>
1090: 3a 20 56 69 65 77 20 45 4d 61 69 6c 20 61 64 64  : View EMail add
10a0: 72 65 73 73 65 73 20 6f 6e 20 74 69 63 6b 65 74  resses on ticket
10b0: 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76  s</li>.  @ <li v
10c0: 61 6c 75 65 3d 22 36 22 3e 3c 62 3e 4e 65 77 2d  alue="6"><b>New-
10d0: 57 69 6b 69 3c 2f 62 3e 3a 20 43 72 65 61 74 65  Wiki</b>: Create
10e0: 20 6e 65 77 20 77 69 6b 69 20 70 61 67 65 73 3c   new wiki pages<
10f0: 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c  /li>.  @ <li val
1100: 75 65 3d 22 37 22 3e 3c 62 3e 43 6c 6f 6e 65 3c  ue="7"><b>Clone<
1110: 2f 62 3e 3a 20 43 6c 6f 6e 65 20 74 68 65 20 72  /b>: Clone the r
1120: 65 70 6f 73 69 74 6f 72 79 3c 2f 6c 69 3e 0a 20  epository</li>. 
1130: 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22 38 22   @ <li value="8"
1140: 3e 3c 62 3e 48 69 73 74 6f 72 79 3c 2f 62 3e 3a  ><b>History</b>:
1150: 20 56 69 65 77 20 64 65 74 61 69 6c 20 72 65 70   View detail rep
1160: 6f 73 69 74 6f 72 79 20 68 69 73 74 6f 72 79 3c  ository history<
1170: 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c  /li>.  @ <li val
1180: 75 65 3d 22 39 22 3e 3c 62 3e 43 68 65 63 6b 2d  ue="9"><b>Check-
1190: 49 6e 3c 2f 62 3e 3a 20 43 6f 6d 6d 69 74 20 6e  In</b>: Commit n
11a0: 65 77 20 76 65 72 73 69 6f 6e 73 20 69 6e 20 74  ew versions in t
11b0: 68 65 20 72 65 70 6f 73 69 74 6f 72 79 3c 2f 6c  he repository</l
11c0: 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65  i>.  @ <li value
11d0: 3d 22 31 30 22 3e 3c 62 3e 52 65 61 64 2d 57 69  ="10"><b>Read-Wi
11e0: 6b 69 3c 2f 62 3e 3a 20 56 69 65 77 20 77 69 6b  ki</b>: View wik
11f0: 69 20 70 61 67 65 73 3c 2f 6c 69 3e 0a 20 20 40  i pages</li>.  @
1200: 20 3c 6c 69 20 76 61 6c 75 65 3d 22 31 31 22 3e   <li value="11">
1210: 3c 62 3e 57 72 69 74 65 2d 57 69 6b 69 3c 2f 62  <b>Write-Wiki</b
1220: 3e 3a 20 45 64 69 74 20 77 69 6b 69 20 70 61 67  >: Edit wiki pag
1230: 65 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20  es</li>.  @ <li 
1240: 76 61 6c 75 65 3d 22 31 33 22 3e 3c 62 3e 41 70  value="13"><b>Ap
1250: 70 65 6e 64 2d 57 69 6b 69 3c 2f 62 3e 3a 20 41  pend-Wiki</b>: A
1260: 70 70 65 6e 64 20 74 6f 20 77 69 6b 69 20 70 61  ppend to wiki pa
1270: 67 65 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69  ges</li>.  @ <li
1280: 20 76 61 6c 75 65 3d 22 31 34 22 3e 3c 62 3e 4e   value="14"><b>N
1290: 65 77 2d 54 6b 74 3c 2f 62 3e 3a 20 43 72 65 61  ew-Tkt</b>: Crea
12a0: 74 65 20 6e 65 77 20 74 69 63 6b 65 74 73 3c 2f  te new tickets</
12b0: 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75  li>.  @ <li valu
12c0: 65 3d 22 31 35 22 3e 3c 62 3e 43 68 65 63 6b 2d  e="15"><b>Check-
12d0: 4f 75 74 3c 2f 62 3e 3a 20 43 68 65 63 6b 20 6f  Out</b>: Check o
12e0: 75 74 20 76 65 72 73 69 6f 6e 73 3c 2f 6c 69 3e  ut versions</li>
12f0: 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22  .  @ <li value="
1300: 31 36 22 3e 3c 62 3e 50 61 73 73 77 6f 72 64 3c  16"><b>Password<
1310: 2f 62 3e 3a 20 43 68 61 6e 67 65 20 79 6f 75 72  /b>: Change your
1320: 20 6f 77 6e 20 70 61 73 73 77 6f 72 64 3c 2f 6c   own password</l
1330: 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65  i>.  @ <li value
1340: 3d 22 31 37 22 3e 3c 62 3e 51 75 65 72 79 3c 2f  ="17"><b>Query</
1350: 62 3e 3a 20 43 72 65 61 74 65 20 6e 65 77 20 71  b>: Create new q
1360: 75 65 72 69 65 73 20 61 67 61 69 6e 73 74 20 74  ueries against t
1370: 69 63 6b 65 74 73 3c 2f 6c 69 3e 0a 20 20 40 20  ickets</li>.  @ 
1380: 3c 6c 69 20 76 61 6c 75 65 3d 22 31 38 22 3e 3c  <li value="18"><
1390: 62 3e 52 65 61 64 2d 54 6b 74 3c 2f 62 3e 3a 20  b>Read-Tkt</b>: 
13a0: 56 69 65 77 20 74 69 63 6b 65 74 73 3c 2f 6c 69  View tickets</li
13b0: 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d  >.  @ <li value=
13c0: 22 31 39 22 3e 3c 62 3e 53 65 74 75 70 3a 3c 2f  "19"><b>Setup:</
13d0: 62 3e 20 53 65 74 75 70 20 61 6e 64 20 63 6f 6e  b> Setup and con
13e0: 66 69 67 75 72 65 20 74 68 69 73 20 77 65 62 73  figure this webs
13f0: 69 74 65 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69  ite</li>.  @ <li
1400: 20 76 61 6c 75 65 3d 22 32 33 22 3e 3c 62 3e 57   value="23"><b>W
1410: 72 69 74 65 2d 54 6b 74 3c 2f 62 3e 3a 20 45 64  rite-Tkt</b>: Ed
1420: 69 74 20 74 69 63 6b 65 74 73 3c 2f 6c 69 3e 0a  it tickets</li>.
1430: 20 20 40 20 3c 2f 6f 6c 3e 0a 20 20 40 20 3c 2f    @ </ol>.  @ </
1440: 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20 40 20  p></li>.  @.  @ 
1450: 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20 45 76 65 72  <li><p>.  @ Ever
1460: 79 20 75 73 65 72 2c 20 6c 6f 67 67 65 64 20 69  y user, logged i
1470: 6e 20 6f 72 20 6e 6f 74 2c 20 68 61 73 20 74 68  n or not, has th
1480: 65 20 70 72 69 76 69 6c 65 67 65 73 20 6f 66 20  e privileges of 
1490: 3c 62 3e 6e 6f 62 6f 64 79 3c 2f 62 3e 2e 0a 20  <b>nobody</b>.. 
14a0: 20 40 20 41 6e 79 20 68 75 6d 61 6e 20 63 61 6e   @ Any human can
14b0: 20 6c 6f 67 69 6e 20 61 73 20 3c 62 3e 61 6e 6f   login as <b>ano
14c0: 6e 79 6d 6f 75 73 3c 2f 62 3e 20 73 69 6e 63 65  nymous</b> since
14d0: 20 74 68 65 20 70 61 73 73 77 6f 72 64 20 69 73   the password is
14e0: 0a 20 20 40 20 63 6c 65 61 72 6c 79 20 64 69 73  .  @ clearly dis
14f0: 70 6c 61 79 65 64 20 6f 6e 20 74 68 65 20 6c 6f  played on the lo
1500: 67 69 6e 20 70 61 67 65 20 66 6f 72 20 74 68 65  gin page for the
1510: 6d 20 74 6f 20 74 79 70 65 2e 20 20 54 68 65 20  m to type.  The 
1520: 70 75 72 70 6f 73 65 0a 20 20 40 20 6f 66 20 72  purpose.  @ of r
1530: 65 71 75 69 72 69 6e 67 20 61 6e 6f 6e 79 6d 6f  equiring anonymo
1540: 75 73 20 74 6f 20 6c 6f 67 20 69 6e 20 69 73 20  us to log in is 
1550: 74 6f 20 70 72 65 76 65 6e 74 20 61 63 63 65 73  to prevent acces
1560: 73 20 62 79 20 73 70 69 64 65 72 73 2e 0a 20 20  s by spiders..  
1570: 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a  @ </p></li>.  @.
1580: 20 20 40 20 3c 2f 6f 6c 3e 0a 20 20 40 20 3c 2f    @ </ol>.  @ </
1590: 74 64 3e 3c 2f 74 72 3e 3c 2f 74 61 62 6c 65 3e  td></tr></table>
15a0: 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28  .  style_footer(
15b0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50  );.}../*.** WEBP
15c0: 41 47 45 3a 20 2f 73 65 74 75 70 5f 75 65 64 69  AGE: /setup_uedi
15d0: 74 0a 2a 2f 0a 76 6f 69 64 20 75 73 65 72 5f 65  t.*/.void user_e
15e0: 64 69 74 28 76 6f 69 64 29 7b 0a 20 20 63 6f 6e  dit(void){.  con
15f0: 73 74 20 63 68 61 72 20 2a 7a 49 64 2c 20 2a 7a  st char *zId, *z
1600: 4c 6f 67 69 6e 2c 20 2a 7a 49 6e 66 6f 2c 20 2a  Login, *zInfo, *
1610: 7a 43 61 70 3b 0a 20 20 63 68 61 72 20 2a 6f 61  zCap;.  char *oa
1620: 61 2c 20 2a 6f 61 73 2c 20 2a 6f 61 72 2c 20 2a  a, *oas, *oar, *
1630: 6f 61 77 2c 20 2a 6f 61 6e 2c 20 2a 6f 61 69 2c  oaw, *oan, *oai,
1640: 20 2a 6f 61 6a 2c 20 2a 6f 61 6f 2c 20 2a 6f 61   *oaj, *oao, *oa
1650: 70 3b 0a 20 20 63 68 61 72 20 2a 6f 61 6b 2c 20  p;.  char *oak, 
1660: 2a 6f 61 64 2c 20 2a 6f 61 71 2c 20 2a 6f 61 63  *oad, *oaq, *oac
1670: 2c 20 2a 6f 61 66 2c 20 2a 6f 61 6d 2c 20 2a 6f  , *oaf, *oam, *o
1680: 61 68 2c 20 2a 6f 61 67 2c 20 2a 6f 61 65 3b 0a  ah, *oag, *oae;.
1690: 20 20 69 6e 74 20 64 6f 57 72 69 74 65 3b 0a 20    int doWrite;. 
16a0: 20 69 6e 74 20 75 69 64 3b 0a 20 20 69 6e 74 20   int uid;.  int 
16b0: 68 69 67 68 65 72 55 73 65 72 20 3d 20 30 3b 20  higherUser = 0; 
16c0: 20 2f 2a 20 54 72 75 65 20 69 66 20 75 73 65 72   /* True if user
16d0: 20 62 65 69 6e 67 20 65 64 69 74 65 64 20 69 73   being edited is
16e0: 20 53 45 54 55 50 20 61 6e 64 20 74 68 65 20 2a   SETUP and the *
16f0: 2f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  /.              
1700: 20 20 20 20 20 20 20 20 20 2f 2a 20 75 73 65 72           /* user
1710: 20 64 6f 69 6e 67 20 74 68 65 20 65 64 69 74 69   doing the editi
1720: 6e 67 20 69 73 20 41 44 4d 49 4e 2e 20 20 44 69  ng is ADMIN.  Di
1730: 73 61 6c 6c 6f 77 20 65 64 69 74 69 6e 67 20 2a  sallow editing *
1740: 2f 0a 0a 20 20 2f 2a 20 4d 75 73 74 20 68 61 76  /..  /* Must hav
1750: 65 20 41 44 4d 49 4e 20 70 72 69 76 6c 65 67 65  e ADMIN privlege
1760: 73 20 74 6f 20 61 63 63 65 73 73 20 74 68 69 73  s to access this
1770: 20 70 61 67 65 0a 20 20 2a 2f 0a 20 20 6c 6f 67   page.  */.  log
1780: 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74  in_check_credent
1790: 69 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67  ials();.  if( !g
17a0: 2e 6f 6b 41 64 6d 69 6e 20 29 7b 20 6c 6f 67 69  .okAdmin ){ logi
17b0: 6e 5f 6e 65 65 64 65 64 28 29 3b 20 72 65 74 75  n_needed(); retu
17c0: 72 6e 3b 20 7d 0a 0a 20 20 2f 2a 20 43 68 65 63  rn; }..  /* Chec
17d0: 6b 20 74 6f 20 73 65 65 20 69 66 20 61 6e 20 41  k to see if an A
17e0: 44 4d 49 4e 20 75 73 65 72 20 69 73 20 74 72 79  DMIN user is try
17f0: 69 6e 67 20 74 6f 20 65 64 69 74 20 61 20 53 45  ing to edit a SE
1800: 54 55 50 20 61 63 63 6f 75 6e 74 2e 0a 20 20 2a  TUP account..  *
1810: 2a 20 44 6f 6e 27 74 20 61 6c 6c 6f 77 20 74 68  * Don't allow th
1820: 61 74 2e 0a 20 20 2a 2f 0a 20 20 7a 49 64 20 3d  at..  */.  zId =
1830: 20 50 44 28 22 69 64 22 2c 20 22 30 22 29 3b 0a   PD("id", "0");.
1840: 20 20 75 69 64 20 3d 20 61 74 6f 69 28 7a 49 64    uid = atoi(zId
1850: 29 3b 0a 20 20 69 66 28 20 7a 49 64 20 26 26 20  );.  if( zId && 
1860: 21 67 2e 6f 6b 53 65 74 75 70 20 26 26 20 75 69  !g.okSetup && ui
1870: 64 3e 30 20 29 7b 0a 20 20 20 20 63 68 61 72 20  d>0 ){.    char 
1880: 2a 7a 4f 6c 64 43 61 70 73 3b 0a 20 20 20 20 7a  *zOldCaps;.    z
1890: 4f 6c 64 43 61 70 73 20 3d 20 64 62 5f 74 65 78  OldCaps = db_tex
18a0: 74 28 30 2c 20 22 53 45 4c 45 43 54 20 63 61 70  t(0, "SELECT cap
18b0: 73 20 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52  s FROM user WHER
18c0: 45 20 75 69 64 3d 25 64 22 2c 75 69 64 29 3b 0a  E uid=%d",uid);.
18d0: 20 20 20 20 68 69 67 68 65 72 55 73 65 72 20 3d      higherUser =
18e0: 20 7a 4f 6c 64 43 61 70 73 20 26 26 20 73 74 72   zOldCaps && str
18f0: 63 68 72 28 7a 4f 6c 64 43 61 70 73 2c 27 73 27  chr(zOldCaps,'s'
1900: 29 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20 50 28  );.  }..  if( P(
1910: 22 63 61 6e 22 29 20 29 7b 0a 20 20 20 20 63 67  "can") ){.    cg
1920: 69 5f 72 65 64 69 72 65 63 74 28 22 73 65 74 75  i_redirect("setu
1930: 70 5f 75 6c 69 73 74 22 29 3b 0a 20 20 20 20 72  p_ulist");.    r
1940: 65 74 75 72 6e 3b 0a 20 20 7d 0a 0a 20 20 2f 2a  eturn;.  }..  /*
1950: 20 49 66 20 77 65 20 68 61 76 65 20 61 6c 6c 20   If we have all 
1960: 74 68 65 20 6e 65 63 65 73 73 61 72 79 20 69 6e  the necessary in
1970: 66 6f 72 6d 61 74 69 6f 6e 2c 20 77 72 69 74 65  formation, write
1980: 20 74 68 65 20 6e 65 77 20 6f 72 0a 20 20 2a 2a   the new or.  **
1990: 20 6d 6f 64 69 66 69 65 64 20 75 73 65 72 20 72   modified user r
19a0: 65 63 6f 72 64 2e 20 20 41 66 74 65 72 20 77 72  ecord.  After wr
19b0: 69 74 69 6e 67 20 74 68 65 20 75 73 65 72 20 72  iting the user r
19c0: 65 63 6f 72 64 2c 20 72 65 64 69 72 65 63 74 0a  ecord, redirect.
19d0: 20 20 2a 2a 20 74 6f 20 74 68 65 20 70 61 67 65    ** to the page
19e0: 20 74 68 61 74 20 64 69 73 70 6c 61 79 73 20 61   that displays a
19f0: 20 6c 69 73 74 20 6f 66 20 75 73 65 72 73 2e 0a   list of users..
1a00: 20 20 2a 2f 0a 20 20 64 6f 57 72 69 74 65 20 3d    */.  doWrite =
1a10: 20 63 67 69 5f 61 6c 6c 28 22 6c 6f 67 69 6e 22   cgi_all("login"
1a20: 2c 22 69 6e 66 6f 22 2c 22 70 77 22 29 20 26 26  ,"info","pw") &&
1a30: 20 21 68 69 67 68 65 72 55 73 65 72 3b 0a 20 20   !higherUser;.  
1a40: 69 66 28 20 64 6f 57 72 69 74 65 20 29 7b 0a 20  if( doWrite ){. 
1a50: 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a     const char *z
1a60: 50 77 3b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68  Pw;.    const ch
1a70: 61 72 20 2a 7a 4c 6f 67 69 6e 3b 0a 20 20 20 20  ar *zLogin;.    
1a80: 63 68 61 72 20 7a 43 61 70 5b 33 30 5d 3b 0a 20  char zCap[30];. 
1a90: 20 20 20 69 6e 74 20 69 20 3d 20 30 3b 0a 20 20     int i = 0;.  
1aa0: 20 20 69 6e 74 20 61 61 20 3d 20 50 28 22 61 61    int aa = P("aa
1ab0: 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61  ")!=0;.    int a
1ac0: 64 20 3d 20 50 28 22 61 64 22 29 21 3d 30 3b 0a  d = P("ad")!=0;.
1ad0: 20 20 20 20 69 6e 74 20 61 65 20 3d 20 50 28 22      int ae = P("
1ae0: 61 65 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74  ae")!=0;.    int
1af0: 20 61 69 20 3d 20 50 28 22 61 69 22 29 21 3d 30   ai = P("ai")!=0
1b00: 3b 0a 20 20 20 20 69 6e 74 20 61 6a 20 3d 20 50  ;.    int aj = P
1b10: 28 22 61 6a 22 29 21 3d 30 3b 0a 20 20 20 20 69  ("aj")!=0;.    i
1b20: 6e 74 20 61 6b 20 3d 20 50 28 22 61 6b 22 29 21  nt ak = P("ak")!
1b30: 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 6e 20 3d  =0;.    int an =
1b40: 20 50 28 22 61 6e 22 29 21 3d 30 3b 0a 20 20 20   P("an")!=0;.   
1b50: 20 69 6e 74 20 61 6f 20 3d 20 50 28 22 61 6f 22   int ao = P("ao"
1b60: 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 70  )!=0;.    int ap
1b70: 20 3d 20 50 28 22 61 70 22 29 21 3d 30 3b 0a 20   = P("ap")!=0;. 
1b80: 20 20 20 69 6e 74 20 61 71 20 3d 20 50 28 22 61     int aq = P("a
1b90: 71 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20  q")!=0;.    int 
1ba0: 61 72 20 3d 20 50 28 22 61 72 22 29 21 3d 30 3b  ar = P("ar")!=0;
1bb0: 0a 20 20 20 20 69 6e 74 20 61 73 20 3d 20 67 2e  .    int as = g.
1bc0: 6f 6b 53 65 74 75 70 20 26 26 20 50 28 22 61 73  okSetup && P("as
1bd0: 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61  ")!=0;.    int a
1be0: 77 20 3d 20 50 28 22 61 77 22 29 21 3d 30 3b 0a  w = P("aw")!=0;.
1bf0: 20 20 20 20 69 6e 74 20 61 63 20 3d 20 50 28 22      int ac = P("
1c00: 61 63 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74  ac")!=0;.    int
1c10: 20 61 66 20 3d 20 50 28 22 61 66 22 29 21 3d 30   af = P("af")!=0
1c20: 3b 0a 20 20 20 20 69 6e 74 20 61 6d 20 3d 20 50  ;.    int am = P
1c30: 28 22 61 6d 22 29 21 3d 30 3b 0a 20 20 20 20 69  ("am")!=0;.    i
1c40: 6e 74 20 61 68 20 3d 20 50 28 22 61 68 22 29 21  nt ah = P("ah")!
1c50: 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 67 20 3d  =0;.    int ag =
1c60: 20 50 28 22 61 67 22 29 21 3d 30 3b 0a 20 20 20   P("ag")!=0;.   
1c70: 20 69 66 28 20 61 61 20 29 7b 20 7a 43 61 70 5b   if( aa ){ zCap[
1c80: 69 2b 2b 5d 20 3d 20 27 61 27 3b 20 7d 0a 20 20  i++] = 'a'; }.  
1c90: 20 20 69 66 28 20 61 63 20 29 7b 20 7a 43 61 70    if( ac ){ zCap
1ca0: 5b 69 2b 2b 5d 20 3d 20 27 63 27 3b 20 7d 0a 20  [i++] = 'c'; }. 
1cb0: 20 20 20 69 66 28 20 61 64 20 29 7b 20 7a 43 61     if( ad ){ zCa
1cc0: 70 5b 69 2b 2b 5d 20 3d 20 27 64 27 3b 20 7d 0a  p[i++] = 'd'; }.
1cd0: 20 20 20 20 69 66 28 20 61 65 20 29 7b 20 7a 43      if( ae ){ zC
1ce0: 61 70 5b 69 2b 2b 5d 20 3d 20 27 65 27 3b 20 7d  ap[i++] = 'e'; }
1cf0: 0a 20 20 20 20 69 66 28 20 61 66 20 29 7b 20 7a  .    if( af ){ z
1d00: 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 66 27 3b 20  Cap[i++] = 'f'; 
1d10: 7d 0a 20 20 20 20 69 66 28 20 61 68 20 29 7b 20  }.    if( ah ){ 
1d20: 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 68 27 3b  zCap[i++] = 'h';
1d30: 20 7d 0a 20 20 20 20 69 66 28 20 61 67 20 29 7b   }.    if( ag ){
1d40: 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 67 27   zCap[i++] = 'g'
1d50: 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 69 20 29  ; }.    if( ai )
1d60: 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 69  { zCap[i++] = 'i
1d70: 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 6a 20  '; }.    if( aj 
1d80: 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27  ){ zCap[i++] = '
1d90: 6a 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 6b  j'; }.    if( ak
1da0: 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20   ){ zCap[i++] = 
1db0: 27 6b 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61  'k'; }.    if( a
1dc0: 6d 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d  m ){ zCap[i++] =
1dd0: 20 27 6d 27 3b 20 7d 0a 20 20 20 20 69 66 28 20   'm'; }.    if( 
1de0: 61 6e 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20  an ){ zCap[i++] 
1df0: 3d 20 27 6e 27 3b 20 7d 0a 20 20 20 20 69 66 28  = 'n'; }.    if(
1e00: 20 61 6f 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d   ao ){ zCap[i++]
1e10: 20 3d 20 27 6f 27 3b 20 7d 0a 20 20 20 20 69 66   = 'o'; }.    if
1e20: 28 20 61 70 20 29 7b 20 7a 43 61 70 5b 69 2b 2b  ( ap ){ zCap[i++
1e30: 5d 20 3d 20 27 70 27 3b 20 7d 0a 20 20 20 20 69  ] = 'p'; }.    i
1e40: 66 28 20 61 71 20 29 7b 20 7a 43 61 70 5b 69 2b  f( aq ){ zCap[i+
1e50: 2b 5d 20 3d 20 27 71 27 3b 20 7d 0a 20 20 20 20  +] = 'q'; }.    
1e60: 69 66 28 20 61 72 20 29 7b 20 7a 43 61 70 5b 69  if( ar ){ zCap[i
1e70: 2b 2b 5d 20 3d 20 27 72 27 3b 20 7d 0a 20 20 20  ++] = 'r'; }.   
1e80: 20 69 66 28 20 61 73 20 29 7b 20 7a 43 61 70 5b   if( as ){ zCap[
1e90: 69 2b 2b 5d 20 3d 20 27 73 27 3b 20 7d 0a 20 20  i++] = 's'; }.  
1ea0: 20 20 69 66 28 20 61 77 20 29 7b 20 7a 43 61 70    if( aw ){ zCap
1eb0: 5b 69 2b 2b 5d 20 3d 20 27 77 27 3b 20 7d 0a 0a  [i++] = 'w'; }..
1ec0: 20 20 20 20 7a 43 61 70 5b 69 5d 20 3d 20 30 3b      zCap[i] = 0;
1ed0: 0a 20 20 20 20 7a 50 77 20 3d 20 50 28 22 70 77  .    zPw = P("pw
1ee0: 22 29 3b 0a 20 20 20 20 69 66 28 20 7a 50 77 3d  ");.    if( zPw=
1ef0: 3d 30 20 7c 7c 20 7a 50 77 5b 30 5d 3d 3d 30 20  =0 || zPw[0]==0 
1f00: 29 7b 0a 20 20 20 20 20 20 7a 50 77 20 3d 20 64  ){.      zPw = d
1f10: 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43  b_text(0, "SELEC
1f20: 54 20 70 77 20 46 52 4f 4d 20 75 73 65 72 20 57  T pw FROM user W
1f30: 48 45 52 45 20 75 69 64 3d 25 64 22 2c 20 75 69  HERE uid=%d", ui
1f40: 64 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 4c  d);.    }.    zL
1f50: 6f 67 69 6e 20 3d 20 50 28 22 6c 6f 67 69 6e 22  ogin = P("login"
1f60: 29 3b 0a 20 20 20 20 69 66 28 20 75 69 64 3e 30  );.    if( uid>0
1f70: 20 26 26 0a 20 20 20 20 20 20 20 20 64 62 5f 65   &&.        db_e
1f80: 78 69 73 74 73 28 22 53 45 4c 45 43 54 20 31 20  xists("SELECT 1 
1f90: 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52 45 20  FROM user WHERE 
1fa0: 6c 6f 67 69 6e 3d 25 51 20 41 4e 44 20 75 69 64  login=%Q AND uid
1fb0: 21 3d 25 64 22 2c 20 7a 4c 6f 67 69 6e 2c 20 75  !=%d", zLogin, u
1fc0: 69 64 29 0a 20 20 20 20 29 7b 0a 20 20 20 20 20  id).    ){.     
1fd0: 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 22 55   style_header("U
1fe0: 73 65 72 20 43 72 65 61 74 69 6f 6e 20 45 72 72  ser Creation Err
1ff0: 6f 72 22 29 3b 0a 20 20 20 20 20 20 40 20 3c 66  or");.      @ <f
2000: 6f 6e 74 20 63 6f 6c 6f 72 3d 22 72 65 64 22 3e  ont color="red">
2010: 4c 6f 67 69 6e 20 22 25 68 28 7a 4c 6f 67 69 6e  Login "%h(zLogin
2020: 29 22 20 69 73 20 61 6c 72 65 61 64 79 20 75 73  )" is already us
2030: 65 64 20 62 79 20 61 20 64 69 66 66 65 72 65 6e  ed by a differen
2040: 74 0a 20 20 20 20 20 20 40 20 75 73 65 72 2e 3c  t.      @ user.<
2050: 2f 66 6f 6e 74 3e 0a 20 20 20 20 20 20 40 0a 20  /font>.      @. 
2060: 20 20 20 20 20 40 20 3c 70 3e 3c 61 20 68 72 65       @ <p><a hre
2070: 66 3d 22 73 65 74 75 70 5f 75 65 64 69 74 3f 69  f="setup_uedit?i
2080: 64 3d 25 64 28 75 69 64 29 29 3e 5b 42 75 6d 6d  d=%d(uid))>[Bumm
2090: 65 72 5d 3c 2f 61 3e 3c 2f 70 3e 0a 20 20 20 20  er]</a></p>.    
20a0: 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29    style_footer()
20b0: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a  ;.      return;.
20c0: 20 20 20 20 7d 0a 20 20 20 20 64 62 5f 6d 75 6c      }.    db_mul
20d0: 74 69 5f 65 78 65 63 28 0a 20 20 20 20 20 20 20  ti_exec(.       
20e0: 22 52 45 50 4c 41 43 45 20 49 4e 54 4f 20 75 73  "REPLACE INTO us
20f0: 65 72 28 75 69 64 2c 6c 6f 67 69 6e 2c 69 6e 66  er(uid,login,inf
2100: 6f 2c 70 77 2c 63 61 70 29 20 22 0a 20 20 20 20  o,pw,cap) ".    
2110: 20 20 20 22 56 41 4c 55 45 53 28 6e 75 6c 6c 69     "VALUES(nulli
2120: 66 28 25 64 2c 30 29 2c 25 51 2c 25 51 2c 25 51  f(%d,0),%Q,%Q,%Q
2130: 2c 27 25 73 27 29 22 2c 0a 20 20 20 20 20 20 75  ,'%s')",.      u
2140: 69 64 2c 20 50 28 22 6c 6f 67 69 6e 22 29 2c 20  id, P("login"), 
2150: 50 28 22 69 6e 66 6f 22 29 2c 20 7a 50 77 2c 20  P("info"), zPw, 
2160: 7a 43 61 70 0a 20 20 20 20 29 3b 0a 20 20 20 20  zCap.    );.    
2170: 63 67 69 5f 72 65 64 69 72 65 63 74 28 22 73 65  cgi_redirect("se
2180: 74 75 70 5f 75 6c 69 73 74 22 29 3b 0a 20 20 20  tup_ulist");.   
2190: 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 0a 20 20   return;.  }..  
21a0: 2f 2a 20 4c 6f 61 64 20 74 68 65 20 65 78 69 73  /* Load the exis
21b0: 74 69 6e 67 20 69 6e 66 6f 72 6d 61 74 69 6f 6e  ting information
21c0: 20 61 62 6f 75 74 20 74 68 65 20 75 73 65 72 2c   about the user,
21d0: 20 69 66 20 61 6e 79 0a 20 20 2a 2f 0a 20 20 7a   if any.  */.  z
21e0: 4c 6f 67 69 6e 20 3d 20 22 22 3b 0a 20 20 7a 49  Login = "";.  zI
21f0: 6e 66 6f 20 3d 20 22 22 3b 0a 20 20 7a 43 61 70  nfo = "";.  zCap
2200: 20 3d 20 22 22 3b 0a 20 20 6f 61 61 20 3d 20 6f   = "";.  oaa = o
2210: 61 63 20 3d 20 6f 61 64 20 3d 20 6f 61 65 20 3d  ac = oad = oae =
2220: 20 6f 61 66 20 3d 20 6f 61 67 20 3d 20 6f 61 68   oaf = oag = oah
2230: 20 3d 20 6f 61 69 20 3d 20 6f 61 6a 20 3d 20 6f   = oai = oaj = o
2240: 61 6b 20 3d 20 6f 61 6d 20 3d 0a 20 20 20 20 20  ak = oam =.     
2250: 20 20 20 6f 61 6e 20 3d 20 6f 61 6f 20 3d 20 6f     oan = oao = o
2260: 61 70 20 3d 20 6f 61 71 20 3d 20 6f 61 72 20 3d  ap = oaq = oar =
2270: 20 6f 61 73 20 3d 20 6f 61 77 20 3d 20 22 22 3b   oas = oaw = "";
2280: 0a 20 20 69 66 28 20 75 69 64 20 29 7b 0a 20 20  .  if( uid ){.  
2290: 20 20 7a 4c 6f 67 69 6e 20 3d 20 64 62 5f 74 65    zLogin = db_te
22a0: 78 74 28 22 22 2c 20 22 53 45 4c 45 43 54 20 6c  xt("", "SELECT l
22b0: 6f 67 69 6e 20 46 52 4f 4d 20 75 73 65 72 20 57  ogin FROM user W
22c0: 48 45 52 45 20 75 69 64 3d 25 64 22 2c 20 75 69  HERE uid=%d", ui
22d0: 64 29 3b 0a 20 20 20 20 7a 49 6e 66 6f 20 3d 20  d);.    zInfo = 
22e0: 64 62 5f 74 65 78 74 28 22 22 2c 20 22 53 45 4c  db_text("", "SEL
22f0: 45 43 54 20 69 6e 66 6f 20 46 52 4f 4d 20 75 73  ECT info FROM us
2300: 65 72 20 57 48 45 52 45 20 75 69 64 3d 25 64 22  er WHERE uid=%d"
2310: 2c 20 75 69 64 29 3b 0a 20 20 20 20 7a 43 61 70  , uid);.    zCap
2320: 20 3d 20 64 62 5f 74 65 78 74 28 22 22 2c 20 22   = db_text("", "
2330: 53 45 4c 45 43 54 20 63 61 70 20 46 52 4f 4d 20  SELECT cap FROM 
2340: 75 73 65 72 20 57 48 45 52 45 20 75 69 64 3d 25  user WHERE uid=%
2350: 64 22 2c 20 75 69 64 29 3b 0a 20 20 20 20 69 66  d", uid);.    if
2360: 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27  ( strchr(zCap, '
2370: 61 27 29 20 29 20 6f 61 61 20 3d 20 22 20 63 68  a') ) oaa = " ch
2380: 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20  ecked";.    if( 
2390: 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 63 27  strchr(zCap, 'c'
23a0: 29 20 29 20 6f 61 63 20 3d 20 22 20 63 68 65 63  ) ) oac = " chec
23b0: 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74  ked";.    if( st
23c0: 72 63 68 72 28 7a 43 61 70 2c 20 27 64 27 29 20  rchr(zCap, 'd') 
23d0: 29 20 6f 61 64 20 3d 20 22 20 63 68 65 63 6b 65  ) oad = " checke
23e0: 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63  d";.    if( strc
23f0: 68 72 28 7a 43 61 70 2c 20 27 65 27 29 20 29 20  hr(zCap, 'e') ) 
2400: 6f 61 65 20 3d 20 22 20 63 68 65 63 6b 65 64 22  oae = " checked"
2410: 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72  ;.    if( strchr
2420: 28 7a 43 61 70 2c 20 27 66 27 29 20 29 20 6f 61  (zCap, 'f') ) oa
2430: 66 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a  f = " checked";.
2440: 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a      if( strchr(z
2450: 43 61 70 2c 20 27 67 27 29 20 29 20 6f 61 67 20  Cap, 'g') ) oag 
2460: 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20  = " checked";.  
2470: 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61    if( strchr(zCa
2480: 70 2c 20 27 68 27 29 20 29 20 6f 61 68 20 3d 20  p, 'h') ) oah = 
2490: 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20  " checked";.    
24a0: 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c  if( strchr(zCap,
24b0: 20 27 69 27 29 20 29 20 6f 61 69 20 3d 20 22 20   'i') ) oai = " 
24c0: 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66  checked";.    if
24d0: 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27  ( strchr(zCap, '
24e0: 6a 27 29 20 29 20 6f 61 6a 20 3d 20 22 20 63 68  j') ) oaj = " ch
24f0: 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20  ecked";.    if( 
2500: 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 6b 27  strchr(zCap, 'k'
2510: 29 20 29 20 6f 61 6b 20 3d 20 22 20 63 68 65 63  ) ) oak = " chec
2520: 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74  ked";.    if( st
2530: 72 63 68 72 28 7a 43 61 70 2c 20 27 6d 27 29 20  rchr(zCap, 'm') 
2540: 29 20 6f 61 6d 20 3d 20 22 20 63 68 65 63 6b 65  ) oam = " checke
2550: 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63  d";.    if( strc
2560: 68 72 28 7a 43 61 70 2c 20 27 6e 27 29 20 29 20  hr(zCap, 'n') ) 
2570: 6f 61 6e 20 3d 20 22 20 63 68 65 63 6b 65 64 22  oan = " checked"
2580: 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72  ;.    if( strchr
2590: 28 7a 43 61 70 2c 20 27 6f 27 29 20 29 20 6f 61  (zCap, 'o') ) oa
25a0: 6f 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a  o = " checked";.
25b0: 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a      if( strchr(z
25c0: 43 61 70 2c 20 27 70 27 29 20 29 20 6f 61 70 20  Cap, 'p') ) oap 
25d0: 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20  = " checked";.  
25e0: 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61    if( strchr(zCa
25f0: 70 2c 20 27 71 27 29 20 29 20 6f 61 71 20 3d 20  p, 'q') ) oaq = 
2600: 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20  " checked";.    
2610: 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c  if( strchr(zCap,
2620: 20 27 72 27 29 20 29 20 6f 61 72 20 3d 20 22 20   'r') ) oar = " 
2630: 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66  checked";.    if
2640: 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27  ( strchr(zCap, '
2650: 73 27 29 20 29 20 6f 61 73 20 3d 20 22 20 63 68  s') ) oas = " ch
2660: 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20  ecked";.    if( 
2670: 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 77 27  strchr(zCap, 'w'
2680: 29 20 29 20 6f 61 77 20 3d 20 22 20 63 68 65 63  ) ) oaw = " chec
2690: 6b 65 64 22 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20  ked";.  }..  /* 
26a0: 42 65 67 69 6e 20 67 65 6e 65 72 61 74 69 6e 67  Begin generating
26b0: 20 74 68 65 20 70 61 67 65 0a 20 20 2a 2f 0a 20   the page.  */. 
26c0: 20 73 74 79 6c 65 5f 73 75 62 6d 65 6e 75 5f 65   style_submenu_e
26d0: 6c 65 6d 65 6e 74 28 22 43 61 6e 63 65 6c 22 2c  lement("Cancel",
26e0: 20 22 43 61 6e 63 65 6c 22 2c 20 22 73 65 74 75   "Cancel", "setu
26f0: 70 5f 75 6c 69 73 74 22 29 3b 0a 20 20 69 66 28  p_ulist");.  if(
2700: 20 75 69 64 20 29 7b 0a 20 20 20 20 73 74 79 6c   uid ){.    styl
2710: 65 5f 68 65 61 64 65 72 28 6d 70 72 69 6e 74 66  e_header(mprintf
2720: 28 22 45 64 69 74 20 55 73 65 72 20 25 68 22 2c  ("Edit User %h",
2730: 20 7a 4c 6f 67 69 6e 29 29 3b 0a 20 20 7d 65 6c   zLogin));.  }el
2740: 73 65 7b 0a 20 20 20 20 73 74 79 6c 65 5f 68 65  se{.    style_he
2750: 61 64 65 72 28 22 41 64 64 20 41 20 4e 65 77 20  ader("Add A New 
2760: 55 73 65 72 22 29 3b 0a 20 20 7d 0a 20 20 40 20  User");.  }.  @ 
2770: 3c 74 61 62 6c 65 20 61 6c 69 67 6e 3d 22 6c 65  <table align="le
2780: 66 74 22 20 68 73 70 61 63 65 3d 22 32 30 22 20  ft" hspace="20" 
2790: 76 73 70 61 63 65 3d 22 31 30 22 3e 3c 74 72 3e  vspace="10"><tr>
27a0: 3c 74 64 3e 0a 20 20 40 20 3c 66 6f 72 6d 20 61  <td>.  @ <form a
27b0: 63 74 69 6f 6e 3d 22 25 73 28 67 2e 7a 50 61 74  ction="%s(g.zPat
27c0: 68 29 22 20 6d 65 74 68 6f 64 3d 22 50 4f 53 54  h)" method="POST
27d0: 22 3e 0a 20 20 40 20 3c 74 61 62 6c 65 3e 0a 20  ">.  @ <table>. 
27e0: 20 40 20 3c 74 72 3e 0a 20 20 40 20 20 20 3c 74   @ <tr>.  @   <t
27f0: 64 20 61 6c 69 67 6e 3d 22 72 69 67 68 74 22 3e  d align="right">
2800: 3c 6e 6f 62 72 3e 55 73 65 72 20 49 44 3a 3c 2f  <nobr>User ID:</
2810: 6e 6f 62 72 3e 3c 2f 74 64 3e 0a 20 20 69 66 28  nobr></td>.  if(
2820: 20 75 69 64 20 29 7b 0a 20 20 20 20 40 20 20 20   uid ){.    @   
2830: 3c 74 64 3e 25 64 28 75 69 64 29 20 3c 69 6e 70  <td>%d(uid) <inp
2840: 75 74 20 74 79 70 65 3d 22 68 69 64 64 65 6e 22  ut type="hidden"
2850: 20 6e 61 6d 65 3d 22 69 64 22 20 76 61 6c 75 65   name="id" value
2860: 3d 22 25 64 28 75 69 64 29 22 3e 3c 2f 74 64 3e  ="%d(uid)"></td>
2870: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 40 20  .  }else{.    @ 
2880: 20 20 3c 74 64 3e 28 6e 65 77 20 75 73 65 72 29    <td>(new user)
2890: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 68 69 64  <input type="hid
28a0: 64 65 6e 22 20 6e 61 6d 65 3d 22 69 64 22 20 76  den" name="id" v
28b0: 61 6c 75 65 3d 30 3e 3c 2f 74 64 3e 0a 20 20 7d  alue=0></td>.  }
28c0: 0a 20 20 40 20 3c 2f 74 72 3e 0a 20 20 40 20 3c  .  @ </tr>.  @ <
28d0: 74 72 3e 0a 20 20 40 20 20 20 3c 74 64 20 61 6c  tr>.  @   <td al
28e0: 69 67 6e 3d 22 72 69 67 68 74 22 3e 3c 6e 6f 62  ign="right"><nob
28f0: 72 3e 4c 6f 67 69 6e 3a 3c 2f 6e 6f 62 72 3e 3c  r>Login:</nobr><
2900: 2f 74 64 3e 0a 20 20 40 20 20 20 3c 74 64 3e 3c  /td>.  @   <td><
2910: 69 6e 70 75 74 20 74 79 70 65 3d 22 74 65 78 74  input type="text
2920: 22 20 6e 61 6d 65 3d 22 6c 6f 67 69 6e 22 20 76  " name="login" v
2930: 61 6c 75 65 3d 22 25 68 28 7a 4c 6f 67 69 6e 29  alue="%h(zLogin)
2940: 22 3e 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74 72  "></td>.  @ </tr
2950: 3e 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20 20  >.  @ <tr>.  @  
2960: 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69 67 68   <td align="righ
2970: 74 22 3e 3c 6e 6f 62 72 3e 43 6f 6e 74 61 63 74  t"><nobr>Contact
2980: 26 6e 62 73 70 3b 49 6e 66 6f 3a 3c 2f 6e 6f 62  &nbsp;Info:</nob
2990: 72 3e 3c 2f 74 64 3e 0a 20 20 40 20 20 20 3c 74  r></td>.  @   <t
29a0: 64 3e 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 74  d><input type="t
29b0: 65 78 74 22 20 6e 61 6d 65 3d 22 69 6e 66 6f 22  ext" name="info"
29c0: 20 73 69 7a 65 3d 34 30 20 76 61 6c 75 65 3d 22   size=40 value="
29d0: 25 68 28 7a 49 6e 66 6f 29 22 3e 3c 2f 74 64 3e  %h(zInfo)"></td>
29e0: 0a 20 20 40 20 3c 2f 74 72 3e 0a 20 20 40 20 3c  .  @ </tr>.  @ <
29f0: 74 72 3e 0a 20 20 40 20 20 20 3c 74 64 20 61 6c  tr>.  @   <td al
2a00: 69 67 6e 3d 22 72 69 67 68 74 22 20 76 61 6c 69  ign="right" vali
2a10: 67 6e 3d 22 74 6f 70 22 3e 43 61 70 61 62 69 6c  gn="top">Capabil
2a20: 69 74 69 65 73 3a 3c 2f 74 64 3e 0a 20 20 40 20  ities:</td>.  @ 
2a30: 20 20 3c 74 64 3e 0a 20 20 69 66 28 20 67 2e 6f    <td>.  if( g.o
2a40: 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20 40 20  kSetup ){.    @ 
2a50: 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d      <input type=
2a60: 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d  "checkbox" name=
2a70: 22 61 73 22 25 73 28 6f 61 73 29 3e 53 65 74 75  "as"%s(oas)>Setu
2a80: 70 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20  p</input><br>.  
2a90: 7d 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74  }.  @     <input
2aa0: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
2ab0: 20 6e 61 6d 65 3d 22 61 61 22 25 73 28 6f 61 61   name="aa"%s(oaa
2ac0: 29 3e 41 64 6d 69 6e 3c 2f 69 6e 70 75 74 3e 3c  )>Admin</input><
2ad0: 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70  br>.  @     <inp
2ae0: 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f  ut type="checkbo
2af0: 78 22 20 6e 61 6d 65 3d 22 61 64 22 25 73 28 6f  x" name="ad"%s(o
2b00: 61 64 29 3e 44 65 6c 65 74 65 3c 2f 69 6e 70 75  ad)>Delete</inpu
2b10: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
2b20: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
2b30: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 65 22 25  kbox" name="ae"%
2b40: 73 28 6f 61 64 29 3e 45 6d 61 69 6c 3c 2f 69 6e  s(oad)>Email</in
2b50: 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20  put><br>.  @    
2b60: 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68   <input type="ch
2b70: 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 70  eckbox" name="ap
2b80: 22 25 73 28 6f 61 70 29 3e 50 61 73 73 77 6f 72  "%s(oap)>Passwor
2b90: 64 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20  d</input><br>.  
2ba0: 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70  @     <input typ
2bb0: 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d  e="checkbox" nam
2bc0: 65 3d 22 61 71 22 25 73 28 6f 61 71 29 3e 51 75  e="aq"%s(oaq)>Qu
2bd0: 65 72 79 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a  ery</input><br>.
2be0: 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74    @     <input t
2bf0: 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e  ype="checkbox" n
2c00: 61 6d 65 3d 22 61 69 22 25 73 28 6f 61 69 29 3e  ame="ai"%s(oai)>
2c10: 43 68 65 63 6b 2d 49 6e 3c 2f 69 6e 70 75 74 3e  Check-In</input>
2c20: 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e  <br>.  @     <in
2c30: 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62  put type="checkb
2c40: 6f 78 22 20 6e 61 6d 65 3d 22 61 6f 22 25 73 28  ox" name="ao"%s(
2c50: 6f 61 6f 29 3e 43 68 65 63 6b 2d 4f 75 74 3c 2f  oao)>Check-Out</
2c60: 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20  input><br>.  @  
2c70: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2c80: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2c90: 61 68 22 25 73 28 6f 61 68 29 3e 48 69 73 74 6f  ah"%s(oah)>Histo
2ca0: 72 79 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20  ry</input><br>. 
2cb0: 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79   @     <input ty
2cc0: 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61  pe="checkbox" na
2cd0: 6d 65 3d 22 61 67 22 25 73 28 6f 61 67 29 3e 43  me="ag"%s(oag)>C
2ce0: 6c 6f 6e 65 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e  lone</input><br>
2cf0: 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20  .  @     <input 
2d00: 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20  type="checkbox" 
2d10: 6e 61 6d 65 3d 22 61 6a 22 25 73 28 6f 61 6a 29  name="aj"%s(oaj)
2d20: 3e 52 65 61 64 20 57 69 6b 69 3c 2f 69 6e 70 75  >Read Wiki</inpu
2d30: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
2d40: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
2d50: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 66 22 25  kbox" name="af"%
2d60: 73 28 6f 61 66 29 3e 4e 65 77 20 57 69 6b 69 3c  s(oaf)>New Wiki<
2d70: 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20  /input><br>.  @ 
2d80: 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d      <input type=
2d90: 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d  "checkbox" name=
2da0: 22 61 6d 22 25 73 28 6f 61 6d 29 3e 41 70 70 65  "am"%s(oam)>Appe
2db0: 6e 64 20 57 69 6b 69 3c 2f 69 6e 70 75 74 3e 3c  nd Wiki</input><
2dc0: 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70  br>.  @     <inp
2dd0: 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f  ut type="checkbo
2de0: 78 22 20 6e 61 6d 65 3d 22 61 6b 22 25 73 28 6f  x" name="ak"%s(o
2df0: 61 6b 29 3e 57 72 69 74 65 20 57 69 6b 69 3c 2f  ak)>Write Wiki</
2e00: 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20  input><br>.  @  
2e10: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2e20: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2e30: 61 72 22 25 73 28 6f 61 72 29 3e 52 65 61 64 20  ar"%s(oar)>Read 
2e40: 54 6b 74 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a  Tkt</input><br>.
2e50: 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74    @     <input t
2e60: 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e  ype="checkbox" n
2e70: 61 6d 65 3d 22 61 6e 22 25 73 28 6f 61 6e 29 3e  ame="an"%s(oan)>
2e80: 4e 65 77 20 54 6b 74 3c 2f 69 6e 70 75 74 3e 3c  New Tkt</input><
2e90: 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70  br>.  @     <inp
2ea0: 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f  ut type="checkbo
2eb0: 78 22 20 6e 61 6d 65 3d 22 61 63 22 25 73 28 6f  x" name="ac"%s(o
2ec0: 61 63 29 3e 41 70 70 65 6e 64 20 54 6b 74 3c 2f  ac)>Append Tkt</
2ed0: 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20  input><br>.  @  
2ee0: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2ef0: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2f00: 61 77 22 25 73 28 6f 61 77 29 3e 57 72 69 74 65  aw"%s(oaw)>Write
2f10: 20 54 6b 74 3c 2f 69 6e 70 75 74 3e 0a 20 20 40   Tkt</input>.  @
2f20: 20 20 20 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74     </td>.  @ </t
2f30: 72 3e 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20  r>.  @ <tr>.  @ 
2f40: 20 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69 67    <td align="rig
2f50: 68 74 22 3e 50 61 73 73 77 6f 72 64 3a 3c 2f 74  ht">Password:</t
2f60: 64 3e 0a 20 20 40 20 20 20 3c 74 64 3e 3c 69 6e  d>.  @   <td><in
2f70: 70 75 74 20 74 79 70 65 3d 22 70 61 73 73 77 6f  put type="passwo
2f80: 72 64 22 20 6e 61 6d 65 3d 22 70 77 22 20 76 61  rd" name="pw" va
2f90: 6c 75 65 3d 22 22 3e 3c 2f 74 64 3e 0a 20 20 40  lue=""></td>.  @
2fa0: 20 3c 2f 74 72 3e 0a 20 20 69 66 28 20 21 68 69   </tr>.  if( !hi
2fb0: 67 68 65 72 55 73 65 72 20 29 7b 0a 20 20 20 20  gherUser ){.    
2fc0: 40 20 3c 74 72 3e 0a 20 20 20 20 40 20 20 20 3c  @ <tr>.    @   <
2fd0: 74 64 3e 26 6e 62 73 70 3c 2f 74 64 3e 0a 20 20  td>&nbsp</td>.  
2fe0: 20 20 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74    @   <td><input
2ff0: 20 74 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e   type="submit" n
3000: 61 6d 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c  ame="submit" val
3010: 75 65 3d 22 41 70 70 6c 79 20 43 68 61 6e 67 65  ue="Apply Change
3020: 73 22 3e 0a 20 20 20 20 40 20 3c 2f 74 72 3e 0a  s">.    @ </tr>.
3030: 20 20 7d 0a 20 20 40 20 3c 2f 74 61 62 6c 65 3e    }.  @ </table>
3040: 3c 2f 74 64 3e 3c 2f 74 72 3e 3c 2f 74 61 62 6c  </td></tr></tabl
3050: 65 3e 0a 20 20 40 20 3c 70 3e 3c 62 3e 4e 6f 74  e>.  @ <p><b>Not
3060: 65 73 3a 3c 2f 62 3e 3c 2f 70 3e 0a 20 20 40 20  es:</b></p>.  @ 
3070: 3c 6f 6c 3e 0a 20 20 69 66 28 20 68 69 67 68 65  <ol>.  if( highe
3080: 72 55 73 65 72 20 29 7b 0a 20 20 20 20 40 20 3c  rUser ){.    @ <
3090: 6c 69 3e 3c 70 3e 0a 20 20 20 20 40 20 55 73 65  li><p>.    @ Use
30a0: 72 20 25 68 28 7a 49 64 29 20 68 61 73 20 53 65  r %h(zId) has Se
30b0: 74 75 70 20 70 72 69 76 69 6c 65 67 65 73 20 61  tup privileges a
30c0: 6e 64 20 79 6f 75 20 6f 6e 6c 79 20 68 61 76 65  nd you only have
30d0: 20 41 64 6d 69 6e 20 70 72 69 76 69 6c 65 67 65   Admin privilege
30e0: 73 0a 20 20 20 20 40 20 73 6f 20 79 6f 75 20 61  s.    @ so you a
30f0: 72 65 20 6e 6f 74 20 70 65 72 6d 69 74 74 65 64  re not permitted
3100: 20 74 6f 20 6d 61 6b 65 20 63 68 61 6e 67 65 73   to make changes
3110: 20 74 6f 20 25 68 28 7a 49 64 29 2e 0a 20 20 20   to %h(zId)..   
3120: 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 20   @ </p></li>.   
3130: 20 40 0a 20 20 7d 0a 20 20 40 0a 20 20 40 20 3c   @.  }.  @.  @ <
3140: 6c 69 3e 3c 70 3e 0a 20 20 40 20 54 68 65 20 3c  li><p>.  @ The <
3150: 62 3e 44 65 6c 65 74 65 3c 2f 62 3e 20 70 72 69  b>Delete</b> pri
3160: 76 69 6c 65 67 65 20 67 69 76 65 20 74 68 65 20  vilege give the 
3170: 75 73 65 72 20 74 68 65 20 61 62 69 6c 69 74 79  user the ability
3180: 20 74 6f 20 65 72 61 73 65 0a 20 20 40 20 77 69   to erase.  @ wi
3190: 6b 69 2c 20 74 69 63 6b 65 74 73 2c 20 61 6e 64  ki, tickets, and
31a0: 20 61 74 74 74 61 63 68 6d 65 6e 74 73 20 74 68   atttachments th
31b0: 61 74 20 68 61 76 65 20 62 65 65 6e 20 61 64 64  at have been add
31c0: 65 64 20 62 79 20 61 6e 6f 6e 79 6d 6f 75 73 0a  ed by anonymous.
31d0: 20 20 40 20 75 73 65 72 73 2e 20 20 54 68 69 73    @ users.  This
31e0: 20 63 61 70 61 62 69 6c 69 74 79 20 69 73 20 69   capability is i
31f0: 6e 74 65 6e 64 65 64 20 66 6f 72 20 64 65 6c 65  ntended for dele
3200: 74 69 6f 6e 20 6f 66 20 73 70 61 6d 2e 20 20 54  tion of spam.  T
3210: 68 65 0a 20 20 40 20 64 65 6c 65 74 65 20 63 61  he.  @ delete ca
3220: 70 61 62 69 6c 69 74 79 20 69 73 20 6f 6e 6c 79  pability is only
3230: 20 69 6e 20 65 66 66 65 63 74 20 66 6f 72 20 32   in effect for 2
3240: 34 20 68 6f 75 72 73 20 61 66 74 65 72 20 74 68  4 hours after th
3250: 65 20 69 74 65 6d 0a 20 20 40 20 69 73 20 66 69  e item.  @ is fi
3260: 72 73 74 20 70 6f 73 74 65 64 2e 20 20 54 68 65  rst posted.  The
3270: 20 53 65 74 75 70 20 75 73 65 72 20 63 61 6e 20   Setup user can 
3280: 64 65 6c 65 74 65 20 61 6e 79 74 68 69 6e 67 20  delete anything 
3290: 61 74 20 61 6e 79 20 74 69 6d 65 2e 0a 20 20 40  at any time..  @
32a0: 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20   </p></li>.  @. 
32b0: 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20 54   @ <li><p>.  @ T
32c0: 68 65 20 3c 62 3e 51 75 65 72 79 3c 2f 62 3e 20  he <b>Query</b> 
32d0: 70 72 69 76 69 6c 65 67 65 20 61 6c 6c 6f 77 73  privilege allows
32e0: 20 74 68 65 20 75 73 65 72 20 74 6f 20 63 72 65   the user to cre
32f0: 61 74 65 20 6f 72 20 65 64 69 74 0a 20 20 40 20  ate or edit.  @ 
3300: 72 65 70 6f 72 74 20 66 6f 72 6d 61 74 73 20 62  report formats b
3310: 79 20 73 70 65 63 69 66 79 69 6e 67 20 61 70 70  y specifying app
3320: 72 6f 70 72 69 61 74 65 20 53 51 4c 2e 20 20 55  ropriate SQL.  U
3330: 73 65 72 73 20 63 61 6e 20 72 75 6e 0a 20 20 40  sers can run.  @
3340: 20 65 78 69 73 74 69 6e 67 20 72 65 70 6f 72 74   existing report
3350: 73 20 77 69 74 68 6f 75 74 20 74 68 65 20 51 75  s without the Qu
3360: 65 72 79 20 70 72 69 76 69 6c 65 67 65 2e 0a 20  ery privilege.. 
3370: 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40   @ </p></li>.  @
3380: 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40  .  @ <li><p>.  @
3390: 20 41 6e 20 3c 62 3e 41 64 6d 69 6e 3c 2f 62 3e   An <b>Admin</b>
33a0: 20 75 73 65 72 20 63 61 6e 20 61 64 64 20 6f 74   user can add ot
33b0: 68 65 72 20 75 73 65 72 73 2c 20 63 72 65 61 74  her users, creat
33c0: 65 20 6e 65 77 20 74 69 63 6b 65 74 20 72 65 70  e new ticket rep
33d0: 6f 72 74 0a 20 20 40 20 66 6f 72 6d 61 74 73 2c  ort.  @ formats,
33e0: 20 61 6e 64 20 63 68 61 6e 67 65 20 73 79 73 74   and change syst
33f0: 65 6d 20 64 65 66 61 75 6c 74 73 2e 20 20 42 75  em defaults.  Bu
3400: 74 20 6f 6e 6c 79 20 74 68 65 20 3c 62 3e 53 65  t only the <b>Se
3410: 74 75 70 3c 2f 62 3e 20 75 73 65 72 0a 20 20 40  tup</b> user.  @
3420: 20 69 73 20 61 62 6c 65 20 74 6f 20 63 68 61 6e   is able to chan
3430: 67 65 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72  ge the repositor
3440: 79 20 74 6f 0a 20 20 40 20 77 68 69 63 68 20 74  y to.  @ which t
3450: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 6c  his program is l
3460: 69 6e 6b 65 64 2e 0a 20 20 40 20 3c 2f 70 3e 3c  inked..  @ </p><
3470: 2f 6c 69 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69  /li>.  @.  @ <li
3480: 3e 3c 70 3e 0a 20 20 40 20 54 68 65 20 3c 62 3e  ><p>.  @ The <b>
3490: 48 69 73 74 6f 72 79 3c 2f 62 3e 20 70 72 69 76  History</b> priv
34a0: 69 6c 65 67 65 20 61 6c 6c 6f 77 73 20 61 20 75  ilege allows a u
34b0: 73 65 72 20 74 6f 20 73 65 65 20 61 20 74 69 6d  ser to see a tim
34c0: 65 6c 69 6e 65 0a 20 20 40 20 77 69 74 68 20 68  eline.  @ with h
34d0: 79 70 65 72 6c 69 6e 6b 73 20 74 6f 20 76 65 72  yperlinks to ver
34e0: 73 69 6f 6e 20 69 6e 66 6f 72 6d 61 74 69 6f 6e  sion information
34f0: 2c 20 74 6f 20 64 6f 77 6e 6c 6f 61 64 20 5a 49  , to download ZI
3500: 50 20 61 72 63 68 69 76 65 73 0a 20 20 40 20 6f  P archives.  @ o
3510: 66 20 69 6e 64 69 76 69 64 75 61 6c 20 76 65 72  f individual ver
3520: 73 69 6f 6e 73 2e 0a 20 20 40 20 3c 2f 70 3e 3c  sions..  @ </p><
3530: 2f 6c 69 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69  /li>.  @.  @ <li
3540: 3e 3c 70 3e 0a 20 20 40 20 4e 6f 20 6c 6f 67 69  ><p>.  @ No logi
3550: 6e 20 69 73 20 72 65 71 75 69 72 65 64 20 66 6f  n is required fo
3560: 72 20 75 73 65 72 20 22 3c 62 3e 6e 6f 62 6f 64  r user "<b>nobod
3570: 79 3c 2f 62 3e 22 2e 20 20 54 68 65 20 63 61 70  y</b>".  The cap
3580: 61 62 69 6c 69 74 69 65 73 0a 20 20 40 20 6f 66  abilities.  @ of
3590: 20 74 68 69 73 20 75 73 65 72 20 61 72 65 20 61   this user are a
35a0: 76 61 69 6c 61 62 6c 65 20 74 6f 20 61 6e 79 6f  vailable to anyo
35b0: 6e 65 20 77 69 74 68 6f 75 74 20 73 75 70 70 6c  ne without suppl
35c0: 79 69 6e 67 20 61 20 75 73 65 72 6e 61 6d 65 20  ying a username 
35d0: 6f 72 0a 20 20 40 20 70 61 73 73 77 6f 72 64 2e  or.  @ password.
35e0: 20 20 54 6f 20 64 69 73 61 62 6c 65 20 6e 6f 62    To disable nob
35f0: 6f 64 79 20 61 63 63 65 73 73 2c 20 6d 61 6b 65  ody access, make
3600: 20 73 75 72 65 20 74 68 65 72 65 20 69 73 20 6e   sure there is n
3610: 6f 20 75 73 65 72 0a 20 20 40 20 77 69 74 68 20  o user.  @ with 
3620: 61 6e 20 49 44 20 6f 66 20 3c 62 3e 6e 6f 62 6f  an ID of <b>nobo
3630: 64 79 3c 2f 62 3e 20 6f 72 20 74 68 61 74 20 74  dy</b> or that t
3640: 68 65 20 6e 6f 62 6f 64 79 20 75 73 65 72 20 68  he nobody user h
3650: 61 73 20 6e 6f 0a 20 20 40 20 63 61 70 61 62 69  as no.  @ capabi
3660: 6c 69 74 69 65 73 20 65 6e 61 62 6c 65 64 2e 20  lities enabled. 
3670: 20 54 68 65 20 70 61 73 73 77 6f 72 64 20 66 6f   The password fo
3680: 72 20 6e 6f 62 6f 64 79 20 69 73 20 69 67 6e 6f  r nobody is igno
3690: 72 65 2e 20 20 54 6f 0a 20 20 40 20 61 76 6f 69  re.  To.  @ avoi
36a0: 64 20 70 72 6f 62 6c 65 6d 73 20 77 69 74 68 20  d problems with 
36b0: 73 70 69 64 65 72 73 20 6f 76 65 72 6c 6f 61 64  spiders overload
36c0: 69 6e 67 20 74 68 65 20 73 65 72 76 65 72 2c 20  ing the server, 
36d0: 69 74 20 69 73 20 73 75 67 67 65 73 74 65 64 0a  it is suggested.
36e0: 20 20 40 20 74 68 61 74 20 74 68 65 20 27 68 27    @ that the 'h'
36f0: 20 28 48 69 73 74 6f 72 79 29 20 63 61 70 61 62   (History) capab
3700: 69 6c 69 74 79 20 62 65 20 74 75 72 6e 65 64 20  ility be turned 
3710: 6f 66 66 20 66 6f 72 20 75 73 65 72 20 6e 6f 62  off for user nob
3720: 6f 64 79 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c  ody..  @ </p></l
3730: 69 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c  i>.  @.  @ <li><
3740: 70 3e 0a 20 20 40 20 4c 6f 67 69 6e 20 69 73 20  p>.  @ Login is 
3750: 72 65 71 75 69 72 65 64 20 66 6f 72 20 75 73 65  required for use
3760: 72 20 22 3c 62 3e 61 6e 6f 6e 79 6d 6f 75 73 3c  r "<b>anonymous<
3770: 2f 62 3e 22 20 62 75 74 20 74 68 65 20 70 61 73  /b>" but the pas
3780: 73 77 6f 72 64 0a 20 20 40 20 69 73 20 64 69 73  sword.  @ is dis
3790: 70 6c 61 79 65 64 20 6f 6e 20 74 68 65 20 6c 6f  played on the lo
37a0: 67 69 6e 20 73 63 72 65 65 6e 20 62 65 73 69 64  gin screen besid
37b0: 65 20 74 68 65 20 70 61 73 73 77 6f 72 64 20 65  e the password e
37c0: 6e 74 72 79 20 62 6f 78 0a 20 20 40 20 73 6f 20  ntry box.  @ so 
37d0: 61 6e 79 62 6f 64 79 20 77 68 6f 20 63 61 6e 20  anybody who can 
37e0: 72 65 61 64 20 73 68 6f 75 6c 64 20 62 65 20 61  read should be a
37f0: 62 6c 65 20 74 6f 20 6c 6f 67 69 6e 20 61 73 20  ble to login as 
3800: 61 6e 6f 6e 79 6d 6f 75 73 2e 0a 20 20 40 20 4f  anonymous..  @ O
3810: 6e 20 74 68 65 20 6f 74 68 65 72 20 68 61 6e 64  n the other hand
3820: 2c 20 73 70 69 64 65 72 73 20 61 6e 64 20 77 65  , spiders and we
3830: 62 2d 63 72 61 77 6c 65 72 73 20 77 69 6c 6c 20  b-crawlers will 
3840: 74 79 70 69 63 61 6c 6c 79 20 6e 6f 74 0a 20 20  typically not.  
3850: 40 20 62 65 20 61 62 6c 65 20 74 6f 20 6c 6f 67  @ be able to log
3860: 69 6e 2e 20 20 53 65 74 20 74 68 65 20 63 61 70  in.  Set the cap
3870: 61 62 69 6c 69 74 69 65 73 20 6f 66 20 74 68 65  abilities of the
3880: 20 61 6e 6f 6e 79 6d 6f 75 73 20 75 73 65 72 0a   anonymous user.
3890: 20 20 40 20 74 6f 20 74 68 69 6e 67 73 20 74 68    @ to things th
38a0: 61 74 20 79 6f 75 20 77 61 6e 74 20 61 6e 79 20  at you want any 
38b0: 68 75 6d 61 6e 20 74 6f 20 62 65 20 61 62 6c 65  human to be able
38c0: 20 74 6f 20 64 6f 2c 20 62 75 74 20 6e 6f 74 20   to do, but not 
38d0: 61 6e 79 0a 20 20 40 20 73 70 69 64 65 72 2e 0a  any.  @ spider..
38e0: 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20    @ </p></li>.  
38f0: 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 73 74 79 6c  @ </form>.  styl
3900: 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 0a  e_footer();.}...
3910: 2f 2a 0a 2a 2a 20 47 65 6e 65 72 61 74 65 20 61  /*.** Generate a
3920: 20 63 68 65 63 6b 62 6f 78 20 66 6f 72 20 61 6e   checkbox for an
3930: 20 61 74 74 72 69 62 75 74 65 2e 0a 2a 2f 0a 73   attribute..*/.s
3940: 74 61 74 69 63 20 76 6f 69 64 20 6f 6e 6f 66 66  tatic void onoff
3950: 5f 61 74 74 72 69 62 75 74 65 28 0a 20 20 63 6f  _attribute(.  co
3960: 6e 73 74 20 63 68 61 72 20 2a 7a 4c 61 62 65 6c  nst char *zLabel
3970: 2c 20 20 20 2f 2a 20 54 68 65 20 74 65 78 74 20  ,   /* The text 
3980: 6c 61 62 65 6c 20 6f 6e 20 74 68 65 20 63 68 65  label on the che
3990: 63 6b 62 6f 78 20 2a 2f 0a 20 20 63 6f 6e 73 74  ckbox */.  const
39a0: 20 63 68 61 72 20 2a 7a 56 61 72 2c 20 20 20 20   char *zVar,    
39b0: 20 2f 2a 20 54 68 65 20 63 6f 72 72 65 73 70 6f   /* The correspo
39c0: 6e 64 69 6e 67 20 72 6f 77 20 69 6e 20 74 68 65  nding row in the
39d0: 20 56 41 52 20 74 61 62 6c 65 20 2a 2f 0a 20 20   VAR table */.  
39e0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 51 50 61  const char *zQPa
39f0: 72 6d 2c 20 20 20 2f 2a 20 54 68 65 20 71 75 65  rm,   /* The que
3a00: 72 79 20 70 61 72 61 6d 65 74 65 72 20 2a 2f 0a  ry parameter */.
3a10: 20 20 69 6e 74 20 64 66 6c 74 56 61 6c 20 20 20    int dfltVal   
3a20: 20 20 20 20 20 20 20 20 2f 2a 20 44 65 66 61 75          /* Defau
3a30: 6c 74 20 76 61 6c 75 65 20 69 66 20 56 41 52 20  lt value if VAR 
3a40: 74 61 62 6c 65 20 65 6e 74 72 79 20 64 6f 65 73  table entry does
3a50: 20 6e 6f 74 20 65 78 69 73 74 20 2a 2f 0a 29 7b   not exist */.){
3a60: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
3a70: 56 61 6c 20 3d 20 64 62 5f 67 65 74 28 7a 56 61  Val = db_get(zVa
3a80: 72 2c 20 30 29 3b 0a 20 20 63 6f 6e 73 74 20 63  r, 0);.  const c
3a90: 68 61 72 20 2a 7a 51 20 3d 20 50 28 7a 51 50 61  har *zQ = P(zQPa
3aa0: 72 6d 29 3b 0a 20 20 69 6e 74 20 69 56 61 6c 3b  rm);.  int iVal;
3ab0: 0a 20 20 69 66 28 20 7a 56 61 6c 20 29 7b 0a 20  .  if( zVal ){. 
3ac0: 20 20 20 69 56 61 6c 20 3d 20 61 74 6f 69 28 7a     iVal = atoi(z
3ad0: 56 61 6c 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  Val);.  }else{. 
3ae0: 20 20 20 69 56 61 6c 20 3d 20 64 66 6c 74 56 61     iVal = dfltVa
3af0: 6c 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 51 3d  l;.  }.  if( zQ=
3b00: 3d 30 20 26 26 20 50 28 22 73 75 62 6d 69 74 22  =0 && P("submit"
3b10: 29 20 29 7b 0a 20 20 20 20 7a 51 20 3d 20 22 6f  ) ){.    zQ = "o
3b20: 66 66 22 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a  ff";.  }.  if( z
3b30: 51 20 29 7b 0a 20 20 20 20 69 6e 74 20 69 51 20  Q ){.    int iQ 
3b40: 3d 20 73 74 72 63 6d 70 28 7a 51 2c 22 6f 6e 22  = strcmp(zQ,"on"
3b50: 29 3d 3d 30 20 7c 7c 20 61 74 6f 69 28 7a 51 29  )==0 || atoi(zQ)
3b60: 3b 0a 20 20 20 20 69 66 28 20 69 51 21 3d 69 56  ;.    if( iQ!=iV
3b70: 61 6c 20 29 7b 0a 20 20 20 20 20 20 64 62 5f 73  al ){.      db_s
3b80: 65 74 28 7a 56 61 72 2c 20 69 51 20 3f 20 22 31  et(zVar, iQ ? "1
3b90: 22 20 3a 20 22 30 22 2c 20 30 29 3b 0a 20 20 20  " : "0", 0);.   
3ba0: 20 20 20 69 56 61 6c 20 3d 20 69 51 3b 0a 20 20     iVal = iQ;.  
3bb0: 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 69 56    }.  }.  if( iV
3bc0: 61 6c 20 29 7b 0a 20 20 20 20 40 20 3c 69 6e 70  al ){.    @ <inp
3bd0: 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f  ut type="checkbo
3be0: 78 22 20 6e 61 6d 65 3d 22 25 73 28 7a 51 50 61  x" name="%s(zQPa
3bf0: 72 6d 29 22 20 63 68 65 63 6b 65 64 3e 3c 62 3e  rm)" checked><b>
3c00: 25 73 28 7a 4c 61 62 65 6c 29 3c 2f 62 3e 3c 2f  %s(zLabel)</b></
3c10: 69 6e 70 75 74 3e 0a 20 20 7d 65 6c 73 65 7b 0a  input>.  }else{.
3c20: 20 20 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70      @ <input typ
3c30: 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d  e="checkbox" nam
3c40: 65 3d 22 25 73 28 7a 51 50 61 72 6d 29 22 3e 3c  e="%s(zQParm)"><
3c50: 62 3e 25 73 28 7a 4c 61 62 65 6c 29 3c 2f 62 3e  b>%s(zLabel)</b>
3c60: 3c 2f 69 6e 70 75 74 3e 0a 20 20 7d 0a 7d 0a 0a  </input>.  }.}..
3c70: 2f 2a 0a 2a 2a 20 47 65 6e 65 72 61 74 65 20 61  /*.** Generate a
3c80: 6e 20 65 6e 74 72 79 20 62 6f 78 20 66 6f 72 20  n entry box for 
3c90: 61 6e 20 61 74 74 72 69 62 75 74 65 2e 0a 2a 2f  an attribute..*/
3ca0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 65 6e 74  .static void ent
3cb0: 72 79 5f 61 74 74 72 69 62 75 74 65 28 0a 20 20  ry_attribute(.  
3cc0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 61 62  const char *zLab
3cd0: 65 6c 2c 20 20 20 2f 2a 20 54 68 65 20 74 65 78  el,   /* The tex
3ce0: 74 20 6c 61 62 65 6c 20 6f 6e 20 74 68 65 20 65  t label on the e
3cf0: 6e 74 72 79 20 62 6f 78 20 2a 2f 0a 20 20 69 6e  ntry box */.  in
3d00: 74 20 77 69 64 74 68 2c 20 20 20 20 20 20 20 20  t width,        
3d10: 20 20 20 20 2f 2a 20 57 69 64 74 68 20 6f 66 20      /* Width of 
3d20: 74 68 65 20 65 6e 74 72 79 20 62 6f 78 20 2a 2f  the entry box */
3d30: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
3d40: 56 61 72 2c 20 20 20 20 20 2f 2a 20 54 68 65 20  Var,     /* The 
3d50: 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 72 6f  corresponding ro
3d60: 77 20 69 6e 20 74 68 65 20 56 41 52 20 74 61 62  w in the VAR tab
3d70: 6c 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68  le */.  const ch
3d80: 61 72 20 2a 7a 51 50 61 72 6d 2c 20 20 20 2f 2a  ar *zQParm,   /*
3d90: 20 54 68 65 20 71 75 65 72 79 20 70 61 72 61 6d   The query param
3da0: 65 74 65 72 20 2a 2f 0a 20 20 63 68 61 72 20 2a  eter */.  char *
3db0: 7a 44 66 6c 74 20 20 20 20 20 2f 2a 20 44 65 66  zDflt     /* Def
3dc0: 61 75 6c 74 20 76 61 6c 75 65 20 69 66 20 56 41  ault value if VA
3dd0: 52 20 74 61 62 6c 65 20 65 6e 74 72 79 20 64 6f  R table entry do
3de0: 65 73 20 6e 6f 74 20 65 78 69 73 74 20 2a 2f 0a  es not exist */.
3df0: 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  ){.  const char 
3e00: 2a 7a 56 61 6c 20 3d 20 64 62 5f 67 65 74 28 7a  *zVal = db_get(z
3e10: 56 61 72 2c 20 7a 44 66 6c 74 29 3b 0a 20 20 63  Var, zDflt);.  c
3e20: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 51 20 3d 20  onst char *zQ = 
3e30: 50 28 7a 51 50 61 72 6d 29 3b 0a 20 20 69 66 28  P(zQParm);.  if(
3e40: 20 7a 51 20 26 26 20 73 74 72 63 6d 70 28 7a 51   zQ && strcmp(zQ
3e50: 2c 7a 56 61 6c 29 21 3d 30 20 29 7b 0a 20 20 20  ,zVal)!=0 ){.   
3e60: 20 64 62 5f 73 65 74 28 7a 56 61 72 2c 20 7a 51   db_set(zVar, zQ
3e70: 2c 20 30 29 3b 0a 20 20 20 20 7a 56 61 6c 20 3d  , 0);.    zVal =
3e80: 20 7a 51 3b 0a 20 20 7d 0a 20 20 40 20 3c 69 6e   zQ;.  }.  @ <in
3e90: 70 75 74 20 74 79 70 65 3d 22 74 65 78 74 22 20  put type="text" 
3ea0: 6e 61 6d 65 3d 22 25 73 28 7a 51 50 61 72 6d 29  name="%s(zQParm)
3eb0: 22 20 76 61 6c 75 65 3d 22 25 68 28 7a 56 61 6c  " value="%h(zVal
3ec0: 29 22 20 73 69 7a 65 3d 22 25 64 28 77 69 64 74  )" size="%d(widt
3ed0: 68 29 22 3e 0a 20 20 40 20 3c 62 3e 25 73 28 7a  h)">.  @ <b>%s(z
3ee0: 4c 61 62 65 6c 29 3c 2f 62 3e 0a 7d 0a 0a 2f 2a  Label)</b>.}../*
3ef0: 0a 2a 2a 20 47 65 6e 65 72 61 74 65 20 61 20 74  .** Generate a t
3f00: 65 78 74 20 62 6f 78 20 66 6f 72 20 61 6e 20 61  ext box for an a
3f10: 74 74 72 69 62 75 74 65 2e 0a 2a 2f 0a 73 74 61  ttribute..*/.sta
3f20: 74 69 63 20 76 6f 69 64 20 74 65 78 74 61 72 65  tic void textare
3f30: 61 5f 61 74 74 72 69 62 75 74 65 28 0a 20 20 63  a_attribute(.  c
3f40: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 61 62 65  onst char *zLabe
3f50: 6c 2c 20 20 20 2f 2a 20 54 68 65 20 74 65 78 74  l,   /* The text
3f60: 20 6c 61 62 65 6c 20 6f 6e 20 74 68 65 20 74 65   label on the te
3f70: 78 74 61 72 65 61 20 2a 2f 0a 20 20 69 6e 74 20  xtarea */.  int 
3f80: 72 6f 77 73 2c 20 20 20 20 20 20 20 20 20 20 20  rows,           
3f90: 20 20 2f 2a 20 52 6f 77 73 20 69 6e 20 74 68 65    /* Rows in the
3fa0: 20 74 65 78 74 61 72 65 61 20 2a 2f 0a 20 20 69   textarea */.  i
3fb0: 6e 74 20 63 6f 6c 73 2c 20 20 20 20 20 20 20 20  nt cols,        
3fc0: 20 20 20 20 20 2f 2a 20 43 6f 6c 75 6d 6e 73 20       /* Columns 
3fd0: 69 6e 20 74 68 65 20 74 65 78 74 61 72 65 61 20  in the textarea 
3fe0: 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  */.  const char 
3ff0: 2a 7a 56 61 72 2c 20 20 20 20 20 2f 2a 20 54 68  *zVar,     /* Th
4000: 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20  e corresponding 
4010: 72 6f 77 20 69 6e 20 74 68 65 20 56 41 52 20 74  row in the VAR t
4020: 61 62 6c 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20  able */.  const 
4030: 63 68 61 72 20 2a 7a 51 50 2c 20 20 20 20 20 20  char *zQP,      
4040: 2f 2a 20 54 68 65 20 71 75 65 72 79 20 70 61 72  /* The query par
4050: 61 6d 65 74 65 72 20 2a 2f 0a 20 20 63 6f 6e 73  ameter */.  cons
4060: 74 20 63 68 61 72 20 2a 7a 44 66 6c 74 20 20 20  t char *zDflt   
4070: 20 20 2f 2a 20 44 65 66 61 75 6c 74 20 76 61 6c    /* Default val
4080: 75 65 20 69 66 20 56 41 52 20 74 61 62 6c 65 20  ue if VAR table 
4090: 65 6e 74 72 79 20 64 6f 65 73 20 6e 6f 74 20 65  entry does not e
40a0: 78 69 73 74 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e  xist */.){.  con
40b0: 73 74 20 63 68 61 72 20 2a 7a 20 3d 20 64 62 5f  st char *z = db_
40c0: 67 65 74 28 7a 56 61 72 2c 20 28 63 68 61 72 2a  get(zVar, (char*
40d0: 29 7a 44 66 6c 74 29 3b 0a 20 20 63 6f 6e 73 74  )zDflt);.  const
40e0: 20 63 68 61 72 20 2a 7a 51 20 3d 20 50 28 7a 51   char *zQ = P(zQ
40f0: 50 29 3b 0a 20 20 69 66 28 20 7a 51 20 26 26 20  P);.  if( zQ && 
4100: 73 74 72 63 6d 70 28 7a 51 2c 7a 29 21 3d 30 20  strcmp(zQ,z)!=0 
4110: 29 7b 0a 20 20 20 20 64 62 5f 73 65 74 28 7a 56  ){.    db_set(zV
4120: 61 72 2c 20 7a 51 2c 20 30 29 3b 0a 20 20 20 20  ar, zQ, 0);.    
4130: 7a 20 3d 20 7a 51 3b 0a 20 20 7d 0a 20 20 69 66  z = zQ;.  }.  if
4140: 28 20 72 6f 77 73 3e 30 20 26 26 20 63 6f 6c 73  ( rows>0 && cols
4150: 3e 30 20 29 7b 0a 20 20 20 20 40 20 3c 74 65 78  >0 ){.    @ <tex
4160: 74 61 72 65 61 20 6e 61 6d 65 3d 22 25 73 28 7a  tarea name="%s(z
4170: 51 50 29 22 20 72 6f 77 73 3d 22 25 64 28 72 6f  QP)" rows="%d(ro
4180: 77 73 29 22 20 63 6f 6c 73 3d 22 25 64 28 63 6f  ws)" cols="%d(co
4190: 6c 73 29 22 3e 25 68 28 7a 29 3c 2f 74 65 78 74  ls)">%h(z)</text
41a0: 61 72 65 61 3e 0a 20 20 20 20 40 20 3c 62 3e 25  area>.    @ <b>%
41b0: 73 28 7a 4c 61 62 65 6c 29 3c 2f 62 3e 0a 20 20  s(zLabel)</b>.  
41c0: 7d 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50  }.}.../*.** WEBP
41d0: 41 47 45 3a 20 73 65 74 75 70 5f 61 63 63 65 73  AGE: setup_acces
41e0: 73 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 75 70 5f  s.*/.void setup_
41f0: 61 63 63 65 73 73 28 76 6f 69 64 29 7b 0a 20 20  access(void){.  
4200: 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64  login_check_cred
4210: 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 28  entials();.  if(
4220: 20 21 67 2e 6f 6b 53 65 74 75 70 20 29 7b 0a 20   !g.okSetup ){. 
4230: 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28     login_needed(
4240: 29 3b 0a 20 20 7d 0a 0a 20 20 73 74 79 6c 65 5f  );.  }..  style_
4250: 68 65 61 64 65 72 28 22 41 63 63 65 73 73 20 43  header("Access C
4260: 6f 6e 74 72 6f 6c 20 53 65 74 74 69 6e 67 73 22  ontrol Settings"
4270: 29 3b 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 72  );.  db_begin_tr
4280: 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 40  ansaction();.  @
4290: 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25   <form action="%
42a0: 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65  s(g.zBaseURL)/se
42b0: 74 75 70 5f 61 63 63 65 73 73 22 20 6d 65 74 68  tup_access" meth
42c0: 6f 64 3d 22 50 4f 53 54 22 3e 0a 0a 20 20 40 20  od="POST">..  @ 
42d0: 3c 68 72 3e 0a 20 20 6f 6e 6f 66 66 5f 61 74 74  <hr>.  onoff_att
42e0: 72 69 62 75 74 65 28 22 52 65 71 75 69 72 65 20  ribute("Require 
42f0: 70 61 73 73 77 6f 72 64 20 66 6f 72 20 6c 6f 63  password for loc
4300: 61 6c 20 61 63 63 65 73 73 22 2c 0a 20 20 20 20  al access",.    
4310: 20 22 6c 6f 63 61 6c 61 75 74 68 22 2c 20 22 6c   "localauth", "l
4320: 6f 63 61 6c 61 75 74 68 22 2c 20 31 29 3b 0a 20  ocalauth", 1);. 
4330: 20 40 20 3c 70 3e 57 68 65 6e 20 65 6e 61 62 6c   @ <p>When enabl
4340: 65 64 2c 20 74 68 65 20 70 61 73 73 77 6f 72 64  ed, the password
4350: 20 73 69 67 6e 2d 69 6e 20 69 73 20 72 65 71 75   sign-in is requ
4360: 69 72 65 64 20 66 6f 72 0a 20 20 40 20 77 65 62  ired for.  @ web
4370: 20 61 63 63 65 73 73 20 63 6f 6d 69 6e 67 20 66   access coming f
4380: 72 6f 6d 20 31 32 37 2e 30 2e 30 2e 31 2e 20 20  rom 127.0.0.1.  
4390: 57 68 65 6e 20 64 69 73 61 62 6c 65 64 2c 20 77  When disabled, w
43a0: 65 62 20 61 63 63 65 73 73 0a 20 20 40 20 66 72  eb access.  @ fr
43b0: 6f 6d 20 31 32 37 2e 30 2e 30 2e 31 20 69 73 20  om 127.0.0.1 is 
43c0: 61 6c 6c 6f 77 73 20 77 69 74 68 6f 75 74 20 61  allows without a
43d0: 6e 79 20 6c 6f 67 69 6e 20 2d 20 74 68 65 20 75  ny login - the u
43e0: 73 65 72 20 69 64 20 69 73 20 73 65 6c 65 63 74  ser id is select
43f0: 65 64 0a 20 20 40 20 66 72 6f 6d 20 74 68 65 20  ed.  @ from the 
4400: 7e 2f 2e 66 6f 73 73 69 6c 20 64 61 74 61 62 61  ~/.fossil databa
4410: 73 65 2e 20 50 61 73 73 77 6f 72 64 20 6c 6f 67  se. Password log
4420: 69 6e 20 69 73 20 61 6c 77 61 79 73 20 72 65 71  in is always req
4430: 75 69 72 65 64 0a 20 20 40 20 66 6f 72 20 69 6e  uired.  @ for in
4440: 63 6f 6d 69 6e 67 20 77 65 62 20 63 6f 6e 6e 65  coming web conne
4450: 63 74 69 6f 6e 73 20 6f 6e 20 69 6e 74 65 72 6e  ctions on intern
4460: 65 74 20 61 64 64 72 65 73 73 65 73 20 6f 74 68  et addresses oth
4470: 65 72 20 74 68 61 6e 0a 20 20 40 20 31 32 37 2e  er than.  @ 127.
4480: 30 2e 30 2e 31 2e 3c 2f 70 3e 3c 2f 6c 69 3e 0a  0.0.1.</p></li>.
4490: 0a 20 20 40 20 3c 68 72 3e 0a 20 20 65 6e 74 72  .  @ <hr>.  entr
44a0: 79 5f 61 74 74 72 69 62 75 74 65 28 22 4c 6f 67  y_attribute("Log
44b0: 69 6e 20 65 78 70 69 72 61 74 69 6f 6e 20 74 69  in expiration ti
44c0: 6d 65 22 2c 20 36 2c 20 22 63 6f 6f 6b 69 65 2d  me", 6, "cookie-
44d0: 65 78 70 69 72 65 22 2c 20 22 63 65 78 22 2c 20  expire", "cex", 
44e0: 22 38 37 36 36 22 29 3b 0a 20 20 40 20 3c 70 3e  "8766");.  @ <p>
44f0: 54 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 68 6f  The number of ho
4500: 75 72 73 20 66 6f 72 20 77 68 69 63 68 20 61 20  urs for which a 
4510: 6c 6f 67 69 6e 20 69 73 20 76 61 6c 69 64 2e 20  login is valid. 
4520: 20 54 68 69 73 20 6d 75 73 74 20 62 65 20 61 0a   This must be a.
4530: 20 20 40 20 70 6f 73 69 74 69 76 65 20 6e 75 6d    @ positive num
4540: 62 65 72 2e 20 20 54 68 65 20 64 65 66 61 75 6c  ber.  The defaul
4550: 74 20 69 73 20 38 37 36 30 20 68 6f 75 72 73 20  t is 8760 hours 
4560: 77 68 69 63 68 20 69 73 20 61 70 70 72 6f 78 69  which is approxi
4570: 6d 61 74 65 6c 79 20 65 71 75 61 6c 0a 20 20 40  mately equal.  @
4580: 20 74 6f 20 61 20 79 65 61 72 2e 3c 2f 70 3e 0a   to a year.</p>.
4590: 0a 20 20 40 20 3c 68 72 3e 0a 20 20 65 6e 74 72  .  @ <hr>.  entr
45a0: 79 5f 61 74 74 72 69 62 75 74 65 28 22 44 6f 77  y_attribute("Dow
45b0: 6e 6c 6f 61 64 20 70 61 63 6b 65 74 20 6c 69 6d  nload packet lim
45c0: 69 74 22 2c 20 31 30 2c 20 22 6d 61 78 2d 64 6f  it", 10, "max-do
45d0: 77 6e 6c 6f 61 64 22 2c 20 22 6d 78 64 77 6e 22  wnload", "mxdwn"
45e0: 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,.              
45f0: 20 20 20 20 22 35 30 30 30 30 30 30 22 29 3b 0a      "5000000");.
4600: 20 20 40 20 3c 70 3e 46 6f 73 73 69 6c 20 74 72    @ <p>Fossil tr
4610: 69 65 73 20 74 6f 20 6c 69 6d 69 74 20 6f 75 74  ies to limit out
4620: 2d 62 6f 75 6e 64 20 73 79 6e 63 2c 20 63 6c 6f  -bound sync, clo
4630: 6e 65 2c 20 61 6e 64 20 70 75 6c 6c 20 70 61 63  ne, and pull pac
4640: 6b 65 74 73 0a 20 20 40 20 74 6f 20 74 68 69 73  kets.  @ to this
4650: 20 6d 61 6e 79 20 62 79 74 65 73 2c 20 75 6e 63   many bytes, unc
4660: 6f 6d 70 72 65 73 73 65 64 2e 20 20 49 66 20 74  ompressed.  If t
4670: 68 65 20 63 6c 69 65 6e 74 20 72 65 71 75 69 72  he client requir
4680: 65 73 20 6d 6f 72 65 20 64 61 74 61 0a 20 20 40  es more data.  @
4690: 20 74 68 61 6e 20 74 68 69 73 2c 20 74 68 65 6e   than this, then
46a0: 20 74 68 65 20 63 6c 69 65 6e 74 20 77 69 6c 6c   the client will
46b0: 20 69 73 73 75 65 20 6d 75 6c 74 69 70 6c 65 20   issue multiple 
46c0: 48 54 54 50 20 72 65 71 75 65 73 74 73 2e 0a 20  HTTP requests.. 
46d0: 20 40 20 56 61 6c 75 65 73 20 62 65 6c 6f 77 20   @ Values below 
46e0: 31 20 6d 69 6c 6c 69 6f 6e 20 61 72 65 20 6e 6f  1 million are no
46f0: 74 20 72 65 63 6f 6d 6d 65 6e 64 65 64 2e 20 20  t recommended.  
4700: 35 20 6d 69 6c 6c 69 6f 6e 20 69 73 20 61 20 0a  5 million is a .
4710: 20 20 40 20 72 65 61 73 6f 6e 61 62 6c 65 20 6e    @ reasonable n
4720: 75 6d 62 65 72 2e 3c 2f 70 3e 0a 0a 20 20 40 20  umber.</p>..  @ 
4730: 3c 68 72 3e 0a 20 20 40 20 3c 70 3e 3c 69 6e 70  <hr>.  @ <p><inp
4740: 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69 74 22  ut type="submit"
4750: 20 20 6e 61 6d 65 3d 22 73 75 62 6d 69 74 22 20    name="submit" 
4760: 76 61 6c 75 65 3d 22 41 70 70 6c 79 20 43 68 61  value="Apply Cha
4770: 6e 67 65 73 22 3e 3c 2f 70 3e 0a 20 20 40 20 3c  nges"></p>.  @ <
4780: 2f 66 6f 72 6d 3e 0a 20 20 64 62 5f 65 6e 64 5f  /form>.  db_end_
4790: 74 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 3b 0a  transaction(0);.
47a0: 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29    style_footer()
47b0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41  ;.}../*.** WEBPA
47c0: 47 45 3a 20 73 65 74 75 70 5f 74 69 6d 65 6c 69  GE: setup_timeli
47d0: 6e 65 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 75 70  ne.*/.void setup
47e0: 5f 74 69 6d 65 6c 69 6e 65 28 76 6f 69 64 29 7b  _timeline(void){
47f0: 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63  .  login_check_c
4800: 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20  redentials();.  
4810: 69 66 28 20 21 67 2e 6f 6b 53 65 74 75 70 20 29  if( !g.okSetup )
4820: 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64  {.    login_need
4830: 65 64 28 29 3b 0a 20 20 7d 0a 0a 20 20 73 74 79  ed();.  }..  sty
4840: 6c 65 5f 68 65 61 64 65 72 28 22 54 69 6d 65 6c  le_header("Timel
4850: 69 6e 65 20 44 69 73 70 6c 61 79 20 50 72 65 66  ine Display Pref
4860: 65 72 65 6e 63 65 73 22 29 3b 0a 20 20 64 62 5f  erences");.  db_
4870: 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74 69 6f  begin_transactio
4880: 6e 28 29 3b 0a 20 20 40 20 3c 66 6f 72 6d 20 61  n();.  @ <form a
4890: 63 74 69 6f 6e 3d 22 25 73 28 67 2e 7a 42 61 73  ction="%s(g.zBas
48a0: 65 55 52 4c 29 2f 73 65 74 75 70 5f 74 69 6d 65  eURL)/setup_time
48b0: 6c 69 6e 65 22 20 6d 65 74 68 6f 64 3d 22 50 4f  line" method="PO
48c0: 53 54 22 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20  ST">..  @ <hr>. 
48d0: 20 6f 6e 6f 66 66 5f 61 74 74 72 69 62 75 74 65   onoff_attribute
48e0: 28 22 42 6c 6f 63 6b 20 6d 61 72 6b 75 70 20 69  ("Block markup i
48f0: 6e 20 74 69 6d 65 6c 69 6e 65 22 2c 0a 20 20 20  n timeline",.   
4900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22                 "
4910: 74 69 6d 65 6c 69 6e 65 2d 62 6c 6f 63 6b 2d 6d  timeline-block-m
4920: 61 72 6b 75 70 22 2c 20 22 74 62 6d 22 2c 20 30  arkup", "tbm", 0
4930: 29 3b 0a 20 20 40 20 3c 70 3e 49 6e 20 74 69 6d  );.  @ <p>In tim
4940: 65 6c 69 6e 65 20 64 69 73 70 6c 61 79 73 2c 20  eline displays, 
4950: 63 68 65 63 6b 2d 69 6e 20 63 6f 6d 6d 65 6e 74  check-in comment
4960: 73 20 63 61 6e 20 62 65 20 64 69 73 70 6c 61 79  s can be display
4970: 65 64 20 77 69 74 68 20 6f 72 0a 20 20 40 20 77  ed with or.  @ w
4980: 69 74 68 6f 75 74 20 62 6c 6f 63 6b 20 6d 61 72  ithout block mar
4990: 6b 75 70 20 28 70 61 72 61 67 72 61 70 68 73 2c  kup (paragraphs,
49a0: 20 74 61 62 6c 65 73 2c 20 65 74 63 2e 29 3c 2f   tables, etc.)</
49b0: 70 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20 20 65  p>..  @ <hr>.  e
49c0: 6e 74 72 79 5f 61 74 74 72 69 62 75 74 65 28 22  ntry_attribute("
49d0: 4d 61 78 20 74 69 6d 65 6c 69 6e 65 20 63 6f 6d  Max timeline com
49e0: 6d 65 6e 74 20 6c 65 6e 67 74 68 22 2c 20 36 2c  ment length", 6,
49f0: 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   .              
4a00: 20 20 20 20 22 74 69 6d 65 6c 69 6e 65 2d 6d 61      "timeline-ma
4a10: 78 2d 63 6f 6d 6d 65 6e 74 22 2c 20 22 74 6d 63  x-comment", "tmc
4a20: 22 2c 20 22 30 22 29 3b 0a 20 20 40 20 3c 70 3e  ", "0");.  @ <p>
4a30: 54 68 65 20 6d 61 78 69 6d 75 6d 20 6c 65 6e 67  The maximum leng
4a40: 74 68 20 6f 66 20 61 20 63 6f 6d 6d 65 6e 74 20  th of a comment 
4a50: 74 6f 20 62 65 20 64 69 73 70 6c 61 79 65 64 20  to be displayed 
4a60: 69 6e 20 61 20 74 69 6d 65 6c 69 6e 65 2e 0a 20  in a timeline.. 
4a70: 20 40 20 22 30 22 20 74 68 65 72 65 20 69 73 20   @ "0" there is 
4a80: 6e 6f 20 6c 65 6e 67 74 68 20 6c 69 6d 69 74 2e  no length limit.
4a90: 3c 2f 70 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20  </p>..  @ <hr>. 
4aa0: 20 40 20 3c 70 3e 3c 69 6e 70 75 74 20 74 79 70   @ <p><input typ
4ab0: 65 3d 22 73 75 62 6d 69 74 22 20 20 6e 61 6d 65  e="submit"  name
4ac0: 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d  ="submit" value=
4ad0: 22 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e  "Apply Changes">
4ae0: 3c 2f 70 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e  </p>.  @ </form>
4af0: 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61  .  db_end_transa
4b00: 63 74 69 6f 6e 28 30 29 3b 0a 20 20 73 74 79 6c  ction(0);.  styl
4b10: 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f  e_footer();.}../
4b20: 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 73 65  *.** WEBPAGE: se
4b30: 74 75 70 5f 63 6f 6e 66 69 67 0a 2a 2f 0a 76 6f  tup_config.*/.vo
4b40: 69 64 20 73 65 74 75 70 5f 63 6f 6e 66 69 67 28  id setup_config(
4b50: 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f 63  void){.  login_c
4b60: 68 65 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73  heck_credentials
4b70: 28 29 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b 53  ();.  if( !g.okS
4b80: 65 74 75 70 20 29 7b 0a 20 20 20 20 6c 6f 67 69  etup ){.    logi
4b90: 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20 20 7d 0a  n_needed();.  }.
4ba0: 0a 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28  .  style_header(
4bb0: 22 57 57 57 20 43 6f 6e 66 69 67 75 72 61 74 69  "WWW Configurati
4bc0: 6f 6e 22 29 3b 0a 20 20 64 62 5f 62 65 67 69 6e  on");.  db_begin
4bd0: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a  _transaction();.
4be0: 20 20 40 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e    @ <form action
4bf0: 3d 22 25 73 28 67 2e 7a 42 61 73 65 55 52 4c 29  ="%s(g.zBaseURL)
4c00: 2f 73 65 74 75 70 5f 63 6f 6e 66 69 67 22 20 6d  /setup_config" m
4c10: 65 74 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20  ethod="POST">.  
4c20: 40 20 3c 68 72 20 2f 3e 0a 20 20 65 6e 74 72 79  @ <hr />.  entry
4c30: 5f 61 74 74 72 69 62 75 74 65 28 22 50 72 6f 6a  _attribute("Proj
4c40: 65 63 74 20 4e 61 6d 65 22 2c 20 36 30 2c 20 22  ect Name", 60, "
4c50: 70 72 6f 6a 65 63 74 2d 6e 61 6d 65 22 2c 20 22  project-name", "
4c60: 70 6e 22 2c 20 22 22 29 3b 0a 20 20 40 20 3c 70  pn", "");.  @ <p
4c70: 3e 47 69 76 65 20 79 6f 75 72 20 70 72 6f 6a 65  >Give your proje
4c80: 63 74 20 61 20 6e 61 6d 65 20 73 6f 20 76 69 73  ct a name so vis
4c90: 69 74 6f 72 73 20 6b 6e 6f 77 20 77 68 61 74 20  itors know what 
4ca0: 74 68 69 73 20 73 69 74 65 20 69 73 20 61 62 6f  this site is abo
4cb0: 75 74 2e 0a 20 20 40 20 54 68 65 20 70 72 6f 6a  ut..  @ The proj
4cc0: 65 63 74 20 6e 61 6d 65 20 77 69 6c 6c 20 61 6c  ect name will al
4cd0: 73 6f 20 62 65 20 75 73 65 64 20 61 73 20 74 68  so be used as th
4ce0: 65 20 52 53 53 20 66 65 65 64 20 74 69 74 6c 65  e RSS feed title
4cf0: 2e 3c 2f 70 3e 0a 20 20 40 20 3c 68 72 20 2f 3e  .</p>.  @ <hr />
4d00: 0a 20 20 74 65 78 74 61 72 65 61 5f 61 74 74 72  .  textarea_attr
4d10: 69 62 75 74 65 28 22 50 72 6f 6a 65 63 74 20 44  ibute("Project D
4d20: 65 73 63 72 69 70 74 69 6f 6e 22 2c 20 35 2c 20  escription", 5, 
4d30: 36 30 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  60,.            
4d40: 20 20 20 20 20 20 20 20 20 22 70 72 6f 6a 65 63           "projec
4d50: 74 2d 64 65 73 63 72 69 70 74 69 6f 6e 22 2c 20  t-description", 
4d60: 22 70 64 22 2c 20 22 22 29 3b 0a 20 20 40 20 3c  "pd", "");.  @ <
4d70: 70 3e 44 65 73 63 72 69 62 65 20 79 6f 75 72 20  p>Describe your 
4d80: 70 72 6f 6a 65 63 74 2e 20 54 68 69 73 20 77 69  project. This wi
4d90: 6c 6c 20 62 65 20 75 73 65 64 20 69 6e 20 70 61  ll be used in pa
4da0: 67 65 20 68 65 61 64 65 72 73 20 66 6f 72 20 73  ge headers for s
4db0: 65 61 72 63 68 0a 20 20 40 20 65 6e 67 69 6e 65  earch.  @ engine
4dc0: 73 20 61 73 20 77 65 6c 6c 20 61 73 20 61 20 73  s as well as a s
4dd0: 68 6f 72 74 20 52 53 53 20 64 65 73 63 72 69 70  hort RSS descrip
4de0: 74 69 6f 6e 2e 3c 2f 70 3e 0a 20 20 40 20 3c 68  tion.</p>.  @ <h
4df0: 72 20 2f 3e 0a 20 20 65 6e 74 72 79 5f 61 74 74  r />.  entry_att
4e00: 72 69 62 75 74 65 28 22 49 6e 64 65 78 20 50 61  ribute("Index Pa
4e10: 67 65 22 2c 20 36 30 2c 20 22 69 6e 64 65 78 2d  ge", 60, "index-
4e20: 70 61 67 65 22 2c 20 22 69 64 78 70 67 22 2c 20  page", "idxpg", 
4e30: 22 2f 68 6f 6d 65 22 29 3b 0a 20 20 40 20 3c 70  "/home");.  @ <p
4e40: 3e 45 6e 74 65 72 20 74 68 65 20 70 61 74 68 6e  >Enter the pathn
4e50: 61 6d 65 20 6f 66 20 74 68 65 20 70 61 67 65 20  ame of the page 
4e60: 74 6f 20 64 69 73 70 6c 61 79 20 77 68 65 6e 20  to display when 
4e70: 74 68 65 20 22 48 6f 6d 65 22 20 6d 65 6e 75 0a  the "Home" menu.
4e80: 20 20 40 20 6f 70 74 69 6f 6e 20 69 73 20 73 65    @ option is se
4e90: 6c 65 63 74 65 64 20 61 6e 64 20 77 68 65 6e 20  lected and when 
4ea0: 6e 6f 20 70 61 74 68 6e 61 6d 65 20 69 73 0a 20  no pathname is. 
4eb0: 20 40 20 73 70 65 63 69 66 69 65 64 20 69 6e 20   @ specified in 
4ec0: 74 68 65 20 55 52 4c 2e 20 20 46 6f 72 20 65 78  the URL.  For ex
4ed0: 61 6d 70 6c 65 2c 20 69 66 20 79 6f 75 20 76 69  ample, if you vi
4ee0: 73 69 74 20 74 68 65 20 75 72 6c 3a 3c 2f 70 3e  sit the url:</p>
4ef0: 0a 20 20 40 0a 20 20 40 20 3c 62 6c 6f 63 6b 71  .  @.  @ <blockq
4f00: 75 6f 74 65 3e 25 68 28 67 2e 7a 42 61 73 65 55  uote>%h(g.zBaseU
4f10: 52 4c 29 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e  RL)</blockquote>
4f20: 0a 20 20 40 0a 20 20 40 20 3c 70 3e 41 6e 64 20  .  @.  @ <p>And 
4f30: 79 6f 75 20 68 61 76 65 20 73 70 65 63 69 66 69  you have specifi
4f40: 65 64 20 61 6e 20 69 6e 64 65 78 20 70 61 67 65  ed an index page
4f50: 20 6f 66 20 22 2f 68 6f 6d 65 22 20 74 68 65 20   of "/home" the 
4f60: 61 62 6f 76 65 20 77 69 6c 6c 0a 20 20 40 20 61  above will.  @ a
4f70: 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 72 65 64  utomatically red
4f80: 69 72 65 63 74 20 74 6f 3a 3c 2f 70 3e 0a 20 20  irect to:</p>.  
4f90: 40 0a 20 20 40 20 3c 62 6c 6f 63 6b 71 75 6f 74  @.  @ <blockquot
4fa0: 65 3e 25 68 28 67 2e 7a 42 61 73 65 55 52 4c 29  e>%h(g.zBaseURL)
4fb0: 2f 68 6f 6d 65 3c 2f 62 6c 6f 63 6b 71 75 6f 74  /home</blockquot
4fc0: 65 3e 0a 20 20 40 0a 20 20 40 20 3c 70 3e 54 68  e>.  @.  @ <p>Th
4fd0: 65 20 64 65 66 61 75 6c 74 20 22 2f 68 6f 6d 65  e default "/home
4fe0: 22 20 70 61 67 65 20 64 69 73 70 6c 61 79 73 20  " page displays 
4ff0: 61 20 57 69 6b 69 20 70 61 67 65 20 77 69 74 68  a Wiki page with
5000: 20 74 68 65 20 73 61 6d 65 20 6e 61 6d 65 0a 20   the same name. 
5010: 20 40 20 61 73 20 74 68 65 20 50 72 6f 6a 65 63   @ as the Projec
5020: 74 20 4e 61 6d 65 20 73 70 65 63 69 66 69 65 64  t Name specified
5030: 20 61 62 6f 76 65 2e 20 20 53 6f 6d 65 20 73 69   above.  Some si
5040: 74 65 73 20 70 72 65 66 65 72 20 74 6f 20 72 65  tes prefer to re
5050: 64 69 72 65 63 74 0a 20 20 40 20 74 6f 20 61 20  direct.  @ to a 
5060: 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 61  documentation pa
5070: 67 65 20 28 65 78 3a 20 22 2f 64 6f 63 2f 74 69  ge (ex: "/doc/ti
5080: 70 2f 69 6e 64 65 78 2e 77 69 6b 69 22 29 20 6f  p/index.wiki") o
5090: 72 20 74 6f 20 22 2f 74 69 6d 65 6c 69 6e 65 22  r to "/timeline"
50a0: 2e 3c 2f 70 3e 0a 20 20 40 20 3c 68 72 20 2f 3e  .</p>.  @ <hr />
50b0: 0a 20 20 40 20 3c 70 3e 3c 69 6e 70 75 74 20 74  .  @ <p><input t
50c0: 79 70 65 3d 22 73 75 62 6d 69 74 22 20 20 6e 61  ype="submit"  na
50d0: 6d 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75  me="submit" valu
50e0: 65 3d 22 41 70 70 6c 79 20 43 68 61 6e 67 65 73  e="Apply Changes
50f0: 22 3e 3c 2f 70 3e 0a 20 20 40 20 3c 2f 66 6f 72  "></p>.  @ </for
5100: 6d 3e 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e  m>.  db_end_tran
5110: 73 61 63 74 69 6f 6e 28 30 29 3b 0a 20 20 73 74  saction(0);.  st
5120: 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a  yle_footer();.}.
5130: 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20  ./*.** WEBPAGE: 
5140: 73 65 74 75 70 5f 65 64 69 74 63 73 73 0a 2a 2f  setup_editcss.*/
5150: 0a 76 6f 69 64 20 73 65 74 75 70 5f 65 64 69 74  .void setup_edit
5160: 63 73 73 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67  css(void){.  log
5170: 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74  in_check_credent
5180: 69 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67  ials();.  if( !g
5190: 2e 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20  .okSetup ){.    
51a0: 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a  login_needed();.
51b0: 20 20 7d 0a 20 20 73 74 79 6c 65 5f 68 65 61 64    }.  style_head
51c0: 65 72 28 22 45 64 69 74 20 43 53 53 22 29 3b 0a  er("Edit CSS");.
51d0: 20 20 40 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e    @ <form action
51e0: 3d 22 25 73 28 67 2e 7a 42 61 73 65 55 52 4c 29  ="%s(g.zBaseURL)
51f0: 2f 73 65 74 75 70 5f 65 64 69 74 63 73 73 22 20  /setup_editcss" 
5200: 6d 65 74 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 20  method="POST">. 
5210: 20 40 20 45 64 69 74 20 74 68 65 20 43 53 53 3a   @ Edit the CSS:
5220: 3c 62 72 20 2f 3e 0a 20 20 74 65 78 74 61 72 65  <br />.  textare
5230: 61 5f 61 74 74 72 69 62 75 74 65 28 22 22 2c 20  a_attribute("", 
5240: 34 30 2c 20 38 30 2c 20 22 63 73 73 22 2c 20 22  40, 80, "css", "
5250: 63 73 73 22 2c 20 7a 44 65 66 61 75 6c 74 43 53  css", zDefaultCS
5260: 53 29 3b 0a 20 20 40 20 3c 62 72 20 2f 3e 0a 20  S);.  @ <br />. 
5270: 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22   @ <input type="
5280: 73 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 73 75  submit" name="su
5290: 62 6d 69 74 22 20 76 61 6c 75 65 3d 22 41 70 70  bmit" value="App
52a0: 6c 79 20 43 68 61 6e 67 65 73 22 3e 0a 20 20 40  ly Changes">.  @
52b0: 20 3c 2f 66 6f 72 6d 3e 0a 20 20 40 20 3c 68 72   </form>.  @ <hr
52c0: 3e 0a 20 20 40 20 48 65 72 65 20 69 73 20 74 68  >.  @ Here is th
52d0: 65 20 64 65 66 61 75 6c 74 20 43 53 53 3a 0a 20  e default CSS:. 
52e0: 20 40 20 3c 62 6c 6f 63 6b 71 75 6f 74 65 3e 3c   @ <blockquote><
52f0: 70 72 65 3e 0a 20 20 40 20 25 68 28 7a 44 65 66  pre>.  @ %h(zDef
5300: 61 75 6c 74 43 53 53 29 0a 20 20 40 20 3c 2f 70  aultCSS).  @ </p
5310: 72 65 3e 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e  re></blockquote>
5320: 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28  .  style_footer(
5330: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50  );.}../*.** WEBP
5340: 41 47 45 3a 20 73 65 74 75 70 5f 68 65 61 64 65  AGE: setup_heade
5350: 72 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 75 70 5f  r.*/.void setup_
5360: 68 65 61 64 65 72 28 76 6f 69 64 29 7b 0a 20 20  header(void){.  
5370: 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64  login_check_cred
5380: 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 28  entials();.  if(
5390: 20 21 67 2e 6f 6b 53 65 74 75 70 20 29 7b 0a 20   !g.okSetup ){. 
53a0: 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28     login_needed(
53b0: 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 62 65 67 69  );.  }.  db_begi
53c0: 6e 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b  n_transaction();
53d0: 0a 20 20 69 66 28 20 50 28 22 63 6c 65 61 72 22  .  if( P("clear"
53e0: 29 21 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f 6d  )!=0 ){.    db_m
53f0: 75 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 54  ulti_exec("DELET
5400: 45 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48  E FROM config WH
5410: 45 52 45 20 6e 61 6d 65 3d 27 68 65 61 64 65 72  ERE name='header
5420: 27 22 29 3b 0a 20 20 20 20 63 67 69 5f 72 65 70  '");.    cgi_rep
5430: 6c 61 63 65 5f 70 61 72 61 6d 65 74 65 72 28 22  lace_parameter("
5440: 68 65 61 64 65 72 22 2c 20 7a 44 65 66 61 75 6c  header", zDefaul
5450: 74 48 65 61 64 65 72 29 3b 0a 20 20 7d 65 6c 73  tHeader);.  }els
5460: 65 7b 0a 20 20 20 20 74 65 78 74 61 72 65 61 5f  e{.    textarea_
5470: 61 74 74 72 69 62 75 74 65 28 30 2c 20 30 2c 20  attribute(0, 0, 
5480: 30 2c 20 22 68 65 61 64 65 72 22 2c 20 22 68 65  0, "header", "he
5490: 61 64 65 72 22 2c 20 7a 44 65 66 61 75 6c 74 48  ader", zDefaultH
54a0: 65 61 64 65 72 29 3b 0a 20 20 7d 0a 20 20 73 74  eader);.  }.  st
54b0: 79 6c 65 5f 68 65 61 64 65 72 28 22 45 64 69 74  yle_header("Edit
54c0: 20 50 61 67 65 20 48 65 61 64 65 72 22 29 3b 0a   Page Header");.
54d0: 20 20 40 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e    @ <form action
54e0: 3d 22 25 73 28 67 2e 7a 42 61 73 65 55 52 4c 29  ="%s(g.zBaseURL)
54f0: 2f 73 65 74 75 70 5f 68 65 61 64 65 72 22 20 6d  /setup_header" m
5500: 65 74 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20  ethod="POST">.  
5510: 40 20 3c 70 3e 45 64 69 74 20 48 54 4d 4c 20 74  @ <p>Edit HTML t
5520: 65 78 74 20 77 69 74 68 20 65 6d 62 65 64 64 65  ext with embedde
5530: 64 20 54 48 31 20 28 61 20 54 43 4c 20 64 69 61  d TH1 (a TCL dia
5540: 6c 65 63 74 29 20 74 68 61 74 20 77 69 6c 6c 20  lect) that will 
5550: 62 65 20 75 73 65 64 20 74 6f 0a 20 20 40 20 67  be used to.  @ g
5560: 65 6e 65 72 61 74 65 20 74 68 65 20 62 65 67 69  enerate the begi
5570: 6e 6e 69 6e 67 20 6f 66 20 65 76 65 72 79 20 70  nning of every p
5580: 61 67 65 20 74 68 72 6f 75 67 68 20 73 74 61 72  age through star
5590: 74 20 6f 66 20 74 68 65 20 6d 61 69 6e 0a 20 20  t of the main.  
55a0: 40 20 6d 65 6e 75 2e 3c 2f 70 3e 0a 20 20 74 65  @ menu.</p>.  te
55b0: 78 74 61 72 65 61 5f 61 74 74 72 69 62 75 74 65  xtarea_attribute
55c0: 28 22 22 2c 20 34 30 2c 20 38 30 2c 20 22 68 65  ("", 40, 80, "he
55d0: 61 64 65 72 22 2c 20 22 68 65 61 64 65 72 22 2c  ader", "header",
55e0: 20 7a 44 65 66 61 75 6c 74 48 65 61 64 65 72 29   zDefaultHeader)
55f0: 3b 0a 20 20 40 20 3c 62 72 20 2f 3e 0a 20 20 40  ;.  @ <br />.  @
5600: 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 73 75   <input type="su
5610: 62 6d 69 74 22 20 6e 61 6d 65 3d 22 73 75 62 6d  bmit" name="subm
5620: 69 74 22 20 76 61 6c 75 65 3d 22 41 70 70 6c 79  it" value="Apply
5630: 20 43 68 61 6e 67 65 73 22 3e 0a 20 20 40 20 3c   Changes">.  @ <
5640: 69 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62 6d  input type="subm
5650: 69 74 22 20 6e 61 6d 65 3d 22 63 6c 65 61 72 22  it" name="clear"
5660: 20 76 61 6c 75 65 3d 22 52 65 76 65 72 74 20 54   value="Revert T
5670: 6f 20 44 65 66 61 75 6c 74 22 3e 0a 20 20 40 20  o Default">.  @ 
5680: 3c 2f 66 6f 72 6d 3e 0a 20 20 40 20 3c 68 72 3e  </form>.  @ <hr>
5690: 0a 20 20 40 20 48 65 72 65 20 69 73 20 74 68 65  .  @ Here is the
56a0: 20 64 65 66 61 75 6c 74 20 70 61 67 65 20 68 65   default page he
56b0: 61 64 65 72 3a 0a 20 20 40 20 3c 62 6c 6f 63 6b  ader:.  @ <block
56c0: 71 75 6f 74 65 3e 3c 70 72 65 3e 0a 20 20 40 20  quote><pre>.  @ 
56d0: 25 68 28 7a 44 65 66 61 75 6c 74 48 65 61 64 65  %h(zDefaultHeade
56e0: 72 29 0a 20 20 40 20 3c 2f 70 72 65 3e 3c 2f 62  r).  @ </pre></b
56f0: 6c 6f 63 6b 71 75 6f 74 65 3e 0a 20 20 64 62 5f  lockquote>.  db_
5700: 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28  end_transaction(
5710: 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42  0);.}../*.** WEB
5720: 50 41 47 45 3a 20 73 65 74 75 70 5f 66 6f 6f 74  PAGE: setup_foot
5730: 65 72 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 75 70  er.*/.void setup
5740: 5f 66 6f 6f 74 65 72 28 76 6f 69 64 29 7b 0a 20  _footer(void){. 
5750: 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65   login_check_cre
5760: 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66  dentials();.  if
5770: 28 20 21 67 2e 6f 6b 53 65 74 75 70 20 29 7b 0a  ( !g.okSetup ){.
5780: 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64      login_needed
5790: 28 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 62 65 67  ();.  }.  db_beg
57a0: 69 6e 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29  in_transaction()
57b0: 3b 0a 20 20 69 66 28 20 50 28 22 63 6c 65 61 72  ;.  if( P("clear
57c0: 22 29 21 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f  ")!=0 ){.    db_
57d0: 6d 75 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45  multi_exec("DELE
57e0: 54 45 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57  TE FROM config W
57f0: 48 45 52 45 20 6e 61 6d 65 3d 27 66 6f 6f 74 65  HERE name='foote
5800: 72 27 22 29 3b 0a 20 20 20 20 63 67 69 5f 72 65  r'");.    cgi_re
5810: 70 6c 61 63 65 5f 70 61 72 61 6d 65 74 65 72 28  place_parameter(
5820: 22 66 6f 6f 74 65 72 22 2c 20 7a 44 65 66 61 75  "footer", zDefau
5830: 6c 74 46 6f 6f 74 65 72 29 3b 0a 20 20 7d 65 6c  ltFooter);.  }el
5840: 73 65 7b 0a 20 20 20 20 74 65 78 74 61 72 65 61  se{.    textarea
5850: 5f 61 74 74 72 69 62 75 74 65 28 30 2c 20 30 2c  _attribute(0, 0,
5860: 20 30 2c 20 22 66 6f 6f 74 65 72 22 2c 20 22 66   0, "footer", "f
5870: 6f 6f 74 65 72 22 2c 20 7a 44 65 66 61 75 6c 74  ooter", zDefault
5880: 46 6f 6f 74 65 72 29 3b 0a 20 20 7d 0a 20 20 73  Footer);.  }.  s
5890: 74 79 6c 65 5f 68 65 61 64 65 72 28 22 45 64 69  tyle_header("Edi
58a0: 74 20 50 61 67 65 20 46 6f 6f 74 65 72 22 29 3b  t Page Footer");
58b0: 0a 20 20 40 20 3c 66 6f 72 6d 20 61 63 74 69 6f  .  @ <form actio
58c0: 6e 3d 22 25 73 28 67 2e 7a 42 61 73 65 55 52 4c  n="%s(g.zBaseURL
58d0: 29 2f 73 65 74 75 70 5f 66 6f 6f 74 65 72 22 20  )/setup_footer" 
58e0: 6d 65 74 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 20  method="POST">. 
58f0: 20 40 20 3c 70 3e 45 64 69 74 20 48 54 4d 4c 20   @ <p>Edit HTML 
5900: 74 65 78 74 20 77 69 74 68 20 65 6d 62 65 64 64  text with embedd
5910: 65 64 20 54 48 31 20 28 61 20 54 43 4c 20 64 69  ed TH1 (a TCL di
5920: 61 6c 65 63 74 29 20 74 68 61 74 20 77 69 6c 6c  alect) that will
5930: 20 62 65 20 75 73 65 64 20 74 6f 0a 20 20 40 20   be used to.  @ 
5940: 67 65 6e 65 72 61 74 65 20 74 68 65 20 65 6e 64  generate the end
5950: 20 6f 66 20 65 76 65 72 79 20 70 61 67 65 2e 3c   of every page.<
5960: 2f 70 3e 0a 20 20 74 65 78 74 61 72 65 61 5f 61  /p>.  textarea_a
5970: 74 74 72 69 62 75 74 65 28 22 22 2c 20 32 30 2c  ttribute("", 20,
5980: 20 38 30 2c 20 22 66 6f 6f 74 65 72 22 2c 20 22   80, "footer", "
5990: 66 6f 6f 74 65 72 22 2c 20 7a 44 65 66 61 75 6c  footer", zDefaul
59a0: 74 46 6f 6f 74 65 72 29 3b 0a 20 20 40 20 3c 62  tFooter);.  @ <b
59b0: 72 20 2f 3e 0a 20 20 40 20 3c 69 6e 70 75 74 20  r />.  @ <input 
59c0: 74 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61  type="submit" na
59d0: 6d 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75  me="submit" valu
59e0: 65 3d 22 41 70 70 6c 79 20 43 68 61 6e 67 65 73  e="Apply Changes
59f0: 22 3e 0a 20 20 40 20 3c 69 6e 70 75 74 20 74 79  ">.  @ <input ty
5a00: 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d 65  pe="submit" name
5a10: 3d 22 63 6c 65 61 72 22 20 76 61 6c 75 65 3d 22  ="clear" value="
5a20: 52 65 76 65 72 74 20 54 6f 20 44 65 66 61 75 6c  Revert To Defaul
5a30: 74 22 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a  t">.  @ </form>.
5a40: 20 20 40 20 3c 68 72 3e 0a 20 20 40 20 48 65 72    @ <hr>.  @ Her
5a50: 65 20 69 73 20 74 68 65 20 64 65 66 61 75 6c 74  e is the default
5a60: 20 70 61 67 65 20 66 6f 6f 74 65 72 3a 0a 20 20   page footer:.  
5a70: 40 20 3c 62 6c 6f 63 6b 71 75 6f 74 65 3e 3c 70  @ <blockquote><p
5a80: 72 65 3e 0a 20 20 40 20 25 68 28 7a 44 65 66 61  re>.  @ %h(zDefa
5a90: 75 6c 74 46 6f 6f 74 65 72 29 0a 20 20 40 20 3c  ultFooter).  @ <
5aa0: 2f 70 72 65 3e 3c 2f 62 6c 6f 63 6b 71 75 6f 74  /pre></blockquot
5ab0: 65 3e 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e  e>.  db_end_tran
5ac0: 73 61 63 74 69 6f 6e 28 30 29 3b 0a 7d 0a 0a 2f  saction(0);.}../
5ad0: 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 73 65  *.** WEBPAGE: se
5ae0: 74 75 70 5f 74 69 63 6b 65 74 0a 2a 2f 0a 76 6f  tup_ticket.*/.vo
5af0: 69 64 20 73 65 74 75 70 5f 74 69 63 6b 65 74 28  id setup_ticket(
5b00: 76 6f 69 64 29 7b 0a 20 20 63 6f 6e 73 74 20 63  void){.  const c
5b10: 68 61 72 20 2a 7a 43 6f 6e 66 69 67 3b 0a 20 20  har *zConfig;.  
5b20: 69 6e 74 20 69 73 53 75 62 6d 69 74 3b 0a 20 20  int isSubmit;.  
5b30: 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63  .  login_check_c
5b40: 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20  redentials();.  
5b50: 69 66 28 20 21 67 2e 6f 6b 53 65 74 75 70 20 29  if( !g.okSetup )
5b60: 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64  {.    login_need
5b70: 65 64 28 29 3b 0a 20 20 7d 0a 20 20 69 73 53 75  ed();.  }.  isSu
5b80: 62 6d 69 74 20 3d 20 50 28 22 73 75 62 6d 69 74  bmit = P("submit
5b90: 22 29 21 3d 30 3b 0a 20 20 64 62 5f 62 65 67 69  ")!=0;.  db_begi
5ba0: 6e 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b  n_transaction();
5bb0: 0a 20 20 7a 43 6f 6e 66 69 67 20 3d 20 50 28 22  .  zConfig = P("
5bc0: 63 66 67 22 29 3b 0a 20 20 69 66 28 20 7a 43 6f  cfg");.  if( zCo
5bd0: 6e 66 69 67 3d 3d 30 20 29 7b 0a 20 20 20 20 7a  nfig==0 ){.    z
5be0: 43 6f 6e 66 69 67 20 3d 20 64 62 5f 74 65 78 74  Config = db_text
5bf0: 28 28 63 68 61 72 2a 29 7a 44 65 66 61 75 6c 74  ((char*)zDefault
5c00: 54 69 63 6b 65 74 43 6f 6e 66 69 67 2c 0a 20 20  TicketConfig,.  
5c10: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 45               "SE
5c20: 4c 45 43 54 20 76 61 6c 75 65 20 46 52 4f 4d 20  LECT value FROM 
5c30: 63 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d  config WHERE nam
5c40: 65 3d 27 74 69 63 6b 65 74 2d 63 6f 6e 66 69 67  e='ticket-config
5c50: 75 72 61 74 69 6f 6e 27 22 29 3b 0a 20 20 7d 0a  uration'");.  }.
5c60: 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 22    style_header("
5c70: 45 64 69 74 20 54 69 63 6b 65 74 20 43 6f 6e 66  Edit Ticket Conf
5c80: 69 67 75 72 61 74 69 6f 6e 22 29 3b 0a 20 20 69  iguration");.  i
5c90: 66 28 20 50 28 22 63 6c 65 61 72 22 29 21 3d 30  f( P("clear")!=0
5ca0: 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69   ){.    db_multi
5cb0: 5f 65 78 65 63 28 22 44 45 4c 45 54 45 20 46 52  _exec("DELETE FR
5cc0: 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45 20  OM config WHERE 
5cd0: 6e 61 6d 65 3d 27 74 69 63 6b 65 74 2d 63 6f 6e  name='ticket-con
5ce0: 66 69 67 75 72 61 74 69 6f 6e 27 22 29 3b 0a 20  figuration'");. 
5cf0: 20 20 20 7a 43 6f 6e 66 69 67 20 3d 20 7a 44 65     zConfig = zDe
5d00: 66 61 75 6c 74 54 69 63 6b 65 74 43 6f 6e 66 69  faultTicketConfi
5d10: 67 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 69  g;.  }else if( i
5d20: 73 53 75 62 6d 69 74 20 29 7b 0a 20 20 20 20 63  sSubmit ){.    c
5d30: 68 61 72 20 2a 7a 45 72 72 20 3d 20 74 69 63 6b  har *zErr = tick
5d40: 65 74 5f 63 6f 6e 66 69 67 5f 63 68 65 63 6b 28  et_config_check(
5d50: 7a 43 6f 6e 66 69 67 29 3b 0a 20 20 20 20 69 66  zConfig);.    if
5d60: 28 20 7a 45 72 72 3d 3d 30 20 29 7b 0a 20 20 20  ( zErr==0 ){.   
5d70: 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63     db_multi_exec
5d80: 28 0a 20 20 20 20 20 20 20 20 20 22 52 45 50 4c  (.         "REPL
5d90: 41 43 45 20 49 4e 54 4f 20 63 6f 6e 66 69 67 28  ACE INTO config(
5da0: 6e 61 6d 65 2c 76 61 6c 75 65 29 20 56 41 4c 55  name,value) VALU
5db0: 45 53 28 27 74 69 63 6b 65 74 2d 63 6f 6e 66 69  ES('ticket-confi
5dc0: 67 75 72 61 74 69 6f 6e 27 2c 22 0a 20 20 20 20  guration',".    
5dd0: 20 20 20 20 20 22 25 51 29 22 2c 20 7a 43 6f 6e       "%Q)", zCon
5de0: 66 69 67 0a 20 20 20 20 20 20 29 3b 0a 20 20 20  fig.      );.   
5df0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 40 20   }else{.      @ 
5e00: 3c 70 3e 3c 66 6f 6e 74 20 63 6f 6c 6f 72 3d 22  <p><font color="
5e10: 72 65 64 22 3e 3c 62 3e 0a 20 20 20 20 20 20 40  red"><b>.      @
5e20: 20 53 43 52 49 50 54 20 45 52 52 4f 52 3a 20 25   SCRIPT ERROR: %
5e30: 68 28 7a 45 72 72 29 0a 20 20 20 20 20 20 40 20  h(zErr).      @ 
5e40: 3c 2f 62 3e 3c 2f 66 6f 6e 74 3e 3c 2f 70 3e 0a  </b></font></p>.
5e50: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 40 20 3c 66      }.  }.  @ <f
5e60: 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73 28 67  orm action="%s(g
5e70: 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65 74 75 70  .zBaseURL)/setup
5e80: 5f 74 69 63 6b 65 74 22 20 6d 65 74 68 6f 64 3d  _ticket" method=
5e90: 22 50 4f 53 54 22 3e 0a 20 20 40 20 3c 70 3e 45  "POST">.  @ <p>E
5ea0: 64 69 74 20 74 68 65 20 54 48 31 20 73 63 72 69  dit the TH1 scri
5eb0: 70 74 20 74 68 61 74 20 64 65 66 69 6e 65 73 20  pt that defines 
5ec0: 74 68 65 20 74 69 63 6b 65 74 69 6e 67 0a 20 20  the ticketing.  
5ed0: 40 20 73 79 73 74 65 6d 20 73 65 74 75 70 20 66  @ system setup f
5ee0: 6f 72 20 74 68 69 73 20 73 65 72 76 65 72 2e 3c  or this server.<
5ef0: 2f 70 3e 0a 20 20 40 20 3c 74 65 78 74 61 72 65  /p>.  @ <textare
5f00: 61 20 6e 61 6d 65 3d 22 63 66 67 22 20 72 6f 77  a name="cfg" row
5f10: 73 3d 22 34 30 22 20 63 6f 6c 73 3d 22 38 30 22  s="40" cols="80"
5f20: 3e 25 68 28 7a 43 6f 6e 66 69 67 29 3c 2f 74 65  >%h(zConfig)</te
5f30: 78 74 61 72 65 61 3e 0a 20 20 40 20 3c 62 72 20  xtarea>.  @ <br 
5f40: 2f 3e 0a 20 20 40 20 3c 69 6e 70 75 74 20 74 79  />.  @ <input ty
5f50: 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d 65  pe="submit" name
5f60: 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d  ="submit" value=
5f70: 22 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e  "Apply Changes">
5f80: 0a 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65  .  @ <input type
5f90: 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22  ="submit" name="
5fa0: 63 6c 65 61 72 22 20 76 61 6c 75 65 3d 22 52 65  clear" value="Re
5fb0: 76 65 72 74 20 54 6f 20 44 65 66 61 75 6c 74 22  vert To Default"
5fc0: 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20  >.  @ </form>.  
5fd0: 40 20 3c 68 72 3e 0a 20 20 40 20 48 65 72 65 20  @ <hr>.  @ Here 
5fe0: 69 73 20 74 68 65 20 64 65 66 61 75 6c 74 20 74  is the default t
5ff0: 69 63 6b 65 74 20 63 6f 6e 66 69 67 75 72 61 74  icket configurat
6000: 69 6f 6e 3a 0a 20 20 40 20 3c 62 6c 6f 63 6b 71  ion:.  @ <blockq
6010: 75 6f 74 65 3e 3c 70 72 65 3e 0a 20 20 40 20 25  uote><pre>.  @ %
6020: 68 28 7a 44 65 66 61 75 6c 74 54 69 63 6b 65 74  h(zDefaultTicket
6030: 43 6f 6e 66 69 67 29 0a 20 20 40 20 3c 2f 70 72  Config).  @ </pr
6040: 65 3e 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e 0a  e></blockquote>.
6050: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63    db_end_transac
6060: 74 69 6f 6e 28 30 29 3b 0a 7d 0a                 tion(0);.}.