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 75 6e 73 69 67 6e 65 static unsigne
02f0: 64 20 64 75 6d 6d 79 20 3d 20 30 3b 0a 20 20 64 d dummy = 0;. d
0300: 75 6d 6d 79 20 2b 3d 20 28 75 6e 73 69 67 6e 65 ummy += (unsigne
0310: 64 29 78 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a 23 d)x;.}.#endif..#
0320: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d ifndef SQLITE_OM
0330: 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e IT_FLOATING_POIN
0340: 54 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 T./*.** Return t
0350: 72 75 65 20 69 66 20 74 68 65 20 66 6c 6f 61 74 rue if the float
0360: 69 6e 67 20 70 6f 69 6e 74 20 76 61 6c 75 65 20 ing point value
0370: 69 73 20 4e 6f 74 20 61 20 4e 75 6d 62 65 72 20 is Not a Number
0380: 28 4e 61 4e 29 2e 0a 2a 2a 0a 2a 2a 20 55 73 65 (NaN)..**.** Use
0390: 20 74 68 65 20 6d 61 74 68 20 6c 69 62 72 61 72 the math librar
03a0: 79 20 69 73 6e 61 6e 28 29 20 66 75 6e 63 74 69 y isnan() functi
03b0: 6f 6e 20 69 66 20 63 6f 6d 70 69 6c 65 64 20 77 on if compiled w
03c0: 69 74 68 20 53 51 4c 49 54 45 5f 48 41 56 45 5f ith SQLITE_HAVE_
03d0: 49 53 4e 41 4e 2e 0a 2a 2a 20 4f 74 68 65 72 77 ISNAN..** Otherw
03e0: 69 73 65 2c 20 77 65 20 68 61 76 65 20 6f 75 72 ise, we have our
03f0: 20 6f 77 6e 20 69 6d 70 6c 65 6d 65 6e 74 61 74 own implementat
0400: 69 6f 6e 20 74 68 61 74 20 77 6f 72 6b 73 20 6f ion that works o
0410: 6e 20 6d 6f 73 74 20 73 79 73 74 65 6d 73 2e 0a n most systems..
0420: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 49 73 */.int sqlite3Is
0430: 4e 61 4e 28 64 6f 75 62 6c 65 20 78 29 7b 0a 20 NaN(double x){.
0440: 20 69 6e 74 20 72 63 3b 20 20 20 2f 2a 20 54 68 int rc; /* Th
0450: 65 20 76 61 6c 75 65 20 72 65 74 75 72 6e 20 2a e value return *
0460: 2f 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28 53 /.#if !defined(S
0470: 51 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e 41 4e QLITE_HAVE_ISNAN
0480: 29 0a 20 20 2f 2a 0a 20 20 2a 2a 20 53 79 73 74 ). /*. ** Syst
0490: 65 6d 73 20 74 68 61 74 20 73 75 70 70 6f 72 74 ems that support
04a0: 20 74 68 65 20 69 73 6e 61 6e 28 29 20 6c 69 62 the isnan() lib
04b0: 72 61 72 79 20 66 75 6e 63 74 69 6f 6e 20 73 68 rary function sh
04c0: 6f 75 6c 64 20 70 72 6f 62 61 62 6c 79 0a 20 20 ould probably.
04d0: 2a 2a 20 6d 61 6b 65 20 75 73 65 20 6f 66 20 69 ** make use of i
04e0: 74 20 62 79 20 63 6f 6d 70 69 6c 69 6e 67 20 77 t by compiling w
04f0: 69 74 68 20 2d 44 53 51 4c 49 54 45 5f 48 41 56 ith -DSQLITE_HAV
0500: 45 5f 49 53 4e 41 4e 2e 20 20 42 75 74 20 77 65 E_ISNAN. But we
0510: 20 68 61 76 65 0a 20 20 2a 2a 20 66 6f 75 6e 64 have. ** found
0520: 20 74 68 61 74 20 6d 61 6e 79 20 73 79 73 74 65 that many syste
0530: 6d 73 20 64 6f 20 6e 6f 74 20 68 61 76 65 20 61 ms do not have a
0540: 20 77 6f 72 6b 69 6e 67 20 69 73 6e 61 6e 28 29 working isnan()
0550: 20 66 75 6e 63 74 69 6f 6e 20 73 6f 0a 20 20 2a function so. *
0560: 2a 20 74 68 69 73 20 69 6d 70 6c 65 6d 65 6e 74 * this implement
0570: 61 74 69 6f 6e 20 69 73 20 70 72 6f 76 69 64 65 ation is provide
0580: 64 20 61 73 20 61 6e 20 61 6c 74 65 72 6e 61 74 d as an alternat
0590: 69 76 65 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 ive.. **. ** T
05a0: 68 69 73 20 4e 61 4e 20 74 65 73 74 20 73 6f 6d his NaN test som
05b0: 65 74 69 6d 65 73 20 66 61 69 6c 73 20 69 66 20 etimes fails if
05c0: 63 6f 6d 70 69 6c 65 64 20 6f 6e 20 47 43 43 20 compiled on GCC
05d0: 77 69 74 68 20 2d 66 66 61 73 74 2d 6d 61 74 68 with -ffast-math
05e0: 2e 0a 20 20 2a 2a 20 4f 6e 20 74 68 65 20 6f 74 .. ** On the ot
05f0: 68 65 72 20 68 61 6e 64 2c 20 74 68 65 20 75 73 her hand, the us
0600: 65 20 6f 66 20 2d 66 66 61 73 74 2d 6d 61 74 68 e of -ffast-math
0610: 20 63 6f 6d 65 73 20 77 69 74 68 20 74 68 65 20 comes with the
0620: 66 6f 6c 6c 6f 77 69 6e 67 0a 20 20 2a 2a 20 77 following. ** w
0630: 61 72 6e 69 6e 67 3a 0a 20 20 2a 2a 0a 20 20 2a arning:. **. *
0640: 2a 20 20 20 20 20 20 54 68 69 73 20 6f 70 74 69 * This opti
0650: 6f 6e 20 5b 2d 66 66 61 73 74 2d 6d 61 74 68 5d on [-ffast-math]
0660: 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 20 62 65 should never be
0670: 20 74 75 72 6e 65 64 20 6f 6e 20 62 79 20 61 6e turned on by an
0680: 79 0a 20 20 2a 2a 20 20 20 20 20 20 2d 4f 20 6f y. ** -O o
0690: 70 74 69 6f 6e 20 73 69 6e 63 65 20 69 74 20 63 ption since it c
06a0: 61 6e 20 72 65 73 75 6c 74 20 69 6e 20 69 6e 63 an result in inc
06b0: 6f 72 72 65 63 74 20 6f 75 74 70 75 74 20 66 6f orrect output fo
06c0: 72 20 70 72 6f 67 72 61 6d 73 0a 20 20 2a 2a 20 r programs. **
06d0: 20 20 20 20 20 77 68 69 63 68 20 64 65 70 65 6e which depen
06e0: 64 20 6f 6e 20 61 6e 20 65 78 61 63 74 20 69 6d d on an exact im
06f0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 plementation of
0700: 49 45 45 45 20 6f 72 20 49 53 4f 20 0a 20 20 2a IEEE or ISO . *
0710: 2a 20 20 20 20 20 20 72 75 6c 65 73 2f 73 70 65 * rules/spe
0720: 63 69 66 69 63 61 74 69 6f 6e 73 20 66 6f 72 20 cifications for
0730: 6d 61 74 68 20 66 75 6e 63 74 69 6f 6e 73 2e 0a math functions..
0740: 20 20 2a 2a 0a 20 20 2a 2a 20 55 6e 64 65 72 20 **. ** Under
0750: 4d 53 56 43 2c 20 74 68 69 73 20 4e 61 4e 20 74 MSVC, this NaN t
0760: 65 73 74 20 6d 61 79 20 66 61 69 6c 20 69 66 20 est may fail if
0770: 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 61 20 compiled with a
0780: 66 6c 6f 61 74 69 6e 67 2d 0a 20 20 2a 2a 20 70 floating-. ** p
0790: 6f 69 6e 74 20 70 72 65 63 69 73 69 6f 6e 20 6d oint precision m
07a0: 6f 64 65 20 6f 74 68 65 72 20 74 68 61 6e 20 2f ode other than /
07b0: 66 70 3a 70 72 65 63 69 73 65 2e 20 20 46 72 6f fp:precise. Fro
07c0: 6d 20 74 68 65 20 4d 53 44 4e 20 0a 20 20 2a 2a m the MSDN . **
07d0: 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 3a 0a documentation:.
07e0: 20 20 2a 2a 0a 20 20 2a 2a 20 20 20 20 20 20 54 **. ** T
07f0: 68 65 20 63 6f 6d 70 69 6c 65 72 20 5b 77 69 74 he compiler [wit
0800: 68 20 2f 66 70 3a 70 72 65 63 69 73 65 5d 20 77 h /fp:precise] w
0810: 69 6c 6c 20 70 72 6f 70 65 72 6c 79 20 68 61 6e ill properly han
0820: 64 6c 65 20 63 6f 6d 70 61 72 69 73 6f 6e 73 20 dle comparisons
0830: 0a 20 20 2a 2a 20 20 20 20 20 20 69 6e 76 6f 6c . ** invol
0840: 76 69 6e 67 20 4e 61 4e 2e 20 46 6f 72 20 65 78 ving NaN. For ex
0850: 61 6d 70 6c 65 2c 20 78 20 21 3d 20 78 20 65 76 ample, x != x ev
0860: 61 6c 75 61 74 65 73 20 74 6f 20 74 72 75 65 20 aluates to true
0870: 69 66 20 78 20 69 73 20 4e 61 4e 20 0a 20 20 2a if x is NaN . *
0880: 2a 20 20 20 20 20 20 2e 2e 2e 0a 20 20 2a 2f 0a * .... */.
0890: 23 69 66 64 65 66 20 5f 5f 46 41 53 54 5f 4d 41 #ifdef __FAST_MA
08a0: 54 48 5f 5f 0a 23 20 65 72 72 6f 72 20 53 51 4c TH__.# error SQL
08b0: 69 74 65 20 77 69 6c 6c 20 6e 6f 74 20 77 6f 72 ite will not wor
08c0: 6b 20 63 6f 72 72 65 63 74 6c 79 20 77 69 74 68 k correctly with
08d0: 20 74 68 65 20 2d 66 66 61 73 74 2d 6d 61 74 68 the -ffast-math
08e0: 20 6f 70 74 69 6f 6e 20 6f 66 20 47 43 43 2e 0a option of GCC..
08f0: 23 65 6e 64 69 66 0a 20 20 76 6f 6c 61 74 69 6c #endif. volatil
0900: 65 20 64 6f 75 62 6c 65 20 79 20 3d 20 78 3b 0a e double y = x;.
0910: 20 20 76 6f 6c 61 74 69 6c 65 20 64 6f 75 62 6c volatile doubl
0920: 65 20 7a 20 3d 20 79 3b 0a 20 20 72 63 20 3d 20 e z = y;. rc =
0930: 28 79 21 3d 7a 29 3b 0a 23 65 6c 73 65 20 20 2f (y!=z);.#else /
0940: 2a 20 69 66 20 64 65 66 69 6e 65 64 28 53 51 4c * if defined(SQL
0950: 49 54 45 5f 48 41 56 45 5f 49 53 4e 41 4e 29 20 ITE_HAVE_ISNAN)
0960: 2a 2f 0a 20 20 72 63 20 3d 20 69 73 6e 61 6e 28 */. rc = isnan(
0970: 78 29 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 x);.#endif /* SQ
0980: 4c 49 54 45 5f 48 41 56 45 5f 49 53 4e 41 4e 20 LITE_HAVE_ISNAN
0990: 2a 2f 0a 20 20 74 65 73 74 63 61 73 65 28 20 72 */. testcase( r
09a0: 63 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 c );. return rc
09b0: 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 ;.}.#endif /* SQ
09c0: 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 LITE_OMIT_FLOATI
09d0: 4e 47 5f 50 4f 49 4e 54 20 2a 2f 0a 0a 2f 2a 0a NG_POINT */../*.
09e0: 2a 2a 20 43 6f 6d 70 75 74 65 20 61 20 73 74 72 ** Compute a str
09f0: 69 6e 67 20 6c 65 6e 67 74 68 20 74 68 61 74 20 ing length that
0a00: 69 73 20 6c 69 6d 69 74 65 64 20 74 6f 20 77 68 is limited to wh
0a10: 61 74 20 63 61 6e 20 62 65 20 73 74 6f 72 65 64 at can be stored
0a20: 20 69 6e 0a 2a 2a 20 6c 6f 77 65 72 20 33 30 20 in.** lower 30
0a30: 62 69 74 73 20 6f 66 20 61 20 33 32 2d 62 69 74 bits of a 32-bit
0a40: 20 73 69 67 6e 65 64 20 69 6e 74 65 67 65 72 2e signed integer.
0a50: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 76 61 6c 75 65 .**.** The value
0a60: 20 72 65 74 75 72 6e 65 64 20 77 69 6c 6c 20 6e returned will n
0a70: 65 76 65 72 20 62 65 20 6e 65 67 61 74 69 76 65 ever be negative
0a80: 2e 20 20 4e 6f 72 20 77 69 6c 6c 20 69 74 20 65 . Nor will it e
0a90: 76 65 72 20 62 65 20 67 72 65 61 74 65 72 0a 2a ver be greater.*
0aa0: 2a 20 74 68 61 6e 20 74 68 65 20 61 63 74 75 61 * than the actua
0ab0: 6c 20 6c 65 6e 67 74 68 20 6f 66 20 74 68 65 20 l length of the
0ac0: 73 74 72 69 6e 67 2e 20 20 46 6f 72 20 76 65 72 string. For ver
0ad0: 79 20 6c 6f 6e 67 20 73 74 72 69 6e 67 73 20 28 y long strings (
0ae0: 67 72 65 61 74 65 72 0a 2a 2a 20 74 68 61 6e 20 greater.** than
0af0: 31 47 69 42 29 20 74 68 65 20 76 61 6c 75 65 20 1GiB) the value
0b00: 72 65 74 75 72 6e 65 64 20 6d 69 67 68 74 20 62 returned might b
0b10: 65 20 6c 65 73 73 20 74 68 61 6e 20 74 68 65 20 e less than the
0b20: 74 72 75 65 20 73 74 72 69 6e 67 20 6c 65 6e 67 true string leng
0b30: 74 68 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 th..*/.int sqlit
0b40: 65 33 53 74 72 6c 65 6e 33 30 28 63 6f 6e 73 74 e3Strlen30(const
0b50: 20 63 68 61 72 20 2a 7a 29 7b 0a 20 20 63 6f 6e char *z){. con
0b60: 73 74 20 63 68 61 72 20 2a 7a 32 20 3d 20 7a 3b st char *z2 = z;
0b70: 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 . if( z==0 ) re
0b80: 74 75 72 6e 20 30 3b 0a 20 20 77 68 69 6c 65 28 turn 0;. while(
0b90: 20 2a 7a 32 20 29 7b 20 7a 32 2b 2b 3b 20 7d 0a *z2 ){ z2++; }.
0ba0: 20 20 72 65 74 75 72 6e 20 30 78 33 66 66 66 66 return 0x3ffff
0bb0: 66 66 66 20 26 20 28 69 6e 74 29 28 7a 32 20 2d fff & (int)(z2 -
0bc0: 20 7a 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 z);.}../*.** Se
0bd0: 74 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e t the most recen
0be0: 74 20 65 72 72 6f 72 20 63 6f 64 65 20 61 6e 64 t error code and
0bf0: 20 65 72 72 6f 72 20 73 74 72 69 6e 67 20 66 6f error string fo
0c00: 72 20 74 68 65 20 73 71 6c 69 74 65 0a 2a 2a 20 r the sqlite.**
0c10: 68 61 6e 64 6c 65 20 22 64 62 22 2e 20 54 68 65 handle "db". The
0c20: 20 65 72 72 6f 72 20 63 6f 64 65 20 69 73 20 73 error code is s
0c30: 65 74 20 74 6f 20 22 65 72 72 5f 63 6f 64 65 22 et to "err_code"
0c40: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 69 74 20 69 73 ..**.** If it is
0c50: 20 6e 6f 74 20 4e 55 4c 4c 2c 20 73 74 72 69 6e not NULL, strin
0c60: 67 20 7a 46 6f 72 6d 61 74 20 73 70 65 63 69 66 g zFormat specif
0c70: 69 65 73 20 74 68 65 20 66 6f 72 6d 61 74 20 6f ies the format o
0c80: 66 20 74 68 65 0a 2a 2a 20 65 72 72 6f 72 20 73 f the.** error s
0c90: 74 72 69 6e 67 20 69 6e 20 74 68 65 20 73 74 79 tring in the sty
0ca0: 6c 65 20 6f 66 20 74 68 65 20 70 72 69 6e 74 66 le of the printf
0cb0: 20 66 75 6e 63 74 69 6f 6e 73 3a 20 54 68 65 20 functions: The
0cc0: 66 6f 6c 6c 6f 77 69 6e 67 0a 2a 2a 20 66 6f 72 following.** for
0cd0: 6d 61 74 20 63 68 61 72 61 63 74 65 72 73 20 61 mat characters a
0ce0: 72 65 20 61 6c 6c 6f 77 65 64 3a 0a 2a 2a 0a 2a re allowed:.**.*
0cf0: 2a 20 20 20 20 20 20 25 73 20 20 20 20 20 20 49 * %s I
0d00: 6e 73 65 72 74 20 61 20 73 74 72 69 6e 67 0a 2a nsert a string.*
0d10: 2a 20 20 20 20 20 20 25 7a 20 20 20 20 20 20 41 * %z A
0d20: 20 73 74 72 69 6e 67 20 74 68 61 74 20 73 68 6f string that sho
0d30: 75 6c 64 20 62 65 20 66 72 65 65 64 20 61 66 74 uld be freed aft
0d40: 65 72 20 75 73 65 0a 2a 2a 20 20 20 20 20 20 25 er use.** %
0d50: 64 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 6e d Insert an
0d60: 20 69 6e 74 65 67 65 72 0a 2a 2a 20 20 20 20 20 integer.**
0d70: 20 25 54 20 20 20 20 20 20 49 6e 73 65 72 74 20 %T Insert
0d80: 61 20 74 6f 6b 65 6e 0a 2a 2a 20 20 20 20 20 20 a token.**
0d90: 25 53 20 20 20 20 20 20 49 6e 73 65 72 74 20 74 %S Insert t
0da0: 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 he first element
0db0: 20 6f 66 20 61 20 53 72 63 4c 69 73 74 0a 2a 2a of a SrcList.**
0dc0: 0a 2a 2a 20 7a 46 6f 72 6d 61 74 20 61 6e 64 20 .** zFormat and
0dd0: 61 6e 79 20 73 74 72 69 6e 67 20 74 6f 6b 65 6e any string token
0de0: 73 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 69 74 s that follow it
0df0: 20 61 72 65 20 61 73 73 75 6d 65 64 20 74 6f 20 are assumed to
0e00: 62 65 0a 2a 2a 20 65 6e 63 6f 64 65 64 20 69 6e be.** encoded in
0e10: 20 55 54 46 2d 38 2e 0a 2a 2a 0a 2a 2a 20 54 6f UTF-8..**.** To
0e20: 20 63 6c 65 61 72 20 74 68 65 20 6d 6f 73 74 20 clear the most
0e30: 72 65 63 65 6e 74 20 65 72 72 6f 72 20 66 6f 72 recent error for
0e40: 20 73 71 6c 69 74 65 20 68 61 6e 64 6c 65 20 22 sqlite handle "
0e50: 64 62 22 2c 20 73 71 6c 69 74 65 33 45 72 72 6f db", sqlite3Erro
0e60: 72 0a 2a 2a 20 73 68 6f 75 6c 64 20 62 65 20 63 r.** should be c
0e70: 61 6c 6c 65 64 20 77 69 74 68 20 65 72 72 5f 63 alled with err_c
0e80: 6f 64 65 20 73 65 74 20 74 6f 20 53 51 4c 49 54 ode set to SQLIT
0e90: 45 5f 4f 4b 20 61 6e 64 20 7a 46 6f 72 6d 61 74 E_OK and zFormat
0ea0: 20 73 65 74 0a 2a 2a 20 74 6f 20 4e 55 4c 4c 2e set.** to NULL.
0eb0: 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 .*/.void sqlite3
0ec0: 45 72 72 6f 72 28 73 71 6c 69 74 65 33 20 2a 64 Error(sqlite3 *d
0ed0: 62 2c 20 69 6e 74 20 65 72 72 5f 63 6f 64 65 2c b, int err_code,
0ee0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f const char *zFo
0ef0: 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 61 73 rmat, ...){. as
0f00: 73 65 72 74 28 20 64 62 21 3d 30 20 29 3b 0a 20 sert( db!=0 );.
0f10: 20 64 62 2d 3e 65 72 72 43 6f 64 65 20 3d 20 65 db->errCode = e
0f20: 72 72 5f 63 6f 64 65 3b 0a 20 20 69 66 28 20 7a rr_code;. if( z
0f30: 46 6f 72 6d 61 74 20 26 26 20 28 64 62 2d 3e 70 Format && (db->p
0f40: 45 72 72 20 7c 7c 20 28 64 62 2d 3e 70 45 72 72 Err || (db->pErr
0f50: 20 3d 20 73 71 6c 69 74 65 33 56 61 6c 75 65 4e = sqlite3ValueN
0f60: 65 77 28 64 62 29 29 21 3d 30 29 20 29 7b 0a 20 ew(db))!=0) ){.
0f70: 20 20 20 63 68 61 72 20 2a 7a 3b 0a 20 20 20 20 char *z;.
0f80: 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 20 20 va_list ap;.
0f90: 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 6f va_start(ap, zFo
0fa0: 72 6d 61 74 29 3b 0a 20 20 20 20 7a 20 3d 20 73 rmat);. z = s
0fb0: 71 6c 69 74 65 33 56 4d 50 72 69 6e 74 66 28 64 qlite3VMPrintf(d
0fc0: 62 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b b, zFormat, ap);
0fd0: 0a 20 20 20 20 76 61 5f 65 6e 64 28 61 70 29 3b . va_end(ap);
0fe0: 0a 20 20 20 20 73 71 6c 69 74 65 33 56 61 6c 75 . sqlite3Valu
0ff0: 65 53 65 74 53 74 72 28 64 62 2d 3e 70 45 72 72 eSetStr(db->pErr
1000: 2c 20 2d 31 2c 20 7a 2c 20 53 51 4c 49 54 45 5f , -1, z, SQLITE_
1010: 55 54 46 38 2c 20 53 51 4c 49 54 45 5f 44 59 4e UTF8, SQLITE_DYN
1020: 41 4d 49 43 29 3b 0a 20 20 7d 65 6c 73 65 20 69 AMIC);. }else i
1030: 66 28 20 64 62 2d 3e 70 45 72 72 20 29 7b 0a 20 f( db->pErr ){.
1040: 20 20 20 73 71 6c 69 74 65 33 56 61 6c 75 65 53 sqlite3ValueS
1050: 65 74 4e 75 6c 6c 28 64 62 2d 3e 70 45 72 72 29 etNull(db->pErr)
1060: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 ;. }.}../*.** A
1070: 64 64 20 61 6e 20 65 72 72 6f 72 20 6d 65 73 73 dd an error mess
1080: 61 67 65 20 74 6f 20 70 50 61 72 73 65 2d 3e 7a age to pParse->z
1090: 45 72 72 4d 73 67 20 61 6e 64 20 69 6e 63 72 65 ErrMsg and incre
10a0: 6d 65 6e 74 20 70 50 61 72 73 65 2d 3e 6e 45 72 ment pParse->nEr
10b0: 72 2e 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 r..** The follow
10c0: 69 6e 67 20 66 6f 72 6d 61 74 74 69 6e 67 20 63 ing formatting c
10d0: 68 61 72 61 63 74 65 72 73 20 61 72 65 20 61 6c haracters are al
10e0: 6c 6f 77 65 64 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 lowed:.**.**
10f0: 20 20 25 73 20 20 20 20 20 20 49 6e 73 65 72 74 %s Insert
1100: 20 61 20 73 74 72 69 6e 67 0a 2a 2a 20 20 20 20 a string.**
1110: 20 20 25 7a 20 20 20 20 20 20 41 20 73 74 72 69 %z A stri
1120: 6e 67 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 ng that should b
1130: 65 20 66 72 65 65 64 20 61 66 74 65 72 20 75 73 e freed after us
1140: 65 0a 2a 2a 20 20 20 20 20 20 25 64 20 20 20 20 e.** %d
1150: 20 20 49 6e 73 65 72 74 20 61 6e 20 69 6e 74 65 Insert an inte
1160: 67 65 72 0a 2a 2a 20 20 20 20 20 20 25 54 20 20 ger.** %T
1170: 20 20 20 20 49 6e 73 65 72 74 20 61 20 74 6f 6b Insert a tok
1180: 65 6e 0a 2a 2a 20 20 20 20 20 20 25 53 20 20 20 en.** %S
1190: 20 20 20 49 6e 73 65 72 74 20 74 68 65 20 66 69 Insert the fi
11a0: 72 73 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 61 rst element of a
11b0: 20 53 72 63 4c 69 73 74 0a 2a 2a 0a 2a 2a 20 54 SrcList.**.** T
11c0: 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 73 68 6f his function sho
11d0: 75 6c 64 20 62 65 20 75 73 65 64 20 74 6f 20 72 uld be used to r
11e0: 65 70 6f 72 74 20 61 6e 79 20 65 72 72 6f 72 20 eport any error
11f0: 74 68 61 74 20 6f 63 63 75 72 73 20 77 68 69 6c that occurs whil
1200: 73 74 0a 2a 2a 20 63 6f 6d 70 69 6c 69 6e 67 20 st.** compiling
1210: 61 6e 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 an SQL statement
1220: 20 28 69 2e 65 2e 20 77 69 74 68 69 6e 20 73 71 (i.e. within sq
1230: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 29 29 lite3_prepare())
1240: 2e 20 54 68 65 0a 2a 2a 20 6c 61 73 74 20 74 68 . The.** last th
1250: 69 6e 67 20 74 68 65 20 73 71 6c 69 74 65 33 5f ing the sqlite3_
1260: 70 72 65 70 61 72 65 28 29 20 66 75 6e 63 74 69 prepare() functi
1270: 6f 6e 20 64 6f 65 73 20 69 73 20 63 6f 70 79 20 on does is copy
1280: 74 68 65 20 65 72 72 6f 72 0a 2a 2a 20 73 74 6f the error.** sto
1290: 72 65 64 20 62 79 20 74 68 69 73 20 66 75 6e 63 red by this func
12a0: 74 69 6f 6e 20 69 6e 74 6f 20 74 68 65 20 64 61 tion into the da
12b0: 74 61 62 61 73 65 20 68 61 6e 64 6c 65 20 75 73 tabase handle us
12c0: 69 6e 67 20 73 71 6c 69 74 65 33 45 72 72 6f 72 ing sqlite3Error
12d0: 28 29 2e 0a 2a 2a 20 46 75 6e 63 74 69 6f 6e 20 ()..** Function
12e0: 73 71 6c 69 74 65 33 45 72 72 6f 72 28 29 20 73 sqlite3Error() s
12f0: 68 6f 75 6c 64 20 62 65 20 75 73 65 64 20 64 75 hould be used du
1300: 72 69 6e 67 20 73 74 61 74 65 6d 65 6e 74 20 65 ring statement e
1310: 78 65 63 75 74 69 6f 6e 0a 2a 2a 20 28 73 71 6c xecution.** (sql
1320: 69 74 65 33 5f 73 74 65 70 28 29 20 65 74 63 2e ite3_step() etc.
1330: 29 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 )..*/.void sqlit
1340: 65 33 45 72 72 6f 72 4d 73 67 28 50 61 72 73 65 e3ErrorMsg(Parse
1350: 20 2a 70 50 61 72 73 65 2c 20 63 6f 6e 73 74 20 *pParse, const
1360: 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e char *zFormat, .
1370: 2e 2e 29 7b 0a 20 20 63 68 61 72 20 2a 7a 4d 73 ..){. char *zMs
1380: 67 3b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b g;. va_list ap;
1390: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d . sqlite3 *db =
13a0: 20 70 50 61 72 73 65 2d 3e 64 62 3b 0a 20 20 76 pParse->db;. v
13b0: 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 a_start(ap, zFor
13c0: 6d 61 74 29 3b 0a 20 20 7a 4d 73 67 20 3d 20 73 mat);. zMsg = s
13d0: 71 6c 69 74 65 33 56 4d 50 72 69 6e 74 66 28 64 qlite3VMPrintf(d
13e0: 62 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b b, zFormat, ap);
13f0: 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 . va_end(ap);.
1400: 20 69 66 28 20 64 62 2d 3e 73 75 70 70 72 65 73 if( db->suppres
1410: 73 45 72 72 20 29 7b 0a 20 20 20 20 73 71 6c 69 sErr ){. sqli
1420: 74 65 33 44 62 46 72 65 65 28 64 62 2c 20 7a 4d te3DbFree(db, zM
1430: 73 67 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 sg);. }else{.
1440: 20 20 70 50 61 72 73 65 2d 3e 6e 45 72 72 2b 2b pParse->nErr++
1450: 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 44 62 46 ;. sqlite3DbF
1460: 72 65 65 28 64 62 2c 20 70 50 61 72 73 65 2d 3e ree(db, pParse->
1470: 7a 45 72 72 4d 73 67 29 3b 0a 20 20 20 20 70 50 zErrMsg);. pP
1480: 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 20 3d 20 arse->zErrMsg =
1490: 7a 4d 73 67 3b 0a 20 20 20 20 70 50 61 72 73 65 zMsg;. pParse
14a0: 2d 3e 72 63 20 3d 20 53 51 4c 49 54 45 5f 45 52 ->rc = SQLITE_ER
14b0: 52 4f 52 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a ROR;. }.}../*.*
14c0: 2a 20 43 6f 6e 76 65 72 74 20 61 6e 20 53 51 4c * Convert an SQL
14d0: 2d 73 74 79 6c 65 20 71 75 6f 74 65 64 20 73 74 -style quoted st
14e0: 72 69 6e 67 20 69 6e 74 6f 20 61 20 6e 6f 72 6d ring into a norm
14f0: 61 6c 20 73 74 72 69 6e 67 20 62 79 20 72 65 6d al string by rem
1500: 6f 76 69 6e 67 0a 2a 2a 20 74 68 65 20 71 75 6f oving.** the quo
1510: 74 65 20 63 68 61 72 61 63 74 65 72 73 2e 20 20 te characters.
1520: 54 68 65 20 63 6f 6e 76 65 72 73 69 6f 6e 20 69 The conversion i
1530: 73 20 64 6f 6e 65 20 69 6e 2d 70 6c 61 63 65 2e s done in-place.
1540: 20 20 49 66 20 74 68 65 0a 2a 2a 20 69 6e 70 75 If the.** inpu
1550: 74 20 64 6f 65 73 20 6e 6f 74 20 62 65 67 69 6e t does not begin
1560: 20 77 69 74 68 20 61 20 71 75 6f 74 65 20 63 68 with a quote ch
1570: 61 72 61 63 74 65 72 2c 20 74 68 65 6e 20 74 68 aracter, then th
1580: 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 69 73 is routine.** is
1590: 20 61 20 6e 6f 2d 6f 70 2e 0a 2a 2a 0a 2a 2a 20 a no-op..**.**
15a0: 54 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 The input string
15b0: 20 6d 75 73 74 20 62 65 20 7a 65 72 6f 2d 74 65 must be zero-te
15c0: 72 6d 69 6e 61 74 65 64 2e 20 20 41 20 6e 65 77 rminated. A new
15d0: 20 7a 65 72 6f 2d 74 65 72 6d 69 6e 61 74 6f 72 zero-terminator
15e0: 0a 2a 2a 20 69 73 20 61 64 64 65 64 20 74 6f 20 .** is added to
15f0: 74 68 65 20 64 65 71 75 6f 74 65 64 20 73 74 72 the dequoted str
1600: 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 72 ing..**.** The r
1610: 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 2d eturn value is -
1620: 31 20 69 66 20 6e 6f 20 64 65 71 75 6f 74 69 6e 1 if no dequotin
1630: 67 20 6f 63 63 75 72 73 20 6f 72 20 74 68 65 20 g occurs or the
1640: 6c 65 6e 67 74 68 20 6f 66 20 74 68 65 0a 2a 2a length of the.**
1650: 20 64 65 71 75 6f 74 65 64 20 73 74 72 69 6e 67 dequoted string
1660: 2c 20 65 78 63 6c 75 73 69 76 65 20 6f 66 20 74 , exclusive of t
1670: 68 65 20 7a 65 72 6f 20 74 65 72 6d 69 6e 61 74 he zero terminat
1680: 6f 72 2c 20 69 66 20 64 65 71 75 6f 74 69 6e 67 or, if dequoting
1690: 20 64 6f 65 73 0a 2a 2a 20 6f 63 63 75 72 2e 0a does.** occur..
16a0: 2a 2a 0a 2a 2a 20 32 30 30 32 2d 46 65 62 2d 31 **.** 2002-Feb-1
16b0: 34 3a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 4: This routine
16c0: 69 73 20 65 78 74 65 6e 64 65 64 20 74 6f 20 72 is extended to r
16d0: 65 6d 6f 76 65 20 4d 53 2d 41 63 63 65 73 73 20 emove MS-Access
16e0: 73 74 79 6c 65 0a 2a 2a 20 62 72 61 63 6b 65 74 style.** bracket
16f0: 73 20 66 72 6f 6d 20 61 72 6f 75 6e 64 20 69 64 s from around id
1700: 65 6e 74 69 66 65 72 73 2e 20 20 46 6f 72 20 65 entifers. For e
1710: 78 61 6d 70 6c 65 3a 20 20 22 5b 61 2d 62 2d 63 xample: "[a-b-c
1720: 5d 22 20 62 65 63 6f 6d 65 73 0a 2a 2a 20 22 61 ]" becomes.** "a
1730: 2d 62 2d 63 22 2e 0a 2a 2f 0a 69 6e 74 20 73 71 -b-c"..*/.int sq
1740: 6c 69 74 65 33 44 65 71 75 6f 74 65 28 63 68 61 lite3Dequote(cha
1750: 72 20 2a 7a 29 7b 0a 20 20 63 68 61 72 20 71 75 r *z){. char qu
1760: 6f 74 65 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b ote;. int i, j;
1770: 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 . if( z==0 ) re
1780: 74 75 72 6e 20 2d 31 3b 0a 20 20 71 75 6f 74 65 turn -1;. quote
1790: 20 3d 20 7a 5b 30 5d 3b 0a 20 20 73 77 69 74 63 = z[0];. switc
17a0: 68 28 20 71 75 6f 74 65 20 29 7b 0a 20 20 20 20 h( quote ){.
17b0: 63 61 73 65 20 27 5c 27 27 3a 20 20 62 72 65 61 case '\'': brea
17c0: 6b 3b 0a 20 20 20 20 63 61 73 65 20 27 22 27 3a k;. case '"':
17d0: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 break;. ca
17e0: 73 65 20 27 60 27 3a 20 20 20 62 72 65 61 6b 3b se '`': break;
17f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1800: 2f 2a 20 46 6f 72 20 4d 79 53 51 4c 20 63 6f 6d /* For MySQL com
1810: 70 61 74 69 62 69 6c 69 74 79 20 2a 2f 0a 20 20 patibility */.
1820: 20 20 63 61 73 65 20 27 5b 27 3a 20 20 20 71 75 case '[': qu
1830: 6f 74 65 20 3d 20 27 5d 27 3b 20 20 62 72 65 61 ote = ']'; brea
1840: 6b 3b 20 20 2f 2a 20 46 6f 72 20 4d 53 20 53 71 k; /* For MS Sq
1850: 6c 53 65 72 76 65 72 20 63 6f 6d 70 61 74 69 62 lServer compatib
1860: 69 6c 69 74 79 20 2a 2f 0a 20 20 20 20 64 65 66 ility */. def
1870: 61 75 6c 74 3a 20 20 20 20 72 65 74 75 72 6e 20 ault: return
1880: 2d 31 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d -1;. }. for(i=
1890: 31 2c 20 6a 3d 30 3b 3b 20 69 2b 2b 29 7b 0a 20 1, j=0;; i++){.
18a0: 20 20 20 61 73 73 65 72 74 28 20 7a 5b 69 5d 20 assert( z[i]
18b0: 29 3b 0a 20 20 20 20 69 66 28 20 7a 5b 69 5d 3d );. if( z[i]=
18c0: 3d 71 75 6f 74 65 20 29 7b 0a 20 20 20 20 20 20 =quote ){.
18d0: 69 66 28 20 7a 5b 69 2b 31 5d 3d 3d 71 75 6f 74 if( z[i+1]==quot
18e0: 65 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 6a e ){. z[j
18f0: 2b 2b 5d 20 3d 20 71 75 6f 74 65 3b 0a 20 20 20 ++] = quote;.
1900: 20 20 20 20 20 69 2b 2b 3b 0a 20 20 20 20 20 20 i++;.
1910: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 62 }else{. b
1920: 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 reak;. }.
1930: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 7a }else{. z
1940: 5b 6a 2b 2b 5d 20 3d 20 7a 5b 69 5d 3b 0a 20 20 [j++] = z[i];.
1950: 20 20 7d 0a 20 20 7d 0a 20 20 7a 5b 6a 5d 20 3d }. }. z[j] =
1960: 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 6a 3b 0a 0;. return j;.
1970: 7d 0a 0a 2f 2a 20 43 6f 6e 76 65 6e 69 65 6e 74 }../* Convenient
1980: 20 73 68 6f 72 74 2d 68 61 6e 64 20 2a 2f 0a 23 short-hand */.#
1990: 64 65 66 69 6e 65 20 55 70 70 65 72 54 6f 4c 6f define UpperToLo
19a0: 77 65 72 20 73 71 6c 69 74 65 33 55 70 70 65 72 wer sqlite3Upper
19b0: 54 6f 4c 6f 77 65 72 0a 0a 2f 2a 0a 2a 2a 20 53 ToLower../*.** S
19c0: 6f 6d 65 20 73 79 73 74 65 6d 73 20 68 61 76 65 ome systems have
19d0: 20 73 74 72 69 63 6d 70 28 29 2e 20 20 4f 74 68 stricmp(). Oth
19e0: 65 72 73 20 68 61 76 65 20 73 74 72 63 61 73 65 ers have strcase
19f0: 63 6d 70 28 29 2e 20 20 42 65 63 61 75 73 65 0a cmp(). Because.
1a00: 2a 2a 20 74 68 65 72 65 20 69 73 20 6e 6f 20 63 ** there is no c
1a10: 6f 6e 73 69 73 74 65 6e 63 79 2c 20 77 65 20 77 onsistency, we w
1a20: 69 6c 6c 20 64 65 66 69 6e 65 20 6f 75 72 20 6f ill define our o
1a30: 77 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 4c 45 4d wn..**.** IMPLEM
1a40: 45 4e 54 41 54 49 4f 4e 2d 4f 46 3a 20 52 2d 33 ENTATION-OF: R-3
1a50: 30 32 34 33 2d 30 32 34 39 34 20 54 68 65 20 73 0243-02494 The s
1a60: 71 6c 69 74 65 33 5f 73 74 72 69 63 6d 70 28 29 qlite3_stricmp()
1a70: 20 61 6e 64 0a 2a 2a 20 73 71 6c 69 74 65 33 5f and.** sqlite3_
1a80: 73 74 72 6e 69 63 6d 70 28 29 20 41 50 49 73 20 strnicmp() APIs
1a90: 61 6c 6c 6f 77 20 61 70 70 6c 69 63 61 74 69 6f allow applicatio
1aa0: 6e 73 20 61 6e 64 20 65 78 74 65 6e 73 69 6f 6e ns and extension
1ab0: 73 20 74 6f 20 63 6f 6d 70 61 72 65 0a 2a 2a 20 s to compare.**
1ac0: 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 the contents of
1ad0: 74 77 6f 20 62 75 66 66 65 72 73 20 63 6f 6e 74 two buffers cont
1ae0: 61 69 6e 69 6e 67 20 55 54 46 2d 38 20 73 74 72 aining UTF-8 str
1af0: 69 6e 67 73 20 69 6e 20 61 0a 2a 2a 20 63 61 73 ings in a.** cas
1b00: 65 2d 69 6e 64 65 70 65 6e 64 65 6e 74 20 66 61 e-independent fa
1b10: 73 68 69 6f 6e 2c 20 75 73 69 6e 67 20 74 68 65 shion, using the
1b20: 20 73 61 6d 65 20 64 65 66 69 6e 69 74 69 6f 6e same definition
1b30: 20 6f 66 20 22 63 61 73 65 0a 2a 2a 20 69 6e 64 of "case.** ind
1b40: 65 70 65 6e 64 65 6e 63 65 22 20 74 68 61 74 20 ependence" that
1b50: 53 51 4c 69 74 65 20 75 73 65 73 20 69 6e 74 65 SQLite uses inte
1b60: 72 6e 61 6c 6c 79 20 77 68 65 6e 20 63 6f 6d 70 rnally when comp
1b70: 61 72 69 6e 67 20 69 64 65 6e 74 69 66 69 65 72 aring identifier
1b80: 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 s..*/.int sqlite
1b90: 33 5f 73 74 72 69 63 6d 70 28 63 6f 6e 73 74 20 3_stricmp(const
1ba0: 63 68 61 72 20 2a 7a 4c 65 66 74 2c 20 63 6f 6e char *zLeft, con
1bb0: 73 74 20 63 68 61 72 20 2a 7a 52 69 67 68 74 29 st char *zRight)
1bc0: 7b 0a 20 20 72 65 67 69 73 74 65 72 20 75 6e 73 {. register uns
1bd0: 69 67 6e 65 64 20 63 68 61 72 20 2a 61 2c 20 2a igned char *a, *
1be0: 62 3b 0a 20 20 61 20 3d 20 28 75 6e 73 69 67 6e b;. a = (unsign
1bf0: 65 64 20 63 68 61 72 20 2a 29 7a 4c 65 66 74 3b ed char *)zLeft;
1c00: 0a 20 20 62 20 3d 20 28 75 6e 73 69 67 6e 65 64 . b = (unsigned
1c10: 20 63 68 61 72 20 2a 29 7a 52 69 67 68 74 3b 0a char *)zRight;.
1c20: 20 20 77 68 69 6c 65 28 20 2a 61 21 3d 30 20 26 while( *a!=0 &
1c30: 26 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a & UpperToLower[*
1c40: 61 5d 3d 3d 55 70 70 65 72 54 6f 4c 6f 77 65 72 a]==UpperToLower
1c50: 5b 2a 62 5d 29 7b 20 61 2b 2b 3b 20 62 2b 2b 3b [*b]){ a++; b++;
1c60: 20 7d 0a 20 20 72 65 74 75 72 6e 20 55 70 70 65 }. return Uppe
1c70: 72 54 6f 4c 6f 77 65 72 5b 2a 61 5d 20 2d 20 55 rToLower[*a] - U
1c80: 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 62 5d 3b pperToLower[*b];
1c90: 0a 7d 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 73 .}.int sqlite3_s
1ca0: 74 72 6e 69 63 6d 70 28 63 6f 6e 73 74 20 63 68 trnicmp(const ch
1cb0: 61 72 20 2a 7a 4c 65 66 74 2c 20 63 6f 6e 73 74 ar *zLeft, const
1cc0: 20 63 68 61 72 20 2a 7a 52 69 67 68 74 2c 20 69 char *zRight, i
1cd0: 6e 74 20 4e 29 7b 0a 20 20 72 65 67 69 73 74 65 nt N){. registe
1ce0: 72 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 r unsigned char
1cf0: 2a 61 2c 20 2a 62 3b 0a 20 20 61 20 3d 20 28 75 *a, *b;. a = (u
1d00: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a nsigned char *)z
1d10: 4c 65 66 74 3b 0a 20 20 62 20 3d 20 28 75 6e 73 Left;. b = (uns
1d20: 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a 52 69 igned char *)zRi
1d30: 67 68 74 3b 0a 20 20 77 68 69 6c 65 28 20 4e 2d ght;. while( N-
1d40: 2d 20 3e 20 30 20 26 26 20 2a 61 21 3d 30 20 26 - > 0 && *a!=0 &
1d50: 26 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a & UpperToLower[*
1d60: 61 5d 3d 3d 55 70 70 65 72 54 6f 4c 6f 77 65 72 a]==UpperToLower
1d70: 5b 2a 62 5d 29 7b 20 61 2b 2b 3b 20 62 2b 2b 3b [*b]){ a++; b++;
1d80: 20 7d 0a 20 20 72 65 74 75 72 6e 20 4e 3c 30 20 }. return N<0
1d90: 3f 20 30 20 3a 20 55 70 70 65 72 54 6f 4c 6f 77 ? 0 : UpperToLow
1da0: 65 72 5b 2a 61 5d 20 2d 20 55 70 70 65 72 54 6f er[*a] - UpperTo
1db0: 4c 6f 77 65 72 5b 2a 62 5d 3b 0a 7d 0a 0a 2f 2a Lower[*b];.}../*
1dc0: 0a 2a 2a 20 54 68 65 20 73 74 72 69 6e 67 20 7a .** The string z
1dd0: 5b 5d 20 69 73 20 61 6e 20 74 65 78 74 20 72 65 [] is an text re
1de0: 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f 66 20 presentation of
1df0: 61 20 72 65 61 6c 20 6e 75 6d 62 65 72 2e 0a 2a a real number..*
1e00: 2a 20 43 6f 6e 76 65 72 74 20 74 68 69 73 20 73 * Convert this s
1e10: 74 72 69 6e 67 20 74 6f 20 61 20 64 6f 75 62 6c tring to a doubl
1e20: 65 20 61 6e 64 20 77 72 69 74 65 20 69 74 20 69 e and write it i
1e30: 6e 74 6f 20 2a 70 52 65 73 75 6c 74 2e 0a 2a 2a nto *pResult..**
1e40: 0a 2a 2a 20 54 68 65 20 73 74 72 69 6e 67 20 7a .** The string z
1e50: 5b 5d 20 69 73 20 6c 65 6e 67 74 68 20 62 79 74 [] is length byt
1e60: 65 73 20 69 6e 20 6c 65 6e 67 74 68 20 28 62 79 es in length (by
1e70: 74 65 73 2c 20 6e 6f 74 20 63 68 61 72 61 63 74 tes, not charact
1e80: 65 72 73 29 20 61 6e 64 0a 2a 2a 20 75 73 65 73 ers) and.** uses
1e90: 20 74 68 65 20 65 6e 63 6f 64 69 6e 67 20 65 6e the encoding en
1ea0: 63 2e 20 20 54 68 65 20 73 74 72 69 6e 67 20 69 c. The string i
1eb0: 73 20 6e 6f 74 20 6e 65 63 65 73 73 61 72 69 6c s not necessaril
1ec0: 79 20 7a 65 72 6f 2d 74 65 72 6d 69 6e 61 74 65 y zero-terminate
1ed0: 64 2e 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 d..**.** Return
1ee0: 54 52 55 45 20 69 66 20 74 68 65 20 72 65 73 75 TRUE if the resu
1ef0: 6c 74 20 69 73 20 61 20 76 61 6c 69 64 20 72 65 lt is a valid re
1f00: 61 6c 20 6e 75 6d 62 65 72 20 28 6f 72 20 69 6e al number (or in
1f10: 74 65 67 65 72 29 20 61 6e 64 20 46 41 4c 53 45 teger) and FALSE
1f20: 0a 2a 2a 20 69 66 20 74 68 65 20 73 74 72 69 6e .** if the strin
1f30: 67 20 69 73 20 65 6d 70 74 79 20 6f 72 20 63 6f g is empty or co
1f40: 6e 74 61 69 6e 73 20 65 78 74 72 61 6e 65 6f 75 ntains extraneou
1f50: 73 20 74 65 78 74 2e 20 20 56 61 6c 69 64 20 6e s text. Valid n
1f60: 75 6d 62 65 72 73 0a 2a 2a 20 61 72 65 20 69 6e umbers.** are in
1f70: 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 66 6f one of these fo
1f80: 72 6d 61 74 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 rmats:.**.**
1f90: 5b 2b 2d 5d 64 69 67 69 74 73 5b 45 5b 2b 2d 5d [+-]digits[E[+-]
1fa0: 64 69 67 69 74 73 5d 0a 2a 2a 20 20 20 20 5b 2b digits].** [+
1fb0: 2d 5d 64 69 67 69 74 73 2e 5b 64 69 67 69 74 73 -]digits.[digits
1fc0: 5d 5b 45 5b 2b 2d 5d 64 69 67 69 74 73 5d 0a 2a ][E[+-]digits].*
1fd0: 2a 20 20 20 20 5b 2b 2d 5d 2e 64 69 67 69 74 73 * [+-].digits
1fe0: 5b 45 5b 2b 2d 5d 64 69 67 69 74 73 5d 0a 2a 2a [E[+-]digits].**
1ff0: 0a 2a 2a 20 4c 65 61 64 69 6e 67 20 61 6e 64 20 .** Leading and
2000: 74 72 61 69 6c 69 6e 67 20 77 68 69 74 65 73 70 trailing whitesp
2010: 61 63 65 20 69 73 20 69 67 6e 6f 72 65 64 20 66 ace is ignored f
2020: 6f 72 20 74 68 65 20 70 75 72 70 6f 73 65 20 6f or the purpose o
2030: 66 20 64 65 74 65 72 6d 69 6e 69 6e 67 0a 2a 2a f determining.**
2040: 20 76 61 6c 69 64 69 74 79 2e 0a 2a 2a 0a 2a 2a validity..**.**
2050: 20 49 66 20 73 6f 6d 65 20 70 72 65 66 69 78 20 If some prefix
2060: 6f 66 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 of the input str
2070: 69 6e 67 20 69 73 20 61 20 76 61 6c 69 64 20 6e ing is a valid n
2080: 75 6d 62 65 72 2c 20 74 68 69 73 20 72 6f 75 74 umber, this rout
2090: 69 6e 65 0a 2a 2a 20 72 65 74 75 72 6e 73 20 46 ine.** returns F
20a0: 41 4c 53 45 20 62 75 74 20 69 74 20 73 74 69 6c ALSE but it stil
20b0: 6c 20 63 6f 6e 76 65 72 74 73 20 74 68 65 20 70 l converts the p
20c0: 72 65 66 69 78 20 61 6e 64 20 77 72 69 74 65 73 refix and writes
20d0: 20 74 68 65 20 72 65 73 75 6c 74 0a 2a 2a 20 69 the result.** i
20e0: 6e 74 6f 20 2a 70 52 65 73 75 6c 74 2e 0a 2a 2f nto *pResult..*/
20f0: 0a 69 6e 74 20 73 71 6c 69 74 65 33 41 74 6f 46 .int sqlite3AtoF
2100: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c 20 (const char *z,
2110: 64 6f 75 62 6c 65 20 2a 70 52 65 73 75 6c 74 2c double *pResult,
2120: 20 69 6e 74 20 6c 65 6e 67 74 68 2c 20 75 38 20 int length, u8
2130: 65 6e 63 29 7b 0a 23 69 66 6e 64 65 66 20 53 51 enc){.#ifndef SQ
2140: 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 LITE_OMIT_FLOATI
2150: 4e 47 5f 50 4f 49 4e 54 0a 20 20 69 6e 74 20 69 NG_POINT. int i
2160: 6e 63 72 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 ncr;. const cha
2170: 72 20 2a 7a 45 6e 64 20 3d 20 7a 20 2b 20 6c 65 r *zEnd = z + le
2180: 6e 67 74 68 3b 0a 20 20 2f 2a 20 73 69 67 6e 20 ngth;. /* sign
2190: 2a 20 73 69 67 6e 69 66 69 63 61 6e 64 20 2a 20 * significand *
21a0: 28 31 30 20 5e 20 28 65 73 69 67 6e 20 2a 20 65 (10 ^ (esign * e
21b0: 78 70 6f 6e 65 6e 74 29 29 20 2a 2f 0a 20 20 69 xponent)) */. i
21c0: 6e 74 20 73 69 67 6e 20 3d 20 31 3b 20 20 20 20 nt sign = 1;
21d0: 2f 2a 20 73 69 67 6e 20 6f 66 20 73 69 67 6e 69 /* sign of signi
21e0: 66 69 63 61 6e 64 20 2a 2f 0a 20 20 69 36 34 20 ficand */. i64
21f0: 73 20 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a 20 s = 0; /*
2200: 73 69 67 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 significand */.
2210: 20 69 6e 74 20 64 20 3d 20 30 3b 20 20 20 20 20 int d = 0;
2220: 20 20 2f 2a 20 61 64 6a 75 73 74 20 65 78 70 6f /* adjust expo
2230: 6e 65 6e 74 20 66 6f 72 20 73 68 69 66 74 69 6e nent for shiftin
2240: 67 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 20 g decimal point
2250: 2a 2f 0a 20 20 69 6e 74 20 65 73 69 67 6e 20 3d */. int esign =
2260: 20 31 3b 20 20 20 2f 2a 20 73 69 67 6e 20 6f 66 1; /* sign of
2270: 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20 69 exponent */. i
2280: 6e 74 20 65 20 3d 20 30 3b 20 20 20 20 20 20 20 nt e = 0;
2290: 2f 2a 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 /* exponent */.
22a0: 20 69 6e 74 20 65 56 61 6c 69 64 20 3d 20 31 3b int eValid = 1;
22b0: 20 20 2f 2a 20 54 72 75 65 20 65 78 70 6f 6e 65 /* True expone
22c0: 6e 74 20 69 73 20 65 69 74 68 65 72 20 6e 6f 74 nt is either not
22d0: 20 75 73 65 64 20 6f 72 20 69 73 20 77 65 6c 6c used or is well
22e0: 2d 66 6f 72 6d 65 64 20 2a 2f 0a 20 20 64 6f 75 -formed */. dou
22f0: 62 6c 65 20 72 65 73 75 6c 74 3b 0a 20 20 69 6e ble result;. in
2300: 74 20 6e 44 69 67 69 74 73 20 3d 20 30 3b 0a 20 t nDigits = 0;.
2310: 20 69 6e 74 20 6e 6f 6e 4e 75 6d 20 3d 20 30 3b int nonNum = 0;
2320: 0a 0a 20 20 61 73 73 65 72 74 28 20 65 6e 63 3d .. assert( enc=
2330: 3d 53 51 4c 49 54 45 5f 55 54 46 38 20 7c 7c 20 =SQLITE_UTF8 ||
2340: 65 6e 63 3d 3d 53 51 4c 49 54 45 5f 55 54 46 31 enc==SQLITE_UTF1
2350: 36 4c 45 20 7c 7c 20 65 6e 63 3d 3d 53 51 4c 49 6LE || enc==SQLI
2360: 54 45 5f 55 54 46 31 36 42 45 20 29 3b 0a 20 20 TE_UTF16BE );.
2370: 2a 70 52 65 73 75 6c 74 20 3d 20 30 2e 30 3b 20 *pResult = 0.0;
2380: 20 20 2f 2a 20 44 65 66 61 75 6c 74 20 72 65 74 /* Default ret
2390: 75 72 6e 20 76 61 6c 75 65 2c 20 69 6e 20 63 61 urn value, in ca
23a0: 73 65 20 6f 66 20 61 6e 20 65 72 72 6f 72 20 2a se of an error *
23b0: 2f 0a 0a 20 20 69 66 28 20 65 6e 63 3d 3d 53 51 /.. if( enc==SQ
23c0: 4c 49 54 45 5f 55 54 46 38 20 29 7b 0a 20 20 20 LITE_UTF8 ){.
23d0: 20 69 6e 63 72 20 3d 20 31 3b 0a 20 20 7d 65 6c incr = 1;. }el
23e0: 73 65 7b 0a 20 20 20 20 69 6e 74 20 69 3b 0a 20 se{. int i;.
23f0: 20 20 20 69 6e 63 72 20 3d 20 32 3b 0a 20 20 20 incr = 2;.
2400: 20 61 73 73 65 72 74 28 20 53 51 4c 49 54 45 5f assert( SQLITE_
2410: 55 54 46 31 36 4c 45 3d 3d 32 20 26 26 20 53 51 UTF16LE==2 && SQ
2420: 4c 49 54 45 5f 55 54 46 31 36 42 45 3d 3d 33 20 LITE_UTF16BE==3
2430: 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d 33 2d 65 );. for(i=3-e
2440: 6e 63 3b 20 69 3c 6c 65 6e 67 74 68 20 26 26 20 nc; i<length &&
2450: 7a 5b 69 5d 3d 3d 30 3b 20 69 2b 3d 32 29 7b 7d z[i]==0; i+=2){}
2460: 0a 20 20 20 20 6e 6f 6e 4e 75 6d 20 3d 20 69 3c . nonNum = i<
2470: 6c 65 6e 67 74 68 3b 0a 20 20 20 20 7a 45 6e 64 length;. zEnd
2480: 20 3d 20 7a 2b 69 2b 65 6e 63 2d 33 3b 0a 20 20 = z+i+enc-3;.
2490: 20 20 7a 20 2b 3d 20 28 65 6e 63 26 31 29 3b 0a z += (enc&1);.
24a0: 20 20 7d 0a 0a 20 20 2f 2a 20 73 6b 69 70 20 6c }.. /* skip l
24b0: 65 61 64 69 6e 67 20 73 70 61 63 65 73 20 2a 2f eading spaces */
24c0: 0a 20 20 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64 . while( z<zEnd
24d0: 20 26 26 20 73 71 6c 69 74 65 33 49 73 73 70 61 && sqlite3Isspa
24e0: 63 65 28 2a 7a 29 20 29 20 7a 2b 3d 69 6e 63 72 ce(*z) ) z+=incr
24f0: 3b 0a 20 20 69 66 28 20 7a 3e 3d 7a 45 6e 64 20 ;. if( z>=zEnd
2500: 29 20 72 65 74 75 72 6e 20 30 3b 0a 0a 20 20 2f ) return 0;.. /
2510: 2a 20 67 65 74 20 73 69 67 6e 20 6f 66 20 73 69 * get sign of si
2520: 67 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20 69 gnificand */. i
2530: 66 28 20 2a 7a 3d 3d 27 2d 27 20 29 7b 0a 20 20 f( *z=='-' ){.
2540: 20 20 73 69 67 6e 20 3d 20 2d 31 3b 0a 20 20 20 sign = -1;.
2550: 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 7d 65 6c 73 z+=incr;. }els
2560: 65 20 69 66 28 20 2a 7a 3d 3d 27 2b 27 20 29 7b e if( *z=='+' ){
2570: 0a 20 20 20 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 . z+=incr;.
2580: 7d 0a 0a 20 20 2f 2a 20 73 6b 69 70 20 6c 65 61 }.. /* skip lea
2590: 64 69 6e 67 20 7a 65 72 6f 65 73 20 2a 2f 0a 20 ding zeroes */.
25a0: 20 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64 20 26 while( z<zEnd &
25b0: 26 20 7a 5b 30 5d 3d 3d 27 30 27 20 29 20 7a 2b & z[0]=='0' ) z+
25c0: 3d 69 6e 63 72 2c 20 6e 44 69 67 69 74 73 2b 2b =incr, nDigits++
25d0: 3b 0a 0a 20 20 2f 2a 20 63 6f 70 79 20 6d 61 78 ;.. /* copy max
25e0: 20 73 69 67 6e 69 66 69 63 61 6e 74 20 64 69 67 significant dig
25f0: 69 74 73 20 74 6f 20 73 69 67 6e 69 66 69 63 61 its to significa
2600: 6e 64 20 2a 2f 0a 20 20 77 68 69 6c 65 28 20 7a nd */. while( z
2610: 3c 7a 45 6e 64 20 26 26 20 73 71 6c 69 74 65 33 <zEnd && sqlite3
2620: 49 73 64 69 67 69 74 28 2a 7a 29 20 26 26 20 73 Isdigit(*z) && s
2630: 3c 28 28 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 <((LARGEST_INT64
2640: 2d 39 29 2f 31 30 29 20 29 7b 0a 20 20 20 20 73 -9)/10) ){. s
2650: 20 3d 20 73 2a 31 30 20 2b 20 28 2a 7a 20 2d 20 = s*10 + (*z -
2660: 27 30 27 29 3b 0a 20 20 20 20 7a 2b 3d 69 6e 63 '0');. z+=inc
2670: 72 2c 20 6e 44 69 67 69 74 73 2b 2b 3b 0a 20 20 r, nDigits++;.
2680: 7d 0a 0a 20 20 2f 2a 20 73 6b 69 70 20 6e 6f 6e }.. /* skip non
2690: 2d 73 69 67 6e 69 66 69 63 61 6e 74 20 73 69 67 -significant sig
26a0: 6e 69 66 69 63 61 6e 64 20 64 69 67 69 74 73 0a nificand digits.
26b0: 20 20 2a 2a 20 28 69 6e 63 72 65 61 73 65 20 65 ** (increase e
26c0: 78 70 6f 6e 65 6e 74 20 62 79 20 64 20 74 6f 20 xponent by d to
26d0: 73 68 69 66 74 20 64 65 63 69 6d 61 6c 20 6c 65 shift decimal le
26e0: 66 74 29 20 2a 2f 0a 20 20 77 68 69 6c 65 28 20 ft) */. while(
26f0: 7a 3c 7a 45 6e 64 20 26 26 20 73 71 6c 69 74 65 z<zEnd && sqlite
2700: 33 49 73 64 69 67 69 74 28 2a 7a 29 20 29 20 7a 3Isdigit(*z) ) z
2710: 2b 3d 69 6e 63 72 2c 20 6e 44 69 67 69 74 73 2b +=incr, nDigits+
2720: 2b 2c 20 64 2b 2b 3b 0a 20 20 69 66 28 20 7a 3e +, d++;. if( z>
2730: 3d 7a 45 6e 64 20 29 20 67 6f 74 6f 20 64 6f 5f =zEnd ) goto do_
2740: 61 74 6f 66 5f 63 61 6c 63 3b 0a 0a 20 20 2f 2a atof_calc;.. /*
2750: 20 69 66 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e if decimal poin
2760: 74 20 69 73 20 70 72 65 73 65 6e 74 20 2a 2f 0a t is present */.
2770: 20 20 69 66 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b if( *z=='.' ){
2780: 0a 20 20 20 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 . z+=incr;.
2790: 20 20 2f 2a 20 63 6f 70 79 20 64 69 67 69 74 73 /* copy digits
27a0: 20 66 72 6f 6d 20 61 66 74 65 72 20 64 65 63 69 from after deci
27b0: 6d 61 6c 20 74 6f 20 73 69 67 6e 69 66 69 63 61 mal to significa
27c0: 6e 64 0a 20 20 20 20 2a 2a 20 28 64 65 63 72 65 nd. ** (decre
27d0: 61 73 65 20 65 78 70 6f 6e 65 6e 74 20 62 79 20 ase exponent by
27e0: 64 20 74 6f 20 73 68 69 66 74 20 64 65 63 69 6d d to shift decim
27f0: 61 6c 20 72 69 67 68 74 29 20 2a 2f 0a 20 20 20 al right) */.
2800: 20 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64 20 26 while( z<zEnd &
2810: 26 20 73 71 6c 69 74 65 33 49 73 64 69 67 69 74 & sqlite3Isdigit
2820: 28 2a 7a 29 20 26 26 20 73 3c 28 28 4c 41 52 47 (*z) && s<((LARG
2830: 45 53 54 5f 49 4e 54 36 34 2d 39 29 2f 31 30 29 EST_INT64-9)/10)
2840: 20 29 7b 0a 20 20 20 20 20 20 73 20 3d 20 73 2a ){. s = s*
2850: 31 30 20 2b 20 28 2a 7a 20 2d 20 27 30 27 29 3b 10 + (*z - '0');
2860: 0a 20 20 20 20 20 20 7a 2b 3d 69 6e 63 72 2c 20 . z+=incr,
2870: 6e 44 69 67 69 74 73 2b 2b 2c 20 64 2d 2d 3b 0a nDigits++, d--;.
2880: 20 20 20 20 7d 0a 20 20 20 20 2f 2a 20 73 6b 69 }. /* ski
2890: 70 20 6e 6f 6e 2d 73 69 67 6e 69 66 69 63 61 6e p non-significan
28a0: 74 20 64 69 67 69 74 73 20 2a 2f 0a 20 20 20 20 t digits */.
28b0: 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64 20 26 26 while( z<zEnd &&
28c0: 20 73 71 6c 69 74 65 33 49 73 64 69 67 69 74 28 sqlite3Isdigit(
28d0: 2a 7a 29 20 29 20 7a 2b 3d 69 6e 63 72 2c 20 6e *z) ) z+=incr, n
28e0: 44 69 67 69 74 73 2b 2b 3b 0a 20 20 7d 0a 20 20 Digits++;. }.
28f0: 69 66 28 20 7a 3e 3d 7a 45 6e 64 20 29 20 67 6f if( z>=zEnd ) go
2900: 74 6f 20 64 6f 5f 61 74 6f 66 5f 63 61 6c 63 3b to do_atof_calc;
2910: 0a 0a 20 20 2f 2a 20 69 66 20 65 78 70 6f 6e 65 .. /* if expone
2920: 6e 74 20 69 73 20 70 72 65 73 65 6e 74 20 2a 2f nt is present */
2930: 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 65 27 20 7c . if( *z=='e' |
2940: 7c 20 2a 7a 3d 3d 27 45 27 20 29 7b 0a 20 20 20 | *z=='E' ){.
2950: 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 20 20 65 56 z+=incr;. eV
2960: 61 6c 69 64 20 3d 20 30 3b 0a 20 20 20 20 69 66 alid = 0;. if
2970: 28 20 7a 3e 3d 7a 45 6e 64 20 29 20 67 6f 74 6f ( z>=zEnd ) goto
2980: 20 64 6f 5f 61 74 6f 66 5f 63 61 6c 63 3b 0a 20 do_atof_calc;.
2990: 20 20 20 2f 2a 20 67 65 74 20 73 69 67 6e 20 6f /* get sign o
29a0: 66 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20 f exponent */.
29b0: 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 20 29 7b if( *z=='-' ){
29c0: 0a 20 20 20 20 20 20 65 73 69 67 6e 20 3d 20 2d . esign = -
29d0: 31 3b 0a 20 20 20 20 20 20 7a 2b 3d 69 6e 63 72 1;. z+=incr
29e0: 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 ;. }else if(
29f0: 2a 7a 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 20 *z=='+' ){.
2a00: 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 20 20 7d 0a z+=incr;. }.
2a10: 20 20 20 20 2f 2a 20 63 6f 70 79 20 64 69 67 69 /* copy digi
2a20: 74 73 20 74 6f 20 65 78 70 6f 6e 65 6e 74 20 2a ts to exponent *
2a30: 2f 0a 20 20 20 20 77 68 69 6c 65 28 20 7a 3c 7a /. while( z<z
2a40: 45 6e 64 20 26 26 20 73 71 6c 69 74 65 33 49 73 End && sqlite3Is
2a50: 64 69 67 69 74 28 2a 7a 29 20 29 7b 0a 20 20 20 digit(*z) ){.
2a60: 20 20 20 65 20 3d 20 65 3c 31 30 30 30 30 20 3f e = e<10000 ?
2a70: 20 28 65 2a 31 30 20 2b 20 28 2a 7a 20 2d 20 27 (e*10 + (*z - '
2a80: 30 27 29 29 20 3a 20 31 30 30 30 30 3b 0a 20 20 0')) : 10000;.
2a90: 20 20 20 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 20 z+=incr;.
2aa0: 20 20 20 65 56 61 6c 69 64 20 3d 20 31 3b 0a 20 eValid = 1;.
2ab0: 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a 20 73 }. }.. /* s
2ac0: 6b 69 70 20 74 72 61 69 6c 69 6e 67 20 73 70 61 kip trailing spa
2ad0: 63 65 73 20 2a 2f 0a 20 20 69 66 28 20 6e 44 69 ces */. if( nDi
2ae0: 67 69 74 73 20 26 26 20 65 56 61 6c 69 64 20 29 gits && eValid )
2af0: 7b 0a 20 20 20 20 77 68 69 6c 65 28 20 7a 3c 7a {. while( z<z
2b00: 45 6e 64 20 26 26 20 73 71 6c 69 74 65 33 49 73 End && sqlite3Is
2b10: 73 70 61 63 65 28 2a 7a 29 20 29 20 7a 2b 3d 69 space(*z) ) z+=i
2b20: 6e 63 72 3b 0a 20 20 7d 0a 0a 64 6f 5f 61 74 6f ncr;. }..do_ato
2b30: 66 5f 63 61 6c 63 3a 0a 20 20 2f 2a 20 61 64 6a f_calc:. /* adj
2b40: 75 73 74 20 65 78 70 6f 6e 65 6e 74 20 62 79 20 ust exponent by
2b50: 64 2c 20 61 6e 64 20 75 70 64 61 74 65 20 73 69 d, and update si
2b60: 67 6e 20 2a 2f 0a 20 20 65 20 3d 20 28 65 2a 65 gn */. e = (e*e
2b70: 73 69 67 6e 29 20 2b 20 64 3b 0a 20 20 69 66 28 sign) + d;. if(
2b80: 20 65 3c 30 20 29 20 7b 0a 20 20 20 20 65 73 69 e<0 ) {. esi
2b90: 67 6e 20 3d 20 2d 31 3b 0a 20 20 20 20 65 20 2a gn = -1;. e *
2ba0: 3d 20 2d 31 3b 0a 20 20 7d 20 65 6c 73 65 20 7b = -1;. } else {
2bb0: 0a 20 20 20 20 65 73 69 67 6e 20 3d 20 31 3b 0a . esign = 1;.
2bc0: 20 20 7d 0a 0a 20 20 2f 2a 20 69 66 20 30 20 73 }.. /* if 0 s
2bd0: 69 67 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20 ignificand */.
2be0: 69 66 28 20 21 73 20 29 20 7b 0a 20 20 20 20 2f if( !s ) {. /
2bf0: 2a 20 49 6e 20 74 68 65 20 49 45 45 45 20 37 35 * In the IEEE 75
2c00: 34 20 73 74 61 6e 64 61 72 64 2c 20 7a 65 72 6f 4 standard, zero
2c10: 20 69 73 20 73 69 67 6e 65 64 2e 0a 20 20 20 20 is signed..
2c20: 2a 2a 20 41 64 64 20 74 68 65 20 73 69 67 6e 20 ** Add the sign
2c30: 69 66 20 77 65 27 76 65 20 73 65 65 6e 20 61 74 if we've seen at
2c40: 20 6c 65 61 73 74 20 6f 6e 65 20 64 69 67 69 74 least one digit
2c50: 20 2a 2f 0a 20 20 20 20 72 65 73 75 6c 74 20 3d */. result =
2c60: 20 28 73 69 67 6e 3c 30 20 26 26 20 6e 44 69 67 (sign<0 && nDig
2c70: 69 74 73 29 20 3f 20 2d 28 64 6f 75 62 6c 65 29 its) ? -(double)
2c80: 30 20 3a 20 28 64 6f 75 62 6c 65 29 30 3b 0a 20 0 : (double)0;.
2c90: 20 7d 20 65 6c 73 65 20 7b 0a 20 20 20 20 2f 2a } else {. /*
2ca0: 20 61 74 74 65 6d 70 74 20 74 6f 20 72 65 64 75 attempt to redu
2cb0: 63 65 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 ce exponent */.
2cc0: 20 20 20 69 66 28 20 65 73 69 67 6e 3e 30 20 29 if( esign>0 )
2cd0: 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 73 {. while( s
2ce0: 3c 28 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2f <(LARGEST_INT64/
2cf0: 31 30 29 20 26 26 20 65 3e 30 20 29 20 65 2d 2d 10) && e>0 ) e--
2d00: 2c 73 2a 3d 31 30 3b 0a 20 20 20 20 7d 65 6c 73 ,s*=10;. }els
2d10: 65 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 e{. while(
2d20: 21 28 73 25 31 30 29 20 26 26 20 65 3e 30 20 29 !(s%10) && e>0 )
2d30: 20 65 2d 2d 2c 73 2f 3d 31 30 3b 0a 20 20 20 20 e--,s/=10;.
2d40: 7d 0a 0a 20 20 20 20 2f 2a 20 61 64 6a 75 73 74 }.. /* adjust
2d50: 20 74 68 65 20 73 69 67 6e 20 6f 66 20 73 69 67 the sign of sig
2d60: 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20 20 20 nificand */.
2d70: 73 20 3d 20 73 69 67 6e 3c 30 20 3f 20 2d 73 20 s = sign<0 ? -s
2d80: 3a 20 73 3b 0a 0a 20 20 20 20 2f 2a 20 69 66 20 : s;.. /* if
2d90: 65 78 70 6f 6e 65 6e 74 2c 20 73 63 61 6c 65 20 exponent, scale
2da0: 73 69 67 6e 69 66 69 63 61 6e 64 20 61 73 20 61 significand as a
2db0: 70 70 72 6f 70 72 69 61 74 65 0a 20 20 20 20 2a ppropriate. *
2dc0: 2a 20 61 6e 64 20 73 74 6f 72 65 20 69 6e 20 72 * and store in r
2dd0: 65 73 75 6c 74 2e 20 2a 2f 0a 20 20 20 20 69 66 esult. */. if
2de0: 28 20 65 20 29 7b 0a 20 20 20 20 20 20 4c 4f 4e ( e ){. LON
2df0: 47 44 4f 55 42 4c 45 5f 54 59 50 45 20 73 63 61 GDOUBLE_TYPE sca
2e00: 6c 65 20 3d 20 31 2e 30 3b 0a 20 20 20 20 20 20 le = 1.0;.
2e10: 2f 2a 20 61 74 74 65 6d 70 74 20 74 6f 20 68 61 /* attempt to ha
2e20: 6e 64 6c 65 20 65 78 74 72 65 6d 65 6c 79 20 73 ndle extremely s
2e30: 6d 61 6c 6c 2f 6c 61 72 67 65 20 6e 75 6d 62 65 mall/large numbe
2e40: 72 73 20 62 65 74 74 65 72 20 2a 2f 0a 20 20 20 rs better */.
2e50: 20 20 20 69 66 28 20 65 3e 33 30 37 20 26 26 20 if( e>307 &&
2e60: 65 3c 33 34 32 20 29 7b 0a 20 20 20 20 20 20 20 e<342 ){.
2e70: 20 77 68 69 6c 65 28 20 65 25 33 30 38 20 29 20 while( e%308 )
2e80: 7b 20 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 2b { scale *= 1.0e+
2e90: 31 3b 20 65 20 2d 3d 20 31 3b 20 7d 0a 20 20 20 1; e -= 1; }.
2ea0: 20 20 20 20 20 69 66 28 20 65 73 69 67 6e 3c 30 if( esign<0
2eb0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65 ){. re
2ec0: 73 75 6c 74 20 3d 20 73 20 2f 20 73 63 61 6c 65 sult = s / scale
2ed0: 3b 0a 20 20 20 20 20 20 20 20 20 20 72 65 73 75 ;. resu
2ee0: 6c 74 20 2f 3d 20 31 2e 30 65 2b 33 30 38 3b 0a lt /= 1.0e+308;.
2ef0: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 }else{.
2f00: 20 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 result
2f10: 3d 20 73 20 2a 20 73 63 61 6c 65 3b 0a 20 20 20 = s * scale;.
2f20: 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 2a 3d result *=
2f30: 20 31 2e 30 65 2b 33 30 38 3b 0a 20 20 20 20 20 1.0e+308;.
2f40: 20 20 20 7d 0a 20 20 20 20 20 20 7d 65 6c 73 65 }. }else
2f50: 20 69 66 28 20 65 3e 3d 33 34 32 20 29 7b 0a 20 if( e>=342 ){.
2f60: 20 20 20 20 20 20 20 69 66 28 20 65 73 69 67 6e if( esign
2f70: 3c 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 <0 ){.
2f80: 72 65 73 75 6c 74 20 3d 20 30 2e 30 2a 73 3b 0a result = 0.0*s;.
2f90: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 }else{.
2fa0: 20 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 result
2fb0: 3d 20 31 65 33 30 38 2a 31 65 33 30 38 2a 73 3b = 1e308*1e308*s;
2fc0: 20 20 2f 2a 20 49 6e 66 69 6e 69 74 79 20 2a 2f /* Infinity */
2fd0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 . }.
2fe0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 }else{.
2ff0: 2f 2a 20 31 2e 30 65 2b 32 32 20 69 73 20 74 68 /* 1.0e+22 is th
3000: 65 20 6c 61 72 67 65 73 74 20 70 6f 77 65 72 20 e largest power
3010: 6f 66 20 31 30 20 74 68 61 6e 20 63 61 6e 20 62 of 10 than can b
3020: 65 20 0a 20 20 20 20 20 20 20 20 2a 2a 20 72 65 e . ** re
3030: 70 72 65 73 65 6e 74 65 64 20 65 78 61 63 74 6c presented exactl
3040: 79 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20 77 68 y. */. wh
3050: 69 6c 65 28 20 65 25 32 32 20 29 20 7b 20 73 63 ile( e%22 ) { sc
3060: 61 6c 65 20 2a 3d 20 31 2e 30 65 2b 31 3b 20 65 ale *= 1.0e+1; e
3070: 20 2d 3d 20 31 3b 20 7d 0a 20 20 20 20 20 20 20 -= 1; }.
3080: 20 77 68 69 6c 65 28 20 65 3e 30 20 29 20 7b 20 while( e>0 ) {
3090: 73 63 61 6c 65 20 2a 3d 20 31 2e 30 65 2b 32 32 scale *= 1.0e+22
30a0: 3b 20 65 20 2d 3d 20 32 32 3b 20 7d 0a 20 20 20 ; e -= 22; }.
30b0: 20 20 20 20 20 69 66 28 20 65 73 69 67 6e 3c 30 if( esign<0
30c0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65 ){. re
30d0: 73 75 6c 74 20 3d 20 73 20 2f 20 73 63 61 6c 65 sult = s / scale
30e0: 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b ;. }else{
30f0: 0a 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c . resul
3100: 74 20 3d 20 73 20 2a 20 73 63 61 6c 65 3b 0a 20 t = s * scale;.
3110: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d }. }
3120: 0a 20 20 20 20 7d 20 65 6c 73 65 20 7b 0a 20 20 . } else {.
3130: 20 20 20 20 72 65 73 75 6c 74 20 3d 20 28 64 6f result = (do
3140: 75 62 6c 65 29 73 3b 0a 20 20 20 20 7d 0a 20 20 uble)s;. }.
3150: 7d 0a 0a 20 20 2f 2a 20 73 74 6f 72 65 20 74 68 }.. /* store th
3160: 65 20 72 65 73 75 6c 74 20 2a 2f 0a 20 20 2a 70 e result */. *p
3170: 52 65 73 75 6c 74 20 3d 20 72 65 73 75 6c 74 3b Result = result;
3180: 0a 0a 20 20 2f 2a 20 72 65 74 75 72 6e 20 74 72 .. /* return tr
3190: 75 65 20 69 66 20 6e 75 6d 62 65 72 20 61 6e 64 ue if number and
31a0: 20 6e 6f 20 65 78 74 72 61 20 6e 6f 6e 2d 77 68 no extra non-wh
31b0: 69 74 65 73 70 61 63 65 20 63 68 72 61 63 74 65 itespace chracte
31c0: 72 73 20 61 66 74 65 72 20 2a 2f 0a 20 20 72 65 rs after */. re
31d0: 74 75 72 6e 20 7a 3e 3d 7a 45 6e 64 20 26 26 20 turn z>=zEnd &&
31e0: 6e 44 69 67 69 74 73 3e 30 20 26 26 20 65 56 61 nDigits>0 && eVa
31f0: 6c 69 64 20 26 26 20 6e 6f 6e 4e 75 6d 3d 3d 30 lid && nonNum==0
3200: 3b 0a 23 65 6c 73 65 0a 20 20 72 65 74 75 72 6e ;.#else. return
3210: 20 21 73 71 6c 69 74 65 33 41 74 6f 69 36 34 28 !sqlite3Atoi64(
3220: 7a 2c 20 70 52 65 73 75 6c 74 2c 20 6c 65 6e 67 z, pResult, leng
3230: 74 68 2c 20 65 6e 63 29 3b 0a 23 65 6e 64 69 66 th, enc);.#endif
3240: 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f /* SQLITE_OMIT_
3250: 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 20 2a FLOATING_POINT *
3260: 2f 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 61 /.}../*.** Compa
3270: 72 65 20 74 68 65 20 31 39 2d 63 68 61 72 61 63 re the 19-charac
3280: 74 65 72 20 73 74 72 69 6e 67 20 7a 4e 75 6d 20 ter string zNum
3290: 61 67 61 69 6e 73 74 20 74 68 65 20 74 65 78 74 against the text
32a0: 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 0a representation.
32b0: 2a 2a 20 76 61 6c 75 65 20 32 5e 36 33 3a 20 20 ** value 2^63:
32c0: 39 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 9223372036854775
32d0: 38 30 38 2e 20 20 52 65 74 75 72 6e 20 6e 65 67 808. Return neg
32e0: 61 74 69 76 65 2c 20 7a 65 72 6f 2c 20 6f 72 20 ative, zero, or
32f0: 70 6f 73 69 74 69 76 65 0a 2a 2a 20 69 66 20 7a positive.** if z
3300: 4e 75 6d 20 69 73 20 6c 65 73 73 20 74 68 61 6e Num is less than
3310: 2c 20 65 71 75 61 6c 20 74 6f 2c 20 6f 72 20 67 , equal to, or g
3320: 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 65 20 reater than the
3330: 73 74 72 69 6e 67 2e 0a 2a 2a 20 4e 6f 74 65 20 string..** Note
3340: 74 68 61 74 20 7a 4e 75 6d 20 6d 75 73 74 20 63 that zNum must c
3350: 6f 6e 74 61 69 6e 20 65 78 61 63 74 6c 79 20 31 ontain exactly 1
3360: 39 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a 2a 9 characters..**
3370: 0a 2a 2a 20 55 6e 6c 69 6b 65 20 6d 65 6d 63 6d .** Unlike memcm
3380: 70 28 29 20 74 68 69 73 20 72 6f 75 74 69 6e 65 p() this routine
3390: 20 69 73 20 67 75 61 72 61 6e 74 65 65 64 20 74 is guaranteed t
33a0: 6f 20 72 65 74 75 72 6e 20 74 68 65 20 64 69 66 o return the dif
33b0: 66 65 72 65 6e 63 65 0a 2a 2a 20 69 6e 20 74 68 ference.** in th
33c0: 65 20 76 61 6c 75 65 73 20 6f 66 20 74 68 65 20 e values of the
33d0: 6c 61 73 74 20 64 69 67 69 74 20 69 66 20 74 68 last digit if th
33e0: 65 20 6f 6e 6c 79 20 64 69 66 66 65 72 65 6e 63 e only differenc
33f0: 65 20 69 73 20 69 6e 20 74 68 65 0a 2a 2a 20 6c e is in the.** l
3400: 61 73 74 20 64 69 67 69 74 2e 20 20 53 6f 2c 20 ast digit. So,
3410: 66 6f 72 20 65 78 61 6d 70 6c 65 2c 0a 2a 2a 0a for example,.**.
3420: 2a 2a 20 20 20 20 20 20 63 6f 6d 70 61 72 65 32 ** compare2
3430: 70 6f 77 36 33 28 22 39 32 32 33 33 37 32 30 33 pow63("922337203
3440: 36 38 35 34 37 37 35 38 30 30 22 2c 20 31 29 0a 6854775800", 1).
3450: 2a 2a 0a 2a 2a 20 77 69 6c 6c 20 72 65 74 75 72 **.** will retur
3460: 6e 20 2d 38 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 n -8..*/.static
3470: 69 6e 74 20 63 6f 6d 70 61 72 65 32 70 6f 77 36 int compare2pow6
3480: 33 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 3(const char *zN
3490: 75 6d 2c 20 69 6e 74 20 69 6e 63 72 29 7b 0a 20 um, int incr){.
34a0: 20 69 6e 74 20 63 20 3d 20 30 3b 0a 20 20 69 6e int c = 0;. in
34b0: 74 20 69 3b 0a 20 20 20 20 20 20 20 20 20 20 20 t i;.
34c0: 20 20 20 20 20 20 20 20 20 2f 2a 20 30 31 32 33 /* 0123
34d0: 34 35 36 37 38 39 30 31 32 33 34 35 36 37 20 2a 45678901234567 *
34e0: 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a /. const char *
34f0: 70 6f 77 36 33 20 3d 20 22 39 32 32 33 33 37 32 pow63 = "9223372
3500: 30 33 36 38 35 34 37 37 35 38 30 22 3b 0a 20 20 03685477580";.
3510: 66 6f 72 28 69 3d 30 3b 20 63 3d 3d 30 20 26 26 for(i=0; c==0 &&
3520: 20 69 3c 31 38 3b 20 69 2b 2b 29 7b 0a 20 20 20 i<18; i++){.
3530: 20 63 20 3d 20 28 7a 4e 75 6d 5b 69 2a 69 6e 63 c = (zNum[i*inc
3540: 72 5d 2d 70 6f 77 36 33 5b 69 5d 29 2a 31 30 3b r]-pow63[i])*10;
3550: 0a 20 20 7d 0a 20 20 69 66 28 20 63 3d 3d 30 20 . }. if( c==0
3560: 29 7b 0a 20 20 20 20 63 20 3d 20 7a 4e 75 6d 5b ){. c = zNum[
3570: 31 38 2a 69 6e 63 72 5d 20 2d 20 27 38 27 3b 0a 18*incr] - '8';.
3580: 20 20 20 20 74 65 73 74 63 61 73 65 28 20 63 3d testcase( c=
3590: 3d 28 2d 31 29 20 29 3b 0a 20 20 20 20 74 65 73 =(-1) );. tes
35a0: 74 63 61 73 65 28 20 63 3d 3d 30 20 29 3b 0a 20 tcase( c==0 );.
35b0: 20 20 20 74 65 73 74 63 61 73 65 28 20 63 3d 3d testcase( c==
35c0: 28 2b 31 29 20 29 3b 0a 20 20 7d 0a 20 20 72 65 (+1) );. }. re
35d0: 74 75 72 6e 20 63 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a turn c;.}.../*.*
35e0: 2a 20 43 6f 6e 76 65 72 74 20 7a 4e 75 6d 20 74 * Convert zNum t
35f0: 6f 20 61 20 36 34 2d 62 69 74 20 73 69 67 6e 65 o a 64-bit signe
3600: 64 20 69 6e 74 65 67 65 72 2e 0a 2a 2a 0a 2a 2a d integer..**.**
3610: 20 49 66 20 74 68 65 20 7a 4e 75 6d 20 76 61 6c If the zNum val
3620: 75 65 20 69 73 20 72 65 70 72 65 73 65 6e 74 61 ue is representa
3630: 62 6c 65 20 61 73 20 61 20 36 34 2d 62 69 74 20 ble as a 64-bit
3640: 74 77 6f 73 2d 63 6f 6d 70 6c 65 6d 65 6e 74 20 twos-complement
3650: 0a 2a 2a 20 69 6e 74 65 67 65 72 2c 20 74 68 65 .** integer, the
3660: 6e 20 77 72 69 74 65 20 74 68 61 74 20 76 61 6c n write that val
3670: 75 65 20 69 6e 74 6f 20 2a 70 4e 75 6d 20 61 6e ue into *pNum an
3680: 64 20 72 65 74 75 72 6e 20 30 2e 0a 2a 2a 0a 2a d return 0..**.*
3690: 2a 20 49 66 20 7a 4e 75 6d 20 69 73 20 65 78 61 * If zNum is exa
36a0: 63 74 6c 79 20 39 32 32 33 33 37 32 30 33 36 38 ctly 92233720368
36b0: 35 34 37 37 35 38 30 38 2c 20 72 65 74 75 72 6e 54775808, return
36c0: 20 32 2e 20 20 54 68 69 73 20 73 70 65 63 69 61 2. This specia
36d0: 6c 0a 2a 2a 20 63 61 73 65 20 69 73 20 62 72 6f l.** case is bro
36e0: 6b 65 6e 20 6f 75 74 20 62 65 63 61 75 73 65 20 ken out because
36f0: 77 68 69 6c 65 20 39 32 32 33 33 37 32 30 33 36 while 9223372036
3700: 38 35 34 37 37 35 38 30 38 20 63 61 6e 6e 6f 74 854775808 cannot
3710: 20 62 65 20 61 20 0a 2a 2a 20 73 69 67 6e 65 64 be a .** signed
3720: 20 36 34 2d 62 69 74 20 69 6e 74 65 67 65 72 2c 64-bit integer,
3730: 20 69 74 73 20 6e 65 67 61 74 69 76 65 20 2d 39 its negative -9
3740: 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 2233720368547758
3750: 30 38 20 63 61 6e 20 62 65 2e 0a 2a 2a 0a 2a 2a 08 can be..**.**
3760: 20 49 66 20 7a 4e 75 6d 20 69 73 20 74 6f 6f 20 If zNum is too
3770: 62 69 67 20 66 6f 72 20 61 20 36 34 2d 62 69 74 big for a 64-bit
3780: 20 69 6e 74 65 67 65 72 20 61 6e 64 20 69 73 20 integer and is
3790: 6e 6f 74 0a 2a 2a 20 39 32 32 33 33 37 32 30 33 not.** 922337203
37a0: 36 38 35 34 37 37 35 38 30 38 20 20 6f 72 20 69 6854775808 or i
37b0: 66 20 7a 4e 75 6d 20 63 6f 6e 74 61 69 6e 73 20 f zNum contains
37c0: 61 6e 79 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 20 any non-numeric
37d0: 74 65 78 74 2c 0a 2a 2a 20 74 68 65 6e 20 72 65 text,.** then re
37e0: 74 75 72 6e 20 31 2e 0a 2a 2a 0a 2a 2a 20 6c 65 turn 1..**.** le
37f0: 6e 67 74 68 20 69 73 20 74 68 65 20 6e 75 6d 62 ngth is the numb
3800: 65 72 20 6f 66 20 62 79 74 65 73 20 69 6e 20 74 er of bytes in t
3810: 68 65 20 73 74 72 69 6e 67 20 28 62 79 74 65 73 he string (bytes
3820: 2c 20 6e 6f 74 20 63 68 61 72 61 63 74 65 72 73 , not characters
3830: 29 2e 0a 2a 2a 20 54 68 65 20 73 74 72 69 6e 67 )..** The string
3840: 20 69 73 20 6e 6f 74 20 6e 65 63 65 73 73 61 72 is not necessar
3850: 69 6c 79 20 7a 65 72 6f 2d 74 65 72 6d 69 6e 61 ily zero-termina
3860: 74 65 64 2e 20 20 54 68 65 20 65 6e 63 6f 64 69 ted. The encodi
3870: 6e 67 20 69 73 0a 2a 2a 20 67 69 76 65 6e 20 62 ng is.** given b
3880: 79 20 65 6e 63 2e 0a 2a 2f 0a 69 6e 74 20 73 71 y enc..*/.int sq
3890: 6c 69 74 65 33 41 74 6f 69 36 34 28 63 6f 6e 73 lite3Atoi64(cons
38a0: 74 20 63 68 61 72 20 2a 7a 4e 75 6d 2c 20 69 36 t char *zNum, i6
38b0: 34 20 2a 70 4e 75 6d 2c 20 69 6e 74 20 6c 65 6e 4 *pNum, int len
38c0: 67 74 68 2c 20 75 38 20 65 6e 63 29 7b 0a 20 20 gth, u8 enc){.
38d0: 69 6e 74 20 69 6e 63 72 3b 0a 20 20 75 36 34 20 int incr;. u64
38e0: 75 20 3d 20 30 3b 0a 20 20 69 6e 74 20 6e 65 67 u = 0;. int neg
38f0: 20 3d 20 30 3b 20 2f 2a 20 61 73 73 75 6d 65 20 = 0; /* assume
3900: 70 6f 73 69 74 69 76 65 20 2a 2f 0a 20 20 69 6e positive */. in
3910: 74 20 69 3b 0a 20 20 69 6e 74 20 63 20 3d 20 30 t i;. int c = 0
3920: 3b 0a 20 20 69 6e 74 20 6e 6f 6e 4e 75 6d 20 3d ;. int nonNum =
3930: 20 30 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 0;. const char
3940: 20 2a 7a 53 74 61 72 74 3b 0a 20 20 63 6f 6e 73 *zStart;. cons
3950: 74 20 63 68 61 72 20 2a 7a 45 6e 64 20 3d 20 7a t char *zEnd = z
3960: 4e 75 6d 20 2b 20 6c 65 6e 67 74 68 3b 0a 20 20 Num + length;.
3970: 61 73 73 65 72 74 28 20 65 6e 63 3d 3d 53 51 4c assert( enc==SQL
3980: 49 54 45 5f 55 54 46 38 20 7c 7c 20 65 6e 63 3d ITE_UTF8 || enc=
3990: 3d 53 51 4c 49 54 45 5f 55 54 46 31 36 4c 45 20 =SQLITE_UTF16LE
39a0: 7c 7c 20 65 6e 63 3d 3d 53 51 4c 49 54 45 5f 55 || enc==SQLITE_U
39b0: 54 46 31 36 42 45 20 29 3b 0a 20 20 69 66 28 20 TF16BE );. if(
39c0: 65 6e 63 3d 3d 53 51 4c 49 54 45 5f 55 54 46 38 enc==SQLITE_UTF8
39d0: 20 29 7b 0a 20 20 20 20 69 6e 63 72 20 3d 20 31 ){. incr = 1
39e0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 69 ;. }else{. i
39f0: 6e 63 72 20 3d 20 32 3b 0a 20 20 20 20 61 73 73 ncr = 2;. ass
3a00: 65 72 74 28 20 53 51 4c 49 54 45 5f 55 54 46 31 ert( SQLITE_UTF1
3a10: 36 4c 45 3d 3d 32 20 26 26 20 53 51 4c 49 54 45 6LE==2 && SQLITE
3a20: 5f 55 54 46 31 36 42 45 3d 3d 33 20 29 3b 0a 20 _UTF16BE==3 );.
3a30: 20 20 20 66 6f 72 28 69 3d 33 2d 65 6e 63 3b 20 for(i=3-enc;
3a40: 69 3c 6c 65 6e 67 74 68 20 26 26 20 7a 4e 75 6d i<length && zNum
3a50: 5b 69 5d 3d 3d 30 3b 20 69 2b 3d 32 29 7b 7d 0a [i]==0; i+=2){}.
3a60: 20 20 20 20 6e 6f 6e 4e 75 6d 20 3d 20 69 3c 6c nonNum = i<l
3a70: 65 6e 67 74 68 3b 0a 20 20 20 20 7a 45 6e 64 20 ength;. zEnd
3a80: 3d 20 7a 4e 75 6d 2b 69 2b 65 6e 63 2d 33 3b 0a = zNum+i+enc-3;.
3a90: 20 20 20 20 7a 4e 75 6d 20 2b 3d 20 28 65 6e 63 zNum += (enc
3aa0: 26 31 29 3b 0a 20 20 7d 0a 20 20 77 68 69 6c 65 &1);. }. while
3ab0: 28 20 7a 4e 75 6d 3c 7a 45 6e 64 20 26 26 20 73 ( zNum<zEnd && s
3ac0: 71 6c 69 74 65 33 49 73 73 70 61 63 65 28 2a 7a qlite3Isspace(*z
3ad0: 4e 75 6d 29 20 29 20 7a 4e 75 6d 2b 3d 69 6e 63 Num) ) zNum+=inc
3ae0: 72 3b 0a 20 20 69 66 28 20 7a 4e 75 6d 3c 7a 45 r;. if( zNum<zE
3af0: 6e 64 20 29 7b 0a 20 20 20 20 69 66 28 20 2a 7a nd ){. if( *z
3b00: 4e 75 6d 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20 Num=='-' ){.
3b10: 20 20 6e 65 67 20 3d 20 31 3b 0a 20 20 20 20 20 neg = 1;.
3b20: 20 7a 4e 75 6d 2b 3d 69 6e 63 72 3b 0a 20 20 20 zNum+=incr;.
3b30: 20 7d 65 6c 73 65 20 69 66 28 20 2a 7a 4e 75 6d }else if( *zNum
3b40: 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 20 20 7a =='+' ){. z
3b50: 4e 75 6d 2b 3d 69 6e 63 72 3b 0a 20 20 20 20 7d Num+=incr;. }
3b60: 0a 20 20 7d 0a 20 20 7a 53 74 61 72 74 20 3d 20 . }. zStart =
3b70: 7a 4e 75 6d 3b 0a 20 20 77 68 69 6c 65 28 20 7a zNum;. while( z
3b80: 4e 75 6d 3c 7a 45 6e 64 20 26 26 20 7a 4e 75 6d Num<zEnd && zNum
3b90: 5b 30 5d 3d 3d 27 30 27 20 29 7b 20 7a 4e 75 6d [0]=='0' ){ zNum
3ba0: 2b 3d 69 6e 63 72 3b 20 7d 20 2f 2a 20 53 6b 69 +=incr; } /* Ski
3bb0: 70 20 6c 65 61 64 69 6e 67 20 7a 65 72 6f 73 2e p leading zeros.
3bc0: 20 2a 2f 0a 20 20 66 6f 72 28 69 3d 30 3b 20 26 */. for(i=0; &
3bd0: 7a 4e 75 6d 5b 69 5d 3c 7a 45 6e 64 20 26 26 20 zNum[i]<zEnd &&
3be0: 28 63 3d 7a 4e 75 6d 5b 69 5d 29 3e 3d 27 30 27 (c=zNum[i])>='0'
3bf0: 20 26 26 20 63 3c 3d 27 39 27 3b 20 69 2b 3d 69 && c<='9'; i+=i
3c00: 6e 63 72 29 7b 0a 20 20 20 20 75 20 3d 20 75 2a ncr){. u = u*
3c10: 31 30 20 2b 20 63 20 2d 20 27 30 27 3b 0a 20 20 10 + c - '0';.
3c20: 7d 0a 20 20 69 66 28 20 75 3e 4c 41 52 47 45 53 }. if( u>LARGES
3c30: 54 5f 49 4e 54 36 34 20 29 7b 0a 20 20 20 20 2a T_INT64 ){. *
3c40: 70 4e 75 6d 20 3d 20 6e 65 67 20 3f 20 53 4d 41 pNum = neg ? SMA
3c50: 4c 4c 45 53 54 5f 49 4e 54 36 34 20 3a 20 4c 41 LLEST_INT64 : LA
3c60: 52 47 45 53 54 5f 49 4e 54 36 34 3b 0a 20 20 7d RGEST_INT64;. }
3c70: 65 6c 73 65 20 69 66 28 20 6e 65 67 20 29 7b 0a else if( neg ){.
3c80: 20 20 20 20 2a 70 4e 75 6d 20 3d 20 2d 28 69 36 *pNum = -(i6
3c90: 34 29 75 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 4)u;. }else{.
3ca0: 20 20 2a 70 4e 75 6d 20 3d 20 28 69 36 34 29 75 *pNum = (i64)u
3cb0: 3b 0a 20 20 7d 0a 20 20 74 65 73 74 63 61 73 65 ;. }. testcase
3cc0: 28 20 69 3d 3d 31 38 20 29 3b 0a 20 20 74 65 73 ( i==18 );. tes
3cd0: 74 63 61 73 65 28 20 69 3d 3d 31 39 20 29 3b 0a tcase( i==19 );.
3ce0: 20 20 74 65 73 74 63 61 73 65 28 20 69 3d 3d 32 testcase( i==2
3cf0: 30 20 29 3b 0a 20 20 69 66 28 20 28 63 21 3d 30 0 );. if( (c!=0
3d00: 20 26 26 20 26 7a 4e 75 6d 5b 69 5d 3c 7a 45 6e && &zNum[i]<zEn
3d10: 64 29 20 7c 7c 20 28 69 3d 3d 30 20 26 26 20 7a d) || (i==0 && z
3d20: 53 74 61 72 74 3d 3d 7a 4e 75 6d 29 20 7c 7c 20 Start==zNum) ||
3d30: 69 3e 31 39 2a 69 6e 63 72 20 7c 7c 20 6e 6f 6e i>19*incr || non
3d40: 4e 75 6d 20 29 7b 0a 20 20 20 20 2f 2a 20 7a 4e Num ){. /* zN
3d50: 75 6d 20 69 73 20 65 6d 70 74 79 20 6f 72 20 63 um is empty or c
3d60: 6f 6e 74 61 69 6e 73 20 6e 6f 6e 2d 6e 75 6d 65 ontains non-nume
3d70: 72 69 63 20 74 65 78 74 20 6f 72 20 69 73 20 6c ric text or is l
3d80: 6f 6e 67 65 72 0a 20 20 20 20 2a 2a 20 74 68 61 onger. ** tha
3d90: 6e 20 31 39 20 64 69 67 69 74 73 20 28 74 68 75 n 19 digits (thu
3da0: 73 20 67 75 61 72 61 6e 74 65 65 69 6e 67 20 74 s guaranteeing t
3db0: 68 61 74 20 69 74 20 69 73 20 74 6f 6f 20 6c 61 hat it is too la
3dc0: 72 67 65 29 20 2a 2f 0a 20 20 20 20 72 65 74 75 rge) */. retu
3dd0: 72 6e 20 31 3b 0a 20 20 7d 65 6c 73 65 20 69 66 rn 1;. }else if
3de0: 28 20 69 3c 31 39 2a 69 6e 63 72 20 29 7b 0a 20 ( i<19*incr ){.
3df0: 20 20 20 2f 2a 20 4c 65 73 73 20 74 68 61 6e 20 /* Less than
3e00: 31 39 20 64 69 67 69 74 73 2c 20 73 6f 20 77 65 19 digits, so we
3e10: 20 6b 6e 6f 77 20 74 68 61 74 20 69 74 20 66 69 know that it fi
3e20: 74 73 20 69 6e 20 36 34 20 62 69 74 73 20 2a 2f ts in 64 bits */
3e30: 0a 20 20 20 20 61 73 73 65 72 74 28 20 75 3c 3d . assert( u<=
3e40: 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 20 29 3b LARGEST_INT64 );
3e50: 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 . return 0;.
3e60: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 7a }else{. /* z
3e70: 4e 75 6d 20 69 73 20 61 20 31 39 2d 64 69 67 69 Num is a 19-digi
3e80: 74 20 6e 75 6d 62 65 72 73 2e 20 20 43 6f 6d 70 t numbers. Comp
3e90: 61 72 65 20 69 74 20 61 67 61 69 6e 73 74 20 39 are it against 9
3ea0: 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 2233720368547758
3eb0: 30 38 2e 20 2a 2f 0a 20 20 20 20 63 20 3d 20 63 08. */. c = c
3ec0: 6f 6d 70 61 72 65 32 70 6f 77 36 33 28 7a 4e 75 ompare2pow63(zNu
3ed0: 6d 2c 20 69 6e 63 72 29 3b 0a 20 20 20 20 69 66 m, incr);. if
3ee0: 28 20 63 3c 30 20 29 7b 0a 20 20 20 20 20 20 2f ( c<0 ){. /
3ef0: 2a 20 7a 4e 75 6d 20 69 73 20 6c 65 73 73 20 74 * zNum is less t
3f00: 68 61 6e 20 39 32 32 33 33 37 32 30 33 36 38 35 han 922337203685
3f10: 34 37 37 35 38 30 38 20 73 6f 20 69 74 20 66 69 4775808 so it fi
3f20: 74 73 20 2a 2f 0a 20 20 20 20 20 20 61 73 73 65 ts */. asse
3f30: 72 74 28 20 75 3c 3d 4c 41 52 47 45 53 54 5f 49 rt( u<=LARGEST_I
3f40: 4e 54 36 34 20 29 3b 0a 20 20 20 20 20 20 72 65 NT64 );. re
3f50: 74 75 72 6e 20 30 3b 0a 20 20 20 20 7d 65 6c 73 turn 0;. }els
3f60: 65 20 69 66 28 20 63 3e 30 20 29 7b 0a 20 20 20 e if( c>0 ){.
3f70: 20 20 20 2f 2a 20 7a 4e 75 6d 20 69 73 20 67 72 /* zNum is gr
3f80: 65 61 74 65 72 20 74 68 61 6e 20 39 32 32 33 33 eater than 92233
3f90: 37 32 30 33 36 38 35 34 37 37 35 38 30 38 20 73 72036854775808 s
3fa0: 6f 20 69 74 20 6f 76 65 72 66 6c 6f 77 73 20 2a o it overflows *
3fb0: 2f 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 31 /. return 1
3fc0: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 ;. }else{.
3fd0: 20 20 20 2f 2a 20 7a 4e 75 6d 20 69 73 20 65 78 /* zNum is ex
3fe0: 61 63 74 6c 79 20 39 32 32 33 33 37 32 30 33 36 actly 9223372036
3ff0: 38 35 34 37 37 35 38 30 38 2e 20 20 46 69 74 73 854775808. Fits
4000: 20 69 66 20 6e 65 67 61 74 69 76 65 2e 20 20 54 if negative. T
4010: 68 65 0a 20 20 20 20 20 20 2a 2a 20 73 70 65 63 he. ** spec
4020: 69 61 6c 20 63 61 73 65 20 32 20 6f 76 65 72 66 ial case 2 overf
4030: 6c 6f 77 20 69 66 20 70 6f 73 69 74 69 76 65 20 low if positive
4040: 2a 2f 0a 20 20 20 20 20 20 61 73 73 65 72 74 28 */. assert(
4050: 20 75 2d 31 3d 3d 4c 41 52 47 45 53 54 5f 49 4e u-1==LARGEST_IN
4060: 54 36 34 20 29 3b 0a 20 20 20 20 20 20 72 65 74 T64 );. ret
4070: 75 72 6e 20 6e 65 67 20 3f 20 30 20 3a 20 32 3b urn neg ? 0 : 2;
4080: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a . }. }.}../*
4090: 0a 2a 2a 20 49 66 20 7a 4e 75 6d 20 72 65 70 72 .** If zNum repr
40a0: 65 73 65 6e 74 73 20 61 6e 20 69 6e 74 65 67 65 esents an intege
40b0: 72 20 74 68 61 74 20 77 69 6c 6c 20 66 69 74 20 r that will fit
40c0: 69 6e 20 33 32 2d 62 69 74 73 2c 20 74 68 65 6e in 32-bits, then
40d0: 20 73 65 74 0a 2a 2a 20 2a 70 56 61 6c 75 65 20 set.** *pValue
40e0: 74 6f 20 74 68 61 74 20 69 6e 74 65 67 65 72 20 to that integer
40f0: 61 6e 64 20 72 65 74 75 72 6e 20 74 72 75 65 2e and return true.
4100: 20 20 4f 74 68 65 72 77 69 73 65 20 72 65 74 75 Otherwise retu
4110: 72 6e 20 66 61 6c 73 65 2e 0a 2a 2a 0a 2a 2a 20 rn false..**.**
4120: 41 6e 79 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 20 Any non-numeric
4130: 63 68 61 72 61 63 74 65 72 73 20 74 68 61 74 20 characters that
4140: 66 6f 6c 6c 6f 77 69 6e 67 20 7a 4e 75 6d 20 61 following zNum a
4150: 72 65 20 69 67 6e 6f 72 65 64 2e 0a 2a 2a 20 54 re ignored..** T
4160: 68 69 73 20 69 73 20 64 69 66 66 65 72 65 6e 74 his is different
4170: 20 66 72 6f 6d 20 73 71 6c 69 74 65 33 41 74 6f from sqlite3Ato
4180: 69 36 34 28 29 20 77 68 69 63 68 20 72 65 71 75 i64() which requ
4190: 69 72 65 73 20 74 68 65 0a 2a 2a 20 69 6e 70 75 ires the.** inpu
41a0: 74 20 6e 75 6d 62 65 72 20 74 6f 20 62 65 20 7a t number to be z
41b0: 65 72 6f 2d 74 65 72 6d 69 6e 61 74 65 64 2e 0a ero-terminated..
41c0: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 47 65 */.int sqlite3Ge
41d0: 74 49 6e 74 33 32 28 63 6f 6e 73 74 20 63 68 61 tInt32(const cha
41e0: 72 20 2a 7a 4e 75 6d 2c 20 69 6e 74 20 2a 70 56 r *zNum, int *pV
41f0: 61 6c 75 65 29 7b 0a 20 20 73 71 6c 69 74 65 5f alue){. sqlite_
4200: 69 6e 74 36 34 20 76 20 3d 20 30 3b 0a 20 20 69 int64 v = 0;. i
4210: 6e 74 20 69 2c 20 63 3b 0a 20 20 69 6e 74 20 6e nt i, c;. int n
4220: 65 67 20 3d 20 30 3b 0a 20 20 69 66 28 20 7a 4e eg = 0;. if( zN
4230: 75 6d 5b 30 5d 3d 3d 27 2d 27 20 29 7b 0a 20 20 um[0]=='-' ){.
4240: 20 20 6e 65 67 20 3d 20 31 3b 0a 20 20 20 20 7a neg = 1;. z
4250: 4e 75 6d 2b 2b 3b 0a 20 20 7d 65 6c 73 65 20 69 Num++;. }else i
4260: 66 28 20 7a 4e 75 6d 5b 30 5d 3d 3d 27 2b 27 20 f( zNum[0]=='+'
4270: 29 7b 0a 20 20 20 20 7a 4e 75 6d 2b 2b 3b 0a 20 ){. zNum++;.
4280: 20 7d 0a 20 20 77 68 69 6c 65 28 20 7a 4e 75 6d }. while( zNum
4290: 5b 30 5d 3d 3d 27 30 27 20 29 20 7a 4e 75 6d 2b [0]=='0' ) zNum+
42a0: 2b 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c +;. for(i=0; i<
42b0: 31 31 20 26 26 20 28 63 20 3d 20 7a 4e 75 6d 5b 11 && (c = zNum[
42c0: 69 5d 20 2d 20 27 30 27 29 3e 3d 30 20 26 26 20 i] - '0')>=0 &&
42d0: 63 3c 3d 39 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 c<=9; i++){.
42e0: 76 20 3d 20 76 2a 31 30 20 2b 20 63 3b 0a 20 20 v = v*10 + c;.
42f0: 7d 0a 0a 20 20 2f 2a 20 54 68 65 20 6c 6f 6e 67 }.. /* The long
4300: 65 73 74 20 64 65 63 69 6d 61 6c 20 72 65 70 72 est decimal repr
4310: 65 73 65 6e 74 61 74 69 6f 6e 20 6f 66 20 61 20 esentation of a
4320: 33 32 20 62 69 74 20 69 6e 74 65 67 65 72 20 69 32 bit integer i
4330: 73 20 31 30 20 64 69 67 69 74 73 3a 0a 20 20 2a s 10 digits:. *
4340: 2a 0a 20 20 2a 2a 20 20 20 20 20 20 20 20 20 20 *. **
4350: 20 20 20 31 32 33 34 35 36 37 38 39 30 0a 20 20 1234567890.
4360: 2a 2a 20 20 20 20 20 32 5e 33 31 20 2d 3e 20 32 ** 2^31 -> 2
4370: 31 34 37 34 38 33 36 34 38 0a 20 20 2a 2f 0a 20 147483648. */.
4380: 20 74 65 73 74 63 61 73 65 28 20 69 3d 3d 31 30 testcase( i==10
4390: 20 29 3b 0a 20 20 69 66 28 20 69 3e 31 30 20 29 );. if( i>10 )
43a0: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a {. return 0;.
43b0: 20 20 7d 0a 20 20 74 65 73 74 63 61 73 65 28 20 }. testcase(
43c0: 76 2d 6e 65 67 3d 3d 32 31 34 37 34 38 33 36 34 v-neg==214748364
43d0: 37 20 29 3b 0a 20 20 69 66 28 20 76 2d 6e 65 67 7 );. if( v-neg
43e0: 3e 32 31 34 37 34 38 33 36 34 37 20 29 7b 0a 20 >2147483647 ){.
43f0: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d return 0;. }
4400: 0a 20 20 69 66 28 20 6e 65 67 20 29 7b 0a 20 20 . if( neg ){.
4410: 20 20 76 20 3d 20 2d 76 3b 0a 20 20 7d 0a 20 20 v = -v;. }.
4420: 2a 70 56 61 6c 75 65 20 3d 20 28 69 6e 74 29 76 *pValue = (int)v
4430: 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a ;. return 1;.}.
4440: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 61 20 ./*.** Return a
4450: 33 32 2d 62 69 74 20 69 6e 74 65 67 65 72 20 76 32-bit integer v
4460: 61 6c 75 65 20 65 78 74 72 61 63 74 65 64 20 66 alue extracted f
4470: 72 6f 6d 20 61 20 73 74 72 69 6e 67 2e 20 20 49 rom a string. I
4480: 66 20 74 68 65 0a 2a 2a 20 73 74 72 69 6e 67 20 f the.** string
4490: 69 73 20 6e 6f 74 20 61 6e 20 69 6e 74 65 67 65 is not an intege
44a0: 72 2c 20 6a 75 73 74 20 72 65 74 75 72 6e 20 30 r, just return 0
44b0: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 ..*/.int sqlite3
44c0: 41 74 6f 69 28 63 6f 6e 73 74 20 63 68 61 72 20 Atoi(const char
44d0: 2a 7a 29 7b 0a 20 20 69 6e 74 20 78 20 3d 20 30 *z){. int x = 0
44e0: 3b 0a 20 20 69 66 28 20 7a 20 29 20 73 71 6c 69 ;. if( z ) sqli
44f0: 74 65 33 47 65 74 49 6e 74 33 32 28 7a 2c 20 26 te3GetInt32(z, &
4500: 78 29 3b 0a 20 20 72 65 74 75 72 6e 20 78 3b 0a x);. return x;.
4510: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 76 61 72 }../*.** The var
4520: 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69 6e 74 iable-length int
4530: 65 67 65 72 20 65 6e 63 6f 64 69 6e 67 20 69 73 eger encoding is
4540: 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 2a 2a 0a as follows:.**.
4550: 2a 2a 20 4b 45 59 3a 0a 2a 2a 20 20 20 20 20 20 ** KEY:.**
4560: 20 20 20 41 20 3d 20 30 78 78 78 78 78 78 78 20 A = 0xxxxxxx
4570: 20 20 20 37 20 62 69 74 73 20 6f 66 20 64 61 74 7 bits of dat
4580: 61 20 61 6e 64 20 6f 6e 65 20 66 6c 61 67 20 62 a and one flag b
4590: 69 74 0a 2a 2a 20 20 20 20 20 20 20 20 20 42 20 it.** B
45a0: 3d 20 31 78 78 78 78 78 78 78 20 20 20 20 37 20 = 1xxxxxxx 7
45b0: 62 69 74 73 20 6f 66 20 64 61 74 61 20 61 6e 64 bits of data and
45c0: 20 6f 6e 65 20 66 6c 61 67 20 62 69 74 0a 2a 2a one flag bit.**
45d0: 20 20 20 20 20 20 20 20 20 43 20 3d 20 78 78 78 C = xxx
45e0: 78 78 78 78 78 20 20 20 20 38 20 62 69 74 73 20 xxxxx 8 bits
45f0: 6f 66 20 64 61 74 61 0a 2a 2a 0a 2a 2a 20 20 37 of data.**.** 7
4600: 20 62 69 74 73 20 2d 20 41 0a 2a 2a 20 31 34 20 bits - A.** 14
4610: 62 69 74 73 20 2d 20 42 41 0a 2a 2a 20 32 31 20 bits - BA.** 21
4620: 62 69 74 73 20 2d 20 42 42 41 0a 2a 2a 20 32 38 bits - BBA.** 28
4630: 20 62 69 74 73 20 2d 20 42 42 42 41 0a 2a 2a 20 bits - BBBA.**
4640: 33 35 20 62 69 74 73 20 2d 20 42 42 42 42 41 0a 35 bits - BBBBA.
4650: 2a 2a 20 34 32 20 62 69 74 73 20 2d 20 42 42 42 ** 42 bits - BBB
4660: 42 42 41 0a 2a 2a 20 34 39 20 62 69 74 73 20 2d BBA.** 49 bits -
4670: 20 42 42 42 42 42 42 41 0a 2a 2a 20 35 36 20 62 BBBBBBA.** 56 b
4680: 69 74 73 20 2d 20 42 42 42 42 42 42 42 41 0a 2a its - BBBBBBBA.*
4690: 2a 20 36 34 20 62 69 74 73 20 2d 20 42 42 42 42 * 64 bits - BBBB
46a0: 42 42 42 42 43 0a 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 BBBBC.*/../*.**
46b0: 57 72 69 74 65 20 61 20 36 34 2d 62 69 74 20 76 Write a 64-bit v
46c0: 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69 ariable-length i
46d0: 6e 74 65 67 65 72 20 74 6f 20 6d 65 6d 6f 72 79 nteger to memory
46e0: 20 73 74 61 72 74 69 6e 67 20 61 74 20 70 5b 30 starting at p[0
46f0: 5d 2e 0a 2a 2a 20 54 68 65 20 6c 65 6e 67 74 68 ]..** The length
4700: 20 6f 66 20 64 61 74 61 20 77 72 69 74 65 20 77 of data write w
4710: 69 6c 6c 20 62 65 20 62 65 74 77 65 65 6e 20 31 ill be between 1
4720: 20 61 6e 64 20 39 20 62 79 74 65 73 2e 20 20 54 and 9 bytes. T
4730: 68 65 20 6e 75 6d 62 65 72 0a 2a 2a 20 6f 66 20 he number.** of
4740: 62 79 74 65 73 20 77 72 69 74 74 65 6e 20 69 73 bytes written is
4750: 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a 2a 2a returned..**.**
4760: 20 41 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 A variable-leng
4770: 74 68 20 69 6e 74 65 67 65 72 20 63 6f 6e 73 69 th integer consi
4780: 73 74 73 20 6f 66 20 74 68 65 20 6c 6f 77 65 72 sts of the lower
4790: 20 37 20 62 69 74 73 20 6f 66 20 65 61 63 68 20 7 bits of each
47a0: 62 79 74 65 0a 2a 2a 20 66 6f 72 20 61 6c 6c 20 byte.** for all
47b0: 62 79 74 65 73 20 74 68 61 74 20 68 61 76 65 20 bytes that have
47c0: 74 68 65 20 38 74 68 20 62 69 74 20 73 65 74 20 the 8th bit set
47d0: 61 6e 64 20 6f 6e 65 20 62 79 74 65 20 77 69 74 and one byte wit
47e0: 68 20 74 68 65 20 38 74 68 0a 2a 2a 20 62 69 74 h the 8th.** bit
47f0: 20 63 6c 65 61 72 2e 20 20 45 78 63 65 70 74 2c clear. Except,
4800: 20 69 66 20 77 65 20 67 65 74 20 74 6f 20 74 68 if we get to th
4810: 65 20 39 74 68 20 62 79 74 65 2c 20 69 74 20 73 e 9th byte, it s
4820: 74 6f 72 65 73 20 74 68 65 20 66 75 6c 6c 0a 2a tores the full.*
4830: 2a 20 38 20 62 69 74 73 20 61 6e 64 20 69 73 20 * 8 bits and is
4840: 74 68 65 20 6c 61 73 74 20 62 79 74 65 2e 0a 2a the last byte..*
4850: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 50 75 74 /.int sqlite3Put
4860: 56 61 72 69 6e 74 28 75 6e 73 69 67 6e 65 64 20 Varint(unsigned
4870: 63 68 61 72 20 2a 70 2c 20 75 36 34 20 76 29 7b char *p, u64 v){
4880: 0a 20 20 69 6e 74 20 69 2c 20 6a 2c 20 6e 3b 0a . int i, j, n;.
4890: 20 20 75 38 20 62 75 66 5b 31 30 5d 3b 0a 20 20 u8 buf[10];.
48a0: 69 66 28 20 76 20 26 20 28 28 28 75 36 34 29 30 if( v & (((u64)0
48b0: 78 66 66 30 30 30 30 30 30 29 3c 3c 33 32 29 20 xff000000)<<32)
48c0: 29 7b 0a 20 20 20 20 70 5b 38 5d 20 3d 20 28 75 ){. p[8] = (u
48d0: 38 29 76 3b 0a 20 20 20 20 76 20 3e 3e 3d 20 38 8)v;. v >>= 8
48e0: 3b 0a 20 20 20 20 66 6f 72 28 69 3d 37 3b 20 69 ;. for(i=7; i
48f0: 3e 3d 30 3b 20 69 2d 2d 29 7b 0a 20 20 20 20 20 >=0; i--){.
4900: 20 70 5b 69 5d 20 3d 20 28 75 38 29 28 28 76 20 p[i] = (u8)((v
4910: 26 20 30 78 37 66 29 20 7c 20 30 78 38 30 29 3b & 0x7f) | 0x80);
4920: 0a 20 20 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a . v >>= 7;.
4930: 20 20 20 20 7d 0a 20 20 20 20 72 65 74 75 72 6e }. return
4940: 20 39 3b 0a 20 20 7d 20 20 20 20 0a 20 20 6e 20 9;. } . n
4950: 3d 20 30 3b 0a 20 20 64 6f 7b 0a 20 20 20 20 62 = 0;. do{. b
4960: 75 66 5b 6e 2b 2b 5d 20 3d 20 28 75 38 29 28 28 uf[n++] = (u8)((
4970: 76 20 26 20 30 78 37 66 29 20 7c 20 30 78 38 30 v & 0x7f) | 0x80
4980: 29 3b 0a 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a );. v >>= 7;.
4990: 20 20 7d 77 68 69 6c 65 28 20 76 21 3d 30 20 29 }while( v!=0 )
49a0: 3b 0a 20 20 62 75 66 5b 30 5d 20 26 3d 20 30 78 ;. buf[0] &= 0x
49b0: 37 66 3b 0a 20 20 61 73 73 65 72 74 28 20 6e 3c 7f;. assert( n<
49c0: 3d 39 20 29 3b 0a 20 20 66 6f 72 28 69 3d 30 2c =9 );. for(i=0,
49d0: 20 6a 3d 6e 2d 31 3b 20 6a 3e 3d 30 3b 20 6a 2d j=n-1; j>=0; j-
49e0: 2d 2c 20 69 2b 2b 29 7b 0a 20 20 20 20 70 5b 69 -, i++){. p[i
49f0: 5d 20 3d 20 62 75 66 5b 6a 5d 3b 0a 20 20 7d 0a ] = buf[j];. }.
4a00: 20 20 72 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f return n;.}../
4a10: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e *.** This routin
4a20: 65 20 69 73 20 61 20 66 61 73 74 65 72 20 76 65 e is a faster ve
4a30: 72 73 69 6f 6e 20 6f 66 20 73 71 6c 69 74 65 33 rsion of sqlite3
4a40: 50 75 74 56 61 72 69 6e 74 28 29 20 74 68 61 74 PutVarint() that
4a50: 20 6f 6e 6c 79 0a 2a 2a 20 77 6f 72 6b 73 20 66 only.** works f
4a60: 6f 72 20 33 32 2d 62 69 74 20 70 6f 73 69 74 69 or 32-bit positi
4a70: 76 65 20 69 6e 74 65 67 65 72 73 20 61 6e 64 20 ve integers and
4a80: 77 68 69 63 68 20 69 73 20 6f 70 74 69 6d 69 7a which is optimiz
4a90: 65 64 20 66 6f 72 0a 2a 2a 20 74 68 65 20 63 6f ed for.** the co
4aa0: 6d 6d 6f 6e 20 63 61 73 65 20 6f 66 20 73 6d 61 mmon case of sma
4ab0: 6c 6c 20 69 6e 74 65 67 65 72 73 2e 20 20 41 20 ll integers. A
4ac0: 4d 41 43 52 4f 20 76 65 72 73 69 6f 6e 2c 20 70 MACRO version, p
4ad0: 75 74 56 61 72 69 6e 74 33 32 2c 0a 2a 2a 20 69 utVarint32,.** i
4ae0: 73 20 70 72 6f 76 69 64 65 64 20 77 68 69 63 68 s provided which
4af0: 20 69 6e 6c 69 6e 65 73 20 74 68 65 20 73 69 6e inlines the sin
4b00: 67 6c 65 2d 62 79 74 65 20 63 61 73 65 2e 20 20 gle-byte case.
4b10: 41 6c 6c 20 63 6f 64 65 20 73 68 6f 75 6c 64 20 All code should
4b20: 75 73 65 0a 2a 2a 20 74 68 65 20 4d 41 43 52 4f use.** the MACRO
4b30: 20 76 65 72 73 69 6f 6e 20 61 73 20 74 68 69 73 version as this
4b40: 20 66 75 6e 63 74 69 6f 6e 20 61 73 73 75 6d 65 function assume
4b50: 73 20 74 68 65 20 73 69 6e 67 6c 65 2d 62 79 74 s the single-byt
4b60: 65 20 63 61 73 65 20 68 61 73 0a 2a 2a 20 61 6c e case has.** al
4b70: 72 65 61 64 79 20 62 65 65 6e 20 68 61 6e 64 6c ready been handl
4b80: 65 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 ed..*/.int sqlit
4b90: 65 33 50 75 74 56 61 72 69 6e 74 33 32 28 75 6e e3PutVarint32(un
4ba0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 signed char *p,
4bb0: 75 33 32 20 76 29 7b 0a 23 69 66 6e 64 65 66 20 u32 v){.#ifndef
4bc0: 70 75 74 56 61 72 69 6e 74 33 32 0a 20 20 69 66 putVarint32. if
4bd0: 28 20 28 76 20 26 20 7e 30 78 37 66 29 3d 3d 30 ( (v & ~0x7f)==0
4be0: 20 29 7b 0a 20 20 20 20 70 5b 30 5d 20 3d 20 76 ){. p[0] = v
4bf0: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a ;. return 1;.
4c00: 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 }.#endif. if(
4c10: 20 28 76 20 26 20 7e 30 78 33 66 66 66 29 3d 3d (v & ~0x3fff)==
4c20: 30 20 29 7b 0a 20 20 20 20 70 5b 30 5d 20 3d 20 0 ){. p[0] =
4c30: 28 75 38 29 28 28 76 3e 3e 37 29 20 7c 20 30 78 (u8)((v>>7) | 0x
4c40: 38 30 29 3b 0a 20 20 20 20 70 5b 31 5d 20 3d 20 80);. p[1] =
4c50: 28 75 38 29 28 76 20 26 20 30 78 37 66 29 3b 0a (u8)(v & 0x7f);.
4c60: 20 20 20 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 return 2;.
4c70: 7d 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 }. return sqlit
4c80: 65 33 50 75 74 56 61 72 69 6e 74 28 70 2c 20 76 e3PutVarint(p, v
4c90: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 42 69 74 6d );.}../*.** Bitm
4ca0: 61 73 6b 73 20 75 73 65 64 20 62 79 20 73 71 6c asks used by sql
4cb0: 69 74 65 33 47 65 74 56 61 72 69 6e 74 28 29 2e ite3GetVarint().
4cc0: 20 20 54 68 65 73 65 20 70 72 65 63 6f 6d 70 75 These precompu
4cd0: 74 65 64 20 63 6f 6e 73 74 61 6e 74 73 0a 2a 2a ted constants.**
4ce0: 20 61 72 65 20 64 65 66 69 6e 65 64 20 68 65 72 are defined her
4cf0: 65 20 72 61 74 68 65 72 20 74 68 61 6e 20 73 69 e rather than si
4d00: 6d 70 6c 79 20 70 75 74 74 69 6e 67 20 74 68 65 mply putting the
4d10: 20 63 6f 6e 73 74 61 6e 74 20 65 78 70 72 65 73 constant expres
4d20: 73 69 6f 6e 73 0a 2a 2a 20 69 6e 6c 69 6e 65 20 sions.** inline
4d30: 69 6e 20 6f 72 64 65 72 20 74 6f 20 77 6f 72 6b in order to work
4d40: 20 61 72 6f 75 6e 64 20 62 75 67 73 20 69 6e 20 around bugs in
4d50: 74 68 65 20 52 56 54 20 63 6f 6d 70 69 6c 65 72 the RVT compiler
4d60: 2e 0a 2a 2a 0a 2a 2a 20 53 4c 4f 54 5f 32 5f 30 ..**.** SLOT_2_0
4d70: 20 20 20 20 20 41 20 6d 61 73 6b 20 66 6f 72 20 A mask for
4d80: 20 28 30 78 37 66 3c 3c 31 34 29 20 7c 20 30 78 (0x7f<<14) | 0x
4d90: 37 66 0a 2a 2a 0a 2a 2a 20 53 4c 4f 54 5f 34 5f 7f.**.** SLOT_4_
4da0: 32 5f 30 20 20 20 41 20 6d 61 73 6b 20 66 6f 72 2_0 A mask for
4db0: 20 20 28 30 78 37 66 3c 3c 32 38 29 20 7c 20 53 (0x7f<<28) | S
4dc0: 4c 4f 54 5f 32 5f 30 0a 2a 2f 0a 23 64 65 66 69 LOT_2_0.*/.#defi
4dd0: 6e 65 20 53 4c 4f 54 5f 32 5f 30 20 20 20 20 20 ne SLOT_2_0
4de0: 30 78 30 30 31 66 63 30 37 66 0a 23 64 65 66 69 0x001fc07f.#defi
4df0: 6e 65 20 53 4c 4f 54 5f 34 5f 32 5f 30 20 20 20 ne SLOT_4_2_0
4e00: 30 78 66 30 31 66 63 30 37 66 0a 0a 0a 2f 2a 0a 0xf01fc07f.../*.
4e10: 2a 2a 20 52 65 61 64 20 61 20 36 34 2d 62 69 74 ** Read a 64-bit
4e20: 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 variable-length
4e30: 20 69 6e 74 65 67 65 72 20 66 72 6f 6d 20 6d 65 integer from me
4e40: 6d 6f 72 79 20 73 74 61 72 74 69 6e 67 20 61 74 mory starting at
4e50: 20 70 5b 30 5d 2e 0a 2a 2a 20 52 65 74 75 72 6e p[0]..** Return
4e60: 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 the number of b
4e70: 79 74 65 73 20 72 65 61 64 2e 20 20 54 68 65 20 ytes read. The
4e80: 76 61 6c 75 65 20 69 73 20 73 74 6f 72 65 64 20 value is stored
4e90: 69 6e 20 2a 76 2e 0a 2a 2f 0a 75 38 20 73 71 6c in *v..*/.u8 sql
4ea0: 69 74 65 33 47 65 74 56 61 72 69 6e 74 28 63 6f ite3GetVarint(co
4eb0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 nst unsigned cha
4ec0: 72 20 2a 70 2c 20 75 36 34 20 2a 76 29 7b 0a 20 r *p, u64 *v){.
4ed0: 20 75 33 32 20 61 2c 62 2c 73 3b 0a 0a 20 20 61 u32 a,b,s;.. a
4ee0: 20 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 = *p;. /* a: p
4ef0: 30 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 0 (unmasked) */.
4f00: 20 20 69 66 20 28 21 28 61 26 30 78 38 30 29 29 if (!(a&0x80))
4f10: 0a 20 20 7b 0a 20 20 20 20 2a 76 20 3d 20 61 3b . {. *v = a;
4f20: 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 . return 1;.
4f30: 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d }.. p++;. b =
4f40: 20 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 20 *p;. /* b: p1
4f50: 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 (unmasked) */.
4f60: 69 66 20 28 21 28 62 26 30 78 38 30 29 29 0a 20 if (!(b&0x80)).
4f70: 20 7b 0a 20 20 20 20 61 20 26 3d 20 30 78 37 66 {. a &= 0x7f
4f80: 3b 0a 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a ;. a = a<<7;.
4f90: 20 20 20 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 a |= b;.
4fa0: 2a 76 20 3d 20 61 3b 0a 20 20 20 20 72 65 74 75 *v = a;. retu
4fb0: 72 6e 20 32 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 rn 2;. }.. /*
4fc0: 56 65 72 69 66 79 20 74 68 61 74 20 63 6f 6e 73 Verify that cons
4fd0: 74 61 6e 74 73 20 61 72 65 20 70 72 65 63 6f 6d tants are precom
4fe0: 70 75 74 65 64 20 63 6f 72 72 65 63 74 6c 79 20 puted correctly
4ff0: 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 53 4c 4f */. assert( SLO
5000: 54 5f 32 5f 30 20 3d 3d 20 28 28 30 78 37 66 3c T_2_0 == ((0x7f<
5010: 3c 31 34 29 20 7c 20 28 30 78 37 66 29 29 20 29 <14) | (0x7f)) )
5020: 3b 0a 20 20 61 73 73 65 72 74 28 20 53 4c 4f 54 ;. assert( SLOT
5030: 5f 34 5f 32 5f 30 20 3d 3d 20 28 28 30 78 66 55 _4_2_0 == ((0xfU
5040: 3c 3c 32 38 29 20 7c 20 28 30 78 37 66 3c 3c 31 <<28) | (0x7f<<1
5050: 34 29 20 7c 20 28 30 78 37 66 29 29 20 29 3b 0a 4) | (0x7f)) );.
5060: 0a 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c . p++;. a = a<
5070: 3c 31 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a <14;. a |= *p;.
5080: 20 20 2f 2a 20 61 3a 20 70 30 3c 3c 31 34 20 7c /* a: p0<<14 |
5090: 20 70 32 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a p2 (unmasked) *
50a0: 2f 0a 20 20 69 66 20 28 21 28 61 26 30 78 38 30 /. if (!(a&0x80
50b0: 29 29 0a 20 20 7b 0a 20 20 20 20 61 20 26 3d 20 )). {. a &=
50c0: 53 4c 4f 54 5f 32 5f 30 3b 0a 20 20 20 20 62 20 SLOT_2_0;. b
50d0: 26 3d 20 30 78 37 66 3b 0a 20 20 20 20 62 20 3d &= 0x7f;. b =
50e0: 20 62 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 b<<7;. a |=
50f0: 62 3b 0a 20 20 20 20 2a 76 20 3d 20 61 3b 0a 20 b;. *v = a;.
5100: 20 20 20 72 65 74 75 72 6e 20 33 3b 0a 20 20 7d return 3;. }
5110: 0a 0a 20 20 2f 2a 20 43 53 45 31 20 66 72 6f 6d .. /* CSE1 from
5120: 20 62 65 6c 6f 77 20 2a 2f 0a 20 20 61 20 26 3d below */. a &=
5130: 20 53 4c 4f 54 5f 32 5f 30 3b 0a 20 20 70 2b 2b SLOT_2_0;. p++
5140: 3b 0a 20 20 62 20 3d 20 62 3c 3c 31 34 3b 0a 20 ;. b = b<<14;.
5150: 20 62 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 62 b |= *p;. /* b
5160: 3a 20 70 31 3c 3c 31 34 20 7c 20 70 33 20 28 75 : p1<<14 | p3 (u
5170: 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 nmasked) */. if
5180: 20 28 21 28 62 26 30 78 38 30 29 29 0a 20 20 7b (!(b&0x80)). {
5190: 0a 20 20 20 20 62 20 26 3d 20 53 4c 4f 54 5f 32 . b &= SLOT_2
51a0: 5f 30 3b 0a 20 20 20 20 2f 2a 20 6d 6f 76 65 64 _0;. /* moved
51b0: 20 43 53 45 31 20 75 70 20 2a 2f 0a 20 20 20 20 CSE1 up */.
51c0: 2f 2a 20 61 20 26 3d 20 28 30 78 37 66 3c 3c 31 /* a &= (0x7f<<1
51d0: 34 29 7c 28 30 78 37 66 29 3b 20 2a 2f 0a 20 20 4)|(0x7f); */.
51e0: 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 20 a = a<<7;.
51f0: 61 20 7c 3d 20 62 3b 0a 20 20 20 20 2a 76 20 3d a |= b;. *v =
5200: 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 34 a;. return 4
5210: 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 61 3a 20 70 ;. }.. /* a: p
5220: 30 3c 3c 31 34 20 7c 20 70 32 20 28 6d 61 73 6b 0<<14 | p2 (mask
5230: 65 64 29 20 2a 2f 0a 20 20 2f 2a 20 62 3a 20 70 ed) */. /* b: p
5240: 31 3c 3c 31 34 20 7c 20 70 33 20 28 75 6e 6d 61 1<<14 | p3 (unma
5250: 73 6b 65 64 29 20 2a 2f 0a 20 20 2f 2a 20 31 3a sked) */. /* 1:
5260: 73 61 76 65 20 6f 66 66 20 70 30 3c 3c 32 31 20 save off p0<<21
5270: 7c 20 70 31 3c 3c 31 34 20 7c 20 70 32 3c 3c 37 | p1<<14 | p2<<7
5280: 20 7c 20 70 33 20 28 6d 61 73 6b 65 64 29 20 2a | p3 (masked) *
5290: 2f 0a 20 20 2f 2a 20 6d 6f 76 65 64 20 43 53 45 /. /* moved CSE
52a0: 31 20 75 70 20 2a 2f 0a 20 20 2f 2a 20 61 20 26 1 up */. /* a &
52b0: 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 = (0x7f<<14)|(0x
52c0: 37 66 29 3b 20 2a 2f 0a 20 20 62 20 26 3d 20 53 7f); */. b &= S
52d0: 4c 4f 54 5f 32 5f 30 3b 0a 20 20 73 20 3d 20 61 LOT_2_0;. s = a
52e0: 3b 0a 20 20 2f 2a 20 73 3a 20 70 30 3c 3c 31 34 ;. /* s: p0<<14
52f0: 20 7c 20 70 32 20 28 6d 61 73 6b 65 64 29 20 2a | p2 (masked) *
5300: 2f 0a 0a 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 /.. p++;. a =
5310: 61 3c 3c 31 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 a<<14;. a |= *p
5320: 3b 0a 20 20 2f 2a 20 61 3a 20 70 30 3c 3c 32 38 ;. /* a: p0<<28
5330: 20 7c 20 70 32 3c 3c 31 34 20 7c 20 70 34 20 28 | p2<<14 | p4 (
5340: 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 unmasked) */. i
5350: 66 20 28 21 28 61 26 30 78 38 30 29 29 0a 20 20 f (!(a&0x80)).
5360: 7b 0a 20 20 20 20 2f 2a 20 77 65 20 63 61 6e 20 {. /* we can
5370: 73 6b 69 70 20 74 68 65 73 65 20 63 61 75 73 65 skip these cause
5380: 20 74 68 65 79 20 77 65 72 65 20 28 65 66 66 65 they were (effe
5390: 63 74 69 76 65 6c 79 29 20 64 6f 6e 65 20 61 62 ctively) done ab
53a0: 6f 76 65 20 69 6e 20 63 61 6c 63 27 69 6e 67 20 ove in calc'ing
53b0: 73 20 2a 2f 0a 20 20 20 20 2f 2a 20 61 20 26 3d s */. /* a &=
53c0: 20 28 30 78 37 66 3c 3c 32 38 29 7c 28 30 78 37 (0x7f<<28)|(0x7
53d0: 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 20 2a f<<14)|(0x7f); *
53e0: 2f 0a 20 20 20 20 2f 2a 20 62 20 26 3d 20 28 30 /. /* b &= (0
53f0: 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b x7f<<14)|(0x7f);
5400: 20 2a 2f 0a 20 20 20 20 62 20 3d 20 62 3c 3c 37 */. b = b<<7
5410: 3b 0a 20 20 20 20 61 20 7c 3d 20 62 3b 0a 20 20 ;. a |= b;.
5420: 20 20 73 20 3d 20 73 3e 3e 31 38 3b 0a 20 20 20 s = s>>18;.
5430: 20 2a 76 20 3d 20 28 28 75 36 34 29 73 29 3c 3c *v = ((u64)s)<<
5440: 33 32 20 7c 20 61 3b 0a 20 20 20 20 72 65 74 75 32 | a;. retu
5450: 72 6e 20 35 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 rn 5;. }.. /*
5460: 32 3a 73 61 76 65 20 6f 66 66 20 70 30 3c 3c 32 2:save off p0<<2
5470: 31 20 7c 20 70 31 3c 3c 31 34 20 7c 20 70 32 3c 1 | p1<<14 | p2<
5480: 3c 37 20 7c 20 70 33 20 28 6d 61 73 6b 65 64 29 <7 | p3 (masked)
5490: 20 2a 2f 0a 20 20 73 20 3d 20 73 3c 3c 37 3b 0a */. s = s<<7;.
54a0: 20 20 73 20 7c 3d 20 62 3b 0a 20 20 2f 2a 20 73 s |= b;. /* s
54b0: 3a 20 70 30 3c 3c 32 31 20 7c 20 70 31 3c 3c 31 : p0<<21 | p1<<1
54c0: 34 20 7c 20 70 32 3c 3c 37 20 7c 20 70 33 20 28 4 | p2<<7 | p3 (
54d0: 6d 61 73 6b 65 64 29 20 2a 2f 0a 0a 20 20 70 2b masked) */.. p+
54e0: 2b 3b 0a 20 20 62 20 3d 20 62 3c 3c 31 34 3b 0a +;. b = b<<14;.
54f0: 20 20 62 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 b |= *p;. /*
5500: 62 3a 20 70 31 3c 3c 32 38 20 7c 20 70 33 3c 3c b: p1<<28 | p3<<
5510: 31 34 20 7c 20 70 35 20 28 75 6e 6d 61 73 6b 65 14 | p5 (unmaske
5520: 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 62 26 d) */. if (!(b&
5530: 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 2f 0x80)). {. /
5540: 2a 20 77 65 20 63 61 6e 20 73 6b 69 70 20 74 68 * we can skip th
5550: 69 73 20 63 61 75 73 65 20 69 74 20 77 61 73 20 is cause it was
5560: 28 65 66 66 65 63 74 69 76 65 6c 79 29 20 64 6f (effectively) do
5570: 6e 65 20 61 62 6f 76 65 20 69 6e 20 63 61 6c 63 ne above in calc
5580: 27 69 6e 67 20 73 20 2a 2f 0a 20 20 20 20 2f 2a 'ing s */. /*
5590: 20 62 20 26 3d 20 28 30 78 37 66 3c 3c 32 38 29 b &= (0x7f<<28)
55a0: 7c 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 |(0x7f<<14)|(0x7
55b0: 66 29 3b 20 2a 2f 0a 20 20 20 20 61 20 26 3d 20 f); */. a &=
55c0: 53 4c 4f 54 5f 32 5f 30 3b 0a 20 20 20 20 61 20 SLOT_2_0;. a
55d0: 3d 20 61 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d = a<<7;. a |=
55e0: 20 62 3b 0a 20 20 20 20 73 20 3d 20 73 3e 3e 31 b;. s = s>>1
55f0: 38 3b 0a 20 20 20 20 2a 76 20 3d 20 28 28 75 36 8;. *v = ((u6
5600: 34 29 73 29 3c 3c 33 32 20 7c 20 61 3b 0a 20 20 4)s)<<32 | a;.
5610: 20 20 72 65 74 75 72 6e 20 36 3b 0a 20 20 7d 0a return 6;. }.
5620: 0a 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c . p++;. a = a<
5630: 3c 31 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a <14;. a |= *p;.
5640: 20 20 2f 2a 20 61 3a 20 70 32 3c 3c 32 38 20 7c /* a: p2<<28 |
5650: 20 70 34 3c 3c 31 34 20 7c 20 70 36 20 28 75 6e p4<<14 | p6 (un
5660: 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 masked) */. if
5670: 28 21 28 61 26 30 78 38 30 29 29 0a 20 20 7b 0a (!(a&0x80)). {.
5680: 20 20 20 20 61 20 26 3d 20 53 4c 4f 54 5f 34 5f a &= SLOT_4_
5690: 32 5f 30 3b 0a 20 20 20 20 62 20 26 3d 20 53 4c 2_0;. b &= SL
56a0: 4f 54 5f 32 5f 30 3b 0a 20 20 20 20 62 20 3d 20 OT_2_0;. b =
56b0: 62 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 62 b<<7;. a |= b
56c0: 3b 0a 20 20 20 20 73 20 3d 20 73 3e 3e 31 31 3b ;. s = s>>11;
56d0: 0a 20 20 20 20 2a 76 20 3d 20 28 28 75 36 34 29 . *v = ((u64)
56e0: 73 29 3c 3c 33 32 20 7c 20 61 3b 0a 20 20 20 20 s)<<32 | a;.
56f0: 72 65 74 75 72 6e 20 37 3b 0a 20 20 7d 0a 0a 20 return 7;. }..
5700: 20 2f 2a 20 43 53 45 32 20 66 72 6f 6d 20 62 65 /* CSE2 from be
5710: 6c 6f 77 20 2a 2f 0a 20 20 61 20 26 3d 20 53 4c low */. a &= SL
5720: 4f 54 5f 32 5f 30 3b 0a 20 20 70 2b 2b 3b 0a 20 OT_2_0;. p++;.
5730: 20 62 20 3d 20 62 3c 3c 31 34 3b 0a 20 20 62 20 b = b<<14;. b
5740: 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 |= *p;. /* b: p
5750: 33 3c 3c 32 38 20 7c 20 70 35 3c 3c 31 34 20 7c 3<<28 | p5<<14 |
5760: 20 70 37 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a p7 (unmasked) *
5770: 2f 0a 20 20 69 66 20 28 21 28 62 26 30 78 38 30 /. if (!(b&0x80
5780: 29 29 0a 20 20 7b 0a 20 20 20 20 62 20 26 3d 20 )). {. b &=
5790: 53 4c 4f 54 5f 34 5f 32 5f 30 3b 0a 20 20 20 20 SLOT_4_2_0;.
57a0: 2f 2a 20 6d 6f 76 65 64 20 43 53 45 32 20 75 70 /* moved CSE2 up
57b0: 20 2a 2f 0a 20 20 20 20 2f 2a 20 61 20 26 3d 20 */. /* a &=
57c0: 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 (0x7f<<14)|(0x7f
57d0: 29 3b 20 2a 2f 0a 20 20 20 20 61 20 3d 20 61 3c ); */. a = a<
57e0: 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 62 3b 0a <7;. a |= b;.
57f0: 20 20 20 20 73 20 3d 20 73 3e 3e 34 3b 0a 20 20 s = s>>4;.
5800: 20 20 2a 76 20 3d 20 28 28 75 36 34 29 73 29 3c *v = ((u64)s)<
5810: 3c 33 32 20 7c 20 61 3b 0a 20 20 20 20 72 65 74 <32 | a;. ret
5820: 75 72 6e 20 38 3b 0a 20 20 7d 0a 0a 20 20 70 2b urn 8;. }.. p+
5830: 2b 3b 0a 20 20 61 20 3d 20 61 3c 3c 31 35 3b 0a +;. a = a<<15;.
5840: 20 20 61 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 a |= *p;. /*
5850: 61 3a 20 70 34 3c 3c 32 39 20 7c 20 70 36 3c 3c a: p4<<29 | p6<<
5860: 31 35 20 7c 20 70 38 20 28 75 6e 6d 61 73 6b 65 15 | p8 (unmaske
5870: 64 29 20 2a 2f 0a 0a 20 20 2f 2a 20 6d 6f 76 65 d) */.. /* move
5880: 64 20 43 53 45 32 20 75 70 20 2a 2f 0a 20 20 2f d CSE2 up */. /
5890: 2a 20 61 20 26 3d 20 28 30 78 37 66 3c 3c 32 39 * a &= (0x7f<<29
58a0: 29 7c 28 30 78 37 66 3c 3c 31 35 29 7c 28 30 78 )|(0x7f<<15)|(0x
58b0: 66 66 29 3b 20 2a 2f 0a 20 20 62 20 26 3d 20 53 ff); */. b &= S
58c0: 4c 4f 54 5f 32 5f 30 3b 0a 20 20 62 20 3d 20 62 LOT_2_0;. b = b
58d0: 3c 3c 38 3b 0a 20 20 61 20 7c 3d 20 62 3b 0a 0a <<8;. a |= b;..
58e0: 20 20 73 20 3d 20 73 3c 3c 34 3b 0a 20 20 62 20 s = s<<4;. b
58f0: 3d 20 70 5b 2d 34 5d 3b 0a 20 20 62 20 26 3d 20 = p[-4];. b &=
5900: 30 78 37 66 3b 0a 20 20 62 20 3d 20 62 3e 3e 33 0x7f;. b = b>>3
5910: 3b 0a 20 20 73 20 7c 3d 20 62 3b 0a 0a 20 20 2a ;. s |= b;.. *
5920: 76 20 3d 20 28 28 75 36 34 29 73 29 3c 3c 33 32 v = ((u64)s)<<32
5930: 20 7c 20 61 3b 0a 0a 20 20 72 65 74 75 72 6e 20 | a;.. return
5940: 39 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 9;.}../*.** Read
5950: 20 61 20 33 32 2d 62 69 74 20 76 61 72 69 61 62 a 32-bit variab
5960: 6c 65 2d 6c 65 6e 67 74 68 20 69 6e 74 65 67 65 le-length intege
5970: 72 20 66 72 6f 6d 20 6d 65 6d 6f 72 79 20 73 74 r from memory st
5980: 61 72 74 69 6e 67 20 61 74 20 70 5b 30 5d 2e 0a arting at p[0]..
5990: 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6e 75 ** Return the nu
59a0: 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 72 65 mber of bytes re
59b0: 61 64 2e 20 20 54 68 65 20 76 61 6c 75 65 20 69 ad. The value i
59c0: 73 20 73 74 6f 72 65 64 20 69 6e 20 2a 76 2e 0a s stored in *v..
59d0: 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 76 61 72 **.** If the var
59e0: 69 6e 74 20 73 74 6f 72 65 64 20 69 6e 20 70 5b int stored in p[
59f0: 30 5d 20 69 73 20 6c 61 72 67 65 72 20 74 68 61 0] is larger tha
5a00: 6e 20 63 61 6e 20 66 69 74 20 69 6e 20 61 20 33 n can fit in a 3
5a10: 32 2d 62 69 74 20 75 6e 73 69 67 6e 65 64 0a 2a 2-bit unsigned.*
5a20: 2a 20 69 6e 74 65 67 65 72 2c 20 74 68 65 6e 20 * integer, then
5a30: 73 65 74 20 2a 76 20 74 6f 20 30 78 66 66 66 66 set *v to 0xffff
5a40: 66 66 66 66 2e 0a 2a 2a 0a 2a 2a 20 41 20 4d 41 ffff..**.** A MA
5a50: 43 52 4f 20 76 65 72 73 69 6f 6e 2c 20 67 65 74 CRO version, get
5a60: 56 61 72 69 6e 74 33 32 2c 20 69 73 20 70 72 6f Varint32, is pro
5a70: 76 69 64 65 64 20 77 68 69 63 68 20 69 6e 6c 69 vided which inli
5a80: 6e 65 73 20 74 68 65 20 0a 2a 2a 20 73 69 6e 67 nes the .** sing
5a90: 6c 65 2d 62 79 74 65 20 63 61 73 65 2e 20 20 41 le-byte case. A
5aa0: 6c 6c 20 63 6f 64 65 20 73 68 6f 75 6c 64 20 75 ll code should u
5ab0: 73 65 20 74 68 65 20 4d 41 43 52 4f 20 76 65 72 se the MACRO ver
5ac0: 73 69 6f 6e 20 61 73 20 0a 2a 2a 20 74 68 69 73 sion as .** this
5ad0: 20 66 75 6e 63 74 69 6f 6e 20 61 73 73 75 6d 65 function assume
5ae0: 73 20 74 68 65 20 73 69 6e 67 6c 65 2d 62 79 74 s the single-byt
5af0: 65 20 63 61 73 65 20 68 61 73 20 61 6c 72 65 61 e case has alrea
5b00: 64 79 20 62 65 65 6e 20 68 61 6e 64 6c 65 64 2e dy been handled.
5b10: 0a 2a 2f 0a 75 38 20 73 71 6c 69 74 65 33 47 65 .*/.u8 sqlite3Ge
5b20: 74 56 61 72 69 6e 74 33 32 28 63 6f 6e 73 74 20 tVarint32(const
5b30: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70 unsigned char *p
5b40: 2c 20 75 33 32 20 2a 76 29 7b 0a 20 20 75 33 32 , u32 *v){. u32
5b50: 20 61 2c 62 3b 0a 0a 20 20 2f 2a 20 54 68 65 20 a,b;.. /* The
5b60: 31 2d 62 79 74 65 20 63 61 73 65 2e 20 20 4f 76 1-byte case. Ov
5b70: 65 72 77 68 65 6c 6d 69 6e 67 6c 79 20 74 68 65 erwhelmingly the
5b80: 20 6d 6f 73 74 20 63 6f 6d 6d 6f 6e 2e 20 20 48 most common. H
5b90: 61 6e 64 6c 65 64 20 69 6e 6c 69 6e 65 0a 20 20 andled inline.
5ba0: 2a 2a 20 62 79 20 74 68 65 20 67 65 74 56 61 72 ** by the getVar
5bb0: 69 6e 33 32 28 29 20 6d 61 63 72 6f 20 2a 2f 0a in32() macro */.
5bc0: 20 20 61 20 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 a = *p;. /* a
5bd0: 3a 20 70 30 20 28 75 6e 6d 61 73 6b 65 64 29 20 : p0 (unmasked)
5be0: 2a 2f 0a 23 69 66 6e 64 65 66 20 67 65 74 56 61 */.#ifndef getVa
5bf0: 72 69 6e 74 33 32 0a 20 20 69 66 20 28 21 28 61 rint32. if (!(a
5c00: 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 &0x80)). {.
5c10: 2f 2a 20 56 61 6c 75 65 73 20 62 65 74 77 65 65 /* Values betwee
5c20: 6e 20 30 20 61 6e 64 20 31 32 37 20 2a 2f 0a 20 n 0 and 127 */.
5c30: 20 20 20 2a 76 20 3d 20 61 3b 0a 20 20 20 20 72 *v = a;. r
5c40: 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a 23 65 6e eturn 1;. }.#en
5c50: 64 69 66 0a 0a 20 20 2f 2a 20 54 68 65 20 32 2d dif.. /* The 2-
5c60: 62 79 74 65 20 63 61 73 65 20 2a 2f 0a 20 20 70 byte case */. p
5c70: 2b 2b 3b 0a 20 20 62 20 3d 20 2a 70 3b 0a 20 20 ++;. b = *p;.
5c80: 2f 2a 20 62 3a 20 70 31 20 28 75 6e 6d 61 73 6b /* b: p1 (unmask
5c90: 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 62 ed) */. if (!(b
5ca0: 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 &0x80)). {.
5cb0: 2f 2a 20 56 61 6c 75 65 73 20 62 65 74 77 65 65 /* Values betwee
5cc0: 6e 20 31 32 38 20 61 6e 64 20 31 36 33 38 33 20 n 128 and 16383
5cd0: 2a 2f 0a 20 20 20 20 61 20 26 3d 20 30 78 37 66 */. a &= 0x7f
5ce0: 3b 0a 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a ;. a = a<<7;.
5cf0: 20 20 20 20 2a 76 20 3d 20 61 20 7c 20 62 3b 0a *v = a | b;.
5d00: 20 20 20 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 return 2;.
5d10: 7d 0a 0a 20 20 2f 2a 20 54 68 65 20 33 2d 62 79 }.. /* The 3-by
5d20: 74 65 20 63 61 73 65 20 2a 2f 0a 20 20 70 2b 2b te case */. p++
5d30: 3b 0a 20 20 61 20 3d 20 61 3c 3c 31 34 3b 0a 20 ;. a = a<<14;.
5d40: 20 61 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 a |= *p;. /* a
5d50: 3a 20 70 30 3c 3c 31 34 20 7c 20 70 32 20 28 75 : p0<<14 | p2 (u
5d60: 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 nmasked) */. if
5d70: 20 28 21 28 61 26 30 78 38 30 29 29 0a 20 20 7b (!(a&0x80)). {
5d80: 0a 20 20 20 20 2f 2a 20 56 61 6c 75 65 73 20 62 . /* Values b
5d90: 65 74 77 65 65 6e 20 31 36 33 38 34 20 61 6e 64 etween 16384 and
5da0: 20 32 30 39 37 31 35 31 20 2a 2f 0a 20 20 20 20 2097151 */.
5db0: 61 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c a &= (0x7f<<14)|
5dc0: 28 30 78 37 66 29 3b 0a 20 20 20 20 62 20 26 3d (0x7f);. b &=
5dd0: 20 30 78 37 66 3b 0a 20 20 20 20 62 20 3d 20 62 0x7f;. b = b
5de0: 3c 3c 37 3b 0a 20 20 20 20 2a 76 20 3d 20 61 20 <<7;. *v = a
5df0: 7c 20 62 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 | b;. return
5e00: 33 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 41 20 33 3;. }.. /* A 3
5e10: 32 2d 62 69 74 20 76 61 72 69 6e 74 20 69 73 20 2-bit varint is
5e20: 75 73 65 64 20 74 6f 20 73 74 6f 72 65 20 73 69 used to store si
5e30: 7a 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 ze information i
5e40: 6e 20 62 74 72 65 65 73 2e 0a 20 20 2a 2a 20 4f n btrees.. ** O
5e50: 62 6a 65 63 74 73 20 61 72 65 20 72 61 72 65 6c bjects are rarel
5e60: 79 20 6c 61 72 67 65 72 20 74 68 61 6e 20 32 4d y larger than 2M
5e70: 69 42 20 6c 69 6d 69 74 20 6f 66 20 61 20 33 2d iB limit of a 3-
5e80: 62 79 74 65 20 76 61 72 69 6e 74 2e 0a 20 20 2a byte varint.. *
5e90: 2a 20 41 20 33 2d 62 79 74 65 20 76 61 72 69 6e * A 3-byte varin
5ea0: 74 20 69 73 20 73 75 66 66 69 63 69 65 6e 74 2c t is sufficient,
5eb0: 20 66 6f 72 20 65 78 61 6d 70 6c 65 2c 20 74 6f for example, to
5ec0: 20 72 65 63 6f 72 64 20 74 68 65 20 73 69 7a 65 record the size
5ed0: 0a 20 20 2a 2a 20 6f 66 20 61 20 31 30 34 38 35 . ** of a 10485
5ee0: 36 39 2d 62 79 74 65 20 42 4c 4f 42 20 6f 72 20 69-byte BLOB or
5ef0: 73 74 72 69 6e 67 2e 0a 20 20 2a 2a 0a 20 20 2a string.. **. *
5f00: 2a 20 57 65 20 6f 6e 6c 79 20 75 6e 72 6f 6c 6c * We only unroll
5f10: 20 74 68 65 20 66 69 72 73 74 20 31 2d 2c 20 32 the first 1-, 2
5f20: 2d 2c 20 61 6e 64 20 33 2d 20 62 79 74 65 20 63 -, and 3- byte c
5f30: 61 73 65 73 2e 20 20 54 68 65 20 76 65 72 79 0a ases. The very.
5f40: 20 20 2a 2a 20 72 61 72 65 20 6c 61 72 67 65 72 ** rare larger
5f50: 20 63 61 73 65 73 20 63 61 6e 20 62 65 20 68 61 cases can be ha
5f60: 6e 64 6c 65 64 20 62 79 20 74 68 65 20 73 6c 6f ndled by the slo
5f70: 77 65 72 20 36 34 2d 62 69 74 20 76 61 72 69 6e wer 64-bit varin
5f80: 74 0a 20 20 2a 2a 20 72 6f 75 74 69 6e 65 2e 0a t. ** routine..
5f90: 20 20 2a 2f 0a 23 69 66 20 31 0a 20 20 7b 0a 20 */.#if 1. {.
5fa0: 20 20 20 75 36 34 20 76 36 34 3b 0a 20 20 20 20 u64 v64;.
5fb0: 75 38 20 6e 3b 0a 0a 20 20 20 20 70 20 2d 3d 20 u8 n;.. p -=
5fc0: 32 3b 0a 20 20 20 20 6e 20 3d 20 73 71 6c 69 74 2;. n = sqlit
5fd0: 65 33 47 65 74 56 61 72 69 6e 74 28 70 2c 20 26 e3GetVarint(p, &
5fe0: 76 36 34 29 3b 0a 20 20 20 20 61 73 73 65 72 74 v64);. assert
5ff0: 28 20 6e 3e 33 20 26 26 20 6e 3c 3d 39 20 29 3b ( n>3 && n<=9 );
6000: 0a 20 20 20 20 69 66 28 20 28 76 36 34 20 26 20 . if( (v64 &
6010: 53 51 4c 49 54 45 5f 4d 41 58 5f 55 33 32 29 21 SQLITE_MAX_U32)!
6020: 3d 76 36 34 20 29 7b 0a 20 20 20 20 20 20 2a 76 =v64 ){. *v
6030: 20 3d 20 30 78 66 66 66 66 66 66 66 66 3b 0a 20 = 0xffffffff;.
6040: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
6050: 2a 76 20 3d 20 28 75 33 32 29 76 36 34 3b 0a 20 *v = (u32)v64;.
6060: 20 20 20 7d 0a 20 20 20 20 72 65 74 75 72 6e 20 }. return
6070: 6e 3b 0a 20 20 7d 0a 0a 23 65 6c 73 65 0a 20 20 n;. }..#else.
6080: 2f 2a 20 46 6f 72 20 66 6f 6c 6c 6f 77 69 6e 67 /* For following
6090: 20 63 6f 64 65 20 28 6b 65 70 74 20 66 6f 72 20 code (kept for
60a0: 68 69 73 74 6f 72 69 63 61 6c 20 72 65 63 6f 72 historical recor
60b0: 64 20 6f 6e 6c 79 29 20 73 68 6f 77 73 20 61 6e d only) shows an
60c0: 0a 20 20 2a 2a 20 75 6e 72 6f 6c 6c 69 6e 67 20 . ** unrolling
60d0: 66 6f 72 20 74 68 65 20 33 2d 20 61 6e 64 20 34 for the 3- and 4
60e0: 2d 62 79 74 65 20 76 61 72 69 6e 74 20 63 61 73 -byte varint cas
60f0: 65 73 2e 20 20 54 68 69 73 20 63 6f 64 65 20 69 es. This code i
6100: 73 0a 20 20 2a 2a 20 73 6c 69 67 68 74 6c 79 20 s. ** slightly
6110: 66 61 73 74 65 72 2c 20 62 75 74 20 69 74 20 69 faster, but it i
6120: 73 20 61 6c 73 6f 20 6c 61 72 67 65 72 20 61 6e s also larger an
6130: 64 20 6d 75 63 68 20 68 61 72 64 65 72 20 74 6f d much harder to
6140: 20 74 65 73 74 2e 0a 20 20 2a 2f 0a 20 20 70 2b test.. */. p+
6150: 2b 3b 0a 20 20 62 20 3d 20 62 3c 3c 31 34 3b 0a +;. b = b<<14;.
6160: 20 20 62 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 b |= *p;. /*
6170: 62 3a 20 70 31 3c 3c 31 34 20 7c 20 70 33 20 28 b: p1<<14 | p3 (
6180: 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 unmasked) */. i
6190: 66 20 28 21 28 62 26 30 78 38 30 29 29 0a 20 20 f (!(b&0x80)).
61a0: 7b 0a 20 20 20 20 2f 2a 20 56 61 6c 75 65 73 20 {. /* Values
61b0: 62 65 74 77 65 65 6e 20 32 30 39 37 31 35 32 20 between 2097152
61c0: 61 6e 64 20 32 36 38 34 33 35 34 35 35 20 2a 2f and 268435455 */
61d0: 0a 20 20 20 20 62 20 26 3d 20 28 30 78 37 66 3c . b &= (0x7f<
61e0: 3c 31 34 29 7c 28 30 78 37 66 29 3b 0a 20 20 20 <14)|(0x7f);.
61f0: 20 61 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 a &= (0x7f<<14)
6200: 7c 28 30 78 37 66 29 3b 0a 20 20 20 20 61 20 3d |(0x7f);. a =
6210: 20 61 3c 3c 37 3b 0a 20 20 20 20 2a 76 20 3d 20 a<<7;. *v =
6220: 61 20 7c 20 62 3b 0a 20 20 20 20 72 65 74 75 72 a | b;. retur
6230: 6e 20 34 3b 0a 20 20 7d 0a 0a 20 20 70 2b 2b 3b n 4;. }.. p++;
6240: 0a 20 20 61 20 3d 20 61 3c 3c 31 34 3b 0a 20 20 . a = a<<14;.
6250: 61 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a a |= *p;. /* a:
6260: 20 70 30 3c 3c 32 38 20 7c 20 70 32 3c 3c 31 34 p0<<28 | p2<<14
6270: 20 7c 20 70 34 20 28 75 6e 6d 61 73 6b 65 64 29 | p4 (unmasked)
6280: 20 2a 2f 0a 20 20 69 66 20 28 21 28 61 26 30 78 */. if (!(a&0x
6290: 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 80)). {. /*
62a0: 56 61 6c 75 65 73 20 20 62 65 74 77 65 65 6e 20 Values between
62b0: 32 36 38 34 33 35 34 35 36 20 61 6e 64 20 33 34 268435456 and 34
62c0: 33 35 39 37 33 38 33 36 37 20 2a 2f 0a 20 20 20 359738367 */.
62d0: 20 61 20 26 3d 20 53 4c 4f 54 5f 34 5f 32 5f 30 a &= SLOT_4_2_0
62e0: 3b 0a 20 20 20 20 62 20 26 3d 20 53 4c 4f 54 5f ;. b &= SLOT_
62f0: 34 5f 32 5f 30 3b 0a 20 20 20 20 62 20 3d 20 62 4_2_0;. b = b
6300: 3c 3c 37 3b 0a 20 20 20 20 2a 76 20 3d 20 61 20 <<7;. *v = a
6310: 7c 20 62 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 | b;. return
6320: 35 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 57 65 20 5;. }.. /* We
6330: 63 61 6e 20 6f 6e 6c 79 20 72 65 61 63 68 20 74 can only reach t
6340: 68 69 73 20 70 6f 69 6e 74 20 77 68 65 6e 20 72 his point when r
6350: 65 61 64 69 6e 67 20 61 20 63 6f 72 72 75 70 74 eading a corrupt
6360: 20 64 61 74 61 62 61 73 65 0a 20 20 2a 2a 20 66 database. ** f
6370: 69 6c 65 2e 20 20 49 6e 20 74 68 61 74 20 63 61 ile. In that ca
6380: 73 65 20 77 65 20 61 72 65 20 6e 6f 74 20 69 6e se we are not in
6390: 20 61 6e 79 20 68 75 72 72 79 2e 20 20 55 73 65 any hurry. Use
63a0: 20 74 68 65 20 28 72 65 6c 61 74 69 76 65 6c 79 the (relatively
63b0: 0a 20 20 2a 2a 20 73 6c 6f 77 29 20 67 65 6e 65 . ** slow) gene
63c0: 72 61 6c 2d 70 75 72 70 6f 73 65 20 73 71 6c 69 ral-purpose sqli
63d0: 74 65 33 47 65 74 56 61 72 69 6e 74 28 29 20 72 te3GetVarint() r
63e0: 6f 75 74 69 6e 65 20 74 6f 20 65 78 74 72 61 63 outine to extrac
63f0: 74 20 74 68 65 0a 20 20 2a 2a 20 76 61 6c 75 65 t the. ** value
6400: 2e 20 2a 2f 0a 20 20 7b 0a 20 20 20 20 75 36 34 . */. {. u64
6410: 20 76 36 34 3b 0a 20 20 20 20 75 38 20 6e 3b 0a v64;. u8 n;.
6420: 0a 20 20 20 20 70 20 2d 3d 20 34 3b 0a 20 20 20 . p -= 4;.
6430: 20 6e 20 3d 20 73 71 6c 69 74 65 33 47 65 74 56 n = sqlite3GetV
6440: 61 72 69 6e 74 28 70 2c 20 26 76 36 34 29 3b 0a arint(p, &v64);.
6450: 20 20 20 20 61 73 73 65 72 74 28 20 6e 3e 35 20 assert( n>5
6460: 26 26 20 6e 3c 3d 39 20 29 3b 0a 20 20 20 20 2a && n<=9 );. *
6470: 76 20 3d 20 28 75 33 32 29 76 36 34 3b 0a 20 20 v = (u32)v64;.
6480: 20 20 72 65 74 75 72 6e 20 6e 3b 0a 20 20 7d 0a return n;. }.
6490: 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 #endif.}../*.**
64a0: 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 Return the numbe
64b0: 72 20 6f 66 20 62 79 74 65 73 20 74 68 61 74 20 r of bytes that
64c0: 77 69 6c 6c 20 62 65 20 6e 65 65 64 65 64 20 74 will be needed t
64d0: 6f 20 73 74 6f 72 65 20 74 68 65 20 67 69 76 65 o store the give
64e0: 6e 0a 2a 2a 20 36 34 2d 62 69 74 20 69 6e 74 65 n.** 64-bit inte
64f0: 67 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 ger..*/.int sqli
6500: 74 65 33 56 61 72 69 6e 74 4c 65 6e 28 75 36 34 te3VarintLen(u64
6510: 20 76 29 7b 0a 20 20 69 6e 74 20 69 20 3d 20 30 v){. int i = 0
6520: 3b 0a 20 20 64 6f 7b 0a 20 20 20 20 69 2b 2b 3b ;. do{. i++;
6530: 0a 20 20 20 20 76 20 3e 3e 3d 20 37 3b 0a 20 20 . v >>= 7;.
6540: 7d 77 68 69 6c 65 28 20 76 21 3d 30 20 26 26 20 }while( v!=0 &&
6550: 41 4c 57 41 59 53 28 69 3c 39 29 20 29 3b 0a 20 ALWAYS(i<9) );.
6560: 20 72 65 74 75 72 6e 20 69 3b 0a 7d 0a 0a 0a 2f return i;.}.../
6570: 2a 0a 2a 2a 20 52 65 61 64 20 6f 72 20 77 72 69 *.** Read or wri
6580: 74 65 20 61 20 66 6f 75 72 2d 62 79 74 65 20 62 te a four-byte b
6590: 69 67 2d 65 6e 64 69 61 6e 20 69 6e 74 65 67 65 ig-endian intege
65a0: 72 20 76 61 6c 75 65 2e 0a 2a 2f 0a 75 33 32 20 r value..*/.u32
65b0: 73 71 6c 69 74 65 33 47 65 74 34 62 79 74 65 28 sqlite3Get4byte(
65c0: 63 6f 6e 73 74 20 75 38 20 2a 70 29 7b 0a 20 20 const u8 *p){.
65d0: 74 65 73 74 63 61 73 65 28 20 70 5b 30 5d 26 30 testcase( p[0]&0
65e0: 78 38 30 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 x80 );. return
65f0: 28 28 75 6e 73 69 67 6e 65 64 29 70 5b 30 5d 3c ((unsigned)p[0]<
6600: 3c 32 34 29 20 7c 20 28 70 5b 31 5d 3c 3c 31 36 <24) | (p[1]<<16
6610: 29 20 7c 20 28 70 5b 32 5d 3c 3c 38 29 20 7c 20 ) | (p[2]<<8) |
6620: 70 5b 33 5d 3b 0a 7d 0a 76 6f 69 64 20 73 71 6c p[3];.}.void sql
6630: 69 74 65 33 50 75 74 34 62 79 74 65 28 75 6e 73 ite3Put4byte(uns
6640: 69 67 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 75 igned char *p, u
6650: 33 32 20 76 29 7b 0a 20 20 70 5b 30 5d 20 3d 20 32 v){. p[0] =
6660: 28 75 38 29 28 76 3e 3e 32 34 29 3b 0a 20 20 70 (u8)(v>>24);. p
6670: 5b 31 5d 20 3d 20 28 75 38 29 28 76 3e 3e 31 36 [1] = (u8)(v>>16
6680: 29 3b 0a 20 20 70 5b 32 5d 20 3d 20 28 75 38 29 );. p[2] = (u8)
6690: 28 76 3e 3e 38 29 3b 0a 20 20 70 5b 33 5d 20 3d (v>>8);. p[3] =
66a0: 20 28 75 38 29 76 3b 0a 7d 0a 0a 0a 0a 2f 2a 0a (u8)v;.}..../*.
66b0: 2a 2a 20 54 72 61 6e 73 6c 61 74 65 20 61 20 73 ** Translate a s
66c0: 69 6e 67 6c 65 20 62 79 74 65 20 6f 66 20 48 65 ingle byte of He
66d0: 78 20 69 6e 74 6f 20 61 6e 20 69 6e 74 65 67 65 x into an intege
66e0: 72 2e 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 r..** This routi
66f0: 6e 65 20 6f 6e 6c 79 20 77 6f 72 6b 73 20 69 66 ne only works if
6700: 20 68 20 72 65 61 6c 6c 79 20 69 73 20 61 20 76 h really is a v
6710: 61 6c 69 64 20 68 65 78 61 64 65 63 69 6d 61 6c alid hexadecimal
6720: 0a 2a 2a 20 63 68 61 72 61 63 74 65 72 3a 20 20 .** character:
6730: 30 2e 2e 39 61 2e 2e 66 41 2e 2e 46 0a 2a 2f 0a 0..9a..fA..F.*/.
6740: 75 38 20 73 71 6c 69 74 65 33 48 65 78 54 6f 49 u8 sqlite3HexToI
6750: 6e 74 28 69 6e 74 20 68 29 7b 0a 20 20 61 73 73 nt(int h){. ass
6760: 65 72 74 28 20 28 68 3e 3d 27 30 27 20 26 26 20 ert( (h>='0' &&
6770: 68 3c 3d 27 39 27 29 20 7c 7c 20 20 28 68 3e 3d h<='9') || (h>=
6780: 27 61 27 20 26 26 20 68 3c 3d 27 66 27 29 20 7c 'a' && h<='f') |
6790: 7c 20 20 28 68 3e 3d 27 41 27 20 26 26 20 68 3c | (h>='A' && h<
67a0: 3d 27 46 27 29 20 29 3b 0a 23 69 66 64 65 66 20 ='F') );.#ifdef
67b0: 53 51 4c 49 54 45 5f 41 53 43 49 49 0a 20 20 68 SQLITE_ASCII. h
67c0: 20 2b 3d 20 39 2a 28 31 26 28 68 3e 3e 36 29 29 += 9*(1&(h>>6))
67d0: 3b 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 66 20 ;.#endif.#ifdef
67e0: 53 51 4c 49 54 45 5f 45 42 43 44 49 43 0a 20 20 SQLITE_EBCDIC.
67f0: 68 20 2b 3d 20 39 2a 28 31 26 7e 28 68 3e 3e 34 h += 9*(1&~(h>>4
6800: 29 29 3b 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 ));.#endif. ret
6810: 75 72 6e 20 28 75 38 29 28 68 20 26 20 30 78 66 urn (u8)(h & 0xf
6820: 29 3b 0a 7d 0a 0a 23 69 66 20 21 64 65 66 69 6e );.}..#if !defin
6830: 65 64 28 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 42 ed(SQLITE_OMIT_B
6840: 4c 4f 42 5f 4c 49 54 45 52 41 4c 29 20 7c 7c 20 LOB_LITERAL) ||
6850: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 48 defined(SQLITE_H
6860: 41 53 5f 43 4f 44 45 43 29 0a 2f 2a 0a 2a 2a 20 AS_CODEC)./*.**
6870: 43 6f 6e 76 65 72 74 20 61 20 42 4c 4f 42 20 6c Convert a BLOB l
6880: 69 74 65 72 61 6c 20 6f 66 20 74 68 65 20 66 6f iteral of the fo
6890: 72 6d 20 22 78 27 68 68 68 68 68 68 27 22 20 69 rm "x'hhhhhh'" i
68a0: 6e 74 6f 20 69 74 73 20 62 69 6e 61 72 79 0a 2a nto its binary.*
68b0: 2a 20 76 61 6c 75 65 2e 20 20 52 65 74 75 72 6e * value. Return
68c0: 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 69 74 a pointer to it
68d0: 73 20 62 69 6e 61 72 79 20 76 61 6c 75 65 2e 20 s binary value.
68e0: 20 53 70 61 63 65 20 74 6f 20 68 6f 6c 64 20 74 Space to hold t
68f0: 68 65 0a 2a 2a 20 62 69 6e 61 72 79 20 76 61 6c he.** binary val
6900: 75 65 20 68 61 73 20 62 65 65 6e 20 6f 62 74 61 ue has been obta
6910: 69 6e 65 64 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63 ined from malloc
6920: 20 61 6e 64 20 6d 75 73 74 20 62 65 20 66 72 65 and must be fre
6930: 65 64 20 62 79 0a 2a 2a 20 74 68 65 20 63 61 6c ed by.** the cal
6940: 6c 69 6e 67 20 72 6f 75 74 69 6e 65 2e 0a 2a 2f ling routine..*/
6950: 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 48 65 .void *sqlite3He
6960: 78 54 6f 42 6c 6f 62 28 73 71 6c 69 74 65 33 20 xToBlob(sqlite3
6970: 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 *db, const char
6980: 2a 7a 2c 20 69 6e 74 20 6e 29 7b 0a 20 20 63 68 *z, int n){. ch
6990: 61 72 20 2a 7a 42 6c 6f 62 3b 0a 20 20 69 6e 74 ar *zBlob;. int
69a0: 20 69 3b 0a 0a 20 20 7a 42 6c 6f 62 20 3d 20 28 i;.. zBlob = (
69b0: 63 68 61 72 20 2a 29 73 71 6c 69 74 65 33 44 62 char *)sqlite3Db
69c0: 4d 61 6c 6c 6f 63 52 61 77 28 64 62 2c 20 6e 2f MallocRaw(db, n/
69d0: 32 20 2b 20 31 29 3b 0a 20 20 6e 2d 2d 3b 0a 20 2 + 1);. n--;.
69e0: 20 69 66 28 20 7a 42 6c 6f 62 20 29 7b 0a 20 20 if( zBlob ){.
69f0: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 for(i=0; i<n;
6a00: 69 2b 3d 32 29 7b 0a 20 20 20 20 20 20 7a 42 6c i+=2){. zBl
6a10: 6f 62 5b 69 2f 32 5d 20 3d 20 28 73 71 6c 69 74 ob[i/2] = (sqlit
6a20: 65 33 48 65 78 54 6f 49 6e 74 28 7a 5b 69 5d 29 e3HexToInt(z[i])
6a30: 3c 3c 34 29 20 7c 20 73 71 6c 69 74 65 33 48 65 <<4) | sqlite3He
6a40: 78 54 6f 49 6e 74 28 7a 5b 69 2b 31 5d 29 3b 0a xToInt(z[i+1]);.
6a50: 20 20 20 20 7d 0a 20 20 20 20 7a 42 6c 6f 62 5b }. zBlob[
6a60: 69 2f 32 5d 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 i/2] = 0;. }.
6a70: 72 65 74 75 72 6e 20 7a 42 6c 6f 62 3b 0a 7d 0a return zBlob;.}.
6a80: 23 65 6e 64 69 66 20 2f 2a 20 21 53 51 4c 49 54 #endif /* !SQLIT
6a90: 45 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 45 E_OMIT_BLOB_LITE
6aa0: 52 41 4c 20 7c 7c 20 53 51 4c 49 54 45 5f 48 41 RAL || SQLITE_HA
6ab0: 53 5f 43 4f 44 45 43 20 2a 2f 0a 0a 2f 2a 0a 2a S_CODEC */../*.*
6ac0: 2a 20 4c 6f 67 20 61 6e 20 65 72 72 6f 72 20 74 * Log an error t
6ad0: 68 61 74 20 69 73 20 61 6e 20 41 50 49 20 63 61 hat is an API ca
6ae0: 6c 6c 20 6f 6e 20 61 20 63 6f 6e 6e 65 63 74 69 ll on a connecti
6af0: 6f 6e 20 70 6f 69 6e 74 65 72 20 74 68 61 74 20 on pointer that
6b00: 73 68 6f 75 6c 64 0a 2a 2a 20 6e 6f 74 20 68 61 should.** not ha
6b10: 76 65 20 62 65 65 6e 20 75 73 65 64 2e 20 20 54 ve been used. T
6b20: 68 65 20 22 74 79 70 65 22 20 6f 66 20 63 6f 6e he "type" of con
6b30: 6e 65 63 74 69 6f 6e 20 70 6f 69 6e 74 65 72 20 nection pointer
6b40: 69 73 20 67 69 76 65 6e 20 61 73 20 74 68 65 0a is given as the.
6b50: 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 20 20 54 68 ** argument. Th
6b60: 65 20 7a 54 79 70 65 20 69 73 20 61 20 77 6f 72 e zType is a wor
6b70: 64 20 6c 69 6b 65 20 22 4e 55 4c 4c 22 20 6f 72 d like "NULL" or
6b80: 20 22 63 6c 6f 73 65 64 22 20 6f 72 20 22 69 6e "closed" or "in
6b90: 76 61 6c 69 64 22 2e 0a 2a 2f 0a 73 74 61 74 69 valid"..*/.stati
6ba0: 63 20 76 6f 69 64 20 6c 6f 67 42 61 64 43 6f 6e c void logBadCon
6bb0: 6e 65 63 74 69 6f 6e 28 63 6f 6e 73 74 20 63 68 nection(const ch
6bc0: 61 72 20 2a 7a 54 79 70 65 29 7b 0a 20 20 73 71 ar *zType){. sq
6bd0: 6c 69 74 65 33 5f 6c 6f 67 28 53 51 4c 49 54 45 lite3_log(SQLITE
6be0: 5f 4d 49 53 55 53 45 2c 20 0a 20 20 20 20 20 22 _MISUSE, . "
6bf0: 41 50 49 20 63 61 6c 6c 20 77 69 74 68 20 25 73 API call with %s
6c00: 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e 65 63 database connec
6c10: 74 69 6f 6e 20 70 6f 69 6e 74 65 72 22 2c 0a 20 tion pointer",.
6c20: 20 20 20 20 7a 54 79 70 65 0a 20 20 29 3b 0a 7d zType. );.}
6c30: 0a 0a 2f 2a 0a 2a 2a 20 43 68 65 63 6b 20 74 6f ../*.** Check to
6c40: 20 6d 61 6b 65 20 73 75 72 65 20 77 65 20 68 61 make sure we ha
6c50: 76 65 20 61 20 76 61 6c 69 64 20 64 62 20 70 6f ve a valid db po
6c60: 69 6e 74 65 72 2e 20 20 54 68 69 73 20 74 65 73 inter. This tes
6c70: 74 20 69 73 20 6e 6f 74 0a 2a 2a 20 66 6f 6f 6c t is not.** fool
6c80: 70 72 6f 6f 66 20 62 75 74 20 69 74 20 64 6f 65 proof but it doe
6c90: 73 20 70 72 6f 76 69 64 65 20 73 6f 6d 65 20 6d s provide some m
6ca0: 65 61 73 75 72 65 20 6f 66 20 70 72 6f 74 65 63 easure of protec
6cb0: 74 69 6f 6e 20 61 67 61 69 6e 73 74 0a 2a 2a 20 tion against.**
6cc0: 6d 69 73 75 73 65 20 6f 66 20 74 68 65 20 69 6e misuse of the in
6cd0: 74 65 72 66 61 63 65 20 73 75 63 68 20 61 73 20 terface such as
6ce0: 70 61 73 73 69 6e 67 20 69 6e 20 64 62 20 70 6f passing in db po
6cf0: 69 6e 74 65 72 73 20 74 68 61 74 20 61 72 65 0a inters that are.
6d00: 2a 2a 20 4e 55 4c 4c 20 6f 72 20 77 68 69 63 68 ** NULL or which
6d10: 20 68 61 76 65 20 62 65 65 6e 20 70 72 65 76 69 have been previ
6d20: 6f 75 73 6c 79 20 63 6c 6f 73 65 64 2e 20 20 49 ously closed. I
6d30: 66 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 f this routine r
6d40: 65 74 75 72 6e 73 0a 2a 2a 20 31 20 69 74 20 6d eturns.** 1 it m
6d50: 65 61 6e 73 20 74 68 61 74 20 74 68 65 20 64 62 eans that the db
6d60: 20 70 6f 69 6e 74 65 72 20 69 73 20 76 61 6c 69 pointer is vali
6d70: 64 20 61 6e 64 20 30 20 69 66 20 69 74 20 73 68 d and 0 if it sh
6d80: 6f 75 6c 64 20 6e 6f 74 20 62 65 0a 2a 2a 20 64 ould not be.** d
6d90: 65 72 65 66 65 72 65 6e 63 65 64 20 66 6f 72 20 ereferenced for
6da0: 61 6e 79 20 72 65 61 73 6f 6e 2e 20 20 54 68 65 any reason. The
6db0: 20 63 61 6c 6c 69 6e 67 20 66 75 6e 63 74 69 6f calling functio
6dc0: 6e 20 73 68 6f 75 6c 64 20 69 6e 76 6f 6b 65 0a n should invoke.
6dd0: 2a 2a 20 53 51 4c 49 54 45 5f 4d 49 53 55 53 45 ** SQLITE_MISUSE
6de0: 20 69 6d 6d 65 64 69 61 74 65 6c 79 2e 0a 2a 2a immediately..**
6df0: 0a 2a 2a 20 73 71 6c 69 74 65 33 53 61 66 65 74 .** sqlite3Safet
6e00: 79 43 68 65 63 6b 4f 6b 28 29 20 72 65 71 75 69 yCheckOk() requi
6e10: 72 65 73 20 74 68 61 74 20 74 68 65 20 64 62 20 res that the db
6e20: 70 6f 69 6e 74 65 72 20 62 65 20 76 61 6c 69 64 pointer be valid
6e30: 20 66 6f 72 0a 2a 2a 20 75 73 65 2e 20 20 73 71 for.** use. sq
6e40: 6c 69 74 65 33 53 61 66 65 74 79 43 68 65 63 6b lite3SafetyCheck
6e50: 53 69 63 6b 4f 72 4f 6b 28 29 20 61 6c 6c 6f 77 SickOrOk() allow
6e60: 73 20 61 20 64 62 20 70 6f 69 6e 74 65 72 20 74 s a db pointer t
6e70: 68 61 74 20 66 61 69 6c 65 64 20 74 6f 0a 2a 2a hat failed to.**
6e80: 20 6f 70 65 6e 20 70 72 6f 70 65 72 6c 79 20 61 open properly a
6e90: 6e 64 20 69 73 20 6e 6f 74 20 66 69 74 20 66 6f nd is not fit fo
6ea0: 72 20 67 65 6e 65 72 61 6c 20 75 73 65 20 62 75 r general use bu
6eb0: 74 20 77 68 69 63 68 20 63 61 6e 20 62 65 0a 2a t which can be.*
6ec0: 2a 20 75 73 65 64 20 61 73 20 61 6e 20 61 72 67 * used as an arg
6ed0: 75 6d 65 6e 74 20 74 6f 20 73 71 6c 69 74 65 33 ument to sqlite3
6ee0: 5f 65 72 72 6d 73 67 28 29 20 6f 72 20 73 71 6c _errmsg() or sql
6ef0: 69 74 65 33 5f 63 6c 6f 73 65 28 29 2e 0a 2a 2f ite3_close()..*/
6f00: 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 61 66 65 .int sqlite3Safe
6f10: 74 79 43 68 65 63 6b 4f 6b 28 73 71 6c 69 74 65 tyCheckOk(sqlite
6f20: 33 20 2a 64 62 29 7b 0a 20 20 75 33 32 20 6d 61 3 *db){. u32 ma
6f30: 67 69 63 3b 0a 20 20 69 66 28 20 64 62 3d 3d 30 gic;. if( db==0
6f40: 20 29 7b 0a 20 20 20 20 6c 6f 67 42 61 64 43 6f ){. logBadCo
6f50: 6e 6e 65 63 74 69 6f 6e 28 22 4e 55 4c 4c 22 29 nnection("NULL")
6f60: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a ;. return 0;.
6f70: 20 20 7d 0a 20 20 6d 61 67 69 63 20 3d 20 64 62 }. magic = db
6f80: 2d 3e 6d 61 67 69 63 3b 0a 20 20 69 66 28 20 6d ->magic;. if( m
6f90: 61 67 69 63 21 3d 53 51 4c 49 54 45 5f 4d 41 47 agic!=SQLITE_MAG
6fa0: 49 43 5f 4f 50 45 4e 20 29 7b 0a 20 20 20 20 69 IC_OPEN ){. i
6fb0: 66 28 20 73 71 6c 69 74 65 33 53 61 66 65 74 79 f( sqlite3Safety
6fc0: 43 68 65 63 6b 53 69 63 6b 4f 72 4f 6b 28 64 62 CheckSickOrOk(db
6fd0: 29 20 29 7b 0a 20 20 20 20 20 20 74 65 73 74 63 ) ){. testc
6fe0: 61 73 65 28 20 73 71 6c 69 74 65 33 47 6c 6f 62 ase( sqlite3Glob
6ff0: 61 6c 43 6f 6e 66 69 67 2e 78 4c 6f 67 21 3d 30 alConfig.xLog!=0
7000: 20 29 3b 0a 20 20 20 20 20 20 6c 6f 67 42 61 64 );. logBad
7010: 43 6f 6e 6e 65 63 74 69 6f 6e 28 22 75 6e 6f 70 Connection("unop
7020: 65 6e 65 64 22 29 3b 0a 20 20 20 20 7d 0a 20 20 ened");. }.
7030: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 65 return 0;. }e
7040: 6c 73 65 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 lse{. return
7050: 31 3b 0a 20 20 7d 0a 7d 0a 69 6e 74 20 73 71 6c 1;. }.}.int sql
7060: 69 74 65 33 53 61 66 65 74 79 43 68 65 63 6b 53 ite3SafetyCheckS
7070: 69 63 6b 4f 72 4f 6b 28 73 71 6c 69 74 65 33 20 ickOrOk(sqlite3
7080: 2a 64 62 29 7b 0a 20 20 75 33 32 20 6d 61 67 69 *db){. u32 magi
7090: 63 3b 0a 20 20 6d 61 67 69 63 20 3d 20 64 62 2d c;. magic = db-
70a0: 3e 6d 61 67 69 63 3b 0a 20 20 69 66 28 20 6d 61 >magic;. if( ma
70b0: 67 69 63 21 3d 53 51 4c 49 54 45 5f 4d 41 47 49 gic!=SQLITE_MAGI
70c0: 43 5f 53 49 43 4b 20 26 26 0a 20 20 20 20 20 20 C_SICK &&.
70d0: 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 5f 4d 41 magic!=SQLITE_MA
70e0: 47 49 43 5f 4f 50 45 4e 20 26 26 0a 20 20 20 20 GIC_OPEN &&.
70f0: 20 20 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 5f magic!=SQLITE_
7100: 4d 41 47 49 43 5f 42 55 53 59 20 29 7b 0a 20 20 MAGIC_BUSY ){.
7110: 20 20 74 65 73 74 63 61 73 65 28 20 73 71 6c 69 testcase( sqli
7120: 74 65 33 47 6c 6f 62 61 6c 43 6f 6e 66 69 67 2e te3GlobalConfig.
7130: 78 4c 6f 67 21 3d 30 20 29 3b 0a 20 20 20 20 6c xLog!=0 );. l
7140: 6f 67 42 61 64 43 6f 6e 6e 65 63 74 69 6f 6e 28 ogBadConnection(
7150: 22 69 6e 76 61 6c 69 64 22 29 3b 0a 20 20 20 20 "invalid");.
7160: 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 return 0;. }els
7170: 65 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b e{. return 1;
7180: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 . }.}../*.** At
7190: 74 65 6d 70 74 20 74 6f 20 61 64 64 2c 20 73 75 tempt to add, su
71a0: 62 73 74 72 61 63 74 2c 20 6f 72 20 6d 75 6c 74 bstract, or mult
71b0: 69 70 6c 79 20 74 68 65 20 36 34 2d 62 69 74 20 iply the 64-bit
71c0: 73 69 67 6e 65 64 20 76 61 6c 75 65 20 69 42 20 signed value iB
71d0: 61 67 61 69 6e 73 74 0a 2a 2a 20 74 68 65 20 6f against.** the o
71e0: 74 68 65 72 20 36 34 2d 62 69 74 20 73 69 67 6e ther 64-bit sign
71f0: 65 64 20 69 6e 74 65 67 65 72 20 61 74 20 2a 70 ed integer at *p
7200: 41 20 61 6e 64 20 73 74 6f 72 65 20 74 68 65 20 A and store the
7210: 72 65 73 75 6c 74 20 69 6e 20 2a 70 41 2e 0a 2a result in *pA..*
7220: 2a 20 52 65 74 75 72 6e 20 30 20 6f 6e 20 73 75 * Return 0 on su
7230: 63 63 65 73 73 2e 20 20 4f 72 20 69 66 20 74 68 ccess. Or if th
7240: 65 20 6f 70 65 72 61 74 69 6f 6e 20 77 6f 75 6c e operation woul
7250: 64 20 68 61 76 65 20 72 65 73 75 6c 74 65 64 20 d have resulted
7260: 69 6e 20 61 6e 0a 2a 2a 20 6f 76 65 72 66 6c 6f in an.** overflo
7270: 77 2c 20 6c 65 61 76 65 20 2a 70 41 20 75 6e 63 w, leave *pA unc
7280: 68 61 6e 67 65 64 20 61 6e 64 20 72 65 74 75 72 hanged and retur
7290: 6e 20 31 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 n 1..*/.int sqli
72a0: 74 65 33 41 64 64 49 6e 74 36 34 28 69 36 34 20 te3AddInt64(i64
72b0: 2a 70 41 2c 20 69 36 34 20 69 42 29 7b 0a 20 20 *pA, i64 iB){.
72c0: 69 36 34 20 69 41 20 3d 20 2a 70 41 3b 0a 20 20 i64 iA = *pA;.
72d0: 74 65 73 74 63 61 73 65 28 20 69 41 3d 3d 30 20 testcase( iA==0
72e0: 29 3b 20 74 65 73 74 63 61 73 65 28 20 69 41 3d ); testcase( iA=
72f0: 3d 31 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 =1 );. testcase
7300: 28 20 69 42 3d 3d 2d 31 20 29 3b 20 74 65 73 74 ( iB==-1 ); test
7310: 63 61 73 65 28 20 69 42 3d 3d 30 20 29 3b 0a 20 case( iB==0 );.
7320: 20 69 66 28 20 69 42 3e 3d 30 20 29 7b 0a 20 20 if( iB>=0 ){.
7330: 20 20 74 65 73 74 63 61 73 65 28 20 69 41 3e 30 testcase( iA>0
7340: 20 26 26 20 4c 41 52 47 45 53 54 5f 49 4e 54 36 && LARGEST_INT6
7350: 34 20 2d 20 69 41 20 3d 3d 20 69 42 20 29 3b 0a 4 - iA == iB );.
7360: 20 20 20 20 74 65 73 74 63 61 73 65 28 20 69 41 testcase( iA
7370: 3e 30 20 26 26 20 4c 41 52 47 45 53 54 5f 49 4e >0 && LARGEST_IN
7380: 54 36 34 20 2d 20 69 41 20 3d 3d 20 69 42 20 2d T64 - iA == iB -
7390: 20 31 20 29 3b 0a 20 20 20 20 69 66 28 20 69 41 1 );. if( iA
73a0: 3e 30 20 26 26 20 4c 41 52 47 45 53 54 5f 49 4e >0 && LARGEST_IN
73b0: 54 36 34 20 2d 20 69 41 20 3c 20 69 42 20 29 20 T64 - iA < iB )
73c0: 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 2a 70 return 1;. *p
73d0: 41 20 2b 3d 20 69 42 3b 0a 20 20 7d 65 6c 73 65 A += iB;. }else
73e0: 7b 0a 20 20 20 20 74 65 73 74 63 61 73 65 28 20 {. testcase(
73f0: 69 41 3c 30 20 26 26 20 2d 28 69 41 20 2b 20 4c iA<0 && -(iA + L
7400: 41 52 47 45 53 54 5f 49 4e 54 36 34 29 20 3d 3d ARGEST_INT64) ==
7410: 20 69 42 20 2b 20 31 20 29 3b 0a 20 20 20 20 74 iB + 1 );. t
7420: 65 73 74 63 61 73 65 28 20 69 41 3c 30 20 26 26 estcase( iA<0 &&
7430: 20 2d 28 69 41 20 2b 20 4c 41 52 47 45 53 54 5f -(iA + LARGEST_
7440: 49 4e 54 36 34 29 20 3d 3d 20 69 42 20 2b 20 32 INT64) == iB + 2
7450: 20 29 3b 0a 20 20 20 20 69 66 28 20 69 41 3c 30 );. if( iA<0
7460: 20 26 26 20 2d 28 69 41 20 2b 20 4c 41 52 47 45 && -(iA + LARGE
7470: 53 54 5f 49 4e 54 36 34 29 20 3e 20 69 42 20 2b ST_INT64) > iB +
7480: 20 31 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 1 ) return 1;.
7490: 20 20 20 2a 70 41 20 2b 3d 20 69 42 3b 0a 20 20 *pA += iB;.
74a0: 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b 20 0a 7d }. return 0; .}
74b0: 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 75 62 49 .int sqlite3SubI
74c0: 6e 74 36 34 28 69 36 34 20 2a 70 41 2c 20 69 36 nt64(i64 *pA, i6
74d0: 34 20 69 42 29 7b 0a 20 20 74 65 73 74 63 61 73 4 iB){. testcas
74e0: 65 28 20 69 42 3d 3d 53 4d 41 4c 4c 45 53 54 5f e( iB==SMALLEST_
74f0: 49 4e 54 36 34 2b 31 20 29 3b 0a 20 20 69 66 28 INT64+1 );. if(
7500: 20 69 42 3d 3d 53 4d 41 4c 4c 45 53 54 5f 49 4e iB==SMALLEST_IN
7510: 54 36 34 20 29 7b 0a 20 20 20 20 74 65 73 74 63 T64 ){. testc
7520: 61 73 65 28 20 28 2a 70 41 29 3d 3d 28 2d 31 29 ase( (*pA)==(-1)
7530: 20 29 3b 20 74 65 73 74 63 61 73 65 28 20 28 2a ); testcase( (*
7540: 70 41 29 3d 3d 30 20 29 3b 0a 20 20 20 20 69 66 pA)==0 );. if
7550: 28 20 28 2a 70 41 29 3e 3d 30 20 29 20 72 65 74 ( (*pA)>=0 ) ret
7560: 75 72 6e 20 31 3b 0a 20 20 20 20 2a 70 41 20 2d urn 1;. *pA -
7570: 3d 20 69 42 3b 0a 20 20 20 20 72 65 74 75 72 6e = iB;. return
7580: 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 0;. }else{.
7590: 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 41 return sqlite3A
75a0: 64 64 49 6e 74 36 34 28 70 41 2c 20 2d 69 42 29 ddInt64(pA, -iB)
75b0: 3b 0a 20 20 7d 0a 7d 0a 23 64 65 66 69 6e 65 20 ;. }.}.#define
75c0: 54 57 4f 50 4f 57 45 52 33 32 20 28 28 28 69 36 TWOPOWER32 (((i6
75d0: 34 29 31 29 3c 3c 33 32 29 0a 23 64 65 66 69 6e 4)1)<<32).#defin
75e0: 65 20 54 57 4f 50 4f 57 45 52 33 31 20 28 28 28 e TWOPOWER31 (((
75f0: 69 36 34 29 31 29 3c 3c 33 31 29 0a 69 6e 74 20 i64)1)<<31).int
7600: 73 71 6c 69 74 65 33 4d 75 6c 49 6e 74 36 34 28 sqlite3MulInt64(
7610: 69 36 34 20 2a 70 41 2c 20 69 36 34 20 69 42 29 i64 *pA, i64 iB)
7620: 7b 0a 20 20 69 36 34 20 69 41 20 3d 20 2a 70 41 {. i64 iA = *pA
7630: 3b 0a 20 20 69 36 34 20 69 41 31 2c 20 69 41 30 ;. i64 iA1, iA0
7640: 2c 20 69 42 31 2c 20 69 42 30 2c 20 72 3b 0a 0a , iB1, iB0, r;..
7650: 20 20 69 41 31 20 3d 20 69 41 2f 54 57 4f 50 4f iA1 = iA/TWOPO
7660: 57 45 52 33 32 3b 0a 20 20 69 41 30 20 3d 20 69 WER32;. iA0 = i
7670: 41 20 25 20 54 57 4f 50 4f 57 45 52 33 32 3b 0a A % TWOPOWER32;.
7680: 20 20 69 42 31 20 3d 20 69 42 2f 54 57 4f 50 4f iB1 = iB/TWOPO
7690: 57 45 52 33 32 3b 0a 20 20 69 42 30 20 3d 20 69 WER32;. iB0 = i
76a0: 42 20 25 20 54 57 4f 50 4f 57 45 52 33 32 3b 0a B % TWOPOWER32;.
76b0: 20 20 69 66 28 20 69 41 31 2a 69 42 31 20 21 3d if( iA1*iB1 !=
76c0: 20 30 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 0 ) return 1;.
76d0: 20 61 73 73 65 72 74 28 20 69 41 31 2a 69 42 30 assert( iA1*iB0
76e0: 3d 3d 30 20 7c 7c 20 69 41 30 2a 69 42 31 3d 3d ==0 || iA0*iB1==
76f0: 30 20 29 3b 0a 20 20 72 20 3d 20 69 41 31 2a 69 0 );. r = iA1*i
7700: 42 30 20 2b 20 69 41 30 2a 69 42 31 3b 0a 20 20 B0 + iA0*iB1;.
7710: 74 65 73 74 63 61 73 65 28 20 72 3d 3d 28 2d 54 testcase( r==(-T
7720: 57 4f 50 4f 57 45 52 33 31 29 2d 31 20 29 3b 0a WOPOWER31)-1 );.
7730: 20 20 74 65 73 74 63 61 73 65 28 20 72 3d 3d 28 testcase( r==(
7740: 2d 54 57 4f 50 4f 57 45 52 33 31 29 20 29 3b 0a -TWOPOWER31) );.
7750: 20 20 74 65 73 74 63 61 73 65 28 20 72 3d 3d 54 testcase( r==T
7760: 57 4f 50 4f 57 45 52 33 31 20 29 3b 0a 20 20 74 WOPOWER31 );. t
7770: 65 73 74 63 61 73 65 28 20 72 3d 3d 54 57 4f 50 estcase( r==TWOP
7780: 4f 57 45 52 33 31 2d 31 20 29 3b 0a 20 20 69 66 OWER31-1 );. if
7790: 28 20 72 3c 28 2d 54 57 4f 50 4f 57 45 52 33 31 ( r<(-TWOPOWER31
77a0: 29 20 7c 7c 20 72 3e 3d 54 57 4f 50 4f 57 45 52 ) || r>=TWOPOWER
77b0: 33 31 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 31 ) return 1;.
77c0: 20 72 20 2a 3d 20 54 57 4f 50 4f 57 45 52 33 32 r *= TWOPOWER32
77d0: 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 41 ;. if( sqlite3A
77e0: 64 64 49 6e 74 36 34 28 26 72 2c 20 69 41 30 2a ddInt64(&r, iA0*
77f0: 69 42 30 29 20 29 20 72 65 74 75 72 6e 20 31 3b iB0) ) return 1;
7800: 0a 20 20 2a 70 41 20 3d 20 72 3b 0a 20 20 72 65 . *pA = r;. re
7810: 74 75 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a turn 0;.}../*.**
7820: 20 43 6f 6d 70 75 74 65 20 74 68 65 20 61 62 73 Compute the abs
7830: 6f 6c 75 74 65 20 76 61 6c 75 65 20 6f 66 20 61 olute value of a
7840: 20 33 32 2d 62 69 74 20 73 69 67 6e 65 64 20 69 32-bit signed i
7850: 6e 74 65 67 65 72 2c 20 6f 66 20 70 6f 73 73 69 nteger, of possi
7860: 62 6c 65 2e 20 20 4f 72 20 0a 2a 2a 20 69 66 20 ble. Or .** if
7870: 74 68 65 20 69 6e 74 65 67 65 72 20 68 61 73 20 the integer has
7880: 61 20 76 61 6c 75 65 20 6f 66 20 2d 32 31 34 37 a value of -2147
7890: 34 38 33 36 34 38 2c 20 72 65 74 75 72 6e 20 2b 483648, return +
78a0: 32 31 34 37 34 38 33 36 34 37 0a 2a 2f 0a 69 6e 2147483647.*/.in
78b0: 74 20 73 71 6c 69 74 65 33 41 62 73 49 6e 74 33 t sqlite3AbsInt3
78c0: 32 28 69 6e 74 20 78 29 7b 0a 20 20 69 66 28 20 2(int x){. if(
78d0: 78 3e 3d 30 20 29 20 72 65 74 75 72 6e 20 78 3b x>=0 ) return x;
78e0: 0a 20 20 69 66 28 20 78 3d 3d 28 69 6e 74 29 30 . if( x==(int)0
78f0: 78 38 30 30 30 30 30 30 30 20 29 20 72 65 74 75 x80000000 ) retu
7900: 72 6e 20 30 78 37 66 66 66 66 66 66 66 3b 0a 20 rn 0x7fffffff;.
7910: 20 72 65 74 75 72 6e 20 2d 78 3b 0a 7d 0a 0a 23 return -x;.}..#
7920: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 45 4e 41 ifdef SQLITE_ENA
7930: 42 4c 45 5f 38 5f 33 5f 4e 41 4d 45 53 0a 2f 2a BLE_8_3_NAMES./*
7940: 0a 2a 2a 20 49 66 20 53 51 4c 49 54 45 5f 45 4e .** If SQLITE_EN
7950: 41 42 4c 45 5f 38 5f 33 5f 4e 41 4d 45 53 20 69 ABLE_8_3_NAMES i
7960: 73 20 73 65 74 20 61 74 20 63 6f 6d 70 69 6c 65 s set at compile
7970: 2d 74 69 6d 65 20 61 6e 64 20 69 66 20 74 68 65 -time and if the
7980: 20 64 61 74 61 62 61 73 65 0a 2a 2a 20 66 69 6c database.** fil
7990: 65 6e 61 6d 65 20 69 6e 20 7a 42 61 73 65 46 69 ename in zBaseFi
79a0: 6c 65 6e 61 6d 65 20 69 73 20 61 20 55 52 49 20 lename is a URI
79b0: 77 69 74 68 20 74 68 65 20 22 38 5f 33 5f 6e 61 with the "8_3_na
79c0: 6d 65 73 3d 31 22 20 70 61 72 61 6d 65 74 65 72 mes=1" parameter
79d0: 20 61 6e 64 0a 2a 2a 20 69 66 20 66 69 6c 65 6e and.** if filen
79e0: 61 6d 65 20 69 6e 20 7a 5b 5d 20 68 61 73 20 61 ame in z[] has a
79f0: 20 73 75 66 66 69 78 20 28 61 2e 6b 2e 61 2e 20 suffix (a.k.a.
7a00: 22 65 78 74 65 6e 73 69 6f 6e 22 29 20 74 68 61 "extension") tha
7a10: 74 20 69 73 20 6c 6f 6e 67 65 72 20 74 68 61 6e t is longer than
7a20: 0a 2a 2a 20 74 68 72 65 65 20 63 68 61 72 61 63 .** three charac
7a30: 74 65 72 73 2c 20 74 68 65 6e 20 73 68 6f 72 74 ters, then short
7a40: 65 6e 20 74 68 65 20 73 75 66 66 69 78 20 6f 6e en the suffix on
7a50: 20 7a 5b 5d 20 74 6f 20 62 65 20 74 68 65 20 6c z[] to be the l
7a60: 61 73 74 20 74 68 72 65 65 0a 2a 2a 20 63 68 61 ast three.** cha
7a70: 72 61 63 74 65 72 73 20 6f 66 20 74 68 65 20 6f racters of the o
7a80: 72 69 67 69 6e 61 6c 20 73 75 66 66 69 78 2e 0a riginal suffix..
7a90: 2a 2a 0a 2a 2a 20 49 66 20 53 51 4c 49 54 45 5f **.** If SQLITE_
7aa0: 45 4e 41 42 4c 45 5f 38 5f 33 5f 4e 41 4d 45 53 ENABLE_8_3_NAMES
7ab0: 20 69 73 20 73 65 74 20 74 6f 20 32 20 61 74 20 is set to 2 at
7ac0: 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 2c 20 74 68 compile-time, th
7ad0: 65 6e 20 61 6c 77 61 79 73 0a 2a 2a 20 64 6f 20 en always.** do
7ae0: 74 68 65 20 73 75 66 66 69 78 20 73 68 6f 72 74 the suffix short
7af0: 65 6e 69 6e 67 20 72 65 67 61 72 64 6c 65 73 73 ening regardless
7b00: 20 6f 66 20 55 52 49 20 70 61 72 61 6d 65 74 65 of URI paramete
7b10: 72 2e 0a 2a 2a 0a 2a 2a 20 45 78 61 6d 70 6c 65 r..**.** Example
7b20: 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 74 65 73 s:.**.** tes
7b30: 74 2e 64 62 2d 6a 6f 75 72 6e 61 6c 20 20 20 20 t.db-journal
7b40: 3d 3e 20 20 20 74 65 73 74 2e 6e 61 6c 0a 2a 2a => test.nal.**
7b50: 20 20 20 20 20 74 65 73 74 2e 64 62 2d 77 61 6c test.db-wal
7b60: 20 20 20 20 20 20 20 20 3d 3e 20 20 20 74 65 73 => tes
7b70: 74 2e 77 61 6c 0a 2a 2a 20 20 20 20 20 74 65 73 t.wal.** tes
7b80: 74 2e 64 62 2d 73 68 6d 20 20 20 20 20 20 20 20 t.db-shm
7b90: 3d 3e 20 20 20 74 65 73 74 2e 73 68 6d 0a 2a 2a => test.shm.**
7ba0: 20 20 20 20 20 74 65 73 74 2e 64 62 2d 6d 6a 37 test.db-mj7
7bb0: 66 33 33 31 39 66 61 20 3d 3e 20 20 20 74 65 73 f3319fa => tes
7bc0: 74 2e 39 66 61 0a 2a 2f 0a 76 6f 69 64 20 73 71 t.9fa.*/.void sq
7bd0: 6c 69 74 65 33 46 69 6c 65 53 75 66 66 69 78 33 lite3FileSuffix3
7be0: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 42 61 (const char *zBa
7bf0: 73 65 46 69 6c 65 6e 61 6d 65 2c 20 63 68 61 72 seFilename, char
7c00: 20 2a 7a 29 7b 0a 23 69 66 20 53 51 4c 49 54 45 *z){.#if SQLITE
7c10: 5f 45 4e 41 42 4c 45 5f 38 5f 33 5f 4e 41 4d 45 _ENABLE_8_3_NAME
7c20: 53 3c 32 0a 20 20 69 66 28 20 73 71 6c 69 74 65 S<2. if( sqlite
7c30: 33 5f 75 72 69 5f 62 6f 6f 6c 65 61 6e 28 7a 42 3_uri_boolean(zB
7c40: 61 73 65 46 69 6c 65 6e 61 6d 65 2c 20 22 38 5f aseFilename, "8_
7c50: 33 5f 6e 61 6d 65 73 22 2c 20 30 29 20 29 0a 23 3_names", 0) ).#
7c60: 65 6e 64 69 66 0a 20 20 7b 0a 20 20 20 20 69 6e endif. {. in
7c70: 74 20 69 2c 20 73 7a 3b 0a 20 20 20 20 73 7a 20 t i, sz;. sz
7c80: 3d 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 = sqlite3Strlen3
7c90: 30 28 7a 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d 0(z);. for(i=
7ca0: 73 7a 2d 31 3b 20 69 3e 30 20 26 26 20 7a 5b 69 sz-1; i>0 && z[i
7cb0: 5d 21 3d 27 2f 27 20 26 26 20 7a 5b 69 5d 21 3d ]!='/' && z[i]!=
7cc0: 27 2e 27 3b 20 69 2d 2d 29 7b 7d 0a 20 20 20 20 '.'; i--){}.
7cd0: 69 66 28 20 7a 5b 69 5d 3d 3d 27 2e 27 20 26 26 if( z[i]=='.' &&
7ce0: 20 41 4c 57 41 59 53 28 73 7a 3e 69 2b 34 29 20 ALWAYS(sz>i+4)
7cf0: 29 20 6d 65 6d 6d 6f 76 65 28 26 7a 5b 69 2b 31 ) memmove(&z[i+1
7d00: 5d 2c 20 26 7a 5b 73 7a 2d 33 5d 2c 20 34 29 3b ], &z[sz-3], 4);
7d10: 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f . }.}.#endif../
7d20: 2a 20 0a 2a 2a 20 46 69 6e 64 20 28 61 6e 20 61 * .** Find (an a
7d30: 70 70 72 6f 78 69 6d 61 74 65 29 20 73 75 6d 20 pproximate) sum
7d40: 6f 66 20 74 77 6f 20 4c 6f 67 45 73 74 20 76 61 of two LogEst va
7d50: 6c 75 65 73 2e 20 20 54 68 69 73 20 63 6f 6d 70 lues. This comp
7d60: 75 74 61 74 69 6f 6e 20 69 73 0a 2a 2a 20 6e 6f utation is.** no
7d70: 74 20 61 20 73 69 6d 70 6c 65 20 22 2b 22 20 6f t a simple "+" o
7d80: 70 65 72 61 74 6f 72 20 62 65 63 61 75 73 65 20 perator because
7d90: 4c 6f 67 45 73 74 20 69 73 20 73 74 6f 72 65 64 LogEst is stored
7da0: 20 61 73 20 61 20 6c 6f 67 61 72 69 74 68 6d 69 as a logarithmi
7db0: 63 0a 2a 2a 20 76 61 6c 75 65 2e 0a 2a 2a 20 0a c.** value..** .
7dc0: 2a 2f 0a 4c 6f 67 45 73 74 20 73 71 6c 69 74 65 */.LogEst sqlite
7dd0: 33 4c 6f 67 45 73 74 41 64 64 28 4c 6f 67 45 73 3LogEstAdd(LogEs
7de0: 74 20 61 2c 20 4c 6f 67 45 73 74 20 62 29 7b 0a t a, LogEst b){.
7df0: 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 static const u
7e00: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 78 5b 5d nsigned char x[]
7e10: 20 3d 20 7b 0a 20 20 20 20 20 31 30 2c 20 31 30 = {. 10, 10
7e20: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
7e30: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 30 2c 31 /* 0,1
7e40: 20 2a 2f 0a 20 20 20 20 20 20 39 2c 20 39 2c 20 */. 9, 9,
7e50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7e60: 20 20 20 20 20 20 20 20 20 2f 2a 20 32 2c 33 20 /* 2,3
7e70: 2a 2f 0a 20 20 20 20 20 20 38 2c 20 38 2c 20 20 */. 8, 8,
7e80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7e90: 20 20 20 20 20 20 20 20 2f 2a 20 34 2c 35 20 2a /* 4,5 *
7ea0: 2f 0a 20 20 20 20 20 20 37 2c 20 37 2c 20 37 2c /. 7, 7, 7,
7eb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7ec0: 20 20 20 20 20 20 20 2f 2a 20 36 2c 37 2c 38 20 /* 6,7,8
7ed0: 2a 2f 0a 20 20 20 20 20 20 36 2c 20 36 2c 20 36 */. 6, 6, 6
7ee0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
7ef0: 20 20 20 20 20 20 20 20 2f 2a 20 39 2c 31 30 2c /* 9,10,
7f00: 31 31 20 2a 2f 0a 20 20 20 20 20 20 35 2c 20 35 11 */. 5, 5
7f10: 2c 20 35 2c 20 20 20 20 20 20 20 20 20 20 20 20 , 5,
7f20: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 31 32 /* 12
7f30: 2d 31 34 20 2a 2f 0a 20 20 20 20 20 20 34 2c 20 -14 */. 4,
7f40: 34 2c 20 34 2c 20 34 2c 20 20 20 20 20 20 20 20 4, 4, 4,
7f50: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 31 /* 1
7f60: 35 2d 31 38 20 2a 2f 0a 20 20 20 20 20 20 33 2c 5-18 */. 3,
7f70: 20 33 2c 20 33 2c 20 33 2c 20 33 2c 20 33 2c 20 3, 3, 3, 3, 3,
7f80: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
7f90: 31 39 2d 32 34 20 2a 2f 0a 20 20 20 20 20 20 32 19-24 */. 2
7fa0: 2c 20 32 2c 20 32 2c 20 32 2c 20 32 2c 20 32 2c , 2, 2, 2, 2, 2,
7fb0: 20 32 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 2, /*
7fc0: 20 32 35 2d 33 31 20 2a 2f 0a 20 20 7d 3b 0a 20 25-31 */. };.
7fd0: 20 69 66 28 20 61 3e 3d 62 20 29 7b 0a 20 20 20 if( a>=b ){.
7fe0: 20 69 66 28 20 61 3e 62 2b 34 39 20 29 20 72 65 if( a>b+49 ) re
7ff0: 74 75 72 6e 20 61 3b 0a 20 20 20 20 69 66 28 20 turn a;. if(
8000: 61 3e 62 2b 33 31 20 29 20 72 65 74 75 72 6e 20 a>b+31 ) return
8010: 61 2b 31 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 a+1;. return
8020: 61 2b 78 5b 61 2d 62 5d 3b 0a 20 20 7d 65 6c 73 a+x[a-b];. }els
8030: 65 7b 0a 20 20 20 20 69 66 28 20 62 3e 61 2b 34 e{. if( b>a+4
8040: 39 20 29 20 72 65 74 75 72 6e 20 62 3b 0a 20 20 9 ) return b;.
8050: 20 20 69 66 28 20 62 3e 61 2b 33 31 20 29 20 72 if( b>a+31 ) r
8060: 65 74 75 72 6e 20 62 2b 31 3b 0a 20 20 20 20 72 eturn b+1;. r
8070: 65 74 75 72 6e 20 62 2b 78 5b 62 2d 61 5d 3b 0a eturn b+x[b-a];.
8080: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e }.}../*.** Con
8090: 76 65 72 74 20 61 6e 20 69 6e 74 65 67 65 72 20 vert an integer
80a0: 69 6e 74 6f 20 61 20 4c 6f 67 45 73 74 2e 20 20 into a LogEst.
80b0: 49 6e 20 6f 74 68 65 72 20 77 6f 72 64 73 2c 20 In other words,
80c0: 63 6f 6d 70 75 74 65 20 61 0a 2a 2a 20 67 6f 6f compute a.** goo
80d0: 64 20 61 70 70 72 6f 78 69 6d 61 74 61 74 69 6f d approximatatio
80e0: 6e 20 66 6f 72 20 31 30 2a 6c 6f 67 32 28 78 29 n for 10*log2(x)
80f0: 2e 0a 2a 2f 0a 4c 6f 67 45 73 74 20 73 71 6c 69 ..*/.LogEst sqli
8100: 74 65 33 4c 6f 67 45 73 74 28 75 36 34 20 78 29 te3LogEst(u64 x)
8110: 7b 0a 20 20 73 74 61 74 69 63 20 4c 6f 67 45 73 {. static LogEs
8120: 74 20 61 5b 5d 20 3d 20 7b 20 30 2c 20 32 2c 20 t a[] = { 0, 2,
8130: 33 2c 20 35 2c 20 36 2c 20 37 2c 20 38 2c 20 39 3, 5, 6, 7, 8, 9
8140: 20 7d 3b 0a 20 20 4c 6f 67 45 73 74 20 79 20 3d };. LogEst y =
8150: 20 34 30 3b 0a 20 20 69 66 28 20 78 3c 38 20 29 40;. if( x<8 )
8160: 7b 0a 20 20 20 20 69 66 28 20 78 3c 32 20 29 20 {. if( x<2 )
8170: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 77 68 return 0;. wh
8180: 69 6c 65 28 20 78 3c 38 20 29 7b 20 20 79 20 2d ile( x<8 ){ y -
8190: 3d 20 31 30 3b 20 78 20 3c 3c 3d 20 31 3b 20 7d = 10; x <<= 1; }
81a0: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 77 68 . }else{. wh
81b0: 69 6c 65 28 20 78 3e 32 35 35 20 29 7b 20 79 20 ile( x>255 ){ y
81c0: 2b 3d 20 34 30 3b 20 78 20 3e 3e 3d 20 34 3b 20 += 40; x >>= 4;
81d0: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 78 3e 31 }. while( x>1
81e0: 35 20 29 7b 20 20 79 20 2b 3d 20 31 30 3b 20 78 5 ){ y += 10; x
81f0: 20 3e 3e 3d 20 31 3b 20 7d 0a 20 20 7d 0a 20 20 >>= 1; }. }.
8200: 72 65 74 75 72 6e 20 61 5b 78 26 37 5d 20 2b 20 return a[x&7] +
8210: 79 20 2d 20 31 30 3b 0a 7d 0a 0a 23 69 66 6e 64 y - 10;.}..#ifnd
8220: 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 56 ef SQLITE_OMIT_V
8230: 49 52 54 55 41 4c 54 41 42 4c 45 0a 2f 2a 0a 2a IRTUALTABLE./*.*
8240: 2a 20 43 6f 6e 76 65 72 74 20 61 20 64 6f 75 62 * Convert a doub
8250: 6c 65 20 69 6e 74 6f 20 61 20 4c 6f 67 45 73 74 le into a LogEst
8260: 0a 2a 2a 20 49 6e 20 6f 74 68 65 72 20 77 6f 72 .** In other wor
8270: 64 73 2c 20 63 6f 6d 70 75 74 65 20 61 6e 20 61 ds, compute an a
8280: 70 70 72 6f 78 69 6d 61 74 69 6f 6e 20 66 6f 72 pproximation for
8290: 20 31 30 2a 6c 6f 67 32 28 78 29 2e 0a 2a 2f 0a 10*log2(x)..*/.
82a0: 4c 6f 67 45 73 74 20 73 71 6c 69 74 65 33 4c 6f LogEst sqlite3Lo
82b0: 67 45 73 74 46 72 6f 6d 44 6f 75 62 6c 65 28 64 gEstFromDouble(d
82c0: 6f 75 62 6c 65 20 78 29 7b 0a 20 20 75 36 34 20 ouble x){. u64
82d0: 61 3b 0a 20 20 4c 6f 67 45 73 74 20 65 3b 0a 20 a;. LogEst e;.
82e0: 20 61 73 73 65 72 74 28 20 73 69 7a 65 6f 66 28 assert( sizeof(
82f0: 78 29 3d 3d 38 20 26 26 20 73 69 7a 65 6f 66 28 x)==8 && sizeof(
8300: 61 29 3d 3d 38 20 29 3b 0a 20 20 69 66 28 20 78 a)==8 );. if( x
8310: 3c 3d 31 20 29 20 72 65 74 75 72 6e 20 30 3b 0a <=1 ) return 0;.
8320: 20 20 69 66 28 20 78 3c 3d 32 30 30 30 30 30 30 if( x<=2000000
8330: 30 30 30 20 29 20 72 65 74 75 72 6e 20 73 71 6c 000 ) return sql
8340: 69 74 65 33 4c 6f 67 45 73 74 28 28 75 36 34 29 ite3LogEst((u64)
8350: 78 29 3b 0a 20 20 6d 65 6d 63 70 79 28 26 61 2c x);. memcpy(&a,
8360: 20 26 78 2c 20 38 29 3b 0a 20 20 65 20 3d 20 28 &x, 8);. e = (
8370: 61 3e 3e 35 32 29 20 2d 20 31 30 32 32 3b 0a 20 a>>52) - 1022;.
8380: 20 72 65 74 75 72 6e 20 65 2a 31 30 3b 0a 7d 0a return e*10;.}.
8390: 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 #endif /* SQLITE
83a0: 5f 4f 4d 49 54 5f 56 49 52 54 55 41 4c 54 41 42 _OMIT_VIRTUALTAB
83b0: 4c 45 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e LE */../*.** Con
83c0: 76 65 72 74 20 61 20 4c 6f 67 45 73 74 20 69 6e vert a LogEst in
83d0: 74 6f 20 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a to an integer..*
83e0: 2f 0a 75 36 34 20 73 71 6c 69 74 65 33 4c 6f 67 /.u64 sqlite3Log
83f0: 45 73 74 54 6f 49 6e 74 28 4c 6f 67 45 73 74 20 EstToInt(LogEst
8400: 78 29 7b 0a 20 20 75 36 34 20 6e 3b 0a 20 20 69 x){. u64 n;. i
8410: 66 28 20 78 3c 31 30 20 29 20 72 65 74 75 72 6e f( x<10 ) return
8420: 20 31 3b 0a 20 20 6e 20 3d 20 78 25 31 30 3b 0a 1;. n = x%10;.
8430: 20 20 78 20 2f 3d 20 31 30 3b 0a 20 20 69 66 28 x /= 10;. if(
8440: 20 6e 3e 3d 35 20 29 20 6e 20 2d 3d 20 32 3b 0a n>=5 ) n -= 2;.
8450: 20 20 65 6c 73 65 20 69 66 28 20 6e 3e 3d 31 20 else if( n>=1
8460: 29 20 6e 20 2d 3d 20 31 3b 0a 20 20 69 66 28 20 ) n -= 1;. if(
8470: 78 3e 3d 33 20 29 7b 0a 20 20 20 20 72 65 74 75 x>=3 ){. retu
8480: 72 6e 20 78 3e 36 30 20 3f 20 28 75 36 34 29 4c rn x>60 ? (u64)L
8490: 41 52 47 45 53 54 5f 49 4e 54 36 34 20 3a 20 28 ARGEST_INT64 : (
84a0: 6e 2b 38 29 3c 3c 28 78 2d 33 29 3b 0a 20 20 7d n+8)<<(x-3);. }
84b0: 0a 20 20 72 65 74 75 72 6e 20 28 6e 2b 38 29 3e . return (n+8)>
84c0: 3e 28 33 2d 78 29 3b 0a 7d 0a >(3-x);.}.