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);.}.