Fossil

Hex Artifact Content
Login

Artifact e95d20a5be555a92c31c039c4a1ccb75207bdbf5:


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 36 20 44 2e 20 52 69 63 68  (c) 2006 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 53 69 6d 70 6c 69 66 69 65 64 20 42 53 44 20   Simplified BSD 
00a0: 4c 69 63 65 6e 73 65 20 28 61 6c 73 6f 0a 2a 2a  License (also.**
00b0: 20 6b 6e 6f 77 6e 20 61 73 20 74 68 65 20 22 32   known as the "2
00c0: 2d 43 6c 61 75 73 65 20 4c 69 63 65 6e 73 65 22  -Clause License"
00d0: 20 6f 72 20 22 46 72 65 65 42 53 44 20 4c 69 63   or "FreeBSD Lic
00e0: 65 6e 73 65 22 2e 29 0a 0a 2a 2a 20 54 68 69 73  ense".)..** This
00f0: 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74   program is dist
0100: 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68  ributed in the h
0110: 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c  ope that it will
0120: 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20 62   be useful,.** b
0130: 75 74 20 77 69 74 68 6f 75 74 20 61 6e 79 20 77  ut without any w
0140: 61 72 72 61 6e 74 79 3b 20 77 69 74 68 6f 75 74  arranty; without
0150: 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65   even the implie
0160: 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a 2a  d warranty of.**
0170: 20 6d 65 72 63 68 61 6e 74 61 62 69 6c 69 74 79   merchantability
0180: 20 6f 72 20 66 69 74 6e 65 73 73 20 66 6f 72 20   or fitness for 
0190: 61 20 70 61 72 74 69 63 75 6c 61 72 20 70 75 72  a particular pur
01a0: 70 6f 73 65 2e 0a 2a 2a 0a 2a 2a 20 41 75 74 68  pose..**.** Auth
01b0: 6f 72 20 63 6f 6e 74 61 63 74 20 69 6e 66 6f 72  or contact infor
01c0: 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20 20 64 72 68  mation:.**   drh
01d0: 40 68 77 61 63 69 2e 63 6f 6d 0a 2a 2a 20 20 20  @hwaci.com.**   
01e0: 68 74 74 70 3a 2f 2f 77 77 77 2e 68 77 61 63 69  http://www.hwaci
01f0: 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a 0a 2a 2a 2a  .com/drh/.**.***
0200: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0210: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0220: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0230: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0240: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 2a 2a 0a  ************.**.
0250: 2a 2a 20 43 6f 64 65 20 66 6f 72 20 69 6e 74 65  ** Code for inte
0260: 72 66 61 63 69 6e 67 20 74 6f 20 74 68 65 20 76  rfacing to the v
0270: 61 72 69 6f 75 73 20 64 61 74 61 62 61 73 65 73  arious databases
0280: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 61 72  ..**.** There ar
0290: 65 20 74 68 72 65 65 20 73 65 70 61 72 61 74 65  e three separate
02a0: 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 73 20   database files 
02b0: 74 68 61 74 20 66 6f 73 73 69 6c 20 69 6e 74 65  that fossil inte
02c0: 72 61 63 74 73 0a 2a 2a 20 77 69 74 68 3a 0a 2a  racts.** with:.*
02d0: 2a 0a 2a 2a 20 20 20 20 28 31 29 20 20 54 68 65  *.**    (1)  The
02e0: 20 22 75 73 65 72 22 20 64 61 74 61 62 61 73 65   "user" database
02f0: 20 69 6e 20 7e 2f 2e 66 6f 73 73 69 6c 0a 2a 2a   in ~/.fossil.**
0300: 0a 2a 2a 20 20 20 20 28 32 29 20 20 54 68 65 20  .**    (2)  The 
0310: 22 72 65 70 6f 73 69 74 6f 72 79 22 20 64 61 74  "repository" dat
0320: 61 62 61 73 65 0a 2a 2a 0a 2a 2a 20 20 20 20 28  abase.**.**    (
0330: 33 29 20 20 41 20 6c 6f 63 61 6c 20 63 68 65 63  3)  A local chec
0340: 6b 6f 75 74 20 64 61 74 61 62 61 73 65 20 6e 61  kout database na
0350: 6d 65 64 20 22 5f 46 4f 53 53 49 4c 5f 22 20 6f  med "_FOSSIL_" o
0360: 72 20 22 2e 66 6f 73 22 0a 2a 2a 20 20 20 20 20  r ".fos".**     
0370: 20 20 20 20 61 6e 64 20 6c 6f 63 61 74 65 64 20      and located 
0380: 61 74 20 74 68 65 20 72 6f 6f 74 20 6f 66 20 74  at the root of t
0390: 68 65 20 6c 6f 63 61 6c 20 63 6f 70 79 20 6f 66  he local copy of
03a0: 20 74 68 65 20 73 6f 75 72 63 65 20 74 72 65 65   the source tree
03b0: 2e 0a 2a 2a 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65  ..**.*/.#include
03c0: 20 22 63 6f 6e 66 69 67 2e 68 22 0a 23 69 66 20   "config.h".#if 
03d0: 21 20 64 65 66 69 6e 65 64 28 5f 57 49 4e 33 32  ! defined(_WIN32
03e0: 29 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c 70 77  ).#  include <pw
03f0: 64 2e 68 3e 0a 23 65 6e 64 69 66 0a 23 69 6e 63  d.h>.#endif.#inc
0400: 6c 75 64 65 20 3c 73 71 6c 69 74 65 33 2e 68 3e  lude <sqlite3.h>
0410: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 74  .#include <sys/t
0420: 79 70 65 73 2e 68 3e 0a 23 69 6e 63 6c 75 64 65  ypes.h>.#include
0430: 20 3c 73 79 73 2f 73 74 61 74 2e 68 3e 0a 23 69   <sys/stat.h>.#i
0440: 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68  nclude <unistd.h
0450: 3e 0a 23 69 6e 63 6c 75 64 65 20 22 64 62 2e 68  >.#include "db.h
0460: 22 0a 0a 23 69 66 20 49 4e 54 45 52 46 41 43 45  "..#if INTERFACE
0470: 0a 2f 2a 0a 2a 2a 20 41 6e 20 73 69 6e 67 6c 65  ./*.** An single
0480: 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 20 69   SQL statement i
0490: 73 20 72 65 70 72 65 73 65 6e 74 65 64 20 61 73  s represented as
04a0: 20 61 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20   an instance of 
04b0: 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 2a 2a  the following.**
04c0: 20 73 74 72 75 63 74 75 72 65 2e 0a 2a 2f 0a 73   structure..*/.s
04d0: 74 72 75 63 74 20 53 74 6d 74 20 7b 0a 20 20 42  truct Stmt {.  B
04e0: 6c 6f 62 20 73 71 6c 3b 20 20 20 20 20 20 20 20  lob sql;        
04f0: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 53 51         /* The SQ
0500: 4c 20 66 6f 72 20 74 68 69 73 20 73 74 61 74 65  L for this state
0510: 6d 65 6e 74 20 2a 2f 0a 20 20 73 71 6c 69 74 65  ment */.  sqlite
0520: 33 5f 73 74 6d 74 20 2a 70 53 74 6d 74 3b 20 20  3_stmt *pStmt;  
0530: 20 20 2f 2a 20 54 68 65 20 72 65 73 75 6c 74 73    /* The results
0540: 20 6f 66 20 73 71 6c 69 74 65 33 5f 70 72 65 70   of sqlite3_prep
0550: 61 72 65 28 29 20 2a 2f 0a 20 20 53 74 6d 74 20  are() */.  Stmt 
0560: 2a 70 4e 65 78 74 2c 20 2a 70 50 72 65 76 3b 20  *pNext, *pPrev; 
0570: 20 20 20 2f 2a 20 4c 69 73 74 20 6f 66 20 61 6c     /* List of al
0580: 6c 20 75 6e 66 69 6e 61 6c 69 7a 65 64 20 73 74  l unfinalized st
0590: 61 74 65 6d 65 6e 74 73 20 2a 2f 0a 20 20 69 6e  atements */.  in
05a0: 74 20 6e 53 74 65 70 3b 20 20 20 20 20 20 20 20  t nStep;        
05b0: 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20        /* Number 
05c0: 6f 66 20 73 71 6c 69 74 65 33 5f 73 74 65 70 28  of sqlite3_step(
05d0: 29 20 63 61 6c 6c 73 20 2a 2f 0a 7d 3b 0a 23 65  ) calls */.};.#e
05e0: 6e 64 69 66 20 2f 2a 20 49 4e 54 45 52 46 41 43  ndif /* INTERFAC
05f0: 45 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 43 61 6c 6c  E */../*.** Call
0600: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 77 68   this routine wh
0610: 65 6e 20 61 20 64 61 74 61 62 61 73 65 20 65 72  en a database er
0620: 72 6f 72 20 6f 63 63 75 72 73 2e 0a 2a 2f 0a 73  ror occurs..*/.s
0630: 74 61 74 69 63 20 76 6f 69 64 20 64 62 5f 65 72  tatic void db_er
0640: 72 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46  r(const char *zF
0650: 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76  ormat, ...){.  v
0660: 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61  a_list ap;.  cha
0670: 72 20 2a 7a 3b 0a 20 20 73 74 61 74 69 63 20 63  r *z;.  static c
0680: 6f 6e 73 74 20 63 68 61 72 20 7a 52 65 62 75 69  onst char zRebui
0690: 6c 64 4d 73 67 5b 5d 20 3d 20 0a 20 20 20 20 20  ldMsg[] = .     
06a0: 20 22 49 66 20 79 6f 75 20 68 61 76 65 20 72 65   "If you have re
06b0: 63 65 6e 74 6c 79 20 75 70 64 61 74 65 64 20 79  cently updated y
06c0: 6f 75 72 20 66 6f 73 73 69 6c 20 65 78 65 63 75  our fossil execu
06d0: 74 61 62 6c 65 2c 20 79 6f 75 20 6d 69 67 68 74  table, you might
06e0: 5c 6e 22 0a 20 20 20 20 20 20 22 6e 65 65 64 20  \n".      "need 
06f0: 74 6f 20 72 75 6e 20 5c 22 66 6f 73 73 69 6c 20  to run \"fossil 
0700: 61 6c 6c 20 72 65 62 75 69 6c 64 5c 22 20 74 6f  all rebuild\" to
0710: 20 62 72 69 6e 67 20 74 68 65 20 72 65 70 6f 73   bring the repos
0720: 69 74 6f 72 79 5c 6e 22 0a 20 20 20 20 20 20 22  itory\n".      "
0730: 73 63 68 65 6d 61 73 20 75 70 20 74 6f 20 64 61  schemas up to da
0740: 74 65 2e 5c 6e 22 3b 0a 20 20 76 61 5f 73 74 61  te.\n";.  va_sta
0750: 72 74 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b  rt(ap, zFormat);
0760: 0a 20 20 7a 20 3d 20 76 6d 70 72 69 6e 74 66 28  .  z = vmprintf(
0770: 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20  zFormat, ap);.  
0780: 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 69 66  va_end(ap);.  if
0790: 28 20 67 2e 78 66 65 72 50 61 6e 69 63 20 29 7b  ( g.xferPanic ){
07a0: 0a 20 20 20 20 63 67 69 5f 72 65 73 65 74 5f 63  .    cgi_reset_c
07b0: 6f 6e 74 65 6e 74 28 29 3b 0a 20 20 20 20 40 20  ontent();.    @ 
07c0: 65 72 72 6f 72 20 44 61 74 61 62 61 73 65 5c 73  error Database\s
07d0: 65 72 72 6f 72 3a 5c 73 25 46 28 7a 29 0a 20 20  error:\s%F(z).  
07e0: 20 20 63 67 69 5f 72 65 70 6c 79 28 29 3b 0a 20    cgi_reply();. 
07f0: 20 7d 0a 20 20 69 66 28 20 67 2e 63 67 69 4f 75   }.  if( g.cgiOu
0800: 74 70 75 74 20 29 7b 0a 20 20 20 20 67 2e 63 67  tput ){.    g.cg
0810: 69 4f 75 74 70 75 74 20 3d 20 30 3b 0a 20 20 20  iOutput = 0;.   
0820: 20 63 67 69 5f 70 72 69 6e 74 66 28 22 3c 68 31   cgi_printf("<h1
0830: 3e 44 61 74 61 62 61 73 65 20 45 72 72 6f 72 3c  >Database Error<
0840: 2f 68 31 3e 5c 6e 22 0a 20 20 20 20 20 20 20 20  /h1>\n".        
0850: 20 20 20 20 20 20 20 22 3c 70 72 65 3e 25 68 3c         "<pre>%h<
0860: 2f 70 72 65 3e 3c 70 3e 25 73 3c 2f 70 3e 22 2c  /pre><p>%s</p>",
0870: 20 7a 2c 20 7a 52 65 62 75 69 6c 64 4d 73 67 29   z, zRebuildMsg)
0880: 3b 0a 20 20 20 20 63 67 69 5f 72 65 70 6c 79 28  ;.    cgi_reply(
0890: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
08a0: 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20  fprintf(stderr, 
08b0: 22 25 73 3a 20 25 73 5c 6e 5c 6e 25 73 22 2c 20  "%s: %s\n\n%s", 
08c0: 67 2e 61 72 67 76 5b 30 5d 2c 20 7a 2c 20 7a 52  g.argv[0], z, zR
08d0: 65 62 75 69 6c 64 4d 73 67 29 3b 0a 20 20 7d 0a  ebuildMsg);.  }.
08e0: 20 20 64 62 5f 66 6f 72 63 65 5f 72 6f 6c 6c 62    db_force_rollb
08f0: 61 63 6b 28 29 3b 0a 20 20 66 6f 73 73 69 6c 5f  ack();.  fossil_
0900: 65 78 69 74 28 31 29 3b 0a 7d 0a 0a 73 74 61 74  exit(1);.}..stat
0910: 69 63 20 69 6e 74 20 6e 42 65 67 69 6e 20 3d 20  ic int nBegin = 
0920: 30 3b 20 20 20 20 20 20 2f 2a 20 4e 65 73 74 69  0;      /* Nesti
0930: 6e 67 20 64 65 70 74 68 20 6f 66 20 42 45 47 49  ng depth of BEGI
0940: 4e 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  N */.static int 
0950: 69 73 4e 65 77 52 65 70 6f 20 3d 20 30 3b 20 20  isNewRepo = 0;  
0960: 20 2f 2a 20 54 72 75 65 20 69 66 20 74 68 65 20   /* True if the 
0970: 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 6e 65  repository is ne
0980: 77 6c 79 20 63 72 65 61 74 65 64 20 2a 2f 0a 73  wly created */.s
0990: 74 61 74 69 63 20 69 6e 74 20 64 6f 52 6f 6c 6c  tatic int doRoll
09a0: 62 61 63 6b 20 3d 20 30 3b 20 20 2f 2a 20 54 72  back = 0;  /* Tr
09b0: 75 65 20 74 6f 20 66 6f 72 63 65 20 61 20 72 6f  ue to force a ro
09c0: 6c 6c 62 61 63 6b 20 2a 2f 0a 73 74 61 74 69 63  llback */.static
09d0: 20 69 6e 74 20 6e 43 6f 6d 6d 69 74 48 6f 6f 6b   int nCommitHook
09e0: 20 3d 20 30 3b 20 2f 2a 20 4e 75 6d 62 65 72 20   = 0; /* Number 
09f0: 6f 66 20 63 6f 6d 6d 69 74 20 68 6f 6f 6b 73 20  of commit hooks 
0a00: 2a 2f 0a 73 74 61 74 69 63 20 73 74 72 75 63 74  */.static struct
0a10: 20 73 43 6f 6d 6d 69 74 48 6f 6f 6b 20 7b 0a 20   sCommitHook {. 
0a20: 20 69 6e 74 20 28 2a 78 48 6f 6f 6b 29 28 76 6f   int (*xHook)(vo
0a30: 69 64 29 3b 20 20 2f 2a 20 46 75 6e 63 74 69 6f  id);  /* Functio
0a40: 6e 73 20 74 6f 20 63 61 6c 6c 20 61 74 20 64 62  ns to call at db
0a50: 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e  _end_transaction
0a60: 28 29 20 2a 2f 0a 20 20 69 6e 74 20 73 65 71 75  () */.  int sequ
0a70: 65 6e 63 65 3b 20 20 20 20 20 20 20 20 2f 2a 20  ence;        /* 
0a80: 43 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 73 20 69  Call functions i
0a90: 6e 20 73 65 71 75 65 6e 63 65 20 6f 72 64 65 72  n sequence order
0aa0: 20 2a 2f 0a 7d 20 61 48 6f 6f 6b 5b 35 5d 3b 0a   */.} aHook[5];.
0ab0: 73 74 61 74 69 63 20 53 74 6d 74 20 2a 70 41 6c  static Stmt *pAl
0ac0: 6c 53 74 6d 74 20 3d 20 30 3b 20 20 2f 2a 20 4c  lStmt = 0;  /* L
0ad0: 69 73 74 20 6f 66 20 61 6c 6c 20 75 6e 66 69 6e  ist of all unfin
0ae0: 61 6c 69 7a 65 64 20 73 74 61 74 65 6d 65 6e 74  alized statement
0af0: 73 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73  s */../*.** This
0b00: 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 6c 6c   routine is call
0b10: 65 64 20 62 79 20 74 68 65 20 53 51 4c 69 74 65  ed by the SQLite
0b20: 20 63 6f 6d 6d 69 74 2d 68 6f 6f 6b 20 6d 65 63   commit-hook mec
0b30: 68 61 6e 69 73 6d 0a 2a 2a 20 6a 75 73 74 20 70  hanism.** just p
0b40: 72 69 6f 72 20 74 6f 20 65 61 63 68 20 63 6f 6d  rior to each com
0b50: 6d 69 74 2e 20 20 41 6c 6c 20 74 68 69 73 20 72  mit.  All this r
0b60: 6f 75 74 69 6e 65 20 64 6f 65 73 20 69 73 20 76  outine does is v
0b70: 65 72 69 66 79 0a 2a 2a 20 74 68 61 74 20 6e 42  erify.** that nB
0b80: 65 67 69 6e 20 72 65 61 6c 6c 79 20 69 73 20 7a  egin really is z
0b90: 65 72 6f 2e 20 20 54 68 61 74 20 69 6e 73 75 72  ero.  That insur
0ba0: 65 73 20 74 68 61 74 20 74 72 61 6e 73 61 63 74  es that transact
0bb0: 69 6f 6e 73 0a 2a 2a 20 63 61 6e 6e 6f 74 20 63  ions.** cannot c
0bc0: 6f 6d 6d 69 74 20 62 79 20 61 6e 79 20 6d 65 61  ommit by any mea
0bd0: 6e 73 20 6f 74 68 65 72 20 74 68 61 6e 20 62 79  ns other than by
0be0: 20 63 61 6c 6c 69 6e 67 20 64 62 5f 65 6e 64 5f   calling db_end_
0bf0: 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 0a 2a 2a  transaction().**
0c00: 20 62 65 6c 6f 77 2e 0a 2a 2a 0a 2a 2a 20 54 68   below..**.** Th
0c10: 69 73 20 69 73 20 6a 75 73 74 20 61 20 73 61 66  is is just a saf
0c20: 65 74 79 20 61 6e 64 20 73 61 6e 69 74 79 20 63  ety and sanity c
0c30: 68 65 63 6b 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  heck..*/.static 
0c40: 69 6e 74 20 64 62 5f 76 65 72 69 66 79 5f 61 74  int db_verify_at
0c50: 5f 63 6f 6d 6d 69 74 28 76 6f 69 64 20 2a 6e 6f  _commit(void *no
0c60: 74 55 73 65 64 29 7b 0a 20 20 69 66 28 20 6e 42  tUsed){.  if( nB
0c70: 65 67 69 6e 20 29 7b 0a 20 20 20 20 66 6f 73 73  egin ){.    foss
0c80: 69 6c 5f 70 61 6e 69 63 28 22 69 6c 6c 65 67 61  il_panic("illega
0c90: 6c 20 63 6f 6d 6d 69 74 20 61 74 74 65 6d 70 74  l commit attempt
0ca0: 22 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 31  ");.    return 1
0cb0: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 30  ;.  }.  return 0
0cc0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 42 65 67 69 6e  ;.}../*.** Begin
0cd0: 20 61 6e 64 20 65 6e 64 20 61 20 6e 65 73 74 65   and end a neste
0ce0: 64 20 74 72 61 6e 73 61 63 74 69 6f 6e 0a 2a 2f  d transaction.*/
0cf0: 0a 76 6f 69 64 20 64 62 5f 62 65 67 69 6e 5f 74  .void db_begin_t
0d00: 72 61 6e 73 61 63 74 69 6f 6e 28 76 6f 69 64 29  ransaction(void)
0d10: 7b 0a 20 20 69 66 28 20 6e 42 65 67 69 6e 3d 3d  {.  if( nBegin==
0d20: 30 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74  0 ){.    db_mult
0d30: 69 5f 65 78 65 63 28 22 42 45 47 49 4e 22 29 3b  i_exec("BEGIN");
0d40: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 63 6f 6d  .    sqlite3_com
0d50: 6d 69 74 5f 68 6f 6f 6b 28 67 2e 64 62 2c 20 64  mit_hook(g.db, d
0d60: 62 5f 76 65 72 69 66 79 5f 61 74 5f 63 6f 6d 6d  b_verify_at_comm
0d70: 69 74 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 6e 42  it, 0);.  }.  nB
0d80: 65 67 69 6e 2b 2b 3b 0a 7d 0a 76 6f 69 64 20 64  egin++;.}.void d
0d90: 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f  b_end_transactio
0da0: 6e 28 69 6e 74 20 72 6f 6c 6c 62 61 63 6b 46 6c  n(int rollbackFl
0db0: 61 67 29 7b 0a 20 20 69 66 28 20 67 2e 64 62 3d  ag){.  if( g.db=
0dc0: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 69  =0 ) return;.  i
0dd0: 66 28 20 6e 42 65 67 69 6e 3c 3d 30 20 29 20 72  f( nBegin<=0 ) r
0de0: 65 74 75 72 6e 3b 0a 20 20 69 66 28 20 72 6f 6c  eturn;.  if( rol
0df0: 6c 62 61 63 6b 46 6c 61 67 20 29 20 64 6f 52 6f  lbackFlag ) doRo
0e00: 6c 6c 62 61 63 6b 20 3d 20 31 3b 0a 20 20 6e 42  llback = 1;.  nB
0e10: 65 67 69 6e 2d 2d 3b 0a 20 20 69 66 28 20 6e 42  egin--;.  if( nB
0e20: 65 67 69 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 69  egin==0 ){.    i
0e30: 6e 74 20 69 3b 0a 20 20 20 20 66 6f 72 28 69 3d  nt i;.    for(i=
0e40: 30 3b 20 64 6f 52 6f 6c 6c 62 61 63 6b 3d 3d 30  0; doRollback==0
0e50: 20 26 26 20 69 3c 6e 43 6f 6d 6d 69 74 48 6f 6f   && i<nCommitHoo
0e60: 6b 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 64  k; i++){.      d
0e70: 6f 52 6f 6c 6c 62 61 63 6b 20 7c 3d 20 61 48 6f  oRollback |= aHo
0e80: 6f 6b 5b 69 5d 2e 78 48 6f 6f 6b 28 29 3b 0a 20  ok[i].xHook();. 
0e90: 20 20 20 7d 0a 20 20 20 20 64 62 5f 6d 75 6c 74     }.    db_mult
0ea0: 69 5f 65 78 65 63 28 64 6f 52 6f 6c 6c 62 61 63  i_exec(doRollbac
0eb0: 6b 20 3f 20 22 52 4f 4c 4c 42 41 43 4b 22 20 3a  k ? "ROLLBACK" :
0ec0: 20 22 43 4f 4d 4d 49 54 22 29 3b 0a 20 20 20 20   "COMMIT");.    
0ed0: 64 6f 52 6f 6c 6c 62 61 63 6b 20 3d 20 30 3b 0a  doRollback = 0;.
0ee0: 20 20 7d 0a 7d 0a 76 6f 69 64 20 64 62 5f 66 6f    }.}.void db_fo
0ef0: 72 63 65 5f 72 6f 6c 6c 62 61 63 6b 28 76 6f 69  rce_rollback(voi
0f00: 64 29 7b 0a 20 20 73 74 61 74 69 63 20 69 6e 74  d){.  static int
0f10: 20 62 75 73 79 20 3d 20 30 3b 0a 20 20 69 66 28   busy = 0;.  if(
0f20: 20 62 75 73 79 20 7c 7c 20 67 2e 64 62 3d 3d 30   busy || g.db==0
0f30: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 62 75 73   ) return;.  bus
0f40: 79 20 3d 20 31 3b 0a 20 20 75 6e 64 6f 5f 72 6f  y = 1;.  undo_ro
0f50: 6c 6c 62 61 63 6b 28 29 3b 0a 20 20 69 66 28 20  llback();.  if( 
0f60: 6e 42 65 67 69 6e 20 29 7b 0a 20 20 20 20 73 71  nBegin ){.    sq
0f70: 6c 69 74 65 33 5f 65 78 65 63 28 67 2e 64 62 2c  lite3_exec(g.db,
0f80: 20 22 52 4f 4c 4c 42 41 43 4b 22 2c 20 30 2c 20   "ROLLBACK", 0, 
0f90: 30 2c 20 30 29 3b 0a 20 20 20 20 6e 42 65 67 69  0, 0);.    nBegi
0fa0: 6e 20 3d 20 30 3b 0a 20 20 20 20 69 66 28 20 69  n = 0;.    if( i
0fb0: 73 4e 65 77 52 65 70 6f 20 29 7b 0a 20 20 20 20  sNewRepo ){.    
0fc0: 20 20 64 62 5f 63 6c 6f 73 65 28 29 3b 0a 20 20    db_close();.  
0fd0: 20 20 20 20 75 6e 6c 69 6e 6b 28 67 2e 7a 52 65      unlink(g.zRe
0fe0: 70 6f 73 69 74 6f 72 79 4e 61 6d 65 29 3b 0a 20  positoryName);. 
0ff0: 20 20 20 7d 0a 20 20 7d 0a 20 20 62 75 73 79 20     }.  }.  busy 
1000: 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e  = 0;.}../*.** In
1010: 73 74 61 6c 6c 20 61 20 63 6f 6d 6d 69 74 20 68  stall a commit h
1020: 6f 6f 6b 2e 20 20 48 6f 6f 6b 73 20 61 72 65 20  ook.  Hooks are 
1030: 69 6e 73 74 61 6c 6c 65 64 20 69 6e 20 73 65 71  installed in seq
1040: 75 65 6e 63 65 20 6f 72 64 65 72 2e 0a 2a 2a 20  uence order..** 
1050: 49 74 20 69 73 20 61 6e 20 65 72 72 6f 72 20 74  It is an error t
1060: 6f 20 69 6e 73 74 61 6c 6c 20 74 68 65 20 73 61  o install the sa
1070: 6d 65 20 63 6f 6d 6d 69 74 20 68 6f 6f 6b 20 6d  me commit hook m
1080: 6f 72 65 20 74 68 61 6e 20 6f 6e 63 65 2e 0a 2a  ore than once..*
1090: 2a 0a 2a 2a 20 45 61 63 68 20 63 6f 6d 6d 69 74  *.** Each commit
10a0: 20 68 6f 6f 6b 20 69 73 20 63 61 6c 6c 65 64 20   hook is called 
10b0: 28 69 6e 20 6f 72 64 65 72 20 6f 66 20 61 63 63  (in order of acc
10c0: 65 6e 64 69 6e 67 20 73 65 71 75 65 6e 63 65 29  ending sequence)
10d0: 20 61 74 0a 2a 2a 20 65 61 63 68 20 63 6f 6d 6d   at.** each comm
10e0: 69 74 20 6f 70 65 72 61 74 69 6f 6e 2e 20 20 49  it operation.  I
10f0: 66 20 61 6e 79 20 63 6f 6d 6d 69 74 20 68 6f 6f  f any commit hoo
1100: 6b 20 72 65 74 75 72 6e 73 20 6e 6f 6e 2d 7a 65  k returns non-ze
1110: 72 6f 2c 0a 2a 2a 20 74 68 65 20 73 75 62 73 65  ro,.** the subse
1120: 71 75 65 6e 63 65 20 63 6f 6d 6d 69 74 20 68 6f  quence commit ho
1130: 6f 6b 73 20 61 72 65 20 6f 6d 69 74 74 65 64 20  oks are omitted 
1140: 61 6e 64 20 74 68 65 20 74 72 61 6e 73 61 63 74  and the transact
1150: 69 6f 6e 0a 2a 2a 20 72 6f 6c 6c 73 20 62 61 63  ion.** rolls bac
1160: 6b 20 72 61 74 68 65 72 20 74 68 61 6e 20 63 6f  k rather than co
1170: 6d 6d 69 74 2e 20 20 49 74 20 69 73 20 74 68 65  mmit.  It is the
1180: 20 72 65 73 70 6f 6e 73 69 62 69 6c 69 74 79 20   responsibility 
1190: 6f 66 20 74 68 65 0a 2a 2a 20 68 6f 6f 6b 73 20  of the.** hooks 
11a0: 74 68 65 6d 73 65 6c 76 65 73 20 74 6f 20 69 73  themselves to is
11b0: 73 75 65 20 61 6e 79 20 65 72 72 6f 72 20 6d 65  sue any error me
11c0: 73 73 61 67 65 73 2e 0a 2a 2f 0a 76 6f 69 64 20  ssages..*/.void 
11d0: 64 62 5f 63 6f 6d 6d 69 74 5f 68 6f 6f 6b 28 69  db_commit_hook(i
11e0: 6e 74 20 28 2a 78 29 28 76 6f 69 64 29 2c 20 69  nt (*x)(void), i
11f0: 6e 74 20 73 65 71 75 65 6e 63 65 29 7b 0a 20 20  nt sequence){.  
1200: 69 6e 74 20 69 3b 0a 20 20 61 73 73 65 72 74 28  int i;.  assert(
1210: 20 6e 43 6f 6d 6d 69 74 48 6f 6f 6b 20 3c 20 73   nCommitHook < s
1220: 69 7a 65 6f 66 28 61 48 6f 6f 6b 29 2f 73 69 7a  izeof(aHook)/siz
1230: 65 6f 66 28 61 48 6f 6f 6b 5b 31 5d 29 20 29 3b  eof(aHook[1]) );
1240: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 43  .  for(i=0; i<nC
1250: 6f 6d 6d 69 74 48 6f 6f 6b 3b 20 69 2b 2b 29 7b  ommitHook; i++){
1260: 0a 20 20 20 20 61 73 73 65 72 74 28 20 78 21 3d  .    assert( x!=
1270: 61 48 6f 6f 6b 5b 69 5d 2e 78 48 6f 6f 6b 20 29  aHook[i].xHook )
1280: 3b 0a 20 20 20 20 69 66 28 20 61 48 6f 6f 6b 5b  ;.    if( aHook[
1290: 69 5d 2e 73 65 71 75 65 6e 63 65 3e 73 65 71 75  i].sequence>sequ
12a0: 65 6e 63 65 20 29 7b 0a 20 20 20 20 20 20 69 6e  ence ){.      in
12b0: 74 20 73 20 3d 20 73 65 71 75 65 6e 63 65 3b 0a  t s = sequence;.
12c0: 20 20 20 20 20 20 69 6e 74 20 28 2a 78 53 29 28        int (*xS)(
12d0: 76 6f 69 64 29 20 3d 20 78 3b 0a 20 20 20 20 20  void) = x;.     
12e0: 20 73 65 71 75 65 6e 63 65 20 3d 20 61 48 6f 6f   sequence = aHoo
12f0: 6b 5b 69 5d 2e 73 65 71 75 65 6e 63 65 3b 0a 20  k[i].sequence;. 
1300: 20 20 20 20 20 78 20 3d 20 61 48 6f 6f 6b 5b 69       x = aHook[i
1310: 5d 2e 78 48 6f 6f 6b 3b 0a 20 20 20 20 20 20 61  ].xHook;.      a
1320: 48 6f 6f 6b 5b 69 5d 2e 73 65 71 75 65 6e 63 65  Hook[i].sequence
1330: 20 3d 20 73 3b 0a 20 20 20 20 20 20 61 48 6f 6f   = s;.      aHoo
1340: 6b 5b 69 5d 2e 78 48 6f 6f 6b 20 3d 20 78 53 3b  k[i].xHook = xS;
1350: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61 48 6f  .    }.  }.  aHo
1360: 6f 6b 5b 6e 43 6f 6d 6d 69 74 48 6f 6f 6b 5d 2e  ok[nCommitHook].
1370: 73 65 71 75 65 6e 63 65 20 3d 20 73 65 71 75 65  sequence = seque
1380: 6e 63 65 3b 0a 20 20 61 48 6f 6f 6b 5b 6e 43 6f  nce;.  aHook[nCo
1390: 6d 6d 69 74 48 6f 6f 6b 5d 2e 78 48 6f 6f 6b 20  mmitHook].xHook 
13a0: 3d 20 78 3b 0a 20 20 6e 43 6f 6d 6d 69 74 48 6f  = x;.  nCommitHo
13b0: 6f 6b 2b 2b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50  ok++;.}../*.** P
13c0: 72 65 70 61 72 65 20 61 20 53 74 6d 74 2e 20 20  repare a Stmt.  
13d0: 41 73 73 75 6d 65 20 74 68 61 74 20 74 68 65 20  Assume that the 
13e0: 53 74 6d 74 20 69 73 20 70 72 65 76 69 6f 75 73  Stmt is previous
13f0: 6c 79 20 75 6e 69 6e 69 74 69 61 6c 69 7a 65 64  ly uninitialized
1400: 2e 0a 2a 2a 20 49 66 20 74 68 65 20 69 6e 70 75  ..** If the inpu
1410: 74 20 73 74 72 69 6e 67 20 63 6f 6e 74 61 69 6e  t string contain
1420: 73 20 6d 75 6c 74 69 70 6c 65 20 53 51 4c 20 73  s multiple SQL s
1430: 74 61 74 65 6d 65 6e 74 73 2c 20 6f 6e 6c 79 20  tatements, only 
1440: 74 68 65 20 66 69 72 73 74 0a 2a 2a 20 6f 6e 65  the first.** one
1450: 20 69 73 20 70 72 6f 63 65 73 73 65 64 2e 20 20   is processed.  
1460: 41 6c 6c 20 73 74 61 74 65 6d 65 6e 74 73 20 62  All statements b
1470: 65 79 6f 6e 64 20 74 68 65 20 66 69 72 73 74 20  eyond the first 
1480: 61 72 65 20 73 69 6c 65 6e 74 6c 79 20 69 67 6e  are silently ign
1490: 6f 72 65 64 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f  ored..*/.int db_
14a0: 76 70 72 65 70 61 72 65 28 53 74 6d 74 20 2a 70  vprepare(Stmt *p
14b0: 53 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72  Stmt, const char
14c0: 20 2a 7a 46 6f 72 6d 61 74 2c 20 76 61 5f 6c 69   *zFormat, va_li
14d0: 73 74 20 61 70 29 7b 0a 20 20 63 68 61 72 20 2a  st ap){.  char *
14e0: 7a 53 71 6c 3b 0a 20 20 62 6c 6f 62 5f 7a 65 72  zSql;.  blob_zer
14f0: 6f 28 26 70 53 74 6d 74 2d 3e 73 71 6c 29 3b 0a  o(&pStmt->sql);.
1500: 20 20 62 6c 6f 62 5f 76 61 70 70 65 6e 64 66 28    blob_vappendf(
1510: 26 70 53 74 6d 74 2d 3e 73 71 6c 2c 20 7a 46 6f  &pStmt->sql, zFo
1520: 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 76 61 5f  rmat, ap);.  va_
1530: 65 6e 64 28 61 70 29 3b 0a 20 20 7a 53 71 6c 20  end(ap);.  zSql 
1540: 3d 20 62 6c 6f 62 5f 73 74 72 28 26 70 53 74 6d  = blob_str(&pStm
1550: 74 2d 3e 73 71 6c 29 3b 0a 20 20 69 66 28 20 73  t->sql);.  if( s
1560: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 76  qlite3_prepare_v
1570: 32 28 67 2e 64 62 2c 20 7a 53 71 6c 2c 20 2d 31  2(g.db, zSql, -1
1580: 2c 20 26 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c  , &pStmt->pStmt,
1590: 20 30 29 21 3d 30 20 29 7b 0a 20 20 20 20 64 62   0)!=0 ){.    db
15a0: 5f 65 72 72 28 22 25 73 5c 6e 25 73 22 2c 20 73  _err("%s\n%s", s
15b0: 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 28 67 2e  qlite3_errmsg(g.
15c0: 64 62 29 2c 20 7a 53 71 6c 29 3b 0a 20 20 7d 0a  db), zSql);.  }.
15d0: 20 20 70 53 74 6d 74 2d 3e 70 4e 65 78 74 20 3d    pStmt->pNext =
15e0: 20 70 53 74 6d 74 2d 3e 70 50 72 65 76 20 3d 20   pStmt->pPrev = 
15f0: 30 3b 0a 20 20 70 53 74 6d 74 2d 3e 6e 53 74 65  0;.  pStmt->nSte
1600: 70 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20  p = 0;.  return 
1610: 30 3b 0a 7d 0a 69 6e 74 20 64 62 5f 70 72 65 70  0;.}.int db_prep
1620: 61 72 65 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c  are(Stmt *pStmt,
1630: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f   const char *zFo
1640: 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 69 6e  rmat, ...){.  in
1650: 74 20 72 63 3b 0a 20 20 76 61 5f 6c 69 73 74 20  t rc;.  va_list 
1660: 61 70 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61  ap;.  va_start(a
1670: 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 72  p, zFormat);.  r
1680: 63 20 3d 20 64 62 5f 76 70 72 65 70 61 72 65 28  c = db_vprepare(
1690: 70 53 74 6d 74 2c 20 7a 46 6f 72 6d 61 74 2c 20  pStmt, zFormat, 
16a0: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70  ap);.  va_end(ap
16b0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a  );.  return rc;.
16c0: 7d 0a 69 6e 74 20 64 62 5f 73 74 61 74 69 63 5f  }.int db_static_
16d0: 70 72 65 70 61 72 65 28 53 74 6d 74 20 2a 70 53  prepare(Stmt *pS
16e0: 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  tmt, const char 
16f0: 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a  *zFormat, ...){.
1700: 20 20 69 6e 74 20 72 63 20 3d 20 53 51 4c 49 54    int rc = SQLIT
1710: 45 5f 4f 4b 3b 0a 20 20 69 66 28 20 62 6c 6f 62  E_OK;.  if( blob
1720: 5f 73 69 7a 65 28 26 70 53 74 6d 74 2d 3e 73 71  _size(&pStmt->sq
1730: 6c 29 3d 3d 30 20 29 7b 0a 20 20 20 20 76 61 5f  l)==0 ){.    va_
1740: 6c 69 73 74 20 61 70 3b 0a 20 20 20 20 76 61 5f  list ap;.    va_
1750: 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d 61  start(ap, zForma
1760: 74 29 3b 0a 20 20 20 20 72 63 20 3d 20 64 62 5f  t);.    rc = db_
1770: 76 70 72 65 70 61 72 65 28 70 53 74 6d 74 2c 20  vprepare(pStmt, 
1780: 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20  zFormat, ap);.  
1790: 20 20 70 53 74 6d 74 2d 3e 70 4e 65 78 74 20 3d    pStmt->pNext =
17a0: 20 70 41 6c 6c 53 74 6d 74 3b 0a 20 20 20 20 70   pAllStmt;.    p
17b0: 53 74 6d 74 2d 3e 70 50 72 65 76 20 3d 20 30 3b  Stmt->pPrev = 0;
17c0: 0a 20 20 20 20 69 66 28 20 70 41 6c 6c 53 74 6d  .    if( pAllStm
17d0: 74 20 29 20 70 41 6c 6c 53 74 6d 74 2d 3e 70 50  t ) pAllStmt->pP
17e0: 72 65 76 20 3d 20 70 53 74 6d 74 3b 0a 20 20 20  rev = pStmt;.   
17f0: 20 70 41 6c 6c 53 74 6d 74 20 3d 20 70 53 74 6d   pAllStmt = pStm
1800: 74 3b 0a 20 20 20 20 76 61 5f 65 6e 64 28 61 70  t;.    va_end(ap
1810: 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  );.  }.  return 
1820: 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74  rc;.}../*.** Ret
1830: 75 72 6e 20 74 68 65 20 69 6e 64 65 78 20 6f 66  urn the index of
1840: 20 61 20 62 69 6e 64 20 70 61 72 61 6d 65 74 65   a bind paramete
1850: 72 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  r.*/.static int 
1860: 70 61 72 61 6d 49 64 78 28 53 74 6d 74 20 2a 70  paramIdx(Stmt *p
1870: 53 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72  Stmt, const char
1880: 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 29 7b 0a 20   *zParamName){. 
1890: 20 69 6e 74 20 69 20 3d 20 73 71 6c 69 74 65 33   int i = sqlite3
18a0: 5f 62 69 6e 64 5f 70 61 72 61 6d 65 74 65 72 5f  _bind_parameter_
18b0: 69 6e 64 65 78 28 70 53 74 6d 74 2d 3e 70 53 74  index(pStmt->pSt
18c0: 6d 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 29 3b  mt, zParamName);
18d0: 0a 20 20 69 66 28 20 69 3d 3d 30 20 29 7b 0a 20  .  if( i==0 ){. 
18e0: 20 20 20 64 62 5f 65 72 72 28 22 6e 6f 20 73 75     db_err("no su
18f0: 63 68 20 62 69 6e 64 20 70 61 72 61 6d 65 74 65  ch bind paramete
1900: 72 3a 20 25 73 5c 6e 53 51 4c 3a 20 25 62 22 2c  r: %s\nSQL: %b",
1910: 20 7a 50 61 72 61 6d 4e 61 6d 65 2c 20 26 70 53   zParamName, &pS
1920: 74 6d 74 2d 3e 73 71 6c 29 3b 0a 20 20 7d 0a 20  tmt->sql);.  }. 
1930: 20 72 65 74 75 72 6e 20 69 3b 0a 7d 0a 2f 2a 0a   return i;.}./*.
1940: 2a 2a 20 42 69 6e 64 20 61 6e 20 69 6e 74 65 67  ** Bind an integ
1950: 65 72 2c 20 73 74 72 69 6e 67 2c 20 6f 72 20 42  er, string, or B
1960: 6c 6f 62 20 76 61 6c 75 65 20 74 6f 20 61 20 6e  lob value to a n
1970: 61 6d 65 64 20 70 61 72 61 6d 65 74 65 72 2e 0a  amed parameter..
1980: 2a 2f 0a 69 6e 74 20 64 62 5f 62 69 6e 64 5f 69  */.int db_bind_i
1990: 6e 74 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20  nt(Stmt *pStmt, 
19a0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 72  const char *zPar
19b0: 61 6d 4e 61 6d 65 2c 20 69 6e 74 20 69 56 61 6c  amName, int iVal
19c0: 75 65 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71  ue){.  return sq
19d0: 6c 69 74 65 33 5f 62 69 6e 64 5f 69 6e 74 28 70  lite3_bind_int(p
19e0: 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 70 61 72  Stmt->pStmt, par
19f0: 61 6d 49 64 78 28 70 53 74 6d 74 2c 20 7a 50 61  amIdx(pStmt, zPa
1a00: 72 61 6d 4e 61 6d 65 29 2c 20 69 56 61 6c 75 65  ramName), iValue
1a10: 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 62 69 6e 64  );.}.int db_bind
1a20: 5f 69 6e 74 36 34 28 53 74 6d 74 20 2a 70 53 74  _int64(Stmt *pSt
1a30: 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  mt, const char *
1a40: 7a 50 61 72 61 6d 4e 61 6d 65 2c 20 69 36 34 20  zParamName, i64 
1a50: 69 56 61 6c 75 65 29 7b 0a 20 20 72 65 74 75 72  iValue){.  retur
1a60: 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 69  n sqlite3_bind_i
1a70: 6e 74 36 34 28 70 53 74 6d 74 2d 3e 70 53 74 6d  nt64(pStmt->pStm
1a80: 74 2c 20 70 61 72 61 6d 49 64 78 28 70 53 74 6d  t, paramIdx(pStm
1a90: 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 29 2c 20  t, zParamName), 
1aa0: 69 56 61 6c 75 65 29 3b 0a 7d 0a 69 6e 74 20 64  iValue);.}.int d
1ab0: 62 5f 62 69 6e 64 5f 64 6f 75 62 6c 65 28 53 74  b_bind_double(St
1ac0: 6d 74 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 74  mt *pStmt, const
1ad0: 20 63 68 61 72 20 2a 7a 50 61 72 61 6d 4e 61 6d   char *zParamNam
1ae0: 65 2c 20 64 6f 75 62 6c 65 20 72 56 61 6c 75 65  e, double rValue
1af0: 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69  ){.  return sqli
1b00: 74 65 33 5f 62 69 6e 64 5f 64 6f 75 62 6c 65 28  te3_bind_double(
1b10: 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 70 61  pStmt->pStmt, pa
1b20: 72 61 6d 49 64 78 28 70 53 74 6d 74 2c 20 7a 50  ramIdx(pStmt, zP
1b30: 61 72 61 6d 4e 61 6d 65 29 2c 20 72 56 61 6c 75  aramName), rValu
1b40: 65 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 62 69 6e  e);.}.int db_bin
1b50: 64 5f 74 65 78 74 28 53 74 6d 74 20 2a 70 53 74  d_text(Stmt *pSt
1b60: 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  mt, const char *
1b70: 7a 50 61 72 61 6d 4e 61 6d 65 2c 20 63 6f 6e 73  zParamName, cons
1b80: 74 20 63 68 61 72 20 2a 7a 56 61 6c 75 65 29 7b  t char *zValue){
1b90: 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65  .  return sqlite
1ba0: 33 5f 62 69 6e 64 5f 74 65 78 74 28 70 53 74 6d  3_bind_text(pStm
1bb0: 74 2d 3e 70 53 74 6d 74 2c 20 70 61 72 61 6d 49  t->pStmt, paramI
1bc0: 64 78 28 70 53 74 6d 74 2c 20 7a 50 61 72 61 6d  dx(pStmt, zParam
1bd0: 4e 61 6d 65 29 2c 20 7a 56 61 6c 75 65 2c 0a 20  Name), zValue,. 
1be0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1bf0: 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 53 51            -1, SQ
1c00: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a  LITE_STATIC);.}.
1c10: 69 6e 74 20 64 62 5f 62 69 6e 64 5f 6e 75 6c 6c  int db_bind_null
1c20: 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 63 6f  (Stmt *pStmt, co
1c30: 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 72 61 6d  nst char *zParam
1c40: 4e 61 6d 65 29 7b 0a 20 20 72 65 74 75 72 6e 20  Name){.  return 
1c50: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 6e 75 6c  sqlite3_bind_nul
1c60: 6c 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20  l(pStmt->pStmt, 
1c70: 70 61 72 61 6d 49 64 78 28 70 53 74 6d 74 2c 20  paramIdx(pStmt, 
1c80: 7a 50 61 72 61 6d 4e 61 6d 65 29 29 3b 0a 7d 0a  zParamName));.}.
1c90: 69 6e 74 20 64 62 5f 62 69 6e 64 5f 62 6c 6f 62  int db_bind_blob
1ca0: 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 63 6f  (Stmt *pStmt, co
1cb0: 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 72 61 6d  nst char *zParam
1cc0: 4e 61 6d 65 2c 20 42 6c 6f 62 20 2a 70 42 6c 6f  Name, Blob *pBlo
1cd0: 62 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c  b){.  return sql
1ce0: 69 74 65 33 5f 62 69 6e 64 5f 62 6c 6f 62 28 70  ite3_bind_blob(p
1cf0: 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 70 61 72  Stmt->pStmt, par
1d00: 61 6d 49 64 78 28 70 53 74 6d 74 2c 20 7a 50 61  amIdx(pStmt, zPa
1d10: 72 61 6d 4e 61 6d 65 29 2c 0a 20 20 20 20 20 20  ramName),.      
1d20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1d30: 20 20 20 20 62 6c 6f 62 5f 62 75 66 66 65 72 28      blob_buffer(
1d40: 70 42 6c 6f 62 29 2c 20 62 6c 6f 62 5f 73 69 7a  pBlob), blob_siz
1d50: 65 28 70 42 6c 6f 62 29 2c 20 53 51 4c 49 54 45  e(pBlob), SQLITE
1d60: 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 20  _STATIC);.}../* 
1d70: 62 69 6e 64 5f 73 74 72 28 29 20 74 72 65 61 74  bind_str() treat
1d80: 73 20 61 20 42 6c 6f 62 20 6f 62 6a 65 63 74 20  s a Blob object 
1d90: 6c 69 6b 65 20 61 20 54 45 58 54 20 73 74 72 69  like a TEXT stri
1da0: 6e 67 20 61 6e 64 20 62 69 6e 64 73 20 69 74 0a  ng and binds it.
1db0: 2a 2a 20 74 6f 20 74 68 65 20 53 51 4c 20 76 61  ** to the SQL va
1dc0: 72 69 61 62 6c 65 2e 20 20 43 6f 6e 73 74 72 61  riable.  Constra
1dd0: 73 74 20 74 68 69 73 20 74 6f 20 62 69 6e 64 5f  st this to bind_
1de0: 62 6c 6f 62 28 29 20 77 68 69 63 68 20 74 72 65  blob() which tre
1df0: 61 74 73 0a 2a 2a 20 74 68 65 20 42 6c 6f 62 20  ats.** the Blob 
1e00: 6f 62 6a 65 63 74 20 6c 69 6b 65 20 61 6e 20 53  object like an S
1e10: 51 4c 20 42 4c 4f 42 2e 0a 2a 2f 0a 69 6e 74 20  QL BLOB..*/.int 
1e20: 64 62 5f 62 69 6e 64 5f 73 74 72 28 53 74 6d 74  db_bind_str(Stmt
1e30: 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 74 20 63   *pStmt, const c
1e40: 68 61 72 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 2c  har *zParamName,
1e50: 20 42 6c 6f 62 20 2a 70 42 6c 6f 62 29 7b 0a 20   Blob *pBlob){. 
1e60: 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f   return sqlite3_
1e70: 62 69 6e 64 5f 74 65 78 74 28 70 53 74 6d 74 2d  bind_text(pStmt-
1e80: 3e 70 53 74 6d 74 2c 20 70 61 72 61 6d 49 64 78  >pStmt, paramIdx
1e90: 28 70 53 74 6d 74 2c 20 7a 50 61 72 61 6d 4e 61  (pStmt, zParamNa
1ea0: 6d 65 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20  me),.           
1eb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62                 b
1ec0: 6c 6f 62 5f 62 75 66 66 65 72 28 70 42 6c 6f 62  lob_buffer(pBlob
1ed0: 29 2c 20 62 6c 6f 62 5f 73 69 7a 65 28 70 42 6c  ), blob_size(pBl
1ee0: 6f 62 29 2c 20 53 51 4c 49 54 45 5f 53 54 41 54  ob), SQLITE_STAT
1ef0: 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 74  IC);.}../*.** St
1f00: 65 70 20 74 68 65 20 53 51 4c 20 73 74 61 74 65  ep the SQL state
1f10: 6d 65 6e 74 2e 20 20 52 65 74 75 72 6e 20 65 69  ment.  Return ei
1f20: 74 68 65 72 20 53 51 4c 49 54 45 5f 52 4f 57 20  ther SQLITE_ROW 
1f30: 6f 72 20 61 6e 20 65 72 72 6f 72 20 63 6f 64 65  or an error code
1f40: 0a 2a 2a 20 6f 72 20 53 51 4c 49 54 45 5f 4f 4b  .** or SQLITE_OK
1f50: 20 69 66 20 74 68 65 20 73 74 61 74 65 6d 65 6e   if the statemen
1f60: 74 20 66 69 6e 69 73 68 65 73 20 73 75 63 63 65  t finishes succe
1f70: 73 73 66 75 6c 6c 79 2e 0a 2a 2f 0a 69 6e 74 20  ssfully..*/.int 
1f80: 64 62 5f 73 74 65 70 28 53 74 6d 74 20 2a 70 53  db_step(Stmt *pS
1f90: 74 6d 74 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a  tmt){.  int rc;.
1fa0: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 73    rc = sqlite3_s
1fb0: 74 65 70 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74  tep(pStmt->pStmt
1fc0: 29 3b 0a 20 20 70 53 74 6d 74 2d 3e 6e 53 74 65  );.  pStmt->nSte
1fd0: 70 2b 2b 3b 0a 20 20 72 65 74 75 72 6e 20 72 63  p++;.  return rc
1fe0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 69 6e 74  ;.}../*.** Print
1ff0: 20 77 61 72 6e 69 6e 67 73 20 69 66 20 61 20 71   warnings if a q
2000: 75 65 72 79 20 69 73 20 69 6e 65 66 66 69 63 69  uery is ineffici
2010: 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ent..*/.static v
2020: 6f 69 64 20 64 62 5f 73 74 61 74 73 28 53 74 6d  oid db_stats(Stm
2030: 74 20 2a 70 53 74 6d 74 29 7b 0a 23 69 66 64 65  t *pStmt){.#ifde
2040: 66 20 46 4f 53 53 49 4c 5f 44 45 42 55 47 0a 20  f FOSSIL_DEBUG. 
2050: 20 69 6e 74 20 63 31 2c 20 63 32 2c 20 63 33 3b   int c1, c2, c3;
2060: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
2070: 53 71 6c 20 3d 20 73 71 6c 69 74 65 33 5f 73 71  Sql = sqlite3_sq
2080: 6c 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 29 3b  l(pStmt->pStmt);
2090: 0a 20 20 69 66 28 20 7a 53 71 6c 3d 3d 30 20 29  .  if( zSql==0 )
20a0: 20 72 65 74 75 72 6e 3b 0a 20 20 63 31 20 3d 20   return;.  c1 = 
20b0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 5f 73 74 61  sqlite3_stmt_sta
20c0: 74 75 73 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74  tus(pStmt->pStmt
20d0: 2c 20 53 51 4c 49 54 45 5f 53 54 4d 54 53 54 41  , SQLITE_STMTSTA
20e0: 54 55 53 5f 46 55 4c 4c 53 43 41 4e 5f 53 54 45  TUS_FULLSCAN_STE
20f0: 50 2c 20 31 29 3b 0a 20 20 63 32 20 3d 20 73 71  P, 1);.  c2 = sq
2100: 6c 69 74 65 33 5f 73 74 6d 74 5f 73 74 61 74 75  lite3_stmt_statu
2110: 73 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20  s(pStmt->pStmt, 
2120: 53 51 4c 49 54 45 5f 53 54 4d 54 53 54 41 54 55  SQLITE_STMTSTATU
2130: 53 5f 41 55 54 4f 49 4e 44 45 58 2c 20 31 29 3b  S_AUTOINDEX, 1);
2140: 0a 20 20 63 33 20 3d 20 73 71 6c 69 74 65 33 5f  .  c3 = sqlite3_
2150: 73 74 6d 74 5f 73 74 61 74 75 73 28 70 53 74 6d  stmt_status(pStm
2160: 74 2d 3e 70 53 74 6d 74 2c 20 53 51 4c 49 54 45  t->pStmt, SQLITE
2170: 5f 53 54 4d 54 53 54 41 54 55 53 5f 53 4f 52 54  _STMTSTATUS_SORT
2180: 2c 20 31 29 3b 0a 20 20 69 66 28 20 63 31 3e 70  , 1);.  if( c1>p
2190: 53 74 6d 74 2d 3e 6e 53 74 65 70 2a 34 20 26 26  Stmt->nStep*4 &&
21a0: 20 73 74 72 73 74 72 28 7a 53 71 6c 2c 22 2f 2a   strstr(zSql,"/*
21b0: 73 63 61 6e 2a 2f 22 29 3d 3d 30 20 29 7b 0a 20  scan*/")==0 ){. 
21c0: 20 20 20 66 6f 73 73 69 6c 5f 77 61 72 6e 69 6e     fossil_warnin
21d0: 67 28 22 25 64 20 73 63 61 6e 20 73 74 65 70 73  g("%d scan steps
21e0: 20 66 6f 72 20 25 64 20 72 6f 77 73 20 69 6e 20   for %d rows in 
21f0: 5b 25 73 5d 22 2c 20 63 31 2c 20 70 53 74 6d 74  [%s]", c1, pStmt
2200: 2d 3e 6e 53 74 65 70 2c 20 7a 53 71 6c 29 3b 0a  ->nStep, zSql);.
2210: 20 20 7d 65 6c 73 65 20 69 66 28 20 63 32 20 29    }else if( c2 )
2220: 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 77 61 72  {.    fossil_war
2230: 6e 69 6e 67 28 22 25 64 20 61 75 74 6f 6d 61 74  ning("%d automat
2240: 69 63 20 69 6e 64 65 78 20 72 6f 77 73 20 69 6e  ic index rows in
2250: 20 5b 25 73 5d 22 2c 20 63 32 2c 20 7a 53 71 6c   [%s]", c2, zSql
2260: 29 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 63  );.  }else if( c
2270: 33 20 26 26 20 73 74 72 73 74 72 28 7a 53 71 6c  3 && strstr(zSql
2280: 2c 22 2f 2a 73 6f 72 74 2a 2f 22 29 3d 3d 30 20  ,"/*sort*/")==0 
2290: 26 26 20 73 74 72 73 74 72 28 7a 53 71 6c 2c 22  && strstr(zSql,"
22a0: 2f 2a 73 63 61 6e 2a 2f 22 29 3d 3d 30 20 29 7b  /*scan*/")==0 ){
22b0: 0a 20 20 20 20 66 6f 73 73 69 6c 5f 77 61 72 6e  .    fossil_warn
22c0: 69 6e 67 28 22 73 6f 72 74 20 77 2f 6f 20 69 6e  ing("sort w/o in
22d0: 64 65 78 20 69 6e 20 5b 25 73 5d 22 2c 20 7a 53  dex in [%s]", zS
22e0: 71 6c 29 3b 0a 20 20 7d 0a 20 20 70 53 74 6d 74  ql);.  }.  pStmt
22f0: 2d 3e 6e 53 74 65 70 20 3d 20 30 3b 0a 23 65 6e  ->nStep = 0;.#en
2300: 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 73  dif.}../*.** Res
2310: 65 74 20 6f 72 20 66 69 6e 61 6c 69 7a 65 20 61  et or finalize a
2320: 20 73 74 61 74 65 6d 65 6e 74 2e 0a 2a 2f 0a 69   statement..*/.i
2330: 6e 74 20 64 62 5f 72 65 73 65 74 28 53 74 6d 74  nt db_reset(Stmt
2340: 20 2a 70 53 74 6d 74 29 7b 0a 20 20 69 6e 74 20   *pStmt){.  int 
2350: 72 63 3b 0a 20 20 64 62 5f 73 74 61 74 73 28 70  rc;.  db_stats(p
2360: 53 74 6d 74 29 3b 0a 20 20 72 63 20 3d 20 73 71  Stmt);.  rc = sq
2370: 6c 69 74 65 33 5f 72 65 73 65 74 28 70 53 74 6d  lite3_reset(pStm
2380: 74 2d 3e 70 53 74 6d 74 29 3b 0a 20 20 64 62 5f  t->pStmt);.  db_
2390: 63 68 65 63 6b 5f 72 65 73 75 6c 74 28 72 63 29  check_result(rc)
23a0: 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d  ;.  return rc;.}
23b0: 0a 69 6e 74 20 64 62 5f 66 69 6e 61 6c 69 7a 65  .int db_finalize
23c0: 28 53 74 6d 74 20 2a 70 53 74 6d 74 29 7b 0a 20  (Stmt *pStmt){. 
23d0: 20 69 6e 74 20 72 63 3b 0a 20 20 64 62 5f 73 74   int rc;.  db_st
23e0: 61 74 73 28 70 53 74 6d 74 29 3b 0a 20 20 62 6c  ats(pStmt);.  bl
23f0: 6f 62 5f 72 65 73 65 74 28 26 70 53 74 6d 74 2d  ob_reset(&pStmt-
2400: 3e 73 71 6c 29 3b 0a 20 20 72 63 20 3d 20 73 71  >sql);.  rc = sq
2410: 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 70  lite3_finalize(p
2420: 53 74 6d 74 2d 3e 70 53 74 6d 74 29 3b 0a 20 20  Stmt->pStmt);.  
2430: 64 62 5f 63 68 65 63 6b 5f 72 65 73 75 6c 74 28  db_check_result(
2440: 72 63 29 3b 0a 20 20 70 53 74 6d 74 2d 3e 70 53  rc);.  pStmt->pS
2450: 74 6d 74 20 3d 20 30 3b 0a 20 20 69 66 28 20 70  tmt = 0;.  if( p
2460: 53 74 6d 74 2d 3e 70 4e 65 78 74 20 29 7b 0a 20  Stmt->pNext ){. 
2470: 20 20 20 70 53 74 6d 74 2d 3e 70 4e 65 78 74 2d     pStmt->pNext-
2480: 3e 70 50 72 65 76 20 3d 20 70 53 74 6d 74 2d 3e  >pPrev = pStmt->
2490: 70 50 72 65 76 3b 0a 20 20 7d 0a 20 20 69 66 28  pPrev;.  }.  if(
24a0: 20 70 53 74 6d 74 2d 3e 70 50 72 65 76 20 29 7b   pStmt->pPrev ){
24b0: 0a 20 20 20 20 70 53 74 6d 74 2d 3e 70 50 72 65  .    pStmt->pPre
24c0: 76 2d 3e 70 4e 65 78 74 20 3d 20 70 53 74 6d 74  v->pNext = pStmt
24d0: 2d 3e 70 4e 65 78 74 3b 0a 20 20 7d 65 6c 73 65  ->pNext;.  }else
24e0: 20 69 66 28 20 70 41 6c 6c 53 74 6d 74 3d 3d 70   if( pAllStmt==p
24f0: 53 74 6d 74 20 29 7b 0a 20 20 20 20 70 41 6c 6c  Stmt ){.    pAll
2500: 53 74 6d 74 20 3d 20 70 53 74 6d 74 2d 3e 70 4e  Stmt = pStmt->pN
2510: 65 78 74 3b 0a 20 20 7d 0a 20 20 70 53 74 6d 74  ext;.  }.  pStmt
2520: 2d 3e 70 4e 65 78 74 20 3d 20 30 3b 0a 20 20 70  ->pNext = 0;.  p
2530: 53 74 6d 74 2d 3e 70 50 72 65 76 20 3d 20 30 3b  Stmt->pPrev = 0;
2540: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.
2550: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68  ./*.** Return th
2560: 65 20 72 6f 77 69 64 20 6f 66 20 74 68 65 20 6d  e rowid of the m
2570: 6f 73 74 20 72 65 63 65 6e 74 20 69 6e 73 65 72  ost recent inser
2580: 74 0a 2a 2f 0a 69 36 34 20 64 62 5f 6c 61 73 74  t.*/.i64 db_last
2590: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 76 6f  _insert_rowid(vo
25a0: 69 64 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71  id){.  return sq
25b0: 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72  lite3_last_inser
25c0: 74 5f 72 6f 77 69 64 28 67 2e 64 62 29 3b 0a 7d  t_rowid(g.db);.}
25d0: 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74  ../*.** Return t
25e0: 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 72 6f 77  he number of row
25f0: 73 20 74 68 61 74 20 77 65 72 65 20 63 68 61 6e  s that were chan
2600: 67 65 64 20 62 79 20 74 68 65 20 6d 6f 73 74 20  ged by the most 
2610: 72 65 63 65 6e 74 0a 2a 2a 20 49 4e 53 45 52 54  recent.** INSERT
2620: 2c 20 55 50 44 41 54 45 2c 20 6f 72 20 44 45 4c  , UPDATE, or DEL
2630: 45 54 45 2e 20 20 41 75 78 69 6c 69 61 72 79 20  ETE.  Auxiliary 
2640: 63 68 61 6e 67 65 73 20 63 61 75 73 65 64 20 62  changes caused b
2650: 79 20 74 72 69 67 67 65 72 73 0a 2a 2a 20 6f 72  y triggers.** or
2660: 20 6f 74 68 65 72 20 73 69 64 65 20 65 66 66 65   other side effe
2670: 63 74 73 20 61 72 65 20 6e 6f 74 20 63 6f 75 6e  cts are not coun
2680: 74 65 64 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 63  ted..*/.int db_c
2690: 68 61 6e 67 65 73 28 76 6f 69 64 29 7b 0a 20 20  hanges(void){.  
26a0: 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 63  return sqlite3_c
26b0: 68 61 6e 67 65 73 28 67 2e 64 62 29 3b 0a 7d 0a  hanges(g.db);.}.
26c0: 0a 2f 2a 0a 2a 2a 20 45 78 74 72 61 63 74 20 74  ./*.** Extract t
26d0: 65 78 74 2c 20 69 6e 74 65 67 65 72 2c 20 6f 72  ext, integer, or
26e0: 20 62 6c 6f 62 20 76 61 6c 75 65 73 20 66 72 6f   blob values fro
26f0: 6d 20 74 68 65 20 4e 2d 74 68 20 63 6f 6c 75 6d  m the N-th colum
2700: 6e 20 6f 66 20 74 68 65 0a 2a 2a 20 63 75 72 72  n of the.** curr
2710: 65 6e 74 20 72 6f 77 2e 0a 2a 2f 0a 69 6e 74 20  ent row..*/.int 
2720: 64 62 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28  db_column_bytes(
2730: 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 69 6e 74  Stmt *pStmt, int
2740: 20 4e 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71   N){.  return sq
2750: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74  lite3_column_byt
2760: 65 73 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c  es(pStmt->pStmt,
2770: 20 4e 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 63 6f   N);.}.int db_co
2780: 6c 75 6d 6e 5f 69 6e 74 28 53 74 6d 74 20 2a 70  lumn_int(Stmt *p
2790: 53 74 6d 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20  Stmt, int N){.  
27a0: 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 63  return sqlite3_c
27b0: 6f 6c 75 6d 6e 5f 69 6e 74 28 70 53 74 6d 74 2d  olumn_int(pStmt-
27c0: 3e 70 53 74 6d 74 2c 20 4e 29 3b 0a 7d 0a 69 36  >pStmt, N);.}.i6
27d0: 34 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36  4 db_column_int6
27e0: 34 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 69  4(Stmt *pStmt, i
27f0: 6e 74 20 4e 29 7b 0a 20 20 72 65 74 75 72 6e 20  nt N){.  return 
2800: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69  sqlite3_column_i
2810: 6e 74 36 34 28 70 53 74 6d 74 2d 3e 70 53 74 6d  nt64(pStmt->pStm
2820: 74 2c 20 4e 29 3b 0a 7d 0a 64 6f 75 62 6c 65 20  t, N);.}.double 
2830: 64 62 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 6c 65  db_column_double
2840: 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 69 6e  (Stmt *pStmt, in
2850: 74 20 4e 29 7b 0a 20 20 72 65 74 75 72 6e 20 73  t N){.  return s
2860: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f  qlite3_column_do
2870: 75 62 6c 65 28 70 53 74 6d 74 2d 3e 70 53 74 6d  uble(pStmt->pStm
2880: 74 2c 20 4e 29 3b 0a 7d 0a 63 6f 6e 73 74 20 63  t, N);.}.const c
2890: 68 61 72 20 2a 64 62 5f 63 6f 6c 75 6d 6e 5f 74  har *db_column_t
28a0: 65 78 74 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c  ext(Stmt *pStmt,
28b0: 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65 74 75 72   int N){.  retur
28c0: 6e 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  n (char*)sqlite3
28d0: 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 70 53 74  _column_text(pSt
28e0: 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 3b 0a 7d  mt->pStmt, N);.}
28f0: 0a 63 6f 6e 73 74 20 63 68 61 72 20 2a 64 62 5f  .const char *db_
2900: 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 28 53 74 6d 74  column_name(Stmt
2910: 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 4e 29 7b   *pStmt, int N){
2920: 0a 20 20 72 65 74 75 72 6e 20 28 63 68 61 72 2a  .  return (char*
2930: 29 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f  )sqlite3_column_
2940: 6e 61 6d 65 28 70 53 74 6d 74 2d 3e 70 53 74 6d  name(pStmt->pStm
2950: 74 2c 20 4e 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f  t, N);.}.int db_
2960: 63 6f 6c 75 6d 6e 5f 63 6f 75 6e 74 28 53 74 6d  column_count(Stm
2970: 74 20 2a 70 53 74 6d 74 29 7b 0a 20 20 72 65 74  t *pStmt){.  ret
2980: 75 72 6e 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  urn sqlite3_colu
2990: 6d 6e 5f 63 6f 75 6e 74 28 70 53 74 6d 74 2d 3e  mn_count(pStmt->
29a0: 70 53 74 6d 74 29 3b 0a 7d 0a 63 68 61 72 20 2a  pStmt);.}.char *
29b0: 64 62 5f 63 6f 6c 75 6d 6e 5f 6d 61 6c 6c 6f 63  db_column_malloc
29c0: 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 69 6e  (Stmt *pStmt, in
29d0: 74 20 4e 29 7b 0a 20 20 72 65 74 75 72 6e 20 6d  t N){.  return m
29e0: 70 72 69 6e 74 66 28 22 25 73 22 2c 20 64 62 5f  printf("%s", db_
29f0: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 70 53 74 6d  column_text(pStm
2a00: 74 2c 20 4e 29 29 3b 0a 7d 0a 76 6f 69 64 20 64  t, N));.}.void d
2a10: 62 5f 63 6f 6c 75 6d 6e 5f 62 6c 6f 62 28 53 74  b_column_blob(St
2a20: 6d 74 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 4e  mt *pStmt, int N
2a30: 2c 20 42 6c 6f 62 20 2a 70 42 6c 6f 62 29 7b 0a  , Blob *pBlob){.
2a40: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 28 70 42    blob_append(pB
2a50: 6c 6f 62 2c 20 73 71 6c 69 74 65 33 5f 63 6f 6c  lob, sqlite3_col
2a60: 75 6d 6e 5f 62 6c 6f 62 28 70 53 74 6d 74 2d 3e  umn_blob(pStmt->
2a70: 70 53 74 6d 74 2c 20 4e 29 2c 0a 20 20 20 20 20  pStmt, N),.     
2a80: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33           sqlite3
2a90: 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28 70 53  _column_bytes(pS
2aa0: 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 29 3b  tmt->pStmt, N));
2ab0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 69 74 69 61  .}../*.** Initia
2ac0: 6c 69 7a 65 20 61 20 62 6c 6f 62 20 74 6f 20 61  lize a blob to a
2ad0: 6e 20 65 70 68 65 72 6d 65 72 61 6c 20 63 6f 70  n ephermeral cop
2ae0: 79 20 6f 66 20 74 68 65 20 63 6f 6e 74 65 6e 74  y of the content
2af0: 20 6f 66 20 61 0a 2a 2a 20 63 6f 6c 75 6d 6e 20   of a.** column 
2b00: 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 72  in the current r
2b10: 6f 77 2e 20 20 54 68 65 20 64 61 74 61 20 69 6e  ow.  The data in
2b20: 20 74 68 65 20 62 6c 6f 62 20 77 69 6c 6c 20 62   the blob will b
2b30: 65 63 6f 6d 65 0a 2a 2a 20 69 6e 76 61 6c 69 64  ecome.** invalid
2b40: 20 77 68 65 6e 20 74 68 65 20 73 74 61 74 65 6d   when the statem
2b50: 65 6e 74 20 69 73 20 73 74 65 70 70 65 64 20 6f  ent is stepped o
2b60: 72 20 72 65 73 65 74 2e 0a 2a 2f 0a 76 6f 69 64  r reset..*/.void
2b70: 20 64 62 5f 65 70 68 65 6d 65 72 61 6c 5f 62 6c   db_ephemeral_bl
2b80: 6f 62 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20  ob(Stmt *pStmt, 
2b90: 69 6e 74 20 4e 2c 20 42 6c 6f 62 20 2a 70 42 6c  int N, Blob *pBl
2ba0: 6f 62 29 7b 0a 20 20 62 6c 6f 62 5f 69 6e 69 74  ob){.  blob_init
2bb0: 28 70 42 6c 6f 62 2c 20 73 71 6c 69 74 65 33 5f  (pBlob, sqlite3_
2bc0: 63 6f 6c 75 6d 6e 5f 62 6c 6f 62 28 70 53 74 6d  column_blob(pStm
2bd0: 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 2c 0a 20 20  t->pStmt, N),.  
2be0: 20 20 20 20 20 20 20 20 20 20 20 20 73 71 6c 69              sqli
2bf0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73  te3_column_bytes
2c00: 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e  (pStmt->pStmt, N
2c10: 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68 65  ));.}../*.** Che
2c20: 63 6b 20 61 20 72 65 73 75 6c 74 20 63 6f 64 65  ck a result code
2c30: 2e 20 20 49 66 20 69 74 20 69 73 20 6e 6f 74 20  .  If it is not 
2c40: 53 51 4c 49 54 45 5f 4f 4b 2c 20 70 72 69 6e 74  SQLITE_OK, print
2c50: 20 74 68 65 0a 2a 2a 20 63 6f 72 72 65 73 70 6f   the.** correspo
2c60: 6e 64 69 6e 67 20 65 72 72 6f 72 20 6d 65 73 73  nding error mess
2c70: 61 67 65 20 61 6e 64 20 65 78 69 74 2e 0a 2a 2f  age and exit..*/
2c80: 0a 76 6f 69 64 20 64 62 5f 63 68 65 63 6b 5f 72  .void db_check_r
2c90: 65 73 75 6c 74 28 69 6e 74 20 72 63 29 7b 0a 20  esult(int rc){. 
2ca0: 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f   if( rc!=SQLITE_
2cb0: 4f 4b 20 29 7b 0a 20 20 20 20 64 62 5f 65 72 72  OK ){.    db_err
2cc0: 28 22 53 51 4c 20 65 72 72 6f 72 3a 20 25 73 22  ("SQL error: %s"
2cd0: 2c 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67  , sqlite3_errmsg
2ce0: 28 67 2e 64 62 29 29 3b 0a 20 20 7d 0a 7d 0a 0a  (g.db));.  }.}..
2cf0: 2f 2a 0a 2a 2a 20 45 78 65 63 75 74 65 20 61 20  /*.** Execute a 
2d00: 73 69 6e 67 6c 65 20 70 72 65 70 61 72 65 64 20  single prepared 
2d10: 73 74 61 74 65 6d 65 6e 74 20 75 6e 74 69 6c 20  statement until 
2d20: 69 74 20 66 69 6e 69 73 68 65 73 2e 0a 2a 2f 0a  it finishes..*/.
2d30: 69 6e 74 20 64 62 5f 65 78 65 63 28 53 74 6d 74  int db_exec(Stmt
2d40: 20 2a 70 53 74 6d 74 29 7b 0a 20 20 69 6e 74 20   *pStmt){.  int 
2d50: 72 63 3b 0a 20 20 77 68 69 6c 65 28 20 28 72 63  rc;.  while( (rc
2d60: 20 3d 20 64 62 5f 73 74 65 70 28 70 53 74 6d 74   = db_step(pStmt
2d70: 29 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29  ))==SQLITE_ROW )
2d80: 7b 7d 0a 20 20 72 63 20 3d 20 64 62 5f 72 65 73  {}.  rc = db_res
2d90: 65 74 28 70 53 74 6d 74 29 3b 0a 20 20 64 62 5f  et(pStmt);.  db_
2da0: 63 68 65 63 6b 5f 72 65 73 75 6c 74 28 72 63 29  check_result(rc)
2db0: 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d  ;.  return rc;.}
2dc0: 0a 0a 2f 2a 0a 2a 2a 20 45 78 65 63 75 74 65 20  ../*.** Execute 
2dd0: 6d 75 6c 74 69 70 6c 65 20 53 51 4c 20 73 74 61  multiple SQL sta
2de0: 74 65 6d 65 6e 74 73 2e 0a 2a 2f 0a 69 6e 74 20  tements..*/.int 
2df0: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 63 6f  db_multi_exec(co
2e00: 6e 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20  nst char *zSql, 
2e10: 2e 2e 2e 29 7b 0a 20 20 42 6c 6f 62 20 73 71 6c  ...){.  Blob sql
2e20: 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 76 61  ;.  int rc;.  va
2e30: 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61 72  _list ap;.  char
2e40: 20 2a 7a 45 72 72 20 3d 20 30 3b 0a 20 20 62 6c   *zErr = 0;.  bl
2e50: 6f 62 5f 69 6e 69 74 28 26 73 71 6c 2c 20 30 2c  ob_init(&sql, 0,
2e60: 20 30 29 3b 0a 20 20 76 61 5f 73 74 61 72 74 28   0);.  va_start(
2e70: 61 70 2c 20 7a 53 71 6c 29 3b 0a 20 20 62 6c 6f  ap, zSql);.  blo
2e80: 62 5f 76 61 70 70 65 6e 64 66 28 26 73 71 6c 2c  b_vappendf(&sql,
2e90: 20 7a 53 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61   zSql, ap);.  va
2ea0: 5f 65 6e 64 28 61 70 29 3b 0a 20 20 72 63 20 3d  _end(ap);.  rc =
2eb0: 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 67 2e   sqlite3_exec(g.
2ec0: 64 62 2c 20 62 6c 6f 62 5f 62 75 66 66 65 72 28  db, blob_buffer(
2ed0: 26 73 71 6c 29 2c 20 30 2c 20 30 2c 20 26 7a 45  &sql), 0, 0, &zE
2ee0: 72 72 29 3b 0a 20 20 69 66 28 20 72 63 21 3d 53  rr);.  if( rc!=S
2ef0: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20  QLITE_OK ){.    
2f00: 64 62 5f 65 72 72 28 22 25 73 5c 6e 25 73 22 2c  db_err("%s\n%s",
2f10: 20 7a 45 72 72 2c 20 62 6c 6f 62 5f 62 75 66 66   zErr, blob_buff
2f20: 65 72 28 26 73 71 6c 29 29 3b 0a 20 20 7d 0a 20  er(&sql));.  }. 
2f30: 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 73 71 6c   blob_reset(&sql
2f40: 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a  );.  return rc;.
2f50: 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 65 63 75 74 65  }../*.** Execute
2f60: 20 61 20 71 75 65 72 79 20 61 6e 64 20 72 65 74   a query and ret
2f70: 75 72 6e 20 61 20 73 69 6e 67 6c 65 20 69 6e 74  urn a single int
2f80: 65 67 65 72 20 76 61 6c 75 65 2e 0a 2a 2f 0a 69  eger value..*/.i
2f90: 36 34 20 64 62 5f 69 6e 74 36 34 28 69 36 34 20  64 db_int64(i64 
2fa0: 69 44 66 6c 74 2c 20 63 6f 6e 73 74 20 63 68 61  iDflt, const cha
2fb0: 72 20 2a 7a 53 71 6c 2c 20 2e 2e 2e 29 7b 0a 20  r *zSql, ...){. 
2fc0: 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 53   va_list ap;.  S
2fd0: 74 6d 74 20 73 3b 0a 20 20 69 36 34 20 72 63 3b  tmt s;.  i64 rc;
2fe0: 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20  .  va_start(ap, 
2ff0: 7a 53 71 6c 29 3b 0a 20 20 64 62 5f 76 70 72 65  zSql);.  db_vpre
3000: 70 61 72 65 28 26 73 2c 20 7a 53 71 6c 2c 20 61  pare(&s, zSql, a
3010: 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29  p);.  va_end(ap)
3020: 3b 0a 20 20 69 66 28 20 64 62 5f 73 74 65 70 28  ;.  if( db_step(
3030: 26 73 29 21 3d 53 51 4c 49 54 45 5f 52 4f 57 20  &s)!=SQLITE_ROW 
3040: 29 7b 0a 20 20 20 20 72 63 20 3d 20 69 44 66 6c  ){.    rc = iDfl
3050: 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  t;.  }else{.    
3060: 72 63 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69  rc = db_column_i
3070: 6e 74 36 34 28 26 73 2c 20 30 29 3b 0a 20 20 7d  nt64(&s, 0);.  }
3080: 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26  .  db_finalize(&
3090: 73 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b  s);.  return rc;
30a0: 0a 7d 0a 69 6e 74 20 64 62 5f 69 6e 74 28 69 6e  .}.int db_int(in
30b0: 74 20 69 44 66 6c 74 2c 20 63 6f 6e 73 74 20 63  t iDflt, const c
30c0: 68 61 72 20 2a 7a 53 71 6c 2c 20 2e 2e 2e 29 7b  har *zSql, ...){
30d0: 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20  .  va_list ap;. 
30e0: 20 53 74 6d 74 20 73 3b 0a 20 20 69 6e 74 20 72   Stmt s;.  int r
30f0: 63 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70  c;.  va_start(ap
3100: 2c 20 7a 53 71 6c 29 3b 0a 20 20 64 62 5f 76 70  , zSql);.  db_vp
3110: 72 65 70 61 72 65 28 26 73 2c 20 7a 53 71 6c 2c  repare(&s, zSql,
3120: 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61   ap);.  va_end(a
3130: 70 29 3b 0a 20 20 69 66 28 20 64 62 5f 73 74 65  p);.  if( db_ste
3140: 70 28 26 73 29 21 3d 53 51 4c 49 54 45 5f 52 4f  p(&s)!=SQLITE_RO
3150: 57 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 69 44  W ){.    rc = iD
3160: 66 6c 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  flt;.  }else{.  
3170: 20 20 72 63 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e    rc = db_column
3180: 5f 69 6e 74 28 26 73 2c 20 30 29 3b 0a 20 20 7d  _int(&s, 0);.  }
3190: 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26  .  db_finalize(&
31a0: 73 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b  s);.  return rc;
31b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e  .}../*.** Return
31c0: 20 54 52 55 45 20 69 66 20 74 68 65 20 71 75 65   TRUE if the que
31d0: 72 79 20 77 6f 75 6c 64 20 72 65 74 75 72 6e 20  ry would return 
31e0: 31 20 6f 72 20 6d 6f 72 65 20 72 6f 77 73 2e 20  1 or more rows. 
31f0: 20 52 65 74 75 72 6e 0a 2a 2a 20 46 41 4c 53 45   Return.** FALSE
3200: 20 69 66 20 74 68 65 20 71 75 65 72 79 20 72 65   if the query re
3210: 73 75 6c 74 20 77 6f 75 6c 64 20 62 65 20 61 6e  sult would be an
3220: 20 65 6d 70 74 79 20 73 65 74 2e 0a 2a 2f 0a 69   empty set..*/.i
3230: 6e 74 20 64 62 5f 65 78 69 73 74 73 28 63 6f 6e  nt db_exists(con
3240: 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20 2e  st char *zSql, .
3250: 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61  ..){.  va_list a
3260: 70 3b 0a 20 20 53 74 6d 74 20 73 3b 0a 20 20 69  p;.  Stmt s;.  i
3270: 6e 74 20 72 63 3b 0a 20 20 76 61 5f 73 74 61 72  nt rc;.  va_star
3280: 74 28 61 70 2c 20 7a 53 71 6c 29 3b 0a 20 20 64  t(ap, zSql);.  d
3290: 62 5f 76 70 72 65 70 61 72 65 28 26 73 2c 20 7a  b_vprepare(&s, z
32a0: 53 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65  Sql, ap);.  va_e
32b0: 6e 64 28 61 70 29 3b 0a 20 20 69 66 28 20 64 62  nd(ap);.  if( db
32c0: 5f 73 74 65 70 28 26 73 29 21 3d 53 51 4c 49 54  _step(&s)!=SQLIT
32d0: 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 72 63 20  E_ROW ){.    rc 
32e0: 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  = 0;.  }else{.  
32f0: 20 20 72 63 20 3d 20 31 3b 0a 20 20 7d 0a 20 20    rc = 1;.  }.  
3300: 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26 73 29 3b  db_finalize(&s);
3310: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.
3320: 0a 0a 2f 2a 0a 2a 2a 20 45 78 65 63 75 74 65 20  ../*.** Execute 
3330: 61 20 71 75 65 72 79 20 61 6e 64 20 72 65 74 75  a query and retu
3340: 72 6e 20 61 20 66 6c 6f 61 74 69 6e 67 2d 70 6f  rn a floating-po
3350: 69 6e 74 20 76 61 6c 75 65 2e 0a 2a 2f 0a 64 6f  int value..*/.do
3360: 75 62 6c 65 20 64 62 5f 64 6f 75 62 6c 65 28 64  uble db_double(d
3370: 6f 75 62 6c 65 20 72 44 66 6c 74 2c 20 63 6f 6e  ouble rDflt, con
3380: 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20 2e  st char *zSql, .
3390: 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61  ..){.  va_list a
33a0: 70 3b 0a 20 20 53 74 6d 74 20 73 3b 0a 20 20 64  p;.  Stmt s;.  d
33b0: 6f 75 62 6c 65 20 72 3b 0a 20 20 76 61 5f 73 74  ouble r;.  va_st
33c0: 61 72 74 28 61 70 2c 20 7a 53 71 6c 29 3b 0a 20  art(ap, zSql);. 
33d0: 20 64 62 5f 76 70 72 65 70 61 72 65 28 26 73 2c   db_vprepare(&s,
33e0: 20 7a 53 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61   zSql, ap);.  va
33f0: 5f 65 6e 64 28 61 70 29 3b 0a 20 20 69 66 28 20  _end(ap);.  if( 
3400: 64 62 5f 73 74 65 70 28 26 73 29 21 3d 53 51 4c  db_step(&s)!=SQL
3410: 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 72  ITE_ROW ){.    r
3420: 20 3d 20 72 44 66 6c 74 3b 0a 20 20 7d 65 6c 73   = rDflt;.  }els
3430: 65 7b 0a 20 20 20 20 72 20 3d 20 64 62 5f 63 6f  e{.    r = db_co
3440: 6c 75 6d 6e 5f 64 6f 75 62 6c 65 28 26 73 2c 20  lumn_double(&s, 
3450: 30 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e  0);.  }.  db_fin
3460: 61 6c 69 7a 65 28 26 73 29 3b 0a 20 20 72 65 74  alize(&s);.  ret
3470: 75 72 6e 20 72 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  urn r;.}../*.** 
3480: 45 78 65 63 75 74 65 20 61 20 71 75 65 72 79 20  Execute a query 
3490: 61 6e 64 20 61 70 70 65 6e 64 20 74 68 65 20 66  and append the f
34a0: 69 72 73 74 20 63 6f 6c 75 6d 6e 20 6f 66 20 74  irst column of t
34b0: 68 65 20 66 69 72 73 74 20 72 6f 77 0a 2a 2a 20  he first row.** 
34c0: 6f 66 20 74 68 65 20 72 65 73 75 6c 74 20 73 65  of the result se
34d0: 74 20 74 6f 20 62 6c 6f 62 20 67 69 76 65 6e 20  t to blob given 
34e0: 69 6e 20 74 68 65 20 66 69 72 73 74 20 61 72 67  in the first arg
34f0: 75 6d 65 6e 74 2e 0a 2a 2f 0a 76 6f 69 64 20 64  ument..*/.void d
3500: 62 5f 62 6c 6f 62 28 42 6c 6f 62 20 2a 70 52 65  b_blob(Blob *pRe
3510: 73 75 6c 74 2c 20 63 6f 6e 73 74 20 63 68 61 72  sult, const char
3520: 20 2a 7a 53 71 6c 2c 20 2e 2e 2e 29 7b 0a 20 20   *zSql, ...){.  
3530: 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 53 74  va_list ap;.  St
3540: 6d 74 20 73 3b 0a 20 20 76 61 5f 73 74 61 72 74  mt s;.  va_start
3550: 28 61 70 2c 20 7a 53 71 6c 29 3b 0a 20 20 64 62  (ap, zSql);.  db
3560: 5f 76 70 72 65 70 61 72 65 28 26 73 2c 20 7a 53  _vprepare(&s, zS
3570: 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e  ql, ap);.  va_en
3580: 64 28 61 70 29 3b 0a 20 20 69 66 28 20 64 62 5f  d(ap);.  if( db_
3590: 73 74 65 70 28 26 73 29 3d 3d 53 51 4c 49 54 45  step(&s)==SQLITE
35a0: 5f 52 4f 57 20 29 7b 0a 20 20 20 20 62 6c 6f 62  _ROW ){.    blob
35b0: 5f 61 70 70 65 6e 64 28 70 52 65 73 75 6c 74 2c  _append(pResult,
35c0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
35d0: 62 6c 6f 62 28 73 2e 70 53 74 6d 74 2c 20 30 29  blob(s.pStmt, 0)
35e0: 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,.              
35f0: 20 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74             sqlit
3600: 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28  e3_column_bytes(
3610: 73 2e 70 53 74 6d 74 2c 20 30 29 29 3b 0a 20 20  s.pStmt, 0));.  
3620: 7d 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28  }.  db_finalize(
3630: 26 73 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78  &s);.}../*.** Ex
3640: 65 63 75 74 65 20 61 20 71 75 65 72 79 2e 20 20  ecute a query.  
3650: 52 65 74 75 72 6e 20 74 68 65 20 66 69 72 73 74  Return the first
3660: 20 63 6f 6c 75 6d 6e 20 6f 66 20 74 68 65 20 66   column of the f
3670: 69 72 73 74 20 72 6f 77 0a 2a 2a 20 6f 66 20 74  irst row.** of t
3680: 68 65 20 72 65 73 75 6c 74 20 73 65 74 20 61 73  he result set as
3690: 20 61 20 73 74 72 69 6e 67 2e 20 20 53 70 61 63   a string.  Spac
36a0: 65 20 74 6f 20 68 6f 6c 64 20 74 68 65 20 73 74  e to hold the st
36b0: 72 69 6e 67 20 69 73 0a 2a 2a 20 6f 62 74 61 69  ring is.** obtai
36c0: 6e 65 64 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63 28  ned from malloc(
36d0: 29 2e 20 20 49 66 20 74 68 65 20 72 65 73 75 6c  ).  If the resul
36e0: 74 20 73 65 74 20 69 73 20 65 6d 70 74 79 2c 20  t set is empty, 
36f0: 72 65 74 75 72 6e 0a 2a 2a 20 7a 44 65 66 61 75  return.** zDefau
3700: 6c 74 20 69 6e 73 74 65 61 64 2e 0a 2a 2f 0a 63  lt instead..*/.c
3710: 68 61 72 20 2a 64 62 5f 74 65 78 74 28 63 68 61  har *db_text(cha
3720: 72 20 2a 7a 44 65 66 61 75 6c 74 2c 20 63 6f 6e  r *zDefault, con
3730: 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20 2e  st char *zSql, .
3740: 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61  ..){.  va_list a
3750: 70 3b 0a 20 20 53 74 6d 74 20 73 3b 0a 20 20 63  p;.  Stmt s;.  c
3760: 68 61 72 20 2a 7a 3b 0a 20 20 76 61 5f 73 74 61  har *z;.  va_sta
3770: 72 74 28 61 70 2c 20 7a 53 71 6c 29 3b 0a 20 20  rt(ap, zSql);.  
3780: 64 62 5f 76 70 72 65 70 61 72 65 28 26 73 2c 20  db_vprepare(&s, 
3790: 7a 53 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61 5f  zSql, ap);.  va_
37a0: 65 6e 64 28 61 70 29 3b 0a 20 20 69 66 28 20 64  end(ap);.  if( d
37b0: 62 5f 73 74 65 70 28 26 73 29 3d 3d 53 51 4c 49  b_step(&s)==SQLI
37c0: 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 7a 20  TE_ROW ){.    z 
37d0: 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 22 2c 20  = mprintf("%s", 
37e0: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74  sqlite3_column_t
37f0: 65 78 74 28 73 2e 70 53 74 6d 74 2c 20 30 29 29  ext(s.pStmt, 0))
3800: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 7a 44  ;.  }else if( zD
3810: 65 66 61 75 6c 74 20 29 7b 0a 20 20 20 20 7a 20  efault ){.    z 
3820: 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 22 2c 20  = mprintf("%s", 
3830: 7a 44 65 66 61 75 6c 74 29 3b 0a 20 20 7d 65 6c  zDefault);.  }el
3840: 73 65 7b 0a 20 20 20 20 7a 20 3d 20 30 3b 0a 20  se{.    z = 0;. 
3850: 20 7d 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65   }.  db_finalize
3860: 28 26 73 29 3b 0a 20 20 72 65 74 75 72 6e 20 7a  (&s);.  return z
3870: 3b 0a 7d 0a 0a 23 69 66 20 64 65 66 69 6e 65 64  ;.}..#if defined
3880: 28 5f 57 49 4e 33 32 29 0a 65 78 74 65 72 6e 20  (_WIN32).extern 
3890: 63 68 61 72 20 2a 73 71 6c 69 74 65 33 5f 77 69  char *sqlite3_wi
38a0: 6e 33 32 5f 6d 62 63 73 5f 74 6f 5f 75 74 66 38  n32_mbcs_to_utf8
38b0: 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 3b 0a 23  (const char*);.#
38c0: 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 49 6e 69  endif../*.** Ini
38d0: 74 69 61 6c 69 7a 65 20 61 20 6e 65 77 20 64 61  tialize a new da
38e0: 74 61 62 61 73 65 20 66 69 6c 65 20 77 69 74 68  tabase file with
38f0: 20 74 68 65 20 67 69 76 65 6e 20 73 63 68 65 6d   the given schem
3900: 61 2e 20 20 49 66 20 61 6e 79 74 68 69 6e 67 0a  a.  If anything.
3910: 2a 2a 20 67 6f 65 73 20 77 72 6f 6e 67 2c 20 63  ** goes wrong, c
3920: 61 6c 6c 20 64 62 5f 65 72 72 28 29 20 74 6f 20  all db_err() to 
3930: 65 78 69 74 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62  exit..*/.void db
3940: 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 65 28 0a  _init_database(.
3950: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46    const char *zF
3960: 69 6c 65 4e 61 6d 65 2c 20 20 20 2f 2a 20 4e 61  ileName,   /* Na
3970: 6d 65 20 6f 66 20 64 61 74 61 62 61 73 65 20 66  me of database f
3980: 69 6c 65 20 74 6f 20 63 72 65 61 74 65 20 2a 2f  ile to create */
3990: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
39a0: 53 63 68 65 6d 61 2c 20 20 20 20 20 2f 2a 20 46  Schema,     /* F
39b0: 69 72 73 74 20 70 61 72 74 20 6f 66 20 73 63 68  irst part of sch
39c0: 65 6d 61 20 2a 2f 0a 20 20 2e 2e 2e 20 20 20 20  ema */.  ...    
39d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
39e0: 20 20 2f 2a 20 41 64 64 69 74 69 6f 6e 61 6c 20    /* Additional 
39f0: 53 51 4c 20 74 6f 20 72 75 6e 2e 20 20 54 65 72  SQL to run.  Ter
3a00: 6d 69 6e 61 74 65 20 77 69 74 68 20 4e 55 4c 4c  minate with NULL
3a10: 2e 20 2a 2f 0a 29 7b 0a 20 20 73 71 6c 69 74 65  . */.){.  sqlite
3a20: 33 20 2a 64 62 3b 0a 20 20 69 6e 74 20 72 63 3b  3 *db;.  int rc;
3a30: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
3a40: 53 71 6c 3b 0a 20 20 76 61 5f 6c 69 73 74 20 61  Sql;.  va_list a
3a50: 70 3b 0a 0a 23 69 66 20 64 65 66 69 6e 65 64 28  p;..#if defined(
3a60: 5f 57 49 4e 33 32 29 0a 20 20 7a 46 69 6c 65 4e  _WIN32).  zFileN
3a70: 61 6d 65 20 3d 20 73 71 6c 69 74 65 33 5f 77 69  ame = sqlite3_wi
3a80: 6e 33 32 5f 6d 62 63 73 5f 74 6f 5f 75 74 66 38  n32_mbcs_to_utf8
3a90: 28 7a 46 69 6c 65 4e 61 6d 65 29 3b 0a 23 65 6e  (zFileName);.#en
3aa0: 64 69 66 0a 20 20 72 63 20 3d 20 73 71 6c 69 74  dif.  rc = sqlit
3ab0: 65 33 5f 6f 70 65 6e 28 7a 46 69 6c 65 4e 61 6d  e3_open(zFileNam
3ac0: 65 2c 20 26 64 62 29 3b 0a 20 20 69 66 28 20 72  e, &db);.  if( r
3ad0: 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a  c!=SQLITE_OK ){.
3ae0: 20 20 20 20 64 62 5f 65 72 72 28 73 71 6c 69 74      db_err(sqlit
3af0: 65 33 5f 65 72 72 6d 73 67 28 64 62 29 29 3b 0a  e3_errmsg(db));.
3b00: 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 62 75    }.  sqlite3_bu
3b10: 73 79 5f 74 69 6d 65 6f 75 74 28 64 62 2c 20 35  sy_timeout(db, 5
3b20: 30 30 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f  000);.  sqlite3_
3b30: 65 78 65 63 28 64 62 2c 20 22 42 45 47 49 4e 20  exec(db, "BEGIN 
3b40: 45 58 43 4c 55 53 49 56 45 22 2c 20 30 2c 20 30  EXCLUSIVE", 0, 0
3b50: 2c 20 30 29 3b 0a 20 20 72 63 20 3d 20 73 71 6c  , 0);.  rc = sql
3b60: 69 74 65 33 5f 65 78 65 63 28 64 62 2c 20 7a 53  ite3_exec(db, zS
3b70: 63 68 65 6d 61 2c 20 30 2c 20 30 2c 20 30 29 3b  chema, 0, 0, 0);
3b80: 0a 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54  .  if( rc!=SQLIT
3b90: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 64 62 5f 65  E_OK ){.    db_e
3ba0: 72 72 28 73 71 6c 69 74 65 33 5f 65 72 72 6d 73  rr(sqlite3_errms
3bb0: 67 28 64 62 29 29 3b 0a 20 20 7d 0a 20 20 76 61  g(db));.  }.  va
3bc0: 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 63 68 65  _start(ap, zSche
3bd0: 6d 61 29 3b 0a 20 20 77 68 69 6c 65 28 20 28 7a  ma);.  while( (z
3be0: 53 71 6c 20 3d 20 76 61 5f 61 72 67 28 61 70 2c  Sql = va_arg(ap,
3bf0: 20 63 6f 6e 73 74 20 63 68 61 72 2a 29 29 21 3d   const char*))!=
3c00: 30 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 73 71  0 ){.    rc = sq
3c10: 6c 69 74 65 33 5f 65 78 65 63 28 64 62 2c 20 7a  lite3_exec(db, z
3c20: 53 71 6c 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20  Sql, 0, 0, 0);. 
3c30: 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54     if( rc!=SQLIT
3c40: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20 20 64 62  E_OK ){.      db
3c50: 5f 65 72 72 28 73 71 6c 69 74 65 33 5f 65 72 72  _err(sqlite3_err
3c60: 6d 73 67 28 64 62 29 29 3b 0a 20 20 20 20 7d 0a  msg(db));.    }.
3c70: 20 20 7d 0a 20 20 76 61 5f 65 6e 64 28 61 70 29    }.  va_end(ap)
3c80: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 65 78 65 63  ;.  sqlite3_exec
3c90: 28 64 62 2c 20 22 43 4f 4d 4d 49 54 22 2c 20 30  (db, "COMMIT", 0
3ca0: 2c 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74  , 0, 0);.  sqlit
3cb0: 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b 0a 7d 0a  e3_close(db);.}.
3cc0: 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 61 20 64 61  ./*.** Open a da
3cd0: 74 61 62 61 73 65 20 66 69 6c 65 2e 20 20 52 65  tabase file.  Re
3ce0: 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72 20 74  turn a pointer t
3cf0: 6f 20 74 68 65 20 6e 65 77 20 64 61 74 61 62 61  o the new databa
3d00: 73 65 0a 2a 2a 20 63 6f 6e 6e 65 63 74 69 6f 6e  se.** connection
3d10: 2e 20 20 41 6e 20 65 72 72 6f 72 20 72 65 73 75  .  An error resu
3d20: 6c 74 73 20 69 6e 20 70 72 6f 63 65 73 73 20 61  lts in process a
3d30: 62 6f 72 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  bort..*/.static 
3d40: 73 71 6c 69 74 65 33 20 2a 6f 70 65 6e 44 61 74  sqlite3 *openDat
3d50: 61 62 61 73 65 28 63 6f 6e 73 74 20 63 68 61 72  abase(const char
3d60: 20 2a 7a 44 62 4e 61 6d 65 29 7b 0a 20 20 69 6e   *zDbName){.  in
3d70: 74 20 72 63 3b 0a 20 20 63 6f 6e 73 74 20 63 68  t rc;.  const ch
3d80: 61 72 20 2a 7a 56 66 73 3b 0a 20 20 73 71 6c 69  ar *zVfs;.  sqli
3d90: 74 65 33 20 2a 64 62 3b 0a 0a 20 20 7a 56 66 73  te3 *db;..  zVfs
3da0: 20 3d 20 67 65 74 65 6e 76 28 22 46 4f 53 53 49   = getenv("FOSSI
3db0: 4c 5f 56 46 53 22 29 3b 0a 23 69 66 20 64 65 66  L_VFS");.#if def
3dc0: 69 6e 65 64 28 5f 57 49 4e 33 32 29 0a 20 20 7a  ined(_WIN32).  z
3dd0: 44 62 4e 61 6d 65 20 3d 20 73 71 6c 69 74 65 33  DbName = sqlite3
3de0: 5f 77 69 6e 33 32 5f 6d 62 63 73 5f 74 6f 5f 75  _win32_mbcs_to_u
3df0: 74 66 38 28 7a 44 62 4e 61 6d 65 29 3b 0a 23 65  tf8(zDbName);.#e
3e00: 6e 64 69 66 0a 20 20 72 63 20 3d 20 73 71 6c 69  ndif.  rc = sqli
3e10: 74 65 33 5f 6f 70 65 6e 5f 76 32 28 0a 20 20 20  te3_open_v2(.   
3e20: 20 20 20 20 7a 44 62 4e 61 6d 65 2c 20 26 64 62      zDbName, &db
3e30: 2c 0a 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f  ,.       SQLITE_
3e40: 4f 50 45 4e 5f 52 45 41 44 57 52 49 54 45 20 7c  OPEN_READWRITE |
3e50: 20 53 51 4c 49 54 45 5f 4f 50 45 4e 5f 43 52 45   SQLITE_OPEN_CRE
3e60: 41 54 45 2c 0a 20 20 20 20 20 20 20 7a 56 66 73  ATE,.       zVfs
3e70: 0a 20 20 29 3b 0a 20 20 69 66 28 20 72 63 21 3d  .  );.  if( rc!=
3e80: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20  SQLITE_OK ){.   
3e90: 20 64 62 5f 65 72 72 28 73 71 6c 69 74 65 33 5f   db_err(sqlite3_
3ea0: 65 72 72 6d 73 67 28 64 62 29 29 3b 0a 20 20 7d  errmsg(db));.  }
3eb0: 0a 20 20 73 71 6c 69 74 65 33 5f 62 75 73 79 5f  .  sqlite3_busy_
3ec0: 74 69 6d 65 6f 75 74 28 64 62 2c 20 35 30 30 30  timeout(db, 5000
3ed0: 29 3b 20 0a 20 20 73 71 6c 69 74 65 33 5f 77 61  ); .  sqlite3_wa
3ee0: 6c 5f 61 75 74 6f 63 68 65 63 6b 70 6f 69 6e 74  l_autocheckpoint
3ef0: 28 64 62 2c 20 31 29 3b 20 20 2f 2a 20 53 65 74  (db, 1);  /* Set
3f00: 20 74 6f 20 63 68 65 63 6b 70 6f 69 6e 74 20 66   to checkpoint f
3f10: 72 65 71 75 65 6e 74 6c 79 20 2a 2f 0a 20 20 72  requently */.  r
3f20: 65 74 75 72 6e 20 64 62 3b 0a 7d 0a 0a 0a 2f 2a  eturn db;.}.../*
3f30: 0a 2a 2a 20 7a 44 62 4e 61 6d 65 20 69 73 20 74  .** zDbName is t
3f40: 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 64 61 74  he name of a dat
3f50: 61 62 61 73 65 20 66 69 6c 65 2e 20 20 49 66 20  abase file.  If 
3f60: 6e 6f 20 6f 74 68 65 72 20 64 61 74 61 62 61 73  no other databas
3f70: 65 0a 2a 2a 20 66 69 6c 65 20 69 73 20 6f 70 65  e.** file is ope
3f80: 6e 2c 20 74 68 65 6e 20 6f 70 65 6e 20 74 68 69  n, then open thi
3f90: 73 20 6f 6e 65 2e 20 20 49 66 20 61 6e 6f 74 68  s one.  If anoth
3fa0: 65 72 20 64 61 74 61 62 61 73 65 20 66 69 6c 65  er database file
3fb0: 20 69 73 0a 2a 2a 20 61 6c 72 65 61 64 79 20 6f   is.** already o
3fc0: 70 65 6e 2c 20 74 68 65 6e 20 61 74 74 61 63 68  pen, then attach
3fd0: 20 7a 44 62 4e 61 6d 65 20 75 73 69 6e 67 20 74   zDbName using t
3fe0: 68 65 20 6e 61 6d 65 20 7a 4c 61 62 65 6c 2e 0a  he name zLabel..
3ff0: 2a 2f 0a 76 6f 69 64 20 64 62 5f 6f 70 65 6e 5f  */.void db_open_
4000: 6f 72 5f 61 74 74 61 63 68 28 63 6f 6e 73 74 20  or_attach(const 
4010: 63 68 61 72 20 2a 7a 44 62 4e 61 6d 65 2c 20 63  char *zDbName, c
4020: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 61 62 65  onst char *zLabe
4030: 6c 29 7b 0a 20 20 69 66 28 20 21 67 2e 64 62 20  l){.  if( !g.db 
4040: 29 7b 0a 20 20 20 20 67 2e 64 62 20 3d 20 6f 70  ){.    g.db = op
4050: 65 6e 44 61 74 61 62 61 73 65 28 7a 44 62 4e 61  enDatabase(zDbNa
4060: 6d 65 29 3b 0a 20 20 20 20 67 2e 7a 52 65 70 6f  me);.    g.zRepo
4070: 44 62 20 3d 20 22 6d 61 69 6e 22 3b 0a 20 20 20  Db = "main";.   
4080: 20 64 62 5f 63 6f 6e 6e 65 63 74 69 6f 6e 5f 69   db_connection_i
4090: 6e 69 74 28 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  nit();.  }else{.
40a0: 23 69 66 20 64 65 66 69 6e 65 64 28 5f 57 49 4e  #if defined(_WIN
40b0: 33 32 29 0a 20 20 20 20 7a 44 62 4e 61 6d 65 20  32).    zDbName 
40c0: 3d 20 73 71 6c 69 74 65 33 5f 77 69 6e 33 32 5f  = sqlite3_win32_
40d0: 6d 62 63 73 5f 74 6f 5f 75 74 66 38 28 7a 44 62  mbcs_to_utf8(zDb
40e0: 4e 61 6d 65 29 3b 0a 23 65 6e 64 69 66 0a 20 20  Name);.#endif.  
40f0: 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28    db_multi_exec(
4100: 22 41 54 54 41 43 48 20 44 41 54 41 42 41 53 45  "ATTACH DATABASE
4110: 20 25 51 20 41 53 20 25 73 22 2c 20 7a 44 62 4e   %Q AS %s", zDbN
4120: 61 6d 65 2c 20 7a 4c 61 62 65 6c 29 3b 0a 20 20  ame, zLabel);.  
4130: 20 20 67 2e 7a 52 65 70 6f 44 62 20 3d 20 6d 70    g.zRepoDb = mp
4140: 72 69 6e 74 66 28 22 25 73 22 2c 20 7a 4c 61 62  rintf("%s", zLab
4150: 65 6c 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  el);.  }.}../*.*
4160: 2a 20 4f 70 65 6e 20 74 68 65 20 75 73 65 72 20  * Open the user 
4170: 64 61 74 61 62 61 73 65 20 69 6e 20 22 7e 2f 2e  database in "~/.
4180: 66 6f 73 73 69 6c 22 2e 20 20 43 72 65 61 74 65  fossil".  Create
4190: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 61 6e   the database an
41a0: 65 77 20 69 66 0a 2a 2a 20 69 74 20 64 6f 65 73  ew if.** it does
41b0: 20 6e 6f 74 20 61 6c 72 65 61 64 79 20 65 78 69   not already exi
41c0: 73 74 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 65  st..**.** If the
41d0: 20 75 73 65 41 74 74 61 63 68 20 66 6c 61 67 20   useAttach flag 
41e0: 69 73 20 30 20 28 74 68 65 20 75 73 75 61 6c 20  is 0 (the usual 
41f0: 63 61 73 65 29 20 74 68 65 6e 20 74 68 65 20 75  case) then the u
4200: 73 65 72 20 64 61 74 61 62 61 73 65 20 69 73 0a  ser database is.
4210: 2a 2a 20 6f 70 65 6e 65 64 20 6f 6e 20 61 20 73  ** opened on a s
4220: 65 70 61 72 61 74 65 20 64 61 74 61 62 61 73 65  eparate database
4230: 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 67 2e 64 62   connection g.db
4240: 43 6f 6e 66 69 67 2e 20 20 54 68 69 73 20 70 72  Config.  This pr
4250: 65 76 65 6e 74 73 0a 2a 2a 20 74 68 65 20 7e 2f  events.** the ~/
4260: 2e 66 6f 73 73 69 6c 20 64 61 74 61 62 61 73 65  .fossil database
4270: 20 66 72 6f 6d 20 62 65 63 6f 6d 69 6e 67 20 6c   from becoming l
4280: 6f 63 6b 65 64 20 6f 6e 20 6c 6f 6e 67 20 63 68  ocked on long ch
4290: 65 63 6b 2d 69 6e 20 6f 72 20 73 79 6e 63 0a 2a  eck-in or sync.*
42a0: 2a 20 6f 70 65 72 61 74 69 6f 6e 73 20 77 68 69  * operations whi
42b0: 63 68 20 68 6f 6c 64 20 61 6e 20 65 78 63 6c 75  ch hold an exclu
42c0: 73 69 76 65 20 74 72 61 6e 73 61 63 74 69 6f 6e  sive transaction
42d0: 2e 20 20 49 6e 20 61 20 66 65 77 20 63 61 73 65  .  In a few case
42e0: 73 2c 20 74 68 6f 75 67 68 2c 0a 2a 2a 20 69 74  s, though,.** it
42f0: 20 69 73 20 63 6f 6e 76 65 6e 69 65 6e 74 20 66   is convenient f
4300: 6f 72 20 74 68 65 20 7e 2f 2e 66 6f 73 73 69 6c  or the ~/.fossil
4310: 20 74 6f 20 62 65 20 61 74 74 61 63 68 65 64 20   to be attached 
4320: 74 6f 20 74 68 65 20 6d 61 69 6e 20 64 61 74 61  to the main data
4330: 62 61 73 65 0a 2a 2a 20 63 6f 6e 6e 65 63 74 69  base.** connecti
4340: 6f 6e 20 73 6f 20 74 68 61 74 20 77 65 20 63 61  on so that we ca
4350: 6e 20 6a 6f 69 6e 20 62 65 74 77 65 65 6e 20 74  n join between t
4360: 68 65 20 76 61 72 69 6f 75 73 20 64 61 74 61 62  he various datab
4370: 61 73 65 73 2e 20 20 49 6e 20 74 68 61 74 0a 2a  ases.  In that.*
4380: 2a 20 63 61 73 65 2c 20 69 6e 76 6f 6b 65 20 74  * case, invoke t
4390: 68 69 73 20 72 6f 75 74 69 6e 65 20 77 69 74 68  his routine with
43a0: 20 75 73 65 41 74 74 61 63 68 20 61 73 20 31 2e   useAttach as 1.
43b0: 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 6f 70 65 6e  .*/.void db_open
43c0: 5f 63 6f 6e 66 69 67 28 69 6e 74 20 75 73 65 41  _config(int useA
43d0: 74 74 61 63 68 29 7b 0a 20 20 63 68 61 72 20 2a  ttach){.  char *
43e0: 7a 44 62 4e 61 6d 65 3b 0a 20 20 63 6f 6e 73 74  zDbName;.  const
43f0: 20 63 68 61 72 20 2a 7a 48 6f 6d 65 3b 0a 20 20   char *zHome;.  
4400: 69 66 28 20 67 2e 63 6f 6e 66 69 67 4f 70 65 6e  if( g.configOpen
4410: 20 29 20 72 65 74 75 72 6e 3b 0a 23 69 66 20 64   ) return;.#if d
4420: 65 66 69 6e 65 64 28 5f 57 49 4e 33 32 29 0a 20  efined(_WIN32). 
4430: 20 7a 48 6f 6d 65 20 3d 20 67 65 74 65 6e 76 28   zHome = getenv(
4440: 22 4c 4f 43 41 4c 41 50 50 44 41 54 41 22 29 3b  "LOCALAPPDATA");
4450: 0a 20 20 69 66 28 20 7a 48 6f 6d 65 3d 3d 30 20  .  if( zHome==0 
4460: 29 7b 0a 20 20 20 20 7a 48 6f 6d 65 20 3d 20 67  ){.    zHome = g
4470: 65 74 65 6e 76 28 22 41 50 50 44 41 54 41 22 29  etenv("APPDATA")
4480: 3b 0a 20 20 20 20 69 66 28 20 7a 48 6f 6d 65 3d  ;.    if( zHome=
4490: 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 48 6f 6d  =0 ){.      zHom
44a0: 65 20 3d 20 67 65 74 65 6e 76 28 22 48 4f 4d 45  e = getenv("HOME
44b0: 50 41 54 48 22 29 3b 0a 20 20 20 20 7d 0a 20 20  PATH");.    }.  
44c0: 7d 0a 20 20 69 66 28 20 7a 48 6f 6d 65 3d 3d 30  }.  if( zHome==0
44d0: 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 66   ){.    fossil_f
44e0: 61 74 61 6c 28 22 63 61 6e 6e 6f 74 20 6c 6f 63  atal("cannot loc
44f0: 61 74 65 20 68 6f 6d 65 20 64 69 72 65 63 74 6f  ate home directo
4500: 72 79 20 2d 20 22 0a 20 20 20 20 20 20 20 20 20  ry - ".         
4510: 20 20 20 20 20 20 20 22 70 6c 65 61 73 65 20 73         "please s
4520: 65 74 20 74 68 65 20 48 4f 4d 45 50 41 54 48 20  et the HOMEPATH 
4530: 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 76 61 72 69  environment vari
4540: 61 62 6c 65 22 29 3b 0a 20 20 7d 0a 23 65 6c 73  able");.  }.#els
4550: 65 0a 20 20 7a 48 6f 6d 65 20 3d 20 67 65 74 65  e.  zHome = gete
4560: 6e 76 28 22 48 4f 4d 45 22 29 3b 0a 20 20 69 66  nv("HOME");.  if
4570: 28 20 7a 48 6f 6d 65 3d 3d 30 20 29 7b 0a 20 20  ( zHome==0 ){.  
4580: 20 20 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22    fossil_fatal("
4590: 63 61 6e 6e 6f 74 20 6c 6f 63 61 74 65 20 68 6f  cannot locate ho
45a0: 6d 65 20 64 69 72 65 63 74 6f 72 79 20 2d 20 22  me directory - "
45b0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
45c0: 20 20 22 70 6c 65 61 73 65 20 73 65 74 20 74 68    "please set th
45d0: 65 20 48 4f 4d 45 20 65 6e 76 69 72 6f 6e 6d 65  e HOME environme
45e0: 6e 74 20 76 61 72 69 61 62 6c 65 22 29 3b 0a 20  nt variable");. 
45f0: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20   }.#endif.  if( 
4600: 66 69 6c 65 5f 69 73 64 69 72 28 7a 48 6f 6d 65  file_isdir(zHome
4610: 29 21 3d 31 20 29 7b 0a 20 20 20 20 66 6f 73 73  )!=1 ){.    foss
4620: 69 6c 5f 66 61 74 61 6c 28 22 69 6e 76 61 6c 69  il_fatal("invali
4630: 64 20 68 6f 6d 65 20 64 69 72 65 63 74 6f 72 79  d home directory
4640: 3a 20 25 73 22 2c 20 7a 48 6f 6d 65 29 3b 0a 20  : %s", zHome);. 
4650: 20 7d 0a 23 69 66 6e 64 65 66 20 5f 57 49 4e 33   }.#ifndef _WIN3
4660: 32 0a 20 20 69 66 28 20 61 63 63 65 73 73 28 7a  2.  if( access(z
4670: 48 6f 6d 65 2c 20 57 5f 4f 4b 29 20 29 7b 0a 20  Home, W_OK) ){. 
4680: 20 20 20 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28     fossil_fatal(
4690: 22 68 6f 6d 65 20 64 69 72 65 63 74 6f 72 79 20  "home directory 
46a0: 25 73 20 6d 75 73 74 20 62 65 20 77 72 69 74 65  %s must be write
46b0: 61 62 6c 65 22 2c 20 7a 48 6f 6d 65 29 3b 0a 20  able", zHome);. 
46c0: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 67 2e 7a 48   }.#endif.  g.zH
46d0: 6f 6d 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25  ome = mprintf("%
46e0: 2f 22 2c 20 7a 48 6f 6d 65 29 3b 0a 23 69 66 20  /", zHome);.#if 
46f0: 64 65 66 69 6e 65 64 28 5f 57 49 4e 33 32 29 0a  defined(_WIN32).
4700: 20 20 2f 2a 20 2e 20 66 69 6c 65 6e 61 6d 65 73    /* . filenames
4710: 20 67 69 76 65 20 73 6f 6d 65 20 77 69 6e 64 6f   give some windo
4720: 77 20 73 79 73 74 65 6d 73 20 70 72 6f 62 6c 65  w systems proble
4730: 6d 73 20 61 6e 64 20 6d 61 6e 79 20 61 70 70 73  ms and many apps
4740: 20 70 72 6f 62 6c 65 6d 73 20 2a 2f 0a 20 20 7a   problems */.  z
4750: 44 62 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66  DbName = mprintf
4760: 28 22 25 2f 2f 5f 66 6f 73 73 69 6c 22 2c 20 7a  ("%//_fossil", z
4770: 48 6f 6d 65 29 3b 0a 23 65 6c 73 65 0a 20 20 7a  Home);.#else.  z
4780: 44 62 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66  DbName = mprintf
4790: 28 22 25 73 2f 2e 66 6f 73 73 69 6c 22 2c 20 7a  ("%s/.fossil", z
47a0: 48 6f 6d 65 29 3b 0a 23 65 6e 64 69 66 0a 20 20  Home);.#endif.  
47b0: 69 66 28 20 66 69 6c 65 5f 73 69 7a 65 28 7a 44  if( file_size(zD
47c0: 62 4e 61 6d 65 29 3c 31 30 32 34 2a 33 20 29 7b  bName)<1024*3 ){
47d0: 0a 20 20 20 20 64 62 5f 69 6e 69 74 5f 64 61 74  .    db_init_dat
47e0: 61 62 61 73 65 28 7a 44 62 4e 61 6d 65 2c 20 7a  abase(zDbName, z
47f0: 43 6f 6e 66 69 67 53 63 68 65 6d 61 2c 20 28 63  ConfigSchema, (c
4800: 68 61 72 2a 29 30 29 3b 0a 20 20 7d 0a 20 20 67  har*)0);.  }.  g
4810: 2e 75 73 65 41 74 74 61 63 68 20 3d 20 75 73 65  .useAttach = use
4820: 41 74 74 61 63 68 3b 0a 20 20 69 66 28 20 75 73  Attach;.  if( us
4830: 65 41 74 74 61 63 68 20 29 7b 0a 20 20 20 20 64  eAttach ){.    d
4840: 62 5f 6f 70 65 6e 5f 6f 72 5f 61 74 74 61 63 68  b_open_or_attach
4850: 28 7a 44 62 4e 61 6d 65 2c 20 22 63 6f 6e 66 69  (zDbName, "confi
4860: 67 64 62 22 29 3b 0a 20 20 20 20 67 2e 64 62 43  gdb");.    g.dbC
4870: 6f 6e 66 69 67 20 3d 20 30 3b 0a 20 20 7d 65 6c  onfig = 0;.  }el
4880: 73 65 7b 0a 20 20 20 20 67 2e 64 62 43 6f 6e 66  se{.    g.dbConf
4890: 69 67 20 3d 20 6f 70 65 6e 44 61 74 61 62 61 73  ig = openDatabas
48a0: 65 28 7a 44 62 4e 61 6d 65 29 3b 0a 20 20 7d 0a  e(zDbName);.  }.
48b0: 20 20 67 2e 63 6f 6e 66 69 67 4f 70 65 6e 20 3d    g.configOpen =
48c0: 20 31 3b 0a 20 20 66 72 65 65 28 7a 44 62 4e 61   1;.  free(zDbNa
48d0: 6d 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 66  me);.}../*.** If
48e0: 20 7a 44 62 4e 61 6d 65 20 69 73 20 61 20 76 61   zDbName is a va
48f0: 6c 69 64 20 6c 6f 63 61 6c 20 64 61 74 61 62 61  lid local databa
4900: 73 65 20 66 69 6c 65 2c 20 6f 70 65 6e 20 69 74  se file, open it
4910: 20 61 6e 64 20 72 65 74 75 72 6e 0a 2a 2a 20 74   and return.** t
4920: 72 75 65 2e 20 20 49 66 20 69 74 20 69 73 20 6e  rue.  If it is n
4930: 6f 74 20 61 20 76 61 6c 69 64 20 6c 6f 63 61 6c  ot a valid local
4940: 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 2c 20   database file, 
4950: 72 65 74 75 72 6e 20 30 2e 0a 2a 2f 0a 73 74 61  return 0..*/.sta
4960: 74 69 63 20 69 6e 74 20 69 73 56 61 6c 69 64 4c  tic int isValidL
4970: 6f 63 61 6c 44 62 28 63 6f 6e 73 74 20 63 68 61  ocalDb(const cha
4980: 72 20 2a 7a 44 62 4e 61 6d 65 29 7b 0a 20 20 69  r *zDbName){.  i
4990: 36 34 20 6c 73 69 7a 65 3b 0a 20 20 69 6e 74 20  64 lsize;.  int 
49a0: 72 63 3b 0a 20 20 73 71 6c 69 74 65 33 5f 73 74  rc;.  sqlite3_st
49b0: 6d 74 20 2a 70 53 74 6d 74 3b 0a 0a 20 20 69 66  mt *pStmt;..  if
49c0: 28 20 61 63 63 65 73 73 28 7a 44 62 4e 61 6d 65  ( access(zDbName
49d0: 2c 20 46 5f 4f 4b 29 20 29 20 72 65 74 75 72 6e  , F_OK) ) return
49e0: 20 30 3b 0a 20 20 6c 73 69 7a 65 20 3d 20 66 69   0;.  lsize = fi
49f0: 6c 65 5f 73 69 7a 65 28 7a 44 62 4e 61 6d 65 29  le_size(zDbName)
4a00: 3b 0a 20 20 69 66 28 20 6c 73 69 7a 65 25 31 30  ;.  if( lsize%10
4a10: 32 34 21 3d 30 20 7c 7c 20 6c 73 69 7a 65 3c 34  24!=0 || lsize<4
4a20: 30 39 36 20 29 20 72 65 74 75 72 6e 20 30 3b 0a  096 ) return 0;.
4a30: 20 20 64 62 5f 6f 70 65 6e 5f 6f 72 5f 61 74 74    db_open_or_att
4a40: 61 63 68 28 7a 44 62 4e 61 6d 65 2c 20 22 6c 6f  ach(zDbName, "lo
4a50: 63 61 6c 64 62 22 29 3b 0a 20 20 67 2e 6c 6f 63  caldb");.  g.loc
4a60: 61 6c 4f 70 65 6e 20 3d 20 31 3b 0a 20 20 64 62  alOpen = 1;.  db
4a70: 5f 6f 70 65 6e 5f 63 6f 6e 66 69 67 28 30 29 3b  _open_config(0);
4a80: 0a 20 20 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73  .  db_open_repos
4a90: 69 74 6f 72 79 28 30 29 3b 0a 0a 20 20 2f 2a 20  itory(0);..  /* 
4aa0: 49 66 20 74 68 65 20 22 69 73 65 78 65 22 20 63  If the "isexe" c
4ab0: 6f 6c 75 6d 6e 20 69 73 20 6d 69 73 73 69 6e 67  olumn is missing
4ac0: 20 66 72 6f 6d 20 74 68 65 20 76 66 69 6c 65 20   from the vfile 
4ad0: 74 61 62 6c 65 2c 20 74 68 65 6e 0a 20 20 2a 2a  table, then.  **
4ae0: 20 61 64 64 20 69 74 20 6e 6f 77 2e 20 20 20 54   add it now.   T
4af0: 68 69 73 20 63 6f 64 65 20 61 64 64 65 64 20 6f  his code added o
4b00: 6e 20 32 30 31 30 2d 30 33 2d 30 36 2e 20 20 41  n 2010-03-06.  A
4b10: 66 74 65 72 20 61 6c 6c 20 75 73 65 72 73 20 68  fter all users h
4b20: 61 76 65 0a 20 20 2a 2a 20 75 70 67 72 61 64 65  ave.  ** upgrade
4b30: 64 2c 20 74 68 69 73 20 63 6f 64 65 20 63 61 6e  d, this code can
4b40: 20 62 65 20 73 61 66 65 6c 79 20 64 65 6c 65 74   be safely delet
4b50: 65 64 2e 20 0a 20 20 2a 2f 0a 20 20 72 63 20 3d  ed. .  */.  rc =
4b60: 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65   sqlite3_prepare
4b70: 28 67 2e 64 62 2c 20 22 53 45 4c 45 43 54 20 69  (g.db, "SELECT i
4b80: 73 65 78 65 20 46 52 4f 4d 20 76 66 69 6c 65 22  sexe FROM vfile"
4b90: 2c 20 2d 31 2c 20 26 70 53 74 6d 74 2c 20 30 29  , -1, &pStmt, 0)
4ba0: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 66 69 6e 61  ;.  sqlite3_fina
4bb0: 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 69  lize(pStmt);.  i
4bc0: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 45 52  f( rc==SQLITE_ER
4bd0: 52 4f 52 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  ROR ){.    sqlit
4be0: 65 33 5f 65 78 65 63 28 67 2e 64 62 2c 20 22 41  e3_exec(g.db, "A
4bf0: 4c 54 45 52 20 54 41 42 4c 45 20 76 66 69 6c 65  LTER TABLE vfile
4c00: 20 41 44 44 20 43 4f 4c 55 4d 4e 20 69 73 65 78   ADD COLUMN isex
4c10: 65 20 42 4f 4f 4c 45 41 4e 22 2c 20 30 2c 20 30  e BOOLEAN", 0, 0
4c20: 2c 20 30 29 3b 0a 20 20 7d 0a 0a 23 69 66 20 30  , 0);.  }..#if 0
4c30: 0a 20 20 2f 2a 20 49 66 20 74 68 65 20 22 6d 74  .  /* If the "mt
4c40: 69 6d 65 22 20 63 6f 6c 75 6d 6e 20 69 73 20 6d  ime" column is m
4c50: 69 73 73 69 6e 67 20 66 72 6f 6d 20 74 68 65 20  issing from the 
4c60: 76 66 69 6c 65 20 74 61 62 6c 65 2c 20 74 68 65  vfile table, the
4c70: 6e 0a 20 20 2a 2a 20 61 64 64 20 69 74 20 6e 6f  n.  ** add it no
4c80: 77 2e 20 20 20 54 68 69 73 20 63 6f 64 65 20 61  w.   This code a
4c90: 64 64 65 64 20 6f 6e 20 32 30 30 38 2d 31 32 2d  dded on 2008-12-
4ca0: 30 36 2e 20 20 41 66 74 65 72 20 61 6c 6c 20 75  06.  After all u
4cb0: 73 65 72 73 20 68 61 76 65 0a 20 20 2a 2a 20 75  sers have.  ** u
4cc0: 70 67 72 61 64 65 64 2c 20 74 68 69 73 20 63 6f  pgraded, this co
4cd0: 64 65 20 63 61 6e 20 62 65 20 73 61 66 65 6c 79  de can be safely
4ce0: 20 64 65 6c 65 74 65 64 2e 20 0a 20 20 2a 2f 0a   deleted. .  */.
4cf0: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 70    rc = sqlite3_p
4d00: 72 65 70 61 72 65 28 67 2e 64 62 2c 20 22 53 45  repare(g.db, "SE
4d10: 4c 45 43 54 20 6d 74 69 6d 65 20 46 52 4f 4d 20  LECT mtime FROM 
4d20: 76 66 69 6c 65 22 2c 20 2d 31 2c 20 26 70 53 74  vfile", -1, &pSt
4d30: 6d 74 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65  mt, 0);.  sqlite
4d40: 33 5f 66 69 6e 61 6c 69 7a 65 28 70 53 74 6d 74  3_finalize(pStmt
4d50: 29 3b 0a 20 20 69 66 28 20 72 63 3d 3d 53 51 4c  );.  if( rc==SQL
4d60: 49 54 45 5f 45 52 52 4f 52 20 29 7b 0a 20 20 20  ITE_ERROR ){.   
4d70: 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 67 2e   sqlite3_exec(g.
4d80: 64 62 2c 20 22 41 4c 54 45 52 20 54 41 42 4c 45  db, "ALTER TABLE
4d90: 20 76 66 69 6c 65 20 41 44 44 20 43 4f 4c 55 4d   vfile ADD COLUM
4da0: 4e 20 6d 74 69 6d 65 20 49 4e 54 45 47 45 52 22  N mtime INTEGER"
4db0: 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a  , 0, 0, 0);.  }.
4dc0: 23 65 6e 64 69 66 0a 0a 23 69 66 20 30 0a 20 20  #endif..#if 0.  
4dd0: 2f 2a 20 49 66 20 74 68 65 20 22 6f 72 69 67 6e  /* If the "orign
4de0: 61 6d 65 22 20 63 6f 6c 75 6d 6e 20 69 73 20 6d  ame" column is m
4df0: 69 73 73 69 6e 67 20 66 72 6f 6d 20 74 68 65 20  issing from the 
4e00: 76 66 69 6c 65 20 74 61 62 6c 65 2c 20 74 68 65  vfile table, the
4e10: 6e 0a 20 20 2a 2a 20 61 64 64 20 69 74 20 6e 6f  n.  ** add it no
4e20: 77 2e 20 20 20 54 68 69 73 20 63 6f 64 65 20 61  w.   This code a
4e30: 64 64 65 64 20 6f 6e 20 32 30 30 38 2d 31 31 2d  dded on 2008-11-
4e40: 30 39 2e 20 20 41 66 74 65 72 20 61 6c 6c 20 75  09.  After all u
4e50: 73 65 72 73 20 68 61 76 65 0a 20 20 2a 2a 20 75  sers have.  ** u
4e60: 70 67 72 61 64 65 64 2c 20 74 68 69 73 20 63 6f  pgraded, this co
4e70: 64 65 20 63 61 6e 20 62 65 20 73 61 66 65 6c 79  de can be safely
4e80: 20 64 65 6c 65 74 65 64 2e 20 0a 20 20 2a 2f 0a   deleted. .  */.
4e90: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 70    rc = sqlite3_p
4ea0: 72 65 70 61 72 65 28 67 2e 64 62 2c 20 22 53 45  repare(g.db, "SE
4eb0: 4c 45 43 54 20 6f 72 69 67 6e 61 6d 65 20 46 52  LECT origname FR
4ec0: 4f 4d 20 76 66 69 6c 65 22 2c 20 2d 31 2c 20 26  OM vfile", -1, &
4ed0: 70 53 74 6d 74 2c 20 30 29 3b 0a 20 20 73 71 6c  pStmt, 0);.  sql
4ee0: 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 70 53  ite3_finalize(pS
4ef0: 74 6d 74 29 3b 0a 20 20 69 66 28 20 72 63 3d 3d  tmt);.  if( rc==
4f00: 53 51 4c 49 54 45 5f 45 52 52 4f 52 20 29 7b 0a  SQLITE_ERROR ){.
4f10: 20 20 20 20 73 71 6c 69 74 65 33 5f 65 78 65 63      sqlite3_exec
4f20: 28 67 2e 64 62 2c 20 22 41 4c 54 45 52 20 54 41  (g.db, "ALTER TA
4f30: 42 4c 45 20 76 66 69 6c 65 20 41 44 44 20 43 4f  BLE vfile ADD CO
4f40: 4c 55 4d 4e 20 6f 72 69 67 6e 61 6d 65 20 54 45  LUMN origname TE
4f50: 58 54 22 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20  XT", 0, 0, 0);. 
4f60: 20 7d 0a 23 65 6e 64 69 66 0a 0a 20 20 72 65 74   }.#endif..  ret
4f70: 75 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  urn 1;.}../*.** 
4f80: 4c 6f 63 61 74 65 20 74 68 65 20 72 6f 6f 74 20  Locate the root 
4f90: 64 69 72 65 63 74 6f 72 79 20 6f 66 20 74 68 65  directory of the
4fa0: 20 6c 6f 63 61 6c 20 72 65 70 6f 73 69 74 6f 72   local repositor
4fb0: 79 20 74 72 65 65 2e 20 20 54 68 65 20 72 6f 6f  y tree.  The roo
4fc0: 74 0a 2a 2a 20 64 69 72 65 63 74 6f 72 79 20 69  t.** directory i
4fd0: 73 20 66 6f 75 6e 64 20 62 79 20 73 65 61 72 63  s found by searc
4fe0: 68 69 6e 67 20 66 6f 72 20 61 20 66 69 6c 65 20  hing for a file 
4ff0: 6e 61 6d 65 64 20 22 5f 46 4f 53 53 49 4c 5f 22  named "_FOSSIL_"
5000: 20 6f 72 20 22 2e 66 6f 73 22 0a 2a 2a 20 74 68   or ".fos".** th
5010: 61 74 20 63 6f 6e 74 61 69 6e 73 20 61 20 76 61  at contains a va
5020: 6c 69 64 20 72 65 70 6f 73 69 74 6f 72 79 20 64  lid repository d
5030: 61 74 61 62 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 49  atabase..**.** I
5040: 66 20 6e 6f 20 76 61 6c 69 64 20 5f 46 4f 53 53  f no valid _FOSS
5050: 49 4c 5f 20 6f 72 20 2e 66 6f 73 20 66 69 6c 65  IL_ or .fos file
5060: 20 69 73 20 66 6f 75 6e 64 2c 20 77 65 20 6d 6f   is found, we mo
5070: 76 65 20 75 70 20 6f 6e 65 20 6c 65 76 65 6c 20  ve up one level 
5080: 61 6e 64 20 0a 2a 2a 20 74 72 79 20 61 67 61 69  and .** try agai
5090: 6e 2e 20 4f 6e 63 65 20 74 68 65 20 66 69 6c 65  n. Once the file
50a0: 20 69 73 20 66 6f 75 6e 64 2c 20 74 68 65 20 67   is found, the g
50b0: 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 20 76 61 72 69  .zLocalRoot vari
50c0: 61 62 6c 65 20 69 73 20 73 65 74 0a 2a 2a 20 74  able is set.** t
50d0: 6f 20 74 68 65 20 72 6f 6f 74 20 6f 66 20 74 68  o the root of th
50e0: 65 20 72 65 70 6f 73 69 74 6f 72 79 20 74 72 65  e repository tre
50f0: 65 20 61 6e 64 20 74 68 69 73 20 72 6f 75 74 69  e and this routi
5100: 6e 65 20 72 65 74 75 72 6e 73 20 31 2e 20 20 49  ne returns 1.  I
5110: 66 0a 2a 2a 20 6e 6f 20 64 61 74 61 62 61 73 65  f.** no database
5120: 20 69 73 20 66 6f 75 6e 64 2c 20 74 68 65 6e 20   is found, then 
5130: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 65 74  this routine ret
5140: 75 72 6e 20 30 2e 0a 2a 2a 0a 2a 2a 20 54 68 69  urn 0..**.** Thi
5150: 73 20 72 6f 75 74 69 6e 65 20 61 6c 77 61 79 73  s routine always
5160: 20 6f 70 65 6e 73 20 74 68 65 20 75 73 65 72 20   opens the user 
5170: 64 61 74 61 62 61 73 65 20 72 65 67 61 72 64 6c  database regardl
5180: 65 73 73 20 6f 66 20 77 68 65 74 68 65 72 20 6f  ess of whether o
5190: 72 0a 2a 2a 20 6e 6f 74 20 74 68 65 20 72 65 70  r.** not the rep
51a0: 6f 73 69 74 6f 72 79 20 64 61 74 61 62 61 73 65  ository database
51b0: 20 69 73 20 66 6f 75 6e 64 2e 20 20 49 66 20 74   is found.  If t
51c0: 68 65 20 5f 46 4f 53 53 49 4c 5f 20 6f 72 20 2e  he _FOSSIL_ or .
51d0: 66 6f 73 20 66 69 6c 65 0a 2a 2a 20 69 73 20 66  fos file.** is f
51e0: 6f 75 6e 64 2c 20 69 74 20 69 73 20 61 74 74 61  ound, it is atta
51f0: 63 68 65 64 20 74 6f 20 74 68 65 20 6f 70 65 6e  ched to the open
5200: 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e 65 63   database connec
5210: 74 69 6f 6e 20 74 6f 6f 2e 0a 2a 2f 0a 69 6e 74  tion too..*/.int
5220: 20 64 62 5f 6f 70 65 6e 5f 6c 6f 63 61 6c 28 76   db_open_local(v
5230: 6f 69 64 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6e  oid){.  int i, n
5240: 3b 0a 20 20 63 68 61 72 20 7a 50 77 64 5b 32 30  ;.  char zPwd[20
5250: 30 30 5d 3b 0a 20 20 63 68 61 72 20 2a 7a 50 77  00];.  char *zPw
5260: 64 43 6f 6e 76 3b 0a 20 20 73 74 61 74 69 63 20  dConv;.  static 
5270: 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 44 62 4e  const char *aDbN
5280: 61 6d 65 5b 5d 20 3d 20 7b 20 22 2f 5f 46 4f 53  ame[] = { "/_FOS
5290: 53 49 4c 5f 22 2c 20 22 2f 2e 66 6f 73 22 20 7d  SIL_", "/.fos" }
52a0: 3b 0a 20 20 0a 20 20 69 66 28 20 67 2e 6c 6f 63  ;.  .  if( g.loc
52b0: 61 6c 4f 70 65 6e 29 20 72 65 74 75 72 6e 20 31  alOpen) return 1
52c0: 3b 0a 20 20 69 66 28 20 67 65 74 63 77 64 28 7a  ;.  if( getcwd(z
52d0: 50 77 64 2c 20 73 69 7a 65 6f 66 28 7a 50 77 64  Pwd, sizeof(zPwd
52e0: 29 2d 32 30 29 3d 3d 30 20 29 7b 0a 20 20 20 20  )-20)==0 ){.    
52f0: 64 62 5f 65 72 72 28 22 70 77 64 20 74 6f 6f 20  db_err("pwd too 
5300: 62 69 67 3a 20 6d 61 78 20 25 64 22 2c 20 73 69  big: max %d", si
5310: 7a 65 6f 66 28 7a 50 77 64 29 2d 32 30 29 3b 0a  zeof(zPwd)-20);.
5320: 20 20 7d 0a 20 20 6e 20 3d 20 73 74 72 6c 65 6e    }.  n = strlen
5330: 28 7a 50 77 64 29 3b 0a 20 20 7a 50 77 64 43 6f  (zPwd);.  zPwdCo
5340: 6e 76 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 2f  nv = mprintf("%/
5350: 22 2c 20 7a 50 77 64 29 3b 0a 20 20 73 74 72 6e  ", zPwd);.  strn
5360: 63 70 79 28 7a 50 77 64 2c 20 7a 50 77 64 43 6f  cpy(zPwd, zPwdCo
5370: 6e 76 2c 20 32 30 30 30 2d 32 30 29 3b 0a 20 20  nv, 2000-20);.  
5380: 66 72 65 65 28 7a 50 77 64 43 6f 6e 76 29 3b 0a  free(zPwdConv);.
5390: 20 20 77 68 69 6c 65 28 20 6e 3e 30 20 29 7b 0a    while( n>0 ){.
53a0: 20 20 20 20 69 66 28 20 61 63 63 65 73 73 28 7a      if( access(z
53b0: 50 77 64 2c 20 57 5f 4f 4b 29 20 29 20 62 72 65  Pwd, W_OK) ) bre
53c0: 61 6b 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b  ak;.    for(i=0;
53d0: 20 69 3c 73 69 7a 65 6f 66 28 61 44 62 4e 61 6d   i<sizeof(aDbNam
53e0: 65 29 2f 73 69 7a 65 6f 66 28 61 44 62 4e 61 6d  e)/sizeof(aDbNam
53f0: 65 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20  e[0]); i++){.   
5400: 20 20 20 73 74 72 63 70 79 28 26 7a 50 77 64 5b     strcpy(&zPwd[
5410: 6e 5d 2c 20 61 44 62 4e 61 6d 65 5b 69 5d 29 3b  n], aDbName[i]);
5420: 0a 20 20 20 20 20 20 69 66 28 20 69 73 56 61 6c  .      if( isVal
5430: 69 64 4c 6f 63 61 6c 44 62 28 7a 50 77 64 29 20  idLocalDb(zPwd) 
5440: 29 7b 0a 20 20 20 20 20 20 20 20 2f 2a 20 46 6f  ){.        /* Fo
5450: 75 6e 64 20 61 20 76 61 6c 69 64 20 63 68 65 63  und a valid chec
5460: 6b 6f 75 74 20 64 61 74 61 62 61 73 65 20 66 69  kout database fi
5470: 6c 65 20 2a 2f 0a 20 20 20 20 20 20 20 20 7a 50  le */.        zP
5480: 77 64 5b 6e 5d 20 3d 20 30 3b 0a 20 20 20 20 20  wd[n] = 0;.     
5490: 20 20 20 77 68 69 6c 65 28 20 6e 3e 31 20 26 26     while( n>1 &&
54a0: 20 7a 50 77 64 5b 6e 2d 31 5d 3d 3d 27 2f 27 20   zPwd[n-1]=='/' 
54b0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6e 2d 2d  ){.          n--
54c0: 3b 0a 20 20 20 20 20 20 20 20 20 20 7a 50 77 64  ;.          zPwd
54d0: 5b 6e 5d 20 3d 20 30 3b 0a 20 20 20 20 20 20 20  [n] = 0;.       
54e0: 20 7d 0a 20 20 20 20 20 20 20 20 67 2e 7a 4c 6f   }.        g.zLo
54f0: 63 61 6c 52 6f 6f 74 20 3d 20 6d 70 72 69 6e 74  calRoot = mprint
5500: 66 28 22 25 73 2f 22 2c 20 7a 50 77 64 29 3b 0a  f("%s/", zPwd);.
5510: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 31          return 1
5520: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a  ;.      }.    }.
5530: 20 20 20 20 6e 2d 2d 3b 0a 20 20 20 20 77 68 69      n--;.    whi
5540: 6c 65 28 20 6e 3e 30 20 26 26 20 7a 50 77 64 5b  le( n>0 && zPwd[
5550: 6e 5d 21 3d 27 2f 27 20 29 7b 20 6e 2d 2d 3b 20  n]!='/' ){ n--; 
5560: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 6e 3e 30  }.    while( n>0
5570: 20 26 26 20 7a 50 77 64 5b 6e 2d 31 5d 3d 3d 27   && zPwd[n-1]=='
5580: 2f 27 20 29 7b 20 6e 2d 2d 3b 20 7d 0a 20 20 20  /' ){ n--; }.   
5590: 20 7a 50 77 64 5b 6e 5d 20 3d 20 30 3b 0a 20 20   zPwd[n] = 0;.  
55a0: 7d 0a 0a 20 20 2f 2a 20 41 20 63 68 65 63 6b 6f  }..  /* A checko
55b0: 75 74 20 64 61 74 61 62 61 73 65 20 66 69 6c 65  ut database file
55c0: 20 63 6f 75 6c 64 20 6e 6f 74 20 62 65 20 66 6f   could not be fo
55d0: 75 6e 64 20 2a 2f 0a 20 20 72 65 74 75 72 6e 20  und */.  return 
55e0: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e  0;.}../*.** Open
55f0: 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20   the repository 
5600: 64 61 74 61 62 61 73 65 20 67 69 76 65 6e 20 62  database given b
5610: 79 20 7a 44 62 4e 61 6d 65 2e 20 20 49 66 20 7a  y zDbName.  If z
5620: 44 62 4e 61 6d 65 3d 3d 4e 55 4c 4c 20 74 68 65  DbName==NULL the
5630: 6e 0a 2a 2a 20 67 65 74 20 74 68 65 20 6e 61 6d  n.** get the nam
5640: 65 20 66 72 6f 6d 20 74 68 65 20 61 6c 72 65 61  e from the alrea
5650: 64 79 20 6f 70 65 6e 20 6c 6f 63 61 6c 20 64 61  dy open local da
5660: 74 61 62 61 73 65 2e 0a 2a 2f 0a 76 6f 69 64 20  tabase..*/.void 
5670: 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 74 6f  db_open_reposito
5680: 72 79 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  ry(const char *z
5690: 44 62 4e 61 6d 65 29 7b 0a 20 20 69 66 28 20 67  DbName){.  if( g
56a0: 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20  .repositoryOpen 
56b0: 29 20 72 65 74 75 72 6e 3b 0a 20 20 69 66 28 20  ) return;.  if( 
56c0: 7a 44 62 4e 61 6d 65 3d 3d 30 20 29 7b 0a 20 20  zDbName==0 ){.  
56d0: 20 20 69 66 28 20 67 2e 6c 6f 63 61 6c 4f 70 65    if( g.localOpe
56e0: 6e 20 29 7b 0a 20 20 20 20 20 20 7a 44 62 4e 61  n ){.      zDbNa
56f0: 6d 65 20 3d 20 64 62 5f 6c 67 65 74 28 22 72 65  me = db_lget("re
5700: 70 6f 73 69 74 6f 72 79 22 2c 20 30 29 3b 0a 20  pository", 0);. 
5710: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 7a 44 62     }.    if( zDb
5720: 4e 61 6d 65 3d 3d 30 20 29 7b 0a 20 20 20 20 20  Name==0 ){.     
5730: 20 64 62 5f 65 72 72 28 22 75 6e 61 62 6c 65 20   db_err("unable 
5740: 74 6f 20 66 69 6e 64 20 74 68 65 20 6e 61 6d 65  to find the name
5750: 20 6f 66 20 61 20 72 65 70 6f 73 69 74 6f 72 79   of a repository
5760: 20 64 61 74 61 62 61 73 65 22 29 3b 0a 20 20 20   database");.   
5770: 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 61 63 63   }.  }.  if( acc
5780: 65 73 73 28 7a 44 62 4e 61 6d 65 2c 20 52 5f 4f  ess(zDbName, R_O
5790: 4b 29 20 7c 7c 20 66 69 6c 65 5f 73 69 7a 65 28  K) || file_size(
57a0: 7a 44 62 4e 61 6d 65 29 3c 31 30 32 34 20 29 7b  zDbName)<1024 ){
57b0: 0a 20 20 20 20 69 66 28 20 61 63 63 65 73 73 28  .    if( access(
57c0: 7a 44 62 4e 61 6d 65 2c 20 30 29 20 29 7b 0a 20  zDbName, 0) ){. 
57d0: 20 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 6e 69       fossil_pani
57e0: 63 28 22 72 65 70 6f 73 69 74 6f 72 79 20 64 6f  c("repository do
57f0: 65 73 20 6e 6f 74 20 65 78 69 73 74 20 6f 72 22  es not exist or"
5800: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
5810: 20 20 20 20 22 20 69 73 20 69 6e 20 61 6e 20 75      " is in an u
5820: 6e 72 65 61 64 61 62 6c 65 20 64 69 72 65 63 74  nreadable direct
5830: 6f 72 79 3a 20 25 73 22 2c 20 7a 44 62 4e 61 6d  ory: %s", zDbNam
5840: 65 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66  e);.    }else if
5850: 28 20 61 63 63 65 73 73 28 7a 44 62 4e 61 6d 65  ( access(zDbName
5860: 2c 20 52 5f 4f 4b 29 20 29 7b 0a 20 20 20 20 20  , R_OK) ){.     
5870: 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 72   fossil_panic("r
5880: 65 61 64 20 70 65 72 6d 69 73 73 69 6f 6e 20 64  ead permission d
5890: 65 6e 69 65 64 20 66 6f 72 20 72 65 70 6f 73 69  enied for reposi
58a0: 74 6f 72 79 20 25 73 22 2c 20 7a 44 62 4e 61 6d  tory %s", zDbNam
58b0: 65 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20  e);.    }else{. 
58c0: 20 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 6e 69       fossil_pani
58d0: 63 28 22 6e 6f 74 20 61 20 76 61 6c 69 64 20 72  c("not a valid r
58e0: 65 70 6f 73 69 74 6f 72 79 3a 20 25 73 22 2c 20  epository: %s", 
58f0: 7a 44 62 4e 61 6d 65 29 3b 0a 20 20 20 20 7d 0a  zDbName);.    }.
5900: 20 20 7d 0a 20 20 64 62 5f 6f 70 65 6e 5f 6f 72    }.  db_open_or
5910: 5f 61 74 74 61 63 68 28 7a 44 62 4e 61 6d 65 2c  _attach(zDbName,
5920: 20 22 72 65 70 6f 73 69 74 6f 72 79 22 29 3b 0a   "repository");.
5930: 20 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70    g.repositoryOp
5940: 65 6e 20 3d 20 31 3b 0a 20 20 67 2e 7a 52 65 70  en = 1;.  g.zRep
5950: 6f 73 69 74 6f 72 79 4e 61 6d 65 20 3d 20 6d 70  ositoryName = mp
5960: 72 69 6e 74 66 28 22 25 73 22 2c 20 7a 44 62 4e  rintf("%s", zDbN
5970: 61 6d 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  ame);.}../*.** T
5980: 72 79 20 74 6f 20 66 69 6e 64 20 74 68 65 20 72  ry to find the r
5990: 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 6f 70  epository and op
59a0: 65 6e 20 69 74 2e 20 20 55 73 65 20 74 68 65 20  en it.  Use the 
59b0: 2d 52 20 6f 72 20 2d 2d 72 65 70 6f 73 69 74 6f  -R or --reposito
59c0: 72 79 0a 2a 2a 20 6f 70 74 69 6f 6e 20 74 6f 20  ry.** option to 
59d0: 6c 6f 63 61 74 65 20 74 68 65 20 72 65 70 6f 73  locate the repos
59e0: 69 74 6f 72 79 2e 20 20 49 66 20 6e 6f 20 73 75  itory.  If no su
59f0: 63 68 20 6f 70 74 69 6f 6e 20 69 73 20 61 76 61  ch option is ava
5a00: 69 6c 61 62 6c 65 2c 20 74 68 65 6e 0a 2a 2a 20  ilable, then.** 
5a10: 75 73 65 20 74 68 65 20 72 65 70 6f 73 69 74 6f  use the reposito
5a20: 72 79 20 6f 66 20 74 68 65 20 6f 70 65 6e 20 63  ry of the open c
5a30: 68 65 63 6b 6f 75 74 20 69 66 20 74 68 65 72 65  heckout if there
5a40: 20 69 73 20 6f 6e 65 2e 0a 2a 2a 0a 2a 2a 20 45   is one..**.** E
5a50: 72 72 6f 72 20 6f 75 74 20 69 66 20 74 68 65 20  rror out if the 
5a60: 72 65 70 6f 73 69 74 6f 72 79 20 63 61 6e 6e 6f  repository canno
5a70: 74 20 62 65 20 6f 70 65 6e 65 64 2e 0a 2a 2f 0a  t be opened..*/.
5a80: 76 6f 69 64 20 64 62 5f 66 69 6e 64 5f 61 6e 64  void db_find_and
5a90: 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 74 6f 72 79  _open_repository
5aa0: 28 69 6e 74 20 65 72 72 49 66 4e 6f 74 46 6f 75  (int errIfNotFou
5ab0: 6e 64 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61  nd){.  const cha
5ac0: 72 20 2a 7a 52 65 70 20 3d 20 66 69 6e 64 5f 6f  r *zRep = find_o
5ad0: 70 74 69 6f 6e 28 22 72 65 70 6f 73 69 74 6f 72  ption("repositor
5ae0: 79 22 2c 20 22 52 22 2c 20 31 29 3b 0a 20 20 69  y", "R", 1);.  i
5af0: 66 28 20 7a 52 65 70 3d 3d 30 20 29 7b 0a 20 20  f( zRep==0 ){.  
5b00: 20 20 69 66 28 20 64 62 5f 6f 70 65 6e 5f 6c 6f    if( db_open_lo
5b10: 63 61 6c 28 29 3d 3d 30 20 29 7b 0a 20 20 20 20  cal()==0 ){.    
5b20: 20 20 67 6f 74 6f 20 72 65 70 5f 6e 6f 74 5f 66    goto rep_not_f
5b30: 6f 75 6e 64 3b 0a 20 20 20 20 7d 0a 20 20 20 20  ound;.    }.    
5b40: 7a 52 65 70 20 3d 20 64 62 5f 6c 67 65 74 28 22  zRep = db_lget("
5b50: 72 65 70 6f 73 69 74 6f 72 79 22 2c 20 30 29 3b  repository", 0);
5b60: 0a 20 20 20 20 69 66 28 20 7a 52 65 70 3d 3d 30  .    if( zRep==0
5b70: 20 29 7b 0a 20 20 20 20 20 20 67 6f 74 6f 20 72   ){.      goto r
5b80: 65 70 5f 6e 6f 74 5f 66 6f 75 6e 64 3b 0a 20 20  ep_not_found;.  
5b90: 20 20 7d 0a 20 20 7d 0a 20 20 64 62 5f 6f 70 65    }.  }.  db_ope
5ba0: 6e 5f 72 65 70 6f 73 69 74 6f 72 79 28 7a 52 65  n_repository(zRe
5bb0: 70 29 3b 0a 20 20 69 66 28 20 67 2e 72 65 70 6f  p);.  if( g.repo
5bc0: 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 20  sitoryOpen ){.  
5bd0: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 72 65    return;.  }.re
5be0: 70 5f 6e 6f 74 5f 66 6f 75 6e 64 3a 0a 20 20 69  p_not_found:.  i
5bf0: 66 28 20 65 72 72 49 66 4e 6f 74 46 6f 75 6e 64  f( errIfNotFound
5c00: 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 66   ){.    fossil_f
5c10: 61 74 61 6c 28 22 75 73 65 20 2d 2d 72 65 70 6f  atal("use --repo
5c20: 73 69 74 6f 72 79 20 6f 72 20 2d 52 20 74 6f 20  sitory or -R to 
5c30: 73 70 65 63 69 66 79 20 74 68 65 20 72 65 70 6f  specify the repo
5c40: 73 69 74 6f 72 79 20 64 61 74 61 62 61 73 65 22  sitory database"
5c50: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
5c60: 43 4f 4d 4d 41 4e 44 3a 20 74 65 73 74 2d 6d 6f  COMMAND: test-mo
5c70: 76 65 2d 72 65 70 6f 73 69 74 6f 72 79 0a 2a 2a  ve-repository.**
5c80: 0a 2a 2a 20 55 73 61 67 65 3a 20 25 66 6f 73 73  .** Usage: %foss
5c90: 69 6c 20 74 65 73 74 2d 6d 6f 76 65 2d 72 65 70  il test-move-rep
5ca0: 6f 73 69 74 6f 72 79 20 50 41 54 48 4e 41 4d 45  ository PATHNAME
5cb0: 0a 2a 2a 0a 2a 2a 20 43 68 61 6e 67 65 20 74 68  .**.** Change th
5cc0: 65 20 6c 6f 63 61 74 69 6f 6e 20 6f 66 20 74 68  e location of th
5cd0: 65 20 72 65 70 6f 73 69 74 6f 72 79 20 64 61 74  e repository dat
5ce0: 61 62 61 73 65 20 6f 6e 20 61 20 6c 6f 63 61 6c  abase on a local
5cf0: 20 63 68 65 63 6b 2d 6f 75 74 2e 0a 2a 2a 20 55   check-out..** U
5d00: 73 65 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20  se this command 
5d10: 74 6f 20 61 76 6f 69 64 20 68 61 76 69 6e 67 20  to avoid having 
5d20: 74 6f 20 63 6c 6f 73 65 20 61 6e 64 20 72 65 6f  to close and reo
5d30: 70 65 6e 20 61 20 63 68 65 63 6b 6f 75 74 0a 2a  pen a checkout.*
5d40: 2a 20 77 68 65 6e 20 72 65 6c 6f 63 61 74 69 6e  * when relocatin
5d50: 67 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79  g the repository
5d60: 20 64 61 74 61 62 61 73 65 2e 0a 2a 2f 0a 76 6f   database..*/.vo
5d70: 69 64 20 6d 6f 76 65 5f 72 65 70 6f 5f 63 6d 64  id move_repo_cmd
5d80: 28 76 6f 69 64 29 7b 0a 20 20 42 6c 6f 62 20 72  (void){.  Blob r
5d90: 65 70 6f 3b 0a 20 20 63 68 61 72 20 2a 7a 52 65  epo;.  char *zRe
5da0: 70 6f 3b 0a 20 20 69 66 28 20 67 2e 61 72 67 63  po;.  if( g.argc
5db0: 21 3d 33 20 29 7b 0a 20 20 20 20 75 73 61 67 65  !=3 ){.    usage
5dc0: 28 22 50 41 54 48 4e 41 4d 45 22 29 3b 0a 20 20  ("PATHNAME");.  
5dd0: 7d 0a 20 20 69 66 28 20 64 62 5f 6f 70 65 6e 5f  }.  if( db_open_
5de0: 6c 6f 63 61 6c 28 29 3d 3d 30 20 29 7b 0a 20 20  local()==0 ){.  
5df0: 20 20 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22    fossil_fatal("
5e00: 6e 6f 74 20 69 6e 20 61 20 6c 6f 63 61 6c 20 63  not in a local c
5e10: 68 65 63 6b 6f 75 74 22 29 3b 0a 20 20 20 20 72  heckout");.    r
5e20: 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 66 69 6c  eturn;.  }.  fil
5e30: 65 5f 63 61 6e 6f 6e 69 63 61 6c 5f 6e 61 6d 65  e_canonical_name
5e40: 28 67 2e 61 72 67 76 5b 32 5d 2c 20 26 72 65 70  (g.argv[2], &rep
5e50: 6f 29 3b 0a 20 20 7a 52 65 70 6f 20 3d 20 62 6c  o);.  zRepo = bl
5e60: 6f 62 5f 73 74 72 28 26 72 65 70 6f 29 3b 0a 20  ob_str(&repo);. 
5e70: 20 69 66 28 20 61 63 63 65 73 73 28 7a 52 65 70   if( access(zRep
5e80: 6f 2c 20 30 29 20 29 7b 0a 20 20 20 20 66 6f 73  o, 0) ){.    fos
5e90: 73 69 6c 5f 66 61 74 61 6c 28 22 6e 6f 20 73 75  sil_fatal("no su
5ea0: 63 68 20 66 69 6c 65 3a 20 25 73 22 2c 20 7a 52  ch file: %s", zR
5eb0: 65 70 6f 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 6f  epo);.  }.  db_o
5ec0: 70 65 6e 5f 6f 72 5f 61 74 74 61 63 68 28 7a 52  pen_or_attach(zR
5ed0: 65 70 6f 2c 20 22 74 65 73 74 5f 72 65 70 6f 22  epo, "test_repo"
5ee0: 29 3b 0a 20 20 64 62 5f 6c 73 65 74 28 22 72 65  );.  db_lset("re
5ef0: 70 6f 73 69 74 6f 72 79 22 2c 20 62 6c 6f 62 5f  pository", blob_
5f00: 73 74 72 28 26 72 65 70 6f 29 29 3b 0a 20 20 64  str(&repo));.  d
5f10: 62 5f 63 6c 6f 73 65 28 29 3b 0a 7d 0a 0a 0a 2f  b_close();.}.../
5f20: 2a 0a 2a 2a 20 4f 70 65 6e 20 74 68 65 20 6c 6f  *.** Open the lo
5f30: 63 61 6c 20 64 61 74 61 62 61 73 65 2e 20 20 49  cal database.  I
5f40: 66 20 75 6e 61 62 6c 65 2c 20 65 78 69 74 20 77  f unable, exit w
5f50: 69 74 68 20 61 6e 20 65 72 72 6f 72 2e 0a 2a 2f  ith an error..*/
5f60: 0a 76 6f 69 64 20 64 62 5f 6d 75 73 74 5f 62 65  .void db_must_be
5f70: 5f 77 69 74 68 69 6e 5f 74 72 65 65 28 76 6f 69  _within_tree(voi
5f80: 64 29 7b 0a 20 20 69 66 28 20 64 62 5f 6f 70 65  d){.  if( db_ope
5f90: 6e 5f 6c 6f 63 61 6c 28 29 3d 3d 30 20 29 7b 0a  n_local()==0 ){.
5fa0: 20 20 20 20 66 6f 73 73 69 6c 5f 66 61 74 61 6c      fossil_fatal
5fb0: 28 22 6e 6f 74 20 77 69 74 68 69 6e 20 61 6e 20  ("not within an 
5fc0: 6f 70 65 6e 20 63 68 65 63 6b 6f 75 74 22 29 3b  open checkout");
5fd0: 0a 20 20 7d 0a 20 20 64 62 5f 6f 70 65 6e 5f 72  .  }.  db_open_r
5fe0: 65 70 6f 73 69 74 6f 72 79 28 30 29 3b 0a 7d 0a  epository(0);.}.
5ff0: 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20 74 68 65  ./*.** Close the
6000: 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e 65 63   database connec
6010: 74 69 6f 6e 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62  tion..*/.void db
6020: 5f 63 6c 6f 73 65 28 76 6f 69 64 29 7b 0a 20 20  _close(void){.  
6030: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 53  sqlite3_stmt *pS
6040: 74 6d 74 3b 0a 20 20 69 66 28 20 67 2e 64 62 3d  tmt;.  if( g.db=
6050: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 77  =0 ) return;.  w
6060: 68 69 6c 65 28 20 70 41 6c 6c 53 74 6d 74 20 29  hile( pAllStmt )
6070: 7b 0a 20 20 20 20 64 62 5f 66 69 6e 61 6c 69 7a  {.    db_finaliz
6080: 65 28 70 41 6c 6c 53 74 6d 74 29 3b 0a 20 20 7d  e(pAllStmt);.  }
6090: 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61  .  db_end_transa
60a0: 63 74 69 6f 6e 28 31 29 3b 0a 20 20 70 53 74 6d  ction(1);.  pStm
60b0: 74 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 20  t = 0;.  while( 
60c0: 28 70 53 74 6d 74 20 3d 20 73 71 6c 69 74 65 33  (pStmt = sqlite3
60d0: 5f 6e 65 78 74 5f 73 74 6d 74 28 67 2e 64 62 2c  _next_stmt(g.db,
60e0: 20 70 53 74 6d 74 29 29 21 3d 30 20 29 7b 0a 20   pStmt))!=0 ){. 
60f0: 20 20 20 66 6f 73 73 69 6c 5f 77 61 72 6e 69 6e     fossil_warnin
6100: 67 28 22 75 6e 66 69 6e 61 6c 69 7a 65 64 20 53  g("unfinalized S
6110: 51 4c 20 73 74 61 74 65 6d 65 6e 74 3a 20 5b 25  QL statement: [%
6120: 73 5d 22 2c 20 73 71 6c 69 74 65 33 5f 73 71 6c  s]", sqlite3_sql
6130: 28 70 53 74 6d 74 29 29 3b 0a 20 20 7d 0a 20 20  (pStmt));.  }.  
6140: 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e  g.repositoryOpen
6150: 20 3d 20 30 3b 0a 20 20 67 2e 6c 6f 63 61 6c 4f   = 0;.  g.localO
6160: 70 65 6e 20 3d 20 30 3b 0a 20 20 67 2e 63 6f 6e  pen = 0;.  g.con
6170: 66 69 67 4f 70 65 6e 20 3d 20 30 3b 0a 20 20 73  figOpen = 0;.  s
6180: 71 6c 69 74 65 33 5f 77 61 6c 5f 63 68 65 63 6b  qlite3_wal_check
6190: 70 6f 69 6e 74 28 67 2e 64 62 2c 20 30 29 3b 0a  point(g.db, 0);.
61a0: 20 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28    sqlite3_close(
61b0: 67 2e 64 62 29 3b 0a 20 20 67 2e 64 62 20 3d 20  g.db);.  g.db = 
61c0: 30 3b 0a 20 20 69 66 28 20 67 2e 64 62 43 6f 6e  0;.  if( g.dbCon
61d0: 66 69 67 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  fig ){.    sqlit
61e0: 65 33 5f 63 6c 6f 73 65 28 67 2e 64 62 43 6f 6e  e3_close(g.dbCon
61f0: 66 69 67 29 3b 0a 20 20 20 20 67 2e 64 62 43 6f  fig);.    g.dbCo
6200: 6e 66 69 67 20 3d 20 30 3b 0a 20 20 7d 0a 7d 0a  nfig = 0;.  }.}.
6210: 0a 0a 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61  ../*.** Create a
6220: 20 6e 65 77 20 65 6d 70 74 79 20 72 65 70 6f 73   new empty repos
6230: 69 74 6f 72 79 20 64 61 74 61 62 61 73 65 20 77  itory database w
6240: 69 74 68 20 74 68 65 20 67 69 76 65 6e 20 6e 61  ith the given na
6250: 6d 65 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 6c 79 20 74  me..**.** Only t
6260: 68 65 20 73 63 68 65 6d 61 20 69 73 20 69 6e 69  he schema is ini
6270: 74 69 61 6c 69 7a 65 64 2e 20 20 54 68 65 20 72  tialized.  The r
6280: 65 71 75 69 72 65 64 20 56 41 52 20 74 61 62 6c  equired VAR tabl
6290: 65 73 20 65 6e 74 72 69 65 73 0a 2a 2a 20 61 72  es entries.** ar
62a0: 65 20 6e 6f 74 20 73 65 74 20 62 79 20 74 68 69  e not set by thi
62b0: 73 20 72 6f 75 74 69 6e 65 20 61 6e 64 20 6d 75  s routine and mu
62c0: 73 74 20 62 65 20 73 65 74 20 73 65 70 61 72 61  st be set separa
62d0: 74 65 6c 79 20 69 6e 20 6f 72 64 65 72 0a 2a 2a  tely in order.**
62e0: 20 74 6f 20 6d 61 6b 65 20 74 68 65 20 6e 65 77   to make the new
62f0: 20 66 69 6c 65 20 61 20 76 61 6c 69 64 20 64 61   file a valid da
6300: 74 61 62 61 73 65 2e 0a 2a 2f 0a 76 6f 69 64 20  tabase..*/.void 
6310: 64 62 5f 63 72 65 61 74 65 5f 72 65 70 6f 73 69  db_create_reposi
6320: 74 6f 72 79 28 63 6f 6e 73 74 20 63 68 61 72 20  tory(const char 
6330: 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 20 20 64  *zFilename){.  d
6340: 62 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 65 28  b_init_database(
6350: 0a 20 20 20 20 20 7a 46 69 6c 65 6e 61 6d 65 2c  .     zFilename,
6360: 0a 20 20 20 20 20 7a 52 65 70 6f 73 69 74 6f 72  .     zRepositor
6370: 79 53 63 68 65 6d 61 31 2c 0a 20 20 20 20 20 7a  ySchema1,.     z
6380: 52 65 70 6f 73 69 74 6f 72 79 53 63 68 65 6d 61  RepositorySchema
6390: 32 2c 0a 20 20 20 20 20 28 63 68 61 72 2a 29 30  2,.     (char*)0
63a0: 0a 20 20 29 3b 0a 20 20 69 73 4e 65 77 52 65 70  .  );.  isNewRep
63b0: 6f 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  o = 1;.}../*.** 
63c0: 43 72 65 61 74 65 20 74 68 65 20 64 65 66 61 75  Create the defau
63d0: 6c 74 20 75 73 65 72 20 61 63 63 6f 75 6e 74 73  lt user accounts
63e0: 20 69 6e 20 74 68 65 20 55 53 45 52 20 74 61 62   in the USER tab
63f0: 6c 65 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 63  le..*/.void db_c
6400: 72 65 61 74 65 5f 64 65 66 61 75 6c 74 5f 75 73  reate_default_us
6410: 65 72 73 28 69 6e 74 20 73 65 74 75 70 55 73 65  ers(int setupUse
6420: 72 4f 6e 6c 79 2c 20 63 6f 6e 73 74 20 63 68 61  rOnly, const cha
6430: 72 20 2a 7a 44 65 66 61 75 6c 74 55 73 65 72 29  r *zDefaultUser)
6440: 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  {.  const char *
6450: 7a 55 73 65 72 3b 0a 20 20 7a 55 73 65 72 20 3d  zUser;.  zUser =
6460: 20 64 62 5f 67 65 74 28 22 64 65 66 61 75 6c 74   db_get("default
6470: 2d 75 73 65 72 22 2c 20 30 29 3b 0a 20 20 69 66  -user", 0);.  if
6480: 28 20 7a 55 73 65 72 3d 3d 30 20 29 7b 0a 20 20  ( zUser==0 ){.  
6490: 20 20 7a 55 73 65 72 20 3d 20 7a 44 65 66 61 75    zUser = zDefau
64a0: 6c 74 55 73 65 72 3b 0a 20 20 7d 0a 20 20 69 66  ltUser;.  }.  if
64b0: 28 20 7a 55 73 65 72 3d 3d 30 20 29 7b 0a 23 69  ( zUser==0 ){.#i
64c0: 66 20 64 65 66 69 6e 65 64 28 5f 57 49 4e 33 32  f defined(_WIN32
64d0: 29 0a 20 20 20 20 7a 55 73 65 72 20 3d 20 67 65  ).    zUser = ge
64e0: 74 65 6e 76 28 22 55 53 45 52 4e 41 4d 45 22 29  tenv("USERNAME")
64f0: 3b 0a 23 65 6c 73 65 0a 20 20 20 20 7a 55 73 65  ;.#else.    zUse
6500: 72 20 3d 20 67 65 74 65 6e 76 28 22 55 53 45 52  r = getenv("USER
6510: 22 29 3b 0a 23 65 6e 64 69 66 0a 20 20 7d 0a 20  ");.#endif.  }. 
6520: 20 69 66 28 20 7a 55 73 65 72 3d 3d 30 20 29 7b   if( zUser==0 ){
6530: 0a 20 20 20 20 7a 55 73 65 72 20 3d 20 22 72 6f  .    zUser = "ro
6540: 6f 74 22 3b 0a 20 20 7d 0a 20 20 64 62 5f 6d 75  ot";.  }.  db_mu
6550: 6c 74 69 5f 65 78 65 63 28 0a 20 20 20 20 20 22  lti_exec(.     "
6560: 49 4e 53 45 52 54 20 49 4e 54 4f 20 75 73 65 72  INSERT INTO user
6570: 28 6c 6f 67 69 6e 2c 20 70 77 2c 20 63 61 70 2c  (login, pw, cap,
6580: 20 69 6e 66 6f 29 22 0a 20 20 20 20 20 22 56 41   info)".     "VA
6590: 4c 55 45 53 28 25 51 2c 6c 6f 77 65 72 28 68 65  LUES(%Q,lower(he
65a0: 78 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 33 29 29  x(randomblob(3))
65b0: 29 2c 27 73 27 2c 27 27 29 22 2c 20 7a 55 73 65  ),'s','')", zUse
65c0: 72 0a 20 20 29 3b 0a 20 20 69 66 28 20 21 73 65  r.  );.  if( !se
65d0: 74 75 70 55 73 65 72 4f 6e 6c 79 20 29 7b 0a 20  tupUserOnly ){. 
65e0: 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63     db_multi_exec
65f0: 28 0a 20 20 20 20 20 20 20 22 49 4e 53 45 52 54  (.       "INSERT
6600: 20 49 4e 54 4f 20 75 73 65 72 28 6c 6f 67 69 6e   INTO user(login
6610: 2c 70 77 2c 63 61 70 2c 69 6e 66 6f 29 22 0a 20  ,pw,cap,info)". 
6620: 20 20 20 20 20 20 22 20 20 20 56 41 4c 55 45 53        "   VALUES
6630: 28 27 61 6e 6f 6e 79 6d 6f 75 73 27 2c 68 65 78  ('anonymous',hex
6640: 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 38 29 29 2c  (randomblob(8)),
6650: 27 67 68 6d 6e 63 7a 27 2c 27 41 6e 6f 6e 27 29  'ghmncz','Anon')
6660: 3b 22 0a 20 20 20 20 20 20 20 22 49 4e 53 45 52  ;".       "INSER
6670: 54 20 49 4e 54 4f 20 75 73 65 72 28 6c 6f 67 69  T INTO user(logi
6680: 6e 2c 70 77 2c 63 61 70 2c 69 6e 66 6f 29 22 0a  n,pw,cap,info)".
6690: 20 20 20 20 20 20 20 22 20 20 20 56 41 4c 55 45         "   VALUE
66a0: 53 28 27 6e 6f 62 6f 64 79 27 2c 27 27 2c 27 6a  S('nobody','','j
66b0: 6f 72 27 2c 27 4e 6f 62 6f 64 79 27 29 3b 22 0a  or','Nobody');".
66c0: 20 20 20 20 20 20 20 22 49 4e 53 45 52 54 20 49         "INSERT I
66d0: 4e 54 4f 20 75 73 65 72 28 6c 6f 67 69 6e 2c 70  NTO user(login,p
66e0: 77 2c 63 61 70 2c 69 6e 66 6f 29 22 0a 20 20 20  w,cap,info)".   
66f0: 20 20 20 20 22 20 20 20 56 41 4c 55 45 53 28 27      "   VALUES('
6700: 64 65 76 65 6c 6f 70 65 72 27 2c 27 27 2c 27 64  developer','','d
6710: 65 69 27 2c 27 44 65 76 27 29 3b 22 0a 20 20 20  ei','Dev');".   
6720: 20 20 20 20 22 49 4e 53 45 52 54 20 49 4e 54 4f      "INSERT INTO
6730: 20 75 73 65 72 28 6c 6f 67 69 6e 2c 70 77 2c 63   user(login,pw,c
6740: 61 70 2c 69 6e 66 6f 29 22 0a 20 20 20 20 20 20  ap,info)".      
6750: 20 22 20 20 20 56 41 4c 55 45 53 28 27 72 65 61   "   VALUES('rea
6760: 64 65 72 27 2c 27 27 2c 27 6b 70 74 77 27 2c 27  der','','kptw','
6770: 52 65 61 64 65 72 27 29 3b 22 0a 20 20 20 20 29  Reader');".    )
6780: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 46  ;.  }.}../*.** F
6790: 69 6c 6c 20 61 6e 20 65 6d 70 74 79 20 72 65 70  ill an empty rep
67a0: 6f 73 69 74 6f 72 79 20 64 61 74 61 62 61 73 65  ository database
67b0: 20 77 69 74 68 20 74 68 65 20 62 61 73 69 63 20   with the basic 
67c0: 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20  information for 
67d0: 61 0a 2a 2a 20 72 65 70 6f 73 69 74 6f 72 79 2e  a.** repository.
67e0: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69   This function i
67f0: 73 20 73 68 61 72 65 64 20 62 65 74 77 65 65 6e  s shared between
6800: 20 27 63 72 65 61 74 65 5f 72 65 70 6f 73 69 74   'create_reposit
6810: 6f 72 79 5f 63 6d 64 27 0a 2a 2a 20 28 27 6e 65  ory_cmd'.** ('ne
6820: 77 27 29 20 61 6e 64 20 27 72 65 63 6f 6e 73 74  w') and 'reconst
6830: 72 75 63 74 5f 63 6d 64 27 20 28 27 72 65 63 6f  ruct_cmd' ('reco
6840: 6e 73 74 72 75 63 74 27 29 2c 20 62 6f 74 68 20  nstruct'), both 
6850: 6f 66 20 77 68 69 63 68 20 63 72 65 61 74 65 0a  of which create.
6860: 2a 2a 20 6e 65 77 20 72 65 70 6f 73 69 74 6f 72  ** new repositor
6870: 69 65 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 7a  ies..**.** The z
6880: 49 6e 69 74 69 61 6c 44 61 74 65 20 70 61 72 61  InitialDate para
6890: 6d 65 74 65 72 20 64 65 74 65 72 6d 69 6e 65 73  meter determines
68a0: 20 74 68 65 20 64 61 74 65 20 6f 66 20 74 68 65   the date of the
68b0: 20 69 6e 69 74 69 61 6c 20 63 68 65 63 6b 2d 69   initial check-i
68c0: 6e 0a 2a 2a 20 74 68 61 74 20 69 73 20 61 75 74  n.** that is aut
68d0: 6f 6d 61 74 69 63 61 6c 6c 79 20 63 72 65 61 74  omatically creat
68e0: 65 64 2e 20 20 49 66 20 7a 49 6e 69 74 69 61 6c  ed.  If zInitial
68f0: 44 61 74 65 20 69 73 20 30 20 74 68 65 6e 20 6e  Date is 0 then n
6900: 6f 20 69 6e 69 74 69 61 6c 0a 2a 2a 20 63 68 65  o initial.** che
6910: 63 6b 2d 69 6e 20 69 73 20 63 72 65 61 74 65 64  ck-in is created
6920: 2e 20 54 68 65 20 6d 61 6b 65 53 65 72 76 65 72  . The makeServer
6930: 43 6f 64 65 73 20 66 6c 61 67 20 64 65 74 65 72  Codes flag deter
6940: 6d 69 6e 65 73 20 77 68 65 74 68 65 72 20 6f 72  mines whether or
6950: 0a 2a 2a 20 6e 6f 74 20 73 65 72 76 65 72 20 61  .** not server a
6960: 6e 64 20 70 72 6f 6a 65 63 74 20 63 6f 64 65 73  nd project codes
6970: 20 61 72 65 20 69 6e 76 65 6e 74 65 64 20 66 6f   are invented fo
6980: 72 20 74 68 69 73 20 72 65 70 6f 73 69 74 6f 72  r this repositor
6990: 79 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 69 6e  y..*/.void db_in
69a0: 69 74 69 61 6c 5f 73 65 74 75 70 28 0a 20 20 63  itial_setup(.  c
69b0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 49 6e 69 74  onst char *zInit
69c0: 69 61 6c 44 61 74 65 2c 20 20 20 20 2f 2a 20 49  ialDate,    /* I
69d0: 6e 69 74 69 61 6c 20 64 61 74 65 20 6f 66 20 72  nitial date of r
69e0: 65 70 6f 73 69 74 6f 72 79 2e 20 28 65 78 3a 20  epository. (ex: 
69f0: 22 6e 6f 77 22 29 20 2a 2f 0a 20 20 63 6f 6e 73  "now") */.  cons
6a00: 74 20 63 68 61 72 20 2a 7a 44 65 66 61 75 6c 74  t char *zDefault
6a10: 55 73 65 72 2c 20 20 20 20 2f 2a 20 44 65 66 61  User,    /* Defa
6a20: 75 6c 74 20 75 73 65 72 20 66 6f 72 20 74 68 65  ult user for the
6a30: 20 72 65 70 6f 73 69 74 6f 72 79 20 2a 2f 0a 20   repository */. 
6a40: 20 69 6e 74 20 6d 61 6b 65 53 65 72 76 65 72 43   int makeServerC
6a50: 6f 64 65 73 20 20 20 20 20 20 20 20 20 20 2f 2a  odes          /*
6a60: 20 54 72 75 65 20 74 6f 20 6d 61 6b 65 20 6e 65   True to make ne
6a70: 77 20 73 65 72 76 65 72 20 26 20 70 72 6f 6a 65  w server & proje
6a80: 63 74 20 63 6f 64 65 73 20 2a 2f 0a 29 7b 0a 20  ct codes */.){. 
6a90: 20 63 68 61 72 20 2a 7a 44 61 74 65 3b 0a 20 20   char *zDate;.  
6aa0: 42 6c 6f 62 20 68 61 73 68 3b 0a 20 20 42 6c 6f  Blob hash;.  Blo
6ab0: 62 20 6d 61 6e 69 66 65 73 74 3b 0a 0a 20 20 64  b manifest;..  d
6ac0: 62 5f 73 65 74 28 22 63 6f 6e 74 65 6e 74 2d 73  b_set("content-s
6ad0: 63 68 65 6d 61 22 2c 20 43 4f 4e 54 45 4e 54 5f  chema", CONTENT_
6ae0: 53 43 48 45 4d 41 2c 20 30 29 3b 0a 20 20 64 62  SCHEMA, 0);.  db
6af0: 5f 73 65 74 28 22 61 75 78 2d 73 63 68 65 6d 61  _set("aux-schema
6b00: 22 2c 20 41 55 58 5f 53 43 48 45 4d 41 2c 20 30  ", AUX_SCHEMA, 0
6b10: 29 3b 0a 20 20 69 66 28 20 6d 61 6b 65 53 65 72  );.  if( makeSer
6b20: 76 65 72 43 6f 64 65 73 20 29 7b 0a 20 20 20 20  verCodes ){.    
6b30: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 0a 20  db_multi_exec(. 
6b40: 20 20 20 20 20 22 49 4e 53 45 52 54 20 49 4e 54       "INSERT INT
6b50: 4f 20 63 6f 6e 66 69 67 28 6e 61 6d 65 2c 76 61  O config(name,va
6b60: 6c 75 65 29 22 0a 20 20 20 20 20 20 22 20 56 41  lue)".      " VA
6b70: 4c 55 45 53 28 27 73 65 72 76 65 72 2d 63 6f 64  LUES('server-cod
6b80: 65 27 2c 20 6c 6f 77 65 72 28 68 65 78 28 72 61  e', lower(hex(ra
6b90: 6e 64 6f 6d 62 6c 6f 62 28 32 30 29 29 29 29 3b  ndomblob(20))));
6ba0: 22 0a 20 20 20 20 20 20 22 49 4e 53 45 52 54 20  ".      "INSERT 
6bb0: 49 4e 54 4f 20 63 6f 6e 66 69 67 28 6e 61 6d 65  INTO config(name
6bc0: 2c 76 61 6c 75 65 29 22 0a 20 20 20 20 20 20 22  ,value)".      "
6bd0: 20 56 41 4c 55 45 53 28 27 70 72 6f 6a 65 63 74   VALUES('project
6be0: 2d 63 6f 64 65 27 2c 20 6c 6f 77 65 72 28 68 65  -code', lower(he
6bf0: 78 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 32 30 29  x(randomblob(20)
6c00: 29 29 29 3b 22 0a 20 20 20 20 29 3b 0a 20 20 7d  )));".    );.  }
6c10: 0a 20 20 69 66 28 20 21 64 62 5f 69 73 5f 67 6c  .  if( !db_is_gl
6c20: 6f 62 61 6c 28 22 61 75 74 6f 73 79 6e 63 22 29  obal("autosync")
6c30: 20 29 20 64 62 5f 73 65 74 5f 69 6e 74 28 22 61   ) db_set_int("a
6c40: 75 74 6f 73 79 6e 63 22 2c 20 31 2c 20 30 29 3b  utosync", 1, 0);
6c50: 0a 20 20 69 66 28 20 21 64 62 5f 69 73 5f 67 6c  .  if( !db_is_gl
6c60: 6f 62 61 6c 28 22 6c 6f 63 61 6c 61 75 74 68 22  obal("localauth"
6c70: 29 20 29 20 64 62 5f 73 65 74 5f 69 6e 74 28 22  ) ) db_set_int("
6c80: 6c 6f 63 61 6c 61 75 74 68 22 2c 20 30 2c 20 30  localauth", 0, 0
6c90: 29 3b 0a 20 20 64 62 5f 63 72 65 61 74 65 5f 64  );.  db_create_d
6ca0: 65 66 61 75 6c 74 5f 75 73 65 72 73 28 30 2c 20  efault_users(0, 
6cb0: 7a 44 65 66 61 75 6c 74 55 73 65 72 29 3b 0a 20  zDefaultUser);. 
6cc0: 20 75 73 65 72 5f 73 65 6c 65 63 74 28 29 3b 0a   user_select();.
6cd0: 0a 20 20 69 66 28 20 7a 49 6e 69 74 69 61 6c 44  .  if( zInitialD
6ce0: 61 74 65 20 29 7b 0a 20 20 20 20 69 6e 74 20 72  ate ){.    int r
6cf0: 69 64 3b 0a 20 20 20 20 62 6c 6f 62 5f 7a 65 72  id;.    blob_zer
6d00: 6f 28 26 6d 61 6e 69 66 65 73 74 29 3b 0a 20 20  o(&manifest);.  
6d10: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26    blob_appendf(&
6d20: 6d 61 6e 69 66 65 73 74 2c 20 22 43 20 69 6e 69  manifest, "C ini
6d30: 74 69 61 6c 5c 5c 73 65 6d 70 74 79 5c 5c 73 63  tial\\sempty\\sc
6d40: 68 65 63 6b 2d 69 6e 5c 6e 22 29 3b 0a 20 20 20  heck-in\n");.   
6d50: 20 7a 44 61 74 65 20 3d 20 64 61 74 65 5f 69 6e   zDate = date_in
6d60: 5f 73 74 61 6e 64 61 72 64 5f 66 6f 72 6d 61 74  _standard_format
6d70: 28 7a 49 6e 69 74 69 61 6c 44 61 74 65 29 3b 0a  (zInitialDate);.
6d80: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66      blob_appendf
6d90: 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 44 20 25  (&manifest, "D %
6da0: 73 5c 6e 22 2c 20 7a 44 61 74 65 29 3b 0a 20 20  s\n", zDate);.  
6db0: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26    blob_appendf(&
6dc0: 6d 61 6e 69 66 65 73 74 2c 20 22 50 5c 6e 22 29  manifest, "P\n")
6dd0: 3b 0a 20 20 20 20 6d 64 35 73 75 6d 5f 69 6e 69  ;.    md5sum_ini
6de0: 74 28 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70  t();.    blob_ap
6df0: 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c  pendf(&manifest,
6e00: 20 22 52 20 25 73 5c 6e 22 2c 20 6d 64 35 73 75   "R %s\n", md5su
6e10: 6d 5f 66 69 6e 69 73 68 28 30 29 29 3b 0a 20 20  m_finish(0));.  
6e20: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26    blob_appendf(&
6e30: 6d 61 6e 69 66 65 73 74 2c 20 22 54 20 2a 62 72  manifest, "T *br
6e40: 61 6e 63 68 20 2a 20 74 72 75 6e 6b 5c 6e 22 29  anch * trunk\n")
6e50: 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e  ;.    blob_appen
6e60: 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 54  df(&manifest, "T
6e70: 20 2a 73 79 6d 2d 74 72 75 6e 6b 20 2a 5c 6e 22   *sym-trunk *\n"
6e80: 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65  );.    blob_appe
6e90: 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22  ndf(&manifest, "
6ea0: 55 20 25 46 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69  U %F\n", g.zLogi
6eb0: 6e 29 3b 0a 20 20 20 20 6d 64 35 73 75 6d 5f 62  n);.    md5sum_b
6ec0: 6c 6f 62 28 26 6d 61 6e 69 66 65 73 74 2c 20 26  lob(&manifest, &
6ed0: 68 61 73 68 29 3b 0a 20 20 20 20 62 6c 6f 62 5f  hash);.    blob_
6ee0: 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73  appendf(&manifes
6ef0: 74 2c 20 22 5a 20 25 62 5c 6e 22 2c 20 26 68 61  t, "Z %b\n", &ha
6f00: 73 68 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 72 65  sh);.    blob_re
6f10: 73 65 74 28 26 68 61 73 68 29 3b 0a 20 20 20 20  set(&hash);.    
6f20: 72 69 64 20 3d 20 63 6f 6e 74 65 6e 74 5f 70 75  rid = content_pu
6f30: 74 28 26 6d 61 6e 69 66 65 73 74 2c 20 30 2c 20  t(&manifest, 0, 
6f40: 30 29 3b 0a 20 20 20 20 6d 61 6e 69 66 65 73 74  0);.    manifest
6f50: 5f 63 72 6f 73 73 6c 69 6e 6b 28 72 69 64 2c 20  _crosslink(rid, 
6f60: 26 6d 61 6e 69 66 65 73 74 29 3b 0a 20 20 7d 0a  &manifest);.  }.
6f70: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44  }../*.** COMMAND
6f80: 3a 20 6e 65 77 0a 2a 2a 20 43 4f 4d 4d 41 4e 44  : new.** COMMAND
6f90: 3a 20 69 6e 69 74 0a 2a 2a 0a 2a 2a 20 55 73 61  : init.**.** Usa
6fa0: 67 65 3a 20 25 66 6f 73 73 69 6c 20 6e 65 77 20  ge: %fossil new 
6fb0: 3f 4f 50 54 49 4f 4e 53 3f 20 46 49 4c 45 4e 41  ?OPTIONS? FILENA
6fc0: 4d 45 0a 2a 2a 20 20 20 20 4f 72 3a 20 25 66 6f  ME.**    Or: %fo
6fd0: 73 73 69 6c 20 69 6e 69 74 20 3f 4f 50 54 49 4f  ssil init ?OPTIO
6fe0: 4e 53 3f 20 46 49 4c 45 4e 41 4d 45 0a 2a 2a 0a  NS? FILENAME.**.
6ff0: 2a 2a 20 43 72 65 61 74 65 20 61 20 72 65 70 6f  ** Create a repo
7000: 73 69 74 6f 72 79 20 66 6f 72 20 61 20 6e 65 77  sitory for a new
7010: 20 70 72 6f 6a 65 63 74 20 69 6e 20 74 68 65 20   project in the 
7020: 66 69 6c 65 20 6e 61 6d 65 64 20 46 49 4c 45 4e  file named FILEN
7030: 41 4d 45 2e 0a 2a 2a 20 54 68 69 73 20 63 6f 6d  AME..** This com
7040: 6d 61 6e 64 20 69 73 20 64 69 73 74 69 6e 63 74  mand is distinct
7050: 20 66 72 6f 6d 20 22 63 6c 6f 6e 65 22 2e 20 20   from "clone".  
7060: 54 68 65 20 22 63 6c 6f 6e 65 22 20 63 6f 6d 6d  The "clone" comm
7070: 61 6e 64 20 6d 61 6b 65 73 0a 2a 2a 20 61 20 63  and makes.** a c
7080: 6f 70 79 20 6f 66 20 61 6e 20 65 78 69 73 74 69  opy of an existi
7090: 6e 67 20 70 72 6f 6a 65 63 74 2e 20 20 54 68 69  ng project.  Thi
70a0: 73 20 63 6f 6d 6d 61 6e 64 20 73 74 61 72 74 73  s command starts
70b0: 20 61 20 6e 65 77 20 70 72 6f 6a 65 63 74 2e 0a   a new project..
70c0: 2a 2a 0a 2a 2a 20 42 79 20 64 65 66 61 75 6c 74  **.** By default
70d0: 2c 20 79 6f 75 72 20 63 75 72 72 65 6e 74 20 6c  , your current l
70e0: 6f 67 69 6e 20 6e 61 6d 65 20 69 73 20 75 73 65  ogin name is use
70f0: 64 20 74 6f 20 63 72 65 61 74 65 20 74 68 65 20  d to create the 
7100: 64 65 66 61 75 6c 74 0a 2a 2a 20 61 64 6d 69 6e  default.** admin
7110: 20 75 73 65 72 2e 20 54 68 69 73 20 63 61 6e 20   user. This can 
7120: 62 65 20 6f 76 65 72 72 69 64 64 65 6e 20 75 73  be overridden us
7130: 69 6e 67 20 74 68 65 20 2d 41 7c 2d 2d 61 64 6d  ing the -A|--adm
7140: 69 6e 2d 75 73 65 72 0a 2a 2a 20 70 61 72 61 6d  in-user.** param
7150: 65 74 65 72 2e 0a 2a 2a 0a 2a 2a 20 4f 70 74 69  eter..**.** Opti
7160: 6f 6e 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 2d 2d  ons:.**.**    --
7170: 61 64 6d 69 6e 2d 75 73 65 72 7c 2d 41 20 55 53  admin-user|-A US
7180: 45 52 4e 41 4d 45 0a 2a 2a 20 20 20 20 2d 2d 64  ERNAME.**    --d
7190: 61 74 65 2d 6f 76 65 72 72 69 64 65 20 44 41 54  ate-override DAT
71a0: 45 54 49 4d 45 0a 2a 2a 0a 2a 2f 0a 76 6f 69 64  ETIME.**.*/.void
71b0: 20 63 72 65 61 74 65 5f 72 65 70 6f 73 69 74 6f   create_reposito
71c0: 72 79 5f 63 6d 64 28 76 6f 69 64 29 7b 0a 20 20  ry_cmd(void){.  
71d0: 63 68 61 72 20 2a 7a 50 61 73 73 77 6f 72 64 3b  char *zPassword;
71e0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
71f0: 44 61 74 65 3b 20 20 20 20 20 20 20 20 20 20 2f  Date;          /
7200: 2a 20 44 61 74 65 20 6f 66 20 74 68 65 20 69 6e  * Date of the in
7210: 69 74 69 61 6c 20 63 68 65 63 6b 2d 69 6e 20 2a  itial check-in *
7220: 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  /.  const char *
7230: 7a 44 65 66 61 75 6c 74 55 73 65 72 3b 20 20 20  zDefaultUser;   
7240: 2f 2a 20 4f 70 74 69 6f 6e 61 6c 20 6e 61 6d 65  /* Optional name
7250: 20 6f 66 20 74 68 65 20 64 65 66 61 75 6c 74 20   of the default 
7260: 75 73 65 72 20 2a 2f 0a 0a 20 20 7a 44 61 74 65  user */..  zDate
7270: 20 3d 20 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22   = find_option("
7280: 64 61 74 65 2d 6f 76 65 72 72 69 64 65 22 2c 30  date-override",0
7290: 2c 31 29 3b 0a 20 20 7a 44 65 66 61 75 6c 74 55  ,1);.  zDefaultU
72a0: 73 65 72 20 3d 20 66 69 6e 64 5f 6f 70 74 69 6f  ser = find_optio
72b0: 6e 28 22 61 64 6d 69 6e 2d 75 73 65 72 22 2c 22  n("admin-user","
72c0: 41 22 2c 31 29 3b 0a 20 20 69 66 28 20 7a 44 61  A",1);.  if( zDa
72d0: 74 65 3d 3d 30 20 29 20 7a 44 61 74 65 20 3d 20  te==0 ) zDate = 
72e0: 22 6e 6f 77 22 3b 0a 20 20 69 66 28 20 67 2e 61  "now";.  if( g.a
72f0: 72 67 63 21 3d 33 20 29 7b 0a 20 20 20 20 75 73  rgc!=3 ){.    us
7300: 61 67 65 28 22 52 45 50 4f 53 49 54 4f 52 59 2d  age("REPOSITORY-
7310: 4e 41 4d 45 22 29 3b 0a 20 20 7d 0a 20 20 64 62  NAME");.  }.  db
7320: 5f 63 72 65 61 74 65 5f 72 65 70 6f 73 69 74 6f  _create_reposito
7330: 72 79 28 67 2e 61 72 67 76 5b 32 5d 29 3b 0a 20  ry(g.argv[2]);. 
7340: 20 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 74   db_open_reposit
7350: 6f 72 79 28 67 2e 61 72 67 76 5b 32 5d 29 3b 0a  ory(g.argv[2]);.
7360: 20 20 64 62 5f 6f 70 65 6e 5f 63 6f 6e 66 69 67    db_open_config
7370: 28 30 29 3b 0a 20 20 64 62 5f 62 65 67 69 6e 5f  (0);.  db_begin_
7380: 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20  transaction();. 
7390: 20 64 62 5f 69 6e 69 74 69 61 6c 5f 73 65 74 75   db_initial_setu
73a0: 70 28 7a 44 61 74 65 2c 20 7a 44 65 66 61 75 6c  p(zDate, zDefaul
73b0: 74 55 73 65 72 2c 20 31 29 3b 0a 20 20 64 62 5f  tUser, 1);.  db_
73c0: 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28  end_transaction(
73d0: 30 29 3b 0a 20 20 70 72 69 6e 74 66 28 22 70 72  0);.  printf("pr
73e0: 6f 6a 65 63 74 2d 69 64 3a 20 25 73 5c 6e 22 2c  oject-id: %s\n",
73f0: 20 64 62 5f 67 65 74 28 22 70 72 6f 6a 65 63 74   db_get("project
7400: 2d 63 6f 64 65 22 2c 20 30 29 29 3b 0a 20 20 70  -code", 0));.  p
7410: 72 69 6e 74 66 28 22 73 65 72 76 65 72 2d 69 64  rintf("server-id
7420: 3a 20 20 25 73 5c 6e 22 2c 20 64 62 5f 67 65 74  :  %s\n", db_get
7430: 28 22 73 65 72 76 65 72 2d 63 6f 64 65 22 2c 20  ("server-code", 
7440: 30 29 29 3b 0a 20 20 7a 50 61 73 73 77 6f 72 64  0));.  zPassword
7450: 20 3d 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53   = db_text(0, "S
7460: 45 4c 45 43 54 20 70 77 20 46 52 4f 4d 20 75 73  ELECT pw FROM us
7470: 65 72 20 57 48 45 52 45 20 6c 6f 67 69 6e 3d 25  er WHERE login=%
7480: 51 22 2c 20 67 2e 7a 4c 6f 67 69 6e 29 3b 0a 20  Q", g.zLogin);. 
7490: 20 70 72 69 6e 74 66 28 22 61 64 6d 69 6e 2d 75   printf("admin-u
74a0: 73 65 72 3a 20 25 73 20 28 69 6e 69 74 69 61 6c  ser: %s (initial
74b0: 20 70 61 73 73 77 6f 72 64 20 69 73 20 5c 22 25   password is \"%
74c0: 73 5c 22 29 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69  s\")\n", g.zLogi
74d0: 6e 2c 20 7a 50 61 73 73 77 6f 72 64 29 3b 0a 7d  n, zPassword);.}
74e0: 0a 0a 2f 2a 0a 2a 2a 20 53 51 4c 20 66 75 6e 63  ../*.** SQL func
74f0: 74 69 6f 6e 73 20 66 6f 72 20 64 65 62 75 67 67  tions for debugg
7500: 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 70  ing..**.** The p
7510: 72 69 6e 74 28 29 20 66 75 6e 63 74 69 6f 6e 20  rint() function 
7520: 77 72 69 74 65 73 20 69 74 73 20 61 72 67 75 6d  writes its argum
7530: 65 6e 74 73 20 6f 6e 20 73 74 64 6f 75 74 2c 20  ents on stdout, 
7540: 62 75 74 20 6f 6e 6c 79 0a 2a 2a 20 69 66 20 74  but only.** if t
7550: 68 65 20 2d 73 71 6c 70 72 69 6e 74 20 63 6f 6d  he -sqlprint com
7560: 6d 61 6e 64 2d 6c 69 6e 65 20 6f 70 74 69 6f 6e  mand-line option
7570: 20 69 73 20 74 75 72 6e 65 64 20 6f 6e 2e 0a 2a   is turned on..*
7580: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 64 62  /.static void db
7590: 5f 73 71 6c 5f 70 72 69 6e 74 28 0a 20 20 73 71  _sql_print(.  sq
75a0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
75b0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
75c0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
75d0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
75e0: 69 6e 74 20 69 3b 0a 20 20 69 66 28 20 67 2e 66  int i;.  if( g.f
75f0: 53 71 6c 50 72 69 6e 74 20 29 7b 0a 20 20 20 20  SqlPrint ){.    
7600: 66 6f 72 28 69 3d 30 3b 20 69 3c 61 72 67 63 3b  for(i=0; i<argc;
7610: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 63 68 61   i++){.      cha
7620: 72 20 63 20 3d 20 69 3d 3d 61 72 67 63 2d 31 20  r c = i==argc-1 
7630: 3f 20 27 5c 6e 27 20 3a 20 27 20 27 3b 0a 20 20  ? '\n' : ' ';.  
7640: 20 20 20 20 70 72 69 6e 74 66 28 22 25 73 25 63      printf("%s%c
7650: 22 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  ", sqlite3_value
7660: 5f 74 65 78 74 28 61 72 67 76 5b 69 5d 29 2c 20  _text(argv[i]), 
7670: 63 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a  c);.    }.  }.}.
7680: 73 74 61 74 69 63 20 76 6f 69 64 20 64 62 5f 73  static void db_s
7690: 71 6c 5f 74 72 61 63 65 28 76 6f 69 64 20 2a 6e  ql_trace(void *n
76a0: 6f 74 55 73 65 64 2c 20 63 6f 6e 73 74 20 63 68  otUsed, const ch
76b0: 61 72 20 2a 7a 53 71 6c 29 7b 0a 20 20 69 6e 74  ar *zSql){.  int
76c0: 20 6e 20 3d 20 73 74 72 6c 65 6e 28 7a 53 71 6c   n = strlen(zSql
76d0: 29 3b 0a 20 20 66 70 72 69 6e 74 66 28 73 74 64  );.  fprintf(std
76e0: 65 72 72 2c 20 22 25 73 25 73 5c 6e 22 2c 20 7a  err, "%s%s\n", z
76f0: 53 71 6c 2c 20 28 6e 3e 30 20 26 26 20 7a 53 71  Sql, (n>0 && zSq
7700: 6c 5b 6e 2d 31 5d 3d 3d 27 3b 27 29 20 3f 20 22  l[n-1]==';') ? "
7710: 22 20 3a 20 22 3b 22 29 3b 0a 7d 0a 0a 2f 2a 0a  " : ";");.}../*.
7720: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 20 74 68 65  ** Implement the
7730: 20 75 73 65 72 28 29 20 53 51 4c 20 66 75 6e 63   user() SQL func
7740: 74 69 6f 6e 2e 20 20 75 73 65 72 28 29 20 74 61  tion.  user() ta
7750: 6b 65 73 20 6e 6f 20 61 72 67 75 6d 65 6e 74 73  kes no arguments
7760: 20 61 6e 64 0a 2a 2a 20 72 65 74 75 72 6e 73 20   and.** returns 
7770: 74 68 65 20 75 73 65 72 20 49 44 20 6f 66 20 74  the user ID of t
7780: 68 65 20 63 75 72 72 65 6e 74 20 75 73 65 72 2e  he current user.
7790: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
77a0: 64 62 5f 73 71 6c 5f 75 73 65 72 28 0a 20 20 73  db_sql_user(.  s
77b0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
77c0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
77d0: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
77e0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
77f0: 20 69 66 28 20 67 2e 7a 4c 6f 67 69 6e 21 3d 30   if( g.zLogin!=0
7800: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   ){.    sqlite3_
7810: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
7820: 65 78 74 2c 20 67 2e 7a 4c 6f 67 69 6e 2c 20 2d  ext, g.zLogin, -
7830: 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43  1, SQLITE_STATIC
7840: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
7850: 49 6d 70 6c 65 6d 65 6e 74 20 74 68 65 20 63 67  Implement the cg
7860: 69 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  i() SQL function
7870: 2e 20 20 63 67 69 28 29 20 74 61 6b 65 73 20 61  .  cgi() takes a
7880: 20 61 6e 20 61 72 67 75 6d 65 6e 74 20 77 68 69   an argument whi
7890: 63 68 20 69 73 0a 2a 2a 20 61 20 6e 61 6d 65 20  ch is.** a name 
78a0: 6f 66 20 43 47 49 20 71 75 65 72 79 20 70 61 72  of CGI query par
78b0: 61 6d 65 74 65 72 2e 20 54 68 65 20 76 61 6c 75  ameter. The valu
78c0: 65 20 6f 66 20 74 68 61 74 20 70 61 72 61 6d 65  e of that parame
78d0: 74 65 72 20 69 73 20 72 65 74 75 72 6e 65 64 2c  ter is returned,
78e0: 20 0a 2a 2a 20 69 66 20 61 76 61 69 6c 61 62 6c   .** if availabl
78f0: 65 2e 20 6f 70 74 69 6f 6e 61 6c 20 73 65 63 6f  e. optional seco
7900: 6e 64 20 61 72 67 75 6d 65 6e 74 20 77 69 6c 6c  nd argument will
7910: 20 62 65 20 72 65 74 75 72 6e 65 64 20 69 66 20   be returned if 
7920: 74 68 65 20 66 69 72 73 74 0a 2a 2a 20 64 6f 65  the first.** doe
7930: 73 6e 27 74 20 65 78 69 73 74 20 61 73 20 61 20  sn't exist as a 
7940: 43 47 49 20 70 61 72 61 6d 65 74 65 72 2e 0a 2a  CGI parameter..*
7950: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 64 62  /.static void db
7960: 5f 73 71 6c 5f 63 67 69 28 73 71 6c 69 74 65 33  _sql_cgi(sqlite3
7970: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
7980: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
7990: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
79a0: 76 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  v){.  const char
79b0: 2a 20 7a 50 3b 0a 20 20 69 66 28 20 61 72 67 63  * zP;.  if( argc
79c0: 21 3d 31 20 26 26 20 61 72 67 63 21 3d 32 20 29  !=1 && argc!=2 )
79d0: 20 72 65 74 75 72 6e 3b 0a 20 20 7a 50 20 3d 20   return;.  zP = 
79e0: 50 28 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 73  P((const char*)s
79f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
7a00: 74 28 61 72 67 76 5b 30 5d 29 29 3b 0a 20 20 69  t(argv[0]));.  i
7a10: 66 28 20 7a 50 20 29 7b 0a 20 20 20 20 73 71 6c  f( zP ){.    sql
7a20: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
7a30: 28 63 6f 6e 74 65 78 74 2c 20 7a 50 2c 20 2d 31  (context, zP, -1
7a40: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29  , SQLITE_STATIC)
7a50: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 61 72  ;.  }else if( ar
7a60: 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 7a 50 20  gc==2 ){.    zP 
7a70: 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 73  = (const char*)s
7a80: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
7a90: 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20  t(argv[1]);.    
7aa0: 69 66 28 20 7a 50 20 29 20 73 71 6c 69 74 65 33  if( zP ) sqlite3
7ab0: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
7ac0: 74 65 78 74 2c 20 7a 50 2c 20 2d 31 2c 20 53 51  text, zP, -1, SQ
7ad0: 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b  LITE_TRANSIENT);
7ae0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  .  }.}../*.** Th
7af0: 69 73 20 69 73 20 75 73 65 64 20 62 79 20 74 68  is is used by th
7b00: 65 20 5b 63 6f 6d 6d 69 74 5d 20 63 6f 6d 6d 61  e [commit] comma
7b10: 6e 64 2e 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e  nd..**.** Return
7b20: 20 74 72 75 65 20 69 66 20 65 69 74 68 65 72 3a   true if either:
7b30: 0a 2a 2a 0a 2a 2a 20 20 20 20 20 61 29 20 47 6c  .**.**     a) Gl
7b40: 6f 62 61 6c 2e 61 43 6f 6d 6d 69 74 46 69 6c 65  obal.aCommitFile
7b50: 20 69 73 20 4e 55 4c 4c 2c 20 6f 72 0a 2a 2a 20   is NULL, or.** 
7b60: 20 20 20 20 62 29 20 47 6c 6f 62 61 6c 2e 61 43      b) Global.aC
7b70: 6f 6d 6d 69 74 46 69 6c 65 20 63 6f 6e 74 61 69  ommitFile contai
7b80: 6e 73 20 74 68 65 20 69 6e 74 65 67 65 72 20 70  ns the integer p
7b90: 61 73 73 65 64 20 61 73 20 61 6e 20 61 72 67 75  assed as an argu
7ba0: 6d 65 6e 74 2e 0a 2a 2a 0a 2a 2a 20 4f 74 68 65  ment..**.** Othe
7bb0: 72 77 69 73 65 20 72 65 74 75 72 6e 20 66 61 6c  rwise return fal
7bc0: 73 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  se..*/.static vo
7bd0: 69 64 20 66 69 6c 65 5f 69 73 5f 73 65 6c 65 63  id file_is_selec
7be0: 74 65 64 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  ted(.  sqlite3_c
7bf0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
7c00: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
7c10: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
7c20: 72 67 76 0a 29 7b 0a 20 20 61 73 73 65 72 74 28  rgv.){.  assert(
7c30: 61 72 67 63 3d 3d 31 29 3b 0a 20 20 69 66 28 20  argc==1);.  if( 
7c40: 67 2e 61 43 6f 6d 6d 69 74 46 69 6c 65 20 29 7b  g.aCommitFile ){
7c50: 0a 20 20 20 20 69 6e 74 20 69 49 64 20 3d 20 73  .    int iId = s
7c60: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
7c70: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69  (argv[0]);.    i
7c80: 6e 74 20 69 69 3b 0a 20 20 20 20 66 6f 72 28 69  nt ii;.    for(i
7c90: 69 3d 30 3b 20 67 2e 61 43 6f 6d 6d 69 74 46 69  i=0; g.aCommitFi
7ca0: 6c 65 5b 69 69 5d 3b 20 69 69 2b 2b 29 7b 0a 20  le[ii]; ii++){. 
7cb0: 20 20 20 20 20 69 66 28 20 69 49 64 3d 3d 67 2e       if( iId==g.
7cc0: 61 43 6f 6d 6d 69 74 46 69 6c 65 5b 69 69 5d 20  aCommitFile[ii] 
7cd0: 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  ){.        sqlit
7ce0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f  e3_result_int(co
7cf0: 6e 74 65 78 74 2c 20 31 29 3b 0a 20 20 20 20 20  ntext, 1);.     
7d00: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20     return;.     
7d10: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c   }.    }.    sql
7d20: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28  ite3_result_int(
7d30: 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 7d  context, 0);.  }
7d40: 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65  else{.    sqlite
7d50: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e  3_result_int(con
7d60: 74 65 78 74 2c 20 31 29 3b 0a 20 20 7d 0a 7d 0a  text, 1);.  }.}.
7d70: 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 74  ./*.** Convert t
7d80: 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20  he input string 
7d90: 69 6e 74 6f 20 61 6e 20 53 48 41 31 2e 20 20 4d  into an SHA1.  M
7da0: 61 6b 65 20 61 20 6e 6f 74 61 74 69 6f 6e 20 69  ake a notation i
7db0: 6e 20 74 68 65 0a 2a 2a 20 43 4f 4e 43 45 41 4c  n the.** CONCEAL
7dc0: 45 44 20 74 61 62 6c 65 20 73 6f 20 74 68 61 74  ED table so that
7dd0: 20 74 68 65 20 68 61 73 68 20 63 61 6e 20 62 65   the hash can be
7de0: 20 75 6e 64 6f 20 75 73 69 6e 67 20 74 68 65 20   undo using the 
7df0: 64 62 5f 72 65 76 65 61 6c 28 29 0a 2a 2a 20 66  db_reveal().** f
7e00: 75 6e 63 74 69 6f 6e 20 61 74 20 73 6f 6d 65 20  unction at some 
7e10: 6c 61 74 65 72 20 74 69 6d 65 2e 0a 2a 2a 0a 2a  later time..**.*
7e20: 2a 20 54 68 65 20 76 61 6c 75 65 20 72 65 74 75  * The value retu
7e30: 72 6e 65 64 20 69 73 20 73 74 6f 72 65 64 20 69  rned is stored i
7e40: 6e 20 73 74 61 74 69 63 20 73 70 61 63 65 20 61  n static space a
7e50: 6e 64 20 77 69 6c 6c 20 62 65 20 6f 76 65 72 77  nd will be overw
7e60: 72 69 74 74 65 6e 0a 2a 2a 20 6f 6e 20 73 75 62  ritten.** on sub
7e70: 73 65 71 75 65 6e 74 20 63 61 6c 6c 73 2e 0a 2a  sequent calls..*
7e80: 2a 0a 2a 2a 20 49 66 20 7a 43 6f 6e 74 65 6e 74  *.** If zContent
7e90: 20 69 73 20 61 6c 72 65 61 64 79 20 61 20 77 65   is already a we
7ea0: 6c 6c 2d 66 6f 72 6d 65 64 20 53 48 41 31 20 68  ll-formed SHA1 h
7eb0: 61 73 68 2c 20 74 68 65 6e 20 72 65 74 75 72 6e  ash, then return
7ec0: 20 61 20 63 6f 70 79 0a 2a 2a 20 6f 66 20 74 68   a copy.** of th
7ed0: 61 74 20 68 61 73 68 2c 20 6e 6f 74 20 61 20 68  at hash, not a h
7ee0: 61 73 68 20 6f 66 20 74 68 65 20 68 61 73 68 2e  ash of the hash.
7ef0: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 43 4f 4e 43 45  .**.** The CONCE
7f00: 41 4c 45 44 20 74 61 62 6c 65 20 69 73 20 6d 65  ALED table is me
7f10: 61 6e 74 20 74 6f 20 6f 62 73 63 75 72 65 20 65  ant to obscure e
7f20: 6d 61 69 6c 20 61 64 64 72 65 73 73 65 73 2e 20  mail addresses. 
7f30: 20 45 76 65 72 79 20 76 61 6c 69 64 0a 2a 2a 20   Every valid.** 
7f40: 65 6d 61 69 6c 20 61 64 64 72 65 73 73 20 77 69  email address wi
7f50: 6c 6c 20 63 6f 6e 74 61 69 6e 20 61 20 22 40 22  ll contain a "@"
7f60: 20 63 68 61 72 61 63 74 65 72 20 61 6e 64 20 22   character and "
7f70: 40 22 20 69 73 20 6e 6f 74 20 76 61 6c 69 64 20  @" is not valid 
7f80: 77 69 74 68 69 6e 0a 2a 2a 20 61 6e 20 53 48 41  within.** an SHA
7f90: 31 20 68 61 73 68 20 73 6f 20 74 68 65 72 65 20  1 hash so there 
7fa0: 69 73 20 6e 6f 20 63 68 61 6e 63 65 20 74 68 61  is no chance tha
7fb0: 74 20 61 20 76 61 6c 69 64 20 65 6d 61 69 6c 20  t a valid email 
7fc0: 61 64 64 72 65 73 73 20 77 69 6c 6c 20 67 6f 0a  address will go.
7fd0: 2a 2a 20 75 6e 63 6f 6e 63 65 61 6c 65 64 2e 0a  ** unconcealed..
7fe0: 2a 2f 0a 63 68 61 72 20 2a 64 62 5f 63 6f 6e 63  */.char *db_conc
7ff0: 65 61 6c 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  eal(const char *
8000: 7a 43 6f 6e 74 65 6e 74 2c 20 69 6e 74 20 6e 29  zContent, int n)
8010: 7b 0a 20 20 73 74 61 74 69 63 20 63 68 61 72 20  {.  static char 
8020: 7a 48 61 73 68 5b 34 32 5d 3b 0a 20 20 42 6c 6f  zHash[42];.  Blo
8030: 62 20 6f 75 74 3b 0a 20 20 69 66 28 20 6e 3d 3d  b out;.  if( n==
8040: 34 30 20 26 26 20 76 61 6c 69 64 61 74 65 31 36  40 && validate16
8050: 28 7a 43 6f 6e 74 65 6e 74 2c 20 6e 29 20 29 7b  (zContent, n) ){
8060: 0a 20 20 20 20 6d 65 6d 63 70 79 28 7a 48 61 73  .    memcpy(zHas
8070: 68 2c 20 7a 43 6f 6e 74 65 6e 74 2c 20 6e 29 3b  h, zContent, n);
8080: 0a 20 20 20 20 7a 48 61 73 68 5b 6e 5d 20 3d 20  .    zHash[n] = 
8090: 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  0;.  }else{.    
80a0: 73 68 61 31 73 75 6d 5f 73 74 65 70 5f 74 65 78  sha1sum_step_tex
80b0: 74 28 7a 43 6f 6e 74 65 6e 74 2c 20 6e 29 3b 0a  t(zContent, n);.
80c0: 20 20 20 20 73 68 61 31 73 75 6d 5f 66 69 6e 69      sha1sum_fini
80d0: 73 68 28 26 6f 75 74 29 3b 0a 20 20 20 20 73 74  sh(&out);.    st
80e0: 72 63 70 79 28 7a 48 61 73 68 2c 20 62 6c 6f 62  rcpy(zHash, blob
80f0: 5f 73 74 72 28 26 6f 75 74 29 29 3b 0a 20 20 20  _str(&out));.   
8100: 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 6f 75 74   blob_reset(&out
8110: 29 3b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f  );.    db_multi_
8120: 65 78 65 63 28 0a 20 20 20 20 20 20 20 22 49 4e  exec(.       "IN
8130: 53 45 52 54 20 4f 52 20 49 47 4e 4f 52 45 20 49  SERT OR IGNORE I
8140: 4e 54 4f 20 63 6f 6e 63 65 61 6c 65 64 20 56 41  NTO concealed VA
8150: 4c 55 45 53 28 25 51 2c 25 23 51 29 22 2c 0a 20  LUES(%Q,%#Q)",. 
8160: 20 20 20 20 20 20 7a 48 61 73 68 2c 20 6e 2c 20        zHash, n, 
8170: 7a 43 6f 6e 74 65 6e 74 0a 20 20 20 20 29 3b 0a  zContent.    );.
8180: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 7a 48 61    }.  return zHa
8190: 73 68 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 74  sh;.}../*.** Att
81a0: 65 6d 70 74 20 74 6f 20 6c 6f 6f 6b 20 75 70 20  empt to look up 
81b0: 74 68 65 20 69 6e 70 75 74 20 69 6e 20 74 68 65  the input in the
81c0: 20 43 4f 4e 43 45 41 4c 45 44 20 74 61 62 6c 65   CONCEALED table
81d0: 2e 20 20 49 66 20 66 6f 75 6e 64 2c 0a 2a 2a 20  .  If found,.** 
81e0: 61 6e 64 20 69 66 20 74 68 65 20 6f 6b 52 64 41  and if the okRdA
81f0: 64 64 72 20 70 65 72 6d 69 73 73 69 6f 6e 20 69  ddr permission i
8200: 73 20 65 6e 61 62 6c 65 64 20 74 68 65 6e 20 72  s enabled then r
8210: 65 74 75 72 6e 20 74 68 65 0a 2a 2a 20 6f 72 69  eturn the.** ori
8220: 67 69 6e 61 6c 20 76 61 6c 75 65 20 66 6f 72 20  ginal value for 
8230: 77 68 69 63 68 20 74 68 65 20 69 6e 70 75 74 20  which the input 
8240: 69 73 20 61 20 68 61 73 68 2e 20 20 49 66 20 6f  is a hash.  If o
8250: 6b 52 64 41 64 64 72 20 69 73 0a 2a 2a 20 66 61  kRdAddr is.** fa
8260: 6c 73 65 20 6f 72 20 69 66 20 74 68 65 20 6c 6f  lse or if the lo
8270: 6f 6b 75 70 20 66 61 69 6c 73 2c 20 72 65 74 75  okup fails, retu
8280: 72 6e 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20  rn the original 
8290: 73 74 72 69 6e 67 20 63 6f 6e 74 65 6e 74 2e 0a  string content..
82a0: 2a 2a 0a 2a 2a 20 49 6e 20 65 69 74 68 65 72 20  **.** In either 
82b0: 63 61 73 65 2c 20 74 68 65 20 73 74 72 69 6e 67  case, the string
82c0: 20 72 65 74 75 72 6e 65 64 20 69 73 20 73 74 6f   returned is sto
82d0: 72 65 64 20 69 6e 20 73 70 61 63 65 20 6f 62 74  red in space obt
82e0: 61 69 6e 65 64 0a 2a 2a 20 66 72 6f 6d 20 6d 61  ained.** from ma
82f0: 6c 6c 6f 63 20 61 6e 64 20 73 68 6f 75 6c 64 20  lloc and should 
8300: 62 65 20 66 72 65 65 64 20 62 79 20 74 68 65 20  be freed by the 
8310: 63 61 6c 6c 69 6e 67 20 66 75 6e 63 74 69 6f 6e  calling function
8320: 2e 0a 2a 2f 0a 63 68 61 72 20 2a 64 62 5f 72 65  ..*/.char *db_re
8330: 76 65 61 6c 28 63 6f 6e 73 74 20 63 68 61 72 20  veal(const char 
8340: 2a 7a 4b 65 79 29 7b 0a 20 20 63 68 61 72 20 2a  *zKey){.  char *
8350: 7a 4f 75 74 3b 0a 20 20 69 66 28 20 67 2e 6f 6b  zOut;.  if( g.ok
8360: 52 64 41 64 64 72 20 29 7b 0a 20 20 20 20 7a 4f  RdAddr ){.    zO
8370: 75 74 20 3d 20 64 62 5f 74 65 78 74 28 30 2c 20  ut = db_text(0, 
8380: 22 53 45 4c 45 43 54 20 63 6f 6e 74 65 6e 74 20  "SELECT content 
8390: 46 52 4f 4d 20 63 6f 6e 63 65 61 6c 65 64 20 57  FROM concealed W
83a0: 48 45 52 45 20 68 61 73 68 3d 25 51 22 2c 20 7a  HERE hash=%Q", z
83b0: 4b 65 79 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  Key);.  }else{. 
83c0: 20 20 20 7a 4f 75 74 20 3d 20 30 3b 0a 20 20 7d     zOut = 0;.  }
83d0: 0a 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29  .  if( zOut==0 )
83e0: 7b 0a 20 20 20 20 7a 4f 75 74 20 3d 20 6d 70 72  {.    zOut = mpr
83f0: 69 6e 74 66 28 22 25 73 22 2c 20 7a 4b 65 79 29  intf("%s", zKey)
8400: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 7a  ;.  }.  return z
8410: 4f 75 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  Out;.}../*.** Th
8420: 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 67 69  is function regi
8430: 73 74 65 72 73 20 61 75 78 69 6c 69 61 72 79 20  sters auxiliary 
8440: 66 75 6e 63 74 69 6f 6e 73 20 77 68 65 6e 20 74  functions when t
8450: 68 65 20 53 51 4c 69 74 65 0a 2a 2a 20 64 61 74  he SQLite.** dat
8460: 61 62 61 73 65 20 63 6f 6e 6e 65 63 74 69 6f 6e  abase connection
8470: 20 69 73 20 66 69 72 73 74 20 65 73 74 61 62 6c   is first establ
8480: 69 73 68 65 64 2e 0a 2a 2f 0a 4c 4f 43 41 4c 20  ished..*/.LOCAL 
8490: 76 6f 69 64 20 64 62 5f 63 6f 6e 6e 65 63 74 69  void db_connecti
84a0: 6f 6e 5f 69 6e 69 74 28 76 6f 69 64 29 7b 0a 20  on_init(void){. 
84b0: 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 67 2e   sqlite3_exec(g.
84c0: 64 62 2c 20 22 50 52 41 47 4d 41 20 66 6f 72 65  db, "PRAGMA fore
84d0: 69 67 6e 5f 6b 65 79 73 3d 4f 46 46 3b 22 2c 20  ign_keys=OFF;", 
84e0: 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69  0, 0, 0);.  sqli
84f0: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74  te3_create_funct
8500: 69 6f 6e 28 67 2e 64 62 2c 20 22 75 73 65 72 22  ion(g.db, "user"
8510: 2c 20 30 2c 20 53 51 4c 49 54 45 5f 41 4e 59 2c  , 0, SQLITE_ANY,
8520: 20 30 2c 20 64 62 5f 73 71 6c 5f 75 73 65 72 2c   0, db_sql_user,
8530: 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65   0, 0);.  sqlite
8540: 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f  3_create_functio
8550: 6e 28 67 2e 64 62 2c 20 22 63 67 69 22 2c 20 31  n(g.db, "cgi", 1
8560: 2c 20 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c  , SQLITE_ANY, 0,
8570: 20 64 62 5f 73 71 6c 5f 63 67 69 2c 20 30 2c 20   db_sql_cgi, 0, 
8580: 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 63 72  0);.  sqlite3_cr
8590: 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 67 2e  eate_function(g.
85a0: 64 62 2c 20 22 63 67 69 22 2c 20 32 2c 20 53 51  db, "cgi", 2, SQ
85b0: 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 20 64 62 5f  LITE_ANY, 0, db_
85c0: 73 71 6c 5f 63 67 69 2c 20 30 2c 20 30 29 3b 0a  sql_cgi, 0, 0);.
85d0: 20 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65    sqlite3_create
85e0: 5f 66 75 6e 63 74 69 6f 6e 28 67 2e 64 62 2c 20  _function(g.db, 
85f0: 22 70 72 69 6e 74 22 2c 20 2d 31 2c 20 53 51 4c  "print", -1, SQL
8600: 49 54 45 5f 55 54 46 38 2c 20 30 2c 64 62 5f 73  ITE_UTF8, 0,db_s
8610: 71 6c 5f 70 72 69 6e 74 2c 30 2c 30 29 3b 0a 20  ql_print,0,0);. 
8620: 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f   sqlite3_create_
8630: 66 75 6e 63 74 69 6f 6e 28 0a 20 20 20 20 67 2e  function(.    g.
8640: 64 62 2c 20 22 66 69 6c 65 5f 69 73 5f 73 65 6c  db, "file_is_sel
8650: 65 63 74 65 64 22 2c 20 31 2c 20 53 51 4c 49 54  ected", 1, SQLIT
8660: 45 5f 55 54 46 38 2c 20 30 2c 20 66 69 6c 65 5f  E_UTF8, 0, file_
8670: 69 73 5f 73 65 6c 65 63 74 65 64 2c 30 2c 30 0a  is_selected,0,0.
8680: 20 20 29 3b 0a 20 20 69 66 28 20 67 2e 66 53 71    );.  if( g.fSq
8690: 6c 54 72 61 63 65 20 29 7b 0a 20 20 20 20 73 71  lTrace ){.    sq
86a0: 6c 69 74 65 33 5f 74 72 61 63 65 28 67 2e 64 62  lite3_trace(g.db
86b0: 2c 20 64 62 5f 73 71 6c 5f 74 72 61 63 65 2c 20  , db_sql_trace, 
86c0: 30 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  0);.  }.}../*.**
86d0: 20 52 65 74 75 72 6e 20 74 72 75 65 20 69 66 20   Return true if 
86e0: 74 68 65 20 73 74 72 69 6e 67 20 7a 56 61 6c 20  the string zVal 
86f0: 72 65 70 72 65 73 65 6e 74 73 20 22 74 72 75 65  represents "true
8700: 22 20 28 6f 72 20 22 66 61 6c 73 65 22 29 2e 0a  " (or "false")..
8710: 2a 2f 0a 69 6e 74 20 69 73 5f 74 72 75 74 68 28  */.int is_truth(
8720: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 6c  const char *zVal
8730: 29 7b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73  ){.  static cons
8740: 74 20 63 68 61 72 20 2a 61 7a 4f 6e 5b 5d 20 3d  t char *azOn[] =
8750: 20 7b 20 22 6f 6e 22 2c 20 22 79 65 73 22 2c 20   { "on", "yes", 
8760: 22 74 72 75 65 22 2c 20 22 31 22 20 7d 3b 0a 20  "true", "1" };. 
8770: 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72 28 69 3d   int i;.  for(i=
8780: 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 7a 4f 6e  0; i<sizeof(azOn
8790: 29 2f 73 69 7a 65 6f 66 28 61 7a 4f 6e 5b 30 5d  )/sizeof(azOn[0]
87a0: 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28  ); i++){.    if(
87b0: 20 73 74 72 63 6d 70 28 7a 56 61 6c 2c 61 7a 4f   strcmp(zVal,azO
87c0: 6e 5b 69 5d 29 3d 3d 30 20 29 20 72 65 74 75 72  n[i])==0 ) retur
87d0: 6e 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72  n 1;.  }.  retur
87e0: 6e 20 30 3b 0a 7d 0a 69 6e 74 20 69 73 5f 66 61  n 0;.}.int is_fa
87f0: 6c 73 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  lse(const char *
8800: 7a 56 61 6c 29 7b 0a 20 20 73 74 61 74 69 63 20  zVal){.  static 
8810: 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 7a 4f 66  const char *azOf
8820: 66 5b 5d 20 3d 20 7b 20 22 6f 66 66 22 2c 20 22  f[] = { "off", "
8830: 6e 6f 22 2c 20 22 66 61 6c 73 65 22 2c 20 22 30  no", "false", "0
8840: 22 20 7d 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20  " };.  int i;.  
8850: 66 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f  for(i=0; i<sizeo
8860: 66 28 61 7a 4f 66 66 29 2f 73 69 7a 65 6f 66 28  f(azOff)/sizeof(
8870: 61 7a 4f 66 66 5b 30 5d 29 3b 20 69 2b 2b 29 7b  azOff[0]); i++){
8880: 0a 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28  .    if( strcmp(
8890: 7a 56 61 6c 2c 61 7a 4f 66 66 5b 69 5d 29 3d 3d  zVal,azOff[i])==
88a0: 30 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20  0 ) return 1;.  
88b0: 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a  }.  return 0;.}.
88c0: 0a 2f 2a 0a 2a 2a 20 53 77 61 70 20 74 68 65 20  ./*.** Swap the 
88d0: 67 2e 64 62 20 61 6e 64 20 67 2e 64 62 43 6f 6e  g.db and g.dbCon
88e0: 66 69 67 20 63 6f 6e 6e 65 63 74 69 6f 6e 73 20  fig connections 
88f0: 73 6f 20 74 68 61 74 20 74 68 65 20 76 61 72 69  so that the vari
8900: 6f 75 73 20 64 62 5f 2a 20 72 6f 75 74 69 6e 65  ous db_* routine
8910: 73 0a 2a 2a 20 77 6f 72 6b 20 6f 6e 20 74 68 65  s.** work on the
8920: 20 7e 2f 2e 66 6f 73 73 69 6c 20 64 61 74 61 62   ~/.fossil datab
8930: 61 73 65 20 69 6e 73 74 65 61 64 20 6f 66 20 6f  ase instead of o
8940: 6e 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79  n the repository
8950: 20 64 61 74 61 62 61 73 65 2e 0a 2a 2a 20 42 65   database..** Be
8960: 20 73 75 72 65 20 74 6f 20 73 77 61 70 20 74 68   sure to swap th
8970: 65 6d 20 62 61 63 6b 20 61 66 74 65 72 20 64 6f  em back after do
8980: 69 6e 67 20 74 68 65 20 6f 70 65 72 61 74 69 6f  ing the operatio
8990: 6e 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 67 2e 75 73  n..**.** If g.us
89a0: 65 41 74 74 61 63 68 20 74 68 61 74 20 6d 65 61  eAttach that mea
89b0: 6e 73 20 74 68 65 20 7e 2f 2e 66 6f 73 73 69 6c  ns the ~/.fossil
89c0: 20 64 61 74 61 62 61 73 65 20 77 61 73 20 6f 70   database was op
89d0: 65 6e 65 64 20 77 69 74 68 0a 2a 2a 20 74 68 65  ened with.** the
89e0: 20 75 73 65 41 74 74 61 63 68 20 66 6c 61 67 20   useAttach flag 
89f0: 73 65 74 20 74 6f 20 31 2e 20 20 49 6e 20 74 68  set to 1.  In th
8a00: 61 74 20 63 61 73 65 20 6e 6f 20 63 6f 6e 6e 65  at case no conne
8a10: 63 74 69 6f 6e 20 73 77 61 70 20 69 73 20 72 65  ction swap is re
8a20: 71 75 69 72 65 64 0a 2a 2a 20 73 6f 20 74 68 69  quired.** so thi
8a30: 73 20 72 6f 75 74 69 6e 65 20 69 73 20 61 20 6e  s routine is a n
8a40: 6f 2d 6f 70 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62  o-op..*/.void db
8a50: 5f 73 77 61 70 5f 63 6f 6e 6e 65 63 74 69 6f 6e  _swap_connection
8a60: 73 28 76 6f 69 64 29 7b 0a 20 20 69 66 28 20 21  s(void){.  if( !
8a70: 67 2e 75 73 65 41 74 74 61 63 68 20 29 7b 0a 20  g.useAttach ){. 
8a80: 20 20 20 73 71 6c 69 74 65 33 20 2a 64 62 54 65     sqlite3 *dbTe
8a90: 6d 70 20 3d 20 67 2e 64 62 3b 0a 20 20 20 20 67  mp = g.db;.    g
8aa0: 2e 64 62 20 3d 20 67 2e 64 62 43 6f 6e 66 69 67  .db = g.dbConfig
8ab0: 3b 0a 20 20 20 20 67 2e 64 62 43 6f 6e 66 69 67  ;.    g.dbConfig
8ac0: 20 3d 20 64 62 54 65 6d 70 3b 0a 20 20 7d 0a 7d   = dbTemp;.  }.}
8ad0: 0a 0a 2f 2a 0a 2a 2a 20 47 65 74 20 61 6e 64 20  ../*.** Get and 
8ae0: 73 65 74 20 76 61 6c 75 65 73 20 66 72 6f 6d 20  set values from 
8af0: 74 68 65 20 43 4f 4e 46 49 47 2c 20 47 4c 4f 42  the CONFIG, GLOB
8b00: 41 4c 5f 43 4f 4e 46 49 47 20 61 6e 64 20 56 56  AL_CONFIG and VV
8b10: 41 52 20 74 61 62 6c 65 20 69 6e 20 74 68 65 0a  AR table in the.
8b20: 2a 2a 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e  ** repository an
8b30: 64 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65  d local database
8b40: 73 2e 0a 2a 2f 0a 63 68 61 72 20 2a 64 62 5f 67  s..*/.char *db_g
8b50: 65 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  et(const char *z
8b60: 4e 61 6d 65 2c 20 63 68 61 72 20 2a 7a 44 65 66  Name, char *zDef
8b70: 61 75 6c 74 29 7b 0a 20 20 63 68 61 72 20 2a 7a  ault){.  char *z
8b80: 20 3d 20 30 3b 0a 20 20 69 66 28 20 67 2e 72 65   = 0;.  if( g.re
8b90: 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a  positoryOpen ){.
8ba0: 20 20 20 20 7a 20 3d 20 64 62 5f 74 65 78 74 28      z = db_text(
8bb0: 30 2c 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65  0, "SELECT value
8bc0: 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45   FROM config WHE
8bd0: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61  RE name=%Q", zNa
8be0: 6d 65 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a  me);.  }.  if( z
8bf0: 3d 3d 30 20 26 26 20 67 2e 63 6f 6e 66 69 67 4f  ==0 && g.configO
8c00: 70 65 6e 20 29 7b 0a 20 20 20 20 64 62 5f 73 77  pen ){.    db_sw
8c10: 61 70 5f 63 6f 6e 6e 65 63 74 69 6f 6e 73 28 29  ap_connections()
8c20: 3b 0a 20 20 20 20 7a 20 3d 20 64 62 5f 74 65 78  ;.    z = db_tex
8c30: 74 28 30 2c 20 22 53 45 4c 45 43 54 20 76 61 6c  t(0, "SELECT val
8c40: 75 65 20 46 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63  ue FROM global_c
8c50: 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65  onfig WHERE name
8c60: 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20  =%Q", zName);.  
8c70: 20 20 64 62 5f 73 77 61 70 5f 63 6f 6e 6e 65 63    db_swap_connec
8c80: 74 69 6f 6e 73 28 29 3b 0a 20 20 7d 0a 20 20 69  tions();.  }.  i
8c90: 66 28 20 7a 3d 3d 30 20 29 7b 0a 20 20 20 20 7a  f( z==0 ){.    z
8ca0: 20 3d 20 7a 44 65 66 61 75 6c 74 3b 0a 20 20 7d   = zDefault;.  }
8cb0: 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 76  .  return z;.}.v
8cc0: 6f 69 64 20 64 62 5f 73 65 74 28 63 6f 6e 73 74  oid db_set(const
8cd0: 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 63 6f   char *zName, co
8ce0: 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 6c 75 65  nst char *zValue
8cf0: 2c 20 69 6e 74 20 67 6c 6f 62 61 6c 46 6c 61 67  , int globalFlag
8d00: 29 7b 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 72  ){.  db_begin_tr
8d10: 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 69  ansaction();.  i
8d20: 66 28 20 67 6c 6f 62 61 6c 46 6c 61 67 20 29 7b  f( globalFlag ){
8d30: 0a 20 20 20 20 64 62 5f 73 77 61 70 5f 63 6f 6e  .    db_swap_con
8d40: 6e 65 63 74 69 6f 6e 73 28 29 3b 0a 20 20 20 20  nections();.    
8d50: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 52  db_multi_exec("R
8d60: 45 50 4c 41 43 45 20 49 4e 54 4f 20 67 6c 6f 62  EPLACE INTO glob
8d70: 61 6c 5f 63 6f 6e 66 69 67 28 6e 61 6d 65 2c 76  al_config(name,v
8d80: 61 6c 75 65 29 20 56 41 4c 55 45 53 28 25 51 2c  alue) VALUES(%Q,
8d90: 25 51 29 22 2c 0a 20 20 20 20 20 20 20 20 20 20  %Q)",.          
8da0: 20 20 20 20 20 20 20 20 20 7a 4e 61 6d 65 2c 20           zName, 
8db0: 7a 56 61 6c 75 65 29 3b 0a 20 20 20 20 64 62 5f  zValue);.    db_
8dc0: 73 77 61 70 5f 63 6f 6e 6e 65 63 74 69 6f 6e 73  swap_connections
8dd0: 28 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ();.  }else{.   
8de0: 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22   db_multi_exec("
8df0: 52 45 50 4c 41 43 45 20 49 4e 54 4f 20 63 6f 6e  REPLACE INTO con
8e00: 66 69 67 28 6e 61 6d 65 2c 76 61 6c 75 65 29 20  fig(name,value) 
8e10: 56 41 4c 55 45 53 28 25 51 2c 25 51 29 22 2c 0a  VALUES(%Q,%Q)",.
8e20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8e30: 20 20 20 7a 4e 61 6d 65 2c 20 7a 56 61 6c 75 65     zName, zValue
8e40: 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 67 6c 6f  );.  }.  if( glo
8e50: 62 61 6c 46 6c 61 67 20 26 26 20 67 2e 72 65 70  balFlag && g.rep
8e60: 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20  ositoryOpen ){. 
8e70: 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63     db_multi_exec
8e80: 28 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 63 6f  ("DELETE FROM co
8e90: 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 3d  nfig WHERE name=
8ea0: 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d  %Q", zName);.  }
8eb0: 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61  .  db_end_transa
8ec0: 63 74 69 6f 6e 28 30 29 3b 0a 7d 0a 76 6f 69 64  ction(0);.}.void
8ed0: 20 64 62 5f 75 6e 73 65 74 28 63 6f 6e 73 74 20   db_unset(const 
8ee0: 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 69 6e 74  char *zName, int
8ef0: 20 67 6c 6f 62 61 6c 46 6c 61 67 29 7b 0a 20 20   globalFlag){.  
8f00: 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61 63  db_begin_transac
8f10: 74 69 6f 6e 28 29 3b 0a 20 20 69 66 28 20 67 6c  tion();.  if( gl
8f20: 6f 62 61 6c 46 6c 61 67 20 29 7b 0a 20 20 20 20  obalFlag ){.    
8f30: 64 62 5f 73 77 61 70 5f 63 6f 6e 6e 65 63 74 69  db_swap_connecti
8f40: 6f 6e 73 28 29 3b 0a 20 20 20 20 64 62 5f 6d 75  ons();.    db_mu
8f50: 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 54 45  lti_exec("DELETE
8f60: 20 46 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e   FROM global_con
8f70: 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25  fig WHERE name=%
8f80: 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20 20  Q", zName);.    
8f90: 64 62 5f 73 77 61 70 5f 63 6f 6e 6e 65 63 74 69  db_swap_connecti
8fa0: 6f 6e 73 28 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  ons();.  }else{.
8fb0: 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65      db_multi_exe
8fc0: 63 28 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 63  c("DELETE FROM c
8fd0: 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65  onfig WHERE name
8fe0: 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20  =%Q", zName);.  
8ff0: 7d 0a 20 20 69 66 28 20 67 6c 6f 62 61 6c 46 6c  }.  if( globalFl
9000: 61 67 20 26 26 20 67 2e 72 65 70 6f 73 69 74 6f  ag && g.reposito
9010: 72 79 4f 70 65 6e 20 29 7b 0a 20 20 20 20 64 62  ryOpen ){.    db
9020: 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 44 45 4c  _multi_exec("DEL
9030: 45 54 45 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20  ETE FROM config 
9040: 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20  WHERE name=%Q", 
9050: 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62  zName);.  }.  db
9060: 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e  _end_transaction
9070: 28 30 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 69 73  (0);.}.int db_is
9080: 5f 67 6c 6f 62 61 6c 28 63 6f 6e 73 74 20 63 68  _global(const ch
9090: 61 72 20 2a 7a 4e 61 6d 65 29 7b 0a 20 20 69 6e  ar *zName){.  in
90a0: 74 20 72 63 20 3d 20 30 3b 0a 20 20 69 66 28 20  t rc = 0;.  if( 
90b0: 67 2e 63 6f 6e 66 69 67 4f 70 65 6e 20 29 7b 0a  g.configOpen ){.
90c0: 20 20 20 20 64 62 5f 73 77 61 70 5f 63 6f 6e 6e      db_swap_conn
90d0: 65 63 74 69 6f 6e 73 28 29 3b 0a 20 20 20 20 72  ections();.    r
90e0: 63 20 3d 20 64 62 5f 65 78 69 73 74 73 28 22 53  c = db_exists("S
90f0: 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 67 6c 6f  ELECT 1 FROM glo
9100: 62 61 6c 5f 63 6f 6e 66 69 67 20 57 48 45 52 45  bal_config WHERE
9110: 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65   name=%Q", zName
9120: 29 3b 0a 20 20 20 20 64 62 5f 73 77 61 70 5f 63  );.    db_swap_c
9130: 6f 6e 6e 65 63 74 69 6f 6e 73 28 29 3b 0a 20 20  onnections();.  
9140: 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d  }.  return rc;.}
9150: 0a 69 6e 74 20 64 62 5f 67 65 74 5f 69 6e 74 28  .int db_get_int(
9160: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d  const char *zNam
9170: 65 2c 20 69 6e 74 20 64 66 6c 74 29 7b 0a 20 20  e, int dflt){.  
9180: 69 6e 74 20 76 20 3d 20 64 66 6c 74 3b 0a 20 20  int v = dflt;.  
9190: 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20 67 2e  int rc;.  if( g.
91a0: 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29  repositoryOpen )
91b0: 7b 0a 20 20 20 20 53 74 6d 74 20 71 3b 0a 20 20  {.    Stmt q;.  
91c0: 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c    db_prepare(&q,
91d0: 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46   "SELECT value F
91e0: 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45  ROM config WHERE
91f0: 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65   name=%Q", zName
9200: 29 3b 0a 20 20 20 20 72 63 20 3d 20 64 62 5f 73  );.    rc = db_s
9210: 74 65 70 28 26 71 29 3b 0a 20 20 20 20 69 66 28  tep(&q);.    if(
9220: 20 72 63 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20   rc==SQLITE_ROW 
9230: 29 7b 0a 20 20 20 20 20 20 76 20 3d 20 64 62 5f  ){.      v = db_
9240: 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c 20 30  column_int(&q, 0
9250: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 62 5f  );.    }.    db_
9260: 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20  finalize(&q);.  
9270: 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 3d 20  }else{.    rc = 
9280: 53 51 4c 49 54 45 5f 44 4f 4e 45 3b 0a 20 20 7d  SQLITE_DONE;.  }
9290: 0a 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54  .  if( rc==SQLIT
92a0: 45 5f 44 4f 4e 45 20 26 26 20 67 2e 63 6f 6e 66  E_DONE && g.conf
92b0: 69 67 4f 70 65 6e 20 29 7b 0a 20 20 20 20 64 62  igOpen ){.    db
92c0: 5f 73 77 61 70 5f 63 6f 6e 6e 65 63 74 69 6f 6e  _swap_connection
92d0: 73 28 29 3b 0a 20 20 20 20 76 20 3d 20 64 62 5f  s();.    v = db_
92e0: 69 6e 74 28 64 66 6c 74 2c 20 22 53 45 4c 45 43  int(dflt, "SELEC
92f0: 54 20 76 61 6c 75 65 20 46 52 4f 4d 20 67 6c 6f  T value FROM glo
9300: 62 61 6c 5f 63 6f 6e 66 69 67 20 57 48 45 52 45  bal_config WHERE
9310: 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65   name=%Q", zName
9320: 29 3b 0a 20 20 20 20 64 62 5f 73 77 61 70 5f 63  );.    db_swap_c
9330: 6f 6e 6e 65 63 74 69 6f 6e 73 28 29 3b 0a 20 20  onnections();.  
9340: 7d 0a 20 20 72 65 74 75 72 6e 20 76 3b 0a 7d 0a  }.  return v;.}.
9350: 76 6f 69 64 20 64 62 5f 73 65 74 5f 69 6e 74 28  void db_set_int(
9360: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d  const char *zNam
9370: 65 2c 20 69 6e 74 20 76 61 6c 75 65 2c 20 69 6e  e, int value, in
9380: 74 20 67 6c 6f 62 61 6c 46 6c 61 67 29 7b 0a 20  t globalFlag){. 
9390: 20 69 66 28 20 67 6c 6f 62 61 6c 46 6c 61 67 20   if( globalFlag 
93a0: 29 7b 0a 20 20 20 20 64 62 5f 73 77 61 70 5f 63  ){.    db_swap_c
93b0: 6f 6e 6e 65 63 74 69 6f 6e 73 28 29 3b 0a 20 20  onnections();.  
93c0: 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28    db_multi_exec(
93d0: 22 52 45 50 4c 41 43 45 20 49 4e 54 4f 20 67 6c  "REPLACE INTO gl
93e0: 6f 62 61 6c 5f 63 6f 6e 66 69 67 28 6e 61 6d 65  obal_config(name
93f0: 2c 76 61 6c 75 65 29 20 56 41 4c 55 45 53 28 25  ,value) VALUES(%
9400: 51 2c 25 64 29 22 2c 0a 20 20 20 20 20 20 20 20  Q,%d)",.        
9410: 20 20 20 20 20 20 20 20 20 20 7a 4e 61 6d 65 2c            zName,
9420: 20 76 61 6c 75 65 29 3b 0a 20 20 20 20 64 62 5f   value);.    db_
9430: 73 77 61 70 5f 63 6f 6e 6e 65 63 74 69 6f 6e 73  swap_connections
9440: 28 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ();.  }else{.   
9450: 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22   db_multi_exec("
9460: 52 45 50 4c 41 43 45 20 49 4e 54 4f 20 63 6f 6e  REPLACE INTO con
9470: 66 69 67 28 6e 61 6d 65 2c 76 61 6c 75 65 29 20  fig(name,value) 
9480: 56 41 4c 55 45 53 28 25 51 2c 25 64 29 22 2c 0a  VALUES(%Q,%d)",.
9490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
94a0: 20 20 7a 4e 61 6d 65 2c 20 76 61 6c 75 65 29 3b    zName, value);
94b0: 0a 20 20 7d 0a 20 20 69 66 28 20 67 6c 6f 62 61  .  }.  if( globa
94c0: 6c 46 6c 61 67 20 26 26 20 67 2e 72 65 70 6f 73  lFlag && g.repos
94d0: 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 20 20  itoryOpen ){.   
94e0: 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22   db_multi_exec("
94f0: 44 45 4c 45 54 45 20 46 52 4f 4d 20 63 6f 6e 66  DELETE FROM conf
9500: 69 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51  ig WHERE name=%Q
9510: 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 7d  ", zName);.  }.}
9520: 0a 69 6e 74 20 64 62 5f 67 65 74 5f 62 6f 6f 6c  .int db_get_bool
9530: 65 61 6e 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  ean(const char *
9540: 7a 4e 61 6d 65 2c 20 69 6e 74 20 64 66 6c 74 29  zName, int dflt)
9550: 7b 0a 20 20 63 68 61 72 20 2a 7a 56 61 6c 20 3d  {.  char *zVal =
9560: 20 64 62 5f 67 65 74 28 7a 4e 61 6d 65 2c 20 64   db_get(zName, d
9570: 66 6c 74 20 3f 20 22 6f 6e 22 20 3a 20 22 6f 66  flt ? "on" : "of
9580: 66 22 29 3b 0a 20 20 69 66 28 20 69 73 5f 74 72  f");.  if( is_tr
9590: 75 74 68 28 7a 56 61 6c 29 20 29 20 72 65 74 75  uth(zVal) ) retu
95a0: 72 6e 20 31 3b 0a 20 20 69 66 28 20 69 73 5f 66  rn 1;.  if( is_f
95b0: 61 6c 73 65 28 7a 56 61 6c 29 20 29 20 72 65 74  alse(zVal) ) ret
95c0: 75 72 6e 20 30 3b 0a 20 20 72 65 74 75 72 6e 20  urn 0;.  return 
95d0: 64 66 6c 74 3b 0a 7d 0a 63 68 61 72 20 2a 64 62  dflt;.}.char *db
95e0: 5f 6c 67 65 74 28 63 6f 6e 73 74 20 63 68 61 72  _lget(const char
95f0: 20 2a 7a 4e 61 6d 65 2c 20 63 68 61 72 20 2a 7a   *zName, char *z
9600: 44 65 66 61 75 6c 74 29 7b 0a 20 20 72 65 74 75  Default){.  retu
9610: 72 6e 20 64 62 5f 74 65 78 74 28 28 63 68 61 72  rn db_text((char
9620: 2a 29 7a 44 65 66 61 75 6c 74 2c 0a 20 20 20 20  *)zDefault,.    
9630: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 45               "SE
9640: 4c 45 43 54 20 76 61 6c 75 65 20 46 52 4f 4d 20  LECT value FROM 
9650: 76 76 61 72 20 57 48 45 52 45 20 6e 61 6d 65 3d  vvar WHERE name=
9660: 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 7d 0a 76  %Q", zName);.}.v
9670: 6f 69 64 20 64 62 5f 6c 73 65 74 28 63 6f 6e 73  oid db_lset(cons
9680: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 63  t char *zName, c
9690: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 6c 75  onst char *zValu
96a0: 65 29 7b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f 65  e){.  db_multi_e
96b0: 78 65 63 28 22 52 45 50 4c 41 43 45 20 49 4e 54  xec("REPLACE INT
96c0: 4f 20 76 76 61 72 28 6e 61 6d 65 2c 76 61 6c 75  O vvar(name,valu
96d0: 65 29 20 56 41 4c 55 45 53 28 25 51 2c 25 51 29  e) VALUES(%Q,%Q)
96e0: 22 2c 20 7a 4e 61 6d 65 2c 20 7a 56 61 6c 75 65  ", zName, zValue
96f0: 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 6c 67 65 74  );.}.int db_lget
9700: 5f 69 6e 74 28 63 6f 6e 73 74 20 63 68 61 72 20  _int(const char 
9710: 2a 7a 4e 61 6d 65 2c 20 69 6e 74 20 64 66 6c 74  *zName, int dflt
9720: 29 7b 0a 20 20 72 65 74 75 72 6e 20 64 62 5f 69  ){.  return db_i
9730: 6e 74 28 64 66 6c 74 2c 20 22 53 45 4c 45 43 54  nt(dflt, "SELECT
9740: 20 76 61 6c 75 65 20 46 52 4f 4d 20 76 76 61 72   value FROM vvar
9750: 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c   WHERE name=%Q",
9760: 20 7a 4e 61 6d 65 29 3b 0a 7d 0a 76 6f 69 64 20   zName);.}.void 
9770: 64 62 5f 6c 73 65 74 5f 69 6e 74 28 63 6f 6e 73  db_lset_int(cons
9780: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 69  t char *zName, i
9790: 6e 74 20 76 61 6c 75 65 29 7b 0a 20 20 64 62 5f  nt value){.  db_
97a0: 6d 75 6c 74 69 5f 65 78 65 63 28 22 52 45 50 4c  multi_exec("REPL
97b0: 41 43 45 20 49 4e 54 4f 20 76 76 61 72 28 6e 61  ACE INTO vvar(na
97c0: 6d 65 2c 76 61 6c 75 65 29 20 56 41 4c 55 45 53  me,value) VALUES
97d0: 28 25 51 2c 25 64 29 22 2c 20 7a 4e 61 6d 65 2c  (%Q,%d)", zName,
97e0: 20 76 61 6c 75 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a   value);.}../*.*
97f0: 2a 20 52 65 63 6f 72 64 20 74 68 65 20 6e 61 6d  * Record the nam
9800: 65 20 6f 66 20 61 20 6c 6f 63 61 6c 20 72 65 70  e of a local rep
9810: 6f 73 69 74 6f 72 79 20 69 6e 20 74 68 65 20 67  ository in the g
9820: 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 28 29 20 64  lobal_config() d
9830: 61 74 61 62 61 73 65 2e 0a 2a 2a 20 54 68 65 20  atabase..** The 
9840: 72 65 70 6f 73 69 74 6f 72 79 20 66 69 6c 65 6e  repository filen
9850: 61 6d 65 20 25 73 20 69 73 20 72 65 63 6f 72 64  ame %s is record
9860: 65 64 20 61 73 20 61 6e 20 65 6e 74 72 79 20 77  ed as an entry w
9870: 69 74 68 20 61 20 22 6e 61 6d 65 22 20 66 69 65  ith a "name" fie
9880: 6c 64 0a 2a 2a 20 6f 66 20 74 68 65 20 66 6f 6c  ld.** of the fol
9890: 6c 6f 77 69 6e 67 20 66 6f 72 6d 3a 0a 2a 2a 0a  lowing form:.**.
98a0: 2a 2a 20 20 20 20 20 20 20 72 65 70 6f 3a 25 73  **       repo:%s
98b0: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 76 61 6c 75 65  .**.** The value
98c0: 20 66 69 65 6c 64 20 69 73 20 73 65 74 20 74 6f   field is set to
98d0: 20 31 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 72   1..*/.void db_r
98e0: 65 63 6f 72 64 5f 72 65 70 6f 73 69 74 6f 72 79  ecord_repository
98f0: 5f 66 69 6c 65 6e 61 6d 65 28 63 6f 6e 73 74 20  _filename(const 
9900: 63 68 61 72 20 2a 7a 4e 61 6d 65 29 7b 0a 20 20  char *zName){.  
9910: 42 6c 6f 62 20 66 75 6c 6c 3b 0a 20 20 69 66 28  Blob full;.  if(
9920: 20 7a 4e 61 6d 65 3d 3d 30 20 29 7b 0a 20 20 20   zName==0 ){.   
9930: 20 69 66 28 20 21 67 2e 6c 6f 63 61 6c 4f 70 65   if( !g.localOpe
9940: 6e 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  n ) return;.    
9950: 7a 4e 61 6d 65 20 3d 20 64 62 5f 6c 67 65 74 28  zName = db_lget(
9960: 22 72 65 70 6f 73 69 74 6f 72 79 22 2c 20 30 29  "repository", 0)
9970: 3b 0a 20 20 7d 0a 20 20 66 69 6c 65 5f 63 61 6e  ;.  }.  file_can
9980: 6f 6e 69 63 61 6c 5f 6e 61 6d 65 28 7a 4e 61 6d  onical_name(zNam
9990: 65 2c 20 26 66 75 6c 6c 29 3b 0a 20 20 64 62 5f  e, &full);.  db_
99a0: 73 77 61 70 5f 63 6f 6e 6e 65 63 74 69 6f 6e 73  swap_connections
99b0: 28 29 3b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f 65  ();.  db_multi_e
99c0: 78 65 63 28 0a 20 20 20 20 20 22 49 4e 53 45 52  xec(.     "INSER
99d0: 54 20 4f 52 20 49 47 4e 4f 52 45 20 49 4e 54 4f  T OR IGNORE INTO
99e0: 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 28 6e   global_config(n
99f0: 61 6d 65 2c 76 61 6c 75 65 29 22 0a 20 20 20 20  ame,value)".    
9a00: 20 22 56 41 4c 55 45 53 28 27 72 65 70 6f 3a 25   "VALUES('repo:%
9a10: 71 27 2c 31 29 22 2c 0a 20 20 20 20 20 62 6c 6f  q',1)",.     blo
9a20: 62 5f 73 74 72 28 26 66 75 6c 6c 29 0a 20 20 29  b_str(&full).  )
9a30: 3b 0a 20 20 64 62 5f 73 77 61 70 5f 63 6f 6e 6e  ;.  db_swap_conn
9a40: 65 63 74 69 6f 6e 73 28 29 3b 0a 20 20 62 6c 6f  ections();.  blo
9a50: 62 5f 72 65 73 65 74 28 26 66 75 6c 6c 29 3b 0a  b_reset(&full);.
9a60: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44  }../*.** COMMAND
9a70: 3a 20 6f 70 65 6e 0a 2a 2a 0a 2a 2a 20 55 73 61  : open.**.** Usa
9a80: 67 65 3a 20 25 66 6f 73 73 69 6c 20 6f 70 65 6e  ge: %fossil open
9a90: 20 46 49 4c 45 4e 41 4d 45 20 3f 56 45 52 53 49   FILENAME ?VERSI
9aa0: 4f 4e 3f 20 3f 2d 2d 6b 65 65 70 3f 0a 2a 2a 0a  ON? ?--keep?.**.
9ab0: 2a 2a 20 4f 70 65 6e 20 61 20 63 6f 6e 6e 65 63  ** Open a connec
9ac0: 74 69 6f 6e 20 74 6f 20 74 68 65 20 6c 6f 63 61  tion to the loca
9ad0: 6c 20 72 65 70 6f 73 69 74 6f 72 79 20 69 6e 20  l repository in 
9ae0: 46 49 4c 45 4e 41 4d 45 2e 20 20 41 20 63 68 65  FILENAME.  A che
9af0: 63 6b 6f 75 74 0a 2a 2a 20 66 6f 72 20 74 68 65  ckout.** for the
9b00: 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 63   repository is c
9b10: 72 65 61 74 65 64 20 77 69 74 68 20 69 74 73 20  reated with its 
9b20: 72 6f 6f 74 20 61 74 20 74 68 65 20 77 6f 72 6b  root at the work
9b30: 69 6e 67 20 64 69 72 65 63 74 6f 72 79 2e 0a 2a  ing directory..*
9b40: 2a 20 49 66 20 56 45 52 53 49 4f 4e 20 69 73 20  * If VERSION is 
9b50: 73 70 65 63 69 66 69 65 64 20 74 68 65 6e 20 74  specified then t
9b60: 68 61 74 20 76 65 72 73 69 6f 6e 20 69 73 20 63  hat version is c
9b70: 68 65 63 6b 65 64 20 6f 75 74 2e 20 20 4f 74 68  hecked out.  Oth
9b80: 65 72 77 69 73 65 0a 2a 2a 20 74 68 65 20 6c 61  erwise.** the la
9b90: 74 65 73 74 20 76 65 72 73 69 6f 6e 20 69 73 20  test version is 
9ba0: 63 68 65 63 6b 65 64 20 6f 75 74 2e 20 20 4e 6f  checked out.  No
9bb0: 20 66 69 6c 65 73 20 6f 74 68 65 72 20 74 68 61   files other tha
9bc0: 6e 20 22 6d 61 6e 69 66 65 73 74 22 0a 2a 2a 20  n "manifest".** 
9bd0: 61 6e 64 20 22 6d 61 6e 69 66 65 73 74 2e 75 75  and "manifest.uu
9be0: 69 64 22 20 61 72 65 20 6d 6f 64 69 66 69 65 64  id" are modified
9bf0: 20 69 66 20 74 68 65 20 2d 2d 6b 65 65 70 20 6f   if the --keep o
9c00: 70 74 69 6f 6e 20 69 73 20 70 72 65 73 65 6e 74  ption is present
9c10: 2e 0a 2a 2a 0a 2a 2a 20 53 65 65 20 61 6c 73 6f  ..**.** See also
9c20: 20 74 68 65 20 22 63 6c 6f 73 65 22 20 63 6f 6d   the "close" com
9c30: 6d 61 6e 64 2e 0a 2a 2f 0a 76 6f 69 64 20 63 6d  mand..*/.void cm
9c40: 64 5f 6f 70 65 6e 28 76 6f 69 64 29 7b 0a 20 20  d_open(void){.  
9c50: 42 6c 6f 62 20 70 61 74 68 3b 0a 20 20 69 6e 74  Blob path;.  int
9c60: 20 76 69 64 3b 0a 20 20 69 6e 74 20 6b 65 65 70   vid;.  int keep
9c70: 46 6c 61 67 3b 0a 20 20 73 74 61 74 69 63 20 63  Flag;.  static c
9c80: 68 61 72 20 2a 61 7a 4e 65 77 41 72 67 76 5b 5d  har *azNewArgv[]
9c90: 20 3d 20 7b 20 30 2c 20 22 63 68 65 63 6b 6f 75   = { 0, "checkou
9ca0: 74 22 2c 20 22 2d 2d 70 72 6f 6d 70 74 22 2c 20  t", "--prompt", 
9cb0: 22 2d 2d 6c 61 74 65 73 74 22 2c 20 30 2c 20 30  "--latest", 0, 0
9cc0: 20 7d 3b 0a 20 20 75 72 6c 5f 70 72 6f 78 79 5f   };.  url_proxy_
9cd0: 6f 70 74 69 6f 6e 73 28 29 3b 0a 20 20 6b 65 65  options();.  kee
9ce0: 70 46 6c 61 67 20 3d 20 66 69 6e 64 5f 6f 70 74  pFlag = find_opt
9cf0: 69 6f 6e 28 22 6b 65 65 70 22 2c 30 2c 30 29 21  ion("keep",0,0)!
9d00: 3d 30 3b 0a 20 20 69 66 28 20 67 2e 61 72 67 63  =0;.  if( g.argc
9d10: 21 3d 33 20 26 26 20 67 2e 61 72 67 63 21 3d 34  !=3 && g.argc!=4
9d20: 20 29 7b 0a 20 20 20 20 75 73 61 67 65 28 22 52   ){.    usage("R
9d30: 45 50 4f 53 49 54 4f 52 59 2d 46 49 4c 45 4e 41  EPOSITORY-FILENA
9d40: 4d 45 20 3f 56 45 52 53 49 4f 4e 3f 22 29 3b 0a  ME ?VERSION?");.
9d50: 20 20 7d 0a 20 20 69 66 28 20 64 62 5f 6f 70 65    }.  if( db_ope
9d60: 6e 5f 6c 6f 63 61 6c 28 29 20 29 7b 0a 20 20 20  n_local() ){.   
9d70: 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 61   fossil_panic("a
9d80: 6c 72 65 61 64 79 20 77 69 74 68 69 6e 20 61 6e  lready within an
9d90: 20 6f 70 65 6e 20 74 72 65 65 20 72 6f 6f 74 65   open tree roote
9da0: 64 20 61 74 20 25 73 22 2c 20 67 2e 7a 4c 6f 63  d at %s", g.zLoc
9db0: 61 6c 52 6f 6f 74 29 3b 0a 20 20 7d 0a 20 20 66  alRoot);.  }.  f
9dc0: 69 6c 65 5f 63 61 6e 6f 6e 69 63 61 6c 5f 6e 61  ile_canonical_na
9dd0: 6d 65 28 67 2e 61 72 67 76 5b 32 5d 2c 20 26 70  me(g.argv[2], &p
9de0: 61 74 68 29 3b 0a 20 20 64 62 5f 6f 70 65 6e 5f  ath);.  db_open_
9df0: 72 65 70 6f 73 69 74 6f 72 79 28 62 6c 6f 62 5f  repository(blob_
9e00: 73 74 72 28 26 70 61 74 68 29 29 3b 0a 20 20 64  str(&path));.  d
9e10: 62 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 65 28  b_init_database(
9e20: 22 2e 2f 5f 46 4f 53 53 49 4c 5f 22 2c 20 7a 4c  "./_FOSSIL_", zL
9e30: 6f 63 61 6c 53 63 68 65 6d 61 2c 20 28 63 68 61  ocalSchema, (cha
9e40: 72 2a 29 30 29 3b 0a 20 20 64 62 5f 6f 70 65 6e  r*)0);.  db_open
9e50: 5f 6c 6f 63 61 6c 28 29 3b 0a 20 20 64 62 5f 6c  _local();.  db_l
9e60: 73 65 74 28 22 72 65 70 6f 73 69 74 6f 72 79 22  set("repository"
9e70: 2c 20 62 6c 6f 62 5f 73 74 72 28 26 70 61 74 68  , blob_str(&path
9e80: 29 29 3b 0a 20 20 64 62 5f 72 65 63 6f 72 64 5f  ));.  db_record_
9e90: 72 65 70 6f 73 69 74 6f 72 79 5f 66 69 6c 65 6e  repository_filen
9ea0: 61 6d 65 28 62 6c 6f 62 5f 73 74 72 28 26 70 61  ame(blob_str(&pa
9eb0: 74 68 29 29 3b 0a 20 20 76 69 64 20 3d 20 64 62  th));.  vid = db
9ec0: 5f 69 6e 74 28 30 2c 20 22 53 45 4c 45 43 54 20  _int(0, "SELECT 
9ed0: 70 69 64 20 46 52 4f 4d 20 70 6c 69 6e 6b 20 79  pid FROM plink y
9ee0: 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ".              
9ef0: 20 20 20 20 22 20 57 48 45 52 45 20 4e 4f 54 20      " WHERE NOT 
9f00: 45 58 49 53 54 53 28 53 45 4c 45 43 54 20 31 20  EXISTS(SELECT 1 
9f10: 46 52 4f 4d 20 70 6c 69 6e 6b 20 78 20 57 48 45  FROM plink x WHE
9f20: 52 45 20 78 2e 63 69 64 3d 79 2e 70 69 64 29 22  RE x.cid=y.pid)"
9f30: 29 3b 0a 20 20 69 66 28 20 76 69 64 3d 3d 30 20  );.  if( vid==0 
9f40: 29 7b 0a 20 20 20 20 64 62 5f 6c 73 65 74 5f 69  ){.    db_lset_i
9f50: 6e 74 28 22 63 68 65 63 6b 6f 75 74 22 2c 20 31  nt("checkout", 1
9f60: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
9f70: 63 68 61 72 20 2a 2a 6f 6c 64 41 72 67 76 20 3d  char **oldArgv =
9f80: 20 67 2e 61 72 67 76 3b 0a 20 20 20 20 69 6e 74   g.argv;.    int
9f90: 20 6f 6c 64 41 72 67 63 20 3d 20 67 2e 61 72 67   oldArgc = g.arg
9fa0: 63 3b 0a 20 20 20 20 64 62 5f 6c 73 65 74 5f 69  c;.    db_lset_i
9fb0: 6e 74 28 22 63 68 65 63 6b 6f 75 74 22 2c 20 76  nt("checkout", v
9fc0: 69 64 29 3b 0a 20 20 20 20 61 7a 4e 65 77 41 72  id);.    azNewAr
9fd0: 67 76 5b 30 5d 20 3d 20 67 2e 61 72 67 76 5b 30  gv[0] = g.argv[0
9fe0: 5d 3b 0a 20 20 20 20 67 2e 61 72 67 76 20 3d 20  ];.    g.argv = 
9ff0: 61 7a 4e 65 77 41 72 67 76 3b 0a 20 20 20 20 67  azNewArgv;.    g
a000: 2e 61 72 67 63 20 3d 20 34 3b 0a 20 20 20 20 69  .argc = 4;.    i
a010: 66 28 20 6f 6c 64 41 72 67 63 3d 3d 34 20 29 7b  f( oldArgc==4 ){
a020: 0a 20 20 20 20 20 20 61 7a 4e 65 77 41 72 67 76  .      azNewArgv
a030: 5b 67 2e 61 72 67 63 2d 31 5d 20 3d 20 6f 6c 64  [g.argc-1] = old
a040: 41 72 67 76 5b 33 5d 3b 0a 20 20 20 20 7d 0a 20  Argv[3];.    }. 
a050: 20 20 20 69 66 28 20 6b 65 65 70 46 6c 61 67 20     if( keepFlag 
a060: 29 7b 0a 20 20 20 20 20 20 61 7a 4e 65 77 41 72  ){.      azNewAr
a070: 67 76 5b 67 2e 61 72 67 63 2b 2b 5d 20 3d 20 22  gv[g.argc++] = "
a080: 2d 2d 6b 65 65 70 22 3b 0a 20 20 20 20 7d 0a 20  --keep";.    }. 
a090: 20 20 20 63 68 65 63 6b 6f 75 74 5f 63 6d 64 28     checkout_cmd(
a0a0: 29 3b 0a 20 20 20 20 67 2e 61 72 67 63 20 3d 20  );.    g.argc = 
a0b0: 32 3b 0a 20 20 20 20 69 6e 66 6f 5f 63 6d 64 28  2;.    info_cmd(
a0c0: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
a0d0: 50 72 69 6e 74 20 74 68 65 20 76 61 6c 75 65 20  Print the value 
a0e0: 6f 66 20 61 20 73 65 74 74 69 6e 67 20 6e 61 6d  of a setting nam
a0f0: 65 64 20 7a 4e 61 6d 65 0a 2a 2f 0a 73 74 61 74  ed zName.*/.stat
a100: 69 63 20 76 6f 69 64 20 70 72 69 6e 74 5f 73 65  ic void print_se
a110: 74 74 69 6e 67 28 63 6f 6e 73 74 20 63 68 61 72  tting(const char
a120: 20 2a 7a 4e 61 6d 65 29 7b 0a 20 20 53 74 6d 74   *zName){.  Stmt
a130: 20 71 3b 0a 20 20 69 66 28 20 67 2e 72 65 70 6f   q;.  if( g.repo
a140: 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 20  sitoryOpen ){.  
a150: 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c    db_prepare(&q,
a160: 0a 20 20 20 20 20 20 20 22 53 45 4c 45 43 54 20  .       "SELECT 
a170: 27 28 6c 6f 63 61 6c 29 27 2c 20 76 61 6c 75 65  '(local)', value
a180: 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45   FROM config WHE
a190: 52 45 20 6e 61 6d 65 3d 25 51 22 0a 20 20 20 20  RE name=%Q".    
a1a0: 20 20 20 22 20 55 4e 49 4f 4e 20 41 4c 4c 20 22     " UNION ALL "
a1b0: 0a 20 20 20 20 20 20 20 22 53 45 4c 45 43 54 20  .       "SELECT 
a1c0: 27 28 67 6c 6f 62 61 6c 29 27 2c 20 76 61 6c 75  '(global)', valu
a1d0: 65 20 46 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f  e FROM global_co
a1e0: 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 3d  nfig WHERE name=
a1f0: 25 51 22 2c 0a 20 20 20 20 20 20 20 7a 4e 61 6d  %Q",.       zNam
a200: 65 2c 20 7a 4e 61 6d 65 0a 20 20 20 20 29 3b 0a  e, zName.    );.
a210: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 64 62 5f    }else{.    db_
a220: 70 72 65 70 61 72 65 28 26 71 2c 0a 20 20 20 20  prepare(&q,.    
a230: 20 20 22 53 45 4c 45 43 54 20 27 28 67 6c 6f 62    "SELECT '(glob
a240: 61 6c 29 27 2c 20 76 61 6c 75 65 20 46 52 4f 4d  al)', value FROM
a250: 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 20 57   global_config W
a260: 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c 0a 20  HERE name=%Q",. 
a270: 20 20 20 20 20 7a 4e 61 6d 65 0a 20 20 20 20 29       zName.    )
a280: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 64 62 5f 73  ;.  }.  if( db_s
a290: 74 65 70 28 26 71 29 3d 3d 53 51 4c 49 54 45 5f  tep(&q)==SQLITE_
a2a0: 52 4f 57 20 29 7b 0a 20 20 20 20 70 72 69 6e 74  ROW ){.    print
a2b0: 66 28 22 25 2d 32 30 73 20 25 2d 38 73 20 25 73  f("%-20s %-8s %s
a2c0: 5c 6e 22 2c 20 7a 4e 61 6d 65 2c 20 64 62 5f 63  \n", zName, db_c
a2d0: 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 30  olumn_text(&q, 0
a2e0: 29 2c 0a 20 20 20 20 20 20 20 20 64 62 5f 63 6f  ),.        db_co
a2f0: 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 31 29  lumn_text(&q, 1)
a300: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
a310: 70 72 69 6e 74 66 28 22 25 2d 32 30 73 5c 6e 22  printf("%-20s\n"
a320: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20  , zName);.  }.  
a330: 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b  db_finalize(&q);
a340: 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 64 65 66 69 6e  .}.../*.** defin
a350: 65 20 61 6c 6c 20 73 65 74 74 69 6e 67 73 2c 20  e all settings, 
a360: 77 68 69 63 68 20 63 61 6e 20 62 65 20 63 6f 6e  which can be con
a370: 74 72 6f 6c 6c 65 64 20 76 69 61 20 74 68 65 20  trolled via the 
a380: 73 65 74 2f 75 6e 73 65 74 0a 2a 2a 20 63 6f 6d  set/unset.** com
a390: 6d 61 6e 64 2e 20 76 61 72 20 69 73 20 74 68 65  mand. var is the
a3a0: 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 69 6e 74   name of the int
a3b0: 65 72 6e 61 6c 20 63 6f 6e 66 69 67 75 72 61 74  ernal configurat
a3c0: 69 6f 6e 20 6e 61 6d 65 20 66 6f 72 20 64 62 5f  ion name for db_
a3d0: 28 75 6e 29 73 65 74 2e 0a 2a 2a 20 49 66 20 76  (un)set..** If v
a3e0: 61 72 20 69 73 20 30 2c 20 74 68 65 20 73 65 74  ar is 0, the set
a3f0: 74 69 6e 67 73 20 6e 61 6d 65 20 69 73 20 75 73  tings name is us
a400: 65 64 2e 0a 2a 2a 20 77 69 64 74 68 20 69 73 20  ed..** width is 
a410: 74 68 65 20 6c 65 6e 67 74 68 20 66 6f 72 20 74  the length for t
a420: 68 65 20 65 64 69 74 20 66 69 65 6c 64 20 6f 6e  he edit field on
a430: 20 74 68 65 20 62 65 68 61 76 69 6f 72 20 70 61   the behavior pa
a440: 67 65 2c 20 30 0a 2a 2a 20 69 73 20 75 73 65 64  ge, 0.** is used
a450: 20 66 6f 72 20 6f 6e 2f 6f 66 66 20 63 68 65 63   for on/off chec
a460: 6b 62 6f 78 65 73 2e 0a 2a 2a 20 54 68 65 20 62  kboxes..** The b
a470: 65 68 61 76 69 6f 75 72 20 70 61 67 65 20 64 6f  ehaviour page do
a480: 65 73 6e 27 74 20 75 73 65 20 61 20 73 70 65 63  esn't use a spec
a490: 69 61 6c 20 6c 61 79 6f 75 74 2e 20 49 74 20 6c  ial layout. It l
a4a0: 69 73 74 73 20 61 6c 6c 0a 2a 2a 20 73 65 74 2d  ists all.** set-
a4b0: 63 6f 6d 6d 61 6e 64 73 20 61 6e 64 20 64 69 73  commands and dis
a4c0: 70 6c 61 79 73 20 74 68 65 20 27 73 65 74 27 2d  plays the 'set'-
a4d0: 68 65 6c 70 20 61 73 20 69 6e 66 6f 2e 0a 2a 2f  help as info..*/
a4e0: 0a 23 69 66 20 49 4e 54 45 52 46 41 43 45 0a 73  .#if INTERFACE.s
a4f0: 74 72 75 63 74 20 73 74 43 6f 6e 74 72 6f 6c 53  truct stControlS
a500: 65 74 74 69 6e 67 73 20 7b 0a 20 20 63 68 61 72  ettings {.  char
a510: 20 63 6f 6e 73 74 20 2a 6e 61 6d 65 3b 20 20 20   const *name;   
a520: 20 20 2f 2a 20 4e 61 6d 65 20 6f 66 20 74 68 65    /* Name of the
a530: 20 73 65 74 74 69 6e 67 20 2a 2f 0a 20 20 63 68   setting */.  ch
a540: 61 72 20 63 6f 6e 73 74 20 2a 76 61 72 3b 20 20  ar const *var;  
a550: 20 20 20 20 2f 2a 20 49 6e 74 65 72 6e 61 6c 20      /* Internal 
a560: 76 61 72 69 61 62 6c 65 20 6e 61 6d 65 20 75 73  variable name us
a570: 65 64 20 62 79 20 64 62 5f 73 65 74 28 29 20 2a  ed by db_set() *
a580: 2f 0a 20 20 69 6e 74 20 77 69 64 74 68 3b 20 20  /.  int width;  
a590: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 57 69 64            /* Wid
a5a0: 74 68 20 6f 66 20 64 69 73 70 6c 61 79 2e 20 20  th of display.  
a5b0: 30 20 66 6f 72 20 62 6f 6f 6c 65 61 6e 20 76 61  0 for boolean va
a5c0: 6c 75 65 73 20 2a 2f 0a 20 20 63 68 61 72 20 63  lues */.  char c
a5d0: 6f 6e 73 74 20 2a 64 65 66 3b 20 20 20 20 20 20  onst *def;      
a5e0: 2f 2a 20 44 65 66 61 75 6c 74 20 76 61 6c 75 65  /* Default value
a5f0: 20 2a 2f 0a 7d 3b 0a 23 65 6e 64 69 66 20 2f 2a   */.};.#endif /*
a600: 20 49 4e 54 45 52 46 41 43 45 20 2a 2f 0a 73 74   INTERFACE */.st
a610: 72 75 63 74 20 73 74 43 6f 6e 74 72 6f 6c 53 65  ruct stControlSe
a620: 74 74 69 6e 67 73 20 63 6f 6e 73 74 20 63 74 72  ttings const ctr
a630: 6c 53 65 74 74 69 6e 67 73 5b 5d 20 3d 20 7b 0a  lSettings[] = {.
a640: 20 20 7b 20 22 61 75 74 6f 2d 63 61 70 74 63 68    { "auto-captch
a650: 61 22 2c 20 20 22 61 75 74 6f 63 61 70 74 63 68  a",  "autocaptch
a660: 61 22 2c 20 20 20 20 30 2c 20 22 6f 6e 22 20 20  a",    0, "on"  
a670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a680: 7d 2c 0a 20 20 7b 20 22 61 75 74 6f 2d 73 68 75  },.  { "auto-shu
a690: 6e 22 2c 20 20 20 20 20 30 2c 20 20 20 20 20 20  n",     0,      
a6a0: 20 20 20 20 20 20 20 20 20 20 30 2c 20 22 6f 6e            0, "on
a6b0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
a6c0: 20 20 20 7d 2c 0a 20 20 7b 20 22 61 75 74 6f 73     },.  { "autos
a6d0: 79 6e 63 22 2c 20 20 20 20 20 20 30 2c 20 20 20  ync",      0,   
a6e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20               0, 
a6f0: 22 6f 6e 22 20 20 20 20 20 20 20 20 20 20 20 20  "on"            
a700: 20 20 20 20 20 20 7d 2c 0a 20 20 7b 20 22 62 69        },.  { "bi
a710: 6e 61 72 79 2d 67 6c 6f 62 22 2c 20 20 20 30 2c  nary-glob",   0,
a720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 33                 3
a730: 32 2c 20 22 22 20 20 20 20 20 20 20 20 20 20 20  2, ""           
a740: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 7b 20           },.  { 
a750: 22 63 6c 65 61 72 73 69 67 6e 22 2c 20 20 20 20  "clearsign",    
a760: 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20   0,             
a770: 20 20 20 30 2c 20 22 6f 66 66 22 20 20 20 20 20     0, "off"     
a780: 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20              },. 
a790: 20 7b 20 22 64 69 66 66 2d 63 6f 6d 6d 61 6e 64   { "diff-command
a7a0: 22 2c 20 20 30 2c 20 20 20 20 20 20 20 20 20 20  ",  0,          
a7b0: 20 20 20 20 20 31 36 2c 20 22 22 20 20 20 20 20       16, ""     
a7c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
a7d0: 2c 0a 20 20 7b 20 22 64 6f 6e 74 2d 70 75 73 68  ,.  { "dont-push
a7e0: 22 2c 20 20 20 20 20 30 2c 20 20 20 20 20 20 20  ",     0,       
a7f0: 20 20 20 20 20 20 20 20 20 30 2c 20 22 6f 66 66           0, "off
a800: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
a810: 20 20 7d 2c 0a 20 20 7b 20 22 65 64 69 74 6f 72    },.  { "editor
a820: 22 2c 20 20 20 20 20 20 20 20 30 2c 20 20 20 20  ",        0,    
a830: 20 20 20 20 20 20 20 20 20 20 20 31 36 2c 20 22             16, "
a840: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
a850: 20 20 20 20 20 7d 2c 0a 20 20 7b 20 22 67 64 69       },.  { "gdi
a860: 66 66 2d 63 6f 6d 6d 61 6e 64 22 2c 20 30 2c 20  ff-command", 0, 
a870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 36                16
a880: 2c 20 22 67 64 69 66 66 22 20 20 20 20 20 20 20  , "gdiff"       
a890: 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 7b 20 22          },.  { "
a8a0: 69 67 6e 6f 72 65 2d 67 6c 6f 62 22 2c 20 20 20  ignore-glob",   
a8b0: 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  0,              
a8c0: 20 34 30 2c 20 22 22 20 20 20 20 20 20 20 20 20   40, ""         
a8d0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
a8e0: 7b 20 22 68 74 74 70 2d 70 6f 72 74 22 2c 20 20  { "http-port",  
a8f0: 20 20 20 30 2c 20 20 20 20 20 20 20 20 20 20 20     0,           
a900: 20 20 20 20 31 36 2c 20 22 38 30 38 30 22 20 20      16, "8080"  
a910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c                },
a920: 0a 20 20 7b 20 22 6c 6f 63 61 6c 61 75 74 68 22  .  { "localauth"
a930: 2c 20 20 20 20 20 30 2c 20 20 20 20 20 20 20 20  ,     0,        
a940: 20 20 20 20 20 20 20 20 30 2c 20 22 6f 66 66 22          0, "off"
a950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a960: 20 7d 2c 0a 20 20 7b 20 22 6d 61 6e 69 66 65 73   },.  { "manifes
a970: 74 22 2c 20 20 20 20 20 20 30 2c 20 20 20 20 20  t",      0,     
a980: 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 22 6f             0, "o
a990: 66 66 22 20 20 20 20 20 20 20 20 20 20 20 20 20  ff"             
a9a0: 20 20 20 20 7d 2c 0a 20 20 7b 20 22 6d 74 69 6d      },.  { "mtim
a9b0: 65 2d 63 68 61 6e 67 65 73 22 2c 20 30 2c 20 20  e-changes", 0,  
a9c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 2c                0,
a9d0: 20 22 6f 6e 22 20 20 20 20 20 20 20 20 20 20 20   "on"           
a9e0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 7b 20 22 70         },.  { "p
a9f0: 67 70 2d 63 6f 6d 6d 61 6e 64 22 2c 20 20 20 30  gp-command",   0
aa00: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
aa10: 33 32 2c 20 22 67 70 67 20 2d 2d 63 6c 65 61 72  32, "gpg --clear
aa20: 73 69 67 6e 20 2d 6f 20 22 20 7d 2c 0a 20 20 7b  sign -o " },.  {
aa30: 20 22 70 72 6f 78 79 22 2c 20 20 20 20 20 20 20   "proxy",       
aa40: 20 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20    0,            
aa50: 20 20 20 33 32 2c 20 22 6f 66 66 22 20 20 20 20     32, "off"    
aa60: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
aa70: 20 20 7b 20 22 72 65 70 6f 2d 63 6b 73 75 6d 22    { "repo-cksum"
aa80: 2c 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20  ,    0,         
aa90: 20 20 20 20 20 20 20 30 2c 20 22 6f 6e 22 20 20         0, "on"  
aaa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
aab0: 7d 2c 0a 20 20 7b 20 22 73 73 68 2d 63 6f 6d 6d  },.  { "ssh-comm
aac0: 61 6e 64 22 2c 20 20 20 30 2c 20 20 20 20 20 20  and",   0,      
aad0: 20 20 20 20 20 20 20 20 20 33 32 2c 20 22 22 20           32, "" 
aae0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
aaf0: 20 20 20 7d 2c 0a 20 20 7b 20 22 77 65 62 2d 62     },.  { "web-b
ab00: 72 6f 77 73 65 72 22 2c 20 20 20 30 2c 20 20 20  rowser",   0,   
ab10: 20 20 20 20 20 20 20 20 20 20 20 20 33 32 2c 20              32, 
ab20: 22 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ""              
ab30: 20 20 20 20 20 20 7d 2c 0a 20 20 7b 20 30 2c 30        },.  { 0,0
ab40: 2c 30 2c 30 20 7d 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a  ,0,0 }.};../*.**
ab50: 20 43 4f 4d 4d 41 4e 44 3a 20 73 65 74 74 69 6e   COMMAND: settin
ab60: 67 73 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 75  gs.** COMMAND: u
ab70: 6e 73 65 74 0a 2a 2a 20 25 66 6f 73 73 69 6c 20  nset.** %fossil 
ab80: 73 65 74 74 69 6e 67 73 20 3f 50 52 4f 50 45 52  settings ?PROPER
ab90: 54 59 3f 20 3f 56 41 4c 55 45 3f 20 3f 2d 67 6c  TY? ?VALUE? ?-gl
aba0: 6f 62 61 6c 3f 0a 2a 2a 20 25 66 6f 73 73 69 6c  obal?.** %fossil
abb0: 20 75 6e 73 65 74 20 50 52 4f 50 45 52 54 59 20   unset PROPERTY 
abc0: 3f 2d 67 6c 6f 62 61 6c 3f 0a 2a 2a 0a 2a 2a 20  ?-global?.**.** 
abd0: 54 68 65 20 22 73 65 74 74 69 6e 67 73 22 20 63  The "settings" c
abe0: 6f 6d 6d 61 6e 64 20 77 69 74 68 20 6e 6f 20 61  ommand with no a
abf0: 72 67 75 6d 65 6e 74 73 20 6c 69 73 74 73 20 61  rguments lists a
ac00: 6c 6c 20 70 72 6f 70 65 72 74 69 65 73 20 61 6e  ll properties an
ac10: 64 20 74 68 65 69 72 0a 2a 2a 20 76 61 6c 75 65  d their.** value
ac20: 73 2e 20 20 57 69 74 68 20 6a 75 73 74 20 61 20  s.  With just a 
ac30: 70 72 6f 70 65 72 74 79 20 6e 61 6d 65 20 69 74  property name it
ac40: 20 73 68 6f 77 73 20 74 68 65 20 76 61 6c 75 65   shows the value
ac50: 20 6f 66 20 74 68 61 74 20 70 72 6f 70 65 72 74   of that propert
ac60: 79 2e 0a 2a 2a 20 57 69 74 68 20 61 20 76 61 6c  y..** With a val
ac70: 75 65 20 61 72 67 75 6d 65 6e 74 20 69 74 20 63  ue argument it c
ac80: 68 61 6e 67 65 73 20 74 68 65 20 70 72 6f 70 65  hanges the prope
ac90: 72 74 79 20 66 6f 72 20 74 68 65 20 63 75 72 72  rty for the curr
aca0: 65 6e 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a  ent repository..
acb0: 2a 2a 0a 2a 2a 20 54 68 65 20 22 75 6e 73 65 74  **.** The "unset
acc0: 22 20 63 6f 6d 6d 61 6e 64 20 63 6c 65 61 72 73  " command clears
acd0: 20 61 20 70 72 6f 70 65 72 74 79 20 73 65 74 74   a property sett
ace0: 69 6e 67 2e 0a 2a 2a 0a 2a 2a 0a 2a 2a 20 20 20  ing..**.**.**   
acf0: 20 61 75 74 6f 2d 63 61 70 74 63 68 61 20 20 20   auto-captcha   
ad00: 20 20 49 66 20 65 6e 61 62 6c 65 64 2c 20 74 68    If enabled, th
ad10: 65 20 4c 6f 67 69 6e 20 70 61 67 65 20 70 72 6f  e Login page pro
ad20: 76 69 64 65 73 20 61 20 62 75 74 74 6f 6e 20 74  vides a button t
ad30: 6f 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20  o.**            
ad40: 20 20 20 20 20 20 20 20 20 66 69 6c 6c 20 69 6e           fill in
ad50: 20 74 68 65 20 63 61 70 74 63 68 61 20 70 61 73   the captcha pas
ad60: 73 77 6f 72 64 2e 20 20 44 65 66 61 75 6c 74 3a  sword.  Default:
ad70: 20 6f 6e 0a 2a 2a 0a 2a 2a 20 20 20 20 61 75 74   on.**.**    aut
ad80: 6f 2d 73 68 75 6e 20 20 20 20 20 20 20 20 49 66  o-shun        If
ad90: 20 65 6e 61 62 6c 65 64 2c 20 61 75 74 6f 6d 61   enabled, automa
ada0: 74 69 63 61 6c 6c 79 20 70 75 6c 6c 20 74 68 65  tically pull the
adb0: 20 73 68 75 6e 6e 69 6e 67 20 6c 69 73 74 0a 2a   shunning list.*
adc0: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  *               
add0: 20 20 20 20 20 20 66 72 6f 6d 20 61 20 73 65 72        from a ser
ade0: 76 65 72 20 74 6f 20 77 68 69 63 68 20 74 68 65  ver to which the
adf0: 20 63 6c 69 65 6e 74 20 61 75 74 6f 73 79 6e 63   client autosync
ae00: 73 2e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20  s..**           
ae10: 20 20 20 20 20 20 20 20 20 20 44 65 66 61 75 6c            Defaul
ae20: 74 3a 20 6f 6e 0a 2a 2a 0a 2a 2a 20 20 20 20 61  t: on.**.**    a
ae30: 75 74 6f 73 79 6e 63 20 20 20 20 20 20 20 20 20  utosync         
ae40: 49 66 20 65 6e 61 62 6c 65 64 2c 20 61 75 74 6f  If enabled, auto
ae50: 6d 61 74 69 63 61 6c 6c 79 20 70 75 6c 6c 20 70  matically pull p
ae60: 72 69 6f 72 20 74 6f 20 63 6f 6d 6d 69 74 0a 2a  rior to commit.*
ae70: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  *               
ae80: 20 20 20 20 20 20 6f 72 20 75 70 64 61 74 65 20        or update 
ae90: 61 6e 64 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c  and automaticall
aea0: 79 20 70 75 73 68 20 61 66 74 65 72 20 63 6f 6d  y push after com
aeb0: 6d 69 74 20 6f 72 0a 2a 2a 20 20 20 20 20 20 20  mit or.**       
aec0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 61                ta
aed0: 67 20 6f 72 20 62 72 61 6e 63 68 20 63 72 65 61  g or branch crea
aee0: 74 69 6f 6e 2e 20 20 49 66 20 74 68 65 20 76 61  tion.  If the va
aef0: 6c 75 65 20 69 73 20 22 70 75 6c 6c 6f 6e 6c 79  lue is "pullonly
af00: 22 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20  ".**            
af10: 20 20 20 20 20 20 20 20 20 74 68 65 6e 20 6f 6e           then on
af20: 6c 79 20 70 75 6c 6c 20 6f 70 65 72 61 74 69 6f  ly pull operatio
af30: 6e 73 20 6f 63 63 75 72 20 61 75 74 6f 6d 61 74  ns occur automat
af40: 69 63 61 6c 6c 79 2e 0a 2a 2a 20 20 20 20 20 20  ically..**      
af50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44                 D
af60: 65 66 61 75 6c 74 3a 20 6f 6e 0a 2a 2a 0a 2a 2a  efault: on.**.**
af70: 20 20 20 20 62 69 6e 61 72 79 2d 67 6c 6f 62 20      binary-glob 
af80: 20 20 20 20 20 54 68 65 20 56 41 4c 55 45 20 69       The VALUE i
af90: 73 20 61 20 63 6f 6d 6d 61 2d 73 65 70 61 72 61  s a comma-separa
afa0: 74 65 64 20 6c 69 73 74 20 6f 66 20 47 4c 4f 42  ted list of GLOB
afb0: 20 70 61 74 74 65 72 6e 73 0a 2a 2a 20 20 20 20   patterns.**    
afc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
afd0: 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 20   that should be 
afe0: 74 72 65 61 74 65 64 20 61 73 20 62 69 6e 61 72  treated as binar
aff0: 79 20 66 69 6c 65 73 20 66 6f 72 20 6d 65 72 67  y files for merg
b000: 69 6e 67 0a 2a 2a 20 20 20 20 20 20 20 20 20 20  ing.**          
b010: 20 20 20 20 20 20 20 20 20 20 20 70 75 72 70 6f             purpo
b020: 73 65 73 2e 20 20 45 78 61 6d 70 6c 65 3a 20 20  ses.  Example:  
b030: 20 2a 2e 78 6d 6c 0a 2a 2a 0a 2a 2a 20 20 20 20   *.xml.**.**    
b040: 63 6c 65 61 72 73 69 67 6e 20 20 20 20 20 20 20  clearsign       
b050: 20 57 68 65 6e 20 65 6e 61 62 6c 65 64 2c 20 66   When enabled, f
b060: 6f 73 73 69 6c 20 77 69 6c 6c 20 61 74 74 65 6d  ossil will attem
b070: 70 74 20 74 6f 20 73 69 67 6e 20 61 6c 6c 20 63  pt to sign all c
b080: 6f 6d 6d 69 74 73 0a 2a 2a 20 20 20 20 20 20 20  ommits.**       
b090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 69                wi
b0a0: 74 68 20 67 70 67 2e 20 20 57 68 65 6e 20 64 69  th gpg.  When di
b0b0: 73 61 62 6c 65 64 20 28 74 68 65 20 64 65 66 61  sabled (the defa
b0c0: 75 6c 74 29 2c 20 63 6f 6d 6d 69 74 73 20 77 69  ult), commits wi
b0d0: 6c 6c 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20  ll.**           
b0e0: 20 20 20 20 20 20 20 20 20 20 62 65 20 75 6e 73            be uns
b0f0: 69 67 6e 65 64 2e 20 20 44 65 66 61 75 6c 74 3a  igned.  Default:
b100: 20 6f 66 66 0a 2a 2a 0a 2a 2a 20 20 20 20 64 69   off.**.**    di
b110: 66 66 2d 63 6f 6d 6d 61 6e 64 20 20 20 20 20 45  ff-command     E
b120: 78 74 65 72 6e 61 6c 20 63 6f 6d 6d 61 6e 64 20  xternal command 
b130: 74 6f 20 72 75 6e 20 77 68 65 6e 20 70 65 72 66  to run when perf
b140: 6f 72 6d 69 6e 67 20 61 20 64 69 66 66 2e 0a 2a  orming a diff..*
b150: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  *               
b160: 20 20 20 20 20 20 49 66 20 75 6e 64 65 66 69 6e        If undefin
b170: 65 64 2c 20 74 68 65 20 69 6e 74 65 72 6e 61 6c  ed, the internal
b180: 20 74 65 78 74 20 64 69 66 66 20 77 69 6c 6c 20   text diff will 
b190: 62 65 20 75 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 20  be used..**.**  
b1a0: 20 20 64 6f 6e 74 2d 70 75 73 68 20 20 20 20 20    dont-push     
b1b0: 20 20 20 50 72 65 76 65 6e 74 20 74 68 69 73 20     Prevent this 
b1c0: 72 65 70 6f 73 69 74 6f 72 79 20 66 72 6f 6d 20  repository from 
b1d0: 70 75 73 68 69 6e 67 20 66 72 6f 6d 20 63 6c 69  pushing from cli
b1e0: 65 6e 74 20 74 6f 0a 2a 2a 20 20 20 20 20 20 20  ent to.**       
b1f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 65                se
b200: 72 76 65 72 2e 20 20 55 73 65 66 75 6c 20 77 68  rver.  Useful wh
b210: 65 6e 20 73 65 74 74 69 6e 67 20 75 70 20 61 20  en setting up a 
b220: 70 72 69 76 61 74 65 20 62 72 61 6e 63 68 2e 0a  private branch..
b230: 2a 2a 0a 2a 2a 20 20 20 20 65 64 69 74 6f 72 20  **.**    editor 
b240: 20 20 20 20 20 20 20 20 20 20 54 65 78 74 20 65            Text e
b250: 64 69 74 6f 72 20 63 6f 6d 6d 61 6e 64 20 75 73  ditor command us
b260: 65 64 20 66 6f 72 20 63 68 65 63 6b 2d 69 6e 20  ed for check-in 
b270: 63 6f 6d 6d 65 6e 74 73 2e 0a 2a 2a 0a 2a 2a 20  comments..**.** 
b280: 20 20 20 67 64 69 66 66 2d 63 6f 6d 6d 61 6e 64     gdiff-command
b290: 20 20 20 20 45 78 74 65 72 6e 61 6c 20 63 6f 6d      External com
b2a0: 6d 61 6e 64 20 74 6f 20 72 75 6e 20 77 68 65 6e  mand to run when
b2b0: 20 70 65 72 66 6f 72 6d 69 6e 67 20 61 20 67 72   performing a gr
b2c0: 61 70 68 69 63 61 6c 0a 2a 2a 20 20 20 20 20 20  aphical.**      
b2d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64                 d
b2e0: 69 66 66 2e 20 49 66 20 75 6e 64 65 66 69 6e 65  iff. If undefine
b2f0: 64 2c 20 74 65 78 74 20 64 69 66 66 20 77 69 6c  d, text diff wil
b300: 6c 20 62 65 20 75 73 65 64 2e 0a 2a 2a 0a 2a 2a  l be used..**.**
b310: 20 20 20 20 68 74 74 70 2d 70 6f 72 74 20 20 20      http-port   
b320: 20 20 20 20 20 54 68 65 20 54 43 50 2f 49 50 20       The TCP/IP 
b330: 70 6f 72 74 20 6e 75 6d 62 65 72 20 74 6f 20 75  port number to u
b340: 73 65 20 62 79 20 74 68 65 20 22 73 65 72 76 65  se by the "serve
b350: 72 22 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20  r".**           
b360: 20 20 20 20 20 20 20 20 20 20 61 6e 64 20 22 75            and "u
b370: 69 22 20 63 6f 6d 6d 61 6e 64 73 2e 20 20 44 65  i" commands.  De
b380: 66 61 75 6c 74 3a 20 38 30 38 30 0a 2a 2a 0a 2a  fault: 8080.**.*
b390: 2a 20 20 20 20 69 67 6e 6f 72 65 2d 67 6c 6f 62  *    ignore-glob
b3a0: 20 20 20 20 20 20 54 68 65 20 56 41 4c 55 45 20        The VALUE 
b3b0: 69 73 20 61 20 63 6f 6d 6d 61 2d 73 65 70 61 72  is a comma-separ
b3c0: 61 74 65 64 20 6c 69 73 74 20 6f 66 20 47 4c 4f  ated list of GLO
b3d0: 42 20 70 61 74 74 65 72 6e 73 0a 2a 2a 20 20 20  B patterns.**   
b3e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b3f0: 20 20 73 70 65 63 69 66 79 69 6e 67 20 66 69 6c    specifying fil
b400: 65 73 20 74 68 61 74 20 74 68 65 20 22 65 78 74  es that the "ext
b410: 72 61 22 20 63 6f 6d 6d 61 6e 64 20 77 69 6c 6c  ra" command will
b420: 20 69 67 6e 6f 72 65 2e 0a 2a 2a 20 20 20 20 20   ignore..**     
b430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b440: 45 78 61 6d 70 6c 65 3a 20 20 2a 2e 6f 2c 2a 2e  Example:  *.o,*.
b450: 6f 62 6a 2c 2a 2e 65 78 65 0a 2a 2a 0a 2a 2a 20  obj,*.exe.**.** 
b460: 20 20 20 6c 6f 63 61 6c 61 75 74 68 20 20 20 20     localauth    
b470: 20 20 20 20 49 66 20 65 6e 61 62 6c 65 64 2c 20      If enabled, 
b480: 72 65 71 75 69 72 65 20 74 68 61 74 20 48 54 54  require that HTT
b490: 50 20 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 66 72  P connections fr
b4a0: 6f 6d 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20  om.**           
b4b0: 20 20 20 20 20 20 20 20 20 20 31 32 37 2e 30 2e            127.0.
b4c0: 30 2e 31 20 62 65 20 61 75 74 68 65 6e 74 69 63  0.1 be authentic
b4d0: 61 74 65 64 20 62 79 20 70 61 73 73 77 6f 72 64  ated by password
b4e0: 2e 20 20 49 66 0a 2a 2a 20 20 20 20 20 20 20 20  .  If.**        
b4f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 66 61 6c               fal
b500: 73 65 2c 20 61 6c 6c 20 48 54 54 50 20 72 65 71  se, all HTTP req
b510: 75 65 73 74 73 20 66 72 6f 6d 20 6c 6f 63 61 6c  uests from local
b520: 68 6f 73 74 20 68 61 76 65 0a 2a 2a 20 20 20 20  host have.**    
b530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b540: 20 75 6e 72 65 73 74 72 69 63 74 65 64 20 61 63   unrestricted ac
b550: 63 65 73 73 20 74 6f 20 74 68 65 20 72 65 70 6f  cess to the repo
b560: 73 69 74 6f 72 79 2e 0a 2a 2a 0a 2a 2a 20 20 20  sitory..**.**   
b570: 20 6d 61 6e 69 66 65 73 74 20 20 20 20 20 20 20   manifest       
b580: 20 20 49 66 20 65 6e 61 62 6c 65 64 2c 20 61 75    If enabled, au
b590: 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 72 65 61  tomatically crea
b5a0: 74 65 20 66 69 6c 65 73 20 22 6d 61 6e 69 66 65  te files "manife
b5b0: 73 74 22 20 61 6e 64 0a 2a 2a 20 20 20 20 20 20  st" and.**      
b5c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22                 "
b5d0: 6d 61 6e 69 66 65 73 74 2e 75 75 69 64 22 20 69  manifest.uuid" i
b5e0: 6e 20 65 76 65 72 79 20 63 68 65 63 6b 6f 75 74  n every checkout
b5f0: 2e 20 20 54 68 65 20 53 51 4c 69 74 65 20 61 6e  .  The SQLite an
b600: 64 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20  d.**            
b610: 20 20 20 20 20 20 20 20 20 46 6f 73 73 69 6c 20           Fossil 
b620: 72 65 70 6f 73 69 74 6f 72 69 65 73 20 62 6f 74  repositories bot
b630: 68 20 72 65 71 75 69 72 65 20 74 68 69 73 2e 20  h require this. 
b640: 20 44 65 66 61 75 6c 74 3a 20 6f 66 66 2e 0a 2a   Default: off..*
b650: 2a 0a 2a 2a 20 20 20 20 6d 74 69 6d 65 2d 63 68  *.**    mtime-ch
b660: 61 6e 67 65 73 20 20 20 20 55 73 65 20 66 69 6c  anges    Use fil
b670: 65 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74  e modification t
b680: 69 6d 65 73 20 28 6d 74 69 6d 65 73 29 20 74 6f  imes (mtimes) to
b690: 20 64 65 74 65 63 74 20 77 68 65 6e 0a 2a 2a 20   detect when.** 
b6a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b6b0: 20 20 20 20 66 69 6c 65 73 20 68 61 76 65 20 62      files have b
b6c0: 65 65 6e 20 6d 6f 64 69 66 69 65 64 2e 20 20 28  een modified.  (
b6d0: 44 65 66 61 75 6c 74 20 22 6f 6e 22 2e 29 0a 2a  Default "on".).*
b6e0: 2a 0a 2a 2a 20 20 20 20 70 67 70 2d 63 6f 6d 6d  *.**    pgp-comm
b6f0: 61 6e 64 20 20 20 20 20 20 43 6f 6d 6d 61 6e 64  and      Command
b700: 20 75 73 65 64 20 74 6f 20 63 6c 65 61 72 2d 73   used to clear-s
b710: 69 67 6e 20 6d 61 6e 69 66 65 73 74 73 20 61 74  ign manifests at
b720: 20 63 68 65 63 6b 2d 69 6e 2e 0a 2a 2a 20 20 20   check-in..**   
b730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b740: 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 69 73    The default is
b750: 20 22 67 70 67 20 2d 2d 63 6c 65 61 72 73 69 67   "gpg --clearsig
b760: 6e 20 2d 6f 20 22 2e 0a 2a 2a 0a 2a 2a 20 20 20  n -o "..**.**   
b770: 20 70 72 6f 78 79 20 20 20 20 20 20 20 20 20 20   proxy          
b780: 20 20 55 52 4c 20 6f 66 20 74 68 65 20 48 54 54    URL of the HTT
b790: 50 20 70 72 6f 78 79 2e 20 20 49 66 20 75 6e 64  P proxy.  If und
b7a0: 65 66 69 6e 65 64 20 6f 72 20 22 6f 66 66 22 20  efined or "off" 
b7b0: 74 68 65 6e 0a 2a 2a 20 20 20 20 20 20 20 20 20  then.**         
b7c0: 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20              the 
b7d0: 22 68 74 74 70 5f 70 72 6f 78 79 22 20 65 6e 76  "http_proxy" env
b7e0: 69 72 6f 6e 6d 65 6e 74 20 76 61 72 69 61 62 6c  ironment variabl
b7f0: 65 20 69 73 20 63 6f 6e 73 75 6c 74 65 64 2e 0a  e is consulted..
b800: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  **              
b810: 20 20 20 20 20 20 20 49 66 20 74 68 65 20 68 74         If the ht
b820: 74 70 5f 70 72 6f 78 79 20 65 6e 76 69 72 6f 6e  tp_proxy environ
b830: 6d 65 6e 74 20 76 61 72 69 61 62 6c 65 20 69 73  ment variable is
b840: 20 75 6e 64 65 66 69 6e 65 64 0a 2a 2a 20 20 20   undefined.**   
b850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b860: 20 20 74 68 65 6e 20 61 20 64 69 72 65 63 74 20    then a direct 
b870: 48 54 54 50 20 63 6f 6e 6e 65 63 74 69 6f 6e 20  HTTP connection 
b880: 69 73 20 75 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 20  is used..**.**  
b890: 20 20 72 65 70 6f 2d 63 6b 73 75 6d 20 20 20 20    repo-cksum    
b8a0: 20 20 20 43 6f 6d 70 75 74 65 20 63 68 65 63 6b     Compute check
b8b0: 73 75 6d 73 20 6f 76 65 72 20 61 6c 6c 20 66 69  sums over all fi
b8c0: 6c 65 73 20 69 6e 20 65 61 63 68 20 63 68 65 63  les in each chec
b8d0: 6b 6f 75 74 0a 2a 2a 20 20 20 20 20 20 20 20 20  kout.**         
b8e0: 20 20 20 20 20 20 20 20 20 20 20 20 61 73 20 61              as a
b8f0: 20 64 6f 75 62 6c 65 2d 63 68 65 63 6b 20 6f 66   double-check of
b900: 20 63 6f 72 72 65 63 74 6e 65 73 73 2e 20 20 44   correctness.  D
b910: 65 66 61 75 6c 74 73 20 74 6f 20 22 6f 6e 22 2e  efaults to "on".
b920: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20  .**             
b930: 20 20 20 20 20 20 20 20 44 69 73 61 62 6c 65 20          Disable 
b940: 6f 6e 20 6c 61 72 67 65 20 72 65 70 6f 73 69 74  on large reposit
b950: 6f 72 69 65 73 20 66 6f 72 20 61 20 70 65 72 66  ories for a perf
b960: 6f 72 6d 61 6e 63 65 0a 2a 2a 20 20 20 20 20 20  ormance.**      
b970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69                 i
b980: 6d 70 72 6f 76 65 6d 65 6e 74 2e 0a 2a 2a 0a 2a  mprovement..**.*
b990: 2a 20 20 20 20 73 73 68 2d 63 6f 6d 6d 61 6e 64  *    ssh-command
b9a0: 20 20 20 20 20 20 43 6f 6d 6d 61 6e 64 20 75 73        Command us
b9b0: 65 64 20 74 6f 20 74 61 6c 6b 20 74 6f 20 61 20  ed to talk to a 
b9c0: 72 65 6d 6f 74 65 20 6d 61 63 68 69 6e 65 20 77  remote machine w
b9d0: 69 74 68 0a 2a 2a 20 20 20 20 20 20 20 20 20 20  ith.**          
b9e0: 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20 22             the "
b9f0: 73 73 68 3a 2f 2f 22 20 70 72 6f 74 6f 63 6f 6c  ssh://" protocol
ba00: 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 77 65 62 2d 62  ..**.**    web-b
ba10: 72 6f 77 73 65 72 20 20 20 20 20 20 41 20 73 68  rowser      A sh
ba20: 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 75 73 65 64  ell command used
ba30: 20 74 6f 20 6c 61 75 6e 63 68 20 79 6f 75 72 20   to launch your 
ba40: 70 72 65 66 65 72 72 65 64 0a 2a 2a 20 20 20 20  preferred.**    
ba50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ba60: 20 77 65 62 20 62 72 6f 77 73 65 72 20 77 68 65   web browser whe
ba70: 6e 20 67 69 76 65 6e 20 61 20 55 52 4c 20 61 73  n given a URL as
ba80: 20 61 6e 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2a   an argument..**
ba90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
baa0: 20 20 20 20 20 44 65 66 61 75 6c 74 73 20 74 6f       Defaults to
bab0: 20 22 73 74 61 72 74 22 20 6f 6e 20 77 69 6e 64   "start" on wind
bac0: 6f 77 73 2c 20 22 6f 70 65 6e 22 20 6f 6e 20 4d  ows, "open" on M
bad0: 61 63 2c 0a 2a 2a 20 20 20 20 20 20 20 20 20 20  ac,.**          
bae0: 20 20 20 20 20 20 20 20 20 20 20 61 6e 64 20 22             and "
baf0: 66 69 72 65 66 6f 78 22 20 6f 6e 20 55 6e 69 78  firefox" on Unix
bb00: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 74 69 6e  ..*/.void settin
bb10: 67 5f 63 6d 64 28 76 6f 69 64 29 7b 0a 20 20 69  g_cmd(void){.  i
bb20: 6e 74 20 69 3b 0a 20 20 69 6e 74 20 67 6c 6f 62  nt i;.  int glob
bb30: 61 6c 46 6c 61 67 20 3d 20 66 69 6e 64 5f 6f 70  alFlag = find_op
bb40: 74 69 6f 6e 28 22 67 6c 6f 62 61 6c 22 2c 22 67  tion("global","g
bb50: 22 2c 30 29 21 3d 30 3b 0a 20 20 69 6e 74 20 75  ",0)!=0;.  int u
bb60: 6e 73 65 74 46 6c 61 67 20 3d 20 67 2e 61 72 67  nsetFlag = g.arg
bb70: 76 5b 31 5d 5b 30 5d 3d 3d 27 75 27 3b 0a 20 20  v[1][0]=='u';.  
bb80: 64 62 5f 6f 70 65 6e 5f 63 6f 6e 66 69 67 28 31  db_open_config(1
bb90: 29 3b 0a 20 20 64 62 5f 66 69 6e 64 5f 61 6e 64  );.  db_find_and
bba0: 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 74 6f 72 79  _open_repository
bbb0: 28 30 29 3b 0a 20 20 69 66 28 20 21 67 2e 72 65  (0);.  if( !g.re
bbc0: 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a  positoryOpen ){.
bbd0: 20 20 20 20 67 6c 6f 62 61 6c 46 6c 61 67 20 3d      globalFlag =
bbe0: 20 31 3b 0a 20 20 7d 0a 20 20 69 66 28 20 75 6e   1;.  }.  if( un
bbf0: 73 65 74 46 6c 61 67 20 26 26 20 67 2e 61 72 67  setFlag && g.arg
bc00: 63 21 3d 33 20 29 7b 0a 20 20 20 20 75 73 61 67  c!=3 ){.    usag
bc10: 65 28 22 50 52 4f 50 45 52 54 59 20 3f 2d 67 6c  e("PROPERTY ?-gl
bc20: 6f 62 61 6c 3f 22 29 3b 0a 20 20 7d 0a 20 20 69  obal?");.  }.  i
bc30: 66 28 20 67 2e 61 72 67 63 3d 3d 32 20 29 7b 0a  f( g.argc==2 ){.
bc40: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 63 74 72      for(i=0; ctr
bc50: 6c 53 65 74 74 69 6e 67 73 5b 69 5d 2e 6e 61 6d  lSettings[i].nam
bc60: 65 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 70  e; i++){.      p
bc70: 72 69 6e 74 5f 73 65 74 74 69 6e 67 28 63 74 72  rint_setting(ctr
bc80: 6c 53 65 74 74 69 6e 67 73 5b 69 5d 2e 6e 61 6d  lSettings[i].nam
bc90: 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73  e);.    }.  }els
bca0: 65 20 69 66 28 20 67 2e 61 72 67 63 3d 3d 33 20  e if( g.argc==3 
bcb0: 7c 7c 20 67 2e 61 72 67 63 3d 3d 34 20 29 7b 0a  || g.argc==4 ){.
bcc0: 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a      const char *
bcd0: 7a 4e 61 6d 65 20 3d 20 67 2e 61 72 67 76 5b 32  zName = g.argv[2
bce0: 5d 3b 0a 20 20 20 20 69 6e 74 20 69 73 4d 61 6e  ];.    int isMan
bcf0: 69 66 65 73 74 3b 0a 20 20 20 20 69 6e 74 20 6e  ifest;.    int n
bd00: 20 3d 20 73 74 72 6c 65 6e 28 7a 4e 61 6d 65 29   = strlen(zName)
bd10: 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 63  ;.    for(i=0; c
bd20: 74 72 6c 53 65 74 74 69 6e 67 73 5b 69 5d 2e 6e  trlSettings[i].n
bd30: 61 6d 65 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20  ame; i++){.     
bd40: 20 69 66 28 20 73 74 72 6e 63 6d 70 28 63 74 72   if( strncmp(ctr
bd50: 6c 53 65 74 74 69 6e 67 73 5b 69 5d 2e 6e 61 6d  lSettings[i].nam
bd60: 65 2c 20 7a 4e 61 6d 65 2c 20 6e 29 3d 3d 30 20  e, zName, n)==0 
bd70: 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20  ) break;.    }. 
bd80: 20 20 20 69 66 28 20 21 63 74 72 6c 53 65 74 74     if( !ctrlSett
bd90: 69 6e 67 73 5b 69 5d 2e 6e 61 6d 65 20 29 7b 0a  ings[i].name ){.
bda0: 20 20 20 20 20 20 66 6f 73 73 69 6c 5f 66 61 74        fossil_fat
bdb0: 61 6c 28 22 6e 6f 20 73 75 63 68 20 73 65 74 74  al("no such sett
bdc0: 69 6e 67 3a 20 25 73 22 2c 20 7a 4e 61 6d 65 29  ing: %s", zName)
bdd0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 73 4d 61  ;.    }.    isMa
bde0: 6e 69 66 65 73 74 20 3d 20 73 74 72 63 6d 70 28  nifest = strcmp(
bdf0: 63 74 72 6c 53 65 74 74 69 6e 67 73 5b 69 5d 2e  ctrlSettings[i].
be00: 6e 61 6d 65 2c 20 22 6d 61 6e 69 66 65 73 74 22  name, "manifest"
be10: 29 3d 3d 30 3b 0a 20 20 20 20 69 66 28 20 69 73  )==0;.    if( is
be20: 4d 61 6e 69 66 65 73 74 20 26 26 20 67 6c 6f 62  Manifest && glob
be30: 61 6c 46 6c 61 67 20 29 7b 0a 20 20 20 20 20 20  alFlag ){.      
be40: 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22 63 61  fossil_fatal("ca
be50: 6e 6e 6f 74 20 73 65 74 20 27 6d 61 6e 69 66 65  nnot set 'manife
be60: 73 74 27 20 67 6c 6f 62 61 6c 6c 79 22 29 3b 0a  st' globally");.
be70: 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 75 6e      }.    if( un
be80: 73 65 74 46 6c 61 67 20 29 7b 0a 20 20 20 20 20  setFlag ){.     
be90: 20 64 62 5f 75 6e 73 65 74 28 63 74 72 6c 53 65   db_unset(ctrlSe
bea0: 74 74 69 6e 67 73 5b 69 5d 2e 6e 61 6d 65 2c 20  ttings[i].name, 
beb0: 67 6c 6f 62 61 6c 46 6c 61 67 29 3b 0a 20 20 20  globalFlag);.   
bec0: 20 7d 65 6c 73 65 20 69 66 28 20 67 2e 61 72 67   }else if( g.arg
bed0: 63 3d 3d 34 20 29 7b 0a 20 20 20 20 20 20 64 62  c==4 ){.      db
bee0: 5f 73 65 74 28 63 74 72 6c 53 65 74 74 69 6e 67  _set(ctrlSetting
bef0: 73 5b 69 5d 2e 6e 61 6d 65 2c 20 67 2e 61 72 67  s[i].name, g.arg
bf00: 76 5b 33 5d 2c 20 67 6c 6f 62 61 6c 46 6c 61 67  v[3], globalFlag
bf10: 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  );.    }else{.  
bf20: 20 20 20 20 69 73 4d 61 6e 69 66 65 73 74 20 3d      isManifest =
bf30: 20 30 3b 0a 20 20 20 20 20 20 70 72 69 6e 74 5f   0;.      print_
bf40: 73 65 74 74 69 6e 67 28 63 74 72 6c 53 65 74 74  setting(ctrlSett
bf50: 69 6e 67 73 5b 69 5d 2e 6e 61 6d 65 29 3b 0a 20  ings[i].name);. 
bf60: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 69 73 4d     }.    if( isM
bf70: 61 6e 69 66 65 73 74 20 29 7b 0a 20 20 20 20 20  anifest ){.     
bf80: 20 6d 61 6e 69 66 65 73 74 5f 74 6f 5f 64 69 73   manifest_to_dis
bf90: 6b 28 64 62 5f 6c 67 65 74 5f 69 6e 74 28 22 63  k(db_lget_int("c
bfa0: 68 65 63 6b 6f 75 74 22 2c 20 30 29 29 3b 0a 20  heckout", 0));. 
bfb0: 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20     }.  }else{.  
bfc0: 20 20 75 73 61 67 65 28 22 3f 50 52 4f 50 45 52    usage("?PROPER
bfd0: 54 59 3f 20 3f 56 41 4c 55 45 3f 22 29 3b 0a 20  TY? ?VALUE?");. 
bfe0: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20   }.}../*.** The 
bff0: 69 6e 70 75 74 20 69 6e 20 61 20 61 20 74 69 6d  input in a a tim
c000: 65 73 70 61 6e 20 6d 65 61 73 75 72 65 64 20 69  espan measured i
c010: 6e 20 64 61 79 73 2e 20 20 52 65 74 75 72 6e 20  n days.  Return 
c020: 61 20 73 74 72 69 6e 67 20 77 68 69 63 68 0a 2a  a string which.*
c030: 2a 20 64 65 73 63 72 69 62 65 73 20 74 68 61 74  * describes that
c040: 20 74 69 6d 65 73 70 61 6e 20 69 6e 20 75 6e 69   timespan in uni
c050: 74 73 20 6f 66 20 73 65 63 6f 6e 64 73 2c 20 6d  ts of seconds, m
c060: 69 6e 75 74 65 73 2c 20 68 6f 75 72 73 2c 20 64  inutes, hours, d
c070: 61 79 73 2c 0a 2a 2a 20 6f 72 20 79 65 61 72 73  ays,.** or years
c080: 2c 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 69  , depending on i
c090: 74 73 20 64 75 72 61 74 69 6f 6e 2e 0a 2a 2f 0a  ts duration..*/.
c0a0: 63 68 61 72 20 2a 64 62 5f 74 69 6d 65 73 70 61  char *db_timespa
c0b0: 6e 5f 6e 61 6d 65 28 64 6f 75 62 6c 65 20 72 53  n_name(double rS
c0c0: 70 61 6e 29 7b 0a 20 20 69 66 28 20 72 53 70 61  pan){.  if( rSpa
c0d0: 6e 3c 30 20 29 20 72 53 70 61 6e 20 3d 20 2d 72  n<0 ) rSpan = -r
c0e0: 53 70 61 6e 3b 0a 20 20 72 53 70 61 6e 20 2a 3d  Span;.  rSpan *=
c0f0: 20 32 34 2e 30 2a 33 36 30 30 2e 30 3b 20 20 2f   24.0*3600.0;  /
c100: 2a 20 43 6f 6e 76 65 72 74 20 75 6e 69 74 73 20  * Convert units 
c110: 74 6f 20 73 65 63 6f 6e 64 73 20 2a 2f 0a 20 20  to seconds */.  
c120: 69 66 28 20 72 53 70 61 6e 3c 31 32 30 2e 30 20  if( rSpan<120.0 
c130: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 73 71  ){.    return sq
c140: 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22 25  lite3_mprintf("%
c150: 2e 31 66 20 73 65 63 6f 6e 64 73 22 2c 20 72 53  .1f seconds", rS
c160: 70 61 6e 29 3b 0a 20 20 7d 0a 20 20 72 53 70 61  pan);.  }.  rSpa
c170: 6e 20 2f 3d 20 36 30 2e 30 3b 20 20 20 20 20 20  n /= 60.0;      
c180: 20 20 20 2f 2a 20 43 6f 6e 76 65 72 74 20 75 6e     /* Convert un
c190: 69 74 73 20 74 6f 20 6d 69 6e 75 74 65 73 20 2a  its to minutes *
c1a0: 2f 0a 20 20 69 66 28 20 72 53 70 61 6e 3c 39 30  /.  if( rSpan<90
c1b0: 2e 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  .0 ){.    return
c1c0: 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66   sqlite3_mprintf
c1d0: 28 22 25 2e 31 66 20 6d 69 6e 75 74 65 73 22 2c  ("%.1f minutes",
c1e0: 20 72 53 70 61 6e 29 3b 0a 20 20 7d 0a 20 20 72   rSpan);.  }.  r
c1f0: 53 70 61 6e 20 2f 3d 20 36 30 2e 30 3b 20 20 20  Span /= 60.0;   
c200: 20 20 20 20 20 20 2f 2a 20 43 6f 6e 76 65 72 74        /* Convert
c210: 20 75 6e 69 74 73 20 74 6f 20 68 6f 75 72 73 20   units to hours 
c220: 2a 2f 0a 20 20 69 66 28 20 72 53 70 61 6e 3c 3d  */.  if( rSpan<=
c230: 34 38 2e 30 20 29 7b 0a 20 20 20 20 72 65 74 75  48.0 ){.    retu
c240: 72 6e 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e  rn sqlite3_mprin
c250: 74 66 28 22 25 2e 31 66 20 68 6f 75 72 73 22 2c  tf("%.1f hours",
c260: 20 72 53 70 61 6e 29 3b 0a 20 20 7d 0a 20 20 72   rSpan);.  }.  r
c270: 53 70 61 6e 20 2f 3d 20 32 34 2e 30 3b 20 20 20  Span /= 24.0;   
c280: 20 20 20 20 20 20 2f 2a 20 43 6f 6e 76 65 72 74        /* Convert
c290: 20 75 6e 69 74 73 20 74 6f 20 64 61 79 73 20 2a   units to days *
c2a0: 2f 0a 20 20 69 66 28 20 72 53 70 61 6e 3c 3d 33  /.  if( rSpan<=3
c2b0: 36 35 2e 30 20 29 7b 0a 20 20 20 20 72 65 74 75  65.0 ){.    retu
c2c0: 72 6e 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e  rn sqlite3_mprin
c2d0: 74 66 28 22 25 2e 31 66 20 64 61 79 73 22 2c 20  tf("%.1f days", 
c2e0: 72 53 70 61 6e 29 3b 0a 20 20 7d 0a 20 20 72 53  rSpan);.  }.  rS
c2f0: 70 61 6e 20 2f 3d 20 33 35 36 2e 32 34 3b 20 20  pan /= 356.24;  
c300: 20 20 20 20 20 20 20 2f 2a 20 43 6f 6e 76 65 72         /* Conver
c310: 74 20 75 6e 69 74 73 20 74 6f 20 79 65 61 72 73  t units to years
c320: 20 2a 2f 0a 20 20 72 65 74 75 72 6e 20 73 71 6c   */.  return sql
c330: 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22 25 2e  ite3_mprintf("%.
c340: 31 66 20 79 65 61 72 73 22 2c 20 72 53 70 61 6e  1f years", rSpan
c350: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d  );.}../*.** COMM
c360: 41 4e 44 3a 20 74 65 73 74 2d 74 69 6d 65 73 70  AND: test-timesp
c370: 61 6e 0a 2a 2a 20 25 66 6f 73 73 69 6c 20 74 65  an.** %fossil te
c380: 73 74 2d 74 69 6d 65 73 70 61 6e 20 54 49 4d 45  st-timespan TIME
c390: 53 54 41 4d 50 0a 2a 2a 0a 2a 2a 20 50 72 69 6e  STAMP.**.** Prin
c3a0: 74 20 74 68 65 20 61 70 70 72 6f 78 69 6d 61 74  t the approximat
c3b0: 65 20 73 70 61 6e 20 6f 66 20 74 69 6d 65 20 66  e span of time f
c3c0: 72 6f 6d 20 6e 6f 77 20 74 6f 20 54 49 4d 45 53  rom now to TIMES
c3d0: 54 41 4d 50 2e 0a 2a 2f 0a 76 6f 69 64 20 74 65  TAMP..*/.void te
c3e0: 73 74 5f 74 69 6d 65 73 70 61 6e 5f 63 6d 64 28  st_timespan_cmd(
c3f0: 76 6f 69 64 29 7b 0a 20 20 64 6f 75 62 6c 65 20  void){.  double 
c400: 72 44 69 66 66 3b 0a 20 20 69 66 28 20 67 2e 61  rDiff;.  if( g.a
c410: 72 67 63 21 3d 33 20 29 20 75 73 61 67 65 28 22  rgc!=3 ) usage("
c420: 54 49 4d 45 53 54 41 4d 50 22 29 3b 0a 20 20 73  TIMESTAMP");.  s
c430: 71 6c 69 74 65 33 5f 6f 70 65 6e 28 22 3a 6d 65  qlite3_open(":me
c440: 6d 6f 72 79 3a 22 2c 20 26 67 2e 64 62 29 3b 20  mory:", &g.db); 
c450: 20 0a 20 20 72 44 69 66 66 20 3d 20 64 62 5f 64   .  rDiff = db_d
c460: 6f 75 62 6c 65 28 30 2e 30 2c 20 22 53 45 4c 45  ouble(0.0, "SELE
c470: 43 54 20 6a 75 6c 69 61 6e 64 61 79 28 27 6e 6f  CT julianday('no
c480: 77 27 29 20 2d 20 6a 75 6c 69 61 6e 64 61 79 28  w') - julianday(
c490: 25 51 29 22 2c 20 67 2e 61 72 67 76 5b 32 5d 29  %Q)", g.argv[2])
c4a0: 3b 0a 20 20 70 72 69 6e 74 66 28 22 54 69 6d 65  ;.  printf("Time
c4b0: 20 64 69 66 66 65 72 65 6e 63 65 73 3a 20 25 73   differences: %s
c4c0: 5c 6e 22 2c 20 64 62 5f 74 69 6d 65 73 70 61 6e  \n", db_timespan
c4d0: 5f 6e 61 6d 65 28 72 44 69 66 66 29 29 3b 0a 20  _name(rDiff));. 
c4e0: 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 67   sqlite3_close(g
c4f0: 2e 64 62 29 3b 0a 20 20 67 2e 64 62 20 3d 20 30  .db);.  g.db = 0
c500: 3b 0a 7d 0a                                      ;.}.