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 32 Id: util.c,v 1.2
0220: 35 32 20 32 30 30 39 2f 30 35 2f 30 31 20 32 31 52 2009/05/01 21
0230: 3a 31 33 3a 33 37 20 64 72 68 20 45 78 70 20 24 :13:37 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 6d 61 74 68 2e 68 3e include <math.h>
0280: 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 20 ../*.** Routine
0290: 6e 65 65 64 65 64 20 74 6f 20 73 75 70 70 6f 72 needed to suppor
02a0: 74 20 74 68 65 20 74 65 73 74 63 61 73 65 28 29 t the testcase()
02b0: 20 6d 61 63 72 6f 2e 0a 2a 2f 0a 23 69 66 64 65 macro..*/.#ifde
02c0: 66 20 53 51 4c 49 54 45 5f 43 4f 56 45 52 41 47 f SQLITE_COVERAG
02d0: 45 5f 54 45 53 54 0a 76 6f 69 64 20 73 71 6c 69 E_TEST.void sqli
02e0: 74 65 33 43 6f 76 65 72 61 67 65 28 69 6e 74 20 te3Coverage(int
02f0: 78 29 7b 0a 20 20 73 74 61 74 69 63 20 69 6e 74 x){. static int
0300: 20 64 75 6d 6d 79 20 3d 20 30 3b 0a 20 20 64 75 dummy = 0;. du
0310: 6d 6d 79 20 2b 3d 20 78 3b 0a 7d 0a 23 65 6e 64 mmy += x;.}.#end
0320: 69 66 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e if../*.** Routin
0330: 65 20 6e 65 65 64 65 64 20 74 6f 20 73 75 70 70 e needed to supp
0340: 6f 72 74 20 74 68 65 20 41 4c 57 41 59 53 28 29 ort the ALWAYS()
0350: 20 61 6e 64 20 4e 45 56 45 52 28 29 20 6d 61 63 and NEVER() mac
0360: 72 6f 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 ros..**.** The a
0370: 72 67 75 6d 65 6e 74 20 74 6f 20 41 4c 57 41 59 rgument to ALWAY
0380: 53 28 29 20 73 68 6f 75 6c 64 20 61 6c 77 61 79 S() should alway
0390: 73 20 62 65 20 74 72 75 65 20 61 6e 64 20 74 68 s be true and th
03a0: 65 20 61 72 67 75 6d 65 6e 74 0a 2a 2a 20 74 6f e argument.** to
03b0: 20 4e 45 56 45 52 28 29 20 73 68 6f 75 6c 64 20 NEVER() should
03c0: 61 6c 77 61 79 73 20 62 65 20 66 61 6c 73 65 2e always be false.
03d0: 20 20 49 66 20 65 69 74 68 65 72 20 69 73 20 6e If either is n
03e0: 6f 74 20 74 68 65 20 63 61 73 65 0a 2a 2a 20 74 ot the case.** t
03f0: 68 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 hen this routine
0400: 20 69 73 20 63 61 6c 6c 65 64 20 69 6e 20 6f 72 is called in or
0410: 64 65 72 20 74 6f 20 74 68 72 6f 77 20 61 6e 20 der to throw an
0420: 65 72 72 6f 72 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 error..**.** Thi
0430: 73 20 72 6f 75 74 69 6e 65 20 6f 6e 6c 79 20 65 s routine only e
0440: 78 69 73 74 73 20 69 66 20 61 73 73 65 72 74 28 xists if assert(
0450: 29 20 69 73 20 6f 70 65 72 61 74 69 6f 6e 61 6c ) is operational
0460: 2e 20 20 49 74 20 61 6c 77 61 79 73 0a 2a 2a 20 . It always.**
0470: 74 68 72 6f 77 73 20 61 6e 20 61 73 73 65 72 74 throws an assert
0480: 20 6f 6e 20 69 74 73 20 66 69 72 73 74 20 69 6e on its first in
0490: 76 6f 63 61 74 69 6f 6e 2e 20 20 54 68 65 20 76 vocation. The v
04a0: 61 72 69 61 62 6c 65 20 68 61 73 20 61 20 6c 6f ariable has a lo
04b0: 6e 67 0a 2a 2a 20 6e 61 6d 65 20 74 6f 20 68 65 ng.** name to he
04c0: 6c 70 20 74 68 65 20 61 73 73 65 72 74 28 29 20 lp the assert()
04d0: 6d 65 73 73 61 67 65 20 62 65 20 6d 6f 72 65 20 message be more
04e0: 72 65 61 64 61 62 6c 65 2e 20 20 54 68 65 20 76 readable. The v
04f0: 61 72 69 61 62 6c 65 0a 2a 2a 20 69 73 20 75 73 ariable.** is us
0500: 65 64 20 74 6f 20 70 72 65 76 65 6e 74 20 61 20 ed to prevent a
0510: 74 6f 6f 2d 63 6c 65 76 65 72 20 6f 70 74 69 6d too-clever optim
0520: 69 7a 65 72 20 66 72 6f 6d 20 6f 70 74 69 6d 69 izer from optimi
0530: 7a 69 6e 67 20 6f 75 74 20 74 68 65 0a 2a 2a 20 zing out the.**
0540: 65 6e 74 69 72 65 20 63 61 6c 6c 2e 0a 2a 2f 0a entire call..*/.
0550: 23 69 66 6e 64 65 66 20 4e 44 45 42 55 47 0a 69 #ifndef NDEBUG.i
0560: 6e 74 20 73 71 6c 69 74 65 33 41 73 73 65 72 74 nt sqlite3Assert
0570: 28 76 6f 69 64 29 7b 0a 20 20 73 74 61 74 69 63 (void){. static
0580: 20 76 6f 6c 61 74 69 6c 65 20 69 6e 74 20 41 4c volatile int AL
0590: 57 41 59 53 5f 77 61 73 5f 66 61 6c 73 65 5f 6f WAYS_was_false_o
05a0: 72 5f 4e 45 56 45 52 5f 77 61 73 5f 74 72 75 65 r_NEVER_was_true
05b0: 20 3d 20 30 3b 0a 20 20 61 73 73 65 72 74 28 20 = 0;. assert(
05c0: 41 4c 57 41 59 53 5f 77 61 73 5f 66 61 6c 73 65 ALWAYS_was_false
05d0: 5f 6f 72 5f 4e 45 56 45 52 5f 77 61 73 5f 74 72 _or_NEVER_was_tr
05e0: 75 65 20 29 3b 20 20 20 20 20 20 2f 2a 20 41 6c ue ); /* Al
05f0: 77 61 79 73 20 66 61 69 6c 73 20 2a 2f 0a 20 20 ways fails */.
0600: 72 65 74 75 72 6e 20 41 4c 57 41 59 53 5f 77 61 return ALWAYS_wa
0610: 73 5f 66 61 6c 73 65 5f 6f 72 5f 4e 45 56 45 52 s_false_or_NEVER
0620: 5f 77 61 73 5f 74 72 75 65 2b 2b 3b 20 20 20 20 _was_true++;
0630: 20 20 20 2f 2a 20 4e 6f 74 20 52 65 61 63 68 65 /* Not Reache
0640: 64 20 2a 2f 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f d */.}.#endif../
0650: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 72 75 65 *.** Return true
0660: 20 69 66 20 74 68 65 20 66 6c 6f 61 74 69 6e 67 if the floating
0670: 20 70 6f 69 6e 74 20 76 61 6c 75 65 20 69 73 20 point value is
0680: 4e 6f 74 20 61 20 4e 75 6d 62 65 72 20 28 4e 61 Not a Number (Na
0690: 4e 29 2e 0a 2a 2a 0a 2a 2a 20 55 73 65 20 74 68 N)..**.** Use th
06a0: 65 20 6d 61 74 68 20 6c 69 62 72 61 72 79 20 69 e math library i
06b0: 73 6e 61 6e 28 29 20 66 75 6e 63 74 69 6f 6e 20 snan() function
06c0: 69 66 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 if compiled with
06d0: 20 53 51 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e SQLITE_HAVE_ISN
06e0: 41 4e 2e 0a 2a 2a 20 4f 74 68 65 72 77 69 73 65 AN..** Otherwise
06f0: 2c 20 77 65 20 68 61 76 65 20 6f 75 72 20 6f 77 , we have our ow
0700: 6e 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e n implementation
0710: 20 74 68 61 74 20 77 6f 72 6b 73 20 6f 6e 20 6d that works on m
0720: 6f 73 74 20 73 79 73 74 65 6d 73 2e 0a 2a 2f 0a ost systems..*/.
0730: 69 6e 74 20 73 71 6c 69 74 65 33 49 73 4e 61 4e int sqlite3IsNaN
0740: 28 64 6f 75 62 6c 65 20 78 29 7b 0a 23 69 66 20 (double x){.#if
0750: 21 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f !defined(SQLITE_
0760: 48 41 56 45 5f 49 53 4e 41 4e 29 0a 20 20 2f 2a HAVE_ISNAN). /*
0770: 0a 20 20 2a 2a 20 53 79 73 74 65 6d 73 20 74 68 . ** Systems th
0780: 61 74 20 73 75 70 70 6f 72 74 20 74 68 65 20 69 at support the i
0790: 73 6e 61 6e 28 29 20 6c 69 62 72 61 72 79 20 66 snan() library f
07a0: 75 6e 63 74 69 6f 6e 20 73 68 6f 75 6c 64 20 70 unction should p
07b0: 72 6f 62 61 62 6c 79 0a 20 20 2a 2a 20 6d 61 6b robably. ** mak
07c0: 65 20 75 73 65 20 6f 66 20 69 74 20 62 79 20 63 e use of it by c
07d0: 6f 6d 70 69 6c 69 6e 67 20 77 69 74 68 20 2d 44 ompiling with -D
07e0: 53 51 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e 41 SQLITE_HAVE_ISNA
07f0: 4e 2e 20 20 42 75 74 20 77 65 20 68 61 76 65 0a N. But we have.
0800: 20 20 2a 2a 20 66 6f 75 6e 64 20 74 68 61 74 20 ** found that
0810: 6d 61 6e 79 20 73 79 73 74 65 6d 73 20 64 6f 20 many systems do
0820: 6e 6f 74 20 68 61 76 65 20 61 20 77 6f 72 6b 69 not have a worki
0830: 6e 67 20 69 73 6e 61 6e 28 29 20 66 75 6e 63 74 ng isnan() funct
0840: 69 6f 6e 20 73 6f 0a 20 20 2a 2a 20 74 68 69 73 ion so. ** this
0850: 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 implementation
0860: 69 73 20 70 72 6f 76 69 64 65 64 20 61 73 20 61 is provided as a
0870: 6e 20 61 6c 74 65 72 6e 61 74 69 76 65 2e 0a 20 n alternative..
0880: 20 2a 2a 0a 20 20 2a 2a 20 54 68 69 73 20 4e 61 **. ** This Na
0890: 4e 20 74 65 73 74 20 73 6f 6d 65 74 69 6d 65 73 N test sometimes
08a0: 20 66 61 69 6c 73 20 69 66 20 63 6f 6d 70 69 6c fails if compil
08b0: 65 64 20 6f 6e 20 47 43 43 20 77 69 74 68 20 2d ed on GCC with -
08c0: 66 66 61 73 74 2d 6d 61 74 68 2e 0a 20 20 2a 2a ffast-math.. **
08d0: 20 4f 6e 20 74 68 65 20 6f 74 68 65 72 20 68 61 On the other ha
08e0: 6e 64 2c 20 74 68 65 20 75 73 65 20 6f 66 20 2d nd, the use of -
08f0: 66 66 61 73 74 2d 6d 61 74 68 20 63 6f 6d 65 73 ffast-math comes
0900: 20 77 69 74 68 20 74 68 65 20 66 6f 6c 6c 6f 77 with the follow
0910: 69 6e 67 0a 20 20 2a 2a 20 77 61 72 6e 69 6e 67 ing. ** warning
0920: 3a 0a 20 20 2a 2a 0a 20 20 2a 2a 20 20 20 20 20 :. **. **
0930: 20 54 68 69 73 20 6f 70 74 69 6f 6e 20 5b 2d 66 This option [-f
0940: 66 61 73 74 2d 6d 61 74 68 5d 20 73 68 6f 75 6c fast-math] shoul
0950: 64 20 6e 65 76 65 72 20 62 65 20 74 75 72 6e 65 d never be turne
0960: 64 20 6f 6e 20 62 79 20 61 6e 79 0a 20 20 2a 2a d on by any. **
0970: 20 20 20 20 20 20 2d 4f 20 6f 70 74 69 6f 6e 20 -O option
0980: 73 69 6e 63 65 20 69 74 20 63 61 6e 20 72 65 73 since it can res
0990: 75 6c 74 20 69 6e 20 69 6e 63 6f 72 72 65 63 74 ult in incorrect
09a0: 20 6f 75 74 70 75 74 20 66 6f 72 20 70 72 6f 67 output for prog
09b0: 72 61 6d 73 0a 20 20 2a 2a 20 20 20 20 20 20 77 rams. ** w
09c0: 68 69 63 68 20 64 65 70 65 6e 64 20 6f 6e 20 61 hich depend on a
09d0: 6e 20 65 78 61 63 74 20 69 6d 70 6c 65 6d 65 6e n exact implemen
09e0: 74 61 74 69 6f 6e 20 6f 66 20 49 45 45 45 20 6f tation of IEEE o
09f0: 72 20 49 53 4f 20 0a 20 20 2a 2a 20 20 20 20 20 r ISO . **
0a00: 20 72 75 6c 65 73 2f 73 70 65 63 69 66 69 63 61 rules/specifica
0a10: 74 69 6f 6e 73 20 66 6f 72 20 6d 61 74 68 20 66 tions for math f
0a20: 75 6e 63 74 69 6f 6e 73 2e 0a 20 20 2a 2a 0a 20 unctions.. **.
0a30: 20 2a 2a 20 55 6e 64 65 72 20 4d 53 56 43 2c 20 ** Under MSVC,
0a40: 74 68 69 73 20 4e 61 4e 20 74 65 73 74 20 6d 61 this NaN test ma
0a50: 79 20 66 61 69 6c 20 69 66 20 63 6f 6d 70 69 6c y fail if compil
0a60: 65 64 20 77 69 74 68 20 61 20 66 6c 6f 61 74 69 ed with a floati
0a70: 6e 67 2d 0a 20 20 2a 2a 20 70 6f 69 6e 74 20 70 ng-. ** point p
0a80: 72 65 63 69 73 69 6f 6e 20 6d 6f 64 65 20 6f 74 recision mode ot
0a90: 68 65 72 20 74 68 61 6e 20 2f 66 70 3a 70 72 65 her than /fp:pre
0aa0: 63 69 73 65 2e 20 20 46 72 6f 6d 20 74 68 65 20 cise. From the
0ab0: 4d 53 44 4e 20 0a 20 20 2a 2a 20 64 6f 63 75 6d MSDN . ** docum
0ac0: 65 6e 74 61 74 69 6f 6e 3a 0a 20 20 2a 2a 0a 20 entation:. **.
0ad0: 20 2a 2a 20 20 20 20 20 20 54 68 65 20 63 6f 6d ** The com
0ae0: 70 69 6c 65 72 20 5b 77 69 74 68 20 2f 66 70 3a piler [with /fp:
0af0: 70 72 65 63 69 73 65 5d 20 77 69 6c 6c 20 70 72 precise] will pr
0b00: 6f 70 65 72 6c 79 20 68 61 6e 64 6c 65 20 63 6f operly handle co
0b10: 6d 70 61 72 69 73 6f 6e 73 20 0a 20 20 2a 2a 20 mparisons . **
0b20: 20 20 20 20 20 69 6e 76 6f 6c 76 69 6e 67 20 4e involving N
0b30: 61 4e 2e 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c aN. For example,
0b40: 20 78 20 21 3d 20 78 20 65 76 61 6c 75 61 74 65 x != x evaluate
0b50: 73 20 74 6f 20 74 72 75 65 20 69 66 20 78 20 69 s to true if x i
0b60: 73 20 4e 61 4e 20 0a 20 20 2a 2a 20 20 20 20 20 s NaN . **
0b70: 20 2e 2e 2e 0a 20 20 2a 2f 0a 23 69 66 64 65 66 .... */.#ifdef
0b80: 20 5f 5f 46 41 53 54 5f 4d 41 54 48 5f 5f 0a 23 __FAST_MATH__.#
0b90: 20 65 72 72 6f 72 20 53 51 4c 69 74 65 20 77 69 error SQLite wi
0ba0: 6c 6c 20 6e 6f 74 20 77 6f 72 6b 20 63 6f 72 72 ll not work corr
0bb0: 65 63 74 6c 79 20 77 69 74 68 20 74 68 65 20 2d ectly with the -
0bc0: 66 66 61 73 74 2d 6d 61 74 68 20 6f 70 74 69 6f ffast-math optio
0bd0: 6e 20 6f 66 20 47 43 43 2e 0a 23 65 6e 64 69 66 n of GCC..#endif
0be0: 0a 20 20 76 6f 6c 61 74 69 6c 65 20 64 6f 75 62 . volatile doub
0bf0: 6c 65 20 79 20 3d 20 78 3b 0a 20 20 76 6f 6c 61 le y = x;. vola
0c00: 74 69 6c 65 20 64 6f 75 62 6c 65 20 7a 20 3d 20 tile double z =
0c10: 79 3b 0a 20 20 72 65 74 75 72 6e 20 79 21 3d 7a y;. return y!=z
0c20: 3b 0a 23 65 6c 73 65 20 20 2f 2a 20 69 66 20 64 ;.#else /* if d
0c30: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 48 41 efined(SQLITE_HA
0c40: 56 45 5f 49 53 4e 41 4e 29 20 2a 2f 0a 20 20 72 VE_ISNAN) */. r
0c50: 65 74 75 72 6e 20 69 73 6e 61 6e 28 78 29 3b 0a eturn isnan(x);.
0c60: 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 #endif /* SQLITE
0c70: 5f 48 41 56 45 5f 49 53 4e 41 4e 20 2a 2f 0a 7d _HAVE_ISNAN */.}
0c80: 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 75 74 65 20 ../*.** Compute
0c90: 61 20 73 74 72 69 6e 67 20 6c 65 6e 67 74 68 20 a string length
0ca0: 74 68 61 74 20 69 73 20 6c 69 6d 69 74 65 64 20 that is limited
0cb0: 74 6f 20 77 68 61 74 20 63 61 6e 20 62 65 20 73 to what can be s
0cc0: 74 6f 72 65 64 20 69 6e 0a 2a 2a 20 6c 6f 77 65 tored in.** lowe
0cd0: 72 20 33 30 20 62 69 74 73 20 6f 66 20 61 20 33 r 30 bits of a 3
0ce0: 32 2d 62 69 74 20 73 69 67 6e 65 64 20 69 6e 74 2-bit signed int
0cf0: 65 67 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c eger..*/.int sql
0d00: 69 74 65 33 53 74 72 6c 65 6e 33 30 28 63 6f 6e ite3Strlen30(con
0d10: 73 74 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 63 st char *z){. c
0d20: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 20 3d 20 onst char *z2 =
0d30: 7a 3b 0a 20 20 77 68 69 6c 65 28 20 2a 7a 32 20 z;. while( *z2
0d40: 29 7b 20 7a 32 2b 2b 3b 20 7d 0a 20 20 72 65 74 ){ z2++; }. ret
0d50: 75 72 6e 20 30 78 33 66 66 66 66 66 66 66 20 26 urn 0x3fffffff &
0d60: 20 28 69 6e 74 29 28 7a 32 20 2d 20 7a 29 3b 0a (int)(z2 - z);.
0d70: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 }../*.** Return
0d80: 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 61 20 the length of a
0d90: 73 74 72 69 6e 67 2c 20 65 78 63 65 70 74 20 64 string, except d
0da0: 6f 20 6e 6f 74 20 61 6c 6c 6f 77 20 74 68 65 20 o not allow the
0db0: 73 74 72 69 6e 67 20 6c 65 6e 67 74 68 0a 2a 2a string length.**
0dc0: 20 74 6f 20 65 78 63 65 65 64 20 74 68 65 20 53 to exceed the S
0dd0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 QLITE_LIMIT_LENG
0de0: 54 48 20 73 65 74 74 69 6e 67 2e 0a 2a 2f 0a 69 TH setting..*/.i
0df0: 6e 74 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e nt sqlite3Strlen
0e00: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f (sqlite3 *db, co
0e10: 6e 73 74 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 nst char *z){.
0e20: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 20 3d const char *z2 =
0e30: 20 7a 3b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a 20 z;. int len;.
0e40: 20 69 6e 74 20 78 3b 0a 20 20 77 68 69 6c 65 28 int x;. while(
0e50: 20 2a 7a 32 20 29 7b 20 7a 32 2b 2b 3b 20 7d 0a *z2 ){ z2++; }.
0e60: 20 20 78 20 3d 20 28 69 6e 74 29 28 7a 32 20 2d x = (int)(z2 -
0e70: 20 7a 29 3b 0a 20 20 6c 65 6e 20 3d 20 30 78 37 z);. len = 0x7
0e80: 66 66 66 66 66 66 66 20 26 20 78 3b 0a 20 20 69 fffffff & x;. i
0e90: 66 28 20 6c 65 6e 21 3d 78 20 7c 7c 20 6c 65 6e f( len!=x || len
0ea0: 20 3e 20 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 > db->aLimit[SQ
0eb0: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 LITE_LIMIT_LENGT
0ec0: 48 5d 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e H] ){. return
0ed0: 20 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 db->aLimit[SQLI
0ee0: 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d TE_LIMIT_LENGTH]
0ef0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 ;. }else{. r
0f00: 65 74 75 72 6e 20 6c 65 6e 3b 0a 20 20 7d 0a 7d eturn len;. }.}
0f10: 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 ../*.** Set the
0f20: 6d 6f 73 74 20 72 65 63 65 6e 74 20 65 72 72 6f most recent erro
0f30: 72 20 63 6f 64 65 20 61 6e 64 20 65 72 72 6f 72 r code and error
0f40: 20 73 74 72 69 6e 67 20 66 6f 72 20 74 68 65 20 string for the
0f50: 73 71 6c 69 74 65 0a 2a 2a 20 68 61 6e 64 6c 65 sqlite.** handle
0f60: 20 22 64 62 22 2e 20 54 68 65 20 65 72 72 6f 72 "db". The error
0f70: 20 63 6f 64 65 20 69 73 20 73 65 74 20 74 6f 20 code is set to
0f80: 22 65 72 72 5f 63 6f 64 65 22 2e 0a 2a 2a 0a 2a "err_code"..**.*
0f90: 2a 20 49 66 20 69 74 20 69 73 20 6e 6f 74 20 4e * If it is not N
0fa0: 55 4c 4c 2c 20 73 74 72 69 6e 67 20 7a 46 6f 72 ULL, string zFor
0fb0: 6d 61 74 20 73 70 65 63 69 66 69 65 73 20 74 68 mat specifies th
0fc0: 65 20 66 6f 72 6d 61 74 20 6f 66 20 74 68 65 0a e format of the.
0fd0: 2a 2a 20 65 72 72 6f 72 20 73 74 72 69 6e 67 20 ** error string
0fe0: 69 6e 20 74 68 65 20 73 74 79 6c 65 20 6f 66 20 in the style of
0ff0: 74 68 65 20 70 72 69 6e 74 66 20 66 75 6e 63 74 the printf funct
1000: 69 6f 6e 73 3a 20 54 68 65 20 66 6f 6c 6c 6f 77 ions: The follow
1010: 69 6e 67 0a 2a 2a 20 66 6f 72 6d 61 74 20 63 68 ing.** format ch
1020: 61 72 61 63 74 65 72 73 20 61 72 65 20 61 6c 6c aracters are all
1030: 6f 77 65 64 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 owed:.**.**
1040: 20 25 73 20 20 20 20 20 20 49 6e 73 65 72 74 20 %s Insert
1050: 61 20 73 74 72 69 6e 67 0a 2a 2a 20 20 20 20 20 a string.**
1060: 20 25 7a 20 20 20 20 20 20 41 20 73 74 72 69 6e %z A strin
1070: 67 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 g that should be
1080: 20 66 72 65 65 64 20 61 66 74 65 72 20 75 73 65 freed after use
1090: 0a 2a 2a 20 20 20 20 20 20 25 64 20 20 20 20 20 .** %d
10a0: 20 49 6e 73 65 72 74 20 61 6e 20 69 6e 74 65 67 Insert an integ
10b0: 65 72 0a 2a 2a 20 20 20 20 20 20 25 54 20 20 20 er.** %T
10c0: 20 20 20 49 6e 73 65 72 74 20 61 20 74 6f 6b 65 Insert a toke
10d0: 6e 0a 2a 2a 20 20 20 20 20 20 25 53 20 20 20 20 n.** %S
10e0: 20 20 49 6e 73 65 72 74 20 74 68 65 20 66 69 72 Insert the fir
10f0: 73 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 61 20 st element of a
1100: 53 72 63 4c 69 73 74 0a 2a 2a 0a 2a 2a 20 7a 46 SrcList.**.** zF
1110: 6f 72 6d 61 74 20 61 6e 64 20 61 6e 79 20 73 74 ormat and any st
1120: 72 69 6e 67 20 74 6f 6b 65 6e 73 20 74 68 61 74 ring tokens that
1130: 20 66 6f 6c 6c 6f 77 20 69 74 20 61 72 65 20 61 follow it are a
1140: 73 73 75 6d 65 64 20 74 6f 20 62 65 0a 2a 2a 20 ssumed to be.**
1150: 65 6e 63 6f 64 65 64 20 69 6e 20 55 54 46 2d 38 encoded in UTF-8
1160: 2e 0a 2a 2a 0a 2a 2a 20 54 6f 20 63 6c 65 61 72 ..**.** To clear
1170: 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 the most recent
1180: 20 65 72 72 6f 72 20 66 6f 72 20 73 71 6c 69 74 error for sqlit
1190: 65 20 68 61 6e 64 6c 65 20 22 64 62 22 2c 20 73 e handle "db", s
11a0: 71 6c 69 74 65 33 45 72 72 6f 72 0a 2a 2a 20 73 qlite3Error.** s
11b0: 68 6f 75 6c 64 20 62 65 20 63 61 6c 6c 65 64 20 hould be called
11c0: 77 69 74 68 20 65 72 72 5f 63 6f 64 65 20 73 65 with err_code se
11d0: 74 20 74 6f 20 53 51 4c 49 54 45 5f 4f 4b 20 61 t to SQLITE_OK a
11e0: 6e 64 20 7a 46 6f 72 6d 61 74 20 73 65 74 0a 2a nd zFormat set.*
11f0: 2a 20 74 6f 20 4e 55 4c 4c 2e 0a 2a 2f 0a 76 6f * to NULL..*/.vo
1200: 69 64 20 73 71 6c 69 74 65 33 45 72 72 6f 72 28 id sqlite3Error(
1210: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e 74 sqlite3 *db, int
1220: 20 65 72 72 5f 63 6f 64 65 2c 20 63 6f 6e 73 74 err_code, const
1230: 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 char *zFormat,
1240: 2e 2e 2e 29 7b 0a 20 20 69 66 28 20 64 62 20 26 ...){. if( db &
1250: 26 20 28 64 62 2d 3e 70 45 72 72 20 7c 7c 20 28 & (db->pErr || (
1260: 64 62 2d 3e 70 45 72 72 20 3d 20 73 71 6c 69 74 db->pErr = sqlit
1270: 65 33 56 61 6c 75 65 4e 65 77 28 64 62 29 29 21 e3ValueNew(db))!
1280: 3d 30 29 20 29 7b 0a 20 20 20 20 64 62 2d 3e 65 =0) ){. db->e
1290: 72 72 43 6f 64 65 20 3d 20 65 72 72 5f 63 6f 64 rrCode = err_cod
12a0: 65 3b 0a 20 20 20 20 69 66 28 20 7a 46 6f 72 6d e;. if( zForm
12b0: 61 74 20 29 7b 0a 20 20 20 20 20 20 63 68 61 72 at ){. char
12c0: 20 2a 7a 3b 0a 20 20 20 20 20 20 76 61 5f 6c 69 *z;. va_li
12d0: 73 74 20 61 70 3b 0a 20 20 20 20 20 20 76 61 5f st ap;. va_
12e0: 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d 61 start(ap, zForma
12f0: 74 29 3b 0a 20 20 20 20 20 20 7a 20 3d 20 73 71 t);. z = sq
1300: 6c 69 74 65 33 56 4d 50 72 69 6e 74 66 28 64 62 lite3VMPrintf(db
1310: 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a , zFormat, ap);.
1320: 20 20 20 20 20 20 76 61 5f 65 6e 64 28 61 70 29 va_end(ap)
1330: 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 56 ;. sqlite3V
1340: 61 6c 75 65 53 65 74 53 74 72 28 64 62 2d 3e 70 alueSetStr(db->p
1350: 45 72 72 2c 20 2d 31 2c 20 7a 2c 20 53 51 4c 49 Err, -1, z, SQLI
1360: 54 45 5f 55 54 46 38 2c 20 53 51 4c 49 54 45 5f TE_UTF8, SQLITE_
1370: 44 59 4e 41 4d 49 43 29 3b 0a 20 20 20 20 7d 65 DYNAMIC);. }e
1380: 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 lse{. sqlit
1390: 65 33 56 61 6c 75 65 53 65 74 53 74 72 28 64 62 e3ValueSetStr(db
13a0: 2d 3e 70 45 72 72 2c 20 30 2c 20 30 2c 20 53 51 ->pErr, 0, 0, SQ
13b0: 4c 49 54 45 5f 55 54 46 38 2c 20 53 51 4c 49 54 LITE_UTF8, SQLIT
13c0: 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 20 20 7d E_STATIC);. }
13d0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 64 . }.}../*.** Ad
13e0: 64 20 61 6e 20 65 72 72 6f 72 20 6d 65 73 73 61 d an error messa
13f0: 67 65 20 74 6f 20 70 50 61 72 73 65 2d 3e 7a 45 ge to pParse->zE
1400: 72 72 4d 73 67 20 61 6e 64 20 69 6e 63 72 65 6d rrMsg and increm
1410: 65 6e 74 20 70 50 61 72 73 65 2d 3e 6e 45 72 72 ent pParse->nErr
1420: 2e 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 ..** The followi
1430: 6e 67 20 66 6f 72 6d 61 74 74 69 6e 67 20 63 68 ng formatting ch
1440: 61 72 61 63 74 65 72 73 20 61 72 65 20 61 6c 6c aracters are all
1450: 6f 77 65 64 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 owed:.**.**
1460: 20 25 73 20 20 20 20 20 20 49 6e 73 65 72 74 20 %s Insert
1470: 61 20 73 74 72 69 6e 67 0a 2a 2a 20 20 20 20 20 a string.**
1480: 20 25 7a 20 20 20 20 20 20 41 20 73 74 72 69 6e %z A strin
1490: 67 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 g that should be
14a0: 20 66 72 65 65 64 20 61 66 74 65 72 20 75 73 65 freed after use
14b0: 0a 2a 2a 20 20 20 20 20 20 25 64 20 20 20 20 20 .** %d
14c0: 20 49 6e 73 65 72 74 20 61 6e 20 69 6e 74 65 67 Insert an integ
14d0: 65 72 0a 2a 2a 20 20 20 20 20 20 25 54 20 20 20 er.** %T
14e0: 20 20 20 49 6e 73 65 72 74 20 61 20 74 6f 6b 65 Insert a toke
14f0: 6e 0a 2a 2a 20 20 20 20 20 20 25 53 20 20 20 20 n.** %S
1500: 20 20 49 6e 73 65 72 74 20 74 68 65 20 66 69 72 Insert the fir
1510: 73 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 61 20 st element of a
1520: 53 72 63 4c 69 73 74 0a 2a 2a 0a 2a 2a 20 54 68 SrcList.**.** Th
1530: 69 73 20 66 75 6e 63 74 69 6f 6e 20 73 68 6f 75 is function shou
1540: 6c 64 20 62 65 20 75 73 65 64 20 74 6f 20 72 65 ld be used to re
1550: 70 6f 72 74 20 61 6e 79 20 65 72 72 6f 72 20 74 port any error t
1560: 68 61 74 20 6f 63 63 75 72 73 20 77 68 69 6c 73 hat occurs whils
1570: 74 0a 2a 2a 20 63 6f 6d 70 69 6c 69 6e 67 20 61 t.** compiling a
1580: 6e 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 20 n SQL statement
1590: 28 69 2e 65 2e 20 77 69 74 68 69 6e 20 73 71 6c (i.e. within sql
15a0: 69 74 65 33 5f 70 72 65 70 61 72 65 28 29 29 2e ite3_prepare()).
15b0: 20 54 68 65 0a 2a 2a 20 6c 61 73 74 20 74 68 69 The.** last thi
15c0: 6e 67 20 74 68 65 20 73 71 6c 69 74 65 33 5f 70 ng the sqlite3_p
15d0: 72 65 70 61 72 65 28 29 20 66 75 6e 63 74 69 6f repare() functio
15e0: 6e 20 64 6f 65 73 20 69 73 20 63 6f 70 79 20 74 n does is copy t
15f0: 68 65 20 65 72 72 6f 72 0a 2a 2a 20 73 74 6f 72 he error.** stor
1600: 65 64 20 62 79 20 74 68 69 73 20 66 75 6e 63 74 ed by this funct
1610: 69 6f 6e 20 69 6e 74 6f 20 74 68 65 20 64 61 74 ion into the dat
1620: 61 62 61 73 65 20 68 61 6e 64 6c 65 20 75 73 69 abase handle usi
1630: 6e 67 20 73 71 6c 69 74 65 33 45 72 72 6f 72 28 ng sqlite3Error(
1640: 29 2e 0a 2a 2a 20 46 75 6e 63 74 69 6f 6e 20 73 )..** Function s
1650: 71 6c 69 74 65 33 45 72 72 6f 72 28 29 20 73 68 qlite3Error() sh
1660: 6f 75 6c 64 20 62 65 20 75 73 65 64 20 64 75 72 ould be used dur
1670: 69 6e 67 20 73 74 61 74 65 6d 65 6e 74 20 65 78 ing statement ex
1680: 65 63 75 74 69 6f 6e 0a 2a 2a 20 28 73 71 6c 69 ecution.** (sqli
1690: 74 65 33 5f 73 74 65 70 28 29 20 65 74 63 2e 29 te3_step() etc.)
16a0: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 ..*/.void sqlite
16b0: 33 45 72 72 6f 72 4d 73 67 28 50 61 72 73 65 20 3ErrorMsg(Parse
16c0: 2a 70 50 61 72 73 65 2c 20 63 6f 6e 73 74 20 63 *pParse, const c
16d0: 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e har *zFormat, ..
16e0: 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 .){. va_list ap
16f0: 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 ;. sqlite3 *db
1700: 3d 20 70 50 61 72 73 65 2d 3e 64 62 3b 0a 20 20 = pParse->db;.
1710: 70 50 61 72 73 65 2d 3e 6e 45 72 72 2b 2b 3b 0a pParse->nErr++;.
1720: 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 28 sqlite3DbFree(
1730: 64 62 2c 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 db, pParse->zErr
1740: 4d 73 67 29 3b 0a 20 20 76 61 5f 73 74 61 72 74 Msg);. va_start
1750: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 (ap, zFormat);.
1760: 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 pParse->zErrMsg
1770: 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 69 6e = sqlite3VMPrin
1780: 74 66 28 64 62 2c 20 7a 46 6f 72 6d 61 74 2c 20 tf(db, zFormat,
1790: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 ap);. va_end(ap
17a0: 29 3b 0a 20 20 69 66 28 20 70 50 61 72 73 65 2d );. if( pParse-
17b0: 3e 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 >rc==SQLITE_OK )
17c0: 7b 0a 20 20 20 20 70 50 61 72 73 65 2d 3e 72 63 {. pParse->rc
17d0: 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b = SQLITE_ERROR;
17e0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c . }.}../*.** Cl
17f0: 65 61 72 20 74 68 65 20 65 72 72 6f 72 20 6d 65 ear the error me
1800: 73 73 61 67 65 20 69 6e 20 70 50 61 72 73 65 2c ssage in pParse,
1810: 20 69 66 20 61 6e 79 0a 2a 2f 0a 76 6f 69 64 20 if any.*/.void
1820: 73 71 6c 69 74 65 33 45 72 72 6f 72 43 6c 65 61 sqlite3ErrorClea
1830: 72 28 50 61 72 73 65 20 2a 70 50 61 72 73 65 29 r(Parse *pParse)
1840: 7b 0a 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 {. sqlite3DbFre
1850: 65 28 70 50 61 72 73 65 2d 3e 64 62 2c 20 70 50 e(pParse->db, pP
1860: 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 29 3b 0a arse->zErrMsg);.
1870: 20 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d 73 pParse->zErrMs
1880: 67 20 3d 20 30 3b 0a 20 20 70 50 61 72 73 65 2d g = 0;. pParse-
1890: 3e 6e 45 72 72 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a >nErr = 0;.}../*
18a0: 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 61 6e 20 53 .** Convert an S
18b0: 51 4c 2d 73 74 79 6c 65 20 71 75 6f 74 65 64 20 QL-style quoted
18c0: 73 74 72 69 6e 67 20 69 6e 74 6f 20 61 20 6e 6f string into a no
18d0: 72 6d 61 6c 20 73 74 72 69 6e 67 20 62 79 20 72 rmal string by r
18e0: 65 6d 6f 76 69 6e 67 0a 2a 2a 20 74 68 65 20 71 emoving.** the q
18f0: 75 6f 74 65 20 63 68 61 72 61 63 74 65 72 73 2e uote characters.
1900: 20 20 54 68 65 20 63 6f 6e 76 65 72 73 69 6f 6e The conversion
1910: 20 69 73 20 64 6f 6e 65 20 69 6e 2d 70 6c 61 63 is done in-plac
1920: 65 2e 20 20 49 66 20 74 68 65 0a 2a 2a 20 69 6e e. If the.** in
1930: 70 75 74 20 64 6f 65 73 20 6e 6f 74 20 62 65 67 put does not beg
1940: 69 6e 20 77 69 74 68 20 61 20 71 75 6f 74 65 20 in with a quote
1950: 63 68 61 72 61 63 74 65 72 2c 20 74 68 65 6e 20 character, then
1960: 74 68 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 this routine.**
1970: 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a 2a 2a 0a 2a is a no-op..**.*
1980: 2a 20 54 68 65 20 69 6e 70 75 74 20 73 74 72 69 * The input stri
1990: 6e 67 20 6d 75 73 74 20 62 65 20 7a 65 72 6f 2d ng must be zero-
19a0: 74 65 72 6d 69 6e 61 74 65 64 2e 20 20 41 20 6e terminated. A n
19b0: 65 77 20 7a 65 72 6f 2d 74 65 72 6d 69 6e 61 74 ew zero-terminat
19c0: 6f 72 0a 2a 2a 20 69 73 20 61 64 64 65 64 20 74 or.** is added t
19d0: 6f 20 74 68 65 20 64 65 71 75 6f 74 65 64 20 73 o the dequoted s
19e0: 74 72 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 tring..**.** The
19f0: 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 return value is
1a00: 20 2d 31 20 69 66 20 6e 6f 20 64 65 71 75 6f 74 -1 if no dequot
1a10: 69 6e 67 20 6f 63 63 75 72 73 20 6f 72 20 74 68 ing occurs or th
1a20: 65 20 6c 65 6e 67 74 68 20 6f 66 20 74 68 65 0a e length of the.
1a30: 2a 2a 20 64 65 71 75 6f 74 65 64 20 73 74 72 69 ** dequoted stri
1a40: 6e 67 2c 20 65 78 63 6c 75 73 69 76 65 20 6f 66 ng, exclusive of
1a50: 20 74 68 65 20 7a 65 72 6f 20 74 65 72 6d 69 6e the zero termin
1a60: 61 74 6f 72 2c 20 69 66 20 64 65 71 75 6f 74 69 ator, if dequoti
1a70: 6e 67 20 64 6f 65 73 0a 2a 2a 20 6f 63 63 75 72 ng does.** occur
1a80: 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 32 2d 46 65 62 ..**.** 2002-Feb
1a90: 2d 31 34 3a 20 54 68 69 73 20 72 6f 75 74 69 6e -14: This routin
1aa0: 65 20 69 73 20 65 78 74 65 6e 64 65 64 20 74 6f e is extended to
1ab0: 20 72 65 6d 6f 76 65 20 4d 53 2d 41 63 63 65 73 remove MS-Acces
1ac0: 73 20 73 74 79 6c 65 0a 2a 2a 20 62 72 61 63 6b s style.** brack
1ad0: 65 74 73 20 66 72 6f 6d 20 61 72 6f 75 6e 64 20 ets from around
1ae0: 69 64 65 6e 74 69 66 65 72 73 2e 20 20 46 6f 72 identifers. For
1af0: 20 65 78 61 6d 70 6c 65 3a 20 20 22 5b 61 2d 62 example: "[a-b
1b00: 2d 63 5d 22 20 62 65 63 6f 6d 65 73 0a 2a 2a 20 -c]" becomes.**
1b10: 22 61 2d 62 2d 63 22 2e 0a 2a 2f 0a 69 6e 74 20 "a-b-c"..*/.int
1b20: 73 71 6c 69 74 65 33 44 65 71 75 6f 74 65 28 63 sqlite3Dequote(c
1b30: 68 61 72 20 2a 7a 29 7b 0a 20 20 63 68 61 72 20 har *z){. char
1b40: 71 75 6f 74 65 3b 0a 20 20 69 6e 74 20 69 2c 20 quote;. int i,
1b50: 6a 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 j;. if( z==0 )
1b60: 72 65 74 75 72 6e 20 2d 31 3b 0a 20 20 71 75 6f return -1;. quo
1b70: 74 65 20 3d 20 7a 5b 30 5d 3b 0a 20 20 73 77 69 te = z[0];. swi
1b80: 74 63 68 28 20 71 75 6f 74 65 20 29 7b 0a 20 20 tch( quote ){.
1b90: 20 20 63 61 73 65 20 27 5c 27 27 3a 20 20 62 72 case '\'': br
1ba0: 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20 27 22 eak;. case '"
1bb0: 27 3a 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 ': break;.
1bc0: 63 61 73 65 20 27 60 27 3a 20 20 20 62 72 65 61 case '`': brea
1bd0: 6b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 k;
1be0: 20 20 2f 2a 20 46 6f 72 20 4d 79 53 51 4c 20 63 /* For MySQL c
1bf0: 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 2a 2f 0a ompatibility */.
1c00: 20 20 20 20 63 61 73 65 20 27 5b 27 3a 20 20 20 case '[':
1c10: 71 75 6f 74 65 20 3d 20 27 5d 27 3b 20 20 62 72 quote = ']'; br
1c20: 65 61 6b 3b 20 20 2f 2a 20 46 6f 72 20 4d 53 20 eak; /* For MS
1c30: 53 71 6c 53 65 72 76 65 72 20 63 6f 6d 70 61 74 SqlServer compat
1c40: 69 62 69 6c 69 74 79 20 2a 2f 0a 20 20 20 20 64 ibility */. d
1c50: 65 66 61 75 6c 74 3a 20 20 20 20 72 65 74 75 72 efault: retur
1c60: 6e 20 2d 31 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 n -1;. }. for(
1c70: 69 3d 31 2c 20 6a 3d 30 3b 20 7a 5b 69 5d 3b 20 i=1, j=0; z[i];
1c80: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 5b i++){. if( z[
1c90: 69 5d 3d 3d 71 75 6f 74 65 20 29 7b 0a 20 20 20 i]==quote ){.
1ca0: 20 20 20 69 66 28 20 7a 5b 69 2b 31 5d 3d 3d 71 if( z[i+1]==q
1cb0: 75 6f 74 65 20 29 7b 0a 20 20 20 20 20 20 20 20 uote ){.
1cc0: 7a 5b 6a 2b 2b 5d 20 3d 20 71 75 6f 74 65 3b 0a z[j++] = quote;.
1cd0: 20 20 20 20 20 20 20 20 69 2b 2b 3b 0a 20 20 20 i++;.
1ce0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
1cf0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d break;. }
1d00: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 . }else{.
1d10: 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a 5b 69 5d 3b z[j++] = z[i];
1d20: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 7a 5b 6a . }. }. z[j
1d30: 5d 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 ] = 0;. return
1d40: 6a 3b 0a 7d 0a 0a 2f 2a 20 43 6f 6e 76 65 6e 69 j;.}../* Conveni
1d50: 65 6e 74 20 73 68 6f 72 74 2d 68 61 6e 64 20 2a ent short-hand *
1d60: 2f 0a 23 64 65 66 69 6e 65 20 55 70 70 65 72 54 /.#define UpperT
1d70: 6f 4c 6f 77 65 72 20 73 71 6c 69 74 65 33 55 70 oLower sqlite3Up
1d80: 70 65 72 54 6f 4c 6f 77 65 72 0a 0a 2f 2a 0a 2a perToLower../*.*
1d90: 2a 20 53 6f 6d 65 20 73 79 73 74 65 6d 73 20 68 * Some systems h
1da0: 61 76 65 20 73 74 72 69 63 6d 70 28 29 2e 20 20 ave stricmp().
1db0: 4f 74 68 65 72 73 20 68 61 76 65 20 73 74 72 63 Others have strc
1dc0: 61 73 65 63 6d 70 28 29 2e 20 20 42 65 63 61 75 asecmp(). Becau
1dd0: 73 65 0a 2a 2a 20 74 68 65 72 65 20 69 73 20 6e se.** there is n
1de0: 6f 20 63 6f 6e 73 69 73 74 65 6e 63 79 2c 20 77 o consistency, w
1df0: 65 20 77 69 6c 6c 20 64 65 66 69 6e 65 20 6f 75 e will define ou
1e00: 72 20 6f 77 6e 2e 0a 2a 2f 0a 69 6e 74 20 73 71 r own..*/.int sq
1e10: 6c 69 74 65 33 53 74 72 49 43 6d 70 28 63 6f 6e lite3StrICmp(con
1e20: 73 74 20 63 68 61 72 20 2a 7a 4c 65 66 74 2c 20 st char *zLeft,
1e30: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 69 67 const char *zRig
1e40: 68 74 29 7b 0a 20 20 72 65 67 69 73 74 65 72 20 ht){. register
1e50: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 61 unsigned char *a
1e60: 2c 20 2a 62 3b 0a 20 20 61 20 3d 20 28 75 6e 73 , *b;. a = (uns
1e70: 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a 4c 65 igned char *)zLe
1e80: 66 74 3b 0a 20 20 62 20 3d 20 28 75 6e 73 69 67 ft;. b = (unsig
1e90: 6e 65 64 20 63 68 61 72 20 2a 29 7a 52 69 67 68 ned char *)zRigh
1ea0: 74 3b 0a 20 20 77 68 69 6c 65 28 20 2a 61 21 3d t;. while( *a!=
1eb0: 30 20 26 26 20 55 70 70 65 72 54 6f 4c 6f 77 65 0 && UpperToLowe
1ec0: 72 5b 2a 61 5d 3d 3d 55 70 70 65 72 54 6f 4c 6f r[*a]==UpperToLo
1ed0: 77 65 72 5b 2a 62 5d 29 7b 20 61 2b 2b 3b 20 62 wer[*b]){ a++; b
1ee0: 2b 2b 3b 20 7d 0a 20 20 72 65 74 75 72 6e 20 55 ++; }. return U
1ef0: 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 61 5d 20 pperToLower[*a]
1f00: 2d 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a - UpperToLower[*
1f10: 62 5d 3b 0a 7d 0a 69 6e 74 20 73 71 6c 69 74 65 b];.}.int sqlite
1f20: 33 53 74 72 4e 49 43 6d 70 28 63 6f 6e 73 74 20 3StrNICmp(const
1f30: 63 68 61 72 20 2a 7a 4c 65 66 74 2c 20 63 6f 6e char *zLeft, con
1f40: 73 74 20 63 68 61 72 20 2a 7a 52 69 67 68 74 2c st char *zRight,
1f50: 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65 67 69 73 int N){. regis
1f60: 74 65 72 20 75 6e 73 69 67 6e 65 64 20 63 68 61 ter unsigned cha
1f70: 72 20 2a 61 2c 20 2a 62 3b 0a 20 20 61 20 3d 20 r *a, *b;. a =
1f80: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a (unsigned char *
1f90: 29 7a 4c 65 66 74 3b 0a 20 20 62 20 3d 20 28 75 )zLeft;. b = (u
1fa0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a nsigned char *)z
1fb0: 52 69 67 68 74 3b 0a 20 20 77 68 69 6c 65 28 20 Right;. while(
1fc0: 4e 2d 2d 20 3e 20 30 20 26 26 20 2a 61 21 3d 30 N-- > 0 && *a!=0
1fd0: 20 26 26 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 && UpperToLower
1fe0: 5b 2a 61 5d 3d 3d 55 70 70 65 72 54 6f 4c 6f 77 [*a]==UpperToLow
1ff0: 65 72 5b 2a 62 5d 29 7b 20 61 2b 2b 3b 20 62 2b er[*b]){ a++; b+
2000: 2b 3b 20 7d 0a 20 20 72 65 74 75 72 6e 20 4e 3c +; }. return N<
2010: 30 20 3f 20 30 20 3a 20 55 70 70 65 72 54 6f 4c 0 ? 0 : UpperToL
2020: 6f 77 65 72 5b 2a 61 5d 20 2d 20 55 70 70 65 72 ower[*a] - Upper
2030: 54 6f 4c 6f 77 65 72 5b 2a 62 5d 3b 0a 7d 0a 0a ToLower[*b];.}..
2040: 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55 /*.** Return TRU
2050: 45 20 69 66 20 7a 20 69 73 20 61 20 70 75 72 65 E if z is a pure
2060: 20 6e 75 6d 65 72 69 63 20 73 74 72 69 6e 67 2e numeric string.
2070: 20 20 52 65 74 75 72 6e 20 46 41 4c 53 45 20 69 Return FALSE i
2080: 66 20 74 68 65 0a 2a 2a 20 73 74 72 69 6e 67 20 f the.** string
2090: 63 6f 6e 74 61 69 6e 73 20 61 6e 79 20 63 68 61 contains any cha
20a0: 72 61 63 74 65 72 20 77 68 69 63 68 20 69 73 20 racter which is
20b0: 6e 6f 74 20 70 61 72 74 20 6f 66 20 61 20 6e 75 not part of a nu
20c0: 6d 62 65 72 2e 20 49 66 0a 2a 2a 20 74 68 65 20 mber. If.** the
20d0: 73 74 72 69 6e 67 20 69 73 20 6e 75 6d 65 72 69 string is numeri
20e0: 63 20 61 6e 64 20 63 6f 6e 74 61 69 6e 73 20 74 c and contains t
20f0: 68 65 20 27 2e 27 20 63 68 61 72 61 63 74 65 72 he '.' character
2100: 2c 20 73 65 74 20 2a 72 65 61 6c 6e 75 6d 0a 2a , set *realnum.*
2110: 2a 20 74 6f 20 54 52 55 45 20 28 6f 74 68 65 72 * to TRUE (other
2120: 77 69 73 65 20 46 41 4c 53 45 29 2e 0a 2a 2a 0a wise FALSE)..**.
2130: 2a 2a 20 41 6e 20 65 6d 70 74 79 20 73 74 72 69 ** An empty stri
2140: 6e 67 20 69 73 20 63 6f 6e 73 69 64 65 72 65 64 ng is considered
2150: 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 2e 0a 2a 2f non-numeric..*/
2160: 0a 69 6e 74 20 73 71 6c 69 74 65 33 49 73 4e 75 .int sqlite3IsNu
2170: 6d 62 65 72 28 63 6f 6e 73 74 20 63 68 61 72 20 mber(const char
2180: 2a 7a 2c 20 69 6e 74 20 2a 72 65 61 6c 6e 75 6d *z, int *realnum
2190: 2c 20 75 38 20 65 6e 63 29 7b 0a 20 20 69 6e 74 , u8 enc){. int
21a0: 20 69 6e 63 72 20 3d 20 28 65 6e 63 3d 3d 53 51 incr = (enc==SQ
21b0: 4c 49 54 45 5f 55 54 46 38 3f 31 3a 32 29 3b 0a LITE_UTF8?1:2);.
21c0: 20 20 69 66 28 20 65 6e 63 3d 3d 53 51 4c 49 54 if( enc==SQLIT
21d0: 45 5f 55 54 46 31 36 42 45 20 29 20 7a 2b 2b 3b E_UTF16BE ) z++;
21e0: 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 20 7c . if( *z=='-' |
21f0: 7c 20 2a 7a 3d 3d 27 2b 27 20 29 20 7a 20 2b 3d | *z=='+' ) z +=
2200: 20 69 6e 63 72 3b 0a 20 20 69 66 28 20 21 73 71 incr;. if( !sq
2210: 6c 69 74 65 33 49 73 64 69 67 69 74 28 2a 7a 29 lite3Isdigit(*z)
2220: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 ){. return 0
2230: 3b 0a 20 20 7d 0a 20 20 7a 20 2b 3d 20 69 6e 63 ;. }. z += inc
2240: 72 3b 0a 20 20 69 66 28 20 72 65 61 6c 6e 75 6d r;. if( realnum
2250: 20 29 20 2a 72 65 61 6c 6e 75 6d 20 3d 20 30 3b ) *realnum = 0;
2260: 0a 20 20 77 68 69 6c 65 28 20 73 71 6c 69 74 65 . while( sqlite
2270: 33 49 73 64 69 67 69 74 28 2a 7a 29 20 29 7b 20 3Isdigit(*z) ){
2280: 7a 20 2b 3d 20 69 6e 63 72 3b 20 7d 0a 20 20 69 z += incr; }. i
2290: 66 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b 0a 20 20 f( *z=='.' ){.
22a0: 20 20 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 20 z += incr;.
22b0: 20 69 66 28 20 21 73 71 6c 69 74 65 33 49 73 64 if( !sqlite3Isd
22c0: 69 67 69 74 28 2a 7a 29 20 29 20 72 65 74 75 72 igit(*z) ) retur
22d0: 6e 20 30 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 n 0;. while(
22e0: 73 71 6c 69 74 65 33 49 73 64 69 67 69 74 28 2a sqlite3Isdigit(*
22f0: 7a 29 20 29 7b 20 7a 20 2b 3d 20 69 6e 63 72 3b z) ){ z += incr;
2300: 20 7d 0a 20 20 20 20 69 66 28 20 72 65 61 6c 6e }. if( realn
2310: 75 6d 20 29 20 2a 72 65 61 6c 6e 75 6d 20 3d 20 um ) *realnum =
2320: 31 3b 0a 20 20 7d 0a 20 20 69 66 28 20 2a 7a 3d 1;. }. if( *z=
2330: 3d 27 65 27 20 7c 7c 20 2a 7a 3d 3d 27 45 27 20 ='e' || *z=='E'
2340: 29 7b 0a 20 20 20 20 7a 20 2b 3d 20 69 6e 63 72 ){. z += incr
2350: 3b 0a 20 20 20 20 69 66 28 20 2a 7a 3d 3d 27 2b ;. if( *z=='+
2360: 27 20 7c 7c 20 2a 7a 3d 3d 27 2d 27 20 29 20 7a ' || *z=='-' ) z
2370: 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 20 20 69 66 += incr;. if
2380: 28 20 21 73 71 6c 69 74 65 33 49 73 64 69 67 69 ( !sqlite3Isdigi
2390: 74 28 2a 7a 29 20 29 20 72 65 74 75 72 6e 20 30 t(*z) ) return 0
23a0: 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 73 71 6c ;. while( sql
23b0: 69 74 65 33 49 73 64 69 67 69 74 28 2a 7a 29 20 ite3Isdigit(*z)
23c0: 29 7b 20 7a 20 2b 3d 20 69 6e 63 72 3b 20 7d 0a ){ z += incr; }.
23d0: 20 20 20 20 69 66 28 20 72 65 61 6c 6e 75 6d 20 if( realnum
23e0: 29 20 2a 72 65 61 6c 6e 75 6d 20 3d 20 31 3b 0a ) *realnum = 1;.
23f0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 2a 7a 3d }. return *z=
2400: 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 =0;.}../*.** The
2410: 20 73 74 72 69 6e 67 20 7a 5b 5d 20 69 73 20 61 string z[] is a
2420: 6e 20 61 73 63 69 69 20 72 65 70 72 65 73 65 6e n ascii represen
2430: 74 61 74 69 6f 6e 20 6f 66 20 61 20 72 65 61 6c tation of a real
2440: 20 6e 75 6d 62 65 72 2e 0a 2a 2a 20 43 6f 6e 76 number..** Conv
2450: 65 72 74 20 74 68 69 73 20 73 74 72 69 6e 67 20 ert this string
2460: 74 6f 20 61 20 64 6f 75 62 6c 65 2e 0a 2a 2a 0a to a double..**.
2470: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 ** This routine
2480: 61 73 73 75 6d 65 73 20 74 68 61 74 20 7a 5b 5d assumes that z[]
2490: 20 72 65 61 6c 6c 79 20 69 73 20 61 20 76 61 6c really is a val
24a0: 69 64 20 6e 75 6d 62 65 72 2e 20 20 49 66 20 69 id number. If i
24b0: 74 0a 2a 2a 20 69 73 20 6e 6f 74 2c 20 74 68 65 t.** is not, the
24c0: 20 72 65 73 75 6c 74 20 69 73 20 75 6e 64 65 66 result is undef
24d0: 69 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 ined..**.** This
24e0: 20 72 6f 75 74 69 6e 65 20 69 73 20 75 73 65 64 routine is used
24f0: 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 instead of the
2500: 6c 69 62 72 61 72 79 20 61 74 6f 66 28 29 20 66 library atof() f
2510: 75 6e 63 74 69 6f 6e 20 62 65 63 61 75 73 65 0a unction because.
2520: 2a 2a 20 74 68 65 20 6c 69 62 72 61 72 79 20 61 ** the library a
2530: 74 6f 66 28 29 20 6d 69 67 68 74 20 77 61 6e 74 tof() might want
2540: 20 74 6f 20 75 73 65 20 22 2c 22 20 61 73 20 74 to use "," as t
2550: 68 65 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 he decimal point
2560: 20 69 6e 73 74 65 61 64 0a 2a 2a 20 6f 66 20 22 instead.** of "
2570: 2e 22 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 ." depending on
2580: 68 6f 77 20 6c 6f 63 61 6c 65 20 69 73 20 73 65 how locale is se
2590: 74 2e 20 20 42 75 74 20 74 68 61 74 20 77 6f 75 t. But that wou
25a0: 6c 64 20 63 61 75 73 65 20 70 72 6f 62 6c 65 6d ld cause problem
25b0: 73 0a 2a 2a 20 66 6f 72 20 53 51 4c 2e 20 20 53 s.** for SQL. S
25c0: 6f 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 61 o this routine a
25d0: 6c 77 61 79 73 20 75 73 65 73 20 22 2e 22 20 72 lways uses "." r
25e0: 65 67 61 72 64 6c 65 73 73 20 6f 66 20 6c 6f 63 egardless of loc
25f0: 61 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 ale..*/.int sqli
2600: 74 65 33 41 74 6f 46 28 63 6f 6e 73 74 20 63 68 te3AtoF(const ch
2610: 61 72 20 2a 7a 2c 20 64 6f 75 62 6c 65 20 2a 70 ar *z, double *p
2620: 52 65 73 75 6c 74 29 7b 0a 23 69 66 6e 64 65 66 Result){.#ifndef
2630: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f SQLITE_OMIT_FLO
2640: 41 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 69 6e ATING_POINT. in
2650: 74 20 73 69 67 6e 20 3d 20 31 3b 0a 20 20 63 6f t sign = 1;. co
2660: 6e 73 74 20 63 68 61 72 20 2a 7a 42 65 67 69 6e nst char *zBegin
2670: 20 3d 20 7a 3b 0a 20 20 4c 4f 4e 47 44 4f 55 42 = z;. LONGDOUB
2680: 4c 45 5f 54 59 50 45 20 76 31 20 3d 20 30 2e 30 LE_TYPE v1 = 0.0
2690: 3b 0a 20 20 69 6e 74 20 6e 53 69 67 6e 69 66 69 ;. int nSignifi
26a0: 63 61 6e 74 20 3d 20 30 3b 0a 20 20 77 68 69 6c cant = 0;. whil
26b0: 65 28 20 73 71 6c 69 74 65 33 49 73 73 70 61 63 e( sqlite3Isspac
26c0: 65 28 2a 7a 29 20 29 20 7a 2b 2b 3b 0a 20 20 69 e(*z) ) z++;. i
26d0: 66 28 20 2a 7a 3d 3d 27 2d 27 20 29 7b 0a 20 20 f( *z=='-' ){.
26e0: 20 20 73 69 67 6e 20 3d 20 2d 31 3b 0a 20 20 20 sign = -1;.
26f0: 20 7a 2b 2b 3b 0a 20 20 7d 65 6c 73 65 20 69 66 z++;. }else if
2700: 28 20 2a 7a 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 ( *z=='+' ){.
2710: 20 7a 2b 2b 3b 0a 20 20 7d 0a 20 20 77 68 69 6c z++;. }. whil
2720: 65 28 20 7a 5b 30 5d 3d 3d 27 30 27 20 29 7b 0a e( z[0]=='0' ){.
2730: 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d 0a 20 20 77 z++;. }. w
2740: 68 69 6c 65 28 20 73 71 6c 69 74 65 33 49 73 64 hile( sqlite3Isd
2750: 69 67 69 74 28 2a 7a 29 20 29 7b 0a 20 20 20 20 igit(*z) ){.
2760: 76 31 20 3d 20 76 31 2a 31 30 2e 30 20 2b 20 28 v1 = v1*10.0 + (
2770: 2a 7a 20 2d 20 27 30 27 29 3b 0a 20 20 20 20 7a *z - '0');. z
2780: 2b 2b 3b 0a 20 20 20 20 6e 53 69 67 6e 69 66 69 ++;. nSignifi
2790: 63 61 6e 74 2b 2b 3b 0a 20 20 7d 0a 20 20 69 66 cant++;. }. if
27a0: 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b 0a 20 20 20 ( *z=='.' ){.
27b0: 20 4c 4f 4e 47 44 4f 55 42 4c 45 5f 54 59 50 45 LONGDOUBLE_TYPE
27c0: 20 64 69 76 69 73 6f 72 20 3d 20 31 2e 30 3b 0a divisor = 1.0;.
27d0: 20 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 69 66 28 z++;. if(
27e0: 20 6e 53 69 67 6e 69 66 69 63 61 6e 74 3d 3d 30 nSignificant==0
27f0: 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 ){. while(
2800: 20 7a 5b 30 5d 3d 3d 27 30 27 20 29 7b 0a 20 20 z[0]=='0' ){.
2810: 20 20 20 20 20 20 64 69 76 69 73 6f 72 20 2a 3d divisor *=
2820: 20 31 30 2e 30 3b 0a 20 20 20 20 20 20 20 20 7a 10.0;. z
2830: 2b 2b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 ++;. }.
2840: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 73 71 6c }. while( sql
2850: 69 74 65 33 49 73 64 69 67 69 74 28 2a 7a 29 20 ite3Isdigit(*z)
2860: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 6e 53 69 ){. if( nSi
2870: 67 6e 69 66 69 63 61 6e 74 3c 31 38 20 29 7b 0a gnificant<18 ){.
2880: 20 20 20 20 20 20 20 20 76 31 20 3d 20 76 31 2a v1 = v1*
2890: 31 30 2e 30 20 2b 20 28 2a 7a 20 2d 20 27 30 27 10.0 + (*z - '0'
28a0: 29 3b 0a 20 20 20 20 20 20 20 20 64 69 76 69 73 );. divis
28b0: 6f 72 20 2a 3d 20 31 30 2e 30 3b 0a 20 20 20 20 or *= 10.0;.
28c0: 20 20 20 20 6e 53 69 67 6e 69 66 69 63 61 6e 74 nSignificant
28d0: 2b 2b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 ++;. }.
28e0: 20 20 7a 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 z++;. }.
28f0: 20 76 31 20 2f 3d 20 64 69 76 69 73 6f 72 3b 0a v1 /= divisor;.
2900: 20 20 7d 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 65 }. if( *z=='e
2910: 27 20 7c 7c 20 2a 7a 3d 3d 27 45 27 20 29 7b 0a ' || *z=='E' ){.
2920: 20 20 20 20 69 6e 74 20 65 73 69 67 6e 20 3d 20 int esign =
2930: 31 3b 0a 20 20 20 20 69 6e 74 20 65 76 61 6c 20 1;. int eval
2940: 3d 20 30 3b 0a 20 20 20 20 4c 4f 4e 47 44 4f 55 = 0;. LONGDOU
2950: 42 4c 45 5f 54 59 50 45 20 73 63 61 6c 65 20 3d BLE_TYPE scale =
2960: 20 31 2e 30 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 1.0;. z++;.
2970: 20 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 20 29 if( *z=='-' )
2980: 7b 0a 20 20 20 20 20 20 65 73 69 67 6e 20 3d 20 {. esign =
2990: 2d 31 3b 0a 20 20 20 20 20 20 7a 2b 2b 3b 0a 20 -1;. z++;.
29a0: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 2a 7a 3d }else if( *z=
29b0: 3d 27 2b 27 20 29 7b 0a 20 20 20 20 20 20 7a 2b ='+' ){. z+
29c0: 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 77 68 69 +;. }. whi
29d0: 6c 65 28 20 73 71 6c 69 74 65 33 49 73 64 69 67 le( sqlite3Isdig
29e0: 69 74 28 2a 7a 29 20 29 7b 0a 20 20 20 20 20 20 it(*z) ){.
29f0: 65 76 61 6c 20 3d 20 65 76 61 6c 2a 31 30 20 2b eval = eval*10 +
2a00: 20 2a 7a 20 2d 20 27 30 27 3b 0a 20 20 20 20 20 *z - '0';.
2a10: 20 7a 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 z++;. }.
2a20: 77 68 69 6c 65 28 20 65 76 61 6c 3e 3d 36 34 20 while( eval>=64
2a30: 29 7b 20 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 ){ scale *= 1.0e
2a40: 2b 36 34 3b 20 65 76 61 6c 20 2d 3d 20 36 34 3b +64; eval -= 64;
2a50: 20 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 65 76 }. while( ev
2a60: 61 6c 3e 3d 31 36 20 29 7b 20 73 63 61 6c 65 20 al>=16 ){ scale
2a70: 2a 3d 20 31 2e 30 65 2b 31 36 3b 20 65 76 61 6c *= 1.0e+16; eval
2a80: 20 2d 3d 20 31 36 3b 20 7d 0a 20 20 20 20 77 68 -= 16; }. wh
2a90: 69 6c 65 28 20 65 76 61 6c 3e 3d 34 20 29 7b 20 ile( eval>=4 ){
2aa0: 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 2b 34 3b scale *= 1.0e+4;
2ab0: 20 65 76 61 6c 20 2d 3d 20 34 3b 20 7d 0a 20 20 eval -= 4; }.
2ac0: 20 20 77 68 69 6c 65 28 20 65 76 61 6c 3e 3d 31 while( eval>=1
2ad0: 20 29 7b 20 73 63 61 6c 65 20 2a 3d 20 31 2e 30 ){ scale *= 1.0
2ae0: 65 2b 31 3b 20 65 76 61 6c 20 2d 3d 20 31 3b 20 e+1; eval -= 1;
2af0: 7d 0a 20 20 20 20 69 66 28 20 65 73 69 67 6e 3c }. if( esign<
2b00: 30 20 29 7b 0a 20 20 20 20 20 20 76 31 20 2f 3d 0 ){. v1 /=
2b10: 20 73 63 61 6c 65 3b 0a 20 20 20 20 7d 65 6c 73 scale;. }els
2b20: 65 7b 0a 20 20 20 20 20 20 76 31 20 2a 3d 20 73 e{. v1 *= s
2b30: 63 61 6c 65 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a cale;. }. }.
2b40: 20 20 2a 70 52 65 73 75 6c 74 20 3d 20 28 64 6f *pResult = (do
2b50: 75 62 6c 65 29 28 73 69 67 6e 3c 30 20 3f 20 2d uble)(sign<0 ? -
2b60: 76 31 20 3a 20 76 31 29 3b 0a 20 20 72 65 74 75 v1 : v1);. retu
2b70: 72 6e 20 28 69 6e 74 29 28 7a 20 2d 20 7a 42 65 rn (int)(z - zBe
2b80: 67 69 6e 29 3b 0a 23 65 6c 73 65 0a 20 20 72 65 gin);.#else. re
2b90: 74 75 72 6e 20 73 71 6c 69 74 65 33 41 74 6f 69 turn sqlite3Atoi
2ba0: 36 34 28 7a 2c 20 70 52 65 73 75 6c 74 29 3b 0a 64(z, pResult);.
2bb0: 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 #endif /* SQLITE
2bc0: 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 _OMIT_FLOATING_P
2bd0: 4f 49 4e 54 20 2a 2f 0a 7d 0a 0a 2f 2a 0a 2a 2a OINT */.}../*.**
2be0: 20 43 6f 6d 70 61 72 65 20 74 68 65 20 31 39 2d Compare the 19-
2bf0: 63 68 61 72 61 63 74 65 72 20 73 74 72 69 6e 67 character string
2c00: 20 7a 4e 75 6d 20 61 67 61 69 6e 73 74 20 74 68 zNum against th
2c10: 65 20 74 65 78 74 20 72 65 70 72 65 73 65 6e 74 e text represent
2c20: 61 74 69 6f 6e 0a 2a 2a 20 76 61 6c 75 65 20 32 ation.** value 2
2c30: 5e 36 33 3a 20 20 39 32 32 33 33 37 32 30 33 36 ^63: 9223372036
2c40: 38 35 34 37 37 35 38 30 38 2e 20 20 52 65 74 75 854775808. Retu
2c50: 72 6e 20 6e 65 67 61 74 69 76 65 2c 20 7a 65 72 rn negative, zer
2c60: 6f 2c 20 6f 72 20 70 6f 73 69 74 69 76 65 0a 2a o, or positive.*
2c70: 2a 20 69 66 20 7a 4e 75 6d 20 69 73 20 6c 65 73 * if zNum is les
2c80: 73 20 74 68 61 6e 2c 20 65 71 75 61 6c 20 74 6f s than, equal to
2c90: 2c 20 6f 72 20 67 72 65 61 74 65 72 20 74 68 61 , or greater tha
2ca0: 6e 20 74 68 65 20 73 74 72 69 6e 67 2e 0a 2a 2a n the string..**
2cb0: 0a 2a 2a 20 55 6e 6c 69 6b 65 20 6d 65 6d 63 6d .** Unlike memcm
2cc0: 70 28 29 20 74 68 69 73 20 72 6f 75 74 69 6e 65 p() this routine
2cd0: 20 69 73 20 67 75 61 72 61 6e 74 65 65 64 20 74 is guaranteed t
2ce0: 6f 20 72 65 74 75 72 6e 20 74 68 65 20 64 69 66 o return the dif
2cf0: 66 65 72 65 6e 63 65 0a 2a 2a 20 69 6e 20 74 68 ference.** in th
2d00: 65 20 76 61 6c 75 65 73 20 6f 66 20 74 68 65 20 e values of the
2d10: 6c 61 73 74 20 64 69 67 69 74 20 69 66 20 74 68 last digit if th
2d20: 65 20 6f 6e 6c 79 20 64 69 66 66 65 72 65 6e 63 e only differenc
2d30: 65 20 69 73 20 69 6e 20 74 68 65 0a 2a 2a 20 6c e is in the.** l
2d40: 61 73 74 20 64 69 67 69 74 2e 20 20 53 6f 2c 20 ast digit. So,
2d50: 66 6f 72 20 65 78 61 6d 70 6c 65 2c 0a 2a 2a 0a for example,.**.
2d60: 2a 2a 20 20 20 20 20 20 63 6f 6d 70 61 72 65 32 ** compare2
2d70: 70 6f 77 36 33 28 22 39 32 32 33 33 37 32 30 33 pow63("922337203
2d80: 36 38 35 34 37 37 35 38 30 30 22 29 0a 2a 2a 0a 6854775800").**.
2d90: 2a 2a 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 2d ** will return -
2da0: 38 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 8..*/.static int
2db0: 20 63 6f 6d 70 61 72 65 32 70 6f 77 36 33 28 63 compare2pow63(c
2dc0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 75 6d 29 onst char *zNum)
2dd0: 7b 0a 20 20 69 6e 74 20 63 3b 0a 20 20 63 20 3d {. int c;. c =
2de0: 20 6d 65 6d 63 6d 70 28 7a 4e 75 6d 2c 22 39 32 memcmp(zNum,"92
2df0: 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 30 2337203685477580
2e00: 22 2c 31 38 29 3b 0a 20 20 69 66 28 20 63 3d 3d ",18);. if( c==
2e10: 30 20 29 7b 0a 20 20 20 20 63 20 3d 20 7a 4e 75 0 ){. c = zNu
2e20: 6d 5b 31 38 5d 20 2d 20 27 38 27 3b 0a 20 20 7d m[18] - '8';. }
2e30: 0a 20 20 72 65 74 75 72 6e 20 63 3b 0a 7d 0a 0a . return c;.}..
2e40: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 ./*.** Return TR
2e50: 55 45 20 69 66 20 7a 4e 75 6d 20 69 73 20 61 20 UE if zNum is a
2e60: 36 34 2d 62 69 74 20 73 69 67 6e 65 64 20 69 6e 64-bit signed in
2e70: 74 65 67 65 72 20 61 6e 64 20 77 72 69 74 65 0a teger and write.
2e80: 2a 2a 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 ** the value of
2e90: 74 68 65 20 69 6e 74 65 67 65 72 20 69 6e 74 6f the integer into
2ea0: 20 2a 70 4e 75 6d 2e 20 20 49 66 20 7a 4e 75 6d *pNum. If zNum
2eb0: 20 69 73 20 6e 6f 74 20 61 6e 20 69 6e 74 65 67 is not an integ
2ec0: 65 72 0a 2a 2a 20 6f 72 20 69 73 20 61 6e 20 69 er.** or is an i
2ed0: 6e 74 65 67 65 72 20 74 68 61 74 20 69 73 20 74 nteger that is t
2ee0: 6f 6f 20 6c 61 72 67 65 20 74 6f 20 62 65 20 65 oo large to be e
2ef0: 78 70 72 65 73 73 65 64 20 77 69 74 68 20 36 34 xpressed with 64
2f00: 20 62 69 74 73 2c 0a 2a 2a 20 74 68 65 6e 20 72 bits,.** then r
2f10: 65 74 75 72 6e 20 66 61 6c 73 65 2e 0a 2a 2a 0a eturn false..**.
2f20: 2a 2a 20 57 68 65 6e 20 74 68 69 73 20 72 6f 75 ** When this rou
2f30: 74 69 6e 65 20 77 61 73 20 6f 72 69 67 69 6e 61 tine was origina
2f40: 6c 6c 79 20 77 72 69 74 74 65 6e 20 69 74 20 64 lly written it d
2f50: 65 61 6c 74 20 77 69 74 68 20 6f 6e 6c 79 0a 2a ealt with only.*
2f60: 2a 20 33 32 2d 62 69 74 20 6e 75 6d 62 65 72 73 * 32-bit numbers
2f70: 2e 20 20 41 74 20 74 68 61 74 20 74 69 6d 65 2c . At that time,
2f80: 20 69 74 20 77 61 73 20 6d 75 63 68 20 66 61 73 it was much fas
2f90: 74 65 72 20 74 68 61 6e 20 74 68 65 0a 2a 2a 20 ter than the.**
2fa0: 61 74 6f 69 28 29 20 6c 69 62 72 61 72 79 20 72 atoi() library r
2fb0: 6f 75 74 69 6e 65 20 69 6e 20 52 65 64 48 61 74 outine in RedHat
2fc0: 20 37 2e 32 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 7.2..*/.int sql
2fd0: 69 74 65 33 41 74 6f 69 36 34 28 63 6f 6e 73 74 ite3Atoi64(const
2fe0: 20 63 68 61 72 20 2a 7a 4e 75 6d 2c 20 69 36 34 char *zNum, i64
2ff0: 20 2a 70 4e 75 6d 29 7b 0a 20 20 69 36 34 20 76 *pNum){. i64 v
3000: 20 3d 20 30 3b 0a 20 20 69 6e 74 20 6e 65 67 3b = 0;. int neg;
3010: 0a 20 20 69 6e 74 20 69 2c 20 63 3b 0a 20 20 63 . int i, c;. c
3020: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 74 61 72 onst char *zStar
3030: 74 3b 0a 20 20 77 68 69 6c 65 28 20 73 71 6c 69 t;. while( sqli
3040: 74 65 33 49 73 73 70 61 63 65 28 2a 7a 4e 75 6d te3Isspace(*zNum
3050: 29 20 29 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 69 66 ) ) zNum++;. if
3060: 28 20 2a 7a 4e 75 6d 3d 3d 27 2d 27 20 29 7b 0a ( *zNum=='-' ){.
3070: 20 20 20 20 6e 65 67 20 3d 20 31 3b 0a 20 20 20 neg = 1;.
3080: 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 7d 65 6c 73 65 zNum++;. }else
3090: 20 69 66 28 20 2a 7a 4e 75 6d 3d 3d 27 2b 27 20 if( *zNum=='+'
30a0: 29 7b 0a 20 20 20 20 6e 65 67 20 3d 20 30 3b 0a ){. neg = 0;.
30b0: 20 20 20 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 7d 65 zNum++;. }e
30c0: 6c 73 65 7b 0a 20 20 20 20 6e 65 67 20 3d 20 30 lse{. neg = 0
30d0: 3b 0a 20 20 7d 0a 20 20 7a 53 74 61 72 74 20 3d ;. }. zStart =
30e0: 20 7a 4e 75 6d 3b 0a 20 20 77 68 69 6c 65 28 20 zNum;. while(
30f0: 7a 4e 75 6d 5b 30 5d 3d 3d 27 30 27 20 29 7b 20 zNum[0]=='0' ){
3100: 7a 4e 75 6d 2b 2b 3b 20 7d 20 2f 2a 20 53 6b 69 zNum++; } /* Ski
3110: 70 20 6f 76 65 72 20 6c 65 61 64 69 6e 67 20 7a p over leading z
3120: 65 72 6f 73 2e 20 54 69 63 6b 65 74 20 23 32 34 eros. Ticket #24
3130: 35 34 20 2a 2f 0a 20 20 66 6f 72 28 69 3d 30 3b 54 */. for(i=0;
3140: 20 28 63 3d 7a 4e 75 6d 5b 69 5d 29 3e 3d 27 30 (c=zNum[i])>='0
3150: 27 20 26 26 20 63 3c 3d 27 39 27 3b 20 69 2b 2b ' && c<='9'; i++
3160: 29 7b 0a 20 20 20 20 76 20 3d 20 76 2a 31 30 20 ){. v = v*10
3170: 2b 20 63 20 2d 20 27 30 27 3b 0a 20 20 7d 0a 20 + c - '0';. }.
3180: 20 2a 70 4e 75 6d 20 3d 20 6e 65 67 20 3f 20 2d *pNum = neg ? -
3190: 76 20 3a 20 76 3b 0a 20 20 69 66 28 20 63 21 3d v : v;. if( c!=
31a0: 30 20 7c 7c 20 28 69 3d 3d 30 20 26 26 20 7a 53 0 || (i==0 && zS
31b0: 74 61 72 74 3d 3d 7a 4e 75 6d 29 20 7c 7c 20 69 tart==zNum) || i
31c0: 3e 31 39 20 29 7b 0a 20 20 20 20 2f 2a 20 7a 4e >19 ){. /* zN
31d0: 75 6d 20 69 73 20 65 6d 70 74 79 20 6f 72 20 63 um is empty or c
31e0: 6f 6e 74 61 69 6e 73 20 6e 6f 6e 2d 6e 75 6d 65 ontains non-nume
31f0: 72 69 63 20 74 65 78 74 20 6f 72 20 69 73 20 6c ric text or is l
3200: 6f 6e 67 65 72 0a 20 20 20 20 2a 2a 20 74 68 61 onger. ** tha
3210: 6e 20 31 39 20 64 69 67 69 74 73 20 28 74 68 75 n 19 digits (thu
3220: 73 20 67 75 61 72 61 6e 74 69 6e 67 20 74 68 61 s guaranting tha
3230: 74 20 69 74 20 69 73 20 74 6f 6f 20 6c 61 72 67 t it is too larg
3240: 65 29 20 2a 2f 0a 20 20 20 20 72 65 74 75 72 6e e) */. return
3250: 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 0;. }else if(
3260: 69 3c 31 39 20 29 7b 0a 20 20 20 20 2f 2a 20 4c i<19 ){. /* L
3270: 65 73 73 20 74 68 61 6e 20 31 39 20 64 69 67 69 ess than 19 digi
3280: 74 73 2c 20 73 6f 20 77 65 20 6b 6e 6f 77 20 74 ts, so we know t
3290: 68 61 74 20 69 74 20 66 69 74 73 20 69 6e 20 36 hat it fits in 6
32a0: 34 20 62 69 74 73 20 2a 2f 0a 20 20 20 20 72 65 4 bits */. re
32b0: 74 75 72 6e 20 31 3b 0a 20 20 7d 65 6c 73 65 7b turn 1;. }else{
32c0: 0a 20 20 20 20 2f 2a 20 31 39 2d 64 69 67 69 74 . /* 19-digit
32d0: 20 6e 75 6d 62 65 72 73 20 6d 75 73 74 20 62 65 numbers must be
32e0: 20 6e 6f 20 6c 61 72 67 65 72 20 74 68 61 6e 20 no larger than
32f0: 39 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 9223372036854775
3300: 38 30 37 20 69 66 20 70 6f 73 69 74 69 76 65 0a 807 if positive.
3310: 20 20 20 20 2a 2a 20 6f 72 20 39 32 32 33 33 37 ** or 922337
3320: 32 30 33 36 38 35 34 37 37 35 38 30 38 20 69 66 2036854775808 if
3330: 20 6e 65 67 61 74 69 76 65 2e 20 20 4e 6f 74 65 negative. Note
3340: 20 74 68 61 74 20 39 32 32 33 33 37 32 30 33 36 that 9223372036
3350: 38 35 34 36 36 35 38 30 38 0a 20 20 20 20 2a 2a 854665808. **
3360: 20 69 73 20 32 5e 36 33 2e 20 2a 2f 0a 20 20 20 is 2^63. */.
3370: 20 72 65 74 75 72 6e 20 63 6f 6d 70 61 72 65 32 return compare2
3380: 70 6f 77 36 33 28 7a 4e 75 6d 29 3c 6e 65 67 3b pow63(zNum)<neg;
3390: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 . }.}../*.** Th
33a0: 65 20 73 74 72 69 6e 67 20 7a 4e 75 6d 20 72 65 e string zNum re
33b0: 70 72 65 73 65 6e 74 73 20 61 6e 20 69 6e 74 65 presents an inte
33c0: 67 65 72 2e 20 20 54 68 65 72 65 20 6d 69 67 68 ger. There migh
33d0: 74 20 62 65 20 73 6f 6d 65 20 6f 74 68 65 72 0a t be some other.
33e0: 2a 2a 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 ** information f
33f0: 6f 6c 6c 6f 77 69 6e 67 20 74 68 65 20 69 6e 74 ollowing the int
3400: 65 67 65 72 20 74 6f 6f 2c 20 62 75 74 20 74 68 eger too, but th
3410: 61 74 20 70 61 72 74 20 69 73 20 69 67 6e 6f 72 at part is ignor
3420: 65 64 2e 0a 2a 2a 20 49 66 20 74 68 65 20 69 6e ed..** If the in
3430: 74 65 67 65 72 20 74 68 61 74 20 74 68 65 20 70 teger that the p
3440: 72 65 66 69 78 20 6f 66 20 7a 4e 75 6d 20 72 65 refix of zNum re
3450: 70 72 65 73 65 6e 74 73 20 77 69 6c 6c 20 66 69 presents will fi
3460: 74 20 69 6e 20 61 0a 2a 2a 20 36 34 2d 62 69 74 t in a.** 64-bit
3470: 20 73 69 67 6e 65 64 20 69 6e 74 65 67 65 72 2c signed integer,
3480: 20 72 65 74 75 72 6e 20 54 52 55 45 2e 20 20 4f return TRUE. O
3490: 74 68 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 therwise return
34a0: 46 41 4c 53 45 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 FALSE..**.** Thi
34b0: 73 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 6e s routine return
34c0: 73 20 46 41 4c 53 45 20 66 6f 72 20 74 68 65 20 s FALSE for the
34d0: 73 74 72 69 6e 67 20 2d 39 32 32 33 33 37 32 30 string -92233720
34e0: 33 36 38 35 34 37 37 35 38 30 38 20 65 76 65 6e 36854775808 even
34f0: 20 74 68 61 74 0a 2a 2a 20 74 68 61 74 20 6e 75 that.** that nu
3500: 6d 62 65 72 20 77 69 6c 6c 2c 20 69 6e 20 74 68 mber will, in th
3510: 65 6f 72 79 20 66 69 74 20 69 6e 20 61 20 36 34 eory fit in a 64
3520: 2d 62 69 74 20 69 6e 74 65 67 65 72 2e 20 20 50 -bit integer. P
3530: 6f 73 69 74 69 76 65 0a 2a 2a 20 39 32 32 33 33 ositive.** 92233
3540: 37 33 30 33 36 38 35 34 37 37 35 38 30 38 20 77 73036854775808 w
3550: 69 6c 6c 20 6e 6f 74 20 66 69 74 20 69 6e 20 36 ill not fit in 6
3560: 34 20 62 69 74 73 2e 20 20 53 6f 20 69 74 20 73 4 bits. So it s
3570: 65 65 6d 73 20 73 61 66 65 72 20 74 6f 20 72 65 eems safer to re
3580: 74 75 72 6e 0a 2a 2a 20 66 61 6c 73 65 2e 0a 2a turn.** false..*
3590: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 46 69 74 /.int sqlite3Fit
35a0: 73 49 6e 36 34 42 69 74 73 28 63 6f 6e 73 74 20 sIn64Bits(const
35b0: 63 68 61 72 20 2a 7a 4e 75 6d 2c 20 69 6e 74 20 char *zNum, int
35c0: 6e 65 67 46 6c 61 67 29 7b 0a 20 20 69 6e 74 20 negFlag){. int
35d0: 69 2c 20 63 3b 0a 20 20 69 6e 74 20 6e 65 67 20 i, c;. int neg
35e0: 3d 20 30 3b 0a 20 20 69 66 28 20 2a 7a 4e 75 6d = 0;. if( *zNum
35f0: 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20 6e 65 67 =='-' ){. neg
3600: 20 3d 20 31 3b 0a 20 20 20 20 7a 4e 75 6d 2b 2b = 1;. zNum++
3610: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 2a 7a ;. }else if( *z
3620: 4e 75 6d 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 Num=='+' ){.
3630: 7a 4e 75 6d 2b 2b 3b 0a 20 20 7d 0a 20 20 69 66 zNum++;. }. if
3640: 28 20 6e 65 67 46 6c 61 67 20 29 20 6e 65 67 20 ( negFlag ) neg
3650: 3d 20 31 2d 6e 65 67 3b 0a 20 20 77 68 69 6c 65 = 1-neg;. while
3660: 28 20 2a 7a 4e 75 6d 3d 3d 27 30 27 20 29 7b 0a ( *zNum=='0' ){.
3670: 20 20 20 20 7a 4e 75 6d 2b 2b 3b 20 20 20 2f 2a zNum++; /*
3680: 20 53 6b 69 70 20 6c 65 61 64 69 6e 67 20 7a 65 Skip leading ze
3690: 72 6f 73 2e 20 20 54 69 63 6b 65 74 20 23 32 34 ros. Ticket #24
36a0: 35 34 20 2a 2f 0a 20 20 7d 0a 20 20 66 6f 72 28 54 */. }. for(
36b0: 69 3d 30 3b 20 28 63 3d 7a 4e 75 6d 5b 69 5d 29 i=0; (c=zNum[i])
36c0: 3e 3d 27 30 27 20 26 26 20 63 3c 3d 27 39 27 3b >='0' && c<='9';
36d0: 20 69 2b 2b 29 7b 7d 0a 20 20 69 66 28 20 69 3c i++){}. if( i<
36e0: 31 39 20 29 7b 0a 20 20 20 20 2f 2a 20 47 75 61 19 ){. /* Gua
36f0: 72 61 6e 74 65 65 64 20 74 6f 20 66 69 74 20 69 ranteed to fit i
3700: 66 20 6c 65 73 73 20 74 68 61 6e 20 31 39 20 64 f less than 19 d
3710: 69 67 69 74 73 20 2a 2f 0a 20 20 20 20 72 65 74 igits */. ret
3720: 75 72 6e 20 31 3b 0a 20 20 7d 65 6c 73 65 20 69 urn 1;. }else i
3730: 66 28 20 69 3e 31 39 20 29 7b 0a 20 20 20 20 2f f( i>19 ){. /
3740: 2a 20 47 75 61 72 61 6e 74 65 65 64 20 74 6f 20 * Guaranteed to
3750: 62 65 20 74 6f 6f 20 62 69 67 20 69 66 20 67 72 be too big if gr
3760: 65 61 74 65 72 20 74 68 61 6e 20 31 39 20 64 69 eater than 19 di
3770: 67 69 74 73 20 2a 2f 0a 20 20 20 20 72 65 74 75 gits */. retu
3780: 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 rn 0;. }else{.
3790: 20 20 20 2f 2a 20 43 6f 6d 70 61 72 65 20 61 67 /* Compare ag
37a0: 61 69 6e 73 74 20 32 5e 36 33 2e 20 2a 2f 0a 20 ainst 2^63. */.
37b0: 20 20 20 72 65 74 75 72 6e 20 63 6f 6d 70 61 72 return compar
37c0: 65 32 70 6f 77 36 33 28 7a 4e 75 6d 29 3c 6e 65 e2pow63(zNum)<ne
37d0: 67 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 g;. }.}../*.**
37e0: 49 66 20 7a 4e 75 6d 20 72 65 70 72 65 73 65 6e If zNum represen
37f0: 74 73 20 61 6e 20 69 6e 74 65 67 65 72 20 74 68 ts an integer th
3800: 61 74 20 77 69 6c 6c 20 66 69 74 20 69 6e 20 33 at will fit in 3
3810: 32 2d 62 69 74 73 2c 20 74 68 65 6e 20 73 65 74 2-bits, then set
3820: 0a 2a 2a 20 2a 70 56 61 6c 75 65 20 74 6f 20 74 .** *pValue to t
3830: 68 61 74 20 69 6e 74 65 67 65 72 20 61 6e 64 20 hat integer and
3840: 72 65 74 75 72 6e 20 74 72 75 65 2e 20 20 4f 74 return true. Ot
3850: 68 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 66 herwise return f
3860: 61 6c 73 65 2e 0a 2a 2a 0a 2a 2a 20 41 6e 79 20 alse..**.** Any
3870: 6e 6f 6e 2d 6e 75 6d 65 72 69 63 20 63 68 61 72 non-numeric char
3880: 61 63 74 65 72 73 20 74 68 61 74 20 66 6f 6c 6c acters that foll
3890: 6f 77 69 6e 67 20 7a 4e 75 6d 20 61 72 65 20 69 owing zNum are i
38a0: 67 6e 6f 72 65 64 2e 0a 2a 2a 20 54 68 69 73 20 gnored..** This
38b0: 69 73 20 64 69 66 66 65 72 65 6e 74 20 66 72 6f is different fro
38c0: 6d 20 73 71 6c 69 74 65 33 41 74 6f 69 36 34 28 m sqlite3Atoi64(
38d0: 29 20 77 68 69 63 68 20 72 65 71 75 69 72 65 73 ) which requires
38e0: 20 74 68 65 0a 2a 2a 20 69 6e 70 75 74 20 6e 75 the.** input nu
38f0: 6d 62 65 72 20 74 6f 20 62 65 20 7a 65 72 6f 2d mber to be zero-
3900: 74 65 72 6d 69 6e 61 74 65 64 2e 0a 2a 2f 0a 69 terminated..*/.i
3910: 6e 74 20 73 71 6c 69 74 65 33 47 65 74 49 6e 74 nt sqlite3GetInt
3920: 33 32 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32(const char *z
3930: 4e 75 6d 2c 20 69 6e 74 20 2a 70 56 61 6c 75 65 Num, int *pValue
3940: 29 7b 0a 20 20 73 71 6c 69 74 65 5f 69 6e 74 36 ){. sqlite_int6
3950: 34 20 76 20 3d 20 30 3b 0a 20 20 69 6e 74 20 69 4 v = 0;. int i
3960: 2c 20 63 3b 0a 20 20 69 6e 74 20 6e 65 67 20 3d , c;. int neg =
3970: 20 30 3b 0a 20 20 69 66 28 20 7a 4e 75 6d 5b 30 0;. if( zNum[0
3980: 5d 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20 6e 65 ]=='-' ){. ne
3990: 67 20 3d 20 31 3b 0a 20 20 20 20 7a 4e 75 6d 2b g = 1;. zNum+
39a0: 2b 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 7a +;. }else if( z
39b0: 4e 75 6d 5b 30 5d 3d 3d 27 2b 27 20 29 7b 0a 20 Num[0]=='+' ){.
39c0: 20 20 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 7d 0a 20 zNum++;. }.
39d0: 20 77 68 69 6c 65 28 20 7a 4e 75 6d 5b 30 5d 3d while( zNum[0]=
39e0: 3d 27 30 27 20 29 20 7a 4e 75 6d 2b 2b 3b 0a 20 ='0' ) zNum++;.
39f0: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 31 20 26 for(i=0; i<11 &
3a00: 26 20 28 63 20 3d 20 7a 4e 75 6d 5b 69 5d 20 2d & (c = zNum[i] -
3a10: 20 27 30 27 29 3e 3d 30 20 26 26 20 63 3c 3d 39 '0')>=0 && c<=9
3a20: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 76 20 3d 20 ; i++){. v =
3a30: 76 2a 31 30 20 2b 20 63 3b 0a 20 20 7d 0a 0a 20 v*10 + c;. }..
3a40: 20 2f 2a 20 54 68 65 20 6c 6f 6e 67 65 73 74 20 /* The longest
3a50: 64 65 63 69 6d 61 6c 20 72 65 70 72 65 73 65 6e decimal represen
3a60: 74 61 74 69 6f 6e 20 6f 66 20 61 20 33 32 20 62 tation of a 32 b
3a70: 69 74 20 69 6e 74 65 67 65 72 20 69 73 20 31 30 it integer is 10
3a80: 20 64 69 67 69 74 73 3a 0a 20 20 2a 2a 0a 20 20 digits:. **.
3a90: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 31 ** 1
3aa0: 32 33 34 35 36 37 38 39 30 0a 20 20 2a 2a 20 20 234567890. **
3ab0: 20 20 20 32 5e 33 31 20 2d 3e 20 32 31 34 37 34 2^31 -> 21474
3ac0: 38 33 36 34 38 0a 20 20 2a 2f 0a 20 20 69 66 28 83648. */. if(
3ad0: 20 69 3e 31 30 20 29 7b 0a 20 20 20 20 72 65 74 i>10 ){. ret
3ae0: 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 urn 0;. }. if(
3af0: 20 76 2d 6e 65 67 3e 32 31 34 37 34 38 33 36 34 v-neg>214748364
3b00: 37 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 7 ){. return
3b10: 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 65 67 0;. }. if( neg
3b20: 20 29 7b 0a 20 20 20 20 76 20 3d 20 2d 76 3b 0a ){. v = -v;.
3b30: 20 20 7d 0a 20 20 2a 70 56 61 6c 75 65 20 3d 20 }. *pValue =
3b40: 28 69 6e 74 29 76 3b 0a 20 20 72 65 74 75 72 6e (int)v;. return
3b50: 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 1;.}../*.** The
3b60: 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 variable-length
3b70: 20 69 6e 74 65 67 65 72 20 65 6e 63 6f 64 69 6e integer encodin
3b80: 67 20 69 73 20 61 73 20 66 6f 6c 6c 6f 77 73 3a g is as follows:
3b90: 0a 2a 2a 0a 2a 2a 20 4b 45 59 3a 0a 2a 2a 20 20 .**.** KEY:.**
3ba0: 20 20 20 20 20 20 20 41 20 3d 20 30 78 78 78 78 A = 0xxxx
3bb0: 78 78 78 20 20 20 20 37 20 62 69 74 73 20 6f 66 xxx 7 bits of
3bc0: 20 64 61 74 61 20 61 6e 64 20 6f 6e 65 20 66 6c data and one fl
3bd0: 61 67 20 62 69 74 0a 2a 2a 20 20 20 20 20 20 20 ag bit.**
3be0: 20 20 42 20 3d 20 31 78 78 78 78 78 78 78 20 20 B = 1xxxxxxx
3bf0: 20 20 37 20 62 69 74 73 20 6f 66 20 64 61 74 61 7 bits of data
3c00: 20 61 6e 64 20 6f 6e 65 20 66 6c 61 67 20 62 69 and one flag bi
3c10: 74 0a 2a 2a 20 20 20 20 20 20 20 20 20 43 20 3d t.** C =
3c20: 20 78 78 78 78 78 78 78 78 20 20 20 20 38 20 62 xxxxxxxx 8 b
3c30: 69 74 73 20 6f 66 20 64 61 74 61 0a 2a 2a 0a 2a its of data.**.*
3c40: 2a 20 20 37 20 62 69 74 73 20 2d 20 41 0a 2a 2a * 7 bits - A.**
3c50: 20 31 34 20 62 69 74 73 20 2d 20 42 41 0a 2a 2a 14 bits - BA.**
3c60: 20 32 31 20 62 69 74 73 20 2d 20 42 42 41 0a 2a 21 bits - BBA.*
3c70: 2a 20 32 38 20 62 69 74 73 20 2d 20 42 42 42 41 * 28 bits - BBBA
3c80: 0a 2a 2a 20 33 35 20 62 69 74 73 20 2d 20 42 42 .** 35 bits - BB
3c90: 42 42 41 0a 2a 2a 20 34 32 20 62 69 74 73 20 2d BBA.** 42 bits -
3ca0: 20 42 42 42 42 42 41 0a 2a 2a 20 34 39 20 62 69 BBBBBA.** 49 bi
3cb0: 74 73 20 2d 20 42 42 42 42 42 42 41 0a 2a 2a 20 ts - BBBBBBA.**
3cc0: 35 36 20 62 69 74 73 20 2d 20 42 42 42 42 42 42 56 bits - BBBBBB
3cd0: 42 41 0a 2a 2a 20 36 34 20 62 69 74 73 20 2d 20 BA.** 64 bits -
3ce0: 42 42 42 42 42 42 42 42 43 0a 2a 2f 0a 0a 2f 2a BBBBBBBBC.*/../*
3cf0: 0a 2a 2a 20 57 72 69 74 65 20 61 20 36 34 2d 62 .** Write a 64-b
3d00: 69 74 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 it variable-leng
3d10: 74 68 20 69 6e 74 65 67 65 72 20 74 6f 20 6d 65 th integer to me
3d20: 6d 6f 72 79 20 73 74 61 72 74 69 6e 67 20 61 74 mory starting at
3d30: 20 70 5b 30 5d 2e 0a 2a 2a 20 54 68 65 20 6c 65 p[0]..** The le
3d40: 6e 67 74 68 20 6f 66 20 64 61 74 61 20 77 72 69 ngth of data wri
3d50: 74 65 20 77 69 6c 6c 20 62 65 20 62 65 74 77 65 te will be betwe
3d60: 65 6e 20 31 20 61 6e 64 20 39 20 62 79 74 65 73 en 1 and 9 bytes
3d70: 2e 20 20 54 68 65 20 6e 75 6d 62 65 72 0a 2a 2a . The number.**
3d80: 20 6f 66 20 62 79 74 65 73 20 77 72 69 74 74 65 of bytes writte
3d90: 6e 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a 2a n is returned..*
3da0: 2a 0a 2a 2a 20 41 20 76 61 72 69 61 62 6c 65 2d *.** A variable-
3db0: 6c 65 6e 67 74 68 20 69 6e 74 65 67 65 72 20 63 length integer c
3dc0: 6f 6e 73 69 73 74 73 20 6f 66 20 74 68 65 20 6c onsists of the l
3dd0: 6f 77 65 72 20 37 20 62 69 74 73 20 6f 66 20 65 ower 7 bits of e
3de0: 61 63 68 20 62 79 74 65 0a 2a 2a 20 66 6f 72 20 ach byte.** for
3df0: 61 6c 6c 20 62 79 74 65 73 20 74 68 61 74 20 68 all bytes that h
3e00: 61 76 65 20 74 68 65 20 38 74 68 20 62 69 74 20 ave the 8th bit
3e10: 73 65 74 20 61 6e 64 20 6f 6e 65 20 62 79 74 65 set and one byte
3e20: 20 77 69 74 68 20 74 68 65 20 38 74 68 0a 2a 2a with the 8th.**
3e30: 20 62 69 74 20 63 6c 65 61 72 2e 20 20 45 78 63 bit clear. Exc
3e40: 65 70 74 2c 20 69 66 20 77 65 20 67 65 74 20 74 ept, if we get t
3e50: 6f 20 74 68 65 20 39 74 68 20 62 79 74 65 2c 20 o the 9th byte,
3e60: 69 74 20 73 74 6f 72 65 73 20 74 68 65 20 66 75 it stores the fu
3e70: 6c 6c 0a 2a 2a 20 38 20 62 69 74 73 20 61 6e 64 ll.** 8 bits and
3e80: 20 69 73 20 74 68 65 20 6c 61 73 74 20 62 79 74 is the last byt
3e90: 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 e..*/.int sqlite
3ea0: 33 50 75 74 56 61 72 69 6e 74 28 75 6e 73 69 67 3PutVarint(unsig
3eb0: 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 75 36 34 ned char *p, u64
3ec0: 20 76 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a 2c v){. int i, j,
3ed0: 20 6e 3b 0a 20 20 75 38 20 62 75 66 5b 31 30 5d n;. u8 buf[10]
3ee0: 3b 0a 20 20 69 66 28 20 76 20 26 20 28 28 28 75 ;. if( v & (((u
3ef0: 36 34 29 30 78 66 66 30 30 30 30 30 30 29 3c 3c 64)0xff000000)<<
3f00: 33 32 29 20 29 7b 0a 20 20 20 20 70 5b 38 5d 20 32) ){. p[8]
3f10: 3d 20 28 75 38 29 76 3b 0a 20 20 20 20 76 20 3e = (u8)v;. v >
3f20: 3e 3d 20 38 3b 0a 20 20 20 20 66 6f 72 28 69 3d >= 8;. for(i=
3f30: 37 3b 20 69 3e 3d 30 3b 20 69 2d 2d 29 7b 0a 20 7; i>=0; i--){.
3f40: 20 20 20 20 20 70 5b 69 5d 20 3d 20 28 75 38 29 p[i] = (u8)
3f50: 28 28 76 20 26 20 30 78 37 66 29 20 7c 20 30 78 ((v & 0x7f) | 0x
3f60: 38 30 29 3b 0a 20 20 20 20 20 20 76 20 3e 3e 3d 80);. v >>=
3f70: 20 37 3b 0a 20 20 20 20 7d 0a 20 20 20 20 72 65 7;. }. re
3f80: 74 75 72 6e 20 39 3b 0a 20 20 7d 20 20 20 20 0a turn 9;. } .
3f90: 20 20 6e 20 3d 20 30 3b 0a 20 20 64 6f 7b 0a 20 n = 0;. do{.
3fa0: 20 20 20 62 75 66 5b 6e 2b 2b 5d 20 3d 20 28 75 buf[n++] = (u
3fb0: 38 29 28 28 76 20 26 20 30 78 37 66 29 20 7c 20 8)((v & 0x7f) |
3fc0: 30 78 38 30 29 3b 0a 20 20 20 20 76 20 3e 3e 3d 0x80);. v >>=
3fd0: 20 37 3b 0a 20 20 7d 77 68 69 6c 65 28 20 76 21 7;. }while( v!
3fe0: 3d 30 20 29 3b 0a 20 20 62 75 66 5b 30 5d 20 26 =0 );. buf[0] &
3ff0: 3d 20 30 78 37 66 3b 0a 20 20 61 73 73 65 72 74 = 0x7f;. assert
4000: 28 20 6e 3c 3d 39 20 29 3b 0a 20 20 66 6f 72 28 ( n<=9 );. for(
4010: 69 3d 30 2c 20 6a 3d 6e 2d 31 3b 20 6a 3e 3d 30 i=0, j=n-1; j>=0
4020: 3b 20 6a 2d 2d 2c 20 69 2b 2b 29 7b 0a 20 20 20 ; j--, i++){.
4030: 20 70 5b 69 5d 20 3d 20 62 75 66 5b 6a 5d 3b 0a p[i] = buf[j];.
4040: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0a }. return n;.
4050: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f }../*.** This ro
4060: 75 74 69 6e 65 20 69 73 20 61 20 66 61 73 74 65 utine is a faste
4070: 72 20 76 65 72 73 69 6f 6e 20 6f 66 20 73 71 6c r version of sql
4080: 69 74 65 33 50 75 74 56 61 72 69 6e 74 28 29 20 ite3PutVarint()
4090: 74 68 61 74 20 6f 6e 6c 79 0a 2a 2a 20 77 6f 72 that only.** wor
40a0: 6b 73 20 66 6f 72 20 33 32 2d 62 69 74 20 70 6f ks for 32-bit po
40b0: 73 69 74 69 76 65 20 69 6e 74 65 67 65 72 73 20 sitive integers
40c0: 61 6e 64 20 77 68 69 63 68 20 69 73 20 6f 70 74 and which is opt
40d0: 69 6d 69 7a 65 64 20 66 6f 72 0a 2a 2a 20 74 68 imized for.** th
40e0: 65 20 63 6f 6d 6d 6f 6e 20 63 61 73 65 20 6f 66 e common case of
40f0: 20 73 6d 61 6c 6c 20 69 6e 74 65 67 65 72 73 2e small integers.
4100: 20 20 41 20 4d 41 43 52 4f 20 76 65 72 73 69 6f A MACRO versio
4110: 6e 2c 20 70 75 74 56 61 72 69 6e 74 33 32 2c 0a n, putVarint32,.
4120: 2a 2a 20 69 73 20 70 72 6f 76 69 64 65 64 20 77 ** is provided w
4130: 68 69 63 68 20 69 6e 6c 69 6e 65 73 20 74 68 65 hich inlines the
4140: 20 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 61 73 single-byte cas
4150: 65 2e 20 20 41 6c 6c 20 63 6f 64 65 20 73 68 6f e. All code sho
4160: 75 6c 64 20 75 73 65 0a 2a 2a 20 74 68 65 20 4d uld use.** the M
4170: 41 43 52 4f 20 76 65 72 73 69 6f 6e 20 61 73 20 ACRO version as
4180: 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 61 73 this function as
4190: 73 75 6d 65 73 20 74 68 65 20 73 69 6e 67 6c 65 sumes the single
41a0: 2d 62 79 74 65 20 63 61 73 65 20 68 61 73 0a 2a -byte case has.*
41b0: 2a 20 61 6c 72 65 61 64 79 20 62 65 65 6e 20 68 * already been h
41c0: 61 6e 64 6c 65 64 2e 0a 2a 2f 0a 69 6e 74 20 73 andled..*/.int s
41d0: 71 6c 69 74 65 33 50 75 74 56 61 72 69 6e 74 33 qlite3PutVarint3
41e0: 32 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2(unsigned char
41f0: 2a 70 2c 20 75 33 32 20 76 29 7b 0a 23 69 66 6e *p, u32 v){.#ifn
4200: 64 65 66 20 70 75 74 56 61 72 69 6e 74 33 32 0a def putVarint32.
4210: 20 20 69 66 28 20 28 76 20 26 20 7e 30 78 37 66 if( (v & ~0x7f
4220: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 70 5b 30 5d )==0 ){. p[0]
4230: 20 3d 20 76 3b 0a 20 20 20 20 72 65 74 75 72 6e = v;. return
4240: 20 31 3b 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 20 1;. }.#endif.
4250: 20 69 66 28 20 28 76 20 26 20 7e 30 78 33 66 66 if( (v & ~0x3ff
4260: 66 29 3d 3d 30 20 29 7b 0a 20 20 20 20 70 5b 30 f)==0 ){. p[0
4270: 5d 20 3d 20 28 75 38 29 28 28 76 3e 3e 37 29 20 ] = (u8)((v>>7)
4280: 7c 20 30 78 38 30 29 3b 0a 20 20 20 20 70 5b 31 | 0x80);. p[1
4290: 5d 20 3d 20 28 75 38 29 28 76 20 26 20 30 78 37 ] = (u8)(v & 0x7
42a0: 66 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 32 f);. return 2
42b0: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 73 ;. }. return s
42c0: 71 6c 69 74 65 33 50 75 74 56 61 72 69 6e 74 28 qlite3PutVarint(
42d0: 70 2c 20 76 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 p, v);.}../*.**
42e0: 52 65 61 64 20 61 20 36 34 2d 62 69 74 20 76 61 Read a 64-bit va
42f0: 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69 6e riable-length in
4300: 74 65 67 65 72 20 66 72 6f 6d 20 6d 65 6d 6f 72 teger from memor
4310: 79 20 73 74 61 72 74 69 6e 67 20 61 74 20 70 5b y starting at p[
4320: 30 5d 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 0]..** Return th
4330: 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 e number of byte
4340: 73 20 72 65 61 64 2e 20 20 54 68 65 20 76 61 6c s read. The val
4350: 75 65 20 69 73 20 73 74 6f 72 65 64 20 69 6e 20 ue is stored in
4360: 2a 76 2e 0a 2a 2f 0a 75 38 20 73 71 6c 69 74 65 *v..*/.u8 sqlite
4370: 33 47 65 74 56 61 72 69 6e 74 28 63 6f 6e 73 74 3GetVarint(const
4380: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a unsigned char *
4390: 70 2c 20 75 36 34 20 2a 76 29 7b 0a 20 20 75 33 p, u64 *v){. u3
43a0: 32 20 61 2c 62 2c 73 3b 0a 0a 20 20 61 20 3d 20 2 a,b,s;.. a =
43b0: 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 30 20 28 *p;. /* a: p0 (
43c0: 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 unmasked) */. i
43d0: 66 20 28 21 28 61 26 30 78 38 30 29 29 0a 20 20 f (!(a&0x80)).
43e0: 7b 0a 20 20 20 20 2a 76 20 3d 20 61 3b 0a 20 20 {. *v = a;.
43f0: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a return 1;. }.
4400: 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 2a 70 . p++;. b = *p
4410: 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 20 28 75 6e ;. /* b: p1 (un
4420: 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 masked) */. if
4430: 28 21 28 62 26 30 78 38 30 29 29 0a 20 20 7b 0a (!(b&0x80)). {.
4440: 20 20 20 20 61 20 26 3d 20 30 78 37 66 3b 0a 20 a &= 0x7f;.
4450: 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 a = a<<7;.
4460: 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 2a 76 20 a |= b;. *v
4470: 3d 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 = a;. return
4480: 32 3b 0a 20 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 2;. }.. p++;.
4490: 20 61 20 3d 20 61 3c 3c 31 34 3b 0a 20 20 61 20 a = a<<14;. a
44a0: 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 |= *p;. /* a: p
44b0: 30 3c 3c 31 34 20 7c 20 70 32 20 28 75 6e 6d 61 0<<14 | p2 (unma
44c0: 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 sked) */. if (!
44d0: 28 61 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 (a&0x80)). {.
44e0: 20 20 61 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 a &= (0x7f<<14
44f0: 29 7c 28 30 78 37 66 29 3b 0a 20 20 20 20 62 20 )|(0x7f);. b
4500: 26 3d 20 30 78 37 66 3b 0a 20 20 20 20 62 20 3d &= 0x7f;. b =
4510: 20 62 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 b<<7;. a |=
4520: 62 3b 0a 20 20 20 20 2a 76 20 3d 20 61 3b 0a 20 b;. *v = a;.
4530: 20 20 20 72 65 74 75 72 6e 20 33 3b 0a 20 20 7d return 3;. }
4540: 0a 0a 20 20 2f 2a 20 43 53 45 31 20 66 72 6f 6d .. /* CSE1 from
4550: 20 62 65 6c 6f 77 20 2a 2f 0a 20 20 61 20 26 3d below */. a &=
4560: 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 (0x7f<<14)|(0x7
4570: 66 29 3b 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d f);. p++;. b =
4580: 20 62 3c 3c 31 34 3b 0a 20 20 62 20 7c 3d 20 2a b<<14;. b |= *
4590: 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 3c 3c 31 p;. /* b: p1<<1
45a0: 34 20 7c 20 70 33 20 28 75 6e 6d 61 73 6b 65 64 4 | p3 (unmasked
45b0: 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 62 26 30 ) */. if (!(b&0
45c0: 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 62 20 x80)). {. b
45d0: 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 &= (0x7f<<14)|(0
45e0: 78 37 66 29 3b 0a 20 20 20 20 2f 2a 20 6d 6f 76 x7f);. /* mov
45f0: 65 64 20 43 53 45 31 20 75 70 20 2a 2f 0a 20 20 ed CSE1 up */.
4600: 20 20 2f 2a 20 61 20 26 3d 20 28 30 78 37 66 3c /* a &= (0x7f<
4610: 3c 31 34 29 7c 28 30 78 37 66 29 3b 20 2a 2f 0a <14)|(0x7f); */.
4620: 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 a = a<<7;.
4630: 20 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 2a 76 a |= b;. *v
4640: 20 3d 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e = a;. return
4650: 20 34 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 61 3a 4;. }.. /* a:
4660: 20 70 30 3c 3c 31 34 20 7c 20 70 32 20 28 6d 61 p0<<14 | p2 (ma
4670: 73 6b 65 64 29 20 2a 2f 0a 20 20 2f 2a 20 62 3a sked) */. /* b:
4680: 20 70 31 3c 3c 31 34 20 7c 20 70 33 20 28 75 6e p1<<14 | p3 (un
4690: 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 2f 2a 20 masked) */. /*
46a0: 31 3a 73 61 76 65 20 6f 66 66 20 70 30 3c 3c 32 1:save off p0<<2
46b0: 31 20 7c 20 70 31 3c 3c 31 34 20 7c 20 70 32 3c 1 | p1<<14 | p2<
46c0: 3c 37 20 7c 20 70 33 20 28 6d 61 73 6b 65 64 29 <7 | p3 (masked)
46d0: 20 2a 2f 0a 20 20 2f 2a 20 6d 6f 76 65 64 20 43 */. /* moved C
46e0: 53 45 31 20 75 70 20 2a 2f 0a 20 20 2f 2a 20 61 SE1 up */. /* a
46f0: 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 &= (0x7f<<14)|(
4700: 30 78 37 66 29 3b 20 2a 2f 0a 20 20 62 20 26 3d 0x7f); */. b &=
4710: 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 (0x7f<<14)|(0x7
4720: 66 29 3b 0a 20 20 73 20 3d 20 61 3b 0a 20 20 2f f);. s = a;. /
4730: 2a 20 73 3a 20 70 30 3c 3c 31 34 20 7c 20 70 32 * s: p0<<14 | p2
4740: 20 28 6d 61 73 6b 65 64 29 20 2a 2f 0a 0a 20 20 (masked) */..
4750: 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c 3c 31 34 p++;. a = a<<14
4760: 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a 20 20 2f ;. a |= *p;. /
4770: 2a 20 61 3a 20 70 30 3c 3c 32 38 20 7c 20 70 32 * a: p0<<28 | p2
4780: 3c 3c 31 34 20 7c 20 70 34 20 28 75 6e 6d 61 73 <<14 | p4 (unmas
4790: 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 ked) */. if (!(
47a0: 61 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 a&0x80)). {.
47b0: 20 2f 2a 20 77 65 20 63 61 6e 20 73 6b 69 70 20 /* we can skip
47c0: 74 68 65 73 65 20 63 61 75 73 65 20 74 68 65 79 these cause they
47d0: 20 77 65 72 65 20 28 65 66 66 65 63 74 69 76 65 were (effective
47e0: 6c 79 29 20 64 6f 6e 65 20 61 62 6f 76 65 20 69 ly) done above i
47f0: 6e 20 63 61 6c 63 27 69 6e 67 20 73 20 2a 2f 0a n calc'ing s */.
4800: 20 20 20 20 2f 2a 20 61 20 26 3d 20 28 30 78 37 /* a &= (0x7
4810: 66 3c 3c 32 38 29 7c 28 30 78 37 66 3c 3c 31 34 f<<28)|(0x7f<<14
4820: 29 7c 28 30 78 37 66 29 3b 20 2a 2f 0a 20 20 20 )|(0x7f); */.
4830: 20 2f 2a 20 62 20 26 3d 20 28 30 78 37 66 3c 3c /* b &= (0x7f<<
4840: 31 34 29 7c 28 30 78 37 66 29 3b 20 2a 2f 0a 20 14)|(0x7f); */.
4850: 20 20 20 62 20 3d 20 62 3c 3c 37 3b 0a 20 20 20 b = b<<7;.
4860: 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 73 20 3d a |= b;. s =
4870: 20 73 3e 3e 31 38 3b 0a 20 20 20 20 2a 76 20 3d s>>18;. *v =
4880: 20 28 28 75 36 34 29 73 29 3c 3c 33 32 20 7c 20 ((u64)s)<<32 |
4890: 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 35 3b a;. return 5;
48a0: 0a 20 20 7d 0a 0a 20 20 2f 2a 20 32 3a 73 61 76 . }.. /* 2:sav
48b0: 65 20 6f 66 66 20 70 30 3c 3c 32 31 20 7c 20 70 e off p0<<21 | p
48c0: 31 3c 3c 31 34 20 7c 20 70 32 3c 3c 37 20 7c 20 1<<14 | p2<<7 |
48d0: 70 33 20 28 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 p3 (masked) */.
48e0: 20 73 20 3d 20 73 3c 3c 37 3b 0a 20 20 73 20 7c s = s<<7;. s |
48f0: 3d 20 62 3b 0a 20 20 2f 2a 20 73 3a 20 70 30 3c = b;. /* s: p0<
4900: 3c 32 31 20 7c 20 70 31 3c 3c 31 34 20 7c 20 70 <21 | p1<<14 | p
4910: 32 3c 3c 37 20 7c 20 70 33 20 28 6d 61 73 6b 65 2<<7 | p3 (maske
4920: 64 29 20 2a 2f 0a 0a 20 20 70 2b 2b 3b 0a 20 20 d) */.. p++;.
4930: 62 20 3d 20 62 3c 3c 31 34 3b 0a 20 20 62 20 7c b = b<<14;. b |
4940: 3d 20 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 = *p;. /* b: p1
4950: 3c 3c 32 38 20 7c 20 70 33 3c 3c 31 34 20 7c 20 <<28 | p3<<14 |
4960: 70 35 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f p5 (unmasked) */
4970: 0a 20 20 69 66 20 28 21 28 62 26 30 78 38 30 29 . if (!(b&0x80)
4980: 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 77 65 20 ). {. /* we
4990: 63 61 6e 20 73 6b 69 70 20 74 68 69 73 20 63 61 can skip this ca
49a0: 75 73 65 20 69 74 20 77 61 73 20 28 65 66 66 65 use it was (effe
49b0: 63 74 69 76 65 6c 79 29 20 64 6f 6e 65 20 61 62 ctively) done ab
49c0: 6f 76 65 20 69 6e 20 63 61 6c 63 27 69 6e 67 20 ove in calc'ing
49d0: 73 20 2a 2f 0a 20 20 20 20 2f 2a 20 62 20 26 3d s */. /* b &=
49e0: 20 28 30 78 37 66 3c 3c 32 38 29 7c 28 30 78 37 (0x7f<<28)|(0x7
49f0: 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 20 2a f<<14)|(0x7f); *
4a00: 2f 0a 20 20 20 20 61 20 26 3d 20 28 30 78 37 66 /. a &= (0x7f
4a10: 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 0a 20 20 <<14)|(0x7f);.
4a20: 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 20 a = a<<7;.
4a30: 61 20 7c 3d 20 62 3b 0a 20 20 20 20 73 20 3d 20 a |= b;. s =
4a40: 73 3e 3e 31 38 3b 0a 20 20 20 20 2a 76 20 3d 20 s>>18;. *v =
4a50: 28 28 75 36 34 29 73 29 3c 3c 33 32 20 7c 20 61 ((u64)s)<<32 | a
4a60: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 36 3b 0a ;. return 6;.
4a70: 20 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 20 61 20 }.. p++;. a
4a80: 3d 20 61 3c 3c 31 34 3b 0a 20 20 61 20 7c 3d 20 = a<<14;. a |=
4a90: 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 32 3c 3c *p;. /* a: p2<<
4aa0: 32 38 20 7c 20 70 34 3c 3c 31 34 20 7c 20 70 36 28 | p4<<14 | p6
4ab0: 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 (unmasked) */.
4ac0: 20 69 66 20 28 21 28 61 26 30 78 38 30 29 29 0a if (!(a&0x80)).
4ad0: 20 20 7b 0a 20 20 20 20 61 20 26 3d 20 28 30 78 {. a &= (0x
4ae0: 31 66 3c 3c 32 38 29 7c 28 30 78 37 66 3c 3c 31 1f<<28)|(0x7f<<1
4af0: 34 29 7c 28 30 78 37 66 29 3b 0a 20 20 20 20 62 4)|(0x7f);. b
4b00: 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 &= (0x7f<<14)|(
4b10: 30 78 37 66 29 3b 0a 20 20 20 20 62 20 3d 20 62 0x7f);. b = b
4b20: 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 62 3b <<7;. a |= b;
4b30: 0a 20 20 20 20 73 20 3d 20 73 3e 3e 31 31 3b 0a . s = s>>11;.
4b40: 20 20 20 20 2a 76 20 3d 20 28 28 75 36 34 29 73 *v = ((u64)s
4b50: 29 3c 3c 33 32 20 7c 20 61 3b 0a 20 20 20 20 72 )<<32 | a;. r
4b60: 65 74 75 72 6e 20 37 3b 0a 20 20 7d 0a 0a 20 20 eturn 7;. }..
4b70: 2f 2a 20 43 53 45 32 20 66 72 6f 6d 20 62 65 6c /* CSE2 from bel
4b80: 6f 77 20 2a 2f 0a 20 20 61 20 26 3d 20 28 30 78 ow */. a &= (0x
4b90: 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 0a 7f<<14)|(0x7f);.
4ba0: 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 62 3c 3c p++;. b = b<<
4bb0: 31 34 3b 0a 20 20 62 20 7c 3d 20 2a 70 3b 0a 20 14;. b |= *p;.
4bc0: 20 2f 2a 20 62 3a 20 70 33 3c 3c 32 38 20 7c 20 /* b: p3<<28 |
4bd0: 70 35 3c 3c 31 34 20 7c 20 70 37 20 28 75 6e 6d p5<<14 | p7 (unm
4be0: 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 asked) */. if (
4bf0: 21 28 62 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 !(b&0x80)). {.
4c00: 20 20 20 62 20 26 3d 20 28 30 78 31 66 3c 3c 32 b &= (0x1f<<2
4c10: 38 29 7c 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 8)|(0x7f<<14)|(0
4c20: 78 37 66 29 3b 0a 20 20 20 20 2f 2a 20 6d 6f 76 x7f);. /* mov
4c30: 65 64 20 43 53 45 32 20 75 70 20 2a 2f 0a 20 20 ed CSE2 up */.
4c40: 20 20 2f 2a 20 61 20 26 3d 20 28 30 78 37 66 3c /* a &= (0x7f<
4c50: 3c 31 34 29 7c 28 30 78 37 66 29 3b 20 2a 2f 0a <14)|(0x7f); */.
4c60: 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 a = a<<7;.
4c70: 20 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 73 20 a |= b;. s
4c80: 3d 20 73 3e 3e 34 3b 0a 20 20 20 20 2a 76 20 3d = s>>4;. *v =
4c90: 20 28 28 75 36 34 29 73 29 3c 3c 33 32 20 7c 20 ((u64)s)<<32 |
4ca0: 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 38 3b a;. return 8;
4cb0: 0a 20 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 20 61 . }.. p++;. a
4cc0: 20 3d 20 61 3c 3c 31 35 3b 0a 20 20 61 20 7c 3d = a<<15;. a |=
4cd0: 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 34 3c *p;. /* a: p4<
4ce0: 3c 32 39 20 7c 20 70 36 3c 3c 31 35 20 7c 20 70 <29 | p6<<15 | p
4cf0: 38 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 8 (unmasked) */.
4d00: 0a 20 20 2f 2a 20 6d 6f 76 65 64 20 43 53 45 32 . /* moved CSE2
4d10: 20 75 70 20 2a 2f 0a 20 20 2f 2a 20 61 20 26 3d up */. /* a &=
4d20: 20 28 30 78 37 66 3c 3c 32 39 29 7c 28 30 78 37 (0x7f<<29)|(0x7
4d30: 66 3c 3c 31 35 29 7c 28 30 78 66 66 29 3b 20 2a f<<15)|(0xff); *
4d40: 2f 0a 20 20 62 20 26 3d 20 28 30 78 37 66 3c 3c /. b &= (0x7f<<
4d50: 31 34 29 7c 28 30 78 37 66 29 3b 0a 20 20 62 20 14)|(0x7f);. b
4d60: 3d 20 62 3c 3c 38 3b 0a 20 20 61 20 7c 3d 20 62 = b<<8;. a |= b
4d70: 3b 0a 0a 20 20 73 20 3d 20 73 3c 3c 34 3b 0a 20 ;.. s = s<<4;.
4d80: 20 62 20 3d 20 70 5b 2d 34 5d 3b 0a 20 20 62 20 b = p[-4];. b
4d90: 26 3d 20 30 78 37 66 3b 0a 20 20 62 20 3d 20 62 &= 0x7f;. b = b
4da0: 3e 3e 33 3b 0a 20 20 73 20 7c 3d 20 62 3b 0a 0a >>3;. s |= b;..
4db0: 20 20 2a 76 20 3d 20 28 28 75 36 34 29 73 29 3c *v = ((u64)s)<
4dc0: 3c 33 32 20 7c 20 61 3b 0a 0a 20 20 72 65 74 75 <32 | a;.. retu
4dd0: 72 6e 20 39 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 rn 9;.}../*.** R
4de0: 65 61 64 20 61 20 33 32 2d 62 69 74 20 76 61 72 ead a 32-bit var
4df0: 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69 6e 74 iable-length int
4e00: 65 67 65 72 20 66 72 6f 6d 20 6d 65 6d 6f 72 79 eger from memory
4e10: 20 73 74 61 72 74 69 6e 67 20 61 74 20 70 5b 30 starting at p[0
4e20: 5d 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 ]..** Return the
4e30: 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 number of bytes
4e40: 20 72 65 61 64 2e 20 20 54 68 65 20 76 61 6c 75 read. The valu
4e50: 65 20 69 73 20 73 74 6f 72 65 64 20 69 6e 20 2a e is stored in *
4e60: 76 2e 0a 2a 2a 20 41 20 4d 41 43 52 4f 20 76 65 v..** A MACRO ve
4e70: 72 73 69 6f 6e 2c 20 67 65 74 56 61 72 69 6e 74 rsion, getVarint
4e80: 33 32 2c 20 69 73 20 70 72 6f 76 69 64 65 64 20 32, is provided
4e90: 77 68 69 63 68 20 69 6e 6c 69 6e 65 73 20 74 68 which inlines th
4ea0: 65 20 0a 2a 2a 20 73 69 6e 67 6c 65 2d 62 79 74 e .** single-byt
4eb0: 65 20 63 61 73 65 2e 20 20 41 6c 6c 20 63 6f 64 e case. All cod
4ec0: 65 20 73 68 6f 75 6c 64 20 75 73 65 20 74 68 65 e should use the
4ed0: 20 4d 41 43 52 4f 20 76 65 72 73 69 6f 6e 20 61 MACRO version a
4ee0: 73 20 0a 2a 2a 20 74 68 69 73 20 66 75 6e 63 74 s .** this funct
4ef0: 69 6f 6e 20 61 73 73 75 6d 65 73 20 74 68 65 20 ion assumes the
4f00: 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 61 73 65 single-byte case
4f10: 20 68 61 73 20 61 6c 72 65 61 64 79 20 62 65 65 has already bee
4f20: 6e 20 68 61 6e 64 6c 65 64 2e 0a 2a 2f 0a 75 38 n handled..*/.u8
4f30: 20 73 71 6c 69 74 65 33 47 65 74 56 61 72 69 6e sqlite3GetVarin
4f40: 74 33 32 28 63 6f 6e 73 74 20 75 6e 73 69 67 6e t32(const unsign
4f50: 65 64 20 63 68 61 72 20 2a 70 2c 20 75 33 32 20 ed char *p, u32
4f60: 2a 76 29 7b 0a 20 20 75 33 32 20 61 2c 62 3b 0a *v){. u32 a,b;.
4f70: 0a 20 20 61 20 3d 20 2a 70 3b 0a 20 20 2f 2a 20 . a = *p;. /*
4f80: 61 3a 20 70 30 20 28 75 6e 6d 61 73 6b 65 64 29 a: p0 (unmasked)
4f90: 20 2a 2f 0a 23 69 66 6e 64 65 66 20 67 65 74 56 */.#ifndef getV
4fa0: 61 72 69 6e 74 33 32 0a 20 20 69 66 20 28 21 28 arint32. if (!(
4fb0: 61 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 a&0x80)). {.
4fc0: 20 2a 76 20 3d 20 61 3b 0a 20 20 20 20 72 65 74 *v = a;. ret
4fd0: 75 72 6e 20 31 3b 0a 20 20 7d 0a 23 65 6e 64 69 urn 1;. }.#endi
4fe0: 66 0a 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 f.. p++;. b =
4ff0: 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 20 28 *p;. /* b: p1 (
5000: 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 unmasked) */. i
5010: 66 20 28 21 28 62 26 30 78 38 30 29 29 0a 20 20 f (!(b&0x80)).
5020: 7b 0a 20 20 20 20 61 20 26 3d 20 30 78 37 66 3b {. a &= 0x7f;
5030: 0a 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 . a = a<<7;.
5040: 20 20 20 2a 76 20 3d 20 61 20 7c 20 62 3b 0a 20 *v = a | b;.
5050: 20 20 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 7d return 2;. }
5060: 0a 0a 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 .. p++;. a = a
5070: 3c 3c 31 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b <<14;. a |= *p;
5080: 0a 20 20 2f 2a 20 61 3a 20 70 30 3c 3c 31 34 20 . /* a: p0<<14
5090: 7c 20 70 32 20 28 75 6e 6d 61 73 6b 65 64 29 20 | p2 (unmasked)
50a0: 2a 2f 0a 20 20 69 66 20 28 21 28 61 26 30 78 38 */. if (!(a&0x8
50b0: 30 29 29 0a 20 20 7b 0a 20 20 20 20 61 20 26 3d 0)). {. a &=
50c0: 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 (0x7f<<14)|(0x7
50d0: 66 29 3b 0a 20 20 20 20 62 20 26 3d 20 30 78 37 f);. b &= 0x7
50e0: 66 3b 0a 20 20 20 20 62 20 3d 20 62 3c 3c 37 3b f;. b = b<<7;
50f0: 0a 20 20 20 20 2a 76 20 3d 20 61 20 7c 20 62 3b . *v = a | b;
5100: 0a 20 20 20 20 72 65 74 75 72 6e 20 33 3b 0a 20 . return 3;.
5110: 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d }.. p++;. b =
5120: 20 62 3c 3c 31 34 3b 0a 20 20 62 20 7c 3d 20 2a b<<14;. b |= *
5130: 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 3c 3c 31 p;. /* b: p1<<1
5140: 34 20 7c 20 70 33 20 28 75 6e 6d 61 73 6b 65 64 4 | p3 (unmasked
5150: 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 62 26 30 ) */. if (!(b&0
5160: 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 62 20 x80)). {. b
5170: 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 &= (0x7f<<14)|(0
5180: 78 37 66 29 3b 0a 20 20 20 20 61 20 26 3d 20 28 x7f);. a &= (
5190: 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 0x7f<<14)|(0x7f)
51a0: 3b 0a 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a ;. a = a<<7;.
51b0: 20 20 20 20 2a 76 20 3d 20 61 20 7c 20 62 3b 0a *v = a | b;.
51c0: 20 20 20 20 72 65 74 75 72 6e 20 34 3b 0a 20 20 return 4;.
51d0: 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 }.. p++;. a =
51e0: 61 3c 3c 31 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 a<<14;. a |= *p
51f0: 3b 0a 20 20 2f 2a 20 61 3a 20 70 30 3c 3c 32 38 ;. /* a: p0<<28
5200: 20 7c 20 70 32 3c 3c 31 34 20 7c 20 70 34 20 28 | p2<<14 | p4 (
5210: 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 unmasked) */. i
5220: 66 20 28 21 28 61 26 30 78 38 30 29 29 0a 20 20 f (!(a&0x80)).
5230: 7b 0a 20 20 20 20 61 20 26 3d 20 28 30 78 31 66 {. a &= (0x1f
5240: 3c 3c 32 38 29 7c 28 30 78 37 66 3c 3c 31 34 29 <<28)|(0x7f<<14)
5250: 7c 28 30 78 37 66 29 3b 0a 20 20 20 20 62 20 26 |(0x7f);. b &
5260: 3d 20 28 30 78 31 66 3c 3c 32 38 29 7c 28 30 78 = (0x1f<<28)|(0x
5270: 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 0a 7f<<14)|(0x7f);.
5280: 20 20 20 20 62 20 3d 20 62 3c 3c 37 3b 0a 20 20 b = b<<7;.
5290: 20 20 2a 76 20 3d 20 61 20 7c 20 62 3b 0a 20 20 *v = a | b;.
52a0: 20 20 72 65 74 75 72 6e 20 35 3b 0a 20 20 7d 0a return 5;. }.
52b0: 0a 20 20 2f 2a 20 57 65 20 63 61 6e 20 6f 6e 6c . /* We can onl
52c0: 79 20 72 65 61 63 68 20 74 68 69 73 20 70 6f 69 y reach this poi
52d0: 6e 74 20 77 68 65 6e 20 72 65 61 64 69 6e 67 20 nt when reading
52e0: 61 20 63 6f 72 72 75 70 74 20 64 61 74 61 62 61 a corrupt databa
52f0: 73 65 0a 20 20 2a 2a 20 66 69 6c 65 2e 20 20 49 se. ** file. I
5300: 6e 20 74 68 61 74 20 63 61 73 65 20 77 65 20 61 n that case we a
5310: 72 65 20 6e 6f 74 20 69 6e 20 61 6e 79 20 68 75 re not in any hu
5320: 72 72 79 2e 20 20 55 73 65 20 74 68 65 20 28 72 rry. Use the (r
5330: 65 6c 61 74 69 76 65 6c 79 0a 20 20 2a 2a 20 73 elatively. ** s
5340: 6c 6f 77 29 20 67 65 6e 65 72 61 6c 2d 70 75 72 low) general-pur
5350: 70 6f 73 65 20 73 71 6c 69 74 65 33 47 65 74 56 pose sqlite3GetV
5360: 61 72 69 6e 74 28 29 20 72 6f 75 74 69 6e 65 20 arint() routine
5370: 74 6f 20 65 78 74 72 61 63 74 20 74 68 65 0a 20 to extract the.
5380: 20 2a 2a 20 76 61 6c 75 65 2e 20 2a 2f 0a 20 20 ** value. */.
5390: 7b 0a 20 20 20 20 75 36 34 20 76 36 34 3b 0a 20 {. u64 v64;.
53a0: 20 20 20 75 38 20 6e 3b 0a 0a 20 20 20 20 70 20 u8 n;.. p
53b0: 2d 3d 20 34 3b 0a 20 20 20 20 6e 20 3d 20 73 71 -= 4;. n = sq
53c0: 6c 69 74 65 33 47 65 74 56 61 72 69 6e 74 28 70 lite3GetVarint(p
53d0: 2c 20 26 76 36 34 29 3b 0a 20 20 20 20 61 73 73 , &v64);. ass
53e0: 65 72 74 28 20 6e 3e 35 20 26 26 20 6e 3c 3d 39 ert( n>5 && n<=9
53f0: 20 29 3b 0a 20 20 20 20 2a 76 20 3d 20 28 75 33 );. *v = (u3
5400: 32 29 76 36 34 3b 0a 20 20 20 20 72 65 74 75 72 2)v64;. retur
5410: 6e 20 6e 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a n n;. }.}../*.*
5420: 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d * Return the num
5430: 62 65 72 20 6f 66 20 62 79 74 65 73 20 74 68 61 ber of bytes tha
5440: 74 20 77 69 6c 6c 20 62 65 20 6e 65 65 64 65 64 t will be needed
5450: 20 74 6f 20 73 74 6f 72 65 20 74 68 65 20 67 69 to store the gi
5460: 76 65 6e 0a 2a 2a 20 36 34 2d 62 69 74 20 69 6e ven.** 64-bit in
5470: 74 65 67 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 teger..*/.int sq
5480: 6c 69 74 65 33 56 61 72 69 6e 74 4c 65 6e 28 75 lite3VarintLen(u
5490: 36 34 20 76 29 7b 0a 20 20 69 6e 74 20 69 20 3d 64 v){. int i =
54a0: 20 30 3b 0a 20 20 64 6f 7b 0a 20 20 20 20 69 2b 0;. do{. i+
54b0: 2b 3b 0a 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a +;. v >>= 7;.
54c0: 20 20 7d 77 68 69 6c 65 28 20 76 21 3d 30 20 26 }while( v!=0 &
54d0: 26 20 69 3c 39 20 29 3b 0a 20 20 72 65 74 75 72 & i<9 );. retur
54e0: 6e 20 69 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 52 n i;.}.../*.** R
54f0: 65 61 64 20 6f 72 20 77 72 69 74 65 20 61 20 66 ead or write a f
5500: 6f 75 72 2d 62 79 74 65 20 62 69 67 2d 65 6e 64 our-byte big-end
5510: 69 61 6e 20 69 6e 74 65 67 65 72 20 76 61 6c 75 ian integer valu
5520: 65 2e 0a 2a 2f 0a 75 33 32 20 73 71 6c 69 74 65 e..*/.u32 sqlite
5530: 33 47 65 74 34 62 79 74 65 28 63 6f 6e 73 74 20 3Get4byte(const
5540: 75 38 20 2a 70 29 7b 0a 20 20 72 65 74 75 72 6e u8 *p){. return
5550: 20 28 70 5b 30 5d 3c 3c 32 34 29 20 7c 20 28 70 (p[0]<<24) | (p
5560: 5b 31 5d 3c 3c 31 36 29 20 7c 20 28 70 5b 32 5d [1]<<16) | (p[2]
5570: 3c 3c 38 29 20 7c 20 70 5b 33 5d 3b 0a 7d 0a 76 <<8) | p[3];.}.v
5580: 6f 69 64 20 73 71 6c 69 74 65 33 50 75 74 34 62 oid sqlite3Put4b
5590: 79 74 65 28 75 6e 73 69 67 6e 65 64 20 63 68 61 yte(unsigned cha
55a0: 72 20 2a 70 2c 20 75 33 32 20 76 29 7b 0a 20 20 r *p, u32 v){.
55b0: 70 5b 30 5d 20 3d 20 28 75 38 29 28 76 3e 3e 32 p[0] = (u8)(v>>2
55c0: 34 29 3b 0a 20 20 70 5b 31 5d 20 3d 20 28 75 38 4);. p[1] = (u8
55d0: 29 28 76 3e 3e 31 36 29 3b 0a 20 20 70 5b 32 5d )(v>>16);. p[2]
55e0: 20 3d 20 28 75 38 29 28 76 3e 3e 38 29 3b 0a 20 = (u8)(v>>8);.
55f0: 20 70 5b 33 5d 20 3d 20 28 75 38 29 76 3b 0a 7d p[3] = (u8)v;.}
5600: 0a 0a 0a 0a 23 69 66 20 21 64 65 66 69 6e 65 64 ....#if !defined
5610: 28 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 42 4c 4f (SQLITE_OMIT_BLO
5620: 42 5f 4c 49 54 45 52 41 4c 29 20 7c 7c 20 64 65 B_LITERAL) || de
5630: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 48 41 53 fined(SQLITE_HAS
5640: 5f 43 4f 44 45 43 29 0a 2f 2a 0a 2a 2a 20 54 72 _CODEC)./*.** Tr
5650: 61 6e 73 6c 61 74 65 20 61 20 73 69 6e 67 6c 65 anslate a single
5660: 20 62 79 74 65 20 6f 66 20 48 65 78 20 69 6e 74 byte of Hex int
5670: 6f 20 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a 2a o an integer..**
5680: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 6e 20 6f This routinen o
5690: 6e 6c 79 20 77 6f 72 6b 73 20 69 66 20 68 20 72 nly works if h r
56a0: 65 61 6c 6c 79 20 69 73 20 61 20 76 61 6c 69 64 eally is a valid
56b0: 20 68 65 78 61 64 65 63 69 6d 61 6c 0a 2a 2a 20 hexadecimal.**
56c0: 63 68 61 72 61 63 74 65 72 3a 20 20 30 2e 2e 39 character: 0..9
56d0: 61 2e 2e 66 41 2e 2e 46 0a 2a 2f 0a 73 74 61 74 a..fA..F.*/.stat
56e0: 69 63 20 75 38 20 68 65 78 54 6f 49 6e 74 28 69 ic u8 hexToInt(i
56f0: 6e 74 20 68 29 7b 0a 20 20 61 73 73 65 72 74 28 nt h){. assert(
5700: 20 28 68 3e 3d 27 30 27 20 26 26 20 68 3c 3d 27 (h>='0' && h<='
5710: 39 27 29 20 7c 7c 20 20 28 68 3e 3d 27 61 27 20 9') || (h>='a'
5720: 26 26 20 68 3c 3d 27 66 27 29 20 7c 7c 20 20 28 && h<='f') || (
5730: 68 3e 3d 27 41 27 20 26 26 20 68 3c 3d 27 46 27 h>='A' && h<='F'
5740: 29 20 29 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 ) );.#ifdef SQLI
5750: 54 45 5f 41 53 43 49 49 0a 20 20 68 20 2b 3d 20 TE_ASCII. h +=
5760: 39 2a 28 31 26 28 68 3e 3e 36 29 29 3b 0a 23 65 9*(1&(h>>6));.#e
5770: 6e 64 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49 ndif.#ifdef SQLI
5780: 54 45 5f 45 42 43 44 49 43 0a 20 20 68 20 2b 3d TE_EBCDIC. h +=
5790: 20 39 2a 28 31 26 7e 28 68 3e 3e 34 29 29 3b 0a 9*(1&~(h>>4));.
57a0: 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 6e 20 #endif. return
57b0: 28 75 38 29 28 68 20 26 20 30 78 66 29 3b 0a 7d (u8)(h & 0xf);.}
57c0: 0a 23 65 6e 64 69 66 20 2f 2a 20 21 53 51 4c 49 .#endif /* !SQLI
57d0: 54 45 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 TE_OMIT_BLOB_LIT
57e0: 45 52 41 4c 20 7c 7c 20 53 51 4c 49 54 45 5f 48 ERAL || SQLITE_H
57f0: 41 53 5f 43 4f 44 45 43 20 2a 2f 0a 0a 23 69 66 AS_CODEC */..#if
5800: 20 21 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 !defined(SQLITE
5810: 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 45 52 _OMIT_BLOB_LITER
5820: 41 4c 29 20 7c 7c 20 64 65 66 69 6e 65 64 28 53 AL) || defined(S
5830: 51 4c 49 54 45 5f 48 41 53 5f 43 4f 44 45 43 29 QLITE_HAS_CODEC)
5840: 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 61 ./*.** Convert a
5850: 20 42 4c 4f 42 20 6c 69 74 65 72 61 6c 20 6f 66 BLOB literal of
5860: 20 74 68 65 20 66 6f 72 6d 20 22 78 27 68 68 68 the form "x'hhh
5870: 68 68 68 27 22 20 69 6e 74 6f 20 69 74 73 20 62 hhh'" into its b
5880: 69 6e 61 72 79 0a 2a 2a 20 76 61 6c 75 65 2e 20 inary.** value.
5890: 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 Return a pointe
58a0: 72 20 74 6f 20 69 74 73 20 62 69 6e 61 72 79 20 r to its binary
58b0: 76 61 6c 75 65 2e 20 20 53 70 61 63 65 20 74 6f value. Space to
58c0: 20 68 6f 6c 64 20 74 68 65 0a 2a 2a 20 62 69 6e hold the.** bin
58d0: 61 72 79 20 76 61 6c 75 65 20 68 61 73 20 62 65 ary value has be
58e0: 65 6e 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d en obtained from
58f0: 20 6d 61 6c 6c 6f 63 20 61 6e 64 20 6d 75 73 74 malloc and must
5900: 20 62 65 20 66 72 65 65 64 20 62 79 0a 2a 2a 20 be freed by.**
5910: 74 68 65 20 63 61 6c 6c 69 6e 67 20 72 6f 75 74 the calling rout
5920: 69 6e 65 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73 71 ine..*/.void *sq
5930: 6c 69 74 65 33 48 65 78 54 6f 42 6c 6f 62 28 73 lite3HexToBlob(s
5940: 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 qlite3 *db, cons
5950: 74 20 63 68 61 72 20 2a 7a 2c 20 69 6e 74 20 6e t char *z, int n
5960: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 42 6c 6f 62 ){. char *zBlob
5970: 3b 0a 20 20 69 6e 74 20 69 3b 0a 0a 20 20 7a 42 ;. int i;.. zB
5980: 6c 6f 62 20 3d 20 28 63 68 61 72 20 2a 29 73 71 lob = (char *)sq
5990: 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 52 61 77 lite3DbMallocRaw
59a0: 28 64 62 2c 20 6e 2f 32 20 2b 20 31 29 3b 0a 20 (db, n/2 + 1);.
59b0: 20 6e 2d 2d 3b 0a 20 20 69 66 28 20 7a 42 6c 6f n--;. if( zBlo
59c0: 62 20 29 7b 0a 20 20 20 20 66 6f 72 28 69 3d 30 b ){. for(i=0
59d0: 3b 20 69 3c 6e 3b 20 69 2b 3d 32 29 7b 0a 20 20 ; i<n; i+=2){.
59e0: 20 20 20 20 7a 42 6c 6f 62 5b 69 2f 32 5d 20 3d zBlob[i/2] =
59f0: 20 28 68 65 78 54 6f 49 6e 74 28 7a 5b 69 5d 29 (hexToInt(z[i])
5a00: 3c 3c 34 29 20 7c 20 68 65 78 54 6f 49 6e 74 28 <<4) | hexToInt(
5a10: 7a 5b 69 2b 31 5d 29 3b 0a 20 20 20 20 7d 0a 20 z[i+1]);. }.
5a20: 20 20 20 7a 42 6c 6f 62 5b 69 2f 32 5d 20 3d 20 zBlob[i/2] =
5a30: 30 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 0;. }. return
5a40: 7a 42 6c 6f 62 3b 0a 7d 0a 23 65 6e 64 69 66 20 zBlob;.}.#endif
5a50: 2f 2a 20 21 53 51 4c 49 54 45 5f 4f 4d 49 54 5f /* !SQLITE_OMIT_
5a60: 42 4c 4f 42 5f 4c 49 54 45 52 41 4c 20 7c 7c 20 BLOB_LITERAL ||
5a70: 53 51 4c 49 54 45 5f 48 41 53 5f 43 4f 44 45 43 SQLITE_HAS_CODEC
5a80: 20 2a 2f 0a 0a 0a 2f 2a 0a 2a 2a 20 43 68 61 6e */.../*.** Chan
5a90: 67 65 20 74 68 65 20 73 71 6c 69 74 65 2e 6d 61 ge the sqlite.ma
5aa0: 67 69 63 20 66 72 6f 6d 20 53 51 4c 49 54 45 5f gic from SQLITE_
5ab0: 4d 41 47 49 43 5f 4f 50 45 4e 20 74 6f 20 53 51 MAGIC_OPEN to SQ
5ac0: 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 53 59 2e LITE_MAGIC_BUSY.
5ad0: 0a 2a 2a 20 52 65 74 75 72 6e 20 61 6e 20 65 72 .** Return an er
5ae0: 72 6f 72 20 28 6e 6f 6e 2d 7a 65 72 6f 29 20 69 ror (non-zero) i
5af0: 66 20 74 68 65 20 6d 61 67 69 63 20 77 61 73 20 f the magic was
5b00: 6e 6f 74 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 not SQLITE_MAGIC
5b10: 5f 4f 50 45 4e 0a 2a 2a 20 77 68 65 6e 20 74 68 _OPEN.** when th
5b20: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 is routine is ca
5b30: 6c 6c 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 lled..**.** This
5b40: 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 6c 6c routine is call
5b50: 65 64 20 77 68 65 6e 20 65 6e 74 65 72 69 6e 67 ed when entering
5b60: 20 61 6e 20 53 51 4c 69 74 65 20 41 50 49 2e 20 an SQLite API.
5b70: 20 54 68 65 20 53 51 4c 49 54 45 5f 4d 41 47 49 The SQLITE_MAGI
5b80: 43 5f 4f 50 45 4e 0a 2a 2a 20 76 61 6c 75 65 20 C_OPEN.** value
5b90: 69 6e 64 69 63 61 74 65 73 20 74 68 61 74 20 74 indicates that t
5ba0: 68 65 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e he database conn
5bb0: 65 63 74 69 6f 6e 20 70 61 73 73 65 64 20 69 6e ection passed in
5bc0: 74 6f 20 74 68 65 20 41 50 49 20 69 73 0a 2a 2a to the API is.**
5bd0: 20 6f 70 65 6e 20 61 6e 64 20 69 73 20 6e 6f 74 open and is not
5be0: 20 62 65 69 6e 67 20 75 73 65 64 20 62 79 20 61 being used by a
5bf0: 6e 6f 74 68 65 72 20 74 68 72 65 61 64 2e 20 20 nother thread.
5c00: 42 79 20 63 68 61 6e 67 69 6e 67 20 74 68 65 20 By changing the
5c10: 76 61 6c 75 65 0a 2a 2a 20 74 6f 20 53 51 4c 49 value.** to SQLI
5c20: 54 45 5f 4d 41 47 49 43 5f 42 55 53 59 20 77 65 TE_MAGIC_BUSY we
5c30: 20 69 6e 64 69 63 61 74 65 20 74 68 61 74 20 74 indicate that t
5c40: 68 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 69 73 he connection is
5c50: 20 69 6e 20 75 73 65 2e 0a 2a 2a 20 73 71 6c 69 in use..** sqli
5c60: 74 65 33 53 61 66 65 74 79 4f 66 66 28 29 20 62 te3SafetyOff() b
5c70: 65 6c 6f 77 20 77 69 6c 6c 20 63 68 61 6e 67 65 elow will change
5c80: 20 74 68 65 20 76 61 6c 75 65 20 62 61 63 6b 20 the value back
5c90: 74 6f 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f to SQLITE_MAGIC_
5ca0: 4f 50 45 4e 0a 2a 2a 20 77 68 65 6e 20 74 68 65 OPEN.** when the
5cb0: 20 41 50 49 20 65 78 69 74 73 2e 20 0a 2a 2a 0a API exits. .**.
5cc0: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 ** This routine
5cd0: 69 73 20 61 20 61 74 74 65 6d 70 74 20 74 6f 20 is a attempt to
5ce0: 64 65 74 65 63 74 20 69 66 20 74 77 6f 20 74 68 detect if two th
5cf0: 72 65 61 64 73 20 75 73 65 20 74 68 65 0a 2a 2a reads use the.**
5d00: 20 73 61 6d 65 20 73 71 6c 69 74 65 2a 20 70 6f same sqlite* po
5d10: 69 6e 74 65 72 20 61 74 20 74 68 65 20 73 61 6d inter at the sam
5d20: 65 20 74 69 6d 65 2e 20 20 54 68 65 72 65 20 69 e time. There i
5d30: 73 20 61 20 72 61 63 65 20 0a 2a 2a 20 63 6f 6e s a race .** con
5d40: 64 69 74 69 6f 6e 20 73 6f 20 69 74 20 69 73 20 dition so it is
5d50: 70 6f 73 73 69 62 6c 65 20 74 68 61 74 20 74 68 possible that th
5d60: 65 20 65 72 72 6f 72 20 69 73 20 6e 6f 74 20 64 e error is not d
5d70: 65 74 65 63 74 65 64 2e 0a 2a 2a 20 42 75 74 20 etected..** But
5d80: 75 73 75 61 6c 6c 79 20 74 68 65 20 70 72 6f 62 usually the prob
5d90: 6c 65 6d 20 77 69 6c 6c 20 62 65 20 73 65 65 6e lem will be seen
5da0: 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20 77 69 . The result wi
5db0: 6c 6c 20 62 65 20 61 6e 0a 2a 2a 20 65 72 72 6f ll be an.** erro
5dc0: 72 20 77 68 69 63 68 20 63 61 6e 20 62 65 20 75 r which can be u
5dd0: 73 65 64 20 74 6f 20 64 65 62 75 67 20 74 68 65 sed to debug the
5de0: 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 74 68 61 application tha
5df0: 74 20 69 73 0a 2a 2a 20 75 73 69 6e 67 20 53 51 t is.** using SQ
5e00: 4c 69 74 65 20 69 6e 63 6f 72 72 65 63 74 6c 79 Lite incorrectly
5e10: 2e 0a 2a 2a 0a 2a 2a 20 54 69 63 6b 65 74 20 23 ..**.** Ticket #
5e20: 32 30 32 3a 20 20 49 66 20 64 62 2d 3e 6d 61 67 202: If db->mag
5e30: 69 63 20 69 73 20 6e 6f 74 20 61 20 76 61 6c 69 ic is not a vali
5e40: 64 20 6f 70 65 6e 20 76 61 6c 75 65 2c 20 74 61 d open value, ta
5e50: 6b 65 20 63 61 72 65 20 6e 6f 74 0a 2a 2a 20 74 ke care not.** t
5e60: 6f 20 6d 6f 64 69 66 79 20 74 68 65 20 64 62 20 o modify the db
5e70: 73 74 72 75 63 74 75 72 65 20 61 74 20 61 6c 6c structure at all
5e80: 2e 20 20 49 74 20 63 6f 75 6c 64 20 62 65 20 74 . It could be t
5e90: 68 61 74 20 64 62 20 69 73 20 61 20 73 74 61 6c hat db is a stal
5ea0: 65 0a 2a 2a 20 70 6f 69 6e 74 65 72 2e 20 20 49 e.** pointer. I
5eb0: 6e 20 6f 74 68 65 72 20 77 6f 72 64 73 2c 20 69 n other words, i
5ec0: 74 20 63 6f 75 6c 64 20 62 65 20 74 68 61 74 20 t could be that
5ed0: 74 68 65 72 65 20 68 61 73 20 62 65 65 6e 20 61 there has been a
5ee0: 20 70 72 69 6f 72 0a 2a 2a 20 63 61 6c 6c 20 74 prior.** call t
5ef0: 6f 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 o sqlite3_close(
5f00: 64 62 29 20 61 6e 64 20 64 62 20 68 61 73 20 62 db) and db has b
5f10: 65 65 6e 20 64 65 61 6c 6c 6f 63 61 74 65 64 2e een deallocated.
5f20: 20 20 41 6e 64 20 77 65 20 64 6f 0a 2a 2a 20 6e And we do.** n
5f30: 6f 74 20 77 61 6e 74 20 74 6f 20 77 72 69 74 65 ot want to write
5f40: 20 69 6e 74 6f 20 64 65 61 6c 6c 6f 63 61 74 65 into deallocate
5f50: 64 20 6d 65 6d 6f 72 79 2e 0a 2a 2f 0a 23 69 66 d memory..*/.#if
5f60: 64 65 66 20 53 51 4c 49 54 45 5f 44 45 42 55 47 def SQLITE_DEBUG
5f70: 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 61 66 65 .int sqlite3Safe
5f80: 74 79 4f 6e 28 73 71 6c 69 74 65 33 20 2a 64 62 tyOn(sqlite3 *db
5f90: 29 7b 0a 20 20 69 66 28 20 64 62 2d 3e 6d 61 67 ){. if( db->mag
5fa0: 69 63 3d 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 ic==SQLITE_MAGIC
5fb0: 5f 4f 50 45 4e 20 29 7b 0a 20 20 20 20 64 62 2d _OPEN ){. db-
5fc0: 3e 6d 61 67 69 63 20 3d 20 53 51 4c 49 54 45 5f >magic = SQLITE_
5fd0: 4d 41 47 49 43 5f 42 55 53 59 3b 0a 20 20 20 20 MAGIC_BUSY;.
5fe0: 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f assert( sqlite3_
5ff0: 6d 75 74 65 78 5f 68 65 6c 64 28 64 62 2d 3e 6d mutex_held(db->m
6000: 75 74 65 78 29 20 29 3b 0a 20 20 20 20 72 65 74 utex) );. ret
6010: 75 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 urn 0;. }else i
6020: 66 28 20 64 62 2d 3e 6d 61 67 69 63 3d 3d 53 51 f( db->magic==SQ
6030: 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 53 59 20 LITE_MAGIC_BUSY
6040: 29 7b 0a 20 20 20 20 64 62 2d 3e 6d 61 67 69 63 ){. db->magic
6050: 20 3d 20 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f = SQLITE_MAGIC_
6060: 45 52 52 4f 52 3b 0a 20 20 20 20 64 62 2d 3e 75 ERROR;. db->u
6070: 31 2e 69 73 49 6e 74 65 72 72 75 70 74 65 64 20 1.isInterrupted
6080: 3d 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 = 1;. }. retur
6090: 6e 20 31 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f n 1;.}.#endif../
60a0: 2a 0a 2a 2a 20 43 68 61 6e 67 65 20 74 68 65 20 *.** Change the
60b0: 6d 61 67 69 63 20 66 72 6f 6d 20 53 51 4c 49 54 magic from SQLIT
60c0: 45 5f 4d 41 47 49 43 5f 42 55 53 59 20 74 6f 20 E_MAGIC_BUSY to
60d0: 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 4f 50 45 SQLITE_MAGIC_OPE
60e0: 4e 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 61 6e 20 N..** Return an
60f0: 65 72 72 6f 72 20 28 6e 6f 6e 2d 7a 65 72 6f 29 error (non-zero)
6100: 20 69 66 20 74 68 65 20 6d 61 67 69 63 20 77 61 if the magic wa
6110: 73 20 6e 6f 74 20 53 51 4c 49 54 45 5f 4d 41 47 s not SQLITE_MAG
6120: 49 43 5f 42 55 53 59 0a 2a 2a 20 77 68 65 6e 20 IC_BUSY.** when
6130: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 this routine is
6140: 63 61 6c 6c 65 64 2e 0a 2a 2f 0a 23 69 66 64 65 called..*/.#ifde
6150: 66 20 53 51 4c 49 54 45 5f 44 45 42 55 47 0a 69 f SQLITE_DEBUG.i
6160: 6e 74 20 73 71 6c 69 74 65 33 53 61 66 65 74 79 nt sqlite3Safety
6170: 4f 66 66 28 73 71 6c 69 74 65 33 20 2a 64 62 29 Off(sqlite3 *db)
6180: 7b 0a 20 20 69 66 28 20 64 62 2d 3e 6d 61 67 69 {. if( db->magi
6190: 63 3d 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f c==SQLITE_MAGIC_
61a0: 42 55 53 59 20 29 7b 0a 20 20 20 20 64 62 2d 3e BUSY ){. db->
61b0: 6d 61 67 69 63 20 3d 20 53 51 4c 49 54 45 5f 4d magic = SQLITE_M
61c0: 41 47 49 43 5f 4f 50 45 4e 3b 0a 20 20 20 20 61 AGIC_OPEN;. a
61d0: 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f 6d ssert( sqlite3_m
61e0: 75 74 65 78 5f 68 65 6c 64 28 64 62 2d 3e 6d 75 utex_held(db->mu
61f0: 74 65 78 29 20 29 3b 0a 20 20 20 20 72 65 74 75 tex) );. retu
6200: 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 rn 0;. }else{.
6210: 20 20 20 64 62 2d 3e 6d 61 67 69 63 20 3d 20 53 db->magic = S
6220: 51 4c 49 54 45 5f 4d 41 47 49 43 5f 45 52 52 4f QLITE_MAGIC_ERRO
6230: 52 3b 0a 20 20 20 20 64 62 2d 3e 75 31 2e 69 73 R;. db->u1.is
6240: 49 6e 74 65 72 72 75 70 74 65 64 20 3d 20 31 3b Interrupted = 1;
6250: 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 . return 1;.
6260: 20 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a }.}.#endif../*.
6270: 2a 2a 20 43 68 65 63 6b 20 74 6f 20 6d 61 6b 65 ** Check to make
6280: 20 73 75 72 65 20 77 65 20 68 61 76 65 20 61 20 sure we have a
6290: 76 61 6c 69 64 20 64 62 20 70 6f 69 6e 74 65 72 valid db pointer
62a0: 2e 20 20 54 68 69 73 20 74 65 73 74 20 69 73 20 . This test is
62b0: 6e 6f 74 0a 2a 2a 20 66 6f 6f 6c 70 72 6f 6f 66 not.** foolproof
62c0: 20 62 75 74 20 69 74 20 64 6f 65 73 20 70 72 6f but it does pro
62d0: 76 69 64 65 20 73 6f 6d 65 20 6d 65 61 73 75 72 vide some measur
62e0: 65 20 6f 66 20 70 72 6f 74 65 63 74 69 6f 6e 20 e of protection
62f0: 61 67 61 69 6e 73 74 0a 2a 2a 20 6d 69 73 75 73 against.** misus
6300: 65 20 6f 66 20 74 68 65 20 69 6e 74 65 72 66 61 e of the interfa
6310: 63 65 20 73 75 63 68 20 61 73 20 70 61 73 73 69 ce such as passi
6320: 6e 67 20 69 6e 20 64 62 20 70 6f 69 6e 74 65 72 ng in db pointer
6330: 73 20 74 68 61 74 20 61 72 65 0a 2a 2a 20 4e 55 s that are.** NU
6340: 4c 4c 20 6f 72 20 77 68 69 63 68 20 68 61 76 65 LL or which have
6350: 20 62 65 65 6e 20 70 72 65 76 69 6f 75 73 6c 79 been previously
6360: 20 63 6c 6f 73 65 64 2e 20 20 49 66 20 74 68 69 closed. If thi
6370: 73 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 6e s routine return
6380: 73 0a 2a 2a 20 31 20 69 74 20 6d 65 61 6e 73 20 s.** 1 it means
6390: 74 68 61 74 20 74 68 65 20 64 62 20 70 6f 69 6e that the db poin
63a0: 74 65 72 20 69 73 20 76 61 6c 69 64 20 61 6e 64 ter is valid and
63b0: 20 30 20 69 66 20 69 74 20 73 68 6f 75 6c 64 20 0 if it should
63c0: 6e 6f 74 20 62 65 0a 2a 2a 20 64 65 72 65 66 65 not be.** derefe
63d0: 72 65 6e 63 65 64 20 66 6f 72 20 61 6e 79 20 72 renced for any r
63e0: 65 61 73 6f 6e 2e 20 20 54 68 65 20 63 61 6c 6c eason. The call
63f0: 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 73 68 6f ing function sho
6400: 75 6c 64 20 69 6e 76 6f 6b 65 0a 2a 2a 20 53 51 uld invoke.** SQ
6410: 4c 49 54 45 5f 4d 49 53 55 53 45 20 69 6d 6d 65 LITE_MISUSE imme
6420: 64 69 61 74 65 6c 79 2e 0a 2a 2a 0a 2a 2a 20 73 diately..**.** s
6430: 71 6c 69 74 65 33 53 61 66 65 74 79 43 68 65 63 qlite3SafetyChec
6440: 6b 4f 6b 28 29 20 72 65 71 75 69 72 65 73 20 74 kOk() requires t
6450: 68 61 74 20 74 68 65 20 64 62 20 70 6f 69 6e 74 hat the db point
6460: 65 72 20 62 65 20 76 61 6c 69 64 20 66 6f 72 0a er be valid for.
6470: 2a 2a 20 75 73 65 2e 20 20 73 71 6c 69 74 65 33 ** use. sqlite3
6480: 53 61 66 65 74 79 43 68 65 63 6b 53 69 63 6b 4f SafetyCheckSickO
6490: 72 4f 6b 28 29 20 61 6c 6c 6f 77 73 20 61 20 64 rOk() allows a d
64a0: 62 20 70 6f 69 6e 74 65 72 20 74 68 61 74 20 66 b pointer that f
64b0: 61 69 6c 65 64 20 74 6f 0a 2a 2a 20 6f 70 65 6e ailed to.** open
64c0: 20 70 72 6f 70 65 72 6c 79 20 61 6e 64 20 69 73 properly and is
64d0: 20 6e 6f 74 20 66 69 74 20 66 6f 72 20 67 65 6e not fit for gen
64e0: 65 72 61 6c 20 75 73 65 20 62 75 74 20 77 68 69 eral use but whi
64f0: 63 68 20 63 61 6e 20 62 65 0a 2a 2a 20 75 73 65 ch can be.** use
6500: 64 20 61 73 20 61 6e 20 61 72 67 75 6d 65 6e 74 d as an argument
6510: 20 74 6f 20 73 71 6c 69 74 65 33 5f 65 72 72 6d to sqlite3_errm
6520: 73 67 28 29 20 6f 72 20 73 71 6c 69 74 65 33 5f sg() or sqlite3_
6530: 63 6c 6f 73 65 28 29 2e 0a 2a 2f 0a 69 6e 74 20 close()..*/.int
6540: 73 71 6c 69 74 65 33 53 61 66 65 74 79 43 68 65 sqlite3SafetyChe
6550: 63 6b 4f 6b 28 73 71 6c 69 74 65 33 20 2a 64 62 ckOk(sqlite3 *db
6560: 29 7b 0a 20 20 75 33 32 20 6d 61 67 69 63 3b 0a ){. u32 magic;.
6570: 20 20 69 66 28 20 64 62 3d 3d 30 20 29 20 72 65 if( db==0 ) re
6580: 74 75 72 6e 20 30 3b 0a 20 20 6d 61 67 69 63 20 turn 0;. magic
6590: 3d 20 64 62 2d 3e 6d 61 67 69 63 3b 0a 20 20 69 = db->magic;. i
65a0: 66 28 20 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 f( magic!=SQLITE
65b0: 5f 4d 41 47 49 43 5f 4f 50 45 4e 20 26 26 0a 20 _MAGIC_OPEN &&.
65c0: 20 20 20 20 20 6d 61 67 69 63 21 3d 53 51 4c 49 magic!=SQLI
65d0: 54 45 5f 4d 41 47 49 43 5f 42 55 53 59 20 29 20 TE_MAGIC_BUSY )
65e0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 72 65 74 75 return 0;. retu
65f0: 72 6e 20 31 3b 0a 7d 0a 69 6e 74 20 73 71 6c 69 rn 1;.}.int sqli
6600: 74 65 33 53 61 66 65 74 79 43 68 65 63 6b 53 69 te3SafetyCheckSi
6610: 63 6b 4f 72 4f 6b 28 73 71 6c 69 74 65 33 20 2a ckOrOk(sqlite3 *
6620: 64 62 29 7b 0a 20 20 75 33 32 20 6d 61 67 69 63 db){. u32 magic
6630: 3b 0a 20 20 69 66 28 20 64 62 3d 3d 30 20 29 20 ;. if( db==0 )
6640: 72 65 74 75 72 6e 20 30 3b 0a 20 20 6d 61 67 69 return 0;. magi
6650: 63 20 3d 20 64 62 2d 3e 6d 61 67 69 63 3b 0a 20 c = db->magic;.
6660: 20 69 66 28 20 6d 61 67 69 63 21 3d 53 51 4c 49 if( magic!=SQLI
6670: 54 45 5f 4d 41 47 49 43 5f 53 49 43 4b 20 26 26 TE_MAGIC_SICK &&
6680: 0a 20 20 20 20 20 20 6d 61 67 69 63 21 3d 53 51 . magic!=SQ
6690: 4c 49 54 45 5f 4d 41 47 49 43 5f 4f 50 45 4e 20 LITE_MAGIC_OPEN
66a0: 26 26 0a 20 20 20 20 20 20 6d 61 67 69 63 21 3d &&. magic!=
66b0: 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 42 55 53 SQLITE_MAGIC_BUS
66c0: 59 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 Y ) return 0;.
66d0: 72 65 74 75 72 6e 20 31 3b 0a 7d 0a return 1;.}.