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 2f 0a 23 ke that..**.*/.#
0210: 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49 include "sqliteI
0220: 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c nt.h".#include <
0230: 73 74 64 61 72 67 2e 68 3e 0a 23 69 66 64 65 66 stdarg.h>.#ifdef
0240: 20 53 51 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e SQLITE_HAVE_ISN
0250: 41 4e 0a 23 20 69 6e 63 6c 75 64 65 20 3c 6d 61 AN.# include <ma
0260: 74 68 2e 68 3e 0a 23 65 6e 64 69 66 0a 0a 2f 2a th.h>.#endif../*
0270: 0a 2a 2a 20 52 6f 75 74 69 6e 65 20 6e 65 65 64 .** Routine need
0280: 65 64 20 74 6f 20 73 75 70 70 6f 72 74 20 74 68 ed to support th
0290: 65 20 74 65 73 74 63 61 73 65 28 29 20 6d 61 63 e testcase() mac
02a0: 72 6f 2e 0a 2a 2f 0a 23 69 66 64 65 66 20 53 51 ro..*/.#ifdef SQ
02b0: 4c 49 54 45 5f 43 4f 56 45 52 41 47 45 5f 54 45 LITE_COVERAGE_TE
02c0: 53 54 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 43 ST.void sqlite3C
02d0: 6f 76 65 72 61 67 65 28 69 6e 74 20 78 29 7b 0a overage(int x){.
02e0: 20 20 73 74 61 74 69 63 20 69 6e 74 20 64 75 6d static int dum
02f0: 6d 79 20 3d 20 30 3b 0a 20 20 64 75 6d 6d 79 20 my = 0;. dummy
0300: 2b 3d 20 78 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a += x;.}.#endif..
0310: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f #ifndef SQLITE_O
0320: 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 MIT_FLOATING_POI
0330: 4e 54 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 NT./*.** Return
0340: 74 72 75 65 20 69 66 20 74 68 65 20 66 6c 6f 61 true if the floa
0350: 74 69 6e 67 20 70 6f 69 6e 74 20 76 61 6c 75 65 ting point value
0360: 20 69 73 20 4e 6f 74 20 61 20 4e 75 6d 62 65 72 is Not a Number
0370: 20 28 4e 61 4e 29 2e 0a 2a 2a 0a 2a 2a 20 55 73 (NaN)..**.** Us
0380: 65 20 74 68 65 20 6d 61 74 68 20 6c 69 62 72 61 e the math libra
0390: 72 79 20 69 73 6e 61 6e 28 29 20 66 75 6e 63 74 ry isnan() funct
03a0: 69 6f 6e 20 69 66 20 63 6f 6d 70 69 6c 65 64 20 ion if compiled
03b0: 77 69 74 68 20 53 51 4c 49 54 45 5f 48 41 56 45 with SQLITE_HAVE
03c0: 5f 49 53 4e 41 4e 2e 0a 2a 2a 20 4f 74 68 65 72 _ISNAN..** Other
03d0: 77 69 73 65 2c 20 77 65 20 68 61 76 65 20 6f 75 wise, we have ou
03e0: 72 20 6f 77 6e 20 69 6d 70 6c 65 6d 65 6e 74 61 r own implementa
03f0: 74 69 6f 6e 20 74 68 61 74 20 77 6f 72 6b 73 20 tion that works
0400: 6f 6e 20 6d 6f 73 74 20 73 79 73 74 65 6d 73 2e on most systems.
0410: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 49 .*/.int sqlite3I
0420: 73 4e 61 4e 28 64 6f 75 62 6c 65 20 78 29 7b 0a sNaN(double x){.
0430: 20 20 69 6e 74 20 72 63 3b 20 20 20 2f 2a 20 54 int rc; /* T
0440: 68 65 20 76 61 6c 75 65 20 72 65 74 75 72 6e 20 he value return
0450: 2a 2f 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28 */.#if !defined(
0460: 53 51 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e 41 SQLITE_HAVE_ISNA
0470: 4e 29 0a 20 20 2f 2a 0a 20 20 2a 2a 20 53 79 73 N). /*. ** Sys
0480: 74 65 6d 73 20 74 68 61 74 20 73 75 70 70 6f 72 tems that suppor
0490: 74 20 74 68 65 20 69 73 6e 61 6e 28 29 20 6c 69 t the isnan() li
04a0: 62 72 61 72 79 20 66 75 6e 63 74 69 6f 6e 20 73 brary function s
04b0: 68 6f 75 6c 64 20 70 72 6f 62 61 62 6c 79 0a 20 hould probably.
04c0: 20 2a 2a 20 6d 61 6b 65 20 75 73 65 20 6f 66 20 ** make use of
04d0: 69 74 20 62 79 20 63 6f 6d 70 69 6c 69 6e 67 20 it by compiling
04e0: 77 69 74 68 20 2d 44 53 51 4c 49 54 45 5f 48 41 with -DSQLITE_HA
04f0: 56 45 5f 49 53 4e 41 4e 2e 20 20 42 75 74 20 77 VE_ISNAN. But w
0500: 65 20 68 61 76 65 0a 20 20 2a 2a 20 66 6f 75 6e e have. ** foun
0510: 64 20 74 68 61 74 20 6d 61 6e 79 20 73 79 73 74 d that many syst
0520: 65 6d 73 20 64 6f 20 6e 6f 74 20 68 61 76 65 20 ems do not have
0530: 61 20 77 6f 72 6b 69 6e 67 20 69 73 6e 61 6e 28 a working isnan(
0540: 29 20 66 75 6e 63 74 69 6f 6e 20 73 6f 0a 20 20 ) function so.
0550: 2a 2a 20 74 68 69 73 20 69 6d 70 6c 65 6d 65 6e ** this implemen
0560: 74 61 74 69 6f 6e 20 69 73 20 70 72 6f 76 69 64 tation is provid
0570: 65 64 20 61 73 20 61 6e 20 61 6c 74 65 72 6e 61 ed as an alterna
0580: 74 69 76 65 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 tive.. **. **
0590: 54 68 69 73 20 4e 61 4e 20 74 65 73 74 20 73 6f This NaN test so
05a0: 6d 65 74 69 6d 65 73 20 66 61 69 6c 73 20 69 66 metimes fails if
05b0: 20 63 6f 6d 70 69 6c 65 64 20 6f 6e 20 47 43 43 compiled on GCC
05c0: 20 77 69 74 68 20 2d 66 66 61 73 74 2d 6d 61 74 with -ffast-mat
05d0: 68 2e 0a 20 20 2a 2a 20 4f 6e 20 74 68 65 20 6f h.. ** On the o
05e0: 74 68 65 72 20 68 61 6e 64 2c 20 74 68 65 20 75 ther hand, the u
05f0: 73 65 20 6f 66 20 2d 66 66 61 73 74 2d 6d 61 74 se of -ffast-mat
0600: 68 20 63 6f 6d 65 73 20 77 69 74 68 20 74 68 65 h comes with the
0610: 20 66 6f 6c 6c 6f 77 69 6e 67 0a 20 20 2a 2a 20 following. **
0620: 77 61 72 6e 69 6e 67 3a 0a 20 20 2a 2a 0a 20 20 warning:. **.
0630: 2a 2a 20 20 20 20 20 20 54 68 69 73 20 6f 70 74 ** This opt
0640: 69 6f 6e 20 5b 2d 66 66 61 73 74 2d 6d 61 74 68 ion [-ffast-math
0650: 5d 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 20 62 ] should never b
0660: 65 20 74 75 72 6e 65 64 20 6f 6e 20 62 79 20 61 e turned on by a
0670: 6e 79 0a 20 20 2a 2a 20 20 20 20 20 20 2d 4f 20 ny. ** -O
0680: 6f 70 74 69 6f 6e 20 73 69 6e 63 65 20 69 74 20 option since it
0690: 63 61 6e 20 72 65 73 75 6c 74 20 69 6e 20 69 6e can result in in
06a0: 63 6f 72 72 65 63 74 20 6f 75 74 70 75 74 20 66 correct output f
06b0: 6f 72 20 70 72 6f 67 72 61 6d 73 0a 20 20 2a 2a or programs. **
06c0: 20 20 20 20 20 20 77 68 69 63 68 20 64 65 70 65 which depe
06d0: 6e 64 20 6f 6e 20 61 6e 20 65 78 61 63 74 20 69 nd on an exact i
06e0: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 mplementation of
06f0: 20 49 45 45 45 20 6f 72 20 49 53 4f 20 0a 20 20 IEEE or ISO .
0700: 2a 2a 20 20 20 20 20 20 72 75 6c 65 73 2f 73 70 ** rules/sp
0710: 65 63 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 ecifications for
0720: 20 6d 61 74 68 20 66 75 6e 63 74 69 6f 6e 73 2e math functions.
0730: 0a 20 20 2a 2a 0a 20 20 2a 2a 20 55 6e 64 65 72 . **. ** Under
0740: 20 4d 53 56 43 2c 20 74 68 69 73 20 4e 61 4e 20 MSVC, this NaN
0750: 74 65 73 74 20 6d 61 79 20 66 61 69 6c 20 69 66 test may fail if
0760: 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 61 compiled with a
0770: 20 66 6c 6f 61 74 69 6e 67 2d 0a 20 20 2a 2a 20 floating-. **
0780: 70 6f 69 6e 74 20 70 72 65 63 69 73 69 6f 6e 20 point precision
0790: 6d 6f 64 65 20 6f 74 68 65 72 20 74 68 61 6e 20 mode other than
07a0: 2f 66 70 3a 70 72 65 63 69 73 65 2e 20 20 46 72 /fp:precise. Fr
07b0: 6f 6d 20 74 68 65 20 4d 53 44 4e 20 0a 20 20 2a om the MSDN . *
07c0: 2a 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 3a * documentation:
07d0: 0a 20 20 2a 2a 0a 20 20 2a 2a 20 20 20 20 20 20 . **. **
07e0: 54 68 65 20 63 6f 6d 70 69 6c 65 72 20 5b 77 69 The compiler [wi
07f0: 74 68 20 2f 66 70 3a 70 72 65 63 69 73 65 5d 20 th /fp:precise]
0800: 77 69 6c 6c 20 70 72 6f 70 65 72 6c 79 20 68 61 will properly ha
0810: 6e 64 6c 65 20 63 6f 6d 70 61 72 69 73 6f 6e 73 ndle comparisons
0820: 20 0a 20 20 2a 2a 20 20 20 20 20 20 69 6e 76 6f . ** invo
0830: 6c 76 69 6e 67 20 4e 61 4e 2e 20 46 6f 72 20 65 lving NaN. For e
0840: 78 61 6d 70 6c 65 2c 20 78 20 21 3d 20 78 20 65 xample, x != x e
0850: 76 61 6c 75 61 74 65 73 20 74 6f 20 74 72 75 65 valuates to true
0860: 20 69 66 20 78 20 69 73 20 4e 61 4e 20 0a 20 20 if x is NaN .
0870: 2a 2a 20 20 20 20 20 20 2e 2e 2e 0a 20 20 2a 2f ** .... */
0880: 0a 23 69 66 64 65 66 20 5f 5f 46 41 53 54 5f 4d .#ifdef __FAST_M
0890: 41 54 48 5f 5f 0a 23 20 65 72 72 6f 72 20 53 51 ATH__.# error SQ
08a0: 4c 69 74 65 20 77 69 6c 6c 20 6e 6f 74 20 77 6f Lite will not wo
08b0: 72 6b 20 63 6f 72 72 65 63 74 6c 79 20 77 69 74 rk correctly wit
08c0: 68 20 74 68 65 20 2d 66 66 61 73 74 2d 6d 61 74 h the -ffast-mat
08d0: 68 20 6f 70 74 69 6f 6e 20 6f 66 20 47 43 43 2e h option of GCC.
08e0: 0a 23 65 6e 64 69 66 0a 20 20 76 6f 6c 61 74 69 .#endif. volati
08f0: 6c 65 20 64 6f 75 62 6c 65 20 79 20 3d 20 78 3b le double y = x;
0900: 0a 20 20 76 6f 6c 61 74 69 6c 65 20 64 6f 75 62 . volatile doub
0910: 6c 65 20 7a 20 3d 20 79 3b 0a 20 20 72 63 20 3d le z = y;. rc =
0920: 20 28 79 21 3d 7a 29 3b 0a 23 65 6c 73 65 20 20 (y!=z);.#else
0930: 2f 2a 20 69 66 20 64 65 66 69 6e 65 64 28 53 51 /* if defined(SQ
0940: 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e 41 4e 29 LITE_HAVE_ISNAN)
0950: 20 2a 2f 0a 20 20 72 63 20 3d 20 69 73 6e 61 6e */. rc = isnan
0960: 28 78 29 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 53 (x);.#endif /* S
0970: 51 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e 41 4e QLITE_HAVE_ISNAN
0980: 20 2a 2f 0a 20 20 74 65 73 74 63 61 73 65 28 20 */. testcase(
0990: 72 63 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 rc );. return r
09a0: 63 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 c;.}.#endif /* S
09b0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 QLITE_OMIT_FLOAT
09c0: 49 4e 47 5f 50 4f 49 4e 54 20 2a 2f 0a 0a 2f 2a ING_POINT */../*
09d0: 0a 2a 2a 20 43 6f 6d 70 75 74 65 20 61 20 73 74 .** Compute a st
09e0: 72 69 6e 67 20 6c 65 6e 67 74 68 20 74 68 61 74 ring length that
09f0: 20 69 73 20 6c 69 6d 69 74 65 64 20 74 6f 20 77 is limited to w
0a00: 68 61 74 20 63 61 6e 20 62 65 20 73 74 6f 72 65 hat can be store
0a10: 64 20 69 6e 0a 2a 2a 20 6c 6f 77 65 72 20 33 30 d in.** lower 30
0a20: 20 62 69 74 73 20 6f 66 20 61 20 33 32 2d 62 69 bits of a 32-bi
0a30: 74 20 73 69 67 6e 65 64 20 69 6e 74 65 67 65 72 t signed integer
0a40: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 76 61 6c 75 ..**.** The valu
0a50: 65 20 72 65 74 75 72 6e 65 64 20 77 69 6c 6c 20 e returned will
0a60: 6e 65 76 65 72 20 62 65 20 6e 65 67 61 74 69 76 never be negativ
0a70: 65 2e 20 20 4e 6f 72 20 77 69 6c 6c 20 69 74 20 e. Nor will it
0a80: 65 76 65 72 20 62 65 20 67 72 65 61 74 65 72 0a ever be greater.
0a90: 2a 2a 20 74 68 61 6e 20 74 68 65 20 61 63 74 75 ** than the actu
0aa0: 61 6c 20 6c 65 6e 67 74 68 20 6f 66 20 74 68 65 al length of the
0ab0: 20 73 74 72 69 6e 67 2e 20 20 46 6f 72 20 76 65 string. For ve
0ac0: 72 79 20 6c 6f 6e 67 20 73 74 72 69 6e 67 73 20 ry long strings
0ad0: 28 67 72 65 61 74 65 72 0a 2a 2a 20 74 68 61 6e (greater.** than
0ae0: 20 31 47 69 42 29 20 74 68 65 20 76 61 6c 75 65 1GiB) the value
0af0: 20 72 65 74 75 72 6e 65 64 20 6d 69 67 68 74 20 returned might
0b00: 62 65 20 6c 65 73 73 20 74 68 61 6e 20 74 68 65 be less than the
0b10: 20 74 72 75 65 20 73 74 72 69 6e 67 20 6c 65 6e true string len
0b20: 67 74 68 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 gth..*/.int sqli
0b30: 74 65 33 53 74 72 6c 65 6e 33 30 28 63 6f 6e 73 te3Strlen30(cons
0b40: 74 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 63 6f t char *z){. co
0b50: 6e 73 74 20 63 68 61 72 20 2a 7a 32 20 3d 20 7a nst char *z2 = z
0b60: 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 ;. if( z==0 ) r
0b70: 65 74 75 72 6e 20 30 3b 0a 20 20 77 68 69 6c 65 eturn 0;. while
0b80: 28 20 2a 7a 32 20 29 7b 20 7a 32 2b 2b 3b 20 7d ( *z2 ){ z2++; }
0b90: 0a 20 20 72 65 74 75 72 6e 20 30 78 33 66 66 66 . return 0x3fff
0ba0: 66 66 66 66 20 26 20 28 69 6e 74 29 28 7a 32 20 ffff & (int)(z2
0bb0: 2d 20 7a 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 - z);.}../*.** S
0bc0: 65 74 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 et the most rece
0bd0: 6e 74 20 65 72 72 6f 72 20 63 6f 64 65 20 61 6e nt error code an
0be0: 64 20 65 72 72 6f 72 20 73 74 72 69 6e 67 20 66 d error string f
0bf0: 6f 72 20 74 68 65 20 73 71 6c 69 74 65 0a 2a 2a or the sqlite.**
0c00: 20 68 61 6e 64 6c 65 20 22 64 62 22 2e 20 54 68 handle "db". Th
0c10: 65 20 65 72 72 6f 72 20 63 6f 64 65 20 69 73 20 e error code is
0c20: 73 65 74 20 74 6f 20 22 65 72 72 5f 63 6f 64 65 set to "err_code
0c30: 22 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 69 74 20 69 "..**.** If it i
0c40: 73 20 6e 6f 74 20 4e 55 4c 4c 2c 20 73 74 72 69 s not NULL, stri
0c50: 6e 67 20 7a 46 6f 72 6d 61 74 20 73 70 65 63 69 ng zFormat speci
0c60: 66 69 65 73 20 74 68 65 20 66 6f 72 6d 61 74 20 fies the format
0c70: 6f 66 20 74 68 65 0a 2a 2a 20 65 72 72 6f 72 20 of the.** error
0c80: 73 74 72 69 6e 67 20 69 6e 20 74 68 65 20 73 74 string in the st
0c90: 79 6c 65 20 6f 66 20 74 68 65 20 70 72 69 6e 74 yle of the print
0ca0: 66 20 66 75 6e 63 74 69 6f 6e 73 3a 20 54 68 65 f functions: The
0cb0: 20 66 6f 6c 6c 6f 77 69 6e 67 0a 2a 2a 20 66 6f following.** fo
0cc0: 72 6d 61 74 20 63 68 61 72 61 63 74 65 72 73 20 rmat characters
0cd0: 61 72 65 20 61 6c 6c 6f 77 65 64 3a 0a 2a 2a 0a are allowed:.**.
0ce0: 2a 2a 20 20 20 20 20 20 25 73 20 20 20 20 20 20 ** %s
0cf0: 49 6e 73 65 72 74 20 61 20 73 74 72 69 6e 67 0a Insert a string.
0d00: 2a 2a 20 20 20 20 20 20 25 7a 20 20 20 20 20 20 ** %z
0d10: 41 20 73 74 72 69 6e 67 20 74 68 61 74 20 73 68 A string that sh
0d20: 6f 75 6c 64 20 62 65 20 66 72 65 65 64 20 61 66 ould be freed af
0d30: 74 65 72 20 75 73 65 0a 2a 2a 20 20 20 20 20 20 ter use.**
0d40: 25 64 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 %d Insert a
0d50: 6e 20 69 6e 74 65 67 65 72 0a 2a 2a 20 20 20 20 n integer.**
0d60: 20 20 25 54 20 20 20 20 20 20 49 6e 73 65 72 74 %T Insert
0d70: 20 61 20 74 6f 6b 65 6e 0a 2a 2a 20 20 20 20 20 a token.**
0d80: 20 25 53 20 20 20 20 20 20 49 6e 73 65 72 74 20 %S Insert
0d90: 74 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e the first elemen
0da0: 74 20 6f 66 20 61 20 53 72 63 4c 69 73 74 0a 2a t of a SrcList.*
0db0: 2a 0a 2a 2a 20 7a 46 6f 72 6d 61 74 20 61 6e 64 *.** zFormat and
0dc0: 20 61 6e 79 20 73 74 72 69 6e 67 20 74 6f 6b 65 any string toke
0dd0: 6e 73 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 69 ns that follow i
0de0: 74 20 61 72 65 20 61 73 73 75 6d 65 64 20 74 6f t are assumed to
0df0: 20 62 65 0a 2a 2a 20 65 6e 63 6f 64 65 64 20 69 be.** encoded i
0e00: 6e 20 55 54 46 2d 38 2e 0a 2a 2a 0a 2a 2a 20 54 n UTF-8..**.** T
0e10: 6f 20 63 6c 65 61 72 20 74 68 65 20 6d 6f 73 74 o clear the most
0e20: 20 72 65 63 65 6e 74 20 65 72 72 6f 72 20 66 6f recent error fo
0e30: 72 20 73 71 6c 69 74 65 20 68 61 6e 64 6c 65 20 r sqlite handle
0e40: 22 64 62 22 2c 20 73 71 6c 69 74 65 33 45 72 72 "db", sqlite3Err
0e50: 6f 72 0a 2a 2a 20 73 68 6f 75 6c 64 20 62 65 20 or.** should be
0e60: 63 61 6c 6c 65 64 20 77 69 74 68 20 65 72 72 5f called with err_
0e70: 63 6f 64 65 20 73 65 74 20 74 6f 20 53 51 4c 49 code set to SQLI
0e80: 54 45 5f 4f 4b 20 61 6e 64 20 7a 46 6f 72 6d 61 TE_OK and zForma
0e90: 74 20 73 65 74 0a 2a 2a 20 74 6f 20 4e 55 4c 4c t set.** to NULL
0ea0: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 ..*/.void sqlite
0eb0: 33 45 72 72 6f 72 28 73 71 6c 69 74 65 33 20 2a 3Error(sqlite3 *
0ec0: 64 62 2c 20 69 6e 74 20 65 72 72 5f 63 6f 64 65 db, int err_code
0ed0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 , const char *zF
0ee0: 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 69 ormat, ...){. i
0ef0: 66 28 20 64 62 20 26 26 20 28 64 62 2d 3e 70 45 f( db && (db->pE
0f00: 72 72 20 7c 7c 20 28 64 62 2d 3e 70 45 72 72 20 rr || (db->pErr
0f10: 3d 20 73 71 6c 69 74 65 33 56 61 6c 75 65 4e 65 = sqlite3ValueNe
0f20: 77 28 64 62 29 29 21 3d 30 29 20 29 7b 0a 20 20 w(db))!=0) ){.
0f30: 20 20 64 62 2d 3e 65 72 72 43 6f 64 65 20 3d 20 db->errCode =
0f40: 65 72 72 5f 63 6f 64 65 3b 0a 20 20 20 20 69 66 err_code;. if
0f50: 28 20 7a 46 6f 72 6d 61 74 20 29 7b 0a 20 20 20 ( zFormat ){.
0f60: 20 20 20 63 68 61 72 20 2a 7a 3b 0a 20 20 20 20 char *z;.
0f70: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 va_list ap;.
0f80: 20 20 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c va_start(ap,
0f90: 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 20 20 20 zFormat);.
0fa0: 20 7a 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 z = sqlite3VMPr
0fb0: 69 6e 74 66 28 64 62 2c 20 7a 46 6f 72 6d 61 74 intf(db, zFormat
0fc0: 2c 20 61 70 29 3b 0a 20 20 20 20 20 20 76 61 5f , ap);. va_
0fd0: 65 6e 64 28 61 70 29 3b 0a 20 20 20 20 20 20 73 end(ap);. s
0fe0: 71 6c 69 74 65 33 56 61 6c 75 65 53 65 74 53 74 qlite3ValueSetSt
0ff0: 72 28 64 62 2d 3e 70 45 72 72 2c 20 2d 31 2c 20 r(db->pErr, -1,
1000: 7a 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 z, SQLITE_UTF8,
1010: 53 51 4c 49 54 45 5f 44 59 4e 41 4d 49 43 29 3b SQLITE_DYNAMIC);
1020: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 . }else{.
1030: 20 20 73 71 6c 69 74 65 33 56 61 6c 75 65 53 65 sqlite3ValueSe
1040: 74 53 74 72 28 64 62 2d 3e 70 45 72 72 2c 20 30 tStr(db->pErr, 0
1050: 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 , 0, SQLITE_UTF8
1060: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 , SQLITE_STATIC)
1070: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f ;. }. }.}../
1080: 2a 0a 2a 2a 20 41 64 64 20 61 6e 20 65 72 72 6f *.** Add an erro
1090: 72 20 6d 65 73 73 61 67 65 20 74 6f 20 70 50 61 r message to pPa
10a0: 72 73 65 2d 3e 7a 45 72 72 4d 73 67 20 61 6e 64 rse->zErrMsg and
10b0: 20 69 6e 63 72 65 6d 65 6e 74 20 70 50 61 72 73 increment pPars
10c0: 65 2d 3e 6e 45 72 72 2e 0a 2a 2a 20 54 68 65 20 e->nErr..** The
10d0: 66 6f 6c 6c 6f 77 69 6e 67 20 66 6f 72 6d 61 74 following format
10e0: 74 69 6e 67 20 63 68 61 72 61 63 74 65 72 73 20 ting characters
10f0: 61 72 65 20 61 6c 6c 6f 77 65 64 3a 0a 2a 2a 0a are allowed:.**.
1100: 2a 2a 20 20 20 20 20 20 25 73 20 20 20 20 20 20 ** %s
1110: 49 6e 73 65 72 74 20 61 20 73 74 72 69 6e 67 0a Insert a string.
1120: 2a 2a 20 20 20 20 20 20 25 7a 20 20 20 20 20 20 ** %z
1130: 41 20 73 74 72 69 6e 67 20 74 68 61 74 20 73 68 A string that sh
1140: 6f 75 6c 64 20 62 65 20 66 72 65 65 64 20 61 66 ould be freed af
1150: 74 65 72 20 75 73 65 0a 2a 2a 20 20 20 20 20 20 ter use.**
1160: 25 64 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 %d Insert a
1170: 6e 20 69 6e 74 65 67 65 72 0a 2a 2a 20 20 20 20 n integer.**
1180: 20 20 25 54 20 20 20 20 20 20 49 6e 73 65 72 74 %T Insert
1190: 20 61 20 74 6f 6b 65 6e 0a 2a 2a 20 20 20 20 20 a token.**
11a0: 20 25 53 20 20 20 20 20 20 49 6e 73 65 72 74 20 %S Insert
11b0: 74 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e the first elemen
11c0: 74 20 6f 66 20 61 20 53 72 63 4c 69 73 74 0a 2a t of a SrcList.*
11d0: 2a 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74 69 *.** This functi
11e0: 6f 6e 20 73 68 6f 75 6c 64 20 62 65 20 75 73 65 on should be use
11f0: 64 20 74 6f 20 72 65 70 6f 72 74 20 61 6e 79 20 d to report any
1200: 65 72 72 6f 72 20 74 68 61 74 20 6f 63 63 75 72 error that occur
1210: 73 20 77 68 69 6c 73 74 0a 2a 2a 20 63 6f 6d 70 s whilst.** comp
1220: 69 6c 69 6e 67 20 61 6e 20 53 51 4c 20 73 74 61 iling an SQL sta
1230: 74 65 6d 65 6e 74 20 28 69 2e 65 2e 20 77 69 74 tement (i.e. wit
1240: 68 69 6e 20 73 71 6c 69 74 65 33 5f 70 72 65 70 hin sqlite3_prep
1250: 61 72 65 28 29 29 2e 20 54 68 65 0a 2a 2a 20 6c are()). The.** l
1260: 61 73 74 20 74 68 69 6e 67 20 74 68 65 20 73 71 ast thing the sq
1270: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 29 20 lite3_prepare()
1280: 66 75 6e 63 74 69 6f 6e 20 64 6f 65 73 20 69 73 function does is
1290: 20 63 6f 70 79 20 74 68 65 20 65 72 72 6f 72 0a copy the error.
12a0: 2a 2a 20 73 74 6f 72 65 64 20 62 79 20 74 68 69 ** stored by thi
12b0: 73 20 66 75 6e 63 74 69 6f 6e 20 69 6e 74 6f 20 s function into
12c0: 74 68 65 20 64 61 74 61 62 61 73 65 20 68 61 6e the database han
12d0: 64 6c 65 20 75 73 69 6e 67 20 73 71 6c 69 74 65 dle using sqlite
12e0: 33 45 72 72 6f 72 28 29 2e 0a 2a 2a 20 46 75 6e 3Error()..** Fun
12f0: 63 74 69 6f 6e 20 73 71 6c 69 74 65 33 45 72 72 ction sqlite3Err
1300: 6f 72 28 29 20 73 68 6f 75 6c 64 20 62 65 20 75 or() should be u
1310: 73 65 64 20 64 75 72 69 6e 67 20 73 74 61 74 65 sed during state
1320: 6d 65 6e 74 20 65 78 65 63 75 74 69 6f 6e 0a 2a ment execution.*
1330: 2a 20 28 73 71 6c 69 74 65 33 5f 73 74 65 70 28 * (sqlite3_step(
1340: 29 20 65 74 63 2e 29 2e 0a 2a 2f 0a 76 6f 69 64 ) etc.)..*/.void
1350: 20 73 71 6c 69 74 65 33 45 72 72 6f 72 4d 73 67 sqlite3ErrorMsg
1360: 28 50 61 72 73 65 20 2a 70 50 61 72 73 65 2c 20 (Parse *pParse,
1370: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 const char *zFor
1380: 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 63 68 61 mat, ...){. cha
1390: 72 20 2a 7a 4d 73 67 3b 0a 20 20 76 61 5f 6c 69 r *zMsg;. va_li
13a0: 73 74 20 61 70 3b 0a 20 20 73 71 6c 69 74 65 33 st ap;. sqlite3
13b0: 20 2a 64 62 20 3d 20 70 50 61 72 73 65 2d 3e 64 *db = pParse->d
13c0: 62 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 b;. va_start(ap
13d0: 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 7a 4d , zFormat);. zM
13e0: 73 67 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 sg = sqlite3VMPr
13f0: 69 6e 74 66 28 64 62 2c 20 7a 46 6f 72 6d 61 74 intf(db, zFormat
1400: 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 , ap);. va_end(
1410: 61 70 29 3b 0a 20 20 69 66 28 20 64 62 2d 3e 73 ap);. if( db->s
1420: 75 70 70 72 65 73 73 45 72 72 20 29 7b 0a 20 20 uppressErr ){.
1430: 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 28 sqlite3DbFree(
1440: 64 62 2c 20 7a 4d 73 67 29 3b 0a 20 20 7d 65 6c db, zMsg);. }el
1450: 73 65 7b 0a 20 20 20 20 70 50 61 72 73 65 2d 3e se{. pParse->
1460: 6e 45 72 72 2b 2b 3b 0a 20 20 20 20 73 71 6c 69 nErr++;. sqli
1470: 74 65 33 44 62 46 72 65 65 28 64 62 2c 20 70 50 te3DbFree(db, pP
1480: 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 29 3b 0a arse->zErrMsg);.
1490: 20 20 20 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 pParse->zErr
14a0: 4d 73 67 20 3d 20 7a 4d 73 67 3b 0a 20 20 20 20 Msg = zMsg;.
14b0: 70 50 61 72 73 65 2d 3e 72 63 20 3d 20 53 51 4c pParse->rc = SQL
14c0: 49 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 7d ITE_ERROR;. }.}
14d0: 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 ../*.** Convert
14e0: 61 6e 20 53 51 4c 2d 73 74 79 6c 65 20 71 75 6f an SQL-style quo
14f0: 74 65 64 20 73 74 72 69 6e 67 20 69 6e 74 6f 20 ted string into
1500: 61 20 6e 6f 72 6d 61 6c 20 73 74 72 69 6e 67 20 a normal string
1510: 62 79 20 72 65 6d 6f 76 69 6e 67 0a 2a 2a 20 74 by removing.** t
1520: 68 65 20 71 75 6f 74 65 20 63 68 61 72 61 63 74 he quote charact
1530: 65 72 73 2e 20 20 54 68 65 20 63 6f 6e 76 65 72 ers. The conver
1540: 73 69 6f 6e 20 69 73 20 64 6f 6e 65 20 69 6e 2d sion is done in-
1550: 70 6c 61 63 65 2e 20 20 49 66 20 74 68 65 0a 2a place. If the.*
1560: 2a 20 69 6e 70 75 74 20 64 6f 65 73 20 6e 6f 74 * input does not
1570: 20 62 65 67 69 6e 20 77 69 74 68 20 61 20 71 75 begin with a qu
1580: 6f 74 65 20 63 68 61 72 61 63 74 65 72 2c 20 74 ote character, t
1590: 68 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 hen this routine
15a0: 0a 2a 2a 20 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a .** is a no-op..
15b0: 2a 2a 0a 2a 2a 20 54 68 65 20 69 6e 70 75 74 20 **.** The input
15c0: 73 74 72 69 6e 67 20 6d 75 73 74 20 62 65 20 7a string must be z
15d0: 65 72 6f 2d 74 65 72 6d 69 6e 61 74 65 64 2e 20 ero-terminated.
15e0: 20 41 20 6e 65 77 20 7a 65 72 6f 2d 74 65 72 6d A new zero-term
15f0: 69 6e 61 74 6f 72 0a 2a 2a 20 69 73 20 61 64 64 inator.** is add
1600: 65 64 20 74 6f 20 74 68 65 20 64 65 71 75 6f 74 ed to the dequot
1610: 65 64 20 73 74 72 69 6e 67 2e 0a 2a 2a 0a 2a 2a ed string..**.**
1620: 20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 The return valu
1630: 65 20 69 73 20 2d 31 20 69 66 20 6e 6f 20 64 65 e is -1 if no de
1640: 71 75 6f 74 69 6e 67 20 6f 63 63 75 72 73 20 6f quoting occurs o
1650: 72 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 r the length of
1660: 74 68 65 0a 2a 2a 20 64 65 71 75 6f 74 65 64 20 the.** dequoted
1670: 73 74 72 69 6e 67 2c 20 65 78 63 6c 75 73 69 76 string, exclusiv
1680: 65 20 6f 66 20 74 68 65 20 7a 65 72 6f 20 74 65 e of the zero te
1690: 72 6d 69 6e 61 74 6f 72 2c 20 69 66 20 64 65 71 rminator, if deq
16a0: 75 6f 74 69 6e 67 20 64 6f 65 73 0a 2a 2a 20 6f uoting does.** o
16b0: 63 63 75 72 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 32 ccur..**.** 2002
16c0: 2d 46 65 62 2d 31 34 3a 20 54 68 69 73 20 72 6f -Feb-14: This ro
16d0: 75 74 69 6e 65 20 69 73 20 65 78 74 65 6e 64 65 utine is extende
16e0: 64 20 74 6f 20 72 65 6d 6f 76 65 20 4d 53 2d 41 d to remove MS-A
16f0: 63 63 65 73 73 20 73 74 79 6c 65 0a 2a 2a 20 62 ccess style.** b
1700: 72 61 63 6b 65 74 73 20 66 72 6f 6d 20 61 72 6f rackets from aro
1710: 75 6e 64 20 69 64 65 6e 74 69 66 65 72 73 2e 20 und identifers.
1720: 20 46 6f 72 20 65 78 61 6d 70 6c 65 3a 20 20 22 For example: "
1730: 5b 61 2d 62 2d 63 5d 22 20 62 65 63 6f 6d 65 73 [a-b-c]" becomes
1740: 0a 2a 2a 20 22 61 2d 62 2d 63 22 2e 0a 2a 2f 0a .** "a-b-c"..*/.
1750: 69 6e 74 20 73 71 6c 69 74 65 33 44 65 71 75 6f int sqlite3Dequo
1760: 74 65 28 63 68 61 72 20 2a 7a 29 7b 0a 20 20 63 te(char *z){. c
1770: 68 61 72 20 71 75 6f 74 65 3b 0a 20 20 69 6e 74 har quote;. int
1780: 20 69 2c 20 6a 3b 0a 20 20 69 66 28 20 7a 3d 3d i, j;. if( z==
1790: 30 20 29 20 72 65 74 75 72 6e 20 2d 31 3b 0a 20 0 ) return -1;.
17a0: 20 71 75 6f 74 65 20 3d 20 7a 5b 30 5d 3b 0a 20 quote = z[0];.
17b0: 20 73 77 69 74 63 68 28 20 71 75 6f 74 65 20 29 switch( quote )
17c0: 7b 0a 20 20 20 20 63 61 73 65 20 27 5c 27 27 3a {. case '\'':
17d0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 break;. cas
17e0: 65 20 27 22 27 3a 20 20 20 62 72 65 61 6b 3b 0a e '"': break;.
17f0: 20 20 20 20 63 61 73 65 20 27 60 27 3a 20 20 20 case '`':
1800: 62 72 65 61 6b 3b 20 20 20 20 20 20 20 20 20 20 break;
1810: 20 20 20 20 20 20 2f 2a 20 46 6f 72 20 4d 79 53 /* For MyS
1820: 51 4c 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 QL compatibility
1830: 20 2a 2f 0a 20 20 20 20 63 61 73 65 20 27 5b 27 */. case '['
1840: 3a 20 20 20 71 75 6f 74 65 20 3d 20 27 5d 27 3b : quote = ']';
1850: 20 20 62 72 65 61 6b 3b 20 20 2f 2a 20 46 6f 72 break; /* For
1860: 20 4d 53 20 53 71 6c 53 65 72 76 65 72 20 63 6f MS SqlServer co
1870: 6d 70 61 74 69 62 69 6c 69 74 79 20 2a 2f 0a 20 mpatibility */.
1880: 20 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20 72 default: r
1890: 65 74 75 72 6e 20 2d 31 3b 0a 20 20 7d 0a 20 20 eturn -1;. }.
18a0: 66 6f 72 28 69 3d 31 2c 20 6a 3d 30 3b 20 41 4c for(i=1, j=0; AL
18b0: 57 41 59 53 28 7a 5b 69 5d 29 3b 20 69 2b 2b 29 WAYS(z[i]); i++)
18c0: 7b 0a 20 20 20 20 69 66 28 20 7a 5b 69 5d 3d 3d {. if( z[i]==
18d0: 71 75 6f 74 65 20 29 7b 0a 20 20 20 20 20 20 69 quote ){. i
18e0: 66 28 20 7a 5b 69 2b 31 5d 3d 3d 71 75 6f 74 65 f( z[i+1]==quote
18f0: 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 6a 2b ){. z[j+
1900: 2b 5d 20 3d 20 71 75 6f 74 65 3b 0a 20 20 20 20 +] = quote;.
1910: 20 20 20 20 69 2b 2b 3b 0a 20 20 20 20 20 20 7d i++;. }
1920: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 62 72 else{. br
1930: 65 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 eak;. }.
1940: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 7a 5b }else{. z[
1950: 6a 2b 2b 5d 20 3d 20 7a 5b 69 5d 3b 0a 20 20 20 j++] = z[i];.
1960: 20 7d 0a 20 20 7d 0a 20 20 7a 5b 6a 5d 20 3d 20 }. }. z[j] =
1970: 30 3b 0a 20 20 72 65 74 75 72 6e 20 6a 3b 0a 7d 0;. return j;.}
1980: 0a 0a 2f 2a 20 43 6f 6e 76 65 6e 69 65 6e 74 20 ../* Convenient
1990: 73 68 6f 72 74 2d 68 61 6e 64 20 2a 2f 0a 23 64 short-hand */.#d
19a0: 65 66 69 6e 65 20 55 70 70 65 72 54 6f 4c 6f 77 efine UpperToLow
19b0: 65 72 20 73 71 6c 69 74 65 33 55 70 70 65 72 54 er sqlite3UpperT
19c0: 6f 4c 6f 77 65 72 0a 0a 2f 2a 0a 2a 2a 20 53 6f oLower../*.** So
19d0: 6d 65 20 73 79 73 74 65 6d 73 20 68 61 76 65 20 me systems have
19e0: 73 74 72 69 63 6d 70 28 29 2e 20 20 4f 74 68 65 stricmp(). Othe
19f0: 72 73 20 68 61 76 65 20 73 74 72 63 61 73 65 63 rs have strcasec
1a00: 6d 70 28 29 2e 20 20 42 65 63 61 75 73 65 0a 2a mp(). Because.*
1a10: 2a 20 74 68 65 72 65 20 69 73 20 6e 6f 20 63 6f * there is no co
1a20: 6e 73 69 73 74 65 6e 63 79 2c 20 77 65 20 77 69 nsistency, we wi
1a30: 6c 6c 20 64 65 66 69 6e 65 20 6f 75 72 20 6f 77 ll define our ow
1a40: 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 4c 45 4d 45 n..**.** IMPLEME
1a50: 4e 54 41 54 49 4f 4e 2d 4f 46 3a 20 52 2d 32 30 NTATION-OF: R-20
1a60: 35 32 32 2d 32 34 36 33 39 20 54 68 65 20 73 71 522-24639 The sq
1a70: 6c 69 74 65 33 5f 73 74 72 6e 69 63 6d 70 28 29 lite3_strnicmp()
1a80: 20 41 50 49 20 61 6c 6c 6f 77 73 0a 2a 2a 20 61 API allows.** a
1a90: 70 70 6c 69 63 61 74 69 6f 6e 73 20 61 6e 64 20 pplications and
1aa0: 65 78 74 65 6e 73 69 6f 6e 73 20 74 6f 20 63 6f extensions to co
1ab0: 6d 70 61 72 65 20 74 68 65 20 63 6f 6e 74 65 6e mpare the conten
1ac0: 74 73 20 6f 66 20 74 77 6f 20 62 75 66 66 65 72 ts of two buffer
1ad0: 73 0a 2a 2a 20 63 6f 6e 74 61 69 6e 69 6e 67 20 s.** containing
1ae0: 55 54 46 2d 38 20 73 74 72 69 6e 67 73 20 69 6e UTF-8 strings in
1af0: 20 61 20 63 61 73 65 2d 69 6e 64 65 70 65 6e 64 a case-independ
1b00: 65 6e 74 20 66 61 73 68 69 6f 6e 2c 20 75 73 69 ent fashion, usi
1b10: 6e 67 20 74 68 65 20 73 61 6d 65 0a 2a 2a 20 64 ng the same.** d
1b20: 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 63 61 73 efinition of cas
1b30: 65 20 69 6e 64 65 70 65 6e 64 65 6e 63 65 20 74 e independence t
1b40: 68 61 74 20 53 51 4c 69 74 65 20 75 73 65 73 20 hat SQLite uses
1b50: 69 6e 74 65 72 6e 61 6c 6c 79 20 77 68 65 6e 0a internally when.
1b60: 2a 2a 20 63 6f 6d 70 61 72 69 6e 67 20 69 64 65 ** comparing ide
1b70: 6e 74 69 66 69 65 72 73 2e 0a 2a 2f 0a 69 6e 74 ntifiers..*/.int
1b80: 20 73 71 6c 69 74 65 33 53 74 72 49 43 6d 70 28 sqlite3StrICmp(
1b90: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 65 66 const char *zLef
1ba0: 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a t, const char *z
1bb0: 52 69 67 68 74 29 7b 0a 20 20 72 65 67 69 73 74 Right){. regist
1bc0: 65 72 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 er unsigned char
1bd0: 20 2a 61 2c 20 2a 62 3b 0a 20 20 61 20 3d 20 28 *a, *b;. a = (
1be0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 unsigned char *)
1bf0: 7a 4c 65 66 74 3b 0a 20 20 62 20 3d 20 28 75 6e zLeft;. b = (un
1c00: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a 52 signed char *)zR
1c10: 69 67 68 74 3b 0a 20 20 77 68 69 6c 65 28 20 2a ight;. while( *
1c20: 61 21 3d 30 20 26 26 20 55 70 70 65 72 54 6f 4c a!=0 && UpperToL
1c30: 6f 77 65 72 5b 2a 61 5d 3d 3d 55 70 70 65 72 54 ower[*a]==UpperT
1c40: 6f 4c 6f 77 65 72 5b 2a 62 5d 29 7b 20 61 2b 2b oLower[*b]){ a++
1c50: 3b 20 62 2b 2b 3b 20 7d 0a 20 20 72 65 74 75 72 ; b++; }. retur
1c60: 6e 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a n UpperToLower[*
1c70: 61 5d 20 2d 20 55 70 70 65 72 54 6f 4c 6f 77 65 a] - UpperToLowe
1c80: 72 5b 2a 62 5d 3b 0a 7d 0a 69 6e 74 20 73 71 6c r[*b];.}.int sql
1c90: 69 74 65 33 5f 73 74 72 6e 69 63 6d 70 28 63 6f ite3_strnicmp(co
1ca0: 6e 73 74 20 63 68 61 72 20 2a 7a 4c 65 66 74 2c nst char *zLeft,
1cb0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 69 const char *zRi
1cc0: 67 68 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 ght, int N){. r
1cd0: 65 67 69 73 74 65 72 20 75 6e 73 69 67 6e 65 64 egister unsigned
1ce0: 20 63 68 61 72 20 2a 61 2c 20 2a 62 3b 0a 20 20 char *a, *b;.
1cf0: 61 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 a = (unsigned ch
1d00: 61 72 20 2a 29 7a 4c 65 66 74 3b 0a 20 20 62 20 ar *)zLeft;. b
1d10: 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 = (unsigned char
1d20: 20 2a 29 7a 52 69 67 68 74 3b 0a 20 20 77 68 69 *)zRight;. whi
1d30: 6c 65 28 20 4e 2d 2d 20 3e 20 30 20 26 26 20 2a le( N-- > 0 && *
1d40: 61 21 3d 30 20 26 26 20 55 70 70 65 72 54 6f 4c a!=0 && UpperToL
1d50: 6f 77 65 72 5b 2a 61 5d 3d 3d 55 70 70 65 72 54 ower[*a]==UpperT
1d60: 6f 4c 6f 77 65 72 5b 2a 62 5d 29 7b 20 61 2b 2b oLower[*b]){ a++
1d70: 3b 20 62 2b 2b 3b 20 7d 0a 20 20 72 65 74 75 72 ; b++; }. retur
1d80: 6e 20 4e 3c 30 20 3f 20 30 20 3a 20 55 70 70 65 n N<0 ? 0 : Uppe
1d90: 72 54 6f 4c 6f 77 65 72 5b 2a 61 5d 20 2d 20 55 rToLower[*a] - U
1da0: 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 62 5d 3b pperToLower[*b];
1db0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e .}../*.** Return
1dc0: 20 54 52 55 45 20 69 66 20 7a 20 69 73 20 61 20 TRUE if z is a
1dd0: 70 75 72 65 20 6e 75 6d 65 72 69 63 20 73 74 72 pure numeric str
1de0: 69 6e 67 2e 20 20 52 65 74 75 72 6e 20 46 41 4c ing. Return FAL
1df0: 53 45 20 61 6e 64 20 6c 65 61 76 65 0a 2a 2a 20 SE and leave.**
1e00: 2a 72 65 61 6c 6e 75 6d 20 75 6e 63 68 61 6e 67 *realnum unchang
1e10: 65 64 20 69 66 20 74 68 65 20 73 74 72 69 6e 67 ed if the string
1e20: 20 63 6f 6e 74 61 69 6e 73 20 61 6e 79 20 63 68 contains any ch
1e30: 61 72 61 63 74 65 72 20 77 68 69 63 68 20 69 73 aracter which is
1e40: 20 6e 6f 74 0a 2a 2a 20 70 61 72 74 20 6f 66 20 not.** part of
1e50: 61 20 6e 75 6d 62 65 72 2e 0a 2a 2a 0a 2a 2a 20 a number..**.**
1e60: 49 66 20 74 68 65 20 73 74 72 69 6e 67 20 69 73 If the string is
1e70: 20 70 75 72 65 20 6e 75 6d 65 72 69 63 2c 20 73 pure numeric, s
1e80: 65 74 20 2a 72 65 61 6c 6e 75 6d 20 74 6f 20 54 et *realnum to T
1e90: 52 55 45 20 69 66 20 74 68 65 20 73 74 72 69 6e RUE if the strin
1ea0: 67 0a 2a 2a 20 63 6f 6e 74 61 69 6e 73 20 74 68 g.** contains th
1eb0: 65 20 27 2e 27 20 63 68 61 72 61 63 74 65 72 20 e '.' character
1ec0: 6f 72 20 61 6e 20 22 45 2b 30 30 30 22 20 73 74 or an "E+000" st
1ed0: 79 6c 65 20 65 78 70 6f 6e 65 6e 74 69 61 74 69 yle exponentiati
1ee0: 6f 6e 20 73 75 66 66 69 78 2e 0a 2a 2a 20 4f 74 on suffix..** Ot
1ef0: 68 65 72 77 69 73 65 20 73 65 74 20 2a 72 65 61 herwise set *rea
1f00: 6c 6e 75 6d 20 74 6f 20 46 41 4c 53 45 2e 20 20 lnum to FALSE.
1f10: 4e 6f 74 65 20 74 68 61 74 20 6a 75 73 74 20 62 Note that just b
1f20: 65 63 61 75 65 20 2a 72 65 61 6c 6e 75 6d 20 69 ecaue *realnum i
1f30: 73 0a 2a 2a 20 66 61 6c 73 65 20 64 6f 65 73 20 s.** false does
1f40: 6e 6f 74 20 6d 65 61 6e 20 74 68 61 74 20 74 68 not mean that th
1f50: 65 20 6e 75 6d 62 65 72 20 63 61 6e 20 62 65 20 e number can be
1f60: 73 75 63 63 65 73 73 66 75 6c 6c 79 20 63 6f 6e successfully con
1f70: 76 65 72 74 65 64 20 69 6e 74 6f 0a 2a 2a 20 61 verted into.** a
1f80: 6e 20 69 6e 74 65 67 65 72 20 2d 20 69 74 20 6d n integer - it m
1f90: 69 67 68 74 20 62 65 20 74 6f 6f 20 62 69 67 2e ight be too big.
1fa0: 0a 2a 2a 0a 2a 2a 20 41 6e 20 65 6d 70 74 79 20 .**.** An empty
1fb0: 73 74 72 69 6e 67 20 69 73 20 63 6f 6e 73 69 64 string is consid
1fc0: 65 72 65 64 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 ered non-numeric
1fd0: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 ..*/.int sqlite3
1fe0: 49 73 4e 75 6d 62 65 72 28 63 6f 6e 73 74 20 63 IsNumber(const c
1ff0: 68 61 72 20 2a 7a 2c 20 69 6e 74 20 2a 72 65 61 har *z, int *rea
2000: 6c 6e 75 6d 2c 20 75 38 20 65 6e 63 29 7b 0a 20 lnum, u8 enc){.
2010: 20 69 6e 74 20 69 6e 63 72 20 3d 20 28 65 6e 63 int incr = (enc
2020: 3d 3d 53 51 4c 49 54 45 5f 55 54 46 38 3f 31 3a ==SQLITE_UTF8?1:
2030: 32 29 3b 0a 20 20 69 66 28 20 65 6e 63 3d 3d 53 2);. if( enc==S
2040: 51 4c 49 54 45 5f 55 54 46 31 36 42 45 20 29 20 QLITE_UTF16BE )
2050: 7a 2b 2b 3b 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 z++;. if( *z=='
2060: 2d 27 20 7c 7c 20 2a 7a 3d 3d 27 2b 27 20 29 20 -' || *z=='+' )
2070: 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 69 66 28 z += incr;. if(
2080: 20 21 73 71 6c 69 74 65 33 49 73 64 69 67 69 74 !sqlite3Isdigit
2090: 28 2a 7a 29 20 29 7b 0a 20 20 20 20 72 65 74 75 (*z) ){. retu
20a0: 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 7a 20 2b 3d rn 0;. }. z +=
20b0: 20 69 6e 63 72 3b 0a 20 20 2a 72 65 61 6c 6e 75 incr;. *realnu
20c0: 6d 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 20 m = 0;. while(
20d0: 73 71 6c 69 74 65 33 49 73 64 69 67 69 74 28 2a sqlite3Isdigit(*
20e0: 7a 29 20 29 7b 20 7a 20 2b 3d 20 69 6e 63 72 3b z) ){ z += incr;
20f0: 20 7d 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 }.#ifndef SQLIT
2100: 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f E_OMIT_FLOATING_
2110: 50 4f 49 4e 54 0a 20 20 69 66 28 20 2a 7a 3d 3d POINT. if( *z==
2120: 27 2e 27 20 29 7b 0a 20 20 20 20 7a 20 2b 3d 20 '.' ){. z +=
2130: 69 6e 63 72 3b 0a 20 20 20 20 69 66 28 20 21 73 incr;. if( !s
2140: 71 6c 69 74 65 33 49 73 64 69 67 69 74 28 2a 7a qlite3Isdigit(*z
2150: 29 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 ) ) return 0;.
2160: 20 20 77 68 69 6c 65 28 20 73 71 6c 69 74 65 33 while( sqlite3
2170: 49 73 64 69 67 69 74 28 2a 7a 29 20 29 7b 20 7a Isdigit(*z) ){ z
2180: 20 2b 3d 20 69 6e 63 72 3b 20 7d 0a 20 20 20 20 += incr; }.
2190: 2a 72 65 61 6c 6e 75 6d 20 3d 20 31 3b 0a 20 20 *realnum = 1;.
21a0: 7d 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 65 27 20 }. if( *z=='e'
21b0: 7c 7c 20 2a 7a 3d 3d 27 45 27 20 29 7b 0a 20 20 || *z=='E' ){.
21c0: 20 20 7a 20 2b 3d 20 69 6e 63 72 3b 0a 20 20 20 z += incr;.
21d0: 20 69 66 28 20 2a 7a 3d 3d 27 2b 27 20 7c 7c 20 if( *z=='+' ||
21e0: 2a 7a 3d 3d 27 2d 27 20 29 20 7a 20 2b 3d 20 69 *z=='-' ) z += i
21f0: 6e 63 72 3b 0a 20 20 20 20 69 66 28 20 21 73 71 ncr;. if( !sq
2200: 6c 69 74 65 33 49 73 64 69 67 69 74 28 2a 7a 29 lite3Isdigit(*z)
2210: 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 ) return 0;.
2220: 20 77 68 69 6c 65 28 20 73 71 6c 69 74 65 33 49 while( sqlite3I
2230: 73 64 69 67 69 74 28 2a 7a 29 20 29 7b 20 7a 20 sdigit(*z) ){ z
2240: 2b 3d 20 69 6e 63 72 3b 20 7d 0a 20 20 20 20 2a += incr; }. *
2250: 72 65 61 6c 6e 75 6d 20 3d 20 31 3b 0a 20 20 7d realnum = 1;. }
2260: 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 6e .#endif. return
2270: 20 2a 7a 3d 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a *z==0;.}../*.**
2280: 20 54 68 65 20 73 74 72 69 6e 67 20 7a 5b 5d 20 The string z[]
2290: 69 73 20 61 6e 20 41 53 43 49 49 20 72 65 70 72 is an ASCII repr
22a0: 65 73 65 6e 74 61 74 69 6f 6e 20 6f 66 20 61 20 esentation of a
22b0: 72 65 61 6c 20 6e 75 6d 62 65 72 2e 0a 2a 2a 20 real number..**
22c0: 43 6f 6e 76 65 72 74 20 74 68 69 73 20 73 74 72 Convert this str
22d0: 69 6e 67 20 74 6f 20 61 20 64 6f 75 62 6c 65 2e ing to a double.
22e0: 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 .**.** This rout
22f0: 69 6e 65 20 61 73 73 75 6d 65 73 20 74 68 61 74 ine assumes that
2300: 20 7a 5b 5d 20 72 65 61 6c 6c 79 20 69 73 20 61 z[] really is a
2310: 20 76 61 6c 69 64 20 6e 75 6d 62 65 72 2e 20 20 valid number.
2320: 49 66 20 69 74 0a 2a 2a 20 69 73 20 6e 6f 74 2c If it.** is not,
2330: 20 74 68 65 20 72 65 73 75 6c 74 20 69 73 20 75 the result is u
2340: 6e 64 65 66 69 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 ndefined..**.**
2350: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 This routine is
2360: 75 73 65 64 20 69 6e 73 74 65 61 64 20 6f 66 20 used instead of
2370: 74 68 65 20 6c 69 62 72 61 72 79 20 61 74 6f 66 the library atof
2380: 28 29 20 66 75 6e 63 74 69 6f 6e 20 62 65 63 61 () function beca
2390: 75 73 65 0a 2a 2a 20 74 68 65 20 6c 69 62 72 61 use.** the libra
23a0: 72 79 20 61 74 6f 66 28 29 20 6d 69 67 68 74 20 ry atof() might
23b0: 77 61 6e 74 20 74 6f 20 75 73 65 20 22 2c 22 20 want to use ","
23c0: 61 73 20 74 68 65 20 64 65 63 69 6d 61 6c 20 70 as the decimal p
23d0: 6f 69 6e 74 20 69 6e 73 74 65 61 64 0a 2a 2a 20 oint instead.**
23e0: 6f 66 20 22 2e 22 20 64 65 70 65 6e 64 69 6e 67 of "." depending
23f0: 20 6f 6e 20 68 6f 77 20 6c 6f 63 61 6c 65 20 69 on how locale i
2400: 73 20 73 65 74 2e 20 20 42 75 74 20 74 68 61 74 s set. But that
2410: 20 77 6f 75 6c 64 20 63 61 75 73 65 20 70 72 6f would cause pro
2420: 62 6c 65 6d 73 0a 2a 2a 20 66 6f 72 20 53 51 4c blems.** for SQL
2430: 2e 20 20 53 6f 20 74 68 69 73 20 72 6f 75 74 69 . So this routi
2440: 6e 65 20 61 6c 77 61 79 73 20 75 73 65 73 20 22 ne always uses "
2450: 2e 22 20 72 65 67 61 72 64 6c 65 73 73 20 6f 66 ." regardless of
2460: 20 6c 6f 63 61 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 locale..*/.int
2470: 73 71 6c 69 74 65 33 41 74 6f 46 28 63 6f 6e 73 sqlite3AtoF(cons
2480: 74 20 63 68 61 72 20 2a 7a 2c 20 64 6f 75 62 6c t char *z, doubl
2490: 65 20 2a 70 52 65 73 75 6c 74 29 7b 0a 23 69 66 e *pResult){.#if
24a0: 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 ndef SQLITE_OMIT
24b0: 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 0a _FLOATING_POINT.
24c0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 42 const char *zB
24d0: 65 67 69 6e 20 3d 20 7a 3b 0a 20 20 2f 2a 20 73 egin = z;. /* s
24e0: 69 67 6e 20 2a 20 73 69 67 6e 69 66 69 63 61 6e ign * significan
24f0: 64 20 2a 20 28 31 30 20 5e 20 28 65 73 69 67 6e d * (10 ^ (esign
2500: 20 2a 20 65 78 70 6f 6e 65 6e 74 29 29 20 2a 2f * exponent)) */
2510: 0a 20 20 69 6e 74 20 73 69 67 6e 20 3d 20 31 3b . int sign = 1;
2520: 20 20 20 2f 2a 20 73 69 67 6e 20 6f 66 20 73 69 /* sign of si
2530: 67 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20 69 gnificand */. i
2540: 36 34 20 73 20 3d 20 30 3b 20 20 20 20 20 20 2f 64 s = 0; /
2550: 2a 20 73 69 67 6e 69 66 69 63 61 6e 64 20 2a 2f * significand */
2560: 0a 20 20 69 6e 74 20 64 20 3d 20 30 3b 20 20 20 . int d = 0;
2570: 20 20 20 2f 2a 20 61 64 6a 75 73 74 20 65 78 70 /* adjust exp
2580: 6f 6e 65 6e 74 20 66 6f 72 20 73 68 69 66 74 69 onent for shifti
2590: 6e 67 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 ng decimal point
25a0: 20 2a 2f 0a 20 20 69 6e 74 20 65 73 69 67 6e 20 */. int esign
25b0: 3d 20 31 3b 20 20 2f 2a 20 73 69 67 6e 20 6f 66 = 1; /* sign of
25c0: 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20 69 exponent */. i
25d0: 6e 74 20 65 20 3d 20 30 3b 20 20 20 20 20 20 2f nt e = 0; /
25e0: 2a 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20 * exponent */.
25f0: 64 6f 75 62 6c 65 20 72 65 73 75 6c 74 3b 0a 20 double result;.
2600: 20 69 6e 74 20 6e 44 69 67 69 74 73 20 3d 20 30 int nDigits = 0
2610: 3b 0a 0a 20 20 2f 2a 20 73 6b 69 70 20 6c 65 61 ;.. /* skip lea
2620: 64 69 6e 67 20 73 70 61 63 65 73 20 2a 2f 0a 20 ding spaces */.
2630: 20 77 68 69 6c 65 28 20 73 71 6c 69 74 65 33 49 while( sqlite3I
2640: 73 73 70 61 63 65 28 2a 7a 29 20 29 20 7a 2b 2b sspace(*z) ) z++
2650: 3b 0a 20 20 2f 2a 20 67 65 74 20 73 69 67 6e 20 ;. /* get sign
2660: 6f 66 20 73 69 67 6e 69 66 69 63 61 6e 64 20 2a of significand *
2670: 2f 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 20 /. if( *z=='-'
2680: 29 7b 0a 20 20 20 20 73 69 67 6e 20 3d 20 2d 31 ){. sign = -1
2690: 3b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d 65 6c ;. z++;. }el
26a0: 73 65 20 69 66 28 20 2a 7a 3d 3d 27 2b 27 20 29 se if( *z=='+' )
26b0: 7b 0a 20 20 20 20 7a 2b 2b 3b 0a 20 20 7d 0a 20 {. z++;. }.
26c0: 20 2f 2a 20 73 6b 69 70 20 6c 65 61 64 69 6e 67 /* skip leading
26d0: 20 7a 65 72 6f 65 73 20 2a 2f 0a 20 20 77 68 69 zeroes */. whi
26e0: 6c 65 28 20 7a 5b 30 5d 3d 3d 27 30 27 20 29 20 le( z[0]=='0' )
26f0: 7a 2b 2b 2c 20 6e 44 69 67 69 74 73 2b 2b 3b 0a z++, nDigits++;.
2700: 0a 20 20 2f 2a 20 63 6f 70 79 20 6d 61 78 20 73 . /* copy max s
2710: 69 67 6e 69 66 69 63 61 6e 74 20 64 69 67 69 74 ignificant digit
2720: 73 20 74 6f 20 73 69 67 6e 69 66 69 63 61 6e 64 s to significand
2730: 20 2a 2f 0a 20 20 77 68 69 6c 65 28 20 73 71 6c */. while( sql
2740: 69 74 65 33 49 73 64 69 67 69 74 28 2a 7a 29 20 ite3Isdigit(*z)
2750: 26 26 20 73 3c 28 28 4c 41 52 47 45 53 54 5f 49 && s<((LARGEST_I
2760: 4e 54 36 34 2d 39 29 2f 31 30 29 20 29 7b 0a 20 NT64-9)/10) ){.
2770: 20 20 20 73 20 3d 20 73 2a 31 30 20 2b 20 28 2a s = s*10 + (*
2780: 7a 20 2d 20 27 30 27 29 3b 0a 20 20 20 20 7a 2b z - '0');. z+
2790: 2b 2c 20 6e 44 69 67 69 74 73 2b 2b 3b 0a 20 20 +, nDigits++;.
27a0: 7d 0a 20 20 2f 2a 20 73 6b 69 70 20 6e 6f 6e 2d }. /* skip non-
27b0: 73 69 67 6e 69 66 69 63 61 6e 74 20 73 69 67 6e significant sign
27c0: 69 66 69 63 61 6e 64 20 64 69 67 69 74 73 0a 20 ificand digits.
27d0: 20 2a 2a 20 28 69 6e 63 72 65 61 73 65 20 65 78 ** (increase ex
27e0: 70 6f 6e 65 6e 74 20 62 79 20 64 20 74 6f 20 73 ponent by d to s
27f0: 68 69 66 74 20 64 65 63 69 6d 61 6c 20 6c 65 66 hift decimal lef
2800: 74 29 20 2a 2f 0a 20 20 77 68 69 6c 65 28 20 73 t) */. while( s
2810: 71 6c 69 74 65 33 49 73 64 69 67 69 74 28 2a 7a qlite3Isdigit(*z
2820: 29 20 29 20 7a 2b 2b 2c 20 6e 44 69 67 69 74 73 ) ) z++, nDigits
2830: 2b 2b 2c 20 64 2b 2b 3b 0a 0a 20 20 2f 2a 20 69 ++, d++;.. /* i
2840: 66 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 20 f decimal point
2850: 69 73 20 70 72 65 73 65 6e 74 20 2a 2f 0a 20 20 is present */.
2860: 69 66 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b 0a 20 if( *z=='.' ){.
2870: 20 20 20 7a 2b 2b 3b 0a 20 20 20 20 2f 2a 20 63 z++;. /* c
2880: 6f 70 79 20 64 69 67 69 74 73 20 66 72 6f 6d 20 opy digits from
2890: 61 66 74 65 72 20 64 65 63 69 6d 61 6c 20 74 6f after decimal to
28a0: 20 73 69 67 6e 69 66 69 63 61 6e 64 0a 20 20 20 significand.
28b0: 20 2a 2a 20 28 64 65 63 72 65 61 73 65 20 65 78 ** (decrease ex
28c0: 70 6f 6e 65 6e 74 20 62 79 20 64 20 74 6f 20 73 ponent by d to s
28d0: 68 69 66 74 20 64 65 63 69 6d 61 6c 20 72 69 67 hift decimal rig
28e0: 68 74 29 20 2a 2f 0a 20 20 20 20 77 68 69 6c 65 ht) */. while
28f0: 28 20 73 71 6c 69 74 65 33 49 73 64 69 67 69 74 ( sqlite3Isdigit
2900: 28 2a 7a 29 20 26 26 20 73 3c 28 28 4c 41 52 47 (*z) && s<((LARG
2910: 45 53 54 5f 49 4e 54 36 34 2d 39 29 2f 31 30 29 EST_INT64-9)/10)
2920: 20 29 7b 0a 20 20 20 20 20 20 73 20 3d 20 73 2a ){. s = s*
2930: 31 30 20 2b 20 28 2a 7a 20 2d 20 27 30 27 29 3b 10 + (*z - '0');
2940: 0a 20 20 20 20 20 20 7a 2b 2b 2c 20 6e 44 69 67 . z++, nDig
2950: 69 74 73 2b 2b 2c 20 64 2d 2d 3b 0a 20 20 20 20 its++, d--;.
2960: 7d 0a 20 20 20 20 2f 2a 20 73 6b 69 70 20 6e 6f }. /* skip no
2970: 6e 2d 73 69 67 6e 69 66 69 63 61 6e 74 20 64 69 n-significant di
2980: 67 69 74 73 20 2a 2f 0a 20 20 20 20 77 68 69 6c gits */. whil
2990: 65 28 20 73 71 6c 69 74 65 33 49 73 64 69 67 69 e( sqlite3Isdigi
29a0: 74 28 2a 7a 29 20 29 20 7a 2b 2b 2c 20 6e 44 69 t(*z) ) z++, nDi
29b0: 67 69 74 73 2b 2b 3b 0a 20 20 7d 0a 0a 20 20 2f gits++;. }.. /
29c0: 2a 20 69 66 20 65 78 70 6f 6e 65 6e 74 20 69 73 * if exponent is
29d0: 20 70 72 65 73 65 6e 74 20 2a 2f 0a 20 20 69 66 present */. if
29e0: 28 20 2a 7a 3d 3d 27 65 27 20 7c 7c 20 2a 7a 3d ( *z=='e' || *z=
29f0: 3d 27 45 27 20 29 7b 0a 20 20 20 20 7a 2b 2b 3b ='E' ){. z++;
2a00: 0a 20 20 20 20 2f 2a 20 67 65 74 20 73 69 67 6e . /* get sign
2a10: 20 6f 66 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a of exponent */.
2a20: 20 20 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 20 if( *z=='-'
2a30: 29 7b 0a 20 20 20 20 20 20 65 73 69 67 6e 20 3d ){. esign =
2a40: 20 2d 31 3b 0a 20 20 20 20 20 20 7a 2b 2b 3b 0a -1;. z++;.
2a50: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 2a 7a }else if( *z
2a60: 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 20 20 7a =='+' ){. z
2a70: 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2f 2a ++;. }. /*
2a80: 20 63 6f 70 79 20 64 69 67 69 74 73 20 74 6f 20 copy digits to
2a90: 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20 20 20 exponent */.
2aa0: 77 68 69 6c 65 28 20 73 71 6c 69 74 65 33 49 73 while( sqlite3Is
2ab0: 64 69 67 69 74 28 2a 7a 29 20 29 7b 0a 20 20 20 digit(*z) ){.
2ac0: 20 20 20 65 20 3d 20 65 2a 31 30 20 2b 20 28 2a e = e*10 + (*
2ad0: 7a 20 2d 20 27 30 27 29 3b 0a 20 20 20 20 20 20 z - '0');.
2ae0: 7a 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a z++;. }. }..
2af0: 20 20 2f 2a 20 61 64 6a 75 73 74 20 65 78 70 6f /* adjust expo
2b00: 6e 65 6e 74 20 62 79 20 64 2c 20 61 6e 64 20 75 nent by d, and u
2b10: 70 64 61 74 65 20 73 69 67 6e 20 2a 2f 0a 20 20 pdate sign */.
2b20: 65 20 3d 20 28 65 2a 65 73 69 67 6e 29 20 2b 20 e = (e*esign) +
2b30: 64 3b 0a 20 20 69 66 28 20 65 3c 30 20 29 20 7b d;. if( e<0 ) {
2b40: 0a 20 20 20 20 65 73 69 67 6e 20 3d 20 2d 31 3b . esign = -1;
2b50: 0a 20 20 20 20 65 20 2a 3d 20 2d 31 3b 0a 20 20 . e *= -1;.
2b60: 7d 20 65 6c 73 65 20 7b 0a 20 20 20 20 65 73 69 } else {. esi
2b70: 67 6e 20 3d 20 31 3b 0a 20 20 7d 0a 0a 20 20 2f gn = 1;. }.. /
2b80: 2a 20 69 66 20 30 20 73 69 67 6e 69 66 69 63 61 * if 0 significa
2b90: 6e 64 20 2a 2f 0a 20 20 69 66 28 20 21 73 20 29 nd */. if( !s )
2ba0: 20 7b 0a 20 20 20 20 2f 2a 20 49 6e 20 74 68 65 {. /* In the
2bb0: 20 49 45 45 45 20 37 35 34 20 73 74 61 6e 64 61 IEEE 754 standa
2bc0: 72 64 2c 20 7a 65 72 6f 20 69 73 20 73 69 67 6e rd, zero is sign
2bd0: 65 64 2e 0a 20 20 20 20 2a 2a 20 41 64 64 20 74 ed.. ** Add t
2be0: 68 65 20 73 69 67 6e 20 69 66 20 77 65 27 76 65 he sign if we've
2bf0: 20 73 65 65 6e 20 61 74 20 6c 65 61 73 74 20 6f seen at least o
2c00: 6e 65 20 64 69 67 69 74 20 2a 2f 0a 20 20 20 20 ne digit */.
2c10: 72 65 73 75 6c 74 20 3d 20 28 73 69 67 6e 3c 30 result = (sign<0
2c20: 20 26 26 20 6e 44 69 67 69 74 73 29 20 3f 20 2d && nDigits) ? -
2c30: 28 64 6f 75 62 6c 65 29 30 20 3a 20 28 64 6f 75 (double)0 : (dou
2c40: 62 6c 65 29 30 3b 0a 20 20 7d 20 65 6c 73 65 20 ble)0;. } else
2c50: 7b 0a 20 20 20 20 2f 2a 20 61 74 74 65 6d 70 74 {. /* attempt
2c60: 20 74 6f 20 72 65 64 75 63 65 20 65 78 70 6f 6e to reduce expon
2c70: 65 6e 74 20 2a 2f 0a 20 20 20 20 69 66 28 20 65 ent */. if( e
2c80: 73 69 67 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20 sign>0 ){.
2c90: 77 68 69 6c 65 28 20 73 3c 28 4c 41 52 47 45 53 while( s<(LARGES
2ca0: 54 5f 49 4e 54 36 34 2f 31 30 29 20 26 26 20 65 T_INT64/10) && e
2cb0: 3e 30 20 29 20 65 2d 2d 2c 73 2a 3d 31 30 3b 0a >0 ) e--,s*=10;.
2cc0: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
2cd0: 20 77 68 69 6c 65 28 20 21 28 73 25 31 30 29 20 while( !(s%10)
2ce0: 26 26 20 65 3e 30 20 29 20 65 2d 2d 2c 73 2f 3d && e>0 ) e--,s/=
2cf0: 31 30 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 10;. }.. /
2d00: 2a 20 61 64 6a 75 73 74 20 74 68 65 20 73 69 67 * adjust the sig
2d10: 6e 20 6f 66 20 73 69 67 6e 69 66 69 63 61 6e 64 n of significand
2d20: 20 2a 2f 0a 20 20 20 20 73 20 3d 20 73 69 67 6e */. s = sign
2d30: 3c 30 20 3f 20 2d 73 20 3a 20 73 3b 0a 0a 20 20 <0 ? -s : s;..
2d40: 20 20 2f 2a 20 69 66 20 65 78 70 6f 6e 65 6e 74 /* if exponent
2d50: 2c 20 73 63 61 6c 65 20 73 69 67 6e 69 66 69 63 , scale signific
2d60: 61 6e 64 20 61 73 20 61 70 70 72 6f 70 72 69 61 and as appropria
2d70: 74 65 0a 20 20 20 20 2a 2a 20 61 6e 64 20 73 74 te. ** and st
2d80: 6f 72 65 20 69 6e 20 72 65 73 75 6c 74 2e 20 2a ore in result. *
2d90: 2f 0a 20 20 20 20 69 66 28 20 65 20 29 7b 0a 20 /. if( e ){.
2da0: 20 20 20 20 20 64 6f 75 62 6c 65 20 73 63 61 6c double scal
2db0: 65 20 3d 20 31 2e 30 3b 0a 20 20 20 20 20 20 2f e = 1.0;. /
2dc0: 2a 20 61 74 74 65 6d 70 74 20 74 6f 20 68 61 6e * attempt to han
2dd0: 64 6c 65 20 65 78 74 72 65 6d 65 6c 79 20 73 6d dle extremely sm
2de0: 61 6c 6c 2f 6c 61 72 67 65 20 6e 75 6d 62 65 72 all/large number
2df0: 73 20 62 65 74 74 65 72 20 2a 2f 0a 20 20 20 20 s better */.
2e00: 20 20 69 66 28 20 65 3e 33 30 37 20 26 26 20 65 if( e>307 && e
2e10: 3c 33 34 32 20 29 7b 0a 20 20 20 20 20 20 20 20 <342 ){.
2e20: 77 68 69 6c 65 28 20 65 25 33 30 38 20 29 20 7b while( e%308 ) {
2e30: 20 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 2b 31 scale *= 1.0e+1
2e40: 3b 20 65 20 2d 3d 20 31 3b 20 7d 0a 20 20 20 20 ; e -= 1; }.
2e50: 20 20 20 20 69 66 28 20 65 73 69 67 6e 3c 30 20 if( esign<0
2e60: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65 73 ){. res
2e70: 75 6c 74 20 3d 20 73 20 2f 20 73 63 61 6c 65 3b ult = s / scale;
2e80: 0a 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c . resul
2e90: 74 20 2f 3d 20 31 2e 30 65 2b 33 30 38 3b 0a 20 t /= 1.0e+308;.
2ea0: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
2eb0: 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 3d result =
2ec0: 20 73 20 2a 20 73 63 61 6c 65 3b 0a 20 20 20 20 s * scale;.
2ed0: 20 20 20 20 20 20 72 65 73 75 6c 74 20 2a 3d 20 result *=
2ee0: 31 2e 30 65 2b 33 30 38 3b 0a 20 20 20 20 20 20 1.0e+308;.
2ef0: 20 20 7d 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b }. }else{
2f00: 0a 20 20 20 20 20 20 20 20 2f 2a 20 31 2e 30 65 . /* 1.0e
2f10: 2b 32 32 20 69 73 20 74 68 65 20 6c 61 72 67 65 +22 is the large
2f20: 73 74 20 70 6f 77 65 72 20 6f 66 20 31 30 20 74 st power of 10 t
2f30: 68 61 6e 20 63 61 6e 20 62 65 20 0a 20 20 20 20 han can be .
2f40: 20 20 20 20 2a 2a 20 72 65 70 72 65 73 65 6e 74 ** represent
2f50: 65 64 20 65 78 61 63 74 6c 79 2e 20 2a 2f 0a 20 ed exactly. */.
2f60: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 65 25 while( e%
2f70: 32 32 20 29 20 7b 20 73 63 61 6c 65 20 2a 3d 20 22 ) { scale *=
2f80: 31 2e 30 65 2b 31 3b 20 65 20 2d 3d 20 31 3b 20 1.0e+1; e -= 1;
2f90: 7d 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 }. while(
2fa0: 20 65 3e 30 20 29 20 7b 20 73 63 61 6c 65 20 2a e>0 ) { scale *
2fb0: 3d 20 31 2e 30 65 2b 32 32 3b 20 65 20 2d 3d 20 = 1.0e+22; e -=
2fc0: 32 32 3b 20 7d 0a 20 20 20 20 20 20 20 20 69 66 22; }. if
2fd0: 28 20 65 73 69 67 6e 3c 30 20 29 7b 0a 20 20 20 ( esign<0 ){.
2fe0: 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 3d 20 result =
2ff0: 73 20 2f 20 73 63 61 6c 65 3b 0a 20 20 20 20 20 s / scale;.
3000: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
3010: 20 20 20 20 72 65 73 75 6c 74 20 3d 20 73 20 2a result = s *
3020: 20 73 63 61 6c 65 3b 0a 20 20 20 20 20 20 20 20 scale;.
3030: 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 20 }. }. }
3040: 65 6c 73 65 20 7b 0a 20 20 20 20 20 20 72 65 73 else {. res
3050: 75 6c 74 20 3d 20 28 64 6f 75 62 6c 65 29 73 3b ult = (double)s;
3060: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a . }. }.. /*
3070: 20 73 74 6f 72 65 20 74 68 65 20 72 65 73 75 6c store the resul
3080: 74 20 2a 2f 0a 20 20 2a 70 52 65 73 75 6c 74 20 t */. *pResult
3090: 3d 20 72 65 73 75 6c 74 3b 0a 0a 20 20 2f 2a 20 = result;.. /*
30a0: 72 65 74 75 72 6e 20 6e 75 6d 62 65 72 20 6f 66 return number of
30b0: 20 63 68 61 72 61 63 74 65 72 73 20 75 73 65 64 characters used
30c0: 20 2a 2f 0a 20 20 72 65 74 75 72 6e 20 28 69 6e */. return (in
30d0: 74 29 28 7a 20 2d 20 7a 42 65 67 69 6e 29 3b 0a t)(z - zBegin);.
30e0: 23 65 6c 73 65 0a 20 20 72 65 74 75 72 6e 20 73 #else. return s
30f0: 71 6c 69 74 65 33 41 74 6f 69 36 34 28 7a 2c 20 qlite3Atoi64(z,
3100: 70 52 65 73 75 6c 74 29 3b 0a 23 65 6e 64 69 66 pResult);.#endif
3110: 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f /* SQLITE_OMIT_
3120: 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 20 2a FLOATING_POINT *
3130: 2f 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 61 /.}../*.** Compa
3140: 72 65 20 74 68 65 20 31 39 2d 63 68 61 72 61 63 re the 19-charac
3150: 74 65 72 20 73 74 72 69 6e 67 20 7a 4e 75 6d 20 ter string zNum
3160: 61 67 61 69 6e 73 74 20 74 68 65 20 74 65 78 74 against the text
3170: 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 0a representation.
3180: 2a 2a 20 76 61 6c 75 65 20 32 5e 36 33 3a 20 20 ** value 2^63:
3190: 39 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 9223372036854775
31a0: 38 30 38 2e 20 20 52 65 74 75 72 6e 20 6e 65 67 808. Return neg
31b0: 61 74 69 76 65 2c 20 7a 65 72 6f 2c 20 6f 72 20 ative, zero, or
31c0: 70 6f 73 69 74 69 76 65 0a 2a 2a 20 69 66 20 7a positive.** if z
31d0: 4e 75 6d 20 69 73 20 6c 65 73 73 20 74 68 61 6e Num is less than
31e0: 2c 20 65 71 75 61 6c 20 74 6f 2c 20 6f 72 20 67 , equal to, or g
31f0: 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 65 20 reater than the
3200: 73 74 72 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 55 6e string..**.** Un
3210: 6c 69 6b 65 20 6d 65 6d 63 6d 70 28 29 20 74 68 like memcmp() th
3220: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 67 75 is routine is gu
3230: 61 72 61 6e 74 65 65 64 20 74 6f 20 72 65 74 75 aranteed to retu
3240: 72 6e 20 74 68 65 20 64 69 66 66 65 72 65 6e 63 rn the differenc
3250: 65 0a 2a 2a 20 69 6e 20 74 68 65 20 76 61 6c 75 e.** in the valu
3260: 65 73 20 6f 66 20 74 68 65 20 6c 61 73 74 20 64 es of the last d
3270: 69 67 69 74 20 69 66 20 74 68 65 20 6f 6e 6c 79 igit if the only
3280: 20 64 69 66 66 65 72 65 6e 63 65 20 69 73 20 69 difference is i
3290: 6e 20 74 68 65 0a 2a 2a 20 6c 61 73 74 20 64 69 n the.** last di
32a0: 67 69 74 2e 20 20 53 6f 2c 20 66 6f 72 20 65 78 git. So, for ex
32b0: 61 6d 70 6c 65 2c 0a 2a 2a 0a 2a 2a 20 20 20 20 ample,.**.**
32c0: 20 20 63 6f 6d 70 61 72 65 32 70 6f 77 36 33 28 compare2pow63(
32d0: 22 39 32 32 33 33 37 32 30 33 36 38 35 34 37 37 "922337203685477
32e0: 35 38 30 30 22 29 0a 2a 2a 0a 2a 2a 20 77 69 6c 5800").**.** wil
32f0: 6c 20 72 65 74 75 72 6e 20 2d 38 2e 0a 2a 2f 0a l return -8..*/.
3300: 73 74 61 74 69 63 20 69 6e 74 20 63 6f 6d 70 61 static int compa
3310: 72 65 32 70 6f 77 36 33 28 63 6f 6e 73 74 20 63 re2pow63(const c
3320: 68 61 72 20 2a 7a 4e 75 6d 29 7b 0a 20 20 69 6e har *zNum){. in
3330: 74 20 63 3b 0a 20 20 63 20 3d 20 6d 65 6d 63 6d t c;. c = memcm
3340: 70 28 7a 4e 75 6d 2c 22 39 32 32 33 33 37 32 30 p(zNum,"92233720
3350: 33 36 38 35 34 37 37 35 38 30 22 2c 31 38 29 2a 3685477580",18)*
3360: 31 30 3b 0a 20 20 69 66 28 20 63 3d 3d 30 20 29 10;. if( c==0 )
3370: 7b 0a 20 20 20 20 63 20 3d 20 7a 4e 75 6d 5b 31 {. c = zNum[1
3380: 38 5d 20 2d 20 27 38 27 3b 0a 20 20 20 20 74 65 8] - '8';. te
3390: 73 74 63 61 73 65 28 20 63 3d 3d 28 2d 31 29 20 stcase( c==(-1)
33a0: 29 3b 0a 20 20 20 20 74 65 73 74 63 61 73 65 28 );. testcase(
33b0: 20 63 3d 3d 30 20 29 3b 0a 20 20 20 20 74 65 73 c==0 );. tes
33c0: 74 63 61 73 65 28 20 63 3d 3d 28 2b 31 29 20 29 tcase( c==(+1) )
33d0: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 63 ;. }. return c
33e0: 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 ;.}.../*.** Retu
33f0: 72 6e 20 54 52 55 45 20 69 66 20 7a 4e 75 6d 20 rn TRUE if zNum
3400: 69 73 20 61 20 36 34 2d 62 69 74 20 73 69 67 6e is a 64-bit sign
3410: 65 64 20 69 6e 74 65 67 65 72 20 61 6e 64 20 77 ed integer and w
3420: 72 69 74 65 0a 2a 2a 20 74 68 65 20 76 61 6c 75 rite.** the valu
3430: 65 20 6f 66 20 74 68 65 20 69 6e 74 65 67 65 72 e of the integer
3440: 20 69 6e 74 6f 20 2a 70 4e 75 6d 2e 20 20 49 66 into *pNum. If
3450: 20 7a 4e 75 6d 20 69 73 20 6e 6f 74 20 61 6e 20 zNum is not an
3460: 69 6e 74 65 67 65 72 0a 2a 2a 20 6f 72 20 69 73 integer.** or is
3470: 20 61 6e 20 69 6e 74 65 67 65 72 20 74 68 61 74 an integer that
3480: 20 69 73 20 74 6f 6f 20 6c 61 72 67 65 20 74 6f is too large to
3490: 20 62 65 20 65 78 70 72 65 73 73 65 64 20 77 69 be expressed wi
34a0: 74 68 20 36 34 20 62 69 74 73 2c 0a 2a 2a 20 74 th 64 bits,.** t
34b0: 68 65 6e 20 72 65 74 75 72 6e 20 66 61 6c 73 65 hen return false
34c0: 2e 0a 2a 2a 0a 2a 2a 20 57 68 65 6e 20 74 68 69 ..**.** When thi
34d0: 73 20 72 6f 75 74 69 6e 65 20 77 61 73 20 6f 72 s routine was or
34e0: 69 67 69 6e 61 6c 6c 79 20 77 72 69 74 74 65 6e iginally written
34f0: 20 69 74 20 64 65 61 6c 74 20 77 69 74 68 20 6f it dealt with o
3500: 6e 6c 79 0a 2a 2a 20 33 32 2d 62 69 74 20 6e 75 nly.** 32-bit nu
3510: 6d 62 65 72 73 2e 20 20 41 74 20 74 68 61 74 20 mbers. At that
3520: 74 69 6d 65 2c 20 69 74 20 77 61 73 20 6d 75 63 time, it was muc
3530: 68 20 66 61 73 74 65 72 20 74 68 61 6e 20 74 68 h faster than th
3540: 65 0a 2a 2a 20 61 74 6f 69 28 29 20 6c 69 62 72 e.** atoi() libr
3550: 61 72 79 20 72 6f 75 74 69 6e 65 20 69 6e 20 52 ary routine in R
3560: 65 64 48 61 74 20 37 2e 32 2e 0a 2a 2f 0a 69 6e edHat 7.2..*/.in
3570: 74 20 73 71 6c 69 74 65 33 41 74 6f 69 36 34 28 t sqlite3Atoi64(
3580: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 75 6d const char *zNum
3590: 2c 20 69 36 34 20 2a 70 4e 75 6d 29 7b 0a 20 20 , i64 *pNum){.
35a0: 69 36 34 20 76 20 3d 20 30 3b 0a 20 20 69 6e 74 i64 v = 0;. int
35b0: 20 6e 65 67 3b 0a 20 20 69 6e 74 20 69 2c 20 63 neg;. int i, c
35c0: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a ;. const char *
35d0: 7a 53 74 61 72 74 3b 0a 20 20 77 68 69 6c 65 28 zStart;. while(
35e0: 20 73 71 6c 69 74 65 33 49 73 73 70 61 63 65 28 sqlite3Isspace(
35f0: 2a 7a 4e 75 6d 29 20 29 20 7a 4e 75 6d 2b 2b 3b *zNum) ) zNum++;
3600: 0a 20 20 69 66 28 20 2a 7a 4e 75 6d 3d 3d 27 2d . if( *zNum=='-
3610: 27 20 29 7b 0a 20 20 20 20 6e 65 67 20 3d 20 31 ' ){. neg = 1
3620: 3b 0a 20 20 20 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 ;. zNum++;.
3630: 7d 65 6c 73 65 20 69 66 28 20 2a 7a 4e 75 6d 3d }else if( *zNum=
3640: 3d 27 2b 27 20 29 7b 0a 20 20 20 20 6e 65 67 20 ='+' ){. neg
3650: 3d 20 30 3b 0a 20 20 20 20 7a 4e 75 6d 2b 2b 3b = 0;. zNum++;
3660: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 6e 65 . }else{. ne
3670: 67 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 7a 53 74 g = 0;. }. zSt
3680: 61 72 74 20 3d 20 7a 4e 75 6d 3b 0a 20 20 77 68 art = zNum;. wh
3690: 69 6c 65 28 20 7a 4e 75 6d 5b 30 5d 3d 3d 27 30 ile( zNum[0]=='0
36a0: 27 20 29 7b 20 7a 4e 75 6d 2b 2b 3b 20 7d 20 2f ' ){ zNum++; } /
36b0: 2a 20 53 6b 69 70 20 6f 76 65 72 20 6c 65 61 64 * Skip over lead
36c0: 69 6e 67 20 7a 65 72 6f 73 2e 20 54 69 63 6b 65 ing zeros. Ticke
36d0: 74 20 23 32 34 35 34 20 2a 2f 0a 20 20 66 6f 72 t #2454 */. for
36e0: 28 69 3d 30 3b 20 28 63 3d 7a 4e 75 6d 5b 69 5d (i=0; (c=zNum[i]
36f0: 29 3e 3d 27 30 27 20 26 26 20 63 3c 3d 27 39 27 )>='0' && c<='9'
3700: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 76 20 3d 20 ; i++){. v =
3710: 76 2a 31 30 20 2b 20 63 20 2d 20 27 30 27 3b 0a v*10 + c - '0';.
3720: 20 20 7d 0a 20 20 2a 70 4e 75 6d 20 3d 20 6e 65 }. *pNum = ne
3730: 67 20 3f 20 2d 76 20 3a 20 76 3b 0a 20 20 74 65 g ? -v : v;. te
3740: 73 74 63 61 73 65 28 20 69 3d 3d 31 38 20 29 3b stcase( i==18 );
3750: 0a 20 20 74 65 73 74 63 61 73 65 28 20 69 3d 3d . testcase( i==
3760: 31 39 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 19 );. testcase
3770: 28 20 69 3d 3d 32 30 20 29 3b 0a 20 20 69 66 28 ( i==20 );. if(
3780: 20 63 21 3d 30 20 7c 7c 20 28 69 3d 3d 30 20 26 c!=0 || (i==0 &
3790: 26 20 7a 53 74 61 72 74 3d 3d 7a 4e 75 6d 29 20 & zStart==zNum)
37a0: 7c 7c 20 69 3e 31 39 20 29 7b 0a 20 20 20 20 2f || i>19 ){. /
37b0: 2a 20 7a 4e 75 6d 20 69 73 20 65 6d 70 74 79 20 * zNum is empty
37c0: 6f 72 20 63 6f 6e 74 61 69 6e 73 20 6e 6f 6e 2d or contains non-
37d0: 6e 75 6d 65 72 69 63 20 74 65 78 74 20 6f 72 20 numeric text or
37e0: 69 73 20 6c 6f 6e 67 65 72 0a 20 20 20 20 2a 2a is longer. **
37f0: 20 74 68 61 6e 20 31 39 20 64 69 67 69 74 73 20 than 19 digits
3800: 28 74 68 75 73 20 67 75 61 72 61 6e 74 69 6e 67 (thus guaranting
3810: 20 74 68 61 74 20 69 74 20 69 73 20 74 6f 6f 20 that it is too
3820: 6c 61 72 67 65 29 20 2a 2f 0a 20 20 20 20 72 65 large) */. re
3830: 74 75 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 20 turn 0;. }else
3840: 69 66 28 20 69 3c 31 39 20 29 7b 0a 20 20 20 20 if( i<19 ){.
3850: 2f 2a 20 4c 65 73 73 20 74 68 61 6e 20 31 39 20 /* Less than 19
3860: 64 69 67 69 74 73 2c 20 73 6f 20 77 65 20 6b 6e digits, so we kn
3870: 6f 77 20 74 68 61 74 20 69 74 20 66 69 74 73 20 ow that it fits
3880: 69 6e 20 36 34 20 62 69 74 73 20 2a 2f 0a 20 20 in 64 bits */.
3890: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 65 return 1;. }e
38a0: 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 31 39 2d 64 lse{. /* 19-d
38b0: 69 67 69 74 20 6e 75 6d 62 65 72 73 20 6d 75 73 igit numbers mus
38c0: 74 20 62 65 20 6e 6f 20 6c 61 72 67 65 72 20 74 t be no larger t
38d0: 68 61 6e 20 39 32 32 33 33 37 32 30 33 36 38 35 han 922337203685
38e0: 34 37 37 35 38 30 37 20 69 66 20 70 6f 73 69 74 4775807 if posit
38f0: 69 76 65 0a 20 20 20 20 2a 2a 20 6f 72 20 39 32 ive. ** or 92
3900: 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 30 2337203685477580
3910: 38 20 69 66 20 6e 65 67 61 74 69 76 65 2e 20 20 8 if negative.
3920: 4e 6f 74 65 20 74 68 61 74 20 39 32 32 33 33 37 Note that 922337
3930: 32 30 33 36 38 35 34 36 36 35 38 30 38 0a 20 20 2036854665808.
3940: 20 20 2a 2a 20 69 73 20 32 5e 36 33 2e 20 2a 2f ** is 2^63. */
3950: 0a 20 20 20 20 72 65 74 75 72 6e 20 63 6f 6d 70 . return comp
3960: 61 72 65 32 70 6f 77 36 33 28 7a 4e 75 6d 29 3c are2pow63(zNum)<
3970: 6e 65 67 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a neg;. }.}../*.*
3980: 2a 20 54 68 65 20 73 74 72 69 6e 67 20 7a 4e 75 * The string zNu
3990: 6d 20 72 65 70 72 65 73 65 6e 74 73 20 61 6e 20 m represents an
39a0: 75 6e 73 69 67 6e 65 64 20 69 6e 74 65 67 65 72 unsigned integer
39b0: 2e 20 20 54 68 65 20 7a 4e 75 6d 20 73 74 72 69 . The zNum stri
39c0: 6e 67 0a 2a 2a 20 63 6f 6e 73 69 73 74 73 20 6f ng.** consists o
39d0: 66 20 6f 6e 65 20 6f 72 20 6d 6f 72 65 20 64 69 f one or more di
39e0: 67 69 74 20 63 68 61 72 61 63 74 65 72 73 20 61 git characters a
39f0: 6e 64 20 69 73 20 74 65 72 6d 69 6e 61 74 65 64 nd is terminated
3a00: 20 62 79 0a 2a 2a 20 61 20 7a 65 72 6f 20 63 68 by.** a zero ch
3a10: 61 72 61 63 74 65 72 2e 20 20 41 6e 79 20 73 74 aracter. Any st
3a20: 72 61 79 20 63 68 61 72 61 63 74 65 72 73 20 69 ray characters i
3a30: 6e 20 7a 4e 75 6d 20 72 65 73 75 6c 74 20 69 6e n zNum result in
3a40: 20 75 6e 64 65 66 69 6e 65 64 0a 2a 2a 20 62 65 undefined.** be
3a50: 68 61 76 69 6f 72 2e 0a 2a 2a 0a 2a 2a 20 49 66 havior..**.** If
3a60: 20 74 68 65 20 75 6e 73 69 67 6e 65 64 20 69 6e the unsigned in
3a70: 74 65 67 65 72 20 74 68 61 74 20 7a 4e 75 6d 20 teger that zNum
3a80: 72 65 70 72 65 73 65 6e 74 73 20 77 69 6c 6c 20 represents will
3a90: 66 69 74 20 69 6e 20 61 0a 2a 2a 20 36 34 2d 62 fit in a.** 64-b
3aa0: 69 74 20 73 69 67 6e 65 64 20 69 6e 74 65 67 65 it signed intege
3ab0: 72 2c 20 72 65 74 75 72 6e 20 54 52 55 45 2e 20 r, return TRUE.
3ac0: 20 4f 74 68 65 72 77 69 73 65 20 72 65 74 75 72 Otherwise retur
3ad0: 6e 20 46 41 4c 53 45 2e 0a 2a 2a 0a 2a 2a 20 49 n FALSE..**.** I
3ae0: 66 20 74 68 65 20 6e 65 67 46 6c 61 67 20 70 61 f the negFlag pa
3af0: 72 61 6d 65 74 65 72 20 69 73 20 74 72 75 65 2c rameter is true,
3b00: 20 74 68 61 74 20 6d 65 61 6e 73 20 74 68 61 74 that means that
3b10: 20 7a 4e 75 6d 20 72 65 61 6c 6c 79 20 72 65 70 zNum really rep
3b20: 72 65 73 65 6e 74 73 0a 2a 2a 20 61 20 6e 65 67 resents.** a neg
3b30: 61 74 69 76 65 20 6e 75 6d 62 65 72 2e 20 20 28 ative number. (
3b40: 54 68 65 20 6c 65 61 64 69 6e 67 20 22 2d 22 20 The leading "-"
3b50: 69 73 20 6f 6d 69 74 74 65 64 20 66 72 6f 6d 20 is omitted from
3b60: 7a 4e 75 6d 2e 29 20 20 54 68 69 73 0a 2a 2a 20 zNum.) This.**
3b70: 70 61 72 61 6d 65 74 65 72 20 69 73 20 6e 65 65 parameter is nee
3b80: 64 65 64 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 ded to determine
3b90: 20 61 20 62 6f 75 6e 64 61 72 79 20 63 61 73 65 a boundary case
3ba0: 2e 20 20 41 20 73 74 72 69 6e 67 0a 2a 2a 20 6f . A string.** o
3bb0: 66 20 22 39 32 32 33 33 37 33 30 33 36 38 35 34 f "9223373036854
3bc0: 37 37 35 38 30 38 22 20 72 65 74 75 72 6e 73 20 775808" returns
3bd0: 66 61 6c 73 65 20 69 66 20 6e 65 67 46 6c 61 67 false if negFlag
3be0: 20 69 73 20 66 61 6c 73 65 20 6f 72 20 74 72 75 is false or tru
3bf0: 65 0a 2a 2a 20 69 66 20 6e 65 67 46 6c 61 67 20 e.** if negFlag
3c00: 69 73 20 74 72 75 65 2e 0a 2a 2a 0a 2a 2a 20 4c is true..**.** L
3c10: 65 61 64 69 6e 67 20 7a 65 72 6f 73 20 61 72 65 eading zeros are
3c20: 20 69 67 6e 6f 72 65 64 2e 0a 2a 2f 0a 69 6e 74 ignored..*/.int
3c30: 20 73 71 6c 69 74 65 33 46 69 74 73 49 6e 36 34 sqlite3FitsIn64
3c40: 42 69 74 73 28 63 6f 6e 73 74 20 63 68 61 72 20 Bits(const char
3c50: 2a 7a 4e 75 6d 2c 20 69 6e 74 20 6e 65 67 46 6c *zNum, int negFl
3c60: 61 67 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 ag){. int i;.
3c70: 69 6e 74 20 6e 65 67 20 3d 20 30 3b 0a 0a 20 20 int neg = 0;..
3c80: 61 73 73 65 72 74 28 20 7a 4e 75 6d 5b 30 5d 3e assert( zNum[0]>
3c90: 3d 27 30 27 20 26 26 20 7a 4e 75 6d 5b 30 5d 3c ='0' && zNum[0]<
3ca0: 3d 27 39 27 20 29 3b 20 2f 2a 20 7a 4e 75 6d 20 ='9' ); /* zNum
3cb0: 69 73 20 61 6e 20 75 6e 73 69 67 6e 65 64 20 6e is an unsigned n
3cc0: 75 6d 62 65 72 20 2a 2f 0a 0a 20 20 69 66 28 20 umber */.. if(
3cd0: 6e 65 67 46 6c 61 67 20 29 20 6e 65 67 20 3d 20 negFlag ) neg =
3ce0: 31 2d 6e 65 67 3b 0a 20 20 77 68 69 6c 65 28 20 1-neg;. while(
3cf0: 2a 7a 4e 75 6d 3d 3d 27 30 27 20 29 7b 0a 20 20 *zNum=='0' ){.
3d00: 20 20 7a 4e 75 6d 2b 2b 3b 20 20 20 2f 2a 20 53 zNum++; /* S
3d10: 6b 69 70 20 6c 65 61 64 69 6e 67 20 7a 65 72 6f kip leading zero
3d20: 73 2e 20 20 54 69 63 6b 65 74 20 23 32 34 35 34 s. Ticket #2454
3d30: 20 2a 2f 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d */. }. for(i=
3d40: 30 3b 20 7a 4e 75 6d 5b 69 5d 3b 20 69 2b 2b 29 0; zNum[i]; i++)
3d50: 7b 20 61 73 73 65 72 74 28 20 7a 4e 75 6d 5b 69 { assert( zNum[i
3d60: 5d 3e 3d 27 30 27 20 26 26 20 7a 4e 75 6d 5b 69 ]>='0' && zNum[i
3d70: 5d 3c 3d 27 39 27 20 29 3b 20 7d 0a 20 20 74 65 ]<='9' ); }. te
3d80: 73 74 63 61 73 65 28 20 69 3d 3d 31 38 20 29 3b stcase( i==18 );
3d90: 0a 20 20 74 65 73 74 63 61 73 65 28 20 69 3d 3d . testcase( i==
3da0: 31 39 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 19 );. testcase
3db0: 28 20 69 3d 3d 32 30 20 29 3b 0a 20 20 69 66 28 ( i==20 );. if(
3dc0: 20 69 3c 31 39 20 29 7b 0a 20 20 20 20 2f 2a 20 i<19 ){. /*
3dd0: 47 75 61 72 61 6e 74 65 65 64 20 74 6f 20 66 69 Guaranteed to fi
3de0: 74 20 69 66 20 6c 65 73 73 20 74 68 61 6e 20 31 t if less than 1
3df0: 39 20 64 69 67 69 74 73 20 2a 2f 0a 20 20 20 20 9 digits */.
3e00: 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 65 6c 73 return 1;. }els
3e10: 65 20 69 66 28 20 69 3e 31 39 20 29 7b 0a 20 20 e if( i>19 ){.
3e20: 20 20 2f 2a 20 47 75 61 72 61 6e 74 65 65 64 20 /* Guaranteed
3e30: 74 6f 20 62 65 20 74 6f 6f 20 62 69 67 20 69 66 to be too big if
3e40: 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 31 39 greater than 19
3e50: 20 64 69 67 69 74 73 20 2a 2f 0a 20 20 20 20 72 digits */. r
3e60: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 eturn 0;. }else
3e70: 7b 0a 20 20 20 20 2f 2a 20 43 6f 6d 70 61 72 65 {. /* Compare
3e80: 20 61 67 61 69 6e 73 74 20 32 5e 36 33 2e 20 2a against 2^63. *
3e90: 2f 0a 20 20 20 20 72 65 74 75 72 6e 20 63 6f 6d /. return com
3ea0: 70 61 72 65 32 70 6f 77 36 33 28 7a 4e 75 6d 29 pare2pow63(zNum)
3eb0: 3c 6e 65 67 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a <neg;. }.}../*.
3ec0: 2a 2a 20 49 66 20 7a 4e 75 6d 20 72 65 70 72 65 ** If zNum repre
3ed0: 73 65 6e 74 73 20 61 6e 20 69 6e 74 65 67 65 72 sents an integer
3ee0: 20 74 68 61 74 20 77 69 6c 6c 20 66 69 74 20 69 that will fit i
3ef0: 6e 20 33 32 2d 62 69 74 73 2c 20 74 68 65 6e 20 n 32-bits, then
3f00: 73 65 74 0a 2a 2a 20 2a 70 56 61 6c 75 65 20 74 set.** *pValue t
3f10: 6f 20 74 68 61 74 20 69 6e 74 65 67 65 72 20 61 o that integer a
3f20: 6e 64 20 72 65 74 75 72 6e 20 74 72 75 65 2e 20 nd return true.
3f30: 20 4f 74 68 65 72 77 69 73 65 20 72 65 74 75 72 Otherwise retur
3f40: 6e 20 66 61 6c 73 65 2e 0a 2a 2a 0a 2a 2a 20 41 n false..**.** A
3f50: 6e 79 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 20 63 ny non-numeric c
3f60: 68 61 72 61 63 74 65 72 73 20 74 68 61 74 20 66 haracters that f
3f70: 6f 6c 6c 6f 77 69 6e 67 20 7a 4e 75 6d 20 61 72 ollowing zNum ar
3f80: 65 20 69 67 6e 6f 72 65 64 2e 0a 2a 2a 20 54 68 e ignored..** Th
3f90: 69 73 20 69 73 20 64 69 66 66 65 72 65 6e 74 20 is is different
3fa0: 66 72 6f 6d 20 73 71 6c 69 74 65 33 41 74 6f 69 from sqlite3Atoi
3fb0: 36 34 28 29 20 77 68 69 63 68 20 72 65 71 75 69 64() which requi
3fc0: 72 65 73 20 74 68 65 0a 2a 2a 20 69 6e 70 75 74 res the.** input
3fd0: 20 6e 75 6d 62 65 72 20 74 6f 20 62 65 20 7a 65 number to be ze
3fe0: 72 6f 2d 74 65 72 6d 69 6e 61 74 65 64 2e 0a 2a ro-terminated..*
3ff0: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 47 65 74 /.int sqlite3Get
4000: 49 6e 74 33 32 28 63 6f 6e 73 74 20 63 68 61 72 Int32(const char
4010: 20 2a 7a 4e 75 6d 2c 20 69 6e 74 20 2a 70 56 61 *zNum, int *pVa
4020: 6c 75 65 29 7b 0a 20 20 73 71 6c 69 74 65 5f 69 lue){. sqlite_i
4030: 6e 74 36 34 20 76 20 3d 20 30 3b 0a 20 20 69 6e nt64 v = 0;. in
4040: 74 20 69 2c 20 63 3b 0a 20 20 69 6e 74 20 6e 65 t i, c;. int ne
4050: 67 20 3d 20 30 3b 0a 20 20 69 66 28 20 7a 4e 75 g = 0;. if( zNu
4060: 6d 5b 30 5d 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 m[0]=='-' ){.
4070: 20 6e 65 67 20 3d 20 31 3b 0a 20 20 20 20 7a 4e neg = 1;. zN
4080: 75 6d 2b 2b 3b 0a 20 20 7d 65 6c 73 65 20 69 66 um++;. }else if
4090: 28 20 7a 4e 75 6d 5b 30 5d 3d 3d 27 2b 27 20 29 ( zNum[0]=='+' )
40a0: 7b 0a 20 20 20 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 {. zNum++;.
40b0: 7d 0a 20 20 77 68 69 6c 65 28 20 7a 4e 75 6d 5b }. while( zNum[
40c0: 30 5d 3d 3d 27 30 27 20 29 20 7a 4e 75 6d 2b 2b 0]=='0' ) zNum++
40d0: 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 ;. for(i=0; i<1
40e0: 31 20 26 26 20 28 63 20 3d 20 7a 4e 75 6d 5b 69 1 && (c = zNum[i
40f0: 5d 20 2d 20 27 30 27 29 3e 3d 30 20 26 26 20 63 ] - '0')>=0 && c
4100: 3c 3d 39 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 76 <=9; i++){. v
4110: 20 3d 20 76 2a 31 30 20 2b 20 63 3b 0a 20 20 7d = v*10 + c;. }
4120: 0a 0a 20 20 2f 2a 20 54 68 65 20 6c 6f 6e 67 65 .. /* The longe
4130: 73 74 20 64 65 63 69 6d 61 6c 20 72 65 70 72 65 st decimal repre
4140: 73 65 6e 74 61 74 69 6f 6e 20 6f 66 20 61 20 33 sentation of a 3
4150: 32 20 62 69 74 20 69 6e 74 65 67 65 72 20 69 73 2 bit integer is
4160: 20 31 30 20 64 69 67 69 74 73 3a 0a 20 20 2a 2a 10 digits:. **
4170: 0a 20 20 2a 2a 20 20 20 20 20 20 20 20 20 20 20 . **
4180: 20 20 31 32 33 34 35 36 37 38 39 30 0a 20 20 2a 1234567890. *
4190: 2a 20 20 20 20 20 32 5e 33 31 20 2d 3e 20 32 31 * 2^31 -> 21
41a0: 34 37 34 38 33 36 34 38 0a 20 20 2a 2f 0a 20 20 47483648. */.
41b0: 74 65 73 74 63 61 73 65 28 20 69 3d 3d 31 30 20 testcase( i==10
41c0: 29 3b 0a 20 20 69 66 28 20 69 3e 31 30 20 29 7b );. if( i>10 ){
41d0: 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 . return 0;.
41e0: 20 7d 0a 20 20 74 65 73 74 63 61 73 65 28 20 76 }. testcase( v
41f0: 2d 6e 65 67 3d 3d 32 31 34 37 34 38 33 36 34 37 -neg==2147483647
4200: 20 29 3b 0a 20 20 69 66 28 20 76 2d 6e 65 67 3e );. if( v-neg>
4210: 32 31 34 37 34 38 33 36 34 37 20 29 7b 0a 20 20 2147483647 ){.
4220: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a return 0;. }.
4230: 20 20 69 66 28 20 6e 65 67 20 29 7b 0a 20 20 20 if( neg ){.
4240: 20 76 20 3d 20 2d 76 3b 0a 20 20 7d 0a 20 20 2a v = -v;. }. *
4250: 70 56 61 6c 75 65 20 3d 20 28 69 6e 74 29 76 3b pValue = (int)v;
4260: 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a 0a . return 1;.}..
4270: 2f 2a 0a 2a 2a 20 54 68 65 20 76 61 72 69 61 62 /*.** The variab
4280: 6c 65 2d 6c 65 6e 67 74 68 20 69 6e 74 65 67 65 le-length intege
4290: 72 20 65 6e 63 6f 64 69 6e 67 20 69 73 20 61 73 r encoding is as
42a0: 20 66 6f 6c 6c 6f 77 73 3a 0a 2a 2a 0a 2a 2a 20 follows:.**.**
42b0: 4b 45 59 3a 0a 2a 2a 20 20 20 20 20 20 20 20 20 KEY:.**
42c0: 41 20 3d 20 30 78 78 78 78 78 78 78 20 20 20 20 A = 0xxxxxxx
42d0: 37 20 62 69 74 73 20 6f 66 20 64 61 74 61 20 61 7 bits of data a
42e0: 6e 64 20 6f 6e 65 20 66 6c 61 67 20 62 69 74 0a nd one flag bit.
42f0: 2a 2a 20 20 20 20 20 20 20 20 20 42 20 3d 20 31 ** B = 1
4300: 78 78 78 78 78 78 78 20 20 20 20 37 20 62 69 74 xxxxxxx 7 bit
4310: 73 20 6f 66 20 64 61 74 61 20 61 6e 64 20 6f 6e s of data and on
4320: 65 20 66 6c 61 67 20 62 69 74 0a 2a 2a 20 20 20 e flag bit.**
4330: 20 20 20 20 20 20 43 20 3d 20 78 78 78 78 78 78 C = xxxxxx
4340: 78 78 20 20 20 20 38 20 62 69 74 73 20 6f 66 20 xx 8 bits of
4350: 64 61 74 61 0a 2a 2a 0a 2a 2a 20 20 37 20 62 69 data.**.** 7 bi
4360: 74 73 20 2d 20 41 0a 2a 2a 20 31 34 20 62 69 74 ts - A.** 14 bit
4370: 73 20 2d 20 42 41 0a 2a 2a 20 32 31 20 62 69 74 s - BA.** 21 bit
4380: 73 20 2d 20 42 42 41 0a 2a 2a 20 32 38 20 62 69 s - BBA.** 28 bi
4390: 74 73 20 2d 20 42 42 42 41 0a 2a 2a 20 33 35 20 ts - BBBA.** 35
43a0: 62 69 74 73 20 2d 20 42 42 42 42 41 0a 2a 2a 20 bits - BBBBA.**
43b0: 34 32 20 62 69 74 73 20 2d 20 42 42 42 42 42 41 42 bits - BBBBBA
43c0: 0a 2a 2a 20 34 39 20 62 69 74 73 20 2d 20 42 42 .** 49 bits - BB
43d0: 42 42 42 42 41 0a 2a 2a 20 35 36 20 62 69 74 73 BBBBA.** 56 bits
43e0: 20 2d 20 42 42 42 42 42 42 42 41 0a 2a 2a 20 36 - BBBBBBBA.** 6
43f0: 34 20 62 69 74 73 20 2d 20 42 42 42 42 42 42 42 4 bits - BBBBBBB
4400: 42 43 0a 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 57 72 69 BC.*/../*.** Wri
4410: 74 65 20 61 20 36 34 2d 62 69 74 20 76 61 72 69 te a 64-bit vari
4420: 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69 6e 74 65 able-length inte
4430: 67 65 72 20 74 6f 20 6d 65 6d 6f 72 79 20 73 74 ger to memory st
4440: 61 72 74 69 6e 67 20 61 74 20 70 5b 30 5d 2e 0a arting at p[0]..
4450: 2a 2a 20 54 68 65 20 6c 65 6e 67 74 68 20 6f 66 ** The length of
4460: 20 64 61 74 61 20 77 72 69 74 65 20 77 69 6c 6c data write will
4470: 20 62 65 20 62 65 74 77 65 65 6e 20 31 20 61 6e be between 1 an
4480: 64 20 39 20 62 79 74 65 73 2e 20 20 54 68 65 20 d 9 bytes. The
4490: 6e 75 6d 62 65 72 0a 2a 2a 20 6f 66 20 62 79 74 number.** of byt
44a0: 65 73 20 77 72 69 74 74 65 6e 20 69 73 20 72 65 es written is re
44b0: 74 75 72 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 41 20 turned..**.** A
44c0: 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 variable-length
44d0: 69 6e 74 65 67 65 72 20 63 6f 6e 73 69 73 74 73 integer consists
44e0: 20 6f 66 20 74 68 65 20 6c 6f 77 65 72 20 37 20 of the lower 7
44f0: 62 69 74 73 20 6f 66 20 65 61 63 68 20 62 79 74 bits of each byt
4500: 65 0a 2a 2a 20 66 6f 72 20 61 6c 6c 20 62 79 74 e.** for all byt
4510: 65 73 20 74 68 61 74 20 68 61 76 65 20 74 68 65 es that have the
4520: 20 38 74 68 20 62 69 74 20 73 65 74 20 61 6e 64 8th bit set and
4530: 20 6f 6e 65 20 62 79 74 65 20 77 69 74 68 20 74 one byte with t
4540: 68 65 20 38 74 68 0a 2a 2a 20 62 69 74 20 63 6c he 8th.** bit cl
4550: 65 61 72 2e 20 20 45 78 63 65 70 74 2c 20 69 66 ear. Except, if
4560: 20 77 65 20 67 65 74 20 74 6f 20 74 68 65 20 39 we get to the 9
4570: 74 68 20 62 79 74 65 2c 20 69 74 20 73 74 6f 72 th byte, it stor
4580: 65 73 20 74 68 65 20 66 75 6c 6c 0a 2a 2a 20 38 es the full.** 8
4590: 20 62 69 74 73 20 61 6e 64 20 69 73 20 74 68 65 bits and is the
45a0: 20 6c 61 73 74 20 62 79 74 65 2e 0a 2a 2f 0a 69 last byte..*/.i
45b0: 6e 74 20 73 71 6c 69 74 65 33 50 75 74 56 61 72 nt sqlite3PutVar
45c0: 69 6e 74 28 75 6e 73 69 67 6e 65 64 20 63 68 61 int(unsigned cha
45d0: 72 20 2a 70 2c 20 75 36 34 20 76 29 7b 0a 20 20 r *p, u64 v){.
45e0: 69 6e 74 20 69 2c 20 6a 2c 20 6e 3b 0a 20 20 75 int i, j, n;. u
45f0: 38 20 62 75 66 5b 31 30 5d 3b 0a 20 20 69 66 28 8 buf[10];. if(
4600: 20 76 20 26 20 28 28 28 75 36 34 29 30 78 66 66 v & (((u64)0xff
4610: 30 30 30 30 30 30 29 3c 3c 33 32 29 20 29 7b 0a 000000)<<32) ){.
4620: 20 20 20 20 70 5b 38 5d 20 3d 20 28 75 38 29 76 p[8] = (u8)v
4630: 3b 0a 20 20 20 20 76 20 3e 3e 3d 20 38 3b 0a 20 ;. v >>= 8;.
4640: 20 20 20 66 6f 72 28 69 3d 37 3b 20 69 3e 3d 30 for(i=7; i>=0
4650: 3b 20 69 2d 2d 29 7b 0a 20 20 20 20 20 20 70 5b ; i--){. p[
4660: 69 5d 20 3d 20 28 75 38 29 28 28 76 20 26 20 30 i] = (u8)((v & 0
4670: 78 37 66 29 20 7c 20 30 78 38 30 29 3b 0a 20 20 x7f) | 0x80);.
4680: 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a 20 20 20 v >>= 7;.
4690: 20 7d 0a 20 20 20 20 72 65 74 75 72 6e 20 39 3b }. return 9;
46a0: 0a 20 20 7d 20 20 20 20 0a 20 20 6e 20 3d 20 30 . } . n = 0
46b0: 3b 0a 20 20 64 6f 7b 0a 20 20 20 20 62 75 66 5b ;. do{. buf[
46c0: 6e 2b 2b 5d 20 3d 20 28 75 38 29 28 28 76 20 26 n++] = (u8)((v &
46d0: 20 30 78 37 66 29 20 7c 20 30 78 38 30 29 3b 0a 0x7f) | 0x80);.
46e0: 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a 20 20 7d v >>= 7;. }
46f0: 77 68 69 6c 65 28 20 76 21 3d 30 20 29 3b 0a 20 while( v!=0 );.
4700: 20 62 75 66 5b 30 5d 20 26 3d 20 30 78 37 66 3b buf[0] &= 0x7f;
4710: 0a 20 20 61 73 73 65 72 74 28 20 6e 3c 3d 39 20 . assert( n<=9
4720: 29 3b 0a 20 20 66 6f 72 28 69 3d 30 2c 20 6a 3d );. for(i=0, j=
4730: 6e 2d 31 3b 20 6a 3e 3d 30 3b 20 6a 2d 2d 2c 20 n-1; j>=0; j--,
4740: 69 2b 2b 29 7b 0a 20 20 20 20 70 5b 69 5d 20 3d i++){. p[i] =
4750: 20 62 75 66 5b 6a 5d 3b 0a 20 20 7d 0a 20 20 72 buf[j];. }. r
4760: 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a eturn n;.}../*.*
4770: 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 * This routine i
4780: 73 20 61 20 66 61 73 74 65 72 20 76 65 72 73 69 s a faster versi
4790: 6f 6e 20 6f 66 20 73 71 6c 69 74 65 33 50 75 74 on of sqlite3Put
47a0: 56 61 72 69 6e 74 28 29 20 74 68 61 74 20 6f 6e Varint() that on
47b0: 6c 79 0a 2a 2a 20 77 6f 72 6b 73 20 66 6f 72 20 ly.** works for
47c0: 33 32 2d 62 69 74 20 70 6f 73 69 74 69 76 65 20 32-bit positive
47d0: 69 6e 74 65 67 65 72 73 20 61 6e 64 20 77 68 69 integers and whi
47e0: 63 68 20 69 73 20 6f 70 74 69 6d 69 7a 65 64 20 ch is optimized
47f0: 66 6f 72 0a 2a 2a 20 74 68 65 20 63 6f 6d 6d 6f for.** the commo
4800: 6e 20 63 61 73 65 20 6f 66 20 73 6d 61 6c 6c 20 n case of small
4810: 69 6e 74 65 67 65 72 73 2e 20 20 41 20 4d 41 43 integers. A MAC
4820: 52 4f 20 76 65 72 73 69 6f 6e 2c 20 70 75 74 56 RO version, putV
4830: 61 72 69 6e 74 33 32 2c 0a 2a 2a 20 69 73 20 70 arint32,.** is p
4840: 72 6f 76 69 64 65 64 20 77 68 69 63 68 20 69 6e rovided which in
4850: 6c 69 6e 65 73 20 74 68 65 20 73 69 6e 67 6c 65 lines the single
4860: 2d 62 79 74 65 20 63 61 73 65 2e 20 20 41 6c 6c -byte case. All
4870: 20 63 6f 64 65 20 73 68 6f 75 6c 64 20 75 73 65 code should use
4880: 0a 2a 2a 20 74 68 65 20 4d 41 43 52 4f 20 76 65 .** the MACRO ve
4890: 72 73 69 6f 6e 20 61 73 20 74 68 69 73 20 66 75 rsion as this fu
48a0: 6e 63 74 69 6f 6e 20 61 73 73 75 6d 65 73 20 74 nction assumes t
48b0: 68 65 20 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 he single-byte c
48c0: 61 73 65 20 68 61 73 0a 2a 2a 20 61 6c 72 65 61 ase has.** alrea
48d0: 64 79 20 62 65 65 6e 20 68 61 6e 64 6c 65 64 2e dy been handled.
48e0: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 50 .*/.int sqlite3P
48f0: 75 74 56 61 72 69 6e 74 33 32 28 75 6e 73 69 67 utVarint32(unsig
4900: 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 75 33 32 ned char *p, u32
4910: 20 76 29 7b 0a 23 69 66 6e 64 65 66 20 70 75 74 v){.#ifndef put
4920: 56 61 72 69 6e 74 33 32 0a 20 20 69 66 28 20 28 Varint32. if( (
4930: 76 20 26 20 7e 30 78 37 66 29 3d 3d 30 20 29 7b v & ~0x7f)==0 ){
4940: 0a 20 20 20 20 70 5b 30 5d 20 3d 20 76 3b 0a 20 . p[0] = v;.
4950: 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d return 1;. }
4960: 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20 28 76 .#endif. if( (v
4970: 20 26 20 7e 30 78 33 66 66 66 29 3d 3d 30 20 29 & ~0x3fff)==0 )
4980: 7b 0a 20 20 20 20 70 5b 30 5d 20 3d 20 28 75 38 {. p[0] = (u8
4990: 29 28 28 76 3e 3e 37 29 20 7c 20 30 78 38 30 29 )((v>>7) | 0x80)
49a0: 3b 0a 20 20 20 20 70 5b 31 5d 20 3d 20 28 75 38 ;. p[1] = (u8
49b0: 29 28 76 20 26 20 30 78 37 66 29 3b 0a 20 20 20 )(v & 0x7f);.
49c0: 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 7d 0a 20 return 2;. }.
49d0: 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 50 return sqlite3P
49e0: 75 74 56 61 72 69 6e 74 28 70 2c 20 76 29 3b 0a utVarint(p, v);.
49f0: 7d 0a 0a 2f 2a 0a 2a 2a 20 42 69 74 6d 61 73 6b }../*.** Bitmask
4a00: 73 20 75 73 65 64 20 62 79 20 73 71 6c 69 74 65 s used by sqlite
4a10: 33 47 65 74 56 61 72 69 6e 74 28 29 2e 20 20 54 3GetVarint(). T
4a20: 68 65 73 65 20 70 72 65 63 6f 6d 70 75 74 65 64 hese precomputed
4a30: 20 63 6f 6e 73 74 61 6e 74 73 0a 2a 2a 20 61 72 constants.** ar
4a40: 65 20 64 65 66 69 6e 65 64 20 68 65 72 65 20 72 e defined here r
4a50: 61 74 68 65 72 20 74 68 61 6e 20 73 69 6d 70 6c ather than simpl
4a60: 79 20 70 75 74 74 69 6e 67 20 74 68 65 20 63 6f y putting the co
4a70: 6e 73 74 61 6e 74 20 65 78 70 72 65 73 73 69 6f nstant expressio
4a80: 6e 73 0a 2a 2a 20 69 6e 6c 69 6e 65 20 69 6e 20 ns.** inline in
4a90: 6f 72 64 65 72 20 74 6f 20 77 6f 72 6b 20 61 72 order to work ar
4aa0: 6f 75 6e 64 20 62 75 67 73 20 69 6e 20 74 68 65 ound bugs in the
4ab0: 20 52 56 54 20 63 6f 6d 70 69 6c 65 72 2e 0a 2a RVT compiler..*
4ac0: 2a 0a 2a 2a 20 53 4c 4f 54 5f 32 5f 30 20 20 20 *.** SLOT_2_0
4ad0: 20 20 41 20 6d 61 73 6b 20 66 6f 72 20 20 28 30 A mask for (0
4ae0: 78 37 66 3c 3c 31 34 29 20 7c 20 30 78 37 66 0a x7f<<14) | 0x7f.
4af0: 2a 2a 0a 2a 2a 20 53 4c 4f 54 5f 34 5f 32 5f 30 **.** SLOT_4_2_0
4b00: 20 20 20 41 20 6d 61 73 6b 20 66 6f 72 20 20 28 A mask for (
4b10: 30 78 37 66 3c 3c 32 38 29 20 7c 20 53 4c 4f 54 0x7f<<28) | SLOT
4b20: 5f 32 5f 30 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 _2_0.*/.#define
4b30: 53 4c 4f 54 5f 32 5f 30 20 20 20 20 20 30 78 30 SLOT_2_0 0x0
4b40: 30 31 66 63 30 37 66 0a 23 64 65 66 69 6e 65 20 01fc07f.#define
4b50: 53 4c 4f 54 5f 34 5f 32 5f 30 20 20 20 30 78 66 SLOT_4_2_0 0xf
4b60: 30 31 66 63 30 37 66 0a 0a 0a 2f 2a 0a 2a 2a 20 01fc07f.../*.**
4b70: 52 65 61 64 20 61 20 36 34 2d 62 69 74 20 76 61 Read a 64-bit va
4b80: 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69 6e riable-length in
4b90: 74 65 67 65 72 20 66 72 6f 6d 20 6d 65 6d 6f 72 teger from memor
4ba0: 79 20 73 74 61 72 74 69 6e 67 20 61 74 20 70 5b y starting at p[
4bb0: 30 5d 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 0]..** Return th
4bc0: 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 e number of byte
4bd0: 73 20 72 65 61 64 2e 20 20 54 68 65 20 76 61 6c s read. The val
4be0: 75 65 20 69 73 20 73 74 6f 72 65 64 20 69 6e 20 ue is stored in
4bf0: 2a 76 2e 0a 2a 2f 0a 75 38 20 73 71 6c 69 74 65 *v..*/.u8 sqlite
4c00: 33 47 65 74 56 61 72 69 6e 74 28 63 6f 6e 73 74 3GetVarint(const
4c10: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a unsigned char *
4c20: 70 2c 20 75 36 34 20 2a 76 29 7b 0a 20 20 75 33 p, u64 *v){. u3
4c30: 32 20 61 2c 62 2c 73 3b 0a 0a 20 20 61 20 3d 20 2 a,b,s;.. a =
4c40: 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 30 20 28 *p;. /* a: p0 (
4c50: 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 unmasked) */. i
4c60: 66 20 28 21 28 61 26 30 78 38 30 29 29 0a 20 20 f (!(a&0x80)).
4c70: 7b 0a 20 20 20 20 2a 76 20 3d 20 61 3b 0a 20 20 {. *v = a;.
4c80: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a return 1;. }.
4c90: 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 2a 70 . p++;. b = *p
4ca0: 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 20 28 75 6e ;. /* b: p1 (un
4cb0: 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 masked) */. if
4cc0: 28 21 28 62 26 30 78 38 30 29 29 0a 20 20 7b 0a (!(b&0x80)). {.
4cd0: 20 20 20 20 61 20 26 3d 20 30 78 37 66 3b 0a 20 a &= 0x7f;.
4ce0: 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 a = a<<7;.
4cf0: 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 2a 76 20 a |= b;. *v
4d00: 3d 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 = a;. return
4d10: 32 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 56 65 72 2;. }.. /* Ver
4d20: 69 66 79 20 74 68 61 74 20 63 6f 6e 73 74 61 6e ify that constan
4d30: 74 73 20 61 72 65 20 70 72 65 63 6f 6d 70 75 74 ts are precomput
4d40: 65 64 20 63 6f 72 72 65 63 74 6c 79 20 2a 2f 0a ed correctly */.
4d50: 20 20 61 73 73 65 72 74 28 20 53 4c 4f 54 5f 32 assert( SLOT_2
4d60: 5f 30 20 3d 3d 20 28 28 30 78 37 66 3c 3c 31 34 _0 == ((0x7f<<14
4d70: 29 20 7c 20 28 30 78 37 66 29 29 20 29 3b 0a 20 ) | (0x7f)) );.
4d80: 20 61 73 73 65 72 74 28 20 53 4c 4f 54 5f 34 5f assert( SLOT_4_
4d90: 32 5f 30 20 3d 3d 20 28 28 30 78 66 55 3c 3c 32 2_0 == ((0xfU<<2
4da0: 38 29 20 7c 20 28 30 78 37 66 3c 3c 31 34 29 20 8) | (0x7f<<14)
4db0: 7c 20 28 30 78 37 66 29 29 20 29 3b 0a 0a 20 20 | (0x7f)) );..
4dc0: 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c 3c 31 34 p++;. a = a<<14
4dd0: 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a 20 20 2f ;. a |= *p;. /
4de0: 2a 20 61 3a 20 70 30 3c 3c 31 34 20 7c 20 70 32 * a: p0<<14 | p2
4df0: 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 (unmasked) */.
4e00: 20 69 66 20 28 21 28 61 26 30 78 38 30 29 29 0a if (!(a&0x80)).
4e10: 20 20 7b 0a 20 20 20 20 61 20 26 3d 20 53 4c 4f {. a &= SLO
4e20: 54 5f 32 5f 30 3b 0a 20 20 20 20 62 20 26 3d 20 T_2_0;. b &=
4e30: 30 78 37 66 3b 0a 20 20 20 20 62 20 3d 20 62 3c 0x7f;. b = b<
4e40: 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 62 3b 0a <7;. a |= b;.
4e50: 20 20 20 20 2a 76 20 3d 20 61 3b 0a 20 20 20 20 *v = a;.
4e60: 72 65 74 75 72 6e 20 33 3b 0a 20 20 7d 0a 0a 20 return 3;. }..
4e70: 20 2f 2a 20 43 53 45 31 20 66 72 6f 6d 20 62 65 /* CSE1 from be
4e80: 6c 6f 77 20 2a 2f 0a 20 20 61 20 26 3d 20 53 4c low */. a &= SL
4e90: 4f 54 5f 32 5f 30 3b 0a 20 20 70 2b 2b 3b 0a 20 OT_2_0;. p++;.
4ea0: 20 62 20 3d 20 62 3c 3c 31 34 3b 0a 20 20 62 20 b = b<<14;. b
4eb0: 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 |= *p;. /* b: p
4ec0: 31 3c 3c 31 34 20 7c 20 70 33 20 28 75 6e 6d 61 1<<14 | p3 (unma
4ed0: 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 sked) */. if (!
4ee0: 28 62 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 (b&0x80)). {.
4ef0: 20 20 62 20 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b b &= SLOT_2_0;
4f00: 0a 20 20 20 20 2f 2a 20 6d 6f 76 65 64 20 43 53 . /* moved CS
4f10: 45 31 20 75 70 20 2a 2f 0a 20 20 20 20 2f 2a 20 E1 up */. /*
4f20: 61 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c a &= (0x7f<<14)|
4f30: 28 30 78 37 66 29 3b 20 2a 2f 0a 20 20 20 20 61 (0x7f); */. a
4f40: 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 20 61 20 7c = a<<7;. a |
4f50: 3d 20 62 3b 0a 20 20 20 20 2a 76 20 3d 20 61 3b = b;. *v = a;
4f60: 0a 20 20 20 20 72 65 74 75 72 6e 20 34 3b 0a 20 . return 4;.
4f70: 20 7d 0a 0a 20 20 2f 2a 20 61 3a 20 70 30 3c 3c }.. /* a: p0<<
4f80: 31 34 20 7c 20 70 32 20 28 6d 61 73 6b 65 64 29 14 | p2 (masked)
4f90: 20 2a 2f 0a 20 20 2f 2a 20 62 3a 20 70 31 3c 3c */. /* b: p1<<
4fa0: 31 34 20 7c 20 70 33 20 28 75 6e 6d 61 73 6b 65 14 | p3 (unmaske
4fb0: 64 29 20 2a 2f 0a 20 20 2f 2a 20 31 3a 73 61 76 d) */. /* 1:sav
4fc0: 65 20 6f 66 66 20 70 30 3c 3c 32 31 20 7c 20 70 e off p0<<21 | p
4fd0: 31 3c 3c 31 34 20 7c 20 70 32 3c 3c 37 20 7c 20 1<<14 | p2<<7 |
4fe0: 70 33 20 28 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 p3 (masked) */.
4ff0: 20 2f 2a 20 6d 6f 76 65 64 20 43 53 45 31 20 75 /* moved CSE1 u
5000: 70 20 2a 2f 0a 20 20 2f 2a 20 61 20 26 3d 20 28 p */. /* a &= (
5010: 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 0x7f<<14)|(0x7f)
5020: 3b 20 2a 2f 0a 20 20 62 20 26 3d 20 53 4c 4f 54 ; */. b &= SLOT
5030: 5f 32 5f 30 3b 0a 20 20 73 20 3d 20 61 3b 0a 20 _2_0;. s = a;.
5040: 20 2f 2a 20 73 3a 20 70 30 3c 3c 31 34 20 7c 20 /* s: p0<<14 |
5050: 70 32 20 28 6d 61 73 6b 65 64 29 20 2a 2f 0a 0a p2 (masked) */..
5060: 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c 3c p++;. a = a<<
5070: 31 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a 20 14;. a |= *p;.
5080: 20 2f 2a 20 61 3a 20 70 30 3c 3c 32 38 20 7c 20 /* a: p0<<28 |
5090: 70 32 3c 3c 31 34 20 7c 20 70 34 20 28 75 6e 6d p2<<14 | p4 (unm
50a0: 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 asked) */. if (
50b0: 21 28 61 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 !(a&0x80)). {.
50c0: 20 20 20 2f 2a 20 77 65 20 63 61 6e 20 73 6b 69 /* we can ski
50d0: 70 20 74 68 65 73 65 20 63 61 75 73 65 20 74 68 p these cause th
50e0: 65 79 20 77 65 72 65 20 28 65 66 66 65 63 74 69 ey were (effecti
50f0: 76 65 6c 79 29 20 64 6f 6e 65 20 61 62 6f 76 65 vely) done above
5100: 20 69 6e 20 63 61 6c 63 27 69 6e 67 20 73 20 2a in calc'ing s *
5110: 2f 0a 20 20 20 20 2f 2a 20 61 20 26 3d 20 28 30 /. /* a &= (0
5120: 78 37 66 3c 3c 32 38 29 7c 28 30 78 37 66 3c 3c x7f<<28)|(0x7f<<
5130: 31 34 29 7c 28 30 78 37 66 29 3b 20 2a 2f 0a 20 14)|(0x7f); */.
5140: 20 20 20 2f 2a 20 62 20 26 3d 20 28 30 78 37 66 /* b &= (0x7f
5150: 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 20 2a 2f <<14)|(0x7f); */
5160: 0a 20 20 20 20 62 20 3d 20 62 3c 3c 37 3b 0a 20 . b = b<<7;.
5170: 20 20 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 73 a |= b;. s
5180: 20 3d 20 73 3e 3e 31 38 3b 0a 20 20 20 20 2a 76 = s>>18;. *v
5190: 20 3d 20 28 28 75 36 34 29 73 29 3c 3c 33 32 20 = ((u64)s)<<32
51a0: 7c 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 | a;. return
51b0: 35 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 32 3a 73 5;. }.. /* 2:s
51c0: 61 76 65 20 6f 66 66 20 70 30 3c 3c 32 31 20 7c ave off p0<<21 |
51d0: 20 70 31 3c 3c 31 34 20 7c 20 70 32 3c 3c 37 20 p1<<14 | p2<<7
51e0: 7c 20 70 33 20 28 6d 61 73 6b 65 64 29 20 2a 2f | p3 (masked) */
51f0: 0a 20 20 73 20 3d 20 73 3c 3c 37 3b 0a 20 20 73 . s = s<<7;. s
5200: 20 7c 3d 20 62 3b 0a 20 20 2f 2a 20 73 3a 20 70 |= b;. /* s: p
5210: 30 3c 3c 32 31 20 7c 20 70 31 3c 3c 31 34 20 7c 0<<21 | p1<<14 |
5220: 20 70 32 3c 3c 37 20 7c 20 70 33 20 28 6d 61 73 p2<<7 | p3 (mas
5230: 6b 65 64 29 20 2a 2f 0a 0a 20 20 70 2b 2b 3b 0a ked) */.. p++;.
5240: 20 20 62 20 3d 20 62 3c 3c 31 34 3b 0a 20 20 62 b = b<<14;. b
5250: 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 |= *p;. /* b:
5260: 70 31 3c 3c 32 38 20 7c 20 70 33 3c 3c 31 34 20 p1<<28 | p3<<14
5270: 7c 20 70 35 20 28 75 6e 6d 61 73 6b 65 64 29 20 | p5 (unmasked)
5280: 2a 2f 0a 20 20 69 66 20 28 21 28 62 26 30 78 38 */. if (!(b&0x8
5290: 30 29 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 77 0)). {. /* w
52a0: 65 20 63 61 6e 20 73 6b 69 70 20 74 68 69 73 20 e can skip this
52b0: 63 61 75 73 65 20 69 74 20 77 61 73 20 28 65 66 cause it was (ef
52c0: 66 65 63 74 69 76 65 6c 79 29 20 64 6f 6e 65 20 fectively) done
52d0: 61 62 6f 76 65 20 69 6e 20 63 61 6c 63 27 69 6e above in calc'in
52e0: 67 20 73 20 2a 2f 0a 20 20 20 20 2f 2a 20 62 20 g s */. /* b
52f0: 26 3d 20 28 30 78 37 66 3c 3c 32 38 29 7c 28 30 &= (0x7f<<28)|(0
5300: 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b x7f<<14)|(0x7f);
5310: 20 2a 2f 0a 20 20 20 20 61 20 26 3d 20 53 4c 4f */. a &= SLO
5320: 54 5f 32 5f 30 3b 0a 20 20 20 20 61 20 3d 20 61 T_2_0;. a = a
5330: 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 62 3b <<7;. a |= b;
5340: 0a 20 20 20 20 73 20 3d 20 73 3e 3e 31 38 3b 0a . s = s>>18;.
5350: 20 20 20 20 2a 76 20 3d 20 28 28 75 36 34 29 73 *v = ((u64)s
5360: 29 3c 3c 33 32 20 7c 20 61 3b 0a 20 20 20 20 72 )<<32 | a;. r
5370: 65 74 75 72 6e 20 36 3b 0a 20 20 7d 0a 0a 20 20 eturn 6;. }..
5380: 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c 3c 31 34 p++;. a = a<<14
5390: 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a 20 20 2f ;. a |= *p;. /
53a0: 2a 20 61 3a 20 70 32 3c 3c 32 38 20 7c 20 70 34 * a: p2<<28 | p4
53b0: 3c 3c 31 34 20 7c 20 70 36 20 28 75 6e 6d 61 73 <<14 | p6 (unmas
53c0: 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 ked) */. if (!(
53d0: 61 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 a&0x80)). {.
53e0: 20 61 20 26 3d 20 53 4c 4f 54 5f 34 5f 32 5f 30 a &= SLOT_4_2_0
53f0: 3b 0a 20 20 20 20 62 20 26 3d 20 53 4c 4f 54 5f ;. b &= SLOT_
5400: 32 5f 30 3b 0a 20 20 20 20 62 20 3d 20 62 3c 3c 2_0;. b = b<<
5410: 37 3b 0a 20 20 20 20 61 20 7c 3d 20 62 3b 0a 20 7;. a |= b;.
5420: 20 20 20 73 20 3d 20 73 3e 3e 31 31 3b 0a 20 20 s = s>>11;.
5430: 20 20 2a 76 20 3d 20 28 28 75 36 34 29 73 29 3c *v = ((u64)s)<
5440: 3c 33 32 20 7c 20 61 3b 0a 20 20 20 20 72 65 74 <32 | a;. ret
5450: 75 72 6e 20 37 3b 0a 20 20 7d 0a 0a 20 20 2f 2a urn 7;. }.. /*
5460: 20 43 53 45 32 20 66 72 6f 6d 20 62 65 6c 6f 77 CSE2 from below
5470: 20 2a 2f 0a 20 20 61 20 26 3d 20 53 4c 4f 54 5f */. a &= SLOT_
5480: 32 5f 30 3b 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 2_0;. p++;. b
5490: 3d 20 62 3c 3c 31 34 3b 0a 20 20 62 20 7c 3d 20 = b<<14;. b |=
54a0: 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 33 3c 3c *p;. /* b: p3<<
54b0: 32 38 20 7c 20 70 35 3c 3c 31 34 20 7c 20 70 37 28 | p5<<14 | p7
54c0: 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 (unmasked) */.
54d0: 20 69 66 20 28 21 28 62 26 30 78 38 30 29 29 0a if (!(b&0x80)).
54e0: 20 20 7b 0a 20 20 20 20 62 20 26 3d 20 53 4c 4f {. b &= SLO
54f0: 54 5f 34 5f 32 5f 30 3b 0a 20 20 20 20 2f 2a 20 T_4_2_0;. /*
5500: 6d 6f 76 65 64 20 43 53 45 32 20 75 70 20 2a 2f moved CSE2 up */
5510: 0a 20 20 20 20 2f 2a 20 61 20 26 3d 20 28 30 78 . /* a &= (0x
5520: 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 20 7f<<14)|(0x7f);
5530: 2a 2f 0a 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b */. a = a<<7;
5540: 0a 20 20 20 20 61 20 7c 3d 20 62 3b 0a 20 20 20 . a |= b;.
5550: 20 73 20 3d 20 73 3e 3e 34 3b 0a 20 20 20 20 2a s = s>>4;. *
5560: 76 20 3d 20 28 28 75 36 34 29 73 29 3c 3c 33 32 v = ((u64)s)<<32
5570: 20 7c 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e | a;. return
5580: 20 38 3b 0a 20 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 8;. }.. p++;.
5590: 20 20 61 20 3d 20 61 3c 3c 31 35 3b 0a 20 20 61 a = a<<15;. a
55a0: 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 |= *p;. /* a:
55b0: 70 34 3c 3c 32 39 20 7c 20 70 36 3c 3c 31 35 20 p4<<29 | p6<<15
55c0: 7c 20 70 38 20 28 75 6e 6d 61 73 6b 65 64 29 20 | p8 (unmasked)
55d0: 2a 2f 0a 0a 20 20 2f 2a 20 6d 6f 76 65 64 20 43 */.. /* moved C
55e0: 53 45 32 20 75 70 20 2a 2f 0a 20 20 2f 2a 20 61 SE2 up */. /* a
55f0: 20 26 3d 20 28 30 78 37 66 3c 3c 32 39 29 7c 28 &= (0x7f<<29)|(
5600: 30 78 37 66 3c 3c 31 35 29 7c 28 30 78 66 66 29 0x7f<<15)|(0xff)
5610: 3b 20 2a 2f 0a 20 20 62 20 26 3d 20 53 4c 4f 54 ; */. b &= SLOT
5620: 5f 32 5f 30 3b 0a 20 20 62 20 3d 20 62 3c 3c 38 _2_0;. b = b<<8
5630: 3b 0a 20 20 61 20 7c 3d 20 62 3b 0a 0a 20 20 73 ;. a |= b;.. s
5640: 20 3d 20 73 3c 3c 34 3b 0a 20 20 62 20 3d 20 70 = s<<4;. b = p
5650: 5b 2d 34 5d 3b 0a 20 20 62 20 26 3d 20 30 78 37 [-4];. b &= 0x7
5660: 66 3b 0a 20 20 62 20 3d 20 62 3e 3e 33 3b 0a 20 f;. b = b>>3;.
5670: 20 73 20 7c 3d 20 62 3b 0a 0a 20 20 2a 76 20 3d s |= b;.. *v =
5680: 20 28 28 75 36 34 29 73 29 3c 3c 33 32 20 7c 20 ((u64)s)<<32 |
5690: 61 3b 0a 0a 20 20 72 65 74 75 72 6e 20 39 3b 0a a;.. return 9;.
56a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 61 20 }../*.** Read a
56b0: 33 32 2d 62 69 74 20 76 61 72 69 61 62 6c 65 2d 32-bit variable-
56c0: 6c 65 6e 67 74 68 20 69 6e 74 65 67 65 72 20 66 length integer f
56d0: 72 6f 6d 20 6d 65 6d 6f 72 79 20 73 74 61 72 74 rom memory start
56e0: 69 6e 67 20 61 74 20 70 5b 30 5d 2e 0a 2a 2a 20 ing at p[0]..**
56f0: 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 Return the numbe
5700: 72 20 6f 66 20 62 79 74 65 73 20 72 65 61 64 2e r of bytes read.
5710: 20 20 54 68 65 20 76 61 6c 75 65 20 69 73 20 73 The value is s
5720: 74 6f 72 65 64 20 69 6e 20 2a 76 2e 0a 2a 2a 0a tored in *v..**.
5730: 2a 2a 20 49 66 20 74 68 65 20 76 61 72 69 6e 74 ** If the varint
5740: 20 73 74 6f 72 65 64 20 69 6e 20 70 5b 30 5d 20 stored in p[0]
5750: 69 73 20 6c 61 72 67 65 72 20 74 68 61 6e 20 63 is larger than c
5760: 61 6e 20 66 69 74 20 69 6e 20 61 20 33 32 2d 62 an fit in a 32-b
5770: 69 74 20 75 6e 73 69 67 6e 65 64 0a 2a 2a 20 69 it unsigned.** i
5780: 6e 74 65 67 65 72 2c 20 74 68 65 6e 20 73 65 74 nteger, then set
5790: 20 2a 76 20 74 6f 20 30 78 66 66 66 66 66 66 66 *v to 0xfffffff
57a0: 66 2e 0a 2a 2a 0a 2a 2a 20 41 20 4d 41 43 52 4f f..**.** A MACRO
57b0: 20 76 65 72 73 69 6f 6e 2c 20 67 65 74 56 61 72 version, getVar
57c0: 69 6e 74 33 32 2c 20 69 73 20 70 72 6f 76 69 64 int32, is provid
57d0: 65 64 20 77 68 69 63 68 20 69 6e 6c 69 6e 65 73 ed which inlines
57e0: 20 74 68 65 20 0a 2a 2a 20 73 69 6e 67 6c 65 2d the .** single-
57f0: 62 79 74 65 20 63 61 73 65 2e 20 20 41 6c 6c 20 byte case. All
5800: 63 6f 64 65 20 73 68 6f 75 6c 64 20 75 73 65 20 code should use
5810: 74 68 65 20 4d 41 43 52 4f 20 76 65 72 73 69 6f the MACRO versio
5820: 6e 20 61 73 20 0a 2a 2a 20 74 68 69 73 20 66 75 n as .** this fu
5830: 6e 63 74 69 6f 6e 20 61 73 73 75 6d 65 73 20 74 nction assumes t
5840: 68 65 20 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 he single-byte c
5850: 61 73 65 20 68 61 73 20 61 6c 72 65 61 64 79 20 ase has already
5860: 62 65 65 6e 20 68 61 6e 64 6c 65 64 2e 0a 2a 2f been handled..*/
5870: 0a 75 38 20 73 71 6c 69 74 65 33 47 65 74 56 61 .u8 sqlite3GetVa
5880: 72 69 6e 74 33 32 28 63 6f 6e 73 74 20 75 6e 73 rint32(const uns
5890: 69 67 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 75 igned char *p, u
58a0: 33 32 20 2a 76 29 7b 0a 20 20 75 33 32 20 61 2c 32 *v){. u32 a,
58b0: 62 3b 0a 0a 20 20 2f 2a 20 54 68 65 20 31 2d 62 b;.. /* The 1-b
58c0: 79 74 65 20 63 61 73 65 2e 20 20 4f 76 65 72 77 yte case. Overw
58d0: 68 65 6c 6d 69 6e 67 6c 79 20 74 68 65 20 6d 6f helmingly the mo
58e0: 73 74 20 63 6f 6d 6d 6f 6e 2e 20 20 48 61 6e 64 st common. Hand
58f0: 6c 65 64 20 69 6e 6c 69 6e 65 0a 20 20 2a 2a 20 led inline. **
5900: 62 79 20 74 68 65 20 67 65 74 56 61 72 69 6e 33 by the getVarin3
5910: 32 28 29 20 6d 61 63 72 6f 20 2a 2f 0a 20 20 61 2() macro */. a
5920: 20 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 = *p;. /* a: p
5930: 30 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 0 (unmasked) */.
5940: 23 69 66 6e 64 65 66 20 67 65 74 56 61 72 69 6e #ifndef getVarin
5950: 74 33 32 0a 20 20 69 66 20 28 21 28 61 26 30 78 t32. if (!(a&0x
5960: 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 80)). {. /*
5970: 56 61 6c 75 65 73 20 62 65 74 77 65 65 6e 20 30 Values between 0
5980: 20 61 6e 64 20 31 32 37 20 2a 2f 0a 20 20 20 20 and 127 */.
5990: 2a 76 20 3d 20 61 3b 0a 20 20 20 20 72 65 74 75 *v = a;. retu
59a0: 72 6e 20 31 3b 0a 20 20 7d 0a 23 65 6e 64 69 66 rn 1;. }.#endif
59b0: 0a 0a 20 20 2f 2a 20 54 68 65 20 32 2d 62 79 74 .. /* The 2-byt
59c0: 65 20 63 61 73 65 20 2a 2f 0a 20 20 70 2b 2b 3b e case */. p++;
59d0: 0a 20 20 62 20 3d 20 2a 70 3b 0a 20 20 2f 2a 20 . b = *p;. /*
59e0: 62 3a 20 70 31 20 28 75 6e 6d 61 73 6b 65 64 29 b: p1 (unmasked)
59f0: 20 2a 2f 0a 20 20 69 66 20 28 21 28 62 26 30 78 */. if (!(b&0x
5a00: 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 80)). {. /*
5a10: 56 61 6c 75 65 73 20 62 65 74 77 65 65 6e 20 31 Values between 1
5a20: 32 38 20 61 6e 64 20 31 36 33 38 33 20 2a 2f 0a 28 and 16383 */.
5a30: 20 20 20 20 61 20 26 3d 20 30 78 37 66 3b 0a 20 a &= 0x7f;.
5a40: 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 a = a<<7;.
5a50: 20 2a 76 20 3d 20 61 20 7c 20 62 3b 0a 20 20 20 *v = a | b;.
5a60: 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 7d 0a 0a return 2;. }..
5a70: 20 20 2f 2a 20 54 68 65 20 33 2d 62 79 74 65 20 /* The 3-byte
5a80: 63 61 73 65 20 2a 2f 0a 20 20 70 2b 2b 3b 0a 20 case */. p++;.
5a90: 20 61 20 3d 20 61 3c 3c 31 34 3b 0a 20 20 61 20 a = a<<14;. a
5aa0: 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 |= *p;. /* a: p
5ab0: 30 3c 3c 31 34 20 7c 20 70 32 20 28 75 6e 6d 61 0<<14 | p2 (unma
5ac0: 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 sked) */. if (!
5ad0: 28 61 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 (a&0x80)). {.
5ae0: 20 20 2f 2a 20 56 61 6c 75 65 73 20 62 65 74 77 /* Values betw
5af0: 65 65 6e 20 31 36 33 38 34 20 61 6e 64 20 32 30 een 16384 and 20
5b00: 39 37 31 35 31 20 2a 2f 0a 20 20 20 20 61 20 26 97151 */. a &
5b10: 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 = (0x7f<<14)|(0x
5b20: 37 66 29 3b 0a 20 20 20 20 62 20 26 3d 20 30 78 7f);. b &= 0x
5b30: 37 66 3b 0a 20 20 20 20 62 20 3d 20 62 3c 3c 37 7f;. b = b<<7
5b40: 3b 0a 20 20 20 20 2a 76 20 3d 20 61 20 7c 20 62 ;. *v = a | b
5b50: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 33 3b 0a ;. return 3;.
5b60: 20 20 7d 0a 0a 20 20 2f 2a 20 41 20 33 32 2d 62 }.. /* A 32-b
5b70: 69 74 20 76 61 72 69 6e 74 20 69 73 20 75 73 65 it varint is use
5b80: 64 20 74 6f 20 73 74 6f 72 65 20 73 69 7a 65 20 d to store size
5b90: 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 62 information in b
5ba0: 74 72 65 65 73 2e 0a 20 20 2a 2a 20 4f 62 6a 65 trees.. ** Obje
5bb0: 63 74 73 20 61 72 65 20 72 61 72 65 6c 79 20 6c cts are rarely l
5bc0: 61 72 67 65 72 20 74 68 61 6e 20 32 4d 69 42 20 arger than 2MiB
5bd0: 6c 69 6d 69 74 20 6f 66 20 61 20 33 2d 62 79 74 limit of a 3-byt
5be0: 65 20 76 61 72 69 6e 74 2e 0a 20 20 2a 2a 20 41 e varint.. ** A
5bf0: 20 33 2d 62 79 74 65 20 76 61 72 69 6e 74 20 69 3-byte varint i
5c00: 73 20 73 75 66 66 69 63 69 65 6e 74 2c 20 66 6f s sufficient, fo
5c10: 72 20 65 78 61 6d 70 6c 65 2c 20 74 6f 20 72 65 r example, to re
5c20: 63 6f 72 64 20 74 68 65 20 73 69 7a 65 0a 20 20 cord the size.
5c30: 2a 2a 20 6f 66 20 61 20 31 30 34 38 35 36 39 2d ** of a 1048569-
5c40: 62 79 74 65 20 42 4c 4f 42 20 6f 72 20 73 74 72 byte BLOB or str
5c50: 69 6e 67 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 57 ing.. **. ** W
5c60: 65 20 6f 6e 6c 79 20 75 6e 72 6f 6c 6c 20 74 68 e only unroll th
5c70: 65 20 66 69 72 73 74 20 31 2d 2c 20 32 2d 2c 20 e first 1-, 2-,
5c80: 61 6e 64 20 33 2d 20 62 79 74 65 20 63 61 73 65 and 3- byte case
5c90: 73 2e 20 20 54 68 65 20 76 65 72 79 0a 20 20 2a s. The very. *
5ca0: 2a 20 72 61 72 65 20 6c 61 72 67 65 72 20 63 61 * rare larger ca
5cb0: 73 65 73 20 63 61 6e 20 62 65 20 68 61 6e 64 6c ses can be handl
5cc0: 65 64 20 62 79 20 74 68 65 20 73 6c 6f 77 65 72 ed by the slower
5cd0: 20 36 34 2d 62 69 74 20 76 61 72 69 6e 74 0a 20 64-bit varint.
5ce0: 20 2a 2a 20 72 6f 75 74 69 6e 65 2e 0a 20 20 2a ** routine.. *
5cf0: 2f 0a 23 69 66 20 31 0a 20 20 7b 0a 20 20 20 20 /.#if 1. {.
5d00: 75 36 34 20 76 36 34 3b 0a 20 20 20 20 75 38 20 u64 v64;. u8
5d10: 6e 3b 0a 0a 20 20 20 20 70 20 2d 3d 20 32 3b 0a n;.. p -= 2;.
5d20: 20 20 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 47 n = sqlite3G
5d30: 65 74 56 61 72 69 6e 74 28 70 2c 20 26 76 36 34 etVarint(p, &v64
5d40: 29 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 6e );. assert( n
5d50: 3e 33 20 26 26 20 6e 3c 3d 39 20 29 3b 0a 20 20 >3 && n<=9 );.
5d60: 20 20 69 66 28 20 28 76 36 34 20 26 20 53 51 4c if( (v64 & SQL
5d70: 49 54 45 5f 4d 41 58 5f 55 33 32 29 21 3d 76 36 ITE_MAX_U32)!=v6
5d80: 34 20 29 7b 0a 20 20 20 20 20 20 2a 76 20 3d 20 4 ){. *v =
5d90: 30 78 66 66 66 66 66 66 66 66 3b 0a 20 20 20 20 0xffffffff;.
5da0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 2a 76 20 }else{. *v
5db0: 3d 20 28 75 33 32 29 76 36 34 3b 0a 20 20 20 20 = (u32)v64;.
5dc0: 7d 0a 20 20 20 20 72 65 74 75 72 6e 20 6e 3b 0a }. return n;.
5dd0: 20 20 7d 0a 0a 23 65 6c 73 65 0a 20 20 2f 2a 20 }..#else. /*
5de0: 46 6f 72 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f For following co
5df0: 64 65 20 28 6b 65 70 74 20 66 6f 72 20 68 69 73 de (kept for his
5e00: 74 6f 72 69 63 61 6c 20 72 65 63 6f 72 64 20 6f torical record o
5e10: 6e 6c 79 29 20 73 68 6f 77 73 20 61 6e 0a 20 20 nly) shows an.
5e20: 2a 2a 20 75 6e 72 6f 6c 6c 69 6e 67 20 66 6f 72 ** unrolling for
5e30: 20 74 68 65 20 33 2d 20 61 6e 64 20 34 2d 62 79 the 3- and 4-by
5e40: 74 65 20 76 61 72 69 6e 74 20 63 61 73 65 73 2e te varint cases.
5e50: 20 20 54 68 69 73 20 63 6f 64 65 20 69 73 0a 20 This code is.
5e60: 20 2a 2a 20 73 6c 69 67 68 74 6c 79 20 66 61 73 ** slightly fas
5e70: 74 65 72 2c 20 62 75 74 20 69 74 20 69 73 20 61 ter, but it is a
5e80: 6c 73 6f 20 6c 61 72 67 65 72 20 61 6e 64 20 6d lso larger and m
5e90: 75 63 68 20 68 61 72 64 65 72 20 74 6f 20 74 65 uch harder to te
5ea0: 73 74 2e 0a 20 20 2a 2f 0a 20 20 70 2b 2b 3b 0a st.. */. p++;.
5eb0: 20 20 62 20 3d 20 62 3c 3c 31 34 3b 0a 20 20 62 b = b<<14;. b
5ec0: 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 |= *p;. /* b:
5ed0: 70 31 3c 3c 31 34 20 7c 20 70 33 20 28 75 6e 6d p1<<14 | p3 (unm
5ee0: 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 asked) */. if (
5ef0: 21 28 62 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 !(b&0x80)). {.
5f00: 20 20 20 2f 2a 20 56 61 6c 75 65 73 20 62 65 74 /* Values bet
5f10: 77 65 65 6e 20 32 30 39 37 31 35 32 20 61 6e 64 ween 2097152 and
5f20: 20 32 36 38 34 33 35 34 35 35 20 2a 2f 0a 20 20 268435455 */.
5f30: 20 20 62 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 b &= (0x7f<<14
5f40: 29 7c 28 30 78 37 66 29 3b 0a 20 20 20 20 61 20 )|(0x7f);. a
5f50: 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 &= (0x7f<<14)|(0
5f60: 78 37 66 29 3b 0a 20 20 20 20 61 20 3d 20 61 3c x7f);. a = a<
5f70: 3c 37 3b 0a 20 20 20 20 2a 76 20 3d 20 61 20 7c <7;. *v = a |
5f80: 20 62 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 34 b;. return 4
5f90: 3b 0a 20 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 20 ;. }.. p++;.
5fa0: 61 20 3d 20 61 3c 3c 31 34 3b 0a 20 20 61 20 7c a = a<<14;. a |
5fb0: 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 30 = *p;. /* a: p0
5fc0: 3c 3c 32 38 20 7c 20 70 32 3c 3c 31 34 20 7c 20 <<28 | p2<<14 |
5fd0: 70 34 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f p4 (unmasked) */
5fe0: 0a 20 20 69 66 20 28 21 28 61 26 30 78 38 30 29 . if (!(a&0x80)
5ff0: 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 56 61 6c ). {. /* Val
6000: 75 65 73 20 20 62 65 74 77 65 65 6e 20 32 36 38 ues between 268
6010: 34 33 35 34 35 36 20 61 6e 64 20 33 34 33 35 39 435456 and 34359
6020: 37 33 38 33 36 37 20 2a 2f 0a 20 20 20 20 61 20 738367 */. a
6030: 26 3d 20 53 4c 4f 54 5f 34 5f 32 5f 30 3b 0a 20 &= SLOT_4_2_0;.
6040: 20 20 20 62 20 26 3d 20 53 4c 4f 54 5f 34 5f 32 b &= SLOT_4_2
6050: 5f 30 3b 0a 20 20 20 20 62 20 3d 20 62 3c 3c 37 _0;. b = b<<7
6060: 3b 0a 20 20 20 20 2a 76 20 3d 20 61 20 7c 20 62 ;. *v = a | b
6070: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 35 3b 0a ;. return 5;.
6080: 20 20 7d 0a 0a 20 20 2f 2a 20 57 65 20 63 61 6e }.. /* We can
6090: 20 6f 6e 6c 79 20 72 65 61 63 68 20 74 68 69 73 only reach this
60a0: 20 70 6f 69 6e 74 20 77 68 65 6e 20 72 65 61 64 point when read
60b0: 69 6e 67 20 61 20 63 6f 72 72 75 70 74 20 64 61 ing a corrupt da
60c0: 74 61 62 61 73 65 0a 20 20 2a 2a 20 66 69 6c 65 tabase. ** file
60d0: 2e 20 20 49 6e 20 74 68 61 74 20 63 61 73 65 20 . In that case
60e0: 77 65 20 61 72 65 20 6e 6f 74 20 69 6e 20 61 6e we are not in an
60f0: 79 20 68 75 72 72 79 2e 20 20 55 73 65 20 74 68 y hurry. Use th
6100: 65 20 28 72 65 6c 61 74 69 76 65 6c 79 0a 20 20 e (relatively.
6110: 2a 2a 20 73 6c 6f 77 29 20 67 65 6e 65 72 61 6c ** slow) general
6120: 2d 70 75 72 70 6f 73 65 20 73 71 6c 69 74 65 33 -purpose sqlite3
6130: 47 65 74 56 61 72 69 6e 74 28 29 20 72 6f 75 74 GetVarint() rout
6140: 69 6e 65 20 74 6f 20 65 78 74 72 61 63 74 20 74 ine to extract t
6150: 68 65 0a 20 20 2a 2a 20 76 61 6c 75 65 2e 20 2a he. ** value. *
6160: 2f 0a 20 20 7b 0a 20 20 20 20 75 36 34 20 76 36 /. {. u64 v6
6170: 34 3b 0a 20 20 20 20 75 38 20 6e 3b 0a 0a 20 20 4;. u8 n;..
6180: 20 20 70 20 2d 3d 20 34 3b 0a 20 20 20 20 6e 20 p -= 4;. n
6190: 3d 20 73 71 6c 69 74 65 33 47 65 74 56 61 72 69 = sqlite3GetVari
61a0: 6e 74 28 70 2c 20 26 76 36 34 29 3b 0a 20 20 20 nt(p, &v64);.
61b0: 20 61 73 73 65 72 74 28 20 6e 3e 35 20 26 26 20 assert( n>5 &&
61c0: 6e 3c 3d 39 20 29 3b 0a 20 20 20 20 2a 76 20 3d n<=9 );. *v =
61d0: 20 28 75 33 32 29 76 36 34 3b 0a 20 20 20 20 72 (u32)v64;. r
61e0: 65 74 75 72 6e 20 6e 3b 0a 20 20 7d 0a 23 65 6e eturn n;. }.#en
61f0: 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 dif.}../*.** Ret
6200: 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 72 20 6f urn the number o
6210: 66 20 62 79 74 65 73 20 74 68 61 74 20 77 69 6c f bytes that wil
6220: 6c 20 62 65 20 6e 65 65 64 65 64 20 74 6f 20 73 l be needed to s
6230: 74 6f 72 65 20 74 68 65 20 67 69 76 65 6e 0a 2a tore the given.*
6240: 2a 20 36 34 2d 62 69 74 20 69 6e 74 65 67 65 72 * 64-bit integer
6250: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 ..*/.int sqlite3
6260: 56 61 72 69 6e 74 4c 65 6e 28 75 36 34 20 76 29 VarintLen(u64 v)
6270: 7b 0a 20 20 69 6e 74 20 69 20 3d 20 30 3b 0a 20 {. int i = 0;.
6280: 20 64 6f 7b 0a 20 20 20 20 69 2b 2b 3b 0a 20 20 do{. i++;.
6290: 20 20 76 20 3e 3e 3d 20 37 3b 0a 20 20 7d 77 68 v >>= 7;. }wh
62a0: 69 6c 65 28 20 76 21 3d 30 20 26 26 20 41 4c 57 ile( v!=0 && ALW
62b0: 41 59 53 28 69 3c 39 29 20 29 3b 0a 20 20 72 65 AYS(i<9) );. re
62c0: 74 75 72 6e 20 69 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a turn i;.}.../*.*
62d0: 2a 20 52 65 61 64 20 6f 72 20 77 72 69 74 65 20 * Read or write
62e0: 61 20 66 6f 75 72 2d 62 79 74 65 20 62 69 67 2d a four-byte big-
62f0: 65 6e 64 69 61 6e 20 69 6e 74 65 67 65 72 20 76 endian integer v
6300: 61 6c 75 65 2e 0a 2a 2f 0a 75 33 32 20 73 71 6c alue..*/.u32 sql
6310: 69 74 65 33 47 65 74 34 62 79 74 65 28 63 6f 6e ite3Get4byte(con
6320: 73 74 20 75 38 20 2a 70 29 7b 0a 20 20 72 65 74 st u8 *p){. ret
6330: 75 72 6e 20 28 70 5b 30 5d 3c 3c 32 34 29 20 7c urn (p[0]<<24) |
6340: 20 28 70 5b 31 5d 3c 3c 31 36 29 20 7c 20 28 70 (p[1]<<16) | (p
6350: 5b 32 5d 3c 3c 38 29 20 7c 20 70 5b 33 5d 3b 0a [2]<<8) | p[3];.
6360: 7d 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 50 75 }.void sqlite3Pu
6370: 74 34 62 79 74 65 28 75 6e 73 69 67 6e 65 64 20 t4byte(unsigned
6380: 63 68 61 72 20 2a 70 2c 20 75 33 32 20 76 29 7b char *p, u32 v){
6390: 0a 20 20 70 5b 30 5d 20 3d 20 28 75 38 29 28 76 . p[0] = (u8)(v
63a0: 3e 3e 32 34 29 3b 0a 20 20 70 5b 31 5d 20 3d 20 >>24);. p[1] =
63b0: 28 75 38 29 28 76 3e 3e 31 36 29 3b 0a 20 20 70 (u8)(v>>16);. p
63c0: 5b 32 5d 20 3d 20 28 75 38 29 28 76 3e 3e 38 29 [2] = (u8)(v>>8)
63d0: 3b 0a 20 20 70 5b 33 5d 20 3d 20 28 75 38 29 76 ;. p[3] = (u8)v
63e0: 3b 0a 7d 0a 0a 0a 0a 23 69 66 20 21 64 65 66 69 ;.}....#if !defi
63f0: 6e 65 64 28 53 51 4c 49 54 45 5f 4f 4d 49 54 5f ned(SQLITE_OMIT_
6400: 42 4c 4f 42 5f 4c 49 54 45 52 41 4c 29 20 7c 7c BLOB_LITERAL) ||
6410: 20 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f defined(SQLITE_
6420: 48 41 53 5f 43 4f 44 45 43 29 0a 2f 2a 0a 2a 2a HAS_CODEC)./*.**
6430: 20 54 72 61 6e 73 6c 61 74 65 20 61 20 73 69 6e Translate a sin
6440: 67 6c 65 20 62 79 74 65 20 6f 66 20 48 65 78 20 gle byte of Hex
6450: 69 6e 74 6f 20 61 6e 20 69 6e 74 65 67 65 72 2e into an integer.
6460: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 .** This routine
6470: 20 6f 6e 6c 79 20 77 6f 72 6b 73 20 69 66 20 68 only works if h
6480: 20 72 65 61 6c 6c 79 20 69 73 20 61 20 76 61 6c really is a val
6490: 69 64 20 68 65 78 61 64 65 63 69 6d 61 6c 0a 2a id hexadecimal.*
64a0: 2a 20 63 68 61 72 61 63 74 65 72 3a 20 20 30 2e * character: 0.
64b0: 2e 39 61 2e 2e 66 41 2e 2e 46 0a 2a 2f 0a 73 74 .9a..fA..F.*/.st
64c0: 61 74 69 63 20 75 38 20 68 65 78 54 6f 49 6e 74 atic u8 hexToInt
64d0: 28 69 6e 74 20 68 29 7b 0a 20 20 61 73 73 65 72 (int h){. asser
64e0: 74 28 20 28 68 3e 3d 27 30 27 20 26 26 20 68 3c t( (h>='0' && h<
64f0: 3d 27 39 27 29 20 7c 7c 20 20 28 68 3e 3d 27 61 ='9') || (h>='a
6500: 27 20 26 26 20 68 3c 3d 27 66 27 29 20 7c 7c 20 ' && h<='f') ||
6510: 20 28 68 3e 3d 27 41 27 20 26 26 20 68 3c 3d 27 (h>='A' && h<='
6520: 46 27 29 20 29 3b 0a 23 69 66 64 65 66 20 53 51 F') );.#ifdef SQ
6530: 4c 49 54 45 5f 41 53 43 49 49 0a 20 20 68 20 2b LITE_ASCII. h +
6540: 3d 20 39 2a 28 31 26 28 68 3e 3e 36 29 29 3b 0a = 9*(1&(h>>6));.
6550: 23 65 6e 64 69 66 0a 23 69 66 64 65 66 20 53 51 #endif.#ifdef SQ
6560: 4c 49 54 45 5f 45 42 43 44 49 43 0a 20 20 68 20 LITE_EBCDIC. h
6570: 2b 3d 20 39 2a 28 31 26 7e 28 68 3e 3e 34 29 29 += 9*(1&~(h>>4))
6580: 3b 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 ;.#endif. retur
6590: 6e 20 28 75 38 29 28 68 20 26 20 30 78 66 29 3b n (u8)(h & 0xf);
65a0: 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 21 53 51 .}.#endif /* !SQ
65b0: 4c 49 54 45 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c LITE_OMIT_BLOB_L
65c0: 49 54 45 52 41 4c 20 7c 7c 20 53 51 4c 49 54 45 ITERAL || SQLITE
65d0: 5f 48 41 53 5f 43 4f 44 45 43 20 2a 2f 0a 0a 23 _HAS_CODEC */..#
65e0: 69 66 20 21 64 65 66 69 6e 65 64 28 53 51 4c 49 if !defined(SQLI
65f0: 54 45 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 TE_OMIT_BLOB_LIT
6600: 45 52 41 4c 29 20 7c 7c 20 64 65 66 69 6e 65 64 ERAL) || defined
6610: 28 53 51 4c 49 54 45 5f 48 41 53 5f 43 4f 44 45 (SQLITE_HAS_CODE
6620: 43 29 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 C)./*.** Convert
6630: 20 61 20 42 4c 4f 42 20 6c 69 74 65 72 61 6c 20 a BLOB literal
6640: 6f 66 20 74 68 65 20 66 6f 72 6d 20 22 78 27 68 of the form "x'h
6650: 68 68 68 68 68 27 22 20 69 6e 74 6f 20 69 74 73 hhhhh'" into its
6660: 20 62 69 6e 61 72 79 0a 2a 2a 20 76 61 6c 75 65 binary.** value
6670: 2e 20 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e . Return a poin
6680: 74 65 72 20 74 6f 20 69 74 73 20 62 69 6e 61 72 ter to its binar
6690: 79 20 76 61 6c 75 65 2e 20 20 53 70 61 63 65 20 y value. Space
66a0: 74 6f 20 68 6f 6c 64 20 74 68 65 0a 2a 2a 20 62 to hold the.** b
66b0: 69 6e 61 72 79 20 76 61 6c 75 65 20 68 61 73 20 inary value has
66c0: 62 65 65 6e 20 6f 62 74 61 69 6e 65 64 20 66 72 been obtained fr
66d0: 6f 6d 20 6d 61 6c 6c 6f 63 20 61 6e 64 20 6d 75 om malloc and mu
66e0: 73 74 20 62 65 20 66 72 65 65 64 20 62 79 0a 2a st be freed by.*
66f0: 2a 20 74 68 65 20 63 61 6c 6c 69 6e 67 20 72 6f * the calling ro
6700: 75 74 69 6e 65 2e 0a 2a 2f 0a 76 6f 69 64 20 2a utine..*/.void *
6710: 73 71 6c 69 74 65 33 48 65 78 54 6f 42 6c 6f 62 sqlite3HexToBlob
6720: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f (sqlite3 *db, co
6730: 6e 73 74 20 63 68 61 72 20 2a 7a 2c 20 69 6e 74 nst char *z, int
6740: 20 6e 29 7b 0a 20 20 63 68 61 72 20 2a 7a 42 6c n){. char *zBl
6750: 6f 62 3b 0a 20 20 69 6e 74 20 69 3b 0a 0a 20 20 ob;. int i;..
6760: 7a 42 6c 6f 62 20 3d 20 28 63 68 61 72 20 2a 29 zBlob = (char *)
6770: 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 52 sqlite3DbMallocR
6780: 61 77 28 64 62 2c 20 6e 2f 32 20 2b 20 31 29 3b aw(db, n/2 + 1);
6790: 0a 20 20 6e 2d 2d 3b 0a 20 20 69 66 28 20 7a 42 . n--;. if( zB
67a0: 6c 6f 62 20 29 7b 0a 20 20 20 20 66 6f 72 28 69 lob ){. for(i
67b0: 3d 30 3b 20 69 3c 6e 3b 20 69 2b 3d 32 29 7b 0a =0; i<n; i+=2){.
67c0: 20 20 20 20 20 20 7a 42 6c 6f 62 5b 69 2f 32 5d zBlob[i/2]
67d0: 20 3d 20 28 68 65 78 54 6f 49 6e 74 28 7a 5b 69 = (hexToInt(z[i
67e0: 5d 29 3c 3c 34 29 20 7c 20 68 65 78 54 6f 49 6e ])<<4) | hexToIn
67f0: 74 28 7a 5b 69 2b 31 5d 29 3b 0a 20 20 20 20 7d t(z[i+1]);. }
6800: 0a 20 20 20 20 7a 42 6c 6f 62 5b 69 2f 32 5d 20 . zBlob[i/2]
6810: 3d 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 = 0;. }. retur
6820: 6e 20 7a 42 6c 6f 62 3b 0a 7d 0a 23 65 6e 64 69 n zBlob;.}.#endi
6830: 66 20 2f 2a 20 21 53 51 4c 49 54 45 5f 4f 4d 49 f /* !SQLITE_OMI
6840: 54 5f 42 4c 4f 42 5f 4c 49 54 45 52 41 4c 20 7c T_BLOB_LITERAL |
6850: 7c 20 53 51 4c 49 54 45 5f 48 41 53 5f 43 4f 44 | SQLITE_HAS_COD
6860: 45 43 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 4c 6f 67 EC */../*.** Log
6870: 20 61 6e 20 65 72 72 6f 72 20 74 68 61 74 20 69 an error that i
6880: 73 20 61 6e 20 41 50 49 20 63 61 6c 6c 20 6f 6e s an API call on
6890: 20 61 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 70 6f a connection po
68a0: 69 6e 74 65 72 20 74 68 61 74 20 73 68 6f 75 6c inter that shoul
68b0: 64 0a 2a 2a 20 6e 6f 74 20 68 61 76 65 20 62 65 d.** not have be
68c0: 65 6e 20 75 73 65 64 2e 20 20 54 68 65 20 22 74 en used. The "t
68d0: 79 70 65 22 20 6f 66 20 63 6f 6e 6e 65 63 74 69 ype" of connecti
68e0: 6f 6e 20 70 6f 69 6e 74 65 72 20 69 73 20 67 69 on pointer is gi
68f0: 76 65 6e 20 61 73 20 74 68 65 0a 2a 2a 20 61 72 ven as the.** ar
6900: 67 75 6d 65 6e 74 2e 20 20 54 68 65 20 7a 54 79 gument. The zTy
6910: 70 65 20 69 73 20 61 20 77 6f 72 64 20 6c 69 6b pe is a word lik
6920: 65 20 22 4e 55 4c 4c 22 20 6f 72 20 22 63 6c 6f e "NULL" or "clo
6930: 73 65 64 22 20 6f 72 20 22 69 6e 76 61 6c 69 64 sed" or "invalid
6940: 22 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 "..*/.static voi
6950: 64 20 6c 6f 67 42 61 64 43 6f 6e 6e 65 63 74 69 d logBadConnecti
6960: 6f 6e 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a on(const char *z
6970: 54 79 70 65 29 7b 0a 20 20 73 71 6c 69 74 65 33 Type){. sqlite3
6980: 5f 6c 6f 67 28 53 51 4c 49 54 45 5f 4d 49 53 55 _log(SQLITE_MISU
6990: 53 45 2c 20 0a 20 20 20 20 20 22 41 50 49 20 63 SE, . "API c
69a0: 61 6c 6c 20 77 69 74 68 20 25 73 20 64 61 74 61 all with %s data
69b0: 62 61 73 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 base connection
69c0: 70 6f 69 6e 74 65 72 22 2c 0a 20 20 20 20 20 7a pointer",. z
69d0: 54 79 70 65 0a 20 20 29 3b 0a 7d 0a 0a 2f 2a 0a Type. );.}../*.
69e0: 2a 2a 20 43 68 65 63 6b 20 74 6f 20 6d 61 6b 65 ** Check to make
69f0: 20 73 75 72 65 20 77 65 20 68 61 76 65 20 61 20 sure we have a
6a00: 76 61 6c 69 64 20 64 62 20 70 6f 69 6e 74 65 72 valid db pointer
6a10: 2e 20 20 54 68 69 73 20 74 65 73 74 20 69 73 20 . This test is
6a20: 6e 6f 74 0a 2a 2a 20 66 6f 6f 6c 70 72 6f 6f 66 not.** foolproof
6a30: 20 62 75 74 20 69 74 20 64 6f 65 73 20 70 72 6f but it does pro
6a40: 76 69 64 65 20 73 6f 6d 65 20 6d 65 61 73 75 72 vide some measur
6a50: 65 20 6f 66 20 70 72 6f 74 65 63 74 69 6f 6e 20 e of protection
6a60: 61 67 61 69 6e 73 74 0a 2a 2a 20 6d 69 73 75 73 against.** misus
6a70: 65 20 6f 66 20 74 68 65 20 69 6e 74 65 72 66 61 e of the interfa
6a80: 63 65 20 73 75 63 68 20 61 73 20 70 61 73 73 69 ce such as passi
6a90: 6e 67 20 69 6e 20 64 62 20 70 6f 69 6e 74 65 72 ng in db pointer
6aa0: 73 20 74 68 61 74 20 61 72 65 0a 2a 2a 20 4e 55 s that are.** NU
6ab0: 4c 4c 20 6f 72 20 77 68 69 63 68 20 68 61 76 65 LL or which have
6ac0: 20 62 65 65 6e 20 70 72 65 76 69 6f 75 73 6c 79 been previously
6ad0: 20 63 6c 6f 73 65 64 2e 20 20 49 66 20 74 68 69 closed. If thi
6ae0: 73 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 6e s routine return
6af0: 73 0a 2a 2a 20 31 20 69 74 20 6d 65 61 6e 73 20 s.** 1 it means
6b00: 74 68 61 74 20 74 68 65 20 64 62 20 70 6f 69 6e that the db poin
6b10: 74 65 72 20 69 73 20 76 61 6c 69 64 20 61 6e 64 ter is valid and
6b20: 20 30 20 69 66 20 69 74 20 73 68 6f 75 6c 64 20 0 if it should
6b30: 6e 6f 74 20 62 65 0a 2a 2a 20 64 65 72 65 66 65 not be.** derefe
6b40: 72 65 6e 63 65 64 20 66 6f 72 20 61 6e 79 20 72 renced for any r
6b50: 65 61 73 6f 6e 2e 20 20 54 68 65 20 63 61 6c 6c eason. The call
6b60: 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 73 68 6f ing function sho
6b70: 75 6c 64 20 69 6e 76 6f 6b 65 0a 2a 2a 20 53 51 uld invoke.** SQ
6b80: 4c 49 54 45 5f 4d 49 53 55 53 45 20 69 6d 6d 65 LITE_MISUSE imme
6b90: 64 69 61 74 65 6c 79 2e 0a 2a 2a 0a 2a 2a 20 73 diately..**.** s
6ba0: 71 6c 69 74 65 33 53 61 66 65 74 79 43 68 65 63 qlite3SafetyChec
6bb0: 6b 4f 6b 28 29 20 72 65 71 75 69 72 65 73 20 74 kOk() requires t
6bc0: 68 61 74 20 74 68 65 20 64 62 20 70 6f 69 6e 74 hat the db point
6bd0: 65 72 20 62 65 20 76 61 6c 69 64 20 66 6f 72 0a er be valid for.
6be0: 2a 2a 20 75 73 65 2e 20 20 73 71 6c 69 74 65 33 ** use. sqlite3
6bf0: 53 61 66 65 74 79 43 68 65 63 6b 53 69 63 6b 4f SafetyCheckSickO
6c00: 72 4f 6b 28 29 20 61 6c 6c 6f 77 73 20 61 20 64 rOk() allows a d
6c10: 62 20 70 6f 69 6e 74 65 72 20 74 68 61 74 20 66 b pointer that f
6c20: 61 69 6c 65 64 20 74 6f 0a 2a 2a 20 6f 70 65 6e ailed to.** open
6c30: 20 70 72 6f 70 65 72 6c 79 20 61 6e 64 20 69 73 properly and is
6c40: 20 6e 6f 74 20 66 69 74 20 66 6f 72 20 67 65 6e not fit for gen
6c50: 65 72 61 6c 20 75 73 65 20 62 75 74 20 77 68 69 eral use but whi
6c60: 63 68 20 63 61 6e 20 62 65 0a 2a 2a 20 75 73 65 ch can be.** use
6c70: 64 20 61 73 20 61 6e 20 61 72 67 75 6d 65 6e 74 d as an argument
6c80: 20 74 6f 20 73 71 6c 69 74 65 33 5f 65 72 72 6d to sqlite3_errm
6c90: 73 67 28 29 20 6f 72 20 73 71 6c 69 74 65 33 5f sg() or sqlite3_
6ca0: 63 6c 6f 73 65 28 29 2e 0a 2a 2f 0a 69 6e 74 20 close()..*/.int
6cb0: 73 71 6c 69 74 65 33 53 61 66 65 74 79 43 68 65 sqlite3SafetyChe
6cc0: 63 6b 4f 6b 28 73 71 6c 69 74 65 33 20 2a 64 62 ckOk(sqlite3 *db
6cd0: 29 7b 0a 20 20 75 33 32 20 6d 61 67 69 63 3b 0a ){. u32 magic;.
6ce0: 20 20 69 66 28 20 64 62 3d 3d 30 20 29 7b 0a 20 if( db==0 ){.
6cf0: 20 20 20 6c 6f 67 42 61 64 43 6f 6e 6e 65 63 74 logBadConnect
6d00: 69 6f 6e 28 22 4e 55 4c 4c 22 29 3b 0a 20 20 20 ion("NULL");.
6d10: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 return 0;. }.
6d20: 20 6d 61 67 69 63 20 3d 20 64 62 2d 3e 6d 61 67 magic = db->mag
6d30: 69 63 3b 0a 20 20 69 66 28 20 6d 61 67 69 63 21 ic;. if( magic!
6d40: 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 4f 50 =SQLITE_MAGIC_OP
6d50: 45 4e 20 29 7b 0a 20 20 20 20 69 66 28 20 73 71 EN ){. if( sq
6d60: 6c 69 74 65 33 53 61 66 65 74 79 43 68 65 63 6b lite3SafetyCheck
6d70: 53 69 63 6b 4f 72 4f 6b 28 64 62 29 20 29 7b 0a SickOrOk(db) ){.
6d80: 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28 20 testcase(
6d90: 73 71 6c 69 74 65 33 47 6c 6f 62 61 6c 43 6f 6e sqlite3GlobalCon
6da0: 66 69 67 2e 78 4c 6f 67 21 3d 30 20 29 3b 0a 20 fig.xLog!=0 );.
6db0: 20 20 20 20 20 6c 6f 67 42 61 64 43 6f 6e 6e 65 logBadConne
6dc0: 63 74 69 6f 6e 28 22 75 6e 6f 70 65 6e 65 64 22 ction("unopened"
6dd0: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 72 65 74 );. }. ret
6de0: 75 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a urn 0;. }else{.
6df0: 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 return 1;.
6e00: 7d 0a 7d 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 }.}.int sqlite3S
6e10: 61 66 65 74 79 43 68 65 63 6b 53 69 63 6b 4f 72 afetyCheckSickOr
6e20: 4f 6b 28 73 71 6c 69 74 65 33 20 2a 64 62 29 7b Ok(sqlite3 *db){
6e30: 0a 20 20 75 33 32 20 6d 61 67 69 63 3b 0a 20 20 . u32 magic;.
6e40: 6d 61 67 69 63 20 3d 20 64 62 2d 3e 6d 61 67 69 magic = db->magi
6e50: 63 3b 0a 20 20 69 66 28 20 6d 61 67 69 63 21 3d c;. if( magic!=
6e60: 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 53 49 43 SQLITE_MAGIC_SIC
6e70: 4b 20 26 26 0a 20 20 20 20 20 20 6d 61 67 69 63 K &&. magic
6e80: 21 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 5f 4f !=SQLITE_MAGIC_O
6e90: 50 45 4e 20 26 26 0a 20 20 20 20 20 20 6d 61 67 PEN &&. mag
6ea0: 69 63 21 3d 53 51 4c 49 54 45 5f 4d 41 47 49 43 ic!=SQLITE_MAGIC
6eb0: 5f 42 55 53 59 20 29 7b 0a 20 20 20 20 74 65 73 _BUSY ){. tes
6ec0: 74 63 61 73 65 28 20 73 71 6c 69 74 65 33 47 6c tcase( sqlite3Gl
6ed0: 6f 62 61 6c 43 6f 6e 66 69 67 2e 78 4c 6f 67 21 obalConfig.xLog!
6ee0: 3d 30 20 29 3b 0a 20 20 20 20 6c 6f 67 42 61 64 =0 );. logBad
6ef0: 43 6f 6e 6e 65 63 74 69 6f 6e 28 22 69 6e 76 61 Connection("inva
6f00: 6c 69 64 22 29 3b 0a 20 20 20 20 72 65 74 75 72 lid");. retur
6f10: 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 n 0;. }else{.
6f20: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a return 1;. }.
6f30: 7d 0a }.