/ Hex Artifact Content
Login

Artifact 4129779d7199c05200482046182f718a122f8c96:


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 54 68 69 73 20 66 69 6c 65 20 63  *.** This file c
03b0: 6f 6e 74 61 69 6e 73 20 63 6f 64 65 20 74 6f 20  ontains code to 
03c0: 69 6d 70 6c 65 6d 65 6e 74 20 74 68 65 20 64 61  implement the da
03d0: 74 61 62 61 73 65 20 62 61 73 65 65 6e 64 20 28  tabase baseend (
03e0: 44 42 42 45 29 0a 2a 2a 20 66 6f 72 20 73 71 6c  DBBE).** for sql
03f0: 69 74 65 2e 20 20 54 68 65 20 64 61 74 61 62 61  ite.  The databa
0400: 73 65 20 62 61 63 6b 65 6e 64 20 69 73 20 74 68  se backend is th
0410: 65 20 69 6e 74 65 72 66 61 63 65 20 62 65 74 77  e interface betw
0420: 65 65 6e 0a 2a 2a 20 73 71 6c 69 74 65 20 61 6e  een.** sqlite an
0430: 64 20 74 68 65 20 63 6f 64 65 20 74 68 61 74 20  d the code that 
0440: 64 6f 65 73 20 74 68 65 20 61 63 74 75 61 6c 6c  does the actuall
0450: 79 20 72 65 61 64 69 6e 67 20 61 6e 64 20 77 72  y reading and wr
0460: 69 74 69 6e 67 0a 2a 2a 20 6f 66 20 69 6e 66 6f  iting.** of info
0470: 72 6d 61 74 69 6f 6e 20 74 6f 20 74 68 65 20 64  rmation to the d
0480: 69 73 6b 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20  isk..**.** This 
0490: 66 69 6c 65 20 75 73 65 73 20 47 44 42 4d 20 61  file uses GDBM a
04a0: 73 20 74 68 65 20 64 61 74 61 62 61 73 65 20 62  s the database b
04b0: 61 63 6b 65 6e 64 2e 20 20 49 74 20 73 68 6f 75  ackend.  It shou
04c0: 6c 64 20 62 65 0a 2a 2a 20 72 65 6c 61 74 69 76  ld be.** relativ
04d0: 65 6c 79 20 73 69 6d 70 6c 65 20 74 6f 20 63 6f  ely simple to co
04e0: 6e 76 65 72 74 20 74 6f 20 61 20 64 69 66 66 65  nvert to a diffe
04f0: 72 65 6e 74 20 64 61 74 61 62 61 73 65 20 73 75  rent database su
0500: 63 68 0a 2a 2a 20 61 73 20 4e 44 42 4d 2c 20 53  ch.** as NDBM, S
0510: 44 42 4d 2c 20 6f 72 20 42 65 72 6b 65 6c 65 79  DBM, or Berkeley
0520: 44 42 2e 0a 2a 2a 0a 2a 2a 20 24 49 64 3a 20 64  DB..**.** $Id: d
0530: 62 62 65 2e 63 2c 76 20 31 2e 31 33 20 32 30 30  bbe.c,v 1.13 200
0540: 30 2f 30 36 2f 30 38 20 31 35 3a 31 30 3a 34 37  0/06/08 15:10:47
0550: 20 64 72 68 20 45 78 70 20 24 0a 2a 2f 0a 23 69   drh Exp $.*/.#i
0560: 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49 6e  nclude "sqliteIn
0570: 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c 67  t.h".#include <g
0580: 64 62 6d 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  dbm.h>.#include 
0590: 3c 73 79 73 2f 73 74 61 74 2e 68 3e 0a 23 69 6e  <sys/stat.h>.#in
05a0: 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68 3e  clude <unistd.h>
05b0: 0a 23 69 6e 63 6c 75 64 65 20 3c 63 74 79 70 65  .#include <ctype
05c0: 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 74 69  .h>.#include <ti
05d0: 6d 65 2e 68 3e 0a 0a 2f 2a 0a 2a 2a 20 45 61 63  me.h>../*.** Eac
05e0: 68 20 6f 70 65 6e 20 64 61 74 61 62 61 73 65 20  h open database 
05f0: 66 69 6c 65 20 69 73 20 61 6e 20 69 6e 73 74 61  file is an insta
0600: 6e 63 65 20 6f 66 20 74 68 69 73 20 73 74 72 75  nce of this stru
0610: 63 74 75 72 65 2e 0a 2a 2f 0a 74 79 70 65 64 65  cture..*/.typede
0620: 66 20 73 74 72 75 63 74 20 42 65 46 69 6c 65 20  f struct BeFile 
0630: 42 65 46 69 6c 65 3b 0a 73 74 72 75 63 74 20 42  BeFile;.struct B
0640: 65 46 69 6c 65 20 7b 0a 20 20 63 68 61 72 20 2a  eFile {.  char *
0650: 7a 4e 61 6d 65 3b 20 20 20 20 20 20 20 20 20 20  zName;          
0660: 20 20 2f 2a 20 4e 61 6d 65 20 6f 66 20 74 68 65    /* Name of the
0670: 20 66 69 6c 65 20 2a 2f 0a 20 20 47 44 42 4d 5f   file */.  GDBM_
0680: 46 49 4c 45 20 64 62 66 3b 20 20 20 20 20 20 20  FILE dbf;       
0690: 20 20 20 2f 2a 20 54 68 65 20 66 69 6c 65 20 69     /* The file i
06a0: 74 73 65 6c 66 20 2a 2f 0a 20 20 69 6e 74 20 6e  tself */.  int n
06b0: 52 65 66 3b 20 20 20 20 20 20 20 20 20 20 20 20  Ref;            
06c0: 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20     /* Number of 
06d0: 72 65 66 65 72 65 6e 63 65 73 20 2a 2f 0a 20 20  references */.  
06e0: 69 6e 74 20 64 65 6c 4f 6e 43 6c 6f 73 65 3b 20  int delOnClose; 
06f0: 20 20 20 20 20 20 20 20 2f 2a 20 44 65 6c 65 74          /* Delet
0700: 65 20 77 68 65 6e 20 63 6c 6f 73 69 6e 67 20 2a  e when closing *
0710: 2f 0a 20 20 69 6e 74 20 77 72 69 74 65 61 62 6c  /.  int writeabl
0720: 65 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4f  e;          /* O
0730: 70 65 6e 65 64 20 66 6f 72 20 77 72 69 74 69 6e  pened for writin
0740: 67 20 2a 2f 0a 20 20 42 65 46 69 6c 65 20 2a 70  g */.  BeFile *p
0750: 4e 65 78 74 2c 20 2a 70 50 72 65 76 3b 20 20 2f  Next, *pPrev;  /
0760: 2a 20 4e 65 78 74 20 61 6e 64 20 70 72 65 76 69  * Next and previ
0770: 6f 75 73 20 6f 6e 20 6c 69 73 74 20 6f 66 20 6f  ous on list of o
0780: 70 65 6e 20 66 69 6c 65 73 20 2a 2f 0a 7d 3b 0a  pen files */.};.
0790: 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f  ./*.** The follo
07a0: 77 69 6e 67 20 61 72 65 20 73 74 61 74 65 20 76  wing are state v
07b0: 61 72 69 61 62 6c 65 73 20 66 6f 72 20 74 68 65  ariables for the
07c0: 20 52 43 34 20 61 6c 67 6f 72 69 74 68 6d 2e 20   RC4 algorithm. 
07d0: 20 57 65 0a 2a 2a 20 75 73 65 20 52 43 34 20 61   We.** use RC4 a
07e0: 73 20 61 20 72 61 6e 64 6f 6d 20 6e 75 6d 62 65  s a random numbe
07f0: 72 20 67 65 6e 65 72 61 74 6f 72 2e 20 20 45 61  r generator.  Ea
0800: 63 68 20 63 61 6c 6c 20 74 6f 20 52 43 34 20 67  ch call to RC4 g
0810: 69 76 65 73 0a 2a 2a 20 61 20 72 61 6e 64 6f 6d  ives.** a random
0820: 20 38 2d 62 69 74 20 6e 75 6d 62 65 72 2e 0a 2a   8-bit number..*
0830: 2f 0a 73 74 72 75 63 74 20 72 63 34 20 7b 0a 20  /.struct rc4 {. 
0840: 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20 69 6e 74   int i, j;.  int
0850: 20 73 5b 32 35 36 5d 3b 0a 7d 3b 0a 0a 2f 2a 0a   s[256];.};../*.
0860: 2a 2a 20 54 68 65 20 63 6f 6d 70 6c 65 74 65 20  ** The complete 
0870: 64 61 74 61 62 61 73 65 20 69 73 20 61 6e 20 69  database is an i
0880: 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65 20 66  nstance of the f
0890: 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 74 75  ollowing structu
08a0: 72 65 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 44 62  re..*/.struct Db
08b0: 62 65 20 7b 0a 20 20 63 68 61 72 20 2a 7a 44 69  be {.  char *zDi
08c0: 72 3b 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65  r;        /* The
08d0: 20 64 69 72 65 63 74 6f 72 79 20 63 6f 6e 74 61   directory conta
08e0: 69 6e 69 6e 67 20 74 68 65 20 64 61 74 61 62 61  ining the databa
08f0: 73 65 20 2a 2f 0a 20 20 69 6e 74 20 77 72 69 74  se */.  int writ
0900: 65 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 54 72  e;         /* Tr
0910: 75 65 20 66 6f 72 20 77 72 69 74 65 20 70 65 72  ue for write per
0920: 6d 69 73 73 69 6f 6e 20 2a 2f 0a 20 20 42 65 46  mission */.  BeF
0930: 69 6c 65 20 2a 70 4f 70 65 6e 3b 20 20 20 20 20  ile *pOpen;     
0940: 2f 2a 20 4c 69 73 74 20 6f 66 20 6f 70 65 6e 20  /* List of open 
0950: 66 69 6c 65 73 20 2a 2f 0a 20 20 69 6e 74 20 6e  files */.  int n
0960: 54 65 6d 70 3b 20 20 20 20 20 20 20 20 20 2f 2a  Temp;         /*
0970: 20 4e 75 6d 62 65 72 20 6f 66 20 74 65 6d 70 6f   Number of tempo
0980: 72 61 72 79 20 66 69 6c 65 73 20 63 72 65 61 74  rary files creat
0990: 65 64 20 2a 2f 0a 20 20 46 49 4c 45 20 2a 2a 61  ed */.  FILE **a
09a0: 70 54 65 6d 70 3b 20 20 20 20 20 2f 2a 20 53 70  pTemp;     /* Sp
09b0: 61 63 65 20 74 6f 20 68 6f 6c 64 20 74 65 6d 70  ace to hold temp
09c0: 6f 72 61 72 79 20 66 69 6c 65 20 70 6f 69 6e 74  orary file point
09d0: 65 72 73 20 2a 2f 0a 20 20 63 68 61 72 20 2a 2a  ers */.  char **
09e0: 61 7a 54 65 6d 70 3b 20 20 20 20 20 2f 2a 20 4e  azTemp;     /* N
09f0: 61 6d 65 73 20 6f 66 20 74 68 65 20 74 65 6d 70  ames of the temp
0a00: 6f 72 61 72 79 20 66 69 6c 65 73 20 2a 2f 0a 20  orary files */. 
0a10: 20 73 74 72 75 63 74 20 72 63 34 20 72 63 34 3b   struct rc4 rc4;
0a20: 20 20 20 20 2f 2a 20 54 68 65 20 72 61 6e 64 6f      /* The rando
0a30: 6d 20 6e 75 6d 62 65 72 20 67 65 6e 65 72 61 74  m number generat
0a40: 6f 72 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  or */.};../*.** 
0a50: 45 61 63 68 20 66 69 6c 65 20 77 69 74 68 69 6e  Each file within
0a60: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 69 73   the database is
0a70: 20 61 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20   an instance of 
0a80: 74 68 69 73 0a 2a 2a 20 73 74 72 75 63 74 75 72  this.** structur
0a90: 65 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 44 62 62  e..*/.struct Dbb
0aa0: 65 54 61 62 6c 65 20 7b 0a 20 20 44 62 62 65 20  eTable {.  Dbbe 
0ab0: 2a 70 42 65 3b 20 20 20 20 20 20 20 20 20 2f 2a  *pBe;         /*
0ac0: 20 54 68 65 20 64 61 74 61 62 61 73 65 20 6f 66   The database of
0ad0: 20 77 68 69 63 68 20 74 68 69 73 20 72 65 63 6f   which this reco
0ae0: 72 64 20 69 73 20 61 20 70 61 72 74 20 2a 2f 0a  rd is a part */.
0af0: 20 20 42 65 46 69 6c 65 20 2a 70 46 69 6c 65 3b    BeFile *pFile;
0b00: 20 20 20 20 20 2f 2a 20 54 68 65 20 64 61 74 61       /* The data
0b10: 62 61 73 65 20 66 69 6c 65 20 66 6f 72 20 74 68  base file for th
0b20: 69 73 20 74 61 62 6c 65 20 2a 2f 0a 20 20 64 61  is table */.  da
0b30: 74 75 6d 20 6b 65 79 3b 20 20 20 20 20 20 20 20  tum key;        
0b40: 20 2f 2a 20 4d 6f 73 74 20 72 65 63 65 6e 74 6c   /* Most recentl
0b50: 79 20 75 73 65 64 20 6b 65 79 20 2a 2f 0a 20 20  y used key */.  
0b60: 64 61 74 75 6d 20 64 61 74 61 3b 20 20 20 20 20  datum data;     
0b70: 20 20 20 2f 2a 20 4d 6f 73 74 20 72 65 63 65 6e     /* Most recen
0b80: 74 20 64 61 74 61 20 2a 2f 0a 20 20 69 6e 74 20  t data */.  int 
0b90: 6e 65 65 64 52 65 77 69 6e 64 3b 20 20 20 20 2f  needRewind;    /
0ba0: 2a 20 4e 65 78 74 20 6b 65 79 20 73 68 6f 75 6c  * Next key shoul
0bb0: 64 20 62 65 20 74 68 65 20 66 69 72 73 74 20 2a  d be the first *
0bc0: 2f 0a 20 20 69 6e 74 20 72 65 61 64 50 65 6e 64  /.  int readPend
0bd0: 69 6e 67 3b 20 20 20 2f 2a 20 54 68 65 20 66 65  ing;   /* The fe
0be0: 74 63 68 20 68 61 73 6e 27 74 20 61 63 74 75 61  tch hasn't actua
0bf0: 6c 6c 79 20 62 65 65 6e 20 64 6f 6e 65 20 79 65  lly been done ye
0c00: 74 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 49  t */.};../*.** I
0c10: 6e 69 74 69 61 6c 69 7a 65 20 74 68 65 20 52 43  nitialize the RC
0c20: 34 20 61 6c 67 6f 72 69 74 68 6d 2e 0a 2a 2f 0a  4 algorithm..*/.
0c30: 73 74 61 74 69 63 20 76 6f 69 64 20 72 63 34 69  static void rc4i
0c40: 6e 69 74 28 73 74 72 75 63 74 20 72 63 34 20 2a  nit(struct rc4 *
0c50: 70 2c 20 63 68 61 72 20 2a 6b 65 79 2c 20 69 6e  p, char *key, in
0c60: 74 20 6b 65 79 6c 65 6e 29 7b 0a 20 20 69 6e 74  t keylen){.  int
0c70: 20 69 3b 0a 20 20 63 68 61 72 20 6b 5b 32 35 36   i;.  char k[256
0c80: 5d 3b 0a 20 20 70 2d 3e 6a 20 3d 20 30 3b 0a 20  ];.  p->j = 0;. 
0c90: 20 70 2d 3e 69 20 3d 20 30 3b 0a 20 20 66 6f 72   p->i = 0;.  for
0ca0: 28 69 3d 30 3b 20 69 3c 32 35 36 3b 20 69 2b 2b  (i=0; i<256; i++
0cb0: 29 7b 0a 20 20 20 20 70 2d 3e 73 5b 69 5d 20 3d  ){.    p->s[i] =
0cc0: 20 69 3b 0a 20 20 20 20 6b 5b 69 5d 20 3d 20 6b   i;.    k[i] = k
0cd0: 65 79 5b 69 25 6b 65 79 6c 65 6e 5d 3b 0a 20 20  ey[i%keylen];.  
0ce0: 7d 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 32  }.  for(i=0; i<2
0cf0: 35 36 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 6e  56; i++){.    in
0d00: 74 20 74 3b 0a 20 20 20 20 70 2d 3e 6a 20 3d 20  t t;.    p->j = 
0d10: 28 70 2d 3e 6a 20 2b 20 70 2d 3e 73 5b 69 5d 20  (p->j + p->s[i] 
0d20: 2b 20 6b 5b 69 5d 29 20 26 20 30 78 66 66 3b 0a  + k[i]) & 0xff;.
0d30: 20 20 20 20 74 20 3d 20 70 2d 3e 73 5b 70 2d 3e      t = p->s[p->
0d40: 6a 5d 3b 0a 20 20 20 20 70 2d 3e 73 5b 70 2d 3e  j];.    p->s[p->
0d50: 6a 5d 20 3d 20 70 2d 3e 73 5b 69 5d 3b 0a 20 20  j] = p->s[i];.  
0d60: 20 20 70 2d 3e 73 5b 69 5d 20 3d 20 74 3b 0a 20    p->s[i] = t;. 
0d70: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 74 20   }.}../*.** Get 
0d80: 61 20 73 69 6e 67 6c 65 20 38 2d 62 69 74 20 72  a single 8-bit r
0d90: 61 6e 64 6f 6d 20 76 61 6c 75 65 20 66 72 6f 6d  andom value from
0da0: 20 74 68 65 20 52 43 34 20 61 6c 67 6f 72 69 74   the RC4 algorit
0db0: 68 6d 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  hm..*/.static in
0dc0: 74 20 72 63 34 62 79 74 65 28 73 74 72 75 63 74  t rc4byte(struct
0dd0: 20 72 63 34 20 2a 70 29 7b 0a 20 20 69 6e 74 20   rc4 *p){.  int 
0de0: 74 3b 0a 20 20 70 2d 3e 69 20 3d 20 28 70 2d 3e  t;.  p->i = (p->
0df0: 69 20 2b 20 31 29 20 26 20 30 78 66 66 3b 0a 20  i + 1) & 0xff;. 
0e00: 20 70 2d 3e 6a 20 3d 20 28 70 2d 3e 6a 20 2b 20   p->j = (p->j + 
0e10: 70 2d 3e 73 5b 70 2d 3e 69 5d 29 20 26 20 30 78  p->s[p->i]) & 0x
0e20: 66 66 3b 0a 20 20 74 20 3d 20 70 2d 3e 73 5b 70  ff;.  t = p->s[p
0e30: 2d 3e 69 5d 3b 0a 20 20 70 2d 3e 73 5b 70 2d 3e  ->i];.  p->s[p->
0e40: 69 5d 20 3d 20 70 2d 3e 73 5b 70 2d 3e 6a 5d 3b  i] = p->s[p->j];
0e50: 0a 20 20 70 2d 3e 73 5b 70 2d 3e 6a 5d 20 3d 20  .  p->s[p->j] = 
0e60: 74 3b 0a 20 20 74 20 3d 20 70 2d 3e 73 5b 70 2d  t;.  t = p->s[p-
0e70: 3e 69 5d 20 2b 20 70 2d 3e 73 5b 70 2d 3e 6a 5d  >i] + p->s[p->j]
0e80: 3b 0a 20 20 72 65 74 75 72 6e 20 74 20 26 20 30  ;.  return t & 0
0e90: 78 66 66 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  xff;.}../*.** Th
0ea0: 69 73 20 72 6f 75 74 69 6e 65 20 6f 70 65 6e 73  is routine opens
0eb0: 20 61 20 6e 65 77 20 64 61 74 61 62 61 73 65 2e   a new database.
0ec0: 20 20 46 6f 72 20 74 68 65 20 47 44 42 4d 20 64    For the GDBM d
0ed0: 72 69 76 65 72 0a 2a 2a 20 69 6d 70 6c 65 6d 65  river.** impleme
0ee0: 6e 74 65 64 20 68 65 72 65 2c 20 74 68 65 20 64  nted here, the d
0ef0: 61 74 61 62 61 73 65 20 6e 61 6d 65 20 69 73 20  atabase name is 
0f00: 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20  the name of the 
0f10: 64 69 72 65 63 74 6f 72 79 0a 2a 2a 20 63 6f 6e  directory.** con
0f20: 74 61 69 6e 69 6e 67 20 61 6c 6c 20 74 68 65 20  taining all the 
0f30: 66 69 6c 65 73 20 6f 66 20 74 68 65 20 64 61 74  files of the dat
0f40: 61 62 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20  abase..**.** If 
0f50: 73 75 63 63 65 73 73 66 75 6c 2c 20 61 20 70 6f  successful, a po
0f60: 69 6e 74 65 72 20 74 6f 20 74 68 65 20 44 62 62  inter to the Dbb
0f70: 65 20 73 74 72 75 63 74 75 72 65 20 69 73 20 72  e structure is r
0f80: 65 74 75 72 6e 65 64 2e 0a 2a 2a 20 49 66 20 74  eturned..** If t
0f90: 68 65 72 65 20 61 72 65 20 65 72 72 6f 72 73 2c  here are errors,
0fa0: 20 61 6e 20 61 70 70 72 6f 70 72 69 61 74 65 20   an appropriate 
0fb0: 65 72 72 6f 72 20 6d 65 73 73 61 67 65 20 69 73  error message is
0fc0: 20 6c 65 66 74 0a 2a 2a 20 69 6e 20 2a 70 7a 45   left.** in *pzE
0fd0: 72 72 4d 73 67 20 61 6e 64 20 4e 55 4c 4c 20 69  rrMsg and NULL i
0fe0: 73 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2f 0a 44  s returned..*/.D
0ff0: 62 62 65 20 2a 73 71 6c 69 74 65 44 62 62 65 4f  bbe *sqliteDbbeO
1000: 70 65 6e 28 0a 20 20 63 6f 6e 73 74 20 63 68 61  pen(.  const cha
1010: 72 20 2a 7a 4e 61 6d 65 2c 20 20 20 20 20 2f 2a  r *zName,     /*
1020: 20 54 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65   The name of the
1030: 20 64 61 74 61 62 61 73 65 20 2a 2f 0a 20 20 69   database */.  i
1040: 6e 74 20 77 72 69 74 65 46 6c 61 67 2c 20 20 20  nt writeFlag,   
1050: 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66        /* True if
1060: 20 77 65 20 77 69 6c 6c 20 62 65 20 77 72 69 74   we will be writ
1070: 69 6e 67 20 74 6f 20 74 68 65 20 64 61 74 61 62  ing to the datab
1080: 61 73 65 20 2a 2f 0a 20 20 69 6e 74 20 63 72 65  ase */.  int cre
1090: 61 74 65 46 6c 61 67 2c 20 20 20 20 20 20 20 20  ateFlag,        
10a0: 2f 2a 20 54 72 75 65 20 74 6f 20 63 72 65 61 74  /* True to creat
10b0: 65 20 64 61 74 61 62 61 73 65 20 69 66 20 69 74  e database if it
10c0: 20 64 6f 65 73 6e 27 74 20 65 78 69 73 74 20 2a   doesn't exist *
10d0: 2f 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 72  /.  char **pzErr
10e0: 4d 73 67 20 20 20 20 20 20 20 20 2f 2a 20 57 72  Msg        /* Wr
10f0: 69 74 65 20 65 72 72 6f 72 20 6d 65 73 73 61 67  ite error messag
1100: 65 73 20 28 69 66 20 61 6e 79 29 20 68 65 72 65  es (if any) here
1110: 20 2a 2f 0a 29 7b 0a 20 20 44 62 62 65 20 2a 70   */.){.  Dbbe *p
1120: 4e 65 77 3b 0a 20 20 73 74 72 75 63 74 20 73 74  New;.  struct st
1130: 61 74 20 73 74 61 74 62 75 66 3b 0a 20 20 63 68  at statbuf;.  ch
1140: 61 72 20 2a 7a 4d 61 73 74 65 72 3b 0a 0a 20 20  ar *zMaster;..  
1150: 69 66 28 20 21 77 72 69 74 65 46 6c 61 67 20 29  if( !writeFlag )
1160: 20 63 72 65 61 74 65 46 6c 61 67 20 3d 20 30 3b   createFlag = 0;
1170: 0a 20 20 69 66 28 20 73 74 61 74 28 7a 4e 61 6d  .  if( stat(zNam
1180: 65 2c 20 26 73 74 61 74 62 75 66 29 21 3d 30 20  e, &statbuf)!=0 
1190: 29 7b 0a 20 20 20 20 69 66 28 20 63 72 65 61 74  ){.    if( creat
11a0: 65 46 6c 61 67 20 29 20 6d 6b 64 69 72 28 7a 4e  eFlag ) mkdir(zN
11b0: 61 6d 65 2c 20 30 37 35 30 29 3b 0a 20 20 20 20  ame, 0750);.    
11c0: 69 66 28 20 73 74 61 74 28 7a 4e 61 6d 65 2c 20  if( stat(zName, 
11d0: 26 73 74 61 74 62 75 66 29 21 3d 30 20 29 7b 0a  &statbuf)!=0 ){.
11e0: 20 20 20 20 20 20 73 71 6c 69 74 65 53 65 74 53        sqliteSetS
11f0: 74 72 69 6e 67 28 70 7a 45 72 72 4d 73 67 2c 20  tring(pzErrMsg, 
1200: 63 72 65 61 74 65 46 6c 61 67 20 3f 20 0a 20 20  createFlag ? .  
1210: 20 20 20 20 20 20 20 22 63 61 6e 27 74 20 66 69         "can't fi
1220: 6e 64 20 6f 72 20 63 72 65 61 74 65 20 64 69 72  nd or create dir
1230: 65 63 74 6f 72 79 20 5c 22 22 20 3a 20 22 63 61  ectory \"" : "ca
1240: 6e 27 74 20 66 69 6e 64 20 64 69 72 65 63 74 6f  n't find directo
1250: 72 79 20 5c 22 22 2c 0a 20 20 20 20 20 20 20 20  ry \"",.        
1260: 20 7a 4e 61 6d 65 2c 20 22 5c 22 22 2c 20 30 29   zName, "\"", 0)
1270: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 30  ;.      return 0
1280: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66  ;.    }.  }.  if
1290: 28 20 21 53 5f 49 53 44 49 52 28 73 74 61 74 62  ( !S_ISDIR(statb
12a0: 75 66 2e 73 74 5f 6d 6f 64 65 29 20 29 7b 0a 20  uf.st_mode) ){. 
12b0: 20 20 20 73 71 6c 69 74 65 53 65 74 53 74 72 69     sqliteSetStri
12c0: 6e 67 28 70 7a 45 72 72 4d 73 67 2c 20 22 6e 6f  ng(pzErrMsg, "no
12d0: 74 20 61 20 64 69 72 65 63 74 6f 72 79 3a 20 5c  t a directory: \
12e0: 22 22 2c 20 7a 4e 61 6d 65 2c 20 22 5c 22 22 2c  "", zName, "\"",
12f0: 20 30 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20   0);.    return 
1300: 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 61 63 63  0;.  }.  if( acc
1310: 65 73 73 28 7a 4e 61 6d 65 2c 20 77 72 69 74 65  ess(zName, write
1320: 46 6c 61 67 20 3f 20 28 58 5f 4f 4b 7c 57 5f 4f  Flag ? (X_OK|W_O
1330: 4b 7c 52 5f 4f 4b 29 20 3a 20 28 58 5f 4f 4b 7c  K|R_OK) : (X_OK|
1340: 52 5f 4f 4b 29 29 20 29 7b 0a 20 20 20 20 73 71  R_OK)) ){.    sq
1350: 6c 69 74 65 53 65 74 53 74 72 69 6e 67 28 70 7a  liteSetString(pz
1360: 45 72 72 4d 73 67 2c 20 22 61 63 63 65 73 73 20  ErrMsg, "access 
1370: 70 65 72 6d 69 73 73 69 6f 6e 20 64 65 6e 69 65  permission denie
1380: 64 22 2c 20 30 29 3b 0a 20 20 20 20 72 65 74 75  d", 0);.    retu
1390: 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 7a 4d 61 73  rn 0;.  }.  zMas
13a0: 74 65 72 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74  ter = 0;.  sqlit
13b0: 65 53 65 74 53 74 72 69 6e 67 28 26 7a 4d 61 73  eSetString(&zMas
13c0: 74 65 72 2c 20 7a 4e 61 6d 65 2c 20 22 2f 22 20  ter, zName, "/" 
13d0: 4d 41 53 54 45 52 5f 4e 41 4d 45 20 22 2e 74 62  MASTER_NAME ".tb
13e0: 6c 22 2c 20 30 29 3b 0a 20 20 69 66 28 20 73 74  l", 0);.  if( st
13f0: 61 74 28 7a 4d 61 73 74 65 72 2c 20 26 73 74 61  at(zMaster, &sta
1400: 74 62 75 66 29 3d 3d 30 0a 20 20 20 26 26 20 61  tbuf)==0.   && a
1410: 63 63 65 73 73 28 7a 4d 61 73 74 65 72 2c 20 77  ccess(zMaster, w
1420: 72 69 74 65 46 6c 61 67 20 3f 20 28 57 5f 4f 4b  riteFlag ? (W_OK
1430: 7c 52 5f 4f 4b 29 20 3a 20 52 5f 4f 4b 29 21 3d  |R_OK) : R_OK)!=
1440: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 53  0 ){.    sqliteS
1450: 65 74 53 74 72 69 6e 67 28 70 7a 45 72 72 4d 73  etString(pzErrMs
1460: 67 2c 20 22 61 63 63 65 73 73 20 70 65 72 6d 69  g, "access permi
1470: 73 73 69 6f 6e 20 64 65 6e 69 65 64 20 66 6f 72  ssion denied for
1480: 20 22 2c 20 7a 4d 61 73 74 65 72 2c 20 30 29 3b   ", zMaster, 0);
1490: 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28  .    sqliteFree(
14a0: 7a 4d 61 73 74 65 72 29 3b 0a 20 20 20 20 72 65  zMaster);.    re
14b0: 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 73 71  turn 0;.  }.  sq
14c0: 6c 69 74 65 46 72 65 65 28 7a 4d 61 73 74 65 72  liteFree(zMaster
14d0: 29 3b 0a 20 20 70 4e 65 77 20 3d 20 73 71 6c 69  );.  pNew = sqli
14e0: 74 65 4d 61 6c 6c 6f 63 28 73 69 7a 65 6f 66 28  teMalloc(sizeof(
14f0: 44 62 62 65 29 20 2b 20 73 74 72 6c 65 6e 28 7a  Dbbe) + strlen(z
1500: 4e 61 6d 65 29 20 2b 20 31 29 3b 0a 20 20 69 66  Name) + 1);.  if
1510: 28 20 70 4e 65 77 3d 3d 30 20 29 7b 0a 20 20 20  ( pNew==0 ){.   
1520: 20 73 71 6c 69 74 65 53 65 74 53 74 72 69 6e 67   sqliteSetString
1530: 28 70 7a 45 72 72 4d 73 67 2c 20 22 6f 75 74 20  (pzErrMsg, "out 
1540: 6f 66 20 6d 65 6d 6f 72 79 22 2c 20 30 29 3b 0a  of memory", 0);.
1550: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20      return 0;.  
1560: 7d 0a 20 20 70 4e 65 77 2d 3e 7a 44 69 72 20 3d  }.  pNew->zDir =
1570: 20 28 63 68 61 72 2a 29 26 70 4e 65 77 5b 31 5d   (char*)&pNew[1]
1580: 3b 0a 20 20 73 74 72 63 70 79 28 70 4e 65 77 2d  ;.  strcpy(pNew-
1590: 3e 7a 44 69 72 2c 20 7a 4e 61 6d 65 29 3b 0a 20  >zDir, zName);. 
15a0: 20 70 4e 65 77 2d 3e 77 72 69 74 65 20 3d 20 77   pNew->write = w
15b0: 72 69 74 65 46 6c 61 67 3b 0a 20 20 70 4e 65 77  riteFlag;.  pNew
15c0: 2d 3e 70 4f 70 65 6e 20 3d 20 30 3b 0a 20 20 74  ->pOpen = 0;.  t
15d0: 69 6d 65 28 26 73 74 61 74 62 75 66 2e 73 74 5f  ime(&statbuf.st_
15e0: 63 74 69 6d 65 29 3b 0a 20 20 72 63 34 69 6e 69  ctime);.  rc4ini
15f0: 74 28 26 70 4e 65 77 2d 3e 72 63 34 2c 20 28 63  t(&pNew->rc4, (c
1600: 68 61 72 2a 29 26 73 74 61 74 62 75 66 2c 20 73  har*)&statbuf, s
1610: 69 7a 65 6f 66 28 73 74 61 74 62 75 66 29 29 3b  izeof(statbuf));
1620: 0a 20 20 72 65 74 75 72 6e 20 70 4e 65 77 3b 0a  .  return pNew;.
1630: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 6c 65 74  }../*.** Complet
1640: 65 6c 79 20 73 68 75 74 64 6f 77 6e 20 74 68 65  ely shutdown the
1650: 20 67 69 76 65 6e 20 64 61 74 61 62 61 73 65 2e   given database.
1660: 20 20 43 6c 6f 73 65 20 61 6c 6c 20 66 69 6c 65    Close all file
1670: 73 2e 20 20 46 72 65 65 20 61 6c 6c 20 6d 65 6d  s.  Free all mem
1680: 6f 72 79 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c  ory..*/.void sql
1690: 69 74 65 44 62 62 65 43 6c 6f 73 65 28 44 62 62  iteDbbeClose(Dbb
16a0: 65 20 2a 70 42 65 29 7b 0a 20 20 42 65 46 69 6c  e *pBe){.  BeFil
16b0: 65 20 2a 70 46 69 6c 65 2c 20 2a 70 4e 65 78 74  e *pFile, *pNext
16c0: 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72  ;.  int i;.  for
16d0: 28 70 46 69 6c 65 3d 70 42 65 2d 3e 70 4f 70 65  (pFile=pBe->pOpe
16e0: 6e 3b 20 70 46 69 6c 65 3b 20 70 46 69 6c 65 3d  n; pFile; pFile=
16f0: 70 4e 65 78 74 29 7b 0a 20 20 20 20 70 4e 65 78  pNext){.    pNex
1700: 74 20 3d 20 70 46 69 6c 65 2d 3e 70 4e 65 78 74  t = pFile->pNext
1710: 3b 0a 20 20 20 20 67 64 62 6d 5f 63 6c 6f 73 65  ;.    gdbm_close
1720: 28 70 46 69 6c 65 2d 3e 64 62 66 29 3b 0a 20 20  (pFile->dbf);.  
1730: 20 20 6d 65 6d 73 65 74 28 70 46 69 6c 65 2c 20    memset(pFile, 
1740: 30 2c 20 73 69 7a 65 6f 66 28 2a 70 46 69 6c 65  0, sizeof(*pFile
1750: 29 29 3b 20 20 20 0a 20 20 20 20 73 71 6c 69 74  ));   .    sqlit
1760: 65 46 72 65 65 28 70 46 69 6c 65 29 3b 0a 20 20  eFree(pFile);.  
1770: 7d 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 70  }.  for(i=0; i<p
1780: 42 65 2d 3e 6e 54 65 6d 70 3b 20 69 2b 2b 29 7b  Be->nTemp; i++){
1790: 0a 20 20 20 20 69 66 28 20 70 42 65 2d 3e 61 70  .    if( pBe->ap
17a0: 54 65 6d 70 5b 69 5d 21 3d 30 20 29 7b 0a 20 20  Temp[i]!=0 ){.  
17b0: 20 20 20 20 75 6e 6c 69 6e 6b 28 70 42 65 2d 3e      unlink(pBe->
17c0: 61 7a 54 65 6d 70 5b 69 5d 29 3b 0a 20 20 20 20  azTemp[i]);.    
17d0: 20 20 66 63 6c 6f 73 65 28 70 42 65 2d 3e 61 70    fclose(pBe->ap
17e0: 54 65 6d 70 5b 69 5d 29 3b 0a 20 20 20 20 20 20  Temp[i]);.      
17f0: 73 71 6c 69 74 65 46 72 65 65 28 70 42 65 2d 3e  sqliteFree(pBe->
1800: 61 7a 54 65 6d 70 5b 69 5d 29 3b 0a 20 20 20 20  azTemp[i]);.    
1810: 20 20 70 42 65 2d 3e 61 70 54 65 6d 70 5b 69 5d    pBe->apTemp[i]
1820: 20 3d 20 30 3b 0a 20 20 20 20 20 20 70 42 65 2d   = 0;.      pBe-
1830: 3e 61 7a 54 65 6d 70 5b 69 5d 20 3d 20 30 3b 0a  >azTemp[i] = 0;.
1840: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
1850: 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 46   }.  }.  sqliteF
1860: 72 65 65 28 70 42 65 2d 3e 61 7a 54 65 6d 70 29  ree(pBe->azTemp)
1870: 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 70  ;.  sqliteFree(p
1880: 42 65 2d 3e 61 70 54 65 6d 70 29 3b 0a 20 20 6d  Be->apTemp);.  m
1890: 65 6d 73 65 74 28 70 42 65 2c 20 30 2c 20 73 69  emset(pBe, 0, si
18a0: 7a 65 6f 66 28 2a 70 42 65 29 29 3b 0a 20 20 73  zeof(*pBe));.  s
18b0: 71 6c 69 74 65 46 72 65 65 28 70 42 65 29 3b 0a  qliteFree(pBe);.
18c0: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 72 61 6e 73 6c 61  }../*.** Transla
18d0: 74 65 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61  te the name of a
18e0: 20 74 61 62 6c 65 20 69 6e 74 6f 20 74 68 65 20   table into the 
18f0: 6e 61 6d 65 20 6f 66 20 61 20 66 69 6c 65 20 74  name of a file t
1900: 68 61 74 20 68 6f 6c 64 73 0a 2a 2a 20 74 68 61  hat holds.** tha
1910: 74 20 74 61 62 6c 65 2e 20 20 53 70 61 63 65 20  t table.  Space 
1920: 74 6f 20 68 6f 6c 64 20 74 68 65 20 66 69 6c 65  to hold the file
1930: 6e 61 6d 65 20 69 73 20 6f 62 74 61 69 6e 65 64  name is obtained
1940: 20 66 72 6f 6d 0a 2a 2a 20 73 71 6c 69 74 65 4d   from.** sqliteM
1950: 61 6c 6c 6f 63 28 29 20 61 6e 64 20 6d 75 73 74  alloc() and must
1960: 20 62 65 20 66 72 65 65 64 20 62 79 20 74 68 65   be freed by the
1970: 20 63 61 6c 6c 69 6e 67 20 66 75 6e 63 74 69 6f   calling functio
1980: 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68 61  n..*/.static cha
1990: 72 20 2a 73 71 6c 69 74 65 46 69 6c 65 4f 66 54  r *sqliteFileOfT
19a0: 61 62 6c 65 28 44 62 62 65 20 2a 70 42 65 2c 20  able(Dbbe *pBe, 
19b0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 61 62  const char *zTab
19c0: 6c 65 29 7b 0a 20 20 63 68 61 72 20 2a 7a 46 69  le){.  char *zFi
19d0: 6c 65 20 3d 20 30 3b 0a 20 20 69 6e 74 20 69 3b  le = 0;.  int i;
19e0: 0a 20 20 73 71 6c 69 74 65 53 65 74 53 74 72 69  .  sqliteSetStri
19f0: 6e 67 28 26 7a 46 69 6c 65 2c 20 70 42 65 2d 3e  ng(&zFile, pBe->
1a00: 7a 44 69 72 2c 20 22 2f 22 2c 20 7a 54 61 62 6c  zDir, "/", zTabl
1a10: 65 2c 20 22 2e 74 62 6c 22 2c 20 30 29 3b 0a 20  e, ".tbl", 0);. 
1a20: 20 69 66 28 20 7a 46 69 6c 65 3d 3d 30 20 29 20   if( zFile==0 ) 
1a30: 72 65 74 75 72 6e 20 30 3b 0a 20 20 66 6f 72 28  return 0;.  for(
1a40: 69 3d 73 74 72 6c 65 6e 28 70 42 65 2d 3e 7a 44  i=strlen(pBe->zD
1a50: 69 72 29 2b 31 3b 20 7a 46 69 6c 65 5b 69 5d 3b  ir)+1; zFile[i];
1a60: 20 69 2b 2b 29 7b 0a 20 20 20 20 69 6e 74 20 63   i++){.    int c
1a70: 20 3d 20 7a 46 69 6c 65 5b 69 5d 3b 0a 20 20 20   = zFile[i];.   
1a80: 20 69 66 28 20 69 73 75 70 70 65 72 28 63 29 20   if( isupper(c) 
1a90: 29 7b 0a 20 20 20 20 20 20 7a 46 69 6c 65 5b 69  ){.      zFile[i
1aa0: 5d 20 3d 20 74 6f 6c 6f 77 65 72 28 63 29 3b 0a  ] = tolower(c);.
1ab0: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 21 69      }else if( !i
1ac0: 73 61 6c 6e 75 6d 28 63 29 20 26 26 20 63 21 3d  salnum(c) && c!=
1ad0: 27 2d 27 20 26 26 20 63 21 3d 27 5f 27 20 26 26  '-' && c!='_' &&
1ae0: 20 63 21 3d 27 2e 27 20 29 7b 0a 20 20 20 20 20   c!='.' ){.     
1af0: 20 7a 46 69 6c 65 5b 69 5d 20 3d 20 27 2b 27 3b   zFile[i] = '+';
1b00: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74  .    }.  }.  ret
1b10: 75 72 6e 20 7a 46 69 6c 65 3b 0a 7d 0a 0a 2f 2a  urn zFile;.}../*
1b20: 0a 2a 2a 20 47 65 6e 65 72 61 74 65 20 61 20 72  .** Generate a r
1b30: 61 6e 64 6f 6d 20 66 69 6c 65 6e 61 6d 65 20 77  andom filename w
1b40: 69 74 68 20 74 68 65 20 67 69 76 65 6e 20 70 72  ith the given pr
1b50: 65 66 69 78 2e 0a 2a 2a 0a 2a 2a 20 56 65 72 79  efix..**.** Very
1b60: 20 72 61 6e 64 6f 6d 20 6e 61 6d 65 73 20 61 72   random names ar
1b70: 65 20 63 68 6f 73 65 6e 20 73 6f 20 74 68 61 74  e chosen so that
1b80: 20 74 68 65 20 63 68 61 6e 63 65 20 6f 66 20 61   the chance of a
1b90: 0a 2a 2a 20 63 6f 6c 6c 69 73 69 6f 6e 20 77 69  .** collision wi
1ba0: 74 68 20 61 6e 20 65 78 69 73 74 69 6e 67 20 66  th an existing f
1bb0: 69 6c 65 6e 61 6d 65 20 69 73 20 76 65 72 79 20  ilename is very 
1bc0: 76 65 72 79 20 73 6d 61 6c 6c 2e 0a 2a 2f 0a 73  very small..*/.s
1bd0: 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f  tatic void rando
1be0: 6d 4e 61 6d 65 28 73 74 72 75 63 74 20 72 63 34  mName(struct rc4
1bf0: 20 2a 70 52 63 34 2c 20 63 68 61 72 20 2a 7a 42   *pRc4, char *zB
1c00: 75 66 2c 20 63 68 61 72 20 2a 7a 50 72 65 66 69  uf, char *zPrefi
1c10: 78 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a  x){.  int i, j;.
1c20: 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63    static const c
1c30: 68 61 72 20 7a 52 61 6e 64 6f 6d 43 68 61 72 73  har zRandomChars
1c40: 5b 5d 20 3d 20 22 61 62 63 64 65 66 67 68 69 6a  [] = "abcdefghij
1c50: 6b 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a  klmnopqrstuvwxyz
1c60: 30 31 32 33 34 35 36 37 38 39 22 3b 0a 20 20 73  0123456789";.  s
1c70: 74 72 63 70 79 28 7a 42 75 66 2c 20 7a 50 72 65  trcpy(zBuf, zPre
1c80: 66 69 78 29 3b 0a 20 20 6a 20 3d 20 73 74 72 6c  fix);.  j = strl
1c90: 65 6e 28 7a 42 75 66 29 3b 0a 20 20 66 6f 72 28  en(zBuf);.  for(
1ca0: 69 3d 30 3b 20 69 3c 31 35 3b 20 69 2b 2b 29 7b  i=0; i<15; i++){
1cb0: 0a 20 20 20 20 69 6e 74 20 63 20 3d 20 72 63 34  .    int c = rc4
1cc0: 62 79 74 65 28 70 52 63 34 29 20 25 20 28 73 69  byte(pRc4) % (si
1cd0: 7a 65 6f 66 28 7a 52 61 6e 64 6f 6d 43 68 61 72  zeof(zRandomChar
1ce0: 73 29 20 2d 20 31 29 3b 0a 20 20 20 20 7a 42 75  s) - 1);.    zBu
1cf0: 66 5b 6a 2b 2b 5d 20 3d 20 7a 52 61 6e 64 6f 6d  f[j++] = zRandom
1d00: 43 68 61 72 73 5b 63 5d 3b 0a 20 20 7d 0a 20 20  Chars[c];.  }.  
1d10: 7a 42 75 66 5b 6a 5d 20 3d 20 30 3b 0a 7d 0a 0a  zBuf[j] = 0;.}..
1d20: 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 61 20 6e 65 77  /*.** Open a new
1d30: 20 74 61 62 6c 65 20 63 75 72 73 6f 72 2e 20 20   table cursor.  
1d40: 57 72 69 74 65 20 61 20 70 6f 69 6e 74 65 72 20  Write a pointer 
1d50: 74 6f 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e  to the correspon
1d60: 64 69 6e 67 0a 2a 2a 20 44 62 62 65 54 61 62 6c  ding.** DbbeTabl
1d70: 65 20 73 74 72 75 63 74 75 72 65 20 69 6e 74 6f  e structure into
1d80: 20 2a 70 70 54 61 62 6c 65 2e 20 20 52 65 74 75   *ppTable.  Retu
1d90: 72 6e 20 61 6e 20 69 6e 74 65 67 65 72 20 73 75  rn an integer su
1da0: 63 63 65 73 73 0a 2a 2a 20 63 6f 64 65 3a 0a 2a  ccess.** code:.*
1db0: 2a 0a 2a 2a 20 20 20 20 53 51 4c 49 54 45 5f 4f  *.**    SQLITE_O
1dc0: 4b 20 20 20 20 20 20 20 20 20 20 49 74 20 77 6f  K          It wo
1dd0: 72 6b 65 64 21 0a 2a 2a 0a 2a 2a 20 20 20 20 53  rked!.**.**    S
1de0: 51 4c 49 54 45 5f 4e 4f 4d 45 4d 20 20 20 20 20  QLITE_NOMEM     
1df0: 20 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29    sqliteMalloc()
1e00: 20 66 61 69 6c 65 64 0a 2a 2a 0a 2a 2a 20 20 20   failed.**.**   
1e10: 20 53 51 4c 49 54 45 5f 50 45 52 4d 20 20 20 20   SQLITE_PERM    
1e20: 20 20 20 20 41 74 74 65 6d 70 74 20 74 6f 20 61      Attempt to a
1e30: 63 63 65 73 73 20 61 20 66 69 6c 65 20 66 6f 72  ccess a file for
1e40: 20 77 68 69 63 68 20 66 69 6c 65 0a 2a 2a 20 20   which file.**  
1e50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1e60: 20 20 20 20 20 61 63 63 65 73 73 20 70 65 72 6d       access perm
1e70: 69 73 73 69 6f 6e 20 69 73 20 64 65 6e 69 65 64  ission is denied
1e80: 0a 2a 2a 0a 2a 2a 20 20 20 20 53 51 4c 49 54 45  .**.**    SQLITE
1e90: 5f 42 55 53 59 20 20 20 20 20 20 20 20 41 6e 6f  _BUSY        Ano
1ea0: 74 68 65 72 20 74 68 72 65 61 64 20 6f 72 20 70  ther thread or p
1eb0: 72 6f 63 65 73 73 20 69 73 20 61 6c 72 65 61 64  rocess is alread
1ec0: 79 20 75 73 69 6e 67 0a 2a 2a 20 20 20 20 20 20  y using.**      
1ed0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1ee0: 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69   the correspondi
1ef0: 6e 67 20 66 69 6c 65 20 61 6e 64 20 68 61 73 20  ng file and has 
1f00: 74 68 61 74 20 66 69 6c 65 20 6c 6f 63 6b 65 64  that file locked
1f10: 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 53 51 4c 49 54  ..**.**    SQLIT
1f20: 45 5f 52 45 41 44 4f 4e 4c 59 20 20 20 20 54 68  E_READONLY    Th
1f30: 65 20 63 75 72 72 65 6e 74 20 74 68 72 65 61 64  e current thread
1f40: 20 61 6c 72 65 61 64 79 20 68 61 73 20 74 68 69   already has thi
1f50: 73 20 66 69 6c 65 20 6f 70 65 6e 0a 2a 2a 20 20  s file open.**  
1f60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1f70: 20 20 20 20 20 72 65 61 64 6f 6e 6c 79 20 62 75       readonly bu
1f80: 74 20 79 6f 75 20 61 72 65 20 74 72 79 69 6e 67  t you are trying
1f90: 20 74 6f 20 6f 70 65 6e 20 66 6f 72 20 77 72 69   to open for wri
1fa0: 74 69 6e 67 2e 0a 2a 2a 20 20 20 20 20 20 20 20  ting..**        
1fb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28                 (
1fc0: 54 68 69 73 20 63 61 6e 20 68 61 70 70 65 6e 20  This can happen 
1fd0: 69 66 20 61 20 53 45 4c 45 43 54 20 63 61 6c 6c  if a SELECT call
1fe0: 62 61 63 6b 20 74 72 69 65 73 20 74 6f 0a 2a 2a  back tries to.**
1ff0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
2000: 20 20 20 20 20 20 20 64 6f 20 61 6e 20 55 50 44         do an UPD
2010: 41 54 45 20 6f 72 20 44 45 4c 45 54 45 2e 29 0a  ATE or DELETE.).
2020: 2a 2a 0a 2a 2a 20 49 66 20 7a 54 61 62 6c 65 20  **.** If zTable 
2030: 69 73 20 30 20 6f 72 20 22 22 2c 20 74 68 65 6e  is 0 or "", then
2040: 20 61 20 74 65 6d 70 6f 72 61 72 79 20 74 61 62   a temporary tab
2050: 6c 65 20 69 73 20 63 72 65 61 74 65 64 20 61 6e  le is created an
2060: 64 20 6f 70 65 6e 65 64 2e 0a 2a 2a 20 54 68 69  d opened..** Thi
2070: 73 20 74 61 62 6c 65 20 77 69 6c 6c 20 62 65 20  s table will be 
2080: 64 65 6c 65 74 65 64 20 66 72 6f 6d 20 74 68 65  deleted from the
2090: 20 64 69 73 6b 20 77 68 65 6e 20 69 74 20 69 73   disk when it is
20a0: 20 63 6c 6f 73 65 64 2e 0a 2a 2f 0a 69 6e 74 20   closed..*/.int 
20b0: 73 71 6c 69 74 65 44 62 62 65 4f 70 65 6e 54 61  sqliteDbbeOpenTa
20c0: 62 6c 65 28 0a 20 20 44 62 62 65 20 2a 70 42 65  ble(.  Dbbe *pBe
20d0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f  ,              /
20e0: 2a 20 54 68 65 20 64 61 74 61 62 61 73 65 20 74  * The database t
20f0: 68 65 20 74 61 62 6c 65 20 62 65 6c 6f 6e 67 73  he table belongs
2100: 20 74 6f 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63   to */.  const c
2110: 68 61 72 20 2a 7a 54 61 62 6c 65 2c 20 20 20 20  har *zTable,    
2120: 20 2f 2a 20 54 68 65 20 6e 61 6d 65 20 6f 66 20   /* The name of 
2130: 74 68 65 20 74 61 62 6c 65 20 2a 2f 0a 20 20 69  the table */.  i
2140: 6e 74 20 77 72 69 74 65 61 62 6c 65 2c 20 20 20  nt writeable,   
2150: 20 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 74         /* True t
2160: 6f 20 6f 70 65 6e 20 66 6f 72 20 77 72 69 74 69  o open for writi
2170: 6e 67 20 2a 2f 0a 20 20 44 62 62 65 54 61 62 6c  ng */.  DbbeTabl
2180: 65 20 2a 2a 70 70 54 61 62 6c 65 20 20 20 20 20  e **ppTable     
2190: 2f 2a 20 57 72 69 74 65 20 74 68 65 20 72 65 73  /* Write the res
21a0: 75 6c 74 69 6e 67 20 74 61 62 6c 65 20 70 6f 69  ulting table poi
21b0: 6e 74 65 72 20 68 65 72 65 20 2a 2f 0a 29 7b 0a  nter here */.){.
21c0: 20 20 63 68 61 72 20 2a 7a 46 69 6c 65 3b 20 20    char *zFile;  
21d0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 61 6d            /* Nam
21e0: 65 20 6f 66 20 74 68 65 20 74 61 62 6c 65 20 66  e of the table f
21f0: 69 6c 65 20 2a 2f 0a 20 20 44 62 62 65 54 61 62  ile */.  DbbeTab
2200: 6c 65 20 2a 70 54 61 62 6c 65 3b 20 20 20 20 20  le *pTable;     
2210: 20 2f 2a 20 54 68 65 20 6e 65 77 20 74 61 62 6c   /* The new tabl
2220: 65 20 63 75 72 73 6f 72 20 2a 2f 0a 20 20 42 65  e cursor */.  Be
2230: 46 69 6c 65 20 2a 70 46 69 6c 65 3b 20 20 20 20  File *pFile;    
2240: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 75 6e 64        /* The und
2250: 65 72 6c 79 69 6e 67 20 64 61 74 61 20 66 69 6c  erlying data fil
2260: 65 20 66 6f 72 20 74 68 69 73 20 74 61 62 6c 65  e for this table
2270: 20 2a 2f 0a 20 20 69 6e 74 20 72 63 20 3d 20 53   */.  int rc = S
2280: 51 4c 49 54 45 5f 4f 4b 3b 20 20 20 20 20 2f 2a  QLITE_OK;     /*
2290: 20 52 65 74 75 72 6e 20 76 61 6c 75 65 20 2a 2f   Return value */
22a0: 0a 20 20 69 6e 74 20 72 77 5f 6d 61 73 6b 3b 20  .  int rw_mask; 
22b0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 50 65             /* Pe
22c0: 72 6d 69 73 73 69 6f 6e 73 20 6d 61 73 6b 20 66  rmissions mask f
22d0: 6f 72 20 6f 70 65 6e 69 6e 67 20 61 20 74 61 62  or opening a tab
22e0: 6c 65 20 2a 2f 0a 20 20 69 6e 74 20 6d 6f 64 65  le */.  int mode
22f0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ;               
2300: 2f 2a 20 4d 6f 64 65 20 66 6f 72 20 6f 70 65 6e  /* Mode for open
2310: 69 6e 67 20 61 20 74 61 62 6c 65 20 2a 2f 0a 0a  ing a table */..
2320: 20 20 2a 70 70 54 61 62 6c 65 20 3d 20 30 3b 0a    *ppTable = 0;.
2330: 20 20 70 54 61 62 6c 65 20 3d 20 73 71 6c 69 74    pTable = sqlit
2340: 65 4d 61 6c 6c 6f 63 28 20 73 69 7a 65 6f 66 28  eMalloc( sizeof(
2350: 2a 70 54 61 62 6c 65 29 20 29 3b 0a 20 20 69 66  *pTable) );.  if
2360: 28 20 70 54 61 62 6c 65 3d 3d 30 20 29 20 72 65  ( pTable==0 ) re
2370: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45  turn SQLITE_NOME
2380: 4d 3b 0a 20 20 69 66 28 20 7a 54 61 62 6c 65 20  M;.  if( zTable 
2390: 29 7b 0a 20 20 20 20 7a 46 69 6c 65 20 3d 20 73  ){.    zFile = s
23a0: 71 6c 69 74 65 46 69 6c 65 4f 66 54 61 62 6c 65  qliteFileOfTable
23b0: 28 70 42 65 2c 20 7a 54 61 62 6c 65 29 3b 0a 20  (pBe, zTable);. 
23c0: 20 20 20 66 6f 72 28 70 46 69 6c 65 3d 70 42 65     for(pFile=pBe
23d0: 2d 3e 70 4f 70 65 6e 3b 20 70 46 69 6c 65 3b 20  ->pOpen; pFile; 
23e0: 70 46 69 6c 65 3d 70 46 69 6c 65 2d 3e 70 4e 65  pFile=pFile->pNe
23f0: 78 74 29 7b 0a 20 20 20 20 20 20 69 66 28 20 73  xt){.      if( s
2400: 74 72 63 6d 70 28 70 46 69 6c 65 2d 3e 7a 4e 61  trcmp(pFile->zNa
2410: 6d 65 2c 7a 46 69 6c 65 29 3d 3d 30 20 29 20 62  me,zFile)==0 ) b
2420: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 65  reak;.    }.  }e
2430: 6c 73 65 7b 0a 20 20 20 20 70 46 69 6c 65 20 3d  lse{.    pFile =
2440: 20 30 3b 0a 20 20 20 20 7a 46 69 6c 65 20 3d 20   0;.    zFile = 
2450: 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 46 69  0;.  }.  if( pFi
2460: 6c 65 3d 3d 30 20 29 7b 0a 20 20 20 20 69 66 28  le==0 ){.    if(
2470: 20 77 72 69 74 65 61 62 6c 65 20 29 7b 0a 20 20   writeable ){.  
2480: 20 20 20 20 72 77 5f 6d 61 73 6b 20 3d 20 47 44      rw_mask = GD
2490: 42 4d 5f 57 52 43 52 45 41 54 20 7c 20 47 44 42  BM_WRCREAT | GDB
24a0: 4d 5f 46 41 53 54 3b 0a 20 20 20 20 20 20 6d 6f  M_FAST;.      mo
24b0: 64 65 20 3d 20 30 36 34 30 3b 0a 20 20 20 20 7d  de = 0640;.    }
24c0: 65 6c 73 65 7b 0a 20 20 20 20 20 20 72 77 5f 6d  else{.      rw_m
24d0: 61 73 6b 20 3d 20 47 44 42 4d 5f 52 45 41 44 45  ask = GDBM_READE
24e0: 52 3b 0a 20 20 20 20 20 20 6d 6f 64 65 20 3d 20  R;.      mode = 
24f0: 30 36 34 30 3b 0a 20 20 20 20 7d 0a 20 20 20 20  0640;.    }.    
2500: 70 46 69 6c 65 20 3d 20 73 71 6c 69 74 65 4d 61  pFile = sqliteMa
2510: 6c 6c 6f 63 28 20 73 69 7a 65 6f 66 28 2a 70 46  lloc( sizeof(*pF
2520: 69 6c 65 29 20 29 3b 0a 20 20 20 20 69 66 28 20  ile) );.    if( 
2530: 70 46 69 6c 65 3d 3d 30 20 29 7b 0a 20 20 20 20  pFile==0 ){.    
2540: 20 20 73 71 6c 69 74 65 46 72 65 65 28 7a 46 69    sqliteFree(zFi
2550: 6c 65 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72  le);.      retur
2560: 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a  n SQLITE_NOMEM;.
2570: 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 7a 46      }.    if( zF
2580: 69 6c 65 20 29 7b 0a 20 20 20 20 20 20 69 66 28  ile ){.      if(
2590: 20 21 77 72 69 74 65 61 62 6c 65 20 7c 7c 20 70   !writeable || p
25a0: 42 65 2d 3e 77 72 69 74 65 20 29 7b 0a 20 20 20  Be->write ){.   
25b0: 20 20 20 20 20 70 46 69 6c 65 2d 3e 64 62 66 20       pFile->dbf 
25c0: 3d 20 67 64 62 6d 5f 6f 70 65 6e 28 7a 46 69 6c  = gdbm_open(zFil
25d0: 65 2c 20 30 2c 20 72 77 5f 6d 61 73 6b 2c 20 6d  e, 0, rw_mask, m
25e0: 6f 64 65 2c 20 30 29 3b 0a 20 20 20 20 20 20 7d  ode, 0);.      }
25f0: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 70 46  else{.        pF
2600: 69 6c 65 2d 3e 64 62 66 20 3d 20 30 3b 0a 20 20  ile->dbf = 0;.  
2610: 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b      }.    }else{
2620: 0a 20 20 20 20 20 20 69 6e 74 20 6c 69 6d 69 74  .      int limit
2630: 3b 0a 20 20 20 20 20 20 73 74 72 75 63 74 20 72  ;.      struct r
2640: 63 34 20 2a 70 52 63 34 3b 0a 20 20 20 20 20 20  c4 *pRc4;.      
2650: 63 68 61 72 20 7a 52 61 6e 64 6f 6d 5b 35 30 5d  char zRandom[50]
2660: 3b 0a 20 20 20 20 20 20 70 52 63 34 20 3d 20 26  ;.      pRc4 = &
2670: 70 42 65 2d 3e 72 63 34 3b 0a 20 20 20 20 20 20  pBe->rc4;.      
2680: 7a 46 69 6c 65 20 3d 20 30 3b 0a 20 20 20 20 20  zFile = 0;.     
2690: 20 6c 69 6d 69 74 20 3d 20 35 3b 0a 20 20 20 20   limit = 5;.    
26a0: 20 20 64 6f 20 7b 0a 20 20 20 20 20 20 20 20 72    do {.        r
26b0: 61 6e 64 6f 6d 4e 61 6d 65 28 26 70 42 65 2d 3e  andomName(&pBe->
26c0: 72 63 34 2c 20 7a 52 61 6e 64 6f 6d 2c 20 22 5f  rc4, zRandom, "_
26d0: 74 65 6d 70 5f 74 61 62 6c 65 5f 22 29 3b 0a 20  temp_table_");. 
26e0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 46 72 65         sqliteFre
26f0: 65 28 7a 46 69 6c 65 29 3b 0a 20 20 20 20 20 20  e(zFile);.      
2700: 20 20 7a 46 69 6c 65 20 3d 20 73 71 6c 69 74 65    zFile = sqlite
2710: 46 69 6c 65 4f 66 54 61 62 6c 65 28 70 42 65 2c  FileOfTable(pBe,
2720: 20 7a 52 61 6e 64 6f 6d 29 3b 0a 20 20 20 20 20   zRandom);.     
2730: 20 20 20 70 46 69 6c 65 2d 3e 64 62 66 20 3d 20     pFile->dbf = 
2740: 67 64 62 6d 5f 6f 70 65 6e 28 7a 46 69 6c 65 2c  gdbm_open(zFile,
2750: 20 30 2c 20 72 77 5f 6d 61 73 6b 2c 20 6d 6f 64   0, rw_mask, mod
2760: 65 2c 20 30 29 3b 0a 20 20 20 20 20 20 7d 77 68  e, 0);.      }wh
2770: 69 6c 65 28 20 70 46 69 6c 65 2d 3e 64 62 66 3d  ile( pFile->dbf=
2780: 3d 30 20 26 26 20 6c 69 6d 69 74 2d 2d 20 3e 3d  =0 && limit-- >=
2790: 20 30 29 3b 0a 20 20 20 20 20 20 70 46 69 6c 65   0);.      pFile
27a0: 2d 3e 64 65 6c 4f 6e 43 6c 6f 73 65 20 3d 20 31  ->delOnClose = 1
27b0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70 46 69 6c  ;.    }.    pFil
27c0: 65 2d 3e 77 72 69 74 65 61 62 6c 65 20 3d 20 77  e->writeable = w
27d0: 72 69 74 65 61 62 6c 65 3b 0a 20 20 20 20 70 46  riteable;.    pF
27e0: 69 6c 65 2d 3e 7a 4e 61 6d 65 20 3d 20 7a 46 69  ile->zName = zFi
27f0: 6c 65 3b 0a 20 20 20 20 70 46 69 6c 65 2d 3e 6e  le;.    pFile->n
2800: 52 65 66 20 3d 20 31 3b 0a 20 20 20 20 70 46 69  Ref = 1;.    pFi
2810: 6c 65 2d 3e 70 50 72 65 76 20 3d 20 30 3b 0a 20  le->pPrev = 0;. 
2820: 20 20 20 69 66 28 20 70 42 65 2d 3e 70 4f 70 65     if( pBe->pOpe
2830: 6e 20 29 7b 0a 20 20 20 20 20 20 70 42 65 2d 3e  n ){.      pBe->
2840: 70 4f 70 65 6e 2d 3e 70 50 72 65 76 20 3d 20 70  pOpen->pPrev = p
2850: 46 69 6c 65 3b 0a 20 20 20 20 7d 0a 20 20 20 20  File;.    }.    
2860: 70 46 69 6c 65 2d 3e 70 4e 65 78 74 20 3d 20 70  pFile->pNext = p
2870: 42 65 2d 3e 70 4f 70 65 6e 3b 0a 20 20 20 20 70  Be->pOpen;.    p
2880: 42 65 2d 3e 70 4f 70 65 6e 20 3d 20 70 46 69 6c  Be->pOpen = pFil
2890: 65 3b 0a 20 20 20 20 69 66 28 20 70 46 69 6c 65  e;.    if( pFile
28a0: 2d 3e 64 62 66 3d 3d 30 20 29 7b 0a 20 20 20 20  ->dbf==0 ){.    
28b0: 20 20 69 66 28 20 21 77 72 69 74 65 61 62 6c 65    if( !writeable
28c0: 20 26 26 20 61 63 63 65 73 73 28 7a 46 69 6c 65   && access(zFile
28d0: 2c 30 29 20 29 7b 0a 20 20 20 20 20 20 20 20 2f  ,0) ){.        /
28e0: 2a 20 54 72 79 69 6e 67 20 74 6f 20 72 65 61 64  * Trying to read
28f0: 20 61 20 6e 6f 6e 2d 65 78 69 73 74 61 6e 74 20   a non-existant 
2900: 66 69 6c 65 2e 20 20 54 68 69 73 20 69 73 20 4f  file.  This is O
2910: 4b 2e 20 20 41 6c 6c 20 74 68 65 0a 20 20 20 20  K.  All the.    
2920: 20 20 20 20 2a 2a 20 72 65 61 64 73 20 77 69 6c      ** reads wil
2930: 6c 20 72 65 74 75 72 6e 20 65 6d 70 74 79 2c 20  l return empty, 
2940: 77 68 69 63 68 20 69 73 20 77 68 61 74 20 77 65  which is what we
2950: 20 77 61 6e 74 2e 20 2a 2f 0a 20 20 20 20 20 20   want. */.      
2960: 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b    rc = SQLITE_OK
2970: 3b 20 20 20 0a 20 20 20 20 20 20 7d 65 6c 73 65  ;   .      }else
2980: 20 69 66 28 20 61 63 63 65 73 73 28 7a 46 69 6c   if( access(zFil
2990: 65 2c 57 5f 4f 4b 7c 52 5f 4f 4b 29 20 29 7b 0a  e,W_OK|R_OK) ){.
29a0: 20 20 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c          rc = SQL
29b0: 49 54 45 5f 50 45 52 4d 3b 0a 20 20 20 20 20 20  ITE_PERM;.      
29c0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 72  }else{.        r
29d0: 63 20 3d 20 53 51 4c 49 54 45 5f 42 55 53 59 3b  c = SQLITE_BUSY;
29e0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20  .      }.    }. 
29f0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69   }else{.    sqli
2a00: 74 65 46 72 65 65 28 7a 46 69 6c 65 29 3b 0a 20  teFree(zFile);. 
2a10: 20 20 20 70 46 69 6c 65 2d 3e 6e 52 65 66 2b 2b     pFile->nRef++
2a20: 3b 0a 20 20 20 20 69 66 28 20 77 72 69 74 65 61  ;.    if( writea
2a30: 62 6c 65 20 26 26 20 21 70 46 69 6c 65 2d 3e 77  ble && !pFile->w
2a40: 72 69 74 65 61 62 6c 65 20 29 7b 0a 20 20 20 20  riteable ){.    
2a50: 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 52 45    rc = SQLITE_RE
2a60: 41 44 4f 4e 4c 59 3b 0a 20 20 20 20 7d 0a 20 20  ADONLY;.    }.  
2a70: 7d 0a 20 20 70 54 61 62 6c 65 2d 3e 70 42 65 20  }.  pTable->pBe 
2a80: 3d 20 70 42 65 3b 0a 20 20 70 54 61 62 6c 65 2d  = pBe;.  pTable-
2a90: 3e 70 46 69 6c 65 20 3d 20 70 46 69 6c 65 3b 0a  >pFile = pFile;.
2aa0: 20 20 70 54 61 62 6c 65 2d 3e 72 65 61 64 50 65    pTable->readPe
2ab0: 6e 64 69 6e 67 20 3d 20 30 3b 0a 20 20 70 54 61  nding = 0;.  pTa
2ac0: 62 6c 65 2d 3e 6e 65 65 64 52 65 77 69 6e 64 20  ble->needRewind 
2ad0: 3d 20 31 3b 0a 20 20 2a 70 70 54 61 62 6c 65 20  = 1;.  *ppTable 
2ae0: 3d 20 70 54 61 62 6c 65 3b 0a 20 20 72 65 74 75  = pTable;.  retu
2af0: 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  rn rc;.}../*.** 
2b00: 44 72 6f 70 20 61 20 74 61 62 6c 65 20 66 72 6f  Drop a table fro
2b10: 6d 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20  m the database. 
2b20: 20 54 68 65 20 66 69 6c 65 20 6f 6e 20 74 68 65   The file on the
2b30: 20 64 69 73 6b 20 74 68 61 74 20 63 6f 72 72 65   disk that corre
2b40: 73 70 6f 6e 64 73 0a 2a 2a 20 74 6f 20 74 68 69  sponds.** to thi
2b50: 73 20 74 61 62 6c 65 20 69 73 20 64 65 6c 65 74  s table is delet
2b60: 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69  ed..*/.void sqli
2b70: 74 65 44 62 62 65 44 72 6f 70 54 61 62 6c 65 28  teDbbeDropTable(
2b80: 44 62 62 65 20 2a 70 42 65 2c 20 63 6f 6e 73 74  Dbbe *pBe, const
2b90: 20 63 68 61 72 20 2a 7a 54 61 62 6c 65 29 7b 0a   char *zTable){.
2ba0: 20 20 63 68 61 72 20 2a 7a 46 69 6c 65 3b 20 20    char *zFile;  
2bb0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 61 6d            /* Nam
2bc0: 65 20 6f 66 20 74 68 65 20 74 61 62 6c 65 20 66  e of the table f
2bd0: 69 6c 65 20 2a 2f 0a 0a 20 20 7a 46 69 6c 65 20  ile */..  zFile 
2be0: 3d 20 73 71 6c 69 74 65 46 69 6c 65 4f 66 54 61  = sqliteFileOfTa
2bf0: 62 6c 65 28 70 42 65 2c 20 7a 54 61 62 6c 65 29  ble(pBe, zTable)
2c00: 3b 0a 20 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65  ;.  unlink(zFile
2c10: 29 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28  );.  sqliteFree(
2c20: 7a 46 69 6c 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  zFile);.}../*.**
2c30: 20 52 65 6f 72 67 61 6e 69 7a 65 20 61 20 74 61   Reorganize a ta
2c40: 62 6c 65 20 74 6f 20 72 65 64 75 63 65 20 73 65  ble to reduce se
2c50: 61 72 63 68 20 74 69 6d 65 73 20 61 6e 64 20 64  arch times and d
2c60: 69 73 6b 20 75 73 61 67 65 2e 0a 2a 2f 0a 76 6f  isk usage..*/.vo
2c70: 69 64 20 73 71 6c 69 74 65 44 62 62 65 52 65 6f  id sqliteDbbeReo
2c80: 72 67 61 6e 69 7a 65 54 61 62 6c 65 28 44 62 62  rganizeTable(Dbb
2c90: 65 20 2a 70 42 65 2c 20 63 6f 6e 73 74 20 63 68  e *pBe, const ch
2ca0: 61 72 20 2a 7a 54 61 62 6c 65 29 7b 0a 20 20 44  ar *zTable){.  D
2cb0: 62 62 65 54 61 62 6c 65 20 2a 70 54 61 62 3b 0a  bbeTable *pTab;.
2cc0: 0a 20 20 69 66 28 20 73 71 6c 69 74 65 44 62 62  .  if( sqliteDbb
2cd0: 65 4f 70 65 6e 54 61 62 6c 65 28 70 42 65 2c 20  eOpenTable(pBe, 
2ce0: 7a 54 61 62 6c 65 2c 20 31 2c 20 26 70 54 61 62  zTable, 1, &pTab
2cf0: 29 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a  )!=SQLITE_OK ){.
2d00: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
2d10: 20 20 69 66 28 20 70 54 61 62 20 26 26 20 70 54    if( pTab && pT
2d20: 61 62 2d 3e 70 46 69 6c 65 20 26 26 20 70 54 61  ab->pFile && pTa
2d30: 62 2d 3e 70 46 69 6c 65 2d 3e 64 62 66 20 29 7b  b->pFile->dbf ){
2d40: 0a 20 20 20 20 67 64 62 6d 5f 72 65 6f 72 67 61  .    gdbm_reorga
2d50: 6e 69 7a 65 28 70 54 61 62 2d 3e 70 46 69 6c 65  nize(pTab->pFile
2d60: 2d 3e 64 62 66 29 3b 0a 20 20 7d 0a 20 20 69 66  ->dbf);.  }.  if
2d70: 28 20 70 54 61 62 20 29 7b 0a 20 20 20 20 73 71  ( pTab ){.    sq
2d80: 6c 69 74 65 44 62 62 65 43 6c 6f 73 65 54 61 62  liteDbbeCloseTab
2d90: 6c 65 28 70 54 61 62 29 3b 0a 20 20 7d 0a 7d 0a  le(pTab);.  }.}.
2da0: 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20 61 20 74  ./*.** Close a t
2db0: 61 62 6c 65 20 70 72 65 76 69 6f 75 73 6c 79 20  able previously 
2dc0: 6f 70 65 6e 65 64 20 62 79 20 73 71 6c 69 74 65  opened by sqlite
2dd0: 44 62 62 65 4f 70 65 6e 54 61 62 6c 65 28 29 2e  DbbeOpenTable().
2de0: 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 44  .*/.void sqliteD
2df0: 62 62 65 43 6c 6f 73 65 54 61 62 6c 65 28 44 62  bbeCloseTable(Db
2e00: 62 65 54 61 62 6c 65 20 2a 70 54 61 62 6c 65 29  beTable *pTable)
2e10: 7b 0a 20 20 42 65 46 69 6c 65 20 2a 70 46 69 6c  {.  BeFile *pFil
2e20: 65 3b 0a 20 20 44 62 62 65 20 2a 70 42 65 3b 0a  e;.  Dbbe *pBe;.
2e30: 20 20 69 66 28 20 70 54 61 62 6c 65 3d 3d 30 20    if( pTable==0 
2e40: 29 20 72 65 74 75 72 6e 3b 0a 20 20 70 46 69 6c  ) return;.  pFil
2e50: 65 20 3d 20 70 54 61 62 6c 65 2d 3e 70 46 69 6c  e = pTable->pFil
2e60: 65 3b 0a 20 20 70 42 65 20 3d 20 70 54 61 62 6c  e;.  pBe = pTabl
2e70: 65 2d 3e 70 42 65 3b 0a 20 20 70 46 69 6c 65 2d  e->pBe;.  pFile-
2e80: 3e 6e 52 65 66 2d 2d 3b 0a 20 20 69 66 28 20 70  >nRef--;.  if( p
2e90: 46 69 6c 65 2d 3e 64 62 66 21 3d 4e 55 4c 4c 20  File->dbf!=NULL 
2ea0: 29 7b 0a 20 20 20 20 67 64 62 6d 5f 73 79 6e 63  ){.    gdbm_sync
2eb0: 28 70 46 69 6c 65 2d 3e 64 62 66 29 3b 0a 20 20  (pFile->dbf);.  
2ec0: 7d 0a 20 20 69 66 28 20 70 46 69 6c 65 2d 3e 6e  }.  if( pFile->n
2ed0: 52 65 66 3c 3d 30 20 29 7b 0a 20 20 20 20 69 66  Ref<=0 ){.    if
2ee0: 28 20 70 46 69 6c 65 2d 3e 64 62 66 21 3d 4e 55  ( pFile->dbf!=NU
2ef0: 4c 4c 20 29 7b 0a 20 20 20 20 20 20 67 64 62 6d  LL ){.      gdbm
2f00: 5f 63 6c 6f 73 65 28 70 46 69 6c 65 2d 3e 64 62  _close(pFile->db
2f10: 66 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66  f);.    }.    if
2f20: 28 20 70 46 69 6c 65 2d 3e 70 50 72 65 76 20 29  ( pFile->pPrev )
2f30: 7b 0a 20 20 20 20 20 20 70 46 69 6c 65 2d 3e 70  {.      pFile->p
2f40: 50 72 65 76 2d 3e 70 4e 65 78 74 20 3d 20 70 46  Prev->pNext = pF
2f50: 69 6c 65 2d 3e 70 4e 65 78 74 3b 0a 20 20 20 20  ile->pNext;.    
2f60: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 70 42 65  }else{.      pBe
2f70: 2d 3e 70 4f 70 65 6e 20 3d 20 70 46 69 6c 65 2d  ->pOpen = pFile-
2f80: 3e 70 4e 65 78 74 3b 0a 20 20 20 20 7d 0a 20 20  >pNext;.    }.  
2f90: 20 20 69 66 28 20 70 46 69 6c 65 2d 3e 70 4e 65    if( pFile->pNe
2fa0: 78 74 20 29 7b 0a 20 20 20 20 20 20 70 46 69 6c  xt ){.      pFil
2fb0: 65 2d 3e 70 4e 65 78 74 2d 3e 70 50 72 65 76 20  e->pNext->pPrev 
2fc0: 3d 20 70 46 69 6c 65 2d 3e 70 50 72 65 76 3b 0a  = pFile->pPrev;.
2fd0: 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 70 46      }.    if( pF
2fe0: 69 6c 65 2d 3e 64 65 6c 4f 6e 43 6c 6f 73 65 20  ile->delOnClose 
2ff0: 29 7b 0a 20 20 20 20 20 20 75 6e 6c 69 6e 6b 28  ){.      unlink(
3000: 70 46 69 6c 65 2d 3e 7a 4e 61 6d 65 29 3b 0a 20  pFile->zName);. 
3010: 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 46     }.    sqliteF
3020: 72 65 65 28 70 46 69 6c 65 2d 3e 7a 4e 61 6d 65  ree(pFile->zName
3030: 29 3b 0a 20 20 20 20 6d 65 6d 73 65 74 28 70 46  );.    memset(pF
3040: 69 6c 65 2c 20 30 2c 20 73 69 7a 65 6f 66 28 2a  ile, 0, sizeof(*
3050: 70 46 69 6c 65 29 29 3b 0a 20 20 20 20 73 71 6c  pFile));.    sql
3060: 69 74 65 46 72 65 65 28 70 46 69 6c 65 29 3b 0a  iteFree(pFile);.
3070: 20 20 7d 0a 20 20 69 66 28 20 70 54 61 62 6c 65    }.  if( pTable
3080: 2d 3e 6b 65 79 2e 64 70 74 72 20 29 20 66 72 65  ->key.dptr ) fre
3090: 65 28 70 54 61 62 6c 65 2d 3e 6b 65 79 2e 64 70  e(pTable->key.dp
30a0: 74 72 29 3b 0a 20 20 69 66 28 20 70 54 61 62 6c  tr);.  if( pTabl
30b0: 65 2d 3e 64 61 74 61 2e 64 70 74 72 20 29 20 66  e->data.dptr ) f
30c0: 72 65 65 28 70 54 61 62 6c 65 2d 3e 64 61 74 61  ree(pTable->data
30d0: 2e 64 70 74 72 29 3b 0a 20 20 6d 65 6d 73 65 74  .dptr);.  memset
30e0: 28 70 54 61 62 6c 65 2c 20 30 2c 20 73 69 7a 65  (pTable, 0, size
30f0: 6f 66 28 2a 70 54 61 62 6c 65 29 29 3b 0a 20 20  of(*pTable));.  
3100: 73 71 6c 69 74 65 46 72 65 65 28 70 54 61 62 6c  sqliteFree(pTabl
3110: 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 65  e);.}../*.** Cle
3120: 61 72 20 74 68 65 20 67 69 76 65 6e 20 64 61 74  ar the given dat
3130: 75 6d 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  um.*/.static voi
3140: 64 20 64 61 74 75 6d 43 6c 65 61 72 28 64 61 74  d datumClear(dat
3150: 75 6d 20 2a 70 29 7b 0a 20 20 69 66 28 20 70 2d  um *p){.  if( p-
3160: 3e 64 70 74 72 20 29 20 66 72 65 65 28 70 2d 3e  >dptr ) free(p->
3170: 64 70 74 72 29 3b 0a 20 20 70 2d 3e 64 70 74 72  dptr);.  p->dptr
3180: 20 3d 20 30 3b 0a 20 20 70 2d 3e 64 73 69 7a 65   = 0;.  p->dsize
3190: 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 46   = 0;.}../*.** F
31a0: 65 74 63 68 20 61 20 73 69 6e 67 6c 65 20 72 65  etch a single re
31b0: 63 6f 72 64 20 66 72 6f 6d 20 61 6e 20 6f 70 65  cord from an ope
31c0: 6e 20 74 61 62 6c 65 2e 20 20 52 65 74 75 72 6e  n table.  Return
31d0: 20 31 20 6f 6e 20 73 75 63 63 65 73 73 0a 2a 2a   1 on success.**
31e0: 20 61 6e 64 20 30 20 6f 6e 20 66 61 69 6c 75 72   and 0 on failur
31f0: 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  e..*/.int sqlite
3200: 44 62 62 65 46 65 74 63 68 28 44 62 62 65 54 61  DbbeFetch(DbbeTa
3210: 62 6c 65 20 2a 70 54 61 62 6c 65 2c 20 69 6e 74  ble *pTable, int
3220: 20 6e 4b 65 79 2c 20 63 68 61 72 20 2a 70 4b 65   nKey, char *pKe
3230: 79 29 7b 0a 20 20 64 61 74 75 6d 20 6b 65 79 3b  y){.  datum key;
3240: 0a 20 20 6b 65 79 2e 64 73 69 7a 65 20 3d 20 6e  .  key.dsize = n
3250: 4b 65 79 3b 0a 20 20 6b 65 79 2e 64 70 74 72 20  Key;.  key.dptr 
3260: 3d 20 70 4b 65 79 3b 0a 20 20 64 61 74 75 6d 43  = pKey;.  datumC
3270: 6c 65 61 72 28 26 70 54 61 62 6c 65 2d 3e 6b 65  lear(&pTable->ke
3280: 79 29 3b 0a 20 20 64 61 74 75 6d 43 6c 65 61 72  y);.  datumClear
3290: 28 26 70 54 61 62 6c 65 2d 3e 64 61 74 61 29 3b  (&pTable->data);
32a0: 0a 20 20 69 66 28 20 70 54 61 62 6c 65 2d 3e 70  .  if( pTable->p
32b0: 46 69 6c 65 20 26 26 20 70 54 61 62 6c 65 2d 3e  File && pTable->
32c0: 70 46 69 6c 65 2d 3e 64 62 66 20 29 7b 0a 20 20  pFile->dbf ){.  
32d0: 20 20 70 54 61 62 6c 65 2d 3e 64 61 74 61 20 3d    pTable->data =
32e0: 20 67 64 62 6d 5f 66 65 74 63 68 28 70 54 61 62   gdbm_fetch(pTab
32f0: 6c 65 2d 3e 70 46 69 6c 65 2d 3e 64 62 66 2c 20  le->pFile->dbf, 
3300: 6b 65 79 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75  key);.  }.  retu
3310: 72 6e 20 70 54 61 62 6c 65 2d 3e 64 61 74 61 2e  rn pTable->data.
3320: 64 70 74 72 21 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a  dptr!=0;.}../*.*
3330: 2a 20 52 65 74 75 72 6e 20 31 20 69 66 20 74 68  * Return 1 if th
3340: 65 20 67 69 76 65 6e 20 6b 65 79 20 69 73 20 61  e given key is a
3350: 6c 72 65 61 64 79 20 69 6e 20 74 68 65 20 74 61  lready in the ta
3360: 62 6c 65 2e 20 20 52 65 74 75 72 6e 20 30 0a 2a  ble.  Return 0.*
3370: 2a 20 69 66 20 69 74 20 69 73 20 6e 6f 74 2e 0a  * if it is not..
3380: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 44 62 62  */.int sqliteDbb
3390: 65 54 65 73 74 28 44 62 62 65 54 61 62 6c 65 20  eTest(DbbeTable 
33a0: 2a 70 54 61 62 6c 65 2c 20 69 6e 74 20 6e 4b 65  *pTable, int nKe
33b0: 79 2c 20 63 68 61 72 20 2a 70 4b 65 79 29 7b 0a  y, char *pKey){.
33c0: 20 20 64 61 74 75 6d 20 6b 65 79 3b 0a 20 20 69    datum key;.  i
33d0: 6e 74 20 72 65 73 75 6c 74 20 3d 20 30 3b 0a 20  nt result = 0;. 
33e0: 20 6b 65 79 2e 64 73 69 7a 65 20 3d 20 6e 4b 65   key.dsize = nKe
33f0: 79 3b 0a 20 20 6b 65 79 2e 64 70 74 72 20 3d 20  y;.  key.dptr = 
3400: 70 4b 65 79 3b 0a 20 20 69 66 28 20 70 54 61 62  pKey;.  if( pTab
3410: 6c 65 2d 3e 70 46 69 6c 65 20 26 26 20 70 54 61  le->pFile && pTa
3420: 62 6c 65 2d 3e 70 46 69 6c 65 2d 3e 64 62 66 20  ble->pFile->dbf 
3430: 29 7b 0a 20 20 20 20 72 65 73 75 6c 74 20 3d 20  ){.    result = 
3440: 67 64 62 6d 5f 65 78 69 73 74 73 28 70 54 61 62  gdbm_exists(pTab
3450: 6c 65 2d 3e 70 46 69 6c 65 2d 3e 64 62 66 2c 20  le->pFile->dbf, 
3460: 6b 65 79 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75  key);.  }.  retu
3470: 72 6e 20 72 65 73 75 6c 74 3b 0a 7d 0a 0a 2f 2a  rn result;.}../*
3480: 0a 2a 2a 20 43 6f 70 79 20 62 79 74 65 73 20 66  .** Copy bytes f
3490: 72 6f 6d 20 74 68 65 20 63 75 72 72 65 6e 74 20  rom the current 
34a0: 6b 65 79 20 6f 72 20 64 61 74 61 20 69 6e 74 6f  key or data into
34b0: 20 61 20 62 75 66 66 65 72 20 73 75 70 70 6c 69   a buffer suppli
34c0: 65 64 20 62 79 0a 2a 2a 20 74 68 65 20 63 61 6c  ed by.** the cal
34d0: 6c 69 6e 67 20 66 75 6e 63 74 69 6f 6e 2e 20 20  ling function.  
34e0: 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65  Return the numbe
34f0: 72 20 6f 66 20 62 79 74 65 73 20 63 6f 70 69 65  r of bytes copie
3500: 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  d..*/.int sqlite
3510: 44 62 62 65 43 6f 70 79 4b 65 79 28 44 62 62 65  DbbeCopyKey(Dbbe
3520: 54 61 62 6c 65 20 2a 70 54 61 62 6c 65 2c 20 69  Table *pTable, i
3530: 6e 74 20 6f 66 66 73 65 74 2c 20 69 6e 74 20 73  nt offset, int s
3540: 69 7a 65 2c 20 63 68 61 72 20 2a 7a 42 75 66 29  ize, char *zBuf)
3550: 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 69 66 28  {.  int n;.  if(
3560: 20 6f 66 66 73 65 74 3e 3d 70 54 61 62 6c 65 2d   offset>=pTable-
3570: 3e 6b 65 79 2e 64 73 69 7a 65 20 29 20 72 65 74  >key.dsize ) ret
3580: 75 72 6e 20 30 3b 0a 20 20 69 66 28 20 6f 66 66  urn 0;.  if( off
3590: 73 65 74 2b 73 69 7a 65 3e 70 54 61 62 6c 65 2d  set+size>pTable-
35a0: 3e 6b 65 79 2e 64 73 69 7a 65 20 29 7b 0a 20 20  >key.dsize ){.  
35b0: 20 20 6e 20 3d 20 70 54 61 62 6c 65 2d 3e 6b 65    n = pTable->ke
35c0: 79 2e 64 73 69 7a 65 20 2d 20 6f 66 66 73 65 74  y.dsize - offset
35d0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 6e  ;.  }else{.    n
35e0: 20 3d 20 73 69 7a 65 3b 0a 20 20 7d 0a 20 20 6d   = size;.  }.  m
35f0: 65 6d 63 70 79 28 7a 42 75 66 2c 20 26 70 54 61  emcpy(zBuf, &pTa
3600: 62 6c 65 2d 3e 6b 65 79 2e 64 70 74 72 5b 6f 66  ble->key.dptr[of
3610: 66 73 65 74 5d 2c 20 6e 29 3b 0a 20 20 72 65 74  fset], n);.  ret
3620: 75 72 6e 20 6e 3b 0a 7d 0a 69 6e 74 20 73 71 6c  urn n;.}.int sql
3630: 69 74 65 44 62 62 65 43 6f 70 79 44 61 74 61 28  iteDbbeCopyData(
3640: 44 62 62 65 54 61 62 6c 65 20 2a 70 54 61 62 6c  DbbeTable *pTabl
3650: 65 2c 20 69 6e 74 20 6f 66 66 73 65 74 2c 20 69  e, int offset, i
3660: 6e 74 20 73 69 7a 65 2c 20 63 68 61 72 20 2a 7a  nt size, char *z
3670: 42 75 66 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20  Buf){.  int n;. 
3680: 20 69 66 28 20 70 54 61 62 6c 65 2d 3e 72 65 61   if( pTable->rea
3690: 64 50 65 6e 64 69 6e 67 20 26 26 20 70 54 61 62  dPending && pTab
36a0: 6c 65 2d 3e 70 46 69 6c 65 20 26 26 20 70 54 61  le->pFile && pTa
36b0: 62 6c 65 2d 3e 70 46 69 6c 65 2d 3e 64 62 66 20  ble->pFile->dbf 
36c0: 29 7b 0a 20 20 20 20 70 54 61 62 6c 65 2d 3e 64  ){.    pTable->d
36d0: 61 74 61 20 3d 20 67 64 62 6d 5f 66 65 74 63 68  ata = gdbm_fetch
36e0: 28 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65 2d 3e  (pTable->pFile->
36f0: 64 62 66 2c 20 70 54 61 62 6c 65 2d 3e 6b 65 79  dbf, pTable->key
3700: 29 3b 0a 20 20 20 20 70 54 61 62 6c 65 2d 3e 72  );.    pTable->r
3710: 65 61 64 50 65 6e 64 69 6e 67 20 3d 20 30 3b 0a  eadPending = 0;.
3720: 20 20 7d 0a 20 20 69 66 28 20 6f 66 66 73 65 74    }.  if( offset
3730: 3e 3d 70 54 61 62 6c 65 2d 3e 64 61 74 61 2e 64  >=pTable->data.d
3740: 73 69 7a 65 20 29 20 72 65 74 75 72 6e 20 30 3b  size ) return 0;
3750: 0a 20 20 69 66 28 20 6f 66 66 73 65 74 2b 73 69  .  if( offset+si
3760: 7a 65 3e 70 54 61 62 6c 65 2d 3e 64 61 74 61 2e  ze>pTable->data.
3770: 64 73 69 7a 65 20 29 7b 0a 20 20 20 20 6e 20 3d  dsize ){.    n =
3780: 20 70 54 61 62 6c 65 2d 3e 64 61 74 61 2e 64 73   pTable->data.ds
3790: 69 7a 65 20 2d 20 6f 66 66 73 65 74 3b 0a 20 20  ize - offset;.  
37a0: 7d 65 6c 73 65 7b 0a 20 20 20 20 6e 20 3d 20 73  }else{.    n = s
37b0: 69 7a 65 3b 0a 20 20 7d 0a 20 20 6d 65 6d 63 70  ize;.  }.  memcp
37c0: 79 28 7a 42 75 66 2c 20 26 70 54 61 62 6c 65 2d  y(zBuf, &pTable-
37d0: 3e 64 61 74 61 2e 64 70 74 72 5b 6f 66 66 73 65  >data.dptr[offse
37e0: 74 5d 2c 20 6e 29 3b 0a 20 20 72 65 74 75 72 6e  t], n);.  return
37f0: 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74   n;.}../*.** Ret
3800: 75 72 6e 20 61 20 70 6f 69 6e 74 65 72 20 74 6f  urn a pointer to
3810: 20 62 79 74 65 73 20 66 72 6f 6d 20 74 68 65 20   bytes from the 
3820: 6b 65 79 20 6f 72 20 64 61 74 61 2e 20 20 54 68  key or data.  Th
3830: 65 20 64 61 74 61 20 72 65 74 75 72 6e 65 64 0a  e data returned.
3840: 2a 2a 20 69 73 20 65 70 68 65 6d 65 72 61 6c 2e  ** is ephemeral.
3850: 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c 69 74 65  .*/.char *sqlite
3860: 44 62 62 65 52 65 61 64 4b 65 79 28 44 62 62 65  DbbeReadKey(Dbbe
3870: 54 61 62 6c 65 20 2a 70 54 61 62 6c 65 2c 20 69  Table *pTable, i
3880: 6e 74 20 6f 66 66 73 65 74 29 7b 0a 20 20 69 66  nt offset){.  if
3890: 28 20 6f 66 66 73 65 74 3c 30 20 7c 7c 20 6f 66  ( offset<0 || of
38a0: 66 73 65 74 3e 3d 70 54 61 62 6c 65 2d 3e 6b 65  fset>=pTable->ke
38b0: 79 2e 64 73 69 7a 65 20 29 20 72 65 74 75 72 6e  y.dsize ) return
38c0: 20 22 22 3b 0a 20 20 72 65 74 75 72 6e 20 26 70   "";.  return &p
38d0: 54 61 62 6c 65 2d 3e 6b 65 79 2e 64 70 74 72 5b  Table->key.dptr[
38e0: 6f 66 66 73 65 74 5d 3b 0a 7d 0a 63 68 61 72 20  offset];.}.char 
38f0: 2a 73 71 6c 69 74 65 44 62 62 65 52 65 61 64 44  *sqliteDbbeReadD
3900: 61 74 61 28 44 62 62 65 54 61 62 6c 65 20 2a 70  ata(DbbeTable *p
3910: 54 61 62 6c 65 2c 20 69 6e 74 20 6f 66 66 73 65  Table, int offse
3920: 74 29 7b 0a 20 20 69 66 28 20 70 54 61 62 6c 65  t){.  if( pTable
3930: 2d 3e 72 65 61 64 50 65 6e 64 69 6e 67 20 26 26  ->readPending &&
3940: 20 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65 20 26   pTable->pFile &
3950: 26 20 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65 2d  & pTable->pFile-
3960: 3e 64 62 66 20 29 7b 0a 20 20 20 20 70 54 61 62  >dbf ){.    pTab
3970: 6c 65 2d 3e 64 61 74 61 20 3d 20 67 64 62 6d 5f  le->data = gdbm_
3980: 66 65 74 63 68 28 70 54 61 62 6c 65 2d 3e 70 46  fetch(pTable->pF
3990: 69 6c 65 2d 3e 64 62 66 2c 20 70 54 61 62 6c 65  ile->dbf, pTable
39a0: 2d 3e 6b 65 79 29 3b 0a 20 20 20 20 70 54 61 62  ->key);.    pTab
39b0: 6c 65 2d 3e 72 65 61 64 50 65 6e 64 69 6e 67 20  le->readPending 
39c0: 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6f  = 0;.  }.  if( o
39d0: 66 66 73 65 74 3c 30 20 7c 7c 20 6f 66 66 73 65  ffset<0 || offse
39e0: 74 3e 3d 70 54 61 62 6c 65 2d 3e 64 61 74 61 2e  t>=pTable->data.
39f0: 64 73 69 7a 65 20 29 20 72 65 74 75 72 6e 20 22  dsize ) return "
3a00: 22 3b 0a 20 20 72 65 74 75 72 6e 20 26 70 54 61  ";.  return &pTa
3a10: 62 6c 65 2d 3e 64 61 74 61 2e 64 70 74 72 5b 6f  ble->data.dptr[o
3a20: 66 66 73 65 74 5d 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  ffset];.}../*.**
3a30: 20 52 65 74 75 72 6e 20 74 68 65 20 74 6f 74 61   Return the tota
3a40: 6c 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65  l number of byte
3a50: 73 20 69 6e 20 65 69 74 68 65 72 20 64 61 74 61  s in either data
3a60: 20 6f 72 20 6b 65 79 2e 0a 2a 2f 0a 69 6e 74 20   or key..*/.int 
3a70: 73 71 6c 69 74 65 44 62 62 65 4b 65 79 4c 65 6e  sqliteDbbeKeyLen
3a80: 67 74 68 28 44 62 62 65 54 61 62 6c 65 20 2a 70  gth(DbbeTable *p
3a90: 54 61 62 6c 65 29 7b 0a 20 20 72 65 74 75 72 6e  Table){.  return
3aa0: 20 70 54 61 62 6c 65 2d 3e 6b 65 79 2e 64 73 69   pTable->key.dsi
3ab0: 7a 65 3b 0a 7d 0a 69 6e 74 20 73 71 6c 69 74 65  ze;.}.int sqlite
3ac0: 44 62 62 65 44 61 74 61 4c 65 6e 67 74 68 28 44  DbbeDataLength(D
3ad0: 62 62 65 54 61 62 6c 65 20 2a 70 54 61 62 6c 65  bbeTable *pTable
3ae0: 29 7b 0a 20 20 69 66 28 20 70 54 61 62 6c 65 2d  ){.  if( pTable-
3af0: 3e 72 65 61 64 50 65 6e 64 69 6e 67 20 26 26 20  >readPending && 
3b00: 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65 20 26 26  pTable->pFile &&
3b10: 20 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65 2d 3e   pTable->pFile->
3b20: 64 62 66 20 29 7b 0a 20 20 20 20 70 54 61 62 6c  dbf ){.    pTabl
3b30: 65 2d 3e 64 61 74 61 20 3d 20 67 64 62 6d 5f 66  e->data = gdbm_f
3b40: 65 74 63 68 28 70 54 61 62 6c 65 2d 3e 70 46 69  etch(pTable->pFi
3b50: 6c 65 2d 3e 64 62 66 2c 20 70 54 61 62 6c 65 2d  le->dbf, pTable-
3b60: 3e 6b 65 79 29 3b 0a 20 20 20 20 70 54 61 62 6c  >key);.    pTabl
3b70: 65 2d 3e 72 65 61 64 50 65 6e 64 69 6e 67 20 3d  e->readPending =
3b80: 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e   0;.  }.  return
3b90: 20 70 54 61 62 6c 65 2d 3e 64 61 74 61 2e 64 73   pTable->data.ds
3ba0: 69 7a 65 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61  ize;.}../*.** Ma
3bb0: 6b 65 20 69 73 20 73 6f 20 74 68 61 74 20 74 68  ke is so that th
3bc0: 65 20 6e 65 78 74 20 63 61 6c 6c 20 74 6f 20 73  e next call to s
3bd0: 71 6c 69 74 65 4e 65 78 74 4b 65 79 28 29 20 66  qliteNextKey() f
3be0: 69 6e 64 73 20 74 68 65 20 66 69 72 73 74 0a 2a  inds the first.*
3bf0: 2a 20 6b 65 79 20 6f 66 20 74 68 65 20 74 61 62  * key of the tab
3c00: 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  le..*/.int sqlit
3c10: 65 44 62 62 65 52 65 77 69 6e 64 28 44 62 62 65  eDbbeRewind(Dbbe
3c20: 54 61 62 6c 65 20 2a 70 54 61 62 6c 65 29 7b 0a  Table *pTable){.
3c30: 20 20 70 54 61 62 6c 65 2d 3e 6e 65 65 64 52 65    pTable->needRe
3c40: 77 69 6e 64 20 3d 20 31 3b 0a 20 20 72 65 74 75  wind = 1;.  retu
3c50: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a  rn SQLITE_OK;.}.
3c60: 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 74 68 65 20  ./*.** Read the 
3c70: 6e 65 78 74 20 6b 65 79 20 66 72 6f 6d 20 74 68  next key from th
3c80: 65 20 74 61 62 6c 65 2e 20 20 52 65 74 75 72 6e  e table.  Return
3c90: 20 31 20 6f 6e 20 73 75 63 63 65 73 73 2e 20 20   1 on success.  
3ca0: 52 65 74 75 72 6e 0a 2a 2a 20 30 20 69 66 20 74  Return.** 0 if t
3cb0: 68 65 72 65 20 61 72 65 20 6e 6f 20 6d 6f 72 65  here are no more
3cc0: 20 6b 65 79 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71   keys..*/.int sq
3cd0: 6c 69 74 65 44 62 62 65 4e 65 78 74 4b 65 79 28  liteDbbeNextKey(
3ce0: 44 62 62 65 54 61 62 6c 65 20 2a 70 54 61 62 6c  DbbeTable *pTabl
3cf0: 65 29 7b 0a 20 20 64 61 74 75 6d 20 6e 65 78 74  e){.  datum next
3d00: 6b 65 79 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20  key;.  int rc;. 
3d10: 20 69 66 28 20 70 54 61 62 6c 65 3d 3d 30 20 7c   if( pTable==0 |
3d20: 7c 20 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65 3d  | pTable->pFile=
3d30: 3d 30 20 7c 7c 20 70 54 61 62 6c 65 2d 3e 70 46  =0 || pTable->pF
3d40: 69 6c 65 2d 3e 64 62 66 3d 3d 30 20 29 7b 0a 20  ile->dbf==0 ){. 
3d50: 20 20 20 70 54 61 62 6c 65 2d 3e 72 65 61 64 50     pTable->readP
3d60: 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 20 20 20 20  ending = 0;.    
3d70: 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20  return 0;.  }.  
3d80: 69 66 28 20 70 54 61 62 6c 65 2d 3e 6e 65 65 64  if( pTable->need
3d90: 52 65 77 69 6e 64 20 29 7b 0a 20 20 20 20 6e 65  Rewind ){.    ne
3da0: 78 74 6b 65 79 20 3d 20 67 64 62 6d 5f 66 69 72  xtkey = gdbm_fir
3db0: 73 74 6b 65 79 28 70 54 61 62 6c 65 2d 3e 70 46  stkey(pTable->pF
3dc0: 69 6c 65 2d 3e 64 62 66 29 3b 0a 20 20 20 20 70  ile->dbf);.    p
3dd0: 54 61 62 6c 65 2d 3e 6e 65 65 64 52 65 77 69 6e  Table->needRewin
3de0: 64 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a  d = 0;.  }else{.
3df0: 20 20 20 20 6e 65 78 74 6b 65 79 20 3d 20 67 64      nextkey = gd
3e00: 62 6d 5f 6e 65 78 74 6b 65 79 28 70 54 61 62 6c  bm_nextkey(pTabl
3e10: 65 2d 3e 70 46 69 6c 65 2d 3e 64 62 66 2c 20 70  e->pFile->dbf, p
3e20: 54 61 62 6c 65 2d 3e 6b 65 79 29 3b 0a 20 20 7d  Table->key);.  }
3e30: 0a 20 20 64 61 74 75 6d 43 6c 65 61 72 28 26 70  .  datumClear(&p
3e40: 54 61 62 6c 65 2d 3e 6b 65 79 29 3b 0a 20 20 64  Table->key);.  d
3e50: 61 74 75 6d 43 6c 65 61 72 28 26 70 54 61 62 6c  atumClear(&pTabl
3e60: 65 2d 3e 64 61 74 61 29 3b 0a 20 20 70 54 61 62  e->data);.  pTab
3e70: 6c 65 2d 3e 6b 65 79 20 3d 20 6e 65 78 74 6b 65  le->key = nextke
3e80: 79 3b 0a 20 20 69 66 28 20 70 54 61 62 6c 65 2d  y;.  if( pTable-
3e90: 3e 6b 65 79 2e 64 70 74 72 20 29 7b 0a 20 20 20  >key.dptr ){.   
3ea0: 20 70 54 61 62 6c 65 2d 3e 72 65 61 64 50 65 6e   pTable->readPen
3eb0: 64 69 6e 67 20 3d 20 31 3b 0a 20 20 20 20 72 63  ding = 1;.    rc
3ec0: 20 3d 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20   = 1;.  }else{. 
3ed0: 20 20 20 70 54 61 62 6c 65 2d 3e 6e 65 65 64 52     pTable->needR
3ee0: 65 77 69 6e 64 20 3d 20 31 3b 0a 20 20 20 20 70  ewind = 1;.    p
3ef0: 54 61 62 6c 65 2d 3e 72 65 61 64 50 65 6e 64 69  Table->readPendi
3f00: 6e 67 20 3d 20 30 3b 0a 20 20 20 20 72 63 20 3d  ng = 0;.    rc =
3f10: 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e   0;.  }.  return
3f20: 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65   rc;.}../*.** Ge
3f30: 74 20 61 20 6e 65 77 20 69 6e 74 65 67 65 72 20  t a new integer 
3f40: 6b 65 79 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  key..*/.int sqli
3f50: 74 65 44 62 62 65 4e 65 77 28 44 62 62 65 54 61  teDbbeNew(DbbeTa
3f60: 62 6c 65 20 2a 70 54 61 62 6c 65 29 7b 0a 20 20  ble *pTable){.  
3f70: 69 6e 74 20 69 4b 65 79 3b 0a 20 20 64 61 74 75  int iKey;.  datu
3f80: 6d 20 6b 65 79 3b 0a 20 20 69 6e 74 20 67 6f 20  m key;.  int go 
3f90: 3d 20 31 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20  = 1;.  int i;.  
3fa0: 73 74 72 75 63 74 20 72 63 34 20 2a 70 52 63 34  struct rc4 *pRc4
3fb0: 3b 0a 0a 20 20 69 66 28 20 70 54 61 62 6c 65 2d  ;..  if( pTable-
3fc0: 3e 70 46 69 6c 65 3d 3d 30 20 7c 7c 20 70 54 61  >pFile==0 || pTa
3fd0: 62 6c 65 2d 3e 70 46 69 6c 65 2d 3e 64 62 66 3d  ble->pFile->dbf=
3fe0: 3d 30 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20  =0 ) return 1;. 
3ff0: 20 70 52 63 34 20 3d 20 26 70 54 61 62 6c 65 2d   pRc4 = &pTable-
4000: 3e 70 42 65 2d 3e 72 63 34 3b 0a 20 20 77 68 69  >pBe->rc4;.  whi
4010: 6c 65 28 20 67 6f 20 29 7b 0a 20 20 20 20 69 4b  le( go ){.    iK
4020: 65 79 20 3d 20 30 3b 0a 20 20 20 20 66 6f 72 28  ey = 0;.    for(
4030: 69 3d 30 3b 20 69 3c 34 3b 20 69 2b 2b 29 7b 0a  i=0; i<4; i++){.
4040: 20 20 20 20 20 20 69 4b 65 79 20 3d 20 28 69 4b        iKey = (iK
4050: 65 79 3c 3c 38 29 20 2b 20 72 63 34 62 79 74 65  ey<<8) + rc4byte
4060: 28 70 52 63 34 29 3b 0a 20 20 20 20 7d 0a 20 20  (pRc4);.    }.  
4070: 20 20 6b 65 79 2e 64 70 74 72 20 3d 20 28 63 68    key.dptr = (ch
4080: 61 72 2a 29 26 69 4b 65 79 3b 0a 20 20 20 20 6b  ar*)&iKey;.    k
4090: 65 79 2e 64 73 69 7a 65 20 3d 20 34 3b 0a 20 20  ey.dsize = 4;.  
40a0: 20 20 67 6f 20 3d 20 67 64 62 6d 5f 65 78 69 73    go = gdbm_exis
40b0: 74 73 28 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65  ts(pTable->pFile
40c0: 2d 3e 64 62 66 2c 20 6b 65 79 29 3b 0a 20 20 7d  ->dbf, key);.  }
40d0: 0a 20 20 72 65 74 75 72 6e 20 69 4b 65 79 3b 0a  .  return iKey;.
40e0: 7d 20 20 20 0a 0a 2f 2a 0a 2a 2a 20 57 72 69 74  }   ../*.** Writ
40f0: 65 20 61 6e 20 65 6e 74 72 79 20 69 6e 74 6f 20  e an entry into 
4100: 74 68 65 20 74 61 62 6c 65 2e 20 20 4f 76 65 72  the table.  Over
4110: 77 72 69 74 65 20 61 6e 79 20 70 72 69 6f 72 20  write any prior 
4120: 65 6e 74 72 79 20 77 69 74 68 20 74 68 65 0a 2a  entry with the.*
4130: 2a 20 73 61 6d 65 20 6b 65 79 2e 0a 2a 2f 0a 69  * same key..*/.i
4140: 6e 74 20 73 71 6c 69 74 65 44 62 62 65 50 75 74  nt sqliteDbbePut
4150: 28 44 62 62 65 54 61 62 6c 65 20 2a 70 54 61 62  (DbbeTable *pTab
4160: 6c 65 2c 20 69 6e 74 20 6e 4b 65 79 2c 63 68 61  le, int nKey,cha
4170: 72 20 2a 70 4b 65 79 2c 69 6e 74 20 6e 44 61 74  r *pKey,int nDat
4180: 61 2c 63 68 61 72 20 2a 70 44 61 74 61 29 7b 0a  a,char *pData){.
4190: 20 20 64 61 74 75 6d 20 64 61 74 61 2c 20 6b 65    datum data, ke
41a0: 79 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 69  y;.  int rc;.  i
41b0: 66 28 20 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65  f( pTable->pFile
41c0: 3d 3d 30 20 7c 7c 20 70 54 61 62 6c 65 2d 3e 70  ==0 || pTable->p
41d0: 46 69 6c 65 2d 3e 64 62 66 3d 3d 30 20 29 20 72  File->dbf==0 ) r
41e0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52  eturn SQLITE_ERR
41f0: 4f 52 3b 0a 20 20 64 61 74 61 2e 64 73 69 7a 65  OR;.  data.dsize
4200: 20 3d 20 6e 44 61 74 61 3b 0a 20 20 64 61 74 61   = nData;.  data
4210: 2e 64 70 74 72 20 3d 20 70 44 61 74 61 3b 0a 20  .dptr = pData;. 
4220: 20 6b 65 79 2e 64 73 69 7a 65 20 3d 20 6e 4b 65   key.dsize = nKe
4230: 79 3b 0a 20 20 6b 65 79 2e 64 70 74 72 20 3d 20  y;.  key.dptr = 
4240: 70 4b 65 79 3b 0a 20 20 72 63 20 3d 20 67 64 62  pKey;.  rc = gdb
4250: 6d 5f 73 74 6f 72 65 28 70 54 61 62 6c 65 2d 3e  m_store(pTable->
4260: 70 46 69 6c 65 2d 3e 64 62 66 2c 20 6b 65 79 2c  pFile->dbf, key,
4270: 20 64 61 74 61 2c 20 47 44 42 4d 5f 52 45 50 4c   data, GDBM_REPL
4280: 41 43 45 29 3b 0a 20 20 69 66 28 20 72 63 20 29  ACE);.  if( rc )
4290: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 45 52 52   rc = SQLITE_ERR
42a0: 4f 52 3b 0a 20 20 64 61 74 75 6d 43 6c 65 61 72  OR;.  datumClear
42b0: 28 26 70 54 61 62 6c 65 2d 3e 6b 65 79 29 3b 0a  (&pTable->key);.
42c0: 20 20 64 61 74 75 6d 43 6c 65 61 72 28 26 70 54    datumClear(&pT
42d0: 61 62 6c 65 2d 3e 64 61 74 61 29 3b 0a 20 20 72  able->data);.  r
42e0: 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a  eturn rc;.}../*.
42f0: 2a 2a 20 52 65 6d 6f 76 65 20 61 6e 20 65 6e 74  ** Remove an ent
4300: 72 79 20 66 72 6f 6d 20 61 20 74 61 62 6c 65 2c  ry from a table,
4310: 20 69 66 20 74 68 65 20 65 6e 74 72 79 20 65 78   if the entry ex
4320: 69 73 74 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  ists..*/.int sql
4330: 69 74 65 44 62 62 65 44 65 6c 65 74 65 28 44 62  iteDbbeDelete(Db
4340: 62 65 54 61 62 6c 65 20 2a 70 54 61 62 6c 65 2c  beTable *pTable,
4350: 20 69 6e 74 20 6e 4b 65 79 2c 20 63 68 61 72 20   int nKey, char 
4360: 2a 70 4b 65 79 29 7b 0a 20 20 64 61 74 75 6d 20  *pKey){.  datum 
4370: 6b 65 79 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20  key;.  int rc;. 
4380: 20 64 61 74 75 6d 43 6c 65 61 72 28 26 70 54 61   datumClear(&pTa
4390: 62 6c 65 2d 3e 6b 65 79 29 3b 0a 20 20 64 61 74  ble->key);.  dat
43a0: 75 6d 43 6c 65 61 72 28 26 70 54 61 62 6c 65 2d  umClear(&pTable-
43b0: 3e 64 61 74 61 29 3b 0a 20 20 69 66 28 20 70 54  >data);.  if( pT
43c0: 61 62 6c 65 2d 3e 70 46 69 6c 65 3d 3d 30 20 7c  able->pFile==0 |
43d0: 7c 20 70 54 61 62 6c 65 2d 3e 70 46 69 6c 65 2d  | pTable->pFile-
43e0: 3e 64 62 66 3d 3d 30 20 29 20 72 65 74 75 72 6e  >dbf==0 ) return
43f0: 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0a 20   SQLITE_ERROR;. 
4400: 20 6b 65 79 2e 64 73 69 7a 65 20 3d 20 6e 4b 65   key.dsize = nKe
4410: 79 3b 0a 20 20 6b 65 79 2e 64 70 74 72 20 3d 20  y;.  key.dptr = 
4420: 70 4b 65 79 3b 0a 20 20 72 63 20 3d 20 67 64 62  pKey;.  rc = gdb
4430: 6d 5f 64 65 6c 65 74 65 28 70 54 61 62 6c 65 2d  m_delete(pTable-
4440: 3e 70 46 69 6c 65 2d 3e 64 62 66 2c 20 6b 65 79  >pFile->dbf, key
4450: 29 3b 0a 20 20 69 66 28 20 72 63 20 29 20 72 63  );.  if( rc ) rc
4460: 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b   = SQLITE_ERROR;
4470: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.
4480: 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 61 20 74 65  ./*.** Open a te
4490: 6d 70 6f 72 61 72 79 20 66 69 6c 65 2e 20 20 54  mporary file.  T
44a0: 68 65 20 66 69 6c 65 20 73 68 6f 75 6c 64 20 62  he file should b
44b0: 65 20 64 65 6c 65 74 65 64 20 77 68 65 6e 20 63  e deleted when c
44c0: 6c 6f 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 4e 6f 74  losed..**.** Not
44d0: 65 20 74 68 61 74 20 77 65 20 63 61 6e 27 74 20  e that we can't 
44e0: 75 73 65 20 74 68 65 20 6f 6c 64 20 55 6e 69 78  use the old Unix
44f0: 20 74 72 69 63 6b 20 6f 66 20 6f 70 65 6e 69 6e   trick of openin
4500: 67 20 74 68 65 20 66 69 6c 65 0a 2a 2a 20 61 6e  g the file.** an
4510: 64 20 74 68 65 6e 20 69 6d 6d 65 64 69 61 74 65  d then immediate
4520: 6c 79 20 75 6e 6c 69 6e 6b 69 6e 67 20 74 68 65  ly unlinking the
4530: 20 66 69 6c 65 2e 20 20 54 68 61 74 20 77 6f 72   file.  That wor
4540: 6b 73 20 67 72 65 61 74 0a 2a 2a 20 75 6e 64 65  ks great.** unde
4550: 72 20 55 6e 69 78 2c 20 62 75 74 20 66 61 69 6c  r Unix, but fail
4560: 73 20 77 68 65 6e 20 77 65 20 74 72 79 20 74 6f  s when we try to
4570: 20 70 6f 72 74 20 74 6f 20 57 69 6e 64 6f 77 73   port to Windows
4580: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 44  ..*/.int sqliteD
4590: 62 62 65 4f 70 65 6e 54 65 6d 70 46 69 6c 65 28  bbeOpenTempFile(
45a0: 44 62 62 65 20 2a 70 42 65 2c 20 46 49 4c 45 20  Dbbe *pBe, FILE 
45b0: 2a 2a 70 70 46 69 6c 65 29 7b 0a 20 20 63 68 61  **ppFile){.  cha
45c0: 72 20 2a 7a 46 69 6c 65 3b 20 20 20 20 20 20 20  r *zFile;       
45d0: 20 20 2f 2a 20 46 75 6c 6c 20 6e 61 6d 65 20 6f    /* Full name o
45e0: 66 20 74 68 65 20 74 65 6d 70 6f 72 61 72 79 20  f the temporary 
45f0: 66 69 6c 65 20 2a 2f 0a 20 20 63 68 61 72 20 7a  file */.  char z
4600: 42 75 66 5b 35 30 5d 3b 20 20 20 20 20 20 20 2f  Buf[50];       /
4610: 2a 20 42 61 73 65 20 6e 61 6d 65 20 6f 66 20 74  * Base name of t
4620: 68 65 20 74 65 6d 70 6f 72 61 72 79 20 66 69 6c  he temporary fil
4630: 65 20 2a 2f 0a 20 20 69 6e 74 20 69 3b 20 20 20  e */.  int i;   
4640: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c              /* L
4650: 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a 2f 0a 20  oop counter */. 
4660: 20 69 6e 74 20 6c 69 6d 69 74 3b 20 20 20 20 20   int limit;     
4670: 20 20 20 20 20 20 2f 2a 20 50 72 65 76 65 6e 74        /* Prevent
4680: 20 61 6e 20 69 6e 66 69 6e 69 74 65 20 6c 6f 6f   an infinite loo
4690: 70 20 2a 2f 0a 20 20 69 6e 74 20 72 63 20 3d 20  p */.  int rc = 
46a0: 53 51 4c 49 54 45 5f 4f 4b 3b 20 20 2f 2a 20 56  SQLITE_OK;  /* V
46b0: 61 6c 75 65 20 72 65 74 75 72 6e 65 64 20 62 79  alue returned by
46c0: 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 2a   this function *
46d0: 2f 0a 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c  /..  for(i=0; i<
46e0: 70 42 65 2d 3e 6e 54 65 6d 70 3b 20 69 2b 2b 29  pBe->nTemp; i++)
46f0: 7b 0a 20 20 20 20 69 66 28 20 70 42 65 2d 3e 61  {.    if( pBe->a
4700: 70 54 65 6d 70 5b 69 5d 3d 3d 30 20 29 20 62 72  pTemp[i]==0 ) br
4710: 65 61 6b 3b 0a 20 20 7d 0a 20 20 69 66 28 20 69  eak;.  }.  if( i
4720: 3e 3d 70 42 65 2d 3e 6e 54 65 6d 70 20 29 7b 0a  >=pBe->nTemp ){.
4730: 20 20 20 20 70 42 65 2d 3e 6e 54 65 6d 70 2b 2b      pBe->nTemp++
4740: 3b 0a 20 20 20 20 70 42 65 2d 3e 61 70 54 65 6d  ;.    pBe->apTem
4750: 70 20 3d 20 73 71 6c 69 74 65 52 65 61 6c 6c 6f  p = sqliteReallo
4760: 63 28 70 42 65 2d 3e 61 70 54 65 6d 70 2c 20 70  c(pBe->apTemp, p
4770: 42 65 2d 3e 6e 54 65 6d 70 2a 73 69 7a 65 6f 66  Be->nTemp*sizeof
4780: 28 46 49 4c 45 2a 29 20 29 3b 0a 20 20 20 20 70  (FILE*) );.    p
4790: 42 65 2d 3e 61 7a 54 65 6d 70 20 3d 20 73 71 6c  Be->azTemp = sql
47a0: 69 74 65 52 65 61 6c 6c 6f 63 28 70 42 65 2d 3e  iteRealloc(pBe->
47b0: 61 7a 54 65 6d 70 2c 20 70 42 65 2d 3e 6e 54 65  azTemp, pBe->nTe
47c0: 6d 70 2a 73 69 7a 65 6f 66 28 63 68 61 72 2a 29  mp*sizeof(char*)
47d0: 20 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 42   );.  }.  if( pB
47e0: 65 2d 3e 61 70 54 65 6d 70 3d 3d 30 20 29 7b 0a  e->apTemp==0 ){.
47f0: 20 20 20 20 2a 70 70 46 69 6c 65 20 3d 20 30 3b      *ppFile = 0;
4800: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49  .    return SQLI
4810: 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20  TE_NOMEM;.  }.  
4820: 6c 69 6d 69 74 20 3d 20 34 3b 0a 20 20 7a 46 69  limit = 4;.  zFi
4830: 6c 65 20 3d 20 30 3b 0a 20 20 64 6f 7b 0a 20 20  le = 0;.  do{.  
4840: 20 20 72 61 6e 64 6f 6d 4e 61 6d 65 28 26 70 42    randomName(&pB
4850: 65 2d 3e 72 63 34 2c 20 7a 42 75 66 2c 20 22 2f  e->rc4, zBuf, "/
4860: 5f 74 65 6d 70 5f 66 69 6c 65 5f 22 29 3b 0a 20  _temp_file_");. 
4870: 20 20 20 73 71 6c 69 74 65 46 72 65 65 28 7a 46     sqliteFree(zF
4880: 69 6c 65 29 3b 0a 20 20 20 20 7a 46 69 6c 65 20  ile);.    zFile 
4890: 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 53  = 0;.    sqliteS
48a0: 65 74 53 74 72 69 6e 67 28 26 7a 46 69 6c 65 2c  etString(&zFile,
48b0: 20 70 42 65 2d 3e 7a 44 69 72 2c 20 7a 42 75 66   pBe->zDir, zBuf
48c0: 2c 20 30 29 3b 0a 20 20 7d 77 68 69 6c 65 28 20  , 0);.  }while( 
48d0: 61 63 63 65 73 73 28 7a 46 69 6c 65 2c 30 29 3d  access(zFile,0)=
48e0: 3d 30 20 26 26 20 6c 69 6d 69 74 2d 2d 20 3e 3d  =0 && limit-- >=
48f0: 20 30 20 29 3b 0a 20 20 2a 70 70 46 69 6c 65 20   0 );.  *ppFile 
4900: 3d 20 70 42 65 2d 3e 61 70 54 65 6d 70 5b 69 5d  = pBe->apTemp[i]
4910: 20 3d 20 66 6f 70 65 6e 28 7a 46 69 6c 65 2c 20   = fopen(zFile, 
4920: 22 77 2b 22 29 3b 0a 20 20 69 66 28 20 70 42 65  "w+");.  if( pBe
4930: 2d 3e 61 70 54 65 6d 70 5b 69 5d 3d 3d 30 20 29  ->apTemp[i]==0 )
4940: 7b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54  {.    rc = SQLIT
4950: 45 5f 45 52 52 4f 52 3b 0a 20 20 20 20 73 71 6c  E_ERROR;.    sql
4960: 69 74 65 46 72 65 65 28 7a 46 69 6c 65 29 3b 0a  iteFree(zFile);.
4970: 20 20 20 20 70 42 65 2d 3e 61 7a 54 65 6d 70 5b      pBe->azTemp[
4980: 69 5d 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b  i] = 0;.  }else{
4990: 0a 20 20 20 20 70 42 65 2d 3e 61 7a 54 65 6d 70  .    pBe->azTemp
49a0: 5b 69 5d 20 3d 20 7a 46 69 6c 65 3b 0a 20 20 7d  [i] = zFile;.  }
49b0: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.
49c0: 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20 61 20 74  ./*.** Close a t
49d0: 65 6d 70 6f 72 61 72 79 20 66 69 6c 65 20 6f 70  emporary file op
49e0: 65 6e 65 64 20 75 73 69 6e 67 20 73 71 6c 69 74  ened using sqlit
49f0: 65 44 62 62 65 4f 70 65 6e 54 65 6d 70 46 69 6c  eDbbeOpenTempFil
4a00: 65 28 29 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69  e().*/.void sqli
4a10: 74 65 44 62 62 65 43 6c 6f 73 65 54 65 6d 70 46  teDbbeCloseTempF
4a20: 69 6c 65 28 44 62 62 65 20 2a 70 42 65 2c 20 46  ile(Dbbe *pBe, F
4a30: 49 4c 45 20 2a 66 29 7b 0a 20 20 69 6e 74 20 69  ILE *f){.  int i
4a40: 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 70  ;.  for(i=0; i<p
4a50: 42 65 2d 3e 6e 54 65 6d 70 3b 20 69 2b 2b 29 7b  Be->nTemp; i++){
4a60: 0a 20 20 20 20 69 66 28 20 70 42 65 2d 3e 61 70  .    if( pBe->ap
4a70: 54 65 6d 70 5b 69 5d 3d 3d 66 20 29 7b 0a 20 20  Temp[i]==f ){.  
4a80: 20 20 20 20 75 6e 6c 69 6e 6b 28 70 42 65 2d 3e      unlink(pBe->
4a90: 61 7a 54 65 6d 70 5b 69 5d 29 3b 0a 20 20 20 20  azTemp[i]);.    
4aa0: 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 42 65    sqliteFree(pBe
4ab0: 2d 3e 61 7a 54 65 6d 70 5b 69 5d 29 3b 0a 20 20  ->azTemp[i]);.  
4ac0: 20 20 20 20 70 42 65 2d 3e 61 70 54 65 6d 70 5b      pBe->apTemp[
4ad0: 69 5d 20 3d 20 30 3b 0a 20 20 20 20 20 20 70 42  i] = 0;.      pB
4ae0: 65 2d 3e 61 7a 54 65 6d 70 5b 69 5d 20 3d 20 30  e->azTemp[i] = 0
4af0: 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20  ;.      break;. 
4b00: 20 20 20 7d 0a 20 20 7d 0a 20 20 66 63 6c 6f 73     }.  }.  fclos
4b10: 65 28 66 29 3b 0a 7d 0a                          e(f);.}.