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: 31 38 20 32 30 30 34 2f 30 39 2f 32 35 20 31 34 18 2004/09/25 14
0230: 3a 33 39 3a 31 39 20 64 72 68 20 45 78 70 20 24 :39:19 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 44 45 >..#if SQLITE_DE
0290: 42 55 47 3e 32 20 26 26 20 64 65 66 69 6e 65 64 BUG>2 && defined
02a0: 28 5f 5f 47 4c 49 42 43 5f 5f 29 0a 23 69 6e 63 (__GLIBC__).#inc
02b0: 6c 75 64 65 20 3c 65 78 65 63 69 6e 66 6f 2e 68 lude <execinfo.h
02c0: 3e 0a 76 6f 69 64 20 70 72 69 6e 74 5f 73 74 61 >.void print_sta
02d0: 63 6b 5f 74 72 61 63 65 28 29 7b 0a 20 20 76 6f ck_trace(){. vo
02e0: 69 64 20 2a 62 74 5b 33 30 5d 3b 0a 20 20 69 6e id *bt[30];. in
02f0: 74 20 69 3b 0a 20 20 69 6e 74 20 6e 20 3d 20 62 t i;. int n = b
0300: 61 63 6b 74 72 61 63 65 28 62 74 2c 20 33 30 29 acktrace(bt, 30)
0310: 3b 0a 0a 20 20 73 71 6c 69 74 65 33 44 65 62 75 ;.. sqlite3Debu
0320: 67 50 72 69 6e 74 66 28 22 53 54 41 43 4b 3a 20 gPrintf("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 73 71 6c <n;i++){. sql
0350: 69 74 65 33 44 65 62 75 67 50 72 69 6e 74 66 28 ite3DebugPrintf(
0360: 22 25 70 20 22 2c 20 62 74 5b 69 5d 29 3b 0a 20 "%p ", bt[i]);.
0370: 20 7d 0a 20 20 73 71 6c 69 74 65 33 44 65 62 75 }. sqlite3Debu
0380: 67 50 72 69 6e 74 66 28 22 5c 6e 22 29 3b 0a 7d gPrintf("\n");.}
0390: 0a 23 65 6c 73 65 0a 23 64 65 66 69 6e 65 20 70 .#else.#define p
03a0: 72 69 6e 74 5f 73 74 61 63 6b 5f 74 72 61 63 65 rint_stack_trace
03b0: 28 29 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a ().#endif../*.**
03c0: 20 49 66 20 6d 61 6c 6c 6f 63 28 29 20 65 76 65 If malloc() eve
03d0: 72 20 66 61 69 6c 73 2c 20 74 68 69 73 20 67 6c r fails, this gl
03e0: 6f 62 61 6c 20 76 61 72 69 61 62 6c 65 20 67 65 obal variable ge
03f0: 74 73 20 73 65 74 20 74 6f 20 31 2e 0a 2a 2a 20 ts set to 1..**
0400: 54 68 69 73 20 63 61 75 73 65 73 20 74 68 65 20 This causes the
0410: 6c 69 62 72 61 72 79 20 74 6f 20 61 62 6f 72 74 library to abort
0420: 20 61 6e 64 20 6e 65 76 65 72 20 61 67 61 69 6e and never again
0430: 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 69 6e function..*/.in
0440: 74 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 t sqlite3_malloc
0450: 5f 66 61 69 6c 65 64 20 3d 20 30 3b 0a 0a 2f 2a _failed = 0;../*
0460: 0a 2a 2a 20 49 66 20 53 51 4c 49 54 45 5f 44 45 .** If SQLITE_DE
0470: 42 55 47 20 69 73 20 64 65 66 69 6e 65 64 2c 20 BUG is defined,
0480: 74 68 65 6e 20 75 73 65 20 76 65 72 73 69 6f 6e then use version
0490: 73 20 6f 66 20 6d 61 6c 6c 6f 63 28 29 20 61 6e s of malloc() an
04a0: 64 0a 2a 2a 20 66 72 65 65 28 29 20 74 68 61 74 d.** free() that
04b0: 20 74 72 61 63 6b 20 6d 65 6d 6f 72 79 20 75 73 track memory us
04c0: 61 67 65 20 61 6e 64 20 63 68 65 63 6b 20 66 6f age and check fo
04d0: 72 20 62 75 66 66 65 72 20 6f 76 65 72 72 75 6e r buffer overrun
04e0: 73 2e 0a 2a 2f 0a 23 69 66 64 65 66 20 53 51 4c s..*/.#ifdef SQL
04f0: 49 54 45 5f 44 45 42 55 47 0a 0a 2f 2a 0a 2a 2a ITE_DEBUG../*.**
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 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 ks..*/.int sqlit
0570: 65 33 5f 6e 4d 61 6c 6c 6f 63 3b 20 20 20 20 20 e3_nMalloc;
0580: 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 /* Number of
0590: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 20 sqliteMalloc()
05a0: 63 61 6c 6c 73 20 2a 2f 0a 69 6e 74 20 73 71 6c calls */.int sql
05b0: 69 74 65 33 5f 6e 46 72 65 65 3b 20 20 20 20 20 ite3_nFree;
05c0: 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 /* Number
05d0: 6f 66 20 73 71 6c 69 74 65 46 72 65 65 28 29 20 of sqliteFree()
05e0: 63 61 6c 6c 73 20 2a 2f 0a 69 6e 74 20 73 71 6c calls */.int sql
05f0: 69 74 65 33 5f 69 4d 61 6c 6c 6f 63 46 61 69 6c ite3_iMallocFail
0600: 3b 20 20 20 20 20 2f 2a 20 46 61 69 6c 20 73 71 ; /* Fail sq
0610: 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 20 61 66 74 liteMalloc() aft
0620: 65 72 20 74 68 69 73 20 6d 61 6e 79 20 63 61 6c er this many cal
0630: 6c 73 20 2a 2f 0a 23 69 66 20 53 51 4c 49 54 45 ls */.#if SQLITE
0640: 5f 44 45 42 55 47 3e 31 0a 73 74 61 74 69 63 20 _DEBUG>1.static
0650: 69 6e 74 20 6d 65 6d 63 6e 74 20 3d 20 30 3b 0a int memcnt = 0;.
0660: 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 4e 75 #endif../*.** Nu
0670: 6d 62 65 72 20 6f 66 20 33 32 2d 62 69 74 20 67 mber of 32-bit g
0680: 75 61 72 64 20 77 6f 72 64 73 0a 2a 2f 0a 23 64 uard words.*/.#d
0690: 65 66 69 6e 65 20 4e 5f 47 55 41 52 44 20 31 0a efine N_GUARD 1.
06a0: 0a 2f 2a 0a 2a 2a 20 41 6c 6c 6f 63 61 74 65 20 ./*.** Allocate
06b0: 6e 65 77 20 6d 65 6d 6f 72 79 20 61 6e 64 20 73 new memory and s
06c0: 65 74 20 69 74 20 74 6f 20 7a 65 72 6f 2e 20 20 et it to zero.
06d0: 52 65 74 75 72 6e 20 4e 55 4c 4c 20 69 66 0a 2a Return NULL if.*
06e0: 2a 20 6e 6f 20 6d 65 6d 6f 72 79 20 69 73 20 61 * no memory is a
06f0: 76 61 69 6c 61 62 6c 65 2e 0a 2a 2f 0a 76 6f 69 vailable..*/.voi
0700: 64 20 2a 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 d *sqlite3Malloc
0710: 5f 28 69 6e 74 20 6e 2c 20 69 6e 74 20 62 5a 65 _(int n, int bZe
0720: 72 6f 2c 20 63 68 61 72 20 2a 7a 46 69 6c 65 2c ro, char *zFile,
0730: 20 69 6e 74 20 6c 69 6e 65 29 7b 0a 20 20 76 6f int line){. vo
0740: 69 64 20 2a 70 3b 0a 20 20 69 6e 74 20 2a 70 69 id *p;. int *pi
0750: 3b 0a 20 20 69 6e 74 20 69 2c 20 6b 3b 0a 20 20 ;. int i, k;.
0760: 69 66 28 20 73 71 6c 69 74 65 33 5f 69 4d 61 6c if( sqlite3_iMal
0770: 6c 6f 63 46 61 69 6c 3e 3d 30 20 29 7b 0a 20 20 locFail>=0 ){.
0780: 20 20 73 71 6c 69 74 65 33 5f 69 4d 61 6c 6c 6f sqlite3_iMallo
0790: 63 46 61 69 6c 2d 2d 3b 0a 20 20 20 20 69 66 28 cFail--;. if(
07a0: 20 73 71 6c 69 74 65 33 5f 69 4d 61 6c 6c 6f 63 sqlite3_iMalloc
07b0: 46 61 69 6c 3d 3d 30 20 29 7b 0a 20 20 20 20 20 Fail==0 ){.
07c0: 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 5f sqlite3_malloc_
07d0: 66 61 69 6c 65 64 2b 2b 3b 0a 23 69 66 20 53 51 failed++;.#if SQ
07e0: 4c 49 54 45 5f 44 45 42 55 47 3e 31 0a 20 20 20 LITE_DEBUG>1.
07f0: 20 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 fprintf(stder
0800: 72 2c 22 2a 2a 2a 2a 20 66 61 69 6c 65 64 20 74 r,"**** failed t
0810: 6f 20 61 6c 6c 6f 63 61 74 65 20 25 64 20 62 79 o allocate %d by
0820: 74 65 73 20 61 74 20 25 73 3a 25 64 5c 6e 22 2c tes at %s:%d\n",
0830: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e . n
0840: 2c 20 7a 46 69 6c 65 2c 6c 69 6e 65 29 3b 0a 23 , zFile,line);.#
0850: 65 6e 64 69 66 0a 20 20 20 20 20 20 73 71 6c 69 endif. sqli
0860: 74 65 33 5f 69 4d 61 6c 6c 6f 63 46 61 69 6c 2d te3_iMallocFail-
0870: 2d 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 -;. return
0880: 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 0;. }. }. i
0890: 66 28 20 6e 3d 3d 30 20 29 20 72 65 74 75 72 6e f( n==0 ) return
08a0: 20 30 3b 0a 20 20 6b 20 3d 20 28 6e 2b 73 69 7a 0;. k = (n+siz
08b0: 65 6f 66 28 69 6e 74 29 2d 31 29 2f 73 69 7a 65 eof(int)-1)/size
08c0: 6f 66 28 69 6e 74 29 3b 0a 20 20 70 69 20 3d 20 of(int);. pi =
08d0: 6d 61 6c 6c 6f 63 28 20 28 4e 5f 47 55 41 52 44 malloc( (N_GUARD
08e0: 2a 32 2b 31 2b 6b 29 2a 73 69 7a 65 6f 66 28 69 *2+1+k)*sizeof(i
08f0: 6e 74 29 29 3b 0a 20 20 69 66 28 20 70 69 3d 3d nt));. if( pi==
0900: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 0 ){. sqlite3
0910: 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 2b 2b _malloc_failed++
0920: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a ;. return 0;.
0930: 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 6e 4d }. sqlite3_nM
0940: 61 6c 6c 6f 63 2b 2b 3b 0a 20 20 66 6f 72 28 69 alloc++;. for(i
0950: 3d 30 3b 20 69 3c 4e 5f 47 55 41 52 44 3b 20 69 =0; i<N_GUARD; i
0960: 2b 2b 29 20 70 69 5b 69 5d 20 3d 20 30 78 64 65 ++) pi[i] = 0xde
0970: 61 64 31 31 32 32 3b 0a 20 20 70 69 5b 4e 5f 47 ad1122;. pi[N_G
0980: 55 41 52 44 5d 20 3d 20 6e 3b 0a 20 20 66 6f 72 UARD] = n;. for
0990: 28 69 3d 30 3b 20 69 3c 4e 5f 47 55 41 52 44 3b (i=0; i<N_GUARD;
09a0: 20 69 2b 2b 29 20 70 69 5b 6b 2b 31 2b 4e 5f 47 i++) pi[k+1+N_G
09b0: 55 41 52 44 2b 69 5d 20 3d 20 30 78 64 65 61 64 UARD+i] = 0xdead
09c0: 33 33 34 34 3b 0a 20 20 70 20 3d 20 26 70 69 5b 3344;. p = &pi[
09d0: 4e 5f 47 55 41 52 44 2b 31 5d 3b 0a 20 20 6d 65 N_GUARD+1];. me
09e0: 6d 73 65 74 28 70 2c 20 62 5a 65 72 6f 3d 3d 30 mset(p, bZero==0
09f0: 2c 20 6e 29 3b 0a 23 69 66 20 53 51 4c 49 54 45 , n);.#if SQLITE
0a00: 5f 44 45 42 55 47 3e 31 0a 20 20 70 72 69 6e 74 _DEBUG>1. print
0a10: 5f 73 74 61 63 6b 5f 74 72 61 63 65 28 29 3b 0a _stack_trace();.
0a20: 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 fprintf(stderr
0a30: 2c 22 25 30 36 64 20 6d 61 6c 6c 6f 63 20 25 64 ,"%06d malloc %d
0a40: 20 62 79 74 65 73 20 61 74 20 30 78 25 78 20 66 bytes at 0x%x f
0a50: 72 6f 6d 20 25 73 3a 25 64 5c 6e 22 2c 0a 20 20 rom %s:%d\n",.
0a60: 20 20 20 20 2b 2b 6d 65 6d 63 6e 74 2c 20 6e 2c ++memcnt, n,
0a70: 20 28 69 6e 74 29 70 2c 20 7a 46 69 6c 65 2c 6c (int)p, zFile,l
0a80: 69 6e 65 29 3b 0a 23 65 6e 64 69 66 0a 20 20 72 ine);.#endif. r
0a90: 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a 2a eturn p;.}../*.*
0aa0: 2a 20 43 68 65 63 6b 20 74 6f 20 73 65 65 20 69 * Check to see i
0ab0: 66 20 74 68 65 20 67 69 76 65 6e 20 70 6f 69 6e f the given poin
0ac0: 74 65 72 20 77 61 73 20 6f 62 74 61 69 6e 65 64 ter was obtained
0ad0: 20 66 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c from sqliteMall
0ae0: 6f 63 28 29 0a 2a 2a 20 61 6e 64 20 69 73 20 61 oc().** and is a
0af0: 62 6c 65 20 74 6f 20 68 6f 6c 64 20 61 74 20 6c ble to hold at l
0b00: 65 61 73 74 20 4e 20 62 79 74 65 73 2e 20 20 52 east N bytes. R
0b10: 61 69 73 65 20 61 6e 20 65 78 63 65 70 74 69 6f aise an exceptio
0b20: 6e 20 69 66 20 74 68 69 73 0a 2a 2a 20 69 73 20 n if this.** is
0b30: 6e 6f 74 20 74 68 65 20 63 61 73 65 2e 0a 2a 2a not the case..**
0b40: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 .** This routine
0b50: 20 69 73 20 75 73 65 64 20 66 6f 72 20 74 65 73 is used for tes
0b60: 74 69 6e 67 20 70 75 72 70 6f 73 65 73 20 6f 6e ting purposes on
0b70: 6c 79 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 ly..*/.void sqli
0b80: 74 65 33 43 68 65 63 6b 4d 65 6d 6f 72 79 28 76 te3CheckMemory(v
0b90: 6f 69 64 20 2a 70 2c 20 69 6e 74 20 4e 29 7b 0a oid *p, int N){.
0ba0: 20 20 69 6e 74 20 2a 70 69 20 3d 20 70 3b 0a 20 int *pi = p;.
0bb0: 20 69 6e 74 20 6e 2c 20 69 2c 20 6b 3b 0a 20 20 int n, i, k;.
0bc0: 70 69 20 2d 3d 20 4e 5f 47 55 41 52 44 2b 31 3b pi -= N_GUARD+1;
0bd0: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f . for(i=0; i<N_
0be0: 47 55 41 52 44 3b 20 69 2b 2b 29 7b 0a 20 20 20 GUARD; i++){.
0bf0: 20 61 73 73 65 72 74 28 20 70 69 5b 69 5d 3d 3d assert( pi[i]==
0c00: 30 78 64 65 61 64 31 31 32 32 20 29 3b 0a 20 20 0xdead1122 );.
0c10: 7d 0a 20 20 6e 20 3d 20 70 69 5b 4e 5f 47 55 41 }. n = pi[N_GUA
0c20: 52 44 5d 3b 0a 20 20 61 73 73 65 72 74 28 20 4e RD];. assert( N
0c30: 3e 3d 30 20 26 26 20 4e 3c 6e 20 29 3b 0a 20 20 >=0 && N<n );.
0c40: 6b 20 3d 20 28 6e 2b 73 69 7a 65 6f 66 28 69 6e k = (n+sizeof(in
0c50: 74 29 2d 31 29 2f 73 69 7a 65 6f 66 28 69 6e 74 t)-1)/sizeof(int
0c60: 29 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c );. for(i=0; i<
0c70: 4e 5f 47 55 41 52 44 3b 20 69 2b 2b 29 7b 0a 20 N_GUARD; i++){.
0c80: 20 20 20 61 73 73 65 72 74 28 20 70 69 5b 6b 2b assert( pi[k+
0c90: 4e 5f 47 55 41 52 44 2b 31 2b 69 5d 3d 3d 30 78 N_GUARD+1+i]==0x
0ca0: 64 65 61 64 33 33 34 34 20 29 3b 0a 20 20 7d 0a dead3344 );. }.
0cb0: 7d 0a 0a 2f 2a 0a 2a 2a 20 46 72 65 65 20 6d 65 }../*.** Free me
0cc0: 6d 6f 72 79 20 70 72 65 76 69 6f 75 73 6c 79 20 mory previously
0cd0: 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 73 71 obtained from sq
0ce0: 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 0a 2a 2f 0a liteMalloc().*/.
0cf0: 76 6f 69 64 20 73 71 6c 69 74 65 33 46 72 65 65 void sqlite3Free
0d00: 5f 28 76 6f 69 64 20 2a 70 2c 20 63 68 61 72 20 _(void *p, char
0d10: 2a 7a 46 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 *zFile, int line
0d20: 29 7b 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 20 ){. if( p ){.
0d30: 20 20 69 6e 74 20 2a 70 69 2c 20 69 2c 20 6b 2c int *pi, i, k,
0d40: 20 6e 3b 0a 20 20 20 20 70 69 20 3d 20 70 3b 0a n;. pi = p;.
0d50: 20 20 20 20 70 69 20 2d 3d 20 4e 5f 47 55 41 52 pi -= N_GUAR
0d60: 44 2b 31 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 D+1;. sqlite3
0d70: 5f 6e 46 72 65 65 2b 2b 3b 0a 20 20 20 20 66 6f _nFree++;. fo
0d80: 72 28 69 3d 30 3b 20 69 3c 4e 5f 47 55 41 52 44 r(i=0; i<N_GUARD
0d90: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 66 ; i++){. if
0da0: 28 20 70 69 5b 69 5d 21 3d 30 78 64 65 61 64 31 ( pi[i]!=0xdead1
0db0: 31 32 32 20 29 7b 0a 20 20 20 20 20 20 20 20 66 122 ){. f
0dc0: 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 22 4c printf(stderr,"L
0dd0: 6f 77 2d 65 6e 64 20 6d 65 6d 6f 72 79 20 63 6f ow-end memory co
0de0: 72 72 75 70 74 69 6f 6e 20 61 74 20 30 78 25 78 rruption at 0x%x
0df0: 5c 6e 22 2c 20 28 69 6e 74 29 70 29 3b 0a 20 20 \n", (int)p);.
0e00: 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 return;.
0e10: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 }. }.
0e20: 6e 20 3d 20 70 69 5b 4e 5f 47 55 41 52 44 5d 3b n = pi[N_GUARD];
0e30: 0a 20 20 20 20 6b 20 3d 20 28 6e 2b 73 69 7a 65 . k = (n+size
0e40: 6f 66 28 69 6e 74 29 2d 31 29 2f 73 69 7a 65 6f of(int)-1)/sizeo
0e50: 66 28 69 6e 74 29 3b 0a 20 20 20 20 66 6f 72 28 f(int);. for(
0e60: 69 3d 30 3b 20 69 3c 4e 5f 47 55 41 52 44 3b 20 i=0; i<N_GUARD;
0e70: 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 66 28 20 i++){. if(
0e80: 70 69 5b 6b 2b 4e 5f 47 55 41 52 44 2b 31 2b 69 pi[k+N_GUARD+1+i
0e90: 5d 21 3d 30 78 64 65 61 64 33 33 34 34 20 29 7b ]!=0xdead3344 ){
0ea0: 0a 20 20 20 20 20 20 20 20 66 70 72 69 6e 74 66 . fprintf
0eb0: 28 73 74 64 65 72 72 2c 22 48 69 67 68 2d 65 6e (stderr,"High-en
0ec0: 64 20 6d 65 6d 6f 72 79 20 63 6f 72 72 75 70 74 d memory corrupt
0ed0: 69 6f 6e 20 61 74 20 30 78 25 78 5c 6e 22 2c 20 ion at 0x%x\n",
0ee0: 28 69 6e 74 29 70 29 3b 0a 20 20 20 20 20 20 20 (int)p);.
0ef0: 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d return;. }
0f00: 0a 20 20 20 20 7d 0a 20 20 20 20 6d 65 6d 73 65 . }. memse
0f10: 74 28 70 69 2c 20 30 78 66 66 2c 20 28 6b 2b 4e t(pi, 0xff, (k+N
0f20: 5f 47 55 41 52 44 2a 32 2b 31 29 2a 73 69 7a 65 _GUARD*2+1)*size
0f30: 6f 66 28 69 6e 74 29 29 3b 0a 23 69 66 20 53 51 of(int));.#if SQ
0f40: 4c 49 54 45 5f 44 45 42 55 47 3e 31 0a 20 20 20 LITE_DEBUG>1.
0f50: 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c fprintf(stderr,
0f60: 22 25 30 36 64 20 66 72 65 65 20 25 64 20 62 79 "%06d free %d by
0f70: 74 65 73 20 61 74 20 30 78 25 78 20 66 72 6f 6d tes at 0x%x from
0f80: 20 25 73 3a 25 64 5c 6e 22 2c 0a 20 20 20 20 20 %s:%d\n",.
0f90: 20 20 20 20 2b 2b 6d 65 6d 63 6e 74 2c 20 6e 2c ++memcnt, n,
0fa0: 20 28 69 6e 74 29 70 2c 20 7a 46 69 6c 65 2c 6c (int)p, zFile,l
0fb0: 69 6e 65 29 3b 0a 23 65 6e 64 69 66 0a 20 20 20 ine);.#endif.
0fc0: 20 66 72 65 65 28 70 69 29 3b 0a 20 20 7d 0a 7d free(pi);. }.}
0fd0: 0a 0a 2f 2a 0a 2a 2a 20 52 65 73 69 7a 65 20 61 ../*.** Resize a
0fe0: 20 70 72 69 6f 72 20 61 6c 6c 6f 63 61 74 69 6f prior allocatio
0ff0: 6e 2e 20 20 49 66 20 70 3d 3d 30 2c 20 74 68 65 n. If p==0, the
1000: 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a n this routine.*
1010: 2a 20 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 6b * works just lik
1020: 65 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 e sqliteMalloc()
1030: 2e 20 20 49 66 20 6e 3d 3d 30 2c 20 74 68 65 6e . If n==0, then
1040: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a this routine.**
1050: 20 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 6b 65 works just like
1060: 20 73 71 6c 69 74 65 46 72 65 65 28 29 2e 0a 2a sqliteFree()..*
1070: 2f 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 52 /.void *sqlite3R
1080: 65 61 6c 6c 6f 63 5f 28 76 6f 69 64 20 2a 6f 6c ealloc_(void *ol
1090: 64 50 2c 20 69 6e 74 20 6e 2c 20 63 68 61 72 20 dP, int n, char
10a0: 2a 7a 46 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 *zFile, int line
10b0: 29 7b 0a 20 20 69 6e 74 20 2a 6f 6c 64 50 69 2c ){. int *oldPi,
10c0: 20 2a 70 69 2c 20 69 2c 20 6b 2c 20 6f 6c 64 4e *pi, i, k, oldN
10d0: 2c 20 6f 6c 64 4b 3b 0a 20 20 76 6f 69 64 20 2a , oldK;. void *
10e0: 70 3b 0a 20 20 69 66 28 20 6f 6c 64 50 3d 3d 30 p;. if( oldP==0
10f0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 73 ){. return s
1100: 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 5f 28 6e 2c qlite3Malloc_(n,
1110: 31 2c 7a 46 69 6c 65 2c 6c 69 6e 65 29 3b 0a 20 1,zFile,line);.
1120: 20 7d 0a 20 20 69 66 28 20 6e 3d 3d 30 20 29 7b }. if( n==0 ){
1130: 0a 20 20 20 20 73 71 6c 69 74 65 33 46 72 65 65 . sqlite3Free
1140: 5f 28 6f 6c 64 50 2c 7a 46 69 6c 65 2c 6c 69 6e _(oldP,zFile,lin
1150: 65 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 e);. return 0
1160: 3b 0a 20 20 7d 0a 20 20 6f 6c 64 50 69 20 3d 20 ;. }. oldPi =
1170: 6f 6c 64 50 3b 0a 20 20 6f 6c 64 50 69 20 2d 3d oldP;. oldPi -=
1180: 20 4e 5f 47 55 41 52 44 2b 31 3b 0a 20 20 69 66 N_GUARD+1;. if
1190: 28 20 6f 6c 64 50 69 5b 30 5d 21 3d 30 78 64 65 ( oldPi[0]!=0xde
11a0: 61 64 31 31 32 32 20 29 7b 0a 20 20 20 20 66 70 ad1122 ){. fp
11b0: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 22 4c 6f rintf(stderr,"Lo
11c0: 77 2d 65 6e 64 20 6d 65 6d 6f 72 79 20 63 6f 72 w-end memory cor
11d0: 72 75 70 74 69 6f 6e 20 69 6e 20 72 65 61 6c 6c ruption in reall
11e0: 6f 63 20 61 74 20 30 78 25 78 5c 6e 22 2c 20 28 oc at 0x%x\n", (
11f0: 69 6e 74 29 6f 6c 64 50 29 3b 0a 20 20 20 20 72 int)oldP);. r
1200: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 6f eturn 0;. }. o
1210: 6c 64 4e 20 3d 20 6f 6c 64 50 69 5b 4e 5f 47 55 ldN = oldPi[N_GU
1220: 41 52 44 5d 3b 0a 20 20 6f 6c 64 4b 20 3d 20 28 ARD];. oldK = (
1230: 6f 6c 64 4e 2b 73 69 7a 65 6f 66 28 69 6e 74 29 oldN+sizeof(int)
1240: 2d 31 29 2f 73 69 7a 65 6f 66 28 69 6e 74 29 3b -1)/sizeof(int);
1250: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f . for(i=0; i<N_
1260: 47 55 41 52 44 3b 20 69 2b 2b 29 7b 0a 20 20 20 GUARD; i++){.
1270: 20 69 66 28 20 6f 6c 64 50 69 5b 6f 6c 64 4b 2b if( oldPi[oldK+
1280: 4e 5f 47 55 41 52 44 2b 31 2b 69 5d 21 3d 30 78 N_GUARD+1+i]!=0x
1290: 64 65 61 64 33 33 34 34 20 29 7b 0a 20 20 20 20 dead3344 ){.
12a0: 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 fprintf(stderr
12b0: 2c 22 48 69 67 68 2d 65 6e 64 20 6d 65 6d 6f 72 ,"High-end memor
12c0: 79 20 63 6f 72 72 75 70 74 69 6f 6e 20 69 6e 20 y corruption in
12d0: 72 65 61 6c 6c 6f 63 20 61 74 20 30 78 25 78 5c realloc at 0x%x\
12e0: 6e 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 n",.
12f0: 20 20 28 69 6e 74 29 6f 6c 64 50 29 3b 0a 20 20 (int)oldP);.
1300: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 return 0;.
1310: 20 20 7d 0a 20 20 7d 0a 20 20 6b 20 3d 20 28 6e }. }. k = (n
1320: 20 2b 20 73 69 7a 65 6f 66 28 69 6e 74 29 20 2d + sizeof(int) -
1330: 20 31 29 2f 73 69 7a 65 6f 66 28 69 6e 74 29 3b 1)/sizeof(int);
1340: 0a 20 20 70 69 20 3d 20 6d 61 6c 6c 6f 63 28 20 . pi = malloc(
1350: 28 6b 2b 4e 5f 47 55 41 52 44 2a 32 2b 31 29 2a (k+N_GUARD*2+1)*
1360: 73 69 7a 65 6f 66 28 69 6e 74 29 20 29 3b 0a 20 sizeof(int) );.
1370: 20 69 66 28 20 70 69 3d 3d 30 20 29 7b 0a 20 20 if( pi==0 ){.
1380: 20 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 sqlite3_malloc
1390: 5f 66 61 69 6c 65 64 2b 2b 3b 0a 20 20 20 20 72 _failed++;. r
13a0: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 66 eturn 0;. }. f
13b0: 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f 47 55 41 52 or(i=0; i<N_GUAR
13c0: 44 3b 20 69 2b 2b 29 20 70 69 5b 69 5d 20 3d 20 D; i++) pi[i] =
13d0: 30 78 64 65 61 64 31 31 32 32 3b 0a 20 20 70 69 0xdead1122;. pi
13e0: 5b 4e 5f 47 55 41 52 44 5d 20 3d 20 6e 3b 0a 20 [N_GUARD] = n;.
13f0: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 4e 5f 47 55 for(i=0; i<N_GU
1400: 41 52 44 3b 20 69 2b 2b 29 20 70 69 5b 6b 2b 4e ARD; i++) pi[k+N
1410: 5f 47 55 41 52 44 2b 31 2b 69 5d 20 3d 20 30 78 _GUARD+1+i] = 0x
1420: 64 65 61 64 33 33 34 34 3b 0a 20 20 70 20 3d 20 dead3344;. p =
1430: 26 70 69 5b 4e 5f 47 55 41 52 44 2b 31 5d 3b 0a &pi[N_GUARD+1];.
1440: 20 20 6d 65 6d 63 70 79 28 70 2c 20 6f 6c 64 50 memcpy(p, oldP
1450: 2c 20 6e 3e 6f 6c 64 4e 20 3f 20 6f 6c 64 4e 20 , n>oldN ? oldN
1460: 3a 20 6e 29 3b 0a 20 20 69 66 28 20 6e 3e 6f 6c : n);. if( n>ol
1470: 64 4e 20 29 7b 0a 20 20 20 20 6d 65 6d 73 65 74 dN ){. memset
1480: 28 26 28 28 63 68 61 72 2a 29 70 29 5b 6f 6c 64 (&((char*)p)[old
1490: 4e 5d 2c 20 30 78 35 35 2c 20 6e 2d 6f 6c 64 4e N], 0x55, n-oldN
14a0: 29 3b 0a 20 20 7d 0a 20 20 6d 65 6d 73 65 74 28 );. }. memset(
14b0: 6f 6c 64 50 69 2c 20 30 78 61 62 2c 20 28 6f 6c oldPi, 0xab, (ol
14c0: 64 4b 2b 4e 5f 47 55 41 52 44 2b 32 29 2a 73 69 dK+N_GUARD+2)*si
14d0: 7a 65 6f 66 28 69 6e 74 29 29 3b 0a 20 20 66 72 zeof(int));. fr
14e0: 65 65 28 6f 6c 64 50 69 29 3b 0a 23 69 66 20 53 ee(oldPi);.#if S
14f0: 51 4c 49 54 45 5f 44 45 42 55 47 3e 31 0a 20 20 QLITE_DEBUG>1.
1500: 70 72 69 6e 74 5f 73 74 61 63 6b 5f 74 72 61 63 print_stack_trac
1510: 65 28 29 3b 0a 20 20 66 70 72 69 6e 74 66 28 73 e();. fprintf(s
1520: 74 64 65 72 72 2c 22 25 30 36 64 20 72 65 61 6c tderr,"%06d real
1530: 6c 6f 63 20 25 64 20 74 6f 20 25 64 20 62 79 74 loc %d to %d byt
1540: 65 73 20 61 74 20 30 78 25 78 20 74 6f 20 30 78 es at 0x%x to 0x
1550: 25 78 20 61 74 20 25 73 3a 25 64 5c 6e 22 2c 0a %x at %s:%d\n",.
1560: 20 20 20 20 2b 2b 6d 65 6d 63 6e 74 2c 20 6f 6c ++memcnt, ol
1570: 64 4e 2c 20 6e 2c 20 28 69 6e 74 29 6f 6c 64 50 dN, n, (int)oldP
1580: 2c 20 28 69 6e 74 29 70 2c 20 7a 46 69 6c 65 2c , (int)p, zFile,
1590: 20 6c 69 6e 65 29 3b 0a 23 65 6e 64 69 66 0a 20 line);.#endif.
15a0: 20 72 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a return p;.}../*
15b0: 0a 2a 2a 20 4d 61 6b 65 20 61 20 63 6f 70 79 20 .** Make a copy
15c0: 6f 66 20 61 20 73 74 72 69 6e 67 20 69 6e 20 6d of a string in m
15d0: 65 6d 6f 72 79 20 6f 62 74 61 69 6e 65 64 20 66 emory obtained f
15e0: 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 rom sqliteMalloc
15f0: 28 29 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c 69 ().*/.char *sqli
1600: 74 65 33 53 74 72 44 75 70 5f 28 63 6f 6e 73 74 te3StrDup_(const
1610: 20 63 68 61 72 20 2a 7a 2c 20 63 68 61 72 20 2a char *z, char *
1620: 7a 46 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 zFile, int line)
1630: 7b 0a 20 20 63 68 61 72 20 2a 7a 4e 65 77 3b 0a {. char *zNew;.
1640: 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 if( z==0 ) ret
1650: 75 72 6e 20 30 3b 0a 20 20 7a 4e 65 77 20 3d 20 urn 0;. zNew =
1660: 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 5f 28 73 sqlite3Malloc_(s
1670: 74 72 6c 65 6e 28 7a 29 2b 31 2c 20 30 2c 20 7a trlen(z)+1, 0, z
1680: 46 69 6c 65 2c 20 6c 69 6e 65 29 3b 0a 20 20 69 File, line);. i
1690: 66 28 20 7a 4e 65 77 20 29 20 73 74 72 63 70 79 f( zNew ) strcpy
16a0: 28 7a 4e 65 77 2c 20 7a 29 3b 0a 20 20 72 65 74 (zNew, z);. ret
16b0: 75 72 6e 20 7a 4e 65 77 3b 0a 7d 0a 63 68 61 72 urn zNew;.}.char
16c0: 20 2a 73 71 6c 69 74 65 33 53 74 72 4e 44 75 70 *sqlite3StrNDup
16d0: 5f 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c _(const char *z,
16e0: 20 69 6e 74 20 6e 2c 20 63 68 61 72 20 2a 7a 46 int n, char *zF
16f0: 69 6c 65 2c 20 69 6e 74 20 6c 69 6e 65 29 7b 0a ile, int line){.
1700: 20 20 63 68 61 72 20 2a 7a 4e 65 77 3b 0a 20 20 char *zNew;.
1710: 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 if( z==0 ) retur
1720: 6e 20 30 3b 0a 20 20 7a 4e 65 77 20 3d 20 73 71 n 0;. zNew = sq
1730: 6c 69 74 65 33 4d 61 6c 6c 6f 63 5f 28 6e 2b 31 lite3Malloc_(n+1
1740: 2c 20 30 2c 20 7a 46 69 6c 65 2c 20 6c 69 6e 65 , 0, zFile, line
1750: 29 3b 0a 20 20 69 66 28 20 7a 4e 65 77 20 29 7b );. if( zNew ){
1760: 0a 20 20 20 20 6d 65 6d 63 70 79 28 7a 4e 65 77 . memcpy(zNew
1770: 2c 20 7a 2c 20 6e 29 3b 0a 20 20 20 20 7a 4e 65 , z, n);. zNe
1780: 77 5b 6e 5d 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 w[n] = 0;. }.
1790: 72 65 74 75 72 6e 20 7a 4e 65 77 3b 0a 7d 0a 0a return zNew;.}..
17a0: 2f 2a 0a 2a 2a 20 41 20 76 65 72 73 69 6f 6e 20 /*.** A version
17b0: 6f 66 20 73 71 6c 69 74 65 46 72 65 65 20 74 68 of sqliteFree th
17c0: 61 74 20 69 73 20 61 6c 77 61 79 73 20 61 20 66 at is always a f
17d0: 75 6e 63 74 69 6f 6e 2c 20 6e 6f 74 20 61 20 6d unction, not a m
17e0: 61 63 72 6f 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 acro..*/.void sq
17f0: 6c 69 74 65 33 46 72 65 65 58 28 76 6f 69 64 20 lite3FreeX(void
1800: 2a 70 29 7b 0a 20 20 73 71 6c 69 74 65 46 72 65 *p){. sqliteFre
1810: 65 28 70 29 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f e(p);.}.#endif /
1820: 2a 20 53 51 4c 49 54 45 5f 44 45 42 55 47 20 2a * SQLITE_DEBUG *
1830: 2f 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c /../*.** The fol
1840: 6c 6f 77 69 6e 67 20 76 65 72 73 69 6f 6e 73 20 lowing versions
1850: 6f 66 20 6d 61 6c 6c 6f 63 28 29 20 61 6e 64 20 of malloc() and
1860: 66 72 65 65 28 29 20 61 72 65 20 66 6f 72 20 75 free() are for u
1870: 73 65 20 69 6e 20 61 0a 2a 2a 20 6e 6f 72 6d 61 se in a.** norma
1880: 6c 20 62 75 69 6c 64 2e 0a 2a 2f 0a 23 69 66 20 l build..*/.#if
1890: 21 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f !defined(SQLITE_
18a0: 44 45 42 55 47 29 0a 0a 2f 2a 0a 2a 2a 20 41 6c DEBUG)../*.** Al
18b0: 6c 6f 63 61 74 65 20 6e 65 77 20 6d 65 6d 6f 72 locate new memor
18c0: 79 20 61 6e 64 20 73 65 74 20 69 74 20 74 6f 20 y and set it to
18d0: 7a 65 72 6f 2e 20 20 52 65 74 75 72 6e 20 4e 55 zero. Return NU
18e0: 4c 4c 20 69 66 0a 2a 2a 20 6e 6f 20 6d 65 6d 6f LL if.** no memo
18f0: 72 79 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2e ry is available.
1900: 20 20 53 65 65 20 61 6c 73 6f 20 73 71 6c 69 74 See also sqlit
1910: 65 4d 61 6c 6c 6f 63 52 61 77 28 29 2e 0a 2a 2f eMallocRaw()..*/
1920: 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 4d 61 .void *sqlite3Ma
1930: 6c 6c 6f 63 28 69 6e 74 20 6e 29 7b 0a 20 20 76 lloc(int n){. v
1940: 6f 69 64 20 2a 70 3b 0a 20 20 69 66 28 20 28 70 oid *p;. if( (p
1950: 20 3d 20 6d 61 6c 6c 6f 63 28 6e 29 29 3d 3d 30 = malloc(n))==0
1960: 20 29 7b 0a 20 20 20 20 69 66 28 20 6e 3e 30 20 ){. if( n>0
1970: 29 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 ) sqlite3_malloc
1980: 5f 66 61 69 6c 65 64 2b 2b 3b 0a 20 20 7d 65 6c _failed++;. }el
1990: 73 65 7b 0a 20 20 20 20 6d 65 6d 73 65 74 28 70 se{. memset(p
19a0: 2c 20 30 2c 20 6e 29 3b 0a 20 20 7d 0a 20 20 72 , 0, n);. }. r
19b0: 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a 2a eturn p;.}../*.*
19c0: 2a 20 41 6c 6c 6f 63 61 74 65 20 6e 65 77 20 6d * Allocate new m
19d0: 65 6d 6f 72 79 20 62 75 74 20 64 6f 20 6e 6f 74 emory but do not
19e0: 20 73 65 74 20 69 74 20 74 6f 20 7a 65 72 6f 2e set it to zero.
19f0: 20 20 52 65 74 75 72 6e 20 4e 55 4c 4c 20 69 66 Return NULL if
1a00: 0a 2a 2a 20 6e 6f 20 6d 65 6d 6f 72 79 20 69 73 .** no memory is
1a10: 20 61 76 61 69 6c 61 62 6c 65 2e 20 20 53 65 65 available. See
1a20: 20 61 6c 73 6f 20 73 71 6c 69 74 65 4d 61 6c 6c also sqliteMall
1a30: 6f 63 28 29 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73 oc()..*/.void *s
1a40: 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 52 61 77 28 qlite3MallocRaw(
1a50: 69 6e 74 20 6e 29 7b 0a 20 20 76 6f 69 64 20 2a int n){. void *
1a60: 70 3b 0a 20 20 69 66 28 20 28 70 20 3d 20 6d 61 p;. if( (p = ma
1a70: 6c 6c 6f 63 28 6e 29 29 3d 3d 30 20 29 7b 0a 20 lloc(n))==0 ){.
1a80: 20 20 20 69 66 28 20 6e 3e 30 20 29 20 73 71 6c if( n>0 ) sql
1a90: 69 74 65 33 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c ite3_malloc_fail
1aa0: 65 64 2b 2b 3b 0a 20 20 7d 0a 20 20 72 65 74 75 ed++;. }. retu
1ab0: 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 46 rn p;.}../*.** F
1ac0: 72 65 65 20 6d 65 6d 6f 72 79 20 70 72 65 76 69 ree memory previ
1ad0: 6f 75 73 6c 79 20 6f 62 74 61 69 6e 65 64 20 66 ously obtained f
1ae0: 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 rom sqliteMalloc
1af0: 28 29 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 ().*/.void sqlit
1b00: 65 33 46 72 65 65 58 28 76 6f 69 64 20 2a 70 29 e3FreeX(void *p)
1b10: 7b 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 20 20 {. if( p ){.
1b20: 20 66 72 65 65 28 70 29 3b 0a 20 20 7d 0a 7d 0a free(p);. }.}.
1b30: 0a 2f 2a 0a 2a 2a 20 52 65 73 69 7a 65 20 61 20 ./*.** Resize a
1b40: 70 72 69 6f 72 20 61 6c 6c 6f 63 61 74 69 6f 6e prior allocation
1b50: 2e 20 20 49 66 20 70 3d 3d 30 2c 20 74 68 65 6e . If p==0, then
1b60: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a this routine.**
1b70: 20 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 6b 65 works just like
1b80: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 2e sqliteMalloc().
1b90: 20 20 49 66 20 6e 3d 3d 30 2c 20 74 68 65 6e 20 If n==0, then
1ba0: 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 this routine.**
1bb0: 77 6f 72 6b 73 20 6a 75 73 74 20 6c 69 6b 65 20 works just like
1bc0: 73 71 6c 69 74 65 46 72 65 65 28 29 2e 0a 2a 2f sqliteFree()..*/
1bd0: 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 52 65 .void *sqlite3Re
1be0: 61 6c 6c 6f 63 28 76 6f 69 64 20 2a 70 2c 20 69 alloc(void *p, i
1bf0: 6e 74 20 6e 29 7b 0a 20 20 76 6f 69 64 20 2a 70 nt n){. void *p
1c00: 32 3b 0a 20 20 69 66 28 20 70 3d 3d 30 20 29 7b 2;. if( p==0 ){
1c10: 0a 20 20 20 20 72 65 74 75 72 6e 20 73 71 6c 69 . return sqli
1c20: 74 65 4d 61 6c 6c 6f 63 28 6e 29 3b 0a 20 20 7d teMalloc(n);. }
1c30: 0a 20 20 69 66 28 20 6e 3d 3d 30 20 29 7b 0a 20 . if( n==0 ){.
1c40: 20 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 29 sqliteFree(p)
1c50: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a ;. return 0;.
1c60: 20 20 7d 0a 20 20 70 32 20 3d 20 72 65 61 6c 6c }. p2 = reall
1c70: 6f 63 28 70 2c 20 6e 29 3b 0a 20 20 69 66 28 20 oc(p, n);. if(
1c80: 70 32 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c p2==0 ){. sql
1c90: 69 74 65 33 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c ite3_malloc_fail
1ca0: 65 64 2b 2b 3b 0a 20 20 7d 0a 20 20 72 65 74 75 ed++;. }. retu
1cb0: 72 6e 20 70 32 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 rn p2;.}../*.**
1cc0: 4d 61 6b 65 20 61 20 63 6f 70 79 20 6f 66 20 61 Make a copy of a
1cd0: 20 73 74 72 69 6e 67 20 69 6e 20 6d 65 6d 6f 72 string in memor
1ce0: 79 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 y obtained from
1cf0: 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 0a 2a sqliteMalloc().*
1d00: 2f 0a 63 68 61 72 20 2a 73 71 6c 69 74 65 33 53 /.char *sqlite3S
1d10: 74 72 44 75 70 28 63 6f 6e 73 74 20 63 68 61 72 trDup(const char
1d20: 20 2a 7a 29 7b 0a 20 20 63 68 61 72 20 2a 7a 4e *z){. char *zN
1d30: 65 77 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 ew;. if( z==0 )
1d40: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7a 4e 65 return 0;. zNe
1d50: 77 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 w = sqliteMalloc
1d60: 52 61 77 28 73 74 72 6c 65 6e 28 7a 29 2b 31 29 Raw(strlen(z)+1)
1d70: 3b 0a 20 20 69 66 28 20 7a 4e 65 77 20 29 20 73 ;. if( zNew ) s
1d80: 74 72 63 70 79 28 7a 4e 65 77 2c 20 7a 29 3b 0a trcpy(zNew, z);.
1d90: 20 20 72 65 74 75 72 6e 20 7a 4e 65 77 3b 0a 7d return zNew;.}
1da0: 0a 63 68 61 72 20 2a 73 71 6c 69 74 65 33 53 74 .char *sqlite3St
1db0: 72 4e 44 75 70 28 63 6f 6e 73 74 20 63 68 61 72 rNDup(const char
1dc0: 20 2a 7a 2c 20 69 6e 74 20 6e 29 7b 0a 20 20 63 *z, int n){. c
1dd0: 68 61 72 20 2a 7a 4e 65 77 3b 0a 20 20 69 66 28 har *zNew;. if(
1de0: 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30 z==0 ) return 0
1df0: 3b 0a 20 20 7a 4e 65 77 20 3d 20 73 71 6c 69 74 ;. zNew = sqlit
1e00: 65 4d 61 6c 6c 6f 63 52 61 77 28 6e 2b 31 29 3b eMallocRaw(n+1);
1e10: 0a 20 20 69 66 28 20 7a 4e 65 77 20 29 7b 0a 20 . if( zNew ){.
1e20: 20 20 20 6d 65 6d 63 70 79 28 7a 4e 65 77 2c 20 memcpy(zNew,
1e30: 7a 2c 20 6e 29 3b 0a 20 20 20 20 7a 4e 65 77 5b z, n);. zNew[
1e40: 6e 5d 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 72 65 n] = 0;. }. re
1e50: 74 75 72 6e 20 7a 4e 65 77 3b 0a 7d 0a 23 65 6e turn zNew;.}.#en
1e60: 64 69 66 20 2f 2a 20 21 64 65 66 69 6e 65 64 28 dif /* !defined(
1e70: 53 51 4c 49 54 45 5f 44 45 42 55 47 29 20 2a 2f SQLITE_DEBUG) */
1e80: 0a 0a 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 ../*.** Create a
1e90: 20 73 74 72 69 6e 67 20 66 72 6f 6d 20 74 68 65 string from the
1ea0: 20 32 6e 64 20 61 6e 64 20 73 75 62 73 65 71 75 2nd and subsequ
1eb0: 65 6e 74 20 61 72 67 75 6d 65 6e 74 73 20 28 75 ent arguments (u
1ec0: 70 20 74 6f 20 74 68 65 0a 2a 2a 20 66 69 72 73 p to the.** firs
1ed0: 74 20 4e 55 4c 4c 20 61 72 67 75 6d 65 6e 74 29 t NULL argument)
1ee0: 2c 20 73 74 6f 72 65 20 74 68 65 20 73 74 72 69 , store the stri
1ef0: 6e 67 20 69 6e 20 6d 65 6d 6f 72 79 20 6f 62 74 ng in memory obt
1f00: 61 69 6e 65 64 20 66 72 6f 6d 0a 2a 2a 20 73 71 ained from.** sq
1f10: 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 20 61 6e 64 liteMalloc() and
1f20: 20 6d 61 6b 65 20 74 68 65 20 70 6f 69 6e 74 65 make the pointe
1f30: 72 20 69 6e 64 69 63 61 74 65 64 20 62 79 20 74 r indicated by t
1f40: 68 65 20 31 73 74 20 61 72 67 75 6d 65 6e 74 0a he 1st argument.
1f50: 2a 2a 20 70 6f 69 6e 74 20 74 6f 20 74 68 61 74 ** point to that
1f60: 20 73 74 72 69 6e 67 2e 20 20 54 68 65 20 31 73 string. The 1s
1f70: 74 20 61 72 67 75 6d 65 6e 74 20 6d 75 73 74 20 t argument must
1f80: 65 69 74 68 65 72 20 62 65 20 4e 55 4c 4c 20 6f either be NULL o
1f90: 72 20 0a 2a 2a 20 70 6f 69 6e 74 20 74 6f 20 6d r .** point to m
1fa0: 65 6d 6f 72 79 20 6f 62 74 61 69 6e 65 64 20 66 emory obtained f
1fb0: 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 rom sqliteMalloc
1fc0: 28 29 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 ()..*/.void sqli
1fd0: 74 65 33 53 65 74 53 74 72 69 6e 67 28 63 68 61 te3SetString(cha
1fe0: 72 20 2a 2a 70 7a 2c 20 63 6f 6e 73 74 20 63 68 r **pz, const ch
1ff0: 61 72 20 2a 7a 46 69 72 73 74 2c 20 2e 2e 2e 29 ar *zFirst, ...)
2000: 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a {. va_list ap;.
2010: 20 20 69 6e 74 20 6e 42 79 74 65 3b 0a 20 20 63 int nByte;. c
2020: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 3b 0a 20 20 onst char *z;.
2030: 63 68 61 72 20 2a 7a 52 65 73 75 6c 74 3b 0a 0a char *zResult;..
2040: 20 20 69 66 28 20 70 7a 3d 3d 30 20 29 20 72 65 if( pz==0 ) re
2050: 74 75 72 6e 3b 0a 20 20 6e 42 79 74 65 20 3d 20 turn;. nByte =
2060: 73 74 72 6c 65 6e 28 7a 46 69 72 73 74 29 20 2b strlen(zFirst) +
2070: 20 31 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 1;. va_start(a
2080: 70 2c 20 7a 46 69 72 73 74 29 3b 0a 20 20 77 68 p, zFirst);. wh
2090: 69 6c 65 28 20 28 7a 20 3d 20 76 61 5f 61 72 67 ile( (z = va_arg
20a0: 28 61 70 2c 20 63 6f 6e 73 74 20 63 68 61 72 2a (ap, const char*
20b0: 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 6e 42 79 ))!=0 ){. nBy
20c0: 74 65 20 2b 3d 20 73 74 72 6c 65 6e 28 7a 29 3b te += strlen(z);
20d0: 0a 20 20 7d 0a 20 20 76 61 5f 65 6e 64 28 61 70 . }. va_end(ap
20e0: 29 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 );. sqliteFree(
20f0: 2a 70 7a 29 3b 0a 20 20 2a 70 7a 20 3d 20 7a 52 *pz);. *pz = zR
2100: 65 73 75 6c 74 20 3d 20 73 71 6c 69 74 65 4d 61 esult = sqliteMa
2110: 6c 6c 6f 63 52 61 77 28 20 6e 42 79 74 65 20 29 llocRaw( nByte )
2120: 3b 0a 20 20 69 66 28 20 7a 52 65 73 75 6c 74 3d ;. if( zResult=
2130: 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e =0 ){. return
2140: 3b 0a 20 20 7d 0a 20 20 73 74 72 63 70 79 28 7a ;. }. strcpy(z
2150: 52 65 73 75 6c 74 2c 20 7a 46 69 72 73 74 29 3b Result, zFirst);
2160: 0a 20 20 7a 52 65 73 75 6c 74 20 2b 3d 20 73 74 . zResult += st
2170: 72 6c 65 6e 28 7a 52 65 73 75 6c 74 29 3b 0a 20 rlen(zResult);.
2180: 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 va_start(ap, zF
2190: 69 72 73 74 29 3b 0a 20 20 77 68 69 6c 65 28 20 irst);. while(
21a0: 28 7a 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 20 (z = va_arg(ap,
21b0: 63 6f 6e 73 74 20 63 68 61 72 2a 29 29 21 3d 30 const char*))!=0
21c0: 20 29 7b 0a 20 20 20 20 73 74 72 63 70 79 28 7a ){. strcpy(z
21d0: 52 65 73 75 6c 74 2c 20 7a 29 3b 0a 20 20 20 20 Result, z);.
21e0: 7a 52 65 73 75 6c 74 20 2b 3d 20 73 74 72 6c 65 zResult += strle
21f0: 6e 28 7a 52 65 73 75 6c 74 29 3b 0a 20 20 7d 0a n(zResult);. }.
2200: 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 23 69 va_end(ap);.#i
2210: 66 64 65 66 20 53 51 4c 49 54 45 5f 44 45 42 55 fdef SQLITE_DEBU
2220: 47 0a 23 69 66 20 53 51 4c 49 54 45 5f 44 45 42 G.#if SQLITE_DEB
2230: 55 47 3e 31 0a 20 20 66 70 72 69 6e 74 66 28 73 UG>1. fprintf(s
2240: 74 64 65 72 72 2c 22 73 74 72 69 6e 67 20 61 74 tderr,"string at
2250: 20 30 78 25 78 20 69 73 20 25 73 5c 6e 22 2c 20 0x%x is %s\n",
2260: 28 69 6e 74 29 2a 70 7a 2c 20 2a 70 7a 29 3b 0a (int)*pz, *pz);.
2270: 23 65 6e 64 69 66 0a 23 65 6e 64 69 66 0a 7d 0a #endif.#endif.}.
2280: 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 6d ./*.** Set the m
2290: 6f 73 74 20 72 65 63 65 6e 74 20 65 72 72 6f 72 ost recent error
22a0: 20 63 6f 64 65 20 61 6e 64 20 65 72 72 6f 72 20 code and error
22b0: 73 74 72 69 6e 67 20 66 6f 72 20 74 68 65 20 73 string for the s
22c0: 71 6c 69 74 65 0a 2a 2a 20 68 61 6e 64 6c 65 20 qlite.** handle
22d0: 22 64 62 22 2e 20 54 68 65 20 65 72 72 6f 72 20 "db". The error
22e0: 63 6f 64 65 20 69 73 20 73 65 74 20 74 6f 20 22 code is set to "
22f0: 65 72 72 5f 63 6f 64 65 22 2e 0a 2a 2a 0a 2a 2a err_code"..**.**
2300: 20 49 66 20 69 74 20 69 73 20 6e 6f 74 20 4e 55 If it is not NU
2310: 4c 4c 2c 20 73 74 72 69 6e 67 20 7a 46 6f 72 6d LL, string zForm
2320: 61 74 20 73 70 65 63 69 66 69 65 73 20 74 68 65 at specifies the
2330: 20 66 6f 72 6d 61 74 20 6f 66 20 74 68 65 0a 2a format of the.*
2340: 2a 20 65 72 72 6f 72 20 73 74 72 69 6e 67 20 69 * error string i
2350: 6e 20 74 68 65 20 73 74 79 6c 65 20 6f 66 20 74 n the style of t
2360: 68 65 20 70 72 69 6e 74 66 20 66 75 6e 63 74 69 he printf functi
2370: 6f 6e 73 3a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 ons: The followi
2380: 6e 67 0a 2a 2a 20 66 6f 72 6d 61 74 20 63 68 61 ng.** format cha
2390: 72 61 63 74 65 72 73 20 61 72 65 20 61 6c 6c 6f racters are allo
23a0: 77 65 64 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 wed:.**.**
23b0: 25 73 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 %s Insert a
23c0: 20 73 74 72 69 6e 67 0a 2a 2a 20 20 20 20 20 20 string.**
23d0: 25 7a 20 20 20 20 20 20 41 20 73 74 72 69 6e 67 %z A string
23e0: 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 20 that should be
23f0: 66 72 65 65 64 20 61 66 74 65 72 20 75 73 65 0a freed after use.
2400: 2a 2a 20 20 20 20 20 20 25 64 20 20 20 20 20 20 ** %d
2410: 49 6e 73 65 72 74 20 61 6e 20 69 6e 74 65 67 65 Insert an intege
2420: 72 0a 2a 2a 20 20 20 20 20 20 25 54 20 20 20 20 r.** %T
2430: 20 20 49 6e 73 65 72 74 20 61 20 74 6f 6b 65 6e Insert a token
2440: 0a 2a 2a 20 20 20 20 20 20 25 53 20 20 20 20 20 .** %S
2450: 20 49 6e 73 65 72 74 20 74 68 65 20 66 69 72 73 Insert the firs
2460: 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 61 20 53 t element of a S
2470: 72 63 4c 69 73 74 0a 2a 2a 0a 2a 2a 20 7a 46 6f rcList.**.** zFo
2480: 72 6d 61 74 20 61 6e 64 20 61 6e 79 20 73 74 72 rmat and any str
2490: 69 6e 67 20 74 6f 6b 65 6e 73 20 74 68 61 74 20 ing tokens that
24a0: 66 6f 6c 6c 6f 77 20 69 74 20 61 72 65 20 61 73 follow it are as
24b0: 73 75 6d 65 64 20 74 6f 20 62 65 0a 2a 2a 20 65 sumed to be.** e
24c0: 6e 63 6f 64 65 64 20 69 6e 20 55 54 46 2d 38 2e ncoded in UTF-8.
24d0: 0a 2a 2a 0a 2a 2a 20 54 6f 20 63 6c 65 61 72 20 .**.** To clear
24e0: 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 20 the most recent
24f0: 65 72 72 6f 72 20 66 6f 72 20 73 6c 71 69 74 65 error for slqite
2500: 20 68 61 6e 64 6c 65 20 22 64 62 22 2c 20 73 71 handle "db", sq
2510: 6c 69 74 65 33 45 72 72 6f 72 0a 2a 2a 20 73 68 lite3Error.** sh
2520: 6f 75 6c 64 20 62 65 20 63 61 6c 6c 65 64 20 77 ould be called w
2530: 69 74 68 20 65 72 72 5f 63 6f 64 65 20 73 65 74 ith err_code set
2540: 20 74 6f 20 53 51 4c 49 54 45 5f 4f 4b 20 61 6e to SQLITE_OK an
2550: 64 20 7a 46 6f 72 6d 61 74 20 73 65 74 0a 2a 2a d zFormat set.**
2560: 20 74 6f 20 4e 55 4c 4c 2e 0a 2a 2f 0a 76 6f 69 to NULL..*/.voi
2570: 64 20 73 71 6c 69 74 65 33 45 72 72 6f 72 28 73 d sqlite3Error(s
2580: 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e 74 20 qlite3 *db, int
2590: 65 72 72 5f 63 6f 64 65 2c 20 63 6f 6e 73 74 20 err_code, const
25a0: 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e char *zFormat, .
25b0: 2e 2e 29 7b 0a 20 20 69 66 28 20 64 62 20 26 26 ..){. if( db &&
25c0: 20 28 64 62 2d 3e 70 45 72 72 20 7c 7c 20 28 64 (db->pErr || (d
25d0: 62 2d 3e 70 45 72 72 20 3d 20 73 71 6c 69 74 65 b->pErr = sqlite
25e0: 33 56 61 6c 75 65 4e 65 77 28 29 29 29 20 29 7b 3ValueNew())) ){
25f0: 0a 20 20 20 20 64 62 2d 3e 65 72 72 43 6f 64 65 . db->errCode
2600: 20 3d 20 65 72 72 5f 63 6f 64 65 3b 0a 20 20 20 = err_code;.
2610: 20 69 66 28 20 7a 46 6f 72 6d 61 74 20 29 7b 0a if( zFormat ){.
2620: 20 20 20 20 20 20 63 68 61 72 20 2a 7a 3b 0a 20 char *z;.
2630: 20 20 20 20 20 76 61 5f 6c 69 73 74 20 61 70 3b va_list ap;
2640: 0a 20 20 20 20 20 20 76 61 5f 73 74 61 72 74 28 . va_start(
2650: 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 ap, zFormat);.
2660: 20 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 56 z = sqlite3V
2670: 4d 50 72 69 6e 74 66 28 7a 46 6f 72 6d 61 74 2c MPrintf(zFormat,
2680: 20 61 70 29 3b 0a 20 20 20 20 20 20 76 61 5f 65 ap);. va_e
2690: 6e 64 28 61 70 29 3b 0a 20 20 20 20 20 20 73 71 nd(ap);. sq
26a0: 6c 69 74 65 33 56 61 6c 75 65 53 65 74 53 74 72 lite3ValueSetStr
26b0: 28 64 62 2d 3e 70 45 72 72 2c 20 2d 31 2c 20 7a (db->pErr, -1, z
26c0: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 73 , SQLITE_UTF8, s
26d0: 71 6c 69 74 65 33 46 72 65 65 58 29 3b 0a 20 20 qlite3FreeX);.
26e0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 }else{. s
26f0: 71 6c 69 74 65 33 56 61 6c 75 65 53 65 74 53 74 qlite3ValueSetSt
2700: 72 28 64 62 2d 3e 70 45 72 72 2c 20 30 2c 20 30 r(db->pErr, 0, 0
2710: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 53 , SQLITE_UTF8, S
2720: 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 QLITE_STATIC);.
2730: 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a }. }.}../*.*
2740: 2a 20 41 64 64 20 61 6e 20 65 72 72 6f 72 20 6d * Add an error m
2750: 65 73 73 61 67 65 20 74 6f 20 70 50 61 72 73 65 essage to pParse
2760: 2d 3e 7a 45 72 72 4d 73 67 20 61 6e 64 20 69 6e ->zErrMsg and in
2770: 63 72 65 6d 65 6e 74 20 70 50 61 72 73 65 2d 3e crement pParse->
2780: 6e 45 72 72 2e 0a 2a 2a 20 54 68 65 20 66 6f 6c nErr..** The fol
2790: 6c 6f 77 69 6e 67 20 66 6f 72 6d 61 74 74 69 6e lowing formattin
27a0: 67 20 63 68 61 72 61 63 74 65 72 73 20 61 72 65 g characters are
27b0: 20 61 6c 6c 6f 77 65 64 3a 0a 2a 2a 0a 2a 2a 20 allowed:.**.**
27c0: 20 20 20 20 20 25 73 20 20 20 20 20 20 49 6e 73 %s Ins
27d0: 65 72 74 20 61 20 73 74 72 69 6e 67 0a 2a 2a 20 ert a string.**
27e0: 20 20 20 20 20 25 7a 20 20 20 20 20 20 41 20 73 %z A s
27f0: 74 72 69 6e 67 20 74 68 61 74 20 73 68 6f 75 6c tring that shoul
2800: 64 20 62 65 20 66 72 65 65 64 20 61 66 74 65 72 d be freed after
2810: 20 75 73 65 0a 2a 2a 20 20 20 20 20 20 25 64 20 use.** %d
2820: 20 20 20 20 20 49 6e 73 65 72 74 20 61 6e 20 69 Insert an i
2830: 6e 74 65 67 65 72 0a 2a 2a 20 20 20 20 20 20 25 nteger.** %
2840: 54 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 20 T Insert a
2850: 74 6f 6b 65 6e 0a 2a 2a 20 20 20 20 20 20 25 53 token.** %S
2860: 20 20 20 20 20 20 49 6e 73 65 72 74 20 74 68 65 Insert the
2870: 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20 6f first element o
2880: 66 20 61 20 53 72 63 4c 69 73 74 0a 2a 2a 0a 2a f a SrcList.**.*
2890: 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 * This function
28a0: 73 68 6f 75 6c 64 20 62 65 20 75 73 65 64 20 74 should be used t
28b0: 6f 20 72 65 70 6f 72 74 20 61 6e 79 20 65 72 72 o report any err
28c0: 6f 72 20 74 68 61 74 20 6f 63 63 75 72 73 20 77 or that occurs w
28d0: 68 69 6c 73 74 0a 2a 2a 20 63 6f 6d 70 69 6c 69 hilst.** compili
28e0: 6e 67 20 61 6e 20 53 51 4c 20 73 74 61 74 65 6d ng an SQL statem
28f0: 65 6e 74 20 28 69 2e 65 2e 20 77 69 74 68 69 6e ent (i.e. within
2900: 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 sqlite3_prepare
2910: 28 29 29 2e 20 54 68 65 0a 2a 2a 20 6c 61 73 74 ()). The.** last
2920: 20 74 68 69 6e 67 20 74 68 65 20 73 71 6c 69 74 thing the sqlit
2930: 65 33 5f 70 72 65 70 61 72 65 28 29 20 66 75 6e e3_prepare() fun
2940: 63 74 69 6f 6e 20 64 6f 65 73 20 69 73 20 63 6f ction does is co
2950: 70 79 20 74 68 65 20 65 72 72 6f 72 0a 2a 2a 20 py the error.**
2960: 73 74 6f 72 65 64 20 62 79 20 74 68 69 73 20 66 stored by this f
2970: 75 6e 63 74 69 6f 6e 20 69 6e 74 6f 20 74 68 65 unction into the
2980: 20 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65 database handle
2990: 20 75 73 69 6e 67 20 73 71 6c 69 74 65 33 45 72 using sqlite3Er
29a0: 72 6f 72 28 29 2e 0a 2a 2a 20 46 75 6e 63 74 69 ror()..** Functi
29b0: 6f 6e 20 73 71 6c 69 74 65 33 45 72 72 6f 72 28 on sqlite3Error(
29c0: 29 20 73 68 6f 75 6c 64 20 62 65 20 75 73 65 64 ) should be used
29d0: 20 64 75 72 69 6e 67 20 73 74 61 74 65 6d 65 6e during statemen
29e0: 74 20 65 78 65 63 75 74 69 6f 6e 0a 2a 2a 20 28 t execution.** (
29f0: 73 71 6c 69 74 65 33 5f 73 74 65 70 28 29 20 65 sqlite3_step() e
2a00: 74 63 2e 29 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 tc.)..*/.void sq
2a10: 6c 69 74 65 33 45 72 72 6f 72 4d 73 67 28 50 61 lite3ErrorMsg(Pa
2a20: 72 73 65 20 2a 70 50 61 72 73 65 2c 20 63 6f 6e rse *pParse, con
2a30: 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 st char *zFormat
2a40: 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 , ...){. va_lis
2a50: 74 20 61 70 3b 0a 20 20 70 50 61 72 73 65 2d 3e t ap;. pParse->
2a60: 6e 45 72 72 2b 2b 3b 0a 20 20 73 71 6c 69 74 65 nErr++;. sqlite
2a70: 46 72 65 65 28 70 50 61 72 73 65 2d 3e 7a 45 72 Free(pParse->zEr
2a80: 72 4d 73 67 29 3b 0a 20 20 76 61 5f 73 74 61 72 rMsg);. va_star
2a90: 74 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a t(ap, zFormat);.
2aa0: 20 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d 73 pParse->zErrMs
2ab0: 67 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 69 g = sqlite3VMPri
2ac0: 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20 61 70 29 ntf(zFormat, ap)
2ad0: 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a ;. va_end(ap);.
2ae0: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 }../*.** Convert
2af0: 20 61 6e 20 53 51 4c 2d 73 74 79 6c 65 20 71 75 an SQL-style qu
2b00: 6f 74 65 64 20 73 74 72 69 6e 67 20 69 6e 74 6f oted string into
2b10: 20 61 20 6e 6f 72 6d 61 6c 20 73 74 72 69 6e 67 a normal string
2b20: 20 62 79 20 72 65 6d 6f 76 69 6e 67 0a 2a 2a 20 by removing.**
2b30: 74 68 65 20 71 75 6f 74 65 20 63 68 61 72 61 63 the quote charac
2b40: 74 65 72 73 2e 20 20 54 68 65 20 63 6f 6e 76 65 ters. The conve
2b50: 72 73 69 6f 6e 20 69 73 20 64 6f 6e 65 20 69 6e rsion is done in
2b60: 2d 70 6c 61 63 65 2e 20 20 49 66 20 74 68 65 0a -place. If the.
2b70: 2a 2a 20 69 6e 70 75 74 20 64 6f 65 73 20 6e 6f ** input does no
2b80: 74 20 62 65 67 69 6e 20 77 69 74 68 20 61 20 71 t begin with a q
2b90: 75 6f 74 65 20 63 68 61 72 61 63 74 65 72 2c 20 uote character,
2ba0: 74 68 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e then this routin
2bb0: 65 0a 2a 2a 20 69 73 20 61 20 6e 6f 2d 6f 70 2e e.** is a no-op.
2bc0: 0a 2a 2a 0a 2a 2a 20 32 30 30 32 2d 46 65 62 2d .**.** 2002-Feb-
2bd0: 31 34 3a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 14: This routine
2be0: 20 69 73 20 65 78 74 65 6e 64 65 64 20 74 6f 20 is extended to
2bf0: 72 65 6d 6f 76 65 20 4d 53 2d 41 63 63 65 73 73 remove MS-Access
2c00: 20 73 74 79 6c 65 0a 2a 2a 20 62 72 61 63 6b 65 style.** bracke
2c10: 74 73 20 66 72 6f 6d 20 61 72 6f 75 6e 64 20 69 ts from around i
2c20: 64 65 6e 74 69 66 65 72 73 2e 20 20 46 6f 72 20 dentifers. For
2c30: 65 78 61 6d 70 6c 65 3a 20 20 22 5b 61 2d 62 2d example: "[a-b-
2c40: 63 5d 22 20 62 65 63 6f 6d 65 73 0a 2a 2a 20 22 c]" becomes.** "
2c50: 61 2d 62 2d 63 22 2e 0a 2a 2f 0a 76 6f 69 64 20 a-b-c"..*/.void
2c60: 73 71 6c 69 74 65 33 44 65 71 75 6f 74 65 28 63 sqlite3Dequote(c
2c70: 68 61 72 20 2a 7a 29 7b 0a 20 20 69 6e 74 20 71 har *z){. int q
2c80: 75 6f 74 65 3b 0a 20 20 69 6e 74 20 69 2c 20 6a uote;. int i, j
2c90: 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 ;. if( z==0 ) r
2ca0: 65 74 75 72 6e 3b 0a 20 20 71 75 6f 74 65 20 3d eturn;. quote =
2cb0: 20 7a 5b 30 5d 3b 0a 20 20 73 77 69 74 63 68 28 z[0];. switch(
2cc0: 20 71 75 6f 74 65 20 29 7b 0a 20 20 20 20 63 61 quote ){. ca
2cd0: 73 65 20 27 5c 27 27 3a 20 20 62 72 65 61 6b 3b se '\'': break;
2ce0: 0a 20 20 20 20 63 61 73 65 20 27 22 27 3a 20 20 . case '"':
2cf0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 break;. case
2d00: 20 27 5b 27 3a 20 20 20 71 75 6f 74 65 20 3d 20 '[': quote =
2d10: 27 5d 27 3b 20 20 62 72 65 61 6b 3b 0a 20 20 20 ']'; break;.
2d20: 20 64 65 66 61 75 6c 74 3a 20 20 20 20 72 65 74 default: ret
2d30: 75 72 6e 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 urn;. }. for(i
2d40: 3d 31 2c 20 6a 3d 30 3b 20 7a 5b 69 5d 3b 20 69 =1, j=0; z[i]; i
2d50: 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 5b 69 ++){. if( z[i
2d60: 5d 3d 3d 71 75 6f 74 65 20 29 7b 0a 20 20 20 20 ]==quote ){.
2d70: 20 20 69 66 28 20 7a 5b 69 2b 31 5d 3d 3d 71 75 if( z[i+1]==qu
2d80: 6f 74 65 20 29 7b 0a 20 20 20 20 20 20 20 20 7a ote ){. z
2d90: 5b 6a 2b 2b 5d 20 3d 20 71 75 6f 74 65 3b 0a 20 [j++] = quote;.
2da0: 20 20 20 20 20 20 20 69 2b 2b 3b 0a 20 20 20 20 i++;.
2db0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 }else{.
2dc0: 20 7a 5b 6a 2b 2b 5d 20 3d 20 30 3b 0a 20 20 20 z[j++] = 0;.
2dd0: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 break;.
2de0: 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 }. }else{.
2df0: 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a 5b z[j++] = z[
2e00: 69 5d 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a i];. }. }.}.
2e10: 0a 2f 2a 20 41 6e 20 61 72 72 61 79 20 74 6f 20 ./* An array to
2e20: 6d 61 70 20 61 6c 6c 20 75 70 70 65 72 2d 63 61 map all upper-ca
2e30: 73 65 20 63 68 61 72 61 63 74 65 72 73 20 69 6e se characters in
2e40: 74 6f 20 74 68 65 69 72 20 63 6f 72 72 65 73 70 to their corresp
2e50: 6f 6e 64 69 6e 67 0a 2a 2a 20 6c 6f 77 65 72 2d onding.** lower-
2e60: 63 61 73 65 20 63 68 61 72 61 63 74 65 72 2e 20 case character.
2e70: 0a 2a 2f 0a 63 6f 6e 73 74 20 75 6e 73 69 67 6e .*/.const unsign
2e80: 65 64 20 63 68 61 72 20 73 71 6c 69 74 65 33 55 ed char sqlite3U
2e90: 70 70 65 72 54 6f 4c 6f 77 65 72 5b 5d 20 3d 20 pperToLower[] =
2ea0: 7b 0a 20 20 20 20 20 20 30 2c 20 20 31 2c 20 20 {. 0, 1,
2eb0: 32 2c 20 20 33 2c 20 20 34 2c 20 20 35 2c 20 20 2, 3, 4, 5,
2ec0: 36 2c 20 20 37 2c 20 20 38 2c 20 20 39 2c 20 31 6, 7, 8, 9, 1
2ed0: 30 2c 20 31 31 2c 20 31 32 2c 20 31 33 2c 20 31 0, 11, 12, 13, 1
2ee0: 34 2c 20 31 35 2c 20 31 36 2c 20 31 37 2c 0a 20 4, 15, 16, 17,.
2ef0: 20 20 20 20 31 38 2c 20 31 39 2c 20 32 30 2c 20 18, 19, 20,
2f00: 32 31 2c 20 32 32 2c 20 32 33 2c 20 32 34 2c 20 21, 22, 23, 24,
2f10: 32 35 2c 20 32 36 2c 20 32 37 2c 20 32 38 2c 20 25, 26, 27, 28,
2f20: 32 39 2c 20 33 30 2c 20 33 31 2c 20 33 32 2c 20 29, 30, 31, 32,
2f30: 33 33 2c 20 33 34 2c 20 33 35 2c 0a 20 20 20 20 33, 34, 35,.
2f40: 20 33 36 2c 20 33 37 2c 20 33 38 2c 20 33 39 2c 36, 37, 38, 39,
2f50: 20 34 30 2c 20 34 31 2c 20 34 32 2c 20 34 33 2c 40, 41, 42, 43,
2f60: 20 34 34 2c 20 34 35 2c 20 34 36 2c 20 34 37 2c 44, 45, 46, 47,
2f70: 20 34 38 2c 20 34 39 2c 20 35 30 2c 20 35 31 2c 48, 49, 50, 51,
2f80: 20 35 32 2c 20 35 33 2c 0a 20 20 20 20 20 35 34 52, 53,. 54
2f90: 2c 20 35 35 2c 20 35 36 2c 20 35 37 2c 20 35 38 , 55, 56, 57, 58
2fa0: 2c 20 35 39 2c 20 36 30 2c 20 36 31 2c 20 36 32 , 59, 60, 61, 62
2fb0: 2c 20 36 33 2c 20 36 34 2c 20 39 37 2c 20 39 38 , 63, 64, 97, 98
2fc0: 2c 20 39 39 2c 31 30 30 2c 31 30 31 2c 31 30 32 , 99,100,101,102
2fd0: 2c 31 30 33 2c 0a 20 20 20 20 31 30 34 2c 31 30 ,103,. 104,10
2fe0: 35 2c 31 30 36 2c 31 30 37 2c 31 30 38 2c 31 30 5,106,107,108,10
2ff0: 39 2c 31 31 30 2c 31 31 31 2c 31 31 32 2c 31 31 9,110,111,112,11
3000: 33 2c 31 31 34 2c 31 31 35 2c 31 31 36 2c 31 31 3,114,115,116,11
3010: 37 2c 31 31 38 2c 31 31 39 2c 31 32 30 2c 31 32 7,118,119,120,12
3020: 31 2c 0a 20 20 20 20 31 32 32 2c 20 39 31 2c 20 1,. 122, 91,
3030: 39 32 2c 20 39 33 2c 20 39 34 2c 20 39 35 2c 20 92, 93, 94, 95,
3040: 39 36 2c 20 39 37 2c 20 39 38 2c 20 39 39 2c 31 96, 97, 98, 99,1
3050: 30 30 2c 31 30 31 2c 31 30 32 2c 31 30 33 2c 31 00,101,102,103,1
3060: 30 34 2c 31 30 35 2c 31 30 36 2c 31 30 37 2c 0a 04,105,106,107,.
3070: 20 20 20 20 31 30 38 2c 31 30 39 2c 31 31 30 2c 108,109,110,
3080: 31 31 31 2c 31 31 32 2c 31 31 33 2c 31 31 34 2c 111,112,113,114,
3090: 31 31 35 2c 31 31 36 2c 31 31 37 2c 31 31 38 2c 115,116,117,118,
30a0: 31 31 39 2c 31 32 30 2c 31 32 31 2c 31 32 32 2c 119,120,121,122,
30b0: 31 32 33 2c 31 32 34 2c 31 32 35 2c 0a 20 20 20 123,124,125,.
30c0: 20 31 32 36 2c 31 32 37 2c 31 32 38 2c 31 32 39 126,127,128,129
30d0: 2c 31 33 30 2c 31 33 31 2c 31 33 32 2c 31 33 33 ,130,131,132,133
30e0: 2c 31 33 34 2c 31 33 35 2c 31 33 36 2c 31 33 37 ,134,135,136,137
30f0: 2c 31 33 38 2c 31 33 39 2c 31 34 30 2c 31 34 31 ,138,139,140,141
3100: 2c 31 34 32 2c 31 34 33 2c 0a 20 20 20 20 31 34 ,142,143,. 14
3110: 34 2c 31 34 35 2c 31 34 36 2c 31 34 37 2c 31 34 4,145,146,147,14
3120: 38 2c 31 34 39 2c 31 35 30 2c 31 35 31 2c 31 35 8,149,150,151,15
3130: 32 2c 31 35 33 2c 31 35 34 2c 31 35 35 2c 31 35 2,153,154,155,15
3140: 36 2c 31 35 37 2c 31 35 38 2c 31 35 39 2c 31 36 6,157,158,159,16
3150: 30 2c 31 36 31 2c 0a 20 20 20 20 31 36 32 2c 31 0,161,. 162,1
3160: 36 33 2c 31 36 34 2c 31 36 35 2c 31 36 36 2c 31 63,164,165,166,1
3170: 36 37 2c 31 36 38 2c 31 36 39 2c 31 37 30 2c 31 67,168,169,170,1
3180: 37 31 2c 31 37 32 2c 31 37 33 2c 31 37 34 2c 31 71,172,173,174,1
3190: 37 35 2c 31 37 36 2c 31 37 37 2c 31 37 38 2c 31 75,176,177,178,1
31a0: 37 39 2c 0a 20 20 20 20 31 38 30 2c 31 38 31 2c 79,. 180,181,
31b0: 31 38 32 2c 31 38 33 2c 31 38 34 2c 31 38 35 2c 182,183,184,185,
31c0: 31 38 36 2c 31 38 37 2c 31 38 38 2c 31 38 39 2c 186,187,188,189,
31d0: 31 39 30 2c 31 39 31 2c 31 39 32 2c 31 39 33 2c 190,191,192,193,
31e0: 31 39 34 2c 31 39 35 2c 31 39 36 2c 31 39 37 2c 194,195,196,197,
31f0: 0a 20 20 20 20 31 39 38 2c 31 39 39 2c 32 30 30 . 198,199,200
3200: 2c 32 30 31 2c 32 30 32 2c 32 30 33 2c 32 30 34 ,201,202,203,204
3210: 2c 32 30 35 2c 32 30 36 2c 32 30 37 2c 32 30 38 ,205,206,207,208
3220: 2c 32 30 39 2c 32 31 30 2c 32 31 31 2c 32 31 32 ,209,210,211,212
3230: 2c 32 31 33 2c 32 31 34 2c 32 31 35 2c 0a 20 20 ,213,214,215,.
3240: 20 20 32 31 36 2c 32 31 37 2c 32 31 38 2c 32 31 216,217,218,21
3250: 39 2c 32 32 30 2c 32 32 31 2c 32 32 32 2c 32 32 9,220,221,222,22
3260: 33 2c 32 32 34 2c 32 32 35 2c 32 32 36 2c 32 32 3,224,225,226,22
3270: 37 2c 32 32 38 2c 32 32 39 2c 32 33 30 2c 32 33 7,228,229,230,23
3280: 31 2c 32 33 32 2c 32 33 33 2c 0a 20 20 20 20 32 1,232,233,. 2
3290: 33 34 2c 32 33 35 2c 32 33 36 2c 32 33 37 2c 32 34,235,236,237,2
32a0: 33 38 2c 32 33 39 2c 32 34 30 2c 32 34 31 2c 32 38,239,240,241,2
32b0: 34 32 2c 32 34 33 2c 32 34 34 2c 32 34 35 2c 32 42,243,244,245,2
32c0: 34 36 2c 32 34 37 2c 32 34 38 2c 32 34 39 2c 32 46,247,248,249,2
32d0: 35 30 2c 32 35 31 2c 0a 20 20 20 20 32 35 32 2c 50,251,. 252,
32e0: 32 35 33 2c 32 35 34 2c 32 35 35 0a 7d 3b 0a 23 253,254,255.};.#
32f0: 64 65 66 69 6e 65 20 55 70 70 65 72 54 6f 4c 6f define UpperToLo
3300: 77 65 72 20 73 71 6c 69 74 65 33 55 70 70 65 72 wer sqlite3Upper
3310: 54 6f 4c 6f 77 65 72 0a 0a 2f 2a 0a 2a 2a 20 54 ToLower../*.** T
3320: 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 63 6f 6d his function com
3330: 70 75 74 65 73 20 61 20 68 61 73 68 20 6f 6e 20 putes a hash on
3340: 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 6b 65 the name of a ke
3350: 79 77 6f 72 64 2e 0a 2a 2a 20 43 61 73 65 20 69 yword..** Case i
3360: 73 20 6e 6f 74 20 73 69 67 6e 69 66 69 63 61 6e s not significan
3370: 74 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 t..*/.int sqlite
3380: 33 48 61 73 68 4e 6f 43 61 73 65 28 63 6f 6e 73 3HashNoCase(cons
3390: 74 20 63 68 61 72 20 2a 7a 2c 20 69 6e 74 20 6e t char *z, int n
33a0: 29 7b 0a 20 20 69 6e 74 20 68 20 3d 20 30 3b 0a ){. int h = 0;.
33b0: 20 20 69 66 28 20 6e 3c 3d 30 20 29 20 6e 20 3d if( n<=0 ) n =
33c0: 20 73 74 72 6c 65 6e 28 7a 29 3b 0a 20 20 77 68 strlen(z);. wh
33d0: 69 6c 65 28 20 6e 20 3e 20 30 20 20 29 7b 0a 20 ile( n > 0 ){.
33e0: 20 20 20 68 20 3d 20 28 68 3c 3c 33 29 20 5e 20 h = (h<<3) ^
33f0: 68 20 5e 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 h ^ UpperToLower
3400: 5b 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 29 [(unsigned char)
3410: 2a 7a 2b 2b 5d 3b 0a 20 20 20 20 6e 2d 2d 3b 0a *z++];. n--;.
3420: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 68 20 26 }. return h &
3430: 20 30 78 37 66 66 66 66 66 66 66 3b 0a 7d 0a 0a 0x7fffffff;.}..
3440: 2f 2a 0a 2a 2a 20 53 6f 6d 65 20 73 79 73 74 65 /*.** Some syste
3450: 6d 73 20 68 61 76 65 20 73 74 72 69 63 6d 70 28 ms have stricmp(
3460: 29 2e 20 20 4f 74 68 65 72 73 20 68 61 76 65 20 ). Others have
3470: 73 74 72 63 61 73 65 63 6d 70 28 29 2e 20 20 42 strcasecmp(). B
3480: 65 63 61 75 73 65 0a 2a 2a 20 74 68 65 72 65 20 ecause.** there
3490: 69 73 20 6e 6f 20 63 6f 6e 73 69 73 74 65 6e 63 is no consistenc
34a0: 79 2c 20 77 65 20 77 69 6c 6c 20 64 65 66 69 6e y, we will defin
34b0: 65 20 6f 75 72 20 6f 77 6e 2e 0a 2a 2f 0a 69 6e e our own..*/.in
34c0: 74 20 73 71 6c 69 74 65 33 53 74 72 49 43 6d 70 t sqlite3StrICmp
34d0: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 65 (const char *zLe
34e0: 66 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a ft, const char *
34f0: 7a 52 69 67 68 74 29 7b 0a 20 20 72 65 67 69 73 zRight){. regis
3500: 74 65 72 20 75 6e 73 69 67 6e 65 64 20 63 68 61 ter unsigned cha
3510: 72 20 2a 61 2c 20 2a 62 3b 0a 20 20 61 20 3d 20 r *a, *b;. a =
3520: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a (unsigned char *
3530: 29 7a 4c 65 66 74 3b 0a 20 20 62 20 3d 20 28 75 )zLeft;. b = (u
3540: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a nsigned char *)z
3550: 52 69 67 68 74 3b 0a 20 20 77 68 69 6c 65 28 20 Right;. while(
3560: 2a 61 21 3d 30 20 26 26 20 55 70 70 65 72 54 6f *a!=0 && UpperTo
3570: 4c 6f 77 65 72 5b 2a 61 5d 3d 3d 55 70 70 65 72 Lower[*a]==Upper
3580: 54 6f 4c 6f 77 65 72 5b 2a 62 5d 29 7b 20 61 2b ToLower[*b]){ a+
3590: 2b 3b 20 62 2b 2b 3b 20 7d 0a 20 20 72 65 74 75 +; b++; }. retu
35a0: 72 6e 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b rn UpperToLower[
35b0: 2a 61 5d 20 2d 20 55 70 70 65 72 54 6f 4c 6f 77 *a] - UpperToLow
35c0: 65 72 5b 2a 62 5d 3b 0a 7d 0a 69 6e 74 20 73 71 er[*b];.}.int sq
35d0: 6c 69 74 65 33 53 74 72 4e 49 43 6d 70 28 63 6f lite3StrNICmp(co
35e0: 6e 73 74 20 63 68 61 72 20 2a 7a 4c 65 66 74 2c nst char *zLeft,
35f0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 69 const char *zRi
3600: 67 68 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 ght, int N){. r
3610: 65 67 69 73 74 65 72 20 75 6e 73 69 67 6e 65 64 egister unsigned
3620: 20 63 68 61 72 20 2a 61 2c 20 2a 62 3b 0a 20 20 char *a, *b;.
3630: 61 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 a = (unsigned ch
3640: 61 72 20 2a 29 7a 4c 65 66 74 3b 0a 20 20 62 20 ar *)zLeft;. b
3650: 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 = (unsigned char
3660: 20 2a 29 7a 52 69 67 68 74 3b 0a 20 20 77 68 69 *)zRight;. whi
3670: 6c 65 28 20 4e 2d 2d 20 3e 20 30 20 26 26 20 2a le( N-- > 0 && *
3680: 61 21 3d 30 20 26 26 20 55 70 70 65 72 54 6f 4c a!=0 && UpperToL
3690: 6f 77 65 72 5b 2a 61 5d 3d 3d 55 70 70 65 72 54 ower[*a]==UpperT
36a0: 6f 4c 6f 77 65 72 5b 2a 62 5d 29 7b 20 61 2b 2b oLower[*b]){ a++
36b0: 3b 20 62 2b 2b 3b 20 7d 0a 20 20 72 65 74 75 72 ; b++; }. retur
36c0: 6e 20 4e 3c 30 20 3f 20 30 20 3a 20 55 70 70 65 n N<0 ? 0 : Uppe
36d0: 72 54 6f 4c 6f 77 65 72 5b 2a 61 5d 20 2d 20 55 rToLower[*a] - U
36e0: 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 62 5d 3b pperToLower[*b];
36f0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e .}../*.** Return
3700: 20 54 52 55 45 20 69 66 20 7a 20 69 73 20 61 20 TRUE if z is a
3710: 70 75 72 65 20 6e 75 6d 65 72 69 63 20 73 74 72 pure numeric str
3720: 69 6e 67 2e 20 20 52 65 74 75 72 6e 20 46 41 4c ing. Return FAL
3730: 53 45 20 69 66 20 74 68 65 0a 2a 2a 20 73 74 72 SE if the.** str
3740: 69 6e 67 20 63 6f 6e 74 61 69 6e 73 20 61 6e 79 ing contains any
3750: 20 63 68 61 72 61 63 74 65 72 20 77 68 69 63 68 character which
3760: 20 69 73 20 6e 6f 74 20 70 61 72 74 20 6f 66 20 is not part of
3770: 61 20 6e 75 6d 62 65 72 2e 20 49 66 0a 2a 2a 20 a number. If.**
3780: 74 68 65 20 73 74 72 69 6e 67 20 69 73 20 6e 75 the string is nu
3790: 6d 65 72 69 63 20 61 6e 64 20 63 6f 6e 74 61 69 meric and contai
37a0: 6e 73 20 74 68 65 20 27 2e 27 20 63 68 61 72 61 ns the '.' chara
37b0: 63 74 65 72 2c 20 73 65 74 20 2a 72 65 61 6c 6e cter, set *realn
37c0: 75 6d 0a 2a 2a 20 74 6f 20 54 52 55 45 20 28 6f um.** to TRUE (o
37d0: 74 68 65 72 77 69 73 65 20 46 41 4c 53 45 29 2e therwise FALSE).
37e0: 0a 2a 2a 0a 2a 2a 20 41 6e 20 65 6d 70 74 79 20 .**.** An empty
37f0: 73 74 72 69 6e 67 20 69 73 20 63 6f 6e 73 69 64 string is consid
3800: 65 72 65 64 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 ered non-numeric
3810: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 ..*/.int sqlite3
3820: 49 73 4e 75 6d 62 65 72 28 63 6f 6e 73 74 20 63 IsNumber(const c
3830: 68 61 72 20 2a 7a 2c 20 69 6e 74 20 2a 72 65 61 har *z, int *rea
3840: 6c 6e 75 6d 2c 20 75 38 20 65 6e 63 29 7b 0a 20 lnum, u8 enc){.
3850: 20 69 6e 74 20 69 6e 63 72 20 3d 20 28 65 6e 63 int incr = (enc
3860: 3d 3d 53 51 4c 49 54 45 5f 55 54 46 38 3f 31 3a ==SQLITE_UTF8?1:
3870: 32 29 3b 0a 20 20 69 66 28 20 65 6e 63 3d 3d 53 2);. if( enc==S
3880: 51 4c 49 54 45 5f 55 54 46 31 36 42 45 20 29 20 QLITE_UTF16BE )
3890: 7a 2b 2b 3b 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 z++;. if( *z=='
38a0: 2d 27 20 7c 7c 20 2a 7a 3d 3d 27 2b 27 20 29 20 -' || *z=='+' )
38b0: 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 69 66 28 z += incr;. if(
38c0: 20 21 69 73 64 69 67 69 74 28 2a 28 75 38 2a 29 !isdigit(*(u8*)
38d0: 7a 29 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e z) ){. return
38e0: 20 30 3b 0a 20 20 7d 0a 20 20 7a 20 2b 3d 20 69 0;. }. z += i
38f0: 6e 63 72 3b 0a 20 20 69 66 28 20 72 65 61 6c 6e ncr;. if( realn
3900: 75 6d 20 29 20 2a 72 65 61 6c 6e 75 6d 20 3d 20 um ) *realnum =
3910: 30 3b 0a 20 20 77 68 69 6c 65 28 20 69 73 64 69 0;. while( isdi
3920: 67 69 74 28 2a 28 75 38 2a 29 7a 29 20 29 7b 20 git(*(u8*)z) ){
3930: 7a 20 2b 3d 20 69 6e 63 72 3b 20 7d 0a 20 20 69 z += incr; }. i
3940: 66 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b 0a 20 20 f( *z=='.' ){.
3950: 20 20 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 20 z += incr;.
3960: 20 69 66 28 20 21 69 73 64 69 67 69 74 28 2a 28 if( !isdigit(*(
3970: 75 38 2a 29 7a 29 20 29 20 72 65 74 75 72 6e 20 u8*)z) ) return
3980: 30 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 69 73 0;. while( is
3990: 64 69 67 69 74 28 2a 28 75 38 2a 29 7a 29 20 29 digit(*(u8*)z) )
39a0: 7b 20 7a 20 2b 3d 20 69 6e 63 72 3b 20 7d 0a 20 { z += incr; }.
39b0: 20 20 20 69 66 28 20 72 65 61 6c 6e 75 6d 20 29 if( realnum )
39c0: 20 2a 72 65 61 6c 6e 75 6d 20 3d 20 31 3b 0a 20 *realnum = 1;.
39d0: 20 7d 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 65 27 }. if( *z=='e'
39e0: 20 7c 7c 20 2a 7a 3d 3d 27 45 27 20 29 7b 0a 20 || *z=='E' ){.
39f0: 20 20 20 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 z += incr;.
3a00: 20 20 69 66 28 20 2a 7a 3d 3d 27 2b 27 20 7c 7c if( *z=='+' ||
3a10: 20 2a 7a 3d 3d 27 2d 27 20 29 20 7a 20 2b 3d 20 *z=='-' ) z +=
3a20: 69 6e 63 72 3b 0a 20 20 20 20 69 66 28 20 21 69 incr;. if( !i
3a30: 73 64 69 67 69 74 28 2a 28 75 38 2a 29 7a 29 20 sdigit(*(u8*)z)
3a40: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 ) return 0;.
3a50: 77 68 69 6c 65 28 20 69 73 64 69 67 69 74 28 2a while( isdigit(*
3a60: 28 75 38 2a 29 7a 29 20 29 7b 20 7a 20 2b 3d 20 (u8*)z) ){ z +=
3a70: 69 6e 63 72 3b 20 7d 0a 20 20 20 20 69 66 28 20 incr; }. if(
3a80: 72 65 61 6c 6e 75 6d 20 29 20 2a 72 65 61 6c 6e realnum ) *realn
3a90: 75 6d 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 72 65 um = 1;. }. re
3aa0: 74 75 72 6e 20 2a 7a 3d 3d 30 3b 0a 7d 0a 0a 2f turn *z==0;.}../
3ab0: 2a 0a 2a 2a 20 54 68 65 20 73 74 72 69 6e 67 20 *.** The string
3ac0: 7a 5b 5d 20 69 73 20 61 6e 20 61 73 63 69 69 20 z[] is an ascii
3ad0: 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f representation o
3ae0: 66 20 61 20 72 65 61 6c 20 6e 75 6d 62 65 72 2e f a real number.
3af0: 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 74 68 69 73 .** Convert this
3b00: 20 73 74 72 69 6e 67 20 74 6f 20 61 20 64 6f 75 string to a dou
3b10: 62 6c 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 ble..**.** This
3b20: 72 6f 75 74 69 6e 65 20 61 73 73 75 6d 65 73 20 routine assumes
3b30: 74 68 61 74 20 7a 5b 5d 20 72 65 61 6c 6c 79 20 that z[] really
3b40: 69 73 20 61 20 76 61 6c 69 64 20 6e 75 6d 62 65 is a valid numbe
3b50: 72 2e 20 20 49 66 20 69 74 0a 2a 2a 20 69 73 20 r. If it.** is
3b60: 6e 6f 74 2c 20 74 68 65 20 72 65 73 75 6c 74 20 not, the result
3b70: 69 73 20 75 6e 64 65 66 69 6e 65 64 2e 0a 2a 2a is undefined..**
3b80: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 .** This routine
3b90: 20 69 73 20 75 73 65 64 20 69 6e 73 74 65 61 64 is used instead
3ba0: 20 6f 66 20 74 68 65 20 6c 69 62 72 61 72 79 20 of the library
3bb0: 61 74 6f 66 28 29 20 66 75 6e 63 74 69 6f 6e 20 atof() function
3bc0: 62 65 63 61 75 73 65 0a 2a 2a 20 74 68 65 20 6c because.** the l
3bd0: 69 62 72 61 72 79 20 61 74 6f 66 28 29 20 6d 69 ibrary atof() mi
3be0: 67 68 74 20 77 61 6e 74 20 74 6f 20 75 73 65 20 ght want to use
3bf0: 22 2c 22 20 61 73 20 74 68 65 20 64 65 63 69 6d "," as the decim
3c00: 61 6c 20 70 6f 69 6e 74 20 69 6e 73 74 65 61 64 al point instead
3c10: 0a 2a 2a 20 6f 66 20 22 2e 22 20 64 65 70 65 6e .** of "." depen
3c20: 64 69 6e 67 20 6f 6e 20 68 6f 77 20 6c 6f 63 61 ding on how loca
3c30: 6c 65 20 69 73 20 73 65 74 2e 20 20 42 75 74 20 le is set. But
3c40: 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75 73 65 that would cause
3c50: 20 70 72 6f 62 6c 65 6d 73 0a 2a 2a 20 66 6f 72 problems.** for
3c60: 20 53 51 4c 2e 20 20 53 6f 20 74 68 69 73 20 72 SQL. So this r
3c70: 6f 75 74 69 6e 65 20 61 6c 77 61 79 73 20 75 73 outine always us
3c80: 65 73 20 22 2e 22 20 72 65 67 61 72 64 6c 65 73 es "." regardles
3c90: 73 20 6f 66 20 6c 6f 63 61 6c 65 2e 0a 2a 2f 0a s of locale..*/.
3ca0: 64 6f 75 62 6c 65 20 73 71 6c 69 74 65 33 41 74 double sqlite3At
3cb0: 6f 46 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a oF(const char *z
3cc0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 2a 70 , const char **p
3cd0: 7a 45 6e 64 29 7b 0a 20 20 69 6e 74 20 73 69 67 zEnd){. int sig
3ce0: 6e 20 3d 20 31 3b 0a 20 20 4c 4f 4e 47 44 4f 55 n = 1;. LONGDOU
3cf0: 42 4c 45 5f 54 59 50 45 20 76 31 20 3d 20 30 2e BLE_TYPE v1 = 0.
3d00: 30 3b 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 0;. if( *z=='-'
3d10: 20 29 7b 0a 20 20 20 20 73 69 67 6e 20 3d 20 2d ){. sign = -
3d20: 31 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d 65 1;. z++;. }e
3d30: 6c 73 65 20 69 66 28 20 2a 7a 3d 3d 27 2b 27 20 lse if( *z=='+'
3d40: 29 7b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d 0a ){. z++;. }.
3d50: 20 20 77 68 69 6c 65 28 20 69 73 64 69 67 69 74 while( isdigit
3d60: 28 2a 28 75 38 2a 29 7a 29 20 29 7b 0a 20 20 20 (*(u8*)z) ){.
3d70: 20 76 31 20 3d 20 76 31 2a 31 30 2e 30 20 2b 20 v1 = v1*10.0 +
3d80: 28 2a 7a 20 2d 20 27 30 27 29 3b 0a 20 20 20 20 (*z - '0');.
3d90: 7a 2b 2b 3b 0a 20 20 7d 0a 20 20 69 66 28 20 2a z++;. }. if( *
3da0: 7a 3d 3d 27 2e 27 20 29 7b 0a 20 20 20 20 4c 4f z=='.' ){. LO
3db0: 4e 47 44 4f 55 42 4c 45 5f 54 59 50 45 20 64 69 NGDOUBLE_TYPE di
3dc0: 76 69 73 6f 72 20 3d 20 31 2e 30 3b 0a 20 20 20 visor = 1.0;.
3dd0: 20 7a 2b 2b 3b 0a 20 20 20 20 77 68 69 6c 65 28 z++;. while(
3de0: 20 69 73 64 69 67 69 74 28 2a 28 75 38 2a 29 7a isdigit(*(u8*)z
3df0: 29 20 29 7b 0a 20 20 20 20 20 20 76 31 20 3d 20 ) ){. v1 =
3e00: 76 31 2a 31 30 2e 30 20 2b 20 28 2a 7a 20 2d 20 v1*10.0 + (*z -
3e10: 27 30 27 29 3b 0a 20 20 20 20 20 20 64 69 76 69 '0');. divi
3e20: 73 6f 72 20 2a 3d 20 31 30 2e 30 3b 0a 20 20 20 sor *= 10.0;.
3e30: 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 z++;. }.
3e40: 20 20 76 31 20 2f 3d 20 64 69 76 69 73 6f 72 3b v1 /= divisor;
3e50: 0a 20 20 7d 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 . }. if( *z=='
3e60: 65 27 20 7c 7c 20 2a 7a 3d 3d 27 45 27 20 29 7b e' || *z=='E' ){
3e70: 0a 20 20 20 20 69 6e 74 20 65 73 69 67 6e 20 3d . int esign =
3e80: 20 31 3b 0a 20 20 20 20 69 6e 74 20 65 76 61 6c 1;. int eval
3e90: 20 3d 20 30 3b 0a 20 20 20 20 4c 4f 4e 47 44 4f = 0;. LONGDO
3ea0: 55 42 4c 45 5f 54 59 50 45 20 73 63 61 6c 65 20 UBLE_TYPE scale
3eb0: 3d 20 31 2e 30 3b 0a 20 20 20 20 7a 2b 2b 3b 0a = 1.0;. z++;.
3ec0: 20 20 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 20 if( *z=='-'
3ed0: 29 7b 0a 20 20 20 20 20 20 65 73 69 67 6e 20 3d ){. esign =
3ee0: 20 2d 31 3b 0a 20 20 20 20 20 20 7a 2b 2b 3b 0a -1;. z++;.
3ef0: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 2a 7a }else if( *z
3f00: 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 20 20 7a =='+' ){. z
3f10: 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 77 68 ++;. }. wh
3f20: 69 6c 65 28 20 69 73 64 69 67 69 74 28 2a 28 75 ile( isdigit(*(u
3f30: 38 2a 29 7a 29 20 29 7b 0a 20 20 20 20 20 20 65 8*)z) ){. e
3f40: 76 61 6c 20 3d 20 65 76 61 6c 2a 31 30 20 2b 20 val = eval*10 +
3f50: 2a 7a 20 2d 20 27 30 27 3b 0a 20 20 20 20 20 20 *z - '0';.
3f60: 7a 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 77 z++;. }. w
3f70: 68 69 6c 65 28 20 65 76 61 6c 3e 3d 36 34 20 29 hile( eval>=64 )
3f80: 7b 20 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 2b { scale *= 1.0e+
3f90: 36 34 3b 20 65 76 61 6c 20 2d 3d 20 36 34 3b 20 64; eval -= 64;
3fa0: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 65 76 61 }. while( eva
3fb0: 6c 3e 3d 31 36 20 29 7b 20 73 63 61 6c 65 20 2a l>=16 ){ scale *
3fc0: 3d 20 31 2e 30 65 2b 31 36 3b 20 65 76 61 6c 20 = 1.0e+16; eval
3fd0: 2d 3d 20 31 36 3b 20 7d 0a 20 20 20 20 77 68 69 -= 16; }. whi
3fe0: 6c 65 28 20 65 76 61 6c 3e 3d 34 20 29 7b 20 73 le( eval>=4 ){ s
3ff0: 63 61 6c 65 20 2a 3d 20 31 2e 30 65 2b 34 3b 20 cale *= 1.0e+4;
4000: 65 76 61 6c 20 2d 3d 20 34 3b 20 7d 0a 20 20 20 eval -= 4; }.
4010: 20 77 68 69 6c 65 28 20 65 76 61 6c 3e 3d 31 20 while( eval>=1
4020: 29 7b 20 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 ){ scale *= 1.0e
4030: 2b 31 3b 20 65 76 61 6c 20 2d 3d 20 31 3b 20 7d +1; eval -= 1; }
4040: 0a 20 20 20 20 69 66 28 20 65 73 69 67 6e 3c 30 . if( esign<0
4050: 20 29 7b 0a 20 20 20 20 20 20 76 31 20 2f 3d 20 ){. v1 /=
4060: 73 63 61 6c 65 3b 0a 20 20 20 20 7d 65 6c 73 65 scale;. }else
4070: 7b 0a 20 20 20 20 20 20 76 31 20 2a 3d 20 73 63 {. v1 *= sc
4080: 61 6c 65 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 ale;. }. }.
4090: 20 69 66 28 20 70 7a 45 6e 64 20 29 20 2a 70 7a if( pzEnd ) *pz
40a0: 45 6e 64 20 3d 20 7a 3b 0a 20 20 72 65 74 75 72 End = z;. retur
40b0: 6e 20 73 69 67 6e 3c 30 20 3f 20 2d 76 31 20 3a n sign<0 ? -v1 :
40c0: 20 76 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 v1;.}../*.** Re
40d0: 74 75 72 6e 20 54 52 55 45 20 69 66 20 7a 4e 75 turn TRUE if zNu
40e0: 6d 20 69 73 20 61 20 36 34 2d 62 69 74 20 73 69 m is a 64-bit si
40f0: 67 6e 65 64 20 69 6e 74 65 67 65 72 20 61 6e 64 gned integer and
4100: 20 77 72 69 74 65 0a 2a 2a 20 74 68 65 20 76 61 write.** the va
4110: 6c 75 65 20 6f 66 20 74 68 65 20 69 6e 74 65 67 lue of the integ
4120: 65 72 20 69 6e 74 6f 20 2a 70 4e 75 6d 2e 20 20 er into *pNum.
4130: 49 66 20 7a 4e 75 6d 20 69 73 20 6e 6f 74 20 61 If zNum is not a
4140: 6e 20 69 6e 74 65 67 65 72 0a 2a 2a 20 6f 72 20 n integer.** or
4150: 69 73 20 61 6e 20 69 6e 74 65 67 65 72 20 74 68 is an integer th
4160: 61 74 20 69 73 20 74 6f 6f 20 6c 61 72 67 65 20 at is too large
4170: 74 6f 20 62 65 20 65 78 70 72 65 73 73 65 64 20 to be expressed
4180: 77 69 74 68 20 36 34 20 62 69 74 73 2c 0a 2a 2a with 64 bits,.**
4190: 20 74 68 65 6e 20 72 65 74 75 72 6e 20 66 61 6c then return fal
41a0: 73 65 2e 20 20 49 66 20 6e 3e 30 20 61 6e 64 20 se. If n>0 and
41b0: 74 68 65 20 69 6e 74 65 67 65 72 20 69 73 20 73 the integer is s
41c0: 74 72 69 6e 67 20 69 73 20 6e 6f 74 0a 2a 2a 20 tring is not.**
41d0: 65 78 61 63 74 6c 79 20 6e 20 62 79 74 65 73 20 exactly n bytes
41e0: 6c 6f 6e 67 2c 20 72 65 74 75 72 6e 20 66 61 6c long, return fal
41f0: 73 65 2e 0a 2a 2a 0a 2a 2a 20 57 68 65 6e 20 74 se..**.** When t
4200: 68 69 73 20 72 6f 75 74 69 6e 65 20 77 61 73 20 his routine was
4210: 6f 72 69 67 69 6e 61 6c 6c 79 20 77 72 69 74 74 originally writt
4220: 65 6e 20 69 74 20 64 65 61 6c 74 20 77 69 74 68 en it dealt with
4230: 20 6f 6e 6c 79 0a 2a 2a 20 33 32 2d 62 69 74 20 only.** 32-bit
4240: 6e 75 6d 62 65 72 73 2e 20 20 41 74 20 74 68 61 numbers. At tha
4250: 74 20 74 69 6d 65 2c 20 69 74 20 77 61 73 20 6d t time, it was m
4260: 75 63 68 20 66 61 73 74 65 72 20 74 68 61 6e 20 uch faster than
4270: 74 68 65 0a 2a 2a 20 61 74 6f 69 28 29 20 6c 69 the.** atoi() li
4280: 62 72 61 72 79 20 72 6f 75 74 69 6e 65 20 69 6e brary routine in
4290: 20 52 65 64 48 61 74 20 37 2e 32 2e 0a 2a 2f 0a RedHat 7.2..*/.
42a0: 69 6e 74 20 73 71 6c 69 74 65 33 61 74 6f 69 36 int sqlite3atoi6
42b0: 34 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 4(const char *zN
42c0: 75 6d 2c 20 69 36 34 20 2a 70 4e 75 6d 29 7b 0a um, i64 *pNum){.
42d0: 20 20 69 36 34 20 76 20 3d 20 30 3b 0a 20 20 69 i64 v = 0;. i
42e0: 6e 74 20 6e 65 67 3b 0a 20 20 69 6e 74 20 69 2c nt neg;. int i,
42f0: 20 63 3b 0a 20 20 69 66 28 20 2a 7a 4e 75 6d 3d c;. if( *zNum=
4300: 3d 27 2d 27 20 29 7b 0a 20 20 20 20 6e 65 67 20 ='-' ){. neg
4310: 3d 20 31 3b 0a 20 20 20 20 7a 4e 75 6d 2b 2b 3b = 1;. zNum++;
4320: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 2a 7a 4e . }else if( *zN
4330: 75 6d 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 6e um=='+' ){. n
4340: 65 67 20 3d 20 30 3b 0a 20 20 20 20 7a 4e 75 6d eg = 0;. zNum
4350: 2b 2b 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 ++;. }else{.
4360: 20 6e 65 67 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 neg = 0;. }.
4370: 66 6f 72 28 69 3d 30 3b 20 28 63 3d 7a 4e 75 6d for(i=0; (c=zNum
4380: 5b 69 5d 29 3e 3d 27 30 27 20 26 26 20 63 3c 3d [i])>='0' && c<=
4390: 27 39 27 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 76 '9'; i++){. v
43a0: 20 3d 20 76 2a 31 30 20 2b 20 63 20 2d 20 27 30 = v*10 + c - '0
43b0: 27 3b 0a 20 20 7d 0a 20 20 2a 70 4e 75 6d 20 3d ';. }. *pNum =
43c0: 20 6e 65 67 20 3f 20 2d 76 20 3a 20 76 3b 0a 20 neg ? -v : v;.
43d0: 20 72 65 74 75 72 6e 20 63 3d 3d 30 20 26 26 20 return c==0 &&
43e0: 69 3e 30 20 26 26 20 0a 20 20 20 20 20 20 28 69 i>0 && . (i
43f0: 3c 31 39 20 7c 7c 20 28 69 3d 3d 31 39 20 26 26 <19 || (i==19 &&
4400: 20 6d 65 6d 63 6d 70 28 7a 4e 75 6d 2c 22 39 32 memcmp(zNum,"92
4410: 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 30 2337203685477580
4420: 37 22 2c 31 39 29 3c 3d 30 29 29 3b 0a 7d 0a 0a 7",19)<=0));.}..
4430: 2f 2a 0a 2a 2a 20 54 68 65 20 73 74 72 69 6e 67 /*.** The string
4440: 20 7a 4e 75 6d 20 72 65 70 72 65 73 65 6e 74 73 zNum represents
4450: 20 61 6e 20 69 6e 74 65 67 65 72 2e 20 20 54 68 an integer. Th
4460: 65 72 65 20 6d 69 67 68 74 20 62 65 20 73 6f 6d ere might be som
4470: 65 20 6f 74 68 65 72 0a 2a 2a 20 69 6e 66 6f 72 e other.** infor
4480: 6d 61 74 69 6f 6e 20 66 6f 6c 6c 6f 77 69 6e 67 mation following
4490: 20 74 68 65 20 69 6e 74 65 67 65 72 20 74 6f 6f the integer too
44a0: 2c 20 62 75 74 20 74 68 61 74 20 70 61 72 74 20 , but that part
44b0: 69 73 20 69 67 6e 6f 72 65 64 2e 0a 2a 2a 20 49 is ignored..** I
44c0: 66 20 74 68 65 20 69 6e 74 65 67 65 72 20 74 68 f the integer th
44d0: 61 74 20 74 68 65 20 70 72 65 66 69 78 20 6f 66 at the prefix of
44e0: 20 7a 4e 75 6d 20 72 65 70 72 65 73 65 6e 74 73 zNum represents
44f0: 20 77 69 6c 6c 20 66 69 74 20 69 6e 20 61 0a 2a will fit in a.*
4500: 2a 20 33 32 2d 62 69 74 20 73 69 67 6e 65 64 20 * 32-bit signed
4510: 69 6e 74 65 67 65 72 2c 20 72 65 74 75 72 6e 20 integer, return
4520: 54 52 55 45 2e 20 20 4f 74 68 65 72 77 69 73 65 TRUE. Otherwise
4530: 20 72 65 74 75 72 6e 20 46 41 4c 53 45 2e 0a 2a return FALSE..*
4540: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e *.** This routin
4550: 65 20 72 65 74 75 72 6e 73 20 46 41 4c 53 45 20 e returns FALSE
4560: 66 6f 72 20 74 68 65 20 73 74 72 69 6e 67 20 2d for the string -
4570: 32 31 34 37 34 38 33 36 34 38 20 65 76 65 6e 20 2147483648 even
4580: 74 68 61 74 0a 2a 2a 20 74 68 61 74 20 6e 75 6d that.** that num
4590: 62 65 72 20 77 69 6c 6c 20 69 6e 20 66 61 63 74 ber will in fact
45a0: 20 66 69 74 20 69 6e 20 61 20 33 32 2d 62 69 74 fit in a 32-bit
45b0: 20 69 6e 74 65 67 65 72 2e 20 20 42 75 74 20 70 integer. But p
45c0: 6f 73 69 74 69 76 65 0a 2a 2a 20 32 31 34 37 34 ositive.** 21474
45d0: 38 33 36 34 38 20 77 69 6c 6c 20 6e 6f 74 20 66 83648 will not f
45e0: 69 74 20 69 6e 20 33 32 20 62 69 74 73 2e 20 20 it in 32 bits.
45f0: 53 6f 20 69 74 20 73 65 65 6d 73 20 73 61 66 65 So it seems safe
4600: 72 20 74 6f 20 72 65 74 75 72 6e 0a 2a 2a 20 66 r to return.** f
4610: 61 6c 73 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 alse..*/.static
4620: 69 6e 74 20 73 71 6c 69 74 65 33 46 69 74 73 49 int sqlite3FitsI
4630: 6e 33 32 42 69 74 73 28 63 6f 6e 73 74 20 63 68 n32Bits(const ch
4640: 61 72 20 2a 7a 4e 75 6d 29 7b 0a 20 20 69 6e 74 ar *zNum){. int
4650: 20 69 2c 20 63 3b 0a 20 20 69 66 28 20 2a 7a 4e i, c;. if( *zN
4660: 75 6d 3d 3d 27 2d 27 20 7c 7c 20 2a 7a 4e 75 6d um=='-' || *zNum
4670: 3d 3d 27 2b 27 20 29 20 7a 4e 75 6d 2b 2b 3b 0a =='+' ) zNum++;.
4680: 20 20 66 6f 72 28 69 3d 30 3b 20 28 63 3d 7a 4e for(i=0; (c=zN
4690: 75 6d 5b 69 5d 29 3e 3d 27 30 27 20 26 26 20 63 um[i])>='0' && c
46a0: 3c 3d 27 39 27 3b 20 69 2b 2b 29 7b 7d 0a 20 20 <='9'; i++){}.
46b0: 72 65 74 75 72 6e 20 69 3c 31 30 20 7c 7c 20 28 return i<10 || (
46c0: 69 3d 3d 31 30 20 26 26 20 6d 65 6d 63 6d 70 28 i==10 && memcmp(
46d0: 7a 4e 75 6d 2c 22 32 31 34 37 34 38 33 36 34 37 zNum,"2147483647
46e0: 22 2c 31 30 29 3c 3d 30 29 3b 0a 7d 0a 0a 2f 2a ",10)<=0);.}../*
46f0: 0a 2a 2a 20 49 66 20 7a 4e 75 6d 20 72 65 70 72 .** If zNum repr
4700: 65 73 65 6e 74 73 20 61 6e 20 69 6e 74 65 67 65 esents an intege
4710: 72 20 74 68 61 74 20 77 69 6c 6c 20 66 69 74 20 r that will fit
4720: 69 6e 20 33 32 2d 62 69 74 73 2c 20 74 68 65 6e in 32-bits, then
4730: 20 73 65 74 0a 2a 2a 20 2a 70 56 61 6c 75 65 20 set.** *pValue
4740: 74 6f 20 74 68 61 74 20 69 6e 74 65 67 65 72 20 to that integer
4750: 61 6e 64 20 72 65 74 75 72 6e 20 74 72 75 65 2e and return true.
4760: 20 20 4f 74 68 65 72 77 69 73 65 20 72 65 74 75 Otherwise retu
4770: 72 6e 20 66 61 6c 73 65 2e 0a 2a 2f 0a 69 6e 74 rn false..*/.int
4780: 20 73 71 6c 69 74 65 33 47 65 74 49 6e 74 33 32 sqlite3GetInt32
4790: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 75 (const char *zNu
47a0: 6d 2c 20 69 6e 74 20 2a 70 56 61 6c 75 65 29 7b m, int *pValue){
47b0: 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 46 69 . if( sqlite3Fi
47c0: 74 73 49 6e 33 32 42 69 74 73 28 7a 4e 75 6d 29 tsIn32Bits(zNum)
47d0: 20 29 7b 0a 20 20 20 20 2a 70 56 61 6c 75 65 20 ){. *pValue
47e0: 3d 20 61 74 6f 69 28 7a 4e 75 6d 29 3b 0a 20 20 = atoi(zNum);.
47f0: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a return 1;. }.
4800: 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a 2f return 0;.}../
4810: 2a 0a 2a 2a 20 54 68 65 20 73 74 72 69 6e 67 20 *.** The string
4820: 7a 4e 75 6d 20 72 65 70 72 65 73 65 6e 74 73 20 zNum represents
4830: 61 6e 20 69 6e 74 65 67 65 72 2e 20 20 54 68 65 an integer. The
4840: 72 65 20 6d 69 67 68 74 20 62 65 20 73 6f 6d 65 re might be some
4850: 20 6f 74 68 65 72 0a 2a 2a 20 69 6e 66 6f 72 6d other.** inform
4860: 61 74 69 6f 6e 20 66 6f 6c 6c 6f 77 69 6e 67 20 ation following
4870: 74 68 65 20 69 6e 74 65 67 65 72 20 74 6f 6f 2c the integer too,
4880: 20 62 75 74 20 74 68 61 74 20 70 61 72 74 20 69 but that part i
4890: 73 20 69 67 6e 6f 72 65 64 2e 0a 2a 2a 20 49 66 s ignored..** If
48a0: 20 74 68 65 20 69 6e 74 65 67 65 72 20 74 68 61 the integer tha
48b0: 74 20 74 68 65 20 70 72 65 66 69 78 20 6f 66 20 t the prefix of
48c0: 7a 4e 75 6d 20 72 65 70 72 65 73 65 6e 74 73 20 zNum represents
48d0: 77 69 6c 6c 20 66 69 74 20 69 6e 20 61 0a 2a 2a will fit in a.**
48e0: 20 36 34 2d 62 69 74 20 73 69 67 6e 65 64 20 69 64-bit signed i
48f0: 6e 74 65 67 65 72 2c 20 72 65 74 75 72 6e 20 54 nteger, return T
4900: 52 55 45 2e 20 20 4f 74 68 65 72 77 69 73 65 20 RUE. Otherwise
4910: 72 65 74 75 72 6e 20 46 41 4c 53 45 2e 0a 2a 2a return FALSE..**
4920: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 .** This routine
4930: 20 72 65 74 75 72 6e 73 20 46 41 4c 53 45 20 66 returns FALSE f
4940: 6f 72 20 74 68 65 20 73 74 72 69 6e 67 20 2d 39 or the string -9
4950: 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 2233720368547758
4960: 30 38 20 65 76 65 6e 20 74 68 61 74 0a 2a 2a 20 08 even that.**
4970: 74 68 61 74 20 6e 75 6d 62 65 72 20 77 69 6c 6c that number will
4980: 2c 20 69 6e 20 74 68 65 6f 72 79 20 66 69 74 20 , in theory fit
4990: 69 6e 20 61 20 36 34 2d 62 69 74 20 69 6e 74 65 in a 64-bit inte
49a0: 67 65 72 2e 20 20 50 6f 73 69 74 69 76 65 0a 2a ger. Positive.*
49b0: 2a 20 39 32 32 33 33 37 33 30 33 36 38 35 34 37 * 92233730368547
49c0: 37 35 38 30 38 20 77 69 6c 6c 20 6e 6f 74 20 66 75808 will not f
49d0: 69 74 20 69 6e 20 36 34 20 62 69 74 73 2e 20 20 it in 64 bits.
49e0: 53 6f 20 69 74 20 73 65 65 6d 73 20 73 61 66 65 So it seems safe
49f0: 72 20 74 6f 20 72 65 74 75 72 6e 0a 2a 2a 20 66 r to return.** f
4a00: 61 6c 73 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c alse..*/.int sql
4a10: 69 74 65 33 46 69 74 73 49 6e 36 34 42 69 74 73 ite3FitsIn64Bits
4a20: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 75 (const char *zNu
4a30: 6d 29 7b 0a 20 20 69 6e 74 20 69 2c 20 63 3b 0a m){. int i, c;.
4a40: 20 20 69 66 28 20 2a 7a 4e 75 6d 3d 3d 27 2d 27 if( *zNum=='-'
4a50: 20 7c 7c 20 2a 7a 4e 75 6d 3d 3d 27 2b 27 20 29 || *zNum=='+' )
4a60: 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 66 6f 72 28 69 zNum++;. for(i
4a70: 3d 30 3b 20 28 63 3d 7a 4e 75 6d 5b 69 5d 29 3e =0; (c=zNum[i])>
4a80: 3d 27 30 27 20 26 26 20 63 3c 3d 27 39 27 3b 20 ='0' && c<='9';
4a90: 69 2b 2b 29 7b 7d 0a 20 20 72 65 74 75 72 6e 20 i++){}. return
4aa0: 69 3c 31 39 20 7c 7c 20 28 69 3d 3d 31 39 20 26 i<19 || (i==19 &
4ab0: 26 20 6d 65 6d 63 6d 70 28 7a 4e 75 6d 2c 22 39 & memcmp(zNum,"9
4ac0: 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 2233720368547758
4ad0: 30 37 22 2c 31 39 29 3c 3d 30 29 3b 0a 7d 0a 0a 07",19)<=0);.}..
4ae0: 0a 2f 2a 0a 2a 2a 20 43 68 61 6e 67 65 20 74 68 ./*.** Change th
4af0: 65 20 73 71 6c 69 74 65 2e 6d 61 67 69 63 20 66 e sqlite.magic f
4b00: 72 6f 6d 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 rom SQLITE_MAGIC
4b10: 5f 4f 50 45 4e 20 74 6f 20 53 51 4c 49 54 45 5f _OPEN to SQLITE_
4b20: 4d 41 47 49 43 5f 42 55 53 59 2e 0a 2a 2a 20 52 MAGIC_BUSY..** R
4b30: 65 74 75 72 6e 20 61 6e 20 65 72 72 6f 72 20 28 eturn an error (
4b40: 6e 6f 6e 2d 7a 65 72 6f 29 20 69 66 20 74 68 65 non-zero) if the
4b50: 20 6d 61 67 69 63 20 77 61 73 20 6e 6f 74 20 53 magic was not S
4b60: 51 4c 49 54 45 5f 4d 41 47 49 43 5f 4f 50 45 4e QLITE_MAGIC_OPEN
4b70: 0a 2a 2a 20 77 68 65 6e 20 74 68 69 73 20 72 6f .** when this ro
4b80: 75 74 69 6e 65 20 69 73 20 63 61 6c 6c 65 64 2e utine is called.
4b90: 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 .**.** This rout
4ba0: 69 6e 65 20 69 73 20 61 20 61 74 74 65 6d 70 74 ine is a attempt
4bb0: 20 74 6f 20 64 65 74 65 63 74 20 69 66 20 74 77 to detect if tw
4bc0: 6f 20 74 68 72 65 61 64 73 20 75 73 65 20 74 68 o threads use th
4bd0: 65 0a 2a 2a 20 73 61 6d 65 20 73 71 6c 69 74 65 e.** same sqlite
4be0: 2a 20 70 6f 69 6e 74 65 72 20 61 74 20 74 68 65 * pointer at the
4bf0: 20 73 61 6d 65 20 74 69 6d 65 2e 20 20 54 68 65 same time. The
4c00: 72 65 20 69 73 20 61 20 72 61 63 65 20 0a 2a 2a re is a race .**
4c10: 20 63 6f 6e 64 69 74 69 6f 6e 20 73 6f 20 69 74 condition so it
4c20: 20 69 73 20 70 6f 73 73 69 62 6c 65 20 74 68 61 is possible tha
4c30: 74 20 74 68 65 20 65 72 72 6f 72 20 69 73 20 6e t the error is n
4c40: 6f 74 20 64 65 74 65 63 74 65 64 2e 0a 2a 2a 20 ot detected..**
4c50: 42 75 74 20 75 73 75 61 6c 6c 79 20 74 68 65 20 But usually the
4c60: 70 72 6f 62 6c 65 6d 20 77 69 6c 6c 20 62 65 20 problem will be
4c70: 73 65 65 6e 2e 20 20 54 68 65 20 72 65 73 75 6c seen. The resul
4c80: 74 20 77 69 6c 6c 20 62 65 20 61 6e 0a 2a 2a 20 t will be an.**
4c90: 65 72 72 6f 72 20 77 68 69 63 68 20 63 61 6e 20 error which can
4ca0: 62 65 20 75 73 65 64 20 74 6f 20 64 65 62 75 67 be used to debug
4cb0: 20 74 68 65 20 61 70 70 6c 69 63 61 74 69 6f 6e the application
4cc0: 20 74 68 61 74 20 69 73 0a 2a 2a 20 75 73 69 6e that is.** usin
4cd0: 67 20 53 51 4c 69 74 65 20 69 6e 63 6f 72 72 65 g SQLite incorre
4ce0: 63 74 6c 79 2e 0a 2a 2a 0a 2a 2a 20 54 69 63 6b ctly..**.** Tick
4cf0: 65 74 20 23 32 30 32 3a 20 20 49 66 20 64 62 2d et #202: If db-
4d00: 3e 6d 61 67 69 63 20 69 73 20 6e 6f 74 20 61 20 >magic is not a
4d10: 76 61 6c 69 64 20 6f 70 65 6e 20 76 61 6c 75 65 valid open value
4d20: 2c 20 74 61 6b 65 20 63 61 72 65 20 6e 6f 74 0a , take care not.
4d30: 2a 2a 20 74 6f 20 6d 6f 64 69 66 79 20 74 68 65 ** to modify the
4d40: 20 64 62 20 73 74 72 75 63 74 75 72 65 20 61 74 db structure at
4d50: 20 61 6c 6c 2e 20 20 49 74 20 63 6f 75 6c 64 20 all. It could
4d60: 62 65 20 74 68 61 74 20 64 62 20 69 73 20 61 20 be that db is a
4d70: 73 74 61 6c 65 0a 2a 2a 20 70 6f 69 6e 74 65 72 stale.** pointer
4d80: 2e 20 20 49 6e 20 6f 74 68 65 72 20 77 6f 72 64 . In other word
4d90: 73 2c 20 69 74 20 63 6f 75 6c 64 20 62 65 20 74 s, it could be t
4da0: 68 61 74 20 74 68 65 72 65 20 68 61 73 20 62 65 hat there has be
4db0: 65 6e 20 61 20 70 72 69 6f 72 0a 2a 2a 20 63 61 en a prior.** ca
4dc0: 6c 6c 20 74 6f 20 73 71 6c 69 74 65 33 5f 63 6c ll to sqlite3_cl
4dd0: 6f 73 65 28 64 62 29 20 61 6e 64 20 64 62 20 68 ose(db) and db h
4de0: 61 73 20 62 65 65 6e 20 64 65 61 6c 6c 6f 63 61 as been dealloca
4df0: 74 65 64 2e 20 20 41 6e 64 20 77 65 20 64 6f 0a ted. And we do.
4e00: 2a 2a 20 6e 6f 74 20 77 61 6e 74 20 74 6f 20 77 ** not want to w
4e10: 72 69 74 65 20 69 6e 74 6f 20 64 65 61 6c 6c 6f rite into deallo
4e20: 63 61 74 65 64 20 6d 65 6d 6f 72 79 2e 0a 2a 2f cated memory..*/
4e30: 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 61 66 65 .int sqlite3Safe
4e40: 74 79 4f 6e 28 73 71 6c 69 74 65 33 20 2a 64 62 tyOn(sqlite3 *db
4e50: 29 7b 0a 20 20 69 66 28 20 64 62 2d 3e 6d 61 67 ){. if( db->mag
4e60: 69 63 3d 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 ic==SQLITE_MAGIC
4e70: 5f 4f 50 45 4e 20 29 7b 0a 20 20 20 20 64 62 2d _OPEN ){. db-
4e80: 3e 6d 61 67 69 63 20 3d 20 53 51 4c 49 54 45 5f >magic = SQLITE_
4e90: 4d 41 47 49 43 5f 42 55 53 59 3b 0a 20 20 20 20 MAGIC_BUSY;.
4ea0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 return 0;. }els
4eb0: 65 20 69 66 28 20 64 62 2d 3e 6d 61 67 69 63 3d e if( db->magic=
4ec0: 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 =SQLITE_MAGIC_BU
4ed0: 53 59 20 7c 7c 20 64 62 2d 3e 6d 61 67 69 63 3d SY || db->magic=
4ee0: 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 45 52 =SQLITE_MAGIC_ER
4ef0: 52 4f 52 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d ROR ){. db->m
4f00: 61 67 69 63 20 3d 20 53 51 4c 49 54 45 5f 4d 41 agic = SQLITE_MA
4f10: 47 49 43 5f 45 52 52 4f 52 3b 0a 20 20 20 20 64 GIC_ERROR;. d
4f20: 62 2d 3e 66 6c 61 67 73 20 7c 3d 20 53 51 4c 49 b->flags |= SQLI
4f30: 54 45 5f 49 6e 74 65 72 72 75 70 74 3b 0a 20 20 TE_Interrupt;.
4f40: 7d 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a }. return 1;.}.
4f50: 0a 2f 2a 0a 2a 2a 20 43 68 61 6e 67 65 20 74 68 ./*.** Change th
4f60: 65 20 6d 61 67 69 63 20 66 72 6f 6d 20 53 51 4c e magic from SQL
4f70: 49 54 45 5f 4d 41 47 49 43 5f 42 55 53 59 20 74 ITE_MAGIC_BUSY t
4f80: 6f 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 4f o SQLITE_MAGIC_O
4f90: 50 45 4e 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 61 PEN..** Return a
4fa0: 6e 20 65 72 72 6f 72 20 28 6e 6f 6e 2d 7a 65 72 n error (non-zer
4fb0: 6f 29 20 69 66 20 74 68 65 20 6d 61 67 69 63 20 o) if the magic
4fc0: 77 61 73 20 6e 6f 74 20 53 51 4c 49 54 45 5f 4d was not SQLITE_M
4fd0: 41 47 49 43 5f 42 55 53 59 0a 2a 2a 20 77 68 65 AGIC_BUSY.** whe
4fe0: 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 69 n this routine i
4ff0: 73 20 63 61 6c 6c 65 64 2e 0a 2a 2f 0a 69 6e 74 s called..*/.int
5000: 20 73 71 6c 69 74 65 33 53 61 66 65 74 79 4f 66 sqlite3SafetyOf
5010: 66 28 73 71 6c 69 74 65 33 20 2a 64 62 29 7b 0a f(sqlite3 *db){.
5020: 20 20 69 66 28 20 64 62 2d 3e 6d 61 67 69 63 3d if( db->magic=
5030: 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 =SQLITE_MAGIC_BU
5040: 53 59 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d 61 SY ){. db->ma
5050: 67 69 63 20 3d 20 53 51 4c 49 54 45 5f 4d 41 47 gic = SQLITE_MAG
5060: 49 43 5f 4f 50 45 4e 3b 0a 20 20 20 20 72 65 74 IC_OPEN;. ret
5070: 75 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 urn 0;. }else i
5080: 66 28 20 64 62 2d 3e 6d 61 67 69 63 3d 3d 53 51 f( db->magic==SQ
5090: 4c 49 54 45 5f 4d 41 47 49 43 5f 4f 50 45 4e 20 LITE_MAGIC_OPEN
50a0: 7c 7c 20 64 62 2d 3e 6d 61 67 69 63 3d 3d 53 51 || db->magic==SQ
50b0: 4c 49 54 45 5f 4d 41 47 49 43 5f 45 52 52 4f 52 LITE_MAGIC_ERROR
50c0: 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d 61 67 69 ){. db->magi
50d0: 63 20 3d 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 c = SQLITE_MAGIC
50e0: 5f 45 52 52 4f 52 3b 0a 20 20 20 20 64 62 2d 3e _ERROR;. db->
50f0: 66 6c 61 67 73 20 7c 3d 20 53 51 4c 49 54 45 5f flags |= SQLITE_
5100: 49 6e 74 65 72 72 75 70 74 3b 0a 20 20 7d 0a 20 Interrupt;. }.
5110: 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a return 1;.}../*
5120: 0a 2a 2a 20 43 68 65 63 6b 20 74 6f 20 6d 61 6b .** Check to mak
5130: 65 20 73 75 72 65 20 77 65 20 61 72 65 20 6e 6f e sure we are no
5140: 74 20 63 75 72 72 65 6e 74 6c 79 20 65 78 65 63 t currently exec
5150: 75 74 69 6e 67 20 61 6e 20 73 71 6c 69 74 65 33 uting an sqlite3
5160: 5f 65 78 65 63 28 29 2e 0a 2a 2a 20 49 66 20 77 _exec()..** If w
5170: 65 20 61 72 65 20 63 75 72 72 65 6e 74 6c 79 20 e are currently
5180: 69 6e 20 61 6e 20 73 71 6c 69 74 65 33 5f 65 78 in an sqlite3_ex
5190: 65 63 28 29 2c 20 72 65 74 75 72 6e 20 74 72 75 ec(), return tru
51a0: 65 20 61 6e 64 20 73 65 74 0a 2a 2a 20 73 71 6c e and set.** sql
51b0: 69 74 65 2e 6d 61 67 69 63 20 74 6f 20 53 51 4c ite.magic to SQL
51c0: 49 54 45 5f 4d 41 47 49 43 5f 45 52 52 4f 52 2e ITE_MAGIC_ERROR.
51d0: 20 20 54 68 69 73 20 77 69 6c 6c 20 63 61 75 73 This will caus
51e0: 65 20 61 20 63 6f 6d 70 6c 65 74 65 0a 2a 2a 20 e a complete.**
51f0: 73 68 75 74 64 6f 77 6e 20 6f 66 20 74 68 65 20 shutdown of the
5200: 64 61 74 61 62 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 database..**.**
5210: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 This routine is
5220: 75 73 65 64 20 74 6f 20 74 72 79 20 74 6f 20 64 used to try to d
5230: 65 74 65 63 74 20 77 68 65 6e 20 41 50 49 20 72 etect when API r
5240: 6f 75 74 69 6e 65 73 20 61 72 65 20 63 61 6c 6c outines are call
5250: 65 64 0a 2a 2a 20 61 74 20 74 68 65 20 77 72 6f ed.** at the wro
5260: 6e 67 20 74 69 6d 65 20 6f 72 20 69 6e 20 74 68 ng time or in th
5270: 65 20 77 72 6f 6e 67 20 73 65 71 75 65 6e 63 65 e wrong sequence
5280: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 ..*/.int sqlite3
5290: 53 61 66 65 74 79 43 68 65 63 6b 28 73 71 6c 69 SafetyCheck(sqli
52a0: 74 65 33 20 2a 64 62 29 7b 0a 20 20 69 66 28 20 te3 *db){. if(
52b0: 64 62 2d 3e 70 56 64 62 65 21 3d 30 20 29 7b 0a db->pVdbe!=0 ){.
52c0: 20 20 20 20 64 62 2d 3e 6d 61 67 69 63 20 3d 20 db->magic =
52d0: 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 45 52 52 SQLITE_MAGIC_ERR
52e0: 4f 52 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 31 OR;. return 1
52f0: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 30 ;. }. return 0
5300: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 76 ;.}../*.** The v
5310: 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69 ariable-length i
5320: 6e 74 65 67 65 72 20 65 6e 63 6f 64 69 6e 67 20 nteger encoding
5330: 69 73 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 2a is as follows:.*
5340: 2a 0a 2a 2a 20 4b 45 59 3a 0a 2a 2a 20 20 20 20 *.** KEY:.**
5350: 20 20 20 20 20 41 20 3d 20 30 78 78 78 78 78 78 A = 0xxxxxx
5360: 78 20 20 20 20 37 20 62 69 74 73 20 6f 66 20 64 x 7 bits of d
5370: 61 74 61 20 61 6e 64 20 6f 6e 65 20 66 6c 61 67 ata and one flag
5380: 20 62 69 74 0a 2a 2a 20 20 20 20 20 20 20 20 20 bit.**
5390: 42 20 3d 20 31 78 78 78 78 78 78 78 20 20 20 20 B = 1xxxxxxx
53a0: 37 20 62 69 74 73 20 6f 66 20 64 61 74 61 20 61 7 bits of data a
53b0: 6e 64 20 6f 6e 65 20 66 6c 61 67 20 62 69 74 0a nd one flag bit.
53c0: 2a 2a 20 20 20 20 20 20 20 20 20 43 20 3d 20 78 ** C = x
53d0: 78 78 78 78 78 78 78 20 20 20 20 38 20 62 69 74 xxxxxxx 8 bit
53e0: 73 20 6f 66 20 64 61 74 61 0a 2a 2a 0a 2a 2a 20 s of data.**.**
53f0: 20 37 20 62 69 74 73 20 2d 20 41 0a 2a 2a 20 31 7 bits - A.** 1
5400: 34 20 62 69 74 73 20 2d 20 42 41 0a 2a 2a 20 32 4 bits - BA.** 2
5410: 31 20 62 69 74 73 20 2d 20 42 42 41 0a 2a 2a 20 1 bits - BBA.**
5420: 32 38 20 62 69 74 73 20 2d 20 42 42 42 41 0a 2a 28 bits - BBBA.*
5430: 2a 20 33 35 20 62 69 74 73 20 2d 20 42 42 42 42 * 35 bits - BBBB
5440: 41 0a 2a 2a 20 34 32 20 62 69 74 73 20 2d 20 42 A.** 42 bits - B
5450: 42 42 42 42 41 0a 2a 2a 20 34 39 20 62 69 74 73 BBBBA.** 49 bits
5460: 20 2d 20 42 42 42 42 42 42 41 0a 2a 2a 20 35 36 - BBBBBBA.** 56
5470: 20 62 69 74 73 20 2d 20 42 42 42 42 42 42 42 41 bits - BBBBBBBA
5480: 0a 2a 2a 20 36 34 20 62 69 74 73 20 2d 20 42 42 .** 64 bits - BB
5490: 42 42 42 42 42 42 43 0a 2a 2f 0a 0a 2f 2a 0a 2a BBBBBBC.*/../*.*
54a0: 2a 20 57 72 69 74 65 20 61 20 36 34 2d 62 69 74 * Write a 64-bit
54b0: 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 variable-length
54c0: 20 69 6e 74 65 67 65 72 20 74 6f 20 6d 65 6d 6f integer to memo
54d0: 72 79 20 73 74 61 72 74 69 6e 67 20 61 74 20 70 ry starting at p
54e0: 5b 30 5d 2e 0a 2a 2a 20 54 68 65 20 6c 65 6e 67 [0]..** The leng
54f0: 74 68 20 6f 66 20 64 61 74 61 20 77 72 69 74 65 th of data write
5500: 20 77 69 6c 6c 20 62 65 20 62 65 74 77 65 65 6e will be between
5510: 20 31 20 61 6e 64 20 39 20 62 79 74 65 73 2e 20 1 and 9 bytes.
5520: 20 54 68 65 20 6e 75 6d 62 65 72 0a 2a 2a 20 6f The number.** o
5530: 66 20 62 79 74 65 73 20 77 72 69 74 74 65 6e 20 f bytes written
5540: 69 73 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a is returned..**.
5550: 2a 2a 20 41 20 76 61 72 69 61 62 6c 65 2d 6c 65 ** A variable-le
5560: 6e 67 74 68 20 69 6e 74 65 67 65 72 20 63 6f 6e ngth integer con
5570: 73 69 73 74 73 20 6f 66 20 74 68 65 20 6c 6f 77 sists of the low
5580: 65 72 20 37 20 62 69 74 73 20 6f 66 20 65 61 63 er 7 bits of eac
5590: 68 20 62 79 74 65 0a 2a 2a 20 66 6f 72 20 61 6c h byte.** for al
55a0: 6c 20 62 79 74 65 73 20 74 68 61 74 20 68 61 76 l bytes that hav
55b0: 65 20 74 68 65 20 38 74 68 20 62 69 74 20 73 65 e the 8th bit se
55c0: 74 20 61 6e 64 20 6f 6e 65 20 62 79 74 65 20 77 t and one byte w
55d0: 69 74 68 20 74 68 65 20 38 74 68 0a 2a 2a 20 62 ith the 8th.** b
55e0: 69 74 20 63 6c 65 61 72 2e 20 20 45 78 63 65 70 it clear. Excep
55f0: 74 2c 20 69 66 20 77 65 20 67 65 74 20 74 6f 20 t, if we get to
5600: 74 68 65 20 39 74 68 20 62 79 74 65 2c 20 69 74 the 9th byte, it
5610: 20 73 74 6f 72 65 73 20 74 68 65 20 66 75 6c 6c stores the full
5620: 0a 2a 2a 20 38 20 62 69 74 73 20 61 6e 64 20 69 .** 8 bits and i
5630: 73 20 74 68 65 20 6c 61 73 74 20 62 79 74 65 2e s the last byte.
5640: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 50 .*/.int sqlite3P
5650: 75 74 56 61 72 69 6e 74 28 75 6e 73 69 67 6e 65 utVarint(unsigne
5660: 64 20 63 68 61 72 20 2a 70 2c 20 75 36 34 20 76 d char *p, u64 v
5670: 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a 2c 20 6e ){. int i, j, n
5680: 3b 0a 20 20 75 38 20 62 75 66 5b 31 30 5d 3b 0a ;. u8 buf[10];.
5690: 20 20 69 66 28 20 76 20 26 20 30 78 66 66 30 30 if( v & 0xff00
56a0: 30 30 30 30 30 30 30 30 30 30 30 30 20 29 7b 0a 000000000000 ){.
56b0: 20 20 20 20 70 5b 38 5d 20 3d 20 76 3b 0a 20 20 p[8] = v;.
56c0: 20 20 76 20 3e 3e 3d 20 38 3b 0a 20 20 20 20 66 v >>= 8;. f
56d0: 6f 72 28 69 3d 37 3b 20 69 3e 3d 30 3b 20 69 2d or(i=7; i>=0; i-
56e0: 2d 29 7b 0a 20 20 20 20 20 20 70 5b 69 5d 20 3d -){. p[i] =
56f0: 20 28 76 20 26 20 30 78 37 66 29 20 7c 20 30 78 (v & 0x7f) | 0x
5700: 38 30 3b 0a 20 20 20 20 20 20 76 20 3e 3e 3d 20 80;. v >>=
5710: 37 3b 0a 20 20 20 20 7d 0a 20 20 20 20 72 65 74 7;. }. ret
5720: 75 72 6e 20 39 3b 0a 20 20 7d 20 20 20 20 0a 20 urn 9;. } .
5730: 20 6e 20 3d 20 30 3b 0a 20 20 64 6f 7b 0a 20 20 n = 0;. do{.
5740: 20 20 62 75 66 5b 6e 2b 2b 5d 20 3d 20 28 76 20 buf[n++] = (v
5750: 26 20 30 78 37 66 29 20 7c 20 30 78 38 30 3b 0a & 0x7f) | 0x80;.
5760: 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a 20 20 7d v >>= 7;. }
5770: 77 68 69 6c 65 28 20 76 21 3d 30 20 29 3b 0a 20 while( v!=0 );.
5780: 20 62 75 66 5b 30 5d 20 26 3d 20 30 78 37 66 3b buf[0] &= 0x7f;
5790: 0a 20 20 61 73 73 65 72 74 28 20 6e 3c 3d 39 20 . assert( n<=9
57a0: 29 3b 0a 20 20 66 6f 72 28 69 3d 30 2c 20 6a 3d );. for(i=0, j=
57b0: 6e 2d 31 3b 20 6a 3e 3d 30 3b 20 6a 2d 2d 2c 20 n-1; j>=0; j--,
57c0: 69 2b 2b 29 7b 0a 20 20 20 20 70 5b 69 5d 20 3d i++){. p[i] =
57d0: 20 62 75 66 5b 6a 5d 3b 0a 20 20 7d 0a 20 20 72 buf[j];. }. r
57e0: 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a eturn n;.}../*.*
57f0: 2a 20 52 65 61 64 20 61 20 36 34 2d 62 69 74 20 * Read a 64-bit
5800: 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 variable-length
5810: 69 6e 74 65 67 65 72 20 66 72 6f 6d 20 6d 65 6d integer from mem
5820: 6f 72 79 20 73 74 61 72 74 69 6e 67 20 61 74 20 ory starting at
5830: 70 5b 30 5d 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 p[0]..** Return
5840: 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 the number of by
5850: 74 65 73 20 72 65 61 64 2e 20 20 54 68 65 20 76 tes read. The v
5860: 61 6c 75 65 20 69 73 20 73 74 6f 72 65 64 20 69 alue is stored i
5870: 6e 20 2a 76 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c n *v..*/.int sql
5880: 69 74 65 33 47 65 74 56 61 72 69 6e 74 28 63 6f ite3GetVarint(co
5890: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 nst unsigned cha
58a0: 72 20 2a 70 2c 20 75 36 34 20 2a 76 29 7b 0a 20 r *p, u64 *v){.
58b0: 20 75 33 32 20 78 3b 0a 20 20 75 36 34 20 78 36 u32 x;. u64 x6
58c0: 34 3b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 75 6e 4;. int n;. un
58d0: 73 69 67 6e 65 64 20 63 68 61 72 20 63 3b 0a 20 signed char c;.
58e0: 20 69 66 28 20 28 28 63 20 3d 20 70 5b 30 5d 29 if( ((c = p[0])
58f0: 20 26 20 30 78 38 30 29 3d 3d 30 20 29 7b 0a 20 & 0x80)==0 ){.
5900: 20 20 20 2a 76 20 3d 20 63 3b 0a 20 20 20 20 72 *v = c;. r
5910: 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a 20 20 78 eturn 1;. }. x
5920: 20 3d 20 63 20 26 20 30 78 37 66 3b 0a 20 20 69 = c & 0x7f;. i
5930: 66 28 20 28 28 63 20 3d 20 70 5b 31 5d 29 20 26 f( ((c = p[1]) &
5940: 20 30 78 38 30 29 3d 3d 30 20 29 7b 0a 20 20 20 0x80)==0 ){.
5950: 20 2a 76 20 3d 20 28 78 3c 3c 37 29 20 7c 20 63 *v = (x<<7) | c
5960: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 32 3b 0a ;. return 2;.
5970: 20 20 7d 0a 20 20 78 20 3d 20 28 78 3c 3c 37 29 }. x = (x<<7)
5980: 20 7c 20 28 63 26 30 78 37 66 29 3b 0a 20 20 69 | (c&0x7f);. i
5990: 66 28 20 28 28 63 20 3d 20 70 5b 32 5d 29 20 26 f( ((c = p[2]) &
59a0: 20 30 78 38 30 29 3d 3d 30 20 29 7b 0a 20 20 20 0x80)==0 ){.
59b0: 20 2a 76 20 3d 20 28 78 3c 3c 37 29 20 7c 20 63 *v = (x<<7) | c
59c0: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 33 3b 0a ;. return 3;.
59d0: 20 20 7d 0a 20 20 78 20 3d 20 28 78 3c 3c 37 29 }. x = (x<<7)
59e0: 20 7c 20 28 63 26 30 78 37 66 29 3b 0a 20 20 69 | (c&0x7f);. i
59f0: 66 28 20 28 28 63 20 3d 20 70 5b 33 5d 29 20 26 f( ((c = p[3]) &
5a00: 20 30 78 38 30 29 3d 3d 30 20 29 7b 0a 20 20 20 0x80)==0 ){.
5a10: 20 2a 76 20 3d 20 28 78 3c 3c 37 29 20 7c 20 63 *v = (x<<7) | c
5a20: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 34 3b 0a ;. return 4;.
5a30: 20 20 7d 0a 20 20 78 36 34 20 3d 20 28 78 3c 3c }. x64 = (x<<
5a40: 37 29 20 7c 20 28 63 26 30 78 37 66 29 3b 0a 20 7) | (c&0x7f);.
5a50: 20 6e 20 3d 20 34 3b 0a 20 20 64 6f 7b 0a 20 20 n = 4;. do{.
5a60: 20 20 63 20 3d 20 70 5b 6e 2b 2b 5d 3b 0a 20 20 c = p[n++];.
5a70: 20 20 69 66 28 20 6e 3d 3d 39 20 29 7b 0a 20 20 if( n==9 ){.
5a80: 20 20 20 20 78 36 34 20 3d 20 28 78 36 34 3c 3c x64 = (x64<<
5a90: 38 29 20 7c 20 63 3b 0a 20 20 20 20 20 20 62 72 8) | c;. br
5aa0: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 78 eak;. }. x
5ab0: 36 34 20 3d 20 28 78 36 34 3c 3c 37 29 20 7c 20 64 = (x64<<7) |
5ac0: 28 63 26 30 78 37 66 29 3b 0a 20 20 7d 77 68 69 (c&0x7f);. }whi
5ad0: 6c 65 28 20 28 63 20 26 20 30 78 38 30 29 21 3d le( (c & 0x80)!=
5ae0: 30 20 29 3b 0a 20 20 2a 76 20 3d 20 78 36 34 3b 0 );. *v = x64;
5af0: 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a . return n;.}..
5b00: 2f 2a 0a 2a 2a 20 52 65 61 64 20 61 20 33 32 2d /*.** Read a 32-
5b10: 62 69 74 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e bit variable-len
5b20: 67 74 68 20 69 6e 74 65 67 65 72 20 66 72 6f 6d gth integer from
5b30: 20 6d 65 6d 6f 72 79 20 73 74 61 72 74 69 6e 67 memory starting
5b40: 20 61 74 20 70 5b 30 5d 2e 0a 2a 2a 20 52 65 74 at p[0]..** Ret
5b50: 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 72 20 6f urn the number o
5b60: 66 20 62 79 74 65 73 20 72 65 61 64 2e 20 20 54 f bytes read. T
5b70: 68 65 20 76 61 6c 75 65 20 69 73 20 73 74 6f 72 he value is stor
5b80: 65 64 20 69 6e 20 2a 76 2e 0a 2a 2f 0a 69 6e 74 ed in *v..*/.int
5b90: 20 73 71 6c 69 74 65 33 47 65 74 56 61 72 69 6e sqlite3GetVarin
5ba0: 74 33 32 28 63 6f 6e 73 74 20 75 6e 73 69 67 6e t32(const unsign
5bb0: 65 64 20 63 68 61 72 20 2a 70 2c 20 75 33 32 20 ed char *p, u32
5bc0: 2a 76 29 7b 0a 20 20 75 33 32 20 78 3b 0a 20 20 *v){. u32 x;.
5bd0: 69 6e 74 20 6e 3b 0a 20 20 75 6e 73 69 67 6e 65 int n;. unsigne
5be0: 64 20 63 68 61 72 20 63 3b 0a 20 20 69 66 28 20 d char c;. if(
5bf0: 28 28 63 20 3d 20 70 5b 30 5d 29 20 26 20 30 78 ((c = p[0]) & 0x
5c00: 38 30 29 3d 3d 30 20 29 7b 0a 20 20 20 20 2a 76 80)==0 ){. *v
5c10: 20 3d 20 63 3b 0a 20 20 20 20 72 65 74 75 72 6e = c;. return
5c20: 20 31 3b 0a 20 20 7d 0a 20 20 78 20 3d 20 63 20 1;. }. x = c
5c30: 26 20 30 78 37 66 3b 0a 20 20 69 66 28 20 28 28 & 0x7f;. if( ((
5c40: 63 20 3d 20 70 5b 31 5d 29 20 26 20 30 78 38 30 c = p[1]) & 0x80
5c50: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 2a 76 20 3d )==0 ){. *v =
5c60: 20 28 78 3c 3c 37 29 20 7c 20 63 3b 0a 20 20 20 (x<<7) | c;.
5c70: 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 7d 0a 20 return 2;. }.
5c80: 20 78 20 3d 20 28 78 3c 3c 37 29 20 7c 20 28 63 x = (x<<7) | (c
5c90: 20 26 20 30 78 37 66 29 3b 0a 20 20 6e 20 3d 20 & 0x7f);. n =
5ca0: 32 3b 0a 20 20 64 6f 7b 0a 20 20 20 20 78 20 3d 2;. do{. x =
5cb0: 20 28 78 3c 3c 37 29 20 7c 20 28 28 63 20 3d 20 (x<<7) | ((c =
5cc0: 70 5b 6e 2b 2b 5d 29 26 30 78 37 66 29 3b 0a 20 p[n++])&0x7f);.
5cd0: 20 7d 77 68 69 6c 65 28 20 28 63 20 26 20 30 78 }while( (c & 0x
5ce0: 38 30 29 21 3d 30 20 26 26 20 6e 3c 39 20 29 3b 80)!=0 && n<9 );
5cf0: 0a 20 20 2a 76 20 3d 20 78 3b 0a 20 20 72 65 74 . *v = x;. ret
5d00: 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 urn n;.}../*.**
5d10: 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 Return the numbe
5d20: 72 20 6f 66 20 62 79 74 65 73 20 74 68 61 74 20 r of bytes that
5d30: 77 69 6c 6c 20 62 65 20 6e 65 65 64 65 64 20 74 will be needed t
5d40: 6f 20 73 74 6f 72 65 20 74 68 65 20 67 69 76 65 o store the give
5d50: 6e 0a 2a 2a 20 36 34 2d 62 69 74 20 69 6e 74 65 n.** 64-bit inte
5d60: 67 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 ger..*/.int sqli
5d70: 74 65 33 56 61 72 69 6e 74 4c 65 6e 28 75 36 34 te3VarintLen(u64
5d80: 20 76 29 7b 0a 20 20 69 6e 74 20 69 20 3d 20 30 v){. int i = 0
5d90: 3b 0a 20 20 64 6f 7b 0a 20 20 20 20 69 2b 2b 3b ;. do{. i++;
5da0: 0a 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a 20 20 . v >>= 7;.
5db0: 7d 77 68 69 6c 65 28 20 76 21 3d 30 20 26 26 20 }while( v!=0 &&
5dc0: 69 3c 39 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 i<9 );. return
5dd0: 69 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 72 61 6e i;.}../*.** Tran
5de0: 73 6c 61 74 65 20 61 20 73 69 6e 67 6c 65 20 62 slate a single b
5df0: 79 74 65 20 6f 66 20 48 65 78 20 69 6e 74 6f 20 yte of Hex into
5e00: 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a 73 an integer..*/.s
5e10: 74 61 74 69 63 20 69 6e 74 20 68 65 78 54 6f 49 tatic int hexToI
5e20: 6e 74 28 69 6e 74 20 68 29 7b 0a 20 20 69 66 28 nt(int h){. if(
5e30: 20 68 3e 3d 27 30 27 20 26 26 20 68 3c 3d 27 39 h>='0' && h<='9
5e40: 27 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 ' ){. return
5e50: 68 20 2d 20 27 30 27 3b 0a 20 20 7d 65 6c 73 65 h - '0';. }else
5e60: 20 69 66 28 20 68 3e 3d 27 61 27 20 26 26 20 68 if( h>='a' && h
5e70: 3c 3d 27 66 27 20 29 7b 0a 20 20 20 20 72 65 74 <='f' ){. ret
5e80: 75 72 6e 20 68 20 2d 20 27 61 27 20 2b 20 31 30 urn h - 'a' + 10
5e90: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 68 3e ;. }else if( h>
5ea0: 3d 27 41 27 20 26 26 20 68 3c 3d 27 46 27 20 29 ='A' && h<='F' )
5eb0: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 68 20 2d {. return h -
5ec0: 20 27 41 27 20 2b 20 31 30 3b 0a 20 20 7d 65 6c 'A' + 10;. }el
5ed0: 73 65 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 se{. return 0
5ee0: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 ;. }.}../*.** C
5ef0: 6f 6e 76 65 72 74 20 61 20 42 4c 4f 42 20 6c 69 onvert a BLOB li
5f00: 74 65 72 61 6c 20 6f 66 20 74 68 65 20 66 6f 72 teral of the for
5f10: 6d 20 22 78 27 68 68 68 68 68 68 27 22 20 69 6e m "x'hhhhhh'" in
5f20: 74 6f 20 69 74 73 20 62 69 6e 61 72 79 0a 2a 2a to its binary.**
5f30: 20 76 61 6c 75 65 2e 20 20 52 65 74 75 72 6e 20 value. Return
5f40: 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 69 74 73 a pointer to its
5f50: 20 62 69 6e 61 72 79 20 76 61 6c 75 65 2e 20 20 binary value.
5f60: 53 70 61 63 65 20 74 6f 20 68 6f 6c 64 20 74 68 Space to hold th
5f70: 65 0a 2a 2a 20 62 69 6e 61 72 79 20 76 61 6c 75 e.** binary valu
5f80: 65 20 68 61 73 20 62 65 65 6e 20 6f 62 74 61 69 e has been obtai
5f90: 6e 65 64 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63 20 ned from malloc
5fa0: 61 6e 64 20 6d 75 73 74 20 62 65 20 66 72 65 65 and must be free
5fb0: 64 20 62 79 0a 2a 2a 20 74 68 65 20 63 61 6c 6c d by.** the call
5fc0: 69 6e 67 20 72 6f 75 74 69 6e 65 2e 0a 2a 2f 0a ing routine..*/.
5fd0: 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 48 65 78 void *sqlite3Hex
5fe0: 54 6f 42 6c 6f 62 28 63 6f 6e 73 74 20 63 68 61 ToBlob(const cha
5ff0: 72 20 2a 7a 29 7b 0a 20 20 63 68 61 72 20 2a 7a r *z){. char *z
6000: 42 6c 6f 62 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 Blob;. int i;.
6010: 20 69 6e 74 20 6e 20 3d 20 73 74 72 6c 65 6e 28 int n = strlen(
6020: 7a 29 3b 0a 20 20 69 66 28 20 6e 25 32 20 29 20 z);. if( n%2 )
6030: 72 65 74 75 72 6e 20 30 3b 0a 0a 20 20 7a 42 6c return 0;.. zBl
6040: 6f 62 20 3d 20 28 63 68 61 72 20 2a 29 73 71 6c ob = (char *)sql
6050: 69 74 65 4d 61 6c 6c 6f 63 28 6e 2f 32 29 3b 0a iteMalloc(n/2);.
6060: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 for(i=0; i<n;
6070: 69 2b 3d 32 29 7b 0a 20 20 20 20 7a 42 6c 6f 62 i+=2){. zBlob
6080: 5b 69 2f 32 5d 20 3d 20 28 68 65 78 54 6f 49 6e [i/2] = (hexToIn
6090: 74 28 7a 5b 69 5d 29 3c 3c 34 29 20 7c 20 68 65 t(z[i])<<4) | he
60a0: 78 54 6f 49 6e 74 28 7a 5b 69 2b 31 5d 29 3b 0a xToInt(z[i+1]);.
60b0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 7a 42 6c }. return zBl
60c0: 6f 62 3b 0a 7d 0a 0a 23 69 66 20 64 65 66 69 6e ob;.}..#if defin
60d0: 65 64 28 53 51 4c 49 54 45 5f 54 45 53 54 29 0a ed(SQLITE_TEST).
60e0: 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 74 65 /*.** Convert te
60f0: 78 74 20 67 65 6e 65 72 61 74 65 64 20 62 79 20 xt generated by
6100: 74 68 65 20 22 25 70 22 20 63 6f 6e 76 65 72 73 the "%p" convers
6110: 69 6f 6e 20 66 6f 72 6d 61 74 20 62 61 63 6b 20 ion format back
6120: 69 6e 74 6f 0a 2a 2a 20 61 20 70 6f 69 6e 74 65 into.** a pointe
6130: 72 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73 71 6c 69 r..*/.void *sqli
6140: 74 65 33 54 65 78 74 54 6f 50 74 72 28 63 6f 6e te3TextToPtr(con
6150: 73 74 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 76 st char *z){. v
6160: 6f 69 64 20 2a 70 3b 0a 20 20 75 36 34 20 76 3b oid *p;. u64 v;
6170: 0a 20 20 75 33 32 20 76 32 3b 0a 20 20 69 66 28 . u32 v2;. if(
6180: 20 7a 5b 30 5d 3d 3d 27 30 27 20 26 26 20 7a 5b z[0]=='0' && z[
6190: 31 5d 3d 3d 27 78 27 20 29 7b 0a 20 20 20 20 7a 1]=='x' ){. z
61a0: 20 2b 3d 20 32 3b 0a 20 20 7d 0a 20 20 76 20 3d += 2;. }. v =
61b0: 20 30 3b 0a 20 20 77 68 69 6c 65 28 20 2a 7a 20 0;. while( *z
61c0: 29 7b 0a 20 20 20 20 76 20 3d 20 28 76 3c 3c 34 ){. v = (v<<4
61d0: 29 20 2b 20 68 65 78 54 6f 49 6e 74 28 2a 7a 29 ) + hexToInt(*z)
61e0: 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d 0a 20 ;. z++;. }.
61f0: 20 69 66 28 20 73 69 7a 65 6f 66 28 70 29 3d 3d if( sizeof(p)==
6200: 73 69 7a 65 6f 66 28 76 29 20 29 7b 0a 20 20 20 sizeof(v) ){.
6210: 20 70 20 3d 20 2a 28 76 6f 69 64 2a 2a 29 26 76 p = *(void**)&v
6220: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 61 ;. }else{. a
6230: 73 73 65 72 74 28 20 73 69 7a 65 6f 66 28 70 29 ssert( sizeof(p)
6240: 3d 3d 73 69 7a 65 6f 66 28 76 32 29 20 29 3b 0a ==sizeof(v2) );.
6250: 20 20 20 20 76 32 20 3d 20 28 75 33 32 29 76 3b v2 = (u32)v;
6260: 0a 20 20 20 20 70 20 3d 20 2a 28 76 6f 69 64 2a . p = *(void*
6270: 2a 29 26 76 32 3b 0a 20 20 7d 0a 20 20 72 65 74 *)&v2;. }. ret
6280: 75 72 6e 20 70 3b 0a 7d 0a 23 65 6e 64 69 66 0a urn p;.}.#endif.