0000: 2f 2a 0a 2a 2a 20 32 30 30 31 20 53 65 70 74 65 /*.** 2001 Septe
0010: 6d 62 65 72 20 31 35 0a 2a 2a 0a 2a 2a 20 54 68 mber 15.**.** Th
0020: 65 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 e author disclai
0030: 6d 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 ms copyright to
0040: 74 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 this source code
0050: 2e 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a . In place of.*
0060: 2a 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 * a legal notice
0070: 2c 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 , here is a bles
0080: 73 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d sing:.**.** M
0090: 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 ay you do good a
00a0: 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 nd not evil..**
00b0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 May you find
00c0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 forgiveness for
00d0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 yourself and for
00e0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 give others..**
00f0: 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 May you share
0100: 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 freely, never t
0110: 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 aking more than
0120: 79 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a you give..**.***
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0170: 2a 2a 2a 2a 2a 2a 0a 2a 2a 20 55 74 69 6c 69 74 ******.** Utilit
0180: 79 20 66 75 6e 63 74 69 6f 6e 73 20 75 73 65 64 y functions used
0190: 20 74 68 72 6f 75 67 68 6f 75 74 20 73 71 6c 69 throughout sqli
01a0: 74 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 te..**.** This f
01b0: 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 66 75 6e ile contains fun
01c0: 63 74 69 6f 6e 73 20 66 6f 72 20 61 6c 6c 6f 63 ctions for alloc
01d0: 61 74 69 6e 67 20 6d 65 6d 6f 72 79 2c 20 63 6f ating memory, co
01e0: 6d 70 61 72 69 6e 67 0a 2a 2a 20 73 74 72 69 6e mparing.** strin
01f0: 67 73 2c 20 61 6e 64 20 73 74 75 66 66 20 6c 69 gs, and stuff li
0200: 6b 65 20 74 68 61 74 2e 0a 2a 2a 0a 2a 2a 20 24 ke that..**.** $
0210: 49 64 3a 20 75 74 69 6c 2e 63 2c 76 20 31 2e 31 Id: util.c,v 1.1
0220: 33 33 20 32 30 30 35 2f 30 35 2f 30 33 20 31 32 33 2005/05/03 12
0230: 3a 33 30 3a 33 34 20 64 72 68 20 45 78 70 20 24 :30:34 drh Exp $
0240: 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 .*/.#include "sq
0250: 6c 69 74 65 49 6e 74 2e 68 22 0a 23 69 6e 63 6c liteInt.h".#incl
0260: 75 64 65 20 3c 73 74 64 61 72 67 2e 68 3e 0a 23 ude <stdarg.h>.#
0270: 69 6e 63 6c 75 64 65 20 3c 63 74 79 70 65 2e 68 include <ctype.h
0280: 3e 0a 0a 23 69 66 20 53 51 4c 49 54 45 5f 4d 45 >..#if SQLITE_ME
0290: 4d 44 45 42 55 47 3e 32 20 26 26 20 64 65 66 69 MDEBUG>2 && defi
02a0: 6e 65 64 28 5f 5f 47 4c 49 42 43 5f 5f 29 0a 23 ned(__GLIBC__).#
02b0: 69 6e 63 6c 75 64 65 20 3c 65 78 65 63 69 6e 66 include <execinf
02c0: 6f 2e 68 3e 0a 76 6f 69 64 20 70 72 69 6e 74 5f o.h>.void print_
02d0: 73 74 61 63 6b 5f 74 72 61 63 65 28 29 7b 0a 20 stack_trace(){.
02e0: 20 76 6f 69 64 20 2a 62 74 5b 33 30 5d 3b 0a 20 void *bt[30];.
02f0: 20 69 6e 74 20 69 3b 0a 20 20 69 6e 74 20 6e 20 int i;. int n
0300: 3d 20 62 61 63 6b 74 72 61 63 65 28 62 74 2c 20 = backtrace(bt,
0310: 33 30 29 3b 0a 0a 20 20 66 70 72 69 6e 74 66 28 30);.. fprintf(
0320: 73 74 64 65 72 72 2c 20 22 53 54 41 43 4b 3a 20 stderr, "STACK:
0330: 22 29 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 ");. for(i=0; i
0340: 3c 6e 3b 69 2b 2b 29 7b 0a 20 20 20 20 66 70 72 <n;i++){. fpr
0350: 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 25 70 intf(stderr, "%p
0360: 20 22 2c 20 62 74 5b 69 5d 29 3b 0a 20 20 7d 0a ", bt[i]);. }.
0370: 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 fprintf(stderr
0380: 2c 20 22 5c 6e 22 29 3b 0a 7d 0a 23 65 6c 73 65 , "\n");.}.#else
0390: 0a 23 64 65 66 69 6e 65 20 70 72 69 6e 74 5f 73 .#define print_s
03a0: 74 61 63 6b 5f 74 72 61 63 65 28 29 0a 23 65 6e tack_trace().#en
03b0: 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 6d 61 dif../*.** If ma
03c0: 6c 6c 6f 63 28 29 20 65 76 65 72 20 66 61 69 6c lloc() ever fail
03d0: 73 2c 20 74 68 69 73 20 67 6c 6f 62 61 6c 20 76 s, this global v
03e0: 61 72 69 61 62 6c 65 20 67 65 74 73 20 73 65 74 ariable gets set
03f0: 20 74 6f 20 31 2e 0a 2a 2a 20 54 68 69 73 20 63 to 1..** This c
0400: 61 75 73 65 73 20 74 68 65 20 6c 69 62 72 61 72 auses the librar
0410: 79 20 74 6f 20 61 62 6f 72 74 20 61 6e 64 20 6e y to abort and n
0420: 65 76 65 72 20 61 67 61 69 6e 20 66 75 6e 63 74 ever again funct
0430: 69 6f 6e 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 ion..*/.int sqli
0440: 74 65 33 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 te3_malloc_faile
0450: 64 20 3d 20 30 3b 0a 0a 2f 2a 0a 2a 2a 20 49 66 d = 0;../*.** If
0460: 20 53 51 4c 49 54 45 5f 4d 45 4d 44 45 42 55 47 SQLITE_MEMDEBUG
0470: 20 69 73 20 64 65 66 69 6e 65 64 2c 20 74 68 65 is defined, the
0480: 6e 20 75 73 65 20 76 65 72 73 69 6f 6e 73 20 6f n use versions o
0490: 66 20 6d 61 6c 6c 6f 63 28 29 20 61 6e 64 0a 2a f malloc() and.*
04a0: 2a 20 66 72 65 65 28 29 20 74 68 61 74 20 74 72 * free() that tr
04b0: 61 63 6b 20 6d 65 6d 6f 72 79 20 75 73 61 67 65 ack memory usage
04c0: 20 61 6e 64 20 63 68 65 63 6b 20 66 6f 72 20 62 and check for b
04d0: 75 66 66 65 72 20 6f 76 65 72 72 75 6e 73 2e 0a uffer overruns..
04e0: 2a 2f 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 */.#ifdef SQLITE
04f0: 5f 4d 45 4d 44 45 42 55 47 0a 0a 2f 2a 0a 2a 2a _MEMDEBUG../*.**
0500: 20 46 6f 72 20 6b 65 65 70 69 6e 67 20 74 72 61 For keeping tra
0510: 63 6b 20 6f 66 20 74 68 65 20 6e 75 6d 62 65 72 ck of the number
0520: 20 6f 66 20 6d 61 6c 6c 6f 63 73 20 61 6e 64 20 of mallocs and
0530: 66 72 65 65 73 2e 20 20 20 54 68 69 73 0a 2a 2a frees. This.**
0540: 20 69 73 20 75 73 65 64 20 74 6f 20 63 68 65 63 is used to chec
0550: 6b 20 66 6f 72 20 6d 65 6d 6f 72 79 20 6c 65 61 k for memory lea
0560: 6b 73 2e 20 20 54 68 65 20 69 4d 61 6c 6c 6f 63 ks. The iMalloc
0570: 46 61 69 6c 20 61 6e 64 20 69 4d 61 6c 6c 6f 63 Fail and iMalloc
0580: 52 65 73 65 74 0a 2a 2a 20 76 61 6c 75 65 73 20 Reset.** values
0590: 61 72 65 20 75 73 65 64 20 74 6f 20 73 69 6d 75 are used to simu
05a0: 6c 61 74 65 20 6d 61 6c 6c 6f 63 28 29 20 66 61 late malloc() fa
05b0: 69 6c 75 72 65 73 20 64 75 72 69 6e 67 20 74 65 ilures during te
05c0: 73 74 69 6e 67 20 69 6e 20 0a 2a 2a 20 6f 72 64 sting in .** ord
05d0: 65 72 20 74 6f 20 76 65 72 69 66 79 20 74 68 61 er to verify tha
05e0: 74 20 74 68 65 20 6c 69 62 72 61 72 79 20 63 6f t the library co
05f0: 72 72 65 63 74 6c 79 20 68 61 6e 64 6c 65 73 20 rrectly handles
0600: 61 6e 20 6f 75 74 2d 6f 66 2d 6d 65 6d 6f 72 79 an out-of-memory
0610: 0a 2a 2a 20 63 6f 6e 64 69 74 69 6f 6e 2e 0a 2a .** condition..*
0620: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 6e 4d /.int sqlite3_nM
0630: 61 6c 6c 6f 63 3b 20 20 20 20 20 20 20 20 20 2f alloc; /
0640: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 73 71 6c 69 * Number of sqli
0650: 74 65 4d 61 6c 6c 6f 63 28 29 20 63 61 6c 6c 73 teMalloc() calls
0660: 20 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f */.int sqlite3_
0670: 6e 46 72 65 65 3b 20 20 20 20 20 20 20 20 20 20 nFree;
0680: 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 73 71 /* Number of sq
0690: 6c 69 74 65 46 72 65 65 28 29 20 63 61 6c 6c 73 liteFree() calls
06a0: 20 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f */.int sqlite3_
06b0: 69 4d 61 6c 6c 6f 63 46 61 69 6c 3b 20 20 20 20 iMallocFail;
06c0: 20 2f 2a 20 46 61 69 6c 20 73 71 6c 69 74 65 4d /* Fail sqliteM
06d0: 61 6c 6c 6f 63 28 29 20 61 66 74 65 72 20 74 68 alloc() after th
06e0: 69 73 20 6d 61 6e 79 20 63 61 6c 6c 73 20 2a 2f is many calls */
06f0: 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 69 4d 61 .int sqlite3_iMa
0700: 6c 6c 6f 63 52 65 73 65 74 20 3d 20 2d 31 3b 20 llocReset = -1;
0710: 2f 2a 20 57 68 65 6e 20 69 4d 61 6c 6c 6f 63 46 /* When iMallocF
0720: 61 69 6c 20 72 65 61 63 68 65 73 20 30 2c 20 73 ail reaches 0, s
0730: 65 74 20 74 6f 20 74 68 69 73 20 2a 2f 0a 23 69 et to this */.#i
0740: 66 20 53 51 4c 49 54 45 5f 4d 45 4d 44 45 42 55 f SQLITE_MEMDEBU
0750: 47 3e 31 0a 73 74 61 74 69 63 20 69 6e 74 20 6d G>1.static int m
0760: 65 6d 63 6e 74 20 3d 20 30 3b 0a 23 65 6e 64 69 emcnt = 0;.#endi
0770: 66 0a 0a 2f 2a 0a 2a 2a 20 4e 75 6d 62 65 72 20 f../*.** Number
0780: 6f 66 20 33 32 2d 62 69 74 20 67 75 61 72 64 20 of 32-bit guard
0790: 77 6f 72 64 73 2e 20 20 54 68 69 73 20 73 68 6f words. This sho
07a0: 75 6c 64 20 70 72 6f 62 61 62 6c 79 20 62 65 20 uld probably be
07b0: 61 20 6d 75 6c 74 69 70 6c 65 20 6f 66 0a 2a 2a a multiple of.**
07c0: 20 32 20 73 69 6e 63 65 20 6f 6e 20 36 34 2d 62 2 since on 64-b
07d0: 69 74 20 6d 61 63 68 69 6e 65 73 20 77 65 20 77 it machines we w
07e0: 61 6e 74 20 74 68 65 20 76 61 6c 75 65 20 72 65 ant the value re
07f0: 74 75 72 6e 65 64 20 62 79 20 73 71 6c 69 74 65 turned by sqlite
0800: 4d 61 6c 6c 6f 63 28 29 0a 2a 2a 20 74 6f 20 62 Malloc().** to b
0810: 65 20 38 2d 62 79 74 65 20 61 6c 69 67 6e 65 64 e 8-byte aligned
0820: 2e 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 4e 5f 47 ..*/.#define N_G
0830: 55 41 52 44 20 32 0a 0a 2f 2a 0a 2a 2a 20 41 6c UARD 2../*.** Al
0840: 6c 6f 63 61 74 65 20 6e 65 77 20 6d 65 6d 6f 72 locate new memor
0850: 79 20 61 6e 64 20 73 65 74 20 69 74 20 74 6f 20 y and set it to
0860: 7a 65 72 6f 2e 20 20 52 65 74 75 72 6e 20 4e 55 zero. Return NU
0870: 4c 4c 20 69 66 0a 2a 2a 20 6e 6f 20 6d 65 6d 6f LL if.** no memo
0880: 72 79 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2e ry is available.
0890: 0a 2a 2f 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 .*/.void *sqlite
08a0: 33 4d 61 6c 6c 6f 63 5f 28 69 6e 74 20 6e 2c 20 3Malloc_(int n,
08b0: 69 6e 74 20 62 5a 65 72 6f 2c 20 63 68 61 72 20 int bZero, char
08c0: 2a 7a 46 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 *zFile, int line
08d0: 29 7b 0a 20 20 76 6f 69 64 20 2a 70 3b 0a 20 20 ){. void *p;.
08e0: 69 6e 74 20 2a 70 69 3b 0a 20 20 69 6e 74 20 69 int *pi;. int i
08f0: 2c 20 6b 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 , k;. if( sqlit
0900: 65 33 5f 69 4d 61 6c 6c 6f 63 46 61 69 6c 3e 3d e3_iMallocFail>=
0910: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 0 ){. sqlite3
0920: 5f 69 4d 61 6c 6c 6f 63 46 61 69 6c 2d 2d 3b 0a _iMallocFail--;.
0930: 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f if( sqlite3_
0940: 69 4d 61 6c 6c 6f 63 46 61 69 6c 3d 3d 30 20 29 iMallocFail==0 )
0950: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f {. sqlite3_
0960: 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 2b 2b 3b malloc_failed++;
0970: 0a 23 69 66 20 53 51 4c 49 54 45 5f 4d 45 4d 44 .#if SQLITE_MEMD
0980: 45 42 55 47 3e 31 0a 20 20 20 20 20 20 66 70 72 EBUG>1. fpr
0990: 69 6e 74 66 28 73 74 64 65 72 72 2c 22 2a 2a 2a intf(stderr,"***
09a0: 2a 20 66 61 69 6c 65 64 20 74 6f 20 61 6c 6c 6f * failed to allo
09b0: 63 61 74 65 20 25 64 20 62 79 74 65 73 20 61 74 cate %d bytes at
09c0: 20 25 73 3a 25 64 5c 6e 22 2c 0a 20 20 20 20 20 %s:%d\n",.
09d0: 20 20 20 20 20 20 20 20 20 6e 2c 20 7a 46 69 6c n, zFil
09e0: 65 2c 6c 69 6e 65 29 3b 0a 23 65 6e 64 69 66 0a e,line);.#endif.
09f0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 69 4d sqlite3_iM
0a00: 61 6c 6c 6f 63 46 61 69 6c 20 3d 20 73 71 6c 69 allocFail = sqli
0a10: 74 65 33 5f 69 4d 61 6c 6c 6f 63 52 65 73 65 74 te3_iMallocReset
0a20: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 ;. return 0
0a30: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 ;. }. }. if
0a40: 28 20 6e 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 ( n==0 ) return
0a50: 30 3b 0a 20 20 6b 20 3d 20 28 6e 2b 73 69 7a 65 0;. k = (n+size
0a60: 6f 66 28 69 6e 74 29 2d 31 29 2f 73 69 7a 65 6f of(int)-1)/sizeo
0a70: 66 28 69 6e 74 29 3b 0a 20 20 70 69 20 3d 20 6d f(int);. pi = m
0a80: 61 6c 6c 6f 63 28 20 28 4e 5f 47 55 41 52 44 2a alloc( (N_GUARD*
0a90: 32 2b 31 2b 6b 29 2a 73 69 7a 65 6f 66 28 69 6e 2+1+k)*sizeof(in
0aa0: 74 29 29 3b 0a 20 20 69 66 28 20 70 69 3d 3d 30 t));. if( pi==0
0ab0: 20 29 7b 0a 20 20 20 20 69 66 28 20 6e 3e 30 20 ){. if( n>0
0ac0: 29 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 ) sqlite3_malloc
0ad0: 5f 66 61 69 6c 65 64 2b 2b 3b 0a 20 20 20 20 72 _failed++;. r
0ae0: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 73 eturn 0;. }. s
0af0: 71 6c 69 74 65 33 5f 6e 4d 61 6c 6c 6f 63 2b 2b qlite3_nMalloc++
0b00: 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 4e ;. for(i=0; i<N
0b10: 5f 47 55 41 52 44 3b 20 69 2b 2b 29 20 70 69 5b _GUARD; i++) pi[
0b20: 69 5d 20 3d 20 30 78 64 65 61 64 31 31 32 32 3b i] = 0xdead1122;
0b30: 0a 20 20 70 69 5b 4e 5f 47 55 41 52 44 5d 20 3d . pi[N_GUARD] =
0b40: 20 6e 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 n;. for(i=0; i
0b50: 3c 4e 5f 47 55 41 52 44 3b 20 69 2b 2b 29 20 70 <N_GUARD; i++) p
0b60: 69 5b 6b 2b 31 2b 4e 5f 47 55 41 52 44 2b 69 5d i[k+1+N_GUARD+i]
0b70: 20 3d 20 30 78 64 65 61 64 33 33 34 34 3b 0a 20 = 0xdead3344;.
0b80: 20 70 20 3d 20 26 70 69 5b 4e 5f 47 55 41 52 44 p = &pi[N_GUARD
0b90: 2b 31 5d 3b 0a 20 20 6d 65 6d 73 65 74 28 70 2c +1];. memset(p,
0ba0: 20 62 5a 65 72 6f 3d 3d 30 2c 20 6e 29 3b 0a 23 bZero==0, n);.#
0bb0: 69 66 20 53 51 4c 49 54 45 5f 4d 45 4d 44 45 42 if SQLITE_MEMDEB
0bc0: 55 47 3e 31 0a 20 20 70 72 69 6e 74 5f 73 74 61 UG>1. print_sta
0bd0: 63 6b 5f 74 72 61 63 65 28 29 3b 0a 20 20 66 70 ck_trace();. fp
0be0: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 22 25 30 rintf(stderr,"%0
0bf0: 36 64 20 6d 61 6c 6c 6f 63 20 25 64 20 62 79 74 6d malloc %d byt
0c00: 65 73 20 61 74 20 30 78 25 78 20 66 72 6f 6d 20 es at 0x%x from
0c10: 25 73 3a 25 64 5c 6e 22 2c 0a 20 20 20 20 20 20 %s:%d\n",.
0c20: 2b 2b 6d 65 6d 63 6e 74 2c 20 6e 2c 20 28 69 6e ++memcnt, n, (in
0c30: 74 29 70 2c 20 7a 46 69 6c 65 2c 6c 69 6e 65 29 t)p, zFile,line)
0c40: 3b 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 ;.#endif. retur
0c50: 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68 n p;.}../*.** Ch
0c60: 65 63 6b 20 74 6f 20 73 65 65 20 69 66 20 74 68 eck to see if th
0c70: 65 20 67 69 76 65 6e 20 70 6f 69 6e 74 65 72 20 e given pointer
0c80: 77 61 73 20 6f 62 74 61 69 6e 65 64 20 66 72 6f was obtained fro
0c90: 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 m sqliteMalloc()
0ca0: 0a 2a 2a 20 61 6e 64 20 69 73 20 61 62 6c 65 20 .** and is able
0cb0: 74 6f 20 68 6f 6c 64 20 61 74 20 6c 65 61 73 74 to hold at least
0cc0: 20 4e 20 62 79 74 65 73 2e 20 20 52 61 69 73 65 N bytes. Raise
0cd0: 20 61 6e 20 65 78 63 65 70 74 69 6f 6e 20 69 66 an exception if
0ce0: 20 74 68 69 73 0a 2a 2a 20 69 73 20 6e 6f 74 20 this.** is not
0cf0: 74 68 65 20 63 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 the case..**.**
0d00: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 This routine is
0d10: 75 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e 67 used for testing
0d20: 20 70 75 72 70 6f 73 65 73 20 6f 6e 6c 79 2e 0a purposes only..
0d30: 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 43 */.void sqlite3C
0d40: 68 65 63 6b 4d 65 6d 6f 72 79 28 76 6f 69 64 20 heckMemory(void
0d50: 2a 70 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 69 6e *p, int N){. in
0d60: 74 20 2a 70 69 20 3d 20 70 3b 0a 20 20 69 6e 74 t *pi = p;. int
0d70: 20 6e 2c 20 69 2c 20 6b 3b 0a 20 20 70 69 20 2d n, i, k;. pi -
0d80: 3d 20 4e 5f 47 55 41 52 44 2b 31 3b 0a 20 20 66 = N_GUARD+1;. f
0d90: 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f 47 55 41 52 or(i=0; i<N_GUAR
0da0: 44 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 61 73 73 D; i++){. ass
0db0: 65 72 74 28 20 70 69 5b 69 5d 3d 3d 30 78 64 65 ert( pi[i]==0xde
0dc0: 61 64 31 31 32 32 20 29 3b 0a 20 20 7d 0a 20 20 ad1122 );. }.
0dd0: 6e 20 3d 20 70 69 5b 4e 5f 47 55 41 52 44 5d 3b n = pi[N_GUARD];
0de0: 0a 20 20 61 73 73 65 72 74 28 20 4e 3e 3d 30 20 . assert( N>=0
0df0: 26 26 20 4e 3c 6e 20 29 3b 0a 20 20 6b 20 3d 20 && N<n );. k =
0e00: 28 6e 2b 73 69 7a 65 6f 66 28 69 6e 74 29 2d 31 (n+sizeof(int)-1
0e10: 29 2f 73 69 7a 65 6f 66 28 69 6e 74 29 3b 0a 20 )/sizeof(int);.
0e20: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f 47 55 for(i=0; i<N_GU
0e30: 41 52 44 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 61 ARD; i++){. a
0e40: 73 73 65 72 74 28 20 70 69 5b 6b 2b 4e 5f 47 55 ssert( pi[k+N_GU
0e50: 41 52 44 2b 31 2b 69 5d 3d 3d 30 78 64 65 61 64 ARD+1+i]==0xdead
0e60: 33 33 34 34 20 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 3344 );. }.}../
0e70: 2a 0a 2a 2a 20 46 72 65 65 20 6d 65 6d 6f 72 79 *.** Free memory
0e80: 20 70 72 65 76 69 6f 75 73 6c 79 20 6f 62 74 61 previously obta
0e90: 69 6e 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 65 ined from sqlite
0ea0: 4d 61 6c 6c 6f 63 28 29 0a 2a 2f 0a 76 6f 69 64 Malloc().*/.void
0eb0: 20 73 71 6c 69 74 65 33 46 72 65 65 5f 28 76 6f sqlite3Free_(vo
0ec0: 69 64 20 2a 70 2c 20 63 68 61 72 20 2a 7a 46 69 id *p, char *zFi
0ed0: 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 7b 0a 20 le, int line){.
0ee0: 20 69 66 28 20 70 20 29 7b 0a 20 20 20 20 69 6e if( p ){. in
0ef0: 74 20 2a 70 69 2c 20 69 2c 20 6b 2c 20 6e 3b 0a t *pi, i, k, n;.
0f00: 20 20 20 20 70 69 20 3d 20 70 3b 0a 20 20 20 20 pi = p;.
0f10: 70 69 20 2d 3d 20 4e 5f 47 55 41 52 44 2b 31 3b pi -= N_GUARD+1;
0f20: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6e 46 72 . sqlite3_nFr
0f30: 65 65 2b 2b 3b 0a 20 20 20 20 66 6f 72 28 69 3d ee++;. for(i=
0f40: 30 3b 20 69 3c 4e 5f 47 55 41 52 44 3b 20 69 2b 0; i<N_GUARD; i+
0f50: 2b 29 7b 0a 20 20 20 20 20 20 69 66 28 20 70 69 +){. if( pi
0f60: 5b 69 5d 21 3d 30 78 64 65 61 64 31 31 32 32 20 [i]!=0xdead1122
0f70: 29 7b 0a 20 20 20 20 20 20 20 20 66 70 72 69 6e ){. fprin
0f80: 74 66 28 73 74 64 65 72 72 2c 22 4c 6f 77 2d 65 tf(stderr,"Low-e
0f90: 6e 64 20 6d 65 6d 6f 72 79 20 63 6f 72 72 75 70 nd memory corrup
0fa0: 74 69 6f 6e 20 61 74 20 30 78 25 78 5c 6e 22 2c tion at 0x%x\n",
0fb0: 20 28 69 6e 74 29 70 29 3b 0a 20 20 20 20 20 20 (int)p);.
0fc0: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 return;.
0fd0: 7d 0a 20 20 20 20 7d 0a 20 20 20 20 6e 20 3d 20 }. }. n =
0fe0: 70 69 5b 4e 5f 47 55 41 52 44 5d 3b 0a 20 20 20 pi[N_GUARD];.
0ff0: 20 6b 20 3d 20 28 6e 2b 73 69 7a 65 6f 66 28 69 k = (n+sizeof(i
1000: 6e 74 29 2d 31 29 2f 73 69 7a 65 6f 66 28 69 6e nt)-1)/sizeof(in
1010: 74 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b t);. for(i=0;
1020: 20 69 3c 4e 5f 47 55 41 52 44 3b 20 69 2b 2b 29 i<N_GUARD; i++)
1030: 7b 0a 20 20 20 20 20 20 69 66 28 20 70 69 5b 6b {. if( pi[k
1040: 2b 4e 5f 47 55 41 52 44 2b 31 2b 69 5d 21 3d 30 +N_GUARD+1+i]!=0
1050: 78 64 65 61 64 33 33 34 34 20 29 7b 0a 20 20 20 xdead3344 ){.
1060: 20 20 20 20 20 66 70 72 69 6e 74 66 28 73 74 64 fprintf(std
1070: 65 72 72 2c 22 48 69 67 68 2d 65 6e 64 20 6d 65 err,"High-end me
1080: 6d 6f 72 79 20 63 6f 72 72 75 70 74 69 6f 6e 20 mory corruption
1090: 61 74 20 30 78 25 78 5c 6e 22 2c 20 28 69 6e 74 at 0x%x\n", (int
10a0: 29 70 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74 )p);. ret
10b0: 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 urn;. }.
10c0: 20 7d 0a 20 20 20 20 6d 65 6d 73 65 74 28 70 69 }. memset(pi
10d0: 2c 20 30 78 66 66 2c 20 28 6b 2b 4e 5f 47 55 41 , 0xff, (k+N_GUA
10e0: 52 44 2a 32 2b 31 29 2a 73 69 7a 65 6f 66 28 69 RD*2+1)*sizeof(i
10f0: 6e 74 29 29 3b 0a 23 69 66 20 53 51 4c 49 54 45 nt));.#if SQLITE
1100: 5f 4d 45 4d 44 45 42 55 47 3e 31 0a 20 20 20 20 _MEMDEBUG>1.
1110: 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 22 fprintf(stderr,"
1120: 25 30 36 64 20 66 72 65 65 20 25 64 20 62 79 74 %06d free %d byt
1130: 65 73 20 61 74 20 30 78 25 78 20 66 72 6f 6d 20 es at 0x%x from
1140: 25 73 3a 25 64 5c 6e 22 2c 0a 20 20 20 20 20 20 %s:%d\n",.
1150: 20 20 20 2b 2b 6d 65 6d 63 6e 74 2c 20 6e 2c 20 ++memcnt, n,
1160: 28 69 6e 74 29 70 2c 20 7a 46 69 6c 65 2c 6c 69 (int)p, zFile,li
1170: 6e 65 29 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20 ne);.#endif.
1180: 66 72 65 65 28 70 69 29 3b 0a 20 20 7d 0a 7d 0a free(pi);. }.}.
1190: 0a 2f 2a 0a 2a 2a 20 52 65 73 69 7a 65 20 61 20 ./*.** Resize a
11a0: 70 72 69 6f 72 20 61 6c 6c 6f 63 61 74 69 6f 6e prior allocation
11b0: 2e 20 20 49 66 20 70 3d 3d 30 2c 20 74 68 65 6e . If p==0, then
11c0: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a this routine.**
11d0: 20 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 6b 65 works just like
11e0: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 2e sqliteMalloc().
11f0: 20 20 49 66 20 6e 3d 3d 30 2c 20 74 68 65 6e 20 If n==0, then
1200: 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 this routine.**
1210: 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 6b 65 20 works just like
1220: 73 71 6c 69 74 65 46 72 65 65 28 29 2e 0a 2a 2f sqliteFree()..*/
1230: 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 52 65 .void *sqlite3Re
1240: 61 6c 6c 6f 63 5f 28 76 6f 69 64 20 2a 6f 6c 64 alloc_(void *old
1250: 50 2c 20 69 6e 74 20 6e 2c 20 63 68 61 72 20 2a P, int n, char *
1260: 7a 46 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 zFile, int line)
1270: 7b 0a 20 20 69 6e 74 20 2a 6f 6c 64 50 69 2c 20 {. int *oldPi,
1280: 2a 70 69 2c 20 69 2c 20 6b 2c 20 6f 6c 64 4e 2c *pi, i, k, oldN,
1290: 20 6f 6c 64 4b 3b 0a 20 20 76 6f 69 64 20 2a 70 oldK;. void *p
12a0: 3b 0a 20 20 69 66 28 20 6f 6c 64 50 3d 3d 30 20 ;. if( oldP==0
12b0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 73 71 ){. return sq
12c0: 6c 69 74 65 33 4d 61 6c 6c 6f 63 5f 28 6e 2c 31 lite3Malloc_(n,1
12d0: 2c 7a 46 69 6c 65 2c 6c 69 6e 65 29 3b 0a 20 20 ,zFile,line);.
12e0: 7d 0a 20 20 69 66 28 20 6e 3d 3d 30 20 29 7b 0a }. if( n==0 ){.
12f0: 20 20 20 20 73 71 6c 69 74 65 33 46 72 65 65 5f sqlite3Free_
1300: 28 6f 6c 64 50 2c 7a 46 69 6c 65 2c 6c 69 6e 65 (oldP,zFile,line
1310: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b );. return 0;
1320: 0a 20 20 7d 0a 20 20 6f 6c 64 50 69 20 3d 20 6f . }. oldPi = o
1330: 6c 64 50 3b 0a 20 20 6f 6c 64 50 69 20 2d 3d 20 ldP;. oldPi -=
1340: 4e 5f 47 55 41 52 44 2b 31 3b 0a 20 20 69 66 28 N_GUARD+1;. if(
1350: 20 6f 6c 64 50 69 5b 30 5d 21 3d 30 78 64 65 61 oldPi[0]!=0xdea
1360: 64 31 31 32 32 20 29 7b 0a 20 20 20 20 66 70 72 d1122 ){. fpr
1370: 69 6e 74 66 28 73 74 64 65 72 72 2c 22 4c 6f 77 intf(stderr,"Low
1380: 2d 65 6e 64 20 6d 65 6d 6f 72 79 20 63 6f 72 72 -end memory corr
1390: 75 70 74 69 6f 6e 20 69 6e 20 72 65 61 6c 6c 6f uption in reallo
13a0: 63 20 61 74 20 30 78 25 78 5c 6e 22 2c 20 28 69 c at 0x%x\n", (i
13b0: 6e 74 29 6f 6c 64 50 29 3b 0a 20 20 20 20 72 65 nt)oldP);. re
13c0: 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 6f 6c turn 0;. }. ol
13d0: 64 4e 20 3d 20 6f 6c 64 50 69 5b 4e 5f 47 55 41 dN = oldPi[N_GUA
13e0: 52 44 5d 3b 0a 20 20 6f 6c 64 4b 20 3d 20 28 6f RD];. oldK = (o
13f0: 6c 64 4e 2b 73 69 7a 65 6f 66 28 69 6e 74 29 2d ldN+sizeof(int)-
1400: 31 29 2f 73 69 7a 65 6f 66 28 69 6e 74 29 3b 0a 1)/sizeof(int);.
1410: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f 47 for(i=0; i<N_G
1420: 55 41 52 44 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 UARD; i++){.
1430: 69 66 28 20 6f 6c 64 50 69 5b 6f 6c 64 4b 2b 4e if( oldPi[oldK+N
1440: 5f 47 55 41 52 44 2b 31 2b 69 5d 21 3d 30 78 64 _GUARD+1+i]!=0xd
1450: 65 61 64 33 33 34 34 20 29 7b 0a 20 20 20 20 20 ead3344 ){.
1460: 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c fprintf(stderr,
1470: 22 48 69 67 68 2d 65 6e 64 20 6d 65 6d 6f 72 79 "High-end memory
1480: 20 63 6f 72 72 75 70 74 69 6f 6e 20 69 6e 20 72 corruption in r
1490: 65 61 6c 6c 6f 63 20 61 74 20 30 78 25 78 5c 6e ealloc at 0x%x\n
14a0: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ",.
14b0: 20 28 69 6e 74 29 6f 6c 64 50 29 3b 0a 20 20 20 (int)oldP);.
14c0: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 return 0;.
14d0: 20 7d 0a 20 20 7d 0a 20 20 6b 20 3d 20 28 6e 20 }. }. k = (n
14e0: 2b 20 73 69 7a 65 6f 66 28 69 6e 74 29 20 2d 20 + sizeof(int) -
14f0: 31 29 2f 73 69 7a 65 6f 66 28 69 6e 74 29 3b 0a 1)/sizeof(int);.
1500: 20 20 70 69 20 3d 20 6d 61 6c 6c 6f 63 28 20 28 pi = malloc( (
1510: 6b 2b 4e 5f 47 55 41 52 44 2a 32 2b 31 29 2a 73 k+N_GUARD*2+1)*s
1520: 69 7a 65 6f 66 28 69 6e 74 29 20 29 3b 0a 20 20 izeof(int) );.
1530: 69 66 28 20 70 69 3d 3d 30 20 29 7b 0a 20 20 20 if( pi==0 ){.
1540: 20 69 66 28 20 6e 3e 30 20 29 20 73 71 6c 69 74 if( n>0 ) sqlit
1550: 65 33 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 e3_malloc_failed
1560: 2b 2b 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 ++;. return 0
1570: 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30 3b ;. }. for(i=0;
1580: 20 69 3c 4e 5f 47 55 41 52 44 3b 20 69 2b 2b 29 i<N_GUARD; i++)
1590: 20 70 69 5b 69 5d 20 3d 20 30 78 64 65 61 64 31 pi[i] = 0xdead1
15a0: 31 32 32 3b 0a 20 20 70 69 5b 4e 5f 47 55 41 52 122;. pi[N_GUAR
15b0: 44 5d 20 3d 20 6e 3b 0a 20 20 66 6f 72 28 69 3d D] = n;. for(i=
15c0: 30 3b 20 69 3c 4e 5f 47 55 41 52 44 3b 20 69 2b 0; i<N_GUARD; i+
15d0: 2b 29 20 70 69 5b 6b 2b 4e 5f 47 55 41 52 44 2b +) pi[k+N_GUARD+
15e0: 31 2b 69 5d 20 3d 20 30 78 64 65 61 64 33 33 34 1+i] = 0xdead334
15f0: 34 3b 0a 20 20 70 20 3d 20 26 70 69 5b 4e 5f 47 4;. p = &pi[N_G
1600: 55 41 52 44 2b 31 5d 3b 0a 20 20 6d 65 6d 63 70 UARD+1];. memcp
1610: 79 28 70 2c 20 6f 6c 64 50 2c 20 6e 3e 6f 6c 64 y(p, oldP, n>old
1620: 4e 20 3f 20 6f 6c 64 4e 20 3a 20 6e 29 3b 0a 20 N ? oldN : n);.
1630: 20 69 66 28 20 6e 3e 6f 6c 64 4e 20 29 7b 0a 20 if( n>oldN ){.
1640: 20 20 20 6d 65 6d 73 65 74 28 26 28 28 63 68 61 memset(&((cha
1650: 72 2a 29 70 29 5b 6f 6c 64 4e 5d 2c 20 30 78 35 r*)p)[oldN], 0x5
1660: 35 2c 20 6e 2d 6f 6c 64 4e 29 3b 0a 20 20 7d 0a 5, n-oldN);. }.
1670: 20 20 6d 65 6d 73 65 74 28 6f 6c 64 50 69 2c 20 memset(oldPi,
1680: 30 78 61 62 2c 20 28 6f 6c 64 4b 2b 4e 5f 47 55 0xab, (oldK+N_GU
1690: 41 52 44 2b 32 29 2a 73 69 7a 65 6f 66 28 69 6e ARD+2)*sizeof(in
16a0: 74 29 29 3b 0a 20 20 66 72 65 65 28 6f 6c 64 50 t));. free(oldP
16b0: 69 29 3b 0a 23 69 66 20 53 51 4c 49 54 45 5f 4d i);.#if SQLITE_M
16c0: 45 4d 44 45 42 55 47 3e 31 0a 20 20 70 72 69 6e EMDEBUG>1. prin
16d0: 74 5f 73 74 61 63 6b 5f 74 72 61 63 65 28 29 3b t_stack_trace();
16e0: 0a 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 . fprintf(stder
16f0: 72 2c 22 25 30 36 64 20 72 65 61 6c 6c 6f 63 20 r,"%06d realloc
1700: 25 64 20 74 6f 20 25 64 20 62 79 74 65 73 20 61 %d to %d bytes a
1710: 74 20 30 78 25 78 20 74 6f 20 30 78 25 78 20 61 t 0x%x to 0x%x a
1720: 74 20 25 73 3a 25 64 5c 6e 22 2c 0a 20 20 20 20 t %s:%d\n",.
1730: 2b 2b 6d 65 6d 63 6e 74 2c 20 6f 6c 64 4e 2c 20 ++memcnt, oldN,
1740: 6e 2c 20 28 69 6e 74 29 6f 6c 64 50 2c 20 28 69 n, (int)oldP, (i
1750: 6e 74 29 70 2c 20 7a 46 69 6c 65 2c 20 6c 69 6e nt)p, zFile, lin
1760: 65 29 3b 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 e);.#endif. ret
1770: 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 urn p;.}../*.**
1780: 4d 61 6b 65 20 61 20 63 6f 70 79 20 6f 66 20 61 Make a copy of a
1790: 20 73 74 72 69 6e 67 20 69 6e 20 6d 65 6d 6f 72 string in memor
17a0: 79 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 y obtained from
17b0: 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 0a 2a sqliteMalloc().*
17c0: 2f 0a 63 68 61 72 20 2a 73 71 6c 69 74 65 33 53 /.char *sqlite3S
17d0: 74 72 44 75 70 5f 28 63 6f 6e 73 74 20 63 68 61 trDup_(const cha
17e0: 72 20 2a 7a 2c 20 63 68 61 72 20 2a 7a 46 69 6c r *z, char *zFil
17f0: 65 2c 20 69 6e 74 20 6c 69 6e 65 29 7b 0a 20 20 e, int line){.
1800: 63 68 61 72 20 2a 7a 4e 65 77 3b 0a 20 20 69 66 char *zNew;. if
1810: 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 ( z==0 ) return
1820: 30 3b 0a 20 20 7a 4e 65 77 20 3d 20 73 71 6c 69 0;. zNew = sqli
1830: 74 65 33 4d 61 6c 6c 6f 63 5f 28 73 74 72 6c 65 te3Malloc_(strle
1840: 6e 28 7a 29 2b 31 2c 20 30 2c 20 7a 46 69 6c 65 n(z)+1, 0, zFile
1850: 2c 20 6c 69 6e 65 29 3b 0a 20 20 69 66 28 20 7a , line);. if( z
1860: 4e 65 77 20 29 20 73 74 72 63 70 79 28 7a 4e 65 New ) strcpy(zNe
1870: 77 2c 20 7a 29 3b 0a 20 20 72 65 74 75 72 6e 20 w, z);. return
1880: 7a 4e 65 77 3b 0a 7d 0a 63 68 61 72 20 2a 73 71 zNew;.}.char *sq
1890: 6c 69 74 65 33 53 74 72 4e 44 75 70 5f 28 63 6f lite3StrNDup_(co
18a0: 6e 73 74 20 63 68 61 72 20 2a 7a 2c 20 69 6e 74 nst char *z, int
18b0: 20 6e 2c 20 63 68 61 72 20 2a 7a 46 69 6c 65 2c n, char *zFile,
18c0: 20 69 6e 74 20 6c 69 6e 65 29 7b 0a 20 20 63 68 int line){. ch
18d0: 61 72 20 2a 7a 4e 65 77 3b 0a 20 20 69 66 28 20 ar *zNew;. if(
18e0: 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b z==0 ) return 0;
18f0: 0a 20 20 7a 4e 65 77 20 3d 20 73 71 6c 69 74 65 . zNew = sqlite
1900: 33 4d 61 6c 6c 6f 63 5f 28 6e 2b 31 2c 20 30 2c 3Malloc_(n+1, 0,
1910: 20 7a 46 69 6c 65 2c 20 6c 69 6e 65 29 3b 0a 20 zFile, line);.
1920: 20 69 66 28 20 7a 4e 65 77 20 29 7b 0a 20 20 20 if( zNew ){.
1930: 20 6d 65 6d 63 70 79 28 7a 4e 65 77 2c 20 7a 2c memcpy(zNew, z,
1940: 20 6e 29 3b 0a 20 20 20 20 7a 4e 65 77 5b 6e 5d n);. zNew[n]
1950: 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74 75 = 0;. }. retu
1960: 72 6e 20 7a 4e 65 77 3b 0a 7d 0a 0a 2f 2a 0a 2a rn zNew;.}../*.*
1970: 2a 20 41 20 76 65 72 73 69 6f 6e 20 6f 66 20 73 * A version of s
1980: 71 6c 69 74 65 46 72 65 65 20 74 68 61 74 20 69 qliteFree that i
1990: 73 20 61 6c 77 61 79 73 20 61 20 66 75 6e 63 74 s always a funct
19a0: 69 6f 6e 2c 20 6e 6f 74 20 61 20 6d 61 63 72 6f ion, not a macro
19b0: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 ..*/.void sqlite
19c0: 33 46 72 65 65 58 28 76 6f 69 64 20 2a 70 29 7b 3FreeX(void *p){
19d0: 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 29 . sqliteFree(p)
19e0: 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 ;.}.#endif /* SQ
19f0: 4c 49 54 45 5f 4d 45 4d 44 45 42 55 47 20 2a 2f LITE_MEMDEBUG */
1a00: 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c ../*.** The foll
1a10: 6f 77 69 6e 67 20 76 65 72 73 69 6f 6e 73 20 6f owing versions o
1a20: 66 20 6d 61 6c 6c 6f 63 28 29 20 61 6e 64 20 66 f malloc() and f
1a30: 72 65 65 28 29 20 61 72 65 20 66 6f 72 20 75 73 ree() are for us
1a40: 65 20 69 6e 20 61 0a 2a 2a 20 6e 6f 72 6d 61 6c e in a.** normal
1a50: 20 62 75 69 6c 64 2e 0a 2a 2f 0a 23 69 66 20 21 build..*/.#if !
1a60: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 4d defined(SQLITE_M
1a70: 45 4d 44 45 42 55 47 29 0a 0a 2f 2a 0a 2a 2a 20 EMDEBUG)../*.**
1a80: 41 6c 6c 6f 63 61 74 65 20 6e 65 77 20 6d 65 6d Allocate new mem
1a90: 6f 72 79 20 61 6e 64 20 73 65 74 20 69 74 20 74 ory and set it t
1aa0: 6f 20 7a 65 72 6f 2e 20 20 52 65 74 75 72 6e 20 o zero. Return
1ab0: 4e 55 4c 4c 20 69 66 0a 2a 2a 20 6e 6f 20 6d 65 NULL if.** no me
1ac0: 6d 6f 72 79 20 69 73 20 61 76 61 69 6c 61 62 6c mory is availabl
1ad0: 65 2e 20 20 53 65 65 20 61 6c 73 6f 20 73 71 6c e. See also sql
1ae0: 69 74 65 4d 61 6c 6c 6f 63 52 61 77 28 29 2e 0a iteMallocRaw()..
1af0: 2a 2f 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 */.void *sqlite3
1b00: 4d 61 6c 6c 6f 63 28 69 6e 74 20 6e 29 7b 0a 20 Malloc(int n){.
1b10: 20 76 6f 69 64 20 2a 70 3b 0a 20 20 69 66 28 20 void *p;. if(
1b20: 28 70 20 3d 20 6d 61 6c 6c 6f 63 28 6e 29 29 3d (p = malloc(n))=
1b30: 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 6e 3e =0 ){. if( n>
1b40: 30 20 29 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 0 ) sqlite3_mall
1b50: 6f 63 5f 66 61 69 6c 65 64 2b 2b 3b 0a 20 20 7d oc_failed++;. }
1b60: 65 6c 73 65 7b 0a 20 20 20 20 6d 65 6d 73 65 74 else{. memset
1b70: 28 70 2c 20 30 2c 20 6e 29 3b 0a 20 20 7d 0a 20 (p, 0, n);. }.
1b80: 20 72 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a return p;.}../*
1b90: 0a 2a 2a 20 41 6c 6c 6f 63 61 74 65 20 6e 65 77 .** Allocate new
1ba0: 20 6d 65 6d 6f 72 79 20 62 75 74 20 64 6f 20 6e memory but do n
1bb0: 6f 74 20 73 65 74 20 69 74 20 74 6f 20 7a 65 72 ot set it to zer
1bc0: 6f 2e 20 20 52 65 74 75 72 6e 20 4e 55 4c 4c 20 o. Return NULL
1bd0: 69 66 0a 2a 2a 20 6e 6f 20 6d 65 6d 6f 72 79 20 if.** no memory
1be0: 69 73 20 61 76 61 69 6c 61 62 6c 65 2e 20 20 53 is available. S
1bf0: 65 65 20 61 6c 73 6f 20 73 71 6c 69 74 65 4d 61 ee also sqliteMa
1c00: 6c 6c 6f 63 28 29 2e 0a 2a 2f 0a 76 6f 69 64 20 lloc()..*/.void
1c10: 2a 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 52 61 *sqlite3MallocRa
1c20: 77 28 69 6e 74 20 6e 29 7b 0a 20 20 76 6f 69 64 w(int n){. void
1c30: 20 2a 70 3b 0a 20 20 69 66 28 20 28 70 20 3d 20 *p;. if( (p =
1c40: 6d 61 6c 6c 6f 63 28 6e 29 29 3d 3d 30 20 29 7b malloc(n))==0 ){
1c50: 0a 20 20 20 20 69 66 28 20 6e 3e 30 20 29 20 73 . if( n>0 ) s
1c60: 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 5f 66 61 qlite3_malloc_fa
1c70: 69 6c 65 64 2b 2b 3b 0a 20 20 7d 0a 20 20 72 65 iled++;. }. re
1c80: 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a turn p;.}../*.**
1c90: 20 46 72 65 65 20 6d 65 6d 6f 72 79 20 70 72 65 Free memory pre
1ca0: 76 69 6f 75 73 6c 79 20 6f 62 74 61 69 6e 65 64 viously obtained
1cb0: 20 66 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c from sqliteMall
1cc0: 6f 63 28 29 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c oc().*/.void sql
1cd0: 69 74 65 33 46 72 65 65 58 28 76 6f 69 64 20 2a ite3FreeX(void *
1ce0: 70 29 7b 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 p){. if( p ){.
1cf0: 20 20 20 66 72 65 65 28 70 29 3b 0a 20 20 7d 0a free(p);. }.
1d00: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 73 69 7a 65 20 }../*.** Resize
1d10: 61 20 70 72 69 6f 72 20 61 6c 6c 6f 63 61 74 69 a prior allocati
1d20: 6f 6e 2e 20 20 49 66 20 70 3d 3d 30 2c 20 74 68 on. If p==0, th
1d30: 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 0a en this routine.
1d40: 2a 2a 20 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 ** works just li
1d50: 6b 65 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 ke sqliteMalloc(
1d60: 29 2e 20 20 49 66 20 6e 3d 3d 30 2c 20 74 68 65 ). If n==0, the
1d70: 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a n this routine.*
1d80: 2a 20 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 6b * works just lik
1d90: 65 20 73 71 6c 69 74 65 46 72 65 65 28 29 2e 0a e sqliteFree()..
1da0: 2a 2f 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 */.void *sqlite3
1db0: 52 65 61 6c 6c 6f 63 28 76 6f 69 64 20 2a 70 2c Realloc(void *p,
1dc0: 20 69 6e 74 20 6e 29 7b 0a 20 20 76 6f 69 64 20 int n){. void
1dd0: 2a 70 32 3b 0a 20 20 69 66 28 20 70 3d 3d 30 20 *p2;. if( p==0
1de0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 73 71 ){. return sq
1df0: 6c 69 74 65 4d 61 6c 6c 6f 63 28 6e 29 3b 0a 20 liteMalloc(n);.
1e00: 20 7d 0a 20 20 69 66 28 20 6e 3d 3d 30 20 29 7b }. if( n==0 ){
1e10: 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28 . sqliteFree(
1e20: 70 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 p);. return 0
1e30: 3b 0a 20 20 7d 0a 20 20 70 32 20 3d 20 72 65 61 ;. }. p2 = rea
1e40: 6c 6c 6f 63 28 70 2c 20 6e 29 3b 0a 20 20 69 66 lloc(p, n);. if
1e50: 28 20 70 32 3d 3d 30 20 29 7b 0a 20 20 20 20 69 ( p2==0 ){. i
1e60: 66 28 20 6e 3e 30 20 29 20 73 71 6c 69 74 65 33 f( n>0 ) sqlite3
1e70: 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 2b 2b _malloc_failed++
1e80: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 70 ;. }. return p
1e90: 32 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 2;.}../*.** Make
1ea0: 20 61 20 63 6f 70 79 20 6f 66 20 61 20 73 74 72 a copy of a str
1eb0: 69 6e 67 20 69 6e 20 6d 65 6d 6f 72 79 20 6f 62 ing in memory ob
1ec0: 74 61 69 6e 65 64 20 66 72 6f 6d 20 73 71 6c 69 tained from sqli
1ed0: 74 65 4d 61 6c 6c 6f 63 28 29 0a 2a 2f 0a 63 68 teMalloc().*/.ch
1ee0: 61 72 20 2a 73 71 6c 69 74 65 33 53 74 72 44 75 ar *sqlite3StrDu
1ef0: 70 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 29 p(const char *z)
1f00: 7b 0a 20 20 63 68 61 72 20 2a 7a 4e 65 77 3b 0a {. char *zNew;.
1f10: 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 if( z==0 ) ret
1f20: 75 72 6e 20 30 3b 0a 20 20 7a 4e 65 77 20 3d 20 urn 0;. zNew =
1f30: 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 52 61 77 28 sqliteMallocRaw(
1f40: 73 74 72 6c 65 6e 28 7a 29 2b 31 29 3b 0a 20 20 strlen(z)+1);.
1f50: 69 66 28 20 7a 4e 65 77 20 29 20 73 74 72 63 70 if( zNew ) strcp
1f60: 79 28 7a 4e 65 77 2c 20 7a 29 3b 0a 20 20 72 65 y(zNew, z);. re
1f70: 74 75 72 6e 20 7a 4e 65 77 3b 0a 7d 0a 63 68 61 turn zNew;.}.cha
1f80: 72 20 2a 73 71 6c 69 74 65 33 53 74 72 4e 44 75 r *sqlite3StrNDu
1f90: 70 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c p(const char *z,
1fa0: 20 69 6e 74 20 6e 29 7b 0a 20 20 63 68 61 72 20 int n){. char
1fb0: 2a 7a 4e 65 77 3b 0a 20 20 69 66 28 20 7a 3d 3d *zNew;. if( z==
1fc0: 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 0 ) return 0;.
1fd0: 7a 4e 65 77 20 3d 20 73 71 6c 69 74 65 4d 61 6c zNew = sqliteMal
1fe0: 6c 6f 63 52 61 77 28 6e 2b 31 29 3b 0a 20 20 69 locRaw(n+1);. i
1ff0: 66 28 20 7a 4e 65 77 20 29 7b 0a 20 20 20 20 6d f( zNew ){. m
2000: 65 6d 63 70 79 28 7a 4e 65 77 2c 20 7a 2c 20 6e emcpy(zNew, z, n
2010: 29 3b 0a 20 20 20 20 7a 4e 65 77 5b 6e 5d 20 3d );. zNew[n] =
2020: 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 0;. }. return
2030: 20 7a 4e 65 77 3b 0a 7d 0a 23 65 6e 64 69 66 20 zNew;.}.#endif
2040: 2f 2a 20 21 64 65 66 69 6e 65 64 28 53 51 4c 49 /* !defined(SQLI
2050: 54 45 5f 4d 45 4d 44 45 42 55 47 29 20 2a 2f 0a TE_MEMDEBUG) */.
2060: 0a 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 20 ./*.** Create a
2070: 73 74 72 69 6e 67 20 66 72 6f 6d 20 74 68 65 20 string from the
2080: 32 6e 64 20 61 6e 64 20 73 75 62 73 65 71 75 65 2nd and subseque
2090: 6e 74 20 61 72 67 75 6d 65 6e 74 73 20 28 75 70 nt arguments (up
20a0: 20 74 6f 20 74 68 65 0a 2a 2a 20 66 69 72 73 74 to the.** first
20b0: 20 4e 55 4c 4c 20 61 72 67 75 6d 65 6e 74 29 2c NULL argument),
20c0: 20 73 74 6f 72 65 20 74 68 65 20 73 74 72 69 6e store the strin
20d0: 67 20 69 6e 20 6d 65 6d 6f 72 79 20 6f 62 74 61 g in memory obta
20e0: 69 6e 65 64 20 66 72 6f 6d 0a 2a 2a 20 73 71 6c ined from.** sql
20f0: 69 74 65 4d 61 6c 6c 6f 63 28 29 20 61 6e 64 20 iteMalloc() and
2100: 6d 61 6b 65 20 74 68 65 20 70 6f 69 6e 74 65 72 make the pointer
2110: 20 69 6e 64 69 63 61 74 65 64 20 62 79 20 74 68 indicated by th
2120: 65 20 31 73 74 20 61 72 67 75 6d 65 6e 74 0a 2a e 1st argument.*
2130: 2a 20 70 6f 69 6e 74 20 74 6f 20 74 68 61 74 20 * point to that
2140: 73 74 72 69 6e 67 2e 20 20 54 68 65 20 31 73 74 string. The 1st
2150: 20 61 72 67 75 6d 65 6e 74 20 6d 75 73 74 20 65 argument must e
2160: 69 74 68 65 72 20 62 65 20 4e 55 4c 4c 20 6f 72 ither be NULL or
2170: 20 0a 2a 2a 20 70 6f 69 6e 74 20 74 6f 20 6d 65 .** point to me
2180: 6d 6f 72 79 20 6f 62 74 61 69 6e 65 64 20 66 72 mory obtained fr
2190: 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 om sqliteMalloc(
21a0: 29 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 )..*/.void sqlit
21b0: 65 33 53 65 74 53 74 72 69 6e 67 28 63 68 61 72 e3SetString(char
21c0: 20 2a 2a 70 7a 2c 20 63 6f 6e 73 74 20 63 68 61 **pz, const cha
21d0: 72 20 2a 7a 46 69 72 73 74 2c 20 2e 2e 2e 29 7b r *zFirst, ...){
21e0: 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 . va_list ap;.
21f0: 20 69 6e 74 20 6e 42 79 74 65 3b 0a 20 20 63 6f int nByte;. co
2200: 6e 73 74 20 63 68 61 72 20 2a 7a 3b 0a 20 20 63 nst char *z;. c
2210: 68 61 72 20 2a 7a 52 65 73 75 6c 74 3b 0a 0a 20 har *zResult;..
2220: 20 69 66 28 20 70 7a 3d 3d 30 20 29 20 72 65 74 if( pz==0 ) ret
2230: 75 72 6e 3b 0a 20 20 6e 42 79 74 65 20 3d 20 73 urn;. nByte = s
2240: 74 72 6c 65 6e 28 7a 46 69 72 73 74 29 20 2b 20 trlen(zFirst) +
2250: 31 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 1;. va_start(ap
2260: 2c 20 7a 46 69 72 73 74 29 3b 0a 20 20 77 68 69 , zFirst);. whi
2270: 6c 65 28 20 28 7a 20 3d 20 76 61 5f 61 72 67 28 le( (z = va_arg(
2280: 61 70 2c 20 63 6f 6e 73 74 20 63 68 61 72 2a 29 ap, const char*)
2290: 29 21 3d 30 20 29 7b 0a 20 20 20 20 6e 42 79 74 )!=0 ){. nByt
22a0: 65 20 2b 3d 20 73 74 72 6c 65 6e 28 7a 29 3b 0a e += strlen(z);.
22b0: 20 20 7d 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 }. va_end(ap)
22c0: 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 2a ;. sqliteFree(*
22d0: 70 7a 29 3b 0a 20 20 2a 70 7a 20 3d 20 7a 52 65 pz);. *pz = zRe
22e0: 73 75 6c 74 20 3d 20 73 71 6c 69 74 65 4d 61 6c sult = sqliteMal
22f0: 6c 6f 63 52 61 77 28 20 6e 42 79 74 65 20 29 3b locRaw( nByte );
2300: 0a 20 20 69 66 28 20 7a 52 65 73 75 6c 74 3d 3d . if( zResult==
2310: 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0 ){. return;
2320: 0a 20 20 7d 0a 20 20 73 74 72 63 70 79 28 7a 52 . }. strcpy(zR
2330: 65 73 75 6c 74 2c 20 7a 46 69 72 73 74 29 3b 0a esult, zFirst);.
2340: 20 20 7a 52 65 73 75 6c 74 20 2b 3d 20 73 74 72 zResult += str
2350: 6c 65 6e 28 7a 52 65 73 75 6c 74 29 3b 0a 20 20 len(zResult);.
2360: 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 69 va_start(ap, zFi
2370: 72 73 74 29 3b 0a 20 20 77 68 69 6c 65 28 20 28 rst);. while( (
2380: 7a 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 20 63 z = va_arg(ap, c
2390: 6f 6e 73 74 20 63 68 61 72 2a 29 29 21 3d 30 20 onst char*))!=0
23a0: 29 7b 0a 20 20 20 20 73 74 72 63 70 79 28 7a 52 ){. strcpy(zR
23b0: 65 73 75 6c 74 2c 20 7a 29 3b 0a 20 20 20 20 7a esult, z);. z
23c0: 52 65 73 75 6c 74 20 2b 3d 20 73 74 72 6c 65 6e Result += strlen
23d0: 28 7a 52 65 73 75 6c 74 29 3b 0a 20 20 7d 0a 20 (zResult);. }.
23e0: 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 23 69 66 va_end(ap);.#if
23f0: 64 65 66 20 53 51 4c 49 54 45 5f 44 45 42 55 47 def SQLITE_DEBUG
2400: 0a 23 69 66 20 53 51 4c 49 54 45 5f 44 45 42 55 .#if SQLITE_DEBU
2410: 47 3e 31 0a 20 20 66 70 72 69 6e 74 66 28 73 74 G>1. fprintf(st
2420: 64 65 72 72 2c 22 73 74 72 69 6e 67 20 61 74 20 derr,"string at
2430: 30 78 25 78 20 69 73 20 25 73 5c 6e 22 2c 20 28 0x%x is %s\n", (
2440: 69 6e 74 29 2a 70 7a 2c 20 2a 70 7a 29 3b 0a 23 int)*pz, *pz);.#
2450: 65 6e 64 69 66 0a 23 65 6e 64 69 66 0a 7d 0a 0a endif.#endif.}..
2460: 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 6d 6f /*.** Set the mo
2470: 73 74 20 72 65 63 65 6e 74 20 65 72 72 6f 72 20 st recent error
2480: 63 6f 64 65 20 61 6e 64 20 65 72 72 6f 72 20 73 code and error s
2490: 74 72 69 6e 67 20 66 6f 72 20 74 68 65 20 73 71 tring for the sq
24a0: 6c 69 74 65 0a 2a 2a 20 68 61 6e 64 6c 65 20 22 lite.** handle "
24b0: 64 62 22 2e 20 54 68 65 20 65 72 72 6f 72 20 63 db". The error c
24c0: 6f 64 65 20 69 73 20 73 65 74 20 74 6f 20 22 65 ode is set to "e
24d0: 72 72 5f 63 6f 64 65 22 2e 0a 2a 2a 0a 2a 2a 20 rr_code"..**.**
24e0: 49 66 20 69 74 20 69 73 20 6e 6f 74 20 4e 55 4c If it is not NUL
24f0: 4c 2c 20 73 74 72 69 6e 67 20 7a 46 6f 72 6d 61 L, string zForma
2500: 74 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 t specifies the
2510: 66 6f 72 6d 61 74 20 6f 66 20 74 68 65 0a 2a 2a format of the.**
2520: 20 65 72 72 6f 72 20 73 74 72 69 6e 67 20 69 6e error string in
2530: 20 74 68 65 20 73 74 79 6c 65 20 6f 66 20 74 68 the style of th
2540: 65 20 70 72 69 6e 74 66 20 66 75 6e 63 74 69 6f e printf functio
2550: 6e 73 3a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e ns: The followin
2560: 67 0a 2a 2a 20 66 6f 72 6d 61 74 20 63 68 61 72 g.** format char
2570: 61 63 74 65 72 73 20 61 72 65 20 61 6c 6c 6f 77 acters are allow
2580: 65 64 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 25 ed:.**.** %
2590: 73 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 20 s Insert a
25a0: 73 74 72 69 6e 67 0a 2a 2a 20 20 20 20 20 20 25 string.** %
25b0: 7a 20 20 20 20 20 20 41 20 73 74 72 69 6e 67 20 z A string
25c0: 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 20 66 that should be f
25d0: 72 65 65 64 20 61 66 74 65 72 20 75 73 65 0a 2a reed after use.*
25e0: 2a 20 20 20 20 20 20 25 64 20 20 20 20 20 20 49 * %d I
25f0: 6e 73 65 72 74 20 61 6e 20 69 6e 74 65 67 65 72 nsert an integer
2600: 0a 2a 2a 20 20 20 20 20 20 25 54 20 20 20 20 20 .** %T
2610: 20 49 6e 73 65 72 74 20 61 20 74 6f 6b 65 6e 0a Insert a token.
2620: 2a 2a 20 20 20 20 20 20 25 53 20 20 20 20 20 20 ** %S
2630: 49 6e 73 65 72 74 20 74 68 65 20 66 69 72 73 74 Insert the first
2640: 20 65 6c 65 6d 65 6e 74 20 6f 66 20 61 20 53 72 element of a Sr
2650: 63 4c 69 73 74 0a 2a 2a 0a 2a 2a 20 7a 46 6f 72 cList.**.** zFor
2660: 6d 61 74 20 61 6e 64 20 61 6e 79 20 73 74 72 69 mat and any stri
2670: 6e 67 20 74 6f 6b 65 6e 73 20 74 68 61 74 20 66 ng tokens that f
2680: 6f 6c 6c 6f 77 20 69 74 20 61 72 65 20 61 73 73 ollow it are ass
2690: 75 6d 65 64 20 74 6f 20 62 65 0a 2a 2a 20 65 6e umed to be.** en
26a0: 63 6f 64 65 64 20 69 6e 20 55 54 46 2d 38 2e 0a coded in UTF-8..
26b0: 2a 2a 0a 2a 2a 20 54 6f 20 63 6c 65 61 72 20 74 **.** To clear t
26c0: 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 20 65 he most recent e
26d0: 72 72 6f 72 20 66 6f 72 20 73 6c 71 69 74 65 20 rror for slqite
26e0: 68 61 6e 64 6c 65 20 22 64 62 22 2c 20 73 71 6c handle "db", sql
26f0: 69 74 65 33 45 72 72 6f 72 0a 2a 2a 20 73 68 6f ite3Error.** sho
2700: 75 6c 64 20 62 65 20 63 61 6c 6c 65 64 20 77 69 uld be called wi
2710: 74 68 20 65 72 72 5f 63 6f 64 65 20 73 65 74 20 th err_code set
2720: 74 6f 20 53 51 4c 49 54 45 5f 4f 4b 20 61 6e 64 to SQLITE_OK and
2730: 20 7a 46 6f 72 6d 61 74 20 73 65 74 0a 2a 2a 20 zFormat set.**
2740: 74 6f 20 4e 55 4c 4c 2e 0a 2a 2f 0a 76 6f 69 64 to NULL..*/.void
2750: 20 73 71 6c 69 74 65 33 45 72 72 6f 72 28 73 71 sqlite3Error(sq
2760: 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e 74 20 65 lite3 *db, int e
2770: 72 72 5f 63 6f 64 65 2c 20 63 6f 6e 73 74 20 63 rr_code, const c
2780: 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e har *zFormat, ..
2790: 2e 29 7b 0a 20 20 69 66 28 20 64 62 20 26 26 20 .){. if( db &&
27a0: 28 64 62 2d 3e 70 45 72 72 20 7c 7c 20 28 64 62 (db->pErr || (db
27b0: 2d 3e 70 45 72 72 20 3d 20 73 71 6c 69 74 65 33 ->pErr = sqlite3
27c0: 56 61 6c 75 65 4e 65 77 28 29 29 29 20 29 7b 0a ValueNew())) ){.
27d0: 20 20 20 20 64 62 2d 3e 65 72 72 43 6f 64 65 20 db->errCode
27e0: 3d 20 65 72 72 5f 63 6f 64 65 3b 0a 20 20 20 20 = err_code;.
27f0: 69 66 28 20 7a 46 6f 72 6d 61 74 20 29 7b 0a 20 if( zFormat ){.
2800: 20 20 20 20 20 63 68 61 72 20 2a 7a 3b 0a 20 20 char *z;.
2810: 20 20 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a va_list ap;.
2820: 20 20 20 20 20 20 76 61 5f 73 74 61 72 74 28 61 va_start(a
2830: 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 20 p, zFormat);.
2840: 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 56 4d z = sqlite3VM
2850: 50 72 69 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20 Printf(zFormat,
2860: 61 70 29 3b 0a 20 20 20 20 20 20 76 61 5f 65 6e ap);. va_en
2870: 64 28 61 70 29 3b 0a 20 20 20 20 20 20 73 71 6c d(ap);. sql
2880: 69 74 65 33 56 61 6c 75 65 53 65 74 53 74 72 28 ite3ValueSetStr(
2890: 64 62 2d 3e 70 45 72 72 2c 20 2d 31 2c 20 7a 2c db->pErr, -1, z,
28a0: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 73 71 SQLITE_UTF8, sq
28b0: 6c 69 74 65 33 46 72 65 65 58 29 3b 0a 20 20 20 lite3FreeX);.
28c0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 }else{. sq
28d0: 6c 69 74 65 33 56 61 6c 75 65 53 65 74 53 74 72 lite3ValueSetStr
28e0: 28 64 62 2d 3e 70 45 72 72 2c 20 30 2c 20 30 2c (db->pErr, 0, 0,
28f0: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 53 51 SQLITE_UTF8, SQ
2900: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 LITE_STATIC);.
2910: 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a }. }.}../*.**
2920: 20 41 64 64 20 61 6e 20 65 72 72 6f 72 20 6d 65 Add an error me
2930: 73 73 61 67 65 20 74 6f 20 70 50 61 72 73 65 2d ssage to pParse-
2940: 3e 7a 45 72 72 4d 73 67 20 61 6e 64 20 69 6e 63 >zErrMsg and inc
2950: 72 65 6d 65 6e 74 20 70 50 61 72 73 65 2d 3e 6e rement pParse->n
2960: 45 72 72 2e 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c Err..** The foll
2970: 6f 77 69 6e 67 20 66 6f 72 6d 61 74 74 69 6e 67 owing formatting
2980: 20 63 68 61 72 61 63 74 65 72 73 20 61 72 65 20 characters are
2990: 61 6c 6c 6f 77 65 64 3a 0a 2a 2a 0a 2a 2a 20 20 allowed:.**.**
29a0: 20 20 20 20 25 73 20 20 20 20 20 20 49 6e 73 65 %s Inse
29b0: 72 74 20 61 20 73 74 72 69 6e 67 0a 2a 2a 20 20 rt a string.**
29c0: 20 20 20 20 25 7a 20 20 20 20 20 20 41 20 73 74 %z A st
29d0: 72 69 6e 67 20 74 68 61 74 20 73 68 6f 75 6c 64 ring that should
29e0: 20 62 65 20 66 72 65 65 64 20 61 66 74 65 72 20 be freed after
29f0: 75 73 65 0a 2a 2a 20 20 20 20 20 20 25 64 20 20 use.** %d
2a00: 20 20 20 20 49 6e 73 65 72 74 20 61 6e 20 69 6e Insert an in
2a10: 74 65 67 65 72 0a 2a 2a 20 20 20 20 20 20 25 54 teger.** %T
2a20: 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 20 74 Insert a t
2a30: 6f 6b 65 6e 0a 2a 2a 20 20 20 20 20 20 25 53 20 oken.** %S
2a40: 20 20 20 20 20 49 6e 73 65 72 74 20 74 68 65 20 Insert the
2a50: 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20 6f 66 first element of
2a60: 20 61 20 53 72 63 4c 69 73 74 0a 2a 2a 0a 2a 2a a SrcList.**.**
2a70: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 73 This function s
2a80: 68 6f 75 6c 64 20 62 65 20 75 73 65 64 20 74 6f hould be used to
2a90: 20 72 65 70 6f 72 74 20 61 6e 79 20 65 72 72 6f report any erro
2aa0: 72 20 74 68 61 74 20 6f 63 63 75 72 73 20 77 68 r that occurs wh
2ab0: 69 6c 73 74 0a 2a 2a 20 63 6f 6d 70 69 6c 69 6e ilst.** compilin
2ac0: 67 20 61 6e 20 53 51 4c 20 73 74 61 74 65 6d 65 g an SQL stateme
2ad0: 6e 74 20 28 69 2e 65 2e 20 77 69 74 68 69 6e 20 nt (i.e. within
2ae0: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 sqlite3_prepare(
2af0: 29 29 2e 20 54 68 65 0a 2a 2a 20 6c 61 73 74 20 )). The.** last
2b00: 74 68 69 6e 67 20 74 68 65 20 73 71 6c 69 74 65 thing the sqlite
2b10: 33 5f 70 72 65 70 61 72 65 28 29 20 66 75 6e 63 3_prepare() func
2b20: 74 69 6f 6e 20 64 6f 65 73 20 69 73 20 63 6f 70 tion does is cop
2b30: 79 20 74 68 65 20 65 72 72 6f 72 0a 2a 2a 20 73 y the error.** s
2b40: 74 6f 72 65 64 20 62 79 20 74 68 69 73 20 66 75 tored by this fu
2b50: 6e 63 74 69 6f 6e 20 69 6e 74 6f 20 74 68 65 20 nction into the
2b60: 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65 20 database handle
2b70: 75 73 69 6e 67 20 73 71 6c 69 74 65 33 45 72 72 using sqlite3Err
2b80: 6f 72 28 29 2e 0a 2a 2a 20 46 75 6e 63 74 69 6f or()..** Functio
2b90: 6e 20 73 71 6c 69 74 65 33 45 72 72 6f 72 28 29 n sqlite3Error()
2ba0: 20 73 68 6f 75 6c 64 20 62 65 20 75 73 65 64 20 should be used
2bb0: 64 75 72 69 6e 67 20 73 74 61 74 65 6d 65 6e 74 during statement
2bc0: 20 65 78 65 63 75 74 69 6f 6e 0a 2a 2a 20 28 73 execution.** (s
2bd0: 71 6c 69 74 65 33 5f 73 74 65 70 28 29 20 65 74 qlite3_step() et
2be0: 63 2e 29 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c c.)..*/.void sql
2bf0: 69 74 65 33 45 72 72 6f 72 4d 73 67 28 50 61 72 ite3ErrorMsg(Par
2c00: 73 65 20 2a 70 50 61 72 73 65 2c 20 63 6f 6e 73 se *pParse, cons
2c10: 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c t char *zFormat,
2c20: 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 ...){. va_list
2c30: 20 61 70 3b 0a 20 20 70 50 61 72 73 65 2d 3e 6e ap;. pParse->n
2c40: 45 72 72 2b 2b 3b 0a 20 20 73 71 6c 69 74 65 46 Err++;. sqliteF
2c50: 72 65 65 28 70 50 61 72 73 65 2d 3e 7a 45 72 72 ree(pParse->zErr
2c60: 4d 73 67 29 3b 0a 20 20 76 61 5f 73 74 61 72 74 Msg);. va_start
2c70: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 (ap, zFormat);.
2c80: 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 pParse->zErrMsg
2c90: 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 69 6e = sqlite3VMPrin
2ca0: 74 66 28 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b tf(zFormat, ap);
2cb0: 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 7d . va_end(ap);.}
2cc0: 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 ../*.** Convert
2cd0: 61 6e 20 53 51 4c 2d 73 74 79 6c 65 20 71 75 6f an SQL-style quo
2ce0: 74 65 64 20 73 74 72 69 6e 67 20 69 6e 74 6f 20 ted string into
2cf0: 61 20 6e 6f 72 6d 61 6c 20 73 74 72 69 6e 67 20 a normal string
2d00: 62 79 20 72 65 6d 6f 76 69 6e 67 0a 2a 2a 20 74 by removing.** t
2d10: 68 65 20 71 75 6f 74 65 20 63 68 61 72 61 63 74 he quote charact
2d20: 65 72 73 2e 20 20 54 68 65 20 63 6f 6e 76 65 72 ers. The conver
2d30: 73 69 6f 6e 20 69 73 20 64 6f 6e 65 20 69 6e 2d sion is done in-
2d40: 70 6c 61 63 65 2e 20 20 49 66 20 74 68 65 0a 2a place. If the.*
2d50: 2a 20 69 6e 70 75 74 20 64 6f 65 73 20 6e 6f 74 * input does not
2d60: 20 62 65 67 69 6e 20 77 69 74 68 20 61 20 71 75 begin with a qu
2d70: 6f 74 65 20 63 68 61 72 61 63 74 65 72 2c 20 74 ote character, t
2d80: 68 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 hen this routine
2d90: 0a 2a 2a 20 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a .** is a no-op..
2da0: 2a 2a 0a 2a 2a 20 32 30 30 32 2d 46 65 62 2d 31 **.** 2002-Feb-1
2db0: 34 3a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 4: This routine
2dc0: 69 73 20 65 78 74 65 6e 64 65 64 20 74 6f 20 72 is extended to r
2dd0: 65 6d 6f 76 65 20 4d 53 2d 41 63 63 65 73 73 20 emove MS-Access
2de0: 73 74 79 6c 65 0a 2a 2a 20 62 72 61 63 6b 65 74 style.** bracket
2df0: 73 20 66 72 6f 6d 20 61 72 6f 75 6e 64 20 69 64 s from around id
2e00: 65 6e 74 69 66 65 72 73 2e 20 20 46 6f 72 20 65 entifers. For e
2e10: 78 61 6d 70 6c 65 3a 20 20 22 5b 61 2d 62 2d 63 xample: "[a-b-c
2e20: 5d 22 20 62 65 63 6f 6d 65 73 0a 2a 2a 20 22 61 ]" becomes.** "a
2e30: 2d 62 2d 63 22 2e 0a 2a 2f 0a 76 6f 69 64 20 73 -b-c"..*/.void s
2e40: 71 6c 69 74 65 33 44 65 71 75 6f 74 65 28 63 68 qlite3Dequote(ch
2e50: 61 72 20 2a 7a 29 7b 0a 20 20 69 6e 74 20 71 75 ar *z){. int qu
2e60: 6f 74 65 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b ote;. int i, j;
2e70: 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 . if( z==0 ) re
2e80: 74 75 72 6e 3b 0a 20 20 71 75 6f 74 65 20 3d 20 turn;. quote =
2e90: 7a 5b 30 5d 3b 0a 20 20 73 77 69 74 63 68 28 20 z[0];. switch(
2ea0: 71 75 6f 74 65 20 29 7b 0a 20 20 20 20 63 61 73 quote ){. cas
2eb0: 65 20 27 5c 27 27 3a 20 20 62 72 65 61 6b 3b 0a e '\'': break;.
2ec0: 20 20 20 20 63 61 73 65 20 27 22 27 3a 20 20 20 case '"':
2ed0: 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20 break;. case
2ee0: 27 5b 27 3a 20 20 20 71 75 6f 74 65 20 3d 20 27 '[': quote = '
2ef0: 5d 27 3b 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 ]'; break;.
2f00: 64 65 66 61 75 6c 74 3a 20 20 20 20 72 65 74 75 default: retu
2f10: 72 6e 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d rn;. }. for(i=
2f20: 31 2c 20 6a 3d 30 3b 20 7a 5b 69 5d 3b 20 69 2b 1, j=0; z[i]; i+
2f30: 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 5b 69 5d +){. if( z[i]
2f40: 3d 3d 71 75 6f 74 65 20 29 7b 0a 20 20 20 20 20 ==quote ){.
2f50: 20 69 66 28 20 7a 5b 69 2b 31 5d 3d 3d 71 75 6f if( z[i+1]==quo
2f60: 74 65 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b te ){. z[
2f70: 6a 2b 2b 5d 20 3d 20 71 75 6f 74 65 3b 0a 20 20 j++] = quote;.
2f80: 20 20 20 20 20 20 69 2b 2b 3b 0a 20 20 20 20 20 i++;.
2f90: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 }else{.
2fa0: 7a 5b 6a 2b 2b 5d 20 3d 20 30 3b 0a 20 20 20 20 z[j++] = 0;.
2fb0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 break;.
2fc0: 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }. }else{.
2fd0: 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a 5b 69 z[j++] = z[i
2fe0: 5d 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a ];. }. }.}..
2ff0: 2f 2a 20 41 6e 20 61 72 72 61 79 20 74 6f 20 6d /* An array to m
3000: 61 70 20 61 6c 6c 20 75 70 70 65 72 2d 63 61 73 ap all upper-cas
3010: 65 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 74 e characters int
3020: 6f 20 74 68 65 69 72 20 63 6f 72 72 65 73 70 6f o their correspo
3030: 6e 64 69 6e 67 0a 2a 2a 20 6c 6f 77 65 72 2d 63 nding.** lower-c
3040: 61 73 65 20 63 68 61 72 61 63 74 65 72 2e 20 0a ase character. .
3050: 2a 2f 0a 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 */.const unsigne
3060: 64 20 63 68 61 72 20 73 71 6c 69 74 65 33 55 70 d char sqlite3Up
3070: 70 65 72 54 6f 4c 6f 77 65 72 5b 5d 20 3d 20 7b perToLower[] = {
3080: 0a 20 20 20 20 20 20 30 2c 20 20 31 2c 20 20 32 . 0, 1, 2
3090: 2c 20 20 33 2c 20 20 34 2c 20 20 35 2c 20 20 36 , 3, 4, 5, 6
30a0: 2c 20 20 37 2c 20 20 38 2c 20 20 39 2c 20 31 30 , 7, 8, 9, 10
30b0: 2c 20 31 31 2c 20 31 32 2c 20 31 33 2c 20 31 34 , 11, 12, 13, 14
30c0: 2c 20 31 35 2c 20 31 36 2c 20 31 37 2c 0a 20 20 , 15, 16, 17,.
30d0: 20 20 20 31 38 2c 20 31 39 2c 20 32 30 2c 20 32 18, 19, 20, 2
30e0: 31 2c 20 32 32 2c 20 32 33 2c 20 32 34 2c 20 32 1, 22, 23, 24, 2
30f0: 35 2c 20 32 36 2c 20 32 37 2c 20 32 38 2c 20 32 5, 26, 27, 28, 2
3100: 39 2c 20 33 30 2c 20 33 31 2c 20 33 32 2c 20 33 9, 30, 31, 32, 3
3110: 33 2c 20 33 34 2c 20 33 35 2c 0a 20 20 20 20 20 3, 34, 35,.
3120: 33 36 2c 20 33 37 2c 20 33 38 2c 20 33 39 2c 20 36, 37, 38, 39,
3130: 34 30 2c 20 34 31 2c 20 34 32 2c 20 34 33 2c 20 40, 41, 42, 43,
3140: 34 34 2c 20 34 35 2c 20 34 36 2c 20 34 37 2c 20 44, 45, 46, 47,
3150: 34 38 2c 20 34 39 2c 20 35 30 2c 20 35 31 2c 20 48, 49, 50, 51,
3160: 35 32 2c 20 35 33 2c 0a 20 20 20 20 20 35 34 2c 52, 53,. 54,
3170: 20 35 35 2c 20 35 36 2c 20 35 37 2c 20 35 38 2c 55, 56, 57, 58,
3180: 20 35 39 2c 20 36 30 2c 20 36 31 2c 20 36 32 2c 59, 60, 61, 62,
3190: 20 36 33 2c 20 36 34 2c 20 39 37 2c 20 39 38 2c 63, 64, 97, 98,
31a0: 20 39 39 2c 31 30 30 2c 31 30 31 2c 31 30 32 2c 99,100,101,102,
31b0: 31 30 33 2c 0a 20 20 20 20 31 30 34 2c 31 30 35 103,. 104,105
31c0: 2c 31 30 36 2c 31 30 37 2c 31 30 38 2c 31 30 39 ,106,107,108,109
31d0: 2c 31 31 30 2c 31 31 31 2c 31 31 32 2c 31 31 33 ,110,111,112,113
31e0: 2c 31 31 34 2c 31 31 35 2c 31 31 36 2c 31 31 37 ,114,115,116,117
31f0: 2c 31 31 38 2c 31 31 39 2c 31 32 30 2c 31 32 31 ,118,119,120,121
3200: 2c 0a 20 20 20 20 31 32 32 2c 20 39 31 2c 20 39 ,. 122, 91, 9
3210: 32 2c 20 39 33 2c 20 39 34 2c 20 39 35 2c 20 39 2, 93, 94, 95, 9
3220: 36 2c 20 39 37 2c 20 39 38 2c 20 39 39 2c 31 30 6, 97, 98, 99,10
3230: 30 2c 31 30 31 2c 31 30 32 2c 31 30 33 2c 31 30 0,101,102,103,10
3240: 34 2c 31 30 35 2c 31 30 36 2c 31 30 37 2c 0a 20 4,105,106,107,.
3250: 20 20 20 31 30 38 2c 31 30 39 2c 31 31 30 2c 31 108,109,110,1
3260: 31 31 2c 31 31 32 2c 31 31 33 2c 31 31 34 2c 31 11,112,113,114,1
3270: 31 35 2c 31 31 36 2c 31 31 37 2c 31 31 38 2c 31 15,116,117,118,1
3280: 31 39 2c 31 32 30 2c 31 32 31 2c 31 32 32 2c 31 19,120,121,122,1
3290: 32 33 2c 31 32 34 2c 31 32 35 2c 0a 20 20 20 20 23,124,125,.
32a0: 31 32 36 2c 31 32 37 2c 31 32 38 2c 31 32 39 2c 126,127,128,129,
32b0: 31 33 30 2c 31 33 31 2c 31 33 32 2c 31 33 33 2c 130,131,132,133,
32c0: 31 33 34 2c 31 33 35 2c 31 33 36 2c 31 33 37 2c 134,135,136,137,
32d0: 31 33 38 2c 31 33 39 2c 31 34 30 2c 31 34 31 2c 138,139,140,141,
32e0: 31 34 32 2c 31 34 33 2c 0a 20 20 20 20 31 34 34 142,143,. 144
32f0: 2c 31 34 35 2c 31 34 36 2c 31 34 37 2c 31 34 38 ,145,146,147,148
3300: 2c 31 34 39 2c 31 35 30 2c 31 35 31 2c 31 35 32 ,149,150,151,152
3310: 2c 31 35 33 2c 31 35 34 2c 31 35 35 2c 31 35 36 ,153,154,155,156
3320: 2c 31 35 37 2c 31 35 38 2c 31 35 39 2c 31 36 30 ,157,158,159,160
3330: 2c 31 36 31 2c 0a 20 20 20 20 31 36 32 2c 31 36 ,161,. 162,16
3340: 33 2c 31 36 34 2c 31 36 35 2c 31 36 36 2c 31 36 3,164,165,166,16
3350: 37 2c 31 36 38 2c 31 36 39 2c 31 37 30 2c 31 37 7,168,169,170,17
3360: 31 2c 31 37 32 2c 31 37 33 2c 31 37 34 2c 31 37 1,172,173,174,17
3370: 35 2c 31 37 36 2c 31 37 37 2c 31 37 38 2c 31 37 5,176,177,178,17
3380: 39 2c 0a 20 20 20 20 31 38 30 2c 31 38 31 2c 31 9,. 180,181,1
3390: 38 32 2c 31 38 33 2c 31 38 34 2c 31 38 35 2c 31 82,183,184,185,1
33a0: 38 36 2c 31 38 37 2c 31 38 38 2c 31 38 39 2c 31 86,187,188,189,1
33b0: 39 30 2c 31 39 31 2c 31 39 32 2c 31 39 33 2c 31 90,191,192,193,1
33c0: 39 34 2c 31 39 35 2c 31 39 36 2c 31 39 37 2c 0a 94,195,196,197,.
33d0: 20 20 20 20 31 39 38 2c 31 39 39 2c 32 30 30 2c 198,199,200,
33e0: 32 30 31 2c 32 30 32 2c 32 30 33 2c 32 30 34 2c 201,202,203,204,
33f0: 32 30 35 2c 32 30 36 2c 32 30 37 2c 32 30 38 2c 205,206,207,208,
3400: 32 30 39 2c 32 31 30 2c 32 31 31 2c 32 31 32 2c 209,210,211,212,
3410: 32 31 33 2c 32 31 34 2c 32 31 35 2c 0a 20 20 20 213,214,215,.
3420: 20 32 31 36 2c 32 31 37 2c 32 31 38 2c 32 31 39 216,217,218,219
3430: 2c 32 32 30 2c 32 32 31 2c 32 32 32 2c 32 32 33 ,220,221,222,223
3440: 2c 32 32 34 2c 32 32 35 2c 32 32 36 2c 32 32 37 ,224,225,226,227
3450: 2c 32 32 38 2c 32 32 39 2c 32 33 30 2c 32 33 31 ,228,229,230,231
3460: 2c 32 33 32 2c 32 33 33 2c 0a 20 20 20 20 32 33 ,232,233,. 23
3470: 34 2c 32 33 35 2c 32 33 36 2c 32 33 37 2c 32 33 4,235,236,237,23
3480: 38 2c 32 33 39 2c 32 34 30 2c 32 34 31 2c 32 34 8,239,240,241,24
3490: 32 2c 32 34 33 2c 32 34 34 2c 32 34 35 2c 32 34 2,243,244,245,24
34a0: 36 2c 32 34 37 2c 32 34 38 2c 32 34 39 2c 32 35 6,247,248,249,25
34b0: 30 2c 32 35 31 2c 0a 20 20 20 20 32 35 32 2c 32 0,251,. 252,2
34c0: 35 33 2c 32 35 34 2c 32 35 35 0a 7d 3b 0a 23 64 53,254,255.};.#d
34d0: 65 66 69 6e 65 20 55 70 70 65 72 54 6f 4c 6f 77 efine UpperToLow
34e0: 65 72 20 73 71 6c 69 74 65 33 55 70 70 65 72 54 er sqlite3UpperT
34f0: 6f 4c 6f 77 65 72 0a 0a 2f 2a 0a 2a 2a 20 53 6f oLower../*.** So
3500: 6d 65 20 73 79 73 74 65 6d 73 20 68 61 76 65 20 me systems have
3510: 73 74 72 69 63 6d 70 28 29 2e 20 20 4f 74 68 65 stricmp(). Othe
3520: 72 73 20 68 61 76 65 20 73 74 72 63 61 73 65 63 rs have strcasec
3530: 6d 70 28 29 2e 20 20 42 65 63 61 75 73 65 0a 2a mp(). Because.*
3540: 2a 20 74 68 65 72 65 20 69 73 20 6e 6f 20 63 6f * there is no co
3550: 6e 73 69 73 74 65 6e 63 79 2c 20 77 65 20 77 69 nsistency, we wi
3560: 6c 6c 20 64 65 66 69 6e 65 20 6f 75 72 20 6f 77 ll define our ow
3570: 6e 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 n..*/.int sqlite
3580: 33 53 74 72 49 43 6d 70 28 63 6f 6e 73 74 20 63 3StrICmp(const c
3590: 68 61 72 20 2a 7a 4c 65 66 74 2c 20 63 6f 6e 73 har *zLeft, cons
35a0: 74 20 63 68 61 72 20 2a 7a 52 69 67 68 74 29 7b t char *zRight){
35b0: 0a 20 20 72 65 67 69 73 74 65 72 20 75 6e 73 69 . register unsi
35c0: 67 6e 65 64 20 63 68 61 72 20 2a 61 2c 20 2a 62 gned char *a, *b
35d0: 3b 0a 20 20 61 20 3d 20 28 75 6e 73 69 67 6e 65 ;. a = (unsigne
35e0: 64 20 63 68 61 72 20 2a 29 7a 4c 65 66 74 3b 0a d char *)zLeft;.
35f0: 20 20 62 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 b = (unsigned
3600: 63 68 61 72 20 2a 29 7a 52 69 67 68 74 3b 0a 20 char *)zRight;.
3610: 20 77 68 69 6c 65 28 20 2a 61 21 3d 30 20 26 26 while( *a!=0 &&
3620: 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 61 UpperToLower[*a
3630: 5d 3d 3d 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b ]==UpperToLower[
3640: 2a 62 5d 29 7b 20 61 2b 2b 3b 20 62 2b 2b 3b 20 *b]){ a++; b++;
3650: 7d 0a 20 20 72 65 74 75 72 6e 20 55 70 70 65 72 }. return Upper
3660: 54 6f 4c 6f 77 65 72 5b 2a 61 5d 20 2d 20 55 70 ToLower[*a] - Up
3670: 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 62 5d 3b 0a perToLower[*b];.
3680: 7d 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 74 72 }.int sqlite3Str
3690: 4e 49 43 6d 70 28 63 6f 6e 73 74 20 63 68 61 72 NICmp(const char
36a0: 20 2a 7a 4c 65 66 74 2c 20 63 6f 6e 73 74 20 63 *zLeft, const c
36b0: 68 61 72 20 2a 7a 52 69 67 68 74 2c 20 69 6e 74 har *zRight, int
36c0: 20 4e 29 7b 0a 20 20 72 65 67 69 73 74 65 72 20 N){. register
36d0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 61 unsigned char *a
36e0: 2c 20 2a 62 3b 0a 20 20 61 20 3d 20 28 75 6e 73 , *b;. a = (uns
36f0: 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a 4c 65 igned char *)zLe
3700: 66 74 3b 0a 20 20 62 20 3d 20 28 75 6e 73 69 67 ft;. b = (unsig
3710: 6e 65 64 20 63 68 61 72 20 2a 29 7a 52 69 67 68 ned char *)zRigh
3720: 74 3b 0a 20 20 77 68 69 6c 65 28 20 4e 2d 2d 20 t;. while( N--
3730: 3e 20 30 20 26 26 20 2a 61 21 3d 30 20 26 26 20 > 0 && *a!=0 &&
3740: 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 61 5d UpperToLower[*a]
3750: 3d 3d 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a ==UpperToLower[*
3760: 62 5d 29 7b 20 61 2b 2b 3b 20 62 2b 2b 3b 20 7d b]){ a++; b++; }
3770: 0a 20 20 72 65 74 75 72 6e 20 4e 3c 30 20 3f 20 . return N<0 ?
3780: 30 20 3a 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 0 : UpperToLower
3790: 5b 2a 61 5d 20 2d 20 55 70 70 65 72 54 6f 4c 6f [*a] - UpperToLo
37a0: 77 65 72 5b 2a 62 5d 3b 0a 7d 0a 0a 2f 2a 0a 2a wer[*b];.}../*.*
37b0: 2a 20 52 65 74 75 72 6e 20 54 52 55 45 20 69 66 * Return TRUE if
37c0: 20 7a 20 69 73 20 61 20 70 75 72 65 20 6e 75 6d z is a pure num
37d0: 65 72 69 63 20 73 74 72 69 6e 67 2e 20 20 52 65 eric string. Re
37e0: 74 75 72 6e 20 46 41 4c 53 45 20 69 66 20 74 68 turn FALSE if th
37f0: 65 0a 2a 2a 20 73 74 72 69 6e 67 20 63 6f 6e 74 e.** string cont
3800: 61 69 6e 73 20 61 6e 79 20 63 68 61 72 61 63 74 ains any charact
3810: 65 72 20 77 68 69 63 68 20 69 73 20 6e 6f 74 20 er which is not
3820: 70 61 72 74 20 6f 66 20 61 20 6e 75 6d 62 65 72 part of a number
3830: 2e 20 49 66 0a 2a 2a 20 74 68 65 20 73 74 72 69 . If.** the stri
3840: 6e 67 20 69 73 20 6e 75 6d 65 72 69 63 20 61 6e ng is numeric an
3850: 64 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20 27 d contains the '
3860: 2e 27 20 63 68 61 72 61 63 74 65 72 2c 20 73 65 .' character, se
3870: 74 20 2a 72 65 61 6c 6e 75 6d 0a 2a 2a 20 74 6f t *realnum.** to
3880: 20 54 52 55 45 20 28 6f 74 68 65 72 77 69 73 65 TRUE (otherwise
3890: 20 46 41 4c 53 45 29 2e 0a 2a 2a 0a 2a 2a 20 41 FALSE)..**.** A
38a0: 6e 20 65 6d 70 74 79 20 73 74 72 69 6e 67 20 69 n empty string i
38b0: 73 20 63 6f 6e 73 69 64 65 72 65 64 20 6e 6f 6e s considered non
38c0: 2d 6e 75 6d 65 72 69 63 2e 0a 2a 2f 0a 69 6e 74 -numeric..*/.int
38d0: 20 73 71 6c 69 74 65 33 49 73 4e 75 6d 62 65 72 sqlite3IsNumber
38e0: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c 20 (const char *z,
38f0: 69 6e 74 20 2a 72 65 61 6c 6e 75 6d 2c 20 75 38 int *realnum, u8
3900: 20 65 6e 63 29 7b 0a 20 20 69 6e 74 20 69 6e 63 enc){. int inc
3910: 72 20 3d 20 28 65 6e 63 3d 3d 53 51 4c 49 54 45 r = (enc==SQLITE
3920: 5f 55 54 46 38 3f 31 3a 32 29 3b 0a 20 20 69 66 _UTF8?1:2);. if
3930: 28 20 65 6e 63 3d 3d 53 51 4c 49 54 45 5f 55 54 ( enc==SQLITE_UT
3940: 46 31 36 42 45 20 29 20 7a 2b 2b 3b 0a 20 20 69 F16BE ) z++;. i
3950: 66 28 20 2a 7a 3d 3d 27 2d 27 20 7c 7c 20 2a 7a f( *z=='-' || *z
3960: 3d 3d 27 2b 27 20 29 20 7a 20 2b 3d 20 69 6e 63 =='+' ) z += inc
3970: 72 3b 0a 20 20 69 66 28 20 21 69 73 64 69 67 69 r;. if( !isdigi
3980: 74 28 2a 28 75 38 2a 29 7a 29 20 29 7b 0a 20 20 t(*(u8*)z) ){.
3990: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a return 0;. }.
39a0: 20 20 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 69 z += incr;. i
39b0: 66 28 20 72 65 61 6c 6e 75 6d 20 29 20 2a 72 65 f( realnum ) *re
39c0: 61 6c 6e 75 6d 20 3d 20 30 3b 0a 20 20 77 68 69 alnum = 0;. whi
39d0: 6c 65 28 20 69 73 64 69 67 69 74 28 2a 28 75 38 le( isdigit(*(u8
39e0: 2a 29 7a 29 20 29 7b 20 7a 20 2b 3d 20 69 6e 63 *)z) ){ z += inc
39f0: 72 3b 20 7d 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 r; }. if( *z=='
3a00: 2e 27 20 29 7b 0a 20 20 20 20 7a 20 2b 3d 20 69 .' ){. z += i
3a10: 6e 63 72 3b 0a 20 20 20 20 69 66 28 20 21 69 73 ncr;. if( !is
3a20: 64 69 67 69 74 28 2a 28 75 38 2a 29 7a 29 20 29 digit(*(u8*)z) )
3a30: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 77 return 0;. w
3a40: 68 69 6c 65 28 20 69 73 64 69 67 69 74 28 2a 28 hile( isdigit(*(
3a50: 75 38 2a 29 7a 29 20 29 7b 20 7a 20 2b 3d 20 69 u8*)z) ){ z += i
3a60: 6e 63 72 3b 20 7d 0a 20 20 20 20 69 66 28 20 72 ncr; }. if( r
3a70: 65 61 6c 6e 75 6d 20 29 20 2a 72 65 61 6c 6e 75 ealnum ) *realnu
3a80: 6d 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 69 66 28 m = 1;. }. if(
3a90: 20 2a 7a 3d 3d 27 65 27 20 7c 7c 20 2a 7a 3d 3d *z=='e' || *z==
3aa0: 27 45 27 20 29 7b 0a 20 20 20 20 7a 20 2b 3d 20 'E' ){. z +=
3ab0: 69 6e 63 72 3b 0a 20 20 20 20 69 66 28 20 2a 7a incr;. if( *z
3ac0: 3d 3d 27 2b 27 20 7c 7c 20 2a 7a 3d 3d 27 2d 27 =='+' || *z=='-'
3ad0: 20 29 20 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 ) z += incr;.
3ae0: 20 20 69 66 28 20 21 69 73 64 69 67 69 74 28 2a if( !isdigit(*
3af0: 28 75 38 2a 29 7a 29 20 29 20 72 65 74 75 72 6e (u8*)z) ) return
3b00: 20 30 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 69 0;. while( i
3b10: 73 64 69 67 69 74 28 2a 28 75 38 2a 29 7a 29 20 sdigit(*(u8*)z)
3b20: 29 7b 20 7a 20 2b 3d 20 69 6e 63 72 3b 20 7d 0a ){ z += incr; }.
3b30: 20 20 20 20 69 66 28 20 72 65 61 6c 6e 75 6d 20 if( realnum
3b40: 29 20 2a 72 65 61 6c 6e 75 6d 20 3d 20 31 3b 0a ) *realnum = 1;.
3b50: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 2a 7a 3d }. return *z=
3b60: 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 =0;.}../*.** The
3b70: 20 73 74 72 69 6e 67 20 7a 5b 5d 20 69 73 20 61 string z[] is a
3b80: 6e 20 61 73 63 69 69 20 72 65 70 72 65 73 65 6e n ascii represen
3b90: 74 61 74 69 6f 6e 20 6f 66 20 61 20 72 65 61 6c tation of a real
3ba0: 20 6e 75 6d 62 65 72 2e 0a 2a 2a 20 43 6f 6e 76 number..** Conv
3bb0: 65 72 74 20 74 68 69 73 20 73 74 72 69 6e 67 20 ert this string
3bc0: 74 6f 20 61 20 64 6f 75 62 6c 65 2e 0a 2a 2a 0a to a double..**.
3bd0: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 ** This routine
3be0: 61 73 73 75 6d 65 73 20 74 68 61 74 20 7a 5b 5d assumes that z[]
3bf0: 20 72 65 61 6c 6c 79 20 69 73 20 61 20 76 61 6c really is a val
3c00: 69 64 20 6e 75 6d 62 65 72 2e 20 20 49 66 20 69 id number. If i
3c10: 74 0a 2a 2a 20 69 73 20 6e 6f 74 2c 20 74 68 65 t.** is not, the
3c20: 20 72 65 73 75 6c 74 20 69 73 20 75 6e 64 65 66 result is undef
3c30: 69 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 ined..**.** This
3c40: 20 72 6f 75 74 69 6e 65 20 69 73 20 75 73 65 64 routine is used
3c50: 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 instead of the
3c60: 6c 69 62 72 61 72 79 20 61 74 6f 66 28 29 20 66 library atof() f
3c70: 75 6e 63 74 69 6f 6e 20 62 65 63 61 75 73 65 0a unction because.
3c80: 2a 2a 20 74 68 65 20 6c 69 62 72 61 72 79 20 61 ** the library a
3c90: 74 6f 66 28 29 20 6d 69 67 68 74 20 77 61 6e 74 tof() might want
3ca0: 20 74 6f 20 75 73 65 20 22 2c 22 20 61 73 20 74 to use "," as t
3cb0: 68 65 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 he decimal point
3cc0: 20 69 6e 73 74 65 61 64 0a 2a 2a 20 6f 66 20 22 instead.** of "
3cd0: 2e 22 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 ." depending on
3ce0: 68 6f 77 20 6c 6f 63 61 6c 65 20 69 73 20 73 65 how locale is se
3cf0: 74 2e 20 20 42 75 74 20 74 68 61 74 20 77 6f 75 t. But that wou
3d00: 6c 64 20 63 61 75 73 65 20 70 72 6f 62 6c 65 6d ld cause problem
3d10: 73 0a 2a 2a 20 66 6f 72 20 53 51 4c 2e 20 20 53 s.** for SQL. S
3d20: 6f 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 61 o this routine a
3d30: 6c 77 61 79 73 20 75 73 65 73 20 22 2e 22 20 72 lways uses "." r
3d40: 65 67 61 72 64 6c 65 73 73 20 6f 66 20 6c 6f 63 egardless of loc
3d50: 61 6c 65 2e 0a 2a 2f 0a 64 6f 75 62 6c 65 20 73 ale..*/.double s
3d60: 71 6c 69 74 65 33 41 74 6f 46 28 63 6f 6e 73 74 qlite3AtoF(const
3d70: 20 63 68 61 72 20 2a 7a 2c 20 63 6f 6e 73 74 20 char *z, const
3d80: 63 68 61 72 20 2a 2a 70 7a 45 6e 64 29 7b 0a 20 char **pzEnd){.
3d90: 20 69 6e 74 20 73 69 67 6e 20 3d 20 31 3b 0a 20 int sign = 1;.
3da0: 20 4c 4f 4e 47 44 4f 55 42 4c 45 5f 54 59 50 45 LONGDOUBLE_TYPE
3db0: 20 76 31 20 3d 20 30 2e 30 3b 0a 20 20 69 66 28 v1 = 0.0;. if(
3dc0: 20 2a 7a 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20 *z=='-' ){.
3dd0: 73 69 67 6e 20 3d 20 2d 31 3b 0a 20 20 20 20 7a sign = -1;. z
3de0: 2b 2b 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 ++;. }else if(
3df0: 2a 7a 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 7a *z=='+' ){. z
3e00: 2b 2b 3b 0a 20 20 7d 0a 20 20 77 68 69 6c 65 28 ++;. }. while(
3e10: 20 69 73 64 69 67 69 74 28 2a 28 75 38 2a 29 7a isdigit(*(u8*)z
3e20: 29 20 29 7b 0a 20 20 20 20 76 31 20 3d 20 76 31 ) ){. v1 = v1
3e30: 2a 31 30 2e 30 20 2b 20 28 2a 7a 20 2d 20 27 30 *10.0 + (*z - '0
3e40: 27 29 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d ');. z++;. }
3e50: 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 2e 27 20 29 . if( *z=='.' )
3e60: 7b 0a 20 20 20 20 4c 4f 4e 47 44 4f 55 42 4c 45 {. LONGDOUBLE
3e70: 5f 54 59 50 45 20 64 69 76 69 73 6f 72 20 3d 20 _TYPE divisor =
3e80: 31 2e 30 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 1.0;. z++;.
3e90: 20 20 77 68 69 6c 65 28 20 69 73 64 69 67 69 74 while( isdigit
3ea0: 28 2a 28 75 38 2a 29 7a 29 20 29 7b 0a 20 20 20 (*(u8*)z) ){.
3eb0: 20 20 20 76 31 20 3d 20 76 31 2a 31 30 2e 30 20 v1 = v1*10.0
3ec0: 2b 20 28 2a 7a 20 2d 20 27 30 27 29 3b 0a 20 20 + (*z - '0');.
3ed0: 20 20 20 20 64 69 76 69 73 6f 72 20 2a 3d 20 31 divisor *= 1
3ee0: 30 2e 30 3b 0a 20 20 20 20 20 20 7a 2b 2b 3b 0a 0.0;. z++;.
3ef0: 20 20 20 20 7d 0a 20 20 20 20 76 31 20 2f 3d 20 }. v1 /=
3f00: 64 69 76 69 73 6f 72 3b 0a 20 20 7d 0a 20 20 69 divisor;. }. i
3f10: 66 28 20 2a 7a 3d 3d 27 65 27 20 7c 7c 20 2a 7a f( *z=='e' || *z
3f20: 3d 3d 27 45 27 20 29 7b 0a 20 20 20 20 69 6e 74 =='E' ){. int
3f30: 20 65 73 69 67 6e 20 3d 20 31 3b 0a 20 20 20 20 esign = 1;.
3f40: 69 6e 74 20 65 76 61 6c 20 3d 20 30 3b 0a 20 20 int eval = 0;.
3f50: 20 20 4c 4f 4e 47 44 4f 55 42 4c 45 5f 54 59 50 LONGDOUBLE_TYP
3f60: 45 20 73 63 61 6c 65 20 3d 20 31 2e 30 3b 0a 20 E scale = 1.0;.
3f70: 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 69 66 28 20 z++;. if(
3f80: 2a 7a 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20 20 *z=='-' ){.
3f90: 20 65 73 69 67 6e 20 3d 20 2d 31 3b 0a 20 20 20 esign = -1;.
3fa0: 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 7d 65 6c 73 z++;. }els
3fb0: 65 20 69 66 28 20 2a 7a 3d 3d 27 2b 27 20 29 7b e if( *z=='+' ){
3fc0: 0a 20 20 20 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 . z++;.
3fd0: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 69 73 64 }. while( isd
3fe0: 69 67 69 74 28 2a 28 75 38 2a 29 7a 29 20 29 7b igit(*(u8*)z) ){
3ff0: 0a 20 20 20 20 20 20 65 76 61 6c 20 3d 20 65 76 . eval = ev
4000: 61 6c 2a 31 30 20 2b 20 2a 7a 20 2d 20 27 30 27 al*10 + *z - '0'
4010: 3b 0a 20 20 20 20 20 20 7a 2b 2b 3b 0a 20 20 20 ;. z++;.
4020: 20 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 65 76 }. while( ev
4030: 61 6c 3e 3d 36 34 20 29 7b 20 73 63 61 6c 65 20 al>=64 ){ scale
4040: 2a 3d 20 31 2e 30 65 2b 36 34 3b 20 65 76 61 6c *= 1.0e+64; eval
4050: 20 2d 3d 20 36 34 3b 20 7d 0a 20 20 20 20 77 68 -= 64; }. wh
4060: 69 6c 65 28 20 65 76 61 6c 3e 3d 31 36 20 29 7b ile( eval>=16 ){
4070: 20 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 2b 31 scale *= 1.0e+1
4080: 36 3b 20 65 76 61 6c 20 2d 3d 20 31 36 3b 20 7d 6; eval -= 16; }
4090: 0a 20 20 20 20 77 68 69 6c 65 28 20 65 76 61 6c . while( eval
40a0: 3e 3d 34 20 29 7b 20 73 63 61 6c 65 20 2a 3d 20 >=4 ){ scale *=
40b0: 31 2e 30 65 2b 34 3b 20 65 76 61 6c 20 2d 3d 20 1.0e+4; eval -=
40c0: 34 3b 20 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 4; }. while(
40d0: 65 76 61 6c 3e 3d 31 20 29 7b 20 73 63 61 6c 65 eval>=1 ){ scale
40e0: 20 2a 3d 20 31 2e 30 65 2b 31 3b 20 65 76 61 6c *= 1.0e+1; eval
40f0: 20 2d 3d 20 31 3b 20 7d 0a 20 20 20 20 69 66 28 -= 1; }. if(
4100: 20 65 73 69 67 6e 3c 30 20 29 7b 0a 20 20 20 20 esign<0 ){.
4110: 20 20 76 31 20 2f 3d 20 73 63 61 6c 65 3b 0a 20 v1 /= scale;.
4120: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
4130: 76 31 20 2a 3d 20 73 63 61 6c 65 3b 0a 20 20 20 v1 *= scale;.
4140: 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 70 7a 45 }. }. if( pzE
4150: 6e 64 20 29 20 2a 70 7a 45 6e 64 20 3d 20 7a 3b nd ) *pzEnd = z;
4160: 0a 20 20 72 65 74 75 72 6e 20 73 69 67 6e 3c 30 . return sign<0
4170: 20 3f 20 2d 76 31 20 3a 20 76 31 3b 0a 7d 0a 0a ? -v1 : v1;.}..
4180: 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55 /*.** Return TRU
4190: 45 20 69 66 20 7a 4e 75 6d 20 69 73 20 61 20 36 E if zNum is a 6
41a0: 34 2d 62 69 74 20 73 69 67 6e 65 64 20 69 6e 74 4-bit signed int
41b0: 65 67 65 72 20 61 6e 64 20 77 72 69 74 65 0a 2a eger and write.*
41c0: 2a 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 * the value of t
41d0: 68 65 20 69 6e 74 65 67 65 72 20 69 6e 74 6f 20 he integer into
41e0: 2a 70 4e 75 6d 2e 20 20 49 66 20 7a 4e 75 6d 20 *pNum. If zNum
41f0: 69 73 20 6e 6f 74 20 61 6e 20 69 6e 74 65 67 65 is not an intege
4200: 72 0a 2a 2a 20 6f 72 20 69 73 20 61 6e 20 69 6e r.** or is an in
4210: 74 65 67 65 72 20 74 68 61 74 20 69 73 20 74 6f teger that is to
4220: 6f 20 6c 61 72 67 65 20 74 6f 20 62 65 20 65 78 o large to be ex
4230: 70 72 65 73 73 65 64 20 77 69 74 68 20 36 34 20 pressed with 64
4240: 62 69 74 73 2c 0a 2a 2a 20 74 68 65 6e 20 72 65 bits,.** then re
4250: 74 75 72 6e 20 66 61 6c 73 65 2e 20 20 49 66 20 turn false. If
4260: 6e 3e 30 20 61 6e 64 20 74 68 65 20 69 6e 74 65 n>0 and the inte
4270: 67 65 72 20 69 73 20 73 74 72 69 6e 67 20 69 73 ger is string is
4280: 20 6e 6f 74 0a 2a 2a 20 65 78 61 63 74 6c 79 20 not.** exactly
4290: 6e 20 62 79 74 65 73 20 6c 6f 6e 67 2c 20 72 65 n bytes long, re
42a0: 74 75 72 6e 20 66 61 6c 73 65 2e 0a 2a 2a 0a 2a turn false..**.*
42b0: 2a 20 57 68 65 6e 20 74 68 69 73 20 72 6f 75 74 * When this rout
42c0: 69 6e 65 20 77 61 73 20 6f 72 69 67 69 6e 61 6c ine was original
42d0: 6c 79 20 77 72 69 74 74 65 6e 20 69 74 20 64 65 ly written it de
42e0: 61 6c 74 20 77 69 74 68 20 6f 6e 6c 79 0a 2a 2a alt with only.**
42f0: 20 33 32 2d 62 69 74 20 6e 75 6d 62 65 72 73 2e 32-bit numbers.
4300: 20 20 41 74 20 74 68 61 74 20 74 69 6d 65 2c 20 At that time,
4310: 69 74 20 77 61 73 20 6d 75 63 68 20 66 61 73 74 it was much fast
4320: 65 72 20 74 68 61 6e 20 74 68 65 0a 2a 2a 20 61 er than the.** a
4330: 74 6f 69 28 29 20 6c 69 62 72 61 72 79 20 72 6f toi() library ro
4340: 75 74 69 6e 65 20 69 6e 20 52 65 64 48 61 74 20 utine in RedHat
4350: 37 2e 32 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 7.2..*/.int sqli
4360: 74 65 33 61 74 6f 69 36 34 28 63 6f 6e 73 74 20 te3atoi64(const
4370: 63 68 61 72 20 2a 7a 4e 75 6d 2c 20 69 36 34 20 char *zNum, i64
4380: 2a 70 4e 75 6d 29 7b 0a 20 20 69 36 34 20 76 20 *pNum){. i64 v
4390: 3d 20 30 3b 0a 20 20 69 6e 74 20 6e 65 67 3b 0a = 0;. int neg;.
43a0: 20 20 69 6e 74 20 69 2c 20 63 3b 0a 20 20 69 66 int i, c;. if
43b0: 28 20 2a 7a 4e 75 6d 3d 3d 27 2d 27 20 29 7b 0a ( *zNum=='-' ){.
43c0: 20 20 20 20 6e 65 67 20 3d 20 31 3b 0a 20 20 20 neg = 1;.
43d0: 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 7d 65 6c 73 65 zNum++;. }else
43e0: 20 69 66 28 20 2a 7a 4e 75 6d 3d 3d 27 2b 27 20 if( *zNum=='+'
43f0: 29 7b 0a 20 20 20 20 6e 65 67 20 3d 20 30 3b 0a ){. neg = 0;.
4400: 20 20 20 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 7d 65 zNum++;. }e
4410: 6c 73 65 7b 0a 20 20 20 20 6e 65 67 20 3d 20 30 lse{. neg = 0
4420: 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30 3b ;. }. for(i=0;
4430: 20 28 63 3d 7a 4e 75 6d 5b 69 5d 29 3e 3d 27 30 (c=zNum[i])>='0
4440: 27 20 26 26 20 63 3c 3d 27 39 27 3b 20 69 2b 2b ' && c<='9'; i++
4450: 29 7b 0a 20 20 20 20 76 20 3d 20 76 2a 31 30 20 ){. v = v*10
4460: 2b 20 63 20 2d 20 27 30 27 3b 0a 20 20 7d 0a 20 + c - '0';. }.
4470: 20 2a 70 4e 75 6d 20 3d 20 6e 65 67 20 3f 20 2d *pNum = neg ? -
4480: 76 20 3a 20 76 3b 0a 20 20 72 65 74 75 72 6e 20 v : v;. return
4490: 63 3d 3d 30 20 26 26 20 69 3e 30 20 26 26 20 0a c==0 && i>0 && .
44a0: 20 20 20 20 20 20 28 69 3c 31 39 20 7c 7c 20 28 (i<19 || (
44b0: 69 3d 3d 31 39 20 26 26 20 6d 65 6d 63 6d 70 28 i==19 && memcmp(
44c0: 7a 4e 75 6d 2c 22 39 32 32 33 33 37 32 30 33 36 zNum,"9223372036
44d0: 38 35 34 37 37 35 38 30 37 22 2c 31 39 29 3c 3d 854775807",19)<=
44e0: 30 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 0));.}../*.** Th
44f0: 65 20 73 74 72 69 6e 67 20 7a 4e 75 6d 20 72 65 e string zNum re
4500: 70 72 65 73 65 6e 74 73 20 61 6e 20 69 6e 74 65 presents an inte
4510: 67 65 72 2e 20 20 54 68 65 72 65 20 6d 69 67 68 ger. There migh
4520: 74 20 62 65 20 73 6f 6d 65 20 6f 74 68 65 72 0a t be some other.
4530: 2a 2a 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 ** information f
4540: 6f 6c 6c 6f 77 69 6e 67 20 74 68 65 20 69 6e 74 ollowing the int
4550: 65 67 65 72 20 74 6f 6f 2c 20 62 75 74 20 74 68 eger too, but th
4560: 61 74 20 70 61 72 74 20 69 73 20 69 67 6e 6f 72 at part is ignor
4570: 65 64 2e 0a 2a 2a 20 49 66 20 74 68 65 20 69 6e ed..** If the in
4580: 74 65 67 65 72 20 74 68 61 74 20 74 68 65 20 70 teger that the p
4590: 72 65 66 69 78 20 6f 66 20 7a 4e 75 6d 20 72 65 refix of zNum re
45a0: 70 72 65 73 65 6e 74 73 20 77 69 6c 6c 20 66 69 presents will fi
45b0: 74 20 69 6e 20 61 0a 2a 2a 20 33 32 2d 62 69 74 t in a.** 32-bit
45c0: 20 73 69 67 6e 65 64 20 69 6e 74 65 67 65 72 2c signed integer,
45d0: 20 72 65 74 75 72 6e 20 54 52 55 45 2e 20 20 4f return TRUE. O
45e0: 74 68 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 therwise return
45f0: 46 41 4c 53 45 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 FALSE..**.** Thi
4600: 73 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 6e s routine return
4610: 73 20 46 41 4c 53 45 20 66 6f 72 20 74 68 65 20 s FALSE for the
4620: 73 74 72 69 6e 67 20 2d 32 31 34 37 34 38 33 36 string -21474836
4630: 34 38 20 65 76 65 6e 20 74 68 61 74 0a 2a 2a 20 48 even that.**
4640: 74 68 61 74 20 6e 75 6d 62 65 72 20 77 69 6c 6c that number will
4650: 20 69 6e 20 66 61 63 74 20 66 69 74 20 69 6e 20 in fact fit in
4660: 61 20 33 32 2d 62 69 74 20 69 6e 74 65 67 65 72 a 32-bit integer
4670: 2e 20 20 42 75 74 20 70 6f 73 69 74 69 76 65 0a . But positive.
4680: 2a 2a 20 32 31 34 37 34 38 33 36 34 38 20 77 69 ** 2147483648 wi
4690: 6c 6c 20 6e 6f 74 20 66 69 74 20 69 6e 20 33 32 ll not fit in 32
46a0: 20 62 69 74 73 2e 20 20 53 6f 20 69 74 20 73 65 bits. So it se
46b0: 65 6d 73 20 73 61 66 65 72 20 74 6f 20 72 65 74 ems safer to ret
46c0: 75 72 6e 0a 2a 2a 20 66 61 6c 73 65 2e 0a 2a 2f urn.** false..*/
46d0: 0a 73 74 61 74 69 63 20 69 6e 74 20 73 71 6c 69 .static int sqli
46e0: 74 65 33 46 69 74 73 49 6e 33 32 42 69 74 73 28 te3FitsIn32Bits(
46f0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 75 6d const char *zNum
4700: 29 7b 0a 20 20 69 6e 74 20 69 2c 20 63 3b 0a 20 ){. int i, c;.
4710: 20 69 66 28 20 2a 7a 4e 75 6d 3d 3d 27 2d 27 20 if( *zNum=='-'
4720: 7c 7c 20 2a 7a 4e 75 6d 3d 3d 27 2b 27 20 29 20 || *zNum=='+' )
4730: 7a 4e 75 6d 2b 2b 3b 0a 20 20 66 6f 72 28 69 3d zNum++;. for(i=
4740: 30 3b 20 28 63 3d 7a 4e 75 6d 5b 69 5d 29 3e 3d 0; (c=zNum[i])>=
4750: 27 30 27 20 26 26 20 63 3c 3d 27 39 27 3b 20 69 '0' && c<='9'; i
4760: 2b 2b 29 7b 7d 0a 20 20 72 65 74 75 72 6e 20 69 ++){}. return i
4770: 3c 31 30 20 7c 7c 20 28 69 3d 3d 31 30 20 26 26 <10 || (i==10 &&
4780: 20 6d 65 6d 63 6d 70 28 7a 4e 75 6d 2c 22 32 31 memcmp(zNum,"21
4790: 34 37 34 38 33 36 34 37 22 2c 31 30 29 3c 3d 30 47483647",10)<=0
47a0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 7a );.}../*.** If z
47b0: 4e 75 6d 20 72 65 70 72 65 73 65 6e 74 73 20 61 Num represents a
47c0: 6e 20 69 6e 74 65 67 65 72 20 74 68 61 74 20 77 n integer that w
47d0: 69 6c 6c 20 66 69 74 20 69 6e 20 33 32 2d 62 69 ill fit in 32-bi
47e0: 74 73 2c 20 74 68 65 6e 20 73 65 74 0a 2a 2a 20 ts, then set.**
47f0: 2a 70 56 61 6c 75 65 20 74 6f 20 74 68 61 74 20 *pValue to that
4800: 69 6e 74 65 67 65 72 20 61 6e 64 20 72 65 74 75 integer and retu
4810: 72 6e 20 74 72 75 65 2e 20 20 4f 74 68 65 72 77 rn true. Otherw
4820: 69 73 65 20 72 65 74 75 72 6e 20 66 61 6c 73 65 ise return false
4830: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 ..*/.int sqlite3
4840: 47 65 74 49 6e 74 33 32 28 63 6f 6e 73 74 20 63 GetInt32(const c
4850: 68 61 72 20 2a 7a 4e 75 6d 2c 20 69 6e 74 20 2a har *zNum, int *
4860: 70 56 61 6c 75 65 29 7b 0a 20 20 69 66 28 20 73 pValue){. if( s
4870: 71 6c 69 74 65 33 46 69 74 73 49 6e 33 32 42 69 qlite3FitsIn32Bi
4880: 74 73 28 7a 4e 75 6d 29 20 29 7b 0a 20 20 20 20 ts(zNum) ){.
4890: 2a 70 56 61 6c 75 65 20 3d 20 61 74 6f 69 28 7a *pValue = atoi(z
48a0: 4e 75 6d 29 3b 0a 20 20 20 20 72 65 74 75 72 6e Num);. return
48b0: 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 1;. }. return
48c0: 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 0;.}../*.** The
48d0: 20 73 74 72 69 6e 67 20 7a 4e 75 6d 20 72 65 70 string zNum rep
48e0: 72 65 73 65 6e 74 73 20 61 6e 20 69 6e 74 65 67 resents an integ
48f0: 65 72 2e 20 20 54 68 65 72 65 20 6d 69 67 68 74 er. There might
4900: 20 62 65 20 73 6f 6d 65 20 6f 74 68 65 72 0a 2a be some other.*
4910: 2a 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f * information fo
4920: 6c 6c 6f 77 69 6e 67 20 74 68 65 20 69 6e 74 65 llowing the inte
4930: 67 65 72 20 74 6f 6f 2c 20 62 75 74 20 74 68 61 ger too, but tha
4940: 74 20 70 61 72 74 20 69 73 20 69 67 6e 6f 72 65 t part is ignore
4950: 64 2e 0a 2a 2a 20 49 66 20 74 68 65 20 69 6e 74 d..** If the int
4960: 65 67 65 72 20 74 68 61 74 20 74 68 65 20 70 72 eger that the pr
4970: 65 66 69 78 20 6f 66 20 7a 4e 75 6d 20 72 65 70 efix of zNum rep
4980: 72 65 73 65 6e 74 73 20 77 69 6c 6c 20 66 69 74 resents will fit
4990: 20 69 6e 20 61 0a 2a 2a 20 36 34 2d 62 69 74 20 in a.** 64-bit
49a0: 73 69 67 6e 65 64 20 69 6e 74 65 67 65 72 2c 20 signed integer,
49b0: 72 65 74 75 72 6e 20 54 52 55 45 2e 20 20 4f 74 return TRUE. Ot
49c0: 68 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 46 herwise return F
49d0: 41 4c 53 45 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 ALSE..**.** This
49e0: 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 6e 73 routine returns
49f0: 20 46 41 4c 53 45 20 66 6f 72 20 74 68 65 20 73 FALSE for the s
4a00: 74 72 69 6e 67 20 2d 39 32 32 33 33 37 32 30 33 tring -922337203
4a10: 36 38 35 34 37 37 35 38 30 38 20 65 76 65 6e 20 6854775808 even
4a20: 74 68 61 74 0a 2a 2a 20 74 68 61 74 20 6e 75 6d that.** that num
4a30: 62 65 72 20 77 69 6c 6c 2c 20 69 6e 20 74 68 65 ber will, in the
4a40: 6f 72 79 20 66 69 74 20 69 6e 20 61 20 36 34 2d ory fit in a 64-
4a50: 62 69 74 20 69 6e 74 65 67 65 72 2e 20 20 50 6f bit integer. Po
4a60: 73 69 74 69 76 65 0a 2a 2a 20 39 32 32 33 33 37 sitive.** 922337
4a70: 33 30 33 36 38 35 34 37 37 35 38 30 38 20 77 69 3036854775808 wi
4a80: 6c 6c 20 6e 6f 74 20 66 69 74 20 69 6e 20 36 34 ll not fit in 64
4a90: 20 62 69 74 73 2e 20 20 53 6f 20 69 74 20 73 65 bits. So it se
4aa0: 65 6d 73 20 73 61 66 65 72 20 74 6f 20 72 65 74 ems safer to ret
4ab0: 75 72 6e 0a 2a 2a 20 66 61 6c 73 65 2e 0a 2a 2f urn.** false..*/
4ac0: 0a 69 6e 74 20 73 71 6c 69 74 65 33 46 69 74 73 .int sqlite3Fits
4ad0: 49 6e 36 34 42 69 74 73 28 63 6f 6e 73 74 20 63 In64Bits(const c
4ae0: 68 61 72 20 2a 7a 4e 75 6d 29 7b 0a 20 20 69 6e har *zNum){. in
4af0: 74 20 69 2c 20 63 3b 0a 20 20 69 66 28 20 2a 7a t i, c;. if( *z
4b00: 4e 75 6d 3d 3d 27 2d 27 20 7c 7c 20 2a 7a 4e 75 Num=='-' || *zNu
4b10: 6d 3d 3d 27 2b 27 20 29 20 7a 4e 75 6d 2b 2b 3b m=='+' ) zNum++;
4b20: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 28 63 3d 7a . for(i=0; (c=z
4b30: 4e 75 6d 5b 69 5d 29 3e 3d 27 30 27 20 26 26 20 Num[i])>='0' &&
4b40: 63 3c 3d 27 39 27 3b 20 69 2b 2b 29 7b 7d 0a 20 c<='9'; i++){}.
4b50: 20 72 65 74 75 72 6e 20 69 3c 31 39 20 7c 7c 20 return i<19 ||
4b60: 28 69 3d 3d 31 39 20 26 26 20 6d 65 6d 63 6d 70 (i==19 && memcmp
4b70: 28 7a 4e 75 6d 2c 22 39 32 32 33 33 37 32 30 33 (zNum,"922337203
4b80: 36 38 35 34 37 37 35 38 30 37 22 2c 31 39 29 3c 6854775807",19)<
4b90: 3d 30 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 43 =0);.}.../*.** C
4ba0: 68 61 6e 67 65 20 74 68 65 20 73 71 6c 69 74 65 hange the sqlite
4bb0: 2e 6d 61 67 69 63 20 66 72 6f 6d 20 53 51 4c 49 .magic from SQLI
4bc0: 54 45 5f 4d 41 47 49 43 5f 4f 50 45 4e 20 74 6f TE_MAGIC_OPEN to
4bd0: 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 SQLITE_MAGIC_BU
4be0: 53 59 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 61 6e SY..** Return an
4bf0: 20 65 72 72 6f 72 20 28 6e 6f 6e 2d 7a 65 72 6f error (non-zero
4c00: 29 20 69 66 20 74 68 65 20 6d 61 67 69 63 20 77 ) if the magic w
4c10: 61 73 20 6e 6f 74 20 53 51 4c 49 54 45 5f 4d 41 as not SQLITE_MA
4c20: 47 49 43 5f 4f 50 45 4e 0a 2a 2a 20 77 68 65 6e GIC_OPEN.** when
4c30: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 this routine is
4c40: 20 63 61 6c 6c 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 called..**.** T
4c50: 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 61 his routine is a
4c60: 20 61 74 74 65 6d 70 74 20 74 6f 20 64 65 74 65 attempt to dete
4c70: 63 74 20 69 66 20 74 77 6f 20 74 68 72 65 61 64 ct if two thread
4c80: 73 20 75 73 65 20 74 68 65 0a 2a 2a 20 73 61 6d s use the.** sam
4c90: 65 20 73 71 6c 69 74 65 2a 20 70 6f 69 6e 74 65 e sqlite* pointe
4ca0: 72 20 61 74 20 74 68 65 20 73 61 6d 65 20 74 69 r at the same ti
4cb0: 6d 65 2e 20 20 54 68 65 72 65 20 69 73 20 61 20 me. There is a
4cc0: 72 61 63 65 20 0a 2a 2a 20 63 6f 6e 64 69 74 69 race .** conditi
4cd0: 6f 6e 20 73 6f 20 69 74 20 69 73 20 70 6f 73 73 on so it is poss
4ce0: 69 62 6c 65 20 74 68 61 74 20 74 68 65 20 65 72 ible that the er
4cf0: 72 6f 72 20 69 73 20 6e 6f 74 20 64 65 74 65 63 ror is not detec
4d00: 74 65 64 2e 0a 2a 2a 20 42 75 74 20 75 73 75 61 ted..** But usua
4d10: 6c 6c 79 20 74 68 65 20 70 72 6f 62 6c 65 6d 20 lly the problem
4d20: 77 69 6c 6c 20 62 65 20 73 65 65 6e 2e 20 20 54 will be seen. T
4d30: 68 65 20 72 65 73 75 6c 74 20 77 69 6c 6c 20 62 he result will b
4d40: 65 20 61 6e 0a 2a 2a 20 65 72 72 6f 72 20 77 68 e an.** error wh
4d50: 69 63 68 20 63 61 6e 20 62 65 20 75 73 65 64 20 ich can be used
4d60: 74 6f 20 64 65 62 75 67 20 74 68 65 20 61 70 70 to debug the app
4d70: 6c 69 63 61 74 69 6f 6e 20 74 68 61 74 20 69 73 lication that is
4d80: 0a 2a 2a 20 75 73 69 6e 67 20 53 51 4c 69 74 65 .** using SQLite
4d90: 20 69 6e 63 6f 72 72 65 63 74 6c 79 2e 0a 2a 2a incorrectly..**
4da0: 0a 2a 2a 20 54 69 63 6b 65 74 20 23 32 30 32 3a .** Ticket #202:
4db0: 20 20 49 66 20 64 62 2d 3e 6d 61 67 69 63 20 69 If db->magic i
4dc0: 73 20 6e 6f 74 20 61 20 76 61 6c 69 64 20 6f 70 s not a valid op
4dd0: 65 6e 20 76 61 6c 75 65 2c 20 74 61 6b 65 20 63 en value, take c
4de0: 61 72 65 20 6e 6f 74 0a 2a 2a 20 74 6f 20 6d 6f are not.** to mo
4df0: 64 69 66 79 20 74 68 65 20 64 62 20 73 74 72 75 dify the db stru
4e00: 63 74 75 72 65 20 61 74 20 61 6c 6c 2e 20 20 49 cture at all. I
4e10: 74 20 63 6f 75 6c 64 20 62 65 20 74 68 61 74 20 t could be that
4e20: 64 62 20 69 73 20 61 20 73 74 61 6c 65 0a 2a 2a db is a stale.**
4e30: 20 70 6f 69 6e 74 65 72 2e 20 20 49 6e 20 6f 74 pointer. In ot
4e40: 68 65 72 20 77 6f 72 64 73 2c 20 69 74 20 63 6f her words, it co
4e50: 75 6c 64 20 62 65 20 74 68 61 74 20 74 68 65 72 uld be that ther
4e60: 65 20 68 61 73 20 62 65 65 6e 20 61 20 70 72 69 e has been a pri
4e70: 6f 72 0a 2a 2a 20 63 61 6c 6c 20 74 6f 20 73 71 or.** call to sq
4e80: 6c 69 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 20 lite3_close(db)
4e90: 61 6e 64 20 64 62 20 68 61 73 20 62 65 65 6e 20 and db has been
4ea0: 64 65 61 6c 6c 6f 63 61 74 65 64 2e 20 20 41 6e deallocated. An
4eb0: 64 20 77 65 20 64 6f 0a 2a 2a 20 6e 6f 74 20 77 d we do.** not w
4ec0: 61 6e 74 20 74 6f 20 77 72 69 74 65 20 69 6e 74 ant to write int
4ed0: 6f 20 64 65 61 6c 6c 6f 63 61 74 65 64 20 6d 65 o deallocated me
4ee0: 6d 6f 72 79 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c mory..*/.int sql
4ef0: 69 74 65 33 53 61 66 65 74 79 4f 6e 28 73 71 6c ite3SafetyOn(sql
4f00: 69 74 65 33 20 2a 64 62 29 7b 0a 20 20 69 66 28 ite3 *db){. if(
4f10: 20 64 62 2d 3e 6d 61 67 69 63 3d 3d 53 51 4c 49 db->magic==SQLI
4f20: 54 45 5f 4d 41 47 49 43 5f 4f 50 45 4e 20 29 7b TE_MAGIC_OPEN ){
4f30: 0a 20 20 20 20 64 62 2d 3e 6d 61 67 69 63 20 3d . db->magic =
4f40: 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 SQLITE_MAGIC_BU
4f50: 53 59 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 SY;. return 0
4f60: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 64 62 ;. }else if( db
4f70: 2d 3e 6d 61 67 69 63 3d 3d 53 51 4c 49 54 45 5f ->magic==SQLITE_
4f80: 4d 41 47 49 43 5f 42 55 53 59 20 7c 7c 20 64 62 MAGIC_BUSY || db
4f90: 2d 3e 6d 61 67 69 63 3d 3d 53 51 4c 49 54 45 5f ->magic==SQLITE_
4fa0: 4d 41 47 49 43 5f 45 52 52 4f 52 20 29 7b 0a 20 MAGIC_ERROR ){.
4fb0: 20 20 20 64 62 2d 3e 6d 61 67 69 63 20 3d 20 53 db->magic = S
4fc0: 51 4c 49 54 45 5f 4d 41 47 49 43 5f 45 52 52 4f QLITE_MAGIC_ERRO
4fd0: 52 3b 0a 20 20 20 20 64 62 2d 3e 66 6c 61 67 73 R;. db->flags
4fe0: 20 7c 3d 20 53 51 4c 49 54 45 5f 49 6e 74 65 72 |= SQLITE_Inter
4ff0: 72 75 70 74 3b 0a 20 20 7d 0a 20 20 72 65 74 75 rupt;. }. retu
5000: 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 rn 1;.}../*.** C
5010: 68 61 6e 67 65 20 74 68 65 20 6d 61 67 69 63 20 hange the magic
5020: 66 72 6f 6d 20 53 51 4c 49 54 45 5f 4d 41 47 49 from SQLITE_MAGI
5030: 43 5f 42 55 53 59 20 74 6f 20 53 51 4c 49 54 45 C_BUSY to SQLITE
5040: 5f 4d 41 47 49 43 5f 4f 50 45 4e 2e 0a 2a 2a 20 _MAGIC_OPEN..**
5050: 52 65 74 75 72 6e 20 61 6e 20 65 72 72 6f 72 20 Return an error
5060: 28 6e 6f 6e 2d 7a 65 72 6f 29 20 69 66 20 74 68 (non-zero) if th
5070: 65 20 6d 61 67 69 63 20 77 61 73 20 6e 6f 74 20 e magic was not
5080: 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 53 SQLITE_MAGIC_BUS
5090: 59 0a 2a 2a 20 77 68 65 6e 20 74 68 69 73 20 72 Y.** when this r
50a0: 6f 75 74 69 6e 65 20 69 73 20 63 61 6c 6c 65 64 outine is called
50b0: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 ..*/.int sqlite3
50c0: 53 61 66 65 74 79 4f 66 66 28 73 71 6c 69 74 65 SafetyOff(sqlite
50d0: 33 20 2a 64 62 29 7b 0a 20 20 69 66 28 20 64 62 3 *db){. if( db
50e0: 2d 3e 6d 61 67 69 63 3d 3d 53 51 4c 49 54 45 5f ->magic==SQLITE_
50f0: 4d 41 47 49 43 5f 42 55 53 59 20 29 7b 0a 20 20 MAGIC_BUSY ){.
5100: 20 20 64 62 2d 3e 6d 61 67 69 63 20 3d 20 53 51 db->magic = SQ
5110: 4c 49 54 45 5f 4d 41 47 49 43 5f 4f 50 45 4e 3b LITE_MAGIC_OPEN;
5120: 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 . return 0;.
5130: 20 7d 65 6c 73 65 20 69 66 28 20 64 62 2d 3e 6d }else if( db->m
5140: 61 67 69 63 3d 3d 53 51 4c 49 54 45 5f 4d 41 47 agic==SQLITE_MAG
5150: 49 43 5f 4f 50 45 4e 20 7c 7c 20 64 62 2d 3e 6d IC_OPEN || db->m
5160: 61 67 69 63 3d 3d 53 51 4c 49 54 45 5f 4d 41 47 agic==SQLITE_MAG
5170: 49 43 5f 45 52 52 4f 52 20 29 7b 0a 20 20 20 20 IC_ERROR ){.
5180: 64 62 2d 3e 6d 61 67 69 63 20 3d 20 53 51 4c 49 db->magic = SQLI
5190: 54 45 5f 4d 41 47 49 43 5f 45 52 52 4f 52 3b 0a TE_MAGIC_ERROR;.
51a0: 20 20 20 20 64 62 2d 3e 66 6c 61 67 73 20 7c 3d db->flags |=
51b0: 20 53 51 4c 49 54 45 5f 49 6e 74 65 72 72 75 70 SQLITE_Interrup
51c0: 74 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 t;. }. return
51d0: 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68 65 63 1;.}../*.** Chec
51e0: 6b 20 74 6f 20 6d 61 6b 65 20 73 75 72 65 20 77 k to make sure w
51f0: 65 20 68 61 76 65 20 61 20 76 61 6c 69 64 20 64 e have a valid d
5200: 62 20 70 6f 69 6e 74 65 72 2e 20 20 54 68 69 73 b pointer. This
5210: 20 74 65 73 74 20 69 73 20 6e 6f 74 0a 2a 2a 20 test is not.**
5220: 66 6f 6f 6c 70 72 6f 6f 66 20 62 75 74 20 69 74 foolproof but it
5230: 20 64 6f 65 73 20 70 72 6f 76 69 64 65 20 73 6f does provide so
5240: 6d 65 20 6d 65 61 73 75 72 65 20 6f 66 20 70 72 me measure of pr
5250: 6f 74 65 63 74 69 6f 6e 20 61 67 61 69 6e 73 74 otection against
5260: 0a 2a 2a 20 6d 69 73 75 73 65 20 6f 66 20 74 68 .** misuse of th
5270: 65 20 69 6e 74 65 72 66 61 63 65 20 73 75 63 68 e interface such
5280: 20 61 73 20 70 61 73 73 69 6e 67 20 69 6e 20 64 as passing in d
5290: 62 20 70 6f 69 6e 74 65 72 73 20 74 68 61 74 20 b pointers that
52a0: 61 72 65 0a 2a 2a 20 4e 55 4c 4c 20 6f 72 20 77 are.** NULL or w
52b0: 68 69 63 68 20 68 61 76 65 20 62 65 65 6e 20 70 hich have been p
52c0: 72 65 76 69 6f 75 73 6c 79 20 63 6c 6f 73 65 64 reviously closed
52d0: 2e 20 20 49 66 20 74 68 69 73 20 72 6f 75 74 69 . If this routi
52e0: 6e 65 20 72 65 74 75 72 6e 73 0a 2a 2a 20 54 52 ne returns.** TR
52f0: 55 45 20 69 74 20 6d 65 61 6e 73 20 74 68 61 74 UE it means that
5300: 20 74 68 65 20 64 62 20 70 6f 69 6e 74 65 72 20 the db pointer
5310: 69 73 20 69 6e 76 61 6c 69 64 20 61 6e 64 20 73 is invalid and s
5320: 68 6f 75 6c 64 20 6e 6f 74 20 62 65 0a 2a 2a 20 hould not be.**
5330: 64 65 72 65 66 65 72 65 6e 63 65 64 20 66 6f 72 dereferenced for
5340: 20 61 6e 79 20 72 65 61 73 6f 6e 2e 20 20 54 68 any reason. Th
5350: 65 20 63 61 6c 6c 69 6e 67 20 66 75 6e 63 74 69 e calling functi
5360: 6f 6e 20 73 68 6f 75 6c 64 20 69 6e 76 6f 6b 65 on should invoke
5370: 0a 2a 2a 20 53 51 4c 49 54 45 5f 4d 49 53 55 53 .** SQLITE_MISUS
5380: 45 20 69 6d 6d 65 64 69 61 74 65 6c 79 2e 0a 2a E immediately..*
5390: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 61 66 /.int sqlite3Saf
53a0: 65 74 79 43 68 65 63 6b 28 73 71 6c 69 74 65 33 etyCheck(sqlite3
53b0: 20 2a 64 62 29 7b 0a 20 20 69 6e 74 20 6d 61 67 *db){. int mag
53c0: 69 63 3b 0a 20 20 69 66 28 20 64 62 3d 3d 30 20 ic;. if( db==0
53d0: 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 6d 61 ) return 1;. ma
53e0: 67 69 63 20 3d 20 64 62 2d 3e 6d 61 67 69 63 3b gic = db->magic;
53f0: 0a 20 20 69 66 28 20 6d 61 67 69 63 21 3d 53 51 . if( magic!=SQ
5400: 4c 49 54 45 5f 4d 41 47 49 43 5f 43 4c 4f 53 45 LITE_MAGIC_CLOSE
5410: 44 20 26 26 0a 20 20 20 20 20 20 20 20 20 6d 61 D &&. ma
5420: 67 69 63 21 3d 53 51 4c 49 54 45 5f 4d 41 47 49 gic!=SQLITE_MAGI
5430: 43 5f 4f 50 45 4e 20 26 26 0a 20 20 20 20 20 20 C_OPEN &&.
5440: 20 20 20 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 magic!=SQLITE
5450: 5f 4d 41 47 49 43 5f 42 55 53 59 20 29 20 72 65 _MAGIC_BUSY ) re
5460: 74 75 72 6e 20 31 3b 0a 20 20 72 65 74 75 72 6e turn 1;. return
5470: 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 0;.}../*.** The
5480: 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 variable-length
5490: 20 69 6e 74 65 67 65 72 20 65 6e 63 6f 64 69 6e integer encodin
54a0: 67 20 69 73 20 61 73 20 66 6f 6c 6c 6f 77 73 3a g is as follows:
54b0: 0a 2a 2a 0a 2a 2a 20 4b 45 59 3a 0a 2a 2a 20 20 .**.** KEY:.**
54c0: 20 20 20 20 20 20 20 41 20 3d 20 30 78 78 78 78 A = 0xxxx
54d0: 78 78 78 20 20 20 20 37 20 62 69 74 73 20 6f 66 xxx 7 bits of
54e0: 20 64 61 74 61 20 61 6e 64 20 6f 6e 65 20 66 6c data and one fl
54f0: 61 67 20 62 69 74 0a 2a 2a 20 20 20 20 20 20 20 ag bit.**
5500: 20 20 42 20 3d 20 31 78 78 78 78 78 78 78 20 20 B = 1xxxxxxx
5510: 20 20 37 20 62 69 74 73 20 6f 66 20 64 61 74 61 7 bits of data
5520: 20 61 6e 64 20 6f 6e 65 20 66 6c 61 67 20 62 69 and one flag bi
5530: 74 0a 2a 2a 20 20 20 20 20 20 20 20 20 43 20 3d t.** C =
5540: 20 78 78 78 78 78 78 78 78 20 20 20 20 38 20 62 xxxxxxxx 8 b
5550: 69 74 73 20 6f 66 20 64 61 74 61 0a 2a 2a 0a 2a its of data.**.*
5560: 2a 20 20 37 20 62 69 74 73 20 2d 20 41 0a 2a 2a * 7 bits - A.**
5570: 20 31 34 20 62 69 74 73 20 2d 20 42 41 0a 2a 2a 14 bits - BA.**
5580: 20 32 31 20 62 69 74 73 20 2d 20 42 42 41 0a 2a 21 bits - BBA.*
5590: 2a 20 32 38 20 62 69 74 73 20 2d 20 42 42 42 41 * 28 bits - BBBA
55a0: 0a 2a 2a 20 33 35 20 62 69 74 73 20 2d 20 42 42 .** 35 bits - BB
55b0: 42 42 41 0a 2a 2a 20 34 32 20 62 69 74 73 20 2d BBA.** 42 bits -
55c0: 20 42 42 42 42 42 41 0a 2a 2a 20 34 39 20 62 69 BBBBBA.** 49 bi
55d0: 74 73 20 2d 20 42 42 42 42 42 42 41 0a 2a 2a 20 ts - BBBBBBA.**
55e0: 35 36 20 62 69 74 73 20 2d 20 42 42 42 42 42 42 56 bits - BBBBBB
55f0: 42 41 0a 2a 2a 20 36 34 20 62 69 74 73 20 2d 20 BA.** 64 bits -
5600: 42 42 42 42 42 42 42 42 43 0a 2a 2f 0a 0a 2f 2a BBBBBBBBC.*/../*
5610: 0a 2a 2a 20 57 72 69 74 65 20 61 20 36 34 2d 62 .** Write a 64-b
5620: 69 74 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 it variable-leng
5630: 74 68 20 69 6e 74 65 67 65 72 20 74 6f 20 6d 65 th integer to me
5640: 6d 6f 72 79 20 73 74 61 72 74 69 6e 67 20 61 74 mory starting at
5650: 20 70 5b 30 5d 2e 0a 2a 2a 20 54 68 65 20 6c 65 p[0]..** The le
5660: 6e 67 74 68 20 6f 66 20 64 61 74 61 20 77 72 69 ngth of data wri
5670: 74 65 20 77 69 6c 6c 20 62 65 20 62 65 74 77 65 te will be betwe
5680: 65 6e 20 31 20 61 6e 64 20 39 20 62 79 74 65 73 en 1 and 9 bytes
5690: 2e 20 20 54 68 65 20 6e 75 6d 62 65 72 0a 2a 2a . The number.**
56a0: 20 6f 66 20 62 79 74 65 73 20 77 72 69 74 74 65 of bytes writte
56b0: 6e 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a 2a n is returned..*
56c0: 2a 0a 2a 2a 20 41 20 76 61 72 69 61 62 6c 65 2d *.** A variable-
56d0: 6c 65 6e 67 74 68 20 69 6e 74 65 67 65 72 20 63 length integer c
56e0: 6f 6e 73 69 73 74 73 20 6f 66 20 74 68 65 20 6c onsists of the l
56f0: 6f 77 65 72 20 37 20 62 69 74 73 20 6f 66 20 65 ower 7 bits of e
5700: 61 63 68 20 62 79 74 65 0a 2a 2a 20 66 6f 72 20 ach byte.** for
5710: 61 6c 6c 20 62 79 74 65 73 20 74 68 61 74 20 68 all bytes that h
5720: 61 76 65 20 74 68 65 20 38 74 68 20 62 69 74 20 ave the 8th bit
5730: 73 65 74 20 61 6e 64 20 6f 6e 65 20 62 79 74 65 set and one byte
5740: 20 77 69 74 68 20 74 68 65 20 38 74 68 0a 2a 2a with the 8th.**
5750: 20 62 69 74 20 63 6c 65 61 72 2e 20 20 45 78 63 bit clear. Exc
5760: 65 70 74 2c 20 69 66 20 77 65 20 67 65 74 20 74 ept, if we get t
5770: 6f 20 74 68 65 20 39 74 68 20 62 79 74 65 2c 20 o the 9th byte,
5780: 69 74 20 73 74 6f 72 65 73 20 74 68 65 20 66 75 it stores the fu
5790: 6c 6c 0a 2a 2a 20 38 20 62 69 74 73 20 61 6e 64 ll.** 8 bits and
57a0: 20 69 73 20 74 68 65 20 6c 61 73 74 20 62 79 74 is the last byt
57b0: 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 e..*/.int sqlite
57c0: 33 50 75 74 56 61 72 69 6e 74 28 75 6e 73 69 67 3PutVarint(unsig
57d0: 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 75 36 34 ned char *p, u64
57e0: 20 76 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a 2c v){. int i, j,
57f0: 20 6e 3b 0a 20 20 75 38 20 62 75 66 5b 31 30 5d n;. u8 buf[10]
5800: 3b 0a 20 20 69 66 28 20 76 20 26 20 28 28 28 75 ;. if( v & (((u
5810: 36 34 29 30 78 66 66 30 30 30 30 30 30 29 3c 3c 64)0xff000000)<<
5820: 33 32 29 20 29 7b 0a 20 20 20 20 70 5b 38 5d 20 32) ){. p[8]
5830: 3d 20 76 3b 0a 20 20 20 20 76 20 3e 3e 3d 20 38 = v;. v >>= 8
5840: 3b 0a 20 20 20 20 66 6f 72 28 69 3d 37 3b 20 69 ;. for(i=7; i
5850: 3e 3d 30 3b 20 69 2d 2d 29 7b 0a 20 20 20 20 20 >=0; i--){.
5860: 20 70 5b 69 5d 20 3d 20 28 76 20 26 20 30 78 37 p[i] = (v & 0x7
5870: 66 29 20 7c 20 30 78 38 30 3b 0a 20 20 20 20 20 f) | 0x80;.
5880: 20 76 20 3e 3e 3d 20 37 3b 0a 20 20 20 20 7d 0a v >>= 7;. }.
5890: 20 20 20 20 72 65 74 75 72 6e 20 39 3b 0a 20 20 return 9;.
58a0: 7d 20 20 20 20 0a 20 20 6e 20 3d 20 30 3b 0a 20 } . n = 0;.
58b0: 20 64 6f 7b 0a 20 20 20 20 62 75 66 5b 6e 2b 2b do{. buf[n++
58c0: 5d 20 3d 20 28 76 20 26 20 30 78 37 66 29 20 7c ] = (v & 0x7f) |
58d0: 20 30 78 38 30 3b 0a 20 20 20 20 76 20 3e 3e 3d 0x80;. v >>=
58e0: 20 37 3b 0a 20 20 7d 77 68 69 6c 65 28 20 76 21 7;. }while( v!
58f0: 3d 30 20 29 3b 0a 20 20 62 75 66 5b 30 5d 20 26 =0 );. buf[0] &
5900: 3d 20 30 78 37 66 3b 0a 20 20 61 73 73 65 72 74 = 0x7f;. assert
5910: 28 20 6e 3c 3d 39 20 29 3b 0a 20 20 66 6f 72 28 ( n<=9 );. for(
5920: 69 3d 30 2c 20 6a 3d 6e 2d 31 3b 20 6a 3e 3d 30 i=0, j=n-1; j>=0
5930: 3b 20 6a 2d 2d 2c 20 69 2b 2b 29 7b 0a 20 20 20 ; j--, i++){.
5940: 20 70 5b 69 5d 20 3d 20 62 75 66 5b 6a 5d 3b 0a p[i] = buf[j];.
5950: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0a }. return n;.
5960: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 61 20 }../*.** Read a
5970: 36 34 2d 62 69 74 20 76 61 72 69 61 62 6c 65 2d 64-bit variable-
5980: 6c 65 6e 67 74 68 20 69 6e 74 65 67 65 72 20 66 length integer f
5990: 72 6f 6d 20 6d 65 6d 6f 72 79 20 73 74 61 72 74 rom memory start
59a0: 69 6e 67 20 61 74 20 70 5b 30 5d 2e 0a 2a 2a 20 ing at p[0]..**
59b0: 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 Return the numbe
59c0: 72 20 6f 66 20 62 79 74 65 73 20 72 65 61 64 2e r of bytes read.
59d0: 20 20 54 68 65 20 76 61 6c 75 65 20 69 73 20 73 The value is s
59e0: 74 6f 72 65 64 20 69 6e 20 2a 76 2e 0a 2a 2f 0a tored in *v..*/.
59f0: 69 6e 74 20 73 71 6c 69 74 65 33 47 65 74 56 61 int sqlite3GetVa
5a00: 72 69 6e 74 28 63 6f 6e 73 74 20 75 6e 73 69 67 rint(const unsig
5a10: 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 75 36 34 ned char *p, u64
5a20: 20 2a 76 29 7b 0a 20 20 75 33 32 20 78 3b 0a 20 *v){. u32 x;.
5a30: 20 75 36 34 20 78 36 34 3b 0a 20 20 69 6e 74 20 u64 x64;. int
5a40: 6e 3b 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 n;. unsigned ch
5a50: 61 72 20 63 3b 0a 20 20 69 66 28 20 28 28 63 20 ar c;. if( ((c
5a60: 3d 20 70 5b 30 5d 29 20 26 20 30 78 38 30 29 3d = p[0]) & 0x80)=
5a70: 3d 30 20 29 7b 0a 20 20 20 20 2a 76 20 3d 20 63 =0 ){. *v = c
5a80: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a ;. return 1;.
5a90: 20 20 7d 0a 20 20 78 20 3d 20 63 20 26 20 30 78 }. x = c & 0x
5aa0: 37 66 3b 0a 20 20 69 66 28 20 28 28 63 20 3d 20 7f;. if( ((c =
5ab0: 70 5b 31 5d 29 20 26 20 30 78 38 30 29 3d 3d 30 p[1]) & 0x80)==0
5ac0: 20 29 7b 0a 20 20 20 20 2a 76 20 3d 20 28 78 3c ){. *v = (x<
5ad0: 3c 37 29 20 7c 20 63 3b 0a 20 20 20 20 72 65 74 <7) | c;. ret
5ae0: 75 72 6e 20 32 3b 0a 20 20 7d 0a 20 20 78 20 3d urn 2;. }. x =
5af0: 20 28 78 3c 3c 37 29 20 7c 20 28 63 26 30 78 37 (x<<7) | (c&0x7
5b00: 66 29 3b 0a 20 20 69 66 28 20 28 28 63 20 3d 20 f);. if( ((c =
5b10: 70 5b 32 5d 29 20 26 20 30 78 38 30 29 3d 3d 30 p[2]) & 0x80)==0
5b20: 20 29 7b 0a 20 20 20 20 2a 76 20 3d 20 28 78 3c ){. *v = (x<
5b30: 3c 37 29 20 7c 20 63 3b 0a 20 20 20 20 72 65 74 <7) | c;. ret
5b40: 75 72 6e 20 33 3b 0a 20 20 7d 0a 20 20 78 20 3d urn 3;. }. x =
5b50: 20 28 78 3c 3c 37 29 20 7c 20 28 63 26 30 78 37 (x<<7) | (c&0x7
5b60: 66 29 3b 0a 20 20 69 66 28 20 28 28 63 20 3d 20 f);. if( ((c =
5b70: 70 5b 33 5d 29 20 26 20 30 78 38 30 29 3d 3d 30 p[3]) & 0x80)==0
5b80: 20 29 7b 0a 20 20 20 20 2a 76 20 3d 20 28 78 3c ){. *v = (x<
5b90: 3c 37 29 20 7c 20 63 3b 0a 20 20 20 20 72 65 74 <7) | c;. ret
5ba0: 75 72 6e 20 34 3b 0a 20 20 7d 0a 20 20 78 36 34 urn 4;. }. x64
5bb0: 20 3d 20 28 78 3c 3c 37 29 20 7c 20 28 63 26 30 = (x<<7) | (c&0
5bc0: 78 37 66 29 3b 0a 20 20 6e 20 3d 20 34 3b 0a 20 x7f);. n = 4;.
5bd0: 20 64 6f 7b 0a 20 20 20 20 63 20 3d 20 70 5b 6e do{. c = p[n
5be0: 2b 2b 5d 3b 0a 20 20 20 20 69 66 28 20 6e 3d 3d ++];. if( n==
5bf0: 39 20 29 7b 0a 20 20 20 20 20 20 78 36 34 20 3d 9 ){. x64 =
5c00: 20 28 78 36 34 3c 3c 38 29 20 7c 20 63 3b 0a 20 (x64<<8) | c;.
5c10: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 break;.
5c20: 7d 0a 20 20 20 20 78 36 34 20 3d 20 28 78 36 34 }. x64 = (x64
5c30: 3c 3c 37 29 20 7c 20 28 63 26 30 78 37 66 29 3b <<7) | (c&0x7f);
5c40: 0a 20 20 7d 77 68 69 6c 65 28 20 28 63 20 26 20 . }while( (c &
5c50: 30 78 38 30 29 21 3d 30 20 29 3b 0a 20 20 2a 76 0x80)!=0 );. *v
5c60: 20 3d 20 78 36 34 3b 0a 20 20 72 65 74 75 72 6e = x64;. return
5c70: 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 n;.}../*.** Rea
5c80: 64 20 61 20 33 32 2d 62 69 74 20 76 61 72 69 61 d a 32-bit varia
5c90: 62 6c 65 2d 6c 65 6e 67 74 68 20 69 6e 74 65 67 ble-length integ
5ca0: 65 72 20 66 72 6f 6d 20 6d 65 6d 6f 72 79 20 73 er from memory s
5cb0: 74 61 72 74 69 6e 67 20 61 74 20 70 5b 30 5d 2e tarting at p[0].
5cc0: 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6e .** Return the n
5cd0: 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 72 umber of bytes r
5ce0: 65 61 64 2e 20 20 54 68 65 20 76 61 6c 75 65 20 ead. The value
5cf0: 69 73 20 73 74 6f 72 65 64 20 69 6e 20 2a 76 2e is stored in *v.
5d00: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 47 .*/.int sqlite3G
5d10: 65 74 56 61 72 69 6e 74 33 32 28 63 6f 6e 73 74 etVarint32(const
5d20: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a unsigned char *
5d30: 70 2c 20 75 33 32 20 2a 76 29 7b 0a 20 20 75 33 p, u32 *v){. u3
5d40: 32 20 78 3b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 2 x;. int n;.
5d50: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 63 3b unsigned char c;
5d60: 0a 20 20 69 66 28 20 28 28 73 69 67 6e 65 64 20 . if( ((signed
5d70: 63 68 61 72 2a 29 70 29 5b 30 5d 3e 3d 30 20 29 char*)p)[0]>=0 )
5d80: 7b 0a 20 20 20 20 2a 76 20 3d 20 70 5b 30 5d 3b {. *v = p[0];
5d90: 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 . return 1;.
5da0: 20 7d 0a 20 20 78 20 3d 20 70 5b 30 5d 20 26 20 }. x = p[0] &
5db0: 30 78 37 66 3b 0a 20 20 69 66 28 20 28 28 73 69 0x7f;. if( ((si
5dc0: 67 6e 65 64 20 63 68 61 72 2a 29 70 29 5b 31 5d gned char*)p)[1]
5dd0: 3e 3d 30 20 29 7b 0a 20 20 20 20 2a 76 20 3d 20 >=0 ){. *v =
5de0: 28 78 3c 3c 37 29 20 7c 20 70 5b 31 5d 3b 0a 20 (x<<7) | p[1];.
5df0: 20 20 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 7d return 2;. }
5e00: 0a 20 20 78 20 3d 20 28 78 3c 3c 37 29 20 7c 20 . x = (x<<7) |
5e10: 28 70 5b 31 5d 20 26 20 30 78 37 66 29 3b 0a 20 (p[1] & 0x7f);.
5e20: 20 6e 20 3d 20 32 3b 0a 20 20 64 6f 7b 0a 20 20 n = 2;. do{.
5e30: 20 20 78 20 3d 20 28 78 3c 3c 37 29 20 7c 20 28 x = (x<<7) | (
5e40: 28 63 20 3d 20 70 5b 6e 2b 2b 5d 29 26 30 78 37 (c = p[n++])&0x7
5e50: 66 29 3b 0a 20 20 7d 77 68 69 6c 65 28 20 28 63 f);. }while( (c
5e60: 20 26 20 30 78 38 30 29 21 3d 30 20 26 26 20 6e & 0x80)!=0 && n
5e70: 3c 39 20 29 3b 0a 20 20 2a 76 20 3d 20 78 3b 0a <9 );. *v = x;.
5e80: 20 20 72 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f return n;.}../
5e90: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 *.** Return the
5ea0: 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 number of bytes
5eb0: 74 68 61 74 20 77 69 6c 6c 20 62 65 20 6e 65 65 that will be nee
5ec0: 64 65 64 20 74 6f 20 73 74 6f 72 65 20 74 68 65 ded to store the
5ed0: 20 67 69 76 65 6e 0a 2a 2a 20 36 34 2d 62 69 74 given.** 64-bit
5ee0: 20 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a 69 6e 74 integer..*/.int
5ef0: 20 73 71 6c 69 74 65 33 56 61 72 69 6e 74 4c 65 sqlite3VarintLe
5f00: 6e 28 75 36 34 20 76 29 7b 0a 20 20 69 6e 74 20 n(u64 v){. int
5f10: 69 20 3d 20 30 3b 0a 20 20 64 6f 7b 0a 20 20 20 i = 0;. do{.
5f20: 20 69 2b 2b 3b 0a 20 20 20 20 76 20 3e 3e 3d 20 i++;. v >>=
5f30: 37 3b 0a 20 20 7d 77 68 69 6c 65 28 20 76 21 3d 7;. }while( v!=
5f40: 30 20 26 26 20 69 3c 39 20 29 3b 0a 20 20 72 65 0 && i<9 );. re
5f50: 74 75 72 6e 20 69 3b 0a 7d 0a 0a 23 69 66 20 21 turn i;.}..#if !
5f60: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 4f defined(SQLITE_O
5f70: 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 45 52 41 4c MIT_BLOB_LITERAL
5f80: 29 20 7c 7c 20 64 65 66 69 6e 65 64 28 53 51 4c ) || defined(SQL
5f90: 49 54 45 5f 48 41 53 5f 43 4f 44 45 43 29 20 5c ITE_HAS_CODEC) \
5fa0: 0a 20 20 20 20 7c 7c 20 64 65 66 69 6e 65 64 28 . || defined(
5fb0: 53 51 4c 49 54 45 5f 54 45 53 54 29 0a 2f 2a 0a SQLITE_TEST)./*.
5fc0: 2a 2a 20 54 72 61 6e 73 6c 61 74 65 20 61 20 73 ** Translate a s
5fd0: 69 6e 67 6c 65 20 62 79 74 65 20 6f 66 20 48 65 ingle byte of He
5fe0: 78 20 69 6e 74 6f 20 61 6e 20 69 6e 74 65 67 65 x into an intege
5ff0: 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 r..*/.static int
6000: 20 68 65 78 54 6f 49 6e 74 28 69 6e 74 20 68 29 hexToInt(int h)
6010: 7b 0a 20 20 69 66 28 20 68 3e 3d 27 30 27 20 26 {. if( h>='0' &
6020: 26 20 68 3c 3d 27 39 27 20 29 7b 0a 20 20 20 20 & h<='9' ){.
6030: 72 65 74 75 72 6e 20 68 20 2d 20 27 30 27 3b 0a return h - '0';.
6040: 20 20 7d 65 6c 73 65 20 69 66 28 20 68 3e 3d 27 }else if( h>='
6050: 61 27 20 26 26 20 68 3c 3d 27 66 27 20 29 7b 0a a' && h<='f' ){.
6060: 20 20 20 20 72 65 74 75 72 6e 20 68 20 2d 20 27 return h - '
6070: 61 27 20 2b 20 31 30 3b 0a 20 20 7d 65 6c 73 65 a' + 10;. }else
6080: 7b 0a 20 20 20 20 61 73 73 65 72 74 28 20 68 3e {. assert( h>
6090: 3d 27 41 27 20 26 26 20 68 3c 3d 27 46 27 20 29 ='A' && h<='F' )
60a0: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 68 20 2d ;. return h -
60b0: 20 27 41 27 20 2b 20 31 30 3b 0a 20 20 7d 0a 7d 'A' + 10;. }.}
60c0: 0a 23 65 6e 64 69 66 20 2f 2a 20 21 53 51 4c 49 .#endif /* !SQLI
60d0: 54 45 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 TE_OMIT_BLOB_LIT
60e0: 45 52 41 4c 20 7c 7c 20 53 51 4c 49 54 45 5f 48 ERAL || SQLITE_H
60f0: 41 53 5f 43 4f 44 45 43 20 7c 7c 20 53 51 4c 49 AS_CODEC || SQLI
6100: 54 45 5f 54 45 53 54 20 2a 2f 0a 0a 23 69 66 20 TE_TEST */..#if
6110: 21 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f !defined(SQLITE_
6120: 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 45 52 41 OMIT_BLOB_LITERA
6130: 4c 29 20 7c 7c 20 64 65 66 69 6e 65 64 28 53 51 L) || defined(SQ
6140: 4c 49 54 45 5f 48 41 53 5f 43 4f 44 45 43 29 0a LITE_HAS_CODEC).
6150: 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 61 20 /*.** Convert a
6160: 42 4c 4f 42 20 6c 69 74 65 72 61 6c 20 6f 66 20 BLOB literal of
6170: 74 68 65 20 66 6f 72 6d 20 22 78 27 68 68 68 68 the form "x'hhhh
6180: 68 68 27 22 20 69 6e 74 6f 20 69 74 73 20 62 69 hh'" into its bi
6190: 6e 61 72 79 0a 2a 2a 20 76 61 6c 75 65 2e 20 20 nary.** value.
61a0: 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72 Return a pointer
61b0: 20 74 6f 20 69 74 73 20 62 69 6e 61 72 79 20 76 to its binary v
61c0: 61 6c 75 65 2e 20 20 53 70 61 63 65 20 74 6f 20 alue. Space to
61d0: 68 6f 6c 64 20 74 68 65 0a 2a 2a 20 62 69 6e 61 hold the.** bina
61e0: 72 79 20 76 61 6c 75 65 20 68 61 73 20 62 65 65 ry value has bee
61f0: 6e 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 n obtained from
6200: 6d 61 6c 6c 6f 63 20 61 6e 64 20 6d 75 73 74 20 malloc and must
6210: 62 65 20 66 72 65 65 64 20 62 79 0a 2a 2a 20 74 be freed by.** t
6220: 68 65 20 63 61 6c 6c 69 6e 67 20 72 6f 75 74 69 he calling routi
6230: 6e 65 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73 71 6c ne..*/.void *sql
6240: 69 74 65 33 48 65 78 54 6f 42 6c 6f 62 28 63 6f ite3HexToBlob(co
6250: 6e 73 74 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 nst char *z){.
6260: 63 68 61 72 20 2a 7a 42 6c 6f 62 3b 0a 20 20 69 char *zBlob;. i
6270: 6e 74 20 69 3b 0a 20 20 69 6e 74 20 6e 20 3d 20 nt i;. int n =
6280: 73 74 72 6c 65 6e 28 7a 29 3b 0a 20 20 69 66 28 strlen(z);. if(
6290: 20 6e 25 32 20 29 20 72 65 74 75 72 6e 20 30 3b n%2 ) return 0;
62a0: 0a 0a 20 20 7a 42 6c 6f 62 20 3d 20 28 63 68 61 .. zBlob = (cha
62b0: 72 20 2a 29 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 r *)sqliteMalloc
62c0: 28 6e 2f 32 29 3b 0a 20 20 66 6f 72 28 69 3d 30 (n/2);. for(i=0
62d0: 3b 20 69 3c 6e 3b 20 69 2b 3d 32 29 7b 0a 20 20 ; i<n; i+=2){.
62e0: 20 20 7a 42 6c 6f 62 5b 69 2f 32 5d 20 3d 20 28 zBlob[i/2] = (
62f0: 68 65 78 54 6f 49 6e 74 28 7a 5b 69 5d 29 3c 3c hexToInt(z[i])<<
6300: 34 29 20 7c 20 68 65 78 54 6f 49 6e 74 28 7a 5b 4) | hexToInt(z[
6310: 69 2b 31 5d 29 3b 0a 20 20 7d 0a 20 20 72 65 74 i+1]);. }. ret
6320: 75 72 6e 20 7a 42 6c 6f 62 3b 0a 7d 0a 23 65 6e urn zBlob;.}.#en
6330: 64 69 66 20 2f 2a 20 21 53 51 4c 49 54 45 5f 4f dif /* !SQLITE_O
6340: 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 45 52 41 4c MIT_BLOB_LITERAL
6350: 20 7c 7c 20 53 51 4c 49 54 45 5f 48 41 53 5f 43 || SQLITE_HAS_C
6360: 4f 44 45 43 20 2a 2f 0a 0a 23 69 66 20 64 65 66 ODEC */..#if def
6370: 69 6e 65 64 28 53 51 4c 49 54 45 5f 54 45 53 54 ined(SQLITE_TEST
6380: 29 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 )./*.** Convert
6390: 74 65 78 74 20 67 65 6e 65 72 61 74 65 64 20 62 text generated b
63a0: 79 20 74 68 65 20 22 25 70 22 20 63 6f 6e 76 65 y the "%p" conve
63b0: 72 73 69 6f 6e 20 66 6f 72 6d 61 74 20 62 61 63 rsion format bac
63c0: 6b 20 69 6e 74 6f 0a 2a 2a 20 61 20 70 6f 69 6e k into.** a poin
63d0: 74 65 72 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73 71 ter..*/.void *sq
63e0: 6c 69 74 65 33 54 65 78 74 54 6f 50 74 72 28 63 lite3TextToPtr(c
63f0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 29 7b 0a 20 onst char *z){.
6400: 20 76 6f 69 64 20 2a 70 3b 0a 20 20 75 36 34 20 void *p;. u64
6410: 76 3b 0a 20 20 75 33 32 20 76 32 3b 0a 20 20 69 v;. u32 v2;. i
6420: 66 28 20 7a 5b 30 5d 3d 3d 27 30 27 20 26 26 20 f( z[0]=='0' &&
6430: 7a 5b 31 5d 3d 3d 27 78 27 20 29 7b 0a 20 20 20 z[1]=='x' ){.
6440: 20 7a 20 2b 3d 20 32 3b 0a 20 20 7d 0a 20 20 76 z += 2;. }. v
6450: 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 20 2a = 0;. while( *
6460: 7a 20 29 7b 0a 20 20 20 20 76 20 3d 20 28 76 3c z ){. v = (v<
6470: 3c 34 29 20 2b 20 68 65 78 54 6f 49 6e 74 28 2a <4) + hexToInt(*
6480: 7a 29 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d z);. z++;. }
6490: 0a 20 20 69 66 28 20 73 69 7a 65 6f 66 28 70 29 . if( sizeof(p)
64a0: 3d 3d 73 69 7a 65 6f 66 28 76 29 20 29 7b 0a 20 ==sizeof(v) ){.
64b0: 20 20 20 70 20 3d 20 2a 28 76 6f 69 64 2a 2a 29 p = *(void**)
64c0: 26 76 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 &v;. }else{.
64d0: 20 61 73 73 65 72 74 28 20 73 69 7a 65 6f 66 28 assert( sizeof(
64e0: 70 29 3d 3d 73 69 7a 65 6f 66 28 76 32 29 20 29 p)==sizeof(v2) )
64f0: 3b 0a 20 20 20 20 76 32 20 3d 20 28 75 33 32 29 ;. v2 = (u32)
6500: 76 3b 0a 20 20 20 20 70 20 3d 20 2a 28 76 6f 69 v;. p = *(voi
6510: 64 2a 2a 29 26 76 32 3b 0a 20 20 7d 0a 20 20 72 d**)&v2;. }. r
6520: 65 74 75 72 6e 20 70 3b 0a 7d 0a 23 65 6e 64 69 eturn p;.}.#endi
6530: 66 0a f.