/ Hex Artifact Content
Login

Artifact 343508d359df65685b62e63964a40e7af4cfbe05:


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 69 66  rmat, ...){.  if
0f00: 28 20 64 62 20 26 26 20 28 64 62 2d 3e 70 45 72  ( db && (db->pEr
0f10: 72 20 7c 7c 20 28 64 62 2d 3e 70 45 72 72 20 3d  r || (db->pErr =
0f20: 20 73 71 6c 69 74 65 33 56 61 6c 75 65 4e 65 77   sqlite3ValueNew
0f30: 28 64 62 29 29 21 3d 30 29 20 29 7b 0a 20 20 20  (db))!=0) ){.   
0f40: 20 64 62 2d 3e 65 72 72 43 6f 64 65 20 3d 20 65   db->errCode = e
0f50: 72 72 5f 63 6f 64 65 3b 0a 20 20 20 20 69 66 28  rr_code;.    if(
0f60: 20 7a 46 6f 72 6d 61 74 20 29 7b 0a 20 20 20 20   zFormat ){.    
0f70: 20 20 63 68 61 72 20 2a 7a 3b 0a 20 20 20 20 20    char *z;.     
0f80: 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 20   va_list ap;.   
0f90: 20 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20     va_start(ap, 
0fa0: 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 20 20 20 20  zFormat);.      
0fb0: 7a 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 69  z = sqlite3VMPri
0fc0: 6e 74 66 28 64 62 2c 20 7a 46 6f 72 6d 61 74 2c  ntf(db, zFormat,
0fd0: 20 61 70 29 3b 0a 20 20 20 20 20 20 76 61 5f 65   ap);.      va_e
0fe0: 6e 64 28 61 70 29 3b 0a 20 20 20 20 20 20 73 71  nd(ap);.      sq
0ff0: 6c 69 74 65 33 56 61 6c 75 65 53 65 74 53 74 72  lite3ValueSetStr
1000: 28 64 62 2d 3e 70 45 72 72 2c 20 2d 31 2c 20 7a  (db->pErr, -1, z
1010: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 53  , SQLITE_UTF8, S
1020: 51 4c 49 54 45 5f 44 59 4e 41 4d 49 43 29 3b 0a  QLITE_DYNAMIC);.
1030: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
1040: 20 73 71 6c 69 74 65 33 56 61 6c 75 65 53 65 74   sqlite3ValueSet
1050: 53 74 72 28 64 62 2d 3e 70 45 72 72 2c 20 30 2c  Str(db->pErr, 0,
1060: 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c   0, SQLITE_UTF8,
1070: 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b   SQLITE_STATIC);
1080: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
1090: 0a 2a 2a 20 41 64 64 20 61 6e 20 65 72 72 6f 72  .** Add an error
10a0: 20 6d 65 73 73 61 67 65 20 74 6f 20 70 50 61 72   message to pPar
10b0: 73 65 2d 3e 7a 45 72 72 4d 73 67 20 61 6e 64 20  se->zErrMsg and 
10c0: 69 6e 63 72 65 6d 65 6e 74 20 70 50 61 72 73 65  increment pParse
10d0: 2d 3e 6e 45 72 72 2e 0a 2a 2a 20 54 68 65 20 66  ->nErr..** The f
10e0: 6f 6c 6c 6f 77 69 6e 67 20 66 6f 72 6d 61 74 74  ollowing formatt
10f0: 69 6e 67 20 63 68 61 72 61 63 74 65 72 73 20 61  ing characters a
1100: 72 65 20 61 6c 6c 6f 77 65 64 3a 0a 2a 2a 0a 2a  re allowed:.**.*
1110: 2a 20 20 20 20 20 20 25 73 20 20 20 20 20 20 49  *      %s      I
1120: 6e 73 65 72 74 20 61 20 73 74 72 69 6e 67 0a 2a  nsert a string.*
1130: 2a 20 20 20 20 20 20 25 7a 20 20 20 20 20 20 41  *      %z      A
1140: 20 73 74 72 69 6e 67 20 74 68 61 74 20 73 68 6f   string that sho
1150: 75 6c 64 20 62 65 20 66 72 65 65 64 20 61 66 74  uld be freed aft
1160: 65 72 20 75 73 65 0a 2a 2a 20 20 20 20 20 20 25  er use.**      %
1170: 64 20 20 20 20 20 20 49 6e 73 65 72 74 20 61 6e  d      Insert an
1180: 20 69 6e 74 65 67 65 72 0a 2a 2a 20 20 20 20 20   integer.**     
1190: 20 25 54 20 20 20 20 20 20 49 6e 73 65 72 74 20   %T      Insert 
11a0: 61 20 74 6f 6b 65 6e 0a 2a 2a 20 20 20 20 20 20  a token.**      
11b0: 25 53 20 20 20 20 20 20 49 6e 73 65 72 74 20 74  %S      Insert t
11c0: 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74  he first element
11d0: 20 6f 66 20 61 20 53 72 63 4c 69 73 74 0a 2a 2a   of a SrcList.**
11e0: 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f  .** This functio
11f0: 6e 20 73 68 6f 75 6c 64 20 62 65 20 75 73 65 64  n should be used
1200: 20 74 6f 20 72 65 70 6f 72 74 20 61 6e 79 20 65   to report any e
1210: 72 72 6f 72 20 74 68 61 74 20 6f 63 63 75 72 73  rror that occurs
1220: 20 77 68 69 6c 73 74 0a 2a 2a 20 63 6f 6d 70 69   whilst.** compi
1230: 6c 69 6e 67 20 61 6e 20 53 51 4c 20 73 74 61 74  ling an SQL stat
1240: 65 6d 65 6e 74 20 28 69 2e 65 2e 20 77 69 74 68  ement (i.e. with
1250: 69 6e 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61  in sqlite3_prepa
1260: 72 65 28 29 29 2e 20 54 68 65 0a 2a 2a 20 6c 61  re()). The.** la
1270: 73 74 20 74 68 69 6e 67 20 74 68 65 20 73 71 6c  st thing the sql
1280: 69 74 65 33 5f 70 72 65 70 61 72 65 28 29 20 66  ite3_prepare() f
1290: 75 6e 63 74 69 6f 6e 20 64 6f 65 73 20 69 73 20  unction does is 
12a0: 63 6f 70 79 20 74 68 65 20 65 72 72 6f 72 0a 2a  copy the error.*
12b0: 2a 20 73 74 6f 72 65 64 20 62 79 20 74 68 69 73  * stored by this
12c0: 20 66 75 6e 63 74 69 6f 6e 20 69 6e 74 6f 20 74   function into t
12d0: 68 65 20 64 61 74 61 62 61 73 65 20 68 61 6e 64  he database hand
12e0: 6c 65 20 75 73 69 6e 67 20 73 71 6c 69 74 65 33  le using sqlite3
12f0: 45 72 72 6f 72 28 29 2e 0a 2a 2a 20 46 75 6e 63  Error()..** Func
1300: 74 69 6f 6e 20 73 71 6c 69 74 65 33 45 72 72 6f  tion sqlite3Erro
1310: 72 28 29 20 73 68 6f 75 6c 64 20 62 65 20 75 73  r() should be us
1320: 65 64 20 64 75 72 69 6e 67 20 73 74 61 74 65 6d  ed during statem
1330: 65 6e 74 20 65 78 65 63 75 74 69 6f 6e 0a 2a 2a  ent execution.**
1340: 20 28 73 71 6c 69 74 65 33 5f 73 74 65 70 28 29   (sqlite3_step()
1350: 20 65 74 63 2e 29 2e 0a 2a 2f 0a 76 6f 69 64 20   etc.)..*/.void 
1360: 73 71 6c 69 74 65 33 45 72 72 6f 72 4d 73 67 28  sqlite3ErrorMsg(
1370: 50 61 72 73 65 20 2a 70 50 61 72 73 65 2c 20 63  Parse *pParse, c
1380: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d  onst char *zForm
1390: 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 63 68 61 72  at, ...){.  char
13a0: 20 2a 7a 4d 73 67 3b 0a 20 20 76 61 5f 6c 69 73   *zMsg;.  va_lis
13b0: 74 20 61 70 3b 0a 20 20 73 71 6c 69 74 65 33 20  t ap;.  sqlite3 
13c0: 2a 64 62 20 3d 20 70 50 61 72 73 65 2d 3e 64 62  *db = pParse->db
13d0: 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c  ;.  va_start(ap,
13e0: 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 7a 4d 73   zFormat);.  zMs
13f0: 67 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 69  g = sqlite3VMPri
1400: 6e 74 66 28 64 62 2c 20 7a 46 6f 72 6d 61 74 2c  ntf(db, zFormat,
1410: 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61   ap);.  va_end(a
1420: 70 29 3b 0a 20 20 69 66 28 20 64 62 2d 3e 73 75  p);.  if( db->su
1430: 70 70 72 65 73 73 45 72 72 20 29 7b 0a 20 20 20  ppressErr ){.   
1440: 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 28 64   sqlite3DbFree(d
1450: 62 2c 20 7a 4d 73 67 29 3b 0a 20 20 7d 65 6c 73  b, zMsg);.  }els
1460: 65 7b 0a 20 20 20 20 70 50 61 72 73 65 2d 3e 6e  e{.    pParse->n
1470: 45 72 72 2b 2b 3b 0a 20 20 20 20 73 71 6c 69 74  Err++;.    sqlit
1480: 65 33 44 62 46 72 65 65 28 64 62 2c 20 70 50 61  e3DbFree(db, pPa
1490: 72 73 65 2d 3e 7a 45 72 72 4d 73 67 29 3b 0a 20  rse->zErrMsg);. 
14a0: 20 20 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d     pParse->zErrM
14b0: 73 67 20 3d 20 7a 4d 73 67 3b 0a 20 20 20 20 70  sg = zMsg;.    p
14c0: 50 61 72 73 65 2d 3e 72 63 20 3d 20 53 51 4c 49  Parse->rc = SQLI
14d0: 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 7d 0a  TE_ERROR;.  }.}.
14e0: 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 61  ./*.** Convert a
14f0: 6e 20 53 51 4c 2d 73 74 79 6c 65 20 71 75 6f 74  n SQL-style quot
1500: 65 64 20 73 74 72 69 6e 67 20 69 6e 74 6f 20 61  ed string into a
1510: 20 6e 6f 72 6d 61 6c 20 73 74 72 69 6e 67 20 62   normal string b
1520: 79 20 72 65 6d 6f 76 69 6e 67 0a 2a 2a 20 74 68  y removing.** th
1530: 65 20 71 75 6f 74 65 20 63 68 61 72 61 63 74 65  e quote characte
1540: 72 73 2e 20 20 54 68 65 20 63 6f 6e 76 65 72 73  rs.  The convers
1550: 69 6f 6e 20 69 73 20 64 6f 6e 65 20 69 6e 2d 70  ion is done in-p
1560: 6c 61 63 65 2e 20 20 49 66 20 74 68 65 0a 2a 2a  lace.  If the.**
1570: 20 69 6e 70 75 74 20 64 6f 65 73 20 6e 6f 74 20   input does not 
1580: 62 65 67 69 6e 20 77 69 74 68 20 61 20 71 75 6f  begin with a quo
1590: 74 65 20 63 68 61 72 61 63 74 65 72 2c 20 74 68  te character, th
15a0: 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 0a  en this routine.
15b0: 2a 2a 20 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a 2a  ** is a no-op..*
15c0: 2a 0a 2a 2a 20 54 68 65 20 69 6e 70 75 74 20 73  *.** The input s
15d0: 74 72 69 6e 67 20 6d 75 73 74 20 62 65 20 7a 65  tring must be ze
15e0: 72 6f 2d 74 65 72 6d 69 6e 61 74 65 64 2e 20 20  ro-terminated.  
15f0: 41 20 6e 65 77 20 7a 65 72 6f 2d 74 65 72 6d 69  A new zero-termi
1600: 6e 61 74 6f 72 0a 2a 2a 20 69 73 20 61 64 64 65  nator.** is adde
1610: 64 20 74 6f 20 74 68 65 20 64 65 71 75 6f 74 65  d to the dequote
1620: 64 20 73 74 72 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20  d string..**.** 
1630: 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65  The return value
1640: 20 69 73 20 2d 31 20 69 66 20 6e 6f 20 64 65 71   is -1 if no deq
1650: 75 6f 74 69 6e 67 20 6f 63 63 75 72 73 20 6f 72  uoting occurs or
1660: 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 74   the length of t
1670: 68 65 0a 2a 2a 20 64 65 71 75 6f 74 65 64 20 73  he.** dequoted s
1680: 74 72 69 6e 67 2c 20 65 78 63 6c 75 73 69 76 65  tring, exclusive
1690: 20 6f 66 20 74 68 65 20 7a 65 72 6f 20 74 65 72   of the zero ter
16a0: 6d 69 6e 61 74 6f 72 2c 20 69 66 20 64 65 71 75  minator, if dequ
16b0: 6f 74 69 6e 67 20 64 6f 65 73 0a 2a 2a 20 6f 63  oting does.** oc
16c0: 63 75 72 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 32 2d  cur..**.** 2002-
16d0: 46 65 62 2d 31 34 3a 20 54 68 69 73 20 72 6f 75  Feb-14: This rou
16e0: 74 69 6e 65 20 69 73 20 65 78 74 65 6e 64 65 64  tine is extended
16f0: 20 74 6f 20 72 65 6d 6f 76 65 20 4d 53 2d 41 63   to remove MS-Ac
1700: 63 65 73 73 20 73 74 79 6c 65 0a 2a 2a 20 62 72  cess style.** br
1710: 61 63 6b 65 74 73 20 66 72 6f 6d 20 61 72 6f 75  ackets from arou
1720: 6e 64 20 69 64 65 6e 74 69 66 65 72 73 2e 20 20  nd identifers.  
1730: 46 6f 72 20 65 78 61 6d 70 6c 65 3a 20 20 22 5b  For example:  "[
1740: 61 2d 62 2d 63 5d 22 20 62 65 63 6f 6d 65 73 0a  a-b-c]" becomes.
1750: 2a 2a 20 22 61 2d 62 2d 63 22 2e 0a 2a 2f 0a 69  ** "a-b-c"..*/.i
1760: 6e 74 20 73 71 6c 69 74 65 33 44 65 71 75 6f 74  nt sqlite3Dequot
1770: 65 28 63 68 61 72 20 2a 7a 29 7b 0a 20 20 63 68  e(char *z){.  ch
1780: 61 72 20 71 75 6f 74 65 3b 0a 20 20 69 6e 74 20  ar quote;.  int 
1790: 69 2c 20 6a 3b 0a 20 20 69 66 28 20 7a 3d 3d 30  i, j;.  if( z==0
17a0: 20 29 20 72 65 74 75 72 6e 20 2d 31 3b 0a 20 20   ) return -1;.  
17b0: 71 75 6f 74 65 20 3d 20 7a 5b 30 5d 3b 0a 20 20  quote = z[0];.  
17c0: 73 77 69 74 63 68 28 20 71 75 6f 74 65 20 29 7b  switch( quote ){
17d0: 0a 20 20 20 20 63 61 73 65 20 27 5c 27 27 3a 20  .    case '\'': 
17e0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65   break;.    case
17f0: 20 27 22 27 3a 20 20 20 62 72 65 61 6b 3b 0a 20   '"':   break;. 
1800: 20 20 20 63 61 73 65 20 27 60 27 3a 20 20 20 62     case '`':   b
1810: 72 65 61 6b 3b 20 20 20 20 20 20 20 20 20 20 20  reak;           
1820: 20 20 20 20 20 2f 2a 20 46 6f 72 20 4d 79 53 51       /* For MySQ
1830: 4c 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20  L compatibility 
1840: 2a 2f 0a 20 20 20 20 63 61 73 65 20 27 5b 27 3a  */.    case '[':
1850: 20 20 20 71 75 6f 74 65 20 3d 20 27 5d 27 3b 20     quote = ']'; 
1860: 20 62 72 65 61 6b 3b 20 20 2f 2a 20 46 6f 72 20   break;  /* For 
1870: 4d 53 20 53 71 6c 53 65 72 76 65 72 20 63 6f 6d  MS SqlServer com
1880: 70 61 74 69 62 69 6c 69 74 79 20 2a 2f 0a 20 20  patibility */.  
1890: 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20 72 65    default:    re
18a0: 74 75 72 6e 20 2d 31 3b 0a 20 20 7d 0a 20 20 66  turn -1;.  }.  f
18b0: 6f 72 28 69 3d 31 2c 20 6a 3d 30 3b 20 41 4c 57  or(i=1, j=0; ALW
18c0: 41 59 53 28 7a 5b 69 5d 29 3b 20 69 2b 2b 29 7b  AYS(z[i]); i++){
18d0: 0a 20 20 20 20 69 66 28 20 7a 5b 69 5d 3d 3d 71  .    if( z[i]==q
18e0: 75 6f 74 65 20 29 7b 0a 20 20 20 20 20 20 69 66  uote ){.      if
18f0: 28 20 7a 5b 69 2b 31 5d 3d 3d 71 75 6f 74 65 20  ( z[i+1]==quote 
1900: 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b  ){.        z[j++
1910: 5d 20 3d 20 71 75 6f 74 65 3b 0a 20 20 20 20 20  ] = quote;.     
1920: 20 20 20 69 2b 2b 3b 0a 20 20 20 20 20 20 7d 65     i++;.      }e
1930: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 62 72 65  lse{.        bre
1940: 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  ak;.      }.    
1950: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 7a 5b 6a  }else{.      z[j
1960: 2b 2b 5d 20 3d 20 7a 5b 69 5d 3b 0a 20 20 20 20  ++] = z[i];.    
1970: 7d 0a 20 20 7d 0a 20 20 7a 5b 6a 5d 20 3d 20 30  }.  }.  z[j] = 0
1980: 3b 0a 20 20 72 65 74 75 72 6e 20 6a 3b 0a 7d 0a  ;.  return j;.}.
1990: 0a 2f 2a 20 43 6f 6e 76 65 6e 69 65 6e 74 20 73  ./* Convenient s
19a0: 68 6f 72 74 2d 68 61 6e 64 20 2a 2f 0a 23 64 65  hort-hand */.#de
19b0: 66 69 6e 65 20 55 70 70 65 72 54 6f 4c 6f 77 65  fine UpperToLowe
19c0: 72 20 73 71 6c 69 74 65 33 55 70 70 65 72 54 6f  r sqlite3UpperTo
19d0: 4c 6f 77 65 72 0a 0a 2f 2a 0a 2a 2a 20 53 6f 6d  Lower../*.** Som
19e0: 65 20 73 79 73 74 65 6d 73 20 68 61 76 65 20 73  e systems have s
19f0: 74 72 69 63 6d 70 28 29 2e 20 20 4f 74 68 65 72  tricmp().  Other
1a00: 73 20 68 61 76 65 20 73 74 72 63 61 73 65 63 6d  s have strcasecm
1a10: 70 28 29 2e 20 20 42 65 63 61 75 73 65 0a 2a 2a  p().  Because.**
1a20: 20 74 68 65 72 65 20 69 73 20 6e 6f 20 63 6f 6e   there is no con
1a30: 73 69 73 74 65 6e 63 79 2c 20 77 65 20 77 69 6c  sistency, we wil
1a40: 6c 20 64 65 66 69 6e 65 20 6f 75 72 20 6f 77 6e  l define our own
1a50: 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 4c 45 4d 45 4e  ..**.** IMPLEMEN
1a60: 54 41 54 49 4f 4e 2d 4f 46 3a 20 52 2d 32 30 35  TATION-OF: R-205
1a70: 32 32 2d 32 34 36 33 39 20 54 68 65 20 73 71 6c  22-24639 The sql
1a80: 69 74 65 33 5f 73 74 72 6e 69 63 6d 70 28 29 20  ite3_strnicmp() 
1a90: 41 50 49 20 61 6c 6c 6f 77 73 0a 2a 2a 20 61 70  API allows.** ap
1aa0: 70 6c 69 63 61 74 69 6f 6e 73 20 61 6e 64 20 65  plications and e
1ab0: 78 74 65 6e 73 69 6f 6e 73 20 74 6f 20 63 6f 6d  xtensions to com
1ac0: 70 61 72 65 20 74 68 65 20 63 6f 6e 74 65 6e 74  pare the content
1ad0: 73 20 6f 66 20 74 77 6f 20 62 75 66 66 65 72 73  s of two buffers
1ae0: 0a 2a 2a 20 63 6f 6e 74 61 69 6e 69 6e 67 20 55  .** containing U
1af0: 54 46 2d 38 20 73 74 72 69 6e 67 73 20 69 6e 20  TF-8 strings in 
1b00: 61 20 63 61 73 65 2d 69 6e 64 65 70 65 6e 64 65  a case-independe
1b10: 6e 74 20 66 61 73 68 69 6f 6e 2c 20 75 73 69 6e  nt fashion, usin
1b20: 67 20 74 68 65 20 73 61 6d 65 0a 2a 2a 20 64 65  g the same.** de
1b30: 66 69 6e 69 74 69 6f 6e 20 6f 66 20 63 61 73 65  finition of case
1b40: 20 69 6e 64 65 70 65 6e 64 65 6e 63 65 20 74 68   independence th
1b50: 61 74 20 53 51 4c 69 74 65 20 75 73 65 73 20 69  at SQLite uses i
1b60: 6e 74 65 72 6e 61 6c 6c 79 20 77 68 65 6e 0a 2a  nternally when.*
1b70: 2a 20 63 6f 6d 70 61 72 69 6e 67 20 69 64 65 6e  * comparing iden
1b80: 74 69 66 69 65 72 73 2e 0a 2a 2f 0a 69 6e 74 20  tifiers..*/.int 
1b90: 73 71 6c 69 74 65 33 53 74 72 49 43 6d 70 28 63  sqlite3StrICmp(c
1ba0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c 65 66 74  onst char *zLeft
1bb0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52  , const char *zR
1bc0: 69 67 68 74 29 7b 0a 20 20 72 65 67 69 73 74 65  ight){.  registe
1bd0: 72 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  r unsigned char 
1be0: 2a 61 2c 20 2a 62 3b 0a 20 20 61 20 3d 20 28 75  *a, *b;.  a = (u
1bf0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a  nsigned char *)z
1c00: 4c 65 66 74 3b 0a 20 20 62 20 3d 20 28 75 6e 73  Left;.  b = (uns
1c10: 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a 52 69  igned char *)zRi
1c20: 67 68 74 3b 0a 20 20 77 68 69 6c 65 28 20 2a 61  ght;.  while( *a
1c30: 21 3d 30 20 26 26 20 55 70 70 65 72 54 6f 4c 6f  !=0 && UpperToLo
1c40: 77 65 72 5b 2a 61 5d 3d 3d 55 70 70 65 72 54 6f  wer[*a]==UpperTo
1c50: 4c 6f 77 65 72 5b 2a 62 5d 29 7b 20 61 2b 2b 3b  Lower[*b]){ a++;
1c60: 20 62 2b 2b 3b 20 7d 0a 20 20 72 65 74 75 72 6e   b++; }.  return
1c70: 20 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 61   UpperToLower[*a
1c80: 5d 20 2d 20 55 70 70 65 72 54 6f 4c 6f 77 65 72  ] - UpperToLower
1c90: 5b 2a 62 5d 3b 0a 7d 0a 69 6e 74 20 73 71 6c 69  [*b];.}.int sqli
1ca0: 74 65 33 5f 73 74 72 6e 69 63 6d 70 28 63 6f 6e  te3_strnicmp(con
1cb0: 73 74 20 63 68 61 72 20 2a 7a 4c 65 66 74 2c 20  st char *zLeft, 
1cc0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 69 67  const char *zRig
1cd0: 68 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65  ht, int N){.  re
1ce0: 67 69 73 74 65 72 20 75 6e 73 69 67 6e 65 64 20  gister unsigned 
1cf0: 63 68 61 72 20 2a 61 2c 20 2a 62 3b 0a 20 20 61  char *a, *b;.  a
1d00: 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61   = (unsigned cha
1d10: 72 20 2a 29 7a 4c 65 66 74 3b 0a 20 20 62 20 3d  r *)zLeft;.  b =
1d20: 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20   (unsigned char 
1d30: 2a 29 7a 52 69 67 68 74 3b 0a 20 20 77 68 69 6c  *)zRight;.  whil
1d40: 65 28 20 4e 2d 2d 20 3e 20 30 20 26 26 20 2a 61  e( N-- > 0 && *a
1d50: 21 3d 30 20 26 26 20 55 70 70 65 72 54 6f 4c 6f  !=0 && UpperToLo
1d60: 77 65 72 5b 2a 61 5d 3d 3d 55 70 70 65 72 54 6f  wer[*a]==UpperTo
1d70: 4c 6f 77 65 72 5b 2a 62 5d 29 7b 20 61 2b 2b 3b  Lower[*b]){ a++;
1d80: 20 62 2b 2b 3b 20 7d 0a 20 20 72 65 74 75 72 6e   b++; }.  return
1d90: 20 4e 3c 30 20 3f 20 30 20 3a 20 55 70 70 65 72   N<0 ? 0 : Upper
1da0: 54 6f 4c 6f 77 65 72 5b 2a 61 5d 20 2d 20 55 70  ToLower[*a] - Up
1db0: 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 62 5d 3b 0a  perToLower[*b];.
1dc0: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 73 74 72  }../*.** The str
1dd0: 69 6e 67 20 7a 5b 5d 20 69 73 20 61 6e 20 74 65  ing z[] is an te
1de0: 78 74 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f  xt representatio
1df0: 6e 20 6f 66 20 61 20 72 65 61 6c 20 6e 75 6d 62  n of a real numb
1e00: 65 72 2e 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 74  er..** Convert t
1e10: 68 69 73 20 73 74 72 69 6e 67 20 74 6f 20 61 20  his string to a 
1e20: 64 6f 75 62 6c 65 20 61 6e 64 20 77 72 69 74 65  double and write
1e30: 20 69 74 20 69 6e 74 6f 20 2a 70 52 65 73 75 6c   it into *pResul
1e40: 74 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 73 74 72  t..**.** The str
1e50: 69 6e 67 20 7a 5b 5d 20 69 73 20 6c 65 6e 67 74  ing z[] is lengt
1e60: 68 20 62 79 74 65 73 20 69 6e 20 6c 65 6e 67 74  h bytes in lengt
1e70: 68 20 28 62 79 74 65 73 2c 20 6e 6f 74 20 63 68  h (bytes, not ch
1e80: 61 72 61 63 74 65 72 73 29 20 61 6e 64 0a 2a 2a  aracters) and.**
1e90: 20 75 73 65 73 20 74 68 65 20 65 6e 63 6f 64 69   uses the encodi
1ea0: 6e 67 20 65 6e 63 2e 20 20 54 68 65 20 73 74 72  ng enc.  The str
1eb0: 69 6e 67 20 69 73 20 6e 6f 74 20 6e 65 63 65 73  ing is not neces
1ec0: 73 61 72 69 6c 79 20 7a 65 72 6f 2d 74 65 72 6d  sarily zero-term
1ed0: 69 6e 61 74 65 64 2e 0a 2a 2a 0a 2a 2a 20 52 65  inated..**.** Re
1ee0: 74 75 72 6e 20 54 52 55 45 20 69 66 20 74 68 65  turn TRUE if the
1ef0: 20 72 65 73 75 6c 74 20 69 73 20 61 20 76 61 6c   result is a val
1f00: 69 64 20 72 65 61 6c 20 6e 75 6d 62 65 72 20 28  id real number (
1f10: 6f 72 20 69 6e 74 65 67 65 72 29 20 61 6e 64 20  or integer) and 
1f20: 46 41 4c 53 45 0a 2a 2a 20 69 66 20 74 68 65 20  FALSE.** if the 
1f30: 73 74 72 69 6e 67 20 69 73 20 65 6d 70 74 79 20  string is empty 
1f40: 6f 72 20 63 6f 6e 74 61 69 6e 73 20 65 78 74 72  or contains extr
1f50: 61 6e 65 6f 75 73 20 74 65 78 74 2e 20 20 56 61  aneous text.  Va
1f60: 6c 69 64 20 6e 75 6d 62 65 72 73 0a 2a 2a 20 61  lid numbers.** a
1f70: 72 65 20 69 6e 20 6f 6e 65 20 6f 66 20 74 68 65  re in one of the
1f80: 73 65 20 66 6f 72 6d 61 74 73 3a 0a 2a 2a 0a 2a  se formats:.**.*
1f90: 2a 20 20 20 20 5b 2b 2d 5d 64 69 67 69 74 73 5b  *    [+-]digits[
1fa0: 45 5b 2b 2d 5d 64 69 67 69 74 73 5d 0a 2a 2a 20  E[+-]digits].** 
1fb0: 20 20 20 5b 2b 2d 5d 64 69 67 69 74 73 2e 5b 64     [+-]digits.[d
1fc0: 69 67 69 74 73 5d 5b 45 5b 2b 2d 5d 64 69 67 69  igits][E[+-]digi
1fd0: 74 73 5d 0a 2a 2a 20 20 20 20 5b 2b 2d 5d 2e 64  ts].**    [+-].d
1fe0: 69 67 69 74 73 5b 45 5b 2b 2d 5d 64 69 67 69 74  igits[E[+-]digit
1ff0: 73 5d 0a 2a 2a 0a 2a 2a 20 4c 65 61 64 69 6e 67  s].**.** Leading
2000: 20 61 6e 64 20 74 72 61 69 6c 69 6e 67 20 77 68   and trailing wh
2010: 69 74 65 73 70 61 63 65 20 69 73 20 69 67 6e 6f  itespace is igno
2020: 72 65 64 20 66 6f 72 20 74 68 65 20 70 75 72 70  red for the purp
2030: 6f 73 65 20 6f 66 20 64 65 74 65 72 6d 69 6e 69  ose of determini
2040: 6e 67 0a 2a 2a 20 76 61 6c 69 64 69 74 79 2e 0a  ng.** validity..
2050: 2a 2a 0a 2a 2a 20 49 66 20 73 6f 6d 65 20 70 72  **.** If some pr
2060: 65 66 69 78 20 6f 66 20 74 68 65 20 69 6e 70 75  efix of the inpu
2070: 74 20 73 74 72 69 6e 67 20 69 73 20 61 20 76 61  t string is a va
2080: 6c 69 64 20 6e 75 6d 62 65 72 2c 20 74 68 69 73  lid number, this
2090: 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 72 65 74 75   routine.** retu
20a0: 72 6e 73 20 46 41 4c 53 45 20 62 75 74 20 69 74  rns FALSE but it
20b0: 20 73 74 69 6c 6c 20 63 6f 6e 76 65 72 74 73 20   still converts 
20c0: 74 68 65 20 70 72 65 66 69 78 20 61 6e 64 20 77  the prefix and w
20d0: 72 69 74 65 73 20 74 68 65 20 72 65 73 75 6c 74  rites the result
20e0: 0a 2a 2a 20 69 6e 74 6f 20 2a 70 52 65 73 75 6c  .** into *pResul
20f0: 74 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  t..*/.int sqlite
2100: 33 41 74 6f 46 28 63 6f 6e 73 74 20 63 68 61 72  3AtoF(const char
2110: 20 2a 7a 2c 20 64 6f 75 62 6c 65 20 2a 70 52 65   *z, double *pRe
2120: 73 75 6c 74 2c 20 69 6e 74 20 6c 65 6e 67 74 68  sult, int length
2130: 2c 20 75 38 20 65 6e 63 29 7b 0a 23 69 66 6e 64  , u8 enc){.#ifnd
2140: 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46  ef SQLITE_OMIT_F
2150: 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20  LOATING_POINT.  
2160: 69 6e 74 20 69 6e 63 72 20 3d 20 28 65 6e 63 3d  int incr = (enc=
2170: 3d 53 51 4c 49 54 45 5f 55 54 46 38 3f 31 3a 32  =SQLITE_UTF8?1:2
2180: 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  );.  const char 
2190: 2a 7a 45 6e 64 20 3d 20 7a 20 2b 20 6c 65 6e 67  *zEnd = z + leng
21a0: 74 68 3b 0a 20 20 2f 2a 20 73 69 67 6e 20 2a 20  th;.  /* sign * 
21b0: 73 69 67 6e 69 66 69 63 61 6e 64 20 2a 20 28 31  significand * (1
21c0: 30 20 5e 20 28 65 73 69 67 6e 20 2a 20 65 78 70  0 ^ (esign * exp
21d0: 6f 6e 65 6e 74 29 29 20 2a 2f 0a 20 20 69 6e 74  onent)) */.  int
21e0: 20 73 69 67 6e 20 3d 20 31 3b 20 20 20 20 2f 2a   sign = 1;    /*
21f0: 20 73 69 67 6e 20 6f 66 20 73 69 67 6e 69 66 69   sign of signifi
2200: 63 61 6e 64 20 2a 2f 0a 20 20 69 36 34 20 73 20  cand */.  i64 s 
2210: 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a 20 73 69  = 0;       /* si
2220: 67 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20 69  gnificand */.  i
2230: 6e 74 20 64 20 3d 20 30 3b 20 20 20 20 20 20 20  nt d = 0;       
2240: 2f 2a 20 61 64 6a 75 73 74 20 65 78 70 6f 6e 65  /* adjust expone
2250: 6e 74 20 66 6f 72 20 73 68 69 66 74 69 6e 67 20  nt for shifting 
2260: 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 20 2a 2f  decimal point */
2270: 0a 20 20 69 6e 74 20 65 73 69 67 6e 20 3d 20 31  .  int esign = 1
2280: 3b 20 20 20 2f 2a 20 73 69 67 6e 20 6f 66 20 65  ;   /* sign of e
2290: 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20 69 6e 74  xponent */.  int
22a0: 20 65 20 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a   e = 0;       /*
22b0: 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20 69   exponent */.  i
22c0: 6e 74 20 65 56 61 6c 69 64 20 3d 20 31 3b 20 20  nt eValid = 1;  
22d0: 2f 2a 20 54 72 75 65 20 65 78 70 6f 6e 65 6e 74  /* True exponent
22e0: 20 69 73 20 65 69 74 68 65 72 20 6e 6f 74 20 75   is either not u
22f0: 73 65 64 20 6f 72 20 69 73 20 77 65 6c 6c 2d 66  sed or is well-f
2300: 6f 72 6d 65 64 20 2a 2f 0a 20 20 64 6f 75 62 6c  ormed */.  doubl
2310: 65 20 72 65 73 75 6c 74 3b 0a 20 20 69 6e 74 20  e result;.  int 
2320: 6e 44 69 67 69 74 73 20 3d 20 30 3b 0a 0a 20 20  nDigits = 0;..  
2330: 2a 70 52 65 73 75 6c 74 20 3d 20 30 2e 30 3b 20  *pResult = 0.0; 
2340: 20 20 2f 2a 20 44 65 66 61 75 6c 74 20 72 65 74    /* Default ret
2350: 75 72 6e 20 76 61 6c 75 65 2c 20 69 6e 20 63 61  urn value, in ca
2360: 73 65 20 6f 66 20 61 6e 20 65 72 72 6f 72 20 2a  se of an error *
2370: 2f 0a 0a 20 20 69 66 28 20 65 6e 63 3d 3d 53 51  /..  if( enc==SQ
2380: 4c 49 54 45 5f 55 54 46 31 36 42 45 20 29 20 7a  LITE_UTF16BE ) z
2390: 2b 2b 3b 0a 0a 20 20 2f 2a 20 73 6b 69 70 20 6c  ++;..  /* skip l
23a0: 65 61 64 69 6e 67 20 73 70 61 63 65 73 20 2a 2f  eading spaces */
23b0: 0a 20 20 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64  .  while( z<zEnd
23c0: 20 26 26 20 73 71 6c 69 74 65 33 49 73 73 70 61   && sqlite3Isspa
23d0: 63 65 28 2a 7a 29 20 29 20 7a 2b 3d 69 6e 63 72  ce(*z) ) z+=incr
23e0: 3b 0a 20 20 69 66 28 20 7a 3e 3d 7a 45 6e 64 20  ;.  if( z>=zEnd 
23f0: 29 20 72 65 74 75 72 6e 20 30 3b 0a 0a 20 20 2f  ) return 0;..  /
2400: 2a 20 67 65 74 20 73 69 67 6e 20 6f 66 20 73 69  * get sign of si
2410: 67 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20 69  gnificand */.  i
2420: 66 28 20 2a 7a 3d 3d 27 2d 27 20 29 7b 0a 20 20  f( *z=='-' ){.  
2430: 20 20 73 69 67 6e 20 3d 20 2d 31 3b 0a 20 20 20    sign = -1;.   
2440: 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 7d 65 6c 73   z+=incr;.  }els
2450: 65 20 69 66 28 20 2a 7a 3d 3d 27 2b 27 20 29 7b  e if( *z=='+' ){
2460: 0a 20 20 20 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20  .    z+=incr;.  
2470: 7d 0a 0a 20 20 2f 2a 20 73 6b 69 70 20 6c 65 61  }..  /* skip lea
2480: 64 69 6e 67 20 7a 65 72 6f 65 73 20 2a 2f 0a 20  ding zeroes */. 
2490: 20 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64 20 26   while( z<zEnd &
24a0: 26 20 7a 5b 30 5d 3d 3d 27 30 27 20 29 20 7a 2b  & z[0]=='0' ) z+
24b0: 3d 69 6e 63 72 2c 20 6e 44 69 67 69 74 73 2b 2b  =incr, nDigits++
24c0: 3b 0a 0a 20 20 2f 2a 20 63 6f 70 79 20 6d 61 78  ;..  /* copy max
24d0: 20 73 69 67 6e 69 66 69 63 61 6e 74 20 64 69 67   significant dig
24e0: 69 74 73 20 74 6f 20 73 69 67 6e 69 66 69 63 61  its to significa
24f0: 6e 64 20 2a 2f 0a 20 20 77 68 69 6c 65 28 20 7a  nd */.  while( z
2500: 3c 7a 45 6e 64 20 26 26 20 73 71 6c 69 74 65 33  <zEnd && sqlite3
2510: 49 73 64 69 67 69 74 28 2a 7a 29 20 26 26 20 73  Isdigit(*z) && s
2520: 3c 28 28 4c 41 52 47 45 53 54 5f 49 4e 54 36 34  <((LARGEST_INT64
2530: 2d 39 29 2f 31 30 29 20 29 7b 0a 20 20 20 20 73  -9)/10) ){.    s
2540: 20 3d 20 73 2a 31 30 20 2b 20 28 2a 7a 20 2d 20   = s*10 + (*z - 
2550: 27 30 27 29 3b 0a 20 20 20 20 7a 2b 3d 69 6e 63  '0');.    z+=inc
2560: 72 2c 20 6e 44 69 67 69 74 73 2b 2b 3b 0a 20 20  r, nDigits++;.  
2570: 7d 0a 0a 20 20 2f 2a 20 73 6b 69 70 20 6e 6f 6e  }..  /* skip non
2580: 2d 73 69 67 6e 69 66 69 63 61 6e 74 20 73 69 67  -significant sig
2590: 6e 69 66 69 63 61 6e 64 20 64 69 67 69 74 73 0a  nificand digits.
25a0: 20 20 2a 2a 20 28 69 6e 63 72 65 61 73 65 20 65    ** (increase e
25b0: 78 70 6f 6e 65 6e 74 20 62 79 20 64 20 74 6f 20  xponent by d to 
25c0: 73 68 69 66 74 20 64 65 63 69 6d 61 6c 20 6c 65  shift decimal le
25d0: 66 74 29 20 2a 2f 0a 20 20 77 68 69 6c 65 28 20  ft) */.  while( 
25e0: 7a 3c 7a 45 6e 64 20 26 26 20 73 71 6c 69 74 65  z<zEnd && sqlite
25f0: 33 49 73 64 69 67 69 74 28 2a 7a 29 20 29 20 7a  3Isdigit(*z) ) z
2600: 2b 3d 69 6e 63 72 2c 20 6e 44 69 67 69 74 73 2b  +=incr, nDigits+
2610: 2b 2c 20 64 2b 2b 3b 0a 20 20 69 66 28 20 7a 3e  +, d++;.  if( z>
2620: 3d 7a 45 6e 64 20 29 20 67 6f 74 6f 20 64 6f 5f  =zEnd ) goto do_
2630: 61 74 6f 66 5f 63 61 6c 63 3b 0a 0a 20 20 2f 2a  atof_calc;..  /*
2640: 20 69 66 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e   if decimal poin
2650: 74 20 69 73 20 70 72 65 73 65 6e 74 20 2a 2f 0a  t is present */.
2660: 20 20 69 66 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b    if( *z=='.' ){
2670: 0a 20 20 20 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20  .    z+=incr;.  
2680: 20 20 2f 2a 20 63 6f 70 79 20 64 69 67 69 74 73    /* copy digits
2690: 20 66 72 6f 6d 20 61 66 74 65 72 20 64 65 63 69   from after deci
26a0: 6d 61 6c 20 74 6f 20 73 69 67 6e 69 66 69 63 61  mal to significa
26b0: 6e 64 0a 20 20 20 20 2a 2a 20 28 64 65 63 72 65  nd.    ** (decre
26c0: 61 73 65 20 65 78 70 6f 6e 65 6e 74 20 62 79 20  ase exponent by 
26d0: 64 20 74 6f 20 73 68 69 66 74 20 64 65 63 69 6d  d to shift decim
26e0: 61 6c 20 72 69 67 68 74 29 20 2a 2f 0a 20 20 20  al right) */.   
26f0: 20 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64 20 26   while( z<zEnd &
2700: 26 20 73 71 6c 69 74 65 33 49 73 64 69 67 69 74  & sqlite3Isdigit
2710: 28 2a 7a 29 20 26 26 20 73 3c 28 28 4c 41 52 47  (*z) && s<((LARG
2720: 45 53 54 5f 49 4e 54 36 34 2d 39 29 2f 31 30 29  EST_INT64-9)/10)
2730: 20 29 7b 0a 20 20 20 20 20 20 73 20 3d 20 73 2a   ){.      s = s*
2740: 31 30 20 2b 20 28 2a 7a 20 2d 20 27 30 27 29 3b  10 + (*z - '0');
2750: 0a 20 20 20 20 20 20 7a 2b 3d 69 6e 63 72 2c 20  .      z+=incr, 
2760: 6e 44 69 67 69 74 73 2b 2b 2c 20 64 2d 2d 3b 0a  nDigits++, d--;.
2770: 20 20 20 20 7d 0a 20 20 20 20 2f 2a 20 73 6b 69      }.    /* ski
2780: 70 20 6e 6f 6e 2d 73 69 67 6e 69 66 69 63 61 6e  p non-significan
2790: 74 20 64 69 67 69 74 73 20 2a 2f 0a 20 20 20 20  t digits */.    
27a0: 77 68 69 6c 65 28 20 7a 3c 7a 45 6e 64 20 26 26  while( z<zEnd &&
27b0: 20 73 71 6c 69 74 65 33 49 73 64 69 67 69 74 28   sqlite3Isdigit(
27c0: 2a 7a 29 20 29 20 7a 2b 3d 69 6e 63 72 2c 20 6e  *z) ) z+=incr, n
27d0: 44 69 67 69 74 73 2b 2b 3b 0a 20 20 7d 0a 20 20  Digits++;.  }.  
27e0: 69 66 28 20 7a 3e 3d 7a 45 6e 64 20 29 20 67 6f  if( z>=zEnd ) go
27f0: 74 6f 20 64 6f 5f 61 74 6f 66 5f 63 61 6c 63 3b  to do_atof_calc;
2800: 0a 0a 20 20 2f 2a 20 69 66 20 65 78 70 6f 6e 65  ..  /* if expone
2810: 6e 74 20 69 73 20 70 72 65 73 65 6e 74 20 2a 2f  nt is present */
2820: 0a 20 20 69 66 28 20 2a 7a 3d 3d 27 65 27 20 7c  .  if( *z=='e' |
2830: 7c 20 2a 7a 3d 3d 27 45 27 20 29 7b 0a 20 20 20  | *z=='E' ){.   
2840: 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 20 20 65 56   z+=incr;.    eV
2850: 61 6c 69 64 20 3d 20 30 3b 0a 20 20 20 20 69 66  alid = 0;.    if
2860: 28 20 7a 3e 3d 7a 45 6e 64 20 29 20 67 6f 74 6f  ( z>=zEnd ) goto
2870: 20 64 6f 5f 61 74 6f 66 5f 63 61 6c 63 3b 0a 20   do_atof_calc;. 
2880: 20 20 20 2f 2a 20 67 65 74 20 73 69 67 6e 20 6f     /* get sign o
2890: 66 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 20  f exponent */.  
28a0: 20 20 69 66 28 20 2a 7a 3d 3d 27 2d 27 20 29 7b    if( *z=='-' ){
28b0: 0a 20 20 20 20 20 20 65 73 69 67 6e 20 3d 20 2d  .      esign = -
28c0: 31 3b 0a 20 20 20 20 20 20 7a 2b 3d 69 6e 63 72  1;.      z+=incr
28d0: 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20  ;.    }else if( 
28e0: 2a 7a 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 20 20  *z=='+' ){.     
28f0: 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 20 20 7d 0a   z+=incr;.    }.
2900: 20 20 20 20 2f 2a 20 63 6f 70 79 20 64 69 67 69      /* copy digi
2910: 74 73 20 74 6f 20 65 78 70 6f 6e 65 6e 74 20 2a  ts to exponent *
2920: 2f 0a 20 20 20 20 77 68 69 6c 65 28 20 7a 3c 7a  /.    while( z<z
2930: 45 6e 64 20 26 26 20 73 71 6c 69 74 65 33 49 73  End && sqlite3Is
2940: 64 69 67 69 74 28 2a 7a 29 20 29 7b 0a 20 20 20  digit(*z) ){.   
2950: 20 20 20 65 20 3d 20 65 3c 31 30 30 30 30 20 3f     e = e<10000 ?
2960: 20 28 65 2a 31 30 20 2b 20 28 2a 7a 20 2d 20 27   (e*10 + (*z - '
2970: 30 27 29 29 20 3a 20 31 30 30 30 30 3b 0a 20 20  0')) : 10000;.  
2980: 20 20 20 20 7a 2b 3d 69 6e 63 72 3b 0a 20 20 20      z+=incr;.   
2990: 20 20 20 65 56 61 6c 69 64 20 3d 20 31 3b 0a 20     eValid = 1;. 
29a0: 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a 20 73     }.  }..  /* s
29b0: 6b 69 70 20 74 72 61 69 6c 69 6e 67 20 73 70 61  kip trailing spa
29c0: 63 65 73 20 2a 2f 0a 20 20 69 66 28 20 6e 44 69  ces */.  if( nDi
29d0: 67 69 74 73 20 26 26 20 65 56 61 6c 69 64 20 29  gits && eValid )
29e0: 7b 0a 20 20 20 20 77 68 69 6c 65 28 20 7a 3c 7a  {.    while( z<z
29f0: 45 6e 64 20 26 26 20 73 71 6c 69 74 65 33 49 73  End && sqlite3Is
2a00: 73 70 61 63 65 28 2a 7a 29 20 29 20 7a 2b 3d 69  space(*z) ) z+=i
2a10: 6e 63 72 3b 0a 20 20 7d 0a 0a 64 6f 5f 61 74 6f  ncr;.  }..do_ato
2a20: 66 5f 63 61 6c 63 3a 0a 20 20 2f 2a 20 61 64 6a  f_calc:.  /* adj
2a30: 75 73 74 20 65 78 70 6f 6e 65 6e 74 20 62 79 20  ust exponent by 
2a40: 64 2c 20 61 6e 64 20 75 70 64 61 74 65 20 73 69  d, and update si
2a50: 67 6e 20 2a 2f 0a 20 20 65 20 3d 20 28 65 2a 65  gn */.  e = (e*e
2a60: 73 69 67 6e 29 20 2b 20 64 3b 0a 20 20 69 66 28  sign) + d;.  if(
2a70: 20 65 3c 30 20 29 20 7b 0a 20 20 20 20 65 73 69   e<0 ) {.    esi
2a80: 67 6e 20 3d 20 2d 31 3b 0a 20 20 20 20 65 20 2a  gn = -1;.    e *
2a90: 3d 20 2d 31 3b 0a 20 20 7d 20 65 6c 73 65 20 7b  = -1;.  } else {
2aa0: 0a 20 20 20 20 65 73 69 67 6e 20 3d 20 31 3b 0a  .    esign = 1;.
2ab0: 20 20 7d 0a 0a 20 20 2f 2a 20 69 66 20 30 20 73    }..  /* if 0 s
2ac0: 69 67 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20  ignificand */.  
2ad0: 69 66 28 20 21 73 20 29 20 7b 0a 20 20 20 20 2f  if( !s ) {.    /
2ae0: 2a 20 49 6e 20 74 68 65 20 49 45 45 45 20 37 35  * In the IEEE 75
2af0: 34 20 73 74 61 6e 64 61 72 64 2c 20 7a 65 72 6f  4 standard, zero
2b00: 20 69 73 20 73 69 67 6e 65 64 2e 0a 20 20 20 20   is signed..    
2b10: 2a 2a 20 41 64 64 20 74 68 65 20 73 69 67 6e 20  ** Add the sign 
2b20: 69 66 20 77 65 27 76 65 20 73 65 65 6e 20 61 74  if we've seen at
2b30: 20 6c 65 61 73 74 20 6f 6e 65 20 64 69 67 69 74   least one digit
2b40: 20 2a 2f 0a 20 20 20 20 72 65 73 75 6c 74 20 3d   */.    result =
2b50: 20 28 73 69 67 6e 3c 30 20 26 26 20 6e 44 69 67   (sign<0 && nDig
2b60: 69 74 73 29 20 3f 20 2d 28 64 6f 75 62 6c 65 29  its) ? -(double)
2b70: 30 20 3a 20 28 64 6f 75 62 6c 65 29 30 3b 0a 20  0 : (double)0;. 
2b80: 20 7d 20 65 6c 73 65 20 7b 0a 20 20 20 20 2f 2a   } else {.    /*
2b90: 20 61 74 74 65 6d 70 74 20 74 6f 20 72 65 64 75   attempt to redu
2ba0: 63 65 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20  ce exponent */. 
2bb0: 20 20 20 69 66 28 20 65 73 69 67 6e 3e 30 20 29     if( esign>0 )
2bc0: 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 73  {.      while( s
2bd0: 3c 28 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2f  <(LARGEST_INT64/
2be0: 31 30 29 20 26 26 20 65 3e 30 20 29 20 65 2d 2d  10) && e>0 ) e--
2bf0: 2c 73 2a 3d 31 30 3b 0a 20 20 20 20 7d 65 6c 73  ,s*=10;.    }els
2c00: 65 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20  e{.      while( 
2c10: 21 28 73 25 31 30 29 20 26 26 20 65 3e 30 20 29  !(s%10) && e>0 )
2c20: 20 65 2d 2d 2c 73 2f 3d 31 30 3b 0a 20 20 20 20   e--,s/=10;.    
2c30: 7d 0a 0a 20 20 20 20 2f 2a 20 61 64 6a 75 73 74  }..    /* adjust
2c40: 20 74 68 65 20 73 69 67 6e 20 6f 66 20 73 69 67   the sign of sig
2c50: 6e 69 66 69 63 61 6e 64 20 2a 2f 0a 20 20 20 20  nificand */.    
2c60: 73 20 3d 20 73 69 67 6e 3c 30 20 3f 20 2d 73 20  s = sign<0 ? -s 
2c70: 3a 20 73 3b 0a 0a 20 20 20 20 2f 2a 20 69 66 20  : s;..    /* if 
2c80: 65 78 70 6f 6e 65 6e 74 2c 20 73 63 61 6c 65 20  exponent, scale 
2c90: 73 69 67 6e 69 66 69 63 61 6e 64 20 61 73 20 61  significand as a
2ca0: 70 70 72 6f 70 72 69 61 74 65 0a 20 20 20 20 2a  ppropriate.    *
2cb0: 2a 20 61 6e 64 20 73 74 6f 72 65 20 69 6e 20 72  * and store in r
2cc0: 65 73 75 6c 74 2e 20 2a 2f 0a 20 20 20 20 69 66  esult. */.    if
2cd0: 28 20 65 20 29 7b 0a 20 20 20 20 20 20 64 6f 75  ( e ){.      dou
2ce0: 62 6c 65 20 73 63 61 6c 65 20 3d 20 31 2e 30 3b  ble scale = 1.0;
2cf0: 0a 20 20 20 20 20 20 2f 2a 20 61 74 74 65 6d 70  .      /* attemp
2d00: 74 20 74 6f 20 68 61 6e 64 6c 65 20 65 78 74 72  t to handle extr
2d10: 65 6d 65 6c 79 20 73 6d 61 6c 6c 2f 6c 61 72 67  emely small/larg
2d20: 65 20 6e 75 6d 62 65 72 73 20 62 65 74 74 65 72  e numbers better
2d30: 20 2a 2f 0a 20 20 20 20 20 20 69 66 28 20 65 3e   */.      if( e>
2d40: 33 30 37 20 26 26 20 65 3c 33 34 32 20 29 7b 0a  307 && e<342 ){.
2d50: 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 65          while( e
2d60: 25 33 30 38 20 29 20 7b 20 73 63 61 6c 65 20 2a  %308 ) { scale *
2d70: 3d 20 31 2e 30 65 2b 31 3b 20 65 20 2d 3d 20 31  = 1.0e+1; e -= 1
2d80: 3b 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20  ; }.        if( 
2d90: 65 73 69 67 6e 3c 30 20 29 7b 0a 20 20 20 20 20  esign<0 ){.     
2da0: 20 20 20 20 20 72 65 73 75 6c 74 20 3d 20 73 20       result = s 
2db0: 2f 20 73 63 61 6c 65 3b 0a 20 20 20 20 20 20 20  / scale;.       
2dc0: 20 20 20 72 65 73 75 6c 74 20 2f 3d 20 31 2e 30     result /= 1.0
2dd0: 65 2b 33 30 38 3b 0a 20 20 20 20 20 20 20 20 7d  e+308;.        }
2de0: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20  else{.          
2df0: 72 65 73 75 6c 74 20 3d 20 73 20 2a 20 73 63 61  result = s * sca
2e00: 6c 65 3b 0a 20 20 20 20 20 20 20 20 20 20 72 65  le;.          re
2e10: 73 75 6c 74 20 2a 3d 20 31 2e 30 65 2b 33 30 38  sult *= 1.0e+308
2e20: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
2e30: 20 20 7d 65 6c 73 65 20 69 66 28 20 65 3e 3d 33    }else if( e>=3
2e40: 34 32 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66  42 ){.        if
2e50: 28 20 65 73 69 67 6e 3c 30 20 29 7b 0a 20 20 20  ( esign<0 ){.   
2e60: 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 3d 20         result = 
2e70: 30 2e 30 2a 73 3b 0a 20 20 20 20 20 20 20 20 7d  0.0*s;.        }
2e80: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20  else{.          
2e90: 72 65 73 75 6c 74 20 3d 20 31 65 33 30 38 2a 31  result = 1e308*1
2ea0: 65 33 30 38 2a 73 3b 20 20 2f 2a 20 49 6e 66 69  e308*s;  /* Infi
2eb0: 6e 69 74 79 20 2a 2f 0a 20 20 20 20 20 20 20 20  nity */.        
2ec0: 7d 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20  }.      }else{. 
2ed0: 20 20 20 20 20 20 20 2f 2a 20 31 2e 30 65 2b 32         /* 1.0e+2
2ee0: 32 20 69 73 20 74 68 65 20 6c 61 72 67 65 73 74  2 is the largest
2ef0: 20 70 6f 77 65 72 20 6f 66 20 31 30 20 74 68 61   power of 10 tha
2f00: 6e 20 63 61 6e 20 62 65 20 0a 20 20 20 20 20 20  n can be .      
2f10: 20 20 2a 2a 20 72 65 70 72 65 73 65 6e 74 65 64    ** represented
2f20: 20 65 78 61 63 74 6c 79 2e 20 2a 2f 0a 20 20 20   exactly. */.   
2f30: 20 20 20 20 20 77 68 69 6c 65 28 20 65 25 32 32       while( e%22
2f40: 20 29 20 7b 20 73 63 61 6c 65 20 2a 3d 20 31 2e   ) { scale *= 1.
2f50: 30 65 2b 31 3b 20 65 20 2d 3d 20 31 3b 20 7d 0a  0e+1; e -= 1; }.
2f60: 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 65          while( e
2f70: 3e 30 20 29 20 7b 20 73 63 61 6c 65 20 2a 3d 20  >0 ) { scale *= 
2f80: 31 2e 30 65 2b 32 32 3b 20 65 20 2d 3d 20 32 32  1.0e+22; e -= 22
2f90: 3b 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20  ; }.        if( 
2fa0: 65 73 69 67 6e 3c 30 20 29 7b 0a 20 20 20 20 20  esign<0 ){.     
2fb0: 20 20 20 20 20 72 65 73 75 6c 74 20 3d 20 73 20       result = s 
2fc0: 2f 20 73 63 61 6c 65 3b 0a 20 20 20 20 20 20 20  / scale;.       
2fd0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
2fe0: 20 20 72 65 73 75 6c 74 20 3d 20 73 20 2a 20 73    result = s * s
2ff0: 63 61 6c 65 3b 0a 20 20 20 20 20 20 20 20 7d 0a  cale;.        }.
3000: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 20 65 6c        }.    } el
3010: 73 65 20 7b 0a 20 20 20 20 20 20 72 65 73 75 6c  se {.      resul
3020: 74 20 3d 20 28 64 6f 75 62 6c 65 29 73 3b 0a 20  t = (double)s;. 
3030: 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a 20 73     }.  }..  /* s
3040: 74 6f 72 65 20 74 68 65 20 72 65 73 75 6c 74 20  tore the result 
3050: 2a 2f 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d 20  */.  *pResult = 
3060: 72 65 73 75 6c 74 3b 0a 0a 20 20 2f 2a 20 72 65  result;..  /* re
3070: 74 75 72 6e 20 74 72 75 65 20 69 66 20 6e 75 6d  turn true if num
3080: 62 65 72 20 61 6e 64 20 6e 6f 20 65 78 74 72 61  ber and no extra
3090: 20 6e 6f 6e 2d 77 68 69 74 65 73 70 61 63 65 20   non-whitespace 
30a0: 63 68 72 61 63 74 65 72 73 20 61 66 74 65 72 20  chracters after 
30b0: 2a 2f 0a 20 20 72 65 74 75 72 6e 20 7a 3e 3d 7a  */.  return z>=z
30c0: 45 6e 64 20 26 26 20 6e 44 69 67 69 74 73 3e 30  End && nDigits>0
30d0: 20 26 26 20 65 56 61 6c 69 64 3b 0a 23 65 6c 73   && eValid;.#els
30e0: 65 0a 20 20 72 65 74 75 72 6e 20 21 73 71 6c 69  e.  return !sqli
30f0: 74 65 33 41 74 6f 69 36 34 28 7a 2c 20 70 52 65  te3Atoi64(z, pRe
3100: 73 75 6c 74 2c 20 6c 65 6e 67 74 68 2c 20 65 6e  sult, length, en
3110: 63 29 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51  c);.#endif /* SQ
3120: 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49  LITE_OMIT_FLOATI
3130: 4e 47 5f 50 4f 49 4e 54 20 2a 2f 0a 7d 0a 0a 2f  NG_POINT */.}../
3140: 2a 0a 2a 2a 20 43 6f 6d 70 61 72 65 20 74 68 65  *.** Compare the
3150: 20 31 39 2d 63 68 61 72 61 63 74 65 72 20 73 74   19-character st
3160: 72 69 6e 67 20 7a 4e 75 6d 20 61 67 61 69 6e 73  ring zNum agains
3170: 74 20 74 68 65 20 74 65 78 74 20 72 65 70 72 65  t the text repre
3180: 73 65 6e 74 61 74 69 6f 6e 0a 2a 2a 20 76 61 6c  sentation.** val
3190: 75 65 20 32 5e 36 33 3a 20 20 39 32 32 33 33 37  ue 2^63:  922337
31a0: 32 30 33 36 38 35 34 37 37 35 38 30 38 2e 20 20  2036854775808.  
31b0: 52 65 74 75 72 6e 20 6e 65 67 61 74 69 76 65 2c  Return negative,
31c0: 20 7a 65 72 6f 2c 20 6f 72 20 70 6f 73 69 74 69   zero, or positi
31d0: 76 65 0a 2a 2a 20 69 66 20 7a 4e 75 6d 20 69 73  ve.** if zNum is
31e0: 20 6c 65 73 73 20 74 68 61 6e 2c 20 65 71 75 61   less than, equa
31f0: 6c 20 74 6f 2c 20 6f 72 20 67 72 65 61 74 65 72  l to, or greater
3200: 20 74 68 61 6e 20 74 68 65 20 73 74 72 69 6e 67   than the string
3210: 2e 0a 2a 2a 20 4e 6f 74 65 20 74 68 61 74 20 7a  ..** Note that z
3220: 4e 75 6d 20 6d 75 73 74 20 63 6f 6e 74 61 69 6e  Num must contain
3230: 20 65 78 61 63 74 6c 79 20 31 39 20 63 68 61 72   exactly 19 char
3240: 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 55 6e  acters..**.** Un
3250: 6c 69 6b 65 20 6d 65 6d 63 6d 70 28 29 20 74 68  like memcmp() th
3260: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 67 75  is routine is gu
3270: 61 72 61 6e 74 65 65 64 20 74 6f 20 72 65 74 75  aranteed to retu
3280: 72 6e 20 74 68 65 20 64 69 66 66 65 72 65 6e 63  rn the differenc
3290: 65 0a 2a 2a 20 69 6e 20 74 68 65 20 76 61 6c 75  e.** in the valu
32a0: 65 73 20 6f 66 20 74 68 65 20 6c 61 73 74 20 64  es of the last d
32b0: 69 67 69 74 20 69 66 20 74 68 65 20 6f 6e 6c 79  igit if the only
32c0: 20 64 69 66 66 65 72 65 6e 63 65 20 69 73 20 69   difference is i
32d0: 6e 20 74 68 65 0a 2a 2a 20 6c 61 73 74 20 64 69  n the.** last di
32e0: 67 69 74 2e 20 20 53 6f 2c 20 66 6f 72 20 65 78  git.  So, for ex
32f0: 61 6d 70 6c 65 2c 0a 2a 2a 0a 2a 2a 20 20 20 20  ample,.**.**    
3300: 20 20 63 6f 6d 70 61 72 65 32 70 6f 77 36 33 28    compare2pow63(
3310: 22 39 32 32 33 33 37 32 30 33 36 38 35 34 37 37  "922337203685477
3320: 35 38 30 30 22 2c 20 31 29 0a 2a 2a 0a 2a 2a 20  5800", 1).**.** 
3330: 77 69 6c 6c 20 72 65 74 75 72 6e 20 2d 38 2e 0a  will return -8..
3340: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 63 6f  */.static int co
3350: 6d 70 61 72 65 32 70 6f 77 36 33 28 63 6f 6e 73  mpare2pow63(cons
3360: 74 20 63 68 61 72 20 2a 7a 4e 75 6d 2c 20 69 6e  t char *zNum, in
3370: 74 20 69 6e 63 72 29 7b 0a 20 20 69 6e 74 20 63  t incr){.  int c
3380: 20 3d 20 30 3b 0a 20 20 69 6e 74 20 69 3b 0a 20   = 0;.  int i;. 
3390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
33a0: 20 20 20 2f 2a 20 30 31 32 33 34 35 36 37 38 39     /* 0123456789
33b0: 30 31 32 33 34 35 36 37 20 2a 2f 0a 20 20 63 6f  01234567 */.  co
33c0: 6e 73 74 20 63 68 61 72 20 2a 70 6f 77 36 33 20  nst char *pow63 
33d0: 3d 20 22 39 32 32 33 33 37 32 30 33 36 38 35 34  = "9223372036854
33e0: 37 37 35 38 30 22 3b 0a 20 20 66 6f 72 28 69 3d  77580";.  for(i=
33f0: 30 3b 20 63 3d 3d 30 20 26 26 20 69 3c 31 38 3b  0; c==0 && i<18;
3400: 20 69 2b 2b 29 7b 0a 20 20 20 20 63 20 3d 20 28   i++){.    c = (
3410: 7a 4e 75 6d 5b 69 2a 69 6e 63 72 5d 2d 70 6f 77  zNum[i*incr]-pow
3420: 36 33 5b 69 5d 29 2a 31 30 3b 0a 20 20 7d 0a 20  63[i])*10;.  }. 
3430: 20 69 66 28 20 63 3d 3d 30 20 29 7b 0a 20 20 20   if( c==0 ){.   
3440: 20 63 20 3d 20 7a 4e 75 6d 5b 31 38 2a 69 6e 63   c = zNum[18*inc
3450: 72 5d 20 2d 20 27 38 27 3b 0a 20 20 20 20 74 65  r] - '8';.    te
3460: 73 74 63 61 73 65 28 20 63 3d 3d 28 2d 31 29 20  stcase( c==(-1) 
3470: 29 3b 0a 20 20 20 20 74 65 73 74 63 61 73 65 28  );.    testcase(
3480: 20 63 3d 3d 30 20 29 3b 0a 20 20 20 20 74 65 73   c==0 );.    tes
3490: 74 63 61 73 65 28 20 63 3d 3d 28 2b 31 29 20 29  tcase( c==(+1) )
34a0: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 63  ;.  }.  return c
34b0: 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76  ;.}.../*.** Conv
34c0: 65 72 74 20 7a 4e 75 6d 20 74 6f 20 61 20 36 34  ert zNum to a 64
34d0: 2d 62 69 74 20 73 69 67 6e 65 64 20 69 6e 74 65  -bit signed inte
34e0: 67 65 72 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68  ger..**.** If th
34f0: 65 20 7a 4e 75 6d 20 76 61 6c 75 65 20 69 73 20  e zNum value is 
3500: 72 65 70 72 65 73 65 6e 74 61 62 6c 65 20 61 73  representable as
3510: 20 61 20 36 34 2d 62 69 74 20 74 77 6f 73 2d 63   a 64-bit twos-c
3520: 6f 6d 70 6c 65 6d 65 6e 74 20 0a 2a 2a 20 69 6e  omplement .** in
3530: 74 65 67 65 72 2c 20 74 68 65 6e 20 77 72 69 74  teger, then writ
3540: 65 20 74 68 61 74 20 76 61 6c 75 65 20 69 6e 74  e that value int
3550: 6f 20 2a 70 4e 75 6d 20 61 6e 64 20 72 65 74 75  o *pNum and retu
3560: 72 6e 20 30 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 7a  rn 0..**.** If z
3570: 4e 75 6d 20 69 73 20 65 78 61 63 74 6c 79 20 39  Num is exactly 9
3580: 32 32 33 33 37 32 30 33 36 38 35 34 36 36 35 38  2233720368546658
3590: 30 38 2c 20 72 65 74 75 72 6e 20 32 2e 20 20 54  08, return 2.  T
35a0: 68 69 73 20 73 70 65 63 69 61 6c 0a 2a 2a 20 63  his special.** c
35b0: 61 73 65 20 69 73 20 62 72 6f 6b 65 6e 20 6f 75  ase is broken ou
35c0: 74 20 62 65 63 61 75 73 65 20 77 68 69 6c 65 20  t because while 
35d0: 39 32 32 33 33 37 32 30 33 36 38 35 34 36 36 35  9223372036854665
35e0: 38 30 38 20 63 61 6e 6e 6f 74 20 62 65 20 61 20  808 cannot be a 
35f0: 0a 2a 2a 20 73 69 67 6e 65 64 20 36 34 2d 62 69  .** signed 64-bi
3600: 74 20 69 6e 74 65 67 65 72 2c 20 69 74 73 20 6e  t integer, its n
3610: 65 67 61 74 69 76 65 20 2d 39 32 32 33 33 37 32  egative -9223372
3620: 30 33 36 38 35 34 36 36 35 38 30 38 20 63 61 6e  036854665808 can
3630: 20 62 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 7a 4e   be..**.** If zN
3640: 75 6d 20 69 73 20 74 6f 6f 20 62 69 67 20 66 6f  um is too big fo
3650: 72 20 61 20 36 34 2d 62 69 74 20 69 6e 74 65 67  r a 64-bit integ
3660: 65 72 20 61 6e 64 20 69 73 20 6e 6f 74 0a 2a 2a  er and is not.**
3670: 20 39 32 32 33 33 37 32 30 33 36 38 35 34 36 36   922337203685466
3680: 35 38 30 38 20 74 68 65 6e 20 72 65 74 75 72 6e  5808 then return
3690: 20 31 2e 0a 2a 2a 0a 2a 2a 20 6c 65 6e 67 74 68   1..**.** length
36a0: 20 69 73 20 74 68 65 20 6e 75 6d 62 65 72 20 6f   is the number o
36b0: 66 20 62 79 74 65 73 20 69 6e 20 74 68 65 20 73  f bytes in the s
36c0: 74 72 69 6e 67 20 28 62 79 74 65 73 2c 20 6e 6f  tring (bytes, no
36d0: 74 20 63 68 61 72 61 63 74 65 72 73 29 2e 0a 2a  t characters)..*
36e0: 2a 20 54 68 65 20 73 74 72 69 6e 67 20 69 73 20  * The string is 
36f0: 6e 6f 74 20 6e 65 63 65 73 73 61 72 69 6c 79 20  not necessarily 
3700: 7a 65 72 6f 2d 74 65 72 6d 69 6e 61 74 65 64 2e  zero-terminated.
3710: 20 20 54 68 65 20 65 6e 63 6f 64 69 6e 67 20 69    The encoding i
3720: 73 0a 2a 2a 20 67 69 76 65 6e 20 62 79 20 65 6e  s.** given by en
3730: 63 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  c..*/.int sqlite
3740: 33 41 74 6f 69 36 34 28 63 6f 6e 73 74 20 63 68  3Atoi64(const ch
3750: 61 72 20 2a 7a 4e 75 6d 2c 20 69 36 34 20 2a 70  ar *zNum, i64 *p
3760: 4e 75 6d 2c 20 69 6e 74 20 6c 65 6e 67 74 68 2c  Num, int length,
3770: 20 75 38 20 65 6e 63 29 7b 0a 20 20 69 6e 74 20   u8 enc){.  int 
3780: 69 6e 63 72 20 3d 20 28 65 6e 63 3d 3d 53 51 4c  incr = (enc==SQL
3790: 49 54 45 5f 55 54 46 38 3f 31 3a 32 29 3b 0a 20  ITE_UTF8?1:2);. 
37a0: 20 75 36 34 20 75 20 3d 20 30 3b 0a 20 20 69 6e   u64 u = 0;.  in
37b0: 74 20 6e 65 67 20 3d 20 30 3b 20 2f 2a 20 61 73  t neg = 0; /* as
37c0: 73 75 6d 65 20 70 6f 73 69 74 69 76 65 20 2a 2f  sume positive */
37d0: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69 6e 74 20  .  int i;.  int 
37e0: 63 20 3d 20 30 3b 0a 20 20 63 6f 6e 73 74 20 63  c = 0;.  const c
37f0: 68 61 72 20 2a 7a 53 74 61 72 74 3b 0a 20 20 63  har *zStart;.  c
3800: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 45 6e 64 20  onst char *zEnd 
3810: 3d 20 7a 4e 75 6d 20 2b 20 6c 65 6e 67 74 68 3b  = zNum + length;
3820: 0a 20 20 69 66 28 20 65 6e 63 3d 3d 53 51 4c 49  .  if( enc==SQLI
3830: 54 45 5f 55 54 46 31 36 42 45 20 29 20 7a 4e 75  TE_UTF16BE ) zNu
3840: 6d 2b 2b 3b 0a 20 20 77 68 69 6c 65 28 20 7a 4e  m++;.  while( zN
3850: 75 6d 3c 7a 45 6e 64 20 26 26 20 73 71 6c 69 74  um<zEnd && sqlit
3860: 65 33 49 73 73 70 61 63 65 28 2a 7a 4e 75 6d 29  e3Isspace(*zNum)
3870: 20 29 20 7a 4e 75 6d 2b 3d 69 6e 63 72 3b 0a 20   ) zNum+=incr;. 
3880: 20 69 66 28 20 7a 4e 75 6d 3c 7a 45 6e 64 20 29   if( zNum<zEnd )
3890: 7b 0a 20 20 20 20 69 66 28 20 2a 7a 4e 75 6d 3d  {.    if( *zNum=
38a0: 3d 27 2d 27 20 29 7b 0a 20 20 20 20 20 20 6e 65  ='-' ){.      ne
38b0: 67 20 3d 20 31 3b 0a 20 20 20 20 20 20 7a 4e 75  g = 1;.      zNu
38c0: 6d 2b 3d 69 6e 63 72 3b 0a 20 20 20 20 7d 65 6c  m+=incr;.    }el
38d0: 73 65 20 69 66 28 20 2a 7a 4e 75 6d 3d 3d 27 2b  se if( *zNum=='+
38e0: 27 20 29 7b 0a 20 20 20 20 20 20 7a 4e 75 6d 2b  ' ){.      zNum+
38f0: 3d 69 6e 63 72 3b 0a 20 20 20 20 7d 0a 20 20 7d  =incr;.    }.  }
3900: 0a 20 20 7a 53 74 61 72 74 20 3d 20 7a 4e 75 6d  .  zStart = zNum
3910: 3b 0a 20 20 77 68 69 6c 65 28 20 7a 4e 75 6d 3c  ;.  while( zNum<
3920: 7a 45 6e 64 20 26 26 20 7a 4e 75 6d 5b 30 5d 3d  zEnd && zNum[0]=
3930: 3d 27 30 27 20 29 7b 20 7a 4e 75 6d 2b 3d 69 6e  ='0' ){ zNum+=in
3940: 63 72 3b 20 7d 20 2f 2a 20 53 6b 69 70 20 6c 65  cr; } /* Skip le
3950: 61 64 69 6e 67 20 7a 65 72 6f 73 2e 20 2a 2f 0a  ading zeros. */.
3960: 20 20 66 6f 72 28 69 3d 30 3b 20 26 7a 4e 75 6d    for(i=0; &zNum
3970: 5b 69 5d 3c 7a 45 6e 64 20 26 26 20 28 63 3d 7a  [i]<zEnd && (c=z
3980: 4e 75 6d 5b 69 5d 29 3e 3d 27 30 27 20 26 26 20  Num[i])>='0' && 
3990: 63 3c 3d 27 39 27 3b 20 69 2b 3d 69 6e 63 72 29  c<='9'; i+=incr)
39a0: 7b 0a 20 20 20 20 75 20 3d 20 75 2a 31 30 20 2b  {.    u = u*10 +
39b0: 20 63 20 2d 20 27 30 27 3b 0a 20 20 7d 0a 20 20   c - '0';.  }.  
39c0: 69 66 28 20 75 3e 4c 41 52 47 45 53 54 5f 49 4e  if( u>LARGEST_IN
39d0: 54 36 34 20 29 7b 0a 20 20 20 20 2a 70 4e 75 6d  T64 ){.    *pNum
39e0: 20 3d 20 53 4d 41 4c 4c 45 53 54 5f 49 4e 54 36   = SMALLEST_INT6
39f0: 34 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 6e  4;.  }else if( n
3a00: 65 67 20 29 7b 0a 20 20 20 20 2a 70 4e 75 6d 20  eg ){.    *pNum 
3a10: 3d 20 2d 28 69 36 34 29 75 3b 0a 20 20 7d 65 6c  = -(i64)u;.  }el
3a20: 73 65 7b 0a 20 20 20 20 2a 70 4e 75 6d 20 3d 20  se{.    *pNum = 
3a30: 28 69 36 34 29 75 3b 0a 20 20 7d 0a 20 20 74 65  (i64)u;.  }.  te
3a40: 73 74 63 61 73 65 28 20 69 3d 3d 31 38 20 29 3b  stcase( i==18 );
3a50: 0a 20 20 74 65 73 74 63 61 73 65 28 20 69 3d 3d  .  testcase( i==
3a60: 31 39 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65  19 );.  testcase
3a70: 28 20 69 3d 3d 32 30 20 29 3b 0a 20 20 69 66 28  ( i==20 );.  if(
3a80: 20 28 63 21 3d 30 20 26 26 20 26 7a 4e 75 6d 5b   (c!=0 && &zNum[
3a90: 69 5d 3c 7a 45 6e 64 29 20 7c 7c 20 28 69 3d 3d  i]<zEnd) || (i==
3aa0: 30 20 26 26 20 7a 53 74 61 72 74 3d 3d 7a 4e 75  0 && zStart==zNu
3ab0: 6d 29 20 7c 7c 20 69 3e 31 39 2a 69 6e 63 72 20  m) || i>19*incr 
3ac0: 29 7b 0a 20 20 20 20 2f 2a 20 7a 4e 75 6d 20 69  ){.    /* zNum i
3ad0: 73 20 65 6d 70 74 79 20 6f 72 20 63 6f 6e 74 61  s empty or conta
3ae0: 69 6e 73 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 20  ins non-numeric 
3af0: 74 65 78 74 20 6f 72 20 69 73 20 6c 6f 6e 67 65  text or is longe
3b00: 72 0a 20 20 20 20 2a 2a 20 74 68 61 6e 20 31 39  r.    ** than 19
3b10: 20 64 69 67 69 74 73 20 28 74 68 75 73 20 67 75   digits (thus gu
3b20: 61 72 61 6e 74 65 65 69 6e 67 20 74 68 61 74 20  aranteeing that 
3b30: 69 74 20 69 73 20 74 6f 6f 20 6c 61 72 67 65 29  it is too large)
3b40: 20 2a 2f 0a 20 20 20 20 72 65 74 75 72 6e 20 31   */.    return 1
3b50: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 69 3c  ;.  }else if( i<
3b60: 31 39 2a 69 6e 63 72 20 29 7b 0a 20 20 20 20 2f  19*incr ){.    /
3b70: 2a 20 4c 65 73 73 20 74 68 61 6e 20 31 39 20 64  * Less than 19 d
3b80: 69 67 69 74 73 2c 20 73 6f 20 77 65 20 6b 6e 6f  igits, so we kno
3b90: 77 20 74 68 61 74 20 69 74 20 66 69 74 73 20 69  w that it fits i
3ba0: 6e 20 36 34 20 62 69 74 73 20 2a 2f 0a 20 20 20  n 64 bits */.   
3bb0: 20 61 73 73 65 72 74 28 20 75 3c 3d 4c 41 52 47   assert( u<=LARG
3bc0: 45 53 54 5f 49 4e 54 36 34 20 29 3b 0a 20 20 20  EST_INT64 );.   
3bd0: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 65 6c   return 0;.  }el
3be0: 73 65 7b 0a 20 20 20 20 2f 2a 20 7a 4e 75 6d 20  se{.    /* zNum 
3bf0: 69 73 20 61 20 31 39 2d 64 69 67 69 74 20 6e 75  is a 19-digit nu
3c00: 6d 62 65 72 73 2e 20 20 43 6f 6d 70 61 72 65 20  mbers.  Compare 
3c10: 69 74 20 61 67 61 69 6e 73 74 20 39 32 32 33 33  it against 92233
3c20: 37 32 30 33 36 38 35 34 37 37 35 38 30 38 2e 20  72036854775808. 
3c30: 2a 2f 0a 20 20 20 20 63 20 3d 20 63 6f 6d 70 61  */.    c = compa
3c40: 72 65 32 70 6f 77 36 33 28 7a 4e 75 6d 2c 20 69  re2pow63(zNum, i
3c50: 6e 63 72 29 3b 0a 20 20 20 20 69 66 28 20 63 3c  ncr);.    if( c<
3c60: 30 20 29 7b 0a 20 20 20 20 20 20 2f 2a 20 7a 4e  0 ){.      /* zN
3c70: 75 6d 20 69 73 20 6c 65 73 73 20 74 68 61 6e 20  um is less than 
3c80: 39 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35  9223372036854775
3c90: 38 30 38 20 73 6f 20 69 74 20 66 69 74 73 20 2a  808 so it fits *
3ca0: 2f 0a 20 20 20 20 20 20 61 73 73 65 72 74 28 20  /.      assert( 
3cb0: 75 3c 3d 4c 41 52 47 45 53 54 5f 49 4e 54 36 34  u<=LARGEST_INT64
3cc0: 20 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e   );.      return
3cd0: 20 30 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66   0;.    }else if
3ce0: 28 20 63 3e 30 20 29 7b 0a 20 20 20 20 20 20 2f  ( c>0 ){.      /
3cf0: 2a 20 7a 4e 75 6d 20 69 73 20 67 72 65 61 74 65  * zNum is greate
3d00: 72 20 74 68 61 6e 20 39 32 32 33 33 37 32 30 33  r than 922337203
3d10: 36 38 35 34 37 37 35 38 30 38 20 73 6f 20 69 74  6854775808 so it
3d20: 20 6f 76 65 72 66 6c 6f 77 73 20 2a 2f 0a 20 20   overflows */.  
3d30: 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20      return 1;.  
3d40: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 2f    }else{.      /
3d50: 2a 20 7a 4e 75 6d 20 69 73 20 65 78 61 63 74 6c  * zNum is exactl
3d60: 79 20 39 32 32 33 33 37 32 30 33 36 38 35 34 37  y 92233720368547
3d70: 37 35 38 30 38 2e 20 20 46 69 74 73 20 69 66 20  75808.  Fits if 
3d80: 6e 65 67 61 74 69 76 65 2e 20 20 54 68 65 0a 20  negative.  The. 
3d90: 20 20 20 20 20 2a 2a 20 73 70 65 63 69 61 6c 20       ** special 
3da0: 63 61 73 65 20 32 20 6f 76 65 72 66 6c 6f 77 20  case 2 overflow 
3db0: 69 66 20 70 6f 73 69 74 69 76 65 20 2a 2f 0a 20  if positive */. 
3dc0: 20 20 20 20 20 61 73 73 65 72 74 28 20 75 2d 31       assert( u-1
3dd0: 3d 3d 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 20  ==LARGEST_INT64 
3de0: 29 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74 28  );.      assert(
3df0: 20 28 2a 70 4e 75 6d 29 3d 3d 53 4d 41 4c 4c 45   (*pNum)==SMALLE
3e00: 53 54 5f 49 4e 54 36 34 20 29 3b 0a 20 20 20 20  ST_INT64 );.    
3e10: 20 20 72 65 74 75 72 6e 20 6e 65 67 20 3f 20 30    return neg ? 0
3e20: 20 3a 20 32 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a   : 2;.    }.  }.
3e30: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 7a 4e 75 6d  }../*.** If zNum
3e40: 20 72 65 70 72 65 73 65 6e 74 73 20 61 6e 20 69   represents an i
3e50: 6e 74 65 67 65 72 20 74 68 61 74 20 77 69 6c 6c  nteger that will
3e60: 20 66 69 74 20 69 6e 20 33 32 2d 62 69 74 73 2c   fit in 32-bits,
3e70: 20 74 68 65 6e 20 73 65 74 0a 2a 2a 20 2a 70 56   then set.** *pV
3e80: 61 6c 75 65 20 74 6f 20 74 68 61 74 20 69 6e 74  alue to that int
3e90: 65 67 65 72 20 61 6e 64 20 72 65 74 75 72 6e 20  eger and return 
3ea0: 74 72 75 65 2e 20 20 4f 74 68 65 72 77 69 73 65  true.  Otherwise
3eb0: 20 72 65 74 75 72 6e 20 66 61 6c 73 65 2e 0a 2a   return false..*
3ec0: 2a 0a 2a 2a 20 41 6e 79 20 6e 6f 6e 2d 6e 75 6d  *.** Any non-num
3ed0: 65 72 69 63 20 63 68 61 72 61 63 74 65 72 73 20  eric characters 
3ee0: 74 68 61 74 20 66 6f 6c 6c 6f 77 69 6e 67 20 7a  that following z
3ef0: 4e 75 6d 20 61 72 65 20 69 67 6e 6f 72 65 64 2e  Num are ignored.
3f00: 0a 2a 2a 20 54 68 69 73 20 69 73 20 64 69 66 66  .** This is diff
3f10: 65 72 65 6e 74 20 66 72 6f 6d 20 73 71 6c 69 74  erent from sqlit
3f20: 65 33 41 74 6f 69 36 34 28 29 20 77 68 69 63 68  e3Atoi64() which
3f30: 20 72 65 71 75 69 72 65 73 20 74 68 65 0a 2a 2a   requires the.**
3f40: 20 69 6e 70 75 74 20 6e 75 6d 62 65 72 20 74 6f   input number to
3f50: 20 62 65 20 7a 65 72 6f 2d 74 65 72 6d 69 6e 61   be zero-termina
3f60: 74 65 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ted..*/.int sqli
3f70: 74 65 33 47 65 74 49 6e 74 33 32 28 63 6f 6e 73  te3GetInt32(cons
3f80: 74 20 63 68 61 72 20 2a 7a 4e 75 6d 2c 20 69 6e  t char *zNum, in
3f90: 74 20 2a 70 56 61 6c 75 65 29 7b 0a 20 20 73 71  t *pValue){.  sq
3fa0: 6c 69 74 65 5f 69 6e 74 36 34 20 76 20 3d 20 30  lite_int64 v = 0
3fb0: 3b 0a 20 20 69 6e 74 20 69 2c 20 63 3b 0a 20 20  ;.  int i, c;.  
3fc0: 69 6e 74 20 6e 65 67 20 3d 20 30 3b 0a 20 20 69  int neg = 0;.  i
3fd0: 66 28 20 7a 4e 75 6d 5b 30 5d 3d 3d 27 2d 27 20  f( zNum[0]=='-' 
3fe0: 29 7b 0a 20 20 20 20 6e 65 67 20 3d 20 31 3b 0a  ){.    neg = 1;.
3ff0: 20 20 20 20 7a 4e 75 6d 2b 2b 3b 0a 20 20 7d 65      zNum++;.  }e
4000: 6c 73 65 20 69 66 28 20 7a 4e 75 6d 5b 30 5d 3d  lse if( zNum[0]=
4010: 3d 27 2b 27 20 29 7b 0a 20 20 20 20 7a 4e 75 6d  ='+' ){.    zNum
4020: 2b 2b 3b 0a 20 20 7d 0a 20 20 77 68 69 6c 65 28  ++;.  }.  while(
4030: 20 7a 4e 75 6d 5b 30 5d 3d 3d 27 30 27 20 29 20   zNum[0]=='0' ) 
4040: 7a 4e 75 6d 2b 2b 3b 0a 20 20 66 6f 72 28 69 3d  zNum++;.  for(i=
4050: 30 3b 20 69 3c 31 31 20 26 26 20 28 63 20 3d 20  0; i<11 && (c = 
4060: 7a 4e 75 6d 5b 69 5d 20 2d 20 27 30 27 29 3e 3d  zNum[i] - '0')>=
4070: 30 20 26 26 20 63 3c 3d 39 3b 20 69 2b 2b 29 7b  0 && c<=9; i++){
4080: 0a 20 20 20 20 76 20 3d 20 76 2a 31 30 20 2b 20  .    v = v*10 + 
4090: 63 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54 68 65  c;.  }..  /* The
40a0: 20 6c 6f 6e 67 65 73 74 20 64 65 63 69 6d 61 6c   longest decimal
40b0: 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20   representation 
40c0: 6f 66 20 61 20 33 32 20 62 69 74 20 69 6e 74 65  of a 32 bit inte
40d0: 67 65 72 20 69 73 20 31 30 20 64 69 67 69 74 73  ger is 10 digits
40e0: 3a 0a 20 20 2a 2a 0a 20 20 2a 2a 20 20 20 20 20  :.  **.  **     
40f0: 20 20 20 20 20 20 20 20 31 32 33 34 35 36 37 38          12345678
4100: 39 30 0a 20 20 2a 2a 20 20 20 20 20 32 5e 33 31  90.  **     2^31
4110: 20 2d 3e 20 32 31 34 37 34 38 33 36 34 38 0a 20   -> 2147483648. 
4120: 20 2a 2f 0a 20 20 74 65 73 74 63 61 73 65 28 20   */.  testcase( 
4130: 69 3d 3d 31 30 20 29 3b 0a 20 20 69 66 28 20 69  i==10 );.  if( i
4140: 3e 31 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  >10 ){.    retur
4150: 6e 20 30 3b 0a 20 20 7d 0a 20 20 74 65 73 74 63  n 0;.  }.  testc
4160: 61 73 65 28 20 76 2d 6e 65 67 3d 3d 32 31 34 37  ase( v-neg==2147
4170: 34 38 33 36 34 37 20 29 3b 0a 20 20 69 66 28 20  483647 );.  if( 
4180: 76 2d 6e 65 67 3e 32 31 34 37 34 38 33 36 34 37  v-neg>2147483647
4190: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30   ){.    return 0
41a0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 65 67 20  ;.  }.  if( neg 
41b0: 29 7b 0a 20 20 20 20 76 20 3d 20 2d 76 3b 0a 20  ){.    v = -v;. 
41c0: 20 7d 0a 20 20 2a 70 56 61 6c 75 65 20 3d 20 28   }.  *pValue = (
41d0: 69 6e 74 29 76 3b 0a 20 20 72 65 74 75 72 6e 20  int)v;.  return 
41e0: 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75  1;.}../*.** Retu
41f0: 72 6e 20 61 20 33 32 2d 62 69 74 20 69 6e 74 65  rn a 32-bit inte
4200: 67 65 72 20 76 61 6c 75 65 20 65 78 74 72 61 63  ger value extrac
4210: 74 65 64 20 66 72 6f 6d 20 61 20 73 74 72 69 6e  ted from a strin
4220: 67 2e 20 20 49 66 20 74 68 65 0a 2a 2a 20 73 74  g.  If the.** st
4230: 72 69 6e 67 20 69 73 20 6e 6f 74 20 61 6e 20 69  ring is not an i
4240: 6e 74 65 67 65 72 2c 20 6a 75 73 74 20 72 65 74  nteger, just ret
4250: 75 72 6e 20 30 2e 0a 2a 2f 0a 69 6e 74 20 73 71  urn 0..*/.int sq
4260: 6c 69 74 65 33 41 74 6f 69 28 63 6f 6e 73 74 20  lite3Atoi(const 
4270: 63 68 61 72 20 2a 7a 29 7b 0a 20 20 69 6e 74 20  char *z){.  int 
4280: 78 20 3d 20 30 3b 0a 20 20 69 66 28 20 7a 20 29  x = 0;.  if( z )
4290: 20 73 71 6c 69 74 65 33 47 65 74 49 6e 74 33 32   sqlite3GetInt32
42a0: 28 7a 2c 20 26 78 29 3b 0a 20 20 72 65 74 75 72  (z, &x);.  retur
42b0: 6e 20 78 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  n x;.}../*.** Th
42c0: 65 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74  e variable-lengt
42d0: 68 20 69 6e 74 65 67 65 72 20 65 6e 63 6f 64 69  h integer encodi
42e0: 6e 67 20 69 73 20 61 73 20 66 6f 6c 6c 6f 77 73  ng is as follows
42f0: 3a 0a 2a 2a 0a 2a 2a 20 4b 45 59 3a 0a 2a 2a 20  :.**.** KEY:.** 
4300: 20 20 20 20 20 20 20 20 41 20 3d 20 30 78 78 78          A = 0xxx
4310: 78 78 78 78 20 20 20 20 37 20 62 69 74 73 20 6f  xxxx    7 bits o
4320: 66 20 64 61 74 61 20 61 6e 64 20 6f 6e 65 20 66  f data and one f
4330: 6c 61 67 20 62 69 74 0a 2a 2a 20 20 20 20 20 20  lag bit.**      
4340: 20 20 20 42 20 3d 20 31 78 78 78 78 78 78 78 20     B = 1xxxxxxx 
4350: 20 20 20 37 20 62 69 74 73 20 6f 66 20 64 61 74     7 bits of dat
4360: 61 20 61 6e 64 20 6f 6e 65 20 66 6c 61 67 20 62  a and one flag b
4370: 69 74 0a 2a 2a 20 20 20 20 20 20 20 20 20 43 20  it.**         C 
4380: 3d 20 78 78 78 78 78 78 78 78 20 20 20 20 38 20  = xxxxxxxx    8 
4390: 62 69 74 73 20 6f 66 20 64 61 74 61 0a 2a 2a 0a  bits of data.**.
43a0: 2a 2a 20 20 37 20 62 69 74 73 20 2d 20 41 0a 2a  **  7 bits - A.*
43b0: 2a 20 31 34 20 62 69 74 73 20 2d 20 42 41 0a 2a  * 14 bits - BA.*
43c0: 2a 20 32 31 20 62 69 74 73 20 2d 20 42 42 41 0a  * 21 bits - BBA.
43d0: 2a 2a 20 32 38 20 62 69 74 73 20 2d 20 42 42 42  ** 28 bits - BBB
43e0: 41 0a 2a 2a 20 33 35 20 62 69 74 73 20 2d 20 42  A.** 35 bits - B
43f0: 42 42 42 41 0a 2a 2a 20 34 32 20 62 69 74 73 20  BBBA.** 42 bits 
4400: 2d 20 42 42 42 42 42 41 0a 2a 2a 20 34 39 20 62  - BBBBBA.** 49 b
4410: 69 74 73 20 2d 20 42 42 42 42 42 42 41 0a 2a 2a  its - BBBBBBA.**
4420: 20 35 36 20 62 69 74 73 20 2d 20 42 42 42 42 42   56 bits - BBBBB
4430: 42 42 41 0a 2a 2a 20 36 34 20 62 69 74 73 20 2d  BBA.** 64 bits -
4440: 20 42 42 42 42 42 42 42 42 43 0a 2a 2f 0a 0a 2f   BBBBBBBBC.*/../
4450: 2a 0a 2a 2a 20 57 72 69 74 65 20 61 20 36 34 2d  *.** Write a 64-
4460: 62 69 74 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e  bit variable-len
4470: 67 74 68 20 69 6e 74 65 67 65 72 20 74 6f 20 6d  gth integer to m
4480: 65 6d 6f 72 79 20 73 74 61 72 74 69 6e 67 20 61  emory starting a
4490: 74 20 70 5b 30 5d 2e 0a 2a 2a 20 54 68 65 20 6c  t p[0]..** The l
44a0: 65 6e 67 74 68 20 6f 66 20 64 61 74 61 20 77 72  ength of data wr
44b0: 69 74 65 20 77 69 6c 6c 20 62 65 20 62 65 74 77  ite will be betw
44c0: 65 65 6e 20 31 20 61 6e 64 20 39 20 62 79 74 65  een 1 and 9 byte
44d0: 73 2e 20 20 54 68 65 20 6e 75 6d 62 65 72 0a 2a  s.  The number.*
44e0: 2a 20 6f 66 20 62 79 74 65 73 20 77 72 69 74 74  * of bytes writt
44f0: 65 6e 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a  en is returned..
4500: 2a 2a 0a 2a 2a 20 41 20 76 61 72 69 61 62 6c 65  **.** A variable
4510: 2d 6c 65 6e 67 74 68 20 69 6e 74 65 67 65 72 20  -length integer 
4520: 63 6f 6e 73 69 73 74 73 20 6f 66 20 74 68 65 20  consists of the 
4530: 6c 6f 77 65 72 20 37 20 62 69 74 73 20 6f 66 20  lower 7 bits of 
4540: 65 61 63 68 20 62 79 74 65 0a 2a 2a 20 66 6f 72  each byte.** for
4550: 20 61 6c 6c 20 62 79 74 65 73 20 74 68 61 74 20   all bytes that 
4560: 68 61 76 65 20 74 68 65 20 38 74 68 20 62 69 74  have the 8th bit
4570: 20 73 65 74 20 61 6e 64 20 6f 6e 65 20 62 79 74   set and one byt
4580: 65 20 77 69 74 68 20 74 68 65 20 38 74 68 0a 2a  e with the 8th.*
4590: 2a 20 62 69 74 20 63 6c 65 61 72 2e 20 20 45 78  * bit clear.  Ex
45a0: 63 65 70 74 2c 20 69 66 20 77 65 20 67 65 74 20  cept, if we get 
45b0: 74 6f 20 74 68 65 20 39 74 68 20 62 79 74 65 2c  to the 9th byte,
45c0: 20 69 74 20 73 74 6f 72 65 73 20 74 68 65 20 66   it stores the f
45d0: 75 6c 6c 0a 2a 2a 20 38 20 62 69 74 73 20 61 6e  ull.** 8 bits an
45e0: 64 20 69 73 20 74 68 65 20 6c 61 73 74 20 62 79  d is the last by
45f0: 74 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  te..*/.int sqlit
4600: 65 33 50 75 74 56 61 72 69 6e 74 28 75 6e 73 69  e3PutVarint(unsi
4610: 67 6e 65 64 20 63 68 61 72 20 2a 70 2c 20 75 36  gned char *p, u6
4620: 34 20 76 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a  4 v){.  int i, j
4630: 2c 20 6e 3b 0a 20 20 75 38 20 62 75 66 5b 31 30  , n;.  u8 buf[10
4640: 5d 3b 0a 20 20 69 66 28 20 76 20 26 20 28 28 28  ];.  if( v & (((
4650: 75 36 34 29 30 78 66 66 30 30 30 30 30 30 29 3c  u64)0xff000000)<
4660: 3c 33 32 29 20 29 7b 0a 20 20 20 20 70 5b 38 5d  <32) ){.    p[8]
4670: 20 3d 20 28 75 38 29 76 3b 0a 20 20 20 20 76 20   = (u8)v;.    v 
4680: 3e 3e 3d 20 38 3b 0a 20 20 20 20 66 6f 72 28 69  >>= 8;.    for(i
4690: 3d 37 3b 20 69 3e 3d 30 3b 20 69 2d 2d 29 7b 0a  =7; i>=0; i--){.
46a0: 20 20 20 20 20 20 70 5b 69 5d 20 3d 20 28 75 38        p[i] = (u8
46b0: 29 28 28 76 20 26 20 30 78 37 66 29 20 7c 20 30  )((v & 0x7f) | 0
46c0: 78 38 30 29 3b 0a 20 20 20 20 20 20 76 20 3e 3e  x80);.      v >>
46d0: 3d 20 37 3b 0a 20 20 20 20 7d 0a 20 20 20 20 72  = 7;.    }.    r
46e0: 65 74 75 72 6e 20 39 3b 0a 20 20 7d 20 20 20 20  eturn 9;.  }    
46f0: 0a 20 20 6e 20 3d 20 30 3b 0a 20 20 64 6f 7b 0a  .  n = 0;.  do{.
4700: 20 20 20 20 62 75 66 5b 6e 2b 2b 5d 20 3d 20 28      buf[n++] = (
4710: 75 38 29 28 28 76 20 26 20 30 78 37 66 29 20 7c  u8)((v & 0x7f) |
4720: 20 30 78 38 30 29 3b 0a 20 20 20 20 76 20 3e 3e   0x80);.    v >>
4730: 3d 20 37 3b 0a 20 20 7d 77 68 69 6c 65 28 20 76  = 7;.  }while( v
4740: 21 3d 30 20 29 3b 0a 20 20 62 75 66 5b 30 5d 20  !=0 );.  buf[0] 
4750: 26 3d 20 30 78 37 66 3b 0a 20 20 61 73 73 65 72  &= 0x7f;.  asser
4760: 74 28 20 6e 3c 3d 39 20 29 3b 0a 20 20 66 6f 72  t( n<=9 );.  for
4770: 28 69 3d 30 2c 20 6a 3d 6e 2d 31 3b 20 6a 3e 3d  (i=0, j=n-1; j>=
4780: 30 3b 20 6a 2d 2d 2c 20 69 2b 2b 29 7b 0a 20 20  0; j--, i++){.  
4790: 20 20 70 5b 69 5d 20 3d 20 62 75 66 5b 6a 5d 3b    p[i] = buf[j];
47a0: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 6e 3b  .  }.  return n;
47b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72  .}../*.** This r
47c0: 6f 75 74 69 6e 65 20 69 73 20 61 20 66 61 73 74  outine is a fast
47d0: 65 72 20 76 65 72 73 69 6f 6e 20 6f 66 20 73 71  er version of sq
47e0: 6c 69 74 65 33 50 75 74 56 61 72 69 6e 74 28 29  lite3PutVarint()
47f0: 20 74 68 61 74 20 6f 6e 6c 79 0a 2a 2a 20 77 6f   that only.** wo
4800: 72 6b 73 20 66 6f 72 20 33 32 2d 62 69 74 20 70  rks for 32-bit p
4810: 6f 73 69 74 69 76 65 20 69 6e 74 65 67 65 72 73  ositive integers
4820: 20 61 6e 64 20 77 68 69 63 68 20 69 73 20 6f 70   and which is op
4830: 74 69 6d 69 7a 65 64 20 66 6f 72 0a 2a 2a 20 74  timized for.** t
4840: 68 65 20 63 6f 6d 6d 6f 6e 20 63 61 73 65 20 6f  he common case o
4850: 66 20 73 6d 61 6c 6c 20 69 6e 74 65 67 65 72 73  f small integers
4860: 2e 20 20 41 20 4d 41 43 52 4f 20 76 65 72 73 69  .  A MACRO versi
4870: 6f 6e 2c 20 70 75 74 56 61 72 69 6e 74 33 32 2c  on, putVarint32,
4880: 0a 2a 2a 20 69 73 20 70 72 6f 76 69 64 65 64 20  .** is provided 
4890: 77 68 69 63 68 20 69 6e 6c 69 6e 65 73 20 74 68  which inlines th
48a0: 65 20 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 61  e single-byte ca
48b0: 73 65 2e 20 20 41 6c 6c 20 63 6f 64 65 20 73 68  se.  All code sh
48c0: 6f 75 6c 64 20 75 73 65 0a 2a 2a 20 74 68 65 20  ould use.** the 
48d0: 4d 41 43 52 4f 20 76 65 72 73 69 6f 6e 20 61 73  MACRO version as
48e0: 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 61   this function a
48f0: 73 73 75 6d 65 73 20 74 68 65 20 73 69 6e 67 6c  ssumes the singl
4900: 65 2d 62 79 74 65 20 63 61 73 65 20 68 61 73 0a  e-byte case has.
4910: 2a 2a 20 61 6c 72 65 61 64 79 20 62 65 65 6e 20  ** already been 
4920: 68 61 6e 64 6c 65 64 2e 0a 2a 2f 0a 69 6e 74 20  handled..*/.int 
4930: 73 71 6c 69 74 65 33 50 75 74 56 61 72 69 6e 74  sqlite3PutVarint
4940: 33 32 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72  32(unsigned char
4950: 20 2a 70 2c 20 75 33 32 20 76 29 7b 0a 23 69 66   *p, u32 v){.#if
4960: 6e 64 65 66 20 70 75 74 56 61 72 69 6e 74 33 32  ndef putVarint32
4970: 0a 20 20 69 66 28 20 28 76 20 26 20 7e 30 78 37  .  if( (v & ~0x7
4980: 66 29 3d 3d 30 20 29 7b 0a 20 20 20 20 70 5b 30  f)==0 ){.    p[0
4990: 5d 20 3d 20 76 3b 0a 20 20 20 20 72 65 74 75 72  ] = v;.    retur
49a0: 6e 20 31 3b 0a 20 20 7d 0a 23 65 6e 64 69 66 0a  n 1;.  }.#endif.
49b0: 20 20 69 66 28 20 28 76 20 26 20 7e 30 78 33 66    if( (v & ~0x3f
49c0: 66 66 29 3d 3d 30 20 29 7b 0a 20 20 20 20 70 5b  ff)==0 ){.    p[
49d0: 30 5d 20 3d 20 28 75 38 29 28 28 76 3e 3e 37 29  0] = (u8)((v>>7)
49e0: 20 7c 20 30 78 38 30 29 3b 0a 20 20 20 20 70 5b   | 0x80);.    p[
49f0: 31 5d 20 3d 20 28 75 38 29 28 76 20 26 20 30 78  1] = (u8)(v & 0x
4a00: 37 66 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  7f);.    return 
4a10: 32 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  2;.  }.  return 
4a20: 73 71 6c 69 74 65 33 50 75 74 56 61 72 69 6e 74  sqlite3PutVarint
4a30: 28 70 2c 20 76 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  (p, v);.}../*.**
4a40: 20 42 69 74 6d 61 73 6b 73 20 75 73 65 64 20 62   Bitmasks used b
4a50: 79 20 73 71 6c 69 74 65 33 47 65 74 56 61 72 69  y sqlite3GetVari
4a60: 6e 74 28 29 2e 20 20 54 68 65 73 65 20 70 72 65  nt().  These pre
4a70: 63 6f 6d 70 75 74 65 64 20 63 6f 6e 73 74 61 6e  computed constan
4a80: 74 73 0a 2a 2a 20 61 72 65 20 64 65 66 69 6e 65  ts.** are define
4a90: 64 20 68 65 72 65 20 72 61 74 68 65 72 20 74 68  d here rather th
4aa0: 61 6e 20 73 69 6d 70 6c 79 20 70 75 74 74 69 6e  an simply puttin
4ab0: 67 20 74 68 65 20 63 6f 6e 73 74 61 6e 74 20 65  g the constant e
4ac0: 78 70 72 65 73 73 69 6f 6e 73 0a 2a 2a 20 69 6e  xpressions.** in
4ad0: 6c 69 6e 65 20 69 6e 20 6f 72 64 65 72 20 74 6f  line in order to
4ae0: 20 77 6f 72 6b 20 61 72 6f 75 6e 64 20 62 75 67   work around bug
4af0: 73 20 69 6e 20 74 68 65 20 52 56 54 20 63 6f 6d  s in the RVT com
4b00: 70 69 6c 65 72 2e 0a 2a 2a 0a 2a 2a 20 53 4c 4f  piler..**.** SLO
4b10: 54 5f 32 5f 30 20 20 20 20 20 41 20 6d 61 73 6b  T_2_0     A mask
4b20: 20 66 6f 72 20 20 28 30 78 37 66 3c 3c 31 34 29   for  (0x7f<<14)
4b30: 20 7c 20 30 78 37 66 0a 2a 2a 0a 2a 2a 20 53 4c   | 0x7f.**.** SL
4b40: 4f 54 5f 34 5f 32 5f 30 20 20 20 41 20 6d 61 73  OT_4_2_0   A mas
4b50: 6b 20 66 6f 72 20 20 28 30 78 37 66 3c 3c 32 38  k for  (0x7f<<28
4b60: 29 20 7c 20 53 4c 4f 54 5f 32 5f 30 0a 2a 2f 0a  ) | SLOT_2_0.*/.
4b70: 23 64 65 66 69 6e 65 20 53 4c 4f 54 5f 32 5f 30  #define SLOT_2_0
4b80: 20 20 20 20 20 30 78 30 30 31 66 63 30 37 66 0a       0x001fc07f.
4b90: 23 64 65 66 69 6e 65 20 53 4c 4f 54 5f 34 5f 32  #define SLOT_4_2
4ba0: 5f 30 20 20 20 30 78 66 30 31 66 63 30 37 66 0a  _0   0xf01fc07f.
4bb0: 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 61 20 36  ../*.** Read a 6
4bc0: 34 2d 62 69 74 20 76 61 72 69 61 62 6c 65 2d 6c  4-bit variable-l
4bd0: 65 6e 67 74 68 20 69 6e 74 65 67 65 72 20 66 72  ength integer fr
4be0: 6f 6d 20 6d 65 6d 6f 72 79 20 73 74 61 72 74 69  om memory starti
4bf0: 6e 67 20 61 74 20 70 5b 30 5d 2e 0a 2a 2a 20 52  ng at p[0]..** R
4c00: 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 72  eturn the number
4c10: 20 6f 66 20 62 79 74 65 73 20 72 65 61 64 2e 20   of bytes read. 
4c20: 20 54 68 65 20 76 61 6c 75 65 20 69 73 20 73 74   The value is st
4c30: 6f 72 65 64 20 69 6e 20 2a 76 2e 0a 2a 2f 0a 75  ored in *v..*/.u
4c40: 38 20 73 71 6c 69 74 65 33 47 65 74 56 61 72 69  8 sqlite3GetVari
4c50: 6e 74 28 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65  nt(const unsigne
4c60: 64 20 63 68 61 72 20 2a 70 2c 20 75 36 34 20 2a  d char *p, u64 *
4c70: 76 29 7b 0a 20 20 75 33 32 20 61 2c 62 2c 73 3b  v){.  u32 a,b,s;
4c80: 0a 0a 20 20 61 20 3d 20 2a 70 3b 0a 20 20 2f 2a  ..  a = *p;.  /*
4c90: 20 61 3a 20 70 30 20 28 75 6e 6d 61 73 6b 65 64   a: p0 (unmasked
4ca0: 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 61 26 30  ) */.  if (!(a&0
4cb0: 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20 2a 76  x80)).  {.    *v
4cc0: 20 3d 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e   = a;.    return
4cd0: 20 31 3b 0a 20 20 7d 0a 0a 20 20 70 2b 2b 3b 0a   1;.  }..  p++;.
4ce0: 20 20 62 20 3d 20 2a 70 3b 0a 20 20 2f 2a 20 62    b = *p;.  /* b
4cf0: 3a 20 70 31 20 28 75 6e 6d 61 73 6b 65 64 29 20  : p1 (unmasked) 
4d00: 2a 2f 0a 20 20 69 66 20 28 21 28 62 26 30 78 38  */.  if (!(b&0x8
4d10: 30 29 29 0a 20 20 7b 0a 20 20 20 20 61 20 26 3d  0)).  {.    a &=
4d20: 20 30 78 37 66 3b 0a 20 20 20 20 61 20 3d 20 61   0x7f;.    a = a
4d30: 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20 62 3b  <<7;.    a |= b;
4d40: 0a 20 20 20 20 2a 76 20 3d 20 61 3b 0a 20 20 20  .    *v = a;.   
4d50: 20 72 65 74 75 72 6e 20 32 3b 0a 20 20 7d 0a 0a   return 2;.  }..
4d60: 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61 74    /* Verify that
4d70: 20 63 6f 6e 73 74 61 6e 74 73 20 61 72 65 20 70   constants are p
4d80: 72 65 63 6f 6d 70 75 74 65 64 20 63 6f 72 72 65  recomputed corre
4d90: 63 74 6c 79 20 2a 2f 0a 20 20 61 73 73 65 72 74  ctly */.  assert
4da0: 28 20 53 4c 4f 54 5f 32 5f 30 20 3d 3d 20 28 28  ( SLOT_2_0 == ((
4db0: 30 78 37 66 3c 3c 31 34 29 20 7c 20 28 30 78 37  0x7f<<14) | (0x7
4dc0: 66 29 29 20 29 3b 0a 20 20 61 73 73 65 72 74 28  f)) );.  assert(
4dd0: 20 53 4c 4f 54 5f 34 5f 32 5f 30 20 3d 3d 20 28   SLOT_4_2_0 == (
4de0: 28 30 78 66 55 3c 3c 32 38 29 20 7c 20 28 30 78  (0xfU<<28) | (0x
4df0: 37 66 3c 3c 31 34 29 20 7c 20 28 30 78 37 66 29  7f<<14) | (0x7f)
4e00: 29 20 29 3b 0a 0a 20 20 70 2b 2b 3b 0a 20 20 61  ) );..  p++;.  a
4e10: 20 3d 20 61 3c 3c 31 34 3b 0a 20 20 61 20 7c 3d   = a<<14;.  a |=
4e20: 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 30 3c   *p;.  /* a: p0<
4e30: 3c 31 34 20 7c 20 70 32 20 28 75 6e 6d 61 73 6b  <14 | p2 (unmask
4e40: 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 61  ed) */.  if (!(a
4e50: 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20  &0x80)).  {.    
4e60: 61 20 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b 0a 20  a &= SLOT_2_0;. 
4e70: 20 20 20 62 20 26 3d 20 30 78 37 66 3b 0a 20 20     b &= 0x7f;.  
4e80: 20 20 62 20 3d 20 62 3c 3c 37 3b 0a 20 20 20 20    b = b<<7;.    
4e90: 61 20 7c 3d 20 62 3b 0a 20 20 20 20 2a 76 20 3d  a |= b;.    *v =
4ea0: 20 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 33   a;.    return 3
4eb0: 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 43 53 45 31  ;.  }..  /* CSE1
4ec0: 20 66 72 6f 6d 20 62 65 6c 6f 77 20 2a 2f 0a 20   from below */. 
4ed0: 20 61 20 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b 0a   a &= SLOT_2_0;.
4ee0: 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 62 3c 3c    p++;.  b = b<<
4ef0: 31 34 3b 0a 20 20 62 20 7c 3d 20 2a 70 3b 0a 20  14;.  b |= *p;. 
4f00: 20 2f 2a 20 62 3a 20 70 31 3c 3c 31 34 20 7c 20   /* b: p1<<14 | 
4f10: 70 33 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f  p3 (unmasked) */
4f20: 0a 20 20 69 66 20 28 21 28 62 26 30 78 38 30 29  .  if (!(b&0x80)
4f30: 29 0a 20 20 7b 0a 20 20 20 20 62 20 26 3d 20 53  ).  {.    b &= S
4f40: 4c 4f 54 5f 32 5f 30 3b 0a 20 20 20 20 2f 2a 20  LOT_2_0;.    /* 
4f50: 6d 6f 76 65 64 20 43 53 45 31 20 75 70 20 2a 2f  moved CSE1 up */
4f60: 0a 20 20 20 20 2f 2a 20 61 20 26 3d 20 28 30 78  .    /* a &= (0x
4f70: 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 20  7f<<14)|(0x7f); 
4f80: 2a 2f 0a 20 20 20 20 61 20 3d 20 61 3c 3c 37 3b  */.    a = a<<7;
4f90: 0a 20 20 20 20 61 20 7c 3d 20 62 3b 0a 20 20 20  .    a |= b;.   
4fa0: 20 2a 76 20 3d 20 61 3b 0a 20 20 20 20 72 65 74   *v = a;.    ret
4fb0: 75 72 6e 20 34 3b 0a 20 20 7d 0a 0a 20 20 2f 2a  urn 4;.  }..  /*
4fc0: 20 61 3a 20 70 30 3c 3c 31 34 20 7c 20 70 32 20   a: p0<<14 | p2 
4fd0: 28 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 2f 2a  (masked) */.  /*
4fe0: 20 62 3a 20 70 31 3c 3c 31 34 20 7c 20 70 33 20   b: p1<<14 | p3 
4ff0: 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20  (unmasked) */.  
5000: 2f 2a 20 31 3a 73 61 76 65 20 6f 66 66 20 70 30  /* 1:save off p0
5010: 3c 3c 32 31 20 7c 20 70 31 3c 3c 31 34 20 7c 20  <<21 | p1<<14 | 
5020: 70 32 3c 3c 37 20 7c 20 70 33 20 28 6d 61 73 6b  p2<<7 | p3 (mask
5030: 65 64 29 20 2a 2f 0a 20 20 2f 2a 20 6d 6f 76 65  ed) */.  /* move
5040: 64 20 43 53 45 31 20 75 70 20 2a 2f 0a 20 20 2f  d CSE1 up */.  /
5050: 2a 20 61 20 26 3d 20 28 30 78 37 66 3c 3c 31 34  * a &= (0x7f<<14
5060: 29 7c 28 30 78 37 66 29 3b 20 2a 2f 0a 20 20 62  )|(0x7f); */.  b
5070: 20 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b 0a 20 20   &= SLOT_2_0;.  
5080: 73 20 3d 20 61 3b 0a 20 20 2f 2a 20 73 3a 20 70  s = a;.  /* s: p
5090: 30 3c 3c 31 34 20 7c 20 70 32 20 28 6d 61 73 6b  0<<14 | p2 (mask
50a0: 65 64 29 20 2a 2f 0a 0a 20 20 70 2b 2b 3b 0a 20  ed) */..  p++;. 
50b0: 20 61 20 3d 20 61 3c 3c 31 34 3b 0a 20 20 61 20   a = a<<14;.  a 
50c0: 7c 3d 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70  |= *p;.  /* a: p
50d0: 30 3c 3c 32 38 20 7c 20 70 32 3c 3c 31 34 20 7c  0<<28 | p2<<14 |
50e0: 20 70 34 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a   p4 (unmasked) *
50f0: 2f 0a 20 20 69 66 20 28 21 28 61 26 30 78 38 30  /.  if (!(a&0x80
5100: 29 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 77 65  )).  {.    /* we
5110: 20 63 61 6e 20 73 6b 69 70 20 74 68 65 73 65 20   can skip these 
5120: 63 61 75 73 65 20 74 68 65 79 20 77 65 72 65 20  cause they were 
5130: 28 65 66 66 65 63 74 69 76 65 6c 79 29 20 64 6f  (effectively) do
5140: 6e 65 20 61 62 6f 76 65 20 69 6e 20 63 61 6c 63  ne above in calc
5150: 27 69 6e 67 20 73 20 2a 2f 0a 20 20 20 20 2f 2a  'ing s */.    /*
5160: 20 61 20 26 3d 20 28 30 78 37 66 3c 3c 32 38 29   a &= (0x7f<<28)
5170: 7c 28 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37  |(0x7f<<14)|(0x7
5180: 66 29 3b 20 2a 2f 0a 20 20 20 20 2f 2a 20 62 20  f); */.    /* b 
5190: 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c 28 30  &= (0x7f<<14)|(0
51a0: 78 37 66 29 3b 20 2a 2f 0a 20 20 20 20 62 20 3d  x7f); */.    b =
51b0: 20 62 3c 3c 37 3b 0a 20 20 20 20 61 20 7c 3d 20   b<<7;.    a |= 
51c0: 62 3b 0a 20 20 20 20 73 20 3d 20 73 3e 3e 31 38  b;.    s = s>>18
51d0: 3b 0a 20 20 20 20 2a 76 20 3d 20 28 28 75 36 34  ;.    *v = ((u64
51e0: 29 73 29 3c 3c 33 32 20 7c 20 61 3b 0a 20 20 20  )s)<<32 | a;.   
51f0: 20 72 65 74 75 72 6e 20 35 3b 0a 20 20 7d 0a 0a   return 5;.  }..
5200: 20 20 2f 2a 20 32 3a 73 61 76 65 20 6f 66 66 20    /* 2:save off 
5210: 70 30 3c 3c 32 31 20 7c 20 70 31 3c 3c 31 34 20  p0<<21 | p1<<14 
5220: 7c 20 70 32 3c 3c 37 20 7c 20 70 33 20 28 6d 61  | p2<<7 | p3 (ma
5230: 73 6b 65 64 29 20 2a 2f 0a 20 20 73 20 3d 20 73  sked) */.  s = s
5240: 3c 3c 37 3b 0a 20 20 73 20 7c 3d 20 62 3b 0a 20  <<7;.  s |= b;. 
5250: 20 2f 2a 20 73 3a 20 70 30 3c 3c 32 31 20 7c 20   /* s: p0<<21 | 
5260: 70 31 3c 3c 31 34 20 7c 20 70 32 3c 3c 37 20 7c  p1<<14 | p2<<7 |
5270: 20 70 33 20 28 6d 61 73 6b 65 64 29 20 2a 2f 0a   p3 (masked) */.
5280: 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 62 3c  .  p++;.  b = b<
5290: 3c 31 34 3b 0a 20 20 62 20 7c 3d 20 2a 70 3b 0a  <14;.  b |= *p;.
52a0: 20 20 2f 2a 20 62 3a 20 70 31 3c 3c 32 38 20 7c    /* b: p1<<28 |
52b0: 20 70 33 3c 3c 31 34 20 7c 20 70 35 20 28 75 6e   p3<<14 | p5 (un
52c0: 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20  masked) */.  if 
52d0: 28 21 28 62 26 30 78 38 30 29 29 0a 20 20 7b 0a  (!(b&0x80)).  {.
52e0: 20 20 20 20 2f 2a 20 77 65 20 63 61 6e 20 73 6b      /* we can sk
52f0: 69 70 20 74 68 69 73 20 63 61 75 73 65 20 69 74  ip this cause it
5300: 20 77 61 73 20 28 65 66 66 65 63 74 69 76 65 6c   was (effectivel
5310: 79 29 20 64 6f 6e 65 20 61 62 6f 76 65 20 69 6e  y) done above in
5320: 20 63 61 6c 63 27 69 6e 67 20 73 20 2a 2f 0a 20   calc'ing s */. 
5330: 20 20 20 2f 2a 20 62 20 26 3d 20 28 30 78 37 66     /* b &= (0x7f
5340: 3c 3c 32 38 29 7c 28 30 78 37 66 3c 3c 31 34 29  <<28)|(0x7f<<14)
5350: 7c 28 30 78 37 66 29 3b 20 2a 2f 0a 20 20 20 20  |(0x7f); */.    
5360: 61 20 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b 0a 20  a &= SLOT_2_0;. 
5370: 20 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 20     a = a<<7;.   
5380: 20 61 20 7c 3d 20 62 3b 0a 20 20 20 20 73 20 3d   a |= b;.    s =
5390: 20 73 3e 3e 31 38 3b 0a 20 20 20 20 2a 76 20 3d   s>>18;.    *v =
53a0: 20 28 28 75 36 34 29 73 29 3c 3c 33 32 20 7c 20   ((u64)s)<<32 | 
53b0: 61 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 36 3b  a;.    return 6;
53c0: 0a 20 20 7d 0a 0a 20 20 70 2b 2b 3b 0a 20 20 61  .  }..  p++;.  a
53d0: 20 3d 20 61 3c 3c 31 34 3b 0a 20 20 61 20 7c 3d   = a<<14;.  a |=
53e0: 20 2a 70 3b 0a 20 20 2f 2a 20 61 3a 20 70 32 3c   *p;.  /* a: p2<
53f0: 3c 32 38 20 7c 20 70 34 3c 3c 31 34 20 7c 20 70  <28 | p4<<14 | p
5400: 36 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a  6 (unmasked) */.
5410: 20 20 69 66 20 28 21 28 61 26 30 78 38 30 29 29    if (!(a&0x80))
5420: 0a 20 20 7b 0a 20 20 20 20 61 20 26 3d 20 53 4c  .  {.    a &= SL
5430: 4f 54 5f 34 5f 32 5f 30 3b 0a 20 20 20 20 62 20  OT_4_2_0;.    b 
5440: 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b 0a 20 20 20  &= SLOT_2_0;.   
5450: 20 62 20 3d 20 62 3c 3c 37 3b 0a 20 20 20 20 61   b = b<<7;.    a
5460: 20 7c 3d 20 62 3b 0a 20 20 20 20 73 20 3d 20 73   |= b;.    s = s
5470: 3e 3e 31 31 3b 0a 20 20 20 20 2a 76 20 3d 20 28  >>11;.    *v = (
5480: 28 75 36 34 29 73 29 3c 3c 33 32 20 7c 20 61 3b  (u64)s)<<32 | a;
5490: 0a 20 20 20 20 72 65 74 75 72 6e 20 37 3b 0a 20  .    return 7;. 
54a0: 20 7d 0a 0a 20 20 2f 2a 20 43 53 45 32 20 66 72   }..  /* CSE2 fr
54b0: 6f 6d 20 62 65 6c 6f 77 20 2a 2f 0a 20 20 61 20  om below */.  a 
54c0: 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b 0a 20 20 70  &= SLOT_2_0;.  p
54d0: 2b 2b 3b 0a 20 20 62 20 3d 20 62 3c 3c 31 34 3b  ++;.  b = b<<14;
54e0: 0a 20 20 62 20 7c 3d 20 2a 70 3b 0a 20 20 2f 2a  .  b |= *p;.  /*
54f0: 20 62 3a 20 70 33 3c 3c 32 38 20 7c 20 70 35 3c   b: p3<<28 | p5<
5500: 3c 31 34 20 7c 20 70 37 20 28 75 6e 6d 61 73 6b  <14 | p7 (unmask
5510: 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21 28 62  ed) */.  if (!(b
5520: 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20 20 20  &0x80)).  {.    
5530: 62 20 26 3d 20 53 4c 4f 54 5f 34 5f 32 5f 30 3b  b &= SLOT_4_2_0;
5540: 0a 20 20 20 20 2f 2a 20 6d 6f 76 65 64 20 43 53  .    /* moved CS
5550: 45 32 20 75 70 20 2a 2f 0a 20 20 20 20 2f 2a 20  E2 up */.    /* 
5560: 61 20 26 3d 20 28 30 78 37 66 3c 3c 31 34 29 7c  a &= (0x7f<<14)|
5570: 28 30 78 37 66 29 3b 20 2a 2f 0a 20 20 20 20 61  (0x7f); */.    a
5580: 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 20 61 20 7c   = a<<7;.    a |
5590: 3d 20 62 3b 0a 20 20 20 20 73 20 3d 20 73 3e 3e  = b;.    s = s>>
55a0: 34 3b 0a 20 20 20 20 2a 76 20 3d 20 28 28 75 36  4;.    *v = ((u6
55b0: 34 29 73 29 3c 3c 33 32 20 7c 20 61 3b 0a 20 20  4)s)<<32 | a;.  
55c0: 20 20 72 65 74 75 72 6e 20 38 3b 0a 20 20 7d 0a    return 8;.  }.
55d0: 0a 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c  .  p++;.  a = a<
55e0: 3c 31 35 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a  <15;.  a |= *p;.
55f0: 20 20 2f 2a 20 61 3a 20 70 34 3c 3c 32 39 20 7c    /* a: p4<<29 |
5600: 20 70 36 3c 3c 31 35 20 7c 20 70 38 20 28 75 6e   p6<<15 | p8 (un
5610: 6d 61 73 6b 65 64 29 20 2a 2f 0a 0a 20 20 2f 2a  masked) */..  /*
5620: 20 6d 6f 76 65 64 20 43 53 45 32 20 75 70 20 2a   moved CSE2 up *
5630: 2f 0a 20 20 2f 2a 20 61 20 26 3d 20 28 30 78 37  /.  /* a &= (0x7
5640: 66 3c 3c 32 39 29 7c 28 30 78 37 66 3c 3c 31 35  f<<29)|(0x7f<<15
5650: 29 7c 28 30 78 66 66 29 3b 20 2a 2f 0a 20 20 62  )|(0xff); */.  b
5660: 20 26 3d 20 53 4c 4f 54 5f 32 5f 30 3b 0a 20 20   &= SLOT_2_0;.  
5670: 62 20 3d 20 62 3c 3c 38 3b 0a 20 20 61 20 7c 3d  b = b<<8;.  a |=
5680: 20 62 3b 0a 0a 20 20 73 20 3d 20 73 3c 3c 34 3b   b;..  s = s<<4;
5690: 0a 20 20 62 20 3d 20 70 5b 2d 34 5d 3b 0a 20 20  .  b = p[-4];.  
56a0: 62 20 26 3d 20 30 78 37 66 3b 0a 20 20 62 20 3d  b &= 0x7f;.  b =
56b0: 20 62 3e 3e 33 3b 0a 20 20 73 20 7c 3d 20 62 3b   b>>3;.  s |= b;
56c0: 0a 0a 20 20 2a 76 20 3d 20 28 28 75 36 34 29 73  ..  *v = ((u64)s
56d0: 29 3c 3c 33 32 20 7c 20 61 3b 0a 0a 20 20 72 65  )<<32 | a;..  re
56e0: 74 75 72 6e 20 39 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  turn 9;.}../*.**
56f0: 20 52 65 61 64 20 61 20 33 32 2d 62 69 74 20 76   Read a 32-bit v
5700: 61 72 69 61 62 6c 65 2d 6c 65 6e 67 74 68 20 69  ariable-length i
5710: 6e 74 65 67 65 72 20 66 72 6f 6d 20 6d 65 6d 6f  nteger from memo
5720: 72 79 20 73 74 61 72 74 69 6e 67 20 61 74 20 70  ry starting at p
5730: 5b 30 5d 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 74  [0]..** Return t
5740: 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74  he number of byt
5750: 65 73 20 72 65 61 64 2e 20 20 54 68 65 20 76 61  es read.  The va
5760: 6c 75 65 20 69 73 20 73 74 6f 72 65 64 20 69 6e  lue is stored in
5770: 20 2a 76 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68   *v..**.** If th
5780: 65 20 76 61 72 69 6e 74 20 73 74 6f 72 65 64 20  e varint stored 
5790: 69 6e 20 70 5b 30 5d 20 69 73 20 6c 61 72 67 65  in p[0] is large
57a0: 72 20 74 68 61 6e 20 63 61 6e 20 66 69 74 20 69  r than can fit i
57b0: 6e 20 61 20 33 32 2d 62 69 74 20 75 6e 73 69 67  n a 32-bit unsig
57c0: 6e 65 64 0a 2a 2a 20 69 6e 74 65 67 65 72 2c 20  ned.** integer, 
57d0: 74 68 65 6e 20 73 65 74 20 2a 76 20 74 6f 20 30  then set *v to 0
57e0: 78 66 66 66 66 66 66 66 66 2e 0a 2a 2a 0a 2a 2a  xffffffff..**.**
57f0: 20 41 20 4d 41 43 52 4f 20 76 65 72 73 69 6f 6e   A MACRO version
5800: 2c 20 67 65 74 56 61 72 69 6e 74 33 32 2c 20 69  , getVarint32, i
5810: 73 20 70 72 6f 76 69 64 65 64 20 77 68 69 63 68  s provided which
5820: 20 69 6e 6c 69 6e 65 73 20 74 68 65 20 0a 2a 2a   inlines the .**
5830: 20 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 61 73   single-byte cas
5840: 65 2e 20 20 41 6c 6c 20 63 6f 64 65 20 73 68 6f  e.  All code sho
5850: 75 6c 64 20 75 73 65 20 74 68 65 20 4d 41 43 52  uld use the MACR
5860: 4f 20 76 65 72 73 69 6f 6e 20 61 73 20 0a 2a 2a  O version as .**
5870: 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 61   this function a
5880: 73 73 75 6d 65 73 20 74 68 65 20 73 69 6e 67 6c  ssumes the singl
5890: 65 2d 62 79 74 65 20 63 61 73 65 20 68 61 73 20  e-byte case has 
58a0: 61 6c 72 65 61 64 79 20 62 65 65 6e 20 68 61 6e  already been han
58b0: 64 6c 65 64 2e 0a 2a 2f 0a 75 38 20 73 71 6c 69  dled..*/.u8 sqli
58c0: 74 65 33 47 65 74 56 61 72 69 6e 74 33 32 28 63  te3GetVarint32(c
58d0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
58e0: 61 72 20 2a 70 2c 20 75 33 32 20 2a 76 29 7b 0a  ar *p, u32 *v){.
58f0: 20 20 75 33 32 20 61 2c 62 3b 0a 0a 20 20 2f 2a    u32 a,b;..  /*
5900: 20 54 68 65 20 31 2d 62 79 74 65 20 63 61 73 65   The 1-byte case
5910: 2e 20 20 4f 76 65 72 77 68 65 6c 6d 69 6e 67 6c  .  Overwhelmingl
5920: 79 20 74 68 65 20 6d 6f 73 74 20 63 6f 6d 6d 6f  y the most commo
5930: 6e 2e 20 20 48 61 6e 64 6c 65 64 20 69 6e 6c 69  n.  Handled inli
5940: 6e 65 0a 20 20 2a 2a 20 62 79 20 74 68 65 20 67  ne.  ** by the g
5950: 65 74 56 61 72 69 6e 33 32 28 29 20 6d 61 63 72  etVarin32() macr
5960: 6f 20 2a 2f 0a 20 20 61 20 3d 20 2a 70 3b 0a 20  o */.  a = *p;. 
5970: 20 2f 2a 20 61 3a 20 70 30 20 28 75 6e 6d 61 73   /* a: p0 (unmas
5980: 6b 65 64 29 20 2a 2f 0a 23 69 66 6e 64 65 66 20  ked) */.#ifndef 
5990: 67 65 74 56 61 72 69 6e 74 33 32 0a 20 20 69 66  getVarint32.  if
59a0: 20 28 21 28 61 26 30 78 38 30 29 29 0a 20 20 7b   (!(a&0x80)).  {
59b0: 0a 20 20 20 20 2f 2a 20 56 61 6c 75 65 73 20 62  .    /* Values b
59c0: 65 74 77 65 65 6e 20 30 20 61 6e 64 20 31 32 37  etween 0 and 127
59d0: 20 2a 2f 0a 20 20 20 20 2a 76 20 3d 20 61 3b 0a   */.    *v = a;.
59e0: 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20      return 1;.  
59f0: 7d 0a 23 65 6e 64 69 66 0a 0a 20 20 2f 2a 20 54  }.#endif..  /* T
5a00: 68 65 20 32 2d 62 79 74 65 20 63 61 73 65 20 2a  he 2-byte case *
5a10: 2f 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 2a  /.  p++;.  b = *
5a20: 70 3b 0a 20 20 2f 2a 20 62 3a 20 70 31 20 28 75  p;.  /* b: p1 (u
5a30: 6e 6d 61 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66  nmasked) */.  if
5a40: 20 28 21 28 62 26 30 78 38 30 29 29 0a 20 20 7b   (!(b&0x80)).  {
5a50: 0a 20 20 20 20 2f 2a 20 56 61 6c 75 65 73 20 62  .    /* Values b
5a60: 65 74 77 65 65 6e 20 31 32 38 20 61 6e 64 20 31  etween 128 and 1
5a70: 36 33 38 33 20 2a 2f 0a 20 20 20 20 61 20 26 3d  6383 */.    a &=
5a80: 20 30 78 37 66 3b 0a 20 20 20 20 61 20 3d 20 61   0x7f;.    a = a
5a90: 3c 3c 37 3b 0a 20 20 20 20 2a 76 20 3d 20 61 20  <<7;.    *v = a 
5aa0: 7c 20 62 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  | b;.    return 
5ab0: 32 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54 68 65  2;.  }..  /* The
5ac0: 20 33 2d 62 79 74 65 20 63 61 73 65 20 2a 2f 0a   3-byte case */.
5ad0: 20 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c 3c    p++;.  a = a<<
5ae0: 31 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a 20  14;.  a |= *p;. 
5af0: 20 2f 2a 20 61 3a 20 70 30 3c 3c 31 34 20 7c 20   /* a: p0<<14 | 
5b00: 70 32 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a 2f  p2 (unmasked) */
5b10: 0a 20 20 69 66 20 28 21 28 61 26 30 78 38 30 29  .  if (!(a&0x80)
5b20: 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 56 61 6c  ).  {.    /* Val
5b30: 75 65 73 20 62 65 74 77 65 65 6e 20 31 36 33 38  ues between 1638
5b40: 34 20 61 6e 64 20 32 30 39 37 31 35 31 20 2a 2f  4 and 2097151 */
5b50: 0a 20 20 20 20 61 20 26 3d 20 28 30 78 37 66 3c  .    a &= (0x7f<
5b60: 3c 31 34 29 7c 28 30 78 37 66 29 3b 0a 20 20 20  <14)|(0x7f);.   
5b70: 20 62 20 26 3d 20 30 78 37 66 3b 0a 20 20 20 20   b &= 0x7f;.    
5b80: 62 20 3d 20 62 3c 3c 37 3b 0a 20 20 20 20 2a 76  b = b<<7;.    *v
5b90: 20 3d 20 61 20 7c 20 62 3b 0a 20 20 20 20 72 65   = a | b;.    re
5ba0: 74 75 72 6e 20 33 3b 0a 20 20 7d 0a 0a 20 20 2f  turn 3;.  }..  /
5bb0: 2a 20 41 20 33 32 2d 62 69 74 20 76 61 72 69 6e  * A 32-bit varin
5bc0: 74 20 69 73 20 75 73 65 64 20 74 6f 20 73 74 6f  t is used to sto
5bd0: 72 65 20 73 69 7a 65 20 69 6e 66 6f 72 6d 61 74  re size informat
5be0: 69 6f 6e 20 69 6e 20 62 74 72 65 65 73 2e 0a 20  ion in btrees.. 
5bf0: 20 2a 2a 20 4f 62 6a 65 63 74 73 20 61 72 65 20   ** Objects are 
5c00: 72 61 72 65 6c 79 20 6c 61 72 67 65 72 20 74 68  rarely larger th
5c10: 61 6e 20 32 4d 69 42 20 6c 69 6d 69 74 20 6f 66  an 2MiB limit of
5c20: 20 61 20 33 2d 62 79 74 65 20 76 61 72 69 6e 74   a 3-byte varint
5c30: 2e 0a 20 20 2a 2a 20 41 20 33 2d 62 79 74 65 20  ..  ** A 3-byte 
5c40: 76 61 72 69 6e 74 20 69 73 20 73 75 66 66 69 63  varint is suffic
5c50: 69 65 6e 74 2c 20 66 6f 72 20 65 78 61 6d 70 6c  ient, for exampl
5c60: 65 2c 20 74 6f 20 72 65 63 6f 72 64 20 74 68 65  e, to record the
5c70: 20 73 69 7a 65 0a 20 20 2a 2a 20 6f 66 20 61 20   size.  ** of a 
5c80: 31 30 34 38 35 36 39 2d 62 79 74 65 20 42 4c 4f  1048569-byte BLO
5c90: 42 20 6f 72 20 73 74 72 69 6e 67 2e 0a 20 20 2a  B or string..  *
5ca0: 2a 0a 20 20 2a 2a 20 57 65 20 6f 6e 6c 79 20 75  *.  ** We only u
5cb0: 6e 72 6f 6c 6c 20 74 68 65 20 66 69 72 73 74 20  nroll the first 
5cc0: 31 2d 2c 20 32 2d 2c 20 61 6e 64 20 33 2d 20 62  1-, 2-, and 3- b
5cd0: 79 74 65 20 63 61 73 65 73 2e 20 20 54 68 65 20  yte cases.  The 
5ce0: 76 65 72 79 0a 20 20 2a 2a 20 72 61 72 65 20 6c  very.  ** rare l
5cf0: 61 72 67 65 72 20 63 61 73 65 73 20 63 61 6e 20  arger cases can 
5d00: 62 65 20 68 61 6e 64 6c 65 64 20 62 79 20 74 68  be handled by th
5d10: 65 20 73 6c 6f 77 65 72 20 36 34 2d 62 69 74 20  e slower 64-bit 
5d20: 76 61 72 69 6e 74 0a 20 20 2a 2a 20 72 6f 75 74  varint.  ** rout
5d30: 69 6e 65 2e 0a 20 20 2a 2f 0a 23 69 66 20 31 0a  ine..  */.#if 1.
5d40: 20 20 7b 0a 20 20 20 20 75 36 34 20 76 36 34 3b    {.    u64 v64;
5d50: 0a 20 20 20 20 75 38 20 6e 3b 0a 0a 20 20 20 20  .    u8 n;..    
5d60: 70 20 2d 3d 20 32 3b 0a 20 20 20 20 6e 20 3d 20  p -= 2;.    n = 
5d70: 73 71 6c 69 74 65 33 47 65 74 56 61 72 69 6e 74  sqlite3GetVarint
5d80: 28 70 2c 20 26 76 36 34 29 3b 0a 20 20 20 20 61  (p, &v64);.    a
5d90: 73 73 65 72 74 28 20 6e 3e 33 20 26 26 20 6e 3c  ssert( n>3 && n<
5da0: 3d 39 20 29 3b 0a 20 20 20 20 69 66 28 20 28 76  =9 );.    if( (v
5db0: 36 34 20 26 20 53 51 4c 49 54 45 5f 4d 41 58 5f  64 & SQLITE_MAX_
5dc0: 55 33 32 29 21 3d 76 36 34 20 29 7b 0a 20 20 20  U32)!=v64 ){.   
5dd0: 20 20 20 2a 76 20 3d 20 30 78 66 66 66 66 66 66     *v = 0xffffff
5de0: 66 66 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20  ff;.    }else{. 
5df0: 20 20 20 20 20 2a 76 20 3d 20 28 75 33 32 29 76       *v = (u32)v
5e00: 36 34 3b 0a 20 20 20 20 7d 0a 20 20 20 20 72 65  64;.    }.    re
5e10: 74 75 72 6e 20 6e 3b 0a 20 20 7d 0a 0a 23 65 6c  turn n;.  }..#el
5e20: 73 65 0a 20 20 2f 2a 20 46 6f 72 20 66 6f 6c 6c  se.  /* For foll
5e30: 6f 77 69 6e 67 20 63 6f 64 65 20 28 6b 65 70 74  owing code (kept
5e40: 20 66 6f 72 20 68 69 73 74 6f 72 69 63 61 6c 20   for historical 
5e50: 72 65 63 6f 72 64 20 6f 6e 6c 79 29 20 73 68 6f  record only) sho
5e60: 77 73 20 61 6e 0a 20 20 2a 2a 20 75 6e 72 6f 6c  ws an.  ** unrol
5e70: 6c 69 6e 67 20 66 6f 72 20 74 68 65 20 33 2d 20  ling for the 3- 
5e80: 61 6e 64 20 34 2d 62 79 74 65 20 76 61 72 69 6e  and 4-byte varin
5e90: 74 20 63 61 73 65 73 2e 20 20 54 68 69 73 20 63  t cases.  This c
5ea0: 6f 64 65 20 69 73 0a 20 20 2a 2a 20 73 6c 69 67  ode is.  ** slig
5eb0: 68 74 6c 79 20 66 61 73 74 65 72 2c 20 62 75 74  htly faster, but
5ec0: 20 69 74 20 69 73 20 61 6c 73 6f 20 6c 61 72 67   it is also larg
5ed0: 65 72 20 61 6e 64 20 6d 75 63 68 20 68 61 72 64  er and much hard
5ee0: 65 72 20 74 6f 20 74 65 73 74 2e 0a 20 20 2a 2f  er to test..  */
5ef0: 0a 20 20 70 2b 2b 3b 0a 20 20 62 20 3d 20 62 3c  .  p++;.  b = b<
5f00: 3c 31 34 3b 0a 20 20 62 20 7c 3d 20 2a 70 3b 0a  <14;.  b |= *p;.
5f10: 20 20 2f 2a 20 62 3a 20 70 31 3c 3c 31 34 20 7c    /* b: p1<<14 |
5f20: 20 70 33 20 28 75 6e 6d 61 73 6b 65 64 29 20 2a   p3 (unmasked) *
5f30: 2f 0a 20 20 69 66 20 28 21 28 62 26 30 78 38 30  /.  if (!(b&0x80
5f40: 29 29 0a 20 20 7b 0a 20 20 20 20 2f 2a 20 56 61  )).  {.    /* Va
5f50: 6c 75 65 73 20 62 65 74 77 65 65 6e 20 32 30 39  lues between 209
5f60: 37 31 35 32 20 61 6e 64 20 32 36 38 34 33 35 34  7152 and 2684354
5f70: 35 35 20 2a 2f 0a 20 20 20 20 62 20 26 3d 20 28  55 */.    b &= (
5f80: 30 78 37 66 3c 3c 31 34 29 7c 28 30 78 37 66 29  0x7f<<14)|(0x7f)
5f90: 3b 0a 20 20 20 20 61 20 26 3d 20 28 30 78 37 66  ;.    a &= (0x7f
5fa0: 3c 3c 31 34 29 7c 28 30 78 37 66 29 3b 0a 20 20  <<14)|(0x7f);.  
5fb0: 20 20 61 20 3d 20 61 3c 3c 37 3b 0a 20 20 20 20    a = a<<7;.    
5fc0: 2a 76 20 3d 20 61 20 7c 20 62 3b 0a 20 20 20 20  *v = a | b;.    
5fd0: 72 65 74 75 72 6e 20 34 3b 0a 20 20 7d 0a 0a 20  return 4;.  }.. 
5fe0: 20 70 2b 2b 3b 0a 20 20 61 20 3d 20 61 3c 3c 31   p++;.  a = a<<1
5ff0: 34 3b 0a 20 20 61 20 7c 3d 20 2a 70 3b 0a 20 20  4;.  a |= *p;.  
6000: 2f 2a 20 61 3a 20 70 30 3c 3c 32 38 20 7c 20 70  /* a: p0<<28 | p
6010: 32 3c 3c 31 34 20 7c 20 70 34 20 28 75 6e 6d 61  2<<14 | p4 (unma
6020: 73 6b 65 64 29 20 2a 2f 0a 20 20 69 66 20 28 21  sked) */.  if (!
6030: 28 61 26 30 78 38 30 29 29 0a 20 20 7b 0a 20 20  (a&0x80)).  {.  
6040: 20 20 2f 2a 20 56 61 6c 75 65 73 20 20 62 65 74    /* Values  bet
6050: 77 65 65 6e 20 32 36 38 34 33 35 34 35 36 20 61  ween 268435456 a
6060: 6e 64 20 33 34 33 35 39 37 33 38 33 36 37 20 2a  nd 34359738367 *
6070: 2f 0a 20 20 20 20 61 20 26 3d 20 53 4c 4f 54 5f  /.    a &= SLOT_
6080: 34 5f 32 5f 30 3b 0a 20 20 20 20 62 20 26 3d 20  4_2_0;.    b &= 
6090: 53 4c 4f 54 5f 34 5f 32 5f 30 3b 0a 20 20 20 20  SLOT_4_2_0;.    
60a0: 62 20 3d 20 62 3c 3c 37 3b 0a 20 20 20 20 2a 76  b = b<<7;.    *v
60b0: 20 3d 20 61 20 7c 20 62 3b 0a 20 20 20 20 72 65   = a | b;.    re
60c0: 74 75 72 6e 20 35 3b 0a 20 20 7d 0a 0a 20 20 2f  turn 5;.  }..  /
60d0: 2a 20 57 65 20 63 61 6e 20 6f 6e 6c 79 20 72 65  * We can only re
60e0: 61 63 68 20 74 68 69 73 20 70 6f 69 6e 74 20 77  ach this point w
60f0: 68 65 6e 20 72 65 61 64 69 6e 67 20 61 20 63 6f  hen reading a co
6100: 72 72 75 70 74 20 64 61 74 61 62 61 73 65 0a 20  rrupt database. 
6110: 20 2a 2a 20 66 69 6c 65 2e 20 20 49 6e 20 74 68   ** file.  In th
6120: 61 74 20 63 61 73 65 20 77 65 20 61 72 65 20 6e  at case we are n
6130: 6f 74 20 69 6e 20 61 6e 79 20 68 75 72 72 79 2e  ot in any hurry.
6140: 20 20 55 73 65 20 74 68 65 20 28 72 65 6c 61 74    Use the (relat
6150: 69 76 65 6c 79 0a 20 20 2a 2a 20 73 6c 6f 77 29  ively.  ** slow)
6160: 20 67 65 6e 65 72 61 6c 2d 70 75 72 70 6f 73 65   general-purpose
6170: 20 73 71 6c 69 74 65 33 47 65 74 56 61 72 69 6e   sqlite3GetVarin
6180: 74 28 29 20 72 6f 75 74 69 6e 65 20 74 6f 20 65  t() routine to e
6190: 78 74 72 61 63 74 20 74 68 65 0a 20 20 2a 2a 20  xtract the.  ** 
61a0: 76 61 6c 75 65 2e 20 2a 2f 0a 20 20 7b 0a 20 20  value. */.  {.  
61b0: 20 20 75 36 34 20 76 36 34 3b 0a 20 20 20 20 75    u64 v64;.    u
61c0: 38 20 6e 3b 0a 0a 20 20 20 20 70 20 2d 3d 20 34  8 n;..    p -= 4
61d0: 3b 0a 20 20 20 20 6e 20 3d 20 73 71 6c 69 74 65  ;.    n = sqlite
61e0: 33 47 65 74 56 61 72 69 6e 74 28 70 2c 20 26 76  3GetVarint(p, &v
61f0: 36 34 29 3b 0a 20 20 20 20 61 73 73 65 72 74 28  64);.    assert(
6200: 20 6e 3e 35 20 26 26 20 6e 3c 3d 39 20 29 3b 0a   n>5 && n<=9 );.
6210: 20 20 20 20 2a 76 20 3d 20 28 75 33 32 29 76 36      *v = (u32)v6
6220: 34 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 6e 3b  4;.    return n;
6230: 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f  .  }.#endif.}../
6240: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20  *.** Return the 
6250: 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20  number of bytes 
6260: 74 68 61 74 20 77 69 6c 6c 20 62 65 20 6e 65 65  that will be nee
6270: 64 65 64 20 74 6f 20 73 74 6f 72 65 20 74 68 65  ded to store the
6280: 20 67 69 76 65 6e 0a 2a 2a 20 36 34 2d 62 69 74   given.** 64-bit
6290: 20 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a 69 6e 74   integer..*/.int
62a0: 20 73 71 6c 69 74 65 33 56 61 72 69 6e 74 4c 65   sqlite3VarintLe
62b0: 6e 28 75 36 34 20 76 29 7b 0a 20 20 69 6e 74 20  n(u64 v){.  int 
62c0: 69 20 3d 20 30 3b 0a 20 20 64 6f 7b 0a 20 20 20  i = 0;.  do{.   
62d0: 20 69 2b 2b 3b 0a 20 20 20 20 76 20 3e 3e 3d 20   i++;.    v >>= 
62e0: 37 3b 0a 20 20 7d 77 68 69 6c 65 28 20 76 21 3d  7;.  }while( v!=
62f0: 30 20 26 26 20 41 4c 57 41 59 53 28 69 3c 39 29  0 && ALWAYS(i<9)
6300: 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 69 3b 0a   );.  return i;.
6310: 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 6f  }.../*.** Read o
6320: 72 20 77 72 69 74 65 20 61 20 66 6f 75 72 2d 62  r write a four-b
6330: 79 74 65 20 62 69 67 2d 65 6e 64 69 61 6e 20 69  yte big-endian i
6340: 6e 74 65 67 65 72 20 76 61 6c 75 65 2e 0a 2a 2f  nteger value..*/
6350: 0a 75 33 32 20 73 71 6c 69 74 65 33 47 65 74 34  .u32 sqlite3Get4
6360: 62 79 74 65 28 63 6f 6e 73 74 20 75 38 20 2a 70  byte(const u8 *p
6370: 29 7b 0a 20 20 72 65 74 75 72 6e 20 28 70 5b 30  ){.  return (p[0
6380: 5d 3c 3c 32 34 29 20 7c 20 28 70 5b 31 5d 3c 3c  ]<<24) | (p[1]<<
6390: 31 36 29 20 7c 20 28 70 5b 32 5d 3c 3c 38 29 20  16) | (p[2]<<8) 
63a0: 7c 20 70 5b 33 5d 3b 0a 7d 0a 76 6f 69 64 20 73  | p[3];.}.void s
63b0: 71 6c 69 74 65 33 50 75 74 34 62 79 74 65 28 75  qlite3Put4byte(u
63c0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70 2c  nsigned char *p,
63d0: 20 75 33 32 20 76 29 7b 0a 20 20 70 5b 30 5d 20   u32 v){.  p[0] 
63e0: 3d 20 28 75 38 29 28 76 3e 3e 32 34 29 3b 0a 20  = (u8)(v>>24);. 
63f0: 20 70 5b 31 5d 20 3d 20 28 75 38 29 28 76 3e 3e   p[1] = (u8)(v>>
6400: 31 36 29 3b 0a 20 20 70 5b 32 5d 20 3d 20 28 75  16);.  p[2] = (u
6410: 38 29 28 76 3e 3e 38 29 3b 0a 20 20 70 5b 33 5d  8)(v>>8);.  p[3]
6420: 20 3d 20 28 75 38 29 76 3b 0a 7d 0a 0a 0a 0a 2f   = (u8)v;.}..../
6430: 2a 0a 2a 2a 20 54 72 61 6e 73 6c 61 74 65 20 61  *.** Translate a
6440: 20 73 69 6e 67 6c 65 20 62 79 74 65 20 6f 66 20   single byte of 
6450: 48 65 78 20 69 6e 74 6f 20 61 6e 20 69 6e 74 65  Hex into an inte
6460: 67 65 72 2e 0a 2a 2a 20 54 68 69 73 20 72 6f 75  ger..** This rou
6470: 74 69 6e 65 20 6f 6e 6c 79 20 77 6f 72 6b 73 20  tine only works 
6480: 69 66 20 68 20 72 65 61 6c 6c 79 20 69 73 20 61  if h really is a
6490: 20 76 61 6c 69 64 20 68 65 78 61 64 65 63 69 6d   valid hexadecim
64a0: 61 6c 0a 2a 2a 20 63 68 61 72 61 63 74 65 72 3a  al.** character:
64b0: 20 20 30 2e 2e 39 61 2e 2e 66 41 2e 2e 46 0a 2a    0..9a..fA..F.*
64c0: 2f 0a 75 38 20 73 71 6c 69 74 65 33 48 65 78 54  /.u8 sqlite3HexT
64d0: 6f 49 6e 74 28 69 6e 74 20 68 29 7b 0a 20 20 61  oInt(int h){.  a
64e0: 73 73 65 72 74 28 20 28 68 3e 3d 27 30 27 20 26  ssert( (h>='0' &
64f0: 26 20 68 3c 3d 27 39 27 29 20 7c 7c 20 20 28 68  & h<='9') ||  (h
6500: 3e 3d 27 61 27 20 26 26 20 68 3c 3d 27 66 27 29  >='a' && h<='f')
6510: 20 7c 7c 20 20 28 68 3e 3d 27 41 27 20 26 26 20   ||  (h>='A' && 
6520: 68 3c 3d 27 46 27 29 20 29 3b 0a 23 69 66 64 65  h<='F') );.#ifde
6530: 66 20 53 51 4c 49 54 45 5f 41 53 43 49 49 0a 20  f SQLITE_ASCII. 
6540: 20 68 20 2b 3d 20 39 2a 28 31 26 28 68 3e 3e 36   h += 9*(1&(h>>6
6550: 29 29 3b 0a 23 65 6e 64 69 66 0a 23 69 66 64 65  ));.#endif.#ifde
6560: 66 20 53 51 4c 49 54 45 5f 45 42 43 44 49 43 0a  f SQLITE_EBCDIC.
6570: 20 20 68 20 2b 3d 20 39 2a 28 31 26 7e 28 68 3e    h += 9*(1&~(h>
6580: 3e 34 29 29 3b 0a 23 65 6e 64 69 66 0a 20 20 72  >4));.#endif.  r
6590: 65 74 75 72 6e 20 28 75 38 29 28 68 20 26 20 30  eturn (u8)(h & 0
65a0: 78 66 29 3b 0a 7d 0a 0a 23 69 66 20 21 64 65 66  xf);.}..#if !def
65b0: 69 6e 65 64 28 53 51 4c 49 54 45 5f 4f 4d 49 54  ined(SQLITE_OMIT
65c0: 5f 42 4c 4f 42 5f 4c 49 54 45 52 41 4c 29 20 7c  _BLOB_LITERAL) |
65d0: 7c 20 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45  | defined(SQLITE
65e0: 5f 48 41 53 5f 43 4f 44 45 43 29 0a 2f 2a 0a 2a  _HAS_CODEC)./*.*
65f0: 2a 20 43 6f 6e 76 65 72 74 20 61 20 42 4c 4f 42  * Convert a BLOB
6600: 20 6c 69 74 65 72 61 6c 20 6f 66 20 74 68 65 20   literal of the 
6610: 66 6f 72 6d 20 22 78 27 68 68 68 68 68 68 27 22  form "x'hhhhhh'"
6620: 20 69 6e 74 6f 20 69 74 73 20 62 69 6e 61 72 79   into its binary
6630: 0a 2a 2a 20 76 61 6c 75 65 2e 20 20 52 65 74 75  .** value.  Retu
6640: 72 6e 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20  rn a pointer to 
6650: 69 74 73 20 62 69 6e 61 72 79 20 76 61 6c 75 65  its binary value
6660: 2e 20 20 53 70 61 63 65 20 74 6f 20 68 6f 6c 64  .  Space to hold
6670: 20 74 68 65 0a 2a 2a 20 62 69 6e 61 72 79 20 76   the.** binary v
6680: 61 6c 75 65 20 68 61 73 20 62 65 65 6e 20 6f 62  alue has been ob
6690: 74 61 69 6e 65 64 20 66 72 6f 6d 20 6d 61 6c 6c  tained from mall
66a0: 6f 63 20 61 6e 64 20 6d 75 73 74 20 62 65 20 66  oc and must be f
66b0: 72 65 65 64 20 62 79 0a 2a 2a 20 74 68 65 20 63  reed by.** the c
66c0: 61 6c 6c 69 6e 67 20 72 6f 75 74 69 6e 65 2e 0a  alling routine..
66d0: 2a 2f 0a 76 6f 69 64 20 2a 73 71 6c 69 74 65 33  */.void *sqlite3
66e0: 48 65 78 54 6f 42 6c 6f 62 28 73 71 6c 69 74 65  HexToBlob(sqlite
66f0: 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61  3 *db, const cha
6700: 72 20 2a 7a 2c 20 69 6e 74 20 6e 29 7b 0a 20 20  r *z, int n){.  
6710: 63 68 61 72 20 2a 7a 42 6c 6f 62 3b 0a 20 20 69  char *zBlob;.  i
6720: 6e 74 20 69 3b 0a 0a 20 20 7a 42 6c 6f 62 20 3d  nt i;..  zBlob =
6730: 20 28 63 68 61 72 20 2a 29 73 71 6c 69 74 65 33   (char *)sqlite3
6740: 44 62 4d 61 6c 6c 6f 63 52 61 77 28 64 62 2c 20  DbMallocRaw(db, 
6750: 6e 2f 32 20 2b 20 31 29 3b 0a 20 20 6e 2d 2d 3b  n/2 + 1);.  n--;
6760: 0a 20 20 69 66 28 20 7a 42 6c 6f 62 20 29 7b 0a  .  if( zBlob ){.
6770: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e      for(i=0; i<n
6780: 3b 20 69 2b 3d 32 29 7b 0a 20 20 20 20 20 20 7a  ; i+=2){.      z
6790: 42 6c 6f 62 5b 69 2f 32 5d 20 3d 20 28 73 71 6c  Blob[i/2] = (sql
67a0: 69 74 65 33 48 65 78 54 6f 49 6e 74 28 7a 5b 69  ite3HexToInt(z[i
67b0: 5d 29 3c 3c 34 29 20 7c 20 73 71 6c 69 74 65 33  ])<<4) | sqlite3
67c0: 48 65 78 54 6f 49 6e 74 28 7a 5b 69 2b 31 5d 29  HexToInt(z[i+1])
67d0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 42 6c 6f  ;.    }.    zBlo
67e0: 62 5b 69 2f 32 5d 20 3d 20 30 3b 0a 20 20 7d 0a  b[i/2] = 0;.  }.
67f0: 20 20 72 65 74 75 72 6e 20 7a 42 6c 6f 62 3b 0a    return zBlob;.
6800: 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 21 53 51 4c  }.#endif /* !SQL
6810: 49 54 45 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49  ITE_OMIT_BLOB_LI
6820: 54 45 52 41 4c 20 7c 7c 20 53 51 4c 49 54 45 5f  TERAL || SQLITE_
6830: 48 41 53 5f 43 4f 44 45 43 20 2a 2f 0a 0a 2f 2a  HAS_CODEC */../*
6840: 0a 2a 2a 20 4c 6f 67 20 61 6e 20 65 72 72 6f 72  .** Log an error
6850: 20 74 68 61 74 20 69 73 20 61 6e 20 41 50 49 20   that is an API 
6860: 63 61 6c 6c 20 6f 6e 20 61 20 63 6f 6e 6e 65 63  call on a connec
6870: 74 69 6f 6e 20 70 6f 69 6e 74 65 72 20 74 68 61  tion pointer tha
6880: 74 20 73 68 6f 75 6c 64 0a 2a 2a 20 6e 6f 74 20  t should.** not 
6890: 68 61 76 65 20 62 65 65 6e 20 75 73 65 64 2e 20  have been used. 
68a0: 20 54 68 65 20 22 74 79 70 65 22 20 6f 66 20 63   The "type" of c
68b0: 6f 6e 6e 65 63 74 69 6f 6e 20 70 6f 69 6e 74 65  onnection pointe
68c0: 72 20 69 73 20 67 69 76 65 6e 20 61 73 20 74 68  r is given as th
68d0: 65 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 20 20  e.** argument.  
68e0: 54 68 65 20 7a 54 79 70 65 20 69 73 20 61 20 77  The zType is a w
68f0: 6f 72 64 20 6c 69 6b 65 20 22 4e 55 4c 4c 22 20  ord like "NULL" 
6900: 6f 72 20 22 63 6c 6f 73 65 64 22 20 6f 72 20 22  or "closed" or "
6910: 69 6e 76 61 6c 69 64 22 2e 0a 2a 2f 0a 73 74 61  invalid"..*/.sta
6920: 74 69 63 20 76 6f 69 64 20 6c 6f 67 42 61 64 43  tic void logBadC
6930: 6f 6e 6e 65 63 74 69 6f 6e 28 63 6f 6e 73 74 20  onnection(const 
6940: 63 68 61 72 20 2a 7a 54 79 70 65 29 7b 0a 20 20  char *zType){.  
6950: 73 71 6c 69 74 65 33 5f 6c 6f 67 28 53 51 4c 49  sqlite3_log(SQLI
6960: 54 45 5f 4d 49 53 55 53 45 2c 20 0a 20 20 20 20  TE_MISUSE, .    
6970: 20 22 41 50 49 20 63 61 6c 6c 20 77 69 74 68 20   "API call with 
6980: 25 73 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e  %s database conn
6990: 65 63 74 69 6f 6e 20 70 6f 69 6e 74 65 72 22 2c  ection pointer",
69a0: 0a 20 20 20 20 20 7a 54 79 70 65 0a 20 20 29 3b  .     zType.  );
69b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68 65 63 6b 20  .}../*.** Check 
69c0: 74 6f 20 6d 61 6b 65 20 73 75 72 65 20 77 65 20  to make sure we 
69d0: 68 61 76 65 20 61 20 76 61 6c 69 64 20 64 62 20  have a valid db 
69e0: 70 6f 69 6e 74 65 72 2e 20 20 54 68 69 73 20 74  pointer.  This t
69f0: 65 73 74 20 69 73 20 6e 6f 74 0a 2a 2a 20 66 6f  est is not.** fo
6a00: 6f 6c 70 72 6f 6f 66 20 62 75 74 20 69 74 20 64  olproof but it d
6a10: 6f 65 73 20 70 72 6f 76 69 64 65 20 73 6f 6d 65  oes provide some
6a20: 20 6d 65 61 73 75 72 65 20 6f 66 20 70 72 6f 74   measure of prot
6a30: 65 63 74 69 6f 6e 20 61 67 61 69 6e 73 74 0a 2a  ection against.*
6a40: 2a 20 6d 69 73 75 73 65 20 6f 66 20 74 68 65 20  * misuse of the 
6a50: 69 6e 74 65 72 66 61 63 65 20 73 75 63 68 20 61  interface such a
6a60: 73 20 70 61 73 73 69 6e 67 20 69 6e 20 64 62 20  s passing in db 
6a70: 70 6f 69 6e 74 65 72 73 20 74 68 61 74 20 61 72  pointers that ar
6a80: 65 0a 2a 2a 20 4e 55 4c 4c 20 6f 72 20 77 68 69  e.** NULL or whi
6a90: 63 68 20 68 61 76 65 20 62 65 65 6e 20 70 72 65  ch have been pre
6aa0: 76 69 6f 75 73 6c 79 20 63 6c 6f 73 65 64 2e 20  viously closed. 
6ab0: 20 49 66 20 74 68 69 73 20 72 6f 75 74 69 6e 65   If this routine
6ac0: 20 72 65 74 75 72 6e 73 0a 2a 2a 20 31 20 69 74   returns.** 1 it
6ad0: 20 6d 65 61 6e 73 20 74 68 61 74 20 74 68 65 20   means that the 
6ae0: 64 62 20 70 6f 69 6e 74 65 72 20 69 73 20 76 61  db pointer is va
6af0: 6c 69 64 20 61 6e 64 20 30 20 69 66 20 69 74 20  lid and 0 if it 
6b00: 73 68 6f 75 6c 64 20 6e 6f 74 20 62 65 0a 2a 2a  should not be.**
6b10: 20 64 65 72 65 66 65 72 65 6e 63 65 64 20 66 6f   dereferenced fo
6b20: 72 20 61 6e 79 20 72 65 61 73 6f 6e 2e 20 20 54  r any reason.  T
6b30: 68 65 20 63 61 6c 6c 69 6e 67 20 66 75 6e 63 74  he calling funct
6b40: 69 6f 6e 20 73 68 6f 75 6c 64 20 69 6e 76 6f 6b  ion should invok
6b50: 65 0a 2a 2a 20 53 51 4c 49 54 45 5f 4d 49 53 55  e.** SQLITE_MISU
6b60: 53 45 20 69 6d 6d 65 64 69 61 74 65 6c 79 2e 0a  SE immediately..
6b70: 2a 2a 0a 2a 2a 20 73 71 6c 69 74 65 33 53 61 66  **.** sqlite3Saf
6b80: 65 74 79 43 68 65 63 6b 4f 6b 28 29 20 72 65 71  etyCheckOk() req
6b90: 75 69 72 65 73 20 74 68 61 74 20 74 68 65 20 64  uires that the d
6ba0: 62 20 70 6f 69 6e 74 65 72 20 62 65 20 76 61 6c  b pointer be val
6bb0: 69 64 20 66 6f 72 0a 2a 2a 20 75 73 65 2e 20 20  id for.** use.  
6bc0: 73 71 6c 69 74 65 33 53 61 66 65 74 79 43 68 65  sqlite3SafetyChe
6bd0: 63 6b 53 69 63 6b 4f 72 4f 6b 28 29 20 61 6c 6c  ckSickOrOk() all
6be0: 6f 77 73 20 61 20 64 62 20 70 6f 69 6e 74 65 72  ows a db pointer
6bf0: 20 74 68 61 74 20 66 61 69 6c 65 64 20 74 6f 0a   that failed to.
6c00: 2a 2a 20 6f 70 65 6e 20 70 72 6f 70 65 72 6c 79  ** open properly
6c10: 20 61 6e 64 20 69 73 20 6e 6f 74 20 66 69 74 20   and is not fit 
6c20: 66 6f 72 20 67 65 6e 65 72 61 6c 20 75 73 65 20  for general use 
6c30: 62 75 74 20 77 68 69 63 68 20 63 61 6e 20 62 65  but which can be
6c40: 0a 2a 2a 20 75 73 65 64 20 61 73 20 61 6e 20 61  .** used as an a
6c50: 72 67 75 6d 65 6e 74 20 74 6f 20 73 71 6c 69 74  rgument to sqlit
6c60: 65 33 5f 65 72 72 6d 73 67 28 29 20 6f 72 20 73  e3_errmsg() or s
6c70: 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 29 2e 0a  qlite3_close()..
6c80: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 61  */.int sqlite3Sa
6c90: 66 65 74 79 43 68 65 63 6b 4f 6b 28 73 71 6c 69  fetyCheckOk(sqli
6ca0: 74 65 33 20 2a 64 62 29 7b 0a 20 20 75 33 32 20  te3 *db){.  u32 
6cb0: 6d 61 67 69 63 3b 0a 20 20 69 66 28 20 64 62 3d  magic;.  if( db=
6cc0: 3d 30 20 29 7b 0a 20 20 20 20 6c 6f 67 42 61 64  =0 ){.    logBad
6cd0: 43 6f 6e 6e 65 63 74 69 6f 6e 28 22 4e 55 4c 4c  Connection("NULL
6ce0: 22 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30  ");.    return 0
6cf0: 3b 0a 20 20 7d 0a 20 20 6d 61 67 69 63 20 3d 20  ;.  }.  magic = 
6d00: 64 62 2d 3e 6d 61 67 69 63 3b 0a 20 20 69 66 28  db->magic;.  if(
6d10: 20 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 5f 4d   magic!=SQLITE_M
6d20: 41 47 49 43 5f 4f 50 45 4e 20 29 7b 0a 20 20 20  AGIC_OPEN ){.   
6d30: 20 69 66 28 20 73 71 6c 69 74 65 33 53 61 66 65   if( sqlite3Safe
6d40: 74 79 43 68 65 63 6b 53 69 63 6b 4f 72 4f 6b 28  tyCheckSickOrOk(
6d50: 64 62 29 20 29 7b 0a 20 20 20 20 20 20 74 65 73  db) ){.      tes
6d60: 74 63 61 73 65 28 20 73 71 6c 69 74 65 33 47 6c  tcase( sqlite3Gl
6d70: 6f 62 61 6c 43 6f 6e 66 69 67 2e 78 4c 6f 67 21  obalConfig.xLog!
6d80: 3d 30 20 29 3b 0a 20 20 20 20 20 20 6c 6f 67 42  =0 );.      logB
6d90: 61 64 43 6f 6e 6e 65 63 74 69 6f 6e 28 22 75 6e  adConnection("un
6da0: 6f 70 65 6e 65 64 22 29 3b 0a 20 20 20 20 7d 0a  opened");.    }.
6db0: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20      return 0;.  
6dc0: 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65 74 75 72  }else{.    retur
6dd0: 6e 20 31 3b 0a 20 20 7d 0a 7d 0a 69 6e 74 20 73  n 1;.  }.}.int s
6de0: 71 6c 69 74 65 33 53 61 66 65 74 79 43 68 65 63  qlite3SafetyChec
6df0: 6b 53 69 63 6b 4f 72 4f 6b 28 73 71 6c 69 74 65  kSickOrOk(sqlite
6e00: 33 20 2a 64 62 29 7b 0a 20 20 75 33 32 20 6d 61  3 *db){.  u32 ma
6e10: 67 69 63 3b 0a 20 20 6d 61 67 69 63 20 3d 20 64  gic;.  magic = d
6e20: 62 2d 3e 6d 61 67 69 63 3b 0a 20 20 69 66 28 20  b->magic;.  if( 
6e30: 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 5f 4d 41  magic!=SQLITE_MA
6e40: 47 49 43 5f 53 49 43 4b 20 26 26 0a 20 20 20 20  GIC_SICK &&.    
6e50: 20 20 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 5f    magic!=SQLITE_
6e60: 4d 41 47 49 43 5f 4f 50 45 4e 20 26 26 0a 20 20  MAGIC_OPEN &&.  
6e70: 20 20 20 20 6d 61 67 69 63 21 3d 53 51 4c 49 54      magic!=SQLIT
6e80: 45 5f 4d 41 47 49 43 5f 42 55 53 59 20 29 7b 0a  E_MAGIC_BUSY ){.
6e90: 20 20 20 20 74 65 73 74 63 61 73 65 28 20 73 71      testcase( sq
6ea0: 6c 69 74 65 33 47 6c 6f 62 61 6c 43 6f 6e 66 69  lite3GlobalConfi
6eb0: 67 2e 78 4c 6f 67 21 3d 30 20 29 3b 0a 20 20 20  g.xLog!=0 );.   
6ec0: 20 6c 6f 67 42 61 64 43 6f 6e 6e 65 63 74 69 6f   logBadConnectio
6ed0: 6e 28 22 69 6e 76 61 6c 69 64 22 29 3b 0a 20 20  n("invalid");.  
6ee0: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 65    return 0;.  }e
6ef0: 6c 73 65 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  lse{.    return 
6f00: 31 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  1;.  }.}../*.** 
6f10: 41 74 74 65 6d 70 74 20 74 6f 20 61 64 64 2c 20  Attempt to add, 
6f20: 73 75 62 73 74 72 61 63 74 2c 20 6f 72 20 6d 75  substract, or mu
6f30: 6c 74 69 70 6c 79 20 74 68 65 20 36 34 2d 62 69  ltiply the 64-bi
6f40: 74 20 73 69 67 6e 65 64 20 76 61 6c 75 65 20 69  t signed value i
6f50: 42 20 61 67 61 69 6e 73 74 0a 2a 2a 20 74 68 65  B against.** the
6f60: 20 6f 74 68 65 72 20 36 34 2d 62 69 74 20 73 69   other 64-bit si
6f70: 67 6e 65 64 20 69 6e 74 65 67 65 72 20 61 74 20  gned integer at 
6f80: 2a 70 41 20 61 6e 64 20 73 74 6f 72 65 20 74 68  *pA and store th
6f90: 65 20 72 65 73 75 6c 74 20 69 6e 20 2a 70 41 2e  e result in *pA.
6fa0: 0a 2a 2a 20 52 65 74 75 72 6e 20 30 20 6f 6e 20  .** Return 0 on 
6fb0: 73 75 63 63 65 73 73 2e 20 20 4f 72 20 69 66 20  success.  Or if 
6fc0: 74 68 65 20 6f 70 65 72 61 74 69 6f 6e 20 77 6f  the operation wo
6fd0: 75 6c 64 20 68 61 76 65 20 72 65 73 75 6c 74 65  uld have resulte
6fe0: 64 20 69 6e 20 61 6e 0a 2a 2a 20 6f 76 65 72 66  d in an.** overf
6ff0: 6c 6f 77 2c 20 6c 65 61 76 65 20 2a 70 41 20 75  low, leave *pA u
7000: 6e 63 68 61 6e 67 65 64 20 61 6e 64 20 72 65 74  nchanged and ret
7010: 75 72 6e 20 31 2e 0a 2a 2f 0a 69 6e 74 20 73 71  urn 1..*/.int sq
7020: 6c 69 74 65 33 41 64 64 49 6e 74 36 34 28 69 36  lite3AddInt64(i6
7030: 34 20 2a 70 41 2c 20 69 36 34 20 69 42 29 7b 0a  4 *pA, i64 iB){.
7040: 20 20 69 36 34 20 69 41 20 3d 20 2a 70 41 3b 0a    i64 iA = *pA;.
7050: 20 20 74 65 73 74 63 61 73 65 28 20 69 41 3d 3d    testcase( iA==
7060: 30 20 29 3b 20 74 65 73 74 63 61 73 65 28 20 69  0 ); testcase( i
7070: 41 3d 3d 31 20 29 3b 0a 20 20 74 65 73 74 63 61  A==1 );.  testca
7080: 73 65 28 20 69 42 3d 3d 2d 31 20 29 3b 20 74 65  se( iB==-1 ); te
7090: 73 74 63 61 73 65 28 20 69 42 3d 3d 30 20 29 3b  stcase( iB==0 );
70a0: 0a 20 20 69 66 28 20 69 42 3e 3d 30 20 29 7b 0a  .  if( iB>=0 ){.
70b0: 20 20 20 20 74 65 73 74 63 61 73 65 28 20 69 41      testcase( iA
70c0: 3e 30 20 26 26 20 4c 41 52 47 45 53 54 5f 49 4e  >0 && LARGEST_IN
70d0: 54 36 34 20 2d 20 69 41 20 3d 3d 20 69 42 20 29  T64 - iA == iB )
70e0: 3b 0a 20 20 20 20 74 65 73 74 63 61 73 65 28 20  ;.    testcase( 
70f0: 69 41 3e 30 20 26 26 20 4c 41 52 47 45 53 54 5f  iA>0 && LARGEST_
7100: 49 4e 54 36 34 20 2d 20 69 41 20 3d 3d 20 69 42  INT64 - iA == iB
7110: 20 2d 20 31 20 29 3b 0a 20 20 20 20 69 66 28 20   - 1 );.    if( 
7120: 69 41 3e 30 20 26 26 20 4c 41 52 47 45 53 54 5f  iA>0 && LARGEST_
7130: 49 4e 54 36 34 20 2d 20 69 41 20 3c 20 69 42 20  INT64 - iA < iB 
7140: 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20  ) return 1;.    
7150: 2a 70 41 20 2b 3d 20 69 42 3b 0a 20 20 7d 65 6c  *pA += iB;.  }el
7160: 73 65 7b 0a 20 20 20 20 74 65 73 74 63 61 73 65  se{.    testcase
7170: 28 20 69 41 3c 30 20 26 26 20 2d 28 69 41 20 2b  ( iA<0 && -(iA +
7180: 20 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 29 20   LARGEST_INT64) 
7190: 3d 3d 20 69 42 20 2b 20 31 20 29 3b 0a 20 20 20  == iB + 1 );.   
71a0: 20 74 65 73 74 63 61 73 65 28 20 69 41 3c 30 20   testcase( iA<0 
71b0: 26 26 20 2d 28 69 41 20 2b 20 4c 41 52 47 45 53  && -(iA + LARGES
71c0: 54 5f 49 4e 54 36 34 29 20 3d 3d 20 69 42 20 2b  T_INT64) == iB +
71d0: 20 32 20 29 3b 0a 20 20 20 20 69 66 28 20 69 41   2 );.    if( iA
71e0: 3c 30 20 26 26 20 2d 28 69 41 20 2b 20 4c 41 52  <0 && -(iA + LAR
71f0: 47 45 53 54 5f 49 4e 54 36 34 29 20 3e 20 69 42  GEST_INT64) > iB
7200: 20 2b 20 31 20 29 20 72 65 74 75 72 6e 20 31 3b   + 1 ) return 1;
7210: 0a 20 20 20 20 2a 70 41 20 2b 3d 20 69 42 3b 0a  .    *pA += iB;.
7220: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b 20    }.  return 0; 
7230: 0a 7d 0a 69 6e 74 20 73 71 6c 69 74 65 33 53 75  .}.int sqlite3Su
7240: 62 49 6e 74 36 34 28 69 36 34 20 2a 70 41 2c 20  bInt64(i64 *pA, 
7250: 69 36 34 20 69 42 29 7b 0a 20 20 74 65 73 74 63  i64 iB){.  testc
7260: 61 73 65 28 20 69 42 3d 3d 53 4d 41 4c 4c 45 53  ase( iB==SMALLES
7270: 54 5f 49 4e 54 36 34 2b 31 20 29 3b 0a 20 20 69  T_INT64+1 );.  i
7280: 66 28 20 69 42 3d 3d 53 4d 41 4c 4c 45 53 54 5f  f( iB==SMALLEST_
7290: 49 4e 54 36 34 20 29 7b 0a 20 20 20 20 74 65 73  INT64 ){.    tes
72a0: 74 63 61 73 65 28 20 28 2a 70 41 29 3d 3d 28 2d  tcase( (*pA)==(-
72b0: 31 29 20 29 3b 20 74 65 73 74 63 61 73 65 28 20  1) ); testcase( 
72c0: 28 2a 70 41 29 3d 3d 30 20 29 3b 0a 20 20 20 20  (*pA)==0 );.    
72d0: 69 66 28 20 28 2a 70 41 29 3e 3d 30 20 29 20 72  if( (*pA)>=0 ) r
72e0: 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 2a 70 41  eturn 1;.    *pA
72f0: 20 2d 3d 20 69 42 3b 0a 20 20 20 20 72 65 74 75   -= iB;.    retu
7300: 72 6e 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  rn 0;.  }else{. 
7310: 20 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65     return sqlite
7320: 33 41 64 64 49 6e 74 36 34 28 70 41 2c 20 2d 69  3AddInt64(pA, -i
7330: 42 29 3b 0a 20 20 7d 0a 7d 0a 23 64 65 66 69 6e  B);.  }.}.#defin
7340: 65 20 54 57 4f 50 4f 57 45 52 33 32 20 28 28 28  e TWOPOWER32 (((
7350: 69 36 34 29 31 29 3c 3c 33 32 29 0a 23 64 65 66  i64)1)<<32).#def
7360: 69 6e 65 20 54 57 4f 50 4f 57 45 52 33 31 20 28  ine TWOPOWER31 (
7370: 28 28 69 36 34 29 31 29 3c 3c 33 31 29 0a 69 6e  ((i64)1)<<31).in
7380: 74 20 73 71 6c 69 74 65 33 4d 75 6c 49 6e 74 36  t sqlite3MulInt6
7390: 34 28 69 36 34 20 2a 70 41 2c 20 69 36 34 20 69  4(i64 *pA, i64 i
73a0: 42 29 7b 0a 20 20 69 36 34 20 69 41 20 3d 20 2a  B){.  i64 iA = *
73b0: 70 41 3b 0a 20 20 69 36 34 20 69 41 31 2c 20 69  pA;.  i64 iA1, i
73c0: 41 30 2c 20 69 42 31 2c 20 69 42 30 2c 20 72 3b  A0, iB1, iB0, r;
73d0: 0a 0a 20 20 69 41 31 20 3d 20 69 41 2f 54 57 4f  ..  iA1 = iA/TWO
73e0: 50 4f 57 45 52 33 32 3b 0a 20 20 69 41 30 20 3d  POWER32;.  iA0 =
73f0: 20 69 41 20 25 20 54 57 4f 50 4f 57 45 52 33 32   iA % TWOPOWER32
7400: 3b 0a 20 20 69 42 31 20 3d 20 69 42 2f 54 57 4f  ;.  iB1 = iB/TWO
7410: 50 4f 57 45 52 33 32 3b 0a 20 20 69 42 30 20 3d  POWER32;.  iB0 =
7420: 20 69 42 20 25 20 54 57 4f 50 4f 57 45 52 33 32   iB % TWOPOWER32
7430: 3b 0a 20 20 69 66 28 20 69 41 31 2a 69 42 31 20  ;.  if( iA1*iB1 
7440: 21 3d 20 30 20 29 20 72 65 74 75 72 6e 20 31 3b  != 0 ) return 1;
7450: 0a 20 20 61 73 73 65 72 74 28 20 69 41 31 2a 69  .  assert( iA1*i
7460: 42 30 3d 3d 30 20 7c 7c 20 69 41 30 2a 69 42 31  B0==0 || iA0*iB1
7470: 3d 3d 30 20 29 3b 0a 20 20 72 20 3d 20 69 41 31  ==0 );.  r = iA1
7480: 2a 69 42 30 20 2b 20 69 41 30 2a 69 42 31 3b 0a  *iB0 + iA0*iB1;.
7490: 20 20 74 65 73 74 63 61 73 65 28 20 72 3d 3d 28    testcase( r==(
74a0: 2d 54 57 4f 50 4f 57 45 52 33 31 29 2d 31 20 29  -TWOPOWER31)-1 )
74b0: 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 72 3d  ;.  testcase( r=
74c0: 3d 28 2d 54 57 4f 50 4f 57 45 52 33 31 29 20 29  =(-TWOPOWER31) )
74d0: 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 72 3d  ;.  testcase( r=
74e0: 3d 54 57 4f 50 4f 57 45 52 33 31 20 29 3b 0a 20  =TWOPOWER31 );. 
74f0: 20 74 65 73 74 63 61 73 65 28 20 72 3d 3d 54 57   testcase( r==TW
7500: 4f 50 4f 57 45 52 33 31 2d 31 20 29 3b 0a 20 20  OPOWER31-1 );.  
7510: 69 66 28 20 72 3c 28 2d 54 57 4f 50 4f 57 45 52  if( r<(-TWOPOWER
7520: 33 31 29 20 7c 7c 20 72 3e 3d 54 57 4f 50 4f 57  31) || r>=TWOPOW
7530: 45 52 33 31 20 29 20 72 65 74 75 72 6e 20 31 3b  ER31 ) return 1;
7540: 0a 20 20 72 20 2a 3d 20 54 57 4f 50 4f 57 45 52  .  r *= TWOPOWER
7550: 33 32 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65  32;.  if( sqlite
7560: 33 41 64 64 49 6e 74 36 34 28 26 72 2c 20 69 41  3AddInt64(&r, iA
7570: 30 2a 69 42 30 29 20 29 20 72 65 74 75 72 6e 20  0*iB0) ) return 
7580: 31 3b 0a 20 20 2a 70 41 20 3d 20 72 3b 0a 20 20  1;.  *pA = r;.  
7590: 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a  return 0;.}../*.
75a0: 2a 2a 20 43 6f 6d 70 75 74 65 20 74 68 65 20 61  ** Compute the a
75b0: 62 73 6f 6c 75 74 65 20 76 61 6c 75 65 20 6f 66  bsolute value of
75c0: 20 61 20 33 32 2d 62 69 74 20 73 69 67 6e 65 64   a 32-bit signed
75d0: 20 69 6e 74 65 67 65 72 2c 20 6f 66 20 70 6f 73   integer, of pos
75e0: 73 69 62 6c 65 2e 20 20 4f 72 20 0a 2a 2a 20 69  sible.  Or .** i
75f0: 66 20 74 68 65 20 69 6e 74 65 67 65 72 20 68 61  f the integer ha
7600: 73 20 61 20 76 61 6c 75 65 20 6f 66 20 2d 32 31  s a value of -21
7610: 34 37 34 38 33 36 34 38 2c 20 72 65 74 75 72 6e  47483648, return
7620: 20 2b 32 31 34 37 34 38 33 36 34 37 0a 2a 2f 0a   +2147483647.*/.
7630: 69 6e 74 20 73 71 6c 69 74 65 33 41 62 73 49 6e  int sqlite3AbsIn
7640: 74 33 32 28 69 6e 74 20 78 29 7b 0a 20 20 69 66  t32(int x){.  if
7650: 28 20 78 3e 3d 30 20 29 20 72 65 74 75 72 6e 20  ( x>=0 ) return 
7660: 78 3b 0a 20 20 69 66 28 20 78 3d 3d 28 69 6e 74  x;.  if( x==(int
7670: 29 30 78 38 30 30 30 30 30 30 30 20 29 20 72 65  )0x80000000 ) re
7680: 74 75 72 6e 20 30 78 37 66 66 66 66 66 66 66 3b  turn 0x7fffffff;
7690: 0a 20 20 72 65 74 75 72 6e 20 2d 78 3b 0a 7d 0a  .  return -x;.}.
76a0: 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 45  .#ifdef SQLITE_E
76b0: 4e 41 42 4c 45 5f 38 5f 33 5f 4e 41 4d 45 53 0a  NABLE_8_3_NAMES.
76c0: 2f 2a 0a 2a 2a 20 49 66 20 53 51 4c 49 54 45 5f  /*.** If SQLITE_
76d0: 45 4e 41 42 4c 45 5f 38 5f 33 5f 4e 41 4d 45 53  ENABLE_8_3_NAMES
76e0: 20 69 73 20 73 65 74 20 61 74 20 63 6f 6d 70 69   is set at compi
76f0: 6c 65 2d 74 69 6d 65 20 61 6e 64 20 69 66 20 74  le-time and if t
7700: 68 65 20 64 61 74 61 62 61 73 65 0a 2a 2a 20 66  he database.** f
7710: 69 6c 65 6e 61 6d 65 20 69 6e 20 7a 42 61 73 65  ilename in zBase
7720: 46 69 6c 65 6e 61 6d 65 20 69 73 20 61 20 55 52  Filename is a UR
7730: 49 20 77 69 74 68 20 74 68 65 20 22 38 5f 33 5f  I with the "8_3_
7740: 6e 61 6d 65 73 3d 31 22 20 70 61 72 61 6d 65 74  names=1" paramet
7750: 65 72 20 61 6e 64 0a 2a 2a 20 69 66 20 66 69 6c  er and.** if fil
7760: 65 6e 61 6d 65 20 69 6e 20 7a 5b 5d 20 68 61 73  ename in z[] has
7770: 20 61 20 73 75 66 66 69 78 20 28 61 2e 6b 2e 61   a suffix (a.k.a
7780: 2e 20 22 65 78 74 65 6e 73 69 6f 6e 22 29 20 74  . "extension") t
7790: 68 61 74 20 69 73 20 6c 6f 6e 67 65 72 20 74 68  hat is longer th
77a0: 61 6e 0a 2a 2a 20 74 68 72 65 65 20 63 68 61 72  an.** three char
77b0: 61 63 74 65 72 73 2c 20 74 68 65 6e 20 73 68 6f  acters, then sho
77c0: 72 74 65 6e 20 74 68 65 20 73 75 66 66 69 78 20  rten the suffix 
77d0: 6f 6e 20 7a 5b 5d 20 74 6f 20 62 65 20 74 68 65  on z[] to be the
77e0: 20 6c 61 73 74 20 74 68 72 65 65 0a 2a 2a 20 63   last three.** c
77f0: 68 61 72 61 63 74 65 72 73 20 6f 66 20 74 68 65  haracters of the
7800: 20 6f 72 69 67 69 6e 61 6c 20 73 75 66 66 69 78   original suffix
7810: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 53 51 4c 49 54  ..**.** If SQLIT
7820: 45 5f 45 4e 41 42 4c 45 5f 38 5f 33 5f 4e 41 4d  E_ENABLE_8_3_NAM
7830: 45 53 20 69 73 20 73 65 74 20 74 6f 20 32 20 61  ES is set to 2 a
7840: 74 20 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 2c 20  t compile-time, 
7850: 74 68 65 6e 20 61 6c 77 61 79 73 0a 2a 2a 20 64  then always.** d
7860: 6f 20 74 68 65 20 73 75 66 66 69 78 20 73 68 6f  o the suffix sho
7870: 72 74 65 6e 69 6e 67 20 72 65 67 61 72 64 6c 65  rtening regardle
7880: 73 73 20 6f 66 20 55 52 49 20 70 61 72 61 6d 65  ss of URI parame
7890: 74 65 72 2e 0a 2a 2a 0a 2a 2a 20 45 78 61 6d 70  ter..**.** Examp
78a0: 6c 65 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 74  les:.**.**     t
78b0: 65 73 74 2e 64 62 2d 6a 6f 75 72 6e 61 6c 20 20  est.db-journal  
78c0: 20 20 3d 3e 20 20 20 74 65 73 74 2e 6e 61 6c 0a    =>   test.nal.
78d0: 2a 2a 20 20 20 20 20 74 65 73 74 2e 64 62 2d 77  **     test.db-w
78e0: 61 6c 20 20 20 20 20 20 20 20 3d 3e 20 20 20 74  al        =>   t
78f0: 65 73 74 2e 77 61 6c 0a 2a 2a 20 20 20 20 20 74  est.wal.**     t
7900: 65 73 74 2e 64 62 2d 73 68 6d 20 20 20 20 20 20  est.db-shm      
7910: 20 20 3d 3e 20 20 20 74 65 73 74 2e 73 68 6d 0a    =>   test.shm.
7920: 2a 2a 20 20 20 20 20 74 65 73 74 2e 64 62 2d 6d  **     test.db-m
7930: 6a 37 66 33 33 31 39 66 61 20 3d 3e 20 20 20 74  j7f3319fa =>   t
7940: 65 73 74 2e 39 66 61 0a 2a 2f 0a 76 6f 69 64 20  est.9fa.*/.void 
7950: 73 71 6c 69 74 65 33 46 69 6c 65 53 75 66 66 69  sqlite3FileSuffi
7960: 78 33 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  x3(const char *z
7970: 42 61 73 65 46 69 6c 65 6e 61 6d 65 2c 20 63 68  BaseFilename, ch
7980: 61 72 20 2a 7a 29 7b 0a 23 69 66 20 53 51 4c 49  ar *z){.#if SQLI
7990: 54 45 5f 45 4e 41 42 4c 45 5f 38 5f 33 5f 4e 41  TE_ENABLE_8_3_NA
79a0: 4d 45 53 3c 32 0a 20 20 63 6f 6e 73 74 20 63 68  MES<2.  const ch
79b0: 61 72 20 2a 7a 4f 6b 3b 0a 20 20 7a 4f 6b 20 3d  ar *zOk;.  zOk =
79c0: 20 73 71 6c 69 74 65 33 5f 75 72 69 5f 70 61 72   sqlite3_uri_par
79d0: 61 6d 65 74 65 72 28 7a 42 61 73 65 46 69 6c 65  ameter(zBaseFile
79e0: 6e 61 6d 65 2c 20 22 38 5f 33 5f 6e 61 6d 65 73  name, "8_3_names
79f0: 22 29 3b 0a 20 20 69 66 28 20 7a 4f 6b 20 26 26  ");.  if( zOk &&
7a00: 20 73 71 6c 69 74 65 33 47 65 74 42 6f 6f 6c 65   sqlite3GetBoole
7a10: 61 6e 28 7a 4f 6b 29 20 29 0a 23 65 6e 64 69 66  an(zOk) ).#endif
7a20: 0a 20 20 7b 0a 20 20 20 20 69 6e 74 20 69 2c 20  .  {.    int i, 
7a30: 73 7a 3b 0a 20 20 20 20 73 7a 20 3d 20 73 71 6c  sz;.    sz = sql
7a40: 69 74 65 33 53 74 72 6c 65 6e 33 30 28 7a 29 3b  ite3Strlen30(z);
7a50: 0a 20 20 20 20 66 6f 72 28 69 3d 73 7a 2d 31 3b  .    for(i=sz-1;
7a60: 20 69 3e 30 20 26 26 20 7a 5b 69 5d 21 3d 27 2f   i>0 && z[i]!='/
7a70: 27 20 26 26 20 7a 5b 69 5d 21 3d 27 2e 27 3b 20  ' && z[i]!='.'; 
7a80: 69 2d 2d 29 7b 7d 0a 20 20 20 20 69 66 28 20 7a  i--){}.    if( z
7a90: 5b 69 5d 3d 3d 27 2e 27 20 26 26 20 41 4c 57 41  [i]=='.' && ALWA
7aa0: 59 53 28 73 7a 3e 69 2b 34 29 20 29 20 6d 65 6d  YS(sz>i+4) ) mem
7ab0: 6d 6f 76 65 28 26 7a 5b 69 2b 31 5d 2c 20 26 7a  move(&z[i+1], &z
7ac0: 5b 73 7a 2d 33 5d 2c 20 34 29 3b 0a 20 20 7d 0a  [sz-3], 4);.  }.
7ad0: 7d 0a 23 65 6e 64 69 66 0a                       }.#endif.