Hex Artifact Content
Not logged in

Artifact 73c8a12cccdb27f60878becd858c9b83899923a2:

File src/setup.c part of check-in [c4ec179bbc] - Setup webpag updates. by drh on 2007-07-22 12:00:06.

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 20 0a 2a 2a 20 59 6f 75 20 73 68 6f 75  .** .** You shou
0230: 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64  ld have received
0240: 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47   a copy of the G
0250: 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69  NU General Publi
0260: 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f  c.** License alo
0270: 6e 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62  ng with this lib
0280: 72 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72  rary; if not, wr
0290: 69 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72  ite to the.** Fr
02a0: 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e  ee Software Foun
02b0: 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39  dation, Inc., 59
02c0: 20 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20   Temple Place - 
02d0: 53 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f  Suite 330,.** Bo
02e0: 73 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d  ston, MA  02111-
02f0: 31 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a  1307, USA..**.**
0300: 20 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20   Author contact 
0310: 69 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20  information:.** 
0320: 20 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a    drh@hwaci.com.
0330: 2a 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e  **   http://www.
0340: 68 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a  hwaci.com/drh/.*
0350: 2a 0a 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: 2a 0a 2a 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  *.**.** Implemen
03b0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 53 65  tation of the Se
03c0: 74 75 70 20 70 61 67 65 0a 2a 2f 0a 23 69 6e 63  tup page.*/.#inc
03d0: 6c 75 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a  lude <assert.h>.
03e0: 23 69 6e 63 6c 75 64 65 20 22 63 6f 6e 66 69 67  #include "config
03f0: 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 22 73 65  .h".#include "se
0400: 74 75 70 2e 68 22 0a 0a 0a 2f 2a 0a 2a 2a 20 4f  tup.h".../*.** O
0410: 75 74 70 75 74 20 61 20 73 69 6e 67 6c 65 20 65  utput a single e
0420: 6e 74 72 79 20 66 6f 72 20 61 20 6d 65 6e 75 20  ntry for a menu 
0430: 67 65 6e 65 72 61 74 65 64 20 75 73 69 6e 67 20  generated using 
0440: 61 6e 20 48 54 4d 4c 20 74 61 62 6c 65 2e 0a 2a  an HTML table..*
0450: 2a 20 49 66 20 7a 4c 69 6e 6b 20 69 73 20 6e 6f  * If zLink is no
0460: 74 20 4e 55 4c 4c 20 6f 72 20 61 6e 20 65 6d 70  t NULL or an emp
0470: 74 79 20 73 74 72 69 6e 67 2c 20 74 68 65 6e 20  ty string, then 
0480: 69 74 20 69 73 20 74 68 65 20 70 61 67 65 20 74  it is the page t
0490: 68 61 74 0a 2a 2a 20 74 68 65 20 6d 65 6e 75 20  hat.** the menu 
04a0: 65 6e 74 72 79 20 77 69 6c 6c 20 68 79 70 65 72  entry will hyper
04b0: 6c 69 6e 6b 20 74 6f 2e 20 20 49 66 20 7a 4c 69  link to.  If zLi
04c0: 6e 6b 20 69 73 20 4e 55 4c 4c 20 6f 72 20 22 22  nk is NULL or ""
04d0: 2c 20 74 68 65 6e 0a 2a 2a 20 74 68 65 20 6d 65  , then.** the me
04e0: 6e 75 20 65 6e 74 72 79 20 68 61 73 20 6e 6f 20  nu entry has no 
04f0: 68 79 70 65 72 6c 69 6e 6b 20 2d 20 69 74 20 69  hyperlink - it i
0500: 73 20 64 69 73 61 62 6c 65 64 2e 0a 2a 2f 0a 73  s disabled..*/.s
0510: 74 61 74 69 63 20 76 6f 69 64 20 6d 65 6e 75 5f  tatic void menu_
0520: 65 6e 74 72 79 28 0a 20 20 63 6f 6e 73 74 20 63  entry(.  const c
0530: 68 61 72 20 2a 7a 54 69 74 6c 65 2c 0a 20 20 63  har *zTitle,.  c
0540: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 69 6e 6b  onst char *zLink
0550: 2c 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ,.  const char *
0560: 7a 44 65 73 63 0a 29 7b 0a 20 20 40 20 3c 64 74  zDesc.){.  @ <dt
0570: 3e 0a 20 20 69 66 28 20 7a 4c 69 6e 6b 20 26 26  >.  if( zLink &&
0580: 20 7a 4c 69 6e 6b 5b 30 5d 20 29 7b 0a 20 20 20   zLink[0] ){.   
0590: 20 40 20 3c 61 20 68 72 65 66 3d 22 25 73 28 7a   @ <a href="%s(z
05a0: 4c 69 6e 6b 29 22 3e 25 68 28 7a 54 69 74 6c 65  Link)">%h(zTitle
05b0: 29 3c 2f 61 3e 0a 20 20 7d 65 6c 73 65 7b 0a 20  )</a>.  }else{. 
05c0: 20 20 20 40 20 25 68 28 7a 54 69 74 6c 65 29 0a     @ %h(zTitle).
05d0: 20 20 7d 0a 20 20 40 20 3c 2f 64 74 3e 0a 20 20    }.  @ </dt>.  
05e0: 40 20 3c 64 64 3e 25 68 28 7a 44 65 73 63 29 3c  @ <dd>%h(zDesc)<
05f0: 2f 64 64 3e 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45  /dd>.}../*.** WE
0600: 42 50 41 47 45 3a 20 2f 73 65 74 75 70 0a 2a 2f  BPAGE: /setup.*/
0610: 0a 76 6f 69 64 20 73 65 74 75 70 5f 70 61 67 65  .void setup_page
0620: 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f  (void){.  login_
0630: 63 68 65 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c  check_credential
0640: 73 28 29 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b  s();.  if( !g.ok
0650: 53 65 74 75 70 20 29 7b 0a 20 20 20 20 6c 6f 67  Setup ){.    log
0660: 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20 20 7d  in_needed();.  }
0670: 0a 0a 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72  ..  style_header
0680: 28 29 3b 0a 0a 20 20 40 20 3c 68 32 3e 53 65 74  ();..  @ <h2>Set
0690: 75 70 3c 2f 68 32 3e 0a 20 20 40 20 3c 64 6c 20  up</h2>.  @ <dl 
06a0: 69 64 3d 22 73 65 74 75 70 22 3e 0a 20 20 6d 65  id="setup">.  me
06b0: 6e 75 5f 65 6e 74 72 79 28 22 55 73 65 72 73 22  nu_entry("Users"
06c0: 2c 20 22 73 65 74 75 70 5f 75 6c 69 73 74 22 2c  , "setup_ulist",
06d0: 0a 20 20 20 20 22 47 72 61 6e 74 20 70 72 69 76  .    "Grant priv
06e0: 69 6c 65 67 65 73 20 74 6f 20 69 6e 64 69 76 69  ileges to indivi
06f0: 64 75 61 6c 20 75 73 65 72 73 2e 22 29 3b 0a 20  dual users.");. 
0700: 20 6d 65 6e 75 5f 65 6e 74 72 79 28 22 41 63 63   menu_entry("Acc
0710: 65 73 73 22 2c 20 22 73 65 74 75 70 5f 61 63 63  ess", "setup_acc
0720: 65 73 73 22 2c 0a 20 20 20 20 22 43 6f 6e 74 72  ess",.    "Contr
0730: 6f 6c 20 61 63 63 65 73 73 20 73 65 74 74 69 6e  ol access settin
0740: 67 73 2e 22 29 3b 0a 20 20 6d 65 6e 75 5f 65 6e  gs.");.  menu_en
0750: 74 72 79 28 22 43 6f 6e 66 69 67 75 72 61 74 69  try("Configurati
0760: 6f 6e 22 2c 20 22 73 65 74 75 70 5f 63 6f 6e 66  on", "setup_conf
0770: 69 67 22 2c 0a 20 20 20 20 22 43 6f 6e 66 69 67  ig",.    "Config
0780: 75 72 65 20 74 68 65 20 57 57 57 20 63 6f 6d 70  ure the WWW comp
0790: 6f 6e 65 6e 74 73 20 6f 66 20 74 68 65 20 72 65  onents of the re
07a0: 70 6f 73 69 74 6f 72 79 22 29 3b 0a 20 20 40 20  pository");.  @ 
07b0: 3c 2f 64 6c 3e 0a 0a 20 20 73 74 79 6c 65 5f 66  </dl>..  style_f
07c0: 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  ooter();.}../*.*
07d0: 2a 20 57 45 42 50 41 47 45 3a 20 73 65 74 75 70  * WEBPAGE: setup
07e0: 5f 75 6c 69 73 74 0a 2a 2a 0a 2a 2a 20 53 68 6f  _ulist.**.** Sho
07f0: 77 20 61 20 6c 69 73 74 20 6f 66 20 75 73 65 72  w a list of user
0800: 73 2e 20 20 43 6c 69 63 6b 69 6e 67 20 6f 6e 20  s.  Clicking on 
0810: 61 6e 79 20 75 73 65 72 20 6a 75 6d 70 73 20 74  any user jumps t
0820: 6f 20 74 68 65 20 65 64 69 74 0a 2a 2a 20 73 63  o the edit.** sc
0830: 72 65 65 6e 20 66 6f 72 20 74 68 61 74 20 75 73  reen for that us
0840: 65 72 2e 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 75  er..*/.void setu
0850: 70 5f 75 6c 69 73 74 28 76 6f 69 64 29 7b 0a 20  p_ulist(void){. 
0860: 20 53 74 6d 74 20 73 3b 0a 20 20 0a 20 20 73 74   Stmt s;.  .  st
0870: 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 20 20  yle_footer();.  
0880: 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64  login_check_cred
0890: 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 28  entials();.  if(
08a0: 20 21 67 2e 6f 6b 57 72 69 74 65 20 7c 7c 20 67   !g.okWrite || g
08b0: 2e 69 73 41 6e 6f 6e 20 29 7b 0a 20 20 20 20 6c  .isAnon ){.    l
08c0: 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20  ogin_needed();. 
08d0: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 0a     return;.  }..
08e0: 20 20 73 74 79 6c 65 5f 73 75 62 6d 65 6e 75 5f    style_submenu_
08f0: 65 6c 65 6d 65 6e 74 28 22 41 64 64 22 2c 20 22  element("Add", "
0900: 41 64 64 20 55 73 65 72 22 2c 20 22 73 65 74 75  Add User", "setu
0910: 70 5f 75 65 64 69 74 22 29 3b 0a 20 20 73 74 79  p_uedit");.  sty
0920: 6c 65 5f 68 65 61 64 65 72 28 29 3b 0a 20 20 40  le_header();.  @
0930: 20 3c 68 32 3e 4c 69 73 74 20 4f 66 20 55 73 65   <h2>List Of Use
0940: 72 73 3c 2f 68 32 3e 0a 20 20 40 20 3c 68 72 3e  rs</h2>.  @ <hr>
0950: 0a 20 20 40 20 3c 74 61 62 6c 65 20 61 6c 69 67  .  @ <table alig
0960: 6e 3d 22 6c 65 66 74 22 20 68 73 70 61 63 65 3d  n="left" hspace=
0970: 22 31 30 22 20 62 6f 72 64 65 72 3d 22 31 22 20  "10" border="1" 
0980: 63 65 6c 6c 70 61 64 64 69 6e 67 3d 22 31 30 22  cellpadding="10"
0990: 3e 3c 74 72 3e 3c 74 64 3e 0a 20 20 40 20 3c 74  ><tr><td>.  @ <t
09a0: 61 62 6c 65 20 63 65 6c 6c 73 70 61 63 69 6e 67  able cellspacing
09b0: 3d 30 20 63 65 6c 6c 70 61 64 64 69 6e 67 3d 30  =0 cellpadding=0
09c0: 20 62 6f 72 64 65 72 3d 30 3e 0a 20 20 40 20 3c   border=0>.  @ <
09d0: 74 72 3e 0a 20 20 40 20 20 20 3c 74 68 20 61 6c  tr>.  @   <th al
09e0: 69 67 6e 3d 22 72 69 67 68 74 22 3e 55 73 65 72  ign="right">User
09f0: 26 6e 62 73 70 3b 49 44 3c 2f 74 68 3e 0a 20 20  &nbsp;ID</th>.  
0a00: 40 20 20 20 3c 74 68 3e 26 6e 62 73 70 3b 26 6e  @   <th>&nbsp;&n
0a10: 62 73 70 3b 26 6e 62 73 70 3b 43 61 70 61 62 69  bsp;&nbsp;Capabi
0a20: 6c 69 74 69 65 73 26 6e 62 73 70 3b 26 6e 62 73  lities&nbsp;&nbs
0a30: 70 3b 26 6e 62 73 70 3b 3c 2f 74 68 3e 0a 20 20  p;&nbsp;</th>.  
0a40: 40 20 20 20 3c 74 68 3e 43 6f 6e 74 61 63 74 26  @   <th>Contact&
0a50: 6e 62 73 70 3b 49 6e 66 6f 3c 2f 74 68 3e 0a 20  nbsp;Info</th>. 
0a60: 20 40 20 3c 2f 74 72 3e 0a 20 20 64 62 5f 70 72   @ </tr>.  db_pr
0a70: 65 70 61 72 65 28 26 73 2c 20 22 53 45 4c 45 43  epare(&s, "SELEC
0a80: 54 20 75 69 64 2c 20 6c 6f 67 69 6e 2c 20 63 61  T uid, login, ca
0a90: 70 2c 20 69 6e 66 6f 20 46 52 4f 4d 20 75 73 65  p, info FROM use
0aa0: 72 20 4f 52 44 45 52 20 42 59 20 6c 6f 67 69 6e  r ORDER BY login
0ab0: 22 29 3b 0a 20 20 77 68 69 6c 65 28 20 64 62 5f  ");.  while( db_
0ac0: 73 74 65 70 28 26 73 29 3d 3d 53 51 4c 49 54 45  step(&s)==SQLITE
0ad0: 5f 52 4f 57 20 29 7b 0a 20 20 20 20 40 20 3c 74  _ROW ){.    @ <t
0ae0: 72 3e 0a 20 20 20 20 40 20 3c 74 64 20 61 6c 69  r>.    @ <td ali
0af0: 67 6e 3d 22 72 69 67 68 74 22 3e 0a 20 20 20 20  gn="right">.    
0b00: 69 66 28 20 67 2e 6f 6b 41 64 6d 69 6e 20 29 7b  if( g.okAdmin ){
0b10: 0a 20 20 20 20 20 20 40 20 3c 61 20 68 72 65 66  .      @ <a href
0b20: 3d 22 73 65 74 75 70 5f 75 65 64 69 74 3f 69 64  ="setup_uedit?id
0b30: 3d 25 64 28 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e  =%d(db_column_in
0b40: 74 28 26 73 2c 30 29 29 22 3e 0a 20 20 20 20 7d  t(&s,0))">.    }
0b50: 0a 20 20 20 20 40 20 3c 6e 6f 62 72 3e 25 68 28  .    @ <nobr>%h(
0b60: 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26  db_column_text(&
0b70: 73 2c 31 29 29 3c 2f 6e 6f 62 72 3e 0a 20 20 20  s,1))</nobr>.   
0b80: 20 69 66 28 20 67 2e 6f 6b 41 64 6d 69 6e 20 29   if( g.okAdmin )
0b90: 7b 0a 20 20 20 20 20 20 40 20 3c 2f 61 3e 0a 20  {.      @ </a>. 
0ba0: 20 20 20 7d 0a 20 20 20 20 40 20 3c 2f 74 64 3e     }.    @ </td>
0bb0: 0a 20 20 20 20 40 20 3c 74 64 20 61 6c 69 67 6e  .    @ <td align
0bc0: 3d 22 63 65 6e 74 65 72 22 3e 25 73 28 64 62 5f  ="center">%s(db_
0bd0: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 73 2c 32  column_text(&s,2
0be0: 29 29 3c 2f 74 64 3e 0a 20 20 20 20 40 20 3c 74  ))</td>.    @ <t
0bf0: 64 20 61 6c 69 67 6e 3d 22 6c 65 66 74 22 3e 25  d align="left">%
0c00: 73 28 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74  s(db_column_text
0c10: 28 26 73 2c 33 29 29 3c 2f 74 64 3e 0a 20 20 20  (&s,3))</td>.   
0c20: 20 40 20 3c 2f 74 72 3e 0a 20 20 7d 0a 20 20 40   @ </tr>.  }.  @
0c30: 20 3c 2f 74 61 62 6c 65 3e 3c 2f 74 64 3e 3c 2f   </table></td></
0c40: 74 72 3e 3c 2f 74 61 62 6c 65 3e 0a 20 20 40 20  tr></table>.  @ 
0c50: 3c 70 3e 0a 20 20 40 20 3c 62 3e 4e 6f 74 65 73  <p>.  @ <b>Notes
0c60: 3a 3c 2f 62 3e 0a 20 20 40 20 3c 6f 6c 3e 0a 20  :</b>.  @ <ol>. 
0c70: 20 40 20 3c 6c 69 3e 3c 70 3e 54 68 65 20 70 65   @ <li><p>The pe
0c80: 72 6d 69 73 73 69 6f 6e 20 66 6c 61 67 73 20 61  rmission flags a
0c90: 72 65 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 3c 2f  re as follows:</
0ca0: 70 3e 0a 20 20 40 20 3c 74 61 62 6c 65 3e 0a 20  p>.  @ <table>. 
0cb0: 20 40 20 3c 74 72 3e 3c 74 64 3e 61 3c 2f 74 64   @ <tr><td>a</td
0cc0: 3e 3c 74 64 20 77 69 64 74 68 3d 22 31 30 22 3e  ><td width="10">
0cd0: 3c 2f 74 64 3e 0a 20 20 40 20 20 20 20 20 3c 74  </td>.  @     <t
0ce0: 64 3e 41 64 6d 69 6e 3a 20 43 72 65 61 74 65 20  d>Admin: Create 
0cf0: 6f 72 20 64 65 6c 65 74 65 20 75 73 65 72 73 20  or delete users 
0d00: 61 6e 64 20 74 69 63 6b 65 74 20 72 65 70 6f 72  and ticket repor
0d10: 74 20 66 6f 72 6d 61 74 73 3c 2f 74 64 3e 3c 2f  t formats</td></
0d20: 74 72 3e 0a 20 20 40 20 3c 74 72 3e 3c 74 64 3e  tr>.  @ <tr><td>
0d30: 64 3c 2f 74 64 3e 3c 74 64 3e 3c 2f 74 64 3e 0a  d</td><td></td>.
0d40: 20 20 40 20 20 20 20 20 3c 74 64 3e 44 65 6c 65    @     <td>Dele
0d50: 74 65 3a 20 45 72 61 73 65 20 61 6e 6f 6e 79 6d  te: Erase anonym
0d60: 6f 75 73 20 77 69 6b 69 2c 20 74 69 63 6b 65 74  ous wiki, ticket
0d70: 73 2c 20 61 6e 64 20 61 74 74 61 63 68 6d 65 6e  s, and attachmen
0d80: 74 73 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 20 20 40  ts</td></tr>.  @
0d90: 20 3c 74 72 3e 3c 74 64 3e 69 3c 2f 74 64 3e 3c   <tr><td>i</td><
0da0: 74 64 3e 3c 2f 74 64 3e 0a 20 20 40 20 20 20 20  td></td>.  @    
0db0: 20 3c 74 64 3e 43 68 65 63 6b 2d 69 6e 3a 20 41   <td>Check-in: A
0dc0: 64 64 20 6e 65 77 20 63 6f 64 65 20 74 6f 20 74  dd new code to t
0dd0: 68 65 20 72 65 70 6f 73 69 74 6f 72 79 3c 2f 74  he repository</t
0de0: 64 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e  d></tr>.  @ <tr>
0df0: 3c 74 64 3e 6a 3c 2f 74 64 3e 3c 74 64 3e 3c 2f  <td>j</td><td></
0e00: 74 64 3e 3c 74 64 3e 52 65 61 64 2d 57 69 6b 69  td><td>Read-Wiki
0e10: 3a 20 56 69 65 77 20 77 69 6b 69 20 70 61 67 65  : View wiki page
0e20: 73 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 20 20 40 20  s</td></tr>.  @ 
0e30: 3c 74 72 3e 3c 74 64 3e 6b 3c 2f 74 64 3e 3c 74  <tr><td>k</td><t
0e40: 64 3e 3c 2f 74 64 3e 3c 74 64 3e 57 69 6b 69 3a  d></td><td>Wiki:
0e50: 20 43 72 65 61 74 65 20 6f 72 20 6d 6f 64 69 66   Create or modif
0e60: 79 20 77 69 6b 69 20 70 61 67 65 73 3c 2f 74 64  y wiki pages</td
0e70: 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e 3c  ></tr>.  @ <tr><
0e80: 74 64 3e 6e 3c 2f 74 64 3e 3c 74 64 3e 3c 2f 74  td>n</td><td></t
0e90: 64 3e 3c 74 64 3e 4e 65 77 3a 20 43 72 65 61 74  d><td>New: Creat
0ea0: 65 20 6e 65 77 20 74 69 63 6b 65 74 73 3c 2f 74  e new tickets</t
0eb0: 64 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e  d></tr>.  @ <tr>
0ec0: 3c 74 64 3e 6f 3c 2f 74 64 3e 3c 74 64 3e 3c 2f  <td>o</td><td></
0ed0: 74 64 3e 0a 20 20 40 20 20 20 20 20 3c 74 64 3e  td>.  @     <td>
0ee0: 43 68 65 63 6b 2d 6f 75 74 3a 20 52 65 61 64 20  Check-out: Read 
0ef0: 63 6f 64 65 20 6f 75 74 20 6f 66 20 74 68 65 20  code out of the 
0f00: 72 65 70 6f 73 69 74 6f 72 79 3c 2f 74 64 3e 3c  repository</td><
0f10: 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e 3c 74 64  /tr>.  @ <tr><td
0f20: 3e 70 3c 2f 74 64 3e 3c 74 64 3e 3c 2f 74 64 3e  >p</td><td></td>
0f30: 3c 74 64 3e 50 61 73 73 77 6f 72 64 3a 20 43 68  <td>Password: Ch
0f40: 61 6e 67 65 20 70 61 73 73 77 6f 72 64 3c 2f 74  ange password</t
0f50: 64 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e  d></tr>.  @ <tr>
0f60: 3c 74 64 3e 71 3c 2f 74 64 3e 3c 74 64 3e 3c 2f  <td>q</td><td></
0f70: 74 64 3e 3c 74 64 3e 51 75 65 72 79 3a 20 43 72  td><td>Query: Cr
0f80: 65 61 74 65 20 6f 72 20 65 64 69 74 20 72 65 70  eate or edit rep
0f90: 6f 72 74 20 66 6f 72 6d 61 74 73 3c 2f 74 64 3e  ort formats</td>
0fa0: 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e 3c 74  </tr>.  @ <tr><t
0fb0: 64 3e 72 3c 2f 74 64 3e 3c 74 64 3e 3c 2f 74 64  d>r</td><td></td
0fc0: 3e 3c 74 64 3e 52 65 61 64 3a 20 56 69 65 77 20  ><td>Read: View 
0fd0: 74 69 63 6b 65 74 73 20 61 6e 64 20 63 68 61 6e  tickets and chan
0fe0: 67 65 20 68 69 73 74 6f 72 69 65 73 3c 2f 74 64  ge histories</td
0ff0: 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e 3c  ></tr>.  @ <tr><
1000: 74 64 3e 73 3c 2f 74 64 3e 3c 74 64 3e 3c 2f 74  td>s</td><td></t
1010: 64 3e 3c 74 64 3e 53 65 74 75 70 3a 20 43 68 61  d><td>Setup: Cha
1020: 6e 67 65 20 43 56 53 54 72 61 63 20 6f 70 74 69  nge CVSTrac opti
1030: 6f 6e 73 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 20 20  ons</td></tr>.  
1040: 40 20 3c 74 72 3e 3c 74 64 3e 77 3c 2f 74 64 3e  @ <tr><td>w</td>
1050: 3c 74 64 3e 3c 2f 74 64 3e 3c 74 64 3e 57 72 69  <td></td><td>Wri
1060: 74 65 3a 20 45 64 69 74 20 74 69 63 6b 65 74 73  te: Edit tickets
1070: 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c  </td></tr>.  @ <
1080: 2f 74 61 62 6c 65 3e 0a 20 20 40 20 3c 2f 70 3e  /table>.  @ </p>
1090: 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20 40 20 3c 6c  </li>.  @.  @ <l
10a0: 69 3e 3c 70 3e 0a 20 20 40 20 49 66 20 61 20 75  i><p>.  @ If a u
10b0: 73 65 72 20 6e 61 6d 65 64 20 22 3c 62 3e 61 6e  ser named "<b>an
10c0: 6f 6e 79 6d 6f 75 73 3c 2f 62 3e 22 20 65 78 69  onymous</b>" exi
10d0: 73 74 73 2c 20 74 68 65 6e 20 61 6e 79 6f 6e 65  sts, then anyone
10e0: 20 63 61 6e 20 61 63 63 65 73 73 0a 20 20 40 20   can access.  @ 
10f0: 74 68 65 20 73 65 72 76 65 72 20 77 69 74 68 6f  the server witho
1100: 75 74 20 68 61 76 69 6e 67 20 74 6f 20 6c 6f 67  ut having to log
1110: 20 69 6e 2e 20 20 54 68 65 20 70 65 72 6d 69 73   in.  The permis
1120: 73 69 6f 6e 73 20 6f 6e 20 74 68 65 0a 20 20 40  sions on the.  @
1130: 20 61 6e 6f 6e 79 6d 6f 75 73 20 75 73 65 72 20   anonymous user 
1140: 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 61 63  determine the ac
1150: 63 65 73 73 20 72 69 67 68 74 73 20 66 6f 72 20  cess rights for 
1160: 61 6e 79 6f 6e 65 20 77 68 6f 20 69 73 20 6e 6f  anyone who is no
1170: 74 0a 20 20 40 20 6c 6f 67 67 65 64 20 69 6e 2e  t.  @ logged in.
1180: 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20  .  @ </p></li>. 
1190: 20 40 0a 20 20 40 20 3c 2f 6f 6c 3e 0a 20 20 73   @.  @ </ol>.  s
11a0: 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d  tyle_footer();.}
11b0: 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a  ../*.** WEBPAGE:
11c0: 20 2f 73 65 74 75 70 5f 75 65 64 69 74 0a 2a 2f   /setup_uedit.*/
11d0: 0a 76 6f 69 64 20 75 73 65 72 5f 65 64 69 74 28  .void user_edit(
11e0: 76 6f 69 64 29 7b 0a 20 20 63 6f 6e 73 74 20 63  void){.  const c
11f0: 68 61 72 20 2a 7a 49 64 2c 20 2a 7a 4c 6f 67 69  har *zId, *zLogi
1200: 6e 2c 20 2a 7a 49 6e 66 6f 2c 20 2a 7a 43 61 70  n, *zInfo, *zCap
1210: 3b 0a 20 20 63 68 61 72 20 2a 6f 61 61 2c 20 2a  ;.  char *oaa, *
1220: 6f 61 73 2c 20 2a 6f 61 72 2c 20 2a 6f 61 77 2c  oas, *oar, *oaw,
1230: 20 2a 6f 61 6e 2c 20 2a 6f 61 69 2c 20 2a 6f 61   *oan, *oai, *oa
1240: 6a 2c 20 2a 6f 61 6f 2c 20 2a 6f 61 70 20 3b 0a  j, *oao, *oap ;.
1250: 20 20 63 68 61 72 20 2a 6f 61 6b 2c 20 2a 6f 61    char *oak, *oa
1260: 64 2c 20 2a 6f 61 71 3b 0a 20 20 69 6e 74 20 64  d, *oaq;.  int d
1270: 6f 57 72 69 74 65 3b 0a 20 20 69 6e 74 20 75 69  oWrite;.  int ui
1280: 64 3b 0a 20 20 69 6e 74 20 68 69 67 68 65 72 55  d;.  int higherU
1290: 73 65 72 20 3d 20 30 3b 20 20 2f 2a 20 54 72 75  ser = 0;  /* Tru
12a0: 65 20 69 66 20 75 73 65 72 20 62 65 69 6e 67 20  e if user being 
12b0: 65 64 69 74 65 64 20 69 73 20 53 45 54 55 50 20  edited is SETUP 
12c0: 61 6e 64 20 74 68 65 20 2a 2f 0a 20 20 20 20 20  and the */.     
12d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
12e0: 20 20 2f 2a 20 75 73 65 72 20 64 6f 69 6e 67 20    /* user doing 
12f0: 74 68 65 20 65 64 69 74 69 6e 67 20 69 73 20 41  the editing is A
1300: 44 4d 49 4e 2e 20 20 44 69 73 61 6c 6c 6f 77 20  DMIN.  Disallow 
1310: 65 64 69 74 69 6e 67 20 2a 2f 0a 0a 20 20 2f 2a  editing */..  /*
1320: 20 4d 75 73 74 20 68 61 76 65 20 41 44 4d 49 4e   Must have ADMIN
1330: 20 70 72 69 76 6c 65 67 65 73 20 74 6f 20 61 63   privleges to ac
1340: 63 65 73 73 20 74 68 69 73 20 70 61 67 65 0a 20  cess this page. 
1350: 20 2a 2f 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63   */.  login_chec
1360: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
1370: 0a 20 20 69 66 28 20 21 67 2e 6f 6b 41 64 6d 69  .  if( !g.okAdmi
1380: 6e 20 29 7b 20 6c 6f 67 69 6e 5f 6e 65 65 64 65  n ){ login_neede
1390: 64 28 29 3b 20 72 65 74 75 72 6e 3b 20 7d 0a 0a  d(); return; }..
13a0: 20 20 2f 2a 20 43 68 65 63 6b 20 74 6f 20 73 65    /* Check to se
13b0: 65 20 69 66 20 61 6e 20 41 44 4d 49 4e 20 75 73  e if an ADMIN us
13c0: 65 72 20 69 73 20 74 72 79 69 6e 67 20 74 6f 20  er is trying to 
13d0: 65 64 69 74 20 61 20 53 45 54 55 50 20 61 63 63  edit a SETUP acc
13e0: 6f 75 6e 74 2e 0a 20 20 2a 2a 20 44 6f 6e 27 74  ount..  ** Don't
13f0: 20 61 6c 6c 6f 77 20 74 68 61 74 2e 0a 20 20 2a   allow that..  *
1400: 2f 0a 20 20 7a 49 64 20 3d 20 50 44 28 22 69 64  /.  zId = PD("id
1410: 22 2c 20 22 30 22 29 3b 0a 20 20 75 69 64 20 3d  ", "0");.  uid =
1420: 20 61 74 6f 69 28 7a 49 64 29 3b 0a 20 20 69 66   atoi(zId);.  if
1430: 28 20 7a 49 64 20 26 26 20 21 67 2e 6f 6b 53 65  ( zId && !g.okSe
1440: 74 75 70 20 26 26 20 75 69 64 3e 30 20 29 7b 0a  tup && uid>0 ){.
1450: 20 20 20 20 63 68 61 72 20 2a 7a 4f 6c 64 43 61      char *zOldCa
1460: 70 73 3b 0a 20 20 20 20 7a 4f 6c 64 43 61 70 73  ps;.    zOldCaps
1470: 20 3d 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53   = db_text(0, "S
1480: 45 4c 45 43 54 20 63 61 70 73 20 46 52 4f 4d 20  ELECT caps FROM 
1490: 75 73 65 72 20 57 48 45 52 45 20 75 69 64 3d 25  user WHERE uid=%
14a0: 64 22 2c 75 69 64 29 3b 0a 20 20 20 20 68 69 67  d",uid);.    hig
14b0: 68 65 72 55 73 65 72 20 3d 20 7a 4f 6c 64 43 61  herUser = zOldCa
14c0: 70 73 20 26 26 20 73 74 72 63 68 72 28 7a 4f 6c  ps && strchr(zOl
14d0: 64 43 61 70 73 2c 27 73 27 29 3b 0a 20 20 7d 0a  dCaps,'s');.  }.
14e0: 0a 20 20 69 66 28 20 50 28 22 63 61 6e 22 29 20  .  if( P("can") 
14f0: 29 7b 0a 20 20 20 20 63 67 69 5f 72 65 64 69 72  ){.    cgi_redir
1500: 65 63 74 28 22 73 65 74 75 70 5f 75 6c 69 73 74  ect("setup_ulist
1510: 22 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  ");.    return;.
1520: 20 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 77 65 20    }..  /* If we 
1530: 68 61 76 65 20 61 6c 6c 20 74 68 65 20 6e 65 63  have all the nec
1540: 65 73 73 61 72 79 20 69 6e 66 6f 72 6d 61 74 69  essary informati
1550: 6f 6e 2c 20 77 72 69 74 65 20 74 68 65 20 6e 65  on, write the ne
1560: 77 20 6f 72 0a 20 20 2a 2a 20 6d 6f 64 69 66 69  w or.  ** modifi
1570: 65 64 20 75 73 65 72 20 72 65 63 6f 72 64 2e 20  ed user record. 
1580: 20 41 66 74 65 72 20 77 72 69 74 69 6e 67 20 74   After writing t
1590: 68 65 20 75 73 65 72 20 72 65 63 6f 72 64 2c 20  he user record, 
15a0: 72 65 64 69 72 65 63 74 0a 20 20 2a 2a 20 74 6f  redirect.  ** to
15b0: 20 74 68 65 20 70 61 67 65 20 74 68 61 74 20 64   the page that d
15c0: 69 73 70 6c 61 79 73 20 61 20 6c 69 73 74 20 6f  isplays a list o
15d0: 66 20 75 73 65 72 73 2e 0a 20 20 2a 2f 0a 20 20  f users..  */.  
15e0: 64 6f 57 72 69 74 65 20 3d 20 63 67 69 5f 61 6c  doWrite = cgi_al
15f0: 6c 28 22 6c 6f 67 69 6e 22 2c 22 69 6e 66 6f 22  l("login","info"
1600: 2c 22 70 77 22 29 20 26 26 20 21 68 69 67 68 65  ,"pw") && !highe
1610: 72 55 73 65 72 3b 0a 20 20 69 66 28 20 64 6f 57  rUser;.  if( doW
1620: 72 69 74 65 20 29 7b 0a 20 20 20 20 63 6f 6e 73  rite ){.    cons
1630: 74 20 63 68 61 72 20 2a 7a 50 77 3b 0a 20 20 20  t char *zPw;.   
1640: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 6f   const char *zLo
1650: 67 69 6e 3b 0a 20 20 20 20 63 68 61 72 20 7a 43  gin;.    char zC
1660: 61 70 5b 32 30 5d 3b 0a 20 20 20 20 69 6e 74 20  ap[20];.    int 
1670: 69 20 3d 20 30 3b 0a 20 20 20 20 69 6e 74 20 61  i = 0;.    int a
1680: 61 20 3d 20 50 28 22 61 61 22 29 21 3d 30 3b 0a  a = P("aa")!=0;.
1690: 20 20 20 20 69 6e 74 20 61 64 20 3d 20 50 28 22      int ad = P("
16a0: 61 64 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74  ad")!=0;.    int
16b0: 20 61 69 20 3d 20 50 28 22 61 69 22 29 21 3d 30   ai = P("ai")!=0
16c0: 3b 0a 20 20 20 20 69 6e 74 20 61 6a 20 3d 20 50  ;.    int aj = P
16d0: 28 22 61 6a 22 29 21 3d 30 3b 0a 20 20 20 20 69  ("aj")!=0;.    i
16e0: 6e 74 20 61 6b 20 3d 20 50 28 22 61 6b 22 29 21  nt ak = P("ak")!
16f0: 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 6e 20 3d  =0;.    int an =
1700: 20 50 28 22 61 6e 22 29 21 3d 30 3b 0a 20 20 20   P("an")!=0;.   
1710: 20 69 6e 74 20 61 6f 20 3d 20 50 28 22 61 6f 22   int ao = P("ao"
1720: 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 70  )!=0;.    int ap
1730: 20 3d 20 50 28 22 61 70 22 29 21 3d 30 3b 0a 20   = P("ap")!=0;. 
1740: 20 20 20 69 6e 74 20 61 71 20 3d 20 50 28 22 61     int aq = P("a
1750: 71 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20  q")!=0;.    int 
1760: 61 72 20 3d 20 50 28 22 61 72 22 29 21 3d 30 3b  ar = P("ar")!=0;
1770: 0a 20 20 20 20 69 6e 74 20 61 73 20 3d 20 67 2e  .    int as = g.
1780: 6f 6b 53 65 74 75 70 20 26 26 20 50 28 22 61 73  okSetup && P("as
1790: 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61  ")!=0;.    int a
17a0: 77 20 3d 20 50 28 22 61 77 22 29 21 3d 30 3b 0a  w = P("aw")!=0;.
17b0: 20 20 20 20 69 66 28 20 61 73 20 29 20 61 61 20      if( as ) aa 
17c0: 3d 20 31 3b 0a 20 20 20 20 69 66 28 20 61 61 20  = 1;.    if( aa 
17d0: 29 20 61 69 20 3d 20 61 77 20 3d 20 61 70 20 3d  ) ai = aw = ap =
17e0: 20 31 3b 0a 20 20 20 20 69 66 28 20 61 77 20 29   1;.    if( aw )
17f0: 20 61 6e 20 3d 20 61 72 20 3d 20 31 3b 0a 20 20   an = ar = 1;.  
1800: 20 20 69 66 28 20 61 69 20 29 20 61 6f 20 3d 20    if( ai ) ao = 
1810: 31 3b 0a 20 20 20 20 69 66 28 20 61 6b 20 29 20  1;.    if( ak ) 
1820: 61 6a 20 3d 20 31 3b 0a 20 20 20 20 69 66 28 20  aj = 1;.    if( 
1830: 61 61 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20  aa ){ zCap[i++] 
1840: 3d 20 27 61 27 3b 20 7d 0a 20 20 20 20 69 66 28  = 'a'; }.    if(
1850: 20 61 64 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d   ad ){ zCap[i++]
1860: 20 3d 20 27 64 27 3b 20 7d 0a 20 20 20 20 69 66   = 'd'; }.    if
1870: 28 20 61 69 20 29 7b 20 7a 43 61 70 5b 69 2b 2b  ( ai ){ zCap[i++
1880: 5d 20 3d 20 27 69 27 3b 20 7d 0a 20 20 20 20 69  ] = 'i'; }.    i
1890: 66 28 20 61 6a 20 29 7b 20 7a 43 61 70 5b 69 2b  f( aj ){ zCap[i+
18a0: 2b 5d 20 3d 20 27 6a 27 3b 20 7d 0a 20 20 20 20  +] = 'j'; }.    
18b0: 69 66 28 20 61 6b 20 29 7b 20 7a 43 61 70 5b 69  if( ak ){ zCap[i
18c0: 2b 2b 5d 20 3d 20 27 6b 27 3b 20 7d 0a 20 20 20  ++] = 'k'; }.   
18d0: 20 69 66 28 20 61 6e 20 29 7b 20 7a 43 61 70 5b   if( an ){ zCap[
18e0: 69 2b 2b 5d 20 3d 20 27 6e 27 3b 20 7d 0a 20 20  i++] = 'n'; }.  
18f0: 20 20 69 66 28 20 61 6f 20 29 7b 20 7a 43 61 70    if( ao ){ zCap
1900: 5b 69 2b 2b 5d 20 3d 20 27 6f 27 3b 20 7d 0a 20  [i++] = 'o'; }. 
1910: 20 20 20 69 66 28 20 61 70 20 29 7b 20 7a 43 61     if( ap ){ zCa
1920: 70 5b 69 2b 2b 5d 20 3d 20 27 70 27 3b 20 7d 0a  p[i++] = 'p'; }.
1930: 20 20 20 20 69 66 28 20 61 71 20 29 7b 20 7a 43      if( aq ){ zC
1940: 61 70 5b 69 2b 2b 5d 20 3d 20 27 71 27 3b 20 7d  ap[i++] = 'q'; }
1950: 0a 20 20 20 20 69 66 28 20 61 72 20 29 7b 20 7a  .    if( ar ){ z
1960: 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 72 27 3b 20  Cap[i++] = 'r'; 
1970: 7d 0a 20 20 20 20 69 66 28 20 61 73 20 29 7b 20  }.    if( as ){ 
1980: 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 73 27 3b  zCap[i++] = 's';
1990: 20 7d 0a 20 20 20 20 69 66 28 20 61 77 20 29 7b   }.    if( aw ){
19a0: 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 77 27   zCap[i++] = 'w'
19b0: 3b 20 7d 0a 0a 20 20 20 20 7a 43 61 70 5b 69 5d  ; }..    zCap[i]
19c0: 20 3d 20 30 3b 0a 20 20 20 20 7a 50 77 20 3d 20   = 0;.    zPw = 
19d0: 50 28 22 70 77 22 29 3b 0a 20 20 20 20 69 66 28  P("pw");.    if(
19e0: 20 7a 50 77 3d 3d 30 20 7c 7c 20 7a 50 77 5b 30   zPw==0 || zPw[0
19f0: 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 50  ]==0 ){.      zP
1a00: 77 20 3d 20 64 62 5f 74 65 78 74 28 30 2c 20 22  w = db_text(0, "
1a10: 53 45 4c 45 43 54 20 70 77 20 46 52 4f 4d 20 75  SELECT pw FROM u
1a20: 73 65 72 20 57 48 45 52 45 20 75 69 64 3d 25 64  ser WHERE uid=%d
1a30: 22 2c 20 75 69 64 29 3b 0a 20 20 20 20 7d 0a 20  ", uid);.    }. 
1a40: 20 20 20 7a 4c 6f 67 69 6e 20 3d 20 50 28 22 6c     zLogin = P("l
1a50: 6f 67 69 6e 22 29 3b 0a 20 20 20 20 69 66 28 20  ogin");.    if( 
1a60: 75 69 64 3e 30 20 26 26 20 0a 20 20 20 20 20 20  uid>0 && .      
1a70: 20 20 64 62 5f 65 78 69 73 74 73 28 22 53 45 4c    db_exists("SEL
1a80: 45 43 54 20 31 20 46 52 4f 4d 20 75 73 65 72 20  ECT 1 FROM user 
1a90: 57 48 45 52 45 20 6c 6f 67 69 6e 3d 25 51 20 41  WHERE login=%Q A
1aa0: 4e 44 20 75 69 64 21 3d 25 64 22 2c 20 7a 4c 6f  ND uid!=%d", zLo
1ab0: 67 69 6e 2c 20 75 69 64 29 0a 20 20 20 20 29 7b  gin, uid).    ){
1ac0: 0a 20 20 20 20 20 20 73 74 79 6c 65 5f 68 65 61  .      style_hea
1ad0: 64 65 72 28 29 3b 0a 20 20 20 20 20 20 40 20 3c  der();.      @ <
1ae0: 66 6f 6e 74 20 63 6f 6c 6f 72 3d 22 72 65 64 22  font color="red"
1af0: 3e 4c 6f 67 69 6e 20 22 25 68 28 7a 4c 6f 67 69  >Login "%h(zLogi
1b00: 6e 29 22 20 69 73 20 61 6c 72 65 61 64 79 20 75  n)" is already u
1b10: 73 65 64 20 62 79 20 61 20 64 69 66 66 65 72 65  sed by a differe
1b20: 6e 74 0a 20 20 20 20 20 20 40 20 75 73 65 72 2e  nt.      @ user.
1b30: 3c 2f 66 6f 6e 74 3e 0a 20 20 20 20 20 20 40 0a  </font>.      @.
1b40: 20 20 20 20 20 20 40 20 3c 70 3e 3c 61 20 68 72        @ <p><a hr
1b50: 65 66 3d 22 73 65 74 75 70 5f 75 65 64 69 74 3f  ef="setup_uedit?
1b60: 69 64 3d 25 64 28 75 69 64 29 29 3e 5b 42 75 6d  id=%d(uid))>[Bum
1b70: 6d 65 72 5d 3c 2f 61 3e 3c 2f 70 3e 0a 20 20 20  mer]</a></p>.   
1b80: 20 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28     style_footer(
1b90: 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b  );.      return;
1ba0: 0a 20 20 20 20 7d 0a 20 20 20 20 64 62 5f 6d 75  .    }.    db_mu
1bb0: 6c 74 69 5f 65 78 65 63 28 0a 20 20 20 20 20 20  lti_exec(.      
1bc0: 20 22 52 45 50 4c 41 43 45 20 49 4e 54 4f 20 75   "REPLACE INTO u
1bd0: 73 65 72 28 75 69 64 2c 6c 6f 67 69 6e 2c 69 6e  ser(uid,login,in
1be0: 66 6f 2c 70 77 2c 63 61 70 29 20 22 0a 20 20 20  fo,pw,cap) ".   
1bf0: 20 20 20 20 22 56 41 4c 55 45 53 28 6e 75 6c 6c      "VALUES(null
1c00: 69 66 28 25 64 2c 30 29 2c 25 51 2c 25 51 2c 25  if(%d,0),%Q,%Q,%
1c10: 51 2c 27 25 73 27 29 22 2c 0a 20 20 20 20 20 20  Q,'%s')",.      
1c20: 75 69 64 2c 20 50 28 22 6c 6f 67 69 6e 22 29 2c  uid, P("login"),
1c30: 20 50 28 22 69 6e 66 6f 22 29 2c 20 7a 50 77 2c   P("info"), zPw,
1c40: 20 7a 43 61 70 0a 20 20 20 20 29 3b 0a 20 20 20   zCap.    );.   
1c50: 20 63 67 69 5f 72 65 64 69 72 65 63 74 28 22 73   cgi_redirect("s
1c60: 65 74 75 70 5f 75 6c 69 73 74 22 29 3b 0a 20 20  etup_ulist");.  
1c70: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 0a 20    return;.  }.. 
1c80: 20 2f 2a 20 4c 6f 61 64 20 74 68 65 20 65 78 69   /* Load the exi
1c90: 73 74 69 6e 67 20 69 6e 66 6f 72 6d 61 74 69 6f  sting informatio
1ca0: 6e 20 61 62 6f 75 74 20 74 68 65 20 75 73 65 72  n about the user
1cb0: 2c 20 69 66 20 61 6e 79 0a 20 20 2a 2f 0a 20 20  , if any.  */.  
1cc0: 7a 4c 6f 67 69 6e 20 3d 20 22 22 3b 0a 20 20 7a  zLogin = "";.  z
1cd0: 49 6e 66 6f 20 3d 20 22 22 3b 0a 20 20 7a 43 61  Info = "";.  zCa
1ce0: 70 20 3d 20 22 22 3b 0a 20 20 6f 61 61 20 3d 20  p = "";.  oaa = 
1cf0: 6f 61 64 20 3d 20 6f 61 69 20 3d 20 6f 61 6a 20  oad = oai = oaj 
1d00: 3d 20 6f 61 6b 20 3d 20 6f 61 6e 20 3d 20 6f 61  = oak = oan = oa
1d10: 6f 20 3d 20 6f 61 70 20 3d 20 6f 61 71 20 3d 20  o = oap = oaq = 
1d20: 6f 61 72 20 3d 20 6f 61 73 20 3d 20 6f 61 77 20  oar = oas = oaw 
1d30: 3d 20 22 22 3b 0a 20 20 69 66 28 20 75 69 64 20  = "";.  if( uid 
1d40: 29 7b 0a 20 20 20 20 7a 4c 6f 67 69 6e 20 3d 20  ){.    zLogin = 
1d50: 64 62 5f 74 65 78 74 28 22 22 2c 20 22 53 45 4c  db_text("", "SEL
1d60: 45 43 54 20 6c 6f 67 69 6e 20 46 52 4f 4d 20 75  ECT login FROM u
1d70: 73 65 72 20 57 48 45 52 45 20 75 69 64 3d 25 64  ser WHERE uid=%d
1d80: 22 2c 20 75 69 64 29 3b 0a 20 20 20 20 7a 49 6e  ", uid);.    zIn
1d90: 66 6f 20 3d 20 64 62 5f 74 65 78 74 28 22 22 2c  fo = db_text("",
1da0: 20 22 53 45 4c 45 43 54 20 69 6e 66 6f 20 46 52   "SELECT info FR
1db0: 4f 4d 20 75 73 65 72 20 57 48 45 52 45 20 75 69  OM user WHERE ui
1dc0: 64 3d 25 64 22 2c 20 75 69 64 29 3b 0a 20 20 20  d=%d", uid);.   
1dd0: 20 7a 43 61 70 20 3d 20 64 62 5f 74 65 78 74 28   zCap = db_text(
1de0: 22 22 2c 20 22 53 45 4c 45 43 54 20 63 61 70 20  "", "SELECT cap 
1df0: 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52 45 20  FROM user WHERE 
1e00: 75 69 64 3d 25 64 22 2c 20 75 69 64 29 3b 0a 20  uid=%d", uid);. 
1e10: 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43     if( strchr(zC
1e20: 61 70 2c 20 27 61 27 29 20 29 20 6f 61 61 20 3d  ap, 'a') ) oaa =
1e30: 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20   " checked";.   
1e40: 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70   if( strchr(zCap
1e50: 2c 20 27 64 27 29 20 29 20 6f 61 64 20 3d 20 22  , 'd') ) oad = "
1e60: 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69   checked";.    i
1e70: 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20  f( strchr(zCap, 
1e80: 27 69 27 29 20 29 20 6f 61 69 20 3d 20 22 20 63  'i') ) oai = " c
1e90: 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28  hecked";.    if(
1ea0: 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 6a   strchr(zCap, 'j
1eb0: 27 29 20 29 20 6f 61 6a 20 3d 20 22 20 63 68 65  ') ) oaj = " che
1ec0: 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73  cked";.    if( s
1ed0: 74 72 63 68 72 28 7a 43 61 70 2c 20 27 6b 27 29  trchr(zCap, 'k')
1ee0: 20 29 20 6f 61 6b 20 3d 20 22 20 63 68 65 63 6b   ) oak = " check
1ef0: 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72  ed";.    if( str
1f00: 63 68 72 28 7a 43 61 70 2c 20 27 6e 27 29 20 29  chr(zCap, 'n') )
1f10: 20 6f 61 6e 20 3d 20 22 20 63 68 65 63 6b 65 64   oan = " checked
1f20: 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68  ";.    if( strch
1f30: 72 28 7a 43 61 70 2c 20 27 6f 27 29 20 29 20 6f  r(zCap, 'o') ) o
1f40: 61 6f 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b  ao = " checked";
1f50: 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28  .    if( strchr(
1f60: 7a 43 61 70 2c 20 27 70 27 29 20 29 20 6f 61 70  zCap, 'p') ) oap
1f70: 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20   = " checked";. 
1f80: 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43     if( strchr(zC
1f90: 61 70 2c 20 27 71 27 29 20 29 20 6f 61 71 20 3d  ap, 'q') ) oaq =
1fa0: 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20   " checked";.   
1fb0: 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70   if( strchr(zCap
1fc0: 2c 20 27 72 27 29 20 29 20 6f 61 72 20 3d 20 22  , 'r') ) oar = "
1fd0: 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69   checked";.    i
1fe0: 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20  f( strchr(zCap, 
1ff0: 27 73 27 29 20 29 20 6f 61 73 20 3d 20 22 20 63  's') ) oas = " c
2000: 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28  hecked";.    if(
2010: 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 77   strchr(zCap, 'w
2020: 27 29 20 29 20 6f 61 77 20 3d 20 22 20 63 68 65  ') ) oaw = " che
2030: 63 6b 65 64 22 3b 0a 20 20 7d 0a 0a 20 20 2f 2a  cked";.  }..  /*
2040: 20 42 65 67 69 6e 20 67 65 6e 65 72 61 74 69 6e   Begin generatin
2050: 67 20 74 68 65 20 70 61 67 65 0a 20 20 2a 2f 0a  g the page.  */.
2060: 20 20 73 74 79 6c 65 5f 73 75 62 6d 65 6e 75 5f    style_submenu_
2070: 65 6c 65 6d 65 6e 74 28 22 43 61 6e 63 65 6c 22  element("Cancel"
2080: 2c 20 22 43 61 6e 63 65 6c 22 2c 20 22 73 65 74  , "Cancel", "set
2090: 75 70 5f 75 6c 69 73 74 22 29 3b 0a 20 20 73 74  up_ulist");.  st
20a0: 79 6c 65 5f 68 65 61 64 65 72 28 29 3b 0a 20 20  yle_header();.  
20b0: 69 66 28 20 75 69 64 20 29 7b 0a 20 20 20 20 40  if( uid ){.    @
20c0: 20 3c 68 32 3e 45 64 69 74 20 55 73 65 72 20 25   <h2>Edit User %
20d0: 68 28 7a 4c 6f 67 69 6e 29 3c 2f 68 32 3e 0a 20  h(zLogin)</h2>. 
20e0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 40 20 3c 68   }else{.    @ <h
20f0: 32 3e 41 64 64 20 41 20 4e 65 77 20 55 73 65 72  2>Add A New User
2100: 3c 2f 68 32 3e 0a 20 20 7d 0a 20 20 40 20 3c 74  </h2>.  }.  @ <t
2110: 61 62 6c 65 20 61 6c 69 67 6e 3d 22 6c 65 66 74  able align="left
2120: 22 20 68 73 70 61 63 65 3d 22 32 30 22 20 76 73  " hspace="20" vs
2130: 70 61 63 65 3d 22 31 30 22 3e 3c 74 72 3e 3c 74  pace="10"><tr><t
2140: 64 3e 0a 20 20 40 20 3c 66 6f 72 6d 20 61 63 74  d>.  @ <form act
2150: 69 6f 6e 3d 22 25 73 28 67 2e 7a 50 61 74 68 29  ion="%s(g.zPath)
2160: 22 20 6d 65 74 68 6f 64 3d 22 50 4f 53 54 22 3e  " method="POST">
2170: 0a 20 20 40 20 3c 74 61 62 6c 65 3e 0a 20 20 40  .  @ <table>.  @
2180: 20 3c 74 72 3e 0a 20 20 40 20 20 20 3c 74 64 20   <tr>.  @   <td 
2190: 61 6c 69 67 6e 3d 22 72 69 67 68 74 22 3e 3c 6e  align="right"><n
21a0: 6f 62 72 3e 55 73 65 72 20 49 44 3a 3c 2f 6e 6f  obr>User ID:</no
21b0: 62 72 3e 3c 2f 74 64 3e 0a 20 20 69 66 28 20 75  br></td>.  if( u
21c0: 69 64 20 29 7b 0a 20 20 20 20 40 20 20 20 3c 74  id ){.    @   <t
21d0: 64 3e 25 64 28 75 69 64 29 20 3c 69 6e 70 75 74  d>%d(uid) <input
21e0: 20 74 79 70 65 3d 22 68 69 64 64 65 6e 22 20 6e   type="hidden" n
21f0: 61 6d 65 3d 22 69 64 22 20 76 61 6c 75 65 3d 22  ame="id" value="
2200: 25 64 28 75 69 64 29 22 3e 3c 2f 74 64 3e 0a 20  %d(uid)"></td>. 
2210: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 40 20 20 20   }else{.    @   
2220: 3c 74 64 3e 28 6e 65 77 20 75 73 65 72 29 3c 69  <td>(new user)<i
2230: 6e 70 75 74 20 74 79 70 65 3d 22 68 69 64 64 65  nput type="hidde
2240: 6e 22 20 6e 61 6d 65 3d 22 69 64 22 20 76 61 6c  n" name="id" val
2250: 75 65 3d 30 3e 3c 2f 74 64 3e 0a 20 20 7d 0a 20  ue=0></td>.  }. 
2260: 20 40 20 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72   @ </tr>.  @ <tr
2270: 3e 0a 20 20 40 20 20 20 3c 74 64 20 61 6c 69 67  >.  @   <td alig
2280: 6e 3d 22 72 69 67 68 74 22 3e 3c 6e 6f 62 72 3e  n="right"><nobr>
2290: 4c 6f 67 69 6e 3a 3c 2f 6e 6f 62 72 3e 3c 2f 74  Login:</nobr></t
22a0: 64 3e 0a 20 20 40 20 20 20 3c 74 64 3e 3c 69 6e  d>.  @   <td><in
22b0: 70 75 74 20 74 79 70 65 3d 22 74 65 78 74 22 20  put type="text" 
22c0: 6e 61 6d 65 3d 22 6c 6f 67 69 6e 22 20 76 61 6c  name="login" val
22d0: 75 65 3d 22 25 68 28 7a 4c 6f 67 69 6e 29 22 3e  ue="%h(zLogin)">
22e0: 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74 72 3e 0a  </td>.  @ </tr>.
22f0: 20 20 40 20 3c 74 72 3e 0a 20 20 40 20 20 20 3c    @ <tr>.  @   <
2300: 74 64 20 61 6c 69 67 6e 3d 22 72 69 67 68 74 22  td align="right"
2310: 3e 3c 6e 6f 62 72 3e 43 6f 6e 74 61 63 74 26 6e  ><nobr>Contact&n
2320: 62 73 70 3b 49 6e 66 6f 3a 3c 2f 6e 6f 62 72 3e  bsp;Info:</nobr>
2330: 3c 2f 74 64 3e 0a 20 20 40 20 20 20 3c 74 64 3e  </td>.  @   <td>
2340: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 74 65 78  <input type="tex
2350: 74 22 20 6e 61 6d 65 3d 22 69 6e 66 6f 22 20 73  t" name="info" s
2360: 69 7a 65 3d 34 30 20 76 61 6c 75 65 3d 22 25 68  ize=40 value="%h
2370: 28 7a 49 6e 66 6f 29 22 3e 3c 2f 74 64 3e 0a 20  (zInfo)"></td>. 
2380: 20 40 20 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72   @ </tr>.  @ <tr
2390: 3e 0a 20 20 40 20 20 20 3c 74 64 20 61 6c 69 67  >.  @   <td alig
23a0: 6e 3d 22 72 69 67 68 74 22 20 76 61 6c 69 67 6e  n="right" valign
23b0: 3d 22 74 6f 70 22 3e 43 61 70 61 62 69 6c 69 74  ="top">Capabilit
23c0: 69 65 73 3a 3c 2f 74 64 3e 0a 20 20 40 20 20 20  ies:</td>.  @   
23d0: 3c 74 64 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e  <td>.  @     <in
23e0: 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62  put type="checkb
23f0: 6f 78 22 20 6e 61 6d 65 3d 22 61 61 22 25 73 28  ox" name="aa"%s(
2400: 6f 61 61 29 3e 41 64 6d 69 6e 3c 2f 69 6e 70 75  oaa)>Admin</inpu
2410: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
2420: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
2430: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 64 22 25  kbox" name="ad"%
2440: 73 28 6f 61 64 29 3e 44 65 6c 65 74 65 3c 2f 69  s(oad)>Delete</i
2450: 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20  nput><br>.  @   
2460: 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63    <input type="c
2470: 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61  heckbox" name="a
2480: 69 22 25 73 28 6f 61 69 29 3e 43 68 65 63 6b 2d  i"%s(oai)>Check-
2490: 49 6e 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20  In</input><br>. 
24a0: 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79   @     <input ty
24b0: 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61  pe="checkbox" na
24c0: 6d 65 3d 22 61 6a 22 25 73 28 6f 61 6a 29 3e 52  me="aj"%s(oaj)>R
24d0: 65 61 64 20 57 69 6b 69 3c 2f 69 6e 70 75 74 3e  ead Wiki</input>
24e0: 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e  <br>.  @     <in
24f0: 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62  put type="checkb
2500: 6f 78 22 20 6e 61 6d 65 3d 22 61 6b 22 25 73 28  ox" name="ak"%s(
2510: 6f 61 6b 29 3e 57 72 69 74 65 20 57 69 6b 69 3c  oak)>Write Wiki<
2520: 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20  /input><br>.  @ 
2530: 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d      <input type=
2540: 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d  "checkbox" name=
2550: 22 61 6e 22 25 73 28 6f 61 6e 29 3e 4e 65 77 20  "an"%s(oan)>New 
2560: 54 6b 74 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a  Tkt</input><br>.
2570: 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74    @     <input t
2580: 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e  ype="checkbox" n
2590: 61 6d 65 3d 22 61 6f 22 25 73 28 6f 61 6f 29 3e  ame="ao"%s(oao)>
25a0: 43 68 65 63 6b 2d 4f 75 74 3c 2f 69 6e 70 75 74  Check-Out</input
25b0: 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69  ><br>.  @     <i
25c0: 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b  nput type="check
25d0: 62 6f 78 22 20 6e 61 6d 65 3d 22 61 70 22 25 73  box" name="ap"%s
25e0: 28 6f 61 70 29 3e 50 61 73 73 77 6f 72 64 3c 2f  (oap)>Password</
25f0: 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20  input><br>.  @  
2600: 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22     <input type="
2610: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
2620: 61 71 22 25 73 28 6f 61 71 29 3e 51 75 65 72 79  aq"%s(oaq)>Query
2630: 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40  </input><br>.  @
2640: 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65       <input type
2650: 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65  ="checkbox" name
2660: 3d 22 61 72 22 25 73 28 6f 61 72 29 3e 52 65 61  ="ar"%s(oar)>Rea
2670: 64 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20 20  d</input><br>.  
2680: 69 66 28 20 67 2e 6f 6b 53 65 74 75 70 20 29 7b  if( g.okSetup ){
2690: 0a 20 20 20 20 40 20 20 20 20 20 3c 69 6e 70 75  .    @     <inpu
26a0: 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78  t type="checkbox
26b0: 22 20 6e 61 6d 65 3d 22 61 73 22 25 73 28 6f 61  " name="as"%s(oa
26c0: 73 29 3e 53 65 74 75 70 3c 2f 69 6e 70 75 74 3e  s)>Setup</input>
26d0: 3c 62 72 3e 0a 20 20 7d 0a 20 20 40 20 20 20 20  <br>.  }.  @    
26e0: 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68   <input type="ch
26f0: 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 77  eckbox" name="aw
2700: 22 25 73 28 6f 61 77 29 3e 57 72 69 74 65 3c 2f  "%s(oaw)>Write</
2710: 69 6e 70 75 74 3e 0a 20 20 40 20 20 20 3c 2f 74  input>.  @   </t
2720: 64 3e 0a 20 20 40 20 3c 2f 74 72 3e 0a 20 20 40  d>.  @ </tr>.  @
2730: 20 3c 74 72 3e 0a 20 20 40 20 20 20 3c 74 64 20   <tr>.  @   <td 
2740: 61 6c 69 67 6e 3d 22 72 69 67 68 74 22 3e 50 61  align="right">Pa
2750: 73 73 77 6f 72 64 3a 3c 2f 74 64 3e 0a 20 20 40  ssword:</td>.  @
2760: 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74 20 74 79     <td><input ty
2770: 70 65 3d 22 70 61 73 73 77 6f 72 64 22 20 6e 61  pe="password" na
2780: 6d 65 3d 22 70 77 22 20 76 61 6c 75 65 3d 22 22  me="pw" value=""
2790: 3e 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74 72 3e  ></td>.  @ </tr>
27a0: 0a 20 20 69 66 28 20 21 68 69 67 68 65 72 55 73  .  if( !higherUs
27b0: 65 72 20 29 7b 0a 20 20 20 20 40 20 3c 74 72 3e  er ){.    @ <tr>
27c0: 0a 20 20 20 20 40 20 20 20 3c 74 64 3e 26 6e 62  .    @   <td>&nb
27d0: 73 70 3c 2f 74 64 3e 0a 20 20 20 20 40 20 20 20  sp</td>.    @   
27e0: 3c 74 64 3e 3c 69 6e 70 75 74 20 74 79 70 65 3d  <td><input type=
27f0: 22 73 75 62 6d 69 74 22 20 6e 61 6d 65 3d 22 73  "submit" name="s
2800: 75 62 6d 69 74 22 20 76 61 6c 75 65 3d 22 41 70  ubmit" value="Ap
2810: 70 6c 79 20 43 68 61 6e 67 65 73 22 3e 0a 20 20  ply Changes">.  
2820: 20 20 40 20 3c 2f 74 72 3e 0a 20 20 7d 0a 20 20    @ </tr>.  }.  
2830: 40 20 3c 2f 74 61 62 6c 65 3e 3c 2f 74 64 3e 3c  @ </table></td><
2840: 2f 74 72 3e 3c 2f 74 61 62 6c 65 3e 0a 20 20 40  /tr></table>.  @
2850: 20 3c 70 3e 3c 62 3e 4e 6f 74 65 73 3a 3c 2f 62   <p><b>Notes:</b
2860: 3e 3c 2f 70 3e 0a 20 20 40 20 3c 6f 6c 3e 0a 20  ></p>.  @ <ol>. 
2870: 20 69 66 28 20 68 69 67 68 65 72 55 73 65 72 20   if( higherUser 
2880: 29 7b 0a 20 20 20 20 40 20 3c 6c 69 3e 3c 70 3e  ){.    @ <li><p>
2890: 0a 20 20 20 20 40 20 55 73 65 72 20 25 68 28 7a  .    @ User %h(z
28a0: 49 64 29 20 68 61 73 20 53 65 74 75 70 20 70 72  Id) has Setup pr
28b0: 69 76 69 6c 65 67 65 73 20 61 6e 64 20 79 6f 75  ivileges and you
28c0: 20 6f 6e 6c 79 20 68 61 76 65 20 41 64 6d 69 6e   only have Admin
28d0: 20 70 72 69 76 69 6c 65 67 65 73 0a 20 20 20 20   privileges.    
28e0: 40 20 73 6f 20 79 6f 75 20 61 72 65 20 6e 6f 74  @ so you are not
28f0: 20 70 65 72 6d 69 74 74 65 64 20 74 6f 20 6d 61   permitted to ma
2900: 6b 65 20 63 68 61 6e 67 65 73 20 74 6f 20 25 68  ke changes to %h
2910: 28 7a 49 64 29 2e 0a 20 20 20 20 40 20 3c 2f 70  (zId)..    @ </p
2920: 3e 3c 2f 6c 69 3e 0a 20 20 20 20 40 0a 20 20 7d  ></li>.    @.  }
2930: 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40  .  @ <li><p>.  @
2940: 20 54 68 65 20 3c 62 3e 52 65 61 64 3c 2f 62 3e   The <b>Read</b>
2950: 20 61 6e 64 20 3c 62 3e 57 72 69 74 65 3c 2f 62   and <b>Write</b
2960: 3e 20 70 72 69 76 69 6c 65 67 65 73 20 67 69 76  > privileges giv
2970: 65 20 74 68 65 20 75 73 65 72 20 74 68 65 20 61  e the user the a
2980: 62 69 6c 69 74 79 0a 20 20 40 20 74 6f 20 72 65  bility.  @ to re
2990: 61 64 20 61 6e 64 20 77 72 69 74 65 20 74 69 63  ad and write tic
29a0: 6b 65 74 73 2e 20 20 54 68 65 20 3c 62 3e 4e 65  kets.  The <b>Ne
29b0: 77 20 54 6b 74 3c 2f 62 3e 20 63 61 70 61 62 69  w Tkt</b> capabi
29c0: 6c 69 74 79 20 6d 65 61 6e 73 20 74 68 61 74 0a  lity means that.
29d0: 20 20 40 20 74 68 65 20 75 73 65 72 20 69 73 20    @ the user is 
29e0: 61 62 6c 65 20 74 6f 20 63 72 65 61 74 65 20 6e  able to create n
29f0: 65 77 20 74 69 63 6b 65 74 73 2e 0a 20 20 40 20  ew tickets..  @ 
2a00: 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20  </p></li>.  @.  
2a10: 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20 54 68  @ <li><p>.  @ Th
2a20: 65 20 3c 62 3e 44 65 6c 65 74 65 3c 2f 62 3e 20  e <b>Delete</b> 
2a30: 70 72 69 76 69 6c 65 67 65 20 67 69 76 65 20 74  privilege give t
2a40: 68 65 20 75 73 65 72 20 74 68 65 20 61 62 69 6c  he user the abil
2a50: 69 74 79 20 74 6f 20 65 72 61 73 65 0a 20 20 40  ity to erase.  @
2a60: 20 77 69 6b 69 2c 20 74 69 63 6b 65 74 73 2c 20   wiki, tickets, 
2a70: 61 6e 64 20 61 74 74 74 61 63 68 6d 65 6e 74 73  and atttachments
2a80: 20 74 68 61 74 20 68 61 76 65 20 62 65 65 6e 20   that have been 
2a90: 61 64 64 65 64 20 62 79 20 61 6e 6f 6e 79 6d 6f  added by anonymo
2aa0: 75 73 0a 20 20 40 20 75 73 65 72 73 2e 20 20 54  us.  @ users.  T
2ab0: 68 69 73 20 63 61 70 61 62 69 6c 69 74 79 20 69  his capability i
2ac0: 73 20 69 6e 74 65 6e 64 65 64 20 66 6f 72 20 64  s intended for d
2ad0: 65 6c 65 74 69 6f 6e 20 6f 66 20 73 70 61 6d 2e  eletion of spam.
2ae0: 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20  .  @ </p></li>. 
2af0: 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20   @.  @ <li><p>. 
2b00: 20 40 20 54 68 65 20 3c 62 3e 51 75 65 72 79 3c   @ The <b>Query<
2b10: 2f 62 3e 20 70 72 69 76 69 6c 65 67 65 20 61 6c  /b> privilege al
2b20: 6c 6f 77 73 20 74 68 65 20 75 73 65 72 20 74 6f  lows the user to
2b30: 20 63 72 65 61 74 65 20 6f 72 20 65 64 69 74 0a   create or edit.
2b40: 20 20 40 20 72 65 70 6f 72 74 20 66 6f 72 6d 61    @ report forma
2b50: 74 73 20 62 79 20 73 70 65 63 69 66 79 69 6e 67  ts by specifying
2b60: 20 61 70 70 72 6f 70 72 69 61 74 65 20 53 51 4c   appropriate SQL
2b70: 2e 20 20 55 73 65 72 73 20 63 61 6e 20 72 75 6e  .  Users can run
2b80: 20 0a 20 20 40 20 65 78 69 73 74 69 6e 67 20 72   .  @ existing r
2b90: 65 70 6f 72 74 73 20 77 69 74 68 6f 75 74 20 74  eports without t
2ba0: 68 65 20 51 75 65 72 79 20 70 72 69 76 69 6c 65  he Query privile
2bb0: 67 65 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69  ge..  @ </p></li
2bc0: 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70  >.  @.  @ <li><p
2bd0: 3e 0a 20 20 40 20 41 6e 20 3c 62 3e 41 64 6d 69  >.  @ An <b>Admi
2be0: 6e 3c 2f 62 3e 20 75 73 65 72 20 63 61 6e 20 61  n</b> user can a
2bf0: 64 64 20 6f 74 68 65 72 20 75 73 65 72 73 2c 20  dd other users, 
2c00: 63 72 65 61 74 65 20 6e 65 77 20 74 69 63 6b 65  create new ticke
2c10: 74 20 72 65 70 6f 72 74 0a 20 20 40 20 66 6f 72  t report.  @ for
2c20: 6d 61 74 73 2c 20 61 6e 64 20 63 68 61 6e 67 65  mats, and change
2c30: 20 73 79 73 74 65 6d 20 64 65 66 61 75 6c 74 73   system defaults
2c40: 2e 20 20 42 75 74 20 6f 6e 6c 79 20 74 68 65 20  .  But only the 
2c50: 3c 62 3e 53 65 74 75 70 3c 2f 62 3e 20 75 73 65  <b>Setup</b> use
2c60: 72 0a 20 20 40 20 69 73 20 61 62 6c 65 20 74 6f  r.  @ is able to
2c70: 20 63 68 61 6e 67 65 20 74 68 65 20 72 65 70 6f   change the repo
2c80: 73 69 74 6f 72 79 20 74 6f 0a 20 20 40 20 77 68  sitory to.  @ wh
2c90: 69 63 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d  ich this program
2ca0: 20 69 73 20 6c 69 6e 6b 65 64 2e 0a 20 20 40 20   is linked..  @ 
2cb0: 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20  </p></li>.  @.  
2cc0: 69 66 28 20 7a 49 64 3d 3d 30 20 7c 7c 20 73 74  if( zId==0 || st
2cd0: 72 63 6d 70 28 7a 49 64 2c 22 61 6e 6f 6e 79 6d  rcmp(zId,"anonym
2ce0: 6f 75 73 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  ous")==0 ){.    
2cf0: 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 20 20 40 20  @ <li><p>.    @ 
2d00: 4e 6f 20 6c 6f 67 69 6e 20 69 73 20 72 65 71 75  No login is requ
2d10: 69 72 65 64 20 66 6f 72 20 75 73 65 72 20 22 3c  ired for user "<
2d20: 62 3e 61 6e 6f 6e 79 6d 6f 75 73 3c 2f 62 3e 22  b>anonymous</b>"
2d30: 2e 20 20 54 68 65 20 63 61 70 61 62 69 6c 69 74  .  The capabilit
2d40: 69 65 73 0a 20 20 20 20 40 20 6f 66 20 74 68 69  ies.    @ of thi
2d50: 73 20 75 73 65 72 20 61 72 65 20 61 76 61 69 6c  s user are avail
2d60: 61 62 6c 65 20 74 6f 20 61 6e 79 6f 6e 65 20 77  able to anyone w
2d70: 69 74 68 6f 75 74 20 73 75 70 70 6c 79 69 6e 67  ithout supplying
2d80: 20 61 20 75 73 65 72 6e 61 6d 65 20 6f 72 0a 20   a username or. 
2d90: 20 20 20 40 20 70 61 73 73 77 6f 72 64 2e 20 20     @ password.  
2da0: 54 6f 20 64 69 73 61 62 6c 65 20 61 6e 6f 6e 79  To disable anony
2db0: 6d 6f 75 73 20 61 63 63 65 73 73 2c 20 6d 61 6b  mous access, mak
2dc0: 65 20 73 75 72 65 20 74 68 65 72 65 20 69 73 20  e sure there is 
2dd0: 6e 6f 20 75 73 65 72 0a 20 20 20 20 40 20 77 69  no user.    @ wi
2de0: 74 68 20 61 6e 20 49 44 20 6f 66 20 3c 62 3e 61  th an ID of <b>a
2df0: 6e 6f 6e 79 6d 6f 75 73 3c 2f 62 3e 2e 0a 20 20  nonymous</b>..  
2e00: 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20    @ </p></li>.  
2e10: 20 20 40 0a 20 20 20 20 40 20 3c 6c 69 3e 3c 70    @.    @ <li><p
2e20: 3e 0a 20 20 20 20 40 20 54 68 65 20 70 61 73 73  >.    @ The pass
2e30: 77 6f 72 64 20 66 6f 72 20 74 68 65 20 22 3c 62  word for the "<b
2e40: 3e 61 6e 6f 6e 79 6d 6f 75 73 3c 2f 62 3e 22 20  >anonymous</b>" 
2e50: 75 73 65 72 20 69 73 20 75 73 65 64 20 66 6f 72  user is used for
2e60: 20 61 6e 6f 6e 79 6d 6f 75 73 0a 20 20 20 20 40   anonymous.    @
2e70: 20 61 63 63 65 73 73 2e 20 20 54 68 65 20 72 65   access.  The re
2e80: 63 6f 6d 6d 65 6e 64 65 64 20 76 61 6c 75 65 20  commended value 
2e90: 66 6f 72 20 74 68 65 20 61 6e 6f 6e 79 6d 6f 75  for the anonymou
2ea0: 73 20 70 61 73 73 77 6f 72 64 0a 20 20 20 20 40  s password.    @
2eb0: 20 69 73 20 22 61 6e 6f 6e 79 6d 6f 75 73 22 2e   is "anonymous".
2ec0: 0a 20 20 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e  .    @ </p></li>
2ed0: 0a 20 20 7d 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e  .  }.  @ </form>
2ee0: 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28  .  style_footer(
2ef0: 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 47 65 6e  );.}.../*.** Gen
2f00: 65 72 61 74 65 20 61 20 63 68 65 63 6b 62 6f 78  erate a checkbox
2f10: 20 66 6f 72 20 61 6e 20 61 74 74 72 69 62 75 74   for an attribut
2f20: 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  e..*/.static voi
2f30: 64 20 6f 6e 6f 66 66 5f 61 74 74 72 69 62 75 74  d onoff_attribut
2f40: 65 28 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  e(.  const char 
2f50: 2a 7a 4c 61 62 65 6c 2c 20 20 20 2f 2a 20 54 68  *zLabel,   /* Th
2f60: 65 20 74 65 78 74 20 6c 61 62 65 6c 20 6f 6e 20  e text label on 
2f70: 74 68 65 20 63 68 65 63 6b 62 6f 78 20 2a 2f 0a  the checkbox */.
2f80: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56    const char *zV
2f90: 61 72 2c 20 20 20 20 20 2f 2a 20 54 68 65 20 63  ar,     /* The c
2fa0: 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 72 6f 77  orresponding row
2fb0: 20 69 6e 20 74 68 65 20 56 41 52 20 74 61 62 6c   in the VAR tabl
2fc0: 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61  e */.  const cha
2fd0: 72 20 2a 7a 51 50 61 72 6d 2c 20 20 20 2f 2a 20  r *zQParm,   /* 
2fe0: 54 68 65 20 71 75 65 72 79 20 70 61 72 61 6d 65  The query parame
2ff0: 74 65 72 20 2a 2f 0a 20 20 69 6e 74 20 64 66 6c  ter */.  int dfl
3000: 74 56 61 6c 20 20 20 20 20 20 20 20 20 20 20 2f  tVal           /
3010: 2a 20 44 65 66 61 75 6c 74 20 76 61 6c 75 65 20  * Default value 
3020: 69 66 20 56 41 52 20 74 61 62 6c 65 20 65 6e 74  if VAR table ent
3030: 72 79 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73  ry does not exis
3040: 74 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  t */.){.  const 
3050: 63 68 61 72 20 2a 7a 56 61 6c 20 3d 20 64 62 5f  char *zVal = db_
3060: 67 65 74 28 7a 56 61 72 2c 20 30 29 3b 0a 20 20  get(zVar, 0);.  
3070: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 51 20 3d  const char *zQ =
3080: 20 50 28 7a 51 50 61 72 6d 29 3b 0a 20 20 69 6e   P(zQParm);.  in
3090: 74 20 69 56 61 6c 3b 0a 20 20 69 66 28 20 7a 56  t iVal;.  if( zV
30a0: 61 6c 20 29 7b 0a 20 20 20 20 69 56 61 6c 20 3d  al ){.    iVal =
30b0: 20 61 74 6f 69 28 7a 56 61 6c 29 3b 0a 20 20 7d   atoi(zVal);.  }
30c0: 65 6c 73 65 7b 0a 20 20 20 20 69 56 61 6c 20 3d  else{.    iVal =
30d0: 20 64 66 6c 74 56 61 6c 3b 0a 20 20 7d 0a 20 20   dfltVal;.  }.  
30e0: 69 66 28 20 7a 51 3d 3d 30 20 26 26 20 50 28 22  if( zQ==0 && P("
30f0: 73 75 62 6d 69 74 22 29 20 29 7b 0a 20 20 20 20  submit") ){.    
3100: 7a 51 20 3d 20 22 6f 66 66 22 3b 0a 20 20 7d 0a  zQ = "off";.  }.
3110: 20 20 69 66 28 20 7a 51 20 29 7b 0a 20 20 20 20    if( zQ ){.    
3120: 69 6e 74 20 69 51 20 3d 20 73 74 72 63 6d 70 28  int iQ = strcmp(
3130: 7a 51 2c 22 6f 6e 22 29 3d 3d 30 20 7c 7c 20 61  zQ,"on")==0 || a
3140: 74 6f 69 28 7a 51 29 3b 0a 20 20 20 20 69 66 28  toi(zQ);.    if(
3150: 20 69 51 21 3d 69 56 61 6c 20 29 7b 0a 20 20 20   iQ!=iVal ){.   
3160: 20 20 20 64 62 5f 73 65 74 28 7a 56 61 72 2c 20     db_set(zVar, 
3170: 69 51 20 3f 20 22 31 22 20 3a 20 22 30 22 29 3b  iQ ? "1" : "0");
3180: 0a 20 20 20 20 20 20 69 56 61 6c 20 3d 20 69 51  .      iVal = iQ
3190: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66  ;.    }.  }.  if
31a0: 28 20 69 56 61 6c 20 29 7b 0a 20 20 20 20 40 20  ( iVal ){.    @ 
31b0: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65  <input type="che
31c0: 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 25 73 28  ckbox" name="%s(
31d0: 7a 51 50 61 72 6d 29 22 20 63 68 65 63 6b 65 64  zQParm)" checked
31e0: 3e 25 73 28 7a 4c 61 62 65 6c 29 3c 2f 69 6e 70  >%s(zLabel)</inp
31f0: 75 74 3e 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ut>.  }else{.   
3200: 20 40 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22   @ <input type="
3210: 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22  checkbox" name="
3220: 25 73 28 7a 51 50 61 72 6d 29 22 3e 25 73 28 7a  %s(zQParm)">%s(z
3230: 4c 61 62 65 6c 29 3c 2f 69 6e 70 75 74 3e 0a 20  Label)</input>. 
3240: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 6e 65   }.}../*.** Gene
3250: 72 61 74 65 20 61 6e 20 65 6e 74 72 79 20 62 6f  rate an entry bo
3260: 78 20 66 6f 72 20 61 6e 20 61 74 74 72 69 62 75  x for an attribu
3270: 74 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  te..*/.static vo
3280: 69 64 20 65 6e 74 72 79 5f 61 74 74 72 69 62 75  id entry_attribu
3290: 74 65 28 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  te(.  const char
32a0: 20 2a 7a 4c 61 62 65 6c 2c 20 20 20 2f 2a 20 54   *zLabel,   /* T
32b0: 68 65 20 74 65 78 74 20 6c 61 62 65 6c 20 6f 6e  he text label on
32c0: 20 74 68 65 20 65 6e 74 72 79 20 62 6f 78 20 2a   the entry box *
32d0: 2f 0a 20 20 69 6e 74 20 77 69 64 74 68 2c 20 20  /.  int width,  
32e0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 57 69 64            /* Wid
32f0: 74 68 20 6f 66 20 74 68 65 20 65 6e 74 72 79 20  th of the entry 
3300: 62 6f 78 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63  box */.  const c
3310: 68 61 72 20 2a 7a 56 61 72 2c 20 20 20 20 20 2f  har *zVar,     /
3320: 2a 20 54 68 65 20 63 6f 72 72 65 73 70 6f 6e 64  * The correspond
3330: 69 6e 67 20 72 6f 77 20 69 6e 20 74 68 65 20 56  ing row in the V
3340: 41 52 20 74 61 62 6c 65 20 2a 2f 0a 20 20 63 6f  AR table */.  co
3350: 6e 73 74 20 63 68 61 72 20 2a 7a 51 50 61 72 6d  nst char *zQParm
3360: 2c 20 20 20 2f 2a 20 54 68 65 20 71 75 65 72 79  ,   /* The query
3370: 20 70 61 72 61 6d 65 74 65 72 20 2a 2f 0a 20 20   parameter */.  
3380: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44 66 6c  const char *zDfl
3390: 74 20 20 20 20 20 2f 2a 20 44 65 66 61 75 6c 74  t     /* Default
33a0: 20 76 61 6c 75 65 20 69 66 20 56 41 52 20 74 61   value if VAR ta
33b0: 62 6c 65 20 65 6e 74 72 79 20 64 6f 65 73 20 6e  ble entry does n
33c0: 6f 74 20 65 78 69 73 74 20 2a 2f 0a 29 7b 0a 20  ot exist */.){. 
33d0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61   const char *zVa
33e0: 6c 20 3d 20 64 62 5f 67 65 74 28 7a 56 61 72 2c  l = db_get(zVar,
33f0: 20 7a 44 66 6c 74 29 3b 0a 20 20 63 6f 6e 73 74   zDflt);.  const
3400: 20 63 68 61 72 20 2a 7a 51 20 3d 20 50 28 7a 51   char *zQ = P(zQ
3410: 50 61 72 6d 29 3b 0a 20 20 69 66 28 20 7a 51 20  Parm);.  if( zQ 
3420: 26 26 20 73 74 72 63 6d 70 28 7a 51 2c 7a 56 61  && strcmp(zQ,zVa
3430: 6c 29 21 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f  l)!=0 ){.    db_
3440: 73 65 74 28 7a 56 61 72 2c 20 7a 51 29 3b 0a 20  set(zVar, zQ);. 
3450: 20 20 20 7a 56 61 6c 20 3d 20 7a 51 3b 0a 20 20     zVal = zQ;.  
3460: 7d 0a 20 20 40 20 3c 69 6e 70 75 74 20 74 79 70  }.  @ <input typ
3470: 65 3d 22 74 65 78 74 22 20 6e 61 6d 65 3d 22 25  e="text" name="%
3480: 73 28 7a 51 50 61 72 6d 29 22 20 76 61 6c 75 65  s(zQParm)" value
3490: 3d 22 25 68 28 7a 56 61 6c 29 22 20 73 69 7a 65  ="%h(zVal)" size
34a0: 3d 22 25 64 28 77 69 64 74 68 29 22 3e 0a 20 20  ="%d(width)">.  
34b0: 40 20 25 73 28 7a 4c 61 62 65 6c 29 0a 7d 0a 0a  @ %s(zLabel).}..
34c0: 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47 45 3a  ../*.** WEBPAGE:
34d0: 20 73 65 74 75 70 5f 61 63 63 65 73 73 0a 2a 2f   setup_access.*/
34e0: 0a 76 6f 69 64 20 73 65 74 75 70 5f 61 63 63 65  .void setup_acce
34f0: 73 73 28 76 6f 69 64 29 7b 0a 20 20 6c 6f 67 69  ss(void){.  logi
3500: 6e 5f 63 68 65 63 6b 5f 63 72 65 64 65 6e 74 69  n_check_credenti
3510: 61 6c 73 28 29 3b 0a 20 20 69 66 28 20 21 67 2e  als();.  if( !g.
3520: 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20 6c  okSetup ){.    l
3530: 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 0a 20  ogin_needed();. 
3540: 20 7d 0a 0a 20 20 73 74 79 6c 65 5f 68 65 61 64   }..  style_head
3550: 65 72 28 29 3b 0a 20 20 64 62 5f 62 65 67 69 6e  er();.  db_begin
3560: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a  _transaction();.
3570: 20 20 40 20 3c 68 32 3e 41 63 63 65 73 73 20 43    @ <h2>Access C
3580: 6f 6e 74 72 6f 6c 20 53 65 74 74 69 6e 67 73 3c  ontrol Settings<
3590: 2f 68 32 3e 0a 20 20 40 20 3c 66 6f 72 6d 20 61  /h2>.  @ <form a
35a0: 63 74 69 6f 6e 3d 22 25 73 28 67 2e 7a 42 61 73  ction="%s(g.zBas
35b0: 65 55 52 4c 29 2f 73 65 74 75 70 5f 61 63 63 65  eURL)/setup_acce
35c0: 73 73 22 20 6d 65 74 68 6f 64 3d 22 50 4f 53 54  ss" method="POST
35d0: 22 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20 20 6f  ">..  @ <hr>.  o
35e0: 6e 6f 66 66 5f 61 74 74 72 69 62 75 74 65 28 22  noff_attribute("
35f0: 52 65 71 75 69 72 65 20 70 61 73 73 77 6f 72 64  Require password
3600: 20 66 6f 72 20 6c 6f 63 61 6c 20 61 63 63 65 73   for local acces
3610: 73 22 2c 0a 20 20 20 20 20 22 61 75 74 68 65 6e  s",.     "authen
3620: 74 69 63 61 74 65 2d 6c 6f 63 61 6c 68 6f 73 74  ticate-localhost
3630: 22 2c 20 22 6c 6f 63 61 6c 61 75 74 68 22 2c 20  ", "localauth", 
3640: 31 29 3b 0a 20 20 40 20 3c 70 3e 57 68 65 6e 20  1);.  @ <p>When 
3650: 65 6e 61 62 6c 65 64 2c 20 74 68 65 20 70 61 73  enabled, the pas
3660: 73 77 6f 72 64 20 73 69 67 6e 2d 69 6e 20 69 73  sword sign-in is
3670: 20 72 65 71 75 69 72 65 64 20 66 6f 72 0a 20 20   required for.  
3680: 40 20 77 65 62 20 61 63 63 65 73 73 20 63 6f 6d  @ web access com
3690: 69 6e 67 20 66 72 6f 6d 20 31 32 37 2e 30 2e 30  ing from 127.0.0
36a0: 2e 31 2e 20 20 57 68 65 6e 20 64 69 73 61 62 6c  .1.  When disabl
36b0: 65 64 2c 20 77 65 62 20 61 63 63 65 73 73 0a 20  ed, web access. 
36c0: 20 40 20 66 72 6f 6d 20 31 32 37 2e 30 2e 30 2e   @ from 127.0.0.
36d0: 31 20 69 73 20 61 6c 6c 6f 77 73 20 77 69 74 68  1 is allows with
36e0: 6f 75 74 20 61 6e 79 20 6c 6f 67 69 6e 20 2d 20  out any login - 
36f0: 74 68 65 20 75 73 65 72 20 69 64 20 69 73 20 73  the user id is s
3700: 65 6c 65 63 74 65 64 0a 20 20 40 20 66 72 6f 6d  elected.  @ from
3710: 20 74 68 65 20 7e 2f 2e 66 6f 73 73 69 6c 20 64   the ~/.fossil d
3720: 61 74 61 62 61 73 65 2e 20 50 61 73 73 77 6f 72  atabase. Passwor
3730: 64 20 6c 6f 67 69 6e 20 69 73 20 61 6c 77 61 79  d login is alway
3740: 73 20 72 65 71 75 69 72 65 64 0a 20 20 40 20 66  s required.  @ f
3750: 6f 72 20 69 6e 63 6f 6d 69 6e 67 20 77 65 62 20  or incoming web 
3760: 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 6f 6e 20 69  connections on i
3770: 6e 74 65 72 6e 65 74 20 61 64 64 72 65 73 73 65  nternet addresse
3780: 73 20 6f 74 68 65 72 20 74 68 61 6e 0a 20 20 40  s other than.  @
3790: 20 31 32 37 2e 30 2e 30 2e 31 2e 3c 2f 70 3e 3c   127.0.0.1.</p><
37a0: 2f 6c 69 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20  /li>..  @ <hr>. 
37b0: 20 65 6e 74 72 79 5f 61 74 74 72 69 62 75 74 65   entry_attribute
37c0: 28 22 4c 6f 67 69 6e 20 65 78 70 69 72 61 74 69  ("Login expirati
37d0: 6f 6e 20 74 69 6d 65 22 2c 20 36 2c 20 22 63 6f  on time", 6, "co
37e0: 6f 6b 69 65 2d 65 78 70 69 72 65 22 2c 20 22 63  okie-expire", "c
37f0: 65 78 22 2c 20 22 38 37 36 36 22 29 3b 0a 20 20  ex", "8766");.  
3800: 40 20 3c 70 3e 54 68 65 20 6e 75 6d 62 65 72 20  @ <p>The number 
3810: 6f 66 20 68 6f 75 72 73 20 66 6f 72 20 77 68 69  of hours for whi
3820: 63 68 20 61 20 6c 6f 67 69 6e 20 69 73 20 76 61  ch a login is va
3830: 6c 69 64 2e 20 20 54 68 69 73 20 6d 75 73 74 20  lid.  This must 
3840: 62 65 20 61 0a 20 20 40 20 70 6f 73 69 74 69 76  be a.  @ positiv
3850: 65 20 6e 75 6d 62 65 72 2e 20 20 54 68 65 20 64  e number.  The d
3860: 65 66 61 75 6c 74 20 69 73 20 38 37 36 30 20 68  efault is 8760 h
3870: 6f 75 72 73 20 77 68 69 63 68 20 69 73 20 61 70  ours which is ap
3880: 70 72 6f 78 69 6d 61 74 65 6c 79 20 65 71 75 61  proximately equa
3890: 6c 0a 20 20 40 20 74 6f 20 61 20 79 65 61 72 2e  l.  @ to a year.
38a0: 3c 2f 70 3e 0a 20 20 20 0a 20 20 40 20 3c 68 72  </p>.   .  @ <hr
38b0: 3e 0a 20 20 6f 6e 6f 66 66 5f 61 74 74 72 69 62  >.  onoff_attrib
38c0: 75 74 65 28 22 41 6c 6c 6f 77 20 61 6e 6f 6e 79  ute("Allow anony
38d0: 6d 6f 75 73 20 73 69 67 6e 75 70 22 2c 20 22 61  mous signup", "a
38e0: 6e 6f 6e 2d 73 69 67 6e 75 70 22 2c 20 22 61 73  non-signup", "as
38f0: 75 22 2c 20 30 29 3b 0a 20 20 40 20 3c 70 3e 41  u", 0);.  @ <p>A
3900: 6c 6c 6f 77 20 75 73 65 72 73 20 74 6f 20 63 72  llow users to cr
3910: 65 61 74 65 20 74 68 65 69 72 20 6f 77 6e 20 61  eate their own a
3920: 63 63 6f 75 6e 74 73 3c 2f 70 3e 0a 20 20 20 0a  ccounts</p>.   .
3930: 20 20 40 20 3c 68 72 3e 0a 20 20 40 20 3c 70 3e    @ <hr>.  @ <p>
3940: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62  <input type="sub
3950: 6d 69 74 22 20 20 6e 61 6d 65 3d 22 73 75 62 6d  mit"  name="subm
3960: 69 74 22 20 76 61 6c 75 65 3d 22 41 70 70 6c 79  it" value="Apply
3970: 20 43 68 61 6e 67 65 73 22 3e 3c 2f 70 3e 0a 20   Changes"></p>. 
3980: 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 64 62 5f   @ </form>.  db_
3990: 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28  end_transaction(
39a0: 30 29 3b 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74  0);.  style_foot
39b0: 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57  er();.}../*.** W
39c0: 45 42 50 41 47 45 3a 20 73 65 74 75 70 5f 63 6f  EBPAGE: setup_co
39d0: 6e 66 69 67 0a 2a 2f 0a 76 6f 69 64 20 73 65 74  nfig.*/.void set
39e0: 75 70 5f 63 6f 6e 66 69 67 28 76 6f 69 64 29 7b  up_config(void){
39f0: 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63  .  login_check_c
3a00: 72 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20  redentials();.  
3a10: 69 66 28 20 21 67 2e 6f 6b 53 65 74 75 70 20 29  if( !g.okSetup )
3a20: 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65 64  {.    login_need
3a30: 65 64 28 29 3b 0a 20 20 7d 0a 0a 20 20 73 74 79  ed();.  }..  sty
3a40: 6c 65 5f 68 65 61 64 65 72 28 29 3b 0a 20 20 64  le_header();.  d
3a50: 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74  b_begin_transact
3a60: 69 6f 6e 28 29 3b 0a 20 20 40 20 3c 68 32 3e 57  ion();.  @ <h2>W
3a70: 57 57 20 43 6f 6e 66 69 67 75 72 61 74 69 6f 6e  WW Configuration
3a80: 3c 2f 68 32 3e 0a 20 20 40 20 3c 66 6f 72 6d 20  </h2>.  @ <form 
3a90: 61 63 74 69 6f 6e 3d 22 25 73 28 67 2e 7a 42 61  action="%s(g.zBa
3aa0: 73 65 55 52 4c 29 2f 73 65 74 75 70 5f 63 6f 6e  seURL)/setup_con
3ab0: 66 69 67 22 20 6d 65 74 68 6f 64 3d 22 50 4f 53  fig" method="POS
3ac0: 54 22 3e 0a 0a 20 20 40 20 3c 68 72 3e 0a 20 20  T">..  @ <hr>.  
3ad0: 65 6e 74 72 79 5f 61 74 74 72 69 62 75 74 65 28  entry_attribute(
3ae0: 22 48 6f 6d 65 20 70 61 67 65 22 2c 20 36 30 2c  "Home page", 60,
3af0: 20 22 68 6f 6d 65 70 61 67 65 22 2c 20 22 68 70   "homepage", "hp
3b00: 22 2c 20 22 22 29 3b 0a 20 20 40 20 3c 70 3e 54  ", "");.  @ <p>T
3b10: 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 77 69 6b  he name of a wik
3b20: 69 20 66 69 6c 65 20 74 68 61 74 20 69 73 20 74  i file that is t
3b30: 68 65 20 68 6f 6d 65 70 61 67 65 20 66 6f 72 20  he homepage for 
3b40: 74 68 65 20 77 65 62 73 69 74 65 2e 0a 20 20 40  the website..  @
3b50: 20 54 68 65 20 68 6f 6d 65 20 70 61 67 65 20 69   The home page i
3b60: 73 20 74 68 65 20 70 61 67 65 20 74 68 61 74 20  s the page that 
3b70: 69 73 20 64 69 73 70 6c 61 79 65 64 20 62 79 20  is displayed by 
3b80: 74 68 65 20 22 48 6f 6d 65 22 20 6c 69 6e 6b 0a  the "Home" link.
3b90: 20 20 40 20 61 74 20 74 68 65 20 74 6f 70 20 6f    @ at the top o
3ba0: 66 20 74 68 69 73 20 73 63 72 65 65 6e 2e 3c 2f  f this screen.</
3bb0: 70 3e 0a 0a 20 20 65 6e 74 72 79 5f 61 74 74 72  p>..  entry_attr
3bc0: 69 62 75 74 65 28 22 54 69 63 6b 65 74 20 73 75  ibute("Ticket su
3bd0: 62 64 69 72 65 63 74 6f 72 79 22 2c 20 36 30 2c  bdirectory", 60,
3be0: 20 22 74 69 63 6b 65 74 2d 73 75 62 64 69 72 22   "ticket-subdir"
3bf0: 2c 20 22 74 73 64 22 2c 20 22 22 29 3b 0a 20 20  , "tsd", "");.  
3c00: 40 20 3c 70 3e 41 20 73 75 62 64 69 72 65 63 74  @ <p>A subdirect
3c10: 6f 72 79 20 69 6e 20 74 68 65 20 66 69 6c 65 20  ory in the file 
3c20: 68 69 65 72 61 72 63 68 79 20 74 68 61 74 20 63  hierarchy that c
3c30: 6f 6e 74 61 69 6e 73 20 61 6c 6c 20 74 72 6f 75  ontains all trou
3c40: 62 6c 65 0a 20 20 40 20 74 69 63 6b 65 74 73 2e  ble.  @ tickets.
3c50: 20 20 4c 65 61 76 65 20 74 68 69 73 20 62 6c 61    Leave this bla
3c60: 6e 6b 20 74 6f 20 64 69 73 61 62 6c 65 20 74 69  nk to disable ti
3c70: 63 6b 65 74 69 6e 67 2e 20 20 54 69 63 6b 65 74  cketing.  Ticket
3c80: 73 20 74 65 78 74 0a 20 20 40 20 66 69 6c 65 73  s text.  @ files
3c90: 20 77 69 74 68 69 6e 20 74 68 69 73 20 73 75 62   within this sub
3ca0: 64 69 72 65 63 74 6f 72 79 20 63 6f 6e 74 61 69  directory contai
3cb0: 6e 69 6e 67 20 61 20 70 61 72 74 69 63 75 6c 61  ning a particula
3cc0: 72 20 66 6f 72 6d 61 74 0a 20 20 40 20 28 64 6f  r format.  @ (do
3cd0: 63 75 6d 65 6e 74 65 64 20 73 65 70 61 72 61 74  cumented separat
3ce0: 65 6c 79 29 20 61 6e 64 20 77 69 74 68 20 74 68  ely) and with th
3cf0: 65 20 22 2e 74 6b 74 22 20 73 75 66 66 69 78 2e  e ".tkt" suffix.
3d00: 3c 2f 70 3e 0a 0a 20 20 65 6e 74 72 79 5f 61 74  </p>..  entry_at
3d10: 74 72 69 62 75 74 65 28 22 57 69 6b 69 20 73 75  tribute("Wiki su
3d20: 62 64 69 72 65 63 74 6f 72 79 22 2c 20 36 30 2c  bdirectory", 60,
3d30: 20 22 77 69 6b 69 2d 73 75 62 64 69 72 22 2c 20   "wiki-subdir", 
3d40: 22 77 73 64 22 2c 20 22 22 29 3b 0a 20 20 40 20  "wsd", "");.  @ 
3d50: 3c 70 3e 41 20 73 75 62 64 69 72 65 63 74 6f 72  <p>A subdirector
3d60: 79 20 69 6e 20 74 68 65 20 66 69 6c 65 20 68 69  y in the file hi
3d70: 65 72 61 72 63 68 79 20 74 68 61 74 20 63 6f 6e  erarchy that con
3d80: 74 61 69 6e 73 20 77 69 6b 69 20 70 61 67 65 73  tains wiki pages
3d90: 2e 0a 20 20 40 20 4c 65 61 76 65 20 74 68 69 73  ..  @ Leave this
3da0: 20 62 6c 61 6e 6b 20 74 6f 20 64 69 73 61 62 6c   blank to disabl
3db0: 65 20 77 69 6b 69 2e 20 20 57 69 6b 69 20 70 61  e wiki.  Wiki pa
3dc0: 67 65 73 20 61 72 65 0a 20 20 40 20 66 69 6c 65  ges are.  @ file
3dd0: 73 20 77 69 74 68 69 6e 20 74 68 69 73 20 73 75  s within this su
3de0: 62 64 69 72 65 63 74 6f 72 79 20 77 68 6f 73 65  bdirectory whose
3df0: 20 6e 61 6d 65 20 69 73 20 68 65 20 77 69 6b 69   name is he wiki
3e00: 20 70 61 67 65 20 74 69 74 6c 65 0a 20 20 40 20   page title.  @ 
3e10: 61 6e 64 20 77 69 74 68 20 74 68 65 20 73 75 66  and with the suf
3e20: 66 69 78 20 22 2e 77 69 6b 69 22 2e 3c 2f 70 3e  fix ".wiki".</p>
3e30: 0a 0a 20 20 20 0a 20 20 40 20 3c 68 72 3e 0a 20  ..   .  @ <hr>. 
3e40: 20 40 20 3c 70 3e 3c 69 6e 70 75 74 20 74 79 70   @ <p><input typ
3e50: 65 3d 22 73 75 62 6d 69 74 22 20 20 6e 61 6d 65  e="submit"  name
3e60: 3d 22 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d  ="submit" value=
3e70: 22 41 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e  "Apply Changes">
3e80: 3c 2f 70 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e  </p>.  @ </form>
3e90: 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61  .  db_end_transa
3ea0: 63 74 69 6f 6e 28 30 29 3b 0a 20 20 73 74 79 6c  ction(0);.  styl
3eb0: 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a        e_footer();.}.