/ Hex Artifact Content
Login

Artifact 4691e08e1fc114edd8e1875f88393718f70ba480:


0000: 2f 2a 0a 2a 2a 20 32 30 31 33 2d 30 34 2d 30 35  /*.** 2013-04-05
0010: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 68 6f  .**.** The autho
0020: 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79  r disclaims copy
0030: 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f  right to this so
0040: 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70  urce code.  In p
0050: 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c 65 67  lace of.** a leg
0060: 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20  al notice, here 
0070: 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 2a  is a blessing:.*
0080: 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f 75 20  *.**    May you 
0090: 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f 74 20  do good and not 
00a0: 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 79 20  evil..**    May 
00b0: 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 76 65  you find forgive
00c0: 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 65 6c  ness for yoursel
00d0: 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 6f 74  f and forgive ot
00e0: 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 79 20  hers..**    May 
00f0: 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 6c 79  you share freely
0100: 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 20 6d  , never taking m
0110: 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 69 76  ore than you giv
0120: 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  e..**.**********
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a  ***************.
0170: 2a 2a 20 0a 2a 2a 20 54 68 69 73 20 69 73 20 61  ** .** This is a
0180: 20 70 72 6f 67 72 61 6d 20 75 73 65 64 20 66 6f   program used fo
0190: 72 20 74 65 73 74 69 6e 67 20 53 51 4c 69 74 65  r testing SQLite
01a0: 2c 20 61 6e 64 20 73 70 65 63 69 66 69 63 61 6c  , and specifical
01b0: 6c 79 20 66 6f 72 20 74 65 73 74 69 6e 67 0a 2a  ly for testing.*
01c0: 2a 20 74 68 65 20 61 62 69 6c 69 74 79 20 6f 66  * the ability of
01d0: 20 69 6e 64 65 70 65 6e 64 65 6e 74 20 70 72 6f   independent pro
01e0: 63 65 73 73 65 73 20 74 6f 20 61 63 63 65 73 73  cesses to access
01f0: 20 74 68 65 20 73 61 6d 65 20 53 51 4c 69 74 65   the same SQLite
0200: 20 64 61 74 61 62 61 73 65 0a 2a 2a 20 63 6f 6e   database.** con
0210: 63 75 72 72 65 6e 74 6c 79 2e 0a 2a 2a 0a 2a 2a  currently..**.**
0220: 20 43 6f 6d 70 69 6c 65 20 74 68 69 73 20 70 72   Compile this pr
0230: 6f 67 72 61 6d 20 61 73 20 66 6f 6c 6c 6f 77 73  ogram as follows
0240: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 67 63 63 20 2d  :.**.**    gcc -
0250: 67 20 2d 63 20 2d 57 61 6c 6c 20 73 71 6c 69 74  g -c -Wall sqlit
0260: 65 33 2e 63 20 24 28 4f 50 54 53 29 0a 2a 2a 20  e3.c $(OPTS).** 
0270: 20 20 20 67 63 63 20 2d 67 20 2d 6f 20 6d 70 74     gcc -g -o mpt
0280: 65 73 74 20 6d 70 74 65 73 74 2e 63 20 73 71 6c  est mptest.c sql
0290: 69 74 65 33 2e 6f 20 24 28 4c 49 42 53 29 0a 2a  ite3.o $(LIBS).*
02a0: 2a 0a 2a 2a 20 52 65 63 6f 6d 6d 65 6e 64 65 64  *.** Recommended
02b0: 20 6f 70 74 69 6f 6e 73 3a 0a 2a 2a 0a 2a 2a 20   options:.**.** 
02c0: 20 20 20 2d 44 48 41 56 45 5f 55 53 4c 45 45 50     -DHAVE_USLEEP
02d0: 0a 2a 2a 20 20 20 20 2d 44 53 51 4c 49 54 45 5f  .**    -DSQLITE_
02e0: 4e 4f 5f 53 59 4e 43 0a 2a 2a 20 20 20 20 2d 44  NO_SYNC.**    -D
02f0: 53 51 4c 49 54 45 5f 54 48 52 45 41 44 53 41 46  SQLITE_THREADSAF
0300: 45 3d 30 0a 2a 2a 20 20 20 20 2d 44 53 51 4c 49  E=0.**    -DSQLI
0310: 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54  TE_OMIT_LOAD_EXT
0320: 45 4e 53 49 4f 4e 0a 2a 2a 0a 2a 2a 20 52 75 6e  ENSION.**.** Run
0330: 20 6c 69 6b 65 20 74 68 69 73 3a 0a 2a 2a 0a 2a   like this:.**.*
0340: 2a 20 20 20 20 20 2e 2f 6d 70 74 65 73 74 20 24  *     ./mptest $
0350: 64 61 74 61 62 61 73 65 20 24 73 63 72 69 70 74  database $script
0360: 0a 2a 2a 0a 2a 2a 20 77 68 65 72 65 20 24 64 61  .**.** where $da
0370: 74 61 62 61 73 65 20 69 73 20 74 68 65 20 64 61  tabase is the da
0380: 74 61 62 61 73 65 20 74 6f 20 75 73 65 20 66 6f  tabase to use fo
0390: 72 20 74 65 73 74 69 6e 67 20 61 6e 64 20 24 73  r testing and $s
03a0: 63 72 69 70 74 20 69 73 20 61 0a 2a 2a 20 74 65  cript is a.** te
03b0: 73 74 20 73 63 72 69 70 74 2e 0a 2a 2f 0a 23 69  st script..*/.#i
03c0: 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 33 2e  nclude "sqlite3.
03d0: 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64  h".#include <std
03e0: 69 6f 2e 68 3e 0a 23 69 66 20 64 65 66 69 6e 65  io.h>.#if define
03f0: 64 28 5f 57 49 4e 33 32 29 0a 23 20 64 65 66 69  d(_WIN32).# defi
0400: 6e 65 20 57 49 4e 33 32 5f 4c 45 41 4e 5f 41 4e  ne WIN32_LEAN_AN
0410: 44 5f 4d 45 41 4e 0a 23 20 69 6e 63 6c 75 64 65  D_MEAN.# include
0420: 20 3c 77 69 6e 64 6f 77 73 2e 68 3e 0a 23 65 6c   <windows.h>.#el
0430: 73 65 0a 23 20 69 6e 63 6c 75 64 65 20 3c 75 6e  se.# include <un
0440: 69 73 74 64 2e 68 3e 0a 23 65 6e 64 69 66 0a 23  istd.h>.#endif.#
0450: 69 6e 63 6c 75 64 65 20 3c 73 74 64 6c 69 62 2e  include <stdlib.
0460: 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 72  h>.#include <str
0470: 69 6e 67 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  ing.h>.#include 
0480: 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c  <assert.h>.#incl
0490: 75 64 65 20 3c 63 74 79 70 65 2e 68 3e 0a 0a 2f  ude <ctype.h>../
04a0: 2a 20 54 68 65 20 73 75 66 66 69 78 20 74 6f 20  * The suffix to 
04b0: 61 70 70 65 6e 64 20 74 6f 20 74 68 65 20 63 68  append to the ch
04c0: 69 6c 64 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65  ild command line
04d0: 73 2c 20 69 66 20 61 6e 79 20 2a 2f 0a 23 69 66  s, if any */.#if
04e0: 20 64 65 66 69 6e 65 64 28 5f 57 49 4e 33 32 29   defined(_WIN32)
04f0: 0a 23 20 64 65 66 69 6e 65 20 47 45 54 50 49 44  .# define GETPID
0500: 20 28 69 6e 74 29 47 65 74 43 75 72 72 65 6e 74   (int)GetCurrent
0510: 50 72 6f 63 65 73 73 49 64 0a 23 65 6c 73 65 0a  ProcessId.#else.
0520: 23 20 64 65 66 69 6e 65 20 47 45 54 50 49 44 20  # define GETPID 
0530: 67 65 74 70 69 64 0a 23 65 6e 64 69 66 0a 0a 2f  getpid.#endif../
0540: 2a 20 4d 61 72 6b 20 61 20 70 61 72 61 6d 65 74  * Mark a paramet
0550: 65 72 20 61 73 20 75 6e 75 73 65 64 20 74 6f 20  er as unused to 
0560: 73 75 70 70 72 65 73 73 20 63 6f 6d 70 69 6c 65  suppress compile
0570: 72 20 77 61 72 6e 69 6e 67 73 20 2a 2f 0a 23 64  r warnings */.#d
0580: 65 66 69 6e 65 20 55 4e 55 53 45 44 5f 50 41 52  efine UNUSED_PAR
0590: 41 4d 45 54 45 52 28 78 29 20 20 28 76 6f 69 64  AMETER(x)  (void
05a0: 29 78 0a 0a 2f 2a 20 47 6c 6f 62 61 6c 20 64 61  )x../* Global da
05b0: 74 61 0a 2a 2f 0a 73 74 61 74 69 63 20 73 74 72  ta.*/.static str
05c0: 75 63 74 20 47 6c 6f 62 61 6c 20 7b 0a 20 20 63  uct Global {.  c
05d0: 68 61 72 20 2a 61 72 67 76 30 3b 20 20 20 20 20  har *argv0;     
05e0: 20 20 20 20 20 20 2f 2a 20 4e 61 6d 65 20 6f 66        /* Name of
05f0: 20 74 68 65 20 65 78 65 63 75 74 61 62 6c 65 20   the executable 
0600: 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  */.  const char 
0610: 2a 7a 56 66 73 3b 20 20 20 20 20 20 2f 2a 20 4e  *zVfs;      /* N
0620: 61 6d 65 20 6f 66 20 56 46 53 20 74 6f 20 75 73  ame of VFS to us
0630: 65 2e 20 4f 66 74 65 6e 20 4e 55 4c 4c 20 6d 65  e. Often NULL me
0640: 61 6e 69 6e 67 20 22 64 65 66 61 75 6c 74 22 20  aning "default" 
0650: 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 44 62 46 69  */.  char *zDbFi
0660: 6c 65 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 4e  le;         /* N
0670: 61 6d 65 20 6f 66 20 74 68 65 20 64 61 74 61 62  ame of the datab
0680: 61 73 65 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33  ase */.  sqlite3
0690: 20 2a 64 62 3b 20 20 20 20 20 20 20 20 20 20 20   *db;           
06a0: 2f 2a 20 4f 70 65 6e 20 63 6f 6e 6e 65 63 74 69  /* Open connecti
06b0: 6f 6e 20 74 6f 20 64 61 74 61 62 61 73 65 20 2a  on to database *
06c0: 2f 0a 20 20 63 68 61 72 20 2a 7a 45 72 72 4c 6f  /.  char *zErrLo
06d0: 67 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 46 69  g;         /* Fi
06e0: 6c 65 6e 61 6d 65 20 66 6f 72 20 65 72 72 6f 72  lename for error
06f0: 20 6c 6f 67 20 2a 2f 0a 20 20 46 49 4c 45 20 2a   log */.  FILE *
0700: 70 45 72 72 4c 6f 67 3b 20 20 20 20 20 20 20 20  pErrLog;        
0710: 20 2f 2a 20 57 68 65 72 65 20 74 6f 20 77 72 69   /* Where to wri
0720: 74 65 20 65 72 72 6f 72 73 20 2a 2f 0a 20 20 63  te errors */.  c
0730: 68 61 72 20 2a 7a 4c 6f 67 3b 20 20 20 20 20 20  har *zLog;      
0740: 20 20 20 20 20 20 2f 2a 20 4e 61 6d 65 20 6f 66        /* Name of
0750: 20 6f 75 74 70 75 74 20 6c 6f 67 20 66 69 6c 65   output log file
0760: 20 2a 2f 0a 20 20 46 49 4c 45 20 2a 70 4c 6f 67   */.  FILE *pLog
0770: 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ;            /* 
0780: 57 68 65 72 65 20 74 6f 20 77 72 69 74 65 20 6c  Where to write l
0790: 6f 67 20 6d 65 73 73 61 67 65 73 20 2a 2f 0a 20  og messages */. 
07a0: 20 63 68 61 72 20 7a 4e 61 6d 65 5b 33 32 5d 3b   char zName[32];
07b0: 20 20 20 20 20 20 20 20 2f 2a 20 53 79 6d 62 6f          /* Symbo
07c0: 6c 69 63 20 6e 61 6d 65 20 6f 66 20 74 68 69 73  lic name of this
07d0: 20 70 72 6f 63 65 73 73 20 2a 2f 0a 20 20 69 6e   process */.  in
07e0: 74 20 74 61 73 6b 49 64 3b 20 20 20 20 20 20 20  t taskId;       
07f0: 20 20 20 20 20 2f 2a 20 54 61 73 6b 20 49 44 2e       /* Task ID.
0800: 20 20 30 20 6d 65 61 6e 73 20 73 75 70 65 72 76    0 means superv
0810: 69 73 6f 72 2e 20 2a 2f 0a 20 20 69 6e 74 20 69  isor. */.  int i
0820: 54 72 61 63 65 3b 20 20 20 20 20 20 20 20 20 20  Trace;          
0830: 20 20 2f 2a 20 54 72 61 63 69 6e 67 20 6c 65 76    /* Tracing lev
0840: 65 6c 20 2a 2f 0a 20 20 69 6e 74 20 62 53 71 6c  el */.  int bSql
0850: 54 72 61 63 65 3b 20 20 20 20 20 20 20 20 20 2f  Trace;         /
0860: 2a 20 54 72 75 65 20 74 6f 20 74 72 61 63 65 20  * True to trace 
0870: 53 51 4c 20 63 6f 6d 6d 61 6e 64 73 20 2a 2f 0a  SQL commands */.
0880: 20 20 69 6e 74 20 62 49 67 6e 6f 72 65 53 71 6c    int bIgnoreSql
0890: 45 72 72 6f 72 73 3b 20 20 2f 2a 20 49 67 6e 6f  Errors;  /* Igno
08a0: 72 65 20 65 72 72 6f 72 73 20 69 6e 20 53 51 4c  re errors in SQL
08b0: 20 73 74 61 74 65 6d 65 6e 74 73 20 2a 2f 0a 20   statements */. 
08c0: 20 69 6e 74 20 6e 45 72 72 6f 72 3b 20 20 20 20   int nError;    
08d0: 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65          /* Numbe
08e0: 72 20 6f 66 20 65 72 72 6f 72 73 20 2a 2f 0a 20  r of errors */. 
08f0: 20 69 6e 74 20 6e 54 65 73 74 3b 20 20 20 20 20   int nTest;     
0900: 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65          /* Numbe
0910: 72 20 6f 66 20 2d 2d 6d 61 74 63 68 20 6f 70 65  r of --match ope
0920: 72 61 74 6f 72 73 20 2a 2f 0a 20 20 69 6e 74 20  rators */.  int 
0930: 69 54 69 6d 65 6f 75 74 3b 20 20 20 20 20 20 20  iTimeout;       
0940: 20 20 20 2f 2a 20 4d 69 6c 6c 69 73 65 63 6f 6e     /* Millisecon
0950: 64 73 20 75 6e 74 69 6c 20 61 20 62 75 73 79 20  ds until a busy 
0960: 74 69 6d 65 6f 75 74 20 2a 2f 0a 20 20 69 6e 74  timeout */.  int
0970: 20 62 53 79 6e 63 3b 20 20 20 20 20 20 20 20 20   bSync;         
0980: 20 20 20 20 2f 2a 20 43 61 6c 6c 20 66 73 79 6e      /* Call fsyn
0990: 63 28 29 20 2a 2f 0a 7d 20 67 3b 0a 0a 2f 2a 20  c() */.} g;../* 
09a0: 44 65 66 61 75 6c 74 20 74 69 6d 65 6f 75 74 20  Default timeout 
09b0: 2a 2f 0a 23 64 65 66 69 6e 65 20 44 45 46 41 55  */.#define DEFAU
09c0: 4c 54 5f 54 49 4d 45 4f 55 54 20 31 30 30 30 30  LT_TIMEOUT 10000
09d0: 0a 0a 2f 2a 0a 2a 2a 20 50 72 69 6e 74 20 61 20  ../*.** Print a 
09e0: 6d 65 73 73 61 67 65 20 61 64 64 69 6e 67 20 7a  message adding z
09f0: 50 72 65 66 69 78 5b 5d 20 74 6f 20 74 68 65 20  Prefix[] to the 
0a00: 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 65 76 65  beginning of eve
0a10: 72 79 20 6c 69 6e 65 2e 0a 2a 2f 0a 73 74 61 74  ry line..*/.stat
0a20: 69 63 20 76 6f 69 64 20 70 72 69 6e 74 57 69 74  ic void printWit
0a30: 68 50 72 65 66 69 78 28 46 49 4c 45 20 2a 70 4f  hPrefix(FILE *pO
0a40: 75 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ut, const char *
0a50: 7a 50 72 65 66 69 78 2c 20 63 6f 6e 73 74 20 63  zPrefix, const c
0a60: 68 61 72 20 2a 7a 4d 73 67 29 7b 0a 20 20 77 68  har *zMsg){.  wh
0a70: 69 6c 65 28 20 7a 4d 73 67 20 26 26 20 7a 4d 73  ile( zMsg && zMs
0a80: 67 5b 30 5d 20 29 7b 0a 20 20 20 20 69 6e 74 20  g[0] ){.    int 
0a90: 69 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20  i;.    for(i=0; 
0aa0: 7a 4d 73 67 5b 69 5d 20 26 26 20 7a 4d 73 67 5b  zMsg[i] && zMsg[
0ab0: 69 5d 21 3d 27 5c 6e 27 20 26 26 20 7a 4d 73 67  i]!='\n' && zMsg
0ac0: 5b 69 5d 21 3d 27 5c 72 27 3b 20 69 2b 2b 29 7b  [i]!='\r'; i++){
0ad0: 7d 0a 20 20 20 20 66 70 72 69 6e 74 66 28 70 4f  }.    fprintf(pO
0ae0: 75 74 2c 20 22 25 73 25 2e 2a 73 5c 6e 22 2c 20  ut, "%s%.*s\n", 
0af0: 7a 50 72 65 66 69 78 2c 20 69 2c 20 7a 4d 73 67  zPrefix, i, zMsg
0b00: 29 3b 0a 20 20 20 20 7a 4d 73 67 20 2b 3d 20 69  );.    zMsg += i
0b10: 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 7a 4d 73  ;.    while( zMs
0b20: 67 5b 30 5d 3d 3d 27 5c 6e 27 20 7c 7c 20 7a 4d  g[0]=='\n' || zM
0b30: 73 67 5b 30 5d 3d 3d 27 5c 72 27 20 29 20 7a 4d  sg[0]=='\r' ) zM
0b40: 73 67 2b 2b 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  sg++;.  }.}../*.
0b50: 2a 2a 20 43 6f 6d 70 61 72 65 20 74 77 6f 20 70  ** Compare two p
0b60: 6f 69 6e 74 65 72 73 20 74 6f 20 73 74 72 69 6e  ointers to strin
0b70: 67 73 2c 20 77 68 65 72 65 20 74 68 65 20 70 6f  gs, where the po
0b80: 69 6e 74 65 72 73 20 6d 69 67 68 74 20 62 65 20  inters might be 
0b90: 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  NULL..*/.static 
0ba0: 69 6e 74 20 73 61 66 65 5f 73 74 72 63 6d 70 28  int safe_strcmp(
0bb0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 2c 20 63  const char *a, c
0bc0: 6f 6e 73 74 20 63 68 61 72 20 2a 62 29 7b 0a 20  onst char *b){. 
0bd0: 20 69 66 28 20 61 3d 3d 62 20 29 20 72 65 74 75   if( a==b ) retu
0be0: 72 6e 20 30 3b 0a 20 20 69 66 28 20 61 3d 3d 30  rn 0;.  if( a==0
0bf0: 20 29 20 72 65 74 75 72 6e 20 2d 31 3b 0a 20 20   ) return -1;.  
0c00: 69 66 28 20 62 3d 3d 30 20 29 20 72 65 74 75 72  if( b==0 ) retur
0c10: 6e 20 31 3b 0a 20 20 72 65 74 75 72 6e 20 73 74  n 1;.  return st
0c20: 72 63 6d 70 28 61 2c 62 29 3b 0a 7d 0a 0a 2f 2a  rcmp(a,b);.}../*
0c30: 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55 45 20  .** Return TRUE 
0c40: 69 66 20 73 74 72 69 6e 67 20 7a 5b 5d 20 6d 61  if string z[] ma
0c50: 74 63 68 65 73 20 67 6c 6f 62 20 70 61 74 74 65  tches glob patte
0c60: 72 6e 20 7a 47 6c 6f 62 5b 5d 2e 0a 2a 2a 20 52  rn zGlob[]..** R
0c70: 65 74 75 72 6e 20 46 41 4c 53 45 20 69 66 20 74  eturn FALSE if t
0c80: 68 65 20 70 61 74 74 65 72 6e 20 64 6f 65 73 20  he pattern does 
0c90: 6e 6f 74 20 6d 61 74 63 68 2e 0a 2a 2a 0a 2a 2a  not match..**.**
0ca0: 20 47 6c 6f 62 62 69 6e 67 20 72 75 6c 65 73 3a   Globbing rules:
0cb0: 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 2a 27 20  .**.**      '*' 
0cc0: 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 61 6e        Matches an
0cd0: 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20 7a 65  y sequence of ze
0ce0: 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61 72 61  ro or more chara
0cf0: 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 20  cters..**.**    
0d00: 20 20 27 3f 27 20 20 20 20 20 20 20 4d 61 74 63    '?'       Matc
0d10: 68 65 73 20 65 78 61 63 74 6c 79 20 6f 6e 65 20  hes exactly one 
0d20: 63 68 61 72 61 63 74 65 72 2e 0a 2a 2a 0a 2a 2a  character..**.**
0d30: 20 20 20 20 20 5b 2e 2e 2e 5d 20 20 20 20 20 20       [...]      
0d40: 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68 61 72  Matches one char
0d50: 61 63 74 65 72 20 66 72 6f 6d 20 74 68 65 20 65  acter from the e
0d60: 6e 63 6c 6f 73 65 64 20 6c 69 73 74 20 6f 66 0a  nclosed list of.
0d70: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  **              
0d80: 20 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a 2a    characters..**
0d90: 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d 20 20  .**     [^...]  
0da0: 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63     Matches one c
0db0: 68 61 72 61 63 74 65 72 20 6e 6f 74 20 69 6e 20  haracter not in 
0dc0: 74 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69 73  the enclosed lis
0dd0: 74 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 23  t..**.**      '#
0de0: 27 20 20 20 20 20 20 20 4d 61 74 63 68 65 73 20  '       Matches 
0df0: 61 6e 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20  any sequence of 
0e00: 6f 6e 65 20 6f 72 20 6d 6f 72 65 20 64 69 67 69  one or more digi
0e10: 74 73 20 77 69 74 68 20 61 6e 0a 2a 2a 20 20 20  ts with an.**   
0e20: 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 70 74               opt
0e30: 69 6f 6e 61 6c 20 2b 20 6f 72 20 2d 20 73 69 67  ional + or - sig
0e40: 6e 20 69 6e 20 66 72 6f 6e 74 0a 2a 2f 0a 69 6e  n in front.*/.in
0e50: 74 20 73 74 72 67 6c 6f 62 28 63 6f 6e 73 74 20  t strglob(const 
0e60: 63 68 61 72 20 2a 7a 47 6c 6f 62 2c 20 63 6f 6e  char *zGlob, con
0e70: 73 74 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 69  st char *z){.  i
0e80: 6e 74 20 63 2c 20 63 32 3b 0a 20 20 69 6e 74 20  nt c, c2;.  int 
0e90: 69 6e 76 65 72 74 3b 0a 20 20 69 6e 74 20 73 65  invert;.  int se
0ea0: 65 6e 3b 0a 0a 20 20 77 68 69 6c 65 28 20 28 63  en;..  while( (c
0eb0: 20 3d 20 28 2a 28 7a 47 6c 6f 62 2b 2b 29 29 29   = (*(zGlob++)))
0ec0: 21 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 63  !=0 ){.    if( c
0ed0: 3d 3d 27 2a 27 20 29 7b 0a 20 20 20 20 20 20 77  =='*' ){.      w
0ee0: 68 69 6c 65 28 20 28 63 3d 28 2a 28 7a 47 6c 6f  hile( (c=(*(zGlo
0ef0: 62 2b 2b 29 29 29 20 3d 3d 20 27 2a 27 20 7c 7c  b++))) == '*' ||
0f00: 20 63 3d 3d 27 3f 27 20 29 7b 0a 20 20 20 20 20   c=='?' ){.     
0f10: 20 20 20 69 66 28 20 63 3d 3d 27 3f 27 20 26 26     if( c=='?' &&
0f20: 20 28 2a 28 7a 2b 2b 29 29 3d 3d 30 20 29 20 72   (*(z++))==0 ) r
0f30: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d  eturn 0;.      }
0f40: 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20  .      if( c==0 
0f50: 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72  ){.        retur
0f60: 6e 20 31 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  n 1;.      }else
0f70: 20 69 66 28 20 63 3d 3d 27 5b 27 20 29 7b 0a 20   if( c=='[' ){. 
0f80: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a 7a         while( *z
0f90: 20 26 26 20 73 74 72 67 6c 6f 62 28 7a 47 6c 6f   && strglob(zGlo
0fa0: 62 2d 31 2c 7a 29 20 29 7b 0a 20 20 20 20 20 20  b-1,z) ){.      
0fb0: 20 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 20 20 20      z++;.       
0fc0: 20 7d 0a 20 20 20 20 20 20 20 20 72 65 74 75 72   }.        retur
0fd0: 6e 20 28 2a 7a 29 21 3d 30 3b 0a 20 20 20 20 20  n (*z)!=0;.     
0fe0: 20 7d 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20   }.      while( 
0ff0: 28 63 32 20 3d 20 28 2a 28 7a 2b 2b 29 29 29 21  (c2 = (*(z++)))!
1000: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 77 68  =0 ){.        wh
1010: 69 6c 65 28 20 63 32 21 3d 63 20 29 7b 0a 20 20  ile( c2!=c ){.  
1020: 20 20 20 20 20 20 20 20 63 32 20 3d 20 2a 28 7a          c2 = *(z
1030: 2b 2b 29 3b 0a 20 20 20 20 20 20 20 20 20 20 69  ++);.          i
1040: 66 28 20 63 32 3d 3d 30 20 29 20 72 65 74 75 72  f( c2==0 ) retur
1050: 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  n 0;.        }. 
1060: 20 20 20 20 20 20 20 69 66 28 20 73 74 72 67 6c         if( strgl
1070: 6f 62 28 7a 47 6c 6f 62 2c 7a 29 20 29 20 72 65  ob(zGlob,z) ) re
1080: 74 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 7d 0a  turn 1;.      }.
1090: 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a        return 0;.
10a0: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d      }else if( c=
10b0: 3d 27 3f 27 20 29 7b 0a 20 20 20 20 20 20 69 66  ='?' ){.      if
10c0: 28 20 28 2a 28 7a 2b 2b 29 29 3d 3d 30 20 29 20  ( (*(z++))==0 ) 
10d0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 7d 65  return 0;.    }e
10e0: 6c 73 65 20 69 66 28 20 63 3d 3d 27 5b 27 20 29  lse if( c=='[' )
10f0: 7b 0a 20 20 20 20 20 20 69 6e 74 20 70 72 69 6f  {.      int prio
1100: 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20 73  r_c = 0;.      s
1110: 65 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 69  een = 0;.      i
1120: 6e 76 65 72 74 20 3d 20 30 3b 0a 20 20 20 20 20  nvert = 0;.     
1130: 20 63 20 3d 20 2a 28 7a 2b 2b 29 3b 0a 20 20 20   c = *(z++);.   
1140: 20 20 20 69 66 28 20 63 3d 3d 30 20 29 20 72 65     if( c==0 ) re
1150: 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 63 32  turn 0;.      c2
1160: 20 3d 20 2a 28 7a 47 6c 6f 62 2b 2b 29 3b 0a 20   = *(zGlob++);. 
1170: 20 20 20 20 20 69 66 28 20 63 32 3d 3d 27 5e 27       if( c2=='^'
1180: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 76 65   ){.        inve
1190: 72 74 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20  rt = 1;.        
11a0: 63 32 20 3d 20 2a 28 7a 47 6c 6f 62 2b 2b 29 3b  c2 = *(zGlob++);
11b0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
11c0: 66 28 20 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20  f( c2==']' ){.  
11d0: 20 20 20 20 20 20 69 66 28 20 63 3d 3d 27 5d 27        if( c==']'
11e0: 20 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20   ) seen = 1;.   
11f0: 20 20 20 20 20 63 32 20 3d 20 2a 28 7a 47 6c 6f       c2 = *(zGlo
1200: 62 2b 2b 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  b++);.      }.  
1210: 20 20 20 20 77 68 69 6c 65 28 20 63 32 20 26 26      while( c2 &&
1220: 20 63 32 21 3d 27 5d 27 20 29 7b 0a 20 20 20 20   c2!=']' ){.    
1230: 20 20 20 20 69 66 28 20 63 32 3d 3d 27 2d 27 20      if( c2=='-' 
1240: 26 26 20 7a 47 6c 6f 62 5b 30 5d 21 3d 27 5d 27  && zGlob[0]!=']'
1250: 20 26 26 20 7a 47 6c 6f 62 5b 30 5d 21 3d 30 20   && zGlob[0]!=0 
1260: 26 26 20 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a  && prior_c>0 ){.
1270: 20 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 2a            c2 = *
1280: 28 7a 47 6c 6f 62 2b 2b 29 3b 0a 20 20 20 20 20  (zGlob++);.     
1290: 20 20 20 20 20 69 66 28 20 63 3e 3d 70 72 69 6f       if( c>=prio
12a0: 72 5f 63 20 26 26 20 63 3c 3d 63 32 20 29 20 73  r_c && c<=c2 ) s
12b0: 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 20  een = 1;.       
12c0: 20 20 20 70 72 69 6f 72 5f 63 20 3d 20 30 3b 0a     prior_c = 0;.
12d0: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20          }else{. 
12e0: 20 20 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d           if( c==
12f0: 63 32 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20  c2 ){.          
1300: 20 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20    seen = 1;.    
1310: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20        }.        
1320: 20 20 70 72 69 6f 72 5f 63 20 3d 20 63 32 3b 0a    prior_c = c2;.
1330: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
1340: 20 20 63 32 20 3d 20 2a 28 7a 47 6c 6f 62 2b 2b    c2 = *(zGlob++
1350: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
1360: 20 69 66 28 20 63 32 3d 3d 30 20 7c 7c 20 28 73   if( c2==0 || (s
1370: 65 65 6e 20 5e 20 69 6e 76 65 72 74 29 3d 3d 30  een ^ invert)==0
1380: 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20   ) return 0;.   
1390: 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d 27 23   }else if( c=='#
13a0: 27 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20 28  ' ){.      if( (
13b0: 7a 5b 30 5d 3d 3d 27 2d 27 20 7c 7c 20 7a 5b 30  z[0]=='-' || z[0
13c0: 5d 3d 3d 27 2b 27 29 20 26 26 20 69 73 64 69 67  ]=='+') && isdig
13d0: 69 74 28 7a 5b 31 5d 29 20 29 20 7a 2b 2b 3b 0a  it(z[1]) ) z++;.
13e0: 20 20 20 20 20 20 69 66 28 20 21 69 73 64 69 67        if( !isdig
13f0: 69 74 28 7a 5b 30 5d 29 20 29 20 72 65 74 75 72  it(z[0]) ) retur
1400: 6e 20 30 3b 0a 20 20 20 20 20 20 7a 2b 2b 3b 0a  n 0;.      z++;.
1410: 20 20 20 20 20 20 77 68 69 6c 65 28 20 69 73 64        while( isd
1420: 69 67 69 74 28 7a 5b 30 5d 29 20 29 7b 20 7a 2b  igit(z[0]) ){ z+
1430: 2b 3b 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a  +; }.    }else{.
1440: 20 20 20 20 20 20 69 66 28 20 63 21 3d 28 2a 28        if( c!=(*(
1450: 7a 2b 2b 29 29 20 29 20 72 65 74 75 72 6e 20 30  z++)) ) return 0
1460: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65  ;.    }.  }.  re
1470: 74 75 72 6e 20 2a 7a 3d 3d 30 3b 0a 7d 0a 0a 2f  turn *z==0;.}../
1480: 2a 0a 2a 2a 20 43 6c 6f 73 65 20 6f 75 74 70 75  *.** Close outpu
1490: 74 20 73 74 72 65 61 6d 20 70 4f 75 74 20 69 66  t stream pOut if
14a0: 20 69 74 20 69 73 20 6e 6f 74 20 73 74 64 6f 75   it is not stdou
14b0: 74 20 6f 72 20 73 74 64 65 72 72 0a 2a 2f 0a 73  t or stderr.*/.s
14c0: 74 61 74 69 63 20 76 6f 69 64 20 6d 61 79 62 65  tatic void maybe
14d0: 43 6c 6f 73 65 28 46 49 4c 45 20 2a 70 4f 75 74  Close(FILE *pOut
14e0: 29 7b 0a 20 20 69 66 28 20 70 4f 75 74 21 3d 73  ){.  if( pOut!=s
14f0: 74 64 6f 75 74 20 26 26 20 70 4f 75 74 21 3d 73  tdout && pOut!=s
1500: 74 64 65 72 72 20 29 20 66 63 6c 6f 73 65 28 70  tderr ) fclose(p
1510: 4f 75 74 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50  Out);.}../*.** P
1520: 72 69 6e 74 20 61 6e 20 65 72 72 6f 72 20 6d 65  rint an error me
1530: 73 73 61 67 65 0a 2a 2f 0a 73 74 61 74 69 63 20  ssage.*/.static 
1540: 76 6f 69 64 20 65 72 72 6f 72 4d 65 73 73 61 67  void errorMessag
1550: 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46  e(const char *zF
1560: 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76  ormat, ...){.  v
1570: 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61  a_list ap;.  cha
1580: 72 20 2a 7a 4d 73 67 3b 0a 20 20 63 68 61 72 20  r *zMsg;.  char 
1590: 7a 50 72 65 66 69 78 5b 33 30 5d 3b 0a 20 20 76  zPrefix[30];.  v
15a0: 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72  a_start(ap, zFor
15b0: 6d 61 74 29 3b 0a 20 20 7a 4d 73 67 20 3d 20 73  mat);.  zMsg = s
15c0: 71 6c 69 74 65 33 5f 76 6d 70 72 69 6e 74 66 28  qlite3_vmprintf(
15d0: 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20  zFormat, ap);.  
15e0: 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 73 71  va_end(ap);.  sq
15f0: 6c 69 74 65 33 5f 73 6e 70 72 69 6e 74 66 28 73  lite3_snprintf(s
1600: 69 7a 65 6f 66 28 7a 50 72 65 66 69 78 29 2c 20  izeof(zPrefix), 
1610: 7a 50 72 65 66 69 78 2c 20 22 25 73 3a 45 52 52  zPrefix, "%s:ERR
1620: 4f 52 3a 20 22 2c 20 67 2e 7a 4e 61 6d 65 29 3b  OR: ", g.zName);
1630: 0a 20 20 69 66 28 20 67 2e 70 4c 6f 67 20 29 7b  .  if( g.pLog ){
1640: 0a 20 20 20 20 70 72 69 6e 74 57 69 74 68 50 72  .    printWithPr
1650: 65 66 69 78 28 67 2e 70 4c 6f 67 2c 20 7a 50 72  efix(g.pLog, zPr
1660: 65 66 69 78 2c 20 7a 4d 73 67 29 3b 0a 20 20 20  efix, zMsg);.   
1670: 20 66 66 6c 75 73 68 28 67 2e 70 4c 6f 67 29 3b   fflush(g.pLog);
1680: 0a 20 20 7d 0a 20 20 69 66 28 20 67 2e 70 45 72  .  }.  if( g.pEr
1690: 72 4c 6f 67 20 26 26 20 73 61 66 65 5f 73 74 72  rLog && safe_str
16a0: 63 6d 70 28 67 2e 7a 45 72 72 4c 6f 67 2c 67 2e  cmp(g.zErrLog,g.
16b0: 7a 4c 6f 67 29 20 29 7b 0a 20 20 20 20 70 72 69  zLog) ){.    pri
16c0: 6e 74 57 69 74 68 50 72 65 66 69 78 28 67 2e 70  ntWithPrefix(g.p
16d0: 45 72 72 4c 6f 67 2c 20 7a 50 72 65 66 69 78 2c  ErrLog, zPrefix,
16e0: 20 7a 4d 73 67 29 3b 0a 20 20 20 20 66 66 6c 75   zMsg);.    fflu
16f0: 73 68 28 67 2e 70 45 72 72 4c 6f 67 29 3b 0a 20  sh(g.pErrLog);. 
1700: 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 66 72 65   }.  sqlite3_fre
1710: 65 28 7a 4d 73 67 29 3b 0a 20 20 67 2e 6e 45 72  e(zMsg);.  g.nEr
1720: 72 6f 72 2b 2b 3b 0a 7d 0a 0a 2f 2a 20 46 6f 72  ror++;.}../* For
1730: 77 61 72 64 20 64 65 63 6c 61 72 61 74 69 6f 6e  ward declaration
1740: 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 74   */.static int t
1750: 72 79 53 71 6c 28 63 6f 6e 73 74 20 63 68 61 72  rySql(const char
1760: 2a 2c 20 2e 2e 2e 29 3b 0a 0a 2f 2a 0a 2a 2a 20  *, ...);../*.** 
1770: 50 72 69 6e 74 20 61 6e 20 65 72 72 6f 72 20 6d  Print an error m
1780: 65 73 73 61 67 65 20 61 6e 64 20 74 68 65 6e 20  essage and then 
1790: 71 75 69 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  quit..*/.static 
17a0: 76 6f 69 64 20 66 61 74 61 6c 45 72 72 6f 72 28  void fatalError(
17b0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72  const char *zFor
17c0: 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f  mat, ...){.  va_
17d0: 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61 72 20  list ap;.  char 
17e0: 2a 7a 4d 73 67 3b 0a 20 20 63 68 61 72 20 7a 50  *zMsg;.  char zP
17f0: 72 65 66 69 78 5b 33 30 5d 3b 0a 20 20 76 61 5f  refix[30];.  va_
1800: 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d 61  start(ap, zForma
1810: 74 29 3b 0a 20 20 7a 4d 73 67 20 3d 20 73 71 6c  t);.  zMsg = sql
1820: 69 74 65 33 5f 76 6d 70 72 69 6e 74 66 28 7a 46  ite3_vmprintf(zF
1830: 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 76 61  ormat, ap);.  va
1840: 5f 65 6e 64 28 61 70 29 3b 0a 20 20 73 71 6c 69  _end(ap);.  sqli
1850: 74 65 33 5f 73 6e 70 72 69 6e 74 66 28 73 69 7a  te3_snprintf(siz
1860: 65 6f 66 28 7a 50 72 65 66 69 78 29 2c 20 7a 50  eof(zPrefix), zP
1870: 72 65 66 69 78 2c 20 22 25 73 3a 46 41 54 41 4c  refix, "%s:FATAL
1880: 3a 20 22 2c 20 67 2e 7a 4e 61 6d 65 29 3b 0a 20  : ", g.zName);. 
1890: 20 69 66 28 20 67 2e 70 4c 6f 67 20 29 7b 0a 20   if( g.pLog ){. 
18a0: 20 20 20 70 72 69 6e 74 57 69 74 68 50 72 65 66     printWithPref
18b0: 69 78 28 67 2e 70 4c 6f 67 2c 20 7a 50 72 65 66  ix(g.pLog, zPref
18c0: 69 78 2c 20 7a 4d 73 67 29 3b 0a 20 20 20 20 66  ix, zMsg);.    f
18d0: 66 6c 75 73 68 28 67 2e 70 4c 6f 67 29 3b 0a 20  flush(g.pLog);. 
18e0: 20 20 20 6d 61 79 62 65 43 6c 6f 73 65 28 67 2e     maybeClose(g.
18f0: 70 4c 6f 67 29 3b 0a 20 20 7d 0a 20 20 69 66 28  pLog);.  }.  if(
1900: 20 67 2e 70 45 72 72 4c 6f 67 20 26 26 20 73 61   g.pErrLog && sa
1910: 66 65 5f 73 74 72 63 6d 70 28 67 2e 7a 45 72 72  fe_strcmp(g.zErr
1920: 4c 6f 67 2c 67 2e 7a 4c 6f 67 29 20 29 7b 0a 20  Log,g.zLog) ){. 
1930: 20 20 20 70 72 69 6e 74 57 69 74 68 50 72 65 66     printWithPref
1940: 69 78 28 67 2e 70 45 72 72 4c 6f 67 2c 20 7a 50  ix(g.pErrLog, zP
1950: 72 65 66 69 78 2c 20 7a 4d 73 67 29 3b 0a 20 20  refix, zMsg);.  
1960: 20 20 66 66 6c 75 73 68 28 67 2e 70 45 72 72 4c    fflush(g.pErrL
1970: 6f 67 29 3b 0a 20 20 20 20 6d 61 79 62 65 43 6c  og);.    maybeCl
1980: 6f 73 65 28 67 2e 70 45 72 72 4c 6f 67 29 3b 0a  ose(g.pErrLog);.
1990: 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 66 72    }.  sqlite3_fr
19a0: 65 65 28 7a 4d 73 67 29 3b 0a 20 20 69 66 28 20  ee(zMsg);.  if( 
19b0: 67 2e 64 62 20 29 7b 0a 20 20 20 20 69 6e 74 20  g.db ){.    int 
19c0: 6e 54 72 79 20 3d 20 30 3b 0a 20 20 20 20 67 2e  nTry = 0;.    g.
19d0: 69 54 69 6d 65 6f 75 74 20 3d 20 30 3b 0a 20 20  iTimeout = 0;.  
19e0: 20 20 77 68 69 6c 65 28 20 74 72 79 53 71 6c 28    while( trySql(
19f0: 22 55 50 44 41 54 45 20 63 6c 69 65 6e 74 20 53  "UPDATE client S
1a00: 45 54 20 77 61 6e 74 48 61 6c 74 3d 31 3b 22 29  ET wantHalt=1;")
1a10: 3d 3d 53 51 4c 49 54 45 5f 42 55 53 59 0a 20 20  ==SQLITE_BUSY.  
1a20: 20 20 20 20 20 20 20 20 20 26 26 20 28 6e 54 72           && (nTr
1a30: 79 2b 2b 29 3c 31 30 30 20 29 7b 0a 20 20 20 20  y++)<100 ){.    
1a40: 20 20 73 71 6c 69 74 65 33 5f 73 6c 65 65 70 28    sqlite3_sleep(
1a50: 31 30 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  10);.    }.  }. 
1a60: 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 67   sqlite3_close(g
1a70: 2e 64 62 29 3b 0a 20 20 65 78 69 74 28 31 29 3b  .db);.  exit(1);
1a80: 20 20 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 50 72 69    .}.../*.** Pri
1a90: 6e 74 20 61 20 6c 6f 67 20 6d 65 73 73 61 67 65  nt a log message
1aa0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
1ab0: 6c 6f 67 4d 65 73 73 61 67 65 28 63 6f 6e 73 74  logMessage(const
1ac0: 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20   char *zFormat, 
1ad0: 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20  ...){.  va_list 
1ae0: 61 70 3b 0a 20 20 63 68 61 72 20 2a 7a 4d 73 67  ap;.  char *zMsg
1af0: 3b 0a 20 20 63 68 61 72 20 7a 50 72 65 66 69 78  ;.  char zPrefix
1b00: 5b 33 30 5d 3b 0a 20 20 76 61 5f 73 74 61 72 74  [30];.  va_start
1b10: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20  (ap, zFormat);. 
1b20: 20 7a 4d 73 67 20 3d 20 73 71 6c 69 74 65 33 5f   zMsg = sqlite3_
1b30: 76 6d 70 72 69 6e 74 66 28 7a 46 6f 72 6d 61 74  vmprintf(zFormat
1b40: 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28  , ap);.  va_end(
1b50: 61 70 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 73  ap);.  sqlite3_s
1b60: 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66 28 7a  nprintf(sizeof(z
1b70: 50 72 65 66 69 78 29 2c 20 7a 50 72 65 66 69 78  Prefix), zPrefix
1b80: 2c 20 22 25 73 3a 20 22 2c 20 67 2e 7a 4e 61 6d  , "%s: ", g.zNam
1b90: 65 29 3b 0a 20 20 69 66 28 20 67 2e 70 4c 6f 67  e);.  if( g.pLog
1ba0: 20 29 7b 0a 20 20 20 20 70 72 69 6e 74 57 69 74   ){.    printWit
1bb0: 68 50 72 65 66 69 78 28 67 2e 70 4c 6f 67 2c 20  hPrefix(g.pLog, 
1bc0: 7a 50 72 65 66 69 78 2c 20 7a 4d 73 67 29 3b 0a  zPrefix, zMsg);.
1bd0: 20 20 20 20 66 66 6c 75 73 68 28 67 2e 70 4c 6f      fflush(g.pLo
1be0: 67 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  g);.  }.  sqlite
1bf0: 33 5f 66 72 65 65 28 7a 4d 73 67 29 3b 0a 7d 0a  3_free(zMsg);.}.
1c00: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68  ./*.** Return th
1c10: 65 20 6c 65 6e 67 74 68 20 6f 66 20 61 20 73 74  e length of a st
1c20: 72 69 6e 67 20 6f 6d 69 74 74 69 6e 67 20 74 72  ring omitting tr
1c30: 61 69 6c 69 6e 67 20 77 68 69 74 65 73 70 61 63  ailing whitespac
1c40: 65 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  e.*/.static int 
1c50: 63 6c 69 70 4c 65 6e 67 74 68 28 63 6f 6e 73 74  clipLength(const
1c60: 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 69 6e 74   char *z){.  int
1c70: 20 6e 20 3d 20 28 69 6e 74 29 73 74 72 6c 65 6e   n = (int)strlen
1c80: 28 7a 29 3b 0a 20 20 77 68 69 6c 65 28 20 6e 3e  (z);.  while( n>
1c90: 30 20 26 26 20 69 73 73 70 61 63 65 28 7a 5b 6e  0 && isspace(z[n
1ca0: 2d 31 5d 29 20 29 7b 20 6e 2d 2d 3b 20 7d 0a 20  -1]) ){ n--; }. 
1cb0: 20 72 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a   return n;.}../*
1cc0: 0a 2a 2a 20 41 75 78 69 6c 69 61 72 79 20 53 51  .** Auxiliary SQ
1cd0: 4c 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 72 65  L function to re
1ce0: 74 75 72 6e 20 74 68 65 20 6e 61 6d 65 20 6f 66  turn the name of
1cf0: 20 74 68 65 20 56 46 53 0a 2a 2f 0a 73 74 61 74   the VFS.*/.stat
1d00: 69 63 20 76 6f 69 64 20 76 66 73 4e 61 6d 65 46  ic void vfsNameF
1d10: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
1d20: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
1d30: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
1d40: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
1d50: 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33  rgv.){.  sqlite3
1d60: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
1d70: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
1d80: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 63 68 61  (context);.  cha
1d90: 72 20 2a 7a 56 66 73 20 3d 20 30 3b 0a 20 20 55  r *zVfs = 0;.  U
1da0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
1db0: 61 72 67 63 29 3b 0a 20 20 55 4e 55 53 45 44 5f  argc);.  UNUSED_
1dc0: 50 41 52 41 4d 45 54 45 52 28 61 72 67 76 29 3b  PARAMETER(argv);
1dd0: 0a 20 20 73 71 6c 69 74 65 33 5f 66 69 6c 65 5f  .  sqlite3_file_
1de0: 63 6f 6e 74 72 6f 6c 28 64 62 2c 20 22 6d 61 69  control(db, "mai
1df0: 6e 22 2c 20 53 51 4c 49 54 45 5f 46 43 4e 54 4c  n", SQLITE_FCNTL
1e00: 5f 56 46 53 4e 41 4d 45 2c 20 26 7a 56 66 73 29  _VFSNAME, &zVfs)
1e10: 3b 0a 20 20 69 66 28 20 7a 56 66 73 20 29 7b 0a  ;.  if( zVfs ){.
1e20: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
1e30: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
1e40: 20 7a 56 66 73 2c 20 2d 31 2c 20 73 71 6c 69 74   zVfs, -1, sqlit
1e50: 65 33 5f 66 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a  e3_free);.  }.}.
1e60: 0a 2f 2a 0a 2a 2a 20 42 75 73 79 20 68 61 6e 64  ./*.** Busy hand
1e70: 6c 65 72 20 77 69 74 68 20 61 20 67 2e 69 54 69  ler with a g.iTi
1e80: 6d 65 6f 75 74 2d 6d 69 6c 6c 69 73 65 63 6f 6e  meout-millisecon
1e90: 64 20 74 69 6d 65 6f 75 74 0a 2a 2f 0a 73 74 61  d timeout.*/.sta
1ea0: 74 69 63 20 69 6e 74 20 62 75 73 79 48 61 6e 64  tic int busyHand
1eb0: 6c 65 72 28 76 6f 69 64 20 2a 70 43 44 2c 20 69  ler(void *pCD, i
1ec0: 6e 74 20 63 6f 75 6e 74 29 7b 0a 20 20 55 4e 55  nt count){.  UNU
1ed0: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 70 43  SED_PARAMETER(pC
1ee0: 44 29 3b 0a 20 20 69 66 28 20 63 6f 75 6e 74 2a  D);.  if( count*
1ef0: 31 30 3e 67 2e 69 54 69 6d 65 6f 75 74 20 29 7b  10>g.iTimeout ){
1f00: 0a 20 20 20 20 69 66 28 20 67 2e 69 54 69 6d 65  .    if( g.iTime
1f10: 6f 75 74 3e 30 20 29 20 65 72 72 6f 72 4d 65 73  out>0 ) errorMes
1f20: 73 61 67 65 28 22 74 69 6d 65 6f 75 74 20 61 66  sage("timeout af
1f30: 74 65 72 20 25 64 6d 73 22 2c 20 67 2e 69 54 69  ter %dms", g.iTi
1f40: 6d 65 6f 75 74 29 3b 0a 20 20 20 20 72 65 74 75  meout);.    retu
1f50: 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 73 71 6c 69  rn 0;.  }.  sqli
1f60: 74 65 33 5f 73 6c 65 65 70 28 31 30 29 3b 0a 20  te3_sleep(10);. 
1f70: 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a   return 1;.}../*
1f80: 0a 2a 2a 20 53 51 4c 20 54 72 61 63 65 20 63 61  .** SQL Trace ca
1f90: 6c 6c 62 61 63 6b 0a 2a 2f 0a 73 74 61 74 69 63  llback.*/.static
1fa0: 20 76 6f 69 64 20 73 71 6c 54 72 61 63 65 43 61   void sqlTraceCa
1fb0: 6c 6c 62 61 63 6b 28 76 6f 69 64 20 2a 4e 6f 74  llback(void *Not
1fc0: 55 73 65 64 31 2c 20 63 6f 6e 73 74 20 63 68 61  Used1, const cha
1fd0: 72 20 2a 7a 53 71 6c 29 7b 0a 20 20 55 4e 55 53  r *zSql){.  UNUS
1fe0: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f 74  ED_PARAMETER(Not
1ff0: 55 73 65 64 31 29 3b 0a 20 20 6c 6f 67 4d 65 73  Used1);.  logMes
2000: 73 61 67 65 28 22 5b 25 2e 2a 73 5d 22 2c 20 63  sage("[%.*s]", c
2010: 6c 69 70 4c 65 6e 67 74 68 28 7a 53 71 6c 29 2c  lipLength(zSql),
2020: 20 7a 53 71 6c 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a   zSql);.}../*.**
2030: 20 53 51 4c 20 65 72 72 6f 72 20 6c 6f 67 20 63   SQL error log c
2040: 61 6c 6c 62 61 63 6b 0a 2a 2f 0a 73 74 61 74 69  allback.*/.stati
2050: 63 20 76 6f 69 64 20 73 71 6c 45 72 72 6f 72 43  c void sqlErrorC
2060: 61 6c 6c 62 61 63 6b 28 76 6f 69 64 20 2a 70 41  allback(void *pA
2070: 72 67 2c 20 69 6e 74 20 69 45 72 72 43 6f 64 65  rg, int iErrCode
2080: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4d  , const char *zM
2090: 73 67 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41  sg){.  UNUSED_PA
20a0: 52 41 4d 45 54 45 52 28 70 41 72 67 29 3b 0a 20  RAMETER(pArg);. 
20b0: 20 69 66 28 20 69 45 72 72 43 6f 64 65 3d 3d 53   if( iErrCode==S
20c0: 51 4c 49 54 45 5f 45 52 52 4f 52 20 26 26 20 67  QLITE_ERROR && g
20d0: 2e 62 49 67 6e 6f 72 65 53 71 6c 45 72 72 6f 72  .bIgnoreSqlError
20e0: 73 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 69 66  s ) return;.  if
20f0: 28 20 28 69 45 72 72 43 6f 64 65 26 30 78 66 66  ( (iErrCode&0xff
2100: 29 3d 3d 53 51 4c 49 54 45 5f 53 43 48 45 4d 41  )==SQLITE_SCHEMA
2110: 20 26 26 20 67 2e 69 54 72 61 63 65 3c 33 20 29   && g.iTrace<3 )
2120: 20 72 65 74 75 72 6e 3b 0a 20 20 69 66 28 20 67   return;.  if( g
2130: 2e 69 54 69 6d 65 6f 75 74 3d 3d 30 20 26 26 20  .iTimeout==0 && 
2140: 28 69 45 72 72 43 6f 64 65 26 30 78 66 66 29 3d  (iErrCode&0xff)=
2150: 3d 53 51 4c 49 54 45 5f 42 55 53 59 20 26 26 20  =SQLITE_BUSY && 
2160: 67 2e 69 54 72 61 63 65 3c 33 20 29 20 72 65 74  g.iTrace<3 ) ret
2170: 75 72 6e 3b 0a 20 20 69 66 28 20 28 69 45 72 72  urn;.  if( (iErr
2180: 43 6f 64 65 26 30 78 66 66 29 3d 3d 53 51 4c 49  Code&0xff)==SQLI
2190: 54 45 5f 4e 4f 54 49 43 45 20 29 7b 0a 20 20 20  TE_NOTICE ){.   
21a0: 20 6c 6f 67 4d 65 73 73 61 67 65 28 22 28 69 6e   logMessage("(in
21b0: 66 6f 29 20 25 73 22 2c 20 7a 4d 73 67 29 3b 0a  fo) %s", zMsg);.
21c0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 65 72 72    }else{.    err
21d0: 6f 72 4d 65 73 73 61 67 65 28 22 28 65 72 72 63  orMessage("(errc
21e0: 6f 64 65 3d 25 64 29 20 25 73 22 2c 20 69 45 72  ode=%d) %s", iEr
21f0: 72 43 6f 64 65 2c 20 7a 4d 73 67 29 3b 0a 20 20  rCode, zMsg);.  
2200: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 65 70 61  }.}../*.** Prepa
2210: 72 65 20 61 6e 20 53 51 4c 20 73 74 61 74 65 6d  re an SQL statem
2220: 65 6e 74 2e 20 20 49 73 73 75 65 20 61 20 66 61  ent.  Issue a fa
2230: 74 61 6c 20 65 72 72 6f 72 20 69 66 20 75 6e 61  tal error if una
2240: 62 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 73  ble..*/.static s
2250: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 72 65  qlite3_stmt *pre
2260: 70 61 72 65 53 71 6c 28 63 6f 6e 73 74 20 63 68  pareSql(const ch
2270: 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e  ar *zFormat, ...
2280: 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b  ){.  va_list ap;
2290: 0a 20 20 63 68 61 72 20 2a 7a 53 71 6c 3b 0a 20  .  char *zSql;. 
22a0: 20 69 6e 74 20 72 63 3b 0a 20 20 73 71 6c 69 74   int rc;.  sqlit
22b0: 65 33 5f 73 74 6d 74 20 2a 70 53 74 6d 74 20 3d  e3_stmt *pStmt =
22c0: 20 30 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61   0;.  va_start(a
22d0: 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 7a  p, zFormat);.  z
22e0: 53 71 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 6d  Sql = sqlite3_vm
22f0: 70 72 69 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20  printf(zFormat, 
2300: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70  ap);.  va_end(ap
2310: 29 3b 0a 20 20 72 63 20 3d 20 73 71 6c 69 74 65  );.  rc = sqlite
2320: 33 5f 70 72 65 70 61 72 65 5f 76 32 28 67 2e 64  3_prepare_v2(g.d
2330: 62 2c 20 7a 53 71 6c 2c 20 2d 31 2c 20 26 70 53  b, zSql, -1, &pS
2340: 74 6d 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 72  tmt, 0);.  if( r
2350: 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a  c!=SQLITE_OK ){.
2360: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 69 6e 61      sqlite3_fina
2370: 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 20  lize(pStmt);.   
2380: 20 66 61 74 61 6c 45 72 72 6f 72 28 22 25 73 5c   fatalError("%s\
2390: 6e 25 73 5c 6e 22 2c 20 73 71 6c 69 74 65 33 5f  n%s\n", sqlite3_
23a0: 65 72 72 6d 73 67 28 67 2e 64 62 29 2c 20 7a 53  errmsg(g.db), zS
23b0: 71 6c 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  ql);.  }.  sqlit
23c0: 65 33 5f 66 72 65 65 28 7a 53 71 6c 29 3b 0a 20  e3_free(zSql);. 
23d0: 20 72 65 74 75 72 6e 20 70 53 74 6d 74 3b 0a 7d   return pStmt;.}
23e0: 0a 0a 2f 2a 0a 2a 2a 20 52 75 6e 20 61 72 62 69  ../*.** Run arbi
23f0: 74 72 61 72 79 20 53 51 4c 2e 20 20 49 73 73 75  trary SQL.  Issu
2400: 65 20 61 20 66 61 74 61 6c 20 65 72 72 6f 72 20  e a fatal error 
2410: 6f 6e 20 66 61 69 6c 75 72 65 2e 0a 2a 2f 0a 73  on failure..*/.s
2420: 74 61 74 69 63 20 76 6f 69 64 20 72 75 6e 53 71  tatic void runSq
2430: 6c 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46  l(const char *zF
2440: 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76  ormat, ...){.  v
2450: 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61  a_list ap;.  cha
2460: 72 20 2a 7a 53 71 6c 3b 0a 20 20 69 6e 74 20 72  r *zSql;.  int r
2470: 63 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70  c;.  va_start(ap
2480: 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 7a 53  , zFormat);.  zS
2490: 71 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 6d 70  ql = sqlite3_vmp
24a0: 72 69 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20 61  rintf(zFormat, a
24b0: 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29  p);.  va_end(ap)
24c0: 3b 0a 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33  ;.  rc = sqlite3
24d0: 5f 65 78 65 63 28 67 2e 64 62 2c 20 7a 53 71 6c  _exec(g.db, zSql
24e0: 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 69 66  , 0, 0, 0);.  if
24f0: 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20  ( rc!=SQLITE_OK 
2500: 29 7b 0a 20 20 20 20 66 61 74 61 6c 45 72 72 6f  ){.    fatalErro
2510: 72 28 22 25 73 5c 6e 25 73 5c 6e 22 2c 20 73 71  r("%s\n%s\n", sq
2520: 6c 69 74 65 33 5f 65 72 72 6d 73 67 28 67 2e 64  lite3_errmsg(g.d
2530: 62 29 2c 20 7a 53 71 6c 29 3b 0a 20 20 7d 0a 20  b), zSql);.  }. 
2540: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 53   sqlite3_free(zS
2550: 71 6c 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 72  ql);.}../*.** Tr
2560: 79 20 74 6f 20 72 75 6e 20 61 72 62 69 74 72 61  y to run arbitra
2570: 72 79 20 53 51 4c 2e 20 20 52 65 74 75 72 6e 20  ry SQL.  Return 
2580: 73 75 63 63 65 73 73 20 63 6f 64 65 2e 0a 2a 2f  success code..*/
2590: 0a 73 74 61 74 69 63 20 69 6e 74 20 74 72 79 53  .static int tryS
25a0: 71 6c 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  ql(const char *z
25b0: 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20  Format, ...){.  
25c0: 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68  va_list ap;.  ch
25d0: 61 72 20 2a 7a 53 71 6c 3b 0a 20 20 69 6e 74 20  ar *zSql;.  int 
25e0: 72 63 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61  rc;.  va_start(a
25f0: 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 7a  p, zFormat);.  z
2600: 53 71 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 6d  Sql = sqlite3_vm
2610: 70 72 69 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20  printf(zFormat, 
2620: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70  ap);.  va_end(ap
2630: 29 3b 0a 20 20 72 63 20 3d 20 73 71 6c 69 74 65  );.  rc = sqlite
2640: 33 5f 65 78 65 63 28 67 2e 64 62 2c 20 7a 53 71  3_exec(g.db, zSq
2650: 6c 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73  l, 0, 0, 0);.  s
2660: 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 53 71 6c  qlite3_free(zSql
2670: 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a  );.  return rc;.
2680: 7d 0a 0a 2f 2a 20 53 74 72 75 63 74 75 72 65 20  }../* Structure 
2690: 66 6f 72 20 68 6f 6c 64 69 6e 67 20 61 6e 20 61  for holding an a
26a0: 72 62 69 74 72 61 72 79 20 6c 65 6e 67 74 68 20  rbitrary length 
26b0: 73 74 72 69 6e 67 0a 2a 2f 0a 74 79 70 65 64 65  string.*/.typede
26c0: 66 20 73 74 72 75 63 74 20 53 74 72 69 6e 67 20  f struct String 
26d0: 53 74 72 69 6e 67 3b 0a 73 74 72 75 63 74 20 53  String;.struct S
26e0: 74 72 69 6e 67 20 7b 0a 20 20 63 68 61 72 20 2a  tring {.  char *
26f0: 7a 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 74 68  z;         /* th
2700: 65 20 73 74 72 69 6e 67 20 2a 2f 0a 20 20 69 6e  e string */.  in
2710: 74 20 6e 3b 20 20 20 20 20 20 20 20 20 20 20 2f  t n;           /
2720: 2a 20 53 6c 6f 74 73 20 6f 66 20 7a 5b 5d 20 75  * Slots of z[] u
2730: 73 65 64 20 2a 2f 0a 20 20 69 6e 74 20 6e 41 6c  sed */.  int nAl
2740: 6c 6f 63 3b 20 20 20 20 20 20 2f 2a 20 53 6c 6f  loc;      /* Slo
2750: 74 73 20 6f 66 20 7a 5b 5d 20 61 6c 6c 6f 63 61  ts of z[] alloca
2760: 74 65 64 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 20 46 72  ted */.};../* Fr
2770: 65 65 20 61 20 73 74 72 69 6e 67 20 2a 2f 0a 73  ee a string */.s
2780: 74 61 74 69 63 20 76 6f 69 64 20 73 74 72 69 6e  tatic void strin
2790: 67 46 72 65 65 28 53 74 72 69 6e 67 20 2a 70 29  gFree(String *p)
27a0: 7b 0a 20 20 69 66 28 20 70 2d 3e 7a 20 29 20 73  {.  if( p->z ) s
27b0: 71 6c 69 74 65 33 5f 66 72 65 65 28 70 2d 3e 7a  qlite3_free(p->z
27c0: 29 3b 0a 20 20 6d 65 6d 73 65 74 28 70 2c 20 30  );.  memset(p, 0
27d0: 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 7d  , sizeof(*p));.}
27e0: 0a 0a 2f 2a 20 41 70 70 65 6e 64 20 6e 20 62 79  ../* Append n by
27f0: 74 65 73 20 6f 66 20 74 65 78 74 20 74 6f 20 61  tes of text to a
2800: 20 73 74 72 69 6e 67 2e 20 20 49 66 20 6e 3c 30   string.  If n<0
2810: 20 61 70 70 65 6e 64 20 74 68 65 20 65 6e 74 69   append the enti
2820: 72 65 20 73 74 72 69 6e 67 2e 20 2a 2f 0a 73 74  re string. */.st
2830: 61 74 69 63 20 76 6f 69 64 20 73 74 72 69 6e 67  atic void string
2840: 41 70 70 65 6e 64 28 53 74 72 69 6e 67 20 2a 70  Append(String *p
2850: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c  , const char *z,
2860: 20 69 6e 74 20 6e 29 7b 0a 20 20 69 66 28 20 6e   int n){.  if( n
2870: 3c 30 20 29 20 6e 20 3d 20 28 69 6e 74 29 73 74  <0 ) n = (int)st
2880: 72 6c 65 6e 28 7a 29 3b 0a 20 20 69 66 28 20 70  rlen(z);.  if( p
2890: 2d 3e 6e 2b 6e 3e 3d 70 2d 3e 6e 41 6c 6c 6f 63  ->n+n>=p->nAlloc
28a0: 20 29 7b 0a 20 20 20 20 69 6e 74 20 6e 41 6c 6c   ){.    int nAll
28b0: 6f 63 20 3d 20 70 2d 3e 6e 41 6c 6c 6f 63 2a 32  oc = p->nAlloc*2
28c0: 20 2b 20 6e 20 2b 20 31 30 30 3b 0a 20 20 20 20   + n + 100;.    
28d0: 63 68 61 72 20 2a 7a 20 3d 20 73 71 6c 69 74 65  char *z = sqlite
28e0: 33 5f 72 65 61 6c 6c 6f 63 28 70 2d 3e 7a 2c 20  3_realloc(p->z, 
28f0: 6e 41 6c 6c 6f 63 29 3b 0a 20 20 20 20 69 66 28  nAlloc);.    if(
2900: 20 7a 3d 3d 30 20 29 20 66 61 74 61 6c 45 72 72   z==0 ) fatalErr
2910: 6f 72 28 22 6f 75 74 20 6f 66 20 6d 65 6d 6f 72  or("out of memor
2920: 79 22 29 3b 0a 20 20 20 20 70 2d 3e 7a 20 3d 20  y");.    p->z = 
2930: 7a 3b 0a 20 20 20 20 70 2d 3e 6e 41 6c 6c 6f 63  z;.    p->nAlloc
2940: 20 3d 20 6e 41 6c 6c 6f 63 3b 0a 20 20 7d 0a 20   = nAlloc;.  }. 
2950: 20 6d 65 6d 63 70 79 28 70 2d 3e 7a 2b 70 2d 3e   memcpy(p->z+p->
2960: 6e 2c 20 7a 2c 20 6e 29 3b 0a 20 20 70 2d 3e 6e  n, z, n);.  p->n
2970: 20 2b 3d 20 6e 3b 0a 20 20 70 2d 3e 7a 5b 70 2d   += n;.  p->z[p-
2980: 3e 6e 5d 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 20 52  >n] = 0;.}../* R
2990: 65 73 65 74 20 61 20 73 74 72 69 6e 67 20 74 6f  eset a string to
29a0: 20 61 6e 20 65 6d 70 74 79 20 73 74 72 69 6e 67   an empty string
29b0: 20 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20   */.static void 
29c0: 73 74 72 69 6e 67 52 65 73 65 74 28 53 74 72 69  stringReset(Stri
29d0: 6e 67 20 2a 70 29 7b 0a 20 20 69 66 28 20 70 2d  ng *p){.  if( p-
29e0: 3e 7a 3d 3d 30 20 29 20 73 74 72 69 6e 67 41 70  >z==0 ) stringAp
29f0: 70 65 6e 64 28 70 2c 20 22 20 22 2c 20 31 29 3b  pend(p, " ", 1);
2a00: 0a 20 20 70 2d 3e 6e 20 3d 20 30 3b 0a 20 20 70  .  p->n = 0;.  p
2a10: 2d 3e 7a 5b 30 5d 20 3d 20 30 3b 0a 7d 0a 0a 2f  ->z[0] = 0;.}../
2a20: 2a 20 41 70 70 65 6e 64 20 61 20 6e 65 77 20 74  * Append a new t
2a30: 6f 6b 65 6e 20 6f 6e 74 6f 20 74 68 65 20 65 6e  oken onto the en
2a40: 64 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67 20  d of the string 
2a50: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73  */.static void s
2a60: 74 72 69 6e 67 41 70 70 65 6e 64 54 65 72 6d 28  tringAppendTerm(
2a70: 53 74 72 69 6e 67 20 2a 70 2c 20 63 6f 6e 73 74  String *p, const
2a80: 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 69 6e 74   char *z){.  int
2a90: 20 69 3b 0a 20 20 69 66 28 20 70 2d 3e 6e 20 29   i;.  if( p->n )
2aa0: 20 73 74 72 69 6e 67 41 70 70 65 6e 64 28 70 2c   stringAppend(p,
2ab0: 20 22 20 22 2c 20 31 29 3b 0a 20 20 69 66 28 20   " ", 1);.  if( 
2ac0: 7a 3d 3d 30 20 29 7b 0a 20 20 20 20 73 74 72 69  z==0 ){.    stri
2ad0: 6e 67 41 70 70 65 6e 64 28 70 2c 20 22 6e 69 6c  ngAppend(p, "nil
2ae0: 22 2c 20 33 29 3b 0a 20 20 20 20 72 65 74 75 72  ", 3);.    retur
2af0: 6e 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30  n;.  }.  for(i=0
2b00: 3b 20 7a 5b 69 5d 20 26 26 20 21 69 73 73 70 61  ; z[i] && !isspa
2b10: 63 65 28 7a 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d  ce(z[i]); i++){}
2b20: 0a 20 20 69 66 28 20 69 3e 30 20 26 26 20 7a 5b  .  if( i>0 && z[
2b30: 69 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 73 74 72  i]==0 ){.    str
2b40: 69 6e 67 41 70 70 65 6e 64 28 70 2c 20 7a 2c 20  ingAppend(p, z, 
2b50: 69 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  i);.    return;.
2b60: 20 20 7d 0a 20 20 73 74 72 69 6e 67 41 70 70 65    }.  stringAppe
2b70: 6e 64 28 70 2c 20 22 27 22 2c 20 31 29 3b 0a 20  nd(p, "'", 1);. 
2b80: 20 77 68 69 6c 65 28 20 7a 5b 30 5d 20 29 7b 0a   while( z[0] ){.
2b90: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 5b 69      for(i=0; z[i
2ba0: 5d 20 26 26 20 7a 5b 69 5d 21 3d 27 5c 27 27 3b  ] && z[i]!='\'';
2bb0: 20 69 2b 2b 29 7b 7d 0a 20 20 20 20 69 66 28 20   i++){}.    if( 
2bc0: 7a 5b 69 5d 20 29 7b 0a 20 20 20 20 20 20 73 74  z[i] ){.      st
2bd0: 72 69 6e 67 41 70 70 65 6e 64 28 70 2c 20 7a 2c  ringAppend(p, z,
2be0: 20 69 2b 31 29 3b 0a 20 20 20 20 20 20 73 74 72   i+1);.      str
2bf0: 69 6e 67 41 70 70 65 6e 64 28 70 2c 20 22 27 22  ingAppend(p, "'"
2c00: 2c 20 31 29 3b 0a 20 20 20 20 20 20 7a 20 2b 3d  , 1);.      z +=
2c10: 20 69 2b 31 3b 0a 20 20 20 20 7d 65 6c 73 65 7b   i+1;.    }else{
2c20: 0a 20 20 20 20 20 20 73 74 72 69 6e 67 41 70 70  .      stringApp
2c30: 65 6e 64 28 70 2c 20 7a 2c 20 69 29 3b 0a 20 20  end(p, z, i);.  
2c40: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
2c50: 0a 20 20 7d 0a 20 20 73 74 72 69 6e 67 41 70 70  .  }.  stringApp
2c60: 65 6e 64 28 70 2c 20 22 27 22 2c 20 31 29 3b 0a  end(p, "'", 1);.
2c70: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 61 6c 6c 62 61 63  }../*.** Callbac
2c80: 6b 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 65  k function for e
2c90: 76 61 6c 53 71 6c 28 29 0a 2a 2f 0a 73 74 61 74  valSql().*/.stat
2ca0: 69 63 20 69 6e 74 20 65 76 61 6c 43 61 6c 6c 62  ic int evalCallb
2cb0: 61 63 6b 28 76 6f 69 64 20 2a 70 43 44 61 74 61  ack(void *pCData
2cc0: 2c 20 69 6e 74 20 61 72 67 63 2c 20 63 68 61 72  , int argc, char
2cd0: 20 2a 2a 61 72 67 76 2c 20 63 68 61 72 20 2a 2a   **argv, char **
2ce0: 61 7a 43 6f 6c 29 7b 0a 20 20 53 74 72 69 6e 67  azCol){.  String
2cf0: 20 2a 70 20 3d 20 28 53 74 72 69 6e 67 2a 29 70   *p = (String*)p
2d00: 43 44 61 74 61 3b 0a 20 20 69 6e 74 20 69 3b 0a  CData;.  int i;.
2d10: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
2d20: 45 52 28 61 7a 43 6f 6c 29 3b 0a 20 20 66 6f 72  ER(azCol);.  for
2d30: 28 69 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b  (i=0; i<argc; i+
2d40: 2b 29 20 73 74 72 69 6e 67 41 70 70 65 6e 64 54  +) stringAppendT
2d50: 65 72 6d 28 70 2c 20 61 72 67 76 5b 69 5d 29 3b  erm(p, argv[i]);
2d60: 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a  .  return 0;.}..
2d70: 2f 2a 0a 2a 2a 20 52 75 6e 20 61 72 62 69 74 72  /*.** Run arbitr
2d80: 61 72 79 20 53 51 4c 20 61 6e 64 20 72 65 63 6f  ary SQL and reco
2d90: 72 64 20 74 68 65 20 72 65 73 75 6c 74 73 20 69  rd the results i
2da0: 6e 20 61 6e 20 6f 75 74 70 75 74 20 73 74 72 69  n an output stri
2db0: 6e 67 0a 2a 2a 20 67 69 76 65 6e 20 62 79 20 74  ng.** given by t
2dc0: 68 65 20 66 69 72 73 74 20 70 61 72 61 6d 65 74  he first paramet
2dd0: 65 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  er..*/.static in
2de0: 74 20 65 76 61 6c 53 71 6c 28 53 74 72 69 6e 67  t evalSql(String
2df0: 20 2a 70 2c 20 63 6f 6e 73 74 20 63 68 61 72 20   *p, const char 
2e00: 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a  *zFormat, ...){.
2e10: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20    va_list ap;.  
2e20: 63 68 61 72 20 2a 7a 53 71 6c 3b 0a 20 20 69 6e  char *zSql;.  in
2e30: 74 20 72 63 3b 0a 20 20 63 68 61 72 20 2a 7a 45  t rc;.  char *zE
2e40: 72 72 4d 73 67 20 3d 20 30 3b 0a 20 20 76 61 5f  rrMsg = 0;.  va_
2e50: 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d 61  start(ap, zForma
2e60: 74 29 3b 0a 20 20 7a 53 71 6c 20 3d 20 73 71 6c  t);.  zSql = sql
2e70: 69 74 65 33 5f 76 6d 70 72 69 6e 74 66 28 7a 46  ite3_vmprintf(zF
2e80: 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 76 61  ormat, ap);.  va
2e90: 5f 65 6e 64 28 61 70 29 3b 0a 20 20 61 73 73 65  _end(ap);.  asse
2ea0: 72 74 28 20 67 2e 69 54 69 6d 65 6f 75 74 3e 30  rt( g.iTimeout>0
2eb0: 20 29 3b 0a 20 20 72 63 20 3d 20 73 71 6c 69 74   );.  rc = sqlit
2ec0: 65 33 5f 65 78 65 63 28 67 2e 64 62 2c 20 7a 53  e3_exec(g.db, zS
2ed0: 71 6c 2c 20 65 76 61 6c 43 61 6c 6c 62 61 63 6b  ql, evalCallback
2ee0: 2c 20 70 2c 20 26 7a 45 72 72 4d 73 67 29 3b 0a  , p, &zErrMsg);.
2ef0: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a    sqlite3_free(z
2f00: 53 71 6c 29 3b 0a 20 20 69 66 28 20 72 63 20 29  Sql);.  if( rc )
2f10: 7b 0a 20 20 20 20 63 68 61 72 20 7a 45 72 72 5b  {.    char zErr[
2f20: 33 30 5d 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  30];.    sqlite3
2f30: 5f 73 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66  _snprintf(sizeof
2f40: 28 7a 45 72 72 29 2c 20 7a 45 72 72 2c 20 22 65  (zErr), zErr, "e
2f50: 72 72 6f 72 28 25 64 29 22 2c 20 72 63 29 3b 0a  rror(%d)", rc);.
2f60: 20 20 20 20 73 74 72 69 6e 67 41 70 70 65 6e 64      stringAppend
2f70: 54 65 72 6d 28 70 2c 20 7a 45 72 72 29 3b 0a 20  Term(p, zErr);. 
2f80: 20 20 20 69 66 28 20 7a 45 72 72 4d 73 67 20 29     if( zErrMsg )
2f90: 7b 0a 20 20 20 20 20 20 73 74 72 69 6e 67 41 70  {.      stringAp
2fa0: 70 65 6e 64 54 65 72 6d 28 70 2c 20 7a 45 72 72  pendTerm(p, zErr
2fb0: 4d 73 67 29 3b 0a 20 20 20 20 20 20 73 71 6c 69  Msg);.      sqli
2fc0: 74 65 33 5f 66 72 65 65 28 7a 45 72 72 4d 73 67  te3_free(zErrMsg
2fd0: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72  );.    }.  }.  r
2fe0: 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a  eturn rc;.}../*.
2ff0: 2a 2a 20 41 75 78 69 6c 69 61 72 79 20 53 51 4c  ** Auxiliary SQL
3000: 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 72 65 63   function to rec
3010: 75 72 73 69 76 65 6c 79 20 65 76 61 6c 75 61 74  ursively evaluat
3020: 65 20 53 51 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63  e SQL..*/.static
3030: 20 76 6f 69 64 20 65 76 61 6c 46 75 6e 63 28 0a   void evalFunc(.
3040: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
3050: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
3060: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
3070: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
3080: 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  {.  sqlite3 *db 
3090: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
30a0: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
30b0: 65 78 74 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68  ext);.  const ch
30c0: 61 72 20 2a 7a 53 71 6c 20 3d 20 28 63 6f 6e 73  ar *zSql = (cons
30d0: 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f  t char*)sqlite3_
30e0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
30f0: 30 5d 29 3b 0a 20 20 53 74 72 69 6e 67 20 72 65  0]);.  String re
3100: 73 3b 0a 20 20 63 68 61 72 20 2a 7a 45 72 72 4d  s;.  char *zErrM
3110: 73 67 20 3d 20 30 3b 0a 20 20 69 6e 74 20 72 63  sg = 0;.  int rc
3120: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
3130: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 6d 65  ETER(argc);.  me
3140: 6d 73 65 74 28 26 72 65 73 2c 20 30 2c 20 73 69  mset(&res, 0, si
3150: 7a 65 6f 66 28 72 65 73 29 29 3b 0a 20 20 72 63  zeof(res));.  rc
3160: 20 3d 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28   = sqlite3_exec(
3170: 64 62 2c 20 7a 53 71 6c 2c 20 65 76 61 6c 43 61  db, zSql, evalCa
3180: 6c 6c 62 61 63 6b 2c 20 26 72 65 73 2c 20 26 7a  llback, &res, &z
3190: 45 72 72 4d 73 67 29 3b 0a 20 20 69 66 28 20 7a  ErrMsg);.  if( z
31a0: 45 72 72 4d 73 67 20 29 7b 0a 20 20 20 20 73 71  ErrMsg ){.    sq
31b0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
31c0: 6f 72 28 63 6f 6e 74 65 78 74 2c 20 7a 45 72 72  or(context, zErr
31d0: 4d 73 67 2c 20 2d 31 29 3b 0a 20 20 20 20 73 71  Msg, -1);.    sq
31e0: 6c 69 74 65 33 5f 66 72 65 65 28 7a 45 72 72 4d  lite3_free(zErrM
31f0: 73 67 29 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28  sg);.  }else if(
3200: 20 72 63 20 29 7b 0a 20 20 20 20 73 71 6c 69 74   rc ){.    sqlit
3210: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
3220: 63 6f 64 65 28 63 6f 6e 74 65 78 74 2c 20 72 63  code(context, rc
3230: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
3240: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
3250: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 72 65 73  ext(context, res
3260: 2e 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54  .z, -1, SQLITE_T
3270: 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 20  RANSIENT);.  }. 
3280: 20 73 74 72 69 6e 67 46 72 65 65 28 26 72 65 73   stringFree(&res
3290: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4c 6f 6f 6b  );.}../*.** Look
32a0: 20 75 70 20 74 68 65 20 6e 65 78 74 20 74 61 73   up the next tas
32b0: 6b 20 66 6f 72 20 63 6c 69 65 6e 74 20 69 43 6c  k for client iCl
32c0: 69 65 6e 74 20 69 6e 20 74 68 65 20 64 61 74 61  ient in the data
32d0: 62 61 73 65 2e 0a 2a 2a 20 52 65 74 75 72 6e 20  base..** Return 
32e0: 74 68 65 20 74 61 73 6b 20 73 63 72 69 70 74 20  the task script 
32f0: 61 6e 64 20 74 68 65 20 74 61 73 6b 20 6e 75 6d  and the task num
3300: 62 65 72 20 61 6e 64 20 6d 61 72 6b 20 74 68 61  ber and mark tha
3310: 74 0a 2a 2a 20 74 61 73 6b 20 61 73 20 62 65 69  t.** task as bei
3320: 6e 67 20 75 6e 64 65 72 20 77 61 79 2e 0a 2a 2f  ng under way..*/
3330: 0a 73 74 61 74 69 63 20 69 6e 74 20 73 74 61 72  .static int star
3340: 74 53 63 72 69 70 74 28 0a 20 20 69 6e 74 20 69  tScript(.  int i
3350: 43 6c 69 65 6e 74 2c 20 20 20 20 20 20 20 20 20  Client,         
3360: 20 20 20 20 20 2f 2a 20 54 68 65 20 63 6c 69 65       /* The clie
3370: 6e 74 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 63  nt number */.  c
3380: 68 61 72 20 2a 2a 70 7a 53 63 72 69 70 74 2c 20  har **pzScript, 
3390: 20 20 20 20 20 20 20 20 20 2f 2a 20 57 72 69 74           /* Writ
33a0: 65 20 74 61 73 6b 20 73 63 72 69 70 74 20 68 65  e task script he
33b0: 72 65 20 2a 2f 0a 20 20 69 6e 74 20 2a 70 54 61  re */.  int *pTa
33c0: 73 6b 49 64 2c 20 20 20 20 20 20 20 20 20 20 20  skId,           
33d0: 20 20 2f 2a 20 57 72 69 74 65 20 74 61 73 6b 20    /* Write task 
33e0: 6e 75 6d 62 65 72 20 68 65 72 65 20 2a 2f 0a 20  number here */. 
33f0: 20 63 68 61 72 20 2a 2a 70 7a 54 61 73 6b 4e 61   char **pzTaskNa
3400: 6d 65 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 61  me         /* Na
3410: 6d 65 20 6f 66 20 74 68 65 20 74 61 73 6b 20 2a  me of the task *
3420: 2f 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f 73  /.){.  sqlite3_s
3430: 74 6d 74 20 2a 70 53 74 6d 74 20 3d 20 30 3b 0a  tmt *pStmt = 0;.
3440: 20 20 69 6e 74 20 74 61 73 6b 49 64 3b 0a 20 20    int taskId;.  
3450: 69 6e 74 20 72 63 3b 0a 20 20 69 6e 74 20 74 6f  int rc;.  int to
3460: 74 61 6c 54 69 6d 65 20 3d 20 30 3b 0a 0a 20 20  talTime = 0;..  
3470: 2a 70 7a 53 63 72 69 70 74 20 3d 20 30 3b 0a 20  *pzScript = 0;. 
3480: 20 67 2e 69 54 69 6d 65 6f 75 74 20 3d 20 30 3b   g.iTimeout = 0;
3490: 0a 20 20 77 68 69 6c 65 28 31 29 7b 0a 20 20 20  .  while(1){.   
34a0: 20 72 63 20 3d 20 74 72 79 53 71 6c 28 22 42 45   rc = trySql("BE
34b0: 47 49 4e 20 49 4d 4d 45 44 49 41 54 45 22 29 3b  GIN IMMEDIATE");
34c0: 0a 20 20 20 20 69 66 28 20 72 63 3d 3d 53 51 4c  .    if( rc==SQL
34d0: 49 54 45 5f 42 55 53 59 20 29 7b 0a 20 20 20 20  ITE_BUSY ){.    
34e0: 20 20 73 71 6c 69 74 65 33 5f 73 6c 65 65 70 28    sqlite3_sleep(
34f0: 31 30 29 3b 0a 20 20 20 20 20 20 74 6f 74 61 6c  10);.      total
3500: 54 69 6d 65 20 2b 3d 20 31 30 3b 0a 20 20 20 20  Time += 10;.    
3510: 20 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20    continue;.    
3520: 7d 0a 20 20 20 20 69 66 28 20 72 63 21 3d 53 51  }.    if( rc!=SQ
3530: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20  LITE_OK ){.     
3540: 20 66 61 74 61 6c 45 72 72 6f 72 28 22 69 6e 20   fatalError("in 
3550: 73 74 61 72 74 53 63 72 69 70 74 3a 20 25 73 22  startScript: %s"
3560: 2c 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67  , sqlite3_errmsg
3570: 28 67 2e 64 62 29 29 3b 0a 20 20 20 20 7d 0a 20  (g.db));.    }. 
3580: 20 20 20 69 66 28 20 67 2e 6e 45 72 72 6f 72 20     if( g.nError 
3590: 7c 7c 20 67 2e 6e 54 65 73 74 20 29 7b 0a 20 20  || g.nTest ){.  
35a0: 20 20 20 20 72 75 6e 53 71 6c 28 22 55 50 44 41      runSql("UPDA
35b0: 54 45 20 63 6f 75 6e 74 65 72 73 20 53 45 54 20  TE counters SET 
35c0: 6e 45 72 72 6f 72 3d 6e 45 72 72 6f 72 2b 25 64  nError=nError+%d
35d0: 2c 20 6e 54 65 73 74 3d 6e 54 65 73 74 2b 25 64  , nTest=nTest+%d
35e0: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  ",.             
35f0: 67 2e 6e 45 72 72 6f 72 2c 20 67 2e 6e 54 65 73  g.nError, g.nTes
3600: 74 29 3b 0a 20 20 20 20 20 20 67 2e 6e 45 72 72  t);.      g.nErr
3610: 6f 72 20 3d 20 30 3b 0a 20 20 20 20 20 20 67 2e  or = 0;.      g.
3620: 6e 54 65 73 74 20 3d 20 30 3b 0a 20 20 20 20 7d  nTest = 0;.    }
3630: 0a 20 20 20 20 70 53 74 6d 74 20 3d 20 70 72 65  .    pStmt = pre
3640: 70 61 72 65 53 71 6c 28 22 53 45 4c 45 43 54 20  pareSql("SELECT 
3650: 31 20 46 52 4f 4d 20 63 6c 69 65 6e 74 20 57 48  1 FROM client WH
3660: 45 52 45 20 69 64 3d 25 64 20 41 4e 44 20 77 61  ERE id=%d AND wa
3670: 6e 74 48 61 6c 74 22 2c 69 43 6c 69 65 6e 74 29  ntHalt",iClient)
3680: 3b 0a 20 20 20 20 72 63 20 3d 20 73 71 6c 69 74  ;.    rc = sqlit
3690: 65 33 5f 73 74 65 70 28 70 53 74 6d 74 29 3b 0a  e3_step(pStmt);.
36a0: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 69 6e 61      sqlite3_fina
36b0: 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 20  lize(pStmt);.   
36c0: 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f   if( rc==SQLITE_
36d0: 52 4f 57 20 29 7b 0a 20 20 20 20 20 20 72 75 6e  ROW ){.      run
36e0: 53 71 6c 28 22 44 45 4c 45 54 45 20 46 52 4f 4d  Sql("DELETE FROM
36f0: 20 63 6c 69 65 6e 74 20 57 48 45 52 45 20 69 64   client WHERE id
3700: 3d 25 64 22 2c 20 69 43 6c 69 65 6e 74 29 3b 0a  =%d", iClient);.
3710: 20 20 20 20 20 20 67 2e 69 54 69 6d 65 6f 75 74        g.iTimeout
3720: 20 3d 20 44 45 46 41 55 4c 54 5f 54 49 4d 45 4f   = DEFAULT_TIMEO
3730: 55 54 3b 0a 20 20 20 20 20 20 72 75 6e 53 71 6c  UT;.      runSql
3740: 28 22 43 4f 4d 4d 49 54 20 54 52 41 4e 53 41 43  ("COMMIT TRANSAC
3750: 54 49 4f 4e 3b 22 29 3b 0a 20 20 20 20 20 20 72  TION;");.      r
3760: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 44 4f 4e  eturn SQLITE_DON
3770: 45 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70 53 74  E;.    }.    pSt
3780: 6d 74 20 3d 20 70 72 65 70 61 72 65 53 71 6c 28  mt = prepareSql(
3790: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22  .              "
37a0: 53 45 4c 45 43 54 20 73 63 72 69 70 74 2c 20 69  SELECT script, i
37b0: 64 2c 20 6e 61 6d 65 20 46 52 4f 4d 20 74 61 73  d, name FROM tas
37c0: 6b 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  k".             
37d0: 20 22 20 57 48 45 52 45 20 63 6c 69 65 6e 74 3d   " WHERE client=
37e0: 25 64 20 41 4e 44 20 73 74 61 72 74 74 69 6d 65  %d AND starttime
37f0: 20 49 53 20 4e 55 4c 4c 22 0a 20 20 20 20 20 20   IS NULL".      
3800: 20 20 20 20 20 20 20 20 22 20 4f 52 44 45 52 20          " ORDER 
3810: 42 59 20 69 64 20 4c 49 4d 49 54 20 31 22 2c 20  BY id LIMIT 1", 
3820: 69 43 6c 69 65 6e 74 29 3b 0a 20 20 20 20 72 63  iClient);.    rc
3830: 20 3d 20 73 71 6c 69 74 65 33 5f 73 74 65 70 28   = sqlite3_step(
3840: 70 53 74 6d 74 29 3b 0a 20 20 20 20 69 66 28 20  pStmt);.    if( 
3850: 72 63 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29  rc==SQLITE_ROW )
3860: 7b 0a 20 20 20 20 20 20 69 6e 74 20 6e 20 3d 20  {.      int n = 
3870: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62  sqlite3_column_b
3880: 79 74 65 73 28 70 53 74 6d 74 2c 20 30 29 3b 0a  ytes(pStmt, 0);.
3890: 20 20 20 20 20 20 2a 70 7a 53 63 72 69 70 74 20        *pzScript 
38a0: 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63  = sqlite3_malloc
38b0: 28 6e 2b 31 29 3b 0a 20 20 20 20 20 20 73 74 72  (n+1);.      str
38c0: 63 70 79 28 2a 70 7a 53 63 72 69 70 74 2c 20 28  cpy(*pzScript, (
38d0: 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69  const char*)sqli
38e0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28  te3_column_text(
38f0: 70 53 74 6d 74 2c 20 30 29 29 3b 0a 20 20 20 20  pStmt, 0));.    
3900: 20 20 2a 70 54 61 73 6b 49 64 20 3d 20 74 61 73    *pTaskId = tas
3910: 6b 49 64 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  kId = sqlite3_co
3920: 6c 75 6d 6e 5f 69 6e 74 28 70 53 74 6d 74 2c 20  lumn_int(pStmt, 
3930: 31 29 3b 0a 20 20 20 20 20 20 2a 70 7a 54 61 73  1);.      *pzTas
3940: 6b 4e 61 6d 65 20 3d 20 73 71 6c 69 74 65 33 5f  kName = sqlite3_
3950: 6d 70 72 69 6e 74 66 28 22 25 73 22 2c 20 73 71  mprintf("%s", sq
3960: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78  lite3_column_tex
3970: 74 28 70 53 74 6d 74 2c 20 32 29 29 3b 0a 20 20  t(pStmt, 2));.  
3980: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 69 6e 61      sqlite3_fina
3990: 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 20  lize(pStmt);.   
39a0: 20 20 20 72 75 6e 53 71 6c 28 22 55 50 44 41 54     runSql("UPDAT
39b0: 45 20 74 61 73 6b 22 0a 20 20 20 20 20 20 20 20  E task".        
39c0: 20 20 20 20 20 22 20 20 20 53 45 54 20 73 74 61       "   SET sta
39d0: 72 74 74 69 6d 65 3d 73 74 72 66 74 69 6d 65 28  rttime=strftime(
39e0: 27 25 25 59 2d 25 25 6d 2d 25 25 64 20 25 25 48  '%%Y-%%m-%%d %%H
39f0: 3a 25 25 4d 3a 25 25 66 27 2c 27 6e 6f 77 27 29  :%%M:%%f','now')
3a00: 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 22  ".             "
3a10: 20 57 48 45 52 45 20 69 64 3d 25 64 3b 22 2c 20   WHERE id=%d;", 
3a20: 74 61 73 6b 49 64 29 3b 0a 20 20 20 20 20 20 67  taskId);.      g
3a30: 2e 69 54 69 6d 65 6f 75 74 20 3d 20 44 45 46 41  .iTimeout = DEFA
3a40: 55 4c 54 5f 54 49 4d 45 4f 55 54 3b 0a 20 20 20  ULT_TIMEOUT;.   
3a50: 20 20 20 72 75 6e 53 71 6c 28 22 43 4f 4d 4d 49     runSql("COMMI
3a60: 54 20 54 52 41 4e 53 41 43 54 49 4f 4e 3b 22 29  T TRANSACTION;")
3a70: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 53  ;.      return S
3a80: 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 20 20 7d 0a  QLITE_OK;.    }.
3a90: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 69 6e 61      sqlite3_fina
3aa0: 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 20  lize(pStmt);.   
3ab0: 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f   if( rc==SQLITE_
3ac0: 44 4f 4e 45 20 29 7b 0a 20 20 20 20 20 20 69 66  DONE ){.      if
3ad0: 28 20 74 6f 74 61 6c 54 69 6d 65 3e 33 30 30 30  ( totalTime>3000
3ae0: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 65 72 72  0 ){.        err
3af0: 6f 72 4d 65 73 73 61 67 65 28 22 57 61 69 74 65  orMessage("Waite
3b00: 64 20 6f 76 65 72 20 33 30 20 73 65 63 6f 6e 64  d over 30 second
3b10: 73 20 77 69 74 68 20 6e 6f 20 77 6f 72 6b 2e 20  s with no work. 
3b20: 20 47 69 76 69 6e 67 20 75 70 2e 22 29 3b 0a 20   Giving up.");. 
3b30: 20 20 20 20 20 20 20 72 75 6e 53 71 6c 28 22 44         runSql("D
3b40: 45 4c 45 54 45 20 46 52 4f 4d 20 63 6c 69 65 6e  ELETE FROM clien
3b50: 74 20 57 48 45 52 45 20 69 64 3d 25 64 3b 20 43  t WHERE id=%d; C
3b60: 4f 4d 4d 49 54 3b 22 2c 20 69 43 6c 69 65 6e 74  OMMIT;", iClient
3b70: 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  );.        sqlit
3b80: 65 33 5f 63 6c 6f 73 65 28 67 2e 64 62 29 3b 0a  e3_close(g.db);.
3b90: 20 20 20 20 20 20 20 20 65 78 69 74 28 31 29 3b          exit(1);
3ba0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 77  .      }.      w
3bb0: 68 69 6c 65 28 20 74 72 79 53 71 6c 28 22 43 4f  hile( trySql("CO
3bc0: 4d 4d 49 54 22 29 3d 3d 53 51 4c 49 54 45 5f 42  MMIT")==SQLITE_B
3bd0: 55 53 59 20 29 7b 0a 20 20 20 20 20 20 20 20 73  USY ){.        s
3be0: 71 6c 69 74 65 33 5f 73 6c 65 65 70 28 31 30 29  qlite3_sleep(10)
3bf0: 3b 0a 20 20 20 20 20 20 20 20 74 6f 74 61 6c 54  ;.        totalT
3c00: 69 6d 65 20 2b 3d 20 31 30 3b 0a 20 20 20 20 20  ime += 10;.     
3c10: 20 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33   }.      sqlite3
3c20: 5f 73 6c 65 65 70 28 31 30 30 29 3b 0a 20 20 20  _sleep(100);.   
3c30: 20 20 20 74 6f 74 61 6c 54 69 6d 65 20 2b 3d 20     totalTime += 
3c40: 31 30 30 3b 0a 20 20 20 20 20 20 63 6f 6e 74 69  100;.      conti
3c50: 6e 75 65 3b 0a 20 20 20 20 7d 0a 20 20 20 20 66  nue;.    }.    f
3c60: 61 74 61 6c 45 72 72 6f 72 28 22 25 73 22 2c 20  atalError("%s", 
3c70: 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 28 67  sqlite3_errmsg(g
3c80: 2e 64 62 29 29 3b 0a 20 20 7d 0a 20 20 67 2e 69  .db));.  }.  g.i
3c90: 54 69 6d 65 6f 75 74 20 3d 20 44 45 46 41 55 4c  Timeout = DEFAUL
3ca0: 54 5f 54 49 4d 45 4f 55 54 3b 0a 7d 0a 0a 2f 2a  T_TIMEOUT;.}../*
3cb0: 0a 2a 2a 20 4d 61 72 6b 20 61 20 73 63 72 69 70  .** Mark a scrip
3cc0: 74 20 61 73 20 68 61 76 69 6e 67 20 66 69 6e 69  t as having fini
3cd0: 73 68 65 64 2e 20 20 20 52 65 6d 6f 76 65 20 74  shed.   Remove t
3ce0: 68 65 20 43 4c 49 45 4e 54 20 74 61 62 6c 65 20  he CLIENT table 
3cf0: 65 6e 74 72 79 0a 2a 2a 20 69 66 20 62 53 68 75  entry.** if bShu
3d00: 74 64 6f 77 6e 20 69 73 20 74 72 75 65 2e 0a 2a  tdown is true..*
3d10: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 66 69 6e  /.static int fin
3d20: 69 73 68 53 63 72 69 70 74 28 69 6e 74 20 69 43  ishScript(int iC
3d30: 6c 69 65 6e 74 2c 20 69 6e 74 20 74 61 73 6b 49  lient, int taskI
3d40: 64 2c 20 69 6e 74 20 62 53 68 75 74 64 6f 77 6e  d, int bShutdown
3d50: 29 7b 0a 20 20 72 75 6e 53 71 6c 28 22 55 50 44  ){.  runSql("UPD
3d60: 41 54 45 20 74 61 73 6b 22 0a 20 20 20 20 20 20  ATE task".      
3d70: 20 20 20 22 20 20 20 53 45 54 20 65 6e 64 74 69     "   SET endti
3d80: 6d 65 3d 73 74 72 66 74 69 6d 65 28 27 25 25 59  me=strftime('%%Y
3d90: 2d 25 25 6d 2d 25 25 64 20 25 25 48 3a 25 25 4d  -%%m-%%d %%H:%%M
3da0: 3a 25 25 66 27 2c 27 6e 6f 77 27 29 22 0a 20 20  :%%f','now')".  
3db0: 20 20 20 20 20 20 20 22 20 57 48 45 52 45 20 69         " WHERE i
3dc0: 64 3d 25 64 3b 22 2c 20 74 61 73 6b 49 64 29 3b  d=%d;", taskId);
3dd0: 0a 20 20 69 66 28 20 62 53 68 75 74 64 6f 77 6e  .  if( bShutdown
3de0: 20 29 7b 0a 20 20 20 20 72 75 6e 53 71 6c 28 22   ){.    runSql("
3df0: 44 45 4c 45 54 45 20 46 52 4f 4d 20 63 6c 69 65  DELETE FROM clie
3e00: 6e 74 20 57 48 45 52 45 20 69 64 3d 25 64 22 2c  nt WHERE id=%d",
3e10: 20 69 43 6c 69 65 6e 74 29 3b 0a 20 20 7d 0a 20   iClient);.  }. 
3e20: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
3e30: 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 74 61 72  K;.}../*.** Star
3e40: 74 20 75 70 20 61 20 63 6c 69 65 6e 74 20 70 72  t up a client pr
3e50: 6f 63 65 73 73 20 66 6f 72 20 69 43 6c 69 65 6e  ocess for iClien
3e60: 74 2c 20 69 66 20 69 74 20 69 73 20 6e 6f 74 20  t, if it is not 
3e70: 61 6c 72 65 61 64 79 0a 2a 2a 20 72 75 6e 6e 69  already.** runni
3e80: 6e 67 2e 20 20 49 66 20 74 68 65 20 63 6c 69 65  ng.  If the clie
3e90: 6e 74 20 69 73 20 61 6c 72 65 61 64 79 20 72 75  nt is already ru
3ea0: 6e 6e 69 6e 67 2c 20 74 68 65 6e 20 74 68 69 73  nning, then this
3eb0: 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 69 73 20 61   routine.** is a
3ec0: 20 6e 6f 2d 6f 70 2e 0a 2a 2f 0a 73 74 61 74 69   no-op..*/.stati
3ed0: 63 20 76 6f 69 64 20 73 74 61 72 74 43 6c 69 65  c void startClie
3ee0: 6e 74 28 69 6e 74 20 69 43 6c 69 65 6e 74 29 7b  nt(int iClient){
3ef0: 0a 20 20 72 75 6e 53 71 6c 28 22 49 4e 53 45 52  .  runSql("INSER
3f00: 54 20 4f 52 20 49 47 4e 4f 52 45 20 49 4e 54 4f  T OR IGNORE INTO
3f10: 20 63 6c 69 65 6e 74 20 56 41 4c 55 45 53 28 25   client VALUES(%
3f20: 64 2c 30 29 22 2c 20 69 43 6c 69 65 6e 74 29 3b  d,0)", iClient);
3f30: 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 63  .  if( sqlite3_c
3f40: 68 61 6e 67 65 73 28 67 2e 64 62 29 20 29 7b 0a  hanges(g.db) ){.
3f50: 20 20 20 20 63 68 61 72 20 2a 7a 53 79 73 3b 0a      char *zSys;.
3f60: 20 20 20 20 69 6e 74 20 72 63 3b 0a 20 20 20 20      int rc;.    
3f70: 7a 53 79 73 20 3d 20 73 71 6c 69 74 65 33 5f 6d  zSys = sqlite3_m
3f80: 70 72 69 6e 74 66 28 22 25 73 20 5c 22 25 73 5c  printf("%s \"%s\
3f90: 22 20 2d 2d 63 6c 69 65 6e 74 20 25 64 20 2d 2d  " --client %d --
3fa0: 74 72 61 63 65 20 25 64 22 2c 0a 20 20 20 20 20  trace %d",.     
3fb0: 20 20 20 20 20 20 20 20 20 20 20 20 67 2e 61 72              g.ar
3fc0: 67 76 30 2c 20 67 2e 7a 44 62 46 69 6c 65 2c 20  gv0, g.zDbFile, 
3fd0: 69 43 6c 69 65 6e 74 2c 20 67 2e 69 54 72 61 63  iClient, g.iTrac
3fe0: 65 29 3b 0a 20 20 20 20 69 66 28 20 67 2e 62 53  e);.    if( g.bS
3ff0: 71 6c 54 72 61 63 65 20 29 7b 0a 20 20 20 20 20  qlTrace ){.     
4000: 20 7a 53 79 73 20 3d 20 73 71 6c 69 74 65 33 5f   zSys = sqlite3_
4010: 6d 70 72 69 6e 74 66 28 22 25 7a 20 2d 2d 73 71  mprintf("%z --sq
4020: 6c 74 72 61 63 65 22 2c 20 7a 53 79 73 29 3b 0a  ltrace", zSys);.
4030: 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 67 2e      }.    if( g.
4040: 62 53 79 6e 63 20 29 7b 0a 20 20 20 20 20 20 7a  bSync ){.      z
4050: 53 79 73 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70  Sys = sqlite3_mp
4060: 72 69 6e 74 66 28 22 25 7a 20 2d 2d 73 79 6e 63  rintf("%z --sync
4070: 22 2c 20 7a 53 79 73 29 3b 0a 20 20 20 20 7d 0a  ", zSys);.    }.
4080: 20 20 20 20 69 66 28 20 67 2e 7a 56 66 73 20 29      if( g.zVfs )
4090: 7b 0a 20 20 20 20 20 20 7a 53 79 73 20 3d 20 73  {.      zSys = s
40a0: 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22  qlite3_mprintf("
40b0: 25 7a 20 2d 2d 76 66 73 20 5c 22 25 73 5c 22 22  %z --vfs \"%s\""
40c0: 2c 20 7a 53 79 73 2c 20 67 2e 7a 56 66 73 29 3b  , zSys, g.zVfs);
40d0: 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 67  .    }.    if( g
40e0: 2e 69 54 72 61 63 65 3e 3d 32 20 29 20 6c 6f 67  .iTrace>=2 ) log
40f0: 4d 65 73 73 61 67 65 28 22 73 79 73 74 65 6d 28  Message("system(
4100: 27 25 71 27 29 22 2c 20 7a 53 79 73 29 3b 0a 23  '%q')", zSys);.#
4110: 69 66 20 21 64 65 66 69 6e 65 64 28 5f 57 49 4e  if !defined(_WIN
4120: 33 32 29 0a 20 20 20 20 7a 53 79 73 20 3d 20 73  32).    zSys = s
4130: 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22  qlite3_mprintf("
4140: 25 7a 20 26 22 2c 20 7a 53 79 73 29 3b 0a 20 20  %z &", zSys);.  
4150: 20 20 72 63 20 3d 20 73 79 73 74 65 6d 28 7a 53    rc = system(zS
4160: 79 73 29 3b 0a 20 20 20 20 69 66 28 20 72 63 20  ys);.    if( rc 
4170: 29 20 65 72 72 6f 72 4d 65 73 73 61 67 65 28 22  ) errorMessage("
4180: 73 79 73 74 65 6d 28 29 20 66 61 69 6c 73 20 77  system() fails w
4190: 69 74 68 20 65 72 72 6f 72 20 63 6f 64 65 20 25  ith error code %
41a0: 64 22 2c 20 72 63 29 3b 0a 23 65 6c 73 65 0a 20  d", rc);.#else. 
41b0: 20 20 20 7b 0a 20 20 20 20 20 20 53 54 41 52 54     {.      START
41c0: 55 50 49 4e 46 4f 41 20 73 74 61 72 74 75 70 49  UPINFOA startupI
41d0: 6e 66 6f 3b 0a 20 20 20 20 20 20 50 52 4f 43 45  nfo;.      PROCE
41e0: 53 53 5f 49 4e 46 4f 52 4d 41 54 49 4f 4e 20 70  SS_INFORMATION p
41f0: 72 6f 63 65 73 73 49 6e 66 6f 3b 0a 20 20 20 20  rocessInfo;.    
4200: 20 20 6d 65 6d 73 65 74 28 26 73 74 61 72 74 75    memset(&startu
4210: 70 49 6e 66 6f 2c 20 30 2c 20 73 69 7a 65 6f 66  pInfo, 0, sizeof
4220: 28 73 74 61 72 74 75 70 49 6e 66 6f 29 29 3b 0a  (startupInfo));.
4230: 20 20 20 20 20 20 73 74 61 72 74 75 70 49 6e 66        startupInf
4240: 6f 2e 63 62 20 3d 20 73 69 7a 65 6f 66 28 73 74  o.cb = sizeof(st
4250: 61 72 74 75 70 49 6e 66 6f 29 3b 0a 20 20 20 20  artupInfo);.    
4260: 20 20 6d 65 6d 73 65 74 28 26 70 72 6f 63 65 73    memset(&proces
4270: 73 49 6e 66 6f 2c 20 30 2c 20 73 69 7a 65 6f 66  sInfo, 0, sizeof
4280: 28 70 72 6f 63 65 73 73 49 6e 66 6f 29 29 3b 0a  (processInfo));.
4290: 20 20 20 20 20 20 72 63 20 3d 20 43 72 65 61 74        rc = Creat
42a0: 65 50 72 6f 63 65 73 73 41 28 4e 55 4c 4c 2c 20  eProcessA(NULL, 
42b0: 7a 53 79 73 2c 20 4e 55 4c 4c 2c 20 4e 55 4c 4c  zSys, NULL, NULL
42c0: 2c 20 46 41 4c 53 45 2c 20 30 2c 20 4e 55 4c 4c  , FALSE, 0, NULL
42d0: 2c 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20  , NULL,.        
42e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
42f0: 26 73 74 61 72 74 75 70 49 6e 66 6f 2c 20 26 70  &startupInfo, &p
4300: 72 6f 63 65 73 73 49 6e 66 6f 29 3b 0a 20 20 20  rocessInfo);.   
4310: 20 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20     if( rc ){.   
4320: 20 20 20 20 20 43 6c 6f 73 65 48 61 6e 64 6c 65       CloseHandle
4330: 28 70 72 6f 63 65 73 73 49 6e 66 6f 2e 68 54 68  (processInfo.hTh
4340: 72 65 61 64 29 3b 0a 20 20 20 20 20 20 20 20 43  read);.        C
4350: 6c 6f 73 65 48 61 6e 64 6c 65 28 70 72 6f 63 65  loseHandle(proce
4360: 73 73 49 6e 66 6f 2e 68 50 72 6f 63 65 73 73 29  ssInfo.hProcess)
4370: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20  ;.      }else{. 
4380: 20 20 20 20 20 20 20 65 72 72 6f 72 4d 65 73 73         errorMess
4390: 61 67 65 28 22 43 72 65 61 74 65 50 72 6f 63 65  age("CreateProce
43a0: 73 73 41 28 29 20 66 61 69 6c 73 20 77 69 74 68  ssA() fails with
43b0: 20 65 72 72 6f 72 20 63 6f 64 65 20 25 6c 75 22   error code %lu"
43c0: 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,.              
43d0: 20 20 20 20 20 20 20 47 65 74 4c 61 73 74 45 72         GetLastEr
43e0: 72 6f 72 28 29 29 3b 0a 20 20 20 20 20 20 7d 0a  ror());.      }.
43f0: 20 20 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20      }.#endif.   
4400: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 53   sqlite3_free(zS
4410: 79 73 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  ys);.  }.}../*.*
4420: 2a 20 52 65 61 64 20 74 68 65 20 65 6e 74 69 72  * Read the entir
4430: 65 20 63 6f 6e 74 65 6e 74 20 6f 66 20 61 20 66  e content of a f
4440: 69 6c 65 20 69 6e 74 6f 20 6d 65 6d 6f 72 79 0a  ile into memory.
4450: 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72 20 2a  */.static char *
4460: 72 65 61 64 46 69 6c 65 28 63 6f 6e 73 74 20 63  readFile(const c
4470: 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b  har *zFilename){
4480: 0a 20 20 46 49 4c 45 20 2a 69 6e 20 3d 20 66 6f  .  FILE *in = fo
4490: 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 22  pen(zFilename, "
44a0: 72 62 22 29 3b 0a 20 20 6c 6f 6e 67 20 73 7a 3b  rb");.  long sz;
44b0: 0a 20 20 63 68 61 72 20 2a 7a 3b 0a 20 20 69 66  .  char *z;.  if
44c0: 28 20 69 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 66  ( in==0 ){.    f
44d0: 61 74 61 6c 45 72 72 6f 72 28 22 63 61 6e 6e 6f  atalError("canno
44e0: 74 20 6f 70 65 6e 20 5c 22 25 73 5c 22 20 66 6f  t open \"%s\" fo
44f0: 72 20 72 65 61 64 69 6e 67 22 2c 20 7a 46 69 6c  r reading", zFil
4500: 65 6e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 66 73  ename);.  }.  fs
4510: 65 65 6b 28 69 6e 2c 20 30 2c 20 53 45 45 4b 5f  eek(in, 0, SEEK_
4520: 45 4e 44 29 3b 0a 20 20 73 7a 20 3d 20 66 74 65  END);.  sz = fte
4530: 6c 6c 28 69 6e 29 3b 0a 20 20 72 65 77 69 6e 64  ll(in);.  rewind
4540: 28 69 6e 29 3b 0a 20 20 7a 20 3d 20 73 71 6c 69  (in);.  z = sqli
4550: 74 65 33 5f 6d 61 6c 6c 6f 63 28 20 73 7a 2b 31  te3_malloc( sz+1
4560: 20 29 3b 0a 20 20 73 7a 20 3d 20 28 6c 6f 6e 67   );.  sz = (long
4570: 29 66 72 65 61 64 28 7a 2c 20 31 2c 20 73 7a 2c  )fread(z, 1, sz,
4580: 20 69 6e 29 3b 0a 20 20 7a 5b 73 7a 5d 20 3d 20   in);.  z[sz] = 
4590: 30 3b 0a 20 20 66 63 6c 6f 73 65 28 69 6e 29 3b  0;.  fclose(in);
45a0: 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a  .  return z;.}..
45b0: 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65  /*.** Return the
45c0: 20 6c 65 6e 67 74 68 20 6f 66 20 74 68 65 20 6e   length of the n
45d0: 65 78 74 20 74 6f 6b 65 6e 2e 0a 2a 2f 0a 73 74  ext token..*/.st
45e0: 61 74 69 63 20 69 6e 74 20 74 6f 6b 65 6e 4c 65  atic int tokenLe
45f0: 6e 67 74 68 28 63 6f 6e 73 74 20 63 68 61 72 20  ngth(const char 
4600: 2a 7a 2c 20 69 6e 74 20 2a 70 6e 4c 69 6e 65 29  *z, int *pnLine)
4610: 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30 3b 0a 20  {.  int n = 0;. 
4620: 20 69 66 28 20 69 73 73 70 61 63 65 28 7a 5b 30   if( isspace(z[0
4630: 5d 29 20 7c 7c 20 28 7a 5b 30 5d 3d 3d 27 2f 27  ]) || (z[0]=='/'
4640: 20 26 26 20 7a 5b 31 5d 3d 3d 27 2a 27 29 20 29   && z[1]=='*') )
4650: 7b 0a 20 20 20 20 69 6e 74 20 69 6e 43 20 3d 20  {.    int inC = 
4660: 30 3b 0a 20 20 20 20 69 6e 74 20 63 3b 0a 20 20  0;.    int c;.  
4670: 20 20 69 66 28 20 7a 5b 30 5d 3d 3d 27 2f 27 20    if( z[0]=='/' 
4680: 29 7b 0a 20 20 20 20 20 20 69 6e 43 20 3d 20 31  ){.      inC = 1
4690: 3b 0a 20 20 20 20 20 20 6e 20 3d 20 32 3b 0a 20  ;.      n = 2;. 
46a0: 20 20 20 7d 0a 20 20 20 20 77 68 69 6c 65 28 20     }.    while( 
46b0: 28 63 20 3d 20 7a 5b 6e 2b 2b 5d 29 21 3d 30 20  (c = z[n++])!=0 
46c0: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d  ){.      if( c==
46d0: 27 5c 6e 27 20 29 20 28 2a 70 6e 4c 69 6e 65 29  '\n' ) (*pnLine)
46e0: 2b 2b 3b 0a 20 20 20 20 20 20 69 66 28 20 69 73  ++;.      if( is
46f0: 73 70 61 63 65 28 63 29 20 29 20 63 6f 6e 74 69  space(c) ) conti
4700: 6e 75 65 3b 0a 20 20 20 20 20 20 69 66 28 20 69  nue;.      if( i
4710: 6e 43 20 26 26 20 63 3d 3d 27 2a 27 20 26 26 20  nC && c=='*' && 
4720: 7a 5b 6e 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 20  z[n]=='/' ){.   
4730: 20 20 20 20 20 6e 2b 2b 3b 0a 20 20 20 20 20 20       n++;.      
4740: 20 20 69 6e 43 20 3d 20 30 3b 0a 20 20 20 20 20    inC = 0;.     
4750: 20 7d 65 6c 73 65 20 69 66 28 20 21 69 6e 43 20   }else if( !inC 
4760: 26 26 20 63 3d 3d 27 2f 27 20 26 26 20 7a 5b 6e  && c=='/' && z[n
4770: 5d 3d 3d 27 2a 27 20 29 7b 0a 20 20 20 20 20 20  ]=='*' ){.      
4780: 20 20 6e 2b 2b 3b 0a 20 20 20 20 20 20 20 20 69    n++;.        i
4790: 6e 43 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 65  nC = 1;.      }e
47a0: 6c 73 65 20 69 66 28 20 21 69 6e 43 20 29 7b 0a  lse if( !inC ){.
47b0: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20          break;. 
47c0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20       }.    }.   
47d0: 20 6e 2d 2d 3b 0a 20 20 7d 65 6c 73 65 20 69 66   n--;.  }else if
47e0: 28 20 7a 5b 30 5d 3d 3d 27 2d 27 20 26 26 20 7a  ( z[0]=='-' && z
47f0: 5b 31 5d 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20  [1]=='-' ){.    
4800: 66 6f 72 28 6e 3d 32 3b 20 7a 5b 6e 5d 20 26 26  for(n=2; z[n] &&
4810: 20 7a 5b 6e 5d 21 3d 27 5c 6e 27 3b 20 6e 2b 2b   z[n]!='\n'; n++
4820: 29 7b 7d 0a 20 20 20 20 69 66 28 20 7a 5b 6e 5d  ){}.    if( z[n]
4830: 20 29 7b 20 28 2a 70 6e 4c 69 6e 65 29 2b 2b 3b   ){ (*pnLine)++;
4840: 20 6e 2b 2b 3b 20 7d 0a 20 20 7d 65 6c 73 65 20   n++; }.  }else 
4850: 69 66 28 20 7a 5b 30 5d 3d 3d 27 22 27 20 7c 7c  if( z[0]=='"' ||
4860: 20 7a 5b 30 5d 3d 3d 27 5c 27 27 20 29 7b 0a 20   z[0]=='\'' ){. 
4870: 20 20 20 69 6e 74 20 64 65 6c 69 6d 20 3d 20 7a     int delim = z
4880: 5b 30 5d 3b 0a 20 20 20 20 66 6f 72 28 6e 3d 31  [0];.    for(n=1
4890: 3b 20 7a 5b 6e 5d 3b 20 6e 2b 2b 29 7b 0a 20 20  ; z[n]; n++){.  
48a0: 20 20 20 20 69 66 28 20 7a 5b 6e 5d 3d 3d 27 5c      if( z[n]=='\
48b0: 6e 27 20 29 20 28 2a 70 6e 4c 69 6e 65 29 2b 2b  n' ) (*pnLine)++
48c0: 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 5b 6e 5d  ;.      if( z[n]
48d0: 3d 3d 64 65 6c 69 6d 20 29 7b 0a 20 20 20 20 20  ==delim ){.     
48e0: 20 20 20 6e 2b 2b 3b 0a 20 20 20 20 20 20 20 20     n++;.        
48f0: 69 66 28 20 7a 5b 6e 2b 31 5d 21 3d 64 65 6c 69  if( z[n+1]!=deli
4900: 6d 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20  m ) break;.     
4910: 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65   }.    }.  }else
4920: 7b 0a 20 20 20 20 69 6e 74 20 63 3b 0a 20 20 20  {.    int c;.   
4930: 20 66 6f 72 28 6e 3d 31 3b 20 28 63 20 3d 20 7a   for(n=1; (c = z
4940: 5b 6e 5d 29 21 3d 30 20 26 26 20 21 69 73 73 70  [n])!=0 && !issp
4950: 61 63 65 28 63 29 20 26 26 20 63 21 3d 27 22 27  ace(c) && c!='"'
4960: 20 26 26 20 63 21 3d 27 5c 27 27 20 26 26 20 63   && c!='\'' && c
4970: 21 3d 27 3b 27 3b 20 6e 2b 2b 29 7b 7d 0a 20 20  !=';'; n++){}.  
4980: 7d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0a 7d 0a  }.  return n;.}.
4990: 0a 2f 2a 0a 2a 2a 20 43 6f 70 79 20 61 20 73 69  ./*.** Copy a si
49a0: 6e 67 6c 65 20 74 6f 6b 65 6e 20 69 6e 74 6f 20  ngle token into 
49b0: 61 20 73 74 72 69 6e 67 20 62 75 66 66 65 72 2e  a string buffer.
49c0: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 65  .*/.static int e
49d0: 78 74 72 61 63 74 54 6f 6b 65 6e 28 63 6f 6e 73  xtractToken(cons
49e0: 74 20 63 68 61 72 20 2a 7a 49 6e 2c 20 69 6e 74  t char *zIn, int
49f0: 20 6e 49 6e 2c 20 63 68 61 72 20 2a 7a 4f 75 74   nIn, char *zOut
4a00: 2c 20 69 6e 74 20 6e 4f 75 74 29 7b 0a 20 20 69  , int nOut){.  i
4a10: 6e 74 20 69 3b 0a 20 20 69 66 28 20 6e 49 6e 3c  nt i;.  if( nIn<
4a20: 3d 30 20 29 7b 0a 20 20 20 20 7a 4f 75 74 5b 30  =0 ){.    zOut[0
4a30: 5d 20 3d 20 30 3b 0a 20 20 20 20 72 65 74 75 72  ] = 0;.    retur
4a40: 6e 20 30 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69  n 0;.  }.  for(i
4a50: 3d 30 3b 20 69 3c 6e 49 6e 20 26 26 20 69 3c 6e  =0; i<nIn && i<n
4a60: 4f 75 74 2d 31 20 26 26 20 21 69 73 73 70 61 63  Out-1 && !isspac
4a70: 65 28 7a 49 6e 5b 69 5d 29 3b 20 69 2b 2b 29 7b  e(zIn[i]); i++){
4a80: 20 7a 4f 75 74 5b 69 5d 20 3d 20 7a 49 6e 5b 69   zOut[i] = zIn[i
4a90: 5d 3b 20 7d 0a 20 20 7a 4f 75 74 5b 69 5d 20 3d  ]; }.  zOut[i] =
4aa0: 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 69 3b 0a   0;.  return i;.
4ab0: 7d 0a 0a 2f 2a 0a 2a 2a 20 46 69 6e 64 20 74 68  }../*.** Find th
4ac0: 65 20 6e 75 6d 62 65 72 20 6f 66 20 63 68 61 72  e number of char
4ad0: 61 63 74 65 72 73 20 75 70 20 74 6f 20 74 68 65  acters up to the
4ae0: 20 73 74 61 72 74 20 6f 66 20 74 68 65 20 6e 65   start of the ne
4af0: 78 74 20 22 2d 2d 65 6e 64 22 20 74 6f 6b 65 6e  xt "--end" token
4b00: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  ..*/.static int 
4b10: 66 69 6e 64 45 6e 64 28 63 6f 6e 73 74 20 63 68  findEnd(const ch
4b20: 61 72 20 2a 7a 2c 20 69 6e 74 20 2a 70 6e 4c 69  ar *z, int *pnLi
4b30: 6e 65 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30  ne){.  int n = 0
4b40: 3b 0a 20 20 77 68 69 6c 65 28 20 7a 5b 6e 5d 20  ;.  while( z[n] 
4b50: 26 26 20 28 73 74 72 6e 63 6d 70 28 7a 2b 6e 2c  && (strncmp(z+n,
4b60: 22 2d 2d 65 6e 64 22 2c 35 29 20 7c 7c 20 21 69  "--end",5) || !i
4b70: 73 73 70 61 63 65 28 7a 5b 6e 2b 35 5d 29 29 20  sspace(z[n+5])) 
4b80: 29 7b 0a 20 20 20 20 6e 20 2b 3d 20 74 6f 6b 65  ){.    n += toke
4b90: 6e 4c 65 6e 67 74 68 28 7a 2b 6e 2c 20 70 6e 4c  nLength(z+n, pnL
4ba0: 69 6e 65 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75  ine);.  }.  retu
4bb0: 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 46  rn n;.}../*.** F
4bc0: 69 6e 64 20 74 68 65 20 6e 75 6d 62 65 72 20 6f  ind the number o
4bd0: 66 20 63 68 61 72 61 63 74 65 72 73 20 75 70 20  f characters up 
4be0: 74 6f 20 74 68 65 20 66 69 72 73 74 20 63 68 61  to the first cha
4bf0: 72 61 63 74 65 72 20 70 61 73 74 20 74 68 65 0a  racter past the.
4c00: 2a 2a 20 6f 66 20 74 68 65 20 6e 65 78 74 20 22  ** of the next "
4c10: 2d 2d 65 6e 64 69 66 22 20 20 6f 72 20 22 2d 2d  --endif"  or "--
4c20: 65 6c 73 65 22 20 74 6f 6b 65 6e 2e 20 4e 65 73  else" token. Nes
4c30: 74 65 64 20 2d 2d 69 66 20 63 6f 6d 6d 61 6e 64  ted --if command
4c40: 73 20 61 72 65 0a 2a 2a 20 61 6c 73 6f 20 73 6b  s are.** also sk
4c50: 69 70 70 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63  ipped..*/.static
4c60: 20 69 6e 74 20 66 69 6e 64 45 6e 64 69 66 28 63   int findEndif(c
4c70: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c 20 69 6e  onst char *z, in
4c80: 74 20 73 74 6f 70 41 74 45 6c 73 65 2c 20 69 6e  t stopAtElse, in
4c90: 74 20 2a 70 6e 4c 69 6e 65 29 7b 0a 20 20 69 6e  t *pnLine){.  in
4ca0: 74 20 6e 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65  t n = 0;.  while
4cb0: 28 20 7a 5b 6e 5d 20 29 7b 0a 20 20 20 20 69 6e  ( z[n] ){.    in
4cc0: 74 20 6c 65 6e 20 3d 20 74 6f 6b 65 6e 4c 65 6e  t len = tokenLen
4cd0: 67 74 68 28 7a 2b 6e 2c 20 70 6e 4c 69 6e 65 29  gth(z+n, pnLine)
4ce0: 3b 0a 20 20 20 20 69 66 28 20 28 73 74 72 6e 63  ;.    if( (strnc
4cf0: 6d 70 28 7a 2b 6e 2c 22 2d 2d 65 6e 64 69 66 22  mp(z+n,"--endif"
4d00: 2c 37 29 3d 3d 30 20 26 26 20 69 73 73 70 61 63  ,7)==0 && isspac
4d10: 65 28 7a 5b 6e 2b 37 5d 29 29 0a 20 20 20 20 20  e(z[n+7])).     
4d20: 7c 7c 20 28 73 74 6f 70 41 74 45 6c 73 65 20 26  || (stopAtElse &
4d30: 26 20 73 74 72 6e 63 6d 70 28 7a 2b 6e 2c 22 2d  & strncmp(z+n,"-
4d40: 2d 65 6c 73 65 22 2c 36 29 3d 3d 30 20 26 26 20  -else",6)==0 && 
4d50: 69 73 73 70 61 63 65 28 7a 5b 6e 2b 36 5d 29 29  isspace(z[n+6]))
4d60: 0a 20 20 20 20 29 7b 0a 20 20 20 20 20 20 72 65  .    ){.      re
4d70: 74 75 72 6e 20 6e 2b 6c 65 6e 3b 0a 20 20 20 20  turn n+len;.    
4d80: 7d 0a 20 20 20 20 69 66 28 20 73 74 72 6e 63 6d  }.    if( strncm
4d90: 70 28 7a 2b 6e 2c 22 2d 2d 69 66 22 2c 34 29 3d  p(z+n,"--if",4)=
4da0: 3d 30 20 26 26 20 69 73 73 70 61 63 65 28 7a 5b  =0 && isspace(z[
4db0: 6e 2b 34 5d 29 20 29 7b 0a 20 20 20 20 20 20 69  n+4]) ){.      i
4dc0: 6e 74 20 73 6b 69 70 20 3d 20 66 69 6e 64 45 6e  nt skip = findEn
4dd0: 64 69 66 28 7a 2b 6e 2b 6c 65 6e 2c 20 30 2c 20  dif(z+n+len, 0, 
4de0: 70 6e 4c 69 6e 65 29 3b 0a 20 20 20 20 20 20 6e  pnLine);.      n
4df0: 20 2b 3d 20 73 6b 69 70 20 2b 20 6c 65 6e 3b 0a   += skip + len;.
4e00: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
4e10: 20 6e 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20 7d   n += len;.    }
4e20: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 6e 3b  .  }.  return n;
4e30: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 61 69 74 20 66  .}../*.** Wait f
4e40: 6f 72 20 61 20 63 6c 69 65 6e 74 20 70 72 6f 63  or a client proc
4e50: 65 73 73 20 74 6f 20 63 6f 6d 70 6c 65 74 65 20  ess to complete 
4e60: 61 6c 6c 20 69 74 73 20 74 61 73 6b 73 0a 2a 2f  all its tasks.*/
4e70: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 77 61 69  .static void wai
4e80: 74 46 6f 72 43 6c 69 65 6e 74 28 69 6e 74 20 69  tForClient(int i
4e90: 43 6c 69 65 6e 74 2c 20 69 6e 74 20 69 54 69 6d  Client, int iTim
4ea0: 65 6f 75 74 2c 20 63 68 61 72 20 2a 7a 45 72 72  eout, char *zErr
4eb0: 50 72 65 66 69 78 29 7b 0a 20 20 73 71 6c 69 74  Prefix){.  sqlit
4ec0: 65 33 5f 73 74 6d 74 20 2a 70 53 74 6d 74 3b 0a  e3_stmt *pStmt;.
4ed0: 20 20 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20    int rc;.  if( 
4ee0: 69 43 6c 69 65 6e 74 3e 30 20 29 7b 0a 20 20 20  iClient>0 ){.   
4ef0: 20 70 53 74 6d 74 20 3d 20 70 72 65 70 61 72 65   pStmt = prepare
4f00: 53 71 6c 28 0a 20 20 20 20 20 20 20 20 20 20 20  Sql(.           
4f10: 20 20 20 20 22 53 45 4c 45 43 54 20 31 20 46 52      "SELECT 1 FR
4f20: 4f 4d 20 74 61 73 6b 22 0a 20 20 20 20 20 20 20  OM task".       
4f30: 20 20 20 20 20 20 20 20 22 20 57 48 45 52 45 20          " WHERE 
4f40: 63 6c 69 65 6e 74 3d 25 64 22 0a 20 20 20 20 20  client=%d".     
4f50: 20 20 20 20 20 20 20 20 20 20 22 20 20 20 41 4e            "   AN
4f60: 44 20 63 6c 69 65 6e 74 20 49 4e 20 28 53 45 4c  D client IN (SEL
4f70: 45 43 54 20 69 64 20 46 52 4f 4d 20 63 6c 69 65  ECT id FROM clie
4f80: 6e 74 29 22 0a 20 20 20 20 20 20 20 20 20 20 20  nt)".           
4f90: 20 20 20 20 22 20 20 41 4e 44 20 65 6e 64 74 69      "  AND endti
4fa0: 6d 65 20 49 53 20 4e 55 4c 4c 22 2c 0a 20 20 20  me IS NULL",.   
4fb0: 20 20 20 20 20 20 20 20 20 20 20 20 69 43 6c 69              iCli
4fc0: 65 6e 74 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  ent);.  }else{. 
4fd0: 20 20 20 70 53 74 6d 74 20 3d 20 70 72 65 70 61     pStmt = prepa
4fe0: 72 65 53 71 6c 28 0a 20 20 20 20 20 20 20 20 20  reSql(.         
4ff0: 20 20 20 20 20 20 22 53 45 4c 45 43 54 20 31 20        "SELECT 1 
5000: 46 52 4f 4d 20 74 61 73 6b 22 0a 20 20 20 20 20  FROM task".     
5010: 20 20 20 20 20 20 20 20 20 20 22 20 57 48 45 52            " WHER
5020: 45 20 63 6c 69 65 6e 74 20 49 4e 20 28 53 45 4c  E client IN (SEL
5030: 45 43 54 20 69 64 20 46 52 4f 4d 20 63 6c 69 65  ECT id FROM clie
5040: 6e 74 29 22 0a 20 20 20 20 20 20 20 20 20 20 20  nt)".           
5050: 20 20 20 20 22 20 20 20 41 4e 44 20 65 6e 64 74      "   AND endt
5060: 69 6d 65 20 49 53 20 4e 55 4c 4c 22 29 3b 0a 20  ime IS NULL");. 
5070: 20 7d 0a 20 20 67 2e 69 54 69 6d 65 6f 75 74 20   }.  g.iTimeout 
5080: 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 20 28 28  = 0;.  while( ((
5090: 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 73 74 65  rc = sqlite3_ste
50a0: 70 28 70 53 74 6d 74 29 29 3d 3d 53 51 4c 49 54  p(pStmt))==SQLIT
50b0: 45 5f 42 55 53 59 20 7c 7c 20 72 63 3d 3d 53 51  E_BUSY || rc==SQ
50c0: 4c 49 54 45 5f 52 4f 57 29 0a 20 20 20 20 26 26  LITE_ROW).    &&
50d0: 20 69 54 69 6d 65 6f 75 74 3e 30 0a 20 20 29 7b   iTimeout>0.  ){
50e0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
50f0: 65 74 28 70 53 74 6d 74 29 3b 0a 20 20 20 20 73  et(pStmt);.    s
5100: 71 6c 69 74 65 33 5f 73 6c 65 65 70 28 35 30 29  qlite3_sleep(50)
5110: 3b 0a 20 20 20 20 69 54 69 6d 65 6f 75 74 20 2d  ;.    iTimeout -
5120: 3d 20 35 30 3b 0a 20 20 7d 0a 20 20 73 71 6c 69  = 50;.  }.  sqli
5130: 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 70 53 74  te3_finalize(pSt
5140: 6d 74 29 3b 0a 20 20 67 2e 69 54 69 6d 65 6f 75  mt);.  g.iTimeou
5150: 74 20 3d 20 44 45 46 41 55 4c 54 5f 54 49 4d 45  t = DEFAULT_TIME
5160: 4f 55 54 3b 0a 20 20 69 66 28 20 72 63 21 3d 53  OUT;.  if( rc!=S
5170: 51 4c 49 54 45 5f 44 4f 4e 45 20 29 7b 0a 20 20  QLITE_DONE ){.  
5180: 20 20 69 66 28 20 7a 45 72 72 50 72 65 66 69 78    if( zErrPrefix
5190: 3d 3d 30 20 29 20 7a 45 72 72 50 72 65 66 69 78  ==0 ) zErrPrefix
51a0: 20 3d 20 22 22 3b 0a 20 20 20 20 69 66 28 20 69   = "";.    if( i
51b0: 43 6c 69 65 6e 74 3e 30 20 29 7b 0a 20 20 20 20  Client>0 ){.    
51c0: 20 20 65 72 72 6f 72 4d 65 73 73 61 67 65 28 22    errorMessage("
51d0: 25 73 74 69 6d 65 6f 75 74 20 77 61 69 74 69 6e  %stimeout waitin
51e0: 67 20 66 6f 72 20 63 6c 69 65 6e 74 20 25 64 22  g for client %d"
51f0: 2c 20 7a 45 72 72 50 72 65 66 69 78 2c 20 69 43  , zErrPrefix, iC
5200: 6c 69 65 6e 74 29 3b 0a 20 20 20 20 7d 65 6c 73  lient);.    }els
5210: 65 7b 0a 20 20 20 20 20 20 65 72 72 6f 72 4d 65  e{.      errorMe
5220: 73 73 61 67 65 28 22 25 73 74 69 6d 65 6f 75 74  ssage("%stimeout
5230: 20 77 61 69 74 69 6e 67 20 66 6f 72 20 61 6c 6c   waiting for all
5240: 20 63 6c 69 65 6e 74 73 22 2c 20 7a 45 72 72 50   clients", zErrP
5250: 72 65 66 69 78 29 3b 0a 20 20 20 20 7d 0a 20 20  refix);.    }.  
5260: 7d 0a 7d 0a 0a 2f 2a 20 52 65 74 75 72 6e 20 61  }.}../* Return a
5270: 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 20   pointer to the 
5280: 74 61 69 6c 20 6f 66 20 61 20 66 69 6c 65 6e 61  tail of a filena
5290: 6d 65 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68 61  me.*/.static cha
52a0: 72 20 2a 66 69 6c 65 6e 61 6d 65 54 61 69 6c 28  r *filenameTail(
52b0: 63 68 61 72 20 2a 7a 29 7b 0a 20 20 69 6e 74 20  char *z){.  int 
52c0: 69 2c 20 6a 3b 0a 20 20 66 6f 72 28 69 3d 6a 3d  i, j;.  for(i=j=
52d0: 30 3b 20 7a 5b 69 5d 3b 20 69 2b 2b 29 20 69 66  0; z[i]; i++) if
52e0: 28 20 7a 5b 69 5d 3d 3d 27 2f 27 20 29 20 6a 20  ( z[i]=='/' ) j 
52f0: 3d 20 69 2b 31 3b 0a 20 20 72 65 74 75 72 6e 20  = i+1;.  return 
5300: 7a 2b 6a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e  z+j;.}../*.** In
5310: 74 65 72 70 72 65 74 20 7a 41 72 67 20 61 73 20  terpret zArg as 
5320: 61 20 62 6f 6f 6c 65 61 6e 20 76 61 6c 75 65 2e  a boolean value.
5330: 20 20 52 65 74 75 72 6e 20 65 69 74 68 65 72 20    Return either 
5340: 30 20 6f 72 20 31 2e 0a 2a 2f 0a 73 74 61 74 69  0 or 1..*/.stati
5350: 63 20 69 6e 74 20 62 6f 6f 6c 65 61 6e 56 61 6c  c int booleanVal
5360: 75 65 28 63 68 61 72 20 2a 7a 41 72 67 29 7b 0a  ue(char *zArg){.
5370: 20 20 69 6e 74 20 69 3b 0a 20 20 69 66 28 20 7a    int i;.  if( z
5380: 41 72 67 3d 3d 30 20 29 20 72 65 74 75 72 6e 20  Arg==0 ) return 
5390: 30 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 7a 41  0;.  for(i=0; zA
53a0: 72 67 5b 69 5d 3e 3d 27 30 27 20 26 26 20 7a 41  rg[i]>='0' && zA
53b0: 72 67 5b 69 5d 3c 3d 27 39 27 3b 20 69 2b 2b 29  rg[i]<='9'; i++)
53c0: 7b 7d 0a 20 20 69 66 28 20 69 3e 30 20 26 26 20  {}.  if( i>0 && 
53d0: 7a 41 72 67 5b 69 5d 3d 3d 30 20 29 20 72 65 74  zArg[i]==0 ) ret
53e0: 75 72 6e 20 61 74 6f 69 28 7a 41 72 67 29 3b 0a  urn atoi(zArg);.
53f0: 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 73 74    if( sqlite3_st
5400: 72 69 63 6d 70 28 7a 41 72 67 2c 20 22 6f 6e 22  ricmp(zArg, "on"
5410: 29 3d 3d 30 20 7c 7c 20 73 71 6c 69 74 65 33 5f  )==0 || sqlite3_
5420: 73 74 72 69 63 6d 70 28 7a 41 72 67 2c 22 79 65  stricmp(zArg,"ye
5430: 73 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65  s")==0 ){.    re
5440: 74 75 72 6e 20 31 3b 0a 20 20 7d 0a 20 20 69 66  turn 1;.  }.  if
5450: 28 20 73 71 6c 69 74 65 33 5f 73 74 72 69 63 6d  ( sqlite3_stricm
5460: 70 28 7a 41 72 67 2c 20 22 6f 66 66 22 29 3d 3d  p(zArg, "off")==
5470: 30 20 7c 7c 20 73 71 6c 69 74 65 33 5f 73 74 72  0 || sqlite3_str
5480: 69 63 6d 70 28 7a 41 72 67 2c 22 6e 6f 22 29 3d  icmp(zArg,"no")=
5490: 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  =0 ){.    return
54a0: 20 30 3b 0a 20 20 7d 0a 20 20 65 72 72 6f 72 4d   0;.  }.  errorM
54b0: 65 73 73 61 67 65 28 22 75 6e 6b 6e 6f 77 6e 20  essage("unknown 
54c0: 62 6f 6f 6c 65 61 6e 3a 20 5b 25 73 5d 22 2c 20  boolean: [%s]", 
54d0: 7a 41 72 67 29 3b 0a 20 20 72 65 74 75 72 6e 20  zArg);.  return 
54e0: 30 3b 0a 7d 0a 0a 0a 2f 2a 20 54 68 69 73 20 72  0;.}.../* This r
54f0: 6f 75 74 69 6e 65 20 65 78 69 73 74 73 20 61 73  outine exists as
5500: 20 61 20 63 6f 6e 76 65 6e 69 65 6e 74 20 70 6c   a convenient pl
5510: 61 63 65 20 74 6f 20 73 65 74 20 61 20 64 65 62  ace to set a deb
5520: 75 67 67 65 72 0a 2a 2a 20 62 72 65 61 6b 70 6f  ugger.** breakpo
5530: 69 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  int..*/.static v
5540: 6f 69 64 20 74 65 73 74 5f 62 72 65 61 6b 70 6f  oid test_breakpo
5550: 69 6e 74 28 76 6f 69 64 29 7b 20 73 74 61 74 69  int(void){ stati
5560: 63 20 76 6f 6c 61 74 69 6c 65 20 69 6e 74 20 63  c volatile int c
5570: 6e 74 20 3d 20 30 3b 20 63 6e 74 2b 2b 3b 20 7d  nt = 0; cnt++; }
5580: 0a 0a 2f 2a 20 4d 61 78 69 6d 75 6d 20 6e 75 6d  ../* Maximum num
5590: 62 65 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73  ber of arguments
55a0: 20 74 6f 20 61 20 2d 2d 63 6f 6d 6d 61 6e 64 20   to a --command 
55b0: 2a 2f 0a 23 64 65 66 69 6e 65 20 4d 58 5f 41 52  */.#define MX_AR
55c0: 47 20 32 0a 0a 2f 2a 0a 2a 2a 20 52 75 6e 20 61  G 2../*.** Run a
55d0: 20 73 63 72 69 70 74 2e 0a 2a 2f 0a 73 74 61 74   script..*/.stat
55e0: 69 63 20 76 6f 69 64 20 72 75 6e 53 63 72 69 70  ic void runScrip
55f0: 74 28 0a 20 20 69 6e 74 20 69 43 6c 69 65 6e 74  t(.  int iClient
5600: 2c 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 63  ,       /* The c
5610: 6c 69 65 6e 74 20 6e 75 6d 62 65 72 2c 20 6f 72  lient number, or
5620: 20 30 20 66 6f 72 20 74 68 65 20 6d 61 73 74 65   0 for the maste
5630: 72 20 2a 2f 0a 20 20 69 6e 74 20 74 61 73 6b 49  r */.  int taskI
5640: 64 2c 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65  d,        /* The
5650: 20 74 61 73 6b 20 49 44 20 66 6f 72 20 63 6c 69   task ID for cli
5660: 65 6e 74 73 2e 20 20 30 20 66 6f 72 20 6d 61 73  ents.  0 for mas
5670: 74 65 72 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a  ter */.  char *z
5680: 53 63 72 69 70 74 2c 20 20 20 20 20 2f 2a 20 54  Script,     /* T
5690: 65 78 74 20 6f 66 20 74 68 65 20 73 63 72 69 70  ext of the scrip
56a0: 74 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 46 69  t */.  char *zFi
56b0: 6c 65 6e 61 6d 65 20 20 20 20 2f 2a 20 46 69 6c  lename    /* Fil
56c0: 65 20 66 72 6f 6d 20 77 68 69 63 68 20 73 63 72  e from which scr
56d0: 69 70 74 20 77 61 73 20 72 65 61 64 2e 20 2a 2f  ipt was read. */
56e0: 0a 29 7b 0a 20 20 69 6e 74 20 6c 69 6e 65 6e 6f  .){.  int lineno
56f0: 20 3d 20 31 3b 0a 20 20 69 6e 74 20 70 72 65 76   = 1;.  int prev
5700: 4c 69 6e 65 20 3d 20 31 3b 0a 20 20 69 6e 74 20  Line = 1;.  int 
5710: 69 69 20 3d 20 30 3b 0a 20 20 69 6e 74 20 69 42  ii = 0;.  int iB
5720: 65 67 69 6e 20 3d 20 30 3b 0a 20 20 69 6e 74 20  egin = 0;.  int 
5730: 6e 2c 20 63 2c 20 6a 3b 0a 20 20 69 6e 74 20 6c  n, c, j;.  int l
5740: 65 6e 3b 0a 20 20 69 6e 74 20 6e 41 72 67 3b 0a  en;.  int nArg;.
5750: 20 20 53 74 72 69 6e 67 20 73 52 65 73 75 6c 74    String sResult
5760: 3b 0a 20 20 63 68 61 72 20 7a 43 6d 64 5b 33 30  ;.  char zCmd[30
5770: 5d 3b 0a 20 20 63 68 61 72 20 7a 45 72 72 6f 72  ];.  char zError
5780: 5b 31 30 30 30 5d 3b 0a 20 20 63 68 61 72 20 61  [1000];.  char a
5790: 7a 41 72 67 5b 4d 58 5f 41 52 47 5d 5b 31 30 30  zArg[MX_ARG][100
57a0: 5d 3b 0a 0a 20 20 6d 65 6d 73 65 74 28 26 73 52  ];..  memset(&sR
57b0: 65 73 75 6c 74 2c 20 30 2c 20 73 69 7a 65 6f 66  esult, 0, sizeof
57c0: 28 73 52 65 73 75 6c 74 29 29 3b 0a 20 20 73 74  (sResult));.  st
57d0: 72 69 6e 67 52 65 73 65 74 28 26 73 52 65 73 75  ringReset(&sResu
57e0: 6c 74 29 3b 0a 20 20 77 68 69 6c 65 28 20 28 63  lt);.  while( (c
57f0: 20 3d 20 7a 53 63 72 69 70 74 5b 69 69 5d 29 21   = zScript[ii])!
5800: 3d 30 20 29 7b 0a 20 20 20 20 70 72 65 76 4c 69  =0 ){.    prevLi
5810: 6e 65 20 3d 20 6c 69 6e 65 6e 6f 3b 0a 20 20 20  ne = lineno;.   
5820: 20 6c 65 6e 20 3d 20 74 6f 6b 65 6e 4c 65 6e 67   len = tokenLeng
5830: 74 68 28 7a 53 63 72 69 70 74 2b 69 69 2c 20 26  th(zScript+ii, &
5840: 6c 69 6e 65 6e 6f 29 3b 0a 20 20 20 20 69 66 28  lineno);.    if(
5850: 20 69 73 73 70 61 63 65 28 63 29 20 7c 7c 20 28   isspace(c) || (
5860: 63 3d 3d 27 2f 27 20 26 26 20 7a 53 63 72 69 70  c=='/' && zScrip
5870: 74 5b 69 69 2b 31 5d 3d 3d 27 2a 27 29 20 29 7b  t[ii+1]=='*') ){
5880: 0a 20 20 20 20 20 20 69 69 20 2b 3d 20 6c 65 6e  .      ii += len
5890: 3b 0a 20 20 20 20 20 20 63 6f 6e 74 69 6e 75 65  ;.      continue
58a0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20  ;.    }.    if( 
58b0: 63 21 3d 27 2d 27 20 7c 7c 20 7a 53 63 72 69 70  c!='-' || zScrip
58c0: 74 5b 69 69 2b 31 5d 21 3d 27 2d 27 20 7c 7c 20  t[ii+1]!='-' || 
58d0: 21 69 73 61 6c 70 68 61 28 7a 53 63 72 69 70 74  !isalpha(zScript
58e0: 5b 69 69 2b 32 5d 29 20 29 7b 0a 20 20 20 20 20  [ii+2]) ){.     
58f0: 20 69 69 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20   ii += len;.    
5900: 20 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20    continue;.    
5910: 7d 0a 0a 20 20 20 20 2f 2a 20 52 75 6e 20 61 6e  }..    /* Run an
5920: 79 20 70 72 69 6f 72 20 53 51 4c 20 62 65 66 6f  y prior SQL befo
5930: 72 65 20 70 72 6f 63 65 73 73 69 6e 67 20 74 68  re processing th
5940: 65 20 6e 65 77 20 2d 2d 63 6f 6d 6d 61 6e 64 20  e new --command 
5950: 2a 2f 0a 20 20 20 20 69 66 28 20 69 69 3e 69 42  */.    if( ii>iB
5960: 65 67 69 6e 20 29 7b 0a 20 20 20 20 20 20 63 68  egin ){.      ch
5970: 61 72 20 2a 7a 53 71 6c 20 3d 20 73 71 6c 69 74  ar *zSql = sqlit
5980: 65 33 5f 6d 70 72 69 6e 74 66 28 22 25 2e 2a 73  e3_mprintf("%.*s
5990: 22 2c 20 69 69 2d 69 42 65 67 69 6e 2c 20 7a 53  ", ii-iBegin, zS
59a0: 63 72 69 70 74 2b 69 42 65 67 69 6e 29 3b 0a 20  cript+iBegin);. 
59b0: 20 20 20 20 20 65 76 61 6c 53 71 6c 28 26 73 52       evalSql(&sR
59c0: 65 73 75 6c 74 2c 20 7a 53 71 6c 29 3b 0a 20 20  esult, zSql);.  
59d0: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
59e0: 28 7a 53 71 6c 29 3b 0a 20 20 20 20 20 20 69 42  (zSql);.      iB
59f0: 65 67 69 6e 20 3d 20 69 69 20 2b 20 6c 65 6e 3b  egin = ii + len;
5a00: 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 20 50  .    }..    /* P
5a10: 61 72 73 65 20 74 68 65 20 2d 2d 63 6f 6d 6d 61  arse the --comma
5a20: 6e 64 20 2a 2f 0a 20 20 20 20 69 66 28 20 67 2e  nd */.    if( g.
5a30: 69 54 72 61 63 65 3e 3d 32 20 29 20 6c 6f 67 4d  iTrace>=2 ) logM
5a40: 65 73 73 61 67 65 28 22 25 2e 2a 73 22 2c 20 6c  essage("%.*s", l
5a50: 65 6e 2c 20 7a 53 63 72 69 70 74 2b 69 69 29 3b  en, zScript+ii);
5a60: 0a 20 20 20 20 6e 20 3d 20 65 78 74 72 61 63 74  .    n = extract
5a70: 54 6f 6b 65 6e 28 7a 53 63 72 69 70 74 2b 69 69  Token(zScript+ii
5a80: 2b 32 2c 20 6c 65 6e 2d 32 2c 20 7a 43 6d 64 2c  +2, len-2, zCmd,
5a90: 20 73 69 7a 65 6f 66 28 7a 43 6d 64 29 29 3b 0a   sizeof(zCmd));.
5aa0: 20 20 20 20 66 6f 72 28 6e 41 72 67 3d 30 3b 20      for(nArg=0; 
5ab0: 6e 3c 6c 65 6e 2d 32 20 26 26 20 6e 41 72 67 3c  n<len-2 && nArg<
5ac0: 4d 58 5f 41 52 47 3b 20 6e 41 72 67 2b 2b 29 7b  MX_ARG; nArg++){
5ad0: 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 6e 3c  .      while( n<
5ae0: 6c 65 6e 2d 32 20 26 26 20 69 73 73 70 61 63 65  len-2 && isspace
5af0: 28 7a 53 63 72 69 70 74 5b 69 69 2b 32 2b 6e 5d  (zScript[ii+2+n]
5b00: 29 20 29 7b 20 6e 2b 2b 3b 20 7d 0a 20 20 20 20  ) ){ n++; }.    
5b10: 20 20 69 66 28 20 6e 3e 3d 6c 65 6e 2d 32 20 29    if( n>=len-2 )
5b20: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 6e 20   break;.      n 
5b30: 2b 3d 20 65 78 74 72 61 63 74 54 6f 6b 65 6e 28  += extractToken(
5b40: 7a 53 63 72 69 70 74 2b 69 69 2b 32 2b 6e 2c 20  zScript+ii+2+n, 
5b50: 6c 65 6e 2d 32 2d 6e 2c 0a 20 20 20 20 20 20 20  len-2-n,.       
5b60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5b70: 20 61 7a 41 72 67 5b 6e 41 72 67 5d 2c 20 73 69   azArg[nArg], si
5b80: 7a 65 6f 66 28 61 7a 41 72 67 5b 6e 41 72 67 5d  zeof(azArg[nArg]
5b90: 29 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 66 6f  ));.    }.    fo
5ba0: 72 28 6a 3d 6e 41 72 67 3b 20 6a 3c 4d 58 5f 41  r(j=nArg; j<MX_A
5bb0: 52 47 3b 20 6a 2b 2b 29 20 61 7a 41 72 67 5b 6a  RG; j++) azArg[j
5bc0: 2b 2b 5d 5b 30 5d 20 3d 20 30 3b 0a 0a 20 20 20  ++][0] = 0;..   
5bd0: 20 2f 2a 0a 20 20 20 20 2a 2a 20 20 2d 2d 73 6c   /*.    **  --sl
5be0: 65 65 70 20 4e 0a 20 20 20 20 2a 2a 0a 20 20 20  eep N.    **.   
5bf0: 20 2a 2a 20 50 61 75 73 65 20 66 6f 72 20 4e 20   ** Pause for N 
5c00: 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 0a 20 20 20  milliseconds.   
5c10: 20 2a 2f 0a 20 20 20 20 69 66 28 20 73 74 72 63   */.    if( strc
5c20: 6d 70 28 7a 43 6d 64 2c 20 22 73 6c 65 65 70 22  mp(zCmd, "sleep"
5c30: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 73 71  )==0 ){.      sq
5c40: 6c 69 74 65 33 5f 73 6c 65 65 70 28 61 74 6f 69  lite3_sleep(atoi
5c50: 28 61 7a 41 72 67 5b 30 5d 29 29 3b 0a 20 20 20  (azArg[0]));.   
5c60: 20 7d 65 6c 73 65 20 0a 0a 20 20 20 20 2f 2a 0a   }else ..    /*.
5c70: 20 20 20 20 2a 2a 20 20 20 2d 2d 65 78 69 74 20      **   --exit 
5c80: 4e 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20  N.    **.    ** 
5c90: 45 78 69 74 20 74 68 69 73 20 70 72 6f 63 65 73  Exit this proces
5ca0: 73 2e 20 20 49 66 20 4e 3e 30 20 74 68 65 6e 20  s.  If N>0 then 
5cb0: 65 78 69 74 20 77 69 74 68 6f 75 74 20 73 68 75  exit without shu
5cc0: 74 74 69 6e 67 20 64 6f 77 6e 0a 20 20 20 20 2a  tting down.    *
5cd0: 2a 20 53 51 4c 69 74 65 2e 20 20 28 49 6e 20 6f  * SQLite.  (In o
5ce0: 74 68 65 72 20 77 6f 72 64 73 2c 20 73 69 6d 75  ther words, simu
5cf0: 6c 61 74 65 20 61 20 63 72 61 73 68 2e 29 0a 20  late a crash.). 
5d00: 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20 73 74     */.    if( st
5d10: 72 63 6d 70 28 7a 43 6d 64 2c 20 22 65 78 69 74  rcmp(zCmd, "exit
5d20: 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 69  ")==0 ){.      i
5d30: 6e 74 20 72 63 20 3d 20 61 74 6f 69 28 61 7a 41  nt rc = atoi(azA
5d40: 72 67 5b 30 5d 29 3b 0a 20 20 20 20 20 20 66 69  rg[0]);.      fi
5d50: 6e 69 73 68 53 63 72 69 70 74 28 69 43 6c 69 65  nishScript(iClie
5d60: 6e 74 2c 20 74 61 73 6b 49 64 2c 20 31 29 3b 0a  nt, taskId, 1);.
5d70: 20 20 20 20 20 20 69 66 28 20 72 63 3d 3d 30 20        if( rc==0 
5d80: 29 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28  ) sqlite3_close(
5d90: 67 2e 64 62 29 3b 0a 20 20 20 20 20 20 65 78 69  g.db);.      exi
5da0: 74 28 72 63 29 3b 0a 20 20 20 20 7d 65 6c 73 65  t(rc);.    }else
5db0: 0a 0a 20 20 20 20 2f 2a 0a 20 20 20 20 2a 2a 20  ..    /*.    ** 
5dc0: 20 20 2d 2d 74 65 73 74 63 61 73 65 20 4e 41 4d    --testcase NAM
5dd0: 45 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20  E.    **.    ** 
5de0: 42 65 67 69 6e 20 61 20 6e 65 77 20 74 65 73 74  Begin a new test
5df0: 20 63 61 73 65 2e 20 20 41 6e 6e 6f 75 6e 63 65   case.  Announce
5e00: 20 69 6e 20 74 68 65 20 6c 6f 67 20 74 68 61 74   in the log that
5e10: 20 74 68 65 20 74 65 73 74 20 63 61 73 65 0a 20   the test case. 
5e20: 20 20 20 2a 2a 20 68 61 73 20 62 65 67 75 6e 2e     ** has begun.
5e30: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20  .    */.    if( 
5e40: 73 74 72 63 6d 70 28 7a 43 6d 64 2c 20 22 74 65  strcmp(zCmd, "te
5e50: 73 74 63 61 73 65 22 29 3d 3d 30 20 29 7b 0a 20  stcase")==0 ){. 
5e60: 20 20 20 20 20 69 66 28 20 67 2e 69 54 72 61 63       if( g.iTrac
5e70: 65 3d 3d 31 20 29 20 6c 6f 67 4d 65 73 73 61 67  e==1 ) logMessag
5e80: 65 28 22 25 2e 2a 73 22 2c 20 6c 65 6e 20 2d 20  e("%.*s", len - 
5e90: 31 2c 20 7a 53 63 72 69 70 74 2b 69 69 29 3b 0a  1, zScript+ii);.
5ea0: 20 20 20 20 20 20 73 74 72 69 6e 67 52 65 73 65        stringRese
5eb0: 74 28 26 73 52 65 73 75 6c 74 29 3b 0a 20 20 20  t(&sResult);.   
5ec0: 20 7d 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a 20   }else..    /*. 
5ed0: 20 20 20 2a 2a 20 20 20 2d 2d 66 69 6e 69 73 68     **   --finish
5ee0: 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 4d  .    **.    ** M
5ef0: 61 72 6b 20 74 68 65 20 63 75 72 72 65 6e 74 20  ark the current 
5f00: 74 61 73 6b 20 61 73 20 68 61 76 69 6e 67 20 66  task as having f
5f10: 69 6e 69 73 68 65 64 2c 20 65 76 65 6e 20 69 66  inished, even if
5f20: 20 69 74 20 69 73 20 6e 6f 74 2e 0a 20 20 20 20   it is not..    
5f30: 2a 2a 20 54 68 69 73 20 63 61 6e 20 62 65 20 75  ** This can be u
5f40: 73 65 64 20 69 6e 20 63 6f 6e 6a 75 6e 63 74 69  sed in conjuncti
5f50: 6f 6e 20 77 69 74 68 20 2d 2d 65 78 69 74 20 74  on with --exit t
5f60: 6f 20 73 69 6d 75 6c 61 74 65 20 61 20 63 72 61  o simulate a cra
5f70: 73 68 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69  sh..    */.    i
5f80: 66 28 20 73 74 72 63 6d 70 28 7a 43 6d 64 2c 20  f( strcmp(zCmd, 
5f90: 22 66 69 6e 69 73 68 22 29 3d 3d 30 20 26 26 20  "finish")==0 && 
5fa0: 69 43 6c 69 65 6e 74 3e 30 20 29 7b 0a 20 20 20  iClient>0 ){.   
5fb0: 20 20 20 66 69 6e 69 73 68 53 63 72 69 70 74 28     finishScript(
5fc0: 69 43 6c 69 65 6e 74 2c 20 74 61 73 6b 49 64 2c  iClient, taskId,
5fd0: 20 31 29 3b 0a 20 20 20 20 7d 65 6c 73 65 0a 0a   1);.    }else..
5fe0: 20 20 20 20 2f 2a 0a 20 20 20 20 2a 2a 20 20 2d      /*.    **  -
5ff0: 2d 72 65 73 65 74 0a 20 20 20 20 2a 2a 0a 20 20  -reset.    **.  
6000: 20 20 2a 2a 20 52 65 73 65 74 20 61 63 63 75 6d    ** Reset accum
6010: 75 6c 61 74 65 64 20 72 65 73 75 6c 74 73 20 62  ulated results b
6020: 61 63 6b 20 74 6f 20 61 6e 20 65 6d 70 74 79 20  ack to an empty 
6030: 73 74 72 69 6e 67 0a 20 20 20 20 2a 2f 0a 20 20  string.    */.  
6040: 20 20 69 66 28 20 73 74 72 63 6d 70 28 7a 43 6d    if( strcmp(zCm
6050: 64 2c 20 22 72 65 73 65 74 22 29 3d 3d 30 20 29  d, "reset")==0 )
6060: 7b 0a 20 20 20 20 20 20 73 74 72 69 6e 67 52 65  {.      stringRe
6070: 73 65 74 28 26 73 52 65 73 75 6c 74 29 3b 0a 20  set(&sResult);. 
6080: 20 20 20 7d 65 6c 73 65 0a 0a 20 20 20 20 2f 2a     }else..    /*
6090: 0a 20 20 20 20 2a 2a 20 20 2d 2d 6d 61 74 63 68  .    **  --match
60a0: 20 41 4e 53 57 45 52 2e 2e 2e 0a 20 20 20 20 2a   ANSWER....    *
60b0: 2a 0a 20 20 20 20 2a 2a 20 43 68 65 63 6b 20 74  *.    ** Check t
60c0: 6f 20 73 65 65 20 69 66 20 6f 75 74 70 75 74 20  o see if output 
60d0: 6d 61 74 63 68 65 73 20 41 4e 53 57 45 52 2e 20  matches ANSWER. 
60e0: 20 52 65 70 6f 72 74 20 61 6e 20 65 72 72 6f 72   Report an error
60f0: 20 69 66 20 6e 6f 74 2e 0a 20 20 20 20 2a 2f 0a   if not..    */.
6100: 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28 7a      if( strcmp(z
6110: 43 6d 64 2c 20 22 6d 61 74 63 68 22 29 3d 3d 30  Cmd, "match")==0
6120: 20 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 6a 6a   ){.      int jj
6130: 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a 41  ;.      char *zA
6140: 6e 73 20 3d 20 7a 53 63 72 69 70 74 2b 69 69 3b  ns = zScript+ii;
6150: 0a 20 20 20 20 20 20 66 6f 72 28 6a 6a 3d 37 3b  .      for(jj=7;
6160: 20 6a 6a 3c 6c 65 6e 2d 31 20 26 26 20 69 73 73   jj<len-1 && iss
6170: 70 61 63 65 28 7a 41 6e 73 5b 6a 6a 5d 29 3b 20  pace(zAns[jj]); 
6180: 6a 6a 2b 2b 29 7b 7d 0a 20 20 20 20 20 20 7a 41  jj++){}.      zA
6190: 6e 73 20 2b 3d 20 6a 6a 3b 0a 20 20 20 20 20 20  ns += jj;.      
61a0: 69 66 28 20 6c 65 6e 2d 6a 6a 2d 31 21 3d 73 52  if( len-jj-1!=sR
61b0: 65 73 75 6c 74 2e 6e 20 7c 7c 20 73 74 72 6e 63  esult.n || strnc
61c0: 6d 70 28 73 52 65 73 75 6c 74 2e 7a 2c 20 7a 41  mp(sResult.z, zA
61d0: 6e 73 2c 20 6c 65 6e 2d 6a 6a 2d 31 29 20 29 7b  ns, len-jj-1) ){
61e0: 0a 20 20 20 20 20 20 20 20 65 72 72 6f 72 4d 65  .        errorMe
61f0: 73 73 61 67 65 28 22 6c 69 6e 65 20 25 64 20 6f  ssage("line %d o
6200: 66 20 25 73 3a 5c 6e 45 78 70 65 63 74 65 64 20  f %s:\nExpected 
6210: 5b 25 2e 2a 73 5d 5c 6e 20 20 20 20 20 47 6f 74  [%.*s]\n     Got
6220: 20 5b 25 73 5d 22 2c 0a 20 20 20 20 20 20 20 20   [%s]",.        
6230: 20 20 70 72 65 76 4c 69 6e 65 2c 20 7a 46 69 6c    prevLine, zFil
6240: 65 6e 61 6d 65 2c 20 6c 65 6e 2d 6a 6a 2d 31 2c  ename, len-jj-1,
6250: 20 7a 41 6e 73 2c 20 73 52 65 73 75 6c 74 2e 7a   zAns, sResult.z
6260: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
6270: 20 67 2e 6e 54 65 73 74 2b 2b 3b 0a 20 20 20 20   g.nTest++;.    
6280: 20 20 73 74 72 69 6e 67 52 65 73 65 74 28 26 73    stringReset(&s
6290: 52 65 73 75 6c 74 29 3b 0a 20 20 20 20 7d 65 6c  Result);.    }el
62a0: 73 65 0a 0a 20 20 20 20 2f 2a 0a 20 20 20 20 2a  se..    /*.    *
62b0: 2a 20 20 2d 2d 67 6c 6f 62 20 41 4e 53 57 45 52  *  --glob ANSWER
62c0: 2e 2e 2e 0a 20 20 20 20 2a 2a 20 20 2d 2d 6e 6f  ....    **  --no
62d0: 74 67 6c 6f 62 20 41 4e 53 57 45 52 2e 2e 2e 2e  tglob ANSWER....
62e0: 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 43  .    **.    ** C
62f0: 68 65 63 6b 20 74 6f 20 73 65 65 20 69 66 20 6f  heck to see if o
6300: 75 74 70 75 74 20 64 6f 65 73 20 6f 72 20 64 6f  utput does or do
6310: 65 73 20 6e 6f 74 20 6d 61 74 63 68 20 74 68 65  es not match the
6320: 20 67 6c 6f 62 20 70 61 74 74 65 72 6e 0a 20 20   glob pattern.  
6330: 20 20 2a 2a 20 41 4e 53 57 45 52 2e 0a 20 20 20    ** ANSWER..   
6340: 20 2a 2f 0a 20 20 20 20 69 66 28 20 73 74 72 63   */.    if( strc
6350: 6d 70 28 7a 43 6d 64 2c 20 22 67 6c 6f 62 22 29  mp(zCmd, "glob")
6360: 3d 3d 30 20 7c 7c 20 73 74 72 63 6d 70 28 7a 43  ==0 || strcmp(zC
6370: 6d 64 2c 20 22 6e 6f 74 67 6c 6f 62 22 29 3d 3d  md, "notglob")==
6380: 30 20 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 6a  0 ){.      int j
6390: 6a 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a  j;.      char *z
63a0: 41 6e 73 20 3d 20 7a 53 63 72 69 70 74 2b 69 69  Ans = zScript+ii
63b0: 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a 43  ;.      char *zC
63c0: 6f 70 79 3b 0a 20 20 20 20 20 20 69 6e 74 20 69  opy;.      int i
63d0: 73 47 6c 6f 62 20 3d 20 28 7a 43 6d 64 5b 30 5d  sGlob = (zCmd[0]
63e0: 3d 3d 27 67 27 29 3b 0a 20 20 20 20 20 20 66 6f  =='g');.      fo
63f0: 72 28 6a 6a 3d 39 2d 33 2a 69 73 47 6c 6f 62 3b  r(jj=9-3*isGlob;
6400: 20 6a 6a 3c 6c 65 6e 2d 31 20 26 26 20 69 73 73   jj<len-1 && iss
6410: 70 61 63 65 28 7a 41 6e 73 5b 6a 6a 5d 29 3b 20  pace(zAns[jj]); 
6420: 6a 6a 2b 2b 29 7b 7d 0a 20 20 20 20 20 20 7a 41  jj++){}.      zA
6430: 6e 73 20 2b 3d 20 6a 6a 3b 0a 20 20 20 20 20 20  ns += jj;.      
6440: 7a 43 6f 70 79 20 3d 20 73 71 6c 69 74 65 33 5f  zCopy = sqlite3_
6450: 6d 70 72 69 6e 74 66 28 22 25 2e 2a 73 22 2c 20  mprintf("%.*s", 
6460: 6c 65 6e 2d 6a 6a 2d 31 2c 20 7a 41 6e 73 29 3b  len-jj-1, zAns);
6470: 0a 20 20 20 20 20 20 69 66 28 20 28 73 71 6c 69  .      if( (sqli
6480: 74 65 33 5f 73 74 72 67 6c 6f 62 28 7a 43 6f 70  te3_strglob(zCop
6490: 79 2c 20 73 52 65 73 75 6c 74 2e 7a 29 3d 3d 30  y, sResult.z)==0
64a0: 29 5e 69 73 47 6c 6f 62 20 29 7b 0a 20 20 20 20  )^isGlob ){.    
64b0: 20 20 20 20 65 72 72 6f 72 4d 65 73 73 61 67 65      errorMessage
64c0: 28 22 6c 69 6e 65 20 25 64 20 6f 66 20 25 73 3a  ("line %d of %s:
64d0: 5c 6e 45 78 70 65 63 74 65 64 20 5b 25 73 5d 5c  \nExpected [%s]\
64e0: 6e 20 20 20 20 20 47 6f 74 20 5b 25 73 5d 22 2c  n     Got [%s]",
64f0: 0a 20 20 20 20 20 20 20 20 20 20 70 72 65 76 4c  .          prevL
6500: 69 6e 65 2c 20 7a 46 69 6c 65 6e 61 6d 65 2c 20  ine, zFilename, 
6510: 7a 43 6f 70 79 2c 20 73 52 65 73 75 6c 74 2e 7a  zCopy, sResult.z
6520: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
6530: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 43   sqlite3_free(zC
6540: 6f 70 79 29 3b 0a 20 20 20 20 20 20 67 2e 6e 54  opy);.      g.nT
6550: 65 73 74 2b 2b 3b 0a 20 20 20 20 20 20 73 74 72  est++;.      str
6560: 69 6e 67 52 65 73 65 74 28 26 73 52 65 73 75 6c  ingReset(&sResul
6570: 74 29 3b 0a 20 20 20 20 7d 65 6c 73 65 0a 0a 20  t);.    }else.. 
6580: 20 20 20 2f 2a 0a 20 20 20 20 2a 2a 20 20 2d 2d     /*.    **  --
6590: 6f 75 74 70 75 74 0a 20 20 20 20 2a 2a 0a 20 20  output.    **.  
65a0: 20 20 2a 2a 20 4f 75 74 70 75 74 20 74 68 65 20    ** Output the 
65b0: 72 65 73 75 6c 74 20 6f 66 20 74 68 65 20 70 72  result of the pr
65c0: 65 76 69 6f 75 73 20 53 51 4c 2e 0a 20 20 20 20  evious SQL..    
65d0: 2a 2f 0a 20 20 20 20 69 66 28 20 73 74 72 63 6d  */.    if( strcm
65e0: 70 28 7a 43 6d 64 2c 20 22 6f 75 74 70 75 74 22  p(zCmd, "output"
65f0: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 6c 6f  )==0 ){.      lo
6600: 67 4d 65 73 73 61 67 65 28 22 25 73 22 2c 20 73  gMessage("%s", s
6610: 52 65 73 75 6c 74 2e 7a 29 3b 0a 20 20 20 20 7d  Result.z);.    }
6620: 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a 20 20 20  else..    /*.   
6630: 20 2a 2a 20 20 2d 2d 73 6f 75 72 63 65 20 46 49   **  --source FI
6640: 4c 45 4e 41 4d 45 0a 20 20 20 20 2a 2a 0a 20 20  LENAME.    **.  
6650: 20 20 2a 2a 20 52 75 6e 20 61 20 73 75 62 73 63    ** Run a subsc
6660: 72 69 70 74 20 66 72 6f 6d 20 61 20 73 65 70 61  ript from a sepa
6670: 72 61 74 65 20 66 69 6c 65 2e 0a 20 20 20 20 2a  rate file..    *
6680: 2f 0a 20 20 20 20 69 66 28 20 73 74 72 63 6d 70  /.    if( strcmp
6690: 28 7a 43 6d 64 2c 20 22 73 6f 75 72 63 65 22 29  (zCmd, "source")
66a0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 63 68 61  ==0 ){.      cha
66b0: 72 20 2a 7a 4e 65 77 46 69 6c 65 2c 20 2a 7a 4e  r *zNewFile, *zN
66c0: 65 77 53 63 72 69 70 74 3b 0a 20 20 20 20 20 20  ewScript;.      
66d0: 63 68 61 72 20 2a 7a 54 6f 44 65 6c 20 3d 20 30  char *zToDel = 0
66e0: 3b 0a 20 20 20 20 20 20 7a 4e 65 77 46 69 6c 65  ;.      zNewFile
66f0: 20 3d 20 61 7a 41 72 67 5b 30 5d 3b 0a 20 20 20   = azArg[0];.   
6700: 20 20 20 69 66 28 20 7a 4e 65 77 46 69 6c 65 5b     if( zNewFile[
6710: 30 5d 21 3d 27 2f 27 20 29 7b 0a 20 20 20 20 20  0]!='/' ){.     
6720: 20 20 20 69 6e 74 20 6b 3b 0a 20 20 20 20 20 20     int k;.      
6730: 20 20 66 6f 72 28 6b 3d 28 69 6e 74 29 73 74 72    for(k=(int)str
6740: 6c 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 29 2d 31  len(zFilename)-1
6750: 3b 20 6b 3e 3d 30 20 26 26 20 7a 46 69 6c 65 6e  ; k>=0 && zFilen
6760: 61 6d 65 5b 6b 5d 21 3d 27 2f 27 3b 20 6b 2d 2d  ame[k]!='/'; k--
6770: 29 7b 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20  ){}.        if( 
6780: 6b 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20  k>0 ){.         
6790: 20 7a 4e 65 77 46 69 6c 65 20 3d 20 7a 54 6f 44   zNewFile = zToD
67a0: 65 6c 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72  el = sqlite3_mpr
67b0: 69 6e 74 66 28 22 25 2e 2a 73 2f 25 73 22 2c 20  intf("%.*s/%s", 
67c0: 6b 2c 7a 46 69 6c 65 6e 61 6d 65 2c 7a 4e 65 77  k,zFilename,zNew
67d0: 46 69 6c 65 29 3b 0a 20 20 20 20 20 20 20 20 7d  File);.        }
67e0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7a  .      }.      z
67f0: 4e 65 77 53 63 72 69 70 74 20 3d 20 72 65 61 64  NewScript = read
6800: 46 69 6c 65 28 7a 4e 65 77 46 69 6c 65 29 3b 0a  File(zNewFile);.
6810: 20 20 20 20 20 20 69 66 28 20 67 2e 69 54 72 61        if( g.iTra
6820: 63 65 20 29 20 6c 6f 67 4d 65 73 73 61 67 65 28  ce ) logMessage(
6830: 22 62 65 67 69 6e 20 73 63 72 69 70 74 20 5b 25  "begin script [%
6840: 73 5d 5c 6e 22 2c 20 7a 4e 65 77 46 69 6c 65 29  s]\n", zNewFile)
6850: 3b 0a 20 20 20 20 20 20 72 75 6e 53 63 72 69 70  ;.      runScrip
6860: 74 28 30 2c 20 30 2c 20 7a 4e 65 77 53 63 72 69  t(0, 0, zNewScri
6870: 70 74 2c 20 7a 4e 65 77 46 69 6c 65 29 3b 0a 20  pt, zNewFile);. 
6880: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65       sqlite3_fre
6890: 65 28 7a 4e 65 77 53 63 72 69 70 74 29 3b 0a 20  e(zNewScript);. 
68a0: 20 20 20 20 20 69 66 28 20 67 2e 69 54 72 61 63       if( g.iTrac
68b0: 65 20 29 20 6c 6f 67 4d 65 73 73 61 67 65 28 22  e ) logMessage("
68c0: 65 6e 64 20 73 63 72 69 70 74 20 5b 25 73 5d 5c  end script [%s]\
68d0: 6e 22 2c 20 7a 4e 65 77 46 69 6c 65 29 3b 0a 20  n", zNewFile);. 
68e0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65       sqlite3_fre
68f0: 65 28 7a 54 6f 44 65 6c 29 3b 0a 20 20 20 20 7d  e(zToDel);.    }
6900: 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a 20 20 20  else..    /*.   
6910: 20 2a 2a 20 20 2d 2d 70 72 69 6e 74 20 4d 45 53   **  --print MES
6920: 53 41 47 45 2e 2e 2e 2e 0a 20 20 20 20 2a 2a 0a  SAGE.....    **.
6930: 20 20 20 20 2a 2a 20 4f 75 74 70 75 74 20 74 68      ** Output th
6940: 65 20 72 65 6d 61 69 6e 64 65 72 20 6f 66 20 74  e remainder of t
6950: 68 65 20 6c 69 6e 65 20 74 6f 20 74 68 65 20 6c  he line to the l
6960: 6f 67 20 66 69 6c 65 0a 20 20 20 20 2a 2f 0a 20  og file.    */. 
6970: 20 20 20 69 66 28 20 73 74 72 63 6d 70 28 7a 43     if( strcmp(zC
6980: 6d 64 2c 20 22 70 72 69 6e 74 22 29 3d 3d 30 20  md, "print")==0 
6990: 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 6a 6a 3b  ){.      int jj;
69a0: 0a 20 20 20 20 20 20 66 6f 72 28 6a 6a 3d 37 3b  .      for(jj=7;
69b0: 20 6a 6a 3c 6c 65 6e 20 26 26 20 69 73 73 70 61   jj<len && isspa
69c0: 63 65 28 7a 53 63 72 69 70 74 5b 69 69 2b 6a 6a  ce(zScript[ii+jj
69d0: 5d 29 3b 20 6a 6a 2b 2b 29 7b 7d 0a 20 20 20 20  ]); jj++){}.    
69e0: 20 20 6c 6f 67 4d 65 73 73 61 67 65 28 22 25 2e    logMessage("%.
69f0: 2a 73 22 2c 20 6c 65 6e 2d 6a 6a 2c 20 7a 53 63  *s", len-jj, zSc
6a00: 72 69 70 74 2b 69 69 2b 6a 6a 29 3b 0a 20 20 20  ript+ii+jj);.   
6a10: 20 7d 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a 20   }else..    /*. 
6a20: 20 20 20 2a 2a 20 20 2d 2d 69 66 20 45 58 50 52     **  --if EXPR
6a30: 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 53  .    **.    ** S
6a40: 6b 69 70 20 66 6f 72 77 61 72 64 20 74 6f 20 74  kip forward to t
6a50: 68 65 20 6e 65 78 74 20 6d 61 74 63 68 69 6e 67  he next matching
6a60: 20 2d 2d 65 6e 64 69 66 20 6f 72 20 2d 2d 65 6c   --endif or --el
6a70: 73 65 20 69 66 20 45 58 50 52 20 69 73 20 66 61  se if EXPR is fa
6a80: 6c 73 65 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20  lse..    */.    
6a90: 69 66 28 20 73 74 72 63 6d 70 28 7a 43 6d 64 2c  if( strcmp(zCmd,
6aa0: 20 22 69 66 22 29 3d 3d 30 20 29 7b 0a 20 20 20   "if")==0 ){.   
6ab0: 20 20 20 69 6e 74 20 6a 6a 2c 20 72 63 3b 0a 20     int jj, rc;. 
6ac0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 73 74 6d       sqlite3_stm
6ad0: 74 20 2a 70 53 74 6d 74 3b 0a 20 20 20 20 20 20  t *pStmt;.      
6ae0: 66 6f 72 28 6a 6a 3d 34 3b 20 6a 6a 3c 6c 65 6e  for(jj=4; jj<len
6af0: 20 26 26 20 69 73 73 70 61 63 65 28 7a 53 63 72   && isspace(zScr
6b00: 69 70 74 5b 69 69 2b 6a 6a 5d 29 3b 20 6a 6a 2b  ipt[ii+jj]); jj+
6b10: 2b 29 7b 7d 0a 20 20 20 20 20 20 70 53 74 6d 74  +){}.      pStmt
6b20: 20 3d 20 70 72 65 70 61 72 65 53 71 6c 28 22 53   = prepareSql("S
6b30: 45 4c 45 43 54 20 25 2e 2a 73 22 2c 20 6c 65 6e  ELECT %.*s", len
6b40: 2d 6a 6a 2c 20 7a 53 63 72 69 70 74 2b 69 69 2b  -jj, zScript+ii+
6b50: 6a 6a 29 3b 0a 20 20 20 20 20 20 72 63 20 3d 20  jj);.      rc = 
6b60: 73 71 6c 69 74 65 33 5f 73 74 65 70 28 70 53 74  sqlite3_step(pSt
6b70: 6d 74 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72  mt);.      if( r
6b80: 63 21 3d 53 51 4c 49 54 45 5f 52 4f 57 20 7c 7c  c!=SQLITE_ROW ||
6b90: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
6ba0: 69 6e 74 28 70 53 74 6d 74 2c 20 30 29 3d 3d 30  int(pStmt, 0)==0
6bb0: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 69 20 2b   ){.        ii +
6bc0: 3d 20 66 69 6e 64 45 6e 64 69 66 28 7a 53 63 72  = findEndif(zScr
6bd0: 69 70 74 2b 69 69 2b 6c 65 6e 2c 20 31 2c 20 26  ipt+ii+len, 1, &
6be0: 6c 69 6e 65 6e 6f 29 3b 0a 20 20 20 20 20 20 7d  lineno);.      }
6bf0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66  .      sqlite3_f
6c00: 69 6e 61 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a  inalize(pStmt);.
6c10: 20 20 20 20 7d 65 6c 73 65 0a 0a 20 20 20 20 2f      }else..    /
6c20: 2a 0a 20 20 20 20 2a 2a 20 20 2d 2d 65 6c 73 65  *.    **  --else
6c30: 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 54  .    **.    ** T
6c40: 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 61 6e 20  his command can 
6c50: 6f 6e 6c 79 20 62 65 20 65 6e 63 6f 75 6e 74 65  only be encounte
6c60: 72 65 64 20 69 66 20 63 75 72 72 65 6e 74 6c 79  red if currently
6c70: 20 69 6e 73 69 64 65 20 61 6e 20 2d 2d 69 66 20   inside an --if 
6c80: 74 68 61 74 0a 20 20 20 20 2a 2a 20 69 73 20 74  that.    ** is t
6c90: 72 75 65 2e 20 20 53 6b 69 70 20 66 6f 72 77 61  rue.  Skip forwa
6ca0: 72 64 20 74 6f 20 74 68 65 20 6e 65 78 74 20 6d  rd to the next m
6cb0: 61 74 63 68 69 6e 67 20 2d 2d 65 6e 64 69 66 2e  atching --endif.
6cc0: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20  .    */.    if( 
6cd0: 73 74 72 63 6d 70 28 7a 43 6d 64 2c 20 22 65 6c  strcmp(zCmd, "el
6ce0: 73 65 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  se")==0 ){.     
6cf0: 20 69 69 20 2b 3d 20 66 69 6e 64 45 6e 64 69 66   ii += findEndif
6d00: 28 7a 53 63 72 69 70 74 2b 69 69 2b 6c 65 6e 2c  (zScript+ii+len,
6d10: 20 30 2c 20 26 6c 69 6e 65 6e 6f 29 3b 0a 20 20   0, &lineno);.  
6d20: 20 20 7d 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a    }else..    /*.
6d30: 20 20 20 20 2a 2a 20 20 2d 2d 65 6e 64 69 66 0a      **  --endif.
6d40: 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 54 68      **.    ** Th
6d50: 69 73 20 63 6f 6d 6d 61 6e 64 20 63 61 6e 20 6f  is command can o
6d60: 6e 6c 79 20 62 65 20 65 6e 63 6f 75 6e 74 65 72  nly be encounter
6d70: 65 64 20 69 66 20 63 75 72 72 65 6e 74 6c 79 20  ed if currently 
6d80: 69 6e 73 69 64 65 20 61 6e 20 2d 2d 69 66 20 74  inside an --if t
6d90: 68 61 74 0a 20 20 20 20 2a 2a 20 69 73 20 74 72  hat.    ** is tr
6da0: 75 65 20 6f 72 20 61 6e 20 2d 2d 65 6c 73 65 20  ue or an --else 
6db0: 6f 66 20 61 20 66 61 6c 73 65 20 69 66 2e 20 20  of a false if.  
6dc0: 54 68 69 73 20 69 73 20 61 20 6e 6f 2d 6f 70 2e  This is a no-op.
6dd0: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20  .    */.    if( 
6de0: 73 74 72 63 6d 70 28 7a 43 6d 64 2c 20 22 65 6e  strcmp(zCmd, "en
6df0: 64 69 66 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  dif")==0 ){.    
6e00: 20 20 2f 2a 20 6e 6f 2d 6f 70 20 2a 2f 0a 20 20    /* no-op */.  
6e10: 20 20 7d 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a    }else..    /*.
6e20: 20 20 20 20 2a 2a 20 20 2d 2d 73 74 61 72 74 20      **  --start 
6e30: 43 4c 49 45 4e 54 0a 20 20 20 20 2a 2a 0a 20 20  CLIENT.    **.  
6e40: 20 20 2a 2a 20 53 74 61 72 74 20 75 70 20 74 68    ** Start up th
6e50: 65 20 67 69 76 65 6e 20 63 6c 69 65 6e 74 2e 0a  e given client..
6e60: 20 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20 73      */.    if( s
6e70: 74 72 63 6d 70 28 7a 43 6d 64 2c 20 22 73 74 61  trcmp(zCmd, "sta
6e80: 72 74 22 29 3d 3d 30 20 26 26 20 69 43 6c 69 65  rt")==0 && iClie
6e90: 6e 74 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 69  nt==0 ){.      i
6ea0: 6e 74 20 69 4e 65 77 43 6c 69 65 6e 74 20 3d 20  nt iNewClient = 
6eb0: 61 74 6f 69 28 61 7a 41 72 67 5b 30 5d 29 3b 0a  atoi(azArg[0]);.
6ec0: 20 20 20 20 20 20 69 66 28 20 69 4e 65 77 43 6c        if( iNewCl
6ed0: 69 65 6e 74 3e 30 20 29 7b 0a 20 20 20 20 20 20  ient>0 ){.      
6ee0: 20 20 73 74 61 72 74 43 6c 69 65 6e 74 28 69 4e    startClient(iN
6ef0: 65 77 43 6c 69 65 6e 74 29 3b 0a 20 20 20 20 20  ewClient);.     
6f00: 20 7d 0a 20 20 20 20 7d 65 6c 73 65 0a 0a 20 20   }.    }else..  
6f10: 20 20 2f 2a 0a 20 20 20 20 2a 2a 20 20 2d 2d 77    /*.    **  --w
6f20: 61 69 74 20 43 4c 49 45 4e 54 20 54 49 4d 45 4f  ait CLIENT TIMEO
6f30: 55 54 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a  UT.    **.    **
6f40: 20 57 61 69 74 20 75 6e 74 69 6c 20 61 6c 6c 20   Wait until all 
6f50: 74 61 73 6b 73 20 63 6f 6d 70 6c 65 74 65 20 66  tasks complete f
6f60: 6f 72 20 74 68 65 20 67 69 76 65 6e 20 63 6c 69  or the given cli
6f70: 65 6e 74 2e 20 20 49 66 20 43 4c 49 45 4e 54 20  ent.  If CLIENT 
6f80: 69 73 0a 20 20 20 20 2a 2a 20 22 61 6c 6c 22 20  is.    ** "all" 
6f90: 74 68 65 6e 20 77 61 69 74 20 66 6f 72 20 61 6c  then wait for al
6fa0: 6c 20 63 6c 69 65 6e 74 73 20 74 6f 20 63 6f 6d  l clients to com
6fb0: 70 6c 65 74 65 2e 20 20 57 61 69 74 20 6e 6f 20  plete.  Wait no 
6fc0: 6c 6f 6e 67 65 72 20 74 68 61 6e 0a 20 20 20 20  longer than.    
6fd0: 2a 2a 20 54 49 4d 45 4f 55 54 20 6d 69 6c 6c 69  ** TIMEOUT milli
6fe0: 73 65 63 6f 6e 64 73 20 28 64 65 66 61 75 6c 74  seconds (default
6ff0: 20 31 30 2c 30 30 30 29 0a 20 20 20 20 2a 2f 0a   10,000).    */.
7000: 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28 7a      if( strcmp(z
7010: 43 6d 64 2c 20 22 77 61 69 74 22 29 3d 3d 30 20  Cmd, "wait")==0 
7020: 26 26 20 69 43 6c 69 65 6e 74 3d 3d 30 20 29 7b  && iClient==0 ){
7030: 0a 20 20 20 20 20 20 69 6e 74 20 69 54 69 6d 65  .      int iTime
7040: 6f 75 74 20 3d 20 6e 41 72 67 3e 3d 32 20 3f 20  out = nArg>=2 ? 
7050: 61 74 6f 69 28 61 7a 41 72 67 5b 31 5d 29 20 3a  atoi(azArg[1]) :
7060: 20 31 30 30 30 30 3b 0a 20 20 20 20 20 20 73 71   10000;.      sq
7070: 6c 69 74 65 33 5f 73 6e 70 72 69 6e 74 66 28 73  lite3_snprintf(s
7080: 69 7a 65 6f 66 28 7a 45 72 72 6f 72 29 2c 7a 45  izeof(zError),zE
7090: 72 72 6f 72 2c 22 6c 69 6e 65 20 25 64 20 6f 66  rror,"line %d of
70a0: 20 25 73 5c 6e 22 2c 0a 20 20 20 20 20 20 20 20   %s\n",.        
70b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70                 p
70c0: 72 65 76 4c 69 6e 65 2c 20 7a 46 69 6c 65 6e 61  revLine, zFilena
70d0: 6d 65 29 3b 0a 20 20 20 20 20 20 77 61 69 74 46  me);.      waitF
70e0: 6f 72 43 6c 69 65 6e 74 28 61 74 6f 69 28 61 7a  orClient(atoi(az
70f0: 41 72 67 5b 30 5d 29 2c 20 69 54 69 6d 65 6f 75  Arg[0]), iTimeou
7100: 74 2c 20 7a 45 72 72 6f 72 29 3b 0a 20 20 20 20  t, zError);.    
7110: 7d 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a 20 20  }else..    /*.  
7120: 20 20 2a 2a 20 20 2d 2d 74 61 73 6b 20 43 4c 49    **  --task CLI
7130: 45 4e 54 0a 20 20 20 20 2a 2a 20 20 20 20 20 3c  ENT.    **     <
7140: 74 61 73 6b 2d 63 6f 6e 74 65 6e 74 2d 68 65 72  task-content-her
7150: 65 3e 0a 20 20 20 20 2a 2a 20 20 2d 2d 65 6e 64  e>.    **  --end
7160: 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 41  .    **.    ** A
7170: 73 73 69 67 6e 20 77 6f 72 6b 20 74 6f 20 61 20  ssign work to a 
7180: 63 6c 69 65 6e 74 2e 20 20 53 74 61 72 74 20 74  client.  Start t
7190: 68 65 20 63 6c 69 65 6e 74 20 69 66 20 69 74 20  he client if it 
71a0: 69 73 20 6e 6f 74 20 72 75 6e 6e 69 6e 67 0a 20  is not running. 
71b0: 20 20 20 2a 2a 20 61 6c 72 65 61 64 79 2e 0a 20     ** already.. 
71c0: 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20 73 74     */.    if( st
71d0: 72 63 6d 70 28 7a 43 6d 64 2c 20 22 74 61 73 6b  rcmp(zCmd, "task
71e0: 22 29 3d 3d 30 20 26 26 20 69 43 6c 69 65 6e 74  ")==0 && iClient
71f0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 69 6e 74  ==0 ){.      int
7200: 20 69 54 61 72 67 65 74 20 3d 20 61 74 6f 69 28   iTarget = atoi(
7210: 61 7a 41 72 67 5b 30 5d 29 3b 0a 20 20 20 20 20  azArg[0]);.     
7220: 20 69 6e 74 20 69 45 6e 64 3b 0a 20 20 20 20 20   int iEnd;.     
7230: 20 63 68 61 72 20 2a 7a 54 61 73 6b 3b 0a 20 20   char *zTask;.  
7240: 20 20 20 20 63 68 61 72 20 2a 7a 54 4e 61 6d 65      char *zTName
7250: 3b 0a 20 20 20 20 20 20 69 45 6e 64 20 3d 20 66  ;.      iEnd = f
7260: 69 6e 64 45 6e 64 28 7a 53 63 72 69 70 74 2b 69  indEnd(zScript+i
7270: 69 2b 6c 65 6e 2c 20 26 6c 69 6e 65 6e 6f 29 3b  i+len, &lineno);
7280: 0a 20 20 20 20 20 20 69 66 28 20 69 54 61 72 67  .      if( iTarg
7290: 65 74 3c 30 20 29 7b 0a 20 20 20 20 20 20 20 20  et<0 ){.        
72a0: 65 72 72 6f 72 4d 65 73 73 61 67 65 28 22 6c 69  errorMessage("li
72b0: 6e 65 20 25 64 20 6f 66 20 25 73 3a 20 62 61 64  ne %d of %s: bad
72c0: 20 63 6c 69 65 6e 74 20 6e 75 6d 62 65 72 3a 20   client number: 
72d0: 25 64 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20  %d",.           
72e0: 20 20 20 20 20 20 20 20 20 20 70 72 65 76 4c 69            prevLi
72f0: 6e 65 2c 20 7a 46 69 6c 65 6e 61 6d 65 2c 20 69  ne, zFilename, i
7300: 54 61 72 67 65 74 29 3b 0a 20 20 20 20 20 20 7d  Target);.      }
7310: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 7a 54  else{.        zT
7320: 61 73 6b 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70  ask = sqlite3_mp
7330: 72 69 6e 74 66 28 22 25 2e 2a 73 22 2c 20 69 45  rintf("%.*s", iE
7340: 6e 64 2c 20 7a 53 63 72 69 70 74 2b 69 69 2b 6c  nd, zScript+ii+l
7350: 65 6e 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28  en);.        if(
7360: 20 6e 41 72 67 3e 31 20 29 7b 0a 20 20 20 20 20   nArg>1 ){.     
7370: 20 20 20 20 20 7a 54 4e 61 6d 65 20 3d 20 73 71       zTName = sq
7380: 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22 25  lite3_mprintf("%
7390: 73 22 2c 20 61 7a 41 72 67 5b 31 5d 29 3b 0a 20  s", azArg[1]);. 
73a0: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20         }else{.  
73b0: 20 20 20 20 20 20 20 20 7a 54 4e 61 6d 65 20 3d          zTName =
73c0: 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66   sqlite3_mprintf
73d0: 28 22 25 73 3a 25 64 22 2c 20 66 69 6c 65 6e 61  ("%s:%d", filena
73e0: 6d 65 54 61 69 6c 28 7a 46 69 6c 65 6e 61 6d 65  meTail(zFilename
73f0: 29 2c 20 70 72 65 76 4c 69 6e 65 29 3b 0a 20 20  ), prevLine);.  
7400: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20        }.        
7410: 73 74 61 72 74 43 6c 69 65 6e 74 28 69 54 61 72  startClient(iTar
7420: 67 65 74 29 3b 0a 20 20 20 20 20 20 20 20 72 75  get);.        ru
7430: 6e 53 71 6c 28 22 49 4e 53 45 52 54 20 49 4e 54  nSql("INSERT INT
7440: 4f 20 74 61 73 6b 28 63 6c 69 65 6e 74 2c 73 63  O task(client,sc
7450: 72 69 70 74 2c 6e 61 6d 65 29 22 0a 20 20 20 20  ript,name)".    
7460: 20 20 20 20 20 20 20 20 20 20 20 22 20 56 41 4c             " VAL
7470: 55 45 53 28 25 64 2c 27 25 71 27 2c 25 51 29 22  UES(%d,'%q',%Q)"
7480: 2c 20 69 54 61 72 67 65 74 2c 20 7a 54 61 73 6b  , iTarget, zTask
7490: 2c 20 7a 54 4e 61 6d 65 29 3b 0a 20 20 20 20 20  , zTName);.     
74a0: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28     sqlite3_free(
74b0: 7a 54 61 73 6b 29 3b 0a 20 20 20 20 20 20 20 20  zTask);.        
74c0: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 54 4e  sqlite3_free(zTN
74d0: 61 6d 65 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  ame);.      }.  
74e0: 20 20 20 20 69 45 6e 64 20 2b 3d 20 74 6f 6b 65      iEnd += toke
74f0: 6e 4c 65 6e 67 74 68 28 7a 53 63 72 69 70 74 2b  nLength(zScript+
7500: 69 69 2b 6c 65 6e 2b 69 45 6e 64 2c 20 26 6c 69  ii+len+iEnd, &li
7510: 6e 65 6e 6f 29 3b 0a 20 20 20 20 20 20 6c 65 6e  neno);.      len
7520: 20 2b 3d 20 69 45 6e 64 3b 0a 20 20 20 20 20 20   += iEnd;.      
7530: 69 42 65 67 69 6e 20 3d 20 69 69 2b 6c 65 6e 3b  iBegin = ii+len;
7540: 0a 20 20 20 20 7d 65 6c 73 65 0a 0a 20 20 20 20  .    }else..    
7550: 2f 2a 0a 20 20 20 20 2a 2a 20 20 2d 2d 62 72 65  /*.    **  --bre
7560: 61 6b 70 6f 69 6e 74 0a 20 20 20 20 2a 2a 0a 20  akpoint.    **. 
7570: 20 20 20 2a 2a 20 54 68 69 73 20 63 6f 6d 6d 61     ** This comma
7580: 6e 64 20 63 61 6c 6c 73 20 22 74 65 73 74 5f 62  nd calls "test_b
7590: 72 65 61 6b 70 6f 69 6e 74 28 29 22 20 77 68 69  reakpoint()" whi
75a0: 63 68 20 69 73 20 61 20 72 6f 75 74 69 6e 65 20  ch is a routine 
75b0: 70 72 6f 76 69 64 65 64 0a 20 20 20 20 2a 2a 20  provided.    ** 
75c0: 61 73 20 61 20 63 6f 6e 76 65 6e 69 65 6e 74 20  as a convenient 
75d0: 70 6c 61 63 65 20 74 6f 20 73 65 74 20 61 20 64  place to set a d
75e0: 65 62 75 67 67 65 72 20 62 72 65 61 6b 70 6f 69  ebugger breakpoi
75f0: 6e 74 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69  nt..    */.    i
7600: 66 28 20 73 74 72 63 6d 70 28 7a 43 6d 64 2c 20  f( strcmp(zCmd, 
7610: 22 62 72 65 61 6b 70 6f 69 6e 74 22 29 3d 3d 30  "breakpoint")==0
7620: 20 29 7b 0a 20 20 20 20 20 20 74 65 73 74 5f 62   ){.      test_b
7630: 72 65 61 6b 70 6f 69 6e 74 28 29 3b 0a 20 20 20  reakpoint();.   
7640: 20 7d 65 6c 73 65 0a 0a 20 20 20 20 2f 2a 0a 20   }else..    /*. 
7650: 20 20 20 2a 2a 20 20 2d 2d 73 68 6f 77 2d 73 71     **  --show-sq
7660: 6c 2d 65 72 72 6f 72 73 20 42 4f 4f 4c 45 41 4e  l-errors BOOLEAN
7670: 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 54  .    **.    ** T
7680: 75 72 6e 20 64 69 73 70 6c 61 79 20 6f 66 20 53  urn display of S
7690: 51 4c 20 65 72 72 6f 72 73 20 6f 6e 20 61 6e 64  QL errors on and
76a0: 20 6f 66 66 2e 0a 20 20 20 20 2a 2f 0a 20 20 20   off..    */.   
76b0: 20 69 66 28 20 73 74 72 63 6d 70 28 7a 43 6d 64   if( strcmp(zCmd
76c0: 2c 20 22 73 68 6f 77 2d 73 71 6c 2d 65 72 72 6f  , "show-sql-erro
76d0: 72 73 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  rs")==0 ){.     
76e0: 20 67 2e 62 49 67 6e 6f 72 65 53 71 6c 45 72 72   g.bIgnoreSqlErr
76f0: 6f 72 73 20 3d 20 6e 41 72 67 3e 3d 31 20 3f 20  ors = nArg>=1 ? 
7700: 21 62 6f 6f 6c 65 61 6e 56 61 6c 75 65 28 61 7a  !booleanValue(az
7710: 41 72 67 5b 30 5d 29 20 3a 20 31 3b 0a 20 20 20  Arg[0]) : 1;.   
7720: 20 7d 65 6c 73 65 0a 0a 0a 20 20 20 20 2f 2a 20   }else...    /* 
7730: 65 72 72 6f 72 20 2a 2f 7b 0a 20 20 20 20 20 20  error */{.      
7740: 65 72 72 6f 72 4d 65 73 73 61 67 65 28 22 6c 69  errorMessage("li
7750: 6e 65 20 25 64 20 6f 66 20 25 73 3a 20 75 6e 6b  ne %d of %s: unk
7760: 6e 6f 77 6e 20 63 6f 6d 6d 61 6e 64 20 2d 2d 25  nown command --%
7770: 73 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  s",.            
7780: 20 20 20 20 20 20 20 70 72 65 76 4c 69 6e 65 2c         prevLine,
7790: 20 7a 46 69 6c 65 6e 61 6d 65 2c 20 7a 43 6d 64   zFilename, zCmd
77a0: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 69 20  );.    }.    ii 
77b0: 2b 3d 20 6c 65 6e 3b 0a 20 20 7d 0a 20 20 69 66  += len;.  }.  if
77c0: 28 20 69 42 65 67 69 6e 3c 69 69 20 29 7b 0a 20  ( iBegin<ii ){. 
77d0: 20 20 20 63 68 61 72 20 2a 7a 53 71 6c 20 3d 20     char *zSql = 
77e0: 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28  sqlite3_mprintf(
77f0: 22 25 2e 2a 73 22 2c 20 69 69 2d 69 42 65 67 69  "%.*s", ii-iBegi
7800: 6e 2c 20 7a 53 63 72 69 70 74 2b 69 42 65 67 69  n, zScript+iBegi
7810: 6e 29 3b 0a 20 20 20 20 72 75 6e 53 71 6c 28 7a  n);.    runSql(z
7820: 53 71 6c 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  Sql);.    sqlite
7830: 33 5f 66 72 65 65 28 7a 53 71 6c 29 3b 0a 20 20  3_free(zSql);.  
7840: 7d 0a 20 20 73 74 72 69 6e 67 46 72 65 65 28 26  }.  stringFree(&
7850: 73 52 65 73 75 6c 74 29 3b 0a 7d 0a 0a 2f 2a 0a  sResult);.}../*.
7860: 2a 2a 20 4c 6f 6f 6b 20 66 6f 72 20 61 20 63 6f  ** Look for a co
7870: 6d 6d 61 6e 64 2d 6c 69 6e 65 20 6f 70 74 69 6f  mmand-line optio
7880: 6e 2e 20 20 49 66 20 70 72 65 73 65 6e 74 2c 20  n.  If present, 
7890: 72 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72  return a pointer
78a0: 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 4e 55 4c 4c  ..** Return NULL
78b0: 20 69 66 20 6d 69 73 73 69 6e 67 2e 0a 2a 2a 0a   if missing..**.
78c0: 2a 2a 20 68 61 73 41 72 67 3d 3d 30 20 6d 65 61  ** hasArg==0 mea
78d0: 6e 73 20 74 68 65 20 6f 70 74 69 6f 6e 20 69 73  ns the option is
78e0: 20 61 20 66 6c 61 67 2e 20 20 49 74 20 69 73 20   a flag.  It is 
78f0: 65 69 74 68 65 72 20 70 72 65 73 65 6e 74 20 6f  either present o
7900: 72 20 6e 6f 74 2e 0a 2a 2a 20 68 61 73 41 72 67  r not..** hasArg
7910: 3d 3d 31 20 6d 65 61 6e 73 20 74 68 65 20 6f 70  ==1 means the op
7920: 74 69 6f 6e 20 68 61 73 20 61 6e 20 61 72 67 75  tion has an argu
7930: 6d 65 6e 74 2e 20 20 52 65 74 75 72 6e 20 61 20  ment.  Return a 
7940: 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 0a 2a  pointer to the.*
7950: 2a 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73  * argument..*/.s
7960: 74 61 74 69 63 20 63 68 61 72 20 2a 66 69 6e 64  tatic char *find
7970: 4f 70 74 69 6f 6e 28 0a 20 20 63 68 61 72 20 2a  Option(.  char *
7980: 2a 61 7a 41 72 67 2c 0a 20 20 69 6e 74 20 2a 70  *azArg,.  int *p
7990: 6e 41 72 67 2c 0a 20 20 63 6f 6e 73 74 20 63 68  nArg,.  const ch
79a0: 61 72 20 2a 7a 4f 70 74 69 6f 6e 2c 0a 20 20 69  ar *zOption,.  i
79b0: 6e 74 20 68 61 73 41 72 67 0a 29 7b 0a 20 20 69  nt hasArg.){.  i
79c0: 6e 74 20 69 2c 20 6a 3b 0a 20 20 63 68 61 72 20  nt i, j;.  char 
79d0: 2a 7a 52 65 74 75 72 6e 20 3d 20 30 3b 0a 20 20  *zReturn = 0;.  
79e0: 69 6e 74 20 6e 41 72 67 20 3d 20 2a 70 6e 41 72  int nArg = *pnAr
79f0: 67 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 68 61  g;..  assert( ha
7a00: 73 41 72 67 3d 3d 30 20 7c 7c 20 68 61 73 41 72  sArg==0 || hasAr
7a10: 67 3d 3d 31 20 29 3b 0a 20 20 66 6f 72 28 69 3d  g==1 );.  for(i=
7a20: 30 3b 20 69 3c 6e 41 72 67 3b 20 69 2b 2b 29 7b  0; i<nArg; i++){
7a30: 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20  .    const char 
7a40: 2a 7a 3b 0a 20 20 20 20 69 66 28 20 69 2b 68 61  *z;.    if( i+ha
7a50: 73 41 72 67 20 3e 3d 20 6e 41 72 67 20 29 20 62  sArg >= nArg ) b
7a60: 72 65 61 6b 3b 0a 20 20 20 20 7a 20 3d 20 61 7a  reak;.    z = az
7a70: 41 72 67 5b 69 5d 3b 0a 20 20 20 20 69 66 28 20  Arg[i];.    if( 
7a80: 7a 5b 30 5d 21 3d 27 2d 27 20 29 20 63 6f 6e 74  z[0]!='-' ) cont
7a90: 69 6e 75 65 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20  inue;.    z++;. 
7aa0: 20 20 20 69 66 28 20 7a 5b 30 5d 3d 3d 27 2d 27     if( z[0]=='-'
7ab0: 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20 7a 5b   ){.      if( z[
7ac0: 31 5d 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20  1]==0 ) break;. 
7ad0: 20 20 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 7d 0a       z++;.    }.
7ae0: 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28 7a      if( strcmp(z
7af0: 2c 7a 4f 70 74 69 6f 6e 29 3d 3d 30 20 29 7b 0a  ,zOption)==0 ){.
7b00: 20 20 20 20 20 20 69 66 28 20 68 61 73 41 72 67        if( hasArg
7b10: 20 26 26 20 69 3d 3d 6e 41 72 67 2d 31 20 29 7b   && i==nArg-1 ){
7b20: 0a 20 20 20 20 20 20 20 20 66 61 74 61 6c 45 72  .        fatalEr
7b30: 72 6f 72 28 22 63 6f 6d 6d 61 6e 64 2d 6c 69 6e  ror("command-lin
7b40: 65 20 6f 70 74 69 6f 6e 20 5c 22 2d 2d 25 73 5c  e option \"--%s\
7b50: 22 20 72 65 71 75 69 72 65 73 20 61 6e 20 61 72  " requires an ar
7b60: 67 75 6d 65 6e 74 22 2c 20 7a 29 3b 0a 20 20 20  gument", z);.   
7b70: 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20 68     }.      if( h
7b80: 61 73 41 72 67 20 29 7b 0a 20 20 20 20 20 20 20  asArg ){.       
7b90: 20 7a 52 65 74 75 72 6e 20 3d 20 61 7a 41 72 67   zReturn = azArg
7ba0: 5b 69 2b 31 5d 3b 0a 20 20 20 20 20 20 7d 65 6c  [i+1];.      }el
7bb0: 73 65 7b 0a 20 20 20 20 20 20 20 20 7a 52 65 74  se{.        zRet
7bc0: 75 72 6e 20 3d 20 61 7a 41 72 67 5b 69 5d 3b 0a  urn = azArg[i];.
7bd0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 6a 20        }.      j 
7be0: 3d 20 69 2b 31 2b 28 68 61 73 41 72 67 21 3d 30  = i+1+(hasArg!=0
7bf0: 29 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20  );.      while( 
7c00: 6a 3c 6e 41 72 67 20 29 20 61 7a 41 72 67 5b 69  j<nArg ) azArg[i
7c10: 2b 2b 5d 20 3d 20 61 7a 41 72 67 5b 6a 2b 2b 5d  ++] = azArg[j++]
7c20: 3b 0a 20 20 20 20 20 20 2a 70 6e 41 72 67 20 3d  ;.      *pnArg =
7c30: 20 69 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e   i;.      return
7c40: 20 7a 52 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a   zReturn;.    }.
7c50: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 7a 52 65    }.  return zRe
7c60: 74 75 72 6e 3b 0a 7d 0a 0a 2f 2a 20 50 72 69 6e  turn;.}../* Prin
7c70: 74 20 61 20 75 73 61 67 65 20 6d 65 73 73 61 67  t a usage messag
7c80: 65 20 66 6f 72 20 74 68 65 20 70 72 6f 67 72 61  e for the progra
7c90: 6d 20 61 6e 64 20 65 78 69 74 20 2a 2f 0a 73 74  m and exit */.st
7ca0: 61 74 69 63 20 76 6f 69 64 20 75 73 61 67 65 28  atic void usage(
7cb0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 72 67 76  const char *argv
7cc0: 30 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 63  0){.  int i;.  c
7cd0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 61 69 6c  onst char *zTail
7ce0: 20 3d 20 61 72 67 76 30 3b 0a 20 20 66 6f 72 28   = argv0;.  for(
7cf0: 69 3d 30 3b 20 61 72 67 76 30 5b 69 5d 3b 20 69  i=0; argv0[i]; i
7d00: 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 61 72 67  ++){.    if( arg
7d10: 76 30 5b 69 5d 3d 3d 27 2f 27 20 29 20 7a 54 61  v0[i]=='/' ) zTa
7d20: 69 6c 20 3d 20 61 72 67 76 30 2b 69 2b 31 3b 0a  il = argv0+i+1;.
7d30: 20 20 7d 0a 20 20 66 70 72 69 6e 74 66 28 73 74    }.  fprintf(st
7d40: 64 65 72 72 2c 22 55 73 61 67 65 3a 20 25 73 20  derr,"Usage: %s 
7d50: 44 41 54 41 42 41 53 45 20 3f 4f 50 54 49 4f 4e  DATABASE ?OPTION
7d60: 53 3f 20 3f 53 43 52 49 50 54 3f 5c 6e 22 2c 20  S? ?SCRIPT?\n", 
7d70: 7a 54 61 69 6c 29 3b 0a 20 20 65 78 69 74 28 31  zTail);.  exit(1
7d80: 29 3b 0a 7d 0a 0a 2f 2a 20 52 65 70 6f 72 74 20  );.}../* Report 
7d90: 6f 6e 20 75 6e 72 65 63 6f 67 6e 69 7a 65 64 20  on unrecognized 
7da0: 61 72 67 75 6d 65 6e 74 73 20 2a 2f 0a 73 74 61  arguments */.sta
7db0: 74 69 63 20 76 6f 69 64 20 75 6e 72 65 63 6f 67  tic void unrecog
7dc0: 6e 69 7a 65 64 41 72 67 75 6d 65 6e 74 73 28 0a  nizedArguments(.
7dd0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 72    const char *ar
7de0: 67 76 30 2c 0a 20 20 69 6e 74 20 6e 41 72 67 2c  gv0,.  int nArg,
7df0: 0a 20 20 63 68 61 72 20 2a 2a 61 7a 41 72 67 0a  .  char **azArg.
7e00: 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 66 70  ){.  int i;.  fp
7e10: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 22 25 73  rintf(stderr,"%s
7e20: 3a 20 75 6e 72 65 63 6f 67 6e 69 7a 65 64 20 61  : unrecognized a
7e30: 72 67 75 6d 65 6e 74 73 3a 22 2c 20 61 72 67 76  rguments:", argv
7e40: 30 29 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69  0);.  for(i=0; i
7e50: 3c 6e 41 72 67 3b 20 69 2b 2b 29 7b 0a 20 20 20  <nArg; i++){.   
7e60: 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c   fprintf(stderr,
7e70: 22 20 25 73 22 2c 20 61 7a 41 72 67 5b 69 5d 29  " %s", azArg[i])
7e80: 3b 0a 20 20 7d 0a 20 20 66 70 72 69 6e 74 66 28  ;.  }.  fprintf(
7e90: 73 74 64 65 72 72 2c 22 5c 6e 22 29 3b 0a 20 20  stderr,"\n");.  
7ea0: 65 78 69 74 28 31 29 3b 0a 7d 0a 0a 69 6e 74 20  exit(1);.}..int 
7eb0: 53 51 4c 49 54 45 5f 43 44 45 43 4c 20 6d 61 69  SQLITE_CDECL mai
7ec0: 6e 28 69 6e 74 20 61 72 67 63 2c 20 63 68 61 72  n(int argc, char
7ed0: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 6f 6e 73   **argv){.  cons
7ee0: 74 20 63 68 61 72 20 2a 7a 43 6c 69 65 6e 74 3b  t char *zClient;
7ef0: 0a 20 20 69 6e 74 20 69 43 6c 69 65 6e 74 3b 0a  .  int iClient;.
7f00: 20 20 69 6e 74 20 6e 2c 20 69 3b 0a 20 20 69 6e    int n, i;.  in
7f10: 74 20 6f 70 65 6e 46 6c 61 67 73 20 3d 20 53 51  t openFlags = SQ
7f20: 4c 49 54 45 5f 4f 50 45 4e 5f 52 45 41 44 57 52  LITE_OPEN_READWR
7f30: 49 54 45 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20  ITE;.  int rc;. 
7f40: 20 63 68 61 72 20 2a 7a 53 63 72 69 70 74 3b 0a   char *zScript;.
7f50: 20 20 69 6e 74 20 74 61 73 6b 49 64 3b 0a 20 20    int taskId;.  
7f60: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 72 61  const char *zTra
7f70: 63 65 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  ce;.  const char
7f80: 20 2a 7a 43 4f 70 74 69 6f 6e 3b 0a 20 20 63 6f   *zCOption;.  co
7f90: 6e 73 74 20 63 68 61 72 20 2a 7a 4a 4d 6f 64 65  nst char *zJMode
7fa0: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
7fb0: 7a 4e 52 65 70 3b 0a 20 20 69 6e 74 20 6e 52 65  zNRep;.  int nRe
7fc0: 70 20 3d 20 31 2c 20 69 52 65 70 3b 0a 0a 20 20  p = 1, iRep;..  
7fd0: 67 2e 61 72 67 76 30 20 3d 20 61 72 67 76 5b 30  g.argv0 = argv[0
7fe0: 5d 3b 0a 20 20 67 2e 69 54 72 61 63 65 20 3d 20  ];.  g.iTrace = 
7ff0: 31 3b 0a 20 20 69 66 28 20 61 72 67 63 3c 32 20  1;.  if( argc<2 
8000: 29 20 75 73 61 67 65 28 61 72 67 76 5b 30 5d 29  ) usage(argv[0])
8010: 3b 0a 20 20 67 2e 7a 44 62 46 69 6c 65 20 3d 20  ;.  g.zDbFile = 
8020: 61 72 67 76 5b 31 5d 3b 0a 20 20 69 66 28 20 73  argv[1];.  if( s
8030: 74 72 67 6c 6f 62 28 22 2a 2e 74 65 73 74 22 2c  trglob("*.test",
8040: 20 67 2e 7a 44 62 46 69 6c 65 29 20 29 20 75 73   g.zDbFile) ) us
8050: 61 67 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  age(argv[0]);.  
8060: 69 66 28 20 73 74 72 63 6d 70 28 73 71 6c 69 74  if( strcmp(sqlit
8070: 65 33 5f 73 6f 75 72 63 65 69 64 28 29 2c 20 53  e3_sourceid(), S
8080: 51 4c 49 54 45 5f 53 4f 55 52 43 45 5f 49 44 29  QLITE_SOURCE_ID)
8090: 21 3d 30 20 29 7b 0a 20 20 20 20 66 70 72 69 6e  !=0 ){.    fprin
80a0: 74 66 28 73 74 64 65 72 72 2c 20 22 53 51 4c 69  tf(stderr, "SQLi
80b0: 74 65 20 6c 69 62 72 61 72 79 20 61 6e 64 20 68  te library and h
80c0: 65 61 64 65 72 20 6d 69 73 6d 61 74 63 68 5c 6e  eader mismatch\n
80d0: 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ".              
80e0: 20 20 20 20 20 20 22 4c 69 62 72 61 72 79 3a 20        "Library: 
80f0: 25 73 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20  %s\n".          
8100: 20 20 20 20 20 20 20 20 20 20 22 48 65 61 64 65            "Heade
8110: 72 3a 20 20 25 73 5c 6e 22 2c 0a 20 20 20 20 20  r:  %s\n",.     
8120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                 s
8130: 71 6c 69 74 65 33 5f 73 6f 75 72 63 65 69 64 28  qlite3_sourceid(
8140: 29 2c 20 53 51 4c 49 54 45 5f 53 4f 55 52 43 45  ), SQLITE_SOURCE
8150: 5f 49 44 29 3b 0a 20 20 20 20 65 78 69 74 28 31  _ID);.    exit(1
8160: 29 3b 0a 20 20 7d 0a 20 20 6e 20 3d 20 61 72 67  );.  }.  n = arg
8170: 63 2d 32 3b 0a 20 20 73 71 6c 69 74 65 33 5f 73  c-2;.  sqlite3_s
8180: 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66 28 67  nprintf(sizeof(g
8190: 2e 7a 4e 61 6d 65 29 2c 20 67 2e 7a 4e 61 6d 65  .zName), g.zName
81a0: 2c 20 22 25 30 35 64 2e 6d 70 74 65 73 74 22 2c  , "%05d.mptest",
81b0: 20 47 45 54 50 49 44 28 29 29 3b 0a 20 20 7a 4a   GETPID());.  zJ
81c0: 4d 6f 64 65 20 3d 20 66 69 6e 64 4f 70 74 69 6f  Mode = findOptio
81d0: 6e 28 61 72 67 76 2b 32 2c 20 26 6e 2c 20 22 6a  n(argv+2, &n, "j
81e0: 6f 75 72 6e 61 6c 6d 6f 64 65 22 2c 20 31 29 3b  ournalmode", 1);
81f0: 0a 20 20 7a 4e 52 65 70 20 3d 20 66 69 6e 64 4f  .  zNRep = findO
8200: 70 74 69 6f 6e 28 61 72 67 76 2b 32 2c 20 26 6e  ption(argv+2, &n
8210: 2c 20 22 72 65 70 65 61 74 22 2c 20 31 29 3b 0a  , "repeat", 1);.
8220: 20 20 69 66 28 20 7a 4e 52 65 70 20 29 20 6e 52    if( zNRep ) nR
8230: 65 70 20 3d 20 61 74 6f 69 28 7a 4e 52 65 70 29  ep = atoi(zNRep)
8240: 3b 0a 20 20 69 66 28 20 6e 52 65 70 3c 31 20 29  ;.  if( nRep<1 )
8250: 20 6e 52 65 70 20 3d 20 31 3b 0a 20 20 67 2e 7a   nRep = 1;.  g.z
8260: 56 66 73 20 3d 20 66 69 6e 64 4f 70 74 69 6f 6e  Vfs = findOption
8270: 28 61 72 67 76 2b 32 2c 20 26 6e 2c 20 22 76 66  (argv+2, &n, "vf
8280: 73 22 2c 20 31 29 3b 0a 20 20 7a 43 6c 69 65 6e  s", 1);.  zClien
8290: 74 20 3d 20 66 69 6e 64 4f 70 74 69 6f 6e 28 61  t = findOption(a
82a0: 72 67 76 2b 32 2c 20 26 6e 2c 20 22 63 6c 69 65  rgv+2, &n, "clie
82b0: 6e 74 22 2c 20 31 29 3b 0a 20 20 67 2e 7a 45 72  nt", 1);.  g.zEr
82c0: 72 4c 6f 67 20 3d 20 66 69 6e 64 4f 70 74 69 6f  rLog = findOptio
82d0: 6e 28 61 72 67 76 2b 32 2c 20 26 6e 2c 20 22 65  n(argv+2, &n, "e
82e0: 72 72 6c 6f 67 22 2c 20 31 29 3b 0a 20 20 67 2e  rrlog", 1);.  g.
82f0: 7a 4c 6f 67 20 3d 20 66 69 6e 64 4f 70 74 69 6f  zLog = findOptio
8300: 6e 28 61 72 67 76 2b 32 2c 20 26 6e 2c 20 22 6c  n(argv+2, &n, "l
8310: 6f 67 22 2c 20 31 29 3b 0a 20 20 7a 54 72 61 63  og", 1);.  zTrac
8320: 65 20 3d 20 66 69 6e 64 4f 70 74 69 6f 6e 28 61  e = findOption(a
8330: 72 67 76 2b 32 2c 20 26 6e 2c 20 22 74 72 61 63  rgv+2, &n, "trac
8340: 65 22 2c 20 31 29 3b 0a 20 20 69 66 28 20 7a 54  e", 1);.  if( zT
8350: 72 61 63 65 20 29 20 67 2e 69 54 72 61 63 65 20  race ) g.iTrace 
8360: 3d 20 61 74 6f 69 28 7a 54 72 61 63 65 29 3b 0a  = atoi(zTrace);.
8370: 20 20 69 66 28 20 66 69 6e 64 4f 70 74 69 6f 6e    if( findOption
8380: 28 61 72 67 76 2b 32 2c 20 26 6e 2c 20 22 71 75  (argv+2, &n, "qu
8390: 69 65 74 22 2c 20 30 29 21 3d 30 20 29 20 67 2e  iet", 0)!=0 ) g.
83a0: 69 54 72 61 63 65 20 3d 20 30 3b 0a 20 20 67 2e  iTrace = 0;.  g.
83b0: 62 53 71 6c 54 72 61 63 65 20 3d 20 66 69 6e 64  bSqlTrace = find
83c0: 4f 70 74 69 6f 6e 28 61 72 67 76 2b 32 2c 20 26  Option(argv+2, &
83d0: 6e 2c 20 22 73 71 6c 74 72 61 63 65 22 2c 20 30  n, "sqltrace", 0
83e0: 29 21 3d 30 3b 0a 20 20 67 2e 62 53 79 6e 63 20  )!=0;.  g.bSync 
83f0: 3d 20 66 69 6e 64 4f 70 74 69 6f 6e 28 61 72 67  = findOption(arg
8400: 76 2b 32 2c 20 26 6e 2c 20 22 73 79 6e 63 22 2c  v+2, &n, "sync",
8410: 20 30 29 21 3d 30 3b 0a 20 20 69 66 28 20 67 2e   0)!=0;.  if( g.
8420: 7a 45 72 72 4c 6f 67 20 29 7b 0a 20 20 20 20 67  zErrLog ){.    g
8430: 2e 70 45 72 72 4c 6f 67 20 3d 20 66 6f 70 65 6e  .pErrLog = fopen
8440: 28 67 2e 7a 45 72 72 4c 6f 67 2c 20 22 61 22 29  (g.zErrLog, "a")
8450: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 67  ;.  }else{.    g
8460: 2e 70 45 72 72 4c 6f 67 20 3d 20 73 74 64 65 72  .pErrLog = stder
8470: 72 3b 0a 20 20 7d 0a 20 20 69 66 28 20 67 2e 7a  r;.  }.  if( g.z
8480: 4c 6f 67 20 29 7b 0a 20 20 20 20 67 2e 70 4c 6f  Log ){.    g.pLo
8490: 67 20 3d 20 66 6f 70 65 6e 28 67 2e 7a 4c 6f 67  g = fopen(g.zLog
84a0: 2c 20 22 61 22 29 3b 0a 20 20 7d 65 6c 73 65 7b  , "a");.  }else{
84b0: 0a 20 20 20 20 67 2e 70 4c 6f 67 20 3d 20 73 74  .    g.pLog = st
84c0: 64 6f 75 74 3b 0a 20 20 7d 0a 20 20 0a 20 20 73  dout;.  }.  .  s
84d0: 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 28 53 51  qlite3_config(SQ
84e0: 4c 49 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f 47 2c  LITE_CONFIG_LOG,
84f0: 20 73 71 6c 45 72 72 6f 72 43 61 6c 6c 62 61 63   sqlErrorCallbac
8500: 6b 2c 20 30 29 3b 0a 20 20 69 66 28 20 7a 43 6c  k, 0);.  if( zCl
8510: 69 65 6e 74 20 29 7b 0a 20 20 20 20 69 43 6c 69  ient ){.    iCli
8520: 65 6e 74 20 3d 20 61 74 6f 69 28 7a 43 6c 69 65  ent = atoi(zClie
8530: 6e 74 29 3b 0a 20 20 20 20 69 66 28 20 69 43 6c  nt);.    if( iCl
8540: 69 65 6e 74 3c 31 20 29 20 66 61 74 61 6c 45 72  ient<1 ) fatalEr
8550: 72 6f 72 28 22 69 6c 6c 65 67 61 6c 20 63 6c 69  ror("illegal cli
8560: 65 6e 74 20 6e 75 6d 62 65 72 3a 20 25 64 5c 6e  ent number: %d\n
8570: 22 2c 20 69 43 6c 69 65 6e 74 29 3b 0a 20 20 20  ", iClient);.   
8580: 20 73 71 6c 69 74 65 33 5f 73 6e 70 72 69 6e 74   sqlite3_snprint
8590: 66 28 73 69 7a 65 6f 66 28 67 2e 7a 4e 61 6d 65  f(sizeof(g.zName
85a0: 29 2c 20 67 2e 7a 4e 61 6d 65 2c 20 22 25 30 35  ), g.zName, "%05
85b0: 64 2e 63 6c 69 65 6e 74 25 30 32 64 22 2c 0a 20  d.client%02d",. 
85c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
85d0: 20 20 20 20 47 45 54 50 49 44 28 29 2c 20 69 43      GETPID(), iC
85e0: 6c 69 65 6e 74 29 3b 0a 20 20 7d 65 6c 73 65 7b  lient);.  }else{
85f0: 0a 20 20 20 20 69 66 28 20 67 2e 69 54 72 61 63  .    if( g.iTrac
8600: 65 3e 30 20 29 7b 0a 20 20 20 20 20 20 70 72 69  e>0 ){.      pri
8610: 6e 74 66 28 22 42 45 47 49 4e 3a 20 25 73 22 2c  ntf("BEGIN: %s",
8620: 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20   argv[0]);.     
8630: 20 66 6f 72 28 69 3d 31 3b 20 69 3c 61 72 67 63   for(i=1; i<argc
8640: 3b 20 69 2b 2b 29 20 70 72 69 6e 74 66 28 22 20  ; i++) printf(" 
8650: 25 73 22 2c 20 61 72 67 76 5b 69 5d 29 3b 0a 20  %s", argv[i]);. 
8660: 20 20 20 20 20 70 72 69 6e 74 66 28 22 5c 6e 22       printf("\n"
8670: 29 3b 0a 20 20 20 20 20 20 70 72 69 6e 74 66 28  );.      printf(
8680: 22 57 69 74 68 20 53 51 4c 69 74 65 20 22 20 53  "With SQLite " S
8690: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 20 22 20  QLITE_VERSION " 
86a0: 22 20 53 51 4c 49 54 45 5f 53 4f 55 52 43 45 5f  " SQLITE_SOURCE_
86b0: 49 44 20 22 5c 6e 22 20 29 3b 0a 20 20 20 20 20  ID "\n" );.     
86c0: 20 66 6f 72 28 69 3d 30 3b 20 28 7a 43 4f 70 74   for(i=0; (zCOpt
86d0: 69 6f 6e 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  ion = sqlite3_co
86e0: 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28  mpileoption_get(
86f0: 69 29 29 21 3d 30 3b 20 69 2b 2b 29 7b 0a 20 20  i))!=0; i++){.  
8700: 20 20 20 20 20 20 70 72 69 6e 74 66 28 22 2d 44        printf("-D
8710: 53 51 4c 49 54 45 5f 25 73 5c 6e 22 2c 20 7a 43  SQLITE_%s\n", zC
8720: 4f 70 74 69 6f 6e 29 3b 0a 20 20 20 20 20 20 7d  Option);.      }
8730: 0a 20 20 20 20 20 20 66 66 6c 75 73 68 28 73 74  .      fflush(st
8740: 64 6f 75 74 29 3b 0a 20 20 20 20 7d 0a 20 20 20  dout);.    }.   
8750: 20 69 43 6c 69 65 6e 74 20 3d 20 20 30 3b 0a 20   iClient =  0;. 
8760: 20 20 20 75 6e 6c 69 6e 6b 28 67 2e 7a 44 62 46     unlink(g.zDbF
8770: 69 6c 65 29 3b 0a 20 20 20 20 6f 70 65 6e 46 6c  ile);.    openFl
8780: 61 67 73 20 7c 3d 20 53 51 4c 49 54 45 5f 4f 50  ags |= SQLITE_OP
8790: 45 4e 5f 43 52 45 41 54 45 3b 0a 20 20 7d 0a 20  EN_CREATE;.  }. 
87a0: 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70   rc = sqlite3_op
87b0: 65 6e 5f 76 32 28 67 2e 7a 44 62 46 69 6c 65 2c  en_v2(g.zDbFile,
87c0: 20 26 67 2e 64 62 2c 20 6f 70 65 6e 46 6c 61 67   &g.db, openFlag
87d0: 73 2c 20 67 2e 7a 56 66 73 29 3b 0a 20 20 69 66  s, g.zVfs);.  if
87e0: 28 20 72 63 20 29 20 66 61 74 61 6c 45 72 72 6f  ( rc ) fatalErro
87f0: 72 28 22 63 61 6e 6e 6f 74 20 6f 70 65 6e 20 5b  r("cannot open [
8800: 25 73 5d 22 2c 20 67 2e 7a 44 62 46 69 6c 65 29  %s]", g.zDbFile)
8810: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 65 6e 61 62  ;.  sqlite3_enab
8820: 6c 65 5f 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f  le_load_extensio
8830: 6e 28 67 2e 64 62 2c 20 31 29 3b 0a 20 20 73 71  n(g.db, 1);.  sq
8840: 6c 69 74 65 33 5f 62 75 73 79 5f 68 61 6e 64 6c  lite3_busy_handl
8850: 65 72 28 67 2e 64 62 2c 20 62 75 73 79 48 61 6e  er(g.db, busyHan
8860: 64 6c 65 72 2c 20 30 29 3b 0a 20 20 73 71 6c 69  dler, 0);.  sqli
8870: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74  te3_create_funct
8880: 69 6f 6e 28 67 2e 64 62 2c 20 22 76 66 73 6e 61  ion(g.db, "vfsna
8890: 6d 65 22 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55  me", 0, SQLITE_U
88a0: 54 46 38 2c 20 30 2c 0a 20 20 20 20 20 20 20 20  TF8, 0,.        
88b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
88c0: 20 20 76 66 73 4e 61 6d 65 46 75 6e 63 2c 20 30    vfsNameFunc, 0
88d0: 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f  , 0);.  sqlite3_
88e0: 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28  create_function(
88f0: 67 2e 64 62 2c 20 22 65 76 61 6c 22 2c 20 31 2c  g.db, "eval", 1,
8900: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c   SQLITE_UTF8, 0,
8910: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
8920: 20 20 20 20 20 20 20 20 20 20 20 65 76 61 6c 46             evalF
8930: 75 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 67 2e  unc, 0, 0);.  g.
8940: 69 54 69 6d 65 6f 75 74 20 3d 20 44 45 46 41 55  iTimeout = DEFAU
8950: 4c 54 5f 54 49 4d 45 4f 55 54 3b 0a 20 20 69 66  LT_TIMEOUT;.  if
8960: 28 20 67 2e 62 53 71 6c 54 72 61 63 65 20 29 20  ( g.bSqlTrace ) 
8970: 73 71 6c 69 74 65 33 5f 74 72 61 63 65 28 67 2e  sqlite3_trace(g.
8980: 64 62 2c 20 73 71 6c 54 72 61 63 65 43 61 6c 6c  db, sqlTraceCall
8990: 62 61 63 6b 2c 20 30 29 3b 0a 20 20 69 66 28 20  back, 0);.  if( 
89a0: 21 67 2e 62 53 79 6e 63 20 29 20 74 72 79 53 71  !g.bSync ) trySq
89b0: 6c 28 22 50 52 41 47 4d 41 20 73 79 6e 63 68 72  l("PRAGMA synchr
89c0: 6f 6e 6f 75 73 3d 4f 46 46 22 29 3b 0a 20 20 69  onous=OFF");.  i
89d0: 66 28 20 69 43 6c 69 65 6e 74 3e 30 20 29 7b 0a  f( iClient>0 ){.
89e0: 20 20 20 20 69 66 28 20 6e 3e 30 20 29 20 75 6e      if( n>0 ) un
89f0: 72 65 63 6f 67 6e 69 7a 65 64 41 72 67 75 6d 65  recognizedArgume
8a00: 6e 74 73 28 61 72 67 76 5b 30 5d 2c 20 6e 2c 20  nts(argv[0], n, 
8a10: 61 72 67 76 2b 32 29 3b 0a 20 20 20 20 69 66 28  argv+2);.    if(
8a20: 20 67 2e 69 54 72 61 63 65 20 29 20 6c 6f 67 4d   g.iTrace ) logM
8a30: 65 73 73 61 67 65 28 22 73 74 61 72 74 2d 63 6c  essage("start-cl
8a40: 69 65 6e 74 22 29 3b 0a 20 20 20 20 77 68 69 6c  ient");.    whil
8a50: 65 28 31 29 7b 0a 20 20 20 20 20 20 63 68 61 72  e(1){.      char
8a60: 20 2a 7a 54 61 73 6b 4e 61 6d 65 20 3d 20 30 3b   *zTaskName = 0;
8a70: 0a 20 20 20 20 20 20 72 63 20 3d 20 73 74 61 72  .      rc = star
8a80: 74 53 63 72 69 70 74 28 69 43 6c 69 65 6e 74 2c  tScript(iClient,
8a90: 20 26 7a 53 63 72 69 70 74 2c 20 26 74 61 73 6b   &zScript, &task
8aa0: 49 64 2c 20 26 7a 54 61 73 6b 4e 61 6d 65 29 3b  Id, &zTaskName);
8ab0: 0a 20 20 20 20 20 20 69 66 28 20 72 63 3d 3d 53  .      if( rc==S
8ac0: 51 4c 49 54 45 5f 44 4f 4e 45 20 29 20 62 72 65  QLITE_DONE ) bre
8ad0: 61 6b 3b 0a 20 20 20 20 20 20 69 66 28 20 67 2e  ak;.      if( g.
8ae0: 69 54 72 61 63 65 20 29 20 6c 6f 67 4d 65 73 73  iTrace ) logMess
8af0: 61 67 65 28 22 62 65 67 69 6e 20 25 73 20 28 25  age("begin %s (%
8b00: 64 29 22 2c 20 7a 54 61 73 6b 4e 61 6d 65 2c 20  d)", zTaskName, 
8b10: 74 61 73 6b 49 64 29 3b 0a 20 20 20 20 20 20 72  taskId);.      r
8b20: 75 6e 53 63 72 69 70 74 28 69 43 6c 69 65 6e 74  unScript(iClient
8b30: 2c 20 74 61 73 6b 49 64 2c 20 7a 53 63 72 69 70  , taskId, zScrip
8b40: 74 2c 20 7a 54 61 73 6b 4e 61 6d 65 29 3b 0a 20  t, zTaskName);. 
8b50: 20 20 20 20 20 69 66 28 20 67 2e 69 54 72 61 63       if( g.iTrac
8b60: 65 20 29 20 6c 6f 67 4d 65 73 73 61 67 65 28 22  e ) logMessage("
8b70: 65 6e 64 20 25 73 20 28 25 64 29 22 2c 20 7a 54  end %s (%d)", zT
8b80: 61 73 6b 4e 61 6d 65 2c 20 74 61 73 6b 49 64 29  askName, taskId)
8b90: 3b 0a 20 20 20 20 20 20 66 69 6e 69 73 68 53 63  ;.      finishSc
8ba0: 72 69 70 74 28 69 43 6c 69 65 6e 74 2c 20 74 61  ript(iClient, ta
8bb0: 73 6b 49 64 2c 20 30 29 3b 0a 20 20 20 20 20 20  skId, 0);.      
8bc0: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 54 61  sqlite3_free(zTa
8bd0: 73 6b 4e 61 6d 65 29 3b 0a 20 20 20 20 20 20 73  skName);.      s
8be0: 71 6c 69 74 65 33 5f 73 6c 65 65 70 28 31 30 29  qlite3_sleep(10)
8bf0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20  ;.    }.    if( 
8c00: 67 2e 69 54 72 61 63 65 20 29 20 6c 6f 67 4d 65  g.iTrace ) logMe
8c10: 73 73 61 67 65 28 22 65 6e 64 2d 63 6c 69 65 6e  ssage("end-clien
8c20: 74 22 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  t");.  }else{.  
8c30: 20 20 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a    sqlite3_stmt *
8c40: 70 53 74 6d 74 3b 0a 20 20 20 20 69 6e 74 20 69  pStmt;.    int i
8c50: 54 69 6d 65 6f 75 74 3b 0a 20 20 20 20 69 66 28  Timeout;.    if(
8c60: 20 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 66   n==0 ){.      f
8c70: 61 74 61 6c 45 72 72 6f 72 28 22 6d 69 73 73 69  atalError("missi
8c80: 6e 67 20 73 63 72 69 70 74 20 66 69 6c 65 6e 61  ng script filena
8c90: 6d 65 22 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20  me");.    }.    
8ca0: 69 66 28 20 6e 3e 31 20 29 20 75 6e 72 65 63 6f  if( n>1 ) unreco
8cb0: 67 6e 69 7a 65 64 41 72 67 75 6d 65 6e 74 73 28  gnizedArguments(
8cc0: 61 72 67 76 5b 30 5d 2c 20 6e 2c 20 61 72 67 76  argv[0], n, argv
8cd0: 2b 32 29 3b 0a 20 20 20 20 69 66 28 20 7a 4a 4d  +2);.    if( zJM
8ce0: 6f 64 65 20 29 20 72 75 6e 53 71 6c 28 22 50 52  ode ) runSql("PR
8cf0: 41 47 4d 41 20 6a 6f 75 72 6e 61 6c 5f 6d 6f 64  AGMA journal_mod
8d00: 65 3d 25 51 3b 22 2c 20 7a 4a 4d 6f 64 65 29 3b  e=%Q;", zJMode);
8d10: 0a 20 20 20 20 72 75 6e 53 71 6c 28 0a 20 20 20  .    runSql(.   
8d20: 20 20 20 22 44 52 4f 50 20 54 41 42 4c 45 20 49     "DROP TABLE I
8d30: 46 20 45 58 49 53 54 53 20 74 61 73 6b 3b 5c 6e  F EXISTS task;\n
8d40: 22 0a 20 20 20 20 20 20 22 44 52 4f 50 20 54 41  ".      "DROP TA
8d50: 42 4c 45 20 49 46 20 45 58 49 53 54 53 20 63 6f  BLE IF EXISTS co
8d60: 75 6e 74 65 72 73 3b 5c 6e 22 0a 20 20 20 20 20  unters;\n".     
8d70: 20 22 44 52 4f 50 20 54 41 42 4c 45 20 49 46 20   "DROP TABLE IF 
8d80: 45 58 49 53 54 53 20 63 6c 69 65 6e 74 3b 5c 6e  EXISTS client;\n
8d90: 22 0a 20 20 20 20 20 20 22 43 52 45 41 54 45 20  ".      "CREATE 
8da0: 54 41 42 4c 45 20 74 61 73 6b 28 5c 6e 22 0a 20  TABLE task(\n". 
8db0: 20 20 20 20 20 22 20 20 69 64 20 49 4e 54 45 47       "  id INTEG
8dc0: 45 52 20 50 52 49 4d 41 52 59 20 4b 45 59 2c 5c  ER PRIMARY KEY,\
8dd0: 6e 22 0a 20 20 20 20 20 20 22 20 20 6e 61 6d 65  n".      "  name
8de0: 20 54 45 58 54 2c 5c 6e 22 0a 20 20 20 20 20 20   TEXT,\n".      
8df0: 22 20 20 63 6c 69 65 6e 74 20 49 4e 54 45 47 45  "  client INTEGE
8e00: 52 2c 5c 6e 22 0a 20 20 20 20 20 20 22 20 20 73  R,\n".      "  s
8e10: 74 61 72 74 74 69 6d 65 20 44 41 54 45 2c 5c 6e  tarttime DATE,\n
8e20: 22 0a 20 20 20 20 20 20 22 20 20 65 6e 64 74 69  ".      "  endti
8e30: 6d 65 20 44 41 54 45 2c 5c 6e 22 0a 20 20 20 20  me DATE,\n".    
8e40: 20 20 22 20 20 73 63 72 69 70 74 20 54 45 58 54    "  script TEXT
8e50: 5c 6e 22 0a 20 20 20 20 20 20 22 29 3b 22 0a 20  \n".      ");". 
8e60: 20 20 20 20 20 22 43 52 45 41 54 45 20 49 4e 44       "CREATE IND
8e70: 45 58 20 74 61 73 6b 5f 69 31 20 4f 4e 20 74 61  EX task_i1 ON ta
8e80: 73 6b 28 63 6c 69 65 6e 74 2c 20 73 74 61 72 74  sk(client, start
8e90: 74 69 6d 65 29 3b 5c 6e 22 0a 20 20 20 20 20 20  time);\n".      
8ea0: 22 43 52 45 41 54 45 20 49 4e 44 45 58 20 74 61  "CREATE INDEX ta
8eb0: 73 6b 5f 69 32 20 4f 4e 20 74 61 73 6b 28 63 6c  sk_i2 ON task(cl
8ec0: 69 65 6e 74 2c 20 65 6e 64 74 69 6d 65 29 3b 5c  ient, endtime);\
8ed0: 6e 22 0a 20 20 20 20 20 20 22 43 52 45 41 54 45  n".      "CREATE
8ee0: 20 54 41 42 4c 45 20 63 6f 75 6e 74 65 72 73 28   TABLE counters(
8ef0: 6e 45 72 72 6f 72 2c 6e 54 65 73 74 29 3b 5c 6e  nError,nTest);\n
8f00: 22 0a 20 20 20 20 20 20 22 49 4e 53 45 52 54 20  ".      "INSERT 
8f10: 49 4e 54 4f 20 63 6f 75 6e 74 65 72 73 20 56 41  INTO counters VA
8f20: 4c 55 45 53 28 30 2c 30 29 3b 5c 6e 22 0a 20 20  LUES(0,0);\n".  
8f30: 20 20 20 20 22 43 52 45 41 54 45 20 54 41 42 4c      "CREATE TABL
8f40: 45 20 63 6c 69 65 6e 74 28 69 64 20 49 4e 54 45  E client(id INTE
8f50: 47 45 52 20 50 52 49 4d 41 52 59 20 4b 45 59 2c  GER PRIMARY KEY,
8f60: 20 77 61 6e 74 48 61 6c 74 29 3b 5c 6e 22 0a 20   wantHalt);\n". 
8f70: 20 20 20 29 3b 0a 20 20 20 20 7a 53 63 72 69 70     );.    zScrip
8f80: 74 20 3d 20 72 65 61 64 46 69 6c 65 28 61 72 67  t = readFile(arg
8f90: 76 5b 32 5d 29 3b 0a 20 20 20 20 66 6f 72 28 69  v[2]);.    for(i
8fa0: 52 65 70 3d 31 3b 20 69 52 65 70 3c 3d 6e 52 65  Rep=1; iRep<=nRe
8fb0: 70 3b 20 69 52 65 70 2b 2b 29 7b 0a 20 20 20 20  p; iRep++){.    
8fc0: 20 20 69 66 28 20 67 2e 69 54 72 61 63 65 20 29    if( g.iTrace )
8fd0: 20 6c 6f 67 4d 65 73 73 61 67 65 28 22 62 65 67   logMessage("beg
8fe0: 69 6e 20 73 63 72 69 70 74 20 5b 25 73 5d 20 63  in script [%s] c
8ff0: 79 63 6c 65 20 25 64 5c 6e 22 2c 20 61 72 67 76  ycle %d\n", argv
9000: 5b 32 5d 2c 20 69 52 65 70 29 3b 0a 20 20 20 20  [2], iRep);.    
9010: 20 20 72 75 6e 53 63 72 69 70 74 28 30 2c 20 30    runScript(0, 0
9020: 2c 20 7a 53 63 72 69 70 74 2c 20 61 72 67 76 5b  , zScript, argv[
9030: 32 5d 29 3b 0a 20 20 20 20 20 20 69 66 28 20 67  2]);.      if( g
9040: 2e 69 54 72 61 63 65 20 29 20 6c 6f 67 4d 65 73  .iTrace ) logMes
9050: 73 61 67 65 28 22 65 6e 64 20 73 63 72 69 70 74  sage("end script
9060: 20 5b 25 73 5d 20 63 79 63 6c 65 20 25 64 5c 6e   [%s] cycle %d\n
9070: 22 2c 20 61 72 67 76 5b 32 5d 2c 20 69 52 65 70  ", argv[2], iRep
9080: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c  );.    }.    sql
9090: 69 74 65 33 5f 66 72 65 65 28 7a 53 63 72 69 70  ite3_free(zScrip
90a0: 74 29 3b 0a 20 20 20 20 77 61 69 74 46 6f 72 43  t);.    waitForC
90b0: 6c 69 65 6e 74 28 30 2c 20 32 30 30 30 2c 20 22  lient(0, 2000, "
90c0: 64 75 72 69 6e 67 20 73 68 75 74 64 6f 77 6e 2e  during shutdown.
90d0: 2e 2e 5c 6e 22 29 3b 0a 20 20 20 20 74 72 79 53  ..\n");.    tryS
90e0: 71 6c 28 22 55 50 44 41 54 45 20 63 6c 69 65 6e  ql("UPDATE clien
90f0: 74 20 53 45 54 20 77 61 6e 74 48 61 6c 74 3d 31  t SET wantHalt=1
9100: 22 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f  ");.    sqlite3_
9110: 73 6c 65 65 70 28 31 30 29 3b 0a 20 20 20 20 67  sleep(10);.    g
9120: 2e 69 54 69 6d 65 6f 75 74 20 3d 20 30 3b 0a 20  .iTimeout = 0;. 
9130: 20 20 20 69 54 69 6d 65 6f 75 74 20 3d 20 31 30     iTimeout = 10
9140: 30 30 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 28  00;.    while( (
9150: 28 72 63 20 3d 20 74 72 79 53 71 6c 28 22 53 45  (rc = trySql("SE
9160: 4c 45 43 54 20 31 20 46 52 4f 4d 20 63 6c 69 65  LECT 1 FROM clie
9170: 6e 74 22 29 29 3d 3d 53 51 4c 49 54 45 5f 42 55  nt"))==SQLITE_BU
9180: 53 59 0a 20 20 20 20 20 20 20 20 7c 7c 20 72 63  SY.        || rc
9190: 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 29 20 26 26  ==SQLITE_ROW) &&
91a0: 20 69 54 69 6d 65 6f 75 74 3e 30 20 29 7b 0a 20   iTimeout>0 ){. 
91b0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 73 6c 65       sqlite3_sle
91c0: 65 70 28 31 30 29 3b 0a 20 20 20 20 20 20 69 54  ep(10);.      iT
91d0: 69 6d 65 6f 75 74 20 2d 3d 20 31 30 3b 0a 20 20  imeout -= 10;.  
91e0: 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f    }.    sqlite3_
91f0: 73 6c 65 65 70 28 31 30 30 29 3b 0a 20 20 20 20  sleep(100);.    
9200: 70 53 74 6d 74 20 3d 20 70 72 65 70 61 72 65 53  pStmt = prepareS
9210: 71 6c 28 22 53 45 4c 45 43 54 20 6e 45 72 72 6f  ql("SELECT nErro
9220: 72 2c 20 6e 54 65 73 74 20 46 52 4f 4d 20 63 6f  r, nTest FROM co
9230: 75 6e 74 65 72 73 22 29 3b 0a 20 20 20 20 69 54  unters");.    iT
9240: 69 6d 65 6f 75 74 20 3d 20 31 30 30 30 3b 0a 20  imeout = 1000;. 
9250: 20 20 20 77 68 69 6c 65 28 20 28 72 63 20 3d 20     while( (rc = 
9260: 73 71 6c 69 74 65 33 5f 73 74 65 70 28 70 53 74  sqlite3_step(pSt
9270: 6d 74 29 29 3d 3d 53 51 4c 49 54 45 5f 42 55 53  mt))==SQLITE_BUS
9280: 59 20 26 26 20 69 54 69 6d 65 6f 75 74 3e 30 20  Y && iTimeout>0 
9290: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
92a0: 5f 73 6c 65 65 70 28 31 30 29 3b 0a 20 20 20 20  _sleep(10);.    
92b0: 20 20 69 54 69 6d 65 6f 75 74 20 2d 3d 20 31 30    iTimeout -= 10
92c0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20  ;.    }.    if( 
92d0: 72 63 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29  rc==SQLITE_ROW )
92e0: 7b 0a 20 20 20 20 20 20 67 2e 6e 45 72 72 6f 72  {.      g.nError
92f0: 20 2b 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75   += sqlite3_colu
9300: 6d 6e 5f 69 6e 74 28 70 53 74 6d 74 2c 20 30 29  mn_int(pStmt, 0)
9310: 3b 0a 20 20 20 20 20 20 67 2e 6e 54 65 73 74 20  ;.      g.nTest 
9320: 2b 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d  += sqlite3_colum
9330: 6e 5f 69 6e 74 28 70 53 74 6d 74 2c 20 31 29 3b  n_int(pStmt, 1);
9340: 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74  .    }.    sqlit
9350: 65 33 5f 66 69 6e 61 6c 69 7a 65 28 70 53 74 6d  e3_finalize(pStm
9360: 74 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  t);.  }.  sqlite
9370: 33 5f 63 6c 6f 73 65 28 67 2e 64 62 29 3b 0a 20  3_close(g.db);. 
9380: 20 6d 61 79 62 65 43 6c 6f 73 65 28 67 2e 70 4c   maybeClose(g.pL
9390: 6f 67 29 3b 0a 20 20 6d 61 79 62 65 43 6c 6f 73  og);.  maybeClos
93a0: 65 28 67 2e 70 45 72 72 4c 6f 67 29 3b 0a 20 20  e(g.pErrLog);.  
93b0: 69 66 28 20 69 43 6c 69 65 6e 74 3d 3d 30 20 29  if( iClient==0 )
93c0: 7b 0a 20 20 20 20 70 72 69 6e 74 66 28 22 53 75  {.    printf("Su
93d0: 6d 6d 61 72 79 3a 20 25 64 20 65 72 72 6f 72 73  mmary: %d errors
93e0: 20 6f 75 74 20 6f 66 20 25 64 20 74 65 73 74 73   out of %d tests
93f0: 5c 6e 22 2c 20 67 2e 6e 45 72 72 6f 72 2c 20 67  \n", g.nError, g
9400: 2e 6e 54 65 73 74 29 3b 0a 20 20 20 20 70 72 69  .nTest);.    pri
9410: 6e 74 66 28 22 45 4e 44 3a 20 25 73 22 2c 20 61  ntf("END: %s", a
9420: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 66 6f 72  rgv[0]);.    for
9430: 28 69 3d 31 3b 20 69 3c 61 72 67 63 3b 20 69 2b  (i=1; i<argc; i+
9440: 2b 29 20 70 72 69 6e 74 66 28 22 20 25 73 22 2c  +) printf(" %s",
9450: 20 61 72 67 76 5b 69 5d 29 3b 0a 20 20 20 20 70   argv[i]);.    p
9460: 72 69 6e 74 66 28 22 5c 6e 22 29 3b 0a 20 20 7d  rintf("\n");.  }
9470: 0a 20 20 72 65 74 75 72 6e 20 67 2e 6e 45 72 72  .  return g.nErr
9480: 6f 72 3e 30 3b 0a 7d 0a                          or>0;.}.