/ Hex Artifact Content
Login
SQLite training in Houston TX on 2019-11-05 (details)
Part of the 2019 Tcl Conference

Artifact 82dba47063cb9837910c3bcefacb47de7486fb47:


0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20  /*.** Copyright 
0010: 28 63 29 20 31 39 39 39 2c 20 32 30 30 30 20 44  (c) 1999, 2000 D
0020: 2e 20 52 69 63 68 61 72 64 20 48 69 70 70 0a 2a  . Richard Hipp.*
0030: 2a 0a 2a 2a 20 54 68 69 73 20 70 72 6f 67 72 61  *.** This progra
0040: 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61  m is free softwa
0050: 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69  re; you can redi
0060: 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f  stribute it and/
0070: 6f 72 0a 2a 2a 20 6d 6f 64 69 66 79 20 69 74 20  or.** modify it 
0080: 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20  under the terms 
0090: 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72  of the GNU Gener
00a0: 61 6c 20 50 75 62 6c 69 63 0a 2a 2a 20 4c 69 63  al Public.** Lic
00b0: 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65  ense as publishe
00c0: 64 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f  d by the Free So
00d0: 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f  ftware Foundatio
00e0: 6e 3b 20 65 69 74 68 65 72 0a 2a 2a 20 76 65 72  n; either.** ver
00f0: 73 69 6f 6e 20 32 20 6f 66 20 74 68 65 20 4c 69  sion 2 of the Li
0100: 63 65 6e 73 65 2c 20 6f 72 20 28 61 74 20 79 6f  cense, or (at yo
0110: 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c  ur option) any l
0120: 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 2a 2a  ater version..**
0130: 0a 2a 2a 20 54 68 69 73 20 70 72 6f 67 72 61 6d  .** This program
0140: 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20   is distributed 
0150: 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74  in the hope that
0160: 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66   it will be usef
0170: 75 6c 2c 0a 2a 2a 20 62 75 74 20 57 49 54 48 4f  ul,.** but WITHO
0180: 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b  UT ANY WARRANTY;
0190: 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68   without even th
01a0: 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e  e implied warran
01b0: 74 79 20 6f 66 0a 2a 2a 20 4d 45 52 43 48 41 4e  ty of.** MERCHAN
01c0: 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e  TABILITY or FITN
01d0: 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43  ESS FOR A PARTIC
01e0: 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53  ULAR PURPOSE.  S
01f0: 65 65 20 74 68 65 20 47 4e 55 0a 2a 2a 20 47 65  ee the GNU.** Ge
0200: 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63  neral Public Lic
0210: 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65  ense for more de
0220: 74 61 69 6c 73 2e 0a 2a 2a 20 0a 2a 2a 20 59 6f  tails..** .** Yo
0230: 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65  u should have re
0240: 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66  ceived a copy of
0250: 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c   the GNU General
0260: 20 50 75 62 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e   Public.** Licen
0270: 73 65 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68  se along with th
0280: 69 73 20 6c 69 62 72 61 72 79 3b 20 69 66 20 6e  is library; if n
0290: 6f 74 2c 20 77 72 69 74 65 20 74 6f 20 74 68 65  ot, write to the
02a0: 0a 2a 2a 20 46 72 65 65 20 53 6f 66 74 77 61 72  .** Free Softwar
02b0: 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e  e Foundation, In
02c0: 63 2e 2c 20 35 39 20 54 65 6d 70 6c 65 20 50 6c  c., 59 Temple Pl
02d0: 61 63 65 20 2d 20 53 75 69 74 65 20 33 33 30 2c  ace - Suite 330,
02e0: 0a 2a 2a 20 42 6f 73 74 6f 6e 2c 20 4d 41 20 20  .** Boston, MA  
02f0: 30 32 31 31 31 2d 31 33 30 37 2c 20 55 53 41 2e  02111-1307, USA.
0300: 0a 2a 2a 0a 2a 2a 20 41 75 74 68 6f 72 20 63 6f  .**.** Author co
0310: 6e 74 61 63 74 20 69 6e 66 6f 72 6d 61 74 69 6f  ntact informatio
0320: 6e 3a 0a 2a 2a 20 20 20 64 72 68 40 68 77 61 63  n:.**   drh@hwac
0330: 69 2e 63 6f 6d 0a 2a 2a 20 20 20 68 74 74 70 3a  i.com.**   http:
0340: 2f 2f 77 77 77 2e 68 77 61 63 69 2e 63 6f 6d 2f  //www.hwaci.com/
0350: 64 72 68 2f 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a  drh/.**.********
0360: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0370: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0380: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0390: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
03a0: 2a 0a 2a 2a 20 4d 61 69 6e 20 66 69 6c 65 20 66  *.** Main file f
03b0: 6f 72 20 74 68 65 20 53 51 4c 69 74 65 20 6c 69  or the SQLite li
03c0: 62 72 61 72 79 2e 20 20 54 68 65 20 72 6f 75 74  brary.  The rout
03d0: 69 6e 65 73 20 69 6e 20 74 68 69 73 20 66 69 6c  ines in this fil
03e0: 65 0a 2a 2a 20 69 6d 70 6c 65 6d 65 6e 74 20 74  e.** implement t
03f0: 68 65 20 70 72 6f 67 72 61 6d 6d 65 72 20 69 6e  he programmer in
0400: 74 65 72 66 61 63 65 20 74 6f 20 74 68 65 20 6c  terface to the l
0410: 69 62 72 61 72 79 2e 20 20 52 6f 75 74 69 6e 65  ibrary.  Routine
0420: 73 20 69 6e 0a 2a 2a 20 6f 74 68 65 72 20 66 69  s in.** other fi
0430: 6c 65 73 20 61 72 65 20 66 6f 72 20 69 6e 74 65  les are for inte
0440: 72 6e 61 6c 20 75 73 65 20 62 79 20 53 51 4c 69  rnal use by SQLi
0450: 74 65 20 61 6e 64 20 73 68 6f 75 6c 64 20 6e 6f  te and should no
0460: 74 20 62 65 0a 2a 2a 20 61 63 63 65 73 73 65 64  t be.** accessed
0470: 20 62 79 20 75 73 65 72 73 20 6f 66 20 74 68 65   by users of the
0480: 20 6c 69 62 72 61 72 79 2e 0a 2a 2a 0a 2a 2a 20   library..**.** 
0490: 24 49 64 3a 20 6d 61 69 6e 2e 63 2c 76 20 31 2e  $Id: main.c,v 1.
04a0: 31 34 20 32 30 30 30 2f 30 37 2f 32 38 20 31 34  14 2000/07/28 14
04b0: 3a 33 32 3a 34 39 20 64 72 68 20 45 78 70 20 24  :32:49 drh Exp $
04c0: 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73 71  .*/.#include "sq
04d0: 6c 69 74 65 49 6e 74 2e 68 22 0a 0a 2f 2a 0a 2a  liteInt.h"../*.*
04e0: 2a 20 54 68 69 73 20 69 73 20 74 68 65 20 63 61  * This is the ca
04f0: 6c 6c 62 61 63 6b 20 72 6f 75 74 69 6e 65 20 66  llback routine f
0500: 6f 72 20 74 68 65 20 63 6f 64 65 20 74 68 61 74  or the code that
0510: 20 69 6e 69 74 69 61 6c 69 7a 65 73 20 74 68 65   initializes the
0520: 0a 2a 2a 20 64 61 74 61 62 61 73 65 2e 20 20 45  .** database.  E
0530: 61 63 68 20 63 61 6c 6c 62 61 63 6b 20 63 6f 6e  ach callback con
0540: 74 61 69 6e 73 20 74 65 78 74 20 6f 66 20 61 20  tains text of a 
0550: 43 52 45 41 54 45 20 54 41 42 4c 45 20 6f 72 0a  CREATE TABLE or.
0560: 2a 2a 20 43 52 45 41 54 45 20 49 4e 44 45 58 20  ** CREATE INDEX 
0570: 73 74 61 74 65 6d 65 6e 74 20 74 68 61 74 20 6d  statement that m
0580: 75 73 74 20 62 65 20 70 61 72 73 65 64 20 74 6f  ust be parsed to
0590: 20 79 69 65 6c 64 20 74 68 65 20 69 6e 74 65 72   yield the inter
05a0: 6e 61 6c 0a 2a 2a 20 73 74 72 75 63 74 75 72 65  nal.** structure
05b0: 73 20 74 68 61 74 20 64 65 73 63 72 69 62 65 20  s that describe 
05c0: 74 68 65 20 74 61 62 6c 65 73 2e 0a 2a 2f 0a 73  the tables..*/.s
05d0: 74 61 74 69 63 20 69 6e 74 20 73 71 6c 69 74 65  tatic int sqlite
05e0: 4f 70 65 6e 43 62 28 76 6f 69 64 20 2a 70 44 62  OpenCb(void *pDb
05f0: 2c 20 69 6e 74 20 61 72 67 63 2c 20 63 68 61 72  , int argc, char
0600: 20 2a 2a 61 72 67 76 2c 20 63 68 61 72 20 2a 2a   **argv, char **
0610: 61 7a 43 6f 6c 4e 61 6d 65 29 7b 0a 20 20 73 71  azColName){.  sq
0620: 6c 69 74 65 20 2a 64 62 20 3d 20 28 73 71 6c 69  lite *db = (sqli
0630: 74 65 2a 29 70 44 62 3b 0a 20 20 50 61 72 73 65  te*)pDb;.  Parse
0640: 20 73 50 61 72 73 65 3b 0a 20 20 69 6e 74 20 6e   sParse;.  int n
0650: 45 72 72 3b 0a 0a 20 20 69 66 28 20 61 72 67 63  Err;..  if( argc
0660: 21 3d 31 20 29 20 72 65 74 75 72 6e 20 30 3b 0a  !=1 ) return 0;.
0670: 20 20 6d 65 6d 73 65 74 28 26 73 50 61 72 73 65    memset(&sParse
0680: 2c 20 30 2c 20 73 69 7a 65 6f 66 28 73 50 61 72  , 0, sizeof(sPar
0690: 73 65 29 29 3b 0a 20 20 73 50 61 72 73 65 2e 64  se));.  sParse.d
06a0: 62 20 3d 20 64 62 3b 0a 20 20 73 50 61 72 73 65  b = db;.  sParse
06b0: 2e 69 6e 69 74 46 6c 61 67 20 3d 20 31 3b 0a 20  .initFlag = 1;. 
06c0: 20 6e 45 72 72 20 3d 20 73 71 6c 69 74 65 52 75   nErr = sqliteRu
06d0: 6e 50 61 72 73 65 72 28 26 73 50 61 72 73 65 2c  nParser(&sParse,
06e0: 20 61 72 67 76 5b 30 5d 2c 20 30 29 3b 0a 20 20   argv[0], 0);.  
06f0: 72 65 74 75 72 6e 20 6e 45 72 72 3b 0a 7d 0a 0a  return nErr;.}..
0700: 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f  /*.** Attempt to
0710: 20 72 65 61 64 20 74 68 65 20 64 61 74 61 62 61   read the databa
0720: 73 65 20 73 63 68 65 6d 61 20 61 6e 64 20 69 6e  se schema and in
0730: 69 74 69 61 6c 69 7a 65 20 69 6e 74 65 72 6e 61  itialize interna
0740: 6c 0a 2a 2a 20 64 61 74 61 20 73 74 72 75 63 74  l.** data struct
0750: 75 72 65 73 2e 20 20 52 65 74 75 72 6e 20 6f 6e  ures.  Return on
0760: 65 20 6f 66 20 74 68 65 20 53 51 4c 49 54 45 5f  e of the SQLITE_
0770: 20 65 72 72 6f 72 20 63 6f 64 65 73 20 74 6f 0a   error codes to.
0780: 2a 2a 20 69 6e 64 69 63 61 74 65 20 73 75 63 63  ** indicate succ
0790: 65 73 73 20 6f 72 20 66 61 69 6c 75 72 65 2e 0a  ess or failure..
07a0: 2a 2a 0a 2a 2a 20 41 66 74 65 72 20 74 68 65 20  **.** After the 
07b0: 64 61 74 61 62 61 73 65 20 69 73 20 69 6e 69 74  database is init
07c0: 69 61 6c 69 7a 65 64 2c 20 74 68 65 20 53 51 4c  ialized, the SQL
07d0: 49 54 45 5f 49 6e 69 74 69 61 6c 69 7a 65 64 0a  ITE_Initialized.
07e0: 2a 2a 20 62 69 74 20 69 73 20 73 65 74 20 69 6e  ** bit is set in
07f0: 20 74 68 65 20 66 6c 61 67 73 20 66 69 65 6c 64   the flags field
0800: 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65 20 73   of the sqlite s
0810: 74 72 75 63 74 75 72 65 2e 20 20 41 6e 0a 2a 2a  tructure.  An.**
0820: 20 61 74 74 65 6d 70 74 20 69 73 20 6d 61 64 65   attempt is made
0830: 20 74 6f 20 69 6e 69 74 69 61 6c 69 7a 65 20 74   to initialize t
0840: 68 65 20 64 61 74 61 62 61 73 65 20 61 73 20 73  he database as s
0850: 6f 6f 6e 20 61 73 20 69 74 0a 2a 2a 20 69 73 20  oon as it.** is 
0860: 6f 70 65 6e 65 64 2e 20 20 49 66 20 74 68 61 74  opened.  If that
0870: 20 66 61 69 6c 73 20 28 70 65 72 68 61 70 73 20   fails (perhaps 
0880: 62 65 63 61 75 73 65 20 61 6e 6f 74 68 65 72 20  because another 
0890: 70 72 6f 63 65 73 73 0a 2a 2a 20 68 61 73 20 74  process.** has t
08a0: 68 65 20 73 71 6c 69 74 65 5f 6d 61 73 74 65 72  he sqlite_master
08b0: 20 74 61 62 6c 65 20 6c 6f 63 6b 65 64 29 20 74   table locked) t
08c0: 68 61 6e 20 61 6e 6f 74 68 65 72 20 61 74 74 65  han another atte
08d0: 6d 70 74 0a 2a 2a 20 69 73 20 6d 61 64 65 20 74  mpt.** is made t
08e0: 68 65 20 66 69 72 73 74 20 74 69 6d 65 20 74 68  he first time th
08f0: 65 20 64 61 74 61 62 61 73 65 20 69 73 20 61 63  e database is ac
0900: 63 65 73 73 65 64 2e 0a 2a 2f 0a 73 74 61 74 69  cessed..*/.stati
0910: 63 20 69 6e 74 20 73 71 6c 69 74 65 49 6e 69 74  c int sqliteInit
0920: 28 73 71 6c 69 74 65 20 2a 64 62 2c 20 63 68 61  (sqlite *db, cha
0930: 72 20 2a 2a 70 7a 45 72 72 4d 73 67 29 7b 0a 20  r **pzErrMsg){. 
0940: 20 56 64 62 65 20 2a 76 64 62 65 3b 0a 20 20 69   Vdbe *vdbe;.  i
0950: 6e 74 20 72 63 3b 0a 0a 20 20 2f 2a 0a 20 20 2a  nt rc;..  /*.  *
0960: 2a 20 54 68 65 20 6d 61 73 74 65 72 20 64 61 74  * The master dat
0970: 61 62 61 73 65 20 74 61 62 6c 65 20 68 61 73 20  abase table has 
0980: 61 20 73 74 72 75 63 74 75 72 65 20 6c 69 6b 65  a structure like
0990: 20 74 68 69 73 0a 20 20 2a 2f 0a 20 20 73 74 61   this.  */.  sta
09a0: 74 69 63 20 63 68 61 72 20 6d 61 73 74 65 72 5f  tic char master_
09b0: 73 63 68 65 6d 61 5b 5d 20 3d 20 0a 20 20 20 20  schema[] = .    
09c0: 20 22 43 52 45 41 54 45 20 54 41 42 4c 45 20 22   "CREATE TABLE "
09d0: 20 4d 41 53 54 45 52 5f 4e 41 4d 45 20 22 20 28   MASTER_NAME " (
09e0: 5c 6e 22 0a 20 20 20 20 20 22 20 20 74 79 70 65  \n".     "  type
09f0: 20 74 65 78 74 2c 5c 6e 22 0a 20 20 20 20 20 22   text,\n".     "
0a00: 20 20 6e 61 6d 65 20 74 65 78 74 2c 5c 6e 22 0a    name text,\n".
0a10: 20 20 20 20 20 22 20 20 74 62 6c 5f 6e 61 6d 65       "  tbl_name
0a20: 20 74 65 78 74 2c 5c 6e 22 0a 20 20 20 20 20 22   text,\n".     "
0a30: 20 20 73 71 6c 20 74 65 78 74 5c 6e 22 0a 20 20    sql text\n".  
0a40: 20 20 20 22 29 22 0a 20 20 3b 0a 0a 20 20 2f 2a     ")".  ;..  /*
0a50: 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 70   The following p
0a60: 72 6f 67 72 61 6d 20 69 73 20 75 73 65 64 20 74  rogram is used t
0a70: 6f 20 69 6e 69 74 69 61 6c 69 7a 65 20 74 68 65  o initialize the
0a80: 20 69 6e 74 65 72 6e 61 6c 0a 20 20 2a 2a 20 73   internal.  ** s
0a90: 74 72 75 63 74 75 72 65 20 68 6f 6c 64 69 6e 67  tructure holding
0aa0: 20 74 68 65 20 74 61 62 6c 65 73 20 61 6e 64 20   the tables and 
0ab0: 69 6e 64 65 78 65 73 20 6f 66 20 74 68 65 20 64  indexes of the d
0ac0: 61 74 61 62 61 73 65 2e 0a 20 20 2a 2a 20 54 68  atabase..  ** Th
0ad0: 65 20 64 61 74 61 62 61 73 65 20 63 6f 6e 74 61  e database conta
0ae0: 69 6e 73 20 61 20 73 70 65 63 69 61 6c 20 74 61  ins a special ta
0af0: 62 6c 65 20 6e 61 6d 65 64 20 22 73 71 6c 69 74  ble named "sqlit
0b00: 65 5f 6d 61 73 74 65 72 22 0a 20 20 2a 2a 20 64  e_master".  ** d
0b10: 65 66 69 6e 65 64 20 61 73 20 66 6f 6c 6c 6f 77  efined as follow
0b20: 73 3a 0a 20 20 2a 2a 0a 20 20 2a 2a 20 20 20 20  s:.  **.  **    
0b30: 43 52 45 41 54 45 20 54 41 42 4c 45 20 73 71 6c  CREATE TABLE sql
0b40: 69 74 65 5f 6d 61 73 74 65 72 20 28 0a 20 20 2a  ite_master (.  *
0b50: 2a 20 20 20 20 20 20 20 20 74 79 70 65 20 20 20  *        type   
0b60: 20 20 20 20 74 65 78 74 2c 20 20 20 20 2d 2d 20      text,    -- 
0b70: 20 45 69 74 68 65 72 20 22 74 61 62 6c 65 22 20   Either "table" 
0b80: 6f 72 20 22 69 6e 64 65 78 22 0a 20 20 2a 2a 20  or "index".  ** 
0b90: 20 20 20 20 20 20 20 6e 61 6d 65 20 20 20 20 20         name     
0ba0: 20 20 74 65 78 74 2c 20 20 20 20 2d 2d 20 20 4e    text,    --  N
0bb0: 61 6d 65 20 6f 66 20 74 61 62 6c 65 20 6f 72 20  ame of table or 
0bc0: 69 6e 64 65 78 0a 20 20 2a 2a 20 20 20 20 20 20  index.  **      
0bd0: 20 20 74 62 6c 5f 6e 61 6d 65 20 20 20 74 65 78    tbl_name   tex
0be0: 74 2c 20 20 20 20 2d 2d 20 20 41 73 73 6f 63 69  t,    --  Associ
0bf0: 61 74 65 64 20 74 61 62 6c 65 20 0a 20 20 2a 2a  ated table .  **
0c00: 20 20 20 20 20 20 20 20 73 71 6c 20 20 20 20 20          sql     
0c10: 20 20 20 74 65 78 74 20 20 20 20 20 2d 2d 20 20     text     --  
0c20: 54 68 65 20 43 52 45 41 54 45 20 73 74 61 74 65  The CREATE state
0c30: 6d 65 6e 74 20 66 6f 72 20 74 68 69 73 20 6f 62  ment for this ob
0c40: 6a 65 63 74 0a 20 20 2a 2a 20 20 20 20 29 3b 0a  ject.  **    );.
0c50: 20 20 2a 2a 0a 20 20 2a 2a 20 54 68 65 20 73 71    **.  ** The sq
0c60: 6c 69 74 65 5f 6d 61 73 74 65 72 20 74 61 62 6c  lite_master tabl
0c70: 65 20 63 6f 6e 74 61 69 6e 73 20 61 20 73 69 6e  e contains a sin
0c80: 67 6c 65 20 65 6e 74 72 79 20 66 6f 72 20 65 61  gle entry for ea
0c90: 63 68 20 74 61 62 6c 65 0a 20 20 2a 2a 20 61 6e  ch table.  ** an
0ca0: 64 20 65 61 63 68 20 69 6e 64 65 78 2e 20 20 54  d each index.  T
0cb0: 68 65 20 22 74 79 70 65 22 20 63 6f 6c 75 6d 6e  he "type" column
0cc0: 20 74 65 6c 6c 73 20 77 68 65 74 68 65 72 20 74   tells whether t
0cd0: 68 65 20 65 6e 74 72 79 20 69 73 0a 20 20 2a 2a  he entry is.  **
0ce0: 20 61 20 74 61 62 6c 65 20 6f 72 20 69 6e 64 65   a table or inde
0cf0: 78 2e 20 20 54 68 65 20 22 6e 61 6d 65 22 20 63  x.  The "name" c
0d00: 6f 6c 75 6d 6e 20 69 73 20 74 68 65 20 6e 61 6d  olumn is the nam
0d10: 65 20 6f 66 20 74 68 65 20 6f 62 6a 65 63 74 2e  e of the object.
0d20: 0a 20 20 2a 2a 20 54 68 65 20 22 74 62 6c 5f 6e  .  ** The "tbl_n
0d30: 61 6d 65 22 20 69 73 20 74 68 65 20 6e 61 6d 65  ame" is the name
0d40: 20 6f 66 20 74 68 65 20 61 73 73 6f 63 69 61 74   of the associat
0d50: 65 64 20 74 61 62 6c 65 2e 20 20 46 6f 72 20 74  ed table.  For t
0d60: 61 62 6c 65 73 2c 0a 20 20 2a 2a 20 74 68 65 20  ables,.  ** the 
0d70: 74 62 6c 5f 6e 61 6d 65 20 63 6f 6c 75 6d 6e 20  tbl_name column 
0d80: 69 73 20 61 6c 77 61 79 73 20 74 68 65 20 73 61  is always the sa
0d90: 6d 65 20 61 73 20 6e 61 6d 65 2e 20 20 46 6f 72  me as name.  For
0da0: 20 69 6e 64 69 63 65 73 2c 20 74 68 65 0a 20 20   indices, the.  
0db0: 2a 2a 20 74 62 6c 5f 6e 61 6d 65 20 63 6f 6c 75  ** tbl_name colu
0dc0: 6d 6e 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  mn contains the 
0dd0: 6e 61 6d 65 20 6f 66 20 74 68 65 20 74 61 62 6c  name of the tabl
0de0: 65 20 74 68 61 74 20 74 68 65 20 69 6e 64 65 78  e that the index
0df0: 0a 20 20 2a 2a 20 69 6e 64 65 78 65 73 2e 20 20  .  ** indexes.  
0e00: 46 69 6e 61 6c 6c 79 2c 20 74 68 65 20 22 73 71  Finally, the "sq
0e10: 6c 22 20 63 6f 6c 75 6d 6e 20 63 6f 6e 74 61 69  l" column contai
0e20: 6e 73 20 74 68 65 20 63 6f 6d 70 6c 65 74 65 20  ns the complete 
0e30: 74 65 78 74 20 6f 66 0a 20 20 2a 2a 20 74 68 65  text of.  ** the
0e40: 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 6f 72   CREATE TABLE or
0e50: 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 73 74   CREATE INDEX st
0e60: 61 74 65 6d 65 6e 74 20 74 68 61 74 20 6f 72 69  atement that ori
0e70: 67 69 6e 61 6c 6c 79 20 63 72 65 61 74 65 64 0a  ginally created.
0e80: 20 20 2a 2a 20 74 68 65 20 74 61 62 6c 65 20 6f    ** the table o
0e90: 72 20 69 6e 64 65 78 2e 0a 20 20 2a 2a 0a 20 20  r index..  **.  
0ea0: 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67  ** The following
0eb0: 20 70 72 6f 67 72 61 6d 20 69 6e 76 6f 6b 65 73   program invokes
0ec0: 20 69 74 73 20 63 61 6c 6c 62 61 63 6b 20 6f 6e   its callback on
0ed0: 20 74 68 65 20 53 51 4c 20 66 6f 72 20 65 61 63   the SQL for eac
0ee0: 68 0a 20 20 2a 2a 20 74 61 62 6c 65 20 74 68 65  h.  ** table the
0ef0: 6e 20 67 6f 65 73 20 62 61 63 6b 20 61 6e 64 20  n goes back and 
0f00: 69 6e 76 6f 6b 65 73 20 74 68 65 20 63 61 6c 6c  invokes the call
0f10: 62 61 63 6b 20 6f 6e 20 74 68 65 0a 20 20 2a 2a  back on the.  **
0f20: 20 53 51 4c 20 66 6f 72 20 65 61 63 68 20 69 6e   SQL for each in
0f30: 64 65 78 2e 20 20 54 68 65 20 63 61 6c 6c 62 61  dex.  The callba
0f40: 63 6b 20 77 69 6c 6c 20 69 6e 76 6f 6b 65 20 74  ck will invoke t
0f50: 68 65 0a 20 20 2a 2a 20 70 61 72 73 65 72 20 74  he.  ** parser t
0f60: 6f 20 62 75 69 6c 64 20 74 68 65 20 69 6e 74 65  o build the inte
0f70: 72 6e 61 6c 20 72 65 70 72 65 73 65 6e 74 61 74  rnal representat
0f80: 69 6f 6e 20 6f 66 20 74 68 65 0a 20 20 2a 2a 20  ion of the.  ** 
0f90: 64 61 74 61 62 61 73 65 20 73 63 68 65 6d 65 2e  database scheme.
0fa0: 0a 20 20 2a 2f 0a 20 20 73 74 61 74 69 63 20 56  .  */.  static V
0fb0: 64 62 65 4f 70 20 69 6e 69 74 50 72 6f 67 5b 5d  dbeOp initProg[]
0fc0: 20 3d 20 7b 0a 20 20 20 20 7b 20 4f 50 5f 4f 70   = {.    { OP_Op
0fd0: 65 6e 2c 20 20 20 20 20 30 2c 20 30 2c 20 20 4d  en,     0, 0,  M
0fe0: 41 53 54 45 52 5f 4e 41 4d 45 7d 2c 0a 20 20 20  ASTER_NAME},.   
0ff0: 20 7b 20 4f 50 5f 4e 65 78 74 2c 20 20 20 20 20   { OP_Next,     
1000: 30 2c 20 38 2c 20 20 30 7d 2c 20 20 20 20 20 20  0, 8,  0},      
1010: 20 20 20 20 20 2f 2a 20 31 20 2a 2f 0a 20 20 20       /* 1 */.   
1020: 20 7b 20 4f 50 5f 46 69 65 6c 64 2c 20 20 20 20   { OP_Field,    
1030: 30 2c 20 30 2c 20 20 30 7d 2c 0a 20 20 20 20 7b  0, 0,  0},.    {
1040: 20 4f 50 5f 53 74 72 69 6e 67 2c 20 20 20 30 2c   OP_String,   0,
1050: 20 30 2c 20 20 22 74 61 62 6c 65 22 7d 2c 0a 20   0,  "table"},. 
1060: 20 20 20 7b 20 4f 50 5f 4e 65 2c 20 20 20 20 20     { OP_Ne,     
1070: 20 20 30 2c 20 31 2c 20 20 30 7d 2c 0a 20 20 20    0, 1,  0},.   
1080: 20 7b 20 4f 50 5f 46 69 65 6c 64 2c 20 20 20 20   { OP_Field,    
1090: 30 2c 20 33 2c 20 20 30 7d 2c 0a 20 20 20 20 7b  0, 3,  0},.    {
10a0: 20 4f 50 5f 43 61 6c 6c 62 61 63 6b 2c 20 31 2c   OP_Callback, 1,
10b0: 20 30 2c 20 20 30 7d 2c 0a 20 20 20 20 7b 20 4f   0,  0},.    { O
10c0: 50 5f 47 6f 74 6f 2c 20 20 20 20 20 30 2c 20 31  P_Goto,     0, 1
10d0: 2c 20 20 30 7d 2c 0a 20 20 20 20 7b 20 4f 50 5f  ,  0},.    { OP_
10e0: 52 65 77 69 6e 64 2c 20 20 20 30 2c 20 30 2c 20  Rewind,   0, 0, 
10f0: 20 30 7d 2c 20 20 20 20 20 20 20 20 20 20 20 2f   0},           /
1100: 2a 20 38 20 2a 2f 0a 20 20 20 20 7b 20 4f 50 5f  * 8 */.    { OP_
1110: 4e 65 78 74 2c 20 20 20 20 20 30 2c 20 31 36 2c  Next,     0, 16,
1120: 20 30 7d 2c 20 20 20 20 20 20 20 20 20 20 20 2f   0},           /
1130: 2a 20 39 20 2a 2f 0a 20 20 20 20 7b 20 4f 50 5f  * 9 */.    { OP_
1140: 46 69 65 6c 64 2c 20 20 20 20 30 2c 20 30 2c 20  Field,    0, 0, 
1150: 20 30 7d 2c 0a 20 20 20 20 7b 20 4f 50 5f 53 74   0},.    { OP_St
1160: 72 69 6e 67 2c 20 20 20 30 2c 20 30 2c 20 20 22  ring,   0, 0,  "
1170: 69 6e 64 65 78 22 7d 2c 0a 20 20 20 20 7b 20 4f  index"},.    { O
1180: 50 5f 4e 65 2c 20 20 20 20 20 20 20 30 2c 20 39  P_Ne,       0, 9
1190: 2c 20 20 30 7d 2c 0a 20 20 20 20 7b 20 4f 50 5f  ,  0},.    { OP_
11a0: 46 69 65 6c 64 2c 20 20 20 20 30 2c 20 33 2c 20  Field,    0, 3, 
11b0: 20 30 7d 2c 0a 20 20 20 20 7b 20 4f 50 5f 43 61   0},.    { OP_Ca
11c0: 6c 6c 62 61 63 6b 2c 20 31 2c 20 30 2c 20 20 30  llback, 1, 0,  0
11d0: 7d 2c 0a 20 20 20 20 7b 20 4f 50 5f 47 6f 74 6f  },.    { OP_Goto
11e0: 2c 20 20 20 20 20 30 2c 20 39 2c 20 20 30 7d 2c  ,     0, 9,  0},
11f0: 0a 20 20 20 20 7b 20 4f 50 5f 48 61 6c 74 2c 20  .    { OP_Halt, 
1200: 20 20 20 20 30 2c 20 30 2c 20 20 30 7d 2c 20 20      0, 0,  0},  
1210: 20 20 20 20 20 20 20 20 20 2f 2a 20 31 36 20 2a           /* 16 *
1220: 2f 0a 20 20 7d 3b 0a 0a 20 20 2f 2a 20 43 72 65  /.  };..  /* Cre
1230: 61 74 65 20 61 20 76 69 72 74 75 61 6c 20 6d 61  ate a virtual ma
1240: 63 68 69 6e 65 20 74 6f 20 72 75 6e 20 74 68 65  chine to run the
1250: 20 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 20   initialization 
1260: 70 72 6f 67 72 61 6d 2e 20 20 52 75 6e 0a 20 20  program.  Run.  
1270: 2a 2a 20 74 68 65 20 70 72 6f 67 72 61 6d 2e 20  ** the program. 
1280: 20 54 68 65 20 64 65 6c 65 74 65 20 74 68 65 20   The delete the 
1290: 76 69 72 74 75 61 6c 20 6d 61 63 68 69 6e 65 2e  virtual machine.
12a0: 0a 20 20 2a 2f 0a 20 20 76 64 62 65 20 3d 20 73  .  */.  vdbe = s
12b0: 71 6c 69 74 65 56 64 62 65 43 72 65 61 74 65 28  qliteVdbeCreate(
12c0: 64 62 2d 3e 70 42 65 29 3b 0a 20 20 69 66 28 20  db->pBe);.  if( 
12d0: 76 64 62 65 3d 3d 30 20 29 7b 0a 20 20 20 20 73  vdbe==0 ){.    s
12e0: 71 6c 69 74 65 53 65 74 53 74 72 69 6e 67 28 70  qliteSetString(p
12f0: 7a 45 72 72 4d 73 67 2c 20 22 6f 75 74 20 6f 66  zErrMsg, "out of
1300: 20 6d 65 6d 6f 72 79 22 2c 30 29 3b 20 0a 20 20   memory",0); .  
1310: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a    return 1;.  }.
1320: 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f    sqliteVdbeAddO
1330: 70 4c 69 73 74 28 76 64 62 65 2c 20 73 69 7a 65  pList(vdbe, size
1340: 6f 66 28 69 6e 69 74 50 72 6f 67 29 2f 73 69 7a  of(initProg)/siz
1350: 65 6f 66 28 69 6e 69 74 50 72 6f 67 5b 30 5d 29  eof(initProg[0])
1360: 2c 20 69 6e 69 74 50 72 6f 67 29 3b 0a 20 20 72  , initProg);.  r
1370: 63 20 3d 20 73 71 6c 69 74 65 56 64 62 65 45 78  c = sqliteVdbeEx
1380: 65 63 28 76 64 62 65 2c 20 73 71 6c 69 74 65 4f  ec(vdbe, sqliteO
1390: 70 65 6e 43 62 2c 20 64 62 2c 20 70 7a 45 72 72  penCb, db, pzErr
13a0: 4d 73 67 2c 20 0a 20 20 20 20 20 20 20 20 20 20  Msg, .          
13b0: 20 20 20 20 20 20 20 20 20 20 20 20 64 62 2d 3e              db->
13c0: 70 42 75 73 79 41 72 67 2c 20 64 62 2d 3e 78 42  pBusyArg, db->xB
13d0: 75 73 79 43 61 6c 6c 62 61 63 6b 29 3b 0a 20 20  usyCallback);.  
13e0: 73 71 6c 69 74 65 56 64 62 65 44 65 6c 65 74 65  sqliteVdbeDelete
13f0: 28 76 64 62 65 29 3b 0a 20 20 69 66 28 20 72 63  (vdbe);.  if( rc
1400: 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20  ==SQLITE_OK ){. 
1410: 20 20 20 54 61 62 6c 65 20 2a 70 54 61 62 3b 0a     Table *pTab;.
1420: 20 20 20 20 63 68 61 72 20 2a 61 7a 41 72 67 5b      char *azArg[
1430: 32 5d 3b 0a 20 20 20 20 61 7a 41 72 67 5b 30 5d  2];.    azArg[0]
1440: 20 3d 20 6d 61 73 74 65 72 5f 73 63 68 65 6d 61   = master_schema
1450: 3b 0a 20 20 20 20 61 7a 41 72 67 5b 31 5d 20 3d  ;.    azArg[1] =
1460: 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 4f 70   0;.    sqliteOp
1470: 65 6e 43 62 28 64 62 2c 20 31 2c 20 61 7a 41 72  enCb(db, 1, azAr
1480: 67 2c 20 30 29 3b 0a 20 20 20 20 70 54 61 62 20  g, 0);.    pTab 
1490: 3d 20 73 71 6c 69 74 65 46 69 6e 64 54 61 62 6c  = sqliteFindTabl
14a0: 65 28 64 62 2c 20 4d 41 53 54 45 52 5f 4e 41 4d  e(db, MASTER_NAM
14b0: 45 29 3b 0a 20 20 20 20 69 66 28 20 70 54 61 62  E);.    if( pTab
14c0: 20 29 7b 0a 20 20 20 20 20 20 70 54 61 62 2d 3e   ){.      pTab->
14d0: 72 65 61 64 4f 6e 6c 79 20 3d 20 31 3b 0a 20 20  readOnly = 1;.  
14e0: 20 20 7d 0a 20 20 20 20 64 62 2d 3e 66 6c 61 67    }.    db->flag
14f0: 73 20 7c 3d 20 53 51 4c 49 54 45 5f 49 6e 69 74  s |= SQLITE_Init
1500: 69 61 6c 69 7a 65 64 3b 0a 20 20 7d 65 6c 73 65  ialized;.  }else
1510: 7b 0a 20 20 20 20 73 71 6c 69 74 65 53 74 72 52  {.    sqliteStrR
1520: 65 61 6c 6c 6f 63 28 70 7a 45 72 72 4d 73 67 29  ealloc(pzErrMsg)
1530: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 72  ;.  }.  return r
1540: 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e  c;.}../*.** Open
1550: 20 61 20 6e 65 77 20 53 51 4c 69 74 65 20 64 61   a new SQLite da
1560: 74 61 62 61 73 65 2e 20 20 43 6f 6e 73 74 72 75  tabase.  Constru
1570: 63 74 20 61 6e 20 22 73 71 6c 69 74 65 22 20 73  ct an "sqlite" s
1580: 74 72 75 63 74 75 72 65 20 74 6f 20 64 65 66 69  tructure to defi
1590: 6e 65 0a 2a 2a 20 74 68 65 20 73 74 61 74 65 20  ne.** the state 
15a0: 6f 66 20 74 68 69 73 20 64 61 74 61 62 61 73 65  of this database
15b0: 20 61 6e 64 20 72 65 74 75 72 6e 20 61 20 70 6f   and return a po
15c0: 69 6e 74 65 72 20 74 6f 20 74 68 61 74 20 73 74  inter to that st
15d0: 72 75 63 74 75 72 65 2e 0a 2a 2a 0a 2a 2a 20 41  ructure..**.** A
15e0: 6e 20 61 74 74 65 6d 70 74 20 69 73 20 6d 61 64  n attempt is mad
15f0: 65 20 74 6f 20 69 6e 69 74 69 61 6c 69 7a 65 20  e to initialize 
1600: 74 68 65 20 69 6e 2d 6d 65 6d 6f 72 79 20 64 61  the in-memory da
1610: 74 61 20 73 74 72 75 63 74 75 72 65 73 20 74 68  ta structures th
1620: 61 74 0a 2a 2a 20 68 6f 6c 64 20 74 68 65 20 64  at.** hold the d
1630: 61 74 61 62 61 73 65 20 73 63 68 65 6d 61 2e 20  atabase schema. 
1640: 20 42 75 74 20 69 66 20 74 68 69 73 20 66 61 69   But if this fai
1650: 6c 73 20 28 62 65 63 61 75 73 65 20 74 68 65 20  ls (because the 
1660: 73 63 68 65 6d 61 20 66 69 6c 65 0a 2a 2a 20 69  schema file.** i
1670: 73 20 6c 6f 63 6b 65 64 29 20 74 68 65 6e 20 74  s locked) then t
1680: 68 61 74 20 73 74 65 70 20 69 73 20 64 65 66 65  hat step is defe
1690: 72 72 65 64 20 75 6e 74 69 6c 20 74 68 65 20 66  rred until the f
16a0: 69 72 73 74 20 63 61 6c 6c 20 74 6f 0a 2a 2a 20  irst call to.** 
16b0: 73 71 6c 69 74 65 5f 65 78 65 63 28 29 2e 0a 2a  sqlite_exec()..*
16c0: 2f 0a 73 71 6c 69 74 65 20 2a 73 71 6c 69 74 65  /.sqlite *sqlite
16d0: 5f 6f 70 65 6e 28 63 6f 6e 73 74 20 63 68 61 72  _open(const char
16e0: 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20 69 6e 74   *zFilename, int
16f0: 20 6d 6f 64 65 2c 20 63 68 61 72 20 2a 2a 70 7a   mode, char **pz
1700: 45 72 72 4d 73 67 29 7b 0a 20 20 73 71 6c 69 74  ErrMsg){.  sqlit
1710: 65 20 2a 64 62 3b 0a 20 20 69 6e 74 20 72 63 3b  e *db;.  int rc;
1720: 0a 0a 20 20 2f 2a 20 41 6c 6c 6f 63 61 74 65 20  ..  /* Allocate 
1730: 74 68 65 20 73 71 6c 69 74 65 20 64 61 74 61 20  the sqlite data 
1740: 73 74 72 75 63 74 75 72 65 20 2a 2f 0a 20 20 64  structure */.  d
1750: 62 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63  b = sqliteMalloc
1760: 28 20 73 69 7a 65 6f 66 28 73 71 6c 69 74 65 29  ( sizeof(sqlite)
1770: 20 29 3b 0a 20 20 69 66 28 20 70 7a 45 72 72 4d   );.  if( pzErrM
1780: 73 67 20 29 20 2a 70 7a 45 72 72 4d 73 67 20 3d  sg ) *pzErrMsg =
1790: 20 30 3b 0a 20 20 69 66 28 20 64 62 3d 3d 30 20   0;.  if( db==0 
17a0: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 53 65 74  ){.    sqliteSet
17b0: 53 74 72 69 6e 67 28 70 7a 45 72 72 4d 73 67 2c  String(pzErrMsg,
17c0: 20 22 6f 75 74 20 6f 66 20 6d 65 6d 6f 72 79 22   "out of memory"
17d0: 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  , 0);.    sqlite
17e0: 53 74 72 52 65 61 6c 6c 6f 63 28 70 7a 45 72 72  StrRealloc(pzErr
17f0: 4d 73 67 29 3b 0a 20 20 20 20 72 65 74 75 72 6e  Msg);.    return
1800: 20 30 3b 0a 20 20 7d 0a 20 20 0a 20 20 2f 2a 20   0;.  }.  .  /* 
1810: 4f 70 65 6e 20 74 68 65 20 62 61 63 6b 65 6e 64  Open the backend
1820: 20 64 61 74 61 62 61 73 65 20 64 72 69 76 65 72   database driver
1830: 20 2a 2f 0a 20 20 64 62 2d 3e 70 42 65 20 3d 20   */.  db->pBe = 
1840: 73 71 6c 69 74 65 44 62 62 65 4f 70 65 6e 28 7a  sqliteDbbeOpen(z
1850: 46 69 6c 65 6e 61 6d 65 2c 20 28 6d 6f 64 65 26  Filename, (mode&
1860: 30 32 32 32 29 21 3d 30 2c 20 6d 6f 64 65 21 3d  0222)!=0, mode!=
1870: 30 2c 20 70 7a 45 72 72 4d 73 67 29 3b 0a 20 20  0, pzErrMsg);.  
1880: 69 66 28 20 64 62 2d 3e 70 42 65 3d 3d 30 20 29  if( db->pBe==0 )
1890: 7b 0a 20 20 20 20 73 71 6c 69 74 65 53 74 72 52  {.    sqliteStrR
18a0: 65 61 6c 6c 6f 63 28 70 7a 45 72 72 4d 73 67 29  ealloc(pzErrMsg)
18b0: 3b 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65  ;.    sqliteFree
18c0: 28 64 62 29 3b 0a 20 20 20 20 72 65 74 75 72 6e  (db);.    return
18d0: 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 41 74   0;.  }..  /* At
18e0: 74 65 6d 70 74 20 74 6f 20 72 65 61 64 20 74 68  tempt to read th
18f0: 65 20 73 63 68 65 6d 61 20 2a 2f 0a 20 20 72 63  e schema */.  rc
1900: 20 3d 20 73 71 6c 69 74 65 49 6e 69 74 28 64 62   = sqliteInit(db
1910: 2c 20 70 7a 45 72 72 4d 73 67 29 3b 0a 20 20 69  , pzErrMsg);.  i
1920: 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b  f( rc!=SQLITE_OK
1930: 20 26 26 20 72 63 21 3d 53 51 4c 49 54 45 5f 42   && rc!=SQLITE_B
1940: 55 53 59 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  USY ){.    sqlit
1950: 65 5f 63 6c 6f 73 65 28 64 62 29 3b 0a 20 20 20  e_close(db);.   
1960: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 65 6c   return 0;.  }el
1970: 73 65 7b 0a 20 20 20 20 66 72 65 65 28 2a 70 7a  se{.    free(*pz
1980: 45 72 72 4d 73 67 29 3b 0a 20 20 20 20 2a 70 7a  ErrMsg);.    *pz
1990: 45 72 72 4d 73 67 20 3d 20 30 3b 0a 20 20 7d 0a  ErrMsg = 0;.  }.
19a0: 20 20 72 65 74 75 72 6e 20 64 62 3b 0a 7d 0a 0a    return db;.}..
19b0: 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20 61 6e 20 65  /*.** Close an e
19c0: 78 69 73 74 69 6e 67 20 53 51 4c 69 74 65 20 64  xisting SQLite d
19d0: 61 74 61 62 61 73 65 0a 2a 2f 0a 76 6f 69 64 20  atabase.*/.void 
19e0: 73 71 6c 69 74 65 5f 63 6c 6f 73 65 28 73 71 6c  sqlite_close(sql
19f0: 69 74 65 20 2a 64 62 29 7b 0a 20 20 69 6e 74 20  ite *db){.  int 
1a00: 69 3b 0a 20 20 73 71 6c 69 74 65 44 62 62 65 43  i;.  sqliteDbbeC
1a10: 6c 6f 73 65 28 64 62 2d 3e 70 42 65 29 3b 0a 20  lose(db->pBe);. 
1a20: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f 48 41   for(i=0; i<N_HA
1a30: 53 48 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 54 61  SH; i++){.    Ta
1a40: 62 6c 65 20 2a 70 4e 65 78 74 2c 20 2a 70 4c 69  ble *pNext, *pLi
1a50: 73 74 20 3d 20 64 62 2d 3e 61 70 54 62 6c 48 61  st = db->apTblHa
1a60: 73 68 5b 69 5d 3b 0a 20 20 20 20 64 62 2d 3e 61  sh[i];.    db->a
1a70: 70 54 62 6c 48 61 73 68 5b 69 5d 20 3d 20 30 3b  pTblHash[i] = 0;
1a80: 0a 20 20 20 20 77 68 69 6c 65 28 20 70 4c 69 73  .    while( pLis
1a90: 74 20 29 7b 0a 20 20 20 20 20 20 70 4e 65 78 74  t ){.      pNext
1aa0: 20 3d 20 70 4c 69 73 74 2d 3e 70 48 61 73 68 3b   = pList->pHash;
1ab0: 0a 20 20 20 20 20 20 70 4c 69 73 74 2d 3e 70 48  .      pList->pH
1ac0: 61 73 68 20 3d 20 30 3b 0a 20 20 20 20 20 20 73  ash = 0;.      s
1ad0: 71 6c 69 74 65 44 65 6c 65 74 65 54 61 62 6c 65  qliteDeleteTable
1ae0: 28 64 62 2c 20 70 4c 69 73 74 29 3b 0a 20 20 20  (db, pList);.   
1af0: 20 20 20 70 4c 69 73 74 20 3d 20 70 4e 65 78 74     pList = pNext
1b00: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71  ;.    }.  }.  sq
1b10: 6c 69 74 65 46 72 65 65 28 64 62 29 3b 0a 7d 0a  liteFree(db);.}.
1b20: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52  ./*.** Return TR
1b30: 55 45 20 69 66 20 74 68 65 20 67 69 76 65 6e 20  UE if the given 
1b40: 53 51 4c 20 73 74 72 69 6e 67 20 65 6e 64 73 20  SQL string ends 
1b50: 69 6e 20 61 20 73 65 6d 69 63 6f 6c 6f 6e 2e 0a  in a semicolon..
1b60: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 5f 63 6f  */.int sqlite_co
1b70: 6d 70 6c 65 74 65 28 63 6f 6e 73 74 20 63 68 61  mplete(const cha
1b80: 72 20 2a 7a 53 71 6c 29 7b 0a 20 20 69 6e 74 20  r *zSql){.  int 
1b90: 69 3b 0a 20 20 69 6e 74 20 6c 61 73 74 57 61 73  i;.  int lastWas
1ba0: 53 65 6d 69 20 3d 20 30 3b 0a 0a 20 20 69 20 3d  Semi = 0;..  i =
1bb0: 20 30 3b 0a 20 20 77 68 69 6c 65 28 20 69 3e 3d   0;.  while( i>=
1bc0: 30 20 26 26 20 7a 53 71 6c 5b 69 5d 21 3d 30 20  0 && zSql[i]!=0 
1bd0: 29 7b 0a 20 20 20 20 69 6e 74 20 74 6f 6b 65 6e  ){.    int token
1be0: 54 79 70 65 3b 0a 20 20 20 20 69 6e 74 20 6e 3b  Type;.    int n;
1bf0: 0a 0a 20 20 20 20 6e 20 3d 20 73 71 6c 69 74 65  ..    n = sqlite
1c00: 47 65 74 54 6f 6b 65 6e 28 26 7a 53 71 6c 5b 69  GetToken(&zSql[i
1c10: 5d 2c 20 26 74 6f 6b 65 6e 54 79 70 65 29 3b 0a  ], &tokenType);.
1c20: 20 20 20 20 73 77 69 74 63 68 28 20 74 6f 6b 65      switch( toke
1c30: 6e 54 79 70 65 20 29 7b 0a 20 20 20 20 20 20 63  nType ){.      c
1c40: 61 73 65 20 54 4b 5f 53 50 41 43 45 3a 0a 20 20  ase TK_SPACE:.  
1c50: 20 20 20 20 63 61 73 65 20 54 4b 5f 43 4f 4d 4d      case TK_COMM
1c60: 45 4e 54 3a 0a 20 20 20 20 20 20 20 20 62 72 65  ENT:.        bre
1c70: 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20 54  ak;.      case T
1c80: 4b 5f 53 45 4d 49 3a 0a 20 20 20 20 20 20 20 20  K_SEMI:.        
1c90: 6c 61 73 74 57 61 73 53 65 6d 69 20 3d 20 31 3b  lastWasSemi = 1;
1ca0: 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  .        break;.
1cb0: 20 20 20 20 20 20 64 65 66 61 75 6c 74 3a 0a 20        default:. 
1cc0: 20 20 20 20 20 20 20 6c 61 73 74 57 61 73 53 65         lastWasSe
1cd0: 6d 69 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20  mi = 0;.        
1ce0: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
1cf0: 20 69 20 2b 3d 20 6e 3b 0a 20 20 7d 0a 20 20 72   i += n;.  }.  r
1d00: 65 74 75 72 6e 20 6c 61 73 74 57 61 73 53 65 6d  eturn lastWasSem
1d10: 69 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 65 63  i;.}../*.** Exec
1d20: 75 74 65 20 53 51 4c 20 63 6f 64 65 2e 20 20 52  ute SQL code.  R
1d30: 65 74 75 72 6e 20 6f 6e 65 20 6f 66 20 74 68 65  eturn one of the
1d40: 20 53 51 4c 49 54 45 5f 20 73 75 63 63 65 73 73   SQLITE_ success
1d50: 2f 66 61 69 6c 75 72 65 0a 2a 2a 20 63 6f 64 65  /failure.** code
1d60: 73 2e 20 20 41 6c 73 6f 20 77 72 69 74 65 20 61  s.  Also write a
1d70: 6e 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 20  n error message 
1d80: 69 6e 74 6f 20 6d 65 6d 6f 72 79 20 6f 62 74 61  into memory obta
1d90: 69 6e 65 64 20 66 72 6f 6d 0a 2a 2a 20 6d 61 6c  ined from.** mal
1da0: 6c 6f 63 28 29 20 61 6e 64 20 6d 61 6b 65 20 2a  loc() and make *
1db0: 70 7a 45 72 72 4d 73 67 20 70 6f 69 6e 74 20 74  pzErrMsg point t
1dc0: 6f 20 74 68 61 74 20 6d 65 73 73 61 67 65 2e 0a  o that message..
1dd0: 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 53 51 4c  **.** If the SQL
1de0: 20 69 73 20 61 20 71 75 65 72 79 2c 20 74 68 65   is a query, the
1df0: 6e 20 66 6f 72 20 65 61 63 68 20 72 6f 77 20 69  n for each row i
1e00: 6e 20 74 68 65 20 71 75 65 72 79 20 72 65 73 75  n the query resu
1e10: 6c 74 0a 2a 2a 20 74 68 65 20 78 43 61 6c 6c 62  lt.** the xCallb
1e20: 61 63 6b 28 29 20 66 75 6e 63 74 69 6f 6e 20 69  ack() function i
1e30: 73 20 63 61 6c 6c 65 64 2e 20 20 70 41 72 67 20  s called.  pArg 
1e40: 62 65 63 6f 6d 65 73 20 74 68 65 20 66 69 72 73  becomes the firs
1e50: 74 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 20 74 6f  t.** argument to
1e60: 20 78 43 61 6c 6c 62 61 63 6b 28 29 2e 20 20 49   xCallback().  I
1e70: 66 20 78 43 61 6c 6c 62 61 63 6b 3d 4e 55 4c 4c  f xCallback=NULL
1e80: 20 74 68 65 6e 20 6e 6f 20 63 61 6c 6c 62 61 63   then no callbac
1e90: 6b 0a 2a 2a 20 69 73 20 69 6e 76 6f 6b 65 64 2c  k.** is invoked,
1ea0: 20 65 76 65 6e 20 66 6f 72 20 71 75 65 72 69 65   even for querie
1eb0: 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  s..*/.int sqlite
1ec0: 5f 65 78 65 63 28 0a 20 20 73 71 6c 69 74 65 20  _exec(.  sqlite 
1ed0: 2a 64 62 2c 20 20 20 20 20 20 20 20 20 20 20 20  *db,            
1ee0: 20 20 20 20 20 2f 2a 20 54 68 65 20 64 61 74 61       /* The data
1ef0: 62 61 73 65 20 6f 6e 20 77 68 69 63 68 20 74 68  base on which th
1f00: 65 20 53 51 4c 20 65 78 65 63 75 74 65 73 20 2a  e SQL executes *
1f10: 2f 0a 20 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20  /.  char *zSql, 
1f20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1f30: 2f 2a 20 54 68 65 20 53 51 4c 20 74 6f 20 62 65  /* The SQL to be
1f40: 20 65 78 65 63 75 74 65 64 20 2a 2f 0a 20 20 73   executed */.  s
1f50: 71 6c 69 74 65 5f 63 61 6c 6c 62 61 63 6b 20 78  qlite_callback x
1f60: 43 61 6c 6c 62 61 63 6b 2c 20 20 2f 2a 20 49 6e  Callback,  /* In
1f70: 76 6f 6b 65 20 74 68 69 73 20 63 61 6c 6c 62 61  voke this callba
1f80: 63 6b 20 72 6f 75 74 69 6e 65 20 2a 2f 0a 20 20  ck routine */.  
1f90: 76 6f 69 64 20 2a 70 41 72 67 2c 20 20 20 20 20  void *pArg,     
1fa0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 46              /* F
1fb0: 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20 74 6f  irst argument to
1fc0: 20 78 43 61 6c 6c 62 61 63 6b 28 29 20 2a 2f 0a   xCallback() */.
1fd0: 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d 73    char **pzErrMs
1fe0: 67 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a  g             /*
1ff0: 20 57 72 69 74 65 20 65 72 72 6f 72 20 6d 65 73   Write error mes
2000: 73 61 67 65 73 20 68 65 72 65 20 2a 2f 0a 29 7b  sages here */.){
2010: 0a 20 20 50 61 72 73 65 20 73 50 61 72 73 65 3b  .  Parse sParse;
2020: 0a 20 20 69 6e 74 20 72 63 3b 0a 0a 20 20 69 66  .  int rc;..  if
2030: 28 20 70 7a 45 72 72 4d 73 67 20 29 20 2a 70 7a  ( pzErrMsg ) *pz
2040: 45 72 72 4d 73 67 20 3d 20 30 3b 0a 20 20 69 66  ErrMsg = 0;.  if
2050: 28 20 28 64 62 2d 3e 66 6c 61 67 73 20 26 20 53  ( (db->flags & S
2060: 51 4c 49 54 45 5f 49 6e 69 74 69 61 6c 69 7a 65  QLITE_Initialize
2070: 64 29 3d 3d 30 20 29 7b 0a 20 20 20 20 69 6e 74  d)==0 ){.    int
2080: 20 72 63 20 3d 20 73 71 6c 69 74 65 49 6e 69 74   rc = sqliteInit
2090: 28 64 62 2c 20 70 7a 45 72 72 4d 73 67 29 3b 0a  (db, pzErrMsg);.
20a0: 20 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49      if( rc!=SQLI
20b0: 54 45 5f 4f 4b 20 29 20 72 65 74 75 72 6e 20 72  TE_OK ) return r
20c0: 63 3b 0a 20 20 7d 0a 20 20 6d 65 6d 73 65 74 28  c;.  }.  memset(
20d0: 26 73 50 61 72 73 65 2c 20 30 2c 20 73 69 7a 65  &sParse, 0, size
20e0: 6f 66 28 73 50 61 72 73 65 29 29 3b 0a 20 20 73  of(sParse));.  s
20f0: 50 61 72 73 65 2e 64 62 20 3d 20 64 62 3b 0a 20  Parse.db = db;. 
2100: 20 73 50 61 72 73 65 2e 78 43 61 6c 6c 62 61 63   sParse.xCallbac
2110: 6b 20 3d 20 78 43 61 6c 6c 62 61 63 6b 3b 0a 20  k = xCallback;. 
2120: 20 73 50 61 72 73 65 2e 70 41 72 67 20 3d 20 70   sParse.pArg = p
2130: 41 72 67 3b 0a 20 20 72 63 20 3d 20 73 71 6c 69  Arg;.  rc = sqli
2140: 74 65 52 75 6e 50 61 72 73 65 72 28 26 73 50 61  teRunParser(&sPa
2150: 72 73 65 2c 20 7a 53 71 6c 2c 20 70 7a 45 72 72  rse, zSql, pzErr
2160: 4d 73 67 29 3b 0a 20 20 73 71 6c 69 74 65 53 74  Msg);.  sqliteSt
2170: 72 52 65 61 6c 6c 6f 63 28 70 7a 45 72 72 4d 73  rRealloc(pzErrMs
2180: 67 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b  g);.  return rc;
2190: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72  .}../*.** This r
21a0: 6f 75 74 69 6e 65 20 69 6d 70 6c 65 6d 65 6e 74  outine implement
21b0: 73 20 61 20 62 75 73 79 20 63 61 6c 6c 62 61 63  s a busy callbac
21c0: 6b 20 74 68 61 74 20 73 6c 65 65 70 73 20 61 6e  k that sleeps an
21d0: 64 20 74 72 69 65 73 0a 2a 2a 20 61 67 61 69 6e  d tries.** again
21e0: 20 75 6e 74 69 6c 20 61 20 74 69 6d 65 6f 75 74   until a timeout
21f0: 20 76 61 6c 75 65 20 69 73 20 72 65 61 63 68 65   value is reache
2200: 64 2e 20 20 54 68 65 20 74 69 6d 65 6f 75 74 20  d.  The timeout 
2210: 76 61 6c 75 65 20 69 73 0a 2a 2a 20 61 6e 20 69  value is.** an i
2220: 6e 74 65 67 65 72 20 6e 75 6d 62 65 72 20 6f 66  nteger number of
2230: 20 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 20 70 61   milliseconds pa
2240: 73 73 65 64 20 69 6e 20 61 73 20 74 68 65 20 66  ssed in as the f
2250: 69 72 73 74 0a 2a 2a 20 61 72 67 75 6d 65 6e 74  irst.** argument
2260: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  ..*/.static int 
2270: 73 71 6c 69 74 65 5f 64 65 66 61 75 6c 74 5f 62  sqlite_default_b
2280: 75 73 79 5f 63 61 6c 6c 62 61 63 6b 28 0a 20 76  usy_callback(. v
2290: 6f 69 64 20 2a 54 69 6d 65 6f 75 74 2c 20 20 20  oid *Timeout,   
22a0: 20 20 20 20 20 20 20 20 2f 2a 20 4d 61 78 69 6d          /* Maxim
22b0: 75 6d 20 61 6d 6f 75 6e 74 20 6f 66 20 74 69 6d  um amount of tim
22c0: 65 20 74 6f 20 77 61 69 74 20 2a 2f 0a 20 63 6f  e to wait */. co
22d0: 6e 73 74 20 63 68 61 72 20 2a 4e 6f 74 55 73 65  nst char *NotUse
22e0: 64 2c 20 20 20 20 20 2f 2a 20 54 68 65 20 6e 61  d,     /* The na
22f0: 6d 65 20 6f 66 20 74 68 65 20 74 61 62 6c 65 20  me of the table 
2300: 74 68 61 74 20 69 73 20 62 75 73 79 20 2a 2f 0a  that is busy */.
2310: 20 69 6e 74 20 63 6f 75 6e 74 20 20 20 20 20 20   int count      
2320: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d            /* Num
2330: 62 65 72 20 6f 66 20 74 69 6d 65 73 20 74 61 62  ber of times tab
2340: 6c 65 20 68 61 73 20 62 65 65 6e 20 62 75 73 79  le has been busy
2350: 20 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20 72 63 3b   */.){.  int rc;
2360: 0a 23 69 66 64 65 66 20 48 41 56 45 5f 55 53 4c  .#ifdef HAVE_USL
2370: 45 45 50 0a 20 20 69 6e 74 20 64 65 6c 61 79 20  EEP.  int delay 
2380: 3d 20 31 30 30 30 30 3b 0a 20 20 69 6e 74 20 70  = 10000;.  int p
2390: 72 69 6f 72 5f 64 65 6c 61 79 20 3d 20 30 3b 0a  rior_delay = 0;.
23a0: 20 20 69 6e 74 20 74 69 6d 65 6f 75 74 20 3d 20    int timeout = 
23b0: 28 69 6e 74 29 54 69 6d 65 6f 75 74 3b 0a 20 20  (int)Timeout;.  
23c0: 69 6e 74 20 69 3b 0a 0a 20 20 66 6f 72 28 69 3d  int i;..  for(i=
23d0: 31 3b 20 69 3c 63 6f 75 6e 74 3b 20 69 2b 2b 29  1; i<count; i++)
23e0: 7b 20 0a 20 20 20 20 70 72 69 6f 72 5f 64 65 6c  { .    prior_del
23f0: 61 79 20 2b 3d 20 64 65 6c 61 79 3b 0a 20 20 20  ay += delay;.   
2400: 20 64 65 6c 61 79 20 3d 20 64 65 6c 61 79 2a 32   delay = delay*2
2410: 3b 0a 20 20 20 20 69 66 28 20 64 65 6c 61 79 3e  ;.    if( delay>
2420: 3d 31 30 30 30 30 30 30 20 29 7b 0a 20 20 20 20  =1000000 ){.    
2430: 20 20 64 65 6c 61 79 20 3d 20 31 30 30 30 30 30    delay = 100000
2440: 30 3b 0a 20 20 20 20 20 20 70 72 69 6f 72 5f 64  0;.      prior_d
2450: 65 6c 61 79 20 2b 3d 20 31 30 30 30 30 30 30 2a  elay += 1000000*
2460: 28 63 6f 75 6e 74 20 2d 20 69 20 2d 20 31 29 3b  (count - i - 1);
2470: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  .      break;.  
2480: 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 70 72    }.  }.  if( pr
2490: 69 6f 72 5f 64 65 6c 61 79 20 2b 20 64 65 6c 61  ior_delay + dela
24a0: 79 20 3e 20 74 69 6d 65 6f 75 74 2a 31 30 30 30  y > timeout*1000
24b0: 20 29 7b 0a 20 20 20 20 64 65 6c 61 79 20 3d 20   ){.    delay = 
24c0: 74 69 6d 65 6f 75 74 2a 31 30 30 30 20 2d 20 70  timeout*1000 - p
24d0: 72 69 6f 72 5f 64 65 6c 61 79 3b 0a 20 20 20 20  rior_delay;.    
24e0: 69 66 28 20 64 65 6c 61 79 3c 3d 30 20 29 20 72  if( delay<=0 ) r
24f0: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 75  eturn 0;.  }.  u
2500: 73 6c 65 65 70 28 64 65 6c 61 79 29 3b 0a 20 20  sleep(delay);.  
2510: 72 65 74 75 72 6e 20 31 3b 0a 23 65 6c 73 65 0a  return 1;.#else.
2520: 20 20 69 6e 74 20 74 69 6d 65 6f 75 74 20 3d 20    int timeout = 
2530: 28 69 6e 74 29 54 69 6d 65 6f 75 74 3b 0a 20 20  (int)Timeout;.  
2540: 69 66 28 20 28 63 6f 75 6e 74 2b 31 29 2a 31 30  if( (count+1)*10
2550: 30 30 20 3e 20 74 69 6d 65 6f 75 74 20 29 7b 0a  00 > timeout ){.
2560: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20      return 0;.  
2570: 7d 0a 20 20 73 6c 65 65 70 28 31 29 3b 0a 20 20  }.  sleep(1);.  
2580: 72 65 74 75 72 6e 20 31 3b 0a 23 65 6e 64 69 66  return 1;.#endif
2590: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72  .}../*.** This r
25a0: 6f 75 74 69 6e 65 20 73 65 74 73 20 74 68 65 20  outine sets the 
25b0: 62 75 73 79 20 63 61 6c 6c 62 61 63 6b 20 66 6f  busy callback fo
25c0: 72 20 61 6e 20 53 71 6c 69 74 65 20 64 61 74 61  r an Sqlite data
25d0: 62 61 73 65 20 74 6f 20 74 68 65 0a 2a 2a 20 67  base to the.** g
25e0: 69 76 65 6e 20 63 61 6c 6c 62 61 63 6b 20 66 75  iven callback fu
25f0: 6e 63 74 69 6f 6e 20 77 69 74 68 20 74 68 65 20  nction with the 
2600: 67 69 76 65 6e 20 61 72 67 75 6d 65 6e 74 2e 0a  given argument..
2610: 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 5f 62  */.void sqlite_b
2620: 75 73 79 5f 68 61 6e 64 6c 65 72 28 0a 20 20 73  usy_handler(.  s
2630: 71 6c 69 74 65 20 2a 64 62 2c 0a 20 20 69 6e 74  qlite *db,.  int
2640: 20 28 2a 78 42 75 73 79 29 28 76 6f 69 64 2a 2c   (*xBusy)(void*,
2650: 63 6f 6e 73 74 20 63 68 61 72 2a 2c 69 6e 74 29  const char*,int)
2660: 2c 0a 20 20 76 6f 69 64 20 2a 70 41 72 67 0a 29  ,.  void *pArg.)
2670: 7b 0a 20 20 64 62 2d 3e 78 42 75 73 79 43 61 6c  {.  db->xBusyCal
2680: 6c 62 61 63 6b 20 3d 20 78 42 75 73 79 3b 0a 20  lback = xBusy;. 
2690: 20 64 62 2d 3e 70 42 75 73 79 41 72 67 20 3d 20   db->pBusyArg = 
26a0: 70 41 72 67 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  pArg;.}../*.** T
26b0: 68 69 73 20 72 6f 75 74 69 6e 65 20 69 6e 73 74  his routine inst
26c0: 61 6c 6c 73 20 61 20 64 65 66 61 75 6c 74 20 62  alls a default b
26d0: 75 73 79 20 68 61 6e 64 6c 65 72 20 74 68 61 74  usy handler that
26e0: 20 77 61 69 74 73 20 66 6f 72 20 74 68 65 0a 2a   waits for the.*
26f0: 2a 20 73 70 65 63 69 66 69 65 64 20 6e 75 6d 62  * specified numb
2700: 65 72 20 6f 66 20 6d 69 6c 6c 69 73 65 63 6f 6e  er of millisecon
2710: 64 73 20 62 65 66 6f 72 65 20 72 65 74 75 72 6e  ds before return
2720: 69 6e 67 20 30 2e 0a 2a 2f 0a 76 6f 69 64 20 73  ing 0..*/.void s
2730: 71 6c 69 74 65 5f 62 75 73 79 5f 74 69 6d 65 6f  qlite_busy_timeo
2740: 75 74 28 73 71 6c 69 74 65 20 2a 64 62 2c 20 69  ut(sqlite *db, i
2750: 6e 74 20 6d 73 29 7b 0a 20 20 69 66 28 20 6d 73  nt ms){.  if( ms
2760: 3e 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  >0 ){.    sqlite
2770: 5f 62 75 73 79 5f 68 61 6e 64 6c 65 72 28 64 62  _busy_handler(db
2780: 2c 20 73 71 6c 69 74 65 5f 64 65 66 61 75 6c 74  , sqlite_default
2790: 5f 62 75 73 79 5f 63 61 6c 6c 62 61 63 6b 2c 20  _busy_callback, 
27a0: 28 76 6f 69 64 2a 29 6d 73 29 3b 0a 20 20 7d 65  (void*)ms);.  }e
27b0: 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 5f  lse{.    sqlite_
27c0: 62 75 73 79 5f 68 61 6e 64 6c 65 72 28 64 62 2c  busy_handler(db,
27d0: 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 7d 0a         0, 0);.  }.}.