Hex Artifact Content
Not logged in

Artifact 570fc89ab703596f3d681728d919e3139edb6305:

File src/setup.c part of check-in [916b6e4b3b] - Improvements to web-based user management. by drh on 2007-07-21 19:32: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 64 6c 20 69 64 3d  ();..  @ <dl id=
0690: 22 73 65 74 75 70 22 3e 0a 20 20 6d 65 6e 75 5f  "setup">.  menu_
06a0: 65 6e 74 72 79 28 22 55 73 65 72 73 22 2c 20 22  entry("Users", "
06b0: 73 65 74 75 70 5f 75 6c 69 73 74 22 2c 0a 20 20  setup_ulist",.  
06c0: 20 20 22 47 72 61 6e 74 20 70 72 69 76 69 6c 65    "Grant privile
06d0: 67 65 73 20 74 6f 20 69 6e 64 69 76 69 64 75 61  ges to individua
06e0: 6c 20 75 73 65 72 73 2e 22 29 3b 0a 20 20 6d 65  l users.");.  me
06f0: 6e 75 5f 65 6e 74 72 79 28 22 41 63 63 65 73 73  nu_entry("Access
0700: 22 2c 20 22 73 65 74 75 70 5f 61 63 63 65 73 73  ", "setup_access
0710: 22 2c 0a 20 20 20 20 22 43 6f 6e 74 72 6f 6c 20  ",.    "Control 
0720: 61 63 63 65 73 73 20 73 65 74 74 69 6e 67 73 2e  access settings.
0730: 22 29 3b 0a 20 20 40 20 3c 2f 64 6c 3e 0a 0a 20  ");.  @ </dl>.. 
0740: 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b   style_footer();
0750: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47  .}../*.** WEBPAG
0760: 45 3a 20 73 65 74 75 70 5f 75 6c 69 73 74 0a 2a  E: setup_ulist.*
0770: 2a 0a 2a 2a 20 53 68 6f 77 20 61 20 6c 69 73 74  *.** Show a list
0780: 20 6f 66 20 75 73 65 72 73 2e 20 20 43 6c 69 63   of users.  Clic
0790: 6b 69 6e 67 20 6f 6e 20 61 6e 79 20 75 73 65 72  king on any user
07a0: 20 6a 75 6d 70 73 20 74 6f 20 74 68 65 20 65 64   jumps to the ed
07b0: 69 74 0a 2a 2a 20 73 63 72 65 65 6e 20 66 6f 72  it.** screen for
07c0: 20 74 68 61 74 20 75 73 65 72 2e 0a 2a 2f 0a 76   that user..*/.v
07d0: 6f 69 64 20 73 65 74 75 70 5f 75 6c 69 73 74 28  oid setup_ulist(
07e0: 76 6f 69 64 29 7b 0a 20 20 53 74 6d 74 20 73 3b  void){.  Stmt s;
07f0: 0a 20 20 0a 20 20 73 74 79 6c 65 5f 66 6f 6f 74  .  .  style_foot
0800: 65 72 28 29 3b 0a 20 20 6c 6f 67 69 6e 5f 63 68  er();.  login_ch
0810: 65 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28  eck_credentials(
0820: 29 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b 57 72  );.  if( !g.okWr
0830: 69 74 65 20 7c 7c 20 67 2e 69 73 41 6e 6f 6e 20  ite || g.isAnon 
0840: 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e 65 65  ){.    login_nee
0850: 64 65 64 28 29 3b 0a 20 20 20 20 72 65 74 75 72  ded();.    retur
0860: 6e 3b 0a 20 20 7d 0a 0a 20 20 73 74 79 6c 65 5f  n;.  }..  style_
0870: 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e 74 28  submenu_element(
0880: 22 41 64 64 22 2c 20 22 41 64 64 20 55 73 65 72  "Add", "Add User
0890: 22 2c 20 22 73 65 74 75 70 5f 75 65 64 69 74 22  ", "setup_uedit"
08a0: 29 3b 0a 20 20 73 74 79 6c 65 5f 68 65 61 64 65  );.  style_heade
08b0: 72 28 29 3b 0a 20 20 40 20 3c 68 32 3e 4c 69 73  r();.  @ <h2>Lis
08c0: 74 20 4f 66 20 55 73 65 72 73 3c 2f 68 32 3e 0a  t Of Users</h2>.
08d0: 20 20 40 20 3c 74 61 62 6c 65 20 63 65 6c 6c 73    @ <table cells
08e0: 70 61 63 69 6e 67 3d 30 20 63 65 6c 6c 70 61 64  pacing=0 cellpad
08f0: 64 69 6e 67 3d 30 20 62 6f 72 64 65 72 3d 30 3e  ding=0 border=0>
0900: 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20 20 20  .  @ <tr>.  @   
0910: 3c 74 68 20 61 6c 69 67 6e 3d 22 72 69 67 68 74  <th align="right
0920: 22 3e 3c 6e 6f 62 72 3e 55 73 65 72 20 49 44 3c  "><nobr>User ID<
0930: 2f 6e 6f 62 72 3e 3c 2f 74 68 3e 0a 20 20 40 20  /nobr></th>.  @ 
0940: 20 20 3c 74 68 3e 26 6e 62 73 70 3b 26 6e 62 73    <th>&nbsp;&nbs
0950: 70 3b 26 6e 62 73 70 3b 43 61 70 61 62 69 6c 69  p;&nbsp;Capabili
0960: 74 69 65 73 26 6e 62 73 70 3b 26 6e 62 73 70 3b  ties&nbsp;&nbsp;
0970: 26 6e 62 73 70 3b 3c 2f 74 68 3e 0a 20 20 40 20  &nbsp;</th>.  @ 
0980: 20 20 3c 74 68 3e 3c 6e 6f 62 72 3e 43 6f 6e 74    <th><nobr>Cont
0990: 61 63 74 20 49 6e 66 6f 3c 2f 6e 6f 62 72 3e 3c  act Info</nobr><
09a0: 2f 74 68 3e 0a 20 20 40 20 3c 2f 74 72 3e 0a 20  /th>.  @ </tr>. 
09b0: 20 64 62 5f 70 72 65 70 61 72 65 28 26 73 2c 20   db_prepare(&s, 
09c0: 22 53 45 4c 45 43 54 20 75 69 64 2c 20 6c 6f 67  "SELECT uid, log
09d0: 69 6e 2c 20 63 61 70 2c 20 69 6e 66 6f 20 46 52  in, cap, info FR
09e0: 4f 4d 20 75 73 65 72 20 4f 52 44 45 52 20 42 59  OM user ORDER BY
09f0: 20 6c 6f 67 69 6e 22 29 3b 0a 20 20 77 68 69 6c   login");.  whil
0a00: 65 28 20 64 62 5f 73 74 65 70 28 26 73 29 3d 3d  e( db_step(&s)==
0a10: 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20  SQLITE_ROW ){.  
0a20: 20 20 40 20 3c 74 72 3e 0a 20 20 20 20 40 20 3c    @ <tr>.    @ <
0a30: 74 64 20 61 6c 69 67 6e 3d 22 72 69 67 68 74 22  td align="right"
0a40: 3e 0a 20 20 20 20 69 66 28 20 67 2e 6f 6b 41 64  >.    if( g.okAd
0a50: 6d 69 6e 20 29 7b 0a 20 20 20 20 20 20 40 20 3c  min ){.      @ <
0a60: 61 20 68 72 65 66 3d 22 73 65 74 75 70 5f 75 65  a href="setup_ue
0a70: 64 69 74 3f 69 64 3d 25 64 28 64 62 5f 63 6f 6c  dit?id=%d(db_col
0a80: 75 6d 6e 5f 69 6e 74 28 26 73 2c 30 29 29 22 3e  umn_int(&s,0))">
0a90: 0a 20 20 20 20 7d 0a 20 20 20 20 40 20 3c 6e 6f  .    }.    @ <no
0aa0: 62 72 3e 25 68 28 64 62 5f 63 6f 6c 75 6d 6e 5f  br>%h(db_column_
0ab0: 74 65 78 74 28 26 73 2c 31 29 29 3c 2f 6e 6f 62  text(&s,1))</nob
0ac0: 72 3e 0a 20 20 20 20 69 66 28 20 67 2e 6f 6b 41  r>.    if( g.okA
0ad0: 64 6d 69 6e 20 29 7b 0a 20 20 20 20 20 20 40 20  dmin ){.      @ 
0ae0: 3c 2f 61 3e 0a 20 20 20 20 7d 0a 20 20 20 20 40  </a>.    }.    @
0af0: 20 3c 2f 74 64 3e 0a 20 20 20 20 40 20 3c 74 64   </td>.    @ <td
0b00: 20 61 6c 69 67 6e 3d 22 63 65 6e 74 65 72 22 3e   align="center">
0b10: 25 73 28 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78  %s(db_column_tex
0b20: 74 28 26 73 2c 32 29 29 3c 2f 74 64 3e 0a 20 20  t(&s,2))</td>.  
0b30: 20 20 40 20 3c 74 64 20 61 6c 69 67 6e 3d 22 63    @ <td align="c
0b40: 65 6e 74 65 72 22 3e 25 73 28 64 62 5f 63 6f 6c  enter">%s(db_col
0b50: 75 6d 6e 5f 74 65 78 74 28 26 73 2c 33 29 29 3c  umn_text(&s,3))<
0b60: 2f 74 64 3e 0a 20 20 20 20 40 20 3c 2f 74 72 3e  /td>.    @ </tr>
0b70: 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 61 62 6c 65  .  }.  @ </table
0b80: 3e 0a 20 20 40 20 3c 70 3e 3c 68 72 3e 0a 20 20  >.  @ <p><hr>.  
0b90: 40 20 3c 62 3e 4e 6f 74 65 73 3a 3c 2f 62 3e 0a  @ <b>Notes:</b>.
0ba0: 20 20 40 20 3c 6f 6c 3e 0a 20 20 40 20 3c 6c 69    @ <ol>.  @ <li
0bb0: 3e 3c 70 3e 54 68 65 20 70 65 72 6d 69 73 73 69  ><p>The permissi
0bc0: 6f 6e 20 66 6c 61 67 73 20 61 72 65 20 61 73 20  on flags are as 
0bd0: 66 6f 6c 6c 6f 77 73 3a 3c 2f 70 3e 0a 20 20 40  follows:</p>.  @
0be0: 20 3c 74 61 62 6c 65 3e 0a 20 20 40 20 3c 74 72   <table>.  @ <tr
0bf0: 3e 3c 74 64 3e 61 3c 2f 74 64 3e 3c 74 64 20 77  ><td>a</td><td w
0c00: 69 64 74 68 3d 22 31 30 22 3e 3c 2f 74 64 3e 0a  idth="10"></td>.
0c10: 20 20 40 20 20 20 20 20 3c 74 64 3e 41 64 6d 69    @     <td>Admi
0c20: 6e 3a 20 43 72 65 61 74 65 20 6f 72 20 64 65 6c  n: Create or del
0c30: 65 74 65 20 75 73 65 72 73 20 61 6e 64 20 74 69  ete users and ti
0c40: 63 6b 65 74 20 72 65 70 6f 72 74 20 66 6f 72 6d  cket report form
0c50: 61 74 73 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 20 20  ats</td></tr>.  
0c60: 40 20 3c 74 72 3e 3c 74 64 3e 64 3c 2f 74 64 3e  @ <tr><td>d</td>
0c70: 3c 74 64 3e 3c 2f 74 64 3e 0a 20 20 40 20 20 20  <td></td>.  @   
0c80: 20 20 3c 74 64 3e 44 65 6c 65 74 65 3a 20 45 72    <td>Delete: Er
0c90: 61 73 65 20 61 6e 6f 6e 79 6d 6f 75 73 20 77 69  ase anonymous wi
0ca0: 6b 69 2c 20 74 69 63 6b 65 74 73 2c 20 61 6e 64  ki, tickets, and
0cb0: 20 61 74 74 61 63 68 6d 65 6e 74 73 3c 2f 74 64   attachments</td
0cc0: 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e 3c  ></tr>.  @ <tr><
0cd0: 74 64 3e 69 3c 2f 74 64 3e 3c 74 64 3e 3c 2f 74  td>i</td><td></t
0ce0: 64 3e 0a 20 20 40 20 20 20 20 20 3c 74 64 3e 43  d>.  @     <td>C
0cf0: 68 65 63 6b 2d 69 6e 3a 20 41 64 64 20 6e 65 77  heck-in: Add new
0d00: 20 63 6f 64 65 20 74 6f 20 74 68 65 20 72 65 70   code to the rep
0d10: 6f 73 69 74 6f 72 79 3c 2f 74 64 3e 3c 2f 74 72  ository</td></tr
0d20: 3e 0a 20 20 40 20 3c 74 72 3e 3c 74 64 3e 6a 3c  >.  @ <tr><td>j<
0d30: 2f 74 64 3e 3c 74 64 3e 3c 2f 74 64 3e 3c 74 64  /td><td></td><td
0d40: 3e 52 65 61 64 2d 57 69 6b 69 3a 20 56 69 65 77  >Read-Wiki: View
0d50: 20 77 69 6b 69 20 70 61 67 65 73 3c 2f 74 64 3e   wiki pages</td>
0d60: 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e 3c 74  </tr>.  @ <tr><t
0d70: 64 3e 6b 3c 2f 74 64 3e 3c 74 64 3e 3c 2f 74 64  d>k</td><td></td
0d80: 3e 3c 74 64 3e 57 69 6b 69 3a 20 43 72 65 61 74  ><td>Wiki: Creat
0d90: 65 20 6f 72 20 6d 6f 64 69 66 79 20 77 69 6b 69  e or modify wiki
0da0: 20 70 61 67 65 73 3c 2f 74 64 3e 3c 2f 74 72 3e   pages</td></tr>
0db0: 0a 20 20 40 20 3c 74 72 3e 3c 74 64 3e 6e 3c 2f  .  @ <tr><td>n</
0dc0: 74 64 3e 3c 74 64 3e 3c 2f 74 64 3e 3c 74 64 3e  td><td></td><td>
0dd0: 4e 65 77 3a 20 43 72 65 61 74 65 20 6e 65 77 20  New: Create new 
0de0: 74 69 63 6b 65 74 73 3c 2f 74 64 3e 3c 2f 74 72  tickets</td></tr
0df0: 3e 0a 20 20 40 20 3c 74 72 3e 3c 74 64 3e 6f 3c  >.  @ <tr><td>o<
0e00: 2f 74 64 3e 3c 74 64 3e 3c 2f 74 64 3e 0a 20 20  /td><td></td>.  
0e10: 40 20 20 20 20 20 3c 74 64 3e 43 68 65 63 6b 2d  @     <td>Check-
0e20: 6f 75 74 3a 20 52 65 61 64 20 63 6f 64 65 20 6f  out: Read code o
0e30: 75 74 20 6f 66 20 74 68 65 20 72 65 70 6f 73 69  ut of the reposi
0e40: 74 6f 72 79 3c 2f 74 64 3e 3c 2f 74 72 3e 0a 20  tory</td></tr>. 
0e50: 20 40 20 3c 74 72 3e 3c 74 64 3e 70 3c 2f 74 64   @ <tr><td>p</td
0e60: 3e 3c 74 64 3e 3c 2f 74 64 3e 3c 74 64 3e 50 61  ><td></td><td>Pa
0e70: 73 73 77 6f 72 64 3a 20 43 68 61 6e 67 65 20 70  ssword: Change p
0e80: 61 73 73 77 6f 72 64 3c 2f 74 64 3e 3c 2f 74 72  assword</td></tr
0e90: 3e 0a 20 20 40 20 3c 74 72 3e 3c 74 64 3e 71 3c  >.  @ <tr><td>q<
0ea0: 2f 74 64 3e 3c 74 64 3e 3c 2f 74 64 3e 3c 74 64  /td><td></td><td
0eb0: 3e 51 75 65 72 79 3a 20 43 72 65 61 74 65 20 6f  >Query: Create o
0ec0: 72 20 65 64 69 74 20 72 65 70 6f 72 74 20 66 6f  r edit report fo
0ed0: 72 6d 61 74 73 3c 2f 74 64 3e 3c 2f 74 72 3e 0a  rmats</td></tr>.
0ee0: 20 20 40 20 3c 74 72 3e 3c 74 64 3e 72 3c 2f 74    @ <tr><td>r</t
0ef0: 64 3e 3c 74 64 3e 3c 2f 74 64 3e 3c 74 64 3e 52  d><td></td><td>R
0f00: 65 61 64 3a 20 56 69 65 77 20 74 69 63 6b 65 74  ead: View ticket
0f10: 73 20 61 6e 64 20 63 68 61 6e 67 65 20 68 69 73  s and change his
0f20: 74 6f 72 69 65 73 3c 2f 74 64 3e 3c 2f 74 72 3e  tories</td></tr>
0f30: 0a 20 20 40 20 3c 74 72 3e 3c 74 64 3e 73 3c 2f  .  @ <tr><td>s</
0f40: 74 64 3e 3c 74 64 3e 3c 2f 74 64 3e 3c 74 64 3e  td><td></td><td>
0f50: 53 65 74 75 70 3a 20 43 68 61 6e 67 65 20 43 56  Setup: Change CV
0f60: 53 54 72 61 63 20 6f 70 74 69 6f 6e 73 3c 2f 74  STrac options</t
0f70: 64 3e 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e  d></tr>.  @ <tr>
0f80: 3c 74 64 3e 77 3c 2f 74 64 3e 3c 74 64 3e 3c 2f  <td>w</td><td></
0f90: 74 64 3e 3c 74 64 3e 57 72 69 74 65 3a 20 45 64  td><td>Write: Ed
0fa0: 69 74 20 74 69 63 6b 65 74 73 3c 2f 74 64 3e 3c  it tickets</td><
0fb0: 2f 74 72 3e 0a 20 20 40 20 3c 2f 74 61 62 6c 65  /tr>.  @ </table
0fc0: 3e 0a 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a  >.  @ </p></li>.
0fd0: 20 20 40 0a 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a    @.  @ <li><p>.
0fe0: 20 20 40 20 49 66 20 61 20 75 73 65 72 20 6e 61    @ If a user na
0ff0: 6d 65 64 20 22 3c 62 3e 61 6e 6f 6e 79 6d 6f 75  med "<b>anonymou
1000: 73 3c 2f 62 3e 22 20 65 78 69 73 74 73 2c 20 74  s</b>" exists, t
1010: 68 65 6e 20 61 6e 79 6f 6e 65 20 63 61 6e 20 61  hen anyone can a
1020: 63 63 65 73 73 0a 20 20 40 20 74 68 65 20 73 65  ccess.  @ the se
1030: 72 76 65 72 20 77 69 74 68 6f 75 74 20 68 61 76  rver without hav
1040: 69 6e 67 20 74 6f 20 6c 6f 67 20 69 6e 2e 20 20  ing to log in.  
1050: 54 68 65 20 70 65 72 6d 69 73 73 69 6f 6e 73 20  The permissions 
1060: 6f 6e 20 74 68 65 0a 20 20 40 20 61 6e 6f 6e 79  on the.  @ anony
1070: 6d 6f 75 73 20 75 73 65 72 20 64 65 74 65 72 6d  mous user determ
1080: 69 6e 65 20 74 68 65 20 61 63 63 65 73 73 20 72  ine the access r
1090: 69 67 68 74 73 20 66 6f 72 20 61 6e 79 6f 6e 65  ights for anyone
10a0: 20 77 68 6f 20 69 73 20 6e 6f 74 0a 20 20 40 20   who is not.  @ 
10b0: 6c 6f 67 67 65 64 20 69 6e 2e 0a 20 20 40 20 3c  logged in..  @ <
10c0: 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20 40  /p></li>.  @.  @
10d0: 20 3c 2f 6f 6c 3e 0a 20 20 73 74 79 6c 65 5f 66   </ol>.  style_f
10e0: 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  ooter();.}../*.*
10f0: 2a 20 57 45 42 50 41 47 45 3a 20 2f 73 65 74 75  * WEBPAGE: /setu
1100: 70 5f 75 65 64 69 74 0a 2a 2f 0a 76 6f 69 64 20  p_uedit.*/.void 
1110: 75 73 65 72 5f 65 64 69 74 28 76 6f 69 64 29 7b  user_edit(void){
1120: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
1130: 49 64 2c 20 2a 7a 4c 6f 67 69 6e 2c 20 2a 7a 49  Id, *zLogin, *zI
1140: 6e 66 6f 2c 20 2a 7a 43 61 70 3b 0a 20 20 63 68  nfo, *zCap;.  ch
1150: 61 72 20 2a 6f 61 61 2c 20 2a 6f 61 73 2c 20 2a  ar *oaa, *oas, *
1160: 6f 61 72 2c 20 2a 6f 61 77 2c 20 2a 6f 61 6e 2c  oar, *oaw, *oan,
1170: 20 2a 6f 61 69 2c 20 2a 6f 61 6a 2c 20 2a 6f 61   *oai, *oaj, *oa
1180: 6f 2c 20 2a 6f 61 70 20 3b 0a 20 20 63 68 61 72  o, *oap ;.  char
1190: 20 2a 6f 61 6b 2c 20 2a 6f 61 64 2c 20 2a 6f 61   *oak, *oad, *oa
11a0: 71 3b 0a 20 20 69 6e 74 20 64 6f 57 72 69 74 65  q;.  int doWrite
11b0: 3b 0a 20 20 69 6e 74 20 75 69 64 3b 0a 20 20 69  ;.  int uid;.  i
11c0: 6e 74 20 68 69 67 68 65 72 55 73 65 72 20 3d 20  nt higherUser = 
11d0: 30 3b 20 20 2f 2a 20 54 72 75 65 20 69 66 20 75  0;  /* True if u
11e0: 73 65 72 20 62 65 69 6e 67 20 65 64 69 74 65 64  ser being edited
11f0: 20 69 73 20 53 45 54 55 50 20 61 6e 64 20 74 68   is SETUP and th
1200: 65 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 20  e */.           
1210: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 75              /* u
1220: 73 65 72 20 64 6f 69 6e 67 20 74 68 65 20 65 64  ser doing the ed
1230: 69 74 69 6e 67 20 69 73 20 41 44 4d 49 4e 2e 20  iting is ADMIN. 
1240: 20 44 69 73 61 6c 6c 6f 77 20 65 64 69 74 69 6e   Disallow editin
1250: 67 20 2a 2f 0a 0a 20 20 2f 2a 20 4d 75 73 74 20  g */..  /* Must 
1260: 68 61 76 65 20 41 44 4d 49 4e 20 70 72 69 76 6c  have ADMIN privl
1270: 65 67 65 73 20 74 6f 20 61 63 63 65 73 73 20 74  eges to access t
1280: 68 69 73 20 70 61 67 65 0a 20 20 2a 2f 0a 20 20  his page.  */.  
1290: 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 64  login_check_cred
12a0: 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 28  entials();.  if(
12b0: 20 21 67 2e 6f 6b 41 64 6d 69 6e 20 29 7b 20 6c   !g.okAdmin ){ l
12c0: 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29 3b 20 72  ogin_needed(); r
12d0: 65 74 75 72 6e 3b 20 7d 0a 0a 20 20 2f 2a 20 43  eturn; }..  /* C
12e0: 68 65 63 6b 20 74 6f 20 73 65 65 20 69 66 20 61  heck to see if a
12f0: 6e 20 41 44 4d 49 4e 20 75 73 65 72 20 69 73 20  n ADMIN user is 
1300: 74 72 79 69 6e 67 20 74 6f 20 65 64 69 74 20 61  trying to edit a
1310: 20 53 45 54 55 50 20 61 63 63 6f 75 6e 74 2e 0a   SETUP account..
1320: 20 20 2a 2a 20 44 6f 6e 27 74 20 61 6c 6c 6f 77    ** Don't allow
1330: 20 74 68 61 74 2e 0a 20 20 2a 2f 0a 20 20 7a 49   that..  */.  zI
1340: 64 20 3d 20 50 44 28 22 69 64 22 2c 20 22 30 22  d = PD("id", "0"
1350: 29 3b 0a 20 20 75 69 64 20 3d 20 61 74 6f 69 28  );.  uid = atoi(
1360: 7a 49 64 29 3b 0a 20 20 69 66 28 20 7a 49 64 20  zId);.  if( zId 
1370: 26 26 20 21 67 2e 6f 6b 53 65 74 75 70 20 26 26  && !g.okSetup &&
1380: 20 75 69 64 3e 30 20 29 7b 0a 20 20 20 20 63 68   uid>0 ){.    ch
1390: 61 72 20 2a 7a 4f 6c 64 43 61 70 73 3b 0a 20 20  ar *zOldCaps;.  
13a0: 20 20 7a 4f 6c 64 43 61 70 73 20 3d 20 64 62 5f    zOldCaps = db_
13b0: 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 54 20  text(0, "SELECT 
13c0: 63 61 70 73 20 46 52 4f 4d 20 75 73 65 72 20 57  caps FROM user W
13d0: 48 45 52 45 20 75 69 64 3d 25 64 22 2c 75 69 64  HERE uid=%d",uid
13e0: 29 3b 0a 20 20 20 20 68 69 67 68 65 72 55 73 65  );.    higherUse
13f0: 72 20 3d 20 7a 4f 6c 64 43 61 70 73 20 26 26 20  r = zOldCaps && 
1400: 73 74 72 63 68 72 28 7a 4f 6c 64 43 61 70 73 2c  strchr(zOldCaps,
1410: 27 73 27 29 3b 0a 20 20 7d 0a 0a 20 20 69 66 28  's');.  }..  if(
1420: 20 50 28 22 63 61 6e 22 29 20 29 7b 0a 20 20 20   P("can") ){.   
1430: 20 63 67 69 5f 72 65 64 69 72 65 63 74 28 22 73   cgi_redirect("s
1440: 65 74 75 70 5f 75 6c 69 73 74 22 29 3b 0a 20 20  etup_ulist");.  
1450: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 0a 20    return;.  }.. 
1460: 20 2f 2a 20 49 66 20 77 65 20 68 61 76 65 20 61   /* If we have a
1470: 6c 6c 20 74 68 65 20 6e 65 63 65 73 73 61 72 79  ll the necessary
1480: 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2c 20 77 72   information, wr
1490: 69 74 65 20 74 68 65 20 6e 65 77 20 6f 72 0a 20  ite the new or. 
14a0: 20 2a 2a 20 6d 6f 64 69 66 69 65 64 20 75 73 65   ** modified use
14b0: 72 20 72 65 63 6f 72 64 2e 20 20 41 66 74 65 72  r record.  After
14c0: 20 77 72 69 74 69 6e 67 20 74 68 65 20 75 73 65   writing the use
14d0: 72 20 72 65 63 6f 72 64 2c 20 72 65 64 69 72 65  r record, redire
14e0: 63 74 0a 20 20 2a 2a 20 74 6f 20 74 68 65 20 70  ct.  ** to the p
14f0: 61 67 65 20 74 68 61 74 20 64 69 73 70 6c 61 79  age that display
1500: 73 20 61 20 6c 69 73 74 20 6f 66 20 75 73 65 72  s a list of user
1510: 73 2e 0a 20 20 2a 2f 0a 20 20 64 6f 57 72 69 74  s..  */.  doWrit
1520: 65 20 3d 20 63 67 69 5f 61 6c 6c 28 22 6c 6f 67  e = cgi_all("log
1530: 69 6e 22 2c 22 69 6e 66 6f 22 2c 22 70 77 22 29  in","info","pw")
1540: 20 26 26 20 21 68 69 67 68 65 72 55 73 65 72 3b   && !higherUser;
1550: 0a 20 20 69 66 28 20 64 6f 57 72 69 74 65 20 29  .  if( doWrite )
1560: 7b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72  {.    const char
1570: 20 2a 7a 50 77 3b 0a 20 20 20 20 63 6f 6e 73 74   *zPw;.    const
1580: 20 63 68 61 72 20 2a 7a 4c 6f 67 69 6e 3b 0a 20   char *zLogin;. 
1590: 20 20 20 63 68 61 72 20 7a 43 61 70 5b 32 30 5d     char zCap[20]
15a0: 3b 0a 20 20 20 20 69 6e 74 20 69 20 3d 20 30 3b  ;.    int i = 0;
15b0: 0a 20 20 20 20 69 6e 74 20 61 61 20 3d 20 50 28  .    int aa = P(
15c0: 22 61 61 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e  "aa")!=0;.    in
15d0: 74 20 61 64 20 3d 20 50 28 22 61 64 22 29 21 3d  t ad = P("ad")!=
15e0: 30 3b 0a 20 20 20 20 69 6e 74 20 61 69 20 3d 20  0;.    int ai = 
15f0: 50 28 22 61 69 22 29 21 3d 30 3b 0a 20 20 20 20  P("ai")!=0;.    
1600: 69 6e 74 20 61 6a 20 3d 20 50 28 22 61 6a 22 29  int aj = P("aj")
1610: 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61 6b 20  !=0;.    int ak 
1620: 3d 20 50 28 22 61 6b 22 29 21 3d 30 3b 0a 20 20  = P("ak")!=0;.  
1630: 20 20 69 6e 74 20 61 6e 20 3d 20 50 28 22 61 6e    int an = P("an
1640: 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74 20 61  ")!=0;.    int a
1650: 6f 20 3d 20 50 28 22 61 6f 22 29 21 3d 30 3b 0a  o = P("ao")!=0;.
1660: 20 20 20 20 69 6e 74 20 61 70 20 3d 20 50 28 22      int ap = P("
1670: 61 70 22 29 21 3d 30 3b 0a 20 20 20 20 69 6e 74  ap")!=0;.    int
1680: 20 61 71 20 3d 20 50 28 22 61 71 22 29 21 3d 30   aq = P("aq")!=0
1690: 3b 0a 20 20 20 20 69 6e 74 20 61 72 20 3d 20 50  ;.    int ar = P
16a0: 28 22 61 72 22 29 21 3d 30 3b 0a 20 20 20 20 69  ("ar")!=0;.    i
16b0: 6e 74 20 61 73 20 3d 20 67 2e 6f 6b 53 65 74 75  nt as = g.okSetu
16c0: 70 20 26 26 20 50 28 22 61 73 22 29 21 3d 30 3b  p && P("as")!=0;
16d0: 0a 20 20 20 20 69 6e 74 20 61 77 20 3d 20 50 28  .    int aw = P(
16e0: 22 61 77 22 29 21 3d 30 3b 0a 20 20 20 20 69 66  "aw")!=0;.    if
16f0: 28 20 61 73 20 29 20 61 61 20 3d 20 31 3b 0a 20  ( as ) aa = 1;. 
1700: 20 20 20 69 66 28 20 61 61 20 29 20 61 69 20 3d     if( aa ) ai =
1710: 20 61 77 20 3d 20 61 70 20 3d 20 31 3b 0a 20 20   aw = ap = 1;.  
1720: 20 20 69 66 28 20 61 77 20 29 20 61 6e 20 3d 20    if( aw ) an = 
1730: 61 72 20 3d 20 31 3b 0a 20 20 20 20 69 66 28 20  ar = 1;.    if( 
1740: 61 69 20 29 20 61 6f 20 3d 20 31 3b 0a 20 20 20  ai ) ao = 1;.   
1750: 20 69 66 28 20 61 6b 20 29 20 61 6a 20 3d 20 31   if( ak ) aj = 1
1760: 3b 0a 20 20 20 20 69 66 28 20 61 61 20 29 7b 20  ;.    if( aa ){ 
1770: 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 61 27 3b  zCap[i++] = 'a';
1780: 20 7d 0a 20 20 20 20 69 66 28 20 61 64 20 29 7b   }.    if( ad ){
1790: 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 64 27   zCap[i++] = 'd'
17a0: 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 69 20 29  ; }.    if( ai )
17b0: 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27 69  { zCap[i++] = 'i
17c0: 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 6a 20  '; }.    if( aj 
17d0: 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20 27  ){ zCap[i++] = '
17e0: 6a 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61 6b  j'; }.    if( ak
17f0: 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d 20   ){ zCap[i++] = 
1800: 27 6b 27 3b 20 7d 0a 20 20 20 20 69 66 28 20 61  'k'; }.    if( a
1810: 6e 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20 3d  n ){ zCap[i++] =
1820: 20 27 6e 27 3b 20 7d 0a 20 20 20 20 69 66 28 20   'n'; }.    if( 
1830: 61 6f 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d 20  ao ){ zCap[i++] 
1840: 3d 20 27 6f 27 3b 20 7d 0a 20 20 20 20 69 66 28  = 'o'; }.    if(
1850: 20 61 70 20 29 7b 20 7a 43 61 70 5b 69 2b 2b 5d   ap ){ zCap[i++]
1860: 20 3d 20 27 70 27 3b 20 7d 0a 20 20 20 20 69 66   = 'p'; }.    if
1870: 28 20 61 71 20 29 7b 20 7a 43 61 70 5b 69 2b 2b  ( aq ){ zCap[i++
1880: 5d 20 3d 20 27 71 27 3b 20 7d 0a 20 20 20 20 69  ] = 'q'; }.    i
1890: 66 28 20 61 72 20 29 7b 20 7a 43 61 70 5b 69 2b  f( ar ){ zCap[i+
18a0: 2b 5d 20 3d 20 27 72 27 3b 20 7d 0a 20 20 20 20  +] = 'r'; }.    
18b0: 69 66 28 20 61 73 20 29 7b 20 7a 43 61 70 5b 69  if( as ){ zCap[i
18c0: 2b 2b 5d 20 3d 20 27 73 27 3b 20 7d 0a 20 20 20  ++] = 's'; }.   
18d0: 20 69 66 28 20 61 77 20 29 7b 20 7a 43 61 70 5b   if( aw ){ zCap[
18e0: 69 2b 2b 5d 20 3d 20 27 77 27 3b 20 7d 0a 0a 20  i++] = 'w'; }.. 
18f0: 20 20 20 7a 43 61 70 5b 69 5d 20 3d 20 30 3b 0a     zCap[i] = 0;.
1900: 20 20 20 20 7a 50 77 20 3d 20 50 28 22 70 77 22      zPw = P("pw"
1910: 29 3b 0a 20 20 20 20 69 66 28 20 7a 50 77 3d 3d  );.    if( zPw==
1920: 30 20 7c 7c 20 7a 50 77 5b 30 5d 3d 3d 30 20 29  0 || zPw[0]==0 )
1930: 7b 0a 20 20 20 20 20 20 7a 50 77 20 3d 20 64 62  {.      zPw = db
1940: 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 54  _text(0, "SELECT
1950: 20 70 77 20 46 52 4f 4d 20 75 73 65 72 20 57 48   pw FROM user WH
1960: 45 52 45 20 75 69 64 3d 25 64 22 2c 20 75 69 64  ERE uid=%d", uid
1970: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 4c 6f  );.    }.    zLo
1980: 67 69 6e 20 3d 20 50 28 22 6c 6f 67 69 6e 22 29  gin = P("login")
1990: 3b 0a 20 20 20 20 69 66 28 20 75 69 64 3e 30 20  ;.    if( uid>0 
19a0: 26 26 20 0a 20 20 20 20 20 20 20 20 64 62 5f 65  && .        db_e
19b0: 78 69 73 74 73 28 22 53 45 4c 45 43 54 20 31 20  xists("SELECT 1 
19c0: 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52 45 20  FROM user WHERE 
19d0: 6c 6f 67 69 6e 3d 25 51 20 41 4e 44 20 75 69 64  login=%Q AND uid
19e0: 21 3d 25 64 22 2c 20 7a 4c 6f 67 69 6e 2c 20 75  !=%d", zLogin, u
19f0: 69 64 29 0a 20 20 20 20 29 7b 0a 20 20 20 20 20  id).    ){.     
1a00: 20 73 74 79 6c 65 5f 68 65 61 64 65 72 28 29 3b   style_header();
1a10: 0a 20 20 20 20 20 20 40 20 3c 66 6f 6e 74 20 63  .      @ <font c
1a20: 6f 6c 6f 72 3d 22 72 65 64 22 3e 4c 6f 67 69 6e  olor="red">Login
1a30: 20 22 25 68 28 7a 4c 6f 67 69 6e 29 22 20 69 73   "%h(zLogin)" is
1a40: 20 61 6c 72 65 61 64 79 20 75 73 65 64 20 62 79   already used by
1a50: 20 61 20 64 69 66 66 65 72 65 6e 74 0a 20 20 20   a different.   
1a60: 20 20 20 40 20 75 73 65 72 2e 3c 2f 66 6f 6e 74     @ user.</font
1a70: 3e 0a 20 20 20 20 20 20 40 0a 20 20 20 20 20 20  >.      @.      
1a80: 40 20 3c 70 3e 3c 61 20 68 72 65 66 3d 22 73 65  @ <p><a href="se
1a90: 74 75 70 5f 75 65 64 69 74 3f 69 64 3d 25 64 28  tup_uedit?id=%d(
1aa0: 75 69 64 29 29 3e 5b 42 75 6d 6d 65 72 5d 3c 2f  uid))>[Bummer]</
1ab0: 61 3e 3c 2f 70 3e 0a 20 20 20 20 20 20 73 74 79  a></p>.      sty
1ac0: 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 20 20 20  le_footer();.   
1ad0: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d     return;.    }
1ae0: 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78  .    db_multi_ex
1af0: 65 63 28 0a 20 20 20 20 20 20 20 22 52 45 50 4c  ec(.       "REPL
1b00: 41 43 45 20 49 4e 54 4f 20 75 73 65 72 28 75 69  ACE INTO user(ui
1b10: 64 2c 6c 6f 67 69 6e 2c 69 6e 66 6f 2c 70 77 2c  d,login,info,pw,
1b20: 63 61 70 29 20 22 0a 20 20 20 20 20 20 20 22 56  cap) ".       "V
1b30: 41 4c 55 45 53 28 6e 75 6c 6c 69 66 28 25 64 2c  ALUES(nullif(%d,
1b40: 30 29 2c 25 51 2c 25 51 2c 25 51 2c 27 25 73 27  0),%Q,%Q,%Q,'%s'
1b50: 29 22 2c 0a 20 20 20 20 20 20 75 69 64 2c 20 50  )",.      uid, P
1b60: 28 22 6c 6f 67 69 6e 22 29 2c 20 50 28 22 69 6e  ("login"), P("in
1b70: 66 6f 22 29 2c 20 7a 50 77 2c 20 7a 43 61 70 0a  fo"), zPw, zCap.
1b80: 20 20 20 20 29 3b 0a 20 20 20 20 63 67 69 5f 72      );.    cgi_r
1b90: 65 64 69 72 65 63 74 28 22 73 65 74 75 70 5f 75  edirect("setup_u
1ba0: 6c 69 73 74 22 29 3b 0a 20 20 20 20 72 65 74 75  list");.    retu
1bb0: 72 6e 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 4c 6f  rn;.  }..  /* Lo
1bc0: 61 64 20 74 68 65 20 65 78 69 73 74 69 6e 67 20  ad the existing 
1bd0: 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75  information abou
1be0: 74 20 74 68 65 20 75 73 65 72 2c 20 69 66 20 61  t the user, if a
1bf0: 6e 79 0a 20 20 2a 2f 0a 20 20 7a 4c 6f 67 69 6e  ny.  */.  zLogin
1c00: 20 3d 20 22 22 3b 0a 20 20 7a 49 6e 66 6f 20 3d   = "";.  zInfo =
1c10: 20 22 22 3b 0a 20 20 7a 43 61 70 20 3d 20 22 22   "";.  zCap = ""
1c20: 3b 0a 20 20 6f 61 61 20 3d 20 6f 61 64 20 3d 20  ;.  oaa = oad = 
1c30: 6f 61 69 20 3d 20 6f 61 6a 20 3d 20 6f 61 6b 20  oai = oaj = oak 
1c40: 3d 20 6f 61 6e 20 3d 20 6f 61 6f 20 3d 20 6f 61  = oan = oao = oa
1c50: 70 20 3d 20 6f 61 71 20 3d 20 6f 61 72 20 3d 20  p = oaq = oar = 
1c60: 6f 61 73 20 3d 20 6f 61 77 20 3d 20 22 22 3b 0a  oas = oaw = "";.
1c70: 20 20 69 66 28 20 75 69 64 20 29 7b 0a 20 20 20    if( uid ){.   
1c80: 20 7a 4c 6f 67 69 6e 20 3d 20 64 62 5f 74 65 78   zLogin = db_tex
1c90: 74 28 22 22 2c 20 22 53 45 4c 45 43 54 20 6c 6f  t("", "SELECT lo
1ca0: 67 69 6e 20 46 52 4f 4d 20 75 73 65 72 20 57 48  gin FROM user WH
1cb0: 45 52 45 20 75 69 64 3d 25 64 22 2c 20 75 69 64  ERE uid=%d", uid
1cc0: 29 3b 0a 20 20 20 20 7a 49 6e 66 6f 20 3d 20 64  );.    zInfo = d
1cd0: 62 5f 74 65 78 74 28 22 22 2c 20 22 53 45 4c 45  b_text("", "SELE
1ce0: 43 54 20 69 6e 66 6f 20 46 52 4f 4d 20 75 73 65  CT info FROM use
1cf0: 72 20 57 48 45 52 45 20 75 69 64 3d 25 64 22 2c  r WHERE uid=%d",
1d00: 20 75 69 64 29 3b 0a 20 20 20 20 7a 43 61 70 20   uid);.    zCap 
1d10: 3d 20 64 62 5f 74 65 78 74 28 22 22 2c 20 22 53  = db_text("", "S
1d20: 45 4c 45 43 54 20 63 61 70 20 46 52 4f 4d 20 75  ELECT cap FROM u
1d30: 73 65 72 20 57 48 45 52 45 20 75 69 64 3d 25 64  ser WHERE uid=%d
1d40: 22 2c 20 75 69 64 29 3b 0a 20 20 20 20 69 66 28  ", uid);.    if(
1d50: 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 61   strchr(zCap, 'a
1d60: 27 29 20 29 20 6f 61 61 20 3d 20 22 20 63 68 65  ') ) oaa = " che
1d70: 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73  cked";.    if( s
1d80: 74 72 63 68 72 28 7a 43 61 70 2c 20 27 64 27 29  trchr(zCap, 'd')
1d90: 20 29 20 6f 61 64 20 3d 20 22 20 63 68 65 63 6b   ) oad = " check
1da0: 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72  ed";.    if( str
1db0: 63 68 72 28 7a 43 61 70 2c 20 27 69 27 29 20 29  chr(zCap, 'i') )
1dc0: 20 6f 61 69 20 3d 20 22 20 63 68 65 63 6b 65 64   oai = " checked
1dd0: 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68  ";.    if( strch
1de0: 72 28 7a 43 61 70 2c 20 27 6a 27 29 20 29 20 6f  r(zCap, 'j') ) o
1df0: 61 6a 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b  aj = " checked";
1e00: 0a 20 20 20 20 69 66 28 20 73 74 72 63 68 72 28  .    if( strchr(
1e10: 7a 43 61 70 2c 20 27 6b 27 29 20 29 20 6f 61 6b  zCap, 'k') ) oak
1e20: 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20   = " checked";. 
1e30: 20 20 20 69 66 28 20 73 74 72 63 68 72 28 7a 43     if( strchr(zC
1e40: 61 70 2c 20 27 6e 27 29 20 29 20 6f 61 6e 20 3d  ap, 'n') ) oan =
1e50: 20 22 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20   " checked";.   
1e60: 20 69 66 28 20 73 74 72 63 68 72 28 7a 43 61 70   if( strchr(zCap
1e70: 2c 20 27 6f 27 29 20 29 20 6f 61 6f 20 3d 20 22  , 'o') ) oao = "
1e80: 20 63 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69   checked";.    i
1e90: 66 28 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20  f( strchr(zCap, 
1ea0: 27 70 27 29 20 29 20 6f 61 70 20 3d 20 22 20 63  'p') ) oap = " c
1eb0: 68 65 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28  hecked";.    if(
1ec0: 20 73 74 72 63 68 72 28 7a 43 61 70 2c 20 27 71   strchr(zCap, 'q
1ed0: 27 29 20 29 20 6f 61 71 20 3d 20 22 20 63 68 65  ') ) oaq = " che
1ee0: 63 6b 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73  cked";.    if( s
1ef0: 74 72 63 68 72 28 7a 43 61 70 2c 20 27 72 27 29  trchr(zCap, 'r')
1f00: 20 29 20 6f 61 72 20 3d 20 22 20 63 68 65 63 6b   ) oar = " check
1f10: 65 64 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72  ed";.    if( str
1f20: 63 68 72 28 7a 43 61 70 2c 20 27 73 27 29 20 29  chr(zCap, 's') )
1f30: 20 6f 61 73 20 3d 20 22 20 63 68 65 63 6b 65 64   oas = " checked
1f40: 22 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63 68  ";.    if( strch
1f50: 72 28 7a 43 61 70 2c 20 27 77 27 29 20 29 20 6f  r(zCap, 'w') ) o
1f60: 61 77 20 3d 20 22 20 63 68 65 63 6b 65 64 22 3b  aw = " checked";
1f70: 0a 20 20 7d 0a 0a 20 20 2f 2a 20 42 65 67 69 6e  .  }..  /* Begin
1f80: 20 67 65 6e 65 72 61 74 69 6e 67 20 74 68 65 20   generating the 
1f90: 70 61 67 65 0a 20 20 2a 2f 0a 20 20 73 74 79 6c  page.  */.  styl
1fa0: 65 5f 73 75 62 6d 65 6e 75 5f 65 6c 65 6d 65 6e  e_submenu_elemen
1fb0: 74 28 22 43 61 6e 63 65 6c 22 2c 20 22 43 61 6e  t("Cancel", "Can
1fc0: 63 65 6c 22 2c 20 22 73 65 74 75 70 5f 75 6c 69  cel", "setup_uli
1fd0: 73 74 22 29 3b 0a 20 20 73 74 79 6c 65 5f 68 65  st");.  style_he
1fe0: 61 64 65 72 28 29 3b 0a 20 20 69 66 28 20 75 69  ader();.  if( ui
1ff0: 64 20 29 7b 0a 20 20 20 20 40 20 3c 68 32 3e 45  d ){.    @ <h2>E
2000: 64 69 74 20 55 73 65 72 20 25 68 28 7a 4c 6f 67  dit User %h(zLog
2010: 69 6e 29 3c 2f 68 32 3e 0a 20 20 7d 65 6c 73 65  in)</h2>.  }else
2020: 7b 0a 20 20 20 20 40 20 3c 68 32 3e 41 64 64 20  {.    @ <h2>Add 
2030: 41 20 4e 65 77 20 55 73 65 72 3c 2f 68 32 3e 0a  A New User</h2>.
2040: 20 20 7d 0a 20 20 40 20 3c 74 61 62 6c 65 20 61    }.  @ <table a
2050: 6c 69 67 6e 3d 22 6c 65 66 74 22 20 68 73 70 61  lign="left" hspa
2060: 63 65 3d 22 32 30 22 20 76 73 70 61 63 65 3d 22  ce="20" vspace="
2070: 31 30 22 3e 3c 74 72 3e 3c 74 64 3e 0a 20 20 40  10"><tr><td>.  @
2080: 20 3c 66 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25   <form action="%
2090: 73 28 67 2e 7a 50 61 74 68 29 22 20 6d 65 74 68  s(g.zPath)" meth
20a0: 6f 64 3d 22 50 4f 53 54 22 3e 0a 20 20 40 20 3c  od="POST">.  @ <
20b0: 74 61 62 6c 65 3e 0a 20 20 40 20 3c 74 72 3e 0a  table>.  @ <tr>.
20c0: 20 20 40 20 20 20 3c 74 64 20 61 6c 69 67 6e 3d    @   <td align=
20d0: 22 72 69 67 68 74 22 3e 3c 6e 6f 62 72 3e 55 73  "right"><nobr>Us
20e0: 65 72 20 49 44 3a 3c 2f 6e 6f 62 72 3e 3c 2f 74  er ID:</nobr></t
20f0: 64 3e 0a 20 20 69 66 28 20 75 69 64 20 29 7b 0a  d>.  if( uid ){.
2100: 20 20 20 20 40 20 20 20 3c 74 64 3e 25 64 28 75      @   <td>%d(u
2110: 69 64 29 20 3c 69 6e 70 75 74 20 74 79 70 65 3d  id) <input type=
2120: 22 68 69 64 64 65 6e 22 20 6e 61 6d 65 3d 22 69  "hidden" name="i
2130: 64 22 20 76 61 6c 75 65 3d 22 25 64 28 75 69 64  d" value="%d(uid
2140: 29 22 3e 3c 2f 74 64 3e 0a 20 20 7d 65 6c 73 65  )"></td>.  }else
2150: 7b 0a 20 20 20 20 40 20 20 20 3c 74 64 3e 28 6e  {.    @   <td>(n
2160: 65 77 20 75 73 65 72 29 3c 69 6e 70 75 74 20 74  ew user)<input t
2170: 79 70 65 3d 22 68 69 64 64 65 6e 22 20 6e 61 6d  ype="hidden" nam
2180: 65 3d 22 69 64 22 20 76 61 6c 75 65 3d 30 3e 3c  e="id" value=0><
2190: 2f 74 64 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f 74  /td>.  }.  @ </t
21a0: 72 3e 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20  r>.  @ <tr>.  @ 
21b0: 20 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69 67    <td align="rig
21c0: 68 74 22 3e 3c 6e 6f 62 72 3e 4c 6f 67 69 6e 3a  ht"><nobr>Login:
21d0: 3c 2f 6e 6f 62 72 3e 3c 2f 74 64 3e 0a 20 20 40  </nobr></td>.  @
21e0: 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74 20 74 79     <td><input ty
21f0: 70 65 3d 22 74 65 78 74 22 20 6e 61 6d 65 3d 22  pe="text" name="
2200: 6c 6f 67 69 6e 22 20 76 61 6c 75 65 3d 22 25 68  login" value="%h
2210: 28 7a 4c 6f 67 69 6e 29 22 3e 3c 2f 74 64 3e 0a  (zLogin)"></td>.
2220: 20 20 40 20 3c 2f 74 72 3e 0a 20 20 40 20 3c 74    @ </tr>.  @ <t
2230: 72 3e 0a 20 20 40 20 20 20 3c 74 64 20 61 6c 69  r>.  @   <td ali
2240: 67 6e 3d 22 72 69 67 68 74 22 3e 3c 6e 6f 62 72  gn="right"><nobr
2250: 3e 43 6f 6e 74 61 63 74 26 6e 62 73 70 3b 49 6e  >Contact&nbsp;In
2260: 66 6f 3a 3c 2f 6e 6f 62 72 3e 3c 2f 74 64 3e 0a  fo:</nobr></td>.
2270: 20 20 40 20 20 20 3c 74 64 3e 3c 69 6e 70 75 74    @   <td><input
2280: 20 74 79 70 65 3d 22 74 65 78 74 22 20 6e 61 6d   type="text" nam
2290: 65 3d 22 69 6e 66 6f 22 20 73 69 7a 65 3d 34 30  e="info" size=40
22a0: 20 76 61 6c 75 65 3d 22 25 68 28 7a 49 6e 66 6f   value="%h(zInfo
22b0: 29 22 3e 3c 2f 74 64 3e 0a 20 20 40 20 3c 2f 74  )"></td>.  @ </t
22c0: 72 3e 0a 20 20 40 20 3c 74 72 3e 0a 20 20 40 20  r>.  @ <tr>.  @ 
22d0: 20 20 3c 74 64 20 61 6c 69 67 6e 3d 22 72 69 67    <td align="rig
22e0: 68 74 22 20 76 61 6c 69 67 6e 3d 22 74 6f 70 22  ht" valign="top"
22f0: 3e 43 61 70 61 62 69 6c 69 74 69 65 73 3a 3c 2f  >Capabilities:</
2300: 74 64 3e 0a 20 20 40 20 20 20 3c 74 64 3e 0a 20  td>.  @   <td>. 
2310: 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79   @     <input ty
2320: 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61  pe="checkbox" na
2330: 6d 65 3d 22 61 61 22 25 73 28 6f 61 61 29 3e 41  me="aa"%s(oaa)>A
2340: 64 6d 69 6e 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e  dmin</input><br>
2350: 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20  .  @     <input 
2360: 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20  type="checkbox" 
2370: 6e 61 6d 65 3d 22 61 64 22 25 73 28 6f 61 64 29  name="ad"%s(oad)
2380: 3e 44 65 6c 65 74 65 3c 2f 69 6e 70 75 74 3e 3c  >Delete</input><
2390: 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e 70  br>.  @     <inp
23a0: 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f  ut type="checkbo
23b0: 78 22 20 6e 61 6d 65 3d 22 61 69 22 25 73 28 6f  x" name="ai"%s(o
23c0: 61 69 29 3e 43 68 65 63 6b 2d 49 6e 3c 2f 69 6e  ai)>Check-In</in
23d0: 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20  put><br>.  @    
23e0: 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68   <input type="ch
23f0: 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 6a  eckbox" name="aj
2400: 22 25 73 28 6f 61 6a 29 3e 52 65 61 64 20 57 69  "%s(oaj)>Read Wi
2410: 6b 69 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20  ki</input><br>. 
2420: 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79   @     <input ty
2430: 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61  pe="checkbox" na
2440: 6d 65 3d 22 61 6b 22 25 73 28 6f 61 6b 29 3e 57  me="ak"%s(oak)>W
2450: 72 69 74 65 20 57 69 6b 69 3c 2f 69 6e 70 75 74  rite Wiki</input
2460: 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69  ><br>.  @     <i
2470: 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b  nput type="check
2480: 62 6f 78 22 20 6e 61 6d 65 3d 22 61 6e 22 25 73  box" name="an"%s
2490: 28 6f 61 6e 29 3e 4e 65 77 20 54 6b 74 3c 2f 69  (oan)>New Tkt</i
24a0: 6e 70 75 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20  nput><br>.  @   
24b0: 20 20 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 63    <input type="c
24c0: 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61  heckbox" name="a
24d0: 6f 22 25 73 28 6f 61 6f 29 3e 43 68 65 63 6b 2d  o"%s(oao)>Check-
24e0: 4f 75 74 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a  Out</input><br>.
24f0: 20 20 40 20 20 20 20 20 3c 69 6e 70 75 74 20 74    @     <input t
2500: 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e  ype="checkbox" n
2510: 61 6d 65 3d 22 61 70 22 25 73 28 6f 61 70 29 3e  ame="ap"%s(oap)>
2520: 50 61 73 73 77 6f 72 64 3c 2f 69 6e 70 75 74 3e  Password</input>
2530: 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c 69 6e  <br>.  @     <in
2540: 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62  put type="checkb
2550: 6f 78 22 20 6e 61 6d 65 3d 22 61 71 22 25 73 28  ox" name="aq"%s(
2560: 6f 61 71 29 3e 51 75 65 72 79 3c 2f 69 6e 70 75  oaq)>Query</inpu
2570: 74 3e 3c 62 72 3e 0a 20 20 40 20 20 20 20 20 3c  t><br>.  @     <
2580: 69 6e 70 75 74 20 74 79 70 65 3d 22 63 68 65 63  input type="chec
2590: 6b 62 6f 78 22 20 6e 61 6d 65 3d 22 61 72 22 25  kbox" name="ar"%
25a0: 73 28 6f 61 72 29 3e 52 65 61 64 3c 2f 69 6e 70  s(oar)>Read</inp
25b0: 75 74 3e 3c 62 72 3e 0a 20 20 69 66 28 20 67 2e  ut><br>.  if( g.
25c0: 6f 6b 53 65 74 75 70 20 29 7b 0a 20 20 20 20 40  okSetup ){.    @
25d0: 20 20 20 20 20 3c 69 6e 70 75 74 20 74 79 70 65       <input type
25e0: 3d 22 63 68 65 63 6b 62 6f 78 22 20 6e 61 6d 65  ="checkbox" name
25f0: 3d 22 61 73 22 25 73 28 6f 61 73 29 3e 53 65 74  ="as"%s(oas)>Set
2600: 75 70 3c 2f 69 6e 70 75 74 3e 3c 62 72 3e 0a 20  up</input><br>. 
2610: 20 7d 0a 20 20 40 20 20 20 20 20 3c 69 6e 70 75   }.  @     <inpu
2620: 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78  t type="checkbox
2630: 22 20 6e 61 6d 65 3d 22 61 77 22 25 73 28 6f 61  " name="aw"%s(oa
2640: 77 29 3e 57 72 69 74 65 3c 2f 69 6e 70 75 74 3e  w)>Write</input>
2650: 0a 20 20 40 20 20 20 3c 2f 74 64 3e 0a 20 20 40  .  @   </td>.  @
2660: 20 3c 2f 74 72 3e 0a 20 20 40 20 3c 74 72 3e 0a   </tr>.  @ <tr>.
2670: 20 20 40 20 20 20 3c 74 64 20 61 6c 69 67 6e 3d    @   <td align=
2680: 22 72 69 67 68 74 22 3e 50 61 73 73 77 6f 72 64  "right">Password
2690: 3a 3c 2f 74 64 3e 0a 20 20 40 20 20 20 3c 74 64  :</td>.  @   <td
26a0: 3e 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 70 61  ><input type="pa
26b0: 73 73 77 6f 72 64 22 20 6e 61 6d 65 3d 22 70 77  ssword" name="pw
26c0: 22 20 76 61 6c 75 65 3d 22 22 3e 3c 2f 74 64 3e  " value=""></td>
26d0: 0a 20 20 40 20 3c 2f 74 72 3e 0a 20 20 69 66 28  .  @ </tr>.  if(
26e0: 20 21 68 69 67 68 65 72 55 73 65 72 20 29 7b 0a   !higherUser ){.
26f0: 20 20 20 20 40 20 3c 74 72 3e 0a 20 20 20 20 40      @ <tr>.    @
2700: 20 20 20 3c 74 64 3e 26 6e 62 73 70 3c 2f 74 64     <td>&nbsp</td
2710: 3e 0a 20 20 20 20 40 20 20 20 3c 74 64 3e 3c 69  >.    @   <td><i
2720: 6e 70 75 74 20 74 79 70 65 3d 22 73 75 62 6d 69  nput type="submi
2730: 74 22 20 6e 61 6d 65 3d 22 73 75 62 6d 69 74 22  t" name="submit"
2740: 20 76 61 6c 75 65 3d 22 41 70 70 6c 79 20 43 68   value="Apply Ch
2750: 61 6e 67 65 73 22 3e 0a 20 20 20 20 40 20 3c 2f  anges">.    @ </
2760: 74 72 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 61  tr>.  }.  @ </ta
2770: 62 6c 65 3e 3c 2f 74 64 3e 3c 2f 74 72 3e 3c 2f  ble></td></tr></
2780: 74 61 62 6c 65 3e 0a 20 20 40 20 3c 70 3e 3c 62  table>.  @ <p><b
2790: 3e 4e 6f 74 65 73 3a 3c 2f 62 3e 3c 2f 70 3e 0a  >Notes:</b></p>.
27a0: 20 20 40 20 3c 6f 6c 3e 0a 20 20 69 66 28 20 68    @ <ol>.  if( h
27b0: 69 67 68 65 72 55 73 65 72 20 29 7b 0a 20 20 20  igherUser ){.   
27c0: 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 20 20 40   @ <li><p>.    @
27d0: 20 55 73 65 72 20 25 68 28 7a 49 64 29 20 68 61   User %h(zId) ha
27e0: 73 20 53 65 74 75 70 20 70 72 69 76 69 6c 65 67  s Setup privileg
27f0: 65 73 20 61 6e 64 20 79 6f 75 20 6f 6e 6c 79 20  es and you only 
2800: 68 61 76 65 20 41 64 6d 69 6e 20 70 72 69 76 69  have Admin privi
2810: 6c 65 67 65 73 0a 20 20 20 20 40 20 73 6f 20 79  leges.    @ so y
2820: 6f 75 20 61 72 65 20 6e 6f 74 20 70 65 72 6d 69  ou are not permi
2830: 74 74 65 64 20 74 6f 20 6d 61 6b 65 20 63 68 61  tted to make cha
2840: 6e 67 65 73 20 74 6f 20 25 68 28 7a 49 64 29 2e  nges to %h(zId).
2850: 0a 20 20 20 20 40 20 3c 2f 70 3e 3c 2f 6c 69 3e  .    @ </p></li>
2860: 0a 20 20 20 20 40 0a 20 20 7d 0a 20 20 40 20 3c  .    @.  }.  @ <
2870: 6c 69 3e 3c 70 3e 0a 20 20 40 20 54 68 65 20 3c  li><p>.  @ The <
2880: 62 3e 52 65 61 64 3c 2f 62 3e 20 61 6e 64 20 3c  b>Read</b> and <
2890: 62 3e 57 72 69 74 65 3c 2f 62 3e 20 70 72 69 76  b>Write</b> priv
28a0: 69 6c 65 67 65 73 20 67 69 76 65 20 74 68 65 20  ileges give the 
28b0: 75 73 65 72 20 74 68 65 20 61 62 69 6c 69 74 79  user the ability
28c0: 0a 20 20 40 20 74 6f 20 72 65 61 64 20 61 6e 64  .  @ to read and
28d0: 20 77 72 69 74 65 20 74 69 63 6b 65 74 73 2e 20   write tickets. 
28e0: 20 54 68 65 20 3c 62 3e 4e 65 77 20 54 6b 74 3c   The <b>New Tkt<
28f0: 2f 62 3e 20 63 61 70 61 62 69 6c 69 74 79 20 6d  /b> capability m
2900: 65 61 6e 73 20 74 68 61 74 0a 20 20 40 20 74 68  eans that.  @ th
2910: 65 20 75 73 65 72 20 69 73 20 61 62 6c 65 20 74  e user is able t
2920: 6f 20 63 72 65 61 74 65 20 6e 65 77 20 74 69 63  o create new tic
2930: 6b 65 74 73 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f  kets..  @ </p></
2940: 6c 69 3e 0a 20 20 40 0a 20 20 40 20 3c 6c 69 3e  li>.  @.  @ <li>
2950: 3c 70 3e 0a 20 20 40 20 54 68 65 20 3c 62 3e 44  <p>.  @ The <b>D
2960: 65 6c 65 74 65 3c 2f 62 3e 20 70 72 69 76 69 6c  elete</b> privil
2970: 65 67 65 20 67 69 76 65 20 74 68 65 20 75 73 65  ege give the use
2980: 72 20 74 68 65 20 61 62 69 6c 69 74 79 20 74 6f  r the ability to
2990: 20 65 72 61 73 65 0a 20 20 40 20 77 69 6b 69 2c   erase.  @ wiki,
29a0: 20 74 69 63 6b 65 74 73 2c 20 61 6e 64 20 61 74   tickets, and at
29b0: 74 74 61 63 68 6d 65 6e 74 73 20 74 68 61 74 20  ttachments that 
29c0: 68 61 76 65 20 62 65 65 6e 20 61 64 64 65 64 20  have been added 
29d0: 62 79 20 61 6e 6f 6e 79 6d 6f 75 73 0a 20 20 40  by anonymous.  @
29e0: 20 75 73 65 72 73 2e 20 20 54 68 69 73 20 63 61   users.  This ca
29f0: 70 61 62 69 6c 69 74 79 20 69 73 20 69 6e 74 65  pability is inte
2a00: 6e 64 65 64 20 66 6f 72 20 64 65 6c 65 74 69 6f  nded for deletio
2a10: 6e 20 6f 66 20 73 70 61 6d 2e 0a 20 20 40 20 3c  n of spam..  @ <
2a20: 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a 20 20 40  /p></li>.  @.  @
2a30: 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20 54 68 65   <li><p>.  @ The
2a40: 20 3c 62 3e 51 75 65 72 79 3c 2f 62 3e 20 70 72   <b>Query</b> pr
2a50: 69 76 69 6c 65 67 65 20 61 6c 6c 6f 77 73 20 74  ivilege allows t
2a60: 68 65 20 75 73 65 72 20 74 6f 20 63 72 65 61 74  he user to creat
2a70: 65 20 6f 72 20 65 64 69 74 0a 20 20 40 20 72 65  e or edit.  @ re
2a80: 70 6f 72 74 20 66 6f 72 6d 61 74 73 20 62 79 20  port formats by 
2a90: 73 70 65 63 69 66 79 69 6e 67 20 61 70 70 72 6f  specifying appro
2aa0: 70 72 69 61 74 65 20 53 51 4c 2e 20 20 55 73 65  priate SQL.  Use
2ab0: 72 73 20 63 61 6e 20 72 75 6e 20 0a 20 20 40 20  rs can run .  @ 
2ac0: 65 78 69 73 74 69 6e 67 20 72 65 70 6f 72 74 73  existing reports
2ad0: 20 77 69 74 68 6f 75 74 20 74 68 65 20 51 75 65   without the Que
2ae0: 72 79 20 70 72 69 76 69 6c 65 67 65 2e 0a 20 20  ry privilege..  
2af0: 40 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 40 0a  @ </p></li>.  @.
2b00: 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 40 20    @ <li><p>.  @ 
2b10: 41 6e 20 3c 62 3e 41 64 6d 69 6e 3c 2f 62 3e 20  An <b>Admin</b> 
2b20: 75 73 65 72 20 63 61 6e 20 61 64 64 20 6f 74 68  user can add oth
2b30: 65 72 20 75 73 65 72 73 2c 20 63 72 65 61 74 65  er users, create
2b40: 20 6e 65 77 20 74 69 63 6b 65 74 20 72 65 70 6f   new ticket repo
2b50: 72 74 0a 20 20 40 20 66 6f 72 6d 61 74 73 2c 20  rt.  @ formats, 
2b60: 61 6e 64 20 63 68 61 6e 67 65 20 73 79 73 74 65  and change syste
2b70: 6d 20 64 65 66 61 75 6c 74 73 2e 20 20 42 75 74  m defaults.  But
2b80: 20 6f 6e 6c 79 20 74 68 65 20 3c 62 3e 53 65 74   only the <b>Set
2b90: 75 70 3c 2f 62 3e 20 75 73 65 72 0a 20 20 40 20  up</b> user.  @ 
2ba0: 69 73 20 61 62 6c 65 20 74 6f 20 63 68 61 6e 67  is able to chang
2bb0: 65 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79  e the repository
2bc0: 20 74 6f 0a 20 20 40 20 77 68 69 63 68 20 74 68   to.  @ which th
2bd0: 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 6c 69  is program is li
2be0: 6e 6b 65 64 2e 0a 20 20 40 20 3c 2f 70 3e 3c 2f  nked..  @ </p></
2bf0: 6c 69 3e 0a 20 20 40 0a 20 20 69 66 28 20 7a 49  li>.  @.  if( zI
2c00: 64 3d 3d 30 20 7c 7c 20 73 74 72 63 6d 70 28 7a  d==0 || strcmp(z
2c10: 49 64 2c 22 61 6e 6f 6e 79 6d 6f 75 73 22 29 3d  Id,"anonymous")=
2c20: 3d 30 20 29 7b 0a 20 20 20 20 40 20 3c 6c 69 3e  =0 ){.    @ <li>
2c30: 3c 70 3e 0a 20 20 20 20 40 20 4e 6f 20 6c 6f 67  <p>.    @ No log
2c40: 69 6e 20 69 73 20 72 65 71 75 69 72 65 64 20 66  in is required f
2c50: 6f 72 20 75 73 65 72 20 22 3c 62 3e 61 6e 6f 6e  or user "<b>anon
2c60: 79 6d 6f 75 73 3c 2f 62 3e 22 2e 20 20 54 68 65  ymous</b>".  The
2c70: 20 63 61 70 61 62 69 6c 69 74 69 65 73 0a 20 20   capabilities.  
2c80: 20 20 40 20 6f 66 20 74 68 69 73 20 75 73 65 72    @ of this user
2c90: 20 61 72 65 20 61 76 61 69 6c 61 62 6c 65 20 74   are available t
2ca0: 6f 20 61 6e 79 6f 6e 65 20 77 69 74 68 6f 75 74  o anyone without
2cb0: 20 73 75 70 70 6c 79 69 6e 67 20 61 20 75 73 65   supplying a use
2cc0: 72 6e 61 6d 65 20 6f 72 0a 20 20 20 20 40 20 70  rname or.    @ p
2cd0: 61 73 73 77 6f 72 64 2e 20 20 54 6f 20 64 69 73  assword.  To dis
2ce0: 61 62 6c 65 20 61 6e 6f 6e 79 6d 6f 75 73 20 61  able anonymous a
2cf0: 63 63 65 73 73 2c 20 6d 61 6b 65 20 73 75 72 65  ccess, make sure
2d00: 20 74 68 65 72 65 20 69 73 20 6e 6f 20 75 73 65   there is no use
2d10: 72 0a 20 20 20 20 40 20 77 69 74 68 20 61 6e 20  r.    @ with an 
2d20: 49 44 20 6f 66 20 3c 62 3e 61 6e 6f 6e 79 6d 6f  ID of <b>anonymo
2d30: 75 73 3c 2f 62 3e 2e 0a 20 20 20 20 40 20 3c 2f  us</b>..    @ </
2d40: 70 3e 3c 2f 6c 69 3e 0a 20 20 20 20 40 0a 20 20  p></li>.    @.  
2d50: 20 20 40 20 3c 6c 69 3e 3c 70 3e 0a 20 20 20 20    @ <li><p>.    
2d60: 40 20 54 68 65 20 70 61 73 73 77 6f 72 64 20 66  @ The password f
2d70: 6f 72 20 74 68 65 20 22 3c 62 3e 61 6e 6f 6e 79  or the "<b>anony
2d80: 6d 6f 75 73 3c 2f 62 3e 22 20 75 73 65 72 20 69  mous</b>" user i
2d90: 73 20 75 73 65 64 20 66 6f 72 20 61 6e 6f 6e 79  s used for anony
2da0: 6d 6f 75 73 0a 20 20 20 20 40 20 61 63 63 65 73  mous.    @ acces
2db0: 73 2e 20 20 54 68 65 20 72 65 63 6f 6d 6d 65 6e  s.  The recommen
2dc0: 64 65 64 20 76 61 6c 75 65 20 66 6f 72 20 74 68  ded value for th
2dd0: 65 20 61 6e 6f 6e 79 6d 6f 75 73 20 70 61 73 73  e anonymous pass
2de0: 77 6f 72 64 0a 20 20 20 20 40 20 69 73 20 22 61  word.    @ is "a
2df0: 6e 6f 6e 79 6d 6f 75 73 22 2e 0a 20 20 20 20 40  nonymous"..    @
2e00: 20 3c 2f 70 3e 3c 2f 6c 69 3e 0a 20 20 7d 0a 20   </p></li>.  }. 
2e10: 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20 20 73 74 79   @ </form>.  sty
2e20: 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a  le_footer();.}..
2e30: 0a 2f 2a 0a 2a 2a 20 47 65 6e 65 72 61 74 65 20  ./*.** Generate 
2e40: 61 20 63 68 65 63 6b 62 6f 78 20 66 6f 72 20 61  a checkbox for a
2e50: 6e 20 61 74 74 72 69 62 75 74 65 2e 0a 2a 2f 0a  n attribute..*/.
2e60: 73 74 61 74 69 63 20 76 6f 69 64 20 6f 6e 6f 66  static void onof
2e70: 66 5f 61 74 74 72 69 62 75 74 65 28 0a 20 20 63  f_attribute(.  c
2e80: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 61 62 65  onst char *zLabe
2e90: 6c 2c 20 20 20 2f 2a 20 54 68 65 20 74 65 78 74  l,   /* The text
2ea0: 20 6c 61 62 65 6c 20 6f 6e 20 74 68 65 20 63 68   label on the ch
2eb0: 65 63 6b 62 6f 78 20 2a 2f 0a 20 20 63 6f 6e 73  eckbox */.  cons
2ec0: 74 20 63 68 61 72 20 2a 7a 56 61 72 2c 20 20 20  t char *zVar,   
2ed0: 20 20 2f 2a 20 54 68 65 20 63 6f 72 72 65 73 70    /* The corresp
2ee0: 6f 6e 64 69 6e 67 20 72 6f 77 20 69 6e 20 74 68  onding row in th
2ef0: 65 20 56 41 52 20 74 61 62 6c 65 20 2a 2f 0a 20  e VAR table */. 
2f00: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 51 50   const char *zQP
2f10: 61 72 6d 2c 20 20 20 2f 2a 20 54 68 65 20 71 75  arm,   /* The qu
2f20: 65 72 79 20 70 61 72 61 6d 65 74 65 72 20 2a 2f  ery parameter */
2f30: 0a 20 20 69 6e 74 20 64 66 6c 74 56 61 6c 20 20  .  int dfltVal  
2f40: 20 20 20 20 20 20 20 20 20 2f 2a 20 44 65 66 61           /* Defa
2f50: 75 6c 74 20 76 61 6c 75 65 20 69 66 20 56 41 52  ult value if VAR
2f60: 20 74 61 62 6c 65 20 65 6e 74 72 79 20 64 6f 65   table entry doe
2f70: 73 20 6e 6f 74 20 65 78 69 73 74 20 2a 2f 0a 29  s not exist */.)
2f80: 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  {.  const char *
2f90: 7a 56 61 6c 20 3d 20 64 62 5f 67 65 74 28 7a 56  zVal = db_get(zV
2fa0: 61 72 2c 20 30 29 3b 0a 20 20 63 6f 6e 73 74 20  ar, 0);.  const 
2fb0: 63 68 61 72 20 2a 7a 51 20 3d 20 50 28 7a 51 50  char *zQ = P(zQP
2fc0: 61 72 6d 29 3b 0a 20 20 69 6e 74 20 69 56 61 6c  arm);.  int iVal
2fd0: 3b 0a 20 20 69 66 28 20 7a 56 61 6c 20 29 7b 0a  ;.  if( zVal ){.
2fe0: 20 20 20 20 69 56 61 6c 20 3d 20 61 74 6f 69 28      iVal = atoi(
2ff0: 7a 56 61 6c 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  zVal);.  }else{.
3000: 20 20 20 20 69 56 61 6c 20 3d 20 64 66 6c 74 56      iVal = dfltV
3010: 61 6c 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 51  al;.  }.  if( zQ
3020: 3d 3d 30 20 26 26 20 50 28 22 73 75 62 6d 69 74  ==0 && P("submit
3030: 22 29 20 29 7b 0a 20 20 20 20 7a 51 20 3d 20 22  ") ){.    zQ = "
3040: 6f 66 66 22 3b 0a 20 20 7d 0a 20 20 69 66 28 20  off";.  }.  if( 
3050: 7a 51 20 29 7b 0a 20 20 20 20 69 6e 74 20 69 51  zQ ){.    int iQ
3060: 20 3d 20 73 74 72 63 6d 70 28 7a 51 2c 22 6f 6e   = strcmp(zQ,"on
3070: 22 29 3d 3d 30 20 7c 7c 20 61 74 6f 69 28 7a 51  ")==0 || atoi(zQ
3080: 29 3b 0a 20 20 20 20 69 66 28 20 69 51 21 3d 69  );.    if( iQ!=i
3090: 56 61 6c 20 29 7b 0a 20 20 20 20 20 20 64 62 5f  Val ){.      db_
30a0: 73 65 74 28 7a 56 61 72 2c 20 69 51 20 3f 20 22  set(zVar, iQ ? "
30b0: 31 22 20 3a 20 22 30 22 29 3b 0a 20 20 20 20 20  1" : "0");.     
30c0: 20 69 56 61 6c 20 3d 20 69 51 3b 0a 20 20 20 20   iVal = iQ;.    
30d0: 7d 0a 20 20 7d 0a 20 20 69 66 28 20 69 56 61 6c  }.  }.  if( iVal
30e0: 20 29 7b 0a 20 20 20 20 40 20 3c 69 6e 70 75 74   ){.    @ <input
30f0: 20 74 79 70 65 3d 22 63 68 65 63 6b 62 6f 78 22   type="checkbox"
3100: 20 6e 61 6d 65 3d 22 25 73 28 7a 51 50 61 72 6d   name="%s(zQParm
3110: 29 22 20 63 68 65 63 6b 65 64 3e 25 73 28 7a 4c  )" checked>%s(zL
3120: 61 62 65 6c 29 3c 2f 69 6e 70 75 74 3e 0a 20 20  abel)</input>.  
3130: 7d 65 6c 73 65 7b 0a 20 20 20 20 40 20 3c 69 6e  }else{.    @ <in
3140: 70 75 74 20 74 79 70 65 3d 22 63 68 65 63 6b 62  put type="checkb
3150: 6f 78 22 20 6e 61 6d 65 3d 22 25 73 28 7a 51 50  ox" name="%s(zQP
3160: 61 72 6d 29 22 3e 25 73 28 7a 4c 61 62 65 6c 29  arm)">%s(zLabel)
3170: 3c 2f 69 6e 70 75 74 3e 0a 20 20 7d 0a 7d 0a 0a  </input>.  }.}..
3180: 2f 2a 0a 2a 2a 20 47 65 6e 65 72 61 74 65 20 61  /*.** Generate a
3190: 6e 20 65 6e 74 72 79 20 62 6f 78 20 66 6f 72 20  n entry box for 
31a0: 61 6e 20 61 74 74 72 69 62 75 74 65 2e 0a 2a 2f  an attribute..*/
31b0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 65 6e 74  .static void ent
31c0: 72 79 5f 61 74 74 72 69 62 75 74 65 28 0a 20 20  ry_attribute(.  
31d0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 61 62  const char *zLab
31e0: 65 6c 2c 20 20 20 2f 2a 20 54 68 65 20 74 65 78  el,   /* The tex
31f0: 74 20 6c 61 62 65 6c 20 6f 6e 20 74 68 65 20 65  t label on the e
3200: 6e 74 72 79 20 62 6f 78 20 2a 2f 0a 20 20 69 6e  ntry box */.  in
3210: 74 20 77 69 64 74 68 2c 20 20 20 20 20 20 20 20  t width,        
3220: 20 20 20 20 2f 2a 20 57 69 64 74 68 20 6f 66 20      /* Width of 
3230: 74 68 65 20 65 6e 74 72 79 20 62 6f 78 20 2a 2f  the entry box */
3240: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
3250: 56 61 72 2c 20 20 20 20 20 2f 2a 20 54 68 65 20  Var,     /* The 
3260: 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 72 6f  corresponding ro
3270: 77 20 69 6e 20 74 68 65 20 56 41 52 20 74 61 62  w in the VAR tab
3280: 6c 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68  le */.  const ch
3290: 61 72 20 2a 7a 51 50 61 72 6d 2c 20 20 20 2f 2a  ar *zQParm,   /*
32a0: 20 54 68 65 20 71 75 65 72 79 20 70 61 72 61 6d   The query param
32b0: 65 74 65 72 20 2a 2f 0a 20 20 63 6f 6e 73 74 20  eter */.  const 
32c0: 63 68 61 72 20 2a 7a 44 66 6c 74 20 20 20 20 20  char *zDflt     
32d0: 2f 2a 20 44 65 66 61 75 6c 74 20 76 61 6c 75 65  /* Default value
32e0: 20 69 66 20 56 41 52 20 74 61 62 6c 65 20 65 6e   if VAR table en
32f0: 74 72 79 20 64 6f 65 73 20 6e 6f 74 20 65 78 69  try does not exi
3300: 73 74 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e 73 74  st */.){.  const
3310: 20 63 68 61 72 20 2a 7a 56 61 6c 20 3d 20 64 62   char *zVal = db
3320: 5f 67 65 74 28 7a 56 61 72 2c 20 7a 44 66 6c 74  _get(zVar, zDflt
3330: 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  );.  const char 
3340: 2a 7a 51 20 3d 20 50 28 7a 51 50 61 72 6d 29 3b  *zQ = P(zQParm);
3350: 0a 20 20 69 66 28 20 7a 51 20 26 26 20 73 74 72  .  if( zQ && str
3360: 63 6d 70 28 7a 51 2c 7a 56 61 6c 29 21 3d 30 20  cmp(zQ,zVal)!=0 
3370: 29 7b 0a 20 20 20 20 64 62 5f 73 65 74 28 7a 56  ){.    db_set(zV
3380: 61 72 2c 20 7a 51 29 3b 0a 20 20 20 20 7a 56 61  ar, zQ);.    zVa
3390: 6c 20 3d 20 7a 51 3b 0a 20 20 7d 0a 20 20 40 20  l = zQ;.  }.  @ 
33a0: 3c 69 6e 70 75 74 20 74 79 70 65 3d 22 74 65 78  <input type="tex
33b0: 74 22 20 6e 61 6d 65 3d 22 25 73 28 7a 51 50 61  t" name="%s(zQPa
33c0: 72 6d 29 22 20 76 61 6c 75 65 3d 22 25 68 28 7a  rm)" value="%h(z
33d0: 56 61 6c 29 22 20 73 69 7a 65 3d 22 25 64 28 77  Val)" size="%d(w
33e0: 69 64 74 68 29 22 3e 0a 20 20 40 20 25 73 28 7a  idth)">.  @ %s(z
33f0: 4c 61 62 65 6c 29 0a 7d 0a 0a 0a 0a 2f 2a 0a 2a  Label).}..../*.*
3400: 2a 20 57 45 42 50 41 47 45 3a 20 73 65 74 75 70  * WEBPAGE: setup
3410: 5f 61 63 63 65 73 73 0a 2a 2f 0a 76 6f 69 64 20  _access.*/.void 
3420: 73 65 74 75 70 5f 61 63 63 65 73 73 28 76 6f 69  setup_access(voi
3430: 64 29 7b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65 63  d){.  login_chec
3440: 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29 3b  k_credentials();
3450: 0a 20 20 69 66 28 20 21 67 2e 6f 6b 53 65 74 75  .  if( !g.okSetu
3460: 70 20 29 7b 0a 20 20 20 20 6c 6f 67 69 6e 5f 6e  p ){.    login_n
3470: 65 65 64 65 64 28 29 3b 0a 20 20 7d 0a 0a 20 20  eeded();.  }..  
3480: 73 74 79 6c 65 5f 68 65 61 64 65 72 28 29 3b 0a  style_header();.
3490: 20 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73    db_begin_trans
34a0: 61 63 74 69 6f 6e 28 29 3b 0a 20 20 40 20 3c 66  action();.  @ <f
34b0: 6f 72 6d 20 61 63 74 69 6f 6e 3d 22 25 73 28 67  orm action="%s(g
34c0: 2e 7a 42 61 73 65 55 52 4c 29 2f 73 65 74 75 70  .zBaseURL)/setup
34d0: 5f 61 63 63 65 73 73 22 20 6d 65 74 68 6f 64 3d  _access" method=
34e0: 22 47 45 54 22 3e 0a 0a 20 20 40 20 3c 68 72 3e  "GET">..  @ <hr>
34f0: 0a 20 20 6f 6e 6f 66 66 5f 61 74 74 72 69 62 75  .  onoff_attribu
3500: 74 65 28 22 52 65 71 75 69 72 65 20 70 61 73 73  te("Require pass
3510: 77 6f 72 64 20 66 6f 72 20 6c 6f 63 61 6c 20 61  word for local a
3520: 63 63 65 73 73 22 2c 0a 20 20 20 20 20 22 61 75  ccess",.     "au
3530: 74 68 65 6e 74 69 63 61 74 65 2d 6c 6f 63 61 6c  thenticate-local
3540: 68 6f 73 74 22 2c 20 22 6c 6f 63 61 6c 61 75 74  host", "localaut
3550: 68 22 2c 20 31 29 3b 0a 20 20 40 20 3c 70 3e 57  h", 1);.  @ <p>W
3560: 68 65 6e 20 65 6e 61 62 6c 65 64 2c 20 74 68 65  hen enabled, the
3570: 20 70 61 73 73 77 6f 72 64 20 73 69 67 6e 2d 69   password sign-i
3580: 6e 20 69 73 20 72 65 71 75 69 72 65 64 20 66 6f  n is required fo
3590: 72 0a 20 20 40 20 77 65 62 20 61 63 63 65 73 73  r.  @ web access
35a0: 20 63 6f 6d 69 6e 67 20 66 72 6f 6d 20 31 32 37   coming from 127
35b0: 2e 30 2e 30 2e 31 2e 20 20 57 68 65 6e 20 64 69  .0.0.1.  When di
35c0: 73 61 62 6c 65 64 2c 20 77 65 62 20 61 63 63 65  sabled, web acce
35d0: 73 73 0a 20 20 40 20 66 72 6f 6d 20 31 32 37 2e  ss.  @ from 127.
35e0: 30 2e 30 2e 31 20 69 73 20 61 6c 6c 6f 77 73 20  0.0.1 is allows 
35f0: 77 69 74 68 6f 75 74 20 61 6e 79 20 6c 6f 67 69  without any logi
3600: 6e 20 2d 20 74 68 65 20 75 73 65 72 20 69 64 20  n - the user id 
3610: 69 73 20 73 65 6c 65 63 74 65 64 0a 20 20 40 20  is selected.  @ 
3620: 66 72 6f 6d 20 74 68 65 20 7e 2f 2e 66 6f 73 73  from the ~/.foss
3630: 69 6c 20 64 61 74 61 62 61 73 65 2e 20 50 61 73  il database. Pas
3640: 73 77 6f 72 64 20 6c 6f 67 69 6e 20 69 73 20 61  sword login is a
3650: 6c 77 61 79 73 20 72 65 71 75 69 72 65 64 0a 20  lways required. 
3660: 20 40 20 66 6f 72 20 69 6e 63 6f 6d 69 6e 67 20   @ for incoming 
3670: 77 65 62 20 63 6f 6e 6e 65 63 74 69 6f 6e 73 20  web connections 
3680: 6f 6e 20 69 6e 74 65 72 6e 65 74 20 61 64 64 72  on internet addr
3690: 65 73 73 65 73 20 6f 74 68 65 72 20 74 68 61 6e  esses other than
36a0: 0a 20 20 40 20 31 32 37 2e 30 2e 30 2e 31 2e 3c  .  @ 127.0.0.1.<
36b0: 2f 70 3e 3c 2f 6c 69 3e 0a 0a 20 20 40 20 3c 68  /p></li>..  @ <h
36c0: 72 3e 0a 20 20 65 6e 74 72 79 5f 61 74 74 72 69  r>.  entry_attri
36d0: 62 75 74 65 28 22 4c 6f 67 69 6e 20 65 78 70 69  bute("Login expi
36e0: 72 61 74 69 6f 6e 20 74 69 6d 65 22 2c 20 36 2c  ration time", 6,
36f0: 20 22 63 6f 6f 6b 69 65 2d 65 78 70 69 72 65 22   "cookie-expire"
3700: 2c 20 22 63 65 78 22 2c 20 22 38 37 36 36 22 29  , "cex", "8766")
3710: 3b 0a 20 20 40 20 3c 70 3e 54 68 65 20 6e 75 6d  ;.  @ <p>The num
3720: 62 65 72 20 6f 66 20 68 6f 75 72 73 20 66 6f 72  ber of hours for
3730: 20 77 68 69 63 68 20 61 20 6c 6f 67 69 6e 20 69   which a login i
3740: 73 20 76 61 6c 69 64 2e 20 20 54 68 69 73 20 6d  s valid.  This m
3750: 75 73 74 20 62 65 20 61 0a 20 20 40 20 70 6f 73  ust be a.  @ pos
3760: 69 74 69 76 65 20 6e 75 6d 62 65 72 2e 20 20 54  itive number.  T
3770: 68 65 20 64 65 66 61 75 6c 74 20 69 73 20 38 37  he default is 87
3780: 36 30 20 68 6f 75 72 73 20 77 68 69 63 68 20 69  60 hours which i
3790: 73 20 61 70 70 72 6f 78 69 6d 61 74 65 6c 79 20  s approximately 
37a0: 65 71 75 61 6c 0a 20 20 40 20 74 6f 20 61 20 79  equal.  @ to a y
37b0: 65 61 72 2e 3c 2f 70 3e 0a 20 20 20 0a 20 20 40  ear.</p>.   .  @
37c0: 20 3c 68 72 3e 0a 20 20 6f 6e 6f 66 66 5f 61 74   <hr>.  onoff_at
37d0: 74 72 69 62 75 74 65 28 22 41 6c 6c 6f 77 20 61  tribute("Allow a
37e0: 6e 6f 6e 79 6d 6f 75 73 20 73 69 67 6e 75 70 22  nonymous signup"
37f0: 2c 20 22 61 6e 6f 6e 2d 73 69 67 6e 75 70 22 2c  , "anon-signup",
3800: 20 22 61 73 75 22 2c 20 30 29 3b 0a 20 20 40 20   "asu", 0);.  @ 
3810: 3c 70 3e 41 6c 6c 6f 77 20 75 73 65 72 73 20 74  <p>Allow users t
3820: 6f 20 63 72 65 61 74 65 20 74 68 65 69 72 20 6f  o create their o
3830: 77 6e 20 61 63 63 6f 75 6e 74 73 3c 2f 70 3e 0a  wn accounts</p>.
3840: 20 20 20 0a 20 20 40 20 3c 68 72 3e 0a 20 20 40     .  @ <hr>.  @
3850: 20 3c 70 3e 3c 69 6e 70 75 74 20 74 79 70 65 3d   <p><input type=
3860: 22 73 75 62 6d 69 74 22 20 20 6e 61 6d 65 3d 22  "submit"  name="
3870: 73 75 62 6d 69 74 22 20 76 61 6c 75 65 3d 22 41  submit" value="A
3880: 70 70 6c 79 20 43 68 61 6e 67 65 73 22 3e 3c 2f  pply Changes"></
3890: 70 3e 0a 20 20 40 20 3c 2f 66 6f 72 6d 3e 0a 20  p>.  @ </form>. 
38a0: 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74   db_end_transact
38b0: 69 6f 6e 28 30 29 3b 0a 20 20 73 74 79 6c 65 5f  ion(0);.  style_
38c0: 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a              footer();.}.