Hex Artifact Content
Not logged in

Artifact b37cc86b525cad1bd4a603562f976f450fef96fd:

File src/setup.c part of check-in [f8831f447a] - Allow Admin user to changes user information. Add a "User" link on the main menu for Admin users. by drh on 2008-07-19 16:03:02.

0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20  /*.** Copyright 
0010: 28 63 29 20 32 30 30 37 20 44 2e 20 52 69 63 68  (c) 2007 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54  ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66  his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f  ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75  u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20  te it and/or.** 
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20  modify it under 
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65  the terms of the
0090: 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62   GNU General Pub
00a0: 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61  lic.** License a
00b0: 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 20 74  s published by t
00c0: 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65  he Free Software
00d0: 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74   Foundation; eit
00e0: 68 65 72 0a 2a 2a 20 76 65 72 73 69 6f 6e 20 32  her.** version 2
00f0: 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c   of the License,
0100: 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74   or (at your opt
0110: 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76  ion) any later v
0120: 65 72 73 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68  ersion..**.** Th
0130: 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69  is program is di
0140: 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65  stributed in the
0150: 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69   hope that it wi
0160: 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a  ll be useful,.**
0170: 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59   but WITHOUT ANY
0180: 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f   WARRANTY; witho
0190: 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c  ut even the impl
01a0: 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a  ied warranty of.
01b0: 2a 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49  ** MERCHANTABILI
01c0: 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f  TY or FITNESS FO
01d0: 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50  R A PARTICULAR P
01e0: 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65  URPOSE.  See the
01f0: 20 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20   GNU.** General 
0200: 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66  Public License f
0210: 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e  or more details.
0220: 0a 2a 2a 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 6c  .**.** You shoul
0230: 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20  d have received 
0240: 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e  a copy of the GN
0250: 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63  U General Public
0260: 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e  .** License alon
0270: 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72  g with this libr
0280: 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69  ary; if not, wri
0290: 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65  te to the.** Fre
02a0: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
02b0: 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20  ation, Inc., 59 
02c0: 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53  Temple Place - S
02d0: 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73  uite 330,.** Bos
02e0: 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31  ton, MA  02111-1
02f0: 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20  307, USA..**.** 
0300: 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69  Author contact i
0310: 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20  nformation:.**  
0320: 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a   drh@hwaci.com.*
0330: 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68  *   http://www.h
0340: 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a  waci.com/drh/.**
0350: 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  .***************
0360: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0370: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0380: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0390: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
03a0: 0a 2a 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  .**.** Implement
03b0: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 53 65 74  ation of the Set
03c0: 75 70 20 70 61 67 65 0a 2a 2f 0a 23 69 6e 63 6c  up page.*/.#incl
03d0: 75 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a 23  ude <assert.h>.#
03e0: 69 6e 63 6c 75 64 65 20 22 63 6f 6e 66 69 67 2e  include "config.
03f0: 68 22 0a 23 69 6e 63 6c 75 64 65 20 22 73 65 74  h".#include "set
0400: 75 70 2e 68 22 0a 0a 0a 2f 2a 0a 2a 2a 20 4f 75  up.h".../*.** Ou
0410: 74 70 75 74 20 61 20 73 69 6e 67 6c 65 20 65 6e  tput a single en
0420: 74 72 79 20 66 6f 72 20 61 20 6d 65 6e 75 20 67  try for a menu g
0430: 65 6e 65 72 61 74 65 64 20 75 73 69 6e 67 20 61  enerated using a
0440: 6e 20 48 54 4d 4c 20 74 61 62 6c 65 2e 0a 2a 2a  n HTML table..**
0450: 20 49 66 20 7a 4c 69 6e 6b 20 69 73 20 6e 6f 74   If zLink is not
0460: 20 4e 55 4c 4c 20 6f 72 20 61 6e 20 65 6d 70 74   NULL or an empt
0470: 79 20 73 74 72 69 6e 67 2c 20 74 68 65 6e 20 69  y string, then i
0480: 74 20 69 73 20 74 68 65 20 70 61 67 65 20 74 68  t is the page th
0490: 61 74 0a 2a 2a 20 74 68 65 20 6d 65 6e 75 20 65  at.** the menu e
04a0: 6e 74 72 79 20 77 69 6c 6c 20 68 79 70 65 72 6c  ntry will hyperl
04b0: 69 6e 6b 20 74 6f 2e 20 20 49 66 20 7a 4c 69 6e  ink to.  If zLin
04c0: 6b 20 69 73 20 4e 55 4c 4c 20 6f 72 20 22 22 2c  k is NULL or "",
04d0: 20 74 68 65 6e 0a 2a 2a 20 74 68 65 20 6d 65 6e   then.** the men
04e0: 75 20 65 6e 74 72 79 20 68 61 73 20 6e 6f 20 68  u entry has no h
04f0: 79 70 65 72 6c 69 6e 6b 20 2d 20 69 74 20 69 73  yperlink - it is
0500: 20 64 69 73 61 62 6c 65 64 2e 0a 2a 2f 0a 76 6f   disabled..*/.vo
0510: 69 64 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65 6e  id setup_menu_en
0520: 74 72 79 28 0a 20 20 63 6f 6e 73 74 20 63 68 61  try(.  const cha
0530: 72 20 2a 7a 54 69 74 6c 65 2c 0a 20 20 63 6f 6e  r *zTitle,.  con
0540: 73 74 20 63 68 61 72 20 2a 7a 4c 69 6e 6b 2c 0a  st char *zLink,.
0550: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44    const char *zD
0560: 65 73 63 0a 29 7b 0a 20 20 40 20 3c 74 72 3e 3c  esc.){.  @ <tr><
0570: 74 64 20 76 61 6c 69 67 6e 3d 22 74 6f 70 22 20  td valign="top" 
0580: 61 6c 69 67 6e 3d 22 72 69 67 68 74 22 3e 0a 20  align="right">. 
0590: 20 69 66 28 20 7a 4c 69 6e 6b 20 26 26 20 7a 4c   if( zLink && zL
05a0: 69 6e 6b 5b 30 5d 20 29 7b 0a 20 20 20 20 40 20  ink[0] ){.    @ 
05b0: 3c 61 20 68 72 65 66 3d 22 25 73 28 7a 4c 69 6e  <a href="%s(zLin
05c0: 6b 29 22 3e 25 68 28 7a 54 69 74 6c 65 29 3c 2f  k)">%h(zTitle)</
05d0: 61 3e 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  a>.  }else{.    
05e0: 40 20 25 68 28 7a 54 69 74 6c 65 29 0a 20 20 7d  @ %h(zTitle).  }
05f0: 0a 20 20 40 20 3c 2f 74 64 3e 3c 74 64 20 76 61  .  @ </td><td va
0600: 6c 69 67 6e 3d 22 74 6f 70 22 3e 25 68 28 7a 44  lign="top">%h(zD
0610: 65 73 63 29 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 7d  esc)</td></tr>.}
0620: 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a  ../*.** WEBPAGE:
0630: 20 2f 73 65 74 75 70 0a 2a 2f 0a 76 6f 69 64 20   /setup.*/.void 
0640: 73 65 74 75 70 5f 70 61 67 65 28 76 6f 69 64 29  setup_page(void)
0650: 7b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f  {.  login_check_
0660: 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20  credentials();. 
0670: 20 69 66 28 20 21 67 2e 6f 6b 53 65 74 75 70 20   if( !g.okSetup 
0680: 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65  ){.    login_nee
0690: 64 65 64 28 29 3b 0a 20 20 7d 0a 0a 20 20 73 74  ded();.  }..  st
06a0: 79 6c 65 5f 68 65 61 64 65 72 28 22 53 65 74 75  yle_header("Setu
06b0: 70 22 29 3b 0a 20 20 40 20 3c 74 61 62 6c 65 20  p");.  @ <table 
06c0: 62 6f 72 64 65 72 3d 22 30 22 20 63 65 6c 6c 73  border="0" cells
06d0: 70 61 63 69 6e 67 3d 22 32 30 22 3e 0a 20 20 73  pacing="20">.  s
06e0: 65 74 75 70 5f 6d 65 6e 75 5f 65 6e 74 72 79 28  etup_menu_entry(
06f0: 22 55 73 65 72 73 22 2c 20 22 73 65 74 75 70 5f  "Users", "setup_
0700: 75 6c 69 73 74 22 2c 0a 20 20 20 20 22 47 72 61  ulist",.    "Gra
0710: 6e 74 20 70 72 69 76 69 6c 65 67 65 73 20 74 6f  nt privileges to
0720: 20 69 6e 64 69 76 69 64 75 61 6c 20 75 73 65 72   individual user
0730: 73 2e 22 29 3b 0a 20 20 73 65 74 75 70 5f 6d 65  s.");.  setup_me
0740: 6e 75 5f 65 6e 74 72 79 28 22 41 63 63 65 73 73  nu_entry("Access
0750: 22 2c 20 22 73 65 74 75 70 5f 61 63 63 65 73 73  ", "setup_access
0760: 22 2c 0a 20 20 20 20 22 43 6f 6e 74 72 6f 6c 20  ",.    "Control 
0770: 61 63 63 65 73 73 20 73 65 74 74 69 6e 67 73 2e  access settings.
0780: 22 29 3b 0a 20 20 73 65 74 75 70 5f 6d 65 6e 75  ");.  setup_menu
0790: 5f 65 6e 74 72 79 28 22 43 6f 6e 66 69 67 75 72  _entry("Configur
07a0: 61 74 69 6f 6e 22 2c 20 22 73 65 74 75 70 5f 63  ation", "setup_c
07b0: 6f 6e 66 69 67 22 2c 0a 20 20 20 20 22 43 6f 6e  onfig",.    "Con
07c0: 66 69 67 75 72 65 20 74 68 65 20 57 57 57 20 63  figure the WWW c
07d0: 6f 6d 70 6f 6e 65 6e 74 73 20 6f 66 20 74 68 65  omponents of the
07e0: 20 72 65 70 6f 73 69 74 6f 72 79 22 29 3b 0a 20   repository");. 
07f0: 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65 6e 74 72   setup_menu_entr
0800: 79 28 22 54 69 6d 65 6c 69 6e 65 22 2c 20 22 73  y("Timeline", "s
0810: 65 74 75 70 5f 74 69 6d 65 6c 69 6e 65 22 2c 0a  etup_timeline",.
0820: 20 20 20 20 22 54 69 6d 65 6c 69 6e 65 20 64 69      "Timeline di
0830: 73 70 6c 61 79 20 70 72 65 66 65 72 65 6e 63 65  splay preference
0840: 73 22 29 3b 0a 20 20 73 65 74 75 70 5f 6d 65 6e  s");.  setup_men
0850: 75 5f 65 6e 74 72 79 28 22 54 69 63 6b 65 74 73  u_entry("Tickets
0860: 22 2c 20 22 74 6b 74 73 65 74 75 70 22 2c 0a 20  ", "tktsetup",. 
0870: 20 20 20 22 43 6f 6e 66 69 67 75 72 65 20 74 68     "Configure th
0880: 65 20 74 72 6f 75 62 6c 65 2d 74 69 63 6b 65 74  e trouble-ticket
0890: 69 6e 67 20 73 79 73 74 65 6d 20 66 6f 72 20 74  ing system for t
08a0: 68 69 73 20 72 65 70 6f 73 69 74 6f 72 79 22 29  his repository")
08b0: 3b 0a 20 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65  ;.  setup_menu_e
08c0: 6e 74 72 79 28 22 43 53 53 22 2c 20 22 73 65 74  ntry("CSS", "set
08d0: 75 70 5f 65 64 69 74 63 73 73 22 2c 0a 20 20 20  up_editcss",.   
08e0: 20 22 45 64 69 74 20 74 68 65 20 43 61 73 63 61   "Edit the Casca
08f0: 64 69 6e 67 20 53 74 79 6c 65 20 53 68 65 65 74  ding Style Sheet
0900: 20 75 73 65 64 20 62 79 20 61 6c 6c 20 70 61 67   used by all pag
0910: 65 73 20 6f 66 20 74 68 69 73 20 72 65 70 6f 73  es of this repos
0920: 69 74 6f 72 79 22 29 3b 0a 20 20 73 65 74 75 70  itory");.  setup
0930: 5f 6d 65 6e 75 5f 65 6e 74 72 79 28 22 48 65 61  _menu_entry("Hea
0940: 64 65 72 22 2c 20 22 73 65 74 75 70 5f 68 65 61  der", "setup_hea
0950: 64 65 72 22 2c 0a 20 20 20 20 22 45 64 69 74 20  der",.    "Edit 
0960: 48 54 4d 4c 20 74 65 78 74 20 69 6e 73 65 72 74  HTML text insert
0970: 65 64 20 61 74 20 74 68 65 20 74 6f 70 20 6f 66  ed at the top of
0980: 20 65 76 65 72 79 20 70 61 67 65 22 29 3b 0a 20   every page");. 
0990: 20 73 65 74 75 70 5f 6d 65 6e 75 5f 65 6e 74 72   setup_menu_entr
09a0: 79 28 22 46 6f 6f 74 65 72 22 2c 20 22 73 65 74  y("Footer", "set
09b0: 75 70 5f 66 6f 6f 74 65 72 22 2c 0a 20 20 20 20  up_footer",.    
09c0: 22 45 64 69 74 20 48 54 4d 4c 20 74 65 78 74 20  "Edit HTML text 
09d0: 69 6e 73 65 72 74 65 64 20 61 74 20 74 68 65 20  inserted at the 
09e0: 62 6f 74 74 6f 6d 20 6f 66 20 65 76 65 72 79 20  bottom of every 
09f0: 70 61 67 65 22 29 3b 0a 20 20 73 65 74 75 70 5f  page");.  setup_
0a00: 6d 65 6e 75 5f 65 6e 74 72 79 28 22 53 68 75 6e  menu_entry("Shun
0a10: 6e 65 64 22 2c 20 22 73 68 75 6e 22 2c 0a 20 20  ned", "shun",.  
0a20: 20 20 22 53 68 6f 77 20 61 72 74 69 66 61 63 74    "Show artifact
0a30: 73 20 74 68 61 74 20 61 72 65 20 73 68 75 6e 6e  s that are shunn
0a40: 65 64 20 62 79 20 74 68 69 73 20 72 65 70 6f 73  ed by this repos
0a50: 69 74 6f 72 79 22 29 3b 0a 20 20 73 65 74 75 70  itory");.  setup
0a60: 5f 6d 65 6e 75 5f 65 6e 74 72 79 28 22 53 74 61  _menu_entry("Sta
0a70: 74 73 22 2c 20 22 73 74 61 74 22 2c 0a 20 20 20  ts", "stat",.   
0a80: 20 22 44 69 73 70 6c 61 79 20 72 65 70 6f 73 69   "Display reposi
0a90: 74 6f 72 79 20 73 74 61 74 69 73 74 69 63 73 22  tory statistics"
0aa0: 29 3b 0a 20 20 40 20 3c 2f 74 61 62 6c 65 3e 0a  );.  @ </table>.
0ab0: 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28  .  style_footer(
0ac0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50  );.}../*.** WEBP
0ad0: 41 47 45 3a 20 73 65 74 75 70 5f 75 6c 69 73 74  AGE: setup_ulist
0ae0: 0a 2a 2a 0a 2a 2a 20 53 68 6f 77 20 61 20 6c 69  .**.** Show a li
0af0: 73 74 20 6f 66 20 75 73 65 72 73 2e 20 20 43 6c  st of users.  Cl
0b00: 69 63 6b 69 6e 67 20 6f 6e 20 61 6e 79 20 75 73  icking on any us
0b10: 65 72 20 6a 75 6d 70 73 20 74 6f 20 74 68 65 20  er jumps to the 
0b20: 65 64 69 74 0a 2a 2a 20 73 63 72 65 65 6e 20 66  edit.** screen f
0b30: 6f 72 20 74 68 61 74 20 75 73 65 72 2e 0a 2a 2f  or that user..*/
0b40: 0a 76 6f 69 64 20 73 65 74 75 70 5f 75 6c 69 73  .void setup_ulis
0b50: 74 28 76 6f 69 64 29 7b 0a 20 20 53 74 6d 74 20  t(void){.  Stmt 
0b60: 73 3b 0a 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63  s;..  login_chec
0b70: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
0b80: 0a 20 20 69 66 28 20 21 67 2e 6f 6b 41 64 6d 69  .  if( !g.okAdmi
0b90: 6e 20 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e  n ){.    login_n
0ba0: 65 65 64 65 64 28 29 3b 0a 20 20 20 20 72 65 74  eeded();.    ret
0bb0: 75 72 6e 3b 0a 20 20 7d 0a 0a 20 20 73 74 79 6c  urn;.  }..  styl
0bc0: 65 5f 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e  e_submenu_elemen
0bd0: 74 28 22 41 64 64 22 2c 20 22 41 64 64 20 55 73  t("Add", "Add Us
0be0: 65 72 22 2c 20 22 73 65 74 75 70 5f 75 65 64 69  er", "setup_uedi
0bf0: 74 22 29 3b 0a 20 20 73 74 79 6c 65 5f 68 65 61  t");.  style_hea
0c00: 64 65 72 28 22 55 73 65 72 20 4c 69 73 74 22 29  der("User List")
0c10: 3b 0a 20 20 40 20 3c 74 61 62 6c 65 20 62 6f 72  ;.  @ <table bor
0c20: 64 65 72 3d 22 30 22 20 63 65 6c 6c 70 61 64 64  der="0" cellpadd
0c30: 69 6e 67 3d 22 30 22 20 63 65 6c 6c 73 70 61 63  ing="0" cellspac
0c40: 69 6e 67 3d 22 32 35 22 3e 0a 20 20 40 20 3c 74  ing="25">.  @ <t
0c50: 72 3e 3c 74 64 20 76 61 6c 69 67 6e 3d 22 74 6f  r><td valign="to
0c60: 70 22 3e 0a 20 20 40 20 3c 62 3e 55 73 65 72 73  p">.  @ <b>Users
0c70: 3a 3c 2f 62 3e 0a 20 20 40 20 3c 74 61 62 6c 65  :</b>.  @ <table
0c80: 20 62 6f 72 64 65 72 3d 22 31 22 20 63 65 6c 6c   border="1" cell
0c90: 70 61 64 64 69 6e 67 3d 22 31 30 22 3e 3c 74 72  padding="10"><tr
0ca0: 3e 3c 74 64 3e 0a 20 20 40 20 3c 74 61 62 6c 65  ><td>.  @ <table
0cb0: 20 63 65 6c 6c 73 70 61 63 69 6e 67 3d 30 20 63   cellspacing=0 c
0cc0: 65 6c 6c 70 61 64 64 69 6e 67 3d 30 20 62 6f 72  ellpadding=0 bor
0cd0: 64 65 72 3d 30 3e 0a 20 20 40 20 3c 74 72 3e 0a  der=0>.  @ <tr>.
0ce0: 20 20 40 20 20 20 3c 74 68 20 61 6c 69 67 6e 3d    @   <th align=
0cf0: 22 72 69 67 68 74 22 3e 55 73 65 72 26 6e 62 73  "right">User&nbs
0d00: 70 3b 49 44 3c 2f 74 68 3e 3c 74 64 20 77 69 64  p;ID</th><td wid
0d10: 74 68 3d 22 32 30 22 3e 26 6e 62 73 70 3b 3c 2f  th="20">&nbsp;</
0d20: 74 64 3e 0a 20 20 40 20 20 20 3c 74 68 3e 43 61  td>.  @   <th>Ca
0d30: 70 61 62 69 6c 69 74 69 65 73 3c 2f 74 68 3e 3c  pabilities</th><
0d40: 74 64 20 77 69 64 74 68 3d 22 31 35 22 3e 26 6e  td width="15">&n
0d50: 62 73 70 3b 3c 2f 74 64 3e 0a 20 20 40 20 20 20  bsp;</td>.  @   
0d60: 3c 74 68 3e 43 6f 6e 74 61 63 74 26 6e 62 73 70  <th>Contact&nbsp
0d70: 3b 49 6e 66 6f 3c 2f 74 68 3e 0a 20 20 40 20 3c  ;Info</th>.  @ <
0d80: 2f 74 72 3e 0a 20 20 64 62 5f 70 72 65 70 61 72  /tr>.  db_prepar
0d90: 65 28 26 73 2c 20 22 53 45 4c 45 43 54 20 75 69  e(&s, "SELECT ui
0da0: 64 2c 20 6c 6f 67 69 6e 2c 20 63 61 70 2c 20 69  d, login, cap, i
0db0: 6e 66 6f 20 46 52 4f 4d 20 75 73 65 72 20 4f 52  nfo FROM user OR
0dc0: 44 45 52 20 42 59 20 6c 6f 67 69 6e 22 29 3b 0a  DER BY login");.
0dd0: 20 20 77 68 69 6c 65 28 20 64 62 5f 73 74 65 70    while( db_step
0de0: 28 26 73 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57  (&s)==SQLITE_ROW
0df0: 20 29 7b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68   ){.    const ch
0e00: 61 72 20 2a 7a 43 61 70 20 3d 20 64 62 5f 63 6f  ar *zCap = db_co
0e10: 6c 75 6d 6e 5f 74 65 78 74 28 26 73 2c 20 32 29  lumn_text(&s, 2)
0e20: 3b 0a 20 20 20 20 69 66 28 20 73 74 72 73 74 72  ;.    if( strstr
0e30: 28 7a 43 61 70 2c 20 22 73 22 29 20 29 20 7a 43  (zCap, "s") ) zC
0e40: 61 70 20 3d 20 22 73 22 3b 0a 20 20 20 20 40 20  ap = "s";.    @ 
0e50: 3c 74 72 3e 0a 20 20 20 20 40 20 3c 74 64 20 61  <tr>.    @ <td a
0e60: 6c 69 67 6e 3d 22 72 69 67 68 74 22 3e 0a 20 20  lign="right">.  
0e70: 20 20 69 66 28 20 67 2e 6f 6b 41 64 6d 69 6e 20    if( g.okAdmin 
0e80: 26 26 20 28 7a 43 61 70 5b 30 5d 21 3d 27 73 27  && (zCap[0]!='s'
0e90: 20 7c 7c 20 67 2e 6f 6b 53 65 74 75 70 29 20 29   || g.okSetup) )
0ea0: 7b 0a 20 20 20 20 20 20 40 20 3c 61 20 68 72 65  {.      @ <a hre
0eb0: 66 3d 22 73 65 74 75 70 5f 75 65 64 69 74 3f 69  f="setup_uedit?i
0ec0: 64 3d 25 64 28 64 62 5f 63 6f 6c 75 6d 6e 5f 69  d=%d(db_column_i
0ed0: 6e 74 28 26 73 2c 30 29 29 22 3e 0a 20 20 20 20  nt(&s,0))">.    
0ee0: 7d 0a 20 20 20 20 40 20 3c 6e 6f 62 72 3e 25 68  }.    @ <nobr>%h
0ef0: 28 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28  (db_column_text(
0f00: 26 73 2c 31 29 29 3c 2f 6e 6f 62 72 3e 0a 20 20  &s,1))</nobr>.  
0f10: 20 20 69 66 28 20 67 2e 6f 6b 41 64 6d 69 6e 20    if( g.okAdmin 
0f20: 29 7b 0a 20 20 20 20 20 20 40 20 3c 2f 61 3e 0a  ){.      @ </a>.
0f30: 20 20 20 20 7d 0a 20 20 20 20 40 20 3c 2f 74 64      }.    @ </td
0f40: 3e 3c 74 64 3e 26 6e 62 73 70 3b 26 6e 62 73 70  ><td>&nbsp;&nbsp
0f50: 3b 26 6e 62 73 70 3b 3c 2f 74 64 3e 0a 20 20 20  ;&nbsp;</td>.   
0f60: 20 40 20 3c 74 64 20 61 6c 69 67 6e 3d 22 63 65   @ <td align="ce
0f70: 6e 74 65 72 22 3e 25 73 28 7a 43 61 70 29 3c 2f  nter">%s(zCap)</
0f80: 74 64 3e 0a 20 20 20 20 40 20 3c 74 64 3e 26 6e  td>.    @ <td>&n
0f90: 62 73 70 3b 26 6e 62 73 70 3b 26 6e 62 73 70 3b  bsp;&nbsp;&nbsp;
0fa0: 3c 2f 74 64 3e 0a 20 20 20 20 40 20 3c 74 64 20  </td>.    @ <td 
0fb0: 61 6c 69 67 6e 3d 22 6c 65 66 74 22 3e 25 73 28  align="left">%s(
0fc0: 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26  db_column_text(&
0fd0: 73 2c 33 29 29 3c 2f 74 64 3e 0a 20 20 20 20 40  s,3))</td>.    @
0fe0: 20 3c 2f 74 72 3e 0a 20 20 7d 0a 20 20 40 20 3c   </tr>.  }.  @ <
0ff0: 2f 74 61 62 6c 65 3e 3c 2f 74 64 3e 3c 2f 74 72  /table></td></tr
1000: 3e 3c 2f 74 61 62 6c 65 3e 0a 20 20 40 20 3c 74  ></table>.  @ <t
1010: 64 20 76 61 6c 69 67 6e 3d 22 74 6f 70 22 3e 0a  d valign="top">.
1020: 20 20 40 20 3c 62 3e 4e 6f 74 65 73 3a 3c 2f 62    @ <b>Notes:</b
1030: 3e 0a 20 20 40 20 3c 6f 6c 3e 0a 20 20 40 20 3c  >.  @ <ol>.  @ <
1040: 6c 69 3e 3c 70 3e 54 68 65 20 70 65 72 6d 69 73  li><p>The permis
1050: 73 69 6f 6e 20 66 6c 61 67 73 20 61 72 65 20 61  sion flags are a
1060: 73 20 66 6f 6c 6c 6f 77 73 3a 3c 2f 70 3e 0a 20  s follows:</p>. 
1070: 20 40 20 3c 6f 6c 20 74 79 70 65 3d 22 61 22 3e   @ <ol type="a">
1080: 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22  .  @ <li value="
1090: 31 22 3e 3c 62 3e 41 64 6d 69 6e 3c 2f 62 3e 3a  1"><b>Admin</b>:
10a0: 20 43 72 65 61 74 65 20 61 6e 64 20 64 65 6c 65   Create and dele
10b0: 74 65 20 75 73 65 72 73 3c 2f 6c 69 3e 0a 20 20  te users</li>.  
10c0: 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22 33 22 3e  @ <li value="3">
10d0: 3c 62 3e 41 70 70 65 6e 64 2d 54 6b 74 3c 2f 62  <b>Append-Tkt</b
10e0: 3e 3a 20 41 70 70 65 6e 64 20 74 6f 20 74 69 63  >: Append to tic
10f0: 6b 65 74 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c  kets</li>.  @ <l
1100: 69 20 76 61 6c 75 65 3d 22 34 22 3e 3c 62 3e 44  i value="4"><b>D
1110: 65 6c 65 74 65 3c 2f 62 3e 3a 20 44 65 6c 65 74  elete</b>: Delet
1120: 65 20 77 69 6b 69 20 61 6e 64 20 74 69 63 6b 65  e wiki and ticke
1130: 74 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20  ts</li>.  @ <li 
1140: 76 61 6c 75 65 3d 22 35 22 3e 3c 62 3e 45 6d 61  value="5"><b>Ema
1150: 69 6c 3c 2f 62 3e 3a 20 56 69 65 77 20 73 65 6e  il</b>: View sen
1160: 73 69 74 69 76 65 20 64 61 74 61 20 73 75 63 68  sitive data such
1170: 20 61 73 20 45 4d 61 69 6c 20 61 64 64 72 65 73   as EMail addres
1180: 73 65 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69  ses</li>.  @ <li
1190: 20 76 61 6c 75 65 3d 22 36 22 3e 3c 62 3e 4e 65   value="6"><b>Ne
11a0: 77 2d 57 69 6b 69 3c 2f 62 3e 3a 20 43 72 65 61  w-Wiki</b>: Crea
11b0: 74 65 20 6e 65 77 20 77 69 6b 69 20 70 61 67 65  te new wiki page
11c0: 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76  s</li>.  @ <li v
11d0: 61 6c 75 65 3d 22 37 22 3e 3c 62 3e 43 6c 6f 6e  alue="7"><b>Clon
11e0: 65 3c 2f 62 3e 3a 20 43 6c 6f 6e 65 20 74 68 65  e</b>: Clone the
11f0: 20 72 65 70 6f 73 69 74 6f 72 79 3c 2f 6c 69 3e   repository</li>
1200: 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22  .  @ <li value="
1210: 38 22 3e 3c 62 3e 48 69 73 74 6f 72 79 3c 2f 62  8"><b>History</b
1220: 3e 3a 20 56 69 65 77 20 64 65 74 61 69 6c 20 72  >: View detail r
1230: 65 70 6f 73 69 74 6f 72 79 20 68 69 73 74 6f 72  epository histor
1240: 79 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76  y</li>.  @ <li v
1250: 61 6c 75 65 3d 22 39 22 3e 3c 62 3e 43 68 65 63  alue="9"><b>Chec
1260: 6b 2d 49 6e 3c 2f 62 3e 3a 20 43 6f 6d 6d 69 74  k-In</b>: Commit
1270: 20 6e 65 77 20 76 65 72 73 69 6f 6e 73 20 69 6e   new versions in
1280: 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 3c   the repository<
1290: 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c  /li>.  @ <li val
12a0: 75 65 3d 22 31 30 22 3e 3c 62 3e 52 65 61 64 2d  ue="10"><b>Read-
12b0: 57 69 6b 69 3c 2f 62 3e 3a 20 56 69 65 77 20 77  Wiki</b>: View w
12c0: 69 6b 69 20 70 61 67 65 73 3c 2f 6c 69 3e 0a 20  iki pages</li>. 
12d0: 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d 22 31 31   @ <li value="11
12e0: 22 3e 3c 62 3e 57 72 69 74 65 2d 57 69 6b 69 3c  "><b>Write-Wiki<
12f0: 2f 62 3e 3a 20 45 64 69 74 20 77 69 6b 69 20 70  /b>: Edit wiki p
1300: 61 67 65 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c  ages</li>.  @ <l
1310: 69 20 76 61 6c 75 65 3d 22 31 33 22 3e 3c 62 3e  i value="13"><b>
1320: 41 70 70 65 6e 64 2d 57 69 6b 69 3c 2f 62 3e 3a  Append-Wiki</b>:
1330: 20 41 70 70 65 6e 64 20 74 6f 20 77 69 6b 69 20   Append to wiki 
1340: 70 61 67 65 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c  pages</li>.  @ <
1350: 6c 69 20 76 61 6c 75 65 3d 22 31 34 22 3e 3c 62  li value="14"><b
1360: 3e 4e 65 77 2d 54 6b 74 3c 2f 62 3e 3a 20 43 72  >New-Tkt</b>: Cr
1370: 65 61 74 65 20 6e 65 77 20 74 69 63 6b 65 74 73  eate new tickets
1380: 3c 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61  </li>.  @ <li va
1390: 6c 75 65 3d 22 31 35 22 3e 3c 62 3e 43 68 65 63  lue="15"><b>Chec
13a0: 6b 2d 4f 75 74 3c 2f 62 3e 3a 20 43 68 65 63 6b  k-Out</b>: Check
13b0: 20 6f 75 74 20 76 65 72 73 69 6f 6e 73 3c 2f 6c   out versions</l
13c0: 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65  i>.  @ <li value
13d0: 3d 22 31 36 22 3e 3c 62 3e 50 61 73 73 77 6f 72  ="16"><b>Passwor
13e0: 64 3c 2f 62 3e 3a 20 43 68 61 6e 67 65 20 79 6f  d</b>: Change yo
13f0: 75 72 20 6f 77 6e 20 70 61 73 73 77 6f 72 64 3c  ur own password<
1400: 2f 6c 69 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c  /li>.  @ <li val
1410: 75 65 3d 22 31 38 22 3e 3c 62 3e 52 65 61 64 2d  ue="18"><b>Read-
1420: 54 6b 74 3c 2f 62 3e 3a 20 56 69 65 77 20 74 69  Tkt</b>: View ti
1430: 63 6b 65 74 73 3c 2f 6c 69 3e 0a 20 20 40 20 3c  ckets</li>.  @ <
1440: 6c 69 20 76 61 6c 75 65 3d 22 31 39 22 3e 3c 62  li value="19"><b
1450: 3e 53 65 74 75 70 3a 3c 2f 62 3e 20 53 65 74 75  >Setup:</b> Setu
1460: 70 20 61 6e 64 20 63 6f 6e 66 69 67 75 72 65 20  p and configure 
1470: 74 68 69 73 20 77 65 62 73 69 74 65 3c 2f 6c 69  this website</li
1480: 3e 0a 20 20 40 20 3c 6c 69 20 76 61 6c 75 65 3d  >.  @ <li value=
1490: 22 32 30 22 3e 3c 62 3e 54 6b 74 2d 52 65 70 6f  "20"><b>Tkt-Repo
14a0: 72 74 3a 3c 2f 62 3e 20 43 72 65 61 74 65 20 6e  rt:</b> Create n
14b0: 65 77 20 62 75 67 20 73 75 6d 6d 61 72 79 20 72  ew bug summary r
14c0: 65 70 6f 72 74 73 3c 2f 6c 69 3e 0a 20 20 40 20  eports</li>.  @ 
14d0: 3c 6c 69 20 76 61 6c 75 65 3d 22 32 33 22 3e 3c  <li value="23"><
14e0: 62 3e 57 72 69 74 65 2d 54 6b 74 3c 2f 62 3e 3a  b>Write-Tkt</b>:
14f0: 20 45 64 69 74 20 74 69 63 6b 65 74 73 3c 2f 6c   Edit tickets</l
1500: 69 3e 0a 20 20 40 20 3c 2f 6f 6c 3e 0a 20 20 40  i>.  @ </ol>.  @
1510: 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20   </p></li>.  @. 
1520: 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20 45   @ <li><p>.  @ E
1530: 76 65 72 79 20 75 73 65 72 2c 20 6c 6f 67 67 65  very user, logge
1540: 64 20 69 6e 20 6f 72 20 6e 6f 74 2c 20 68 61 73  d in or not, has
1550: 20 74 68 65 20 70 72 69 76 69 6c 65 67 65 73 20   the privileges 
1560: 6f 66 20 3c 62 3e 6e 6f 62 6f 64 79 3c 2f 62 3e  of <b>nobody</b>
1570: 2e 0a 20 20 40 20 41 6e 79 20 68 75 6d 61 6e 20  ..  @ Any human 
1580: 63 61 6e 20 6c 6f 67 69 6e 20 61 73 20 3c 62 3e  can login as <b>
1590: 61 6e 6f 6e 79 6d 6f 75 73 3c 2f 62 3e 20 73 69  anonymous</b> si
15a0: 6e 63 65 20 74 68 65 20 70 61 73 73 77 6f 72 64  nce the password
15b0: 20 69 73 0a 20 20 40 20 63 6c 65 61 72 6c 79 20   is.  @ clearly 
15c0: 64 69 73 70 6c 61 79 65 64 20 6f 6e 20 74 68 65  displayed on the
15d0: 20 6c 6f 67 69 6e 20 70 61 67 65 20 66 6f 72 20   login page for 
15e0: 74 68 65 6d 20 74 6f 20 74 79 70 65 2e 20 20 54  them to type.  T
15f0: 68 65 20 70 75 72 70 6f 73 65 0a 20 20 40 20 6f  he purpose.  @ o
1600: 66 20 72 65 71 75 69 72 69 6e 67 20 61 6e 6f 6e  f requiring anon
1610: 79 6d 6f 75 73 20 74 6f 20 6c 6f 67 20 69 6e 20  ymous to log in 
1620: 69 73 20 74 6f 20 70 72 65 76 65 6e 74 20 61 63  is to prevent ac
1630: 63 65 73 73 20 62 79 20 73 70 69 64 65 72 73 2e  cess by spiders.
1640: 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20  .  @ </p></li>. 
1650: 20 40 0a 20 20 40 20 3c 2f 6f 6c 3e 0a 20 20 40   @.  @ </ol>.  @
1660: 20 3c 2f 74 64 3e 3c 2f 74 72 3e 3c 2f 74 61 62   </td></tr></tab
1670: 6c 65 3e 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74  le>.  style_foot
1680: 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57  er();.}../*.** W
1690: 45 42 50 41 47 45 3a 20 2f 73 65 74 75 70 5f 75  EBPAGE: /setup_u
16a0: 65 64 69 74 0a 2a 2f 0a 76 6f 69 64 20 75 73 65  edit.*/.void use
16b0: 72 5f 65 64 69 74 28 76 6f 69 64 29 7b 0a 20 20  r_edit(void){.  
16c0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 49 64 2c  const char *zId,
16d0: 20 2a 7a 4c 6f 67 69 6e 2c 20 2a 7a 49 6e 66 6f   *zLogin, *zInfo
16e0: 2c 20 2a 7a 43 61 70 3b 0a 20 20 63 68 61 72 20  , *zCap;.  char 
16f0: 2a 6f 61 61 2c 20 2a 6f 61 73 2c 20 2a 6f 61 72  *oaa, *oas, *oar
1700: 2c 20 2a 6f 61 77 2c 20 2a 6f 61 6e 2c 20 2a 6f  , *oaw, *oan, *o
1710: 61 69 2c 20 2a 6f 61 6a 2c 20 2a 6f 61 6f 2c 20  ai, *oaj, *oao, 
1720: 2a 6f 61 70 3b 0a 20 20 63 68 61 72 20 2a 6f 61  *oap;.  char *oa
1730: 6b 2c 20 2a 6f 61 64 2c 20 2a 6f 61 63 2c 20 2a  k, *oad, *oac, *
1740: 6f 61 66 2c 20 2a 6f 61 6d 2c 20 2a 6f 61 68 2c  oaf, *oam, *oah,
1750: 20 2a 6f 61 67 2c 20 2a 6f 61 65 3b 0a 20 20 63   *oag, *oae;.  c
1760: 68 61 72 20 2a 6f 61 74 3b 0a 20 20 69 6e 74 20  har *oat;.  int 
1770: 64 6f 57 72 69 74 65 3b 0a 20 20 69 6e 74 20 75  doWrite;.  int u
1780: 69 64 3b 0a 20 20 69 6e 74 20 68 69 67 68 65 72  id;.  int higher
1790: 55 73 65 72 20 3d 20 30 3b 20 20 2f 2a 20 54 72  User = 0;  /* Tr
17a0: 75 65 20 69 66 20 75 73 65 72 20 62 65 69 6e 67  ue if user being
17b0: 20 65 64 69 74 65 64 20 69 73 20 53 45 54 55 50   edited is SETUP
17c0: 20 61 6e 64 20 74 68 65 20 2a 2f 0a 20 20 20 20   and the */.    
17d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
17e0: 20 20 20 2f 2a 20 75 73 65 72 20 64 6f 69 6e 67     /* user doing
17f0: 20 74 68 65 20 65 64 69 74 69 6e 67 20 69 73 20   the editing is 
1800: 41 44 4d 49 4e 2e 20 20 44 69 73 61 6c 6c 6f 77  ADMIN.  Disallow
1810: 20 65 64 69 74 69 6e 67 20 2a 2f 0a 0a 20 20 2f   editing */..  /
1820: 2a 20 4d 75 73 74 20 68 61 76 65 20 41 44 4d 49  * Must have ADMI
1830: 4e 20 70 72 69 76 6c 65 67 65 73 20 74 6f 20 61  N privleges to a
1840: 63 63 65 73 73 20 74 68 69 73 20 70 61 67 65 0a  ccess this page.
1850: 20 20 2a 2f 0a 20 20 6c 6f 67 69 6e 5f 63 68 65    */.  login_che
1860: 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29  ck_credentials()
1870: 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b 41 64 6d  ;.  if( !g.okAdm
1880: 69 6e 20 29 7b 20 6c 6f 67 69 6e 5f 6e 65 65 64  in ){ login_need
1890: 65 64 28 29 3b 20 72 65 74 75 72 6e 3b 20 7d 0a  ed(); return; }.
18a0: 0a 20 20 2f 2a 20 43 68 65 63 6b 20 74 6f 20 73  .  /* Check to s
18b0: 65 65 20 69 66 20 61 6e 20 41 44 4d 49 4e 20 75  ee if an ADMIN u
18c0: 73 65 72 20 69 73 20 74 72 79 69 6e 67 20 74 6f  ser is trying to
18d0: 20 65 64 69 74 20 61 20 53 45 54 55 50 20 61 63   edit a SETUP ac
18e0: 63 6f 75 6e 74 2e 0a 20 20 2a 2a 20 44 6f 6e 27  count..  ** Don'
18f0: 74 20 61 6c 6c 6f 77 20 74 68 61 74 2e 0a 20 20  t allow that..  
1900: 2a 2f 0a 20 20 7a 49 64 20 3d 20 50 44 28 22 69  */.  zId = PD("i
1910: 64 22 2c 20 22 30 22 29 3b 0a 20 20 75 69 64 20  d", "0");.  uid 
1920: 3d 20 61 74 6f 69 28 7a 49 64 29 3b 0a 20 20 69  = atoi(zId);.  i
1930: 66 28 20 7a 49 64 20 26 26 20 21 67 2e 6f 6b 53  f( zId && !g.okS
1940: 65 74 75 70 20 26 26 20 75 69 64 3e 30 20 29 7b  etup && uid>0 ){
1950: 0a 20 20 20 20 63 68 61 72 20 2a 7a 4f 6c 64 43  .    char *zOldC
1960: 61 70 73 3b 0a 20 20 20 20 7a 4f 6c 64 43 61 70  aps;.    zOldCap
1970: 73 20 3d 20 64 62 5f 74 65 78 74 28 30 2c 20 22  s = db_text(0, "
1980: 53 45 4c 45 43 54 20 63 61 70 20 46 52 4f 4d 20  SELECT cap FROM 
1990: 75 73 65 72 20 57 48 45 52 45 20 75 69 64 3d 25  user WHERE uid=%
19a0: 64 22 2c 75 69 64 29 3b 0a 20 20 20 20 68 69 67  d",uid);.    hig
19b0: 68 65 72 55 73 65 72 20 3d 20 7a 4f 6c 64 43 61  herUser = zOldCa
19c0: 70 73 20 26 26 20 73 74 72 63 68 72 28 7a 4f 6c  ps && strchr(zOl
19d0: 64 43 61 70 73 2c 27 73 27 29 3b 0a 20 20 7d 0a  dCaps,'s');.  }.
19e0: 0a 20 20 69 66 28 20 50 28 22 63 61 6e 22 29 20  .  if( P("can") 
19f0: 29 7b 0a 20 20 20 20 63 67 69 5f 72 65 64 69 72  ){.    cgi_redir
1a00: 65 63 74 28 22 73 65 74 75 70 5f 75 6c 69 73 74  ect("setup_ulist
1a10: 22 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  ");.    return;.
1a20: 20 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 77 65 20    }..  /* If we 
1a30: 68 61 76 65 20 61 6c 6c 20 74 68 65 20 6e 65 63  have all the nec
1a40: 65 73 73 61 72 79 20 69 6e 66 6f 72 6d 61 74 69  essary informati
1a50: 6f 6e 2c 20 77 72 69 74 65 20 74 68 65 20 6e 65  on, write the ne
1a60: 77 20 6f 72 0a 20 20 2a 2a 20 6d 6f 64 69 66 69  w or.  ** modifi
1a70: 65 64 20 75 73 65 72 20 72 65 63 6f 72 64 2e 20  ed user record. 
1a80: 20 41 66 74 65 72 20 77 72 69 74 69 6e 67 20 74   After writing t
1a90: 68 65 20 75 73 65 72 20 72 65 63 6f 72 64 2c 20  he user record, 
1aa0: 72 65 64 69 72 65 63 74 0a 20 20 2a 2a 20 74 6f  redirect.  ** to
1ab0: 20 74 68 65 20 70 61 67 65 20 74 68 61 74 20 64   the page that d
1ac0: 69 73 70 6c 61 79 73 20 61 20 6c 69 73 74 20 6f  isplays a list o
1ad0: 66 20 75 73 65 72 73 2e 0a 20 20 2a 2f 0a 20 20  f users..  */.  
1ae0: 64 6f 57 72 69 74 65 20 3d 20 63 67 69 5f 61 6c  doWrite = cgi_al
1af0: 6c 28 22 6c 6f 67 69 6e 22 2c 22 69 6e 66 6f 22  l("login","info"
1b00: 2c 22 70 77 22 29 20 26 26 20 21 68 69 67 68 65  ,"pw") && !highe
1b10: 72 55 73 65 72 3b 0a 20 20 69 66 28 20 64 6f 57  rUser;.  if( doW
1b20: 72 69 74 65 20 29 7b 0a 20 20 20 20 63 6f 6e 73  rite ){.    cons
1b30: 74 20 63 68 61 72 20 2a 7a 50 77 3b 0a 20 20 20  t char *zPw;.   
1b40: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 6f   const char *zLo
1b50: 67 69 6e 3b 0a 20 20 20 20 63 68 61 72 20 7a 43  gin;.    char zC
1b60: 61 70 5b 35 30 5d 3b 0a 20 20 20 20 69 6e 74 20  ap[50];.    int 
1b70: 69 20 3d 20 30 3b 0a 20 20 20 20 69 6e 74 20 61  i = 0;.    int a
1b80: 61 20 3d 20 50 28 22 61 61 22 29 21 3d 30 3b 0a  a = P("aa")!=0;.
1b90: 20 20 20 20 69 6e 74 20 61 64 20 3d 20 50 28 22      int ad = P("
1ba0: 61 64 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74  ad")!=0;.    int
1bb0: 20 61 65 20 3d 20 50 28 22 61 65 22 29 21 3d 30   ae = P("ae")!=0
1bc0: 3b 0a 20 20 20 20 69 6e 74 20 61 69 20 3d 20 50  ;.    int ai = P
1bd0: 28 22 61 69 22 29 21 3d 30 3b 0a 20 20 20 20 69  ("ai")!=0;.    i
1be0: 6e 74 20 61 6a 20 3d 20 50 28 22 61 6a 22 29 21  nt aj = P("aj")!
1bf0: 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 6b 20 3d  =0;.    int ak =
1c00: 20 50 28 22 61 6b 22 29 21 3d 30 3b 0a 20 20 20   P("ak")!=0;.   
1c10: 20 69 6e 74 20 61 6e 20 3d 20 50 28 22 61 6e 22   int an = P("an"
1c20: 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 6f  )!=0;.    int ao
1c30: 20 3d 20 50 28 22 61 6f 22 29 21 3d 30 3b 0a 20   = P("ao")!=0;. 
1c40: 20 20 20 69 6e 74 20 61 70 20 3d 20 50 28 22 61     int ap = P("a
1c50: 70 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20  p")!=0;.    int 
1c60: 61 72 20 3d 20 50 28 22 61 72 22 29 21 3d 30 3b  ar = P("ar")!=0;
1c70: 0a 20 20 20 20 69 6e 74 20 61 73 20 3d 20 67 2e  .    int as = g.
1c80: 6f 6b 53 65 74 75 70 20 26 26 20 50 28 22 61 73  okSetup && P("as
1c90: 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61  ")!=0;.    int a
1ca0: 77 20 3d 20 50 28 22 61 77 22 29 21 3d 30 3b 0a  w = P("aw")!=0;.
1cb0: 20 20 20 20 69 6e 74 20 61 63 20 3d 20 50 28 22      int ac = P("
1cc0: 61 63 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74  ac")!=0;.    int
1cd0: 20 61 66 20 3d 20 50 28 22 61 66 22 29 21 3d 30   af = P("af")!=0
1ce0: 3b 0a 20 20 20 20 69 6e 74 20 61 6d 20 3d 20 50  ;.    int am = P
1cf0: 28 22 61 6d 22 29 21 3d 30 3b 0a 20 20 20 20 69  ("am")!=0;.    i
1d00: 6e 74 20 61 68 20 3d 20 50 28 22 61 68 22 29 21  nt ah = P("ah")!
1d10: 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 67 20 3d  =0;.    int ag =
1d20: 20 50 28 22 61 67 22 29 21 3d 30 3b 0a 20 20 20   P("ag")!=0;.   
1d30: 20 69 6e 74 20 61 74 20 3d 20 50 28 22 61 74 22   int at = P("at"
1d40: 29 21 3d 30 3b 0a 20 20 20 20 69 66 28 20 61 61  )!=0;.    if( aa
1d50: 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20   ){ zCap[i++] = 
1d60: 27 61 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61  'a'; }.    if( a
1d70: 63 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d  c ){ zCap[i++] =
1d80: 20 27 63 27 3b 20 7d 0a 20 20 20 20 69 66 28 20   'c'; }.    if( 
1d90: 61 64 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20  ad ){ zCap[i++] 
1da0: 3d 20 27 64 27 3b 20 7d 0a 20 20 20 20 69 66 28  = 'd'; }.    if(
1db0: 20 61 65 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d   ae ){ zCap[i++]
1dc0: 20 3d 20 27 65 27 3b 20 7d 0a 20 20 20 20 69 66   = 'e'; }.    if
1dd0: 28 20 61 66 20 29 7b 20 7a 43 61 70 5b 69 2b 2b  ( af ){ zCap[i++
1de0: 5d 20 3d 20 27 66 27 3b 20 7d 0a 20 20 20 20 69  ] = 'f'; }.    i
1df0: 66 28 20 61 68 20 29 7b 20 7a 43 61 70 5b 69 2b  f( ah ){ zCap[i+
1e00: 2b 5d 20 3d 20 27 68 27 3b 20 7d 0a 20 20 20 20  +] = 'h'; }.    
1e10: 69 66 28 20 61 67 20 29 7b 20 7a 43 61 70 5b 69  if( ag ){ zCap[i
1e20: 2b 2b 5d 20 3d 20 27 67 27 3b 20 7d 0a 20 20 20  ++] = 'g'; }.   
1e30: 20 69 66 28 20 61 69 20 29 7b 20 7a 43 61 70 5b   if( ai ){ zCap[
1e40: 69 2b 2b 5d 20 3d 20 27 69 27 3b 20 7d 0a 20 20  i++] = 'i'; }.  
1e50: 20 20 69 66 28 20 61 6a 20 29 7b 20 7a 43 61 70    if( aj ){ zCap
1e60: 5b 69 2b 2b 5d 20 3d 20 27 6a 27 3b 20 7d 0a 20  [i++] = 'j'; }. 
1e70: 20 20 20 69 66 28 20 61 6b 20 29 7b 20 7a 43 61     if( ak ){ zCa
1e80: 70 5b 69 2b 2b 5d 20 3d 20 27 6b 27 3b 20 7d 0a  p[i++] = 'k'; }.
1e90: 20 20 20 20 69 66 28 20 61 6d 20 29 7b 20 7a 43      if( am ){ zC
1ea0: 61 70 5b 69 2b 2b 5d 20 3d 20 27 6d 27 3b 20 7d  ap[i++] = 'm'; }
1eb0: 0a 20 20 20 20 69 66 28 20 61 6e 20 29 7b 20 7a  .    if( an ){ z
1ec0: 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 6e 27 3b 20  Cap[i++] = 'n'; 
1ed0: 7d 0a 20 20 20 20 69 66 28 20 61 6f 20 29 7b 20  }.    if( ao ){ 
1ee0: 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 6f 27 3b  zCap[i++] = 'o';
1ef0: 20 7d 0a 20 20 20 20 69 66 28 20 61 70 20 29 7b   }.    if( ap ){
1f00: 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 70 27   zCap[i++] = 'p'
1f10: 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 72 20 29  ; }.    if( ar )
1f20: 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 72  { zCap[i++] = 'r
1f30: 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 73 20  '; }.    if( as 
1f40: 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27  ){ zCap[i++] = '
1f50: 73 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 74  s'; }.    if( at
1f60: 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20   ){ zCap[i++] = 
1f70: 27 74 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61  't'; }.    if( a
1f80: 77 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d  w ){ zCap[i++] =
1f90: 20 27 77 27 3b 20 7d 0a 0a 20 20 20 20 7a 43 61   'w'; }..    zCa
1fa0: 70 5b 69 5d 20 3d 20 30 3b 0a 20 20 20 20 7a 50  p[i] = 0;.    zP
1fb0: 77 20 3d 20 50 28 22 70 77 22 29 3b 0a 20 20 20  w = P("pw");.   
1fc0: 20 69 66 28 20 7a 50 77 3d 3d 30 20 7c 7c 20 7a   if( zPw==0 || z
1fd0: 50 77 5b 30 5d 3d 3d 30 20 29 7b 0a 20 20 20 20  Pw[0]==0 ){.    
1fe0: 20 20 7a 50 77 20 3d 20 64 62 5f 74 65 78 74 28    zPw = db_text(
1ff0: 30 2c 20 22 53 45 4c 45 43 54 20 70 77 20 46 52  0, "SELECT pw FR
2000: 4f 4d 20 75 73 65 72 20 57 48 45 52 45 20 75 69  OM user WHERE ui
2010: 64 3d 25 64 22 2c 20 75 69 64 29 3b 0a 20 20 20  d=%d", uid);.   
2020: 20 7d 0a 20 20 20 20 7a 4c 6f 67 69 6e 20 3d 20   }.    zLogin = 
2030: 50 28 22 6c 6f 67 69 6e 22 29 3b 0a 20 20 20 20  P("login");.    
2040: 69 66 28 20 75 69 64 3e 30 20 26 26 0a 20 20 20  if( uid>0 &&.   
2050: 20 20 20 20 20 64 62 5f 65 78 69 73 74 73 28 22       db_exists("
2060: 53 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 75 73  SELECT 1 FROM us
2070: 65 72 20 57 48 45 52 45 20 6c 6f 67 69 6e 3d 25  er WHERE login=%
2080: 51 20 41 4e 44 20 75 69 64 21 3d 25 64 22 2c 20  Q AND uid!=%d", 
2090: 7a 4c 6f 67 69 6e 2c 20 75 69 64 29 0a 20 20 20  zLogin, uid).   
20a0: 20 29 7b 0a 20 20 20 20 20 20 73 74 79 6c 65 5f   ){.      style_
20b0: 68 65 61 64 65 72 28 22 55 73 65 72 20 43 72 65  header("User Cre
20c0: 61 74 69 6f 6e 20 45 72 72 6f 72 22 29 3b 0a 20  ation Error");. 
20d0: 20 20 20 20 20 40 20 3c 66 6f 6e 74 20 63 6f 6c       @ <font col
20e0: 6f 72 3d 22 72 65 64 22 3e 4c 6f 67 69 6e 20 22  or="red">Login "
20f0: 25 68 28 7a 4c 6f 67 69 6e 29 22 20 69 73 20 61  %h(zLogin)" is a
2100: 6c 72 65 61 64 79 20 75 73 65 64 20 62 79 20 61  lready used by a
2110: 20 64 69 66 66 65 72 65 6e 74 0a 20 20 20 20 20   different.     
2120: 20 40 20 75 73 65 72 2e 3c 2f 66 6f 6e 74 3e 0a   @ user.</font>.
2130: 20 20 20 20 20 20 40 0a 20 20 20 20 20 20 40 20        @.      @ 
2140: 3c 70 3e 3c 61 20 68 72 65 66 3d 22 73 65 74 75  <p><a href="setu
2150: 70 5f 75 65 64 69 74 3f 69 64 3d 25 64 28 75 69  p_uedit?id=%d(ui
2160: 64 29 29 3e 5b 42 75 6d 6d 65 72 5d 3c 2f 61 3e  d))>[Bummer]</a>
2170: 3c 2f 70 3e 0a 20 20 20 20 20 20 73 74 79 6c 65  </p>.      style
2180: 5f 66 6f 6f 74 65 72 28 29 3b 0a 20 20 20 20 20  _footer();.     
2190: 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20   return;.    }. 
21a0: 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63     db_multi_exec
21b0: 28 0a 20 20 20 20 20 20 20 22 52 45 50 4c 41 43  (.       "REPLAC
21c0: 45 20 49 4e 54 4f 20 75 73 65 72 28 75 69 64 2c  E INTO user(uid,
21d0: 6c 6f 67 69 6e 2c 69 6e 66 6f 2c 70 77 2c 63 61  login,info,pw,ca
21e0: 70 29 20 22 0a 20 20 20 20 20 20 20 22 56 41 4c  p) ".       "VAL
21f0: 55 45 53 28 6e 75 6c 6c 69 66 28 25 64 2c 30 29  UES(nullif(%d,0)
2200: 2c 25 51 2c 25 51 2c 25 51 2c 27 25 73 27 29 22  ,%Q,%Q,%Q,'%s')"
2210: 2c 0a 20 20 20 20 20 20 75 69 64 2c 20 50 28 22  ,.      uid, P("
2220: 6c 6f 67 69 6e 22 29 2c 20 50 28 22 69 6e 66 6f  login"), P("info
2230: 22 29 2c 20 7a 50 77 2c 20 7a 43 61 70 0a 20 20  "), zPw, zCap.  
2240: 20 20 29 3b 0a 20 20 20 20 63 67 69 5f 72 65 64    );.    cgi_red
2250: 69 72 65 63 74 28 22 73 65 74 75 70 5f 75 6c 69  irect("setup_uli
2260: 73 74 22 29 3b 0a 20 20 20 20 72 65 74 75 72 6e  st");.    return
2270: 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 4c 6f 61 64  ;.  }..  /* Load
2280: 20 74 68 65 20 65 78 69 73 74 69 6e 67 20 69 6e   the existing in
2290: 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20  formation about 
22a0: 74 68 65 20 75 73 65 72 2c 20 69 66 20 61 6e 79  the user, if any
22b0: 0a 20 20 2a 2f 0a 20 20 7a 4c 6f 67 69 6e 20 3d  .  */.  zLogin =
22c0: 20 22 22 3b 0a 20 20 7a 49 6e 66 6f 20 3d 20 22   "";.  zInfo = "
22d0: 22 3b 0a 20 20 7a 43 61 70 20 3d 20 22 22 3b 0a  ";.  zCap = "";.
22e0: 20 20 6f 61 61 20 3d 20 6f 61 63 20 3d 20 6f 61    oaa = oac = oa
22f0: 64 20 3d 20 6f 61 65 20 3d 20 6f 61 66 20 3d 20  d = oae = oaf = 
2300: 6f 61 67 20 3d 20 6f 61 68 20 3d 20 6f 61 69 20  oag = oah = oai 
2310: 3d 20 6f 61 6a 20 3d 20 6f 61 6b 20 3d 20 6f 61  = oaj = oak = oa
2320: 6d 20 3d 0a 20 20 20 20 20 20 20 20 6f 61 6e 20  m =.        oan 
2330: 3d 20 6f 61 6f 20 3d 20 6f 61 70 20 3d 20 6f 61  = oao = oap = oa
2340: 72 20 3d 20 6f 61 73 20 3d 20 6f 61 74 20 3d 20  r = oas = oat = 
2350: 6f 61 77 20 3d 20 22 22 3b 0a 20 20 69 66 28 20  oaw = "";.  if( 
2360: 75 69 64 20 29 7b 0a 20 20 20 20 7a 4c 6f 67 69  uid ){.    zLogi
2370: 6e 20 3d 20 64 62 5f 74 65 78 74 28 22 22 2c 20  n = db_text("", 
2380: 22 53 45 4c 45 43 54 20 6c 6f 67 69 6e 20 46 52  "SELECT login FR
2390: 4f 4d 20 75 73 65 72 20 57 48 45 52 45 20 75 69  OM user WHERE ui
23a0: 64 3d 25 64 22 2c 20 75 69 64 29 3b 0a 20 20 20  d=%d", uid);.   
23b0: 20 7a 49 6e 66 6f 20 3d 20 64 62 5f 74 65 78 74   zInfo = db_text
23c0: 28 22 22 2c 20 22 53 45 4c 45 43 54 20 69 6e 66  ("", "SELECT inf
23d0: 6f 20 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52  o FROM user WHER
23e0: 45 20 75 69 64 3d 25 64 22 2c 20 75 69 64 29 3b  E uid=%d", uid);
23f0: 0a 20 20 20 20 7a 43 61 70 20 3d 20 64 62 5f 74  .    zCap = db_t
2400: 65 78 74 28 22 22 2c 20 22 53 45 4c 45 43 54 20  ext("", "SELECT 
2410: 63 61 70 20 46 52 4f 4d 20 75 73 65 72 20 57 48  cap FROM user WH
2420: 45 52 45 20 75 69 64 3d 25 64 22 2c 20 75 69 64  ERE uid=%d", uid
2430: 29 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68  );.    if( strch
2440: 72 28 7a 43 61 70 2c 20 27 61 27 29 20 29 20 6f  r(zCap, 'a') ) o
2450: 61 61 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b  aa = " checked";
2460: 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28  .    if( strchr(
2470: 7a 43 61 70 2c 20 27 63 27 29 20 29 20 6f 61 63  zCap, 'c') ) oac
2480: 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20   = " checked";. 
2490: 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43     if( strchr(zC
24a0: 61 70 2c 20 27 64 27 29 20 29 20 6f 61 64 20 3d  ap, 'd') ) oad =
24b0: 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20   " checked";.   
24c0: 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70   if( strchr(zCap
24d0: 2c 20 27 65 27 29 20 29 20 6f 61 65 20 3d 20 22  , 'e') ) oae = "
24e0: 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69   checked";.    i
24f0: 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20  f( strchr(zCap, 
2500: 27 66 27 29 20 29 20 6f 61 66 20 3d 20 22 20 63  'f') ) oaf = " c
2510: 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28  hecked";.    if(
2520: 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 67   strchr(zCap, 'g
2530: 27 29 20 29 20 6f 61 67 20 3d 20 22 20 63 68 65  ') ) oag = " che
2540: 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73  cked";.    if( s
2550: 74 72 63 68 72 28 7a 43 61 70 2c 20 27 68 27 29  trchr(zCap, 'h')
2560: 20 29 20 6f 61 68 20 3d 20 22 20 63 68 65 63 6b   ) oah = " check
2570: 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72  ed";.    if( str
2580: 63 68 72 28 7a 43 61 70 2c 20 27 69 27 29 20 29  chr(zCap, 'i') )
2590: 20 6f 61 69 20 3d 20 22 20 63 68 65 63 6b 65 64   oai = " checked
25a0: 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68  ";.    if( strch
25b0: 72 28 7a 43 61 70 2c 20 27 6a 27 29 20 29 20 6f  r(zCap, 'j') ) o
25c0: 61 6a 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b  aj = " checked";
25d0: 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28  .    if( strchr(
25e0: 7a 43 61 70 2c 20 27 6b 27 29 20 29 20 6f 61 6b  zCap, 'k') ) oak
25f0: 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20   = " checked";. 
2600: 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43     if( strchr(zC
2610: 61 70 2c 20 27 6d 27 29 20 29 20 6f 61 6d 20 3d  ap, 'm') ) oam =
2620: 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20   " checked";.   
2630: 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70   if( strchr(zCap
2640: 2c 20 27 6e 27 29 20 29 20 6f 61 6e 20 3d 20 22  , 'n') ) oan = "
2650: 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69   checked";.    i
2660: 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20  f( strchr(zCap, 
2670: 27 6f 27 29 20 29 20 6f 61 6f 20 3d 20 22 20 63  'o') ) oao = " c
2680: 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28  hecked";.    if(
2690: 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 70   strchr(zCap, 'p
26a0: 27 29 20 29 20 6f 61 70 20 3d 20 22 20 63 68 65  ') ) oap = " che
26b0: 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73  cked";.    if( s
26c0: 74 72 63 68 72 28 7a 43 61 70 2c 20 27 72 27 29  trchr(zCap, 'r')
26d0: 20 29 20 6f 61 72 20 3d 20 22 20 63 68 65 63 6b   ) oar = " check
26e0: 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72  ed";.    if( str
26f0: 63 68 72 28 7a 43 61 70 2c 20 27 73 27 29 20 29  chr(zCap, 's') )
2700: 20 6f 61 73 20 3d 20 22 20 63 68 65 63 6b 65 64   oas = " checked
2710: 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68  ";.    if( strch
2720: 72 28 7a 43 61 70 2c 20 27 74 27 29 20 29 20 6f  r(zCap, 't') ) o
2730: 61 74 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b  at = " checked";
2740: 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28  .    if( strchr(
2750: 7a 43 61 70 2c 20 27 77 27 29 20 29 20 6f 61 77  zCap, 'w') ) oaw
2760: 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20   = " checked";. 
2770: 20 7d 0a 0a 20 20 2f 2a 20 42 65 67 69 6e 20 67   }..  /* Begin g
2780: 65 6e 65 72 61 74 69 6e 67 20 74 68 65 20 70 61  enerating the pa
2790: 67 65 0a 20 20 2a 2f 0a 20 20 73 74 79 6c 65 5f  ge.  */.  style_
27a0: 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e 74 28  submenu_element(
27b0: 22 43 61 6e 63 65 6c 22 2c 20 22 43 61 6e 63 65  "Cancel", "Cance
27c0: 6c 22 2c 20 22 73 65 74 75 70 5f 75 6c 69 73 74  l", "setup_ulist
27d0: 22 29 3b 0a 20 20 69 66 28 20 75 69 64 20 29 7b  ");.  if( uid ){
27e0: 0a 20 20 20 20 73 74 79 6c 65 5f 68 65 61 64 65  .    style_heade
27f0: 72 28 6d 70 72 69 6e 74 66 28 22 45 64 69 74 20  r(mprintf("Edit 
2800: 55 73 65 72 20 25 68 22 2c 20 7a 4c 6f 67 69 6e  User %h", zLogin
2810: 29 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ));.  }else{.   
2820: 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 22 41   style_header("A
2830: 64 64 20 41 20 4e 65 77 20 55 73 65 72 22 29 3b  dd A New User");
2840: 0a 20 20 7d 0a 20 20 40 20 3c 74 61 62 6c 65 20  .  }.  @ <table 
2850: 61 6c 69 67 6e 3d 22 6c 65 66 74 22 20 68 73 70  align="left" hsp
2860: 61 63 65 3d 22 32 30 22 20 76 73 70 61 63 65 3d  ace="20" vspace=
2870: 22 31 30 22 3e 3c 74 72 3e 3c 74 64 3e 0a 20 20  "10"><tr><td>.  
2880: 40 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22  @ <form action="
2890: 25 73 28 67 2e 7a 50 61 74 68 29 22 20 6d 65 74  %s(g.zPath)" met
28a0: 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20  hod="POST">.  @ 
28b0: 3c 74 61 62 6c 65 3e 0a 20 20 40 20 3c 74 72 3e  <table>.  @ <tr>
28c0: 0a 20 20 40 20 20 20 3c 74 64 20 61 6c 69 67 6e  .  @   <td align
28d0: 3d 22 72 69 67 68 74 22 3e 3c 6e 6f 62 72 3e 55  ="right"><nobr>U
28e0: 73 65 72 20 49 44 3a 3c 2f 6e 6f 62 72 3e 3c 2f  ser ID:</nobr></
28f0: 74 64 3e 0a 20 20 69 66 28 20 75 69 64 20 29 7b  td>.  if( uid ){
2900: 0a 20 20 20 20 40 20 20 20 3c 74 64 3e 25 64 28  .    @   <td>%d(
2910: 75 69 64 29 20 3c 69 6e 70 75 74 20 74 79 70 65  uid) <input type
2920: 3d 22 68 69 64 64 65 6e 22 20 6e 61 6d 65 3d 22  ="hidden" name="
2930: 69 64 22 20 76 61 6c 75 65 3d 22 25 64 28 75 69  id" value="%d(ui
2940: 64 29 22 3e 3c 2f 74 64 3e 0a 20 20 7d 65 6c 73  d)"></td>.  }els
2950: 65 7b 0a 20 20 20 20 40 20 20 20 3c 74 64 3e 28  e{.    @   <td>(
2960: 6e 65 77 20 75 73 65 72 29 3c 69 6e 70 75 74 20  new user)<input 
2970: 74 79 70 65 3d 22 68 69 64 64 65 6e 22 20 6e 61  type="hidden" na
2980: 6d 65 3d 22 69 64 22 20 76 61 6c 75 65 3d 30 3e  me="id" value=0>
2990: 3c 2f 74 64 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f  </td>.  }.  @ </
29a0: 74 72 3e 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40  tr>.  @ <tr>.  @
29b0: 20 20 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69     <td align="ri
29c0: 67 68 74 22 3e 3c 6e 6f 62 72 3e 4c 6f 67 69 6e  ght"><nobr>Login
29d0: 3a 3c 2f 6e 6f 62 72 3e 3c 2f 74 64 3e 0a 20 20  :</nobr></td>.  
29e0: 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74 20 74  @   <td><input t
29f0: 79 70 65 3d 22 74 65 78 74 22 20 6e 61 6d 65 3d  ype="text" name=
2a00: 22 6c 6f 67 69 6e 22 20 76 61 6c 75 65 3d 22 25  "login" value="%
2a10: 68 28 7a 4c 6f 67 69 6e 29 22 3e 3c 2f 74 64 3e  h(zLogin)"></td>
2a20: 0a 20 20 40 20 3c 2f 74 72 3e 0a 20 20 40 20 3c  .  @ </tr>.  @ <
2a30: 74 72 3e 0a 20 20 40 20 20 20 3c 74 64 20 61 6c  tr>.  @   <td al
2a40: 69 67 6e 3d 22 72 69 67 68 74 22 3e 3c 6e 6f 62  ign="right"><nob
2a50: 72 3e 43 6f 6e 74 61 63 74 26 6e 62 73 70 3b 49  r>Contact&nbsp;I
2a60: 6e 66 6f 3a 3c 2f 6e 6f 62 72 3e 3c 2f 74 64 3e  nfo:</nobr></td>
2a70: 0a 20 20 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75  .  @   <td><inpu
2a80: 74 20 74 79 70 65 3d 22 74 65 78 74 22 20 6e 61  t type="text" na
2a90: 6d 65 3d 22 69 6e 66 6f 22 20 73 69 7a 65 3d 34  me="info" size=4
2aa0: 30 20 76 61 6c 75 65 3d 22 25 68 28 7a 49 6e 66  0 value="%h(zInf
2ab0: 6f 29 22 3e 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f  o)"></td>.  @ </
2ac0: 74 72 3e 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40  tr>.  @ <tr>.  @
2ad0: 20 20 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69     <td align="ri
2ae0: 67 68 74 22 20 76 61 6c 69 67 6e 3d 22 74 6f 70  ght" valign="top
2af0: 22 3e 43 61 70 61 62 69 6c 69 74 69 65 73 3a 3c  ">Capabilities:<
2b00: 2f 74 64 3e 0a 20 20 40 20 20 20 3c 74 64 3e 0a  /td>.  @   <td>.
2b10: 20 20 69 66 28 20 67 2e 6f 6b 53 65 74 75 70 20    if( g.okSetup 
2b20: 29 7b 0a 20 20 20 20 40 20 20 20 20 20 3c 69 6e  ){.    @     <in
2b30: 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62  put type="checkb
2b40: 6f 78 22 20 6e 61 6d 65 3d 22 61 73 22 25 73 28  ox" name="as"%s(
2b50: 6f 61 73 29 3e 53 65 74 75 70 3c 2f 69 6e 70 75  oas)>Setup</inpu
2b60: 74 3e 3c 62 72 3e 0a 20 20 7d 0a 20 20 40 20 20  t><br>.  }.  @  
2b70: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2b80: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2b90: 61 61 22 25 73 28 6f 61 61 29 3e 41 64 6d 69 6e  aa"%s(oaa)>Admin
2ba0: 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40  </input><br>.  @
2bb0: 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65       <input type
2bc0: 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65  ="checkbox" name
2bd0: 3d 22 61 64 22 25 73 28 6f 61 64 29 3e 44 65 6c  ="ad"%s(oad)>Del
2be0: 65 74 65 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a  ete</input><br>.
2bf0: 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74    @     <input t
2c00: 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e  ype="checkbox" n
2c10: 61 6d 65 3d 22 61 65 22 25 73 28 6f 61 64 29 3e  ame="ae"%s(oad)>
2c20: 45 6d 61 69 6c 3c 2f 69 6e 70 75 74 3e 3c 62 72  Email</input><br
2c30: 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74  >.  @     <input
2c40: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
2c50: 20 6e 61 6d 65 3d 22 61 70 22 25 73 28 6f 61 70   name="ap"%s(oap
2c60: 29 3e 50 61 73 73 77 6f 72 64 3c 2f 69 6e 70 75  )>Password</inpu
2c70: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
2c80: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
2c90: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 69 22 25  kbox" name="ai"%
2ca0: 73 28 6f 61 69 29 3e 43 68 65 63 6b 2d 49 6e 3c  s(oai)>Check-In<
2cb0: 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20  /input><br>.  @ 
2cc0: 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d      <input type=
2cd0: 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d  "checkbox" name=
2ce0: 22 61 6f 22 25 73 28 6f 61 6f 29 3e 43 68 65 63  "ao"%s(oao)>Chec
2cf0: 6b 2d 4f 75 74 3c 2f 69 6e 70 75 74 3e 3c 62 72  k-Out</input><br
2d00: 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74  >.  @     <input
2d10: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
2d20: 20 6e 61 6d 65 3d 22 61 68 22 25 73 28 6f 61 68   name="ah"%s(oah
2d30: 29 3e 48 69 73 74 6f 72 79 3c 2f 69 6e 70 75 74  )>History</input
2d40: 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69  ><br>.  @     <i
2d50: 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b  nput type="check
2d60: 62 6f 78 22 20 6e 61 6d 65 3d 22 61 67 22 25 73  box" name="ag"%s
2d70: 28 6f 61 67 29 3e 43 6c 6f 6e 65 3c 2f 69 6e 70  (oag)>Clone</inp
2d80: 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20  ut><br>.  @     
2d90: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65  <input type="che
2da0: 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 6a 22  ckbox" name="aj"
2db0: 25 73 28 6f 61 6a 29 3e 52 65 61 64 20 57 69 6b  %s(oaj)>Read Wik
2dc0: 69 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20  i</input><br>.  
2dd0: 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70  @     <input typ
2de0: 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d  e="checkbox" nam
2df0: 65 3d 22 61 66 22 25 73 28 6f 61 66 29 3e 4e 65  e="af"%s(oaf)>Ne
2e00: 77 20 57 69 6b 69 3c 2f 69 6e 70 75 74 3e 3c 62  w Wiki</input><b
2e10: 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75  r>.  @     <inpu
2e20: 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78  t type="checkbox
2e30: 22 20 6e 61 6d 65 3d 22 61 6d 22 25 73 28 6f 61  " name="am"%s(oa
2e40: 6d 29 3e 41 70 70 65 6e 64 20 57 69 6b 69 3c 2f  m)>Append Wiki</
2e50: 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20  input><br>.  @  
2e60: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2e70: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2e80: 61 6b 22 25 73 28 6f 61 6b 29 3e 57 72 69 74 65  ak"%s(oak)>Write
2e90: 20 57 69 6b 69 3c 2f 69 6e 70 75 74 3e 3c 62 72   Wiki</input><br
2ea0: 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74  >.  @     <input
2eb0: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
2ec0: 20 6e 61 6d 65 3d 22 61 72 22 25 73 28 6f 61 72   name="ar"%s(oar
2ed0: 29 3e 52 65 61 64 20 54 6b 74 3c 2f 69 6e 70 75  )>Read Tkt</inpu
2ee0: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
2ef0: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
2f00: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 6e 22 25  kbox" name="an"%
2f10: 73 28 6f 61 6e 29 3e 4e 65 77 20 54 6b 74 3c 2f  s(oan)>New Tkt</
2f20: 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20  input><br>.  @  
2f30: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2f40: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2f50: 61 63 22 25 73 28 6f 61 63 29 3e 41 70 70 65 6e  ac"%s(oac)>Appen
2f60: 64 20 54 6b 74 3c 2f 69 6e 70 75 74 3e 3c 62 72  d Tkt</input><br
2f70: 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74  >.  @     <input
2f80: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
2f90: 20 6e 61 6d 65 3d 22 61 77 22 25 73 28 6f 61 77   name="aw"%s(oaw
2fa0: 29 3e 57 72 69 74 65 20 54 6b 74 3c 2f 69 6e 70  )>Write Tkt</inp
2fb0: 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20  ut><br>.  @     
2fc0: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65  <input type="che
2fd0: 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 74 22  ckbox" name="at"
2fe0: 25 73 28 6f 61 74 29 3e 54 6b 74 20 52 65 70 6f  %s(oat)>Tkt Repo
2ff0: 72 74 3c 2f 69 6e 70 75 74 3e 0a 20 20 40 20 20  rt</input>.  @  
3000: 20 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74 72 3e   </td>.  @ </tr>
3010: 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20 20 20  .  @ <tr>.  @   
3020: 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69 67 68 74  <td align="right
3030: 22 3e 50 61 73 73 77 6f 72 64 3a 3c 2f 74 64 3e  ">Password:</td>
3040: 0a 20 20 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75  .  @   <td><inpu
3050: 74 20 74 79 70 65 3d 22 70 61 73 73 77 6f 72 64  t type="password
3060: 22 20 6e 61 6d 65 3d 22 70 77 22 20 76 61 6c 75  " name="pw" valu
3070: 65 3d 22 22 3e 3c 2f 74 64 3e 0a 20 20 40 20 3c  e=""></td>.  @ <
3080: 2f 74 72 3e 0a 20 20 69 66 28 20 21 68 69 67 68  /tr>.  if( !high
3090: 65 72 55 73 65 72 20 29 7b 0a 20 20 20 20 40 20  erUser ){.    @ 
30a0: 3c 74 72 3e 0a 20 20 20 20 40 20 20 20 3c 74 64  <tr>.    @   <td
30b0: 3e 26 6e 62 73 70 3c 2f 74 64 3e 0a 20 20 20 20  >&nbsp</td>.    
30c0: 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74 20 74  @   <td><input t
30d0: 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d  ype="submit" nam
30e0: 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65  e="submit" value
30f0: 3d 22 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22  ="Apply Changes"
3100: 3e 0a 20 20 20 20 40 20 3c 2f 74 72 3e 0a 20 20  >.    @ </tr>.  
3110: 7d 0a 20 20 40 20 3c 2f 74 61 62 6c 65 3e 3c 2f  }.  @ </table></
3120: 74 64 3e 3c 2f 74 72 3e 3c 2f 74 61 62 6c 65 3e  td></tr></table>
3130: 0a 20 20 40 20 3c 70 3e 3c 62 3e 4e 6f 74 65 73  .  @ <p><b>Notes
3140: 3a 3c 2f 62 3e 3c 2f 70 3e 0a 20 20 40 20 3c 6f  :</b></p>.  @ <o
3150: 6c 3e 0a 20 20 69 66 28 20 68 69 67 68 65 72 55  l>.  if( higherU
3160: 73 65 72 20 29 7b 0a 20 20 20 20 40 20 3c 6c 69  ser ){.    @ <li
3170: 3e 3c 70 3e 3c 66 6f 6e 74 20 63 6f 6c 6f 72 3d  ><p><font color=
3180: 22 62 6c 75 65 22 3e 3c 62 3e 0a 20 20 20 20 40  "blue"><b>.    @
3190: 20 55 73 65 72 20 25 68 28 7a 4c 6f 67 69 6e 29   User %h(zLogin)
31a0: 20 68 61 73 20 53 65 74 75 70 20 70 72 69 76 69   has Setup privi
31b0: 6c 65 67 65 73 20 61 6e 64 20 79 6f 75 20 6f 6e  leges and you on
31c0: 6c 79 20 68 61 76 65 20 41 64 6d 69 6e 20 70 72  ly have Admin pr
31d0: 69 76 69 6c 65 67 65 73 0a 20 20 20 20 40 20 73  ivileges.    @ s
31e0: 6f 20 79 6f 75 20 61 72 65 20 6e 6f 74 20 70 65  o you are not pe
31f0: 72 6d 69 74 74 65 64 20 74 6f 20 6d 61 6b 65 20  rmitted to make 
3200: 63 68 61 6e 67 65 73 20 74 6f 20 25 68 28 7a 4c  changes to %h(zL
3210: 6f 67 69 6e 29 2e 0a 20 20 20 20 40 20 3c 2f 62  ogin)..    @ </b
3220: 3e 3c 2f 66 6f 6e 74 3e 3c 2f 70 3e 3c 2f 6c 69  ></font></p></li
3230: 3e 0a 20 20 20 20 40 0a 20 20 7d 0a 20 20 40 0a  >.    @.  }.  @.
3240: 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20    @ <li><p>.  @ 
3250: 54 68 65 20 3c 62 3e 53 65 74 75 70 3c 2f 62 3e  The <b>Setup</b>
3260: 20 75 73 65 72 20 63 61 6e 20 6d 61 6b 65 20 61   user can make a
3270: 72 62 69 74 72 61 72 79 20 63 6f 6e 66 69 67 75  rbitrary configu
3280: 72 61 74 69 6f 6e 20 63 68 61 6e 67 65 73 2e 0a  ration changes..
3290: 20 20 40 20 41 6e 20 3c 62 3e 41 64 6d 69 6e 3c    @ An <b>Admin<
32a0: 2f 62 3e 20 75 73 65 72 20 63 61 6e 20 61 64 64  /b> user can add
32b0: 20 6f 74 68 65 72 20 75 73 65 72 73 20 61 6e 64   other users and
32c0: 20 63 68 61 6e 67 65 20 75 73 65 72 20 70 72 69   change user pri
32d0: 76 69 6c 65 67 65 73 0a 20 20 40 20 61 6e 64 20  vileges.  @ and 
32e0: 72 65 73 65 74 20 75 73 65 72 20 70 61 73 73 77  reset user passw
32f0: 6f 72 64 73 2e 20 20 42 6f 74 68 20 61 75 74 6f  ords.  Both auto
3300: 6d 61 74 69 63 61 6c 6c 79 20 67 65 74 20 61 6c  matically get al
3310: 6c 20 6f 74 68 65 72 20 70 72 69 76 69 6c 65 67  l other privileg
3320: 65 73 0a 20 20 40 20 6c 69 73 74 65 64 20 62 65  es.  @ listed be
3330: 6c 6f 77 2e 20 20 55 73 65 20 74 68 65 73 65 20  low.  Use these 
3340: 74 77 6f 20 73 65 74 74 69 6e 67 73 20 77 69 74  two settings wit
3350: 68 20 64 69 73 63 72 65 74 69 6f 6e 2e 0a 20 20  h discretion..  
3360: 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a  @ </p></li>.  @.
3370: 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20    @ <li><p>.  @ 
3380: 54 68 65 20 3c 62 3e 44 65 6c 65 74 65 3c 2f 62  The <b>Delete</b
3390: 3e 20 70 72 69 76 69 6c 65 67 65 20 67 69 76 65  > privilege give
33a0: 20 74 68 65 20 75 73 65 72 20 74 68 65 20 61 62   the user the ab
33b0: 69 6c 69 74 79 20 74 6f 20 65 72 61 73 65 0a 20  ility to erase. 
33c0: 20 40 20 77 69 6b 69 2c 20 74 69 63 6b 65 74 73   @ wiki, tickets
33d0: 2c 20 61 6e 64 20 61 74 74 61 63 68 6d 65 6e 74  , and attachment
33e0: 73 20 74 68 61 74 20 68 61 76 65 20 62 65 65 6e  s that have been
33f0: 20 61 64 64 65 64 20 62 79 20 61 6e 6f 6e 79 6d   added by anonym
3400: 6f 75 73 0a 20 20 40 20 75 73 65 72 73 2e 20 20  ous.  @ users.  
3410: 54 68 69 73 20 63 61 70 61 62 69 6c 69 74 79 20  This capability 
3420: 69 73 20 69 6e 74 65 6e 64 65 64 20 66 6f 72 20  is intended for 
3430: 64 65 6c 65 74 69 6f 6e 20 6f 66 20 73 70 61 6d  deletion of spam
3440: 2e 20 20 54 68 65 0a 20 20 40 20 64 65 6c 65 74  .  The.  @ delet
3450: 65 20 63 61 70 61 62 69 6c 69 74 79 20 69 73 20  e capability is 
3460: 6f 6e 6c 79 20 69 6e 20 65 66 66 65 63 74 20 66  only in effect f
3470: 6f 72 20 32 34 20 68 6f 75 72 73 20 61 66 74 65  or 24 hours afte
3480: 72 20 74 68 65 20 69 74 65 6d 0a 20 20 40 20 69  r the item.  @ i
3490: 73 20 66 69 72 73 74 20 70 6f 73 74 65 64 2e 20  s first posted. 
34a0: 20 54 68 65 20 53 65 74 75 70 20 75 73 65 72 20   The Setup user 
34b0: 63 61 6e 20 64 65 6c 65 74 65 20 61 6e 79 74 68  can delete anyth
34c0: 69 6e 67 20 61 74 20 61 6e 79 20 74 69 6d 65 2e  ing at any time.
34d0: 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20  .  @ </p></li>. 
34e0: 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20   @.  @ <li><p>. 
34f0: 20 40 20 54 68 65 20 3c 62 3e 48 69 73 74 6f 72   @ The <b>Histor
3500: 79 3c 2f 62 3e 20 70 72 69 76 69 6c 65 67 65 20  y</b> privilege 
3510: 61 6c 6c 6f 77 73 20 61 20 75 73 65 72 20 74 6f  allows a user to
3520: 20 73 65 65 20 6d 6f 73 74 20 68 79 70 65 72 6c   see most hyperl
3530: 69 6e 6b 73 2e 0a 20 20 40 20 54 68 69 73 20 69  inks..  @ This i
3540: 73 20 72 65 63 6f 6d 6d 65 6e 64 65 64 20 4f 4e  s recommended ON
3550: 20 66 6f 72 20 6d 6f 73 74 20 6c 6f 67 67 65 64   for most logged
3560: 2d 69 6e 20 75 73 65 72 73 20 62 75 74 20 4f 46  -in users but OF
3570: 46 20 66 6f 72 0a 20 20 40 20 75 73 65 72 20 22  F for.  @ user "
3580: 6e 6f 62 6f 64 79 22 20 74 6f 20 61 76 6f 69 64  nobody" to avoid
3590: 20 70 72 6f 62 6c 65 6d 73 20 77 69 74 68 20 73   problems with s
35a0: 70 69 64 65 72 73 20 74 72 79 69 6e 67 20 74 6f  piders trying to
35b0: 20 77 61 6c 6b 20 65 76 65 72 79 0a 20 20 40 20   walk every.  @ 
35c0: 68 69 73 74 6f 72 69 63 61 6c 20 76 65 72 73 69  historical versi
35d0: 6f 6e 20 6f 66 20 65 76 65 72 79 20 62 61 73 65  on of every base
35e0: 6c 69 6e 65 20 61 6e 64 20 66 69 6c 65 2e 0a 20  line and file.. 
35f0: 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40   @ </p></li>.  @
3600: 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40  .  @ <li><p>.  @
3610: 20 54 68 65 20 3c 62 3e 43 68 65 63 6b 2d 69 6e   The <b>Check-in
3620: 3c 2f 62 3e 20 70 72 69 76 69 6c 65 67 65 20 61  </b> privilege a
3630: 6c 6c 6f 77 73 20 72 65 6d 6f 74 65 20 75 73 65  llows remote use
3640: 72 73 20 74 6f 20 22 70 75 73 68 22 2e 0a 20 20  rs to "push"..  
3650: 40 20 54 68 65 20 3c 62 3e 43 68 65 63 6b 2d 6f  @ The <b>Check-o
3660: 75 74 3c 2f 62 3e 20 70 72 69 76 69 6c 65 67 65  ut</b> privilege
3670: 20 61 6c 6c 6f 77 73 20 72 65 6d 6f 74 65 20 75   allows remote u
3680: 73 65 72 73 20 74 6f 20 22 70 75 6c 6c 22 2e 0a  sers to "pull"..
3690: 20 20 40 20 54 68 65 20 3c 62 3e 43 6c 6f 6e 65    @ The <b>Clone
36a0: 3c 2f 62 3e 20 70 72 69 76 69 6c 65 67 65 20 61  </b> privilege a
36b0: 6c 6c 6f 77 73 20 72 65 6d 6f 74 65 20 75 73 65  llows remote use
36c0: 72 73 20 74 6f 20 22 63 6c 6f 6e 65 22 2e 0a 20  rs to "clone".. 
36d0: 20 40 20 3c 2f 6c 69 3e 3c 70 3e 0a 20 20 40 0a   @ </li><p>.  @.
36e0: 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20    @ <li><p>.  @ 
36f0: 54 68 65 20 3c 62 3e 52 65 61 64 20 57 69 6b 69  The <b>Read Wiki
3700: 3c 2f 62 3e 2c 20 3c 62 3e 4e 65 77 20 57 69 6b  </b>, <b>New Wik
3710: 69 3c 2f 62 3e 2c 20 3c 62 3e 41 70 70 65 6e 64  i</b>, <b>Append
3720: 20 57 69 6b 69 3c 2f 62 3e 2c 20 61 6e 64 0a 20   Wiki</b>, and. 
3730: 20 40 20 3c 62 3e 57 72 69 74 65 20 57 69 6b 69   @ <b>Write Wiki
3740: 3c 2f 62 3e 20 70 72 69 76 69 6c 65 67 65 73 20  </b> privileges 
3750: 63 6f 6e 74 72 6f 6c 20 61 63 63 65 73 73 20 74  control access t
3760: 6f 20 77 69 6b 69 20 70 61 67 65 73 2e 20 20 54  o wiki pages.  T
3770: 68 65 0a 20 20 40 20 3c 62 3e 52 65 61 64 20 54  he.  @ <b>Read T
3780: 6b 74 3c 2f 62 3e 2c 20 3c 62 3e 4e 65 77 20 54  kt</b>, <b>New T
3790: 6b 74 3c 2f 62 3e 2c 20 3c 62 3e 41 70 70 65 6e  kt</b>, <b>Appen
37a0: 64 20 54 6b 74 3c 2f 62 3e 2c 20 61 6e 64 0a 20  d Tkt</b>, and. 
37b0: 20 40 20 3c 62 3e 57 72 69 74 65 20 54 6b 74 3c   @ <b>Write Tkt<
37c0: 2f 62 3e 20 70 72 69 76 69 6c 65 67 65 73 20 63  /b> privileges c
37d0: 6f 6e 74 72 6f 6c 20 61 63 63 65 73 73 20 74 6f  ontrol access to
37e0: 20 74 72 6f 75 62 6c 65 20 74 69 63 6b 65 74 73   trouble tickets
37f0: 2e 0a 20 20 40 20 54 68 65 20 3c 62 3e 54 6b 74  ..  @ The <b>Tkt
3800: 20 52 65 70 6f 72 74 3c 2f 62 3e 20 70 72 69 76   Report</b> priv
3810: 69 6c 65 67 65 20 61 6c 6c 6f 77 73 20 74 68 65  ilege allows the
3820: 20 75 73 65 72 20 74 6f 20 63 72 65 61 74 65 20   user to create 
3830: 6f 72 20 65 64 69 74 0a 20 20 40 20 74 69 63 6b  or edit.  @ tick
3840: 65 74 20 72 65 70 6f 72 74 20 66 6f 72 6d 61 74  et report format
3850: 73 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e  s..  @ </p></li>
3860: 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e  .  @.  @ <li><p>
3870: 0a 20 20 40 20 55 73 65 72 73 20 77 69 74 68 20  .  @ Users with 
3880: 74 68 65 20 3c 62 3e 50 61 73 73 77 6f 72 64 3c  the <b>Password<
3890: 2f 62 3e 20 70 72 69 76 69 6c 65 67 65 20 61 72  /b> privilege ar
38a0: 65 20 61 6c 6c 6f 77 65 64 20 74 6f 20 63 68 61  e allowed to cha
38b0: 6e 67 65 20 74 68 65 69 72 0a 20 20 40 20 6f 77  nge their.  @ ow
38c0: 6e 20 70 61 73 73 77 6f 72 64 2e 20 20 52 65 63  n password.  Rec
38d0: 6f 6d 6d 65 6e 64 65 64 20 4f 4e 20 66 6f 72 20  ommended ON for 
38e0: 6d 6f 73 74 20 75 73 65 72 73 20 62 75 74 20 4f  most users but O
38f0: 46 46 20 66 6f 72 20 22 61 6e 6f 6e 79 6e 6d 6f  FF for "anonynmo
3900: 75 73 22 0a 20 20 40 20 61 6e 64 20 22 6e 6f 62  us".  @ and "nob
3910: 6f 64 79 22 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f  ody"..  @ </p></
3920: 6c 69 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e  li>.  @.  @ <li>
3930: 3c 70 3e 0a 20 20 40 20 54 68 65 20 3c 62 3e 45  <p>.  @ The <b>E
3940: 4d 61 69 6c 3c 2f 62 3e 20 70 72 69 76 69 6c 65  Mail</b> privile
3950: 67 65 20 61 6c 6c 6f 77 73 20 74 68 65 20 64 69  ge allows the di
3960: 73 70 6c 61 79 20 6f 66 20 73 65 6e 73 69 74 69  splay of sensiti
3970: 76 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 0a 20  ve information. 
3980: 20 40 20 73 75 63 68 20 61 73 20 74 68 65 20 65   @ such as the e
3990: 6d 61 69 6c 20 61 64 64 72 65 73 73 20 6f 66 20  mail address of 
39a0: 75 73 65 72 73 20 61 6e 64 20 63 6f 6e 74 61 63  users and contac
39b0: 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 6f 6e  t information on
39c0: 20 74 69 63 6b 65 74 73 2e 0a 20 20 40 20 52 65   tickets..  @ Re
39d0: 63 6f 6d 6d 65 6e 64 65 64 20 4f 46 46 20 66 6f  commended OFF fo
39e0: 72 20 22 61 6e 6f 6e 79 6d 6f 75 73 22 20 61 6e  r "anonymous" an
39f0: 64 20 66 6f 72 20 22 6e 6f 62 6f 64 79 22 2e 0a  d for "nobody"..
3a00: 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20    @ </p></li>.  
3a10: 40 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20  @.  @ <li><p>.  
3a20: 40 20 4e 6f 20 6c 6f 67 69 6e 20 69 73 20 72 65  @ No login is re
3a30: 71 75 69 72 65 64 20 66 6f 72 20 75 73 65 72 20  quired for user 
3a40: 22 3c 62 3e 6e 6f 62 6f 64 79 3c 2f 62 3e 22 2e  "<b>nobody</b>".
3a50: 20 20 54 68 65 20 63 61 70 61 62 69 6c 69 74 69    The capabiliti
3a60: 65 73 0a 20 20 40 20 6f 66 20 74 68 69 73 20 75  es.  @ of this u
3a70: 73 65 72 20 61 72 65 20 61 76 61 69 6c 61 62 6c  ser are availabl
3a80: 65 20 74 6f 20 61 6e 79 6f 6e 65 20 77 69 74 68  e to anyone with
3a90: 6f 75 74 20 73 75 70 70 6c 79 69 6e 67 20 61 20  out supplying a 
3aa0: 75 73 65 72 6e 61 6d 65 20 6f 72 0a 20 20 40 20  username or.  @ 
3ab0: 70 61 73 73 77 6f 72 64 2e 20 20 54 6f 20 64 69  password.  To di
3ac0: 73 61 62 6c 65 20 6e 6f 62 6f 64 79 20 61 63 63  sable nobody acc
3ad0: 65 73 73 2c 20 6d 61 6b 65 20 73 75 72 65 20 74  ess, make sure t
3ae0: 68 65 72 65 20 69 73 20 6e 6f 20 75 73 65 72 0a  here is no user.
3af0: 20 20 40 20 77 69 74 68 20 61 6e 20 49 44 20 6f    @ with an ID o
3b00: 66 20 3c 62 3e 6e 6f 62 6f 64 79 3c 2f 62 3e 20  f <b>nobody</b> 
3b10: 6f 72 20 74 68 61 74 20 74 68 65 20 6e 6f 62 6f  or that the nobo
3b20: 64 79 20 75 73 65 72 20 68 61 73 20 6e 6f 0a 20  dy user has no. 
3b30: 20 40 20 63 61 70 61 62 69 6c 69 74 69 65 73 20   @ capabilities 
3b40: 65 6e 61 62 6c 65 64 2e 20 20 54 68 65 20 70 61  enabled.  The pa
3b50: 73 73 77 6f 72 64 20 66 6f 72 20 6e 6f 62 6f 64  ssword for nobod
3b60: 79 20 69 73 20 69 67 6e 6f 72 65 2e 20 20 54 6f  y is ignore.  To
3b70: 0a 20 20 40 20 61 76 6f 69 64 20 70 72 6f 62 6c  .  @ avoid probl
3b80: 65 6d 73 20 77 69 74 68 20 73 70 69 64 65 72 73  ems with spiders
3b90: 20 6f 76 65 72 6c 6f 61 64 69 6e 67 20 74 68 65   overloading the
3ba0: 20 73 65 72 76 65 72 2c 20 69 74 20 69 73 20 73   server, it is s
3bb0: 75 67 67 65 73 74 65 64 0a 20 20 40 20 74 68 61  uggested.  @ tha
3bc0: 74 20 74 68 65 20 27 68 27 20 28 48 69 73 74 6f  t the 'h' (Histo
3bd0: 72 79 29 20 63 61 70 61 62 69 6c 69 74 79 20 62  ry) capability b
3be0: 65 20 74 75 72 6e 65 64 20 6f 66 66 20 66 6f 72  e turned off for
3bf0: 20 75 73 65 72 20 6e 6f 62 6f 64 79 2e 0a 20 20   user nobody..  
3c00: 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a  @ </p></li>.  @.
3c10: 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20    @ <li><p>.  @ 
3c20: 4c 6f 67 69 6e 20 69 73 20 72 65 71 75 69 72 65  Login is require
3c30: 64 20 66 6f 72 20 75 73 65 72 20 22 3c 62 3e 61  d for user "<b>a
3c40: 6e 6f 6e 79 6d 6f 75 73 3c 2f 62 3e 22 20 62 75  nonymous</b>" bu
3c50: 74 20 74 68 65 20 70 61 73 73 77 6f 72 64 0a 20  t the password. 
3c60: 20 40 20 69 73 20 64 69 73 70 6c 61 79 65 64 20   @ is displayed 
3c70: 6f 6e 20 74 68 65 20 6c 6f 67 69 6e 20 73 63 72  on the login scr
3c80: 65 65 6e 20 62 65 73 69 64 65 20 74 68 65 20 70  een beside the p
3c90: 61 73 73 77 6f 72 64 20 65 6e 74 72 79 20 62 6f  assword entry bo
3ca0: 78 0a 20 20 40 20 73 6f 20 61 6e 79 62 6f 64 79  x.  @ so anybody
3cb0: 20 77 68 6f 20 63 61 6e 20 72 65 61 64 20 73 68   who can read sh
3cc0: 6f 75 6c 64 20 62 65 20 61 62 6c 65 20 74 6f 20  ould be able to 
3cd0: 6c 6f 67 69 6e 20 61 73 20 61 6e 6f 6e 79 6d 6f  login as anonymo
3ce0: 75 73 2e 0a 20 20 40 20 4f 6e 20 74 68 65 20 6f  us..  @ On the o
3cf0: 74 68 65 72 20 68 61 6e 64 2c 20 73 70 69 64 65  ther hand, spide
3d00: 72 73 20 61 6e 64 20 77 65 62 2d 63 72 61 77 6c  rs and web-crawl
3d10: 65 72 73 20 77 69 6c 6c 20 74 79 70 69 63 61 6c  ers will typical
3d20: 6c 79 20 6e 6f 74 0a 20 20 40 20 62 65 20 61 62  ly not.  @ be ab
3d30: 6c 65 20 74 6f 20 6c 6f 67 69 6e 2e 20 20 53 65  le to login.  Se
3d40: 74 20 74 68 65 20 63 61 70 61 62 69 6c 69 74 69  t the capabiliti
3d50: 65 73 20 6f 66 20 74 68 65 20 61 6e 6f 6e 79 6d  es of the anonym
3d60: 6f 75 73 20 75 73 65 72 0a 20 20 40 20 74 6f 20  ous user.  @ to 
3d70: 74 68 69 6e 67 73 20 74 68 61 74 20 79 6f 75 20  things that you 
3d80: 77 61 6e 74 20 61 6e 79 20 68 75 6d 61 6e 20 74  want any human t
3d90: 6f 20 62 65 20 61 62 6c 65 20 74 6f 20 64 6f 2c  o be able to do,
3da0: 20 62 75 74 20 6e 6f 74 20 61 6e 79 0a 20 20 40   but not any.  @
3db0: 20 73 70 69 64 65 72 2e 0a 20 20 40 20 3c 2f 70   spider..  @ </p
3dc0: 3e 3c 2f 6c 69 3e 0a 20 20 40 20 3c 2f 66 6f 72  ></li>.  @ </for
3dd0: 6d 3e 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65  m>.  style_foote
3de0: 72 28 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 47  r();.}.../*.** G
3df0: 65 6e 65 72 61 74 65 20 61 20 63 68 65 63 6b 62  enerate a checkb
3e00: 6f 78 20 66 6f 72 20 61 6e 20 61 74 74 72 69 62  ox for an attrib
3e10: 75 74 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ute..*/.static v
3e20: 6f 69 64 20 6f 6e 6f 66 66 5f 61 74 74 72 69 62  oid onoff_attrib
3e30: 75 74 65 28 0a 20 20 63 6f 6e 73 74 20 63 68 61  ute(.  const cha
3e40: 72 20 2a 7a 4c 61 62 65 6c 2c 20 20 20 2f 2a 20  r *zLabel,   /* 
3e50: 54 68 65 20 74 65 78 74 20 6c 61 62 65 6c 20 6f  The text label o
3e60: 6e 20 74 68 65 20 63 68 65 63 6b 62 6f 78 20 2a  n the checkbox *
3e70: 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  /.  const char *
3e80: 7a 56 61 72 2c 20 20 20 20 20 2f 2a 20 54 68 65  zVar,     /* The
3e90: 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 72   corresponding r
3ea0: 6f 77 20 69 6e 20 74 68 65 20 56 41 52 20 74 61  ow in the VAR ta
3eb0: 62 6c 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63  ble */.  const c
3ec0: 68 61 72 20 2a 7a 51 50 61 72 6d 2c 20 20 20 2f  har *zQParm,   /
3ed0: 2a 20 54 68 65 20 71 75 65 72 79 20 70 61 72 61  * The query para
3ee0: 6d 65 74 65 72 20 2a 2f 0a 20 20 69 6e 74 20 64  meter */.  int d
3ef0: 66 6c 74 56 61 6c 20 20 20 20 20 20 20 20 20 20  fltVal          
3f00: 20 2f 2a 20 44 65 66 61 75 6c 74 20 76 61 6c 75   /* Default valu
3f10: 65 20 69 66 20 56 41 52 20 74 61 62 6c 65 20 65  e if VAR table e
3f20: 6e 74 72 79 20 64 6f 65 73 20 6e 6f 74 20 65 78  ntry does not ex
3f30: 69 73 74 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e 73  ist */.){.  cons
3f40: 74 20 63 68 61 72 20 2a 7a 56 61 6c 20 3d 20 64  t char *zVal = d
3f50: 62 5f 67 65 74 28 7a 56 61 72 2c 20 30 29 3b 0a  b_get(zVar, 0);.
3f60: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 51    const char *zQ
3f70: 20 3d 20 50 28 7a 51 50 61 72 6d 29 3b 0a 20 20   = P(zQParm);.  
3f80: 69 6e 74 20 69 56 61 6c 3b 0a 20 20 69 66 28 20  int iVal;.  if( 
3f90: 7a 56 61 6c 20 29 7b 0a 20 20 20 20 69 56 61 6c  zVal ){.    iVal
3fa0: 20 3d 20 61 74 6f 69 28 7a 56 61 6c 29 3b 0a 20   = atoi(zVal);. 
3fb0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 69 56 61 6c   }else{.    iVal
3fc0: 20 3d 20 64 66 6c 74 56 61 6c 3b 0a 20 20 7d 0a   = dfltVal;.  }.
3fd0: 20 20 69 66 28 20 7a 51 3d 3d 30 20 26 26 20 50    if( zQ==0 && P
3fe0: 28 22 73 75 62 6d 69 74 22 29 20 29 7b 0a 20 20  ("submit") ){.  
3ff0: 20 20 7a 51 20 3d 20 22 6f 66 66 22 3b 0a 20 20    zQ = "off";.  
4000: 7d 0a 20 20 69 66 28 20 7a 51 20 29 7b 0a 20 20  }.  if( zQ ){.  
4010: 20 20 69 6e 74 20 69 51 20 3d 20 73 74 72 63 6d    int iQ = strcm
4020: 70 28 7a 51 2c 22 6f 6e 22 29 3d 3d 30 20 7c 7c  p(zQ,"on")==0 ||
4030: 20 61 74 6f 69 28 7a 51 29 3b 0a 20 20 20 20 69   atoi(zQ);.    i
4040: 66 28 20 69 51 21 3d 69 56 61 6c 20 29 7b 0a 20  f( iQ!=iVal ){. 
4050: 20 20 20 20 20 64 62 5f 73 65 74 28 7a 56 61 72       db_set(zVar
4060: 2c 20 69 51 20 3f 20 22 31 22 20 3a 20 22 30 22  , iQ ? "1" : "0"
4070: 2c 20 30 29 3b 0a 20 20 20 20 20 20 69 56 61 6c  , 0);.      iVal
4080: 20 3d 20 69 51 3b 0a 20 20 20 20 7d 0a 20 20 7d   = iQ;.    }.  }
4090: 0a 20 20 69 66 28 20 69 56 61 6c 20 29 7b 0a 20  .  if( iVal ){. 
40a0: 20 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65     @ <input type
40b0: 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65  ="checkbox" name
40c0: 3d 22 25 73 28 7a 51 50 61 72 6d 29 22 20 63 68  ="%s(zQParm)" ch
40d0: 65 63 6b 65 64 3e 3c 62 3e 25 73 28 7a 4c 61 62  ecked><b>%s(zLab
40e0: 65 6c 29 3c 2f 62 3e 3c 2f 69 6e 70 75 74 3e 0a  el)</b></input>.
40f0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 40 20 3c    }else{.    @ <
4100: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
4110: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 25 73 28 7a  kbox" name="%s(z
4120: 51 50 61 72 6d 29 22 3e 3c 62 3e 25 73 28 7a 4c  QParm)"><b>%s(zL
4130: 61 62 65 6c 29 3c 2f 62 3e 3c 2f 69 6e 70 75 74  abel)</b></input
4140: 3e 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47  >.  }.}../*.** G
4150: 65 6e 65 72 61 74 65 20 61 6e 20 65 6e 74 72 79  enerate an entry
4160: 20 62 6f 78 20 66 6f 72 20 61 6e 20 61 74 74 72   box for an attr
4170: 69 62 75 74 65 2e 0a 2a 2f 0a 73 74 61 74 69 63  ibute..*/.static
4180: 20 76 6f 69 64 20 65 6e 74 72 79 5f 61 74 74 72   void entry_attr
4190: 69 62 75 74 65 28 0a 20 20 63 6f 6e 73 74 20 63  ibute(.  const c
41a0: 68 61 72 20 2a 7a 4c 61 62 65 6c 2c 20 20 20 2f  har *zLabel,   /
41b0: 2a 20 54 68 65 20 74 65 78 74 20 6c 61 62 65 6c  * The text label
41c0: 20 6f 6e 20 74 68 65 20 65 6e 74 72 79 20 62 6f   on the entry bo
41d0: 78 20 2a 2f 0a 20 20 69 6e 74 20 77 69 64 74 68  x */.  int width
41e0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ,            /* 
41f0: 57 69 64 74 68 20 6f 66 20 74 68 65 20 65 6e 74  Width of the ent
4200: 72 79 20 62 6f 78 20 2a 2f 0a 20 20 63 6f 6e 73  ry box */.  cons
4210: 74 20 63 68 61 72 20 2a 7a 56 61 72 2c 20 20 20  t char *zVar,   
4220: 20 20 2f 2a 20 54 68 65 20 63 6f 72 72 65 73 70    /* The corresp
4230: 6f 6e 64 69 6e 67 20 72 6f 77 20 69 6e 20 74 68  onding row in th
4240: 65 20 56 41 52 20 74 61 62 6c 65 20 2a 2f 0a 20  e VAR table */. 
4250: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 51 50   const char *zQP
4260: 61 72 6d 2c 20 20 20 2f 2a 20 54 68 65 20 71 75  arm,   /* The qu
4270: 65 72 79 20 70 61 72 61 6d 65 74 65 72 20 2a 2f  ery parameter */
4280: 0a 20 20 63 68 61 72 20 2a 7a 44 66 6c 74 20 20  .  char *zDflt  
4290: 20 20 20 2f 2a 20 44 65 66 61 75 6c 74 20 76 61     /* Default va
42a0: 6c 75 65 20 69 66 20 56 41 52 20 74 61 62 6c 65  lue if VAR table
42b0: 20 65 6e 74 72 79 20 64 6f 65 73 20 6e 6f 74 20   entry does not 
42c0: 65 78 69 73 74 20 2a 2f 0a 29 7b 0a 20 20 63 6f  exist */.){.  co
42d0: 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 6c 20 3d  nst char *zVal =
42e0: 20 64 62 5f 67 65 74 28 7a 56 61 72 2c 20 7a 44   db_get(zVar, zD
42f0: 66 6c 74 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68  flt);.  const ch
4300: 61 72 20 2a 7a 51 20 3d 20 50 28 7a 51 50 61 72  ar *zQ = P(zQPar
4310: 6d 29 3b 0a 20 20 69 66 28 20 7a 51 20 26 26 20  m);.  if( zQ && 
4320: 73 74 72 63 6d 70 28 7a 51 2c 7a 56 61 6c 29 21  strcmp(zQ,zVal)!
4330: 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f 73 65 74  =0 ){.    db_set
4340: 28 7a 56 61 72 2c 20 7a 51 2c 20 30 29 3b 0a 20  (zVar, zQ, 0);. 
4350: 20 20 20 7a 56 61 6c 20 3d 20 7a 51 3b 0a 20 20     zVal = zQ;.  
4360: 7d 0a 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70  }.  @ <input typ
4370: 65 3d 22 74 65 78 74 22 20 6e 61 6d 65 3d 22 25  e="text" name="%
4380: 73 28 7a 51 50 61 72 6d 29 22 20 76 61 6c 75 65  s(zQParm)" value
4390: 3d 22 25 68 28 7a 56 61 6c 29 22 20 73 69 7a 65  ="%h(zVal)" size
43a0: 3d 22 25 64 28 77 69 64 74 68 29 22 3e 0a 20 20  ="%d(width)">.  
43b0: 40 20 3c 62 3e 25 73 28 7a 4c 61 62 65 6c 29 3c  @ <b>%s(zLabel)<
43c0: 2f 62 3e 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 6e  /b>.}../*.** Gen
43d0: 65 72 61 74 65 20 61 20 74 65 78 74 20 62 6f 78  erate a text box
43e0: 20 66 6f 72 20 61 6e 20 61 74 74 72 69 62 75 74   for an attribut
43f0: 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  e..*/.static voi
4400: 64 20 74 65 78 74 61 72 65 61 5f 61 74 74 72 69  d textarea_attri
4410: 62 75 74 65 28 0a 20 20 63 6f 6e 73 74 20 63 68  bute(.  const ch
4420: 61 72 20 2a 7a 4c 61 62 65 6c 2c 20 20 20 2f 2a  ar *zLabel,   /*
4430: 20 54 68 65 20 74 65 78 74 20 6c 61 62 65 6c 20   The text label 
4440: 6f 6e 20 74 68 65 20 74 65 78 74 61 72 65 61 20  on the textarea 
4450: 2a 2f 0a 20 20 69 6e 74 20 72 6f 77 73 2c 20 20  */.  int rows,  
4460: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 52 6f             /* Ro
4470: 77 73 20 69 6e 20 74 68 65 20 74 65 78 74 61 72  ws in the textar
4480: 65 61 20 2a 2f 0a 20 20 69 6e 74 20 63 6f 6c 73  ea */.  int cols
4490: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a  ,             /*
44a0: 20 43 6f 6c 75 6d 6e 73 20 69 6e 20 74 68 65 20   Columns in the 
44b0: 74 65 78 74 61 72 65 61 20 2a 2f 0a 20 20 63 6f  textarea */.  co
44c0: 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 72 2c 20  nst char *zVar, 
44d0: 20 20 20 20 2f 2a 20 54 68 65 20 63 6f 72 72 65      /* The corre
44e0: 73 70 6f 6e 64 69 6e 67 20 72 6f 77 20 69 6e 20  sponding row in 
44f0: 74 68 65 20 56 41 52 20 74 61 62 6c 65 20 2a 2f  the VAR table */
4500: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
4510: 51 50 2c 20 20 20 20 20 20 2f 2a 20 54 68 65 20  QP,      /* The 
4520: 71 75 65 72 79 20 70 61 72 61 6d 65 74 65 72 20  query parameter 
4530: 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  */.  const char 
4540: 2a 7a 44 66 6c 74 20 20 20 20 20 2f 2a 20 44 65  *zDflt     /* De
4550: 66 61 75 6c 74 20 76 61 6c 75 65 20 69 66 20 56  fault value if V
4560: 41 52 20 74 61 62 6c 65 20 65 6e 74 72 79 20 64  AR table entry d
4570: 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 20 2a 2f  oes not exist */
4580: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  .){.  const char
4590: 20 2a 7a 20 3d 20 64 62 5f 67 65 74 28 7a 56 61   *z = db_get(zVa
45a0: 72 2c 20 28 63 68 61 72 2a 29 7a 44 66 6c 74 29  r, (char*)zDflt)
45b0: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
45c0: 7a 51 20 3d 20 50 28 7a 51 50 29 3b 0a 20 20 69  zQ = P(zQP);.  i
45d0: 66 28 20 7a 51 20 26 26 20 73 74 72 63 6d 70 28  f( zQ && strcmp(
45e0: 7a 51 2c 7a 29 21 3d 30 20 29 7b 0a 20 20 20 20  zQ,z)!=0 ){.    
45f0: 64 62 5f 73 65 74 28 7a 56 61 72 2c 20 7a 51 2c  db_set(zVar, zQ,
4600: 20 30 29 3b 0a 20 20 20 20 7a 20 3d 20 7a 51 3b   0);.    z = zQ;
4610: 0a 20 20 7d 0a 20 20 69 66 28 20 72 6f 77 73 3e  .  }.  if( rows>
4620: 30 20 26 26 20 63 6f 6c 73 3e 30 20 29 7b 0a 20  0 && cols>0 ){. 
4630: 20 20 20 40 20 3c 74 65 78 74 61 72 65 61 20 6e     @ <textarea n
4640: 61 6d 65 3d 22 25 73 28 7a 51 50 29 22 20 72 6f  ame="%s(zQP)" ro
4650: 77 73 3d 22 25 64 28 72 6f 77 73 29 22 20 63 6f  ws="%d(rows)" co
4660: 6c 73 3d 22 25 64 28 63 6f 6c 73 29 22 3e 25 68  ls="%d(cols)">%h
4670: 28 7a 29 3c 2f 74 65 78 74 61 72 65 61 3e 0a 20  (z)</textarea>. 
4680: 20 20 20 40 20 3c 62 3e 25 73 28 7a 4c 61 62 65     @ <b>%s(zLabe
4690: 6c 29 3c 2f 62 3e 0a 20 20 7d 0a 7d 0a 0a 0a 2f  l)</b>.  }.}.../
46a0: 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 73 65  *.** WEBPAGE: se
46b0: 74 75 70 5f 61 63 63 65 73 73 0a 2a 2f 0a 76 6f  tup_access.*/.vo
46c0: 69 64 20 73 65 74 75 70 5f 61 63 63 65 73 73 28  id setup_access(
46d0: 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f 63  void){.  login_c
46e0: 68 65 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73  heck_credentials
46f0: 28 29 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b 53  ();.  if( !g.okS
4700: 65 74 75 70 20 29 7b 0a 20 20 20 20 6c 6f 67 69  etup ){.    logi
4710: 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20 20 7d 0a  n_needed();.  }.
4720: 0a 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28  .  style_header(
4730: 22 41 63 63 65 73 73 20 43 6f 6e 74 72 6f 6c 20  "Access Control 
4740: 53 65 74 74 69 6e 67 73 22 29 3b 0a 20 20 64 62  Settings");.  db
4750: 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74 69  _begin_transacti
4760: 6f 6e 28 29 3b 0a 20 20 40 20 3c 66 6f 72 6d 20  on();.  @ <form 
4770: 61 63 74 69 6f 6e 3d 22 25 73 28 67 2e 7a 42 61  action="%s(g.zBa
4780: 73 65 55 52 4c 29 2f 73 65 74 75 70 5f 61 63 63  seURL)/setup_acc
4790: 65 73 73 22 20 6d 65 74 68 6f 64 3d 22 50 4f 53  ess" method="POS
47a0: 54 22 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20 20  T">..  @ <hr>.  
47b0: 6f 6e 6f 66 66 5f 61 74 74 72 69 62 75 74 65 28  onoff_attribute(
47c0: 22 52 65 71 75 69 72 65 20 70 61 73 73 77 6f 72  "Require passwor
47d0: 64 20 66 6f 72 20 6c 6f 63 61 6c 20 61 63 63 65  d for local acce
47e0: 73 73 22 2c 0a 20 20 20 20 20 22 6c 6f 63 61 6c  ss",.     "local
47f0: 61 75 74 68 22 2c 20 22 6c 6f 63 61 6c 61 75 74  auth", "localaut
4800: 68 22 2c 20 31 29 3b 0a 20 20 40 20 3c 70 3e 57  h", 1);.  @ <p>W
4810: 68 65 6e 20 65 6e 61 62 6c 65 64 2c 20 74 68 65  hen enabled, the
4820: 20 70 61 73 73 77 6f 72 64 20 73 69 67 6e 2d 69   password sign-i
4830: 6e 20 69 73 20 72 65 71 75 69 72 65 64 20 66 6f  n is required fo
4840: 72 0a 20 20 40 20 77 65 62 20 61 63 63 65 73 73  r.  @ web access
4850: 20 63 6f 6d 69 6e 67 20 66 72 6f 6d 20 31 32 37   coming from 127
4860: 2e 30 2e 30 2e 31 2e 20 20 57 68 65 6e 20 64 69  .0.0.1.  When di
4870: 73 61 62 6c 65 64 2c 20 77 65 62 20 61 63 63 65  sabled, web acce
4880: 73 73 0a 20 20 40 20 66 72 6f 6d 20 31 32 37 2e  ss.  @ from 127.
4890: 30 2e 30 2e 31 20 69 73 20 61 6c 6c 6f 77 73 20  0.0.1 is allows 
48a0: 77 69 74 68 6f 75 74 20 61 6e 79 20 6c 6f 67 69  without any logi
48b0: 6e 20 2d 20 74 68 65 20 75 73 65 72 20 69 64 20  n - the user id 
48c0: 69 73 20 73 65 6c 65 63 74 65 64 0a 20 20 40 20  is selected.  @ 
48d0: 66 72 6f 6d 20 74 68 65 20 7e 2f 2e 66 6f 73 73  from the ~/.foss
48e0: 69 6c 20 64 61 74 61 62 61 73 65 2e 20 50 61 73  il database. Pas
48f0: 73 77 6f 72 64 20 6c 6f 67 69 6e 20 69 73 20 61  sword login is a
4900: 6c 77 61 79 73 20 72 65 71 75 69 72 65 64 0a 20  lways required. 
4910: 20 40 20 66 6f 72 20 69 6e 63 6f 6d 69 6e 67 20   @ for incoming 
4920: 77 65 62 20 63 6f 6e 6e 65 63 74 69 6f 6e 73 20  web connections 
4930: 6f 6e 20 69 6e 74 65 72 6e 65 74 20 61 64 64 72  on internet addr
4940: 65 73 73 65 73 20 6f 74 68 65 72 20 74 68 61 6e  esses other than
4950: 0a 20 20 40 20 31 32 37 2e 30 2e 30 2e 31 2e 3c  .  @ 127.0.0.1.<
4960: 2f 70 3e 3c 2f 6c 69 3e 0a 0a 20 20 40 20 3c 68  /p></li>..  @ <h
4970: 72 3e 0a 20 20 65 6e 74 72 79 5f 61 74 74 72 69  r>.  entry_attri
4980: 62 75 74 65 28 22 4c 6f 67 69 6e 20 65 78 70 69  bute("Login expi
4990: 72 61 74 69 6f 6e 20 74 69 6d 65 22 2c 20 36 2c  ration time", 6,
49a0: 20 22 63 6f 6f 6b 69 65 2d 65 78 70 69 72 65 22   "cookie-expire"
49b0: 2c 20 22 63 65 78 22 2c 20 22 38 37 36 36 22 29  , "cex", "8766")
49c0: 3b 0a 20 20 40 20 3c 70 3e 54 68 65 20 6e 75 6d  ;.  @ <p>The num
49d0: 62 65 72 20 6f 66 20 68 6f 75 72 73 20 66 6f 72  ber of hours for
49e0: 20 77 68 69 63 68 20 61 20 6c 6f 67 69 6e 20 69   which a login i
49f0: 73 20 76 61 6c 69 64 2e 20 20 54 68 69 73 20 6d  s valid.  This m
4a00: 75 73 74 20 62 65 20 61 0a 20 20 40 20 70 6f 73  ust be a.  @ pos
4a10: 69 74 69 76 65 20 6e 75 6d 62 65 72 2e 20 20 54  itive number.  T
4a20: 68 65 20 64 65 66 61 75 6c 74 20 69 73 20 38 37  he default is 87
4a30: 36 30 20 68 6f 75 72 73 20 77 68 69 63 68 20 69  60 hours which i
4a40: 73 20 61 70 70 72 6f 78 69 6d 61 74 65 6c 79 20  s approximately 
4a50: 65 71 75 61 6c 0a 20 20 40 20 74 6f 20 61 20 79  equal.  @ to a y
4a60: 65 61 72 2e 3c 2f 70 3e 0a 0a 20 20 40 20 3c 68  ear.</p>..  @ <h
4a70: 72 3e 0a 20 20 65 6e 74 72 79 5f 61 74 74 72 69  r>.  entry_attri
4a80: 62 75 74 65 28 22 44 6f 77 6e 6c 6f 61 64 20 70  bute("Download p
4a90: 61 63 6b 65 74 20 6c 69 6d 69 74 22 2c 20 31 30  acket limit", 10
4aa0: 2c 20 22 6d 61 78 2d 64 6f 77 6e 6c 6f 61 64 22  , "max-download"
4ab0: 2c 20 22 6d 78 64 77 6e 22 2c 0a 20 20 20 20 20  , "mxdwn",.     
4ac0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 35 30               "50
4ad0: 30 30 30 30 30 22 29 3b 0a 20 20 40 20 3c 70 3e  00000");.  @ <p>
4ae0: 46 6f 73 73 69 6c 20 74 72 69 65 73 20 74 6f 20  Fossil tries to 
4af0: 6c 69 6d 69 74 20 6f 75 74 2d 62 6f 75 6e 64 20  limit out-bound 
4b00: 73 79 6e 63 2c 20 63 6c 6f 6e 65 2c 20 61 6e 64  sync, clone, and
4b10: 20 70 75 6c 6c 20 70 61 63 6b 65 74 73 0a 20 20   pull packets.  
4b20: 40 20 74 6f 20 74 68 69 73 20 6d 61 6e 79 20 62  @ to this many b
4b30: 79 74 65 73 2c 20 75 6e 63 6f 6d 70 72 65 73 73  ytes, uncompress
4b40: 65 64 2e 20 20 49 66 20 74 68 65 20 63 6c 69 65  ed.  If the clie
4b50: 6e 74 20 72 65 71 75 69 72 65 73 20 6d 6f 72 65  nt requires more
4b60: 20 64 61 74 61 0a 20 20 40 20 74 68 61 6e 20 74   data.  @ than t
4b70: 68 69 73 2c 20 74 68 65 6e 20 74 68 65 20 63 6c  his, then the cl
4b80: 69 65 6e 74 20 77 69 6c 6c 20 69 73 73 75 65 20  ient will issue 
4b90: 6d 75 6c 74 69 70 6c 65 20 48 54 54 50 20 72 65  multiple HTTP re
4ba0: 71 75 65 73 74 73 2e 0a 20 20 40 20 56 61 6c 75  quests..  @ Valu
4bb0: 65 73 20 62 65 6c 6f 77 20 31 20 6d 69 6c 6c 69  es below 1 milli
4bc0: 6f 6e 20 61 72 65 20 6e 6f 74 20 72 65 63 6f 6d  on are not recom
4bd0: 6d 65 6e 64 65 64 2e 20 20 35 20 6d 69 6c 6c 69  mended.  5 milli
4be0: 6f 6e 20 69 73 20 61 20 0a 20 20 40 20 72 65 61  on is a .  @ rea
4bf0: 73 6f 6e 61 62 6c 65 20 6e 75 6d 62 65 72 2e 3c  sonable number.<
4c00: 2f 70 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20 20  /p>..  @ <hr>.  
4c10: 40 20 3c 70 3e 3c 69 6e 70 75 74 20 74 79 70 65  @ <p><input type
4c20: 3d 22 73 75 62 6d 69 74 22 20 20 6e 61 6d 65 3d  ="submit"  name=
4c30: 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d 22  "submit" value="
4c40: 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e 3c  Apply Changes"><
4c50: 2f 70 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a  /p>.  @ </form>.
4c60: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63    db_end_transac
4c70: 74 69 6f 6e 28 30 29 3b 0a 20 20 73 74 79 6c 65  tion(0);.  style
4c80: 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a  _footer();.}../*
4c90: 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 73 65 74  .** WEBPAGE: set
4ca0: 75 70 5f 74 69 6d 65 6c 69 6e 65 0a 2a 2f 0a 76  up_timeline.*/.v
4cb0: 6f 69 64 20 73 65 74 75 70 5f 74 69 6d 65 6c 69  oid setup_timeli
4cc0: 6e 65 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69  ne(void){.  logi
4cd0: 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74 69  n_check_credenti
4ce0: 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67 2e  als();.  if( !g.
4cf0: 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20 6c  okSetup ){.    l
4d00: 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20  ogin_needed();. 
4d10: 20 7d 0a 0a 20 20 73 74 79 6c 65 5f 68 65 61 64   }..  style_head
4d20: 65 72 28 22 54 69 6d 65 6c 69 6e 65 20 44 69 73  er("Timeline Dis
4d30: 70 6c 61 79 20 50 72 65 66 65 72 65 6e 63 65 73  play Preferences
4d40: 22 29 3b 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74  ");.  db_begin_t
4d50: 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20  ransaction();.  
4d60: 40 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22  @ <form action="
4d70: 25 73 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 73  %s(g.zBaseURL)/s
4d80: 65 74 75 70 5f 74 69 6d 65 6c 69 6e 65 22 20 6d  etup_timeline" m
4d90: 65 74 68 6f 64 3d 22 50 4f 53 54 22 3e 0a 0a 20  ethod="POST">.. 
4da0: 20 40 20 3c 68 72 3e 0a 20 20 6f 6e 6f 66 66 5f   @ <hr>.  onoff_
4db0: 61 74 74 72 69 62 75 74 65 28 22 42 6c 6f 63 6b  attribute("Block
4dc0: 20 6d 61 72 6b 75 70 20 69 6e 20 74 69 6d 65 6c   markup in timel
4dd0: 69 6e 65 22 2c 0a 20 20 20 20 20 20 20 20 20 20  ine",.          
4de0: 20 20 20 20 20 20 20 20 22 74 69 6d 65 6c 69 6e          "timelin
4df0: 65 2d 62 6c 6f 63 6b 2d 6d 61 72 6b 75 70 22 2c  e-block-markup",
4e00: 20 22 74 62 6d 22 2c 20 30 29 3b 0a 20 20 40 20   "tbm", 0);.  @ 
4e10: 3c 70 3e 49 6e 20 74 69 6d 65 6c 69 6e 65 20 64  <p>In timeline d
4e20: 69 73 70 6c 61 79 73 2c 20 63 68 65 63 6b 2d 69  isplays, check-i
4e30: 6e 20 63 6f 6d 6d 65 6e 74 73 20 63 61 6e 20 62  n comments can b
4e40: 65 20 64 69 73 70 6c 61 79 65 64 20 77 69 74 68  e displayed with
4e50: 20 6f 72 0a 20 20 40 20 77 69 74 68 6f 75 74 20   or.  @ without 
4e60: 62 6c 6f 63 6b 20 6d 61 72 6b 75 70 20 28 70 61  block markup (pa
4e70: 72 61 67 72 61 70 68 73 2c 20 74 61 62 6c 65 73  ragraphs, tables
4e80: 2c 20 65 74 63 2e 29 3c 2f 70 3e 0a 0a 20 20 40  , etc.)</p>..  @
4e90: 20 3c 68 72 3e 0a 20 20 65 6e 74 72 79 5f 61 74   <hr>.  entry_at
4ea0: 74 72 69 62 75 74 65 28 22 4d 61 78 20 74 69 6d  tribute("Max tim
4eb0: 65 6c 69 6e 65 20 63 6f 6d 6d 65 6e 74 20 6c 65  eline comment le
4ec0: 6e 67 74 68 22 2c 20 36 2c 20 0a 20 20 20 20 20  ngth", 6, .     
4ed0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 69               "ti
4ee0: 6d 65 6c 69 6e 65 2d 6d 61 78 2d 63 6f 6d 6d 65  meline-max-comme
4ef0: 6e 74 22 2c 20 22 74 6d 63 22 2c 20 22 30 22 29  nt", "tmc", "0")
4f00: 3b 0a 20 20 40 20 3c 70 3e 54 68 65 20 6d 61 78  ;.  @ <p>The max
4f10: 69 6d 75 6d 20 6c 65 6e 67 74 68 20 6f 66 20 61  imum length of a
4f20: 20 63 6f 6d 6d 65 6e 74 20 74 6f 20 62 65 20 64   comment to be d
4f30: 69 73 70 6c 61 79 65 64 20 69 6e 20 61 20 74 69  isplayed in a ti
4f40: 6d 65 6c 69 6e 65 2e 0a 20 20 40 20 22 30 22 20  meline..  @ "0" 
4f50: 74 68 65 72 65 20 69 73 20 6e 6f 20 6c 65 6e 67  there is no leng
4f60: 74 68 20 6c 69 6d 69 74 2e 3c 2f 70 3e 0a 0a 20  th limit.</p>.. 
4f70: 20 40 20 3c 68 72 3e 0a 20 20 40 20 3c 70 3e 3c   @ <hr>.  @ <p><
4f80: 69 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62 6d  input type="subm
4f90: 69 74 22 20 20 6e 61 6d 65 3d 22 73 75 62 6d 69  it"  name="submi
4fa0: 74 22 20 76 61 6c 75 65 3d 22 41 70 70 6c 79 20  t" value="Apply 
4fb0: 43 68 61 6e 67 65 73 22 3e 3c 2f 70 3e 0a 20 20  Changes"></p>.  
4fc0: 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 64 62 5f 65  @ </form>.  db_e
4fd0: 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 30  nd_transaction(0
4fe0: 29 3b 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65  );.  style_foote
4ff0: 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45  r();.}../*.** WE
5000: 42 50 41 47 45 3a 20 73 65 74 75 70 5f 63 6f 6e  BPAGE: setup_con
5010: 66 69 67 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 75  fig.*/.void setu
5020: 70 5f 63 6f 6e 66 69 67 28 76 6f 69 64 29 7b 0a  p_config(void){.
5030: 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72    login_check_cr
5040: 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69  edentials();.  i
5050: 66 28 20 21 67 2e 6f 6b 53 65 74 75 70 20 29 7b  f( !g.okSetup ){
5060: 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64 65  .    login_neede
5070: 64 28 29 3b 0a 20 20 7d 0a 0a 20 20 73 74 79 6c  d();.  }..  styl
5080: 65 5f 68 65 61 64 65 72 28 22 57 57 57 20 43 6f  e_header("WWW Co
5090: 6e 66 69 67 75 72 61 74 69 6f 6e 22 29 3b 0a 20  nfiguration");. 
50a0: 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61   db_begin_transa
50b0: 63 74 69 6f 6e 28 29 3b 0a 20 20 40 20 3c 66 6f  ction();.  @ <fo
50c0: 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73 28 67 2e  rm action="%s(g.
50d0: 7a 42 61 73 65 55 52 4c 29 2f 73 65 74 75 70 5f  zBaseURL)/setup_
50e0: 63 6f 6e 66 69 67 22 20 6d 65 74 68 6f 64 3d 22  config" method="
50f0: 50 4f 53 54 22 3e 0a 20 20 40 20 3c 68 72 20 2f  POST">.  @ <hr /
5100: 3e 0a 20 20 65 6e 74 72 79 5f 61 74 74 72 69 62  >.  entry_attrib
5110: 75 74 65 28 22 50 72 6f 6a 65 63 74 20 4e 61 6d  ute("Project Nam
5120: 65 22 2c 20 36 30 2c 20 22 70 72 6f 6a 65 63 74  e", 60, "project
5130: 2d 6e 61 6d 65 22 2c 20 22 70 6e 22 2c 20 22 22  -name", "pn", ""
5140: 29 3b 0a 20 20 40 20 3c 70 3e 47 69 76 65 20 79  );.  @ <p>Give y
5150: 6f 75 72 20 70 72 6f 6a 65 63 74 20 61 20 6e 61  our project a na
5160: 6d 65 20 73 6f 20 76 69 73 69 74 6f 72 73 20 6b  me so visitors k
5170: 6e 6f 77 20 77 68 61 74 20 74 68 69 73 20 73 69  now what this si
5180: 74 65 20 69 73 20 61 62 6f 75 74 2e 0a 20 20 40  te is about..  @
5190: 20 54 68 65 20 70 72 6f 6a 65 63 74 20 6e 61 6d   The project nam
51a0: 65 20 77 69 6c 6c 20 61 6c 73 6f 20 62 65 20 75  e will also be u
51b0: 73 65 64 20 61 73 20 74 68 65 20 52 53 53 20 66  sed as the RSS f
51c0: 65 65 64 20 74 69 74 6c 65 2e 3c 2f 70 3e 0a 20  eed title.</p>. 
51d0: 20 40 20 3c 68 72 20 2f 3e 0a 20 20 74 65 78 74   @ <hr />.  text
51e0: 61 72 65 61 5f 61 74 74 72 69 62 75 74 65 28 22  area_attribute("
51f0: 50 72 6f 6a 65 63 74 20 44 65 73 63 72 69 70 74  Project Descript
5200: 69 6f 6e 22 2c 20 35 2c 20 36 30 2c 0a 20 20 20  ion", 5, 60,.   
5210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5220: 20 20 22 70 72 6f 6a 65 63 74 2d 64 65 73 63 72    "project-descr
5230: 69 70 74 69 6f 6e 22 2c 20 22 70 64 22 2c 20 22  iption", "pd", "
5240: 22 29 3b 0a 20 20 40 20 3c 70 3e 44 65 73 63 72  ");.  @ <p>Descr
5250: 69 62 65 20 79 6f 75 72 20 70 72 6f 6a 65 63 74  ibe your project
5260: 2e 20 54 68 69 73 20 77 69 6c 6c 20 62 65 20 75  . This will be u
5270: 73 65 64 20 69 6e 20 70 61 67 65 20 68 65 61 64  sed in page head
5280: 65 72 73 20 66 6f 72 20 73 65 61 72 63 68 0a 20  ers for search. 
5290: 20 40 20 65 6e 67 69 6e 65 73 20 61 73 20 77 65   @ engines as we
52a0: 6c 6c 20 61 73 20 61 20 73 68 6f 72 74 20 52 53  ll as a short RS
52b0: 53 20 64 65 73 63 72 69 70 74 69 6f 6e 2e 3c 2f  S description.</
52c0: 70 3e 0a 20 20 40 20 3c 68 72 20 2f 3e 0a 20 20  p>.  @ <hr />.  
52d0: 65 6e 74 72 79 5f 61 74 74 72 69 62 75 74 65 28  entry_attribute(
52e0: 22 49 6e 64 65 78 20 50 61 67 65 22 2c 20 36 30  "Index Page", 60
52f0: 2c 20 22 69 6e 64 65 78 2d 70 61 67 65 22 2c 20  , "index-page", 
5300: 22 69 64 78 70 67 22 2c 20 22 2f 68 6f 6d 65 22  "idxpg", "/home"
5310: 29 3b 0a 20 20 40 20 3c 70 3e 45 6e 74 65 72 20  );.  @ <p>Enter 
5320: 74 68 65 20 70 61 74 68 6e 61 6d 65 20 6f 66 20  the pathname of 
5330: 74 68 65 20 70 61 67 65 20 74 6f 20 64 69 73 70  the page to disp
5340: 6c 61 79 20 77 68 65 6e 20 74 68 65 20 22 48 6f  lay when the "Ho
5350: 6d 65 22 20 6d 65 6e 75 0a 20 20 40 20 6f 70 74  me" menu.  @ opt
5360: 69 6f 6e 20 69 73 20 73 65 6c 65 63 74 65 64 20  ion is selected 
5370: 61 6e 64 20 77 68 65 6e 20 6e 6f 20 70 61 74 68  and when no path
5380: 6e 61 6d 65 20 69 73 0a 20 20 40 20 73 70 65 63  name is.  @ spec
5390: 69 66 69 65 64 20 69 6e 20 74 68 65 20 55 52 4c  ified in the URL
53a0: 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20  .  For example, 
53b0: 69 66 20 79 6f 75 20 76 69 73 69 74 20 74 68 65  if you visit the
53c0: 20 75 72 6c 3a 3c 2f 70 3e 0a 20 20 40 0a 20 20   url:</p>.  @.  
53d0: 40 20 3c 62 6c 6f 63 6b 71 75 6f 74 65 3e 25 68  @ <blockquote>%h
53e0: 28 67 2e 7a 42 61 73 65 55 52 4c 29 3c 2f 62 6c  (g.zBaseURL)</bl
53f0: 6f 63 6b 71 75 6f 74 65 3e 0a 20 20 40 0a 20 20  ockquote>.  @.  
5400: 40 20 3c 70 3e 41 6e 64 20 79 6f 75 20 68 61 76  @ <p>And you hav
5410: 65 20 73 70 65 63 69 66 69 65 64 20 61 6e 20 69  e specified an i
5420: 6e 64 65 78 20 70 61 67 65 20 6f 66 20 22 2f 68  ndex page of "/h
5430: 6f 6d 65 22 20 74 68 65 20 61 62 6f 76 65 20 77  ome" the above w
5440: 69 6c 6c 0a 20 20 40 20 61 75 74 6f 6d 61 74 69  ill.  @ automati
5450: 63 61 6c 6c 79 20 72 65 64 69 72 65 63 74 20 74  cally redirect t
5460: 6f 3a 3c 2f 70 3e 0a 20 20 40 0a 20 20 40 20 3c  o:</p>.  @.  @ <
5470: 62 6c 6f 63 6b 71 75 6f 74 65 3e 25 68 28 67 2e  blockquote>%h(g.
5480: 7a 42 61 73 65 55 52 4c 29 2f 68 6f 6d 65 3c 2f  zBaseURL)/home</
5490: 62 6c 6f 63 6b 71 75 6f 74 65 3e 0a 20 20 40 0a  blockquote>.  @.
54a0: 20 20 40 20 3c 70 3e 54 68 65 20 64 65 66 61 75    @ <p>The defau
54b0: 6c 74 20 22 2f 68 6f 6d 65 22 20 70 61 67 65 20  lt "/home" page 
54c0: 64 69 73 70 6c 61 79 73 20 61 20 57 69 6b 69 20  displays a Wiki 
54d0: 70 61 67 65 20 77 69 74 68 20 74 68 65 20 73 61  page with the sa
54e0: 6d 65 20 6e 61 6d 65 0a 20 20 40 20 61 73 20 74  me name.  @ as t
54f0: 68 65 20 50 72 6f 6a 65 63 74 20 4e 61 6d 65 20  he Project Name 
5500: 73 70 65 63 69 66 69 65 64 20 61 62 6f 76 65 2e  specified above.
5510: 20 20 53 6f 6d 65 20 73 69 74 65 73 20 70 72 65    Some sites pre
5520: 66 65 72 20 74 6f 20 72 65 64 69 72 65 63 74 0a  fer to redirect.
5530: 20 20 40 20 74 6f 20 61 20 64 6f 63 75 6d 65 6e    @ to a documen
5540: 74 61 74 69 6f 6e 20 70 61 67 65 20 28 65 78 3a  tation page (ex:
5550: 20 22 2f 64 6f 63 2f 74 69 70 2f 69 6e 64 65 78   "/doc/tip/index
5560: 2e 77 69 6b 69 22 29 20 6f 72 20 74 6f 20 22 2f  .wiki") or to "/
5570: 74 69 6d 65 6c 69 6e 65 22 2e 3c 2f 70 3e 0a 20  timeline".</p>. 
5580: 20 40 20 3c 68 72 20 2f 3e 0a 20 20 40 20 3c 70   @ <hr />.  @ <p
5590: 3e 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 73 75  ><input type="su
55a0: 62 6d 69 74 22 20 20 6e 61 6d 65 3d 22 73 75 62  bmit"  name="sub
55b0: 6d 69 74 22 20 76 61 6c 75 65 3d 22 41 70 70 6c  mit" value="Appl
55c0: 79 20 43 68 61 6e 67 65 73 22 3e 3c 2f 70 3e 0a  y Changes"></p>.
55d0: 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 64 62    @ </form>.  db
55e0: 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e  _end_transaction
55f0: 28 30 29 3b 0a 20 20 73 74 79 6c 65 5f 66 6f 6f  (0);.  style_foo
5600: 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  ter();.}../*.** 
5610: 57 45 42 50 41 47 45 3a 20 73 65 74 75 70 5f 65  WEBPAGE: setup_e
5620: 64 69 74 63 73 73 0a 2a 2f 0a 76 6f 69 64 20 73  ditcss.*/.void s
5630: 65 74 75 70 5f 65 64 69 74 63 73 73 28 76 6f 69  etup_editcss(voi
5640: 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63  d){.  login_chec
5650: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
5660: 0a 20 20 69 66 28 20 21 67 2e 6f 6b 53 65 74 75  .  if( !g.okSetu
5670: 70 20 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e  p ){.    login_n
5680: 65 65 64 65 64 28 29 3b 0a 20 20 7d 0a 20 20 73  eeded();.  }.  s
5690: 74 79 6c 65 5f 68 65 61 64 65 72 28 22 45 64 69  tyle_header("Edi
56a0: 74 20 43 53 53 22 29 3b 0a 20 20 40 20 3c 66 6f  t CSS");.  @ <fo
56b0: 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73 28 67 2e  rm action="%s(g.
56c0: 7a 42 61 73 65 55 52 4c 29 2f 73 65 74 75 70 5f  zBaseURL)/setup_
56d0: 65 64 69 74 63 73 73 22 20 6d 65 74 68 6f 64 3d  editcss" method=
56e0: 22 50 4f 53 54 22 3e 0a 20 20 40 20 45 64 69 74  "POST">.  @ Edit
56f0: 20 74 68 65 20 43 53 53 3a 3c 62 72 20 2f 3e 0a   the CSS:<br />.
5700: 20 20 74 65 78 74 61 72 65 61 5f 61 74 74 72 69    textarea_attri
5710: 62 75 74 65 28 22 22 2c 20 34 30 2c 20 38 30 2c  bute("", 40, 80,
5720: 20 22 63 73 73 22 2c 20 22 63 73 73 22 2c 20 7a   "css", "css", z
5730: 44 65 66 61 75 6c 74 43 53 53 29 3b 0a 20 20 40  DefaultCSS);.  @
5740: 20 3c 62 72 20 2f 3e 0a 20 20 40 20 3c 69 6e 70   <br />.  @ <inp
5750: 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69 74 22  ut type="submit"
5760: 20 6e 61 6d 65 3d 22 73 75 62 6d 69 74 22 20 76   name="submit" v
5770: 61 6c 75 65 3d 22 41 70 70 6c 79 20 43 68 61 6e  alue="Apply Chan
5780: 67 65 73 22 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d  ges">.  @ </form
5790: 3e 0a 20 20 40 20 3c 68 72 3e 0a 20 20 40 20 48  >.  @ <hr>.  @ H
57a0: 65 72 65 20 69 73 20 74 68 65 20 64 65 66 61 75  ere is the defau
57b0: 6c 74 20 43 53 53 3a 0a 20 20 40 20 3c 62 6c 6f  lt CSS:.  @ <blo
57c0: 63 6b 71 75 6f 74 65 3e 3c 70 72 65 3e 0a 20 20  ckquote><pre>.  
57d0: 40 20 25 68 28 7a 44 65 66 61 75 6c 74 43 53 53  @ %h(zDefaultCSS
57e0: 29 0a 20 20 40 20 3c 2f 70 72 65 3e 3c 2f 62 6c  ).  @ </pre></bl
57f0: 6f 63 6b 71 75 6f 74 65 3e 0a 20 20 73 74 79 6c  ockquote>.  styl
5800: 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f  e_footer();.}../
5810: 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a 20 73 65  *.** WEBPAGE: se
5820: 74 75 70 5f 68 65 61 64 65 72 0a 2a 2f 0a 76 6f  tup_header.*/.vo
5830: 69 64 20 73 65 74 75 70 5f 68 65 61 64 65 72 28  id setup_header(
5840: 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f 63  void){.  login_c
5850: 68 65 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73  heck_credentials
5860: 28 29 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b 53  ();.  if( !g.okS
5870: 65 74 75 70 20 29 7b 0a 20 20 20 20 6c 6f 67 69  etup ){.    logi
5880: 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20 20 7d 0a  n_needed();.  }.
5890: 20 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73    db_begin_trans
58a0: 61 63 74 69 6f 6e 28 29 3b 0a 20 20 69 66 28 20  action();.  if( 
58b0: 50 28 22 63 6c 65 61 72 22 29 21 3d 30 20 29 7b  P("clear")!=0 ){
58c0: 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78  .    db_multi_ex
58d0: 65 63 28 22 44 45 4c 45 54 45 20 46 52 4f 4d 20  ec("DELETE FROM 
58e0: 63 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d  config WHERE nam
58f0: 65 3d 27 68 65 61 64 65 72 27 22 29 3b 0a 20 20  e='header'");.  
5900: 20 20 63 67 69 5f 72 65 70 6c 61 63 65 5f 70 61    cgi_replace_pa
5910: 72 61 6d 65 74 65 72 28 22 68 65 61 64 65 72 22  rameter("header"
5920: 2c 20 7a 44 65 66 61 75 6c 74 48 65 61 64 65 72  , zDefaultHeader
5930: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
5940: 74 65 78 74 61 72 65 61 5f 61 74 74 72 69 62 75  textarea_attribu
5950: 74 65 28 30 2c 20 30 2c 20 30 2c 20 22 68 65 61  te(0, 0, 0, "hea
5960: 64 65 72 22 2c 20 22 68 65 61 64 65 72 22 2c 20  der", "header", 
5970: 7a 44 65 66 61 75 6c 74 48 65 61 64 65 72 29 3b  zDefaultHeader);
5980: 0a 20 20 7d 0a 20 20 73 74 79 6c 65 5f 68 65 61  .  }.  style_hea
5990: 64 65 72 28 22 45 64 69 74 20 50 61 67 65 20 48  der("Edit Page H
59a0: 65 61 64 65 72 22 29 3b 0a 20 20 40 20 3c 66 6f  eader");.  @ <fo
59b0: 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73 28 67 2e  rm action="%s(g.
59c0: 7a 42 61 73 65 55 52 4c 29 2f 73 65 74 75 70 5f  zBaseURL)/setup_
59d0: 68 65 61 64 65 72 22 20 6d 65 74 68 6f 64 3d 22  header" method="
59e0: 50 4f 53 54 22 3e 0a 20 20 40 20 3c 70 3e 45 64  POST">.  @ <p>Ed
59f0: 69 74 20 48 54 4d 4c 20 74 65 78 74 20 77 69 74  it HTML text wit
5a00: 68 20 65 6d 62 65 64 64 65 64 20 54 48 31 20 28  h embedded TH1 (
5a10: 61 20 54 43 4c 20 64 69 61 6c 65 63 74 29 20 74  a TCL dialect) t
5a20: 68 61 74 20 77 69 6c 6c 20 62 65 20 75 73 65 64  hat will be used
5a30: 20 74 6f 0a 20 20 40 20 67 65 6e 65 72 61 74 65   to.  @ generate
5a40: 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f   the beginning o
5a50: 66 20 65 76 65 72 79 20 70 61 67 65 20 74 68 72  f every page thr
5a60: 6f 75 67 68 20 73 74 61 72 74 20 6f 66 20 74 68  ough start of th
5a70: 65 20 6d 61 69 6e 0a 20 20 40 20 6d 65 6e 75 2e  e main.  @ menu.
5a80: 3c 2f 70 3e 0a 20 20 74 65 78 74 61 72 65 61 5f  </p>.  textarea_
5a90: 61 74 74 72 69 62 75 74 65 28 22 22 2c 20 34 30  attribute("", 40
5aa0: 2c 20 38 30 2c 20 22 68 65 61 64 65 72 22 2c 20  , 80, "header", 
5ab0: 22 68 65 61 64 65 72 22 2c 20 7a 44 65 66 61 75  "header", zDefau
5ac0: 6c 74 48 65 61 64 65 72 29 3b 0a 20 20 40 20 3c  ltHeader);.  @ <
5ad0: 62 72 20 2f 3e 0a 20 20 40 20 3c 69 6e 70 75 74  br />.  @ <input
5ae0: 20 74 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e   type="submit" n
5af0: 61 6d 65 3d 22 73 75 62 6d 69 74 22 20 76 61 6c  ame="submit" val
5b00: 75 65 3d 22 41 70 70 6c 79 20 43 68 61 6e 67 65  ue="Apply Change
5b10: 73 22 3e 0a 20 20 40 20 3c 69 6e 70 75 74 20 74  s">.  @ <input t
5b20: 79 70 65 3d 22 73 75 62 6d 69 74 22 20 6e 61 6d  ype="submit" nam
5b30: 65 3d 22 63 6c 65 61 72 22 20 76 61 6c 75 65 3d  e="clear" value=
5b40: 22 52 65 76 65 72 74 20 54 6f 20 44 65 66 61 75  "Revert To Defau
5b50: 6c 74 22 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e  lt">.  @ </form>
5b60: 0a 20 20 40 20 3c 68 72 3e 0a 20 20 40 20 48 65  .  @ <hr>.  @ He
5b70: 72 65 20 69 73 20 74 68 65 20 64 65 66 61 75 6c  re is the defaul
5b80: 74 20 70 61 67 65 20 68 65 61 64 65 72 3a 0a 20  t page header:. 
5b90: 20 40 20 3c 62 6c 6f 63 6b 71 75 6f 74 65 3e 3c   @ <blockquote><
5ba0: 70 72 65 3e 0a 20 20 40 20 25 68 28 7a 44 65 66  pre>.  @ %h(zDef
5bb0: 61 75 6c 74 48 65 61 64 65 72 29 0a 20 20 40 20  aultHeader).  @ 
5bc0: 3c 2f 70 72 65 3e 3c 2f 62 6c 6f 63 6b 71 75 6f  </pre></blockquo
5bd0: 74 65 3e 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74  te>.  style_foot
5be0: 65 72 28 29 3b 0a 20 20 64 62 5f 65 6e 64 5f 74  er();.  db_end_t
5bf0: 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 3b 0a 7d  ransaction(0);.}
5c00: 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a  ../*.** WEBPAGE:
5c10: 20 73 65 74 75 70 5f 66 6f 6f 74 65 72 0a 2a 2f   setup_footer.*/
5c20: 0a 76 6f 69 64 20 73 65 74 75 70 5f 66 6f 6f 74  .void setup_foot
5c30: 65 72 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69  er(void){.  logi
5c40: 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74 69  n_check_credenti
5c50: 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67 2e  als();.  if( !g.
5c60: 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20 6c  okSetup ){.    l
5c70: 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20  ogin_needed();. 
5c80: 20 7d 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 72   }.  db_begin_tr
5c90: 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 69  ansaction();.  i
5ca0: 66 28 20 50 28 22 63 6c 65 61 72 22 29 21 3d 30  f( P("clear")!=0
5cb0: 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69   ){.    db_multi
5cc0: 5f 65 78 65 63 28 22 44 45 4c 45 54 45 20 46 52  _exec("DELETE FR
5cd0: 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45 20  OM config WHERE 
5ce0: 6e 61 6d 65 3d 27 66 6f 6f 74 65 72 27 22 29 3b  name='footer'");
5cf0: 0a 20 20 20 20 63 67 69 5f 72 65 70 6c 61 63 65  .    cgi_replace
5d00: 5f 70 61 72 61 6d 65 74 65 72 28 22 66 6f 6f 74  _parameter("foot
5d10: 65 72 22 2c 20 7a 44 65 66 61 75 6c 74 46 6f 6f  er", zDefaultFoo
5d20: 74 65 72 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  ter);.  }else{. 
5d30: 20 20 20 74 65 78 74 61 72 65 61 5f 61 74 74 72     textarea_attr
5d40: 69 62 75 74 65 28 30 2c 20 30 2c 20 30 2c 20 22  ibute(0, 0, 0, "
5d50: 66 6f 6f 74 65 72 22 2c 20 22 66 6f 6f 74 65 72  footer", "footer
5d60: 22 2c 20 7a 44 65 66 61 75 6c 74 46 6f 6f 74 65  ", zDefaultFoote
5d70: 72 29 3b 0a 20 20 7d 0a 20 20 73 74 79 6c 65 5f  r);.  }.  style_
5d80: 68 65 61 64 65 72 28 22 45 64 69 74 20 50 61 67  header("Edit Pag
5d90: 65 20 46 6f 6f 74 65 72 22 29 3b 0a 20 20 40 20  e Footer");.  @ 
5da0: 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73  <form action="%s
5db0: 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65 74  (g.zBaseURL)/set
5dc0: 75 70 5f 66 6f 6f 74 65 72 22 20 6d 65 74 68 6f  up_footer" metho
5dd0: 64 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20 3c 70  d="POST">.  @ <p
5de0: 3e 45 64 69 74 20 48 54 4d 4c 20 74 65 78 74 20  >Edit HTML text 
5df0: 77 69 74 68 20 65 6d 62 65 64 64 65 64 20 54 48  with embedded TH
5e00: 31 20 28 61 20 54 43 4c 20 64 69 61 6c 65 63 74  1 (a TCL dialect
5e10: 29 20 74 68 61 74 20 77 69 6c 6c 20 62 65 20 75  ) that will be u
5e20: 73 65 64 20 74 6f 0a 20 20 40 20 67 65 6e 65 72  sed to.  @ gener
5e30: 61 74 65 20 74 68 65 20 65 6e 64 20 6f 66 20 65  ate the end of e
5e40: 76 65 72 79 20 70 61 67 65 2e 3c 2f 70 3e 0a 20  very page.</p>. 
5e50: 20 74 65 78 74 61 72 65 61 5f 61 74 74 72 69 62   textarea_attrib
5e60: 75 74 65 28 22 22 2c 20 32 30 2c 20 38 30 2c 20  ute("", 20, 80, 
5e70: 22 66 6f 6f 74 65 72 22 2c 20 22 66 6f 6f 74 65  "footer", "foote
5e80: 72 22 2c 20 7a 44 65 66 61 75 6c 74 46 6f 6f 74  r", zDefaultFoot
5e90: 65 72 29 3b 0a 20 20 40 20 3c 62 72 20 2f 3e 0a  er);.  @ <br />.
5ea0: 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d    @ <input type=
5eb0: 22 73 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 73  "submit" name="s
5ec0: 75 62 6d 69 74 22 20 76 61 6c 75 65 3d 22 41 70  ubmit" value="Ap
5ed0: 70 6c 79 20 43 68 61 6e 67 65 73 22 3e 0a 20 20  ply Changes">.  
5ee0: 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 73  @ <input type="s
5ef0: 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 63 6c 65  ubmit" name="cle
5f00: 61 72 22 20 76 61 6c 75 65 3d 22 52 65 76 65 72  ar" value="Rever
5f10: 74 20 54 6f 20 44 65 66 61 75 6c 74 22 3e 0a 20  t To Default">. 
5f20: 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 40 20 3c   @ </form>.  @ <
5f30: 68 72 3e 0a 20 20 40 20 48 65 72 65 20 69 73 20  hr>.  @ Here is 
5f40: 74 68 65 20 64 65 66 61 75 6c 74 20 70 61 67 65  the default page
5f50: 20 66 6f 6f 74 65 72 3a 0a 20 20 40 20 3c 62 6c   footer:.  @ <bl
5f60: 6f 63 6b 71 75 6f 74 65 3e 3c 70 72 65 3e 0a 20  ockquote><pre>. 
5f70: 20 40 20 25 68 28 7a 44 65 66 61 75 6c 74 46 6f   @ %h(zDefaultFo
5f80: 6f 74 65 72 29 0a 20 20 40 20 3c 2f 70 72 65 3e  oter).  @ </pre>
5f90: 3c 2f 62 6c 6f 63 6b 71 75 6f 74 65 3e 0a 20 20  </blockquote>.  
5fa0: 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a  style_footer();.
5fb0: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63    db_end_transac
5fc0: 74 69 6f 6e 28 30 29 3b 0a 7d 0a                 tion(0);.}.