System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact 700bc0320098c53ff1efeb27353de8ac8400c9d2:


0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 2a 20 41 44  *********.. * AD
0040: 4f 2e 4e 45 54 20 32 2e 30 20 44 61 74 61 20 50  O.NET 2.0 Data P
0050: 72 6f 76 69 64 65 72 20 66 6f 72 20 53 51 4c 69  rovider for SQLi
0060: 74 65 20 56 65 72 73 69 6f 6e 20 33 2e 58 0d 0a  te Version 3.X..
0070: 20 2a 20 57 72 69 74 74 65 6e 20 62 79 20 52 6f   * Written by Ro
0080: 62 65 72 74 20 53 69 6d 70 73 6f 6e 20 28 72 6f  bert Simpson (ro
0090: 62 65 72 74 40 62 6c 61 63 6b 63 61 73 74 6c 65  bert@blackcastle
00a0: 73 6f 66 74 2e 63 6f 6d 29 0d 0a 20 2a 0d 0a 20  soft.com).. *.. 
00b0: 2a 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74 68  * Released to th
00c0: 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e 2c  e public domain,
00d0: 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77 6e   use at your own
00e0: 20 72 69 73 6b 21 0d 0a 20 2a 2a 2a 2a 2a 2a 2a   risk!.. *******
00f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0100: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0110: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0120: 2a 2f 0d 0a 0d 0a 23 69 66 64 65 66 20 5f 57 49  */....#ifdef _WI
0130: 4e 33 32 0d 0a 23 64 65 66 69 6e 65 20 53 51 4c  N32..#define SQL
0140: 49 54 45 5f 41 50 49 20 5f 5f 64 65 63 6c 73 70  ITE_API __declsp
0150: 65 63 28 64 6c 6c 65 78 70 6f 72 74 29 0d 0a 23  ec(dllexport)..#
0160: 65 6c 73 65 0d 0a 23 64 65 66 69 6e 65 20 57 49  else..#define WI
0170: 4e 41 50 49 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a  NAPI..#endif....
0180: 23 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 56 45  #if /* SQLITE_VE
0190: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20  RSION_NUMBER >= 
01a0: 33 30 31 33 30 30 30 20 26 26 20 2a 2f 20 64 65  3013000 && */ de
01b0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 53 45  fined(INTEROP_SE
01c0: 53 53 49 4f 4e 5f 45 58 54 45 4e 53 49 4f 4e 29  SSION_EXTENSION)
01d0: 0d 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  ..#ifndef SQLITE
01e0: 5f 45 4e 41 42 4c 45 5f 53 45 53 53 49 4f 4e 0d  _ENABLE_SESSION.
01f0: 0a 23 64 65 66 69 6e 65 20 53 51 4c 49 54 45 5f  .#define SQLITE_
0200: 45 4e 41 42 4c 45 5f 53 45 53 53 49 4f 4e 20 28  ENABLE_SESSION (
0210: 31 29 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 6e  1)..#endif..#ifn
0220: 64 65 66 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c  def SQLITE_ENABL
0230: 45 5f 50 52 45 55 50 44 41 54 45 5f 48 4f 4f 4b  E_PREUPDATE_HOOK
0240: 0d 0a 23 64 65 66 69 6e 65 20 53 51 4c 49 54 45  ..#define SQLITE
0250: 5f 45 4e 41 42 4c 45 5f 50 52 45 55 50 44 41 54  _ENABLE_PREUPDAT
0260: 45 5f 48 4f 4f 4b 20 28 31 29 0d 0a 23 65 6e 64  E_HOOK (1)..#end
0270: 69 66 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69  if..#endif....#i
0280: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
0290: 50 5f 49 4e 43 4c 55 44 45 5f 53 45 45 29 0d 0a  P_INCLUDE_SEE)..
02a0: 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74  #include "../ext
02b0: 2f 73 65 65 2d 70 72 65 66 69 78 2e 74 78 74 22  /see-prefix.txt"
02c0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 6e 63  ..#endif....#inc
02d0: 6c 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 71  lude "../core/sq
02e0: 6c 69 74 65 33 2e 63 22 0d 0a 0d 0a 23 69 66 20  lite3.c"....#if 
02f0: 21 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 0d 0a  !SQLITE_OS_WIN..
0300: 23 69 6e 63 6c 75 64 65 20 3c 77 63 68 61 72 2e  #include <wchar.
0310: 68 3e 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69  h>..#endif....#i
0320: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
0330: 50 5f 49 4e 43 4c 55 44 45 5f 45 58 54 52 41 29  P_INCLUDE_EXTRA)
0340: 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65  ..#include "../e
0350: 78 74 2f 65 78 74 72 61 2e 63 22 0d 0a 23 65 6e  xt/extra.c"..#en
0360: 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  dif....#if defin
0370: 65 64 28 49 4e 54 45 52 4f 50 5f 49 4e 43 4c 55  ed(INTEROP_INCLU
0380: 44 45 5f 43 45 52 4f 44 29 0d 0a 23 69 6e 63 6c  DE_CEROD)..#incl
0390: 75 64 65 20 22 2e 2e 2f 65 78 74 2f 63 65 72 6f  ude "../ext/cero
03a0: 64 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a  d.c"..#endif....
03b0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
03c0: 52 4f 50 5f 49 4e 43 4c 55 44 45 5f 53 45 45 29  ROP_INCLUDE_SEE)
03d0: 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65  ..#include "../e
03e0: 78 74 2f 73 65 65 2e 63 22 0d 0a 23 65 6e 64 69  xt/see.c"..#endi
03f0: 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  f....#if defined
0400: 28 49 4e 54 45 52 4f 50 5f 49 4e 43 4c 55 44 45  (INTEROP_INCLUDE
0410: 5f 5a 49 50 56 46 53 29 0d 0a 23 69 6e 63 6c 75  _ZIPVFS)..#inclu
0420: 64 65 20 22 2e 2e 2f 65 78 74 2f 7a 69 70 76 66  de "../ext/zipvf
0430: 73 2e 63 22 0d 0a 23 69 66 20 64 65 66 69 6e 65  s.c"..#if define
0440: 64 28 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f  d(SQLITE_ENABLE_
0450: 5a 49 50 56 46 53 5f 56 54 41 42 29 0d 0a 23 69  ZIPVFS_VTAB)..#i
0460: 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 7a  nclude "../ext/z
0470: 69 70 76 66 73 5f 76 74 61 62 2e 63 22 0d 0a 23  ipvfs_vtab.c"..#
0480: 65 6e 64 69 66 0d 0a 23 69 6e 63 6c 75 64 65 20  endif..#include 
0490: 22 2e 2e 2f 65 78 74 2f 61 6c 67 6f 72 69 74 68  "../ext/algorith
04a0: 6d 73 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d  ms.c"..#endif...
04b0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54  .#if defined(INT
04c0: 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e 5f 46  EROP_EXTENSION_F
04d0: 55 4e 43 54 49 4f 4e 53 29 0d 0a 23 75 6e 64 65  UNCTIONS)..#unde
04e0: 66 20 43 4f 4d 50 49 4c 45 5f 53 51 4c 49 54 45  f COMPILE_SQLITE
04f0: 5f 45 58 54 45 4e 53 49 4f 4e 53 5f 41 53 5f 4c  _EXTENSIONS_AS_L
0500: 4f 41 44 41 42 4c 45 5f 4d 4f 44 55 4c 45 0d 0a  OADABLE_MODULE..
0510: 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 63 6f 6e  #include "../con
0520: 74 72 69 62 2f 65 78 74 65 6e 73 69 6f 6e 2d 66  trib/extension-f
0530: 75 6e 63 74 69 6f 6e 73 2e 63 22 0d 0a 65 78 74  unctions.c"..ext
0540: 65 72 6e 20 69 6e 74 20 52 65 67 69 73 74 65 72  ern int Register
0550: 45 78 74 65 6e 73 69 6f 6e 46 75 6e 63 74 69 6f  ExtensionFunctio
0560: 6e 73 28 73 71 6c 69 74 65 33 20 2a 64 62 29 3b  ns(sqlite3 *db);
0570: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20  ..#endif....#if 
0580: 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 20 26 26  SQLITE_OS_WIN &&
0590: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50   defined(INTEROP
05a0: 5f 43 4f 44 45 43 29 20 26 26 20 21 64 65 66 69  _CODEC) && !defi
05b0: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 49 4e 43 4c  ned(INTEROP_INCL
05c0: 55 44 45 5f 53 45 45 29 0d 0a 23 69 66 64 65 66  UDE_SEE)..#ifdef
05d0: 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 5a   SQLITE_ENABLE_Z
05e0: 49 50 56 46 53 0d 0a 23 64 65 66 69 6e 65 20 49  IPVFS..#define I
05f0: 4e 54 45 52 4f 50 5f 43 4f 44 45 43 5f 47 45 54  NTEROP_CODEC_GET
0600: 5f 50 41 47 45 52 28 61 2c 62 2c 63 29 20 73 71  _PAGER(a,b,c) sq
0610: 6c 69 74 65 33 50 61 67 65 72 47 65 74 28 61 2c  lite3PagerGet(a,
0620: 62 2c 63 2c 30 29 0d 0a 23 65 6c 69 66 20 53 51  b,c,0)..#elif SQ
0630: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d  LITE_VERSION_NUM
0640: 42 45 52 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a  BER >= 3010000..
0650: 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f  #define INTEROP_
0660: 43 4f 44 45 43 5f 47 45 54 5f 50 41 47 45 52 28  CODEC_GET_PAGER(
0670: 61 2c 62 2c 63 29 20 73 71 6c 69 74 65 33 50 61  a,b,c) sqlite3Pa
0680: 67 65 72 47 65 74 28 61 2c 62 2c 63 2c 30 29 0d  gerGet(a,b,c,0).
0690: 0a 23 65 6c 73 65 0d 0a 23 64 65 66 69 6e 65 20  .#else..#define 
06a0: 49 4e 54 45 52 4f 50 5f 43 4f 44 45 43 5f 47 45  INTEROP_CODEC_GE
06b0: 54 5f 50 41 47 45 52 28 61 2c 62 2c 63 29 20 73  T_PAGER(a,b,c) s
06c0: 71 6c 69 74 65 33 50 61 67 65 72 47 65 74 28 61  qlite3PagerGet(a
06d0: 2c 62 2c 63 29 0d 0a 23 65 6e 64 69 66 0d 0a 23  ,b,c)..#endif..#
06e0: 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 77 69 6e 2f  include "../win/
06f0: 63 72 79 70 74 2e 63 22 0d 0a 23 65 6e 64 69 66  crypt.c"..#endif
0700: 0d 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 69 6e  ....#include "in
0710: 74 65 72 6f 70 2e 68 22 0d 0a 0d 0a 23 64 65 66  terop.h"....#def
0720: 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55  ine INTEROP_DEBU
0730: 47 5f 4e 4f 4e 45 20 20 20 20 20 20 20 20 20 20  G_NONE          
0740: 20 28 30 78 30 30 30 30 29 0d 0a 23 64 65 66 69   (0x0000)..#defi
0750: 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ne INTEROP_DEBUG
0760: 5f 43 4c 4f 53 45 20 20 20 20 20 20 20 20 20 20  _CLOSE          
0770: 28 30 78 30 30 30 31 29 0d 0a 23 64 65 66 69 6e  (0x0001)..#defin
0780: 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f  e INTEROP_DEBUG_
0790: 46 49 4e 41 4c 49 5a 45 20 20 20 20 20 20 20 28  FINALIZE       (
07a0: 30 78 30 30 30 32 29 0d 0a 23 64 65 66 69 6e 65  0x0002)..#define
07b0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42   INTEROP_DEBUG_B
07c0: 41 43 4b 55 50 5f 46 49 4e 49 53 48 20 20 28 30  ACKUP_FINISH  (0
07d0: 78 30 30 30 34 29 0d 0a 23 64 65 66 69 6e 65 20  x0004)..#define 
07e0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50  INTEROP_DEBUG_OP
07f0: 45 4e 20 20 20 20 20 20 20 20 20 20 20 28 30 78  EN           (0x
0800: 30 30 30 38 29 0d 0a 23 64 65 66 69 6e 65 20 49  0008)..#define I
0810: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45  NTEROP_DEBUG_OPE
0820: 4e 31 36 20 20 20 20 20 20 20 20 20 28 30 78 30  N16         (0x0
0830: 30 31 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e  010)..#define IN
0840: 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50  TEROP_DEBUG_PREP
0850: 41 52 45 20 20 20 20 20 20 20 20 28 30 78 30 30  ARE        (0x00
0860: 32 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54  20)..#define INT
0870: 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41  EROP_DEBUG_PREPA
0880: 52 45 31 36 20 20 20 20 20 20 28 30 78 30 30 34  RE16      (0x004
0890: 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45  0)..#define INTE
08a0: 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 54 20  ROP_DEBUG_RESET 
08b0: 20 20 20 20 20 20 20 20 20 28 30 78 30 30 38 30           (0x0080
08c0: 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52  )..#define INTER
08d0: 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 53  OP_DEBUG_CHANGES
08e0: 20 20 20 20 20 20 20 20 28 30 78 30 31 30 30 29          (0x0100)
08f0: 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f  ..#define INTERO
0900: 50 5f 44 45 42 55 47 5f 42 52 45 41 4b 20 20 20  P_DEBUG_BREAK   
0910: 20 20 20 20 20 20 20 28 30 78 30 32 30 30 29 0d         (0x0200).
0920: 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50  .#define INTEROP
0930: 5f 44 45 42 55 47 5f 42 4c 4f 42 5f 43 4c 4f 53  _DEBUG_BLOB_CLOS
0940: 45 20 20 20 20 20 28 30 78 30 34 30 30 29 0d 0a  E     (0x0400)..
0950: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 5f 4d  ..#if defined(_M
0960: 53 43 5f 56 45 52 29 20 26 26 20 64 65 66 69 6e  SC_VER) && defin
0970: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
0980: 29 20 26 26 20 5c 0d 0a 20 20 20 20 28 49 4e 54  ) && \..    (INT
0990: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
09a0: 45 52 4f 50 5f 44 45 42 55 47 5f 42 52 45 41 4b  EROP_DEBUG_BREAK
09b0: 29 0d 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 74  )..#define sqlit
09c0: 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 61  e3InteropBreak(a
09d0: 29 20 7b 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ) { sqlite3Inter
09e0: 6f 70 44 65 62 75 67 28 22 25 73 5c 6e 22 2c 20  opDebug("%s\n", 
09f0: 28 61 29 29 3b 20 5f 5f 64 65 62 75 67 62 72 65  (a)); __debugbre
0a00: 61 6b 28 29 3b 20 7d 0d 0a 23 65 6c 73 65 0d 0a  ak(); }..#else..
0a10: 23 64 65 66 69 6e 65 20 73 71 6c 69 74 65 33 49  #define sqlite3I
0a20: 6e 74 65 72 6f 70 42 72 65 61 6b 28 61 29 0d 0a  nteropBreak(a)..
0a30: 23 65 6e 64 69 66 0d 0a 0d 0a 74 79 70 65 64 65  #endif....typede
0a40: 66 20 76 6f 69 64 20 28 2a 53 51 4c 49 54 45 55  f void (*SQLITEU
0a50: 53 45 52 46 55 4e 43 29 28 73 71 6c 69 74 65 33  SERFUNC)(sqlite3
0a60: 5f 63 6f 6e 74 65 78 74 20 2a 2c 20 69 6e 74 2c  _context *, int,
0a70: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
0a80: 2a 29 3b 0d 0a 74 79 70 65 64 65 66 20 76 6f 69  *);..typedef voi
0a90: 64 20 28 2a 53 51 4c 49 54 45 46 55 4e 43 46 49  d (*SQLITEFUNCFI
0aa0: 4e 41 4c 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e  NAL)(sqlite3_con
0ab0: 74 65 78 74 20 2a 29 3b 0d 0a 0d 0a 2f 2a 0d 0a  text *);..../*..
0ac0: 2a 2a 20 41 6e 20 61 72 72 61 79 20 6f 66 20 6e  ** An array of n
0ad0: 61 6d 65 73 20 6f 66 20 61 6c 6c 20 63 6f 6d 70  ames of all comp
0ae0: 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 73  ile-time options
0af0: 2e 20 20 54 68 69 73 20 61 72 72 61 79 20 73 68  .  This array sh
0b00: 6f 75 6c 64 0d 0a 2a 2a 20 62 65 20 73 6f 72 74  ould..** be sort
0b10: 65 64 20 41 2d 5a 2e 0d 0a 2a 2a 0d 0a 2a 2a 20  ed A-Z...**..** 
0b20: 54 68 69 73 20 61 72 72 61 79 20 6c 6f 6f 6b 73  This array looks
0b30: 20 6c 61 72 67 65 2c 20 62 75 74 20 69 6e 20 61   large, but in a
0b40: 20 74 79 70 69 63 61 6c 20 69 6e 73 74 61 6c 6c   typical install
0b50: 61 74 69 6f 6e 20 61 63 74 75 61 6c 6c 79 20 75  ation actually u
0b60: 73 65 73 0d 0a 2a 2a 20 6f 6e 6c 79 20 61 20 68  ses..** only a h
0b70: 61 6e 64 66 75 6c 20 6f 66 20 63 6f 6d 70 69 6c  andful of compil
0b80: 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 73 2c 20  e-time options, 
0b90: 73 6f 20 6d 6f 73 74 20 74 69 6d 65 73 20 74 68  so most times th
0ba0: 69 73 20 61 72 72 61 79 20 69 73 20 75 73 75 61  is array is usua
0bb0: 6c 6c 79 0d 0a 2a 2a 20 72 61 74 68 65 72 20 73  lly..** rather s
0bc0: 68 6f 72 74 20 61 6e 64 20 75 73 65 73 20 6c 69  hort and uses li
0bd0: 74 74 6c 65 20 6d 65 6d 6f 72 79 20 73 70 61 63  ttle memory spac
0be0: 65 2e 0d 0a 2a 2f 0d 0a 73 74 61 74 69 63 20 63  e...*/..static c
0bf0: 6f 6e 73 74 20 63 68 61 72 20 2a 20 63 6f 6e 73  onst char * cons
0c00: 74 20 61 7a 49 6e 74 65 72 6f 70 43 6f 6d 70 69  t azInteropCompi
0c10: 6c 65 4f 70 74 5b 5d 20 3d 20 7b 0d 0a 0d 0a 2f  leOpt[] = {..../
0c20: 2a 20 54 68 65 73 65 20 6d 61 63 72 6f 73 20 61  * These macros a
0c30: 72 65 20 70 72 6f 76 69 64 65 64 20 74 6f 20 22  re provided to "
0c40: 73 74 72 69 6e 67 69 66 79 22 20 74 68 65 20 76  stringify" the v
0c50: 61 6c 75 65 20 6f 66 20 74 68 65 20 64 65 66 69  alue of the defi
0c60: 6e 65 0d 0a 2a 2a 20 66 6f 72 20 74 68 6f 73 65  ne..** for those
0c70: 20 6f 70 74 69 6f 6e 73 20 69 6e 20 77 68 69 63   options in whic
0c80: 68 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 6d  h the value is m
0c90: 65 61 6e 69 6e 67 66 75 6c 2e 20 2a 2f 0d 0a 23  eaningful. */..#
0ca0: 69 66 6e 64 65 66 20 43 54 49 4d 45 4f 50 54 5f  ifndef CTIMEOPT_
0cb0: 56 41 4c 5f 0d 0a 23 64 65 66 69 6e 65 20 43 54  VAL_..#define CT
0cc0: 49 4d 45 4f 50 54 5f 56 41 4c 5f 28 6f 70 74 29  IMEOPT_VAL_(opt)
0cd0: 20 23 6f 70 74 0d 0a 23 65 6e 64 69 66 0d 0a 0d   #opt..#endif...
0ce0: 0a 23 69 66 6e 64 65 66 20 43 54 49 4d 45 4f 50  .#ifndef CTIMEOP
0cf0: 54 5f 56 41 4c 0d 0a 23 64 65 66 69 6e 65 20 43  T_VAL..#define C
0d00: 54 49 4d 45 4f 50 54 5f 56 41 4c 28 6f 70 74 29  TIMEOPT_VAL(opt)
0d10: 20 43 54 49 4d 45 4f 50 54 5f 56 41 4c 5f 28 6f   CTIMEOPT_VAL_(o
0d20: 70 74 29 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23  pt)..#endif....#
0d30: 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 43 4f  ifdef INTEROP_CO
0d40: 44 45 43 0d 0a 20 20 22 43 4f 44 45 43 22 2c 0d  DEC..  "CODEC",.
0d50: 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66 20  .#endif..#ifdef 
0d60: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 0d 0a 20  INTEROP_DEBUG.. 
0d70: 20 22 44 45 42 55 47 3d 22 20 43 54 49 4d 45 4f   "DEBUG=" CTIMEO
0d80: 50 54 5f 56 41 4c 28 49 4e 54 45 52 4f 50 5f 44  PT_VAL(INTEROP_D
0d90: 45 42 55 47 29 2c 0d 0a 23 65 6e 64 69 66 0d 0a  EBUG),..#endif..
0da0: 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 45  #ifdef INTEROP_E
0db0: 58 54 45 4e 53 49 4f 4e 5f 46 55 4e 43 54 49 4f  XTENSION_FUNCTIO
0dc0: 4e 53 0d 0a 20 20 22 45 58 54 45 4e 53 49 4f 4e  NS..  "EXTENSION
0dd0: 5f 46 55 4e 43 54 49 4f 4e 53 22 2c 0d 0a 23 65  _FUNCTIONS",..#e
0de0: 6e 64 69 66 0d 0a 23 69 66 64 65 66 20 49 4e 54  ndif..#ifdef INT
0df0: 45 52 4f 50 5f 49 4e 43 4c 55 44 45 5f 43 45 52  EROP_INCLUDE_CER
0e00: 4f 44 0d 0a 20 20 22 49 4e 43 4c 55 44 45 5f 43  OD..  "INCLUDE_C
0e10: 45 52 4f 44 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a  EROD",..#endif..
0e20: 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 49  #ifdef INTEROP_I
0e30: 4e 43 4c 55 44 45 5f 45 58 54 52 41 0d 0a 20 20  NCLUDE_EXTRA..  
0e40: 22 49 4e 43 4c 55 44 45 5f 45 58 54 52 41 22 2c  "INCLUDE_EXTRA",
0e50: 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66  ..#endif..#ifdef
0e60: 20 49 4e 54 45 52 4f 50 5f 49 4e 43 4c 55 44 45   INTEROP_INCLUDE
0e70: 5f 53 45 45 0d 0a 20 20 22 49 4e 43 4c 55 44 45  _SEE..  "INCLUDE
0e80: 5f 53 45 45 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a  _SEE",..#endif..
0e90: 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 49  #ifdef INTEROP_I
0ea0: 4e 43 4c 55 44 45 5f 5a 49 50 56 46 53 0d 0a 20  NCLUDE_ZIPVFS.. 
0eb0: 20 22 49 4e 43 4c 55 44 45 5f 5a 49 50 56 46 53   "INCLUDE_ZIPVFS
0ec0: 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64  ",..#endif..#ifd
0ed0: 65 66 20 49 4e 54 45 52 4f 50 5f 4a 53 4f 4e 31  ef INTEROP_JSON1
0ee0: 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 22 4a  _EXTENSION..  "J
0ef0: 53 4f 4e 31 5f 45 58 54 45 4e 53 49 4f 4e 22 2c  SON1_EXTENSION",
0f00: 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66  ..#endif..#ifdef
0f10: 20 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 5f   INTEROP_LEGACY_
0f20: 43 4c 4f 53 45 0d 0a 20 20 22 4c 45 47 41 43 59  CLOSE..  "LEGACY
0f30: 5f 43 4c 4f 53 45 22 2c 0d 0a 23 65 6e 64 69 66  _CLOSE",..#endif
0f40: 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50  ..#ifdef INTEROP
0f50: 5f 4c 4f 47 0d 0a 20 20 22 4c 4f 47 22 2c 0d 0a  _LOG..  "LOG",..
0f60: 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66 20 49  #endif..#ifdef I
0f70: 4e 54 45 52 4f 50 5f 50 45 52 43 45 4e 54 49 4c  NTEROP_PERCENTIL
0f80: 45 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 22  E_EXTENSION..  "
0f90: 50 45 52 43 45 4e 54 49 4c 45 5f 45 58 54 45 4e  PERCENTILE_EXTEN
0fa0: 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a  SION",..#endif..
0fb0: 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 52  #ifdef INTEROP_R
0fc0: 45 47 45 58 50 5f 45 58 54 45 4e 53 49 4f 4e 0d  EGEXP_EXTENSION.
0fd0: 0a 20 20 22 52 45 47 45 58 50 5f 45 58 54 45 4e  .  "REGEXP_EXTEN
0fe0: 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a  SION",..#endif..
0ff0: 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 53  #ifdef INTEROP_S
1000: 45 53 53 49 4f 4e 5f 45 58 54 45 4e 53 49 4f 4e  ESSION_EXTENSION
1010: 0d 0a 20 20 22 53 45 53 53 49 4f 4e 5f 45 58 54  ..  "SESSION_EXT
1020: 45 4e 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66  ENSION",..#endif
1030: 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50  ..#ifdef INTEROP
1040: 5f 53 48 41 31 5f 45 58 54 45 4e 53 49 4f 4e 0d  _SHA1_EXTENSION.
1050: 0a 20 20 22 53 48 41 31 5f 45 58 54 45 4e 53 49  .  "SHA1_EXTENSI
1060: 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69  ON",..#endif..#i
1070: 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 54 45 53  fdef INTEROP_TES
1080: 54 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 22  T_EXTENSION..  "
1090: 54 45 53 54 5f 45 58 54 45 4e 53 49 4f 4e 22 2c  TEST_EXTENSION",
10a0: 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66  ..#endif..#ifdef
10b0: 20 49 4e 54 45 52 4f 50 5f 54 4f 54 59 50 45 5f   INTEROP_TOTYPE_
10c0: 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 22 54 4f  EXTENSION..  "TO
10d0: 54 59 50 45 5f 45 58 54 45 4e 53 49 4f 4e 22 2c  TYPE_EXTENSION",
10e0: 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66  ..#endif..#ifdef
10f0: 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f   SQLITE_VERSION_
1100: 4e 55 4d 42 45 52 0d 0a 20 20 22 56 45 52 53 49  NUMBER..  "VERSI
1110: 4f 4e 5f 4e 55 4d 42 45 52 3d 22 20 43 54 49 4d  ON_NUMBER=" CTIM
1120: 45 4f 50 54 5f 56 41 4c 28 53 51 4c 49 54 45 5f  EOPT_VAL(SQLITE_
1130: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 29 2c  VERSION_NUMBER),
1140: 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66  ..#endif..#ifdef
1150: 20 49 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 4c   INTEROP_VIRTUAL
1160: 5f 54 41 42 4c 45 0d 0a 20 20 22 56 49 52 54 55  _TABLE..  "VIRTU
1170: 41 4c 5f 54 41 42 4c 45 22 2c 0d 0a 23 65 6e 64  AL_TABLE",..#end
1180: 69 66 0d 0a 7d 3b 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a  if..};..../*..**
1190: 20 47 69 76 65 6e 20 74 68 65 20 6e 61 6d 65 20   Given the name 
11a0: 6f 66 20 61 20 63 6f 6d 70 69 6c 65 2d 74 69 6d  of a compile-tim
11b0: 65 20 6f 70 74 69 6f 6e 2c 20 72 65 74 75 72 6e  e option, return
11c0: 20 74 72 75 65 20 69 66 20 74 68 61 74 20 6f 70   true if that op
11d0: 74 69 6f 6e 0d 0a 2a 2a 20 77 61 73 20 75 73 65  tion..** was use
11e0: 64 20 61 6e 64 20 66 61 6c 73 65 20 69 66 20 6e  d and false if n
11f0: 6f 74 2e 0d 0a 2a 2a 0d 0a 2a 2a 20 54 68 65 20  ot...**..** The 
1200: 6e 61 6d 65 20 63 61 6e 20 6f 70 74 69 6f 6e 61  name can optiona
1210: 6c 6c 79 20 62 65 67 69 6e 20 77 69 74 68 20 22  lly begin with "
1220: 53 51 4c 49 54 45 5f 22 20 6f 72 20 22 49 4e 54  SQLITE_" or "INT
1230: 45 52 4f 50 5f 22 20 62 75 74 20 74 68 6f 73 65  EROP_" but those
1240: 0d 0a 2a 2a 20 70 72 65 66 69 78 65 73 20 61 72  ..** prefixes ar
1250: 65 20 6e 6f 74 20 72 65 71 75 69 72 65 64 20 66  e not required f
1260: 6f 72 20 61 20 6d 61 74 63 68 2e 0d 0a 2a 2f 0d  or a match...*/.
1270: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
1280: 57 49 4e 41 50 49 20 69 6e 74 65 72 6f 70 5f 63  WINAPI interop_c
1290: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65  ompileoption_use
12a0: 64 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4f  d(const char *zO
12b0: 70 74 4e 61 6d 65 29 7b 0d 0a 20 20 69 6e 74 20  ptName){..  int 
12c0: 69 2c 20 6e 3b 0d 0a 20 20 69 66 28 20 73 71 6c  i, n;..  if( sql
12d0: 69 74 65 33 53 74 72 4e 49 43 6d 70 28 7a 4f 70  ite3StrNICmp(zOp
12e0: 74 4e 61 6d 65 2c 20 22 53 51 4c 49 54 45 5f 22  tName, "SQLITE_"
12f0: 2c 20 37 29 3d 3d 30 20 29 20 7a 4f 70 74 4e 61  , 7)==0 ) zOptNa
1300: 6d 65 20 2b 3d 20 37 3b 0d 0a 20 20 69 66 28 20  me += 7;..  if( 
1310: 73 71 6c 69 74 65 33 53 74 72 4e 49 43 6d 70 28  sqlite3StrNICmp(
1320: 7a 4f 70 74 4e 61 6d 65 2c 20 22 49 4e 54 45 52  zOptName, "INTER
1330: 4f 50 5f 22 2c 20 38 29 3d 3d 30 20 29 20 7a 4f  OP_", 8)==0 ) zO
1340: 70 74 4e 61 6d 65 20 2b 3d 20 38 3b 0d 0a 20 20  ptName += 8;..  
1350: 6e 20 3d 20 73 71 6c 69 74 65 33 53 74 72 6c 65  n = sqlite3Strle
1360: 6e 33 30 28 7a 4f 70 74 4e 61 6d 65 29 3b 0d 0a  n30(zOptName);..
1370: 0d 0a 20 20 2f 2a 20 53 69 6e 63 65 20 41 72 72  ..  /* Since Arr
1380: 61 79 53 69 7a 65 28 61 7a 49 6e 74 65 72 6f 70  aySize(azInterop
1390: 43 6f 6d 70 69 6c 65 4f 70 74 29 20 69 73 20 6e  CompileOpt) is n
13a0: 6f 72 6d 61 6c 6c 79 20 69 6e 20 73 69 6e 67 6c  ormally in singl
13b0: 65 20 64 69 67 69 74 73 2c 20 61 0d 0a 20 20 2a  e digits, a..  *
13c0: 2a 20 6c 69 6e 65 61 72 20 73 65 61 72 63 68 20  * linear search 
13d0: 69 73 20 61 64 65 71 75 61 74 65 2e 20 20 4e 6f  is adequate.  No
13e0: 20 6e 65 65 64 20 66 6f 72 20 61 20 62 69 6e 61   need for a bina
13f0: 72 79 20 73 65 61 72 63 68 2e 20 2a 2f 0d 0a 20  ry search. */.. 
1400: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 41 72 72 61   for(i=0; i<Arra
1410: 79 53 69 7a 65 28 61 7a 49 6e 74 65 72 6f 70 43  ySize(azInteropC
1420: 6f 6d 70 69 6c 65 4f 70 74 29 3b 20 69 2b 2b 29  ompileOpt); i++)
1430: 7b 0d 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74  {..    if( sqlit
1440: 65 33 53 74 72 4e 49 43 6d 70 28 7a 4f 70 74 4e  e3StrNICmp(zOptN
1450: 61 6d 65 2c 20 61 7a 49 6e 74 65 72 6f 70 43 6f  ame, azInteropCo
1460: 6d 70 69 6c 65 4f 70 74 5b 69 5d 2c 20 6e 29 3d  mpileOpt[i], n)=
1470: 3d 30 0d 0a 20 20 20 20 20 26 26 20 73 71 6c 69  =0..     && sqli
1480: 74 65 33 43 74 79 70 65 4d 61 70 5b 28 75 6e 73  te3CtypeMap[(uns
1490: 69 67 6e 65 64 20 63 68 61 72 29 61 7a 49 6e 74  igned char)azInt
14a0: 65 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 5b 69  eropCompileOpt[i
14b0: 5d 5b 6e 5d 5d 3d 3d 30 0d 0a 20 20 20 20 29 7b  ][n]]==0..    ){
14c0: 0d 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 31  ..      return 1
14d0: 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a 20  ;..    }..  }.. 
14e0: 20 72 65 74 75 72 6e 20 30 3b 0d 0a 7d 0d 0a 0d   return 0;..}...
14f0: 0a 2f 2a 0d 0a 2a 2a 20 52 65 74 75 72 6e 20 74  ./*..** Return t
1500: 68 65 20 4e 2d 74 68 20 63 6f 6d 70 69 6c 65 2d  he N-th compile-
1510: 74 69 6d 65 20 6f 70 74 69 6f 6e 20 73 74 72 69  time option stri
1520: 6e 67 2e 20 20 49 66 20 4e 20 69 73 20 6f 75 74  ng.  If N is out
1530: 20 6f 66 20 72 61 6e 67 65 2c 0d 0a 2a 2a 20 72   of range,..** r
1540: 65 74 75 72 6e 20 61 20 4e 55 4c 4c 20 70 6f 69  eturn a NULL poi
1550: 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 54  nter...*/..SQLIT
1560: 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72  E_API const char
1570: 20 2a 57 49 4e 41 50 49 20 69 6e 74 65 72 6f 70   *WINAPI interop
1580: 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67  _compileoption_g
1590: 65 74 28 69 6e 74 20 4e 29 7b 0d 0a 20 20 69 66  et(int N){..  if
15a0: 28 20 4e 3e 3d 30 20 26 26 20 4e 3c 41 72 72 61  ( N>=0 && N<Arra
15b0: 79 53 69 7a 65 28 61 7a 49 6e 74 65 72 6f 70 43  ySize(azInteropC
15c0: 6f 6d 70 69 6c 65 4f 70 74 29 20 29 7b 0d 0a 20  ompileOpt) ){.. 
15d0: 20 20 20 72 65 74 75 72 6e 20 61 7a 49 6e 74 65     return azInte
15e0: 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 5b 4e 5d  ropCompileOpt[N]
15f0: 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e  ;..  }..  return
1600: 20 30 3b 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65   0;..}....#if de
1610: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
1620: 42 55 47 29 20 7c 7c 20 64 65 66 69 6e 65 64 28  BUG) || defined(
1630: 49 4e 54 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51  INTEROP_LOG)..SQ
1640: 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69  LITE_PRIVATE voi
1650: 64 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70  d sqlite3Interop
1660: 44 65 62 75 67 28 63 6f 6e 73 74 20 63 68 61 72  Debug(const char
1670: 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b   *zFormat, ...){
1680: 0d 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 20  ..  va_list ap; 
1690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
16a0: 20 20 20 20 20 20 20 20 2f 2a 20 56 61 72 61 72          /* Varar
16b0: 67 20 6c 69 73 74 20 2a 2f 0d 0a 23 69 66 20 53  g list */..#if S
16c0: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55  QLITE_VERSION_NU
16d0: 4d 42 45 52 20 3e 3d 20 33 30 32 34 30 30 30 0d  MBER >= 3024000.
16e0: 0a 20 20 73 71 6c 69 74 65 33 5f 73 74 72 20 61  .  sqlite3_str a
16f0: 63 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  cc;             
1700: 20 20 20 20 20 20 20 2f 2a 20 50 6f 73 74 20 33         /* Post 3
1710: 2e 32 34 20 53 74 72 69 6e 67 20 61 63 63 75 6d  .24 String accum
1720: 75 6c 61 74 6f 72 20 2a 2f 0d 0a 23 65 6c 73 65  ulator */..#else
1730: 0d 0a 20 20 53 74 72 41 63 63 75 6d 20 61 63 63  ..  StrAccum acc
1740: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ;               
1750: 20 20 20 20 20 20 20 20 2f 2a 20 50 72 65 20 33          /* Pre 3
1760: 2e 32 34 20 73 74 72 69 6e 67 20 61 63 63 75 6d  .24 string accum
1770: 75 6c 61 74 6f 72 20 2a 2f 0d 0a 23 65 6e 64 69  ulator */..#endi
1780: 66 0d 0a 20 20 63 68 61 72 20 7a 4d 73 67 5b 53  f..  char zMsg[S
1790: 51 4c 49 54 45 5f 50 52 49 4e 54 5f 42 55 46 5f  QLITE_PRINT_BUF_
17a0: 53 49 5a 45 2a 33 5d 3b 20 2f 2a 20 43 6f 6d 70  SIZE*3]; /* Comp
17b0: 6c 65 74 65 20 6c 6f 67 20 6d 65 73 73 61 67 65  lete log message
17c0: 20 2a 2f 0d 0a 20 20 76 61 5f 73 74 61 72 74 28   */..  va_start(
17d0: 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0d 0a 23  ap, zFormat);..#
17e0: 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f  if SQLITE_VERSIO
17f0: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 38  N_NUMBER >= 3008
1800: 30 31 30 0d 0a 20 20 73 71 6c 69 74 65 33 53 74  010..  sqlite3St
1810: 72 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 2c  rAccumInit(&acc,
1820: 20 30 2c 20 7a 4d 73 67 2c 20 73 69 7a 65 6f 66   0, zMsg, sizeof
1830: 28 7a 4d 73 67 29 2c 20 30 29 3b 0d 0a 23 65 6c  (zMsg), 0);..#el
1840: 73 65 0d 0a 20 20 73 71 6c 69 74 65 33 53 74 72  se..  sqlite3Str
1850: 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 2c 20  AccumInit(&acc, 
1860: 7a 4d 73 67 2c 20 73 69 7a 65 6f 66 28 7a 4d 73  zMsg, sizeof(zMs
1870: 67 29 2c 20 30 29 3b 0d 0a 20 20 61 63 63 2e 75  g), 0);..  acc.u
1880: 73 65 4d 61 6c 6c 6f 63 20 3d 20 30 3b 0d 0a 23  seMalloc = 0;..#
1890: 65 6e 64 69 66 0d 0a 23 69 66 20 53 51 4c 49 54  endif..#if SQLIT
18a0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
18b0: 20 3e 3d 20 33 30 32 34 30 30 30 0d 0a 20 20 73   >= 3024000..  s
18c0: 71 6c 69 74 65 33 5f 73 74 72 5f 76 61 70 70 65  qlite3_str_vappe
18d0: 6e 64 66 28 26 61 63 63 2c 20 7a 46 6f 72 6d 61  ndf(&acc, zForma
18e0: 74 2c 20 61 70 29 3b 0d 0a 23 65 6c 69 66 20 53  t, ap);..#elif S
18f0: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55  QLITE_VERSION_NU
1900: 4d 42 45 52 20 3e 3d 20 33 30 31 31 30 30 30 0d  MBER >= 3011000.
1910: 0a 20 20 73 71 6c 69 74 65 33 56 58 50 72 69 6e  .  sqlite3VXPrin
1920: 74 66 28 26 61 63 63 2c 20 7a 46 6f 72 6d 61 74  tf(&acc, zFormat
1930: 2c 20 61 70 29 3b 0d 0a 23 65 6c 73 65 0d 0a 20  , ap);..#else.. 
1940: 20 73 71 6c 69 74 65 33 56 58 50 72 69 6e 74 66   sqlite3VXPrintf
1950: 28 26 61 63 63 2c 20 30 2c 20 7a 46 6f 72 6d 61  (&acc, 0, zForma
1960: 74 2c 20 61 70 29 3b 0d 0a 23 65 6e 64 69 66 0d  t, ap);..#endif.
1970: 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0d 0a  .  va_end(ap);..
1980: 23 69 66 20 53 51 4c 49 54 45 5f 4f 53 5f 57 49  #if SQLITE_OS_WI
1990: 4e 20 26 26 20 53 51 4c 49 54 45 5f 56 45 52 53  N && SQLITE_VERS
19a0: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30  ION_NUMBER >= 30
19b0: 30 37 30 31 33 0d 0a 20 20 73 71 6c 69 74 65 33  07013..  sqlite3
19c0: 5f 77 69 6e 33 32 5f 77 72 69 74 65 5f 64 65 62  _win32_write_deb
19d0: 75 67 28 73 71 6c 69 74 65 33 53 74 72 41 63 63  ug(sqlite3StrAcc
19e0: 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 2c 20  umFinish(&acc), 
19f0: 2d 31 29 3b 0d 0a 23 65 6c 69 66 20 53 51 4c 49  -1);..#elif SQLI
1a00: 54 45 5f 4f 53 5f 57 49 4e 20 26 26 20 64 65 66  TE_OS_WIN && def
1a10: 69 6e 65 64 28 53 51 4c 49 54 45 5f 57 49 4e 33  ined(SQLITE_WIN3
1a20: 32 5f 48 41 53 5f 41 4e 53 49 29 0d 0a 20 20 4f  2_HAS_ANSI)..  O
1a30: 75 74 70 75 74 44 65 62 75 67 53 74 72 69 6e 67  utputDebugString
1a40: 41 28 73 71 6c 69 74 65 33 53 74 72 41 63 63 75  A(sqlite3StrAccu
1a50: 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0d  mFinish(&acc));.
1a60: 0a 23 65 6c 69 66 20 53 51 4c 49 54 45 5f 4f 53  .#elif SQLITE_OS
1a70: 5f 57 49 4e 20 26 26 20 64 65 66 69 6e 65 64 28  _WIN && defined(
1a80: 53 51 4c 49 54 45 5f 57 49 4e 33 32 5f 48 41 53  SQLITE_WIN32_HAS
1a90: 5f 57 49 44 45 29 0d 0a 20 20 7b 0d 0a 20 20 20  _WIDE)..  {..   
1aa0: 20 4c 50 57 53 54 52 20 7a 57 69 64 65 4d 73 67   LPWSTR zWideMsg
1ab0: 20 3d 20 75 74 66 38 54 6f 55 6e 69 63 6f 64 65   = utf8ToUnicode
1ac0: 28 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d  (sqlite3StrAccum
1ad0: 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0d 0a  Finish(&acc));..
1ae0: 20 20 20 20 69 66 28 20 7a 57 69 64 65 4d 73 67      if( zWideMsg
1af0: 20 29 7b 0d 0a 20 20 20 20 20 20 4f 75 74 70 75   ){..      Outpu
1b00: 74 44 65 62 75 67 53 74 72 69 6e 67 57 28 7a 57  tDebugStringW(zW
1b10: 69 64 65 4d 73 67 29 3b 0d 0a 20 20 20 20 20 20  ideMsg);..      
1b20: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 57 69  sqlite3_free(zWi
1b30: 64 65 4d 73 67 29 3b 0d 0a 20 20 20 20 7d 0d 0a  deMsg);..    }..
1b40: 20 20 7d 0d 0a 23 65 6c 73 65 0d 0a 20 20 66 70    }..#else..  fp
1b50: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 25  rintf(stderr, "%
1b60: 73 22 2c 20 73 71 6c 69 74 65 33 53 74 72 41 63  s", sqlite3StrAc
1b70: 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29  cumFinish(&acc))
1b80: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 23 65  ;..#endif..}..#e
1b90: 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69  ndif....#if defi
1ba0: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 29  ned(INTEROP_LOG)
1bb0: 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45  ..SQLITE_PRIVATE
1bc0: 20 69 6e 74 20 6c 6f 67 43 6f 6e 66 69 67 75 72   int logConfigur
1bd0: 65 64 20 3d 20 30 3b 0d 0a 0d 0a 53 51 4c 49 54  ed = 0;....SQLIT
1be0: 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 73  E_PRIVATE void s
1bf0: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 4c 6f 67  qlite3InteropLog
1c00: 43 61 6c 6c 62 61 63 6b 28 76 6f 69 64 20 2a 70  Callback(void *p
1c10: 41 72 67 2c 20 69 6e 74 20 69 43 6f 64 65 2c 20  Arg, int iCode, 
1c20: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4d 73 67  const char *zMsg
1c30: 29 7b 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74  ){..  sqlite3Int
1c40: 65 72 6f 70 44 65 62 75 67 28 22 49 4e 54 45 52  eropDebug("INTER
1c50: 4f 50 5f 4c 4f 47 20 28 25 64 29 20 25 73 5c 6e  OP_LOG (%d) %s\n
1c60: 22 2c 20 69 43 6f 64 65 2c 20 7a 4d 73 67 29 3b  ", iCode, zMsg);
1c70: 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 53  ..}..#endif....S
1c80: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49  QLITE_API int WI
1c90: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6d 61 6c  NAPI sqlite3_mal
1ca0: 6c 6f 63 5f 73 69 7a 65 5f 69 6e 74 65 72 6f 70  loc_size_interop
1cb0: 28 76 6f 69 64 20 2a 70 29 7b 0d 0a 20 20 72 65  (void *p){..  re
1cc0: 74 75 72 6e 20 73 71 6c 69 74 65 33 4d 61 6c 6c  turn sqlite3Mall
1cd0: 6f 63 53 69 7a 65 28 70 29 3b 0d 0a 7d 0d 0a 0d  ocSize(p);..}...
1ce0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64  .SQLITE_API void
1cf0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
1d00: 6d 73 69 7a 65 5f 69 6e 74 65 72 6f 70 28 76 6f  msize_interop(vo
1d10: 69 64 20 2a 70 2c 20 73 71 6c 69 74 65 5f 75 69  id *p, sqlite_ui
1d20: 6e 74 36 34 20 2a 70 4e 29 0d 0a 7b 0d 0a 20 20  nt64 *pN)..{..  
1d30: 69 66 20 28 21 70 4e 29 20 72 65 74 75 72 6e 3b  if (!pN) return;
1d40: 0d 0a 20 20 2a 70 4e 20 3d 20 73 71 6c 69 74 65  ..  *pN = sqlite
1d50: 33 5f 6d 73 69 7a 65 28 70 29 3b 0d 0a 7d 0d 0a  3_msize(p);..}..
1d60: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
1d70: 54 45 52 4f 50 5f 4c 45 47 41 43 59 5f 43 4c 4f  TEROP_LEGACY_CLO
1d80: 53 45 29 20 7c 7c 20 53 51 4c 49 54 45 5f 56 45  SE) || SQLITE_VE
1d90: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33  RSION_NUMBER < 3
1da0: 30 30 37 30 31 34 0d 0a 53 51 4c 49 54 45 5f 50  007014..SQLITE_P
1db0: 52 49 56 41 54 45 20 76 6f 69 64 20 2a 20 73 71  RIVATE void * sq
1dc0: 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72  lite3DbMallocZer
1dd0: 6f 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  o_interop(sqlite
1de0: 33 20 2a 64 62 2c 20 69 6e 74 20 6e 29 0d 0a 7b  3 *db, int n)..{
1df0: 0d 0a 20 20 76 6f 69 64 20 2a 70 3b 0d 0a 20 20  ..  void *p;..  
1e00: 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73  if (db) {..    s
1e10: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74  qlite3_mutex_ent
1e20: 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a  er(db->mutex);..
1e30: 20 20 7d 0d 0a 20 20 70 20 3d 20 73 71 6c 69 74    }..  p = sqlit
1e40: 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 28 64  e3DbMallocZero(d
1e50: 62 2c 6e 29 3b 0d 0a 20 20 69 66 20 28 64 62 29  b,n);..  if (db)
1e60: 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   {..    sqlite3_
1e70: 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e  mutex_leave(db->
1e80: 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20  mutex);..  }..  
1e90: 72 65 74 75 72 6e 20 70 3b 0d 0a 7d 0d 0a 0d 0a  return p;..}....
1ea0: 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76  SQLITE_PRIVATE v
1eb0: 6f 69 64 20 73 71 6c 69 74 65 33 44 62 46 72 65  oid sqlite3DbFre
1ec0: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  e_interop(sqlite
1ed0: 33 20 2a 64 62 2c 20 76 6f 69 64 20 2a 70 29 0d  3 *db, void *p).
1ee0: 0a 7b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d  .{..  if (db) {.
1ef0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74  .    sqlite3_mut
1f00: 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74  ex_enter(db->mut
1f10: 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 69 66 20  ex);..  }..  if 
1f20: 28 70 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74  (p) {..    sqlit
1f30: 65 33 4d 65 6d 64 65 62 75 67 53 65 74 54 79 70  e3MemdebugSetTyp
1f40: 65 28 70 2c 20 4d 45 4d 54 59 50 45 5f 44 42 7c  e(p, MEMTYPE_DB|
1f50: 4d 45 4d 54 59 50 45 5f 48 45 41 50 29 3b 0d 0a  MEMTYPE_HEAP);..
1f60: 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 44 62    }..  sqlite3Db
1f70: 46 72 65 65 28 64 62 2c 70 29 3b 0d 0a 20 20 69  Free(db,p);..  i
1f80: 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71  f (db) {..    sq
1f90: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76  lite3_mutex_leav
1fa0: 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20  e(db->mutex);.. 
1fb0: 20 7d 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d   }..}..#endif...
1fc0: 0a 2f 2a 0d 0a 20 20 20 20 54 68 65 20 67 6f 61  ./*..    The goa
1fd0: 6c 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f  l of this versio
1fe0: 6e 20 6f 66 20 63 6c 6f 73 65 20 69 73 20 64 69  n of close is di
1ff0: 66 66 65 72 65 6e 74 20 74 68 61 6e 20 74 68 61  fferent than tha
2000: 74 20 6f 66 20 73 71 6c 69 74 65 33 5f 63 6c 6f  t of sqlite3_clo
2010: 73 65 28 29 2c 20 61 6e 64 20 69 73 20 64 65 73  se(), and is des
2020: 69 67 6e 65 64 20 74 6f 20 6c 65 6e 64 20 69 74  igned to lend it
2030: 73 65 6c 66 20 62 65 74 74 65 72 20 74 6f 20 2e  self better to .
2040: 4e 45 54 27 73 20 6e 6f 6e 2d 64 65 74 65 72 6d  NET's non-determ
2050: 69 6e 69 73 74 69 63 20 66 69 6e 61 6c 69 7a 65  inistic finalize
2060: 72 73 20 61 6e 64 0d 0a 20 20 20 20 74 68 65 20  rs and..    the 
2070: 47 43 20 74 68 72 65 61 64 2e 20 20 53 51 4c 69  GC thread.  SQLi
2080: 74 65 20 77 69 6c 6c 20 6e 6f 74 20 63 6c 6f 73  te will not clos
2090: 65 20 61 20 64 61 74 61 62 61 73 65 20 69 66 20  e a database if 
20a0: 73 74 61 74 65 6d 65 6e 74 73 20 61 72 65 20 6f  statements are o
20b0: 70 65 6e 20 6f 6e 20 69 74 20 2d 2d 20 62 75 74  pen on it -- but
20c0: 20 66 6f 72 20 6f 75 72 20 70 75 72 70 6f 73 65   for our purpose
20d0: 73 2c 20 77 65 27 64 20 72 61 74 68 65 72 20 66  s, we'd rather f
20e0: 69 6e 61 6c 69 7a 65 20 61 6c 6c 20 61 63 74 69  inalize all acti
20f0: 76 65 20 73 74 61 74 65 6d 65 6e 74 73 0d 0a 20  ve statements.. 
2100: 20 20 20 61 6e 64 20 66 6f 72 63 69 62 6c 79 20     and forcibly 
2110: 63 6c 6f 73 65 20 74 68 65 20 64 61 74 61 62 61  close the databa
2120: 73 65 2e 20 20 54 68 65 20 72 65 61 73 6f 6e 20  se.  The reason 
2130: 69 73 20 73 69 6d 70 6c 65 20 2d 2d 20 61 20 6c  is simple -- a l
2140: 6f 74 20 6f 66 20 70 65 6f 70 6c 65 20 64 6f 6e  ot of people don
2150: 27 74 20 44 69 73 70 6f 73 65 28 29 20 6f 66 20  't Dispose() of 
2160: 74 68 65 69 72 20 6f 62 6a 65 63 74 73 20 63 6f  their objects co
2170: 72 72 65 63 74 6c 79 20 61 6e 64 20 6c 65 74 20  rrectly and let 
2180: 74 68 65 20 67 61 72 62 61 67 65 20 63 6f 6c 6c  the garbage coll
2190: 65 63 74 6f 72 0d 0a 20 20 20 20 64 6f 20 69 74  ector..    do it
21a0: 2e 20 20 54 68 69 73 20 6c 65 61 64 73 20 74 6f  .  This leads to
21b0: 20 75 6e 65 78 70 65 63 74 65 64 20 62 65 68 61   unexpected beha
21c0: 76 69 6f 72 20 77 68 65 6e 20 61 20 75 73 65 72  vior when a user
21d0: 20 74 68 69 6e 6b 73 20 74 68 65 79 27 76 65 20   thinks they've 
21e0: 63 6c 6f 73 65 64 20 61 20 64 61 74 61 62 61 73  closed a databas
21f0: 65 2c 20 62 75 74 20 69 74 27 73 20 73 74 69 6c  e, but it's stil
2200: 6c 20 6f 70 65 6e 20 62 65 63 61 75 73 65 20 6e  l open because n
2210: 6f 74 20 61 6c 6c 20 74 68 65 20 73 74 61 74 65  ot all the state
2220: 6d 65 6e 74 73 20 68 61 76 65 0d 0a 20 20 20 20  ments have..    
2230: 68 69 74 20 74 68 65 20 47 43 20 79 65 74 2e 0d  hit the GC yet..
2240: 0a 0d 0a 20 20 20 20 53 6f 2c 20 68 65 72 65 20  ...    So, here 
2250: 77 65 20 68 61 76 65 20 61 20 70 72 6f 62 6c 65  we have a proble
2260: 6d 20 2e 2e 2e 20 2e 4e 45 54 20 68 61 73 20 61  m ... .NET has a
2270: 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 79 20   pointer to any 
2280: 6e 75 6d 62 65 72 20 6f 66 20 73 71 6c 69 74 65  number of sqlite
2290: 33 5f 73 74 6d 74 20 6f 62 6a 65 63 74 73 2e 20  3_stmt objects. 
22a0: 20 57 65 20 63 61 6e 27 74 20 63 61 6c 6c 20 73   We can't call s
22b0: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28  qlite3_finalize(
22c0: 29 20 6f 6e 20 74 68 65 73 65 20 62 65 63 61 75  ) on these becau
22d0: 73 65 0d 0a 20 20 20 20 74 68 65 69 72 20 6d 65  se..    their me
22e0: 6d 6f 72 79 20 69 73 20 66 72 65 65 64 20 61 6e  mory is freed an
22f0: 64 20 63 61 6e 20 62 65 20 75 73 65 64 20 66 6f  d can be used fo
2300: 72 20 73 6f 6d 65 74 68 69 6e 67 20 65 6c 73 65  r something else
2310: 2e 20 20 54 68 65 20 47 43 20 74 68 72 65 61 64  .  The GC thread
2320: 20 63 6f 75 6c 64 20 70 6f 74 65 6e 74 69 61 6c   could potential
2330: 6c 79 20 74 72 79 20 61 6e 64 20 63 61 6c 6c 20  ly try and call 
2340: 66 69 6e 61 6c 69 7a 65 20 61 67 61 69 6e 20 6f  finalize again o
2350: 6e 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 20  n the statement 
2360: 61 66 74 65 72 0d 0a 20 20 20 20 74 68 61 74 20  after..    that 
2370: 6d 65 6d 6f 72 79 20 77 61 73 20 64 65 61 6c 6c  memory was deall
2380: 6f 63 61 74 65 64 2e 20 20 42 41 44 2e 20 20 53  ocated.  BAD.  S
2390: 6f 2c 20 77 68 61 74 20 77 65 20 6e 65 65 64 20  o, what we need 
23a0: 74 6f 20 64 6f 20 69 73 20 6d 61 6b 65 20 61 20  to do is make a 
23b0: 63 6f 70 79 20 6f 66 20 65 61 63 68 20 73 74 61  copy of each sta
23c0: 74 65 6d 65 6e 74 2c 20 61 6e 64 20 63 61 6c 6c  tement, and call
23d0: 20 66 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74   finalize() on t
23e0: 68 65 20 63 6f 70 79 20 2d 2d 20 73 6f 20 74 68  he copy -- so th
23f0: 61 74 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 0d  at the original.
2400: 0a 20 20 20 20 73 74 61 74 65 6d 65 6e 74 27 73  .    statement's
2410: 20 6d 65 6d 6f 72 79 20 69 73 20 70 72 65 73 65   memory is prese
2420: 72 76 65 64 2c 20 61 6e 64 20 6d 61 72 6b 65 64  rved, and marked
2430: 20 61 73 20 42 41 44 2c 20 62 75 74 20 77 65 20   as BAD, but we 
2440: 63 61 6e 20 73 74 69 6c 6c 20 6d 61 6e 61 67 65  can still manage
2450: 20 74 6f 20 66 69 6e 61 6c 69 7a 65 20 65 76 65   to finalize eve
2460: 72 79 74 68 69 6e 67 20 61 6e 64 20 66 6f 72 63  rything and forc
2470: 69 62 6c 79 20 63 6c 6f 73 65 20 74 68 65 20 64  ibly close the d
2480: 61 74 61 62 61 73 65 2e 20 20 4c 61 74 65 72 20  atabase.  Later 
2490: 77 68 65 6e 20 74 68 65 0d 0a 20 20 20 20 47 43  when the..    GC
24a0: 20 67 65 74 73 20 61 72 6f 75 6e 64 20 74 6f 20   gets around to 
24b0: 63 61 6c 6c 69 6e 67 20 66 69 6e 61 6c 69 7a 65  calling finalize
24c0: 5f 69 6e 74 65 72 6f 70 28 29 20 6f 6e 20 74 68  _interop() on th
24d0: 65 20 22 62 61 64 22 20 73 74 61 74 65 6d 65 6e  e "bad" statemen
24e0: 74 2c 20 77 65 20 64 65 74 65 63 74 20 74 68 61  t, we detect tha
24f0: 74 20 61 6e 64 20 66 69 6e 69 73 68 20 64 65 61  t and finish dea
2500: 6c 6c 6f 63 61 74 69 6e 67 20 74 68 65 20 70 6f  llocating the po
2510: 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49  inter...*/..SQLI
2520: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
2530: 49 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f  I sqlite3_close_
2540: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20  interop(sqlite3 
2550: 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  *db)..{..  int r
2560: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65  et;..#if !define
2570: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59  d(INTEROP_LEGACY
2580: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54  _CLOSE) && SQLIT
2590: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
25a0: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23   >= 3007014....#
25b0: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
25c0: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
25d0: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
25e0: 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f 53  TEROP_DEBUG_CLOS
25f0: 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74  E)..  sqlite3Int
2600: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74  eropDebug("sqlit
2610: 65 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f 70  e3_close_interop
2620: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69  (): calling sqli
2630: 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70 29  te3_close_v2(%p)
2640: 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 65  ...\n", db);..#e
2650: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20  ndif....  ret = 
2660: 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32  sqlite3_close_v2
2670: 28 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66  (db);....#if def
2680: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42  ined(INTEROP_DEB
2690: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f  UG) && (INTEROP_
26a0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f  DEBUG & INTEROP_
26b0: 44 45 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20  DEBUG_CLOSE)..  
26c0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65  sqlite3InteropDe
26d0: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f  bug("sqlite3_clo
26e0: 73 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71  se_interop(): sq
26f0: 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25  lite3_close_v2(%
2700: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c  p) returned %d.\
2710: 6e 22 2c 20 64 62 2c 20 72 65 74 29 3b 0d 0a 23  n", db, ret);..#
2720: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72  endif....  retur
2730: 6e 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20  n ret;..#else.. 
2740: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 63   ret = sqlite3_c
2750: 6c 6f 73 65 28 64 62 29 3b 0d 0a 0d 0a 20 20 69  lose(db);....  i
2760: 66 20 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45  f (ret == SQLITE
2770: 5f 42 55 53 59 29 0d 0a 20 20 7b 0d 0a 20 20 20  _BUSY)..  {..   
2780: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65   sqlite3_mutex_e
2790: 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b  nter(db->mutex);
27a0: 0d 0a 0d 0a 20 20 20 20 69 66 20 28 21 64 62 2d  ....    if (!db-
27b0: 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d 0a  >pVdbe)..    {..
27c0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75        sqlite3_mu
27d0: 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75  tex_leave(db->mu
27e0: 74 65 78 29 3b 0d 0a 20 20 20 20 20 20 72 65 74  tex);..      ret
27f0: 75 72 6e 20 72 65 74 3b 0d 0a 20 20 20 20 7d 0d  urn ret;..    }.
2800: 0a 0d 0a 20 20 20 20 77 68 69 6c 65 20 28 64 62  ...    while (db
2810: 2d 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d  ->pVdbe)..    {.
2820: 0a 20 20 20 20 20 20 2f 2a 20 4d 61 6b 65 20 61  .      /* Make a
2830: 20 63 6f 70 79 20 6f 66 20 74 68 65 20 66 69 72   copy of the fir
2840: 73 74 20 70 72 65 70 61 72 65 64 20 73 74 61 74  st prepared stat
2850: 65 6d 65 6e 74 20 2a 2f 0d 0a 20 20 20 20 20 20  ement */..      
2860: 56 64 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20  Vdbe *p = (Vdbe 
2870: 2a 29 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f  *)sqlite3DbMallo
2880: 63 5a 65 72 6f 5f 69 6e 74 65 72 6f 70 28 64 62  cZero_interop(db
2890: 2c 20 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b  , sizeof(Vdbe));
28a0: 0d 0a 20 20 20 20 20 20 56 64 62 65 20 2a 70 6f  ..      Vdbe *po
28b0: 20 3d 20 64 62 2d 3e 70 56 64 62 65 3b 0d 0a 0d   = db->pVdbe;...
28c0: 0a 20 20 20 20 20 20 69 66 20 28 21 70 29 0d 0a  .      if (!p)..
28d0: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20        {..       
28e0: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 4e 4f   ret = SQLITE_NO
28f0: 4d 45 4d 3b 0d 0a 20 20 20 20 20 20 20 20 62 72  MEM;..        br
2900: 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 0d  eak;..      }...
2910: 0a 20 20 20 20 20 20 43 6f 70 79 4d 65 6d 6f 72  .      CopyMemor
2920: 79 28 70 2c 20 70 6f 2c 20 73 69 7a 65 6f 66 28  y(p, po, sizeof(
2930: 56 64 62 65 29 29 3b 0d 0a 0d 0a 20 20 20 20 20  Vdbe));....     
2940: 20 2f 2a 20 50 75 74 20 69 74 20 6f 6e 20 74 68   /* Put it on th
2950: 65 20 63 68 61 69 6e 20 73 6f 20 77 65 20 63 61  e chain so we ca
2960: 6e 20 66 72 65 65 20 69 74 20 2a 2f 0d 0a 20 20  n free it */..  
2970: 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 3d 20      db->pVdbe = 
2980: 70 3b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20  p;..      ret = 
2990: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65  sqlite3_finalize
29a0: 28 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  ((sqlite3_stmt *
29b0: 29 70 29 3b 20 2f 2a 20 54 68 69 73 20 77 69 6c  )p); /* This wil
29c0: 6c 20 61 6c 73 6f 20 66 72 65 65 20 74 68 65 20  l also free the 
29d0: 63 6f 70 79 27 73 20 6d 65 6d 6f 72 79 20 2a 2f  copy's memory */
29e0: 0d 0a 20 20 20 20 20 20 69 66 20 28 72 65 74 29  ..      if (ret)
29f0: 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20  ..      {..     
2a00: 20 20 20 2f 2a 20 66 69 6e 61 6c 69 7a 65 20 66     /* finalize f
2a10: 61 69 6c 65 64 20 2d 2d 20 73 6f 20 77 65 20 6d  ailed -- so we m
2a20: 75 73 74 20 70 75 74 20 62 61 63 6b 20 61 6e 79  ust put back any
2a30: 74 68 69 6e 67 20 77 65 20 6d 75 6e 67 65 64 20  thing we munged 
2a40: 2a 2f 0d 0a 20 20 20 20 20 20 20 20 43 6f 70 79  */..        Copy
2a50: 4d 65 6d 6f 72 79 28 70 6f 2c 20 70 2c 20 73 69  Memory(po, p, si
2a60: 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 20  zeof(Vdbe));..  
2a70: 20 20 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20        db->pVdbe 
2a80: 3d 20 70 6f 3b 0d 0a 0d 0a 20 20 20 20 20 20 20  = po;....       
2a90: 20 2f 2a 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20   /*..        ** 
2aa0: 4e 4f 54 45 3a 20 4f 6b 2c 20 77 65 20 6d 75 73  NOTE: Ok, we mus
2ab0: 74 20 66 72 65 65 20 74 68 69 73 20 62 6c 6f 63  t free this bloc
2ac0: 6b 20 74 68 61 74 20 2a 77 65 2a 20 61 6c 6c 6f  k that *we* allo
2ad0: 63 61 74 65 64 20 28 61 62 6f 76 65 29 20 73 69  cated (above) si
2ae0: 6e 63 65 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20  nce..        ** 
2af0: 20 20 20 20 20 20 66 69 6e 61 6c 69 7a 65 20 64        finalize d
2b00: 69 64 20 6e 6f 74 20 64 6f 20 73 6f 2e 0d 0a 20  id not do so... 
2b10: 20 20 20 20 20 20 20 2a 2f 0d 0a 20 20 20 20 20         */..     
2b20: 20 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65     sqlite3DbFree
2b30: 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b  _interop(db, p);
2b40: 0d 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b  ..        break;
2b50: 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20  ..      }..     
2b60: 20 65 6c 73 65 0d 0a 20 20 20 20 20 20 7b 0d 0a   else..      {..
2b70: 20 20 20 20 20 20 20 20 5a 65 72 6f 4d 65 6d 6f          ZeroMemo
2b80: 72 79 28 70 6f 2c 20 73 69 7a 65 6f 66 28 56 64  ry(po, sizeof(Vd
2b90: 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 20 20 70  be));..        p
2ba0: 6f 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42 45 5f  o->magic = VDBE_
2bb0: 4d 41 47 49 43 5f 44 45 41 44 3b 0d 0a 20 20 20  MAGIC_DEAD;..   
2bc0: 20 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 20     }..    }..   
2bd0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c   sqlite3_mutex_l
2be0: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b  eave(db->mutex);
2bf0: 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69  ..    ret = sqli
2c00: 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b 0d 0a  te3_close(db);..
2c10: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65    }..  return re
2c20: 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d  t;..#endif..}...
2c30: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54  .#if defined(INT
2c40: 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c 49 54  EROP_LOG)..SQLIT
2c50: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49  E_API int WINAPI
2c60: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f   sqlite3_config_
2c70: 6c 6f 67 5f 69 6e 74 65 72 6f 70 28 29 0d 0a 7b  log_interop()..{
2c80: 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 20 20  ..  int ret;..  
2c90: 69 66 28 20 21 6c 6f 67 43 6f 6e 66 69 67 75 72  if( !logConfigur
2ca0: 65 64 20 29 7b 0d 0a 20 20 20 20 72 65 74 20 3d  ed ){..    ret =
2cb0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 28   sqlite3_config(
2cc0: 53 51 4c 49 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f  SQLITE_CONFIG_LO
2cd0: 47 2c 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f  G, sqlite3Intero
2ce0: 70 4c 6f 67 43 61 6c 6c 62 61 63 6b 2c 20 30 29  pLogCallback, 0)
2cf0: 3b 0d 0a 20 20 20 20 69 66 28 20 72 65 74 3d 3d  ;..    if( ret==
2d00: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a 20 20  SQLITE_OK ){..  
2d10: 20 20 20 20 6c 6f 67 43 6f 6e 66 69 67 75 72 65      logConfigure
2d20: 64 20 3d 20 31 3b 0d 0a 20 20 20 20 7d 65 6c 73  d = 1;..    }els
2d30: 65 7b 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65  e{..      sqlite
2d40: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
2d50: 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 6c 6f  qlite3_config_lo
2d60: 67 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c  g_interop(): sql
2d70: 69 74 65 33 5f 63 6f 6e 66 69 67 28 53 51 4c 49  ite3_config(SQLI
2d80: 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f 47 29 20 72  TE_CONFIG_LOG) r
2d90: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20  eturned %d.\n", 
2da0: 72 65 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20  ret);..    }..  
2db0: 7d 65 6c 73 65 7b 0d 0a 20 20 20 20 72 65 74 20  }else{..    ret 
2dc0: 3d 20 53 51 4c 49 54 45 5f 44 4f 4e 45 3b 0d 0a  = SQLITE_DONE;..
2dd0: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65    }..  return re
2de0: 74 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d  t;..}..#endif...
2df0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73  .SQLITE_API cons
2e00: 74 20 63 68 61 72 20 2a 57 49 4e 41 50 49 20 69  t char *WINAPI i
2e10: 6e 74 65 72 6f 70 5f 6c 69 62 76 65 72 73 69 6f  nterop_libversio
2e20: 6e 28 76 6f 69 64 29 0d 0a 7b 0d 0a 20 20 72 65  n(void)..{..  re
2e30: 74 75 72 6e 20 49 4e 54 45 52 4f 50 5f 56 45 52  turn INTEROP_VER
2e40: 53 49 4f 4e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  SION;..}....SQLI
2e50: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61  TE_API const cha
2e60: 72 20 2a 57 49 4e 41 50 49 20 69 6e 74 65 72 6f  r *WINAPI intero
2e70: 70 5f 73 6f 75 72 63 65 69 64 28 76 6f 69 64 29  p_sourceid(void)
2e80: 0d 0a 7b 0d 0a 20 20 72 65 74 75 72 6e 20 49 4e  ..{..  return IN
2e90: 54 45 52 4f 50 5f 53 4f 55 52 43 45 5f 49 44 20  TEROP_SOURCE_ID 
2ea0: 22 20 22 20 49 4e 54 45 52 4f 50 5f 53 4f 55 52  " " INTEROP_SOUR
2eb0: 43 45 5f 54 49 4d 45 53 54 41 4d 50 3b 0d 0a 7d  CE_TIMESTAMP;..}
2ec0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69  ....SQLITE_API i
2ed0: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65  nt WINAPI sqlite
2ee0: 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 63  3_open_interop(c
2ef0: 6f 6e 73 74 20 63 68 61 72 20 2a 66 69 6c 65 6e  onst char *filen
2f00: 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  ame, const char 
2f10: 2a 76 66 73 4e 61 6d 65 2c 20 69 6e 74 20 66 6c  *vfsName, int fl
2f20: 61 67 73 2c 20 69 6e 74 20 65 78 74 46 75 6e 63  ags, int extFunc
2f30: 73 2c 20 73 71 6c 69 74 65 33 20 2a 2a 70 70 64  s, sqlite3 **ppd
2f40: 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74  b)..{..  int ret
2f50: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  ;....#if defined
2f60: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20  (INTEROP_DEBUG) 
2f70: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  && (INTEROP_DEBU
2f80: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55  G & INTEROP_DEBU
2f90: 47 5f 4f 50 45 4e 29 0d 0a 20 20 73 71 6c 69 74  G_OPEN)..  sqlit
2fa0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22  e3InteropDebug("
2fb0: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74  sqlite3_open_int
2fc0: 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20  erop(): calling 
2fd0: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 76 32 28  sqlite3_open_v2(
2fe0: 5c 22 25 73 5c 22 2c 20 5c 22 25 73 5c 22 2c 20  \"%s\", \"%s\", 
2ff0: 25 64 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e  %d, %d, %p)...\n
3000: 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 76 66 73  ", filename, vfs
3010: 4e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 65 78 74  Name, flags, ext
3020: 46 75 6e 63 73 2c 20 70 70 64 62 29 3b 0d 0a 23  Funcs, ppdb);..#
3030: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d  endif....  ret =
3040: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 76 32   sqlite3_open_v2
3050: 28 66 69 6c 65 6e 61 6d 65 2c 20 70 70 64 62 2c  (filename, ppdb,
3060: 20 66 6c 61 67 73 2c 20 76 66 73 4e 61 6d 65 29   flags, vfsName)
3070: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  ;....#if defined
3080: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20  (INTEROP_DEBUG) 
3090: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  && (INTEROP_DEBU
30a0: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55  G & INTEROP_DEBU
30b0: 47 5f 4f 50 45 4e 29 0d 0a 20 20 73 71 6c 69 74  G_OPEN)..  sqlit
30c0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22  e3InteropDebug("
30d0: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74  sqlite3_open_int
30e0: 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f  erop(): sqlite3_
30f0: 6f 70 65 6e 5f 76 32 28 5c 22 25 73 5c 22 2c 20  open_v2(\"%s\", 
3100: 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 64 2c 20  \"%s\", %d, %d, 
3110: 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e  %p) returned %d.
3120: 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 76  \n", filename, v
3130: 66 73 4e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 65  fsName, flags, e
3140: 78 74 46 75 6e 63 73 2c 20 70 70 64 62 2c 20 72  xtFuncs, ppdb, r
3150: 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a  et);..#endif....
3160: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
3170: 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e 5f 46 55  ROP_EXTENSION_FU
3180: 4e 43 54 49 4f 4e 53 29 0d 0a 20 20 69 66 20 28  NCTIONS)..  if (
3190: 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45 5f 4f  (ret == SQLITE_O
31a0: 4b 29 20 26 26 20 70 70 64 62 20 26 26 20 65 78  K) && ppdb && ex
31b0: 74 46 75 6e 63 73 29 0d 0a 20 20 20 20 52 65 67  tFuncs)..    Reg
31c0: 69 73 74 65 72 45 78 74 65 6e 73 69 6f 6e 46 75  isterExtensionFu
31d0: 6e 63 74 69 6f 6e 73 28 2a 70 70 64 62 29 3b 0d  nctions(*ppdb);.
31e0: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74  .#endif....  ret
31f0: 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53  urn ret;..}....S
3200: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49  QLITE_API int WI
3210: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6f 70 65  NAPI sqlite3_ope
3220: 6e 31 36 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73  n16_interop(cons
3230: 74 20 63 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65  t char *filename
3240: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 76 66  , const char *vf
3250: 73 4e 61 6d 65 2c 20 69 6e 74 20 66 6c 61 67 73  sName, int flags
3260: 2c 20 69 6e 74 20 65 78 74 46 75 6e 63 73 2c 20  , int extFuncs, 
3270: 73 71 6c 69 74 65 33 20 2a 2a 70 70 64 62 29 0d  sqlite3 **ppdb).
3280: 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a  .{..  int ret;..
3290: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
32a0: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20  TEROP_DEBUG) && 
32b0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26  (INTEROP_DEBUG &
32c0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f   INTEROP_DEBUG_O
32d0: 50 45 4e 31 36 29 0d 0a 20 20 73 71 6c 69 74 65  PEN16)..  sqlite
32e0: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
32f0: 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36 5f 69 6e  qlite3_open16_in
3300: 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67  terop(): calling
3310: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e   sqlite3_open_in
3320: 74 65 72 6f 70 28 5c 22 25 73 5c 22 2c 20 5c 22  terop(\"%s\", \"
3330: 25 73 5c 22 2c 20 25 64 2c 20 25 64 2c 20 25 70  %s\", %d, %d, %p
3340: 29 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d  )...\n", filenam
3350: 65 2c 20 76 66 73 4e 61 6d 65 2c 20 66 6c 61 67  e, vfsName, flag
3360: 73 2c 20 65 78 74 46 75 6e 63 73 2c 20 70 70 64  s, extFuncs, ppd
3370: 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20  b);..#endif.... 
3380: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 6f   ret = sqlite3_o
3390: 70 65 6e 5f 69 6e 74 65 72 6f 70 28 66 69 6c 65  pen_interop(file
33a0: 6e 61 6d 65 2c 20 76 66 73 4e 61 6d 65 2c 20 66  name, vfsName, f
33b0: 6c 61 67 73 2c 20 65 78 74 46 75 6e 63 73 2c 20  lags, extFuncs, 
33c0: 70 70 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65  ppdb);....#if de
33d0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
33e0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
33f0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
3400: 5f 44 45 42 55 47 5f 4f 50 45 4e 31 36 29 0d 0a  _DEBUG_OPEN16)..
3410: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70    sqlite3Interop
3420: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f  Debug("sqlite3_o
3430: 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70 28 29 3a  pen16_interop():
3440: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e   sqlite3_open_in
3450: 74 65 72 6f 70 28 5c 22 25 73 5c 22 2c 20 5c 22  terop(\"%s\", \"
3460: 25 73 5c 22 2c 20 25 64 2c 20 25 64 2c 20 25 70  %s\", %d, %d, %p
3470: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e  ) returned %d.\n
3480: 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 76 66 73  ", filename, vfs
3490: 4e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 65 78 74  Name, flags, ext
34a0: 46 75 6e 63 73 2c 20 70 70 64 62 2c 20 72 65 74  Funcs, ppdb, ret
34b0: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20  );..#endif....  
34c0: 69 66 20 28 28 72 65 74 20 3d 3d 20 53 51 4c 49  if ((ret == SQLI
34d0: 54 45 5f 4f 4b 29 20 26 26 20 70 70 64 62 20 26  TE_OK) && ppdb &
34e0: 26 20 21 44 62 48 61 73 50 72 6f 70 65 72 74 79  & !DbHasProperty
34f0: 28 2a 70 70 64 62 2c 20 30 2c 20 44 42 5f 53 63  (*ppdb, 0, DB_Sc
3500: 68 65 6d 61 4c 6f 61 64 65 64 29 29 0d 0a 20 20  hemaLoaded))..  
3510: 7b 0d 0a 20 20 20 20 45 4e 43 28 2a 70 70 64 62  {..    ENC(*ppdb
3520: 29 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 31 36  ) = SQLITE_UTF16
3530: 4e 41 54 49 56 45 3b 0d 0a 0d 0a 23 69 66 20 53  NATIVE;....#if S
3540: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55  QLITE_VERSION_NU
3550: 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 38 0d  MBER >= 3008008.
3560: 0a 20 20 20 20 2f 2f 0d 0a 20 20 20 20 2f 2f 20  .    //..    // 
3570: 42 55 47 46 49 58 3a 20 53 65 65 20 74 69 63 6b  BUGFIX: See tick
3580: 65 74 20 5b 37 63 31 35 31 61 32 66 30 65 32 32  et [7c151a2f0e22
3590: 38 30 34 63 5d 2e 0d 0a 20 20 20 20 2f 2f 0d 0a  804c]...    //..
35a0: 20 20 20 20 53 43 48 45 4d 41 5f 45 4e 43 28 2a      SCHEMA_ENC(*
35b0: 70 70 64 62 29 20 3d 20 53 51 4c 49 54 45 5f 55  ppdb) = SQLITE_U
35c0: 54 46 31 36 4e 41 54 49 56 45 3b 0d 0a 23 65 6e  TF16NATIVE;..#en
35d0: 64 69 66 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 65  dif..  }....  re
35e0: 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a  turn ret;..}....
35f0: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74  SQLITE_API const
3600: 20 63 68 61 72 20 2a 57 49 4e 41 50 49 20 73 71   char *WINAPI sq
3610: 6c 69 74 65 33 5f 65 72 72 6d 73 67 5f 69 6e 74  lite3_errmsg_int
3620: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62  erop(sqlite3 *db
3630: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d  , int *plen)..{.
3640: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70  .  const char *p
3650: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 65 72  val = sqlite3_er
3660: 72 6d 73 67 28 64 62 29 3b 0d 0a 20 20 69 66 20  rmsg(db);..  if 
3670: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70  (plen) *plen = p
3680: 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61  val ? strlen(pva
3690: 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72  l) : 0;..  retur
36a0: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51  n pval;..}....SQ
36b0: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e  LITE_API int WIN
36c0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 68 61 6e  API sqlite3_chan
36d0: 67 65 73 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  ges_interop(sqli
36e0: 74 65 33 20 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69  te3 *db)..{..  i
36f0: 6e 74 20 72 65 73 75 6c 74 3b 0d 0a 0d 0a 23 69  nt result;....#i
3700: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
3710: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
3720: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
3730: 45 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47  EROP_DEBUG_CHANG
3740: 45 53 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  ES)..  sqlite3In
3750: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
3760: 74 65 33 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65  te3_changes_inte
3770: 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73  rop(): calling s
3780: 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 25  qlite3_changes(%
3790: 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a  p)...\n", db);..
37a0: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 6e 64 65  #endif....#ifnde
37b0: 66 20 4e 44 45 42 55 47 0d 0a 20 20 69 66 20 28  f NDEBUG..  if (
37c0: 21 64 62 29 0d 0a 20 20 20 20 20 20 73 71 6c 69  !db)..      sqli
37d0: 74 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28  te3InteropBreak(
37e0: 22 6e 75 6c 6c 20 64 61 74 61 62 61 73 65 20 68  "null database h
37f0: 61 6e 64 6c 65 20 66 6f 72 20 73 71 6c 69 74 65  andle for sqlite
3800: 33 5f 63 68 61 6e 67 65 73 28 29 22 29 3b 0d 0a  3_changes()");..
3810: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 73 75  #endif....  resu
3820: 6c 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 68 61  lt = sqlite3_cha
3830: 6e 67 65 73 28 64 62 29 3b 0d 0a 0d 0a 23 69 66  nges(db);....#if
3840: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50   defined(INTEROP
3850: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45  _DEBUG) && (INTE
3860: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45  ROP_DEBUG & INTE
3870: 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45  ROP_DEBUG_CHANGE
3880: 53 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74  S)..  sqlite3Int
3890: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74  eropDebug("sqlit
38a0: 65 33 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65 72  e3_changes_inter
38b0: 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 63 68  op(): sqlite3_ch
38c0: 61 6e 67 65 73 28 25 70 29 20 72 65 74 75 72 6e  anges(%p) return
38d0: 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 72  ed %d.\n", db, r
38e0: 65 73 75 6c 74 29 3b 0d 0a 23 65 6e 64 69 66 0d  esult);..#endif.
38f0: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 73 75  ...  return resu
3900: 6c 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  lt;..}....SQLITE
3910: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20  _API int WINAPI 
3920: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f  sqlite3_prepare_
3930: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20  interop(sqlite3 
3940: 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  *db, const char 
3950: 2a 73 71 6c 2c 20 69 6e 74 20 6e 62 79 74 65 73  *sql, int nbytes
3960: 2c 20 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  , sqlite3_stmt *
3970: 2a 70 70 73 74 6d 74 2c 20 63 6f 6e 73 74 20 63  *ppstmt, const c
3980: 68 61 72 20 2a 2a 70 7a 74 61 69 6c 2c 20 69 6e  har **pztail, in
3990: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 69  t *plen)..{..  i
39a0: 6e 74 20 6e 3b 0d 0a 0d 0a 23 69 66 20 64 65 66  nt n;....#if def
39b0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42  ined(INTEROP_DEB
39c0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f  UG) && (INTEROP_
39d0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f  DEBUG & INTEROP_
39e0: 44 45 42 55 47 5f 50 52 45 50 41 52 45 29 0d 0a  DEBUG_PREPARE)..
39f0: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70    sqlite3Interop
3a00: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 70  Debug("sqlite3_p
3a10: 72 65 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 29  repare_interop()
3a20: 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65  : calling sqlite
3a30: 33 5f 70 72 65 70 61 72 65 28 25 70 2c 20 5c 22  3_prepare(%p, \"
3a40: 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 2e 2e 2e  %s\", %d, %p)...
3a50: 5c 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 62  \n", db, sql, nb
3a60: 79 74 65 73 2c 20 70 70 73 74 6d 74 29 3b 0d 0a  ytes, ppstmt);..
3a70: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 53 51  #endif....#if SQ
3a80: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d  LITE_VERSION_NUM
3a90: 42 45 52 20 3e 3d 20 33 30 30 33 30 30 39 0d 0a  BER >= 3003009..
3aa0: 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 70 72    n = sqlite3_pr
3ab0: 65 70 61 72 65 5f 76 32 28 64 62 2c 20 73 71 6c  epare_v2(db, sql
3ac0: 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74  , nbytes, ppstmt
3ad0: 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6c 73  , pztail);..#els
3ae0: 65 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  e..  n = sqlite3
3af0: 5f 70 72 65 70 61 72 65 28 64 62 2c 20 73 71 6c  _prepare(db, sql
3b00: 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74  , nbytes, ppstmt
3b10: 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6e 64  , pztail);..#end
3b20: 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  if....#if define
3b30: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
3b40: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
3b50: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
3b60: 55 47 5f 50 52 45 50 41 52 45 29 0d 0a 20 20 73  UG_PREPARE)..  s
3b70: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
3b80: 75 67 28 22 73 71 6c 69 74 65 33 5f 70 72 65 70  ug("sqlite3_prep
3b90: 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73  are_interop(): s
3ba0: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 25  qlite3_prepare(%
3bb0: 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25  p, \"%s\", %d, %
3bc0: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c  p) returned %d.\
3bd0: 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 62 79  n", db, sql, nby
3be0: 74 65 73 2c 20 70 70 73 74 6d 74 2c 20 6e 29 3b  tes, ppstmt, n);
3bf0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66  ..#endif....  if
3c00: 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20   (plen) *plen = 
3c10: 28 70 7a 74 61 69 6c 20 26 26 20 2a 70 7a 74 61  (pztail && *pzta
3c20: 69 6c 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a  il) ? strlen(*pz
3c30: 74 61 69 6c 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20  tail) : 0;....  
3c40: 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a  return n;..}....
3c50: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57  SQLITE_API int W
3c60: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 70 72  INAPI sqlite3_pr
3c70: 65 70 61 72 65 31 36 5f 69 6e 74 65 72 6f 70 28  epare16_interop(
3c80: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e  sqlite3 *db, con
3c90: 73 74 20 76 6f 69 64 20 2a 73 71 6c 2c 20 69 6e  st void *sql, in
3ca0: 74 20 6e 63 68 61 72 73 2c 20 73 71 6c 69 74 65  t nchars, sqlite
3cb0: 33 5f 73 74 6d 74 20 2a 2a 70 70 73 74 6d 74 2c  3_stmt **ppstmt,
3cc0: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 2a 70 7a   const void **pz
3cd0: 74 61 69 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29  tail, int *plen)
3ce0: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d  ..{..  int n;...
3cf0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54  .#if defined(INT
3d00: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28  EROP_DEBUG) && (
3d10: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20  INTEROP_DEBUG & 
3d20: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52  INTEROP_DEBUG_PR
3d30: 45 50 41 52 45 31 36 29 0d 0a 20 20 73 71 6c 69  EPARE16)..  sqli
3d40: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28  te3InteropDebug(
3d50: 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65  "sqlite3_prepare
3d60: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c  _interop(): call
3d70: 69 6e 67 20 73 71 6c 69 74 65 33 5f 70 72 65 70  ing sqlite3_prep
3d80: 61 72 65 31 36 28 25 70 2c 20 5c 22 25 73 5c 22  are16(%p, \"%s\"
3d90: 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c  , %d, %p)...\n",
3da0: 20 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73   db, sql, nchars
3db0: 2c 20 70 70 73 74 6d 74 29 3b 0d 0a 23 65 6e 64  , ppstmt);..#end
3dc0: 69 66 0d 0a 0d 0a 23 69 66 20 53 51 4c 49 54 45  if....#if SQLITE
3dd0: 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20  _VERSION_NUMBER 
3de0: 3e 3d 20 33 30 30 33 30 30 39 0d 0a 20 20 6e 20  >= 3003009..  n 
3df0: 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72  = sqlite3_prepar
3e00: 65 31 36 5f 76 32 28 64 62 2c 20 73 71 6c 2c 20  e16_v2(db, sql, 
3e10: 6e 63 68 61 72 73 20 2a 20 73 69 7a 65 6f 66 28  nchars * sizeof(
3e20: 77 63 68 61 72 5f 74 29 2c 20 70 70 73 74 6d 74  wchar_t), ppstmt
3e30: 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6c 73  , pztail);..#els
3e40: 65 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  e..  n = sqlite3
3e50: 5f 70 72 65 70 61 72 65 31 36 28 64 62 2c 20 73  _prepare16(db, s
3e60: 71 6c 2c 20 6e 63 68 61 72 73 20 2a 20 73 69 7a  ql, nchars * siz
3e70: 65 6f 66 28 77 63 68 61 72 5f 74 29 2c 20 70 70  eof(wchar_t), pp
3e80: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a  stmt, pztail);..
3e90: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65  #endif....#if de
3ea0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
3eb0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
3ec0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
3ed0: 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 31 36  _DEBUG_PREPARE16
3ee0: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65  )..  sqlite3Inte
3ef0: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65  ropDebug("sqlite
3f00: 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 72 6f  3_prepare_intero
3f10: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 70 72 65  p(): sqlite3_pre
3f20: 70 61 72 65 31 36 28 25 70 2c 20 5c 22 25 73 5c  pare16(%p, \"%s\
3f30: 22 2c 20 25 64 2c 20 25 70 29 20 72 65 74 75 72  ", %d, %p) retur
3f40: 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20  ned %d.\n", db, 
3f50: 73 71 6c 2c 20 6e 63 68 61 72 73 2c 20 70 70 73  sql, nchars, pps
3f60: 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65 6e 64 69 66  tmt, n);..#endif
3f70: 0d 0a 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20  ....  if (plen) 
3f80: 2a 70 6c 65 6e 20 3d 20 28 70 7a 74 61 69 6c 20  *plen = (pztail 
3f90: 26 26 20 2a 70 7a 74 61 69 6c 29 20 3f 20 77 63  && *pztail) ? wc
3fa0: 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29  slen((wchar_t *)
3fb0: 2a 70 7a 74 61 69 6c 29 20 2a 20 73 69 7a 65 6f  *pztail) * sizeo
3fc0: 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d  f(wchar_t) : 0;.
3fd0: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a  ...  return n;..
3fe0: 7d 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  }....#if defined
3ff0: 28 49 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 4c  (INTEROP_VIRTUAL
4000: 5f 54 41 42 4c 45 29 20 26 26 20 53 51 4c 49 54  _TABLE) && SQLIT
4010: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
4020: 20 3e 3d 20 33 30 30 34 30 30 31 0d 0a 23 69 66   >= 3004001..#if
4030: 64 65 66 20 5f 57 49 4e 33 32 0a 5f 5f 64 65 63  def _WIN32.__dec
4040: 6c 73 70 65 63 28 64 6c 6c 65 78 70 6f 72 74 29  lspec(dllexport)
4050: 0a 23 65 6e 64 69 66 0a 76 6f 69 64 20 2a 73 71  .#endif.void *sq
4060: 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 64 69 73  lite3_create_dis
4070: 70 6f 73 61 62 6c 65 5f 6d 6f 64 75 6c 65 28 0d  posable_module(.
4080: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d  .  sqlite3 *db,.
4090: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
40a0: 4e 61 6d 65 2c 0d 0a 20 20 63 6f 6e 73 74 20 73  Name,..  const s
40b0: 71 6c 69 74 65 33 5f 6d 6f 64 75 6c 65 20 2a 70  qlite3_module *p
40c0: 2c 0d 0a 20 20 76 6f 69 64 20 2a 70 43 6c 69 65  ,..  void *pClie
40d0: 6e 74 44 61 74 61 2c 0d 0a 20 20 76 6f 69 64 28  ntData,..  void(
40e0: 2a 78 44 65 73 74 72 6f 79 29 28 76 6f 69 64 2a  *xDestroy)(void*
40f0: 29 0d 0a 29 3b 20 2f 2a 20 64 65 66 69 6e 65 64  )..); /* defined
4100: 20 69 6e 20 22 73 72 63 2f 65 78 74 2f 76 74 73   in "src/ext/vts
4110: 68 69 6d 2e 63 22 20 28 69 6e 63 6c 75 64 65 64  him.c" (included
4120: 20 62 65 6c 6f 77 29 20 2a 2f 0d 0a 0d 0a 53 51   below) */....SQ
4130: 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 2a 57  LITE_API void *W
4140: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 72  INAPI sqlite3_cr
4150: 65 61 74 65 5f 64 69 73 70 6f 73 61 62 6c 65 5f  eate_disposable_
4160: 6d 6f 64 75 6c 65 5f 69 6e 74 65 72 6f 70 28 0d  module_interop(.
4170: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d  .  sqlite3 *db,.
4180: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
4190: 4e 61 6d 65 2c 0d 0a 20 20 73 71 6c 69 74 65 33  Name,..  sqlite3
41a0: 5f 6d 6f 64 75 6c 65 20 2a 70 4d 6f 64 75 6c 65  _module *pModule
41b0: 2c 0d 0a 20 20 69 6e 74 20 69 56 65 72 73 69 6f  ,..  int iVersio
41c0: 6e 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43 72 65  n,..  int (*xCre
41d0: 61 74 65 29 28 73 71 6c 69 74 65 33 2a 2c 20 76  ate)(sqlite3*, v
41e0: 6f 69 64 20 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73  oid *, int, cons
41f0: 74 20 63 68 61 72 20 2a 63 6f 6e 73 74 2a 2c 20  t char *const*, 
4200: 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2a 2c  sqlite3_vtab **,
4210: 20 63 68 61 72 2a 2a 29 2c 0d 0a 20 20 69 6e 74   char**),..  int
4220: 20 28 2a 78 43 6f 6e 6e 65 63 74 29 28 73 71 6c   (*xConnect)(sql
4230: 69 74 65 33 2a 2c 20 76 6f 69 64 20 2a 2c 20 69  ite3*, void *, i
4240: 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  nt, const char *
4250: 63 6f 6e 73 74 2a 2c 20 73 71 6c 69 74 65 33 5f  const*, sqlite3_
4260: 76 74 61 62 20 2a 2a 2c 20 63 68 61 72 2a 2a 29  vtab **, char**)
4270: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 42 65 73 74  ,..  int (*xBest
4280: 49 6e 64 65 78 29 28 73 71 6c 69 74 65 33 5f 76  Index)(sqlite3_v
4290: 74 61 62 20 2a 2c 20 73 71 6c 69 74 65 33 5f 69  tab *, sqlite3_i
42a0: 6e 64 65 78 5f 69 6e 66 6f 2a 29 2c 0d 0a 20 20  ndex_info*),..  
42b0: 69 6e 74 20 28 2a 78 44 69 73 63 6f 6e 6e 65 63  int (*xDisconnec
42c0: 74 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20  t)(sqlite3_vtab 
42d0: 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 44 65  *),..  int (*xDe
42e0: 73 74 72 6f 79 29 28 73 71 6c 69 74 65 33 5f 76  stroy)(sqlite3_v
42f0: 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28  tab *),..  int (
4300: 2a 78 4f 70 65 6e 29 28 73 71 6c 69 74 65 33 5f  *xOpen)(sqlite3_
4310: 76 74 61 62 20 2a 2c 20 73 71 6c 69 74 65 33 5f  vtab *, sqlite3_
4320: 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 2a 29 2c  vtab_cursor **),
4330: 0d 0a 20 20 69 6e 74 20 28 2a 78 43 6c 6f 73 65  ..  int (*xClose
4340: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63  )(sqlite3_vtab_c
4350: 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20  ursor*),..  int 
4360: 28 2a 78 46 69 6c 74 65 72 29 28 73 71 6c 69 74  (*xFilter)(sqlit
4370: 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c  e3_vtab_cursor*,
4380: 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72   int, const char
4390: 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 33   *, int, sqlite3
43a0: 5f 76 61 6c 75 65 20 2a 2a 29 2c 0d 0a 20 20 69  _value **),..  i
43b0: 6e 74 20 28 2a 78 4e 65 78 74 29 28 73 71 6c 69  nt (*xNext)(sqli
43c0: 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a  te3_vtab_cursor*
43d0: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 45 6f 66  ),..  int (*xEof
43e0: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63  )(sqlite3_vtab_c
43f0: 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20  ursor*),..  int 
4400: 28 2a 78 43 6f 6c 75 6d 6e 29 28 73 71 6c 69 74  (*xColumn)(sqlit
4410: 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c  e3_vtab_cursor*,
4420: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
4430: 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 69 6e 74 20  *, int),..  int 
4440: 28 2a 78 52 6f 77 69 64 29 28 73 71 6c 69 74 65  (*xRowid)(sqlite
4450: 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c 20  3_vtab_cursor*, 
4460: 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 2a 29  sqlite3_int64 *)
4470: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 55 70 64 61  ,..  int (*xUpda
4480: 74 65 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62  te)(sqlite3_vtab
4490: 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 33   *, int, sqlite3
44a0: 5f 76 61 6c 75 65 20 2a 2a 2c 20 73 71 6c 69 74  _value **, sqlit
44b0: 65 33 5f 69 6e 74 36 34 20 2a 29 2c 0d 0a 20 20  e3_int64 *),..  
44c0: 69 6e 74 20 28 2a 78 42 65 67 69 6e 29 28 73 71  int (*xBegin)(sq
44d0: 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d 0a  lite3_vtab *),..
44e0: 20 20 69 6e 74 20 28 2a 78 53 79 6e 63 29 28 73    int (*xSync)(s
44f0: 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d  qlite3_vtab *),.
4500: 0a 20 20 69 6e 74 20 28 2a 78 43 6f 6d 6d 69 74  .  int (*xCommit
4510: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a  )(sqlite3_vtab *
4520: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 52 6f 6c  ),..  int (*xRol
4530: 6c 62 61 63 6b 29 28 73 71 6c 69 74 65 33 5f 76  lback)(sqlite3_v
4540: 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28  tab *),..  int (
4550: 2a 78 46 69 6e 64 46 75 6e 63 74 69 6f 6e 29 28  *xFindFunction)(
4560: 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c 20  sqlite3_vtab *, 
4570: 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  int, const char 
4580: 2a 2c 20 76 6f 69 64 20 28 2a 2a 70 78 46 75 6e  *, void (**pxFun
4590: 63 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  c)(sqlite3_conte
45a0: 78 74 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65  xt*, int, sqlite
45b0: 33 5f 76 61 6c 75 65 2a 2a 29 2c 20 76 6f 69 64  3_value**), void
45c0: 20 2a 2a 70 70 41 72 67 29 2c 0d 0a 20 20 69 6e   **ppArg),..  in
45d0: 74 20 28 2a 78 52 65 6e 61 6d 65 29 28 73 71 6c  t (*xRename)(sql
45e0: 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 63 6f 6e  ite3_vtab *, con
45f0: 73 74 20 63 68 61 72 20 2a 29 2c 0d 0a 20 20 69  st char *),..  i
4600: 6e 74 20 28 2a 78 53 61 76 65 70 6f 69 6e 74 29  nt (*xSavepoint)
4610: 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c  (sqlite3_vtab *,
4620: 20 69 6e 74 29 2c 0d 0a 20 20 69 6e 74 20 28 2a   int),..  int (*
4630: 78 52 65 6c 65 61 73 65 29 28 73 71 6c 69 74 65  xRelease)(sqlite
4640: 33 5f 76 74 61 62 20 2a 2c 20 69 6e 74 29 2c 0d  3_vtab *, int),.
4650: 0a 20 20 69 6e 74 20 28 2a 78 52 6f 6c 6c 62 61  .  int (*xRollba
4660: 63 6b 54 6f 29 28 73 71 6c 69 74 65 33 5f 76 74  ckTo)(sqlite3_vt
4670: 61 62 20 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 76  ab *, int),..  v
4680: 6f 69 64 20 2a 70 43 6c 69 65 6e 74 44 61 74 61  oid *pClientData
4690: 2c 0d 0a 20 20 76 6f 69 64 28 2a 78 44 65 73 74  ,..  void(*xDest
46a0: 72 6f 79 4d 6f 64 75 6c 65 29 28 76 6f 69 64 2a  royModule)(void*
46b0: 29 0d 0a 29 7b 0d 0a 20 20 69 66 20 28 21 70 4d  )..){..  if (!pM
46c0: 6f 64 75 6c 65 29 20 72 65 74 75 72 6e 20 30 3b  odule) return 0;
46d0: 0d 0a 20 20 6d 65 6d 73 65 74 28 70 4d 6f 64 75  ..  memset(pModu
46e0: 6c 65 2c 20 30 2c 20 73 69 7a 65 6f 66 28 2a 70  le, 0, sizeof(*p
46f0: 4d 6f 64 75 6c 65 29 29 3b 0d 0a 20 20 70 4d 6f  Module));..  pMo
4700: 64 75 6c 65 2d 3e 69 56 65 72 73 69 6f 6e 20 3d  dule->iVersion =
4710: 20 69 56 65 72 73 69 6f 6e 3b 0d 0a 20 20 70 4d   iVersion;..  pM
4720: 6f 64 75 6c 65 2d 3e 78 43 72 65 61 74 65 20 3d  odule->xCreate =
4730: 20 78 43 72 65 61 74 65 3b 0d 0a 20 20 70 4d 6f   xCreate;..  pMo
4740: 64 75 6c 65 2d 3e 78 43 6f 6e 6e 65 63 74 20 3d  dule->xConnect =
4750: 20 78 43 6f 6e 6e 65 63 74 3b 0d 0a 20 20 70 4d   xConnect;..  pM
4760: 6f 64 75 6c 65 2d 3e 78 42 65 73 74 49 6e 64 65  odule->xBestInde
4770: 78 20 3d 20 78 42 65 73 74 49 6e 64 65 78 3b 0d  x = xBestIndex;.
4780: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 44 69 73  .  pModule->xDis
4790: 63 6f 6e 6e 65 63 74 20 3d 20 78 44 69 73 63 6f  connect = xDisco
47a0: 6e 6e 65 63 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c  nnect;..  pModul
47b0: 65 2d 3e 78 44 65 73 74 72 6f 79 20 3d 20 78 44  e->xDestroy = xD
47c0: 65 73 74 72 6f 79 3b 0d 0a 20 20 70 4d 6f 64 75  estroy;..  pModu
47d0: 6c 65 2d 3e 78 4f 70 65 6e 20 3d 20 78 4f 70 65  le->xOpen = xOpe
47e0: 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78  n;..  pModule->x
47f0: 43 6c 6f 73 65 20 3d 20 78 43 6c 6f 73 65 3b 0d  Close = xClose;.
4800: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 46 69 6c  .  pModule->xFil
4810: 74 65 72 20 3d 20 78 46 69 6c 74 65 72 3b 0d 0a  ter = xFilter;..
4820: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 4e 65 78 74    pModule->xNext
4830: 20 3d 20 78 4e 65 78 74 3b 0d 0a 20 20 70 4d 6f   = xNext;..  pMo
4840: 64 75 6c 65 2d 3e 78 45 6f 66 20 3d 20 78 45 6f  dule->xEof = xEo
4850: 66 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78  f;..  pModule->x
4860: 43 6f 6c 75 6d 6e 20 3d 20 78 43 6f 6c 75 6d 6e  Column = xColumn
4870: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 52  ;..  pModule->xR
4880: 6f 77 69 64 20 3d 20 78 52 6f 77 69 64 3b 0d 0a  owid = xRowid;..
4890: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 55 70 64 61    pModule->xUpda
48a0: 74 65 20 3d 20 78 55 70 64 61 74 65 3b 0d 0a 20  te = xUpdate;.. 
48b0: 20 70 4d 6f 64 75 6c 65 2d 3e 78 42 65 67 69 6e   pModule->xBegin
48c0: 20 3d 20 78 42 65 67 69 6e 3b 0d 0a 20 20 70 4d   = xBegin;..  pM
48d0: 6f 64 75 6c 65 2d 3e 78 53 79 6e 63 20 3d 20 78  odule->xSync = x
48e0: 53 79 6e 63 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65  Sync;..  pModule
48f0: 2d 3e 78 43 6f 6d 6d 69 74 20 3d 20 78 43 6f 6d  ->xCommit = xCom
4900: 6d 69 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d  mit;..  pModule-
4910: 3e 78 52 6f 6c 6c 62 61 63 6b 20 3d 20 78 52 6f  >xRollback = xRo
4920: 6c 6c 62 61 63 6b 3b 0d 0a 20 20 70 4d 6f 64 75  llback;..  pModu
4930: 6c 65 2d 3e 78 46 69 6e 64 46 75 6e 63 74 69 6f  le->xFindFunctio
4940: 6e 20 3d 20 78 46 69 6e 64 46 75 6e 63 74 69 6f  n = xFindFunctio
4950: 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78  n;..  pModule->x
4960: 52 65 6e 61 6d 65 20 3d 20 78 52 65 6e 61 6d 65  Rename = xRename
4970: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 53  ;..  pModule->xS
4980: 61 76 65 70 6f 69 6e 74 20 3d 20 78 53 61 76 65  avepoint = xSave
4990: 70 6f 69 6e 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c  point;..  pModul
49a0: 65 2d 3e 78 52 65 6c 65 61 73 65 20 3d 20 78 52  e->xRelease = xR
49b0: 65 6c 65 61 73 65 3b 0d 0a 20 20 70 4d 6f 64 75  elease;..  pModu
49c0: 6c 65 2d 3e 78 52 6f 6c 6c 62 61 63 6b 54 6f 20  le->xRollbackTo 
49d0: 3d 20 78 52 6f 6c 6c 62 61 63 6b 54 6f 3b 0d 0a  = xRollbackTo;..
49e0: 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33    return sqlite3
49f0: 5f 63 72 65 61 74 65 5f 64 69 73 70 6f 73 61 62  _create_disposab
4a00: 6c 65 5f 6d 6f 64 75 6c 65 28 64 62 2c 20 7a 4e  le_module(db, zN
4a10: 61 6d 65 2c 20 70 4d 6f 64 75 6c 65 2c 20 70 43  ame, pModule, pC
4a20: 6c 69 65 6e 74 44 61 74 61 2c 20 78 44 65 73 74  lientData, xDest
4a30: 72 6f 79 4d 6f 64 75 6c 65 29 3b 0d 0a 7d 0d 0a  royModule);..}..
4a40: 23 65 6e 64 69 66 0d 0a 0d 0a 53 51 4c 49 54 45  #endif....SQLITE
4a50: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20  _API int WINAPI 
4a60: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 64 6f 75  sqlite3_bind_dou
4a70: 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  ble_interop(sqli
4a80: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20  te3_stmt *stmt, 
4a90: 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c 65  int iCol, double
4aa0: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20   *val)..{..  if 
4ab0: 28 21 76 61 6c 29 20 72 65 74 75 72 6e 20 53 51  (!val) return SQ
4ac0: 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 72  LITE_ERROR;..  r
4ad0: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69  eturn sqlite3_bi
4ae0: 6e 64 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69  nd_double(stmt,i
4af0: 43 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d  Col,*val);..}...
4b00: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
4b10: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62  WINAPI sqlite3_b
4b20: 69 6e 64 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f  ind_int64_intero
4b30: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
4b40: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
4b50: 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76 61  sqlite_int64 *va
4b60: 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 76 61  l)..{..  if (!va
4b70: 6c 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  l) return SQLITE
4b80: 5f 45 52 52 4f 52 3b 0d 0a 20 20 72 65 74 75 72  _ERROR;..  retur
4b90: 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 69  n sqlite3_bind_i
4ba0: 6e 74 36 34 28 73 74 6d 74 2c 69 43 6f 6c 2c 2a  nt64(stmt,iCol,*
4bb0: 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  val);..}....SQLI
4bc0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61  TE_API const cha
4bd0: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  r * WINAPI sqlit
4be0: 65 33 5f 62 69 6e 64 5f 70 61 72 61 6d 65 74 65  e3_bind_paramete
4bf0: 72 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73  r_name_interop(s
4c00: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d  qlite3_stmt *stm
4c10: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74  t, int iCol, int
4c20: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f   *plen)..{..  co
4c30: 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d  nst char *pval =
4c40: 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 70 61   sqlite3_bind_pa
4c50: 72 61 6d 65 74 65 72 5f 6e 61 6d 65 28 73 74 6d  rameter_name(stm
4c60: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20  t, iCol);..  if 
4c70: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70  (plen) *plen = p
4c80: 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61  val ? strlen(pva
4c90: 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72  l) : 0;..  retur
4ca0: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51  n pval;..}....SQ
4cb0: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63  LITE_API const c
4cc0: 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c  har * WINAPI sql
4cd0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d 65  ite3_column_name
4ce0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
4cf0: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74  _stmt *stmt, int
4d00: 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e   iCol, int *plen
4d10: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68  )..{..  const ch
4d20: 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74  ar *pval = sqlit
4d30: 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 28 73  e3_column_name(s
4d40: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69  tmt, iCol);..  i
4d50: 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d  f (plen) *plen =
4d60: 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70   pval ? strlen(p
4d70: 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74  val) : 0;..  ret
4d80: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a  urn pval;..}....
4d90: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74  SQLITE_API const
4da0: 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73   void * WINAPI s
4db0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61  qlite3_column_na
4dc0: 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c  me16_interop(sql
4dd0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c  ite3_stmt *stmt,
4de0: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a   int iCol, int *
4df0: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73  plen)..{..  cons
4e00: 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73  t void *pval = s
4e10: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61  qlite3_column_na
4e20: 6d 65 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29  me16(stmt, iCol)
4e30: 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 2a  ;..  if (plen) *
4e40: 70 6c 65 6e 20 3d 20 70 76 61 6c 20 3f 20 77 63  plen = pval ? wc
4e50: 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29  slen((wchar_t *)
4e60: 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77  pval) * sizeof(w
4e70: 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20  char_t) : 0;..  
4e80: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d  return pval;..}.
4e90: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f  ...SQLITE_API co
4ea0: 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50  nst char * WINAP
4eb0: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  I sqlite3_column
4ec0: 5f 64 65 63 6c 74 79 70 65 5f 69 6e 74 65 72 6f  _decltype_intero
4ed0: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
4ee0: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
4ef0: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20  int *plen)..{.. 
4f00: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61   const char *pva
4f10: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  l = sqlite3_colu
4f20: 6d 6e 5f 64 65 63 6c 74 79 70 65 28 73 74 6d 74  mn_decltype(stmt
4f30: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28  , iCol);..  if (
4f40: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76  plen) *plen = pv
4f50: 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c  al ? strlen(pval
4f60: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
4f70: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
4f80: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f  ITE_API const vo
4f90: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69  id * WINAPI sqli
4fa0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74  te3_column_declt
4fb0: 79 70 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71  ype16_interop(sq
4fc0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74  lite3_stmt *stmt
4fd0: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20  , int iCol, int 
4fe0: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e  *plen)..{..  con
4ff0: 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20  st void *pval = 
5000: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64  sqlite3_column_d
5010: 65 63 6c 74 79 70 65 31 36 28 73 74 6d 74 2c 20  ecltype16(stmt, 
5020: 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c  iCol);..  if (pl
5030: 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 6c  en) *plen = pval
5040: 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72   ? wcslen((wchar
5050: 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a  _t *)pval) * siz
5060: 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30  eof(wchar_t) : 0
5070: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c  ;..  return pval
5080: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
5090: 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73  PI void WINAPI s
50a0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f  qlite3_column_do
50b0: 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c  uble_interop(sql
50c0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c  ite3_stmt *stmt,
50d0: 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c   int iCol, doubl
50e0: 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66  e *val)..{..  if
50f0: 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d   (!val) return;.
5100: 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65  .  *val = sqlite
5110: 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 6c 65 28  3_column_double(
5120: 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d 0a  stmt,iCol);..}..
5130: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69  ..SQLITE_API voi
5140: 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  d WINAPI sqlite3
5150: 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 5f 69 6e  _column_int64_in
5160: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74  terop(sqlite3_st
5170: 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43  mt *stmt, int iC
5180: 6f 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34  ol, sqlite_int64
5190: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20   *val)..{..  if 
51a0: 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d 0a  (!val) return;..
51b0: 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 33    *val = sqlite3
51c0: 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28 73 74  _column_int64(st
51d0: 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d 0a 0d 0a  mt,iCol);..}....
51e0: 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20  SQLITE_API void 
51f0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6c  WINAPI sqlite3_l
5200: 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64  ast_insert_rowid
5210: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
5220: 20 2a 64 62 2c 20 73 71 6c 69 74 65 5f 69 6e 74   *db, sqlite_int
5230: 36 34 20 2a 72 6f 77 49 64 29 0d 0a 7b 0d 0a 20  64 *rowId)..{.. 
5240: 20 69 66 20 28 21 72 6f 77 49 64 29 20 72 65 74   if (!rowId) ret
5250: 75 72 6e 3b 0d 0a 20 20 2a 72 6f 77 49 64 20 3d  urn;..  *rowId =
5260: 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e   sqlite3_last_in
5270: 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29 3b 0d  sert_rowid(db);.
5280: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
5290: 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c   void WINAPI sql
52a0: 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 75 73 65 64  ite3_memory_used
52b0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 5f  _interop(sqlite_
52c0: 69 6e 74 36 34 20 2a 6e 42 79 74 65 73 29 0d 0a  int64 *nBytes)..
52d0: 7b 0d 0a 20 20 69 66 20 28 21 6e 42 79 74 65 73  {..  if (!nBytes
52e0: 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 2a 6e 42  ) return;..  *nB
52f0: 79 74 65 73 20 3d 20 73 71 6c 69 74 65 33 5f 6d  ytes = sqlite3_m
5300: 65 6d 6f 72 79 5f 75 73 65 64 28 29 3b 0d 0a 7d  emory_used();..}
5310: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76  ....SQLITE_API v
5320: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74  oid WINAPI sqlit
5330: 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61  e3_memory_highwa
5340: 74 65 72 5f 69 6e 74 65 72 6f 70 28 69 6e 74 20  ter_interop(int 
5350: 72 65 73 65 74 46 6c 61 67 2c 20 73 71 6c 69 74  resetFlag, sqlit
5360: 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74 65 73 29  e_int64 *nBytes)
5370: 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 6e 42 79 74  ..{..  if (!nByt
5380: 65 73 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 2a  es) return;..  *
5390: 6e 42 79 74 65 73 20 3d 20 73 71 6c 69 74 65 33  nBytes = sqlite3
53a0: 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61 74 65  _memory_highwate
53b0: 72 28 72 65 73 65 74 46 6c 61 67 29 3b 0d 0a 7d  r(resetFlag);..}
53c0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63  ....SQLITE_API c
53d0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
53e0: 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69  ar * WINAPI sqli
53f0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 5f  te3_column_text_
5400: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f  interop(sqlite3_
5410: 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20  stmt *stmt, int 
5420: 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29  iCol, int *plen)
5430: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73  ..{..  const uns
5440: 69 67 6e 65 64 20 63 68 61 72 20 2a 70 76 61 6c  igned char *pval
5450: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d   = sqlite3_colum
5460: 6e 5f 74 65 78 74 28 73 74 6d 74 2c 20 69 43 6f  n_text(stmt, iCo
5470: 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29  l);..  if (plen)
5480: 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33   *plen = sqlite3
5490: 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28 73 74  _column_bytes(st
54a0: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 72 65  mt, iCol);..  re
54b0: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d  turn pval;..}...
54c0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73  .SQLITE_API cons
54d0: 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20  t void * WINAPI 
54e0: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74  sqlite3_column_t
54f0: 65 78 74 31 36 5f 69 6e 74 65 72 6f 70 28 73 71  ext16_interop(sq
5500: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74  lite3_stmt *stmt
5510: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20  , int iCol, int 
5520: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e  *plen)..{..  con
5530: 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20  st void *pval = 
5540: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74  sqlite3_column_t
5550: 65 78 74 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c  ext16(stmt, iCol
5560: 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20  );..  if (plen) 
5570: 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 5f  *plen = sqlite3_
5580: 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 31 36 28 73  column_bytes16(s
5590: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 72  tmt, iCol);..  r
55a0: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a  eturn pval;..}..
55b0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74  ..SQLITE_API int
55c0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
55d0: 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70  finalize_interop
55e0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73  (sqlite3_stmt *s
55f0: 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  tmt)..{..  int r
5600: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65  et;..#if !define
5610: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59  d(INTEROP_LEGACY
5620: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54  _CLOSE) && SQLIT
5630: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
5640: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23   >= 3007014....#
5650: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
5660: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
5670: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
5680: 54 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41  TEROP_DEBUG_FINA
5690: 4c 49 5a 45 29 0d 0a 20 20 56 64 62 65 20 2a 70  LIZE)..  Vdbe *p
56a0: 20 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74 3b   = (Vdbe *)stmt;
56b0: 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  ..  sqlite3 *db 
56c0: 3d 20 70 20 3f 20 70 2d 3e 64 62 20 3a 20 30 3b  = p ? p->db : 0;
56d0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
56e0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
56f0: 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f  _finalize_intero
5700: 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c  p(): calling sql
5710: 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 25 70  ite3_finalize(%p
5720: 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c  , %p)...\n", db,
5730: 20 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d   stmt);..#endif.
5740: 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74  ...  ret = sqlit
5750: 65 33 5f 66 69 6e 61 6c 69 7a 65 28 73 74 6d 74  e3_finalize(stmt
5760: 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  );....#if define
5770: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
5780: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
5790: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
57a0: 55 47 5f 46 49 4e 41 4c 49 5a 45 29 0d 0a 20 20  UG_FINALIZE)..  
57b0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65  sqlite3InteropDe
57c0: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 66 69 6e  bug("sqlite3_fin
57d0: 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 28 29 3a  alize_interop():
57e0: 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a   sqlite3_finaliz
57f0: 65 28 25 70 2c 20 25 70 29 20 72 65 74 75 72 6e  e(%p, %p) return
5800: 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 73  ed %d.\n", db, s
5810: 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64  tmt, ret);..#end
5820: 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72  if....  return r
5830: 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 56 64  et;..#else..  Vd
5840: 62 65 20 2a 70 3b 0d 0a 20 20 72 65 74 20 3d 20  be *p;..  ret = 
5850: 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20  SQLITE_OK;....  
5860: 70 20 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74  p = (Vdbe *)stmt
5870: 3b 0d 0a 20 20 69 66 20 28 70 29 0d 0a 20 20 7b  ;..  if (p)..  {
5880: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 20 2a 64  ..    sqlite3 *d
5890: 62 20 3d 20 70 2d 3e 64 62 3b 0d 0a 0d 0a 20 20  b = p->db;....  
58a0: 20 20 69 66 20 28 64 62 20 21 3d 20 4e 55 4c 4c    if (db != NULL
58b0: 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  )..      sqlite3
58c0: 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d  _mutex_enter(db-
58d0: 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 20 20  >mutex);....    
58e0: 69 66 20 28 28 70 2d 3e 6d 61 67 69 63 20 3d 3d  if ((p->magic ==
58f0: 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 45 41 44   VDBE_MAGIC_DEAD
5900: 29 20 26 26 20 28 64 62 20 3d 3d 20 4e 55 4c 4c  ) && (db == NULL
5910: 29 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20  ))..    {..     
5920: 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 5f 69   sqlite3DbFree_i
5930: 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b 0d 0a  nterop(db, p);..
5940: 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d      }..    else.
5950: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65  .    {..      re
5960: 74 20 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61  t = sqlite3_fina
5970: 6c 69 7a 65 28 73 74 6d 74 29 3b 0d 0a 20 20 20  lize(stmt);..   
5980: 20 7d 0d 0a 0d 0a 20 20 20 20 69 66 20 28 64 62   }....    if (db
5990: 20 21 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 20   != NULL)..     
59a0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c   sqlite3_mutex_l
59b0: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b  eave(db->mutex);
59c0: 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 65 74 75 72  ..  }....  retur
59d0: 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a  n ret;..#endif..
59e0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
59f0: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
5a00: 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68  e3_backup_finish
5a10: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
5a20: 5f 62 61 63 6b 75 70 20 2a 70 29 0d 0a 7b 0d 0a  _backup *p)..{..
5a30: 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69    int ret;....#i
5a40: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
5a50: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
5a60: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
5a70: 45 52 4f 50 5f 44 45 42 55 47 5f 42 41 43 4b 55  EROP_DEBUG_BACKU
5a80: 50 5f 46 49 4e 49 53 48 29 0d 0a 20 20 73 71 6c  P_FINISH)..  sql
5a90: 69 74 65 33 2a 20 70 44 65 73 74 44 62 20 3d 20  ite3* pDestDb = 
5aa0: 70 20 3f 20 70 2d 3e 70 44 65 73 74 44 62 20 3a  p ? p->pDestDb :
5ab0: 20 30 3b 0d 0a 20 20 73 71 6c 69 74 65 33 2a 20   0;..  sqlite3* 
5ac0: 70 53 72 63 44 62 20 3d 20 70 20 3f 20 70 2d 3e  pSrcDb = p ? p->
5ad0: 70 53 72 63 44 62 20 3a 20 30 3b 0d 0a 20 20 73  pSrcDb : 0;..  s
5ae0: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
5af0: 75 67 28 22 73 71 6c 69 74 65 33 5f 62 61 63 6b  ug("sqlite3_back
5b00: 75 70 5f 66 69 6e 69 73 68 5f 69 6e 74 65 72 6f  up_finish_intero
5b10: 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c  p(): calling sql
5b20: 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69  ite3_backup_fini
5b30: 73 68 28 25 70 2c 20 25 70 2c 20 25 70 29 2e 2e  sh(%p, %p, %p)..
5b40: 2e 5c 6e 22 2c 20 70 44 65 73 74 44 62 2c 20 70  .\n", pDestDb, p
5b50: 53 72 63 44 62 2c 20 70 29 3b 0d 0a 23 65 6e 64  SrcDb, p);..#end
5b60: 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71  if....  ret = sq
5b70: 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e  lite3_backup_fin
5b80: 69 73 68 28 70 29 3b 0d 0a 0d 0a 23 69 66 20 64  ish(p);....#if d
5b90: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44  efined(INTEROP_D
5ba0: 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f  EBUG) && (INTERO
5bb0: 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f  P_DEBUG & INTERO
5bc0: 50 5f 44 45 42 55 47 5f 42 41 43 4b 55 50 5f 46  P_DEBUG_BACKUP_F
5bd0: 49 4e 49 53 48 29 0d 0a 20 20 73 71 6c 69 74 65  INISH)..  sqlite
5be0: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
5bf0: 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69  qlite3_backup_fi
5c00: 6e 69 73 68 5f 69 6e 74 65 72 6f 70 28 29 3a 20  nish_interop(): 
5c10: 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66  sqlite3_backup_f
5c20: 69 6e 69 73 68 28 25 70 2c 20 25 70 2c 20 25 70  inish(%p, %p, %p
5c30: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e  ) returned %d.\n
5c40: 22 2c 20 70 44 65 73 74 44 62 2c 20 70 53 72 63  ", pDestDb, pSrc
5c50: 44 62 2c 20 70 2c 20 72 65 74 29 3b 0d 0a 23 65  Db, p, ret);..#e
5c60: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e  ndif....  return
5c70: 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49   ret;..}....SQLI
5c80: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
5c90: 49 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 63  I sqlite3_blob_c
5ca0: 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c  lose_interop(sql
5cb0: 69 74 65 33 5f 62 6c 6f 62 20 2a 70 29 0d 0a 7b  ite3_blob *p)..{
5cc0: 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a  ..  int ret;....
5cd0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
5ce0: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49  ROP_DEBUG) && (I
5cf0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49  NTEROP_DEBUG & I
5d00: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 4c 4f  NTEROP_DEBUG_BLO
5d10: 42 5f 43 4c 4f 53 45 29 0d 0a 20 20 73 71 6c 69  B_CLOSE)..  sqli
5d20: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28  te3InteropDebug(
5d30: 22 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 63 6c  "sqlite3_blob_cl
5d40: 6f 73 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63  ose_interop(): c
5d50: 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 62  alling sqlite3_b
5d60: 6c 6f 62 5f 63 6c 6f 73 65 28 25 70 29 2e 2e 2e  lob_close(%p)...
5d70: 5c 6e 22 2c 20 70 29 3b 0d 0a 23 65 6e 64 69 66  \n", p);..#endif
5d80: 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69  ....  ret = sqli
5d90: 74 65 33 5f 62 6c 6f 62 5f 63 6c 6f 73 65 28 70  te3_blob_close(p
5da0: 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  );....#if define
5db0: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
5dc0: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
5dd0: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
5de0: 55 47 5f 42 4c 4f 42 5f 43 4c 4f 53 45 29 0d 0a  UG_BLOB_CLOSE)..
5df0: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70    sqlite3Interop
5e00: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 62  Debug("sqlite3_b
5e10: 6c 6f 62 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f  lob_close_intero
5e20: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 62 6c 6f  p(): sqlite3_blo
5e30: 62 5f 63 6c 6f 73 65 28 25 70 29 20 72 65 74 75  b_close(%p) retu
5e40: 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 70 2c 20  rned %d.\n", p, 
5e50: 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d  ret);..#endif...
5e60: 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a  .  return ret;..
5e70: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
5e80: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
5e90: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70  e3_reset_interop
5ea0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73  (sqlite3_stmt *s
5eb0: 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  tmt)..{..  int r
5ec0: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65  et;..#if !define
5ed0: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59  d(INTEROP_LEGACY
5ee0: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54  _CLOSE) && SQLIT
5ef0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
5f00: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23   >= 3007014....#
5f10: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
5f20: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
5f30: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
5f40: 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45  TEROP_DEBUG_RESE
5f50: 54 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74  T)..  sqlite3Int
5f60: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74  eropDebug("sqlit
5f70: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70  e3_reset_interop
5f80: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69  (): calling sqli
5f90: 74 65 33 5f 72 65 73 65 74 28 25 70 29 2e 2e 2e  te3_reset(%p)...
5fa0: 5c 6e 22 2c 20 73 74 6d 74 29 3b 0d 0a 23 65 6e  \n", stmt);..#en
5fb0: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73  dif....  ret = s
5fc0: 71 6c 69 74 65 33 5f 72 65 73 65 74 28 73 74 6d  qlite3_reset(stm
5fd0: 74 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  t);....#if defin
5fe0: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
5ff0: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45  ) && (INTEROP_DE
6000: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45  BUG & INTEROP_DE
6010: 42 55 47 5f 52 45 53 45 54 29 0d 0a 20 20 73 71  BUG_RESET)..  sq
6020: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75  lite3InteropDebu
6030: 67 28 22 73 71 6c 69 74 65 33 5f 72 65 73 65 74  g("sqlite3_reset
6040: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69  _interop(): sqli
6050: 74 65 33 5f 72 65 73 65 74 28 25 70 29 20 72 65  te3_reset(%p) re
6060: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 73  turned %d.\n", s
6070: 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64  tmt, ret);..#end
6080: 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72  if....  return r
6090: 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66  et;..#else..  if
60a0: 20 28 73 74 6d 74 20 26 26 20 28 28 56 64 62 65   (stmt && ((Vdbe
60b0: 20 2a 29 73 74 6d 74 29 2d 3e 6d 61 67 69 63 20   *)stmt)->magic 
60c0: 3d 3d 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 45  == VDBE_MAGIC_DE
60d0: 41 44 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54  AD) return SQLIT
60e0: 45 5f 53 43 48 45 4d 41 3b 0d 0a 20 20 72 65 74  E_SCHEMA;..  ret
60f0: 20 3d 20 73 71 6c 69 74 65 33 5f 72 65 73 65 74   = sqlite3_reset
6100: 28 73 74 6d 74 29 3b 0d 0a 20 20 72 65 74 75 72  (stmt);..  retur
6110: 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a  n ret;..#endif..
6120: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
6130: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
6140: 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69  e3_create_functi
6150: 6f 6e 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  on_interop(sqlit
6160: 65 33 20 2a 70 73 71 6c 2c 20 63 6f 6e 73 74 20  e3 *psql, const 
6170: 63 68 61 72 20 2a 7a 46 75 6e 63 74 69 6f 6e 4e  char *zFunctionN
6180: 61 6d 65 2c 20 69 6e 74 20 6e 41 72 67 2c 20 69  ame, int nArg, i
6190: 6e 74 20 65 54 65 78 74 52 65 70 2c 20 76 6f 69  nt eTextRep, voi
61a0: 64 20 2a 70 76 55 73 65 72 2c 20 53 51 4c 49 54  d *pvUser, SQLIT
61b0: 45 55 53 45 52 46 55 4e 43 20 66 75 6e 63 2c 20  EUSERFUNC func, 
61c0: 53 51 4c 49 54 45 55 53 45 52 46 55 4e 43 20 66  SQLITEUSERFUNC f
61d0: 75 6e 63 73 74 65 70 2c 20 53 51 4c 49 54 45 46  uncstep, SQLITEF
61e0: 55 4e 43 46 49 4e 41 4c 20 66 75 6e 63 66 69 6e  UNCFINAL funcfin
61f0: 61 6c 2c 20 69 6e 74 20 6e 65 65 64 43 6f 6c 6c  al, int needColl
6200: 53 65 71 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e  Seq)..{..  int n
6210: 3b 0d 0a 0d 0a 20 20 69 66 20 28 65 54 65 78 74  ;....  if (eText
6220: 52 65 70 20 3d 3d 20 53 51 4c 49 54 45 5f 55 54  Rep == SQLITE_UT
6230: 46 31 36 29 0d 0a 20 20 20 20 65 54 65 78 74 52  F16)..    eTextR
6240: 65 70 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 31  ep = SQLITE_UTF1
6250: 36 4e 41 54 49 56 45 3b 0d 0a 0d 0a 20 20 6e 20  6NATIVE;....  n 
6260: 3d 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65  = sqlite3_create
6270: 5f 66 75 6e 63 74 69 6f 6e 28 70 73 71 6c 2c 20  _function(psql, 
6280: 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 6e  zFunctionName, n
6290: 41 72 67 2c 20 65 54 65 78 74 52 65 70 2c 20 70  Arg, eTextRep, p
62a0: 76 55 73 65 72 2c 20 66 75 6e 63 2c 20 66 75 6e  vUser, func, fun
62b0: 63 73 74 65 70 2c 20 66 75 6e 63 66 69 6e 61 6c  cstep, funcfinal
62c0: 29 3b 0d 0a 20 20 69 66 20 28 6e 20 3d 3d 20 53  );..  if (n == S
62d0: 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20 20 7b 0d 0a  QLITE_OK)..  {..
62e0: 20 20 20 20 69 66 20 28 6e 65 65 64 43 6f 6c 6c      if (needColl
62f0: 53 65 71 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20  Seq)..    {..   
6300: 20 20 20 46 75 6e 63 44 65 66 20 2a 70 46 75 6e     FuncDef *pFun
6310: 63 20 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 46  c = sqlite3FindF
6320: 75 6e 63 74 69 6f 6e 28 0d 0a 20 20 20 20 20 20  unction(..      
6330: 20 20 20 20 70 73 71 6c 2c 20 7a 46 75 6e 63 74      psql, zFunct
6340: 69 6f 6e 4e 61 6d 65 2c 0d 0a 23 69 66 20 53 51  ionName,..#if SQ
6350: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d  LITE_VERSION_NUM
6360: 42 45 52 20 3c 20 33 30 31 32 30 30 30 0d 0a 20  BER < 3012000.. 
6370: 20 20 20 20 20 20 20 20 20 73 74 72 6c 65 6e 28           strlen(
6380: 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 29 2c 0d  zFunctionName),.
6390: 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 20 20 20  .#endif..       
63a0: 20 20 20 6e 41 72 67 2c 20 65 54 65 78 74 52 65     nArg, eTextRe
63b0: 70 2c 20 30 29 3b 0d 0a 20 20 20 20 20 20 69 66  p, 0);..      if
63c0: 28 20 70 46 75 6e 63 20 29 0d 0a 20 20 20 20 20  ( pFunc )..     
63d0: 20 7b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56   {..#if SQLITE_V
63e0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d  ERSION_NUMBER >=
63f0: 20 33 30 30 38 30 30 31 0d 0a 20 20 20 20 20 20   3008001..      
6400: 20 20 70 46 75 6e 63 2d 3e 66 75 6e 63 46 6c 61    pFunc->funcFla
6410: 67 73 20 7c 3d 20 53 51 4c 49 54 45 5f 46 55 4e  gs |= SQLITE_FUN
6420: 43 5f 4e 45 45 44 43 4f 4c 4c 3b 0d 0a 23 65 6c  C_NEEDCOLL;..#el
6430: 73 65 0d 0a 20 20 20 20 20 20 20 20 70 46 75 6e  se..        pFun
6440: 63 2d 3e 66 6c 61 67 73 20 7c 3d 20 53 51 4c 49  c->flags |= SQLI
6450: 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c  TE_FUNC_NEEDCOLL
6460: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 20  ;..#endif..     
6470: 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a   }..    }..  }..
6480: 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d  ..  return n;..}
6490: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76  ....SQLITE_API v
64a0: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74  oid WINAPI sqlit
64b0: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 5f  e3_value_double_
64c0: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f  interop(sqlite3_
64d0: 76 61 6c 75 65 20 2a 70 76 61 6c 2c 20 64 6f 75  value *pval, dou
64e0: 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20  ble *val)..{..  
64f0: 69 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e  if (!val) return
6500: 3b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69  ;..  *val = sqli
6510: 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65  te3_value_double
6520: 28 70 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51  (pval);..}....SQ
6530: 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49  LITE_API void WI
6540: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c  NAPI sqlite3_val
6550: 75 65 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70  ue_int64_interop
6560: 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a  (sqlite3_value *
6570: 70 76 61 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74  pval, sqlite_int
6580: 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69  64 *val)..{..  i
6590: 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b  f (!val) return;
65a0: 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74  ..  *val = sqlit
65b0: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 70  e3_value_int64(p
65c0: 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  val);..}....SQLI
65d0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 75 6e 73  TE_API const uns
65e0: 69 67 6e 65 64 20 63 68 61 72 20 2a 20 57 49 4e  igned char * WIN
65f0: 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  API sqlite3_valu
6600: 65 5f 74 65 78 74 5f 69 6e 74 65 72 6f 70 28 73  e_text_interop(s
6610: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 76 61  qlite3_value *va
6620: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
6630: 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  ..  const unsign
6640: 65 64 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20  ed char *pval = 
6650: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
6660: 78 74 28 76 61 6c 29 3b 0d 0a 20 20 69 66 20 28  xt(val);..  if (
6670: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71  plen) *plen = sq
6680: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
6690: 73 28 76 61 6c 29 3b 0d 0a 20 20 72 65 74 75 72  s(val);..  retur
66a0: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51  n pval;..}....SQ
66b0: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76  LITE_API const v
66c0: 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c  oid * WINAPI sql
66d0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 31  ite3_value_text1
66e0: 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  6_interop(sqlite
66f0: 33 5f 76 61 6c 75 65 20 2a 76 61 6c 2c 20 69 6e  3_value *val, in
6700: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
6710: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20  onst void *pval 
6720: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
6730: 74 65 78 74 31 36 28 76 61 6c 29 3b 0d 0a 20 20  text16(val);..  
6740: 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20  if (plen) *plen 
6750: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
6760: 62 79 74 65 73 31 36 28 76 61 6c 29 3b 0d 0a 20  bytes16(val);.. 
6770: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d   return pval;..}
6780: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76  ....SQLITE_API v
6790: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74  oid WINAPI sqlit
67a0: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
67b0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
67c0: 5f 63 6f 6e 74 65 78 74 20 2a 70 63 74 78 2c 20  _context *pctx, 
67d0: 64 6f 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d  double *val)..{.
67e0: 0a 20 20 69 66 20 28 21 76 61 6c 29 20 72 65 74  .  if (!val) ret
67f0: 75 72 6e 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f  urn;..  sqlite3_
6800: 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 70 63  result_double(pc
6810: 74 78 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d  tx, *val);..}...
6820: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64  .SQLITE_API void
6830: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
6840: 72 65 73 75 6c 74 5f 69 6e 74 36 34 5f 69 6e 74  result_int64_int
6850: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e  erop(sqlite3_con
6860: 74 65 78 74 20 2a 70 63 74 78 2c 20 73 71 6c 69  text *pctx, sqli
6870: 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a  te_int64 *val)..
6880: 7b 0d 0a 20 20 69 66 20 28 21 76 61 6c 29 20 72  {..  if (!val) r
6890: 65 74 75 72 6e 3b 0d 0a 20 20 73 71 6c 69 74 65  eturn;..  sqlite
68a0: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 70  3_result_int64(p
68b0: 63 74 78 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a  ctx, *val);..}..
68c0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74  ..SQLITE_API int
68d0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
68e0: 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c 63 6f 6d 70  context_collcomp
68f0: 61 72 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  are_interop(sqli
6900: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78  te3_context *ctx
6910: 2c 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 31  , const void *p1
6920: 2c 20 69 6e 74 20 70 31 6c 65 6e 2c 20 63 6f 6e  , int p1len, con
6930: 73 74 20 76 6f 69 64 20 2a 70 32 2c 20 69 6e 74  st void *p2, int
6940: 20 70 32 6c 65 6e 29 0d 0a 7b 0d 0a 23 69 66 20   p2len)..{..#if 
6950: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e  SQLITE_VERSION_N
6960: 55 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 37  UMBER >= 3008007
6970: 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f  ..  CollSeq *pCo
6980: 6c 6c 20 3d 20 63 74 78 20 3f 20 73 71 6c 69 74  ll = ctx ? sqlit
6990: 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71  e3GetFuncCollSeq
69a0: 28 63 74 78 29 20 3a 20 30 3b 0d 0a 23 65 6c 73  (ctx) : 0;..#els
69b0: 65 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43  e..  CollSeq *pC
69c0: 6f 6c 6c 20 3d 20 63 74 78 20 3f 20 63 74 78 2d  oll = ctx ? ctx-
69d0: 3e 70 43 6f 6c 6c 20 3a 20 30 3b 0d 0a 23 65 6e  >pColl : 0;..#en
69e0: 64 69 66 0d 0a 20 20 69 66 20 28 21 63 74 78 20  dif..  if (!ctx 
69f0: 7c 7c 20 21 63 74 78 2d 3e 70 46 75 6e 63 29 20  || !ctx->pFunc) 
6a00: 72 65 74 75 72 6e 20 34 3b 20 2f 2a 20 45 52 52  return 4; /* ERR
6a10: 4f 52 20 2a 2f 0d 0a 20 20 69 66 20 28 21 70 43  OR */..  if (!pC
6a20: 6f 6c 6c 20 7c 7c 20 21 70 43 6f 6c 6c 2d 3e 78  oll || !pColl->x
6a30: 43 6d 70 29 20 72 65 74 75 72 6e 20 33 3b 20 2f  Cmp) return 3; /
6a40: 2a 20 45 52 52 4f 52 20 2a 2f 0d 0a 23 69 66 20  * ERROR */..#if 
6a50: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e  SQLITE_VERSION_N
6a60: 55 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 31  UMBER >= 3008001
6a70: 0d 0a 20 20 69 66 20 28 28 63 74 78 2d 3e 70 46  ..  if ((ctx->pF
6a80: 75 6e 63 2d 3e 66 75 6e 63 46 6c 61 67 73 20 26  unc->funcFlags &
6a90: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45   SQLITE_FUNC_NEE
6aa0: 44 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 72 65 74  DCOLL) == 0) ret
6ab0: 75 72 6e 20 32 3b 20 2f 2a 20 45 52 52 4f 52 20  urn 2; /* ERROR 
6ac0: 2a 2f 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20  */..#else..  if 
6ad0: 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c  ((ctx->pFunc->fl
6ae0: 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e  ags & SQLITE_FUN
6af0: 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 30  C_NEEDCOLL) == 0
6b00: 29 20 72 65 74 75 72 6e 20 32 3b 20 2f 2a 20 45  ) return 2; /* E
6b10: 52 52 4f 52 20 2a 2f 0d 0a 23 65 6e 64 69 66 0d  RROR */..#endif.
6b20: 0a 20 20 72 65 74 75 72 6e 20 70 43 6f 6c 6c 2d  .  return pColl-
6b30: 3e 78 43 6d 70 28 70 43 6f 6c 6c 2d 3e 70 55 73  >xCmp(pColl->pUs
6b40: 65 72 2c 20 70 31 6c 65 6e 2c 20 70 31 2c 20 70  er, p1len, p1, p
6b50: 32 6c 65 6e 2c 20 70 32 29 3b 0d 0a 7d 0d 0a 0d  2len, p2);..}...
6b60: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73  .SQLITE_API cons
6b70: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20  t char * WINAPI 
6b80: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
6b90: 63 6f 6c 6c 73 65 71 5f 69 6e 74 65 72 6f 70 28  collseq_interop(
6ba0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
6bb0: 2a 63 74 78 2c 20 69 6e 74 20 2a 70 74 79 70 65  *ctx, int *ptype
6bc0: 2c 20 69 6e 74 20 2a 65 6e 63 2c 20 69 6e 74 20  , int *enc, int 
6bd0: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 23 69 66 20 53  *plen)..{..#if S
6be0: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55  QLITE_VERSION_NU
6bf0: 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 37 0d  MBER >= 3008007.
6c00: 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c  .  CollSeq *pCol
6c10: 6c 20 3d 20 63 74 78 20 3f 20 73 71 6c 69 74 65  l = ctx ? sqlite
6c20: 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28  3GetFuncCollSeq(
6c30: 63 74 78 29 20 3a 20 30 3b 0d 0a 23 65 6c 73 65  ctx) : 0;..#else
6c40: 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f  ..  CollSeq *pCo
6c50: 6c 6c 20 3d 20 63 74 78 20 3f 20 63 74 78 2d 3e  ll = ctx ? ctx->
6c60: 70 43 6f 6c 6c 20 3a 20 30 3b 0d 0a 23 65 6e 64  pColl : 0;..#end
6c70: 69 66 0d 0a 20 20 69 66 20 28 70 74 79 70 65 29  if..  if (ptype)
6c80: 20 2a 70 74 79 70 65 20 3d 20 30 3b 0d 0a 20 20   *ptype = 0;..  
6c90: 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20  if (plen) *plen 
6ca0: 3d 20 30 3b 0d 0a 20 20 69 66 20 28 65 6e 63 29  = 0;..  if (enc)
6cb0: 20 2a 65 6e 63 20 3d 20 30 3b 0d 0a 0d 0a 20 20   *enc = 0;....  
6cc0: 69 66 20 28 21 63 74 78 20 7c 7c 20 21 63 74 78  if (!ctx || !ctx
6cd0: 2d 3e 70 46 75 6e 63 29 20 72 65 74 75 72 6e 20  ->pFunc) return 
6ce0: 4e 55 4c 4c 3b 0d 0a 23 69 66 20 53 51 4c 49 54  NULL;..#if SQLIT
6cf0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
6d00: 20 3e 3d 20 33 30 30 38 30 30 31 0d 0a 20 20 69   >= 3008001..  i
6d10: 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e  f ((ctx->pFunc->
6d20: 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51 4c 49  funcFlags & SQLI
6d30: 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c  TE_FUNC_NEEDCOLL
6d40: 29 20 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 4e  ) == 0) return N
6d50: 55 4c 4c 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69  ULL;..#else..  i
6d60: 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e  f ((ctx->pFunc->
6d70: 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46  flags & SQLITE_F
6d80: 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d  UNC_NEEDCOLL) ==
6d90: 20 30 29 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b   0) return NULL;
6da0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66  ..#endif....  if
6db0: 20 28 70 43 6f 6c 6c 29 0d 0a 20 20 7b 0d 0a 20   (pColl)..  {.. 
6dc0: 20 20 20 69 66 20 28 65 6e 63 29 20 2a 65 6e 63     if (enc) *enc
6dd0: 20 3d 20 70 43 6f 6c 6c 2d 3e 65 6e 63 3b 0d 0a   = pColl->enc;..
6de0: 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49  #if SQLITE_VERSI
6df0: 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 30 30 37  ON_NUMBER < 3007
6e00: 30 31 30 0d 0a 20 20 20 20 69 66 20 28 70 74 79  010..    if (pty
6e10: 70 65 29 20 2a 70 74 79 70 65 20 3d 20 70 43 6f  pe) *ptype = pCo
6e20: 6c 6c 2d 3e 74 79 70 65 3b 0d 0a 23 65 6e 64 69  ll->type;..#endi
6e30: 66 0d 0a 20 20 20 20 69 66 20 28 70 6c 65 6e 29  f..    if (plen)
6e40: 20 2a 70 6c 65 6e 20 3d 20 70 43 6f 6c 6c 2d 3e   *plen = pColl->
6e50: 7a 4e 61 6d 65 20 3f 20 73 74 72 6c 65 6e 28 70  zName ? strlen(p
6e60: 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65 29 20 3a 20 30  Coll->zName) : 0
6e70: 3b 0d 0a 0d 0a 20 20 20 20 72 65 74 75 72 6e 20  ;....    return 
6e80: 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65 3b 0d 0a 20  pColl->zName;.. 
6e90: 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 4e 55 4c   }..  return NUL
6ea0: 4c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  L;..}....SQLITE_
6eb0: 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  API const char *
6ec0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
6ed0: 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f  column_database_
6ee0: 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c  name_interop(sql
6ef0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c  ite3_stmt *stmt,
6f00: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a   int iCol, int *
6f10: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73  plen)..{..  cons
6f20: 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73  t char *pval = s
6f30: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61  qlite3_column_da
6f40: 74 61 62 61 73 65 5f 6e 61 6d 65 28 73 74 6d 74  tabase_name(stmt
6f50: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28  , iCol);..  if (
6f60: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76  plen) *plen = pv
6f70: 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c  al ? strlen(pval
6f80: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
6f90: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
6fa0: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f  ITE_API const vo
6fb0: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69  id * WINAPI sqli
6fc0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62  te3_column_datab
6fd0: 61 73 65 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72  ase_name16_inter
6fe0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
6ff0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
7000: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
7010: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76    const void *pv
7020: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
7030: 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d  umn_database_nam
7040: 65 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b  e16(stmt, iCol);
7050: 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70  ..  if (plen) *p
7060: 6c 65 6e 20 3d 20 70 76 61 6c 20 3f 20 77 63 73  len = pval ? wcs
7070: 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70  len((wchar_t *)p
7080: 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63  val) * sizeof(wc
7090: 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72  har_t) : 0;..  r
70a0: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a  eturn pval;..}..
70b0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e  ..SQLITE_API con
70c0: 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49  st char * WINAPI
70d0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
70e0: 74 61 62 6c 65 5f 6e 61 6d 65 5f 69 6e 74 65 72  table_name_inter
70f0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
7100: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
7110: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
7120: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76    const char *pv
7130: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
7140: 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 28 73  umn_table_name(s
7150: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69  tmt, iCol);..  i
7160: 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d  f (plen) *plen =
7170: 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70   pval ? strlen(p
7180: 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74  val) : 0;..  ret
7190: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a  urn pval;..}....
71a0: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74  SQLITE_API const
71b0: 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73   void * WINAPI s
71c0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61  qlite3_column_ta
71d0: 62 6c 65 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72  ble_name16_inter
71e0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
71f0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
7200: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
7210: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76    const void *pv
7220: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
7230: 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 31 36  umn_table_name16
7240: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20  (stmt, iCol);.. 
7250: 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e   if (plen) *plen
7260: 20 3d 20 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e   = pval ? wcslen
7270: 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c  ((wchar_t *)pval
7280: 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72  ) * sizeof(wchar
7290: 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75  _t) : 0;..  retu
72a0: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn pval;..}....S
72b0: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
72c0: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71  char * WINAPI sq
72d0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69  lite3_column_ori
72e0: 67 69 6e 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70  gin_name_interop
72f0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73  (sqlite3_stmt *s
7300: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69  tmt, int iCol, i
7310: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20  nt *plen)..{..  
7320: 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c  const char *pval
7330: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d   = sqlite3_colum
7340: 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 28 73 74  n_origin_name(st
7350: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66  mt, iCol);..  if
7360: 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20   (plen) *plen = 
7370: 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76  pval ? strlen(pv
7380: 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75  al) : 0;..  retu
7390: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn pval;..}....S
73a0: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
73b0: 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71  void * WINAPI sq
73c0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69  lite3_column_ori
73d0: 67 69 6e 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72  gin_name16_inter
73e0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
73f0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
7400: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
7410: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76    const void *pv
7420: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
7430: 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 31  umn_origin_name1
7440: 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a  6(stmt, iCol);..
7450: 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65    if (plen) *ple
7460: 6e 20 3d 20 70 76 61 6c 20 3f 20 77 63 73 6c 65  n = pval ? wcsle
7470: 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61  n((wchar_t *)pva
7480: 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61  l) * sizeof(wcha
7490: 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74  r_t) : 0;..  ret
74a0: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a  urn pval;..}....
74b0: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57  SQLITE_API int W
74c0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 74 61  INAPI sqlite3_ta
74d0: 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d 65 74 61 64  ble_column_metad
74e0: 61 74 61 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  ata_interop(sqli
74f0: 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63  te3 *db, const c
7500: 68 61 72 20 2a 7a 44 62 4e 61 6d 65 2c 20 63 6f  har *zDbName, co
7510: 6e 73 74 20 63 68 61 72 20 2a 7a 54 61 62 6c 65  nst char *zTable
7520: 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 72  Name, const char
7530: 20 2a 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 63   *zColumnName, c
7540: 68 61 72 20 63 6f 6e 73 74 20 2a 2a 70 7a 44 61  har const **pzDa
7550: 74 61 54 79 70 65 2c 20 63 68 61 72 20 63 6f 6e  taType, char con
7560: 73 74 20 2a 2a 70 7a 43 6f 6c 6c 53 65 71 2c 20  st **pzCollSeq, 
7570: 69 6e 74 20 2a 70 4e 6f 74 4e 75 6c 6c 2c 20 69  int *pNotNull, i
7580: 6e 74 20 2a 70 50 72 69 6d 61 72 79 4b 65 79 2c  nt *pPrimaryKey,
7590: 20 69 6e 74 20 2a 70 41 75 74 6f 69 6e 63 2c 20   int *pAutoinc, 
75a0: 69 6e 74 20 2a 70 64 74 4c 65 6e 2c 20 69 6e 74  int *pdtLen, int
75b0: 20 2a 70 63 73 4c 65 6e 29 0d 0a 7b 0d 0a 20 20   *pcsLen)..{..  
75c0: 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 6e 20 3d 20  int n;....  n = 
75d0: 73 71 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63 6f  sqlite3_table_co
75e0: 6c 75 6d 6e 5f 6d 65 74 61 64 61 74 61 28 64 62  lumn_metadata(db
75f0: 2c 20 7a 44 62 4e 61 6d 65 2c 20 7a 54 61 62 6c  , zDbName, zTabl
7600: 65 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d 6e 4e 61  eName, zColumnNa
7610: 6d 65 2c 20 70 7a 44 61 74 61 54 79 70 65 2c 20  me, pzDataType, 
7620: 70 7a 43 6f 6c 6c 53 65 71 2c 20 70 4e 6f 74 4e  pzCollSeq, pNotN
7630: 75 6c 6c 2c 20 70 50 72 69 6d 61 72 79 4b 65 79  ull, pPrimaryKey
7640: 2c 20 70 41 75 74 6f 69 6e 63 29 3b 0d 0a 0d 0a  , pAutoinc);....
7650: 20 20 69 66 20 28 70 64 74 4c 65 6e 29 20 2a 70    if (pdtLen) *p
7660: 64 74 4c 65 6e 20 3d 20 28 70 7a 44 61 74 61 54  dtLen = (pzDataT
7670: 79 70 65 20 26 26 20 2a 70 7a 44 61 74 61 54 79  ype && *pzDataTy
7680: 70 65 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a  pe) ? strlen(*pz
7690: 44 61 74 61 54 79 70 65 29 20 3a 20 30 3b 0d 0a  DataType) : 0;..
76a0: 20 20 69 66 20 28 70 63 73 4c 65 6e 29 20 2a 70    if (pcsLen) *p
76b0: 63 73 4c 65 6e 20 3d 20 28 70 7a 43 6f 6c 6c 53  csLen = (pzCollS
76c0: 65 71 20 26 26 20 2a 70 7a 43 6f 6c 6c 53 65 71  eq && *pzCollSeq
76d0: 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f  ) ? strlen(*pzCo
76e0: 6c 6c 53 65 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20  llSeq) : 0;.... 
76f0: 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d   return n;..}...
7700: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
7710: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 69  WINAPI sqlite3_i
7720: 6e 64 65 78 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f  ndex_column_info
7730: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
7740: 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72   *db, const char
7750: 20 2a 7a 44 62 2c 20 63 6f 6e 73 74 20 63 68 61   *zDb, const cha
7760: 72 20 2a 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 63  r *zIndexName, c
7770: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75  onst char *zColu
7780: 6d 6e 4e 61 6d 65 2c 20 69 6e 74 20 2a 73 6f 72  mnName, int *sor
7790: 74 4f 72 64 65 72 2c 20 69 6e 74 20 2a 6f 6e 45  tOrder, int *onE
77a0: 72 72 6f 72 2c 20 63 6f 6e 73 74 20 63 68 61 72  rror, const char
77b0: 20 2a 2a 70 7a 43 6f 6c 6c 2c 20 69 6e 74 20 2a   **pzColl, int *
77c0: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 49 6e 64 65  plen)..{..  Inde
77d0: 78 20 2a 70 49 64 78 3b 0d 0a 20 20 54 61 62 6c  x *pIdx;..  Tabl
77e0: 65 20 2a 70 54 61 62 3b 0d 0a 20 20 69 6e 74 20  e *pTab;..  int 
77f0: 6e 3b 0d 0a 0d 0a 20 20 69 66 20 28 21 64 62 29  n;....  if (!db)
7800: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45   return SQLITE_E
7810: 52 52 4f 52 3b 0d 0a 20 20 73 71 6c 69 74 65 33  RROR;..  sqlite3
7820: 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d  _mutex_enter(db-
7830: 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 73 71 6c 69  >mutex);..  sqli
7840: 74 65 33 42 74 72 65 65 45 6e 74 65 72 41 6c 6c  te3BtreeEnterAll
7850: 28 64 62 29 3b 0d 0a 0d 0a 20 20 70 49 64 78 20  (db);....  pIdx 
7860: 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 49 6e 64  = sqlite3FindInd
7870: 65 78 28 64 62 2c 20 7a 49 6e 64 65 78 4e 61 6d  ex(db, zIndexNam
7880: 65 2c 20 7a 44 62 29 3b 0d 0a 0d 0a 20 20 73 71  e, zDb);....  sq
7890: 6c 69 74 65 33 42 74 72 65 65 4c 65 61 76 65 41  lite3BtreeLeaveA
78a0: 6c 6c 28 64 62 29 3b 0d 0a 20 20 73 71 6c 69 74  ll(db);..  sqlit
78b0: 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64  e3_mutex_leave(d
78c0: 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20  b->mutex);....  
78d0: 69 66 20 28 21 70 49 64 78 29 20 72 65 74 75 72  if (!pIdx) retur
78e0: 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d  n SQLITE_ERROR;.
78f0: 0a 0d 0a 20 20 70 54 61 62 20 3d 20 70 49 64 78  ...  pTab = pIdx
7900: 2d 3e 70 54 61 62 6c 65 3b 0d 0a 20 20 66 6f 72  ->pTable;..  for
7910: 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 70 49 64   (n = 0; n < pId
7920: 78 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20 6e 2b 2b 29  x->nColumn; n++)
7930: 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 6e 74 20 63  ..  {..    int c
7940: 6e 75 6d 20 3d 20 70 49 64 78 2d 3e 61 69 43 6f  num = pIdx->aiCo
7950: 6c 75 6d 6e 5b 6e 5d 3b 0d 0a 20 20 20 20 69 66  lumn[n];..    if
7960: 20 28 73 71 6c 69 74 65 33 53 74 72 49 43 6d 70   (sqlite3StrICmp
7970: 28 70 54 61 62 2d 3e 61 43 6f 6c 5b 63 6e 75 6d  (pTab->aCol[cnum
7980: 5d 2e 7a 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d 6e  ].zName, zColumn
7990: 4e 61 6d 65 29 20 3d 3d 20 30 29 0d 0a 20 20 20  Name) == 0)..   
79a0: 20 7b 0d 0a 20 20 20 20 20 20 69 66 20 28 20 73   {..      if ( s
79b0: 6f 72 74 4f 72 64 65 72 20 29 20 2a 73 6f 72 74  ortOrder ) *sort
79c0: 4f 72 64 65 72 20 3d 20 70 49 64 78 2d 3e 61 53  Order = pIdx->aS
79d0: 6f 72 74 4f 72 64 65 72 5b 6e 5d 3b 0d 0a 20 20  ortOrder[n];..  
79e0: 20 20 20 20 69 66 20 28 20 70 7a 43 6f 6c 6c 20      if ( pzColl 
79f0: 29 20 2a 70 7a 43 6f 6c 6c 20 3d 20 70 49 64 78  ) *pzColl = pIdx
7a00: 2d 3e 61 7a 43 6f 6c 6c 5b 6e 5d 3b 0d 0a 20 20  ->azColl[n];..  
7a10: 20 20 20 20 69 66 20 28 20 70 6c 65 6e 20 29 20      if ( plen ) 
7a20: 2a 70 6c 65 6e 20 3d 20 73 74 72 6c 65 6e 28 2a  *plen = strlen(*
7a30: 70 7a 43 6f 6c 6c 29 3b 0d 0a 20 20 20 20 20 20  pzColl);..      
7a40: 69 66 20 28 20 6f 6e 45 72 72 6f 72 20 29 20 2a  if ( onError ) *
7a50: 6f 6e 45 72 72 6f 72 20 3d 20 70 49 64 78 2d 3e  onError = pIdx->
7a60: 6f 6e 45 72 72 6f 72 3b 0d 0a 0d 0a 20 20 20 20  onError;....    
7a70: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
7a80: 4f 4b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d  OK;..    }..  }.
7a90: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  .  return SQLITE
7aa0: 5f 45 52 52 4f 52 3b 0d 0a 7d 0d 0a 0d 0a 53 51  _ERROR;..}....SQ
7ab0: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e  LITE_API int WIN
7ac0: 41 50 49 20 73 71 6c 69 74 65 33 5f 74 61 62 6c  API sqlite3_tabl
7ad0: 65 5f 63 75 72 73 6f 72 5f 69 6e 74 65 72 6f 70  e_cursor_interop
7ae0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70  (sqlite3_stmt *p
7af0: 73 74 6d 74 2c 20 69 6e 74 20 69 44 62 2c 20 50  stmt, int iDb, P
7b00: 67 6e 6f 20 74 61 62 6c 65 52 6f 6f 74 50 61 67  gno tableRootPag
7b10: 65 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20 2a 70  e)..{..  Vdbe *p
7b20: 20 3d 20 28 56 64 62 65 20 2a 29 70 73 74 6d 74   = (Vdbe *)pstmt
7b30: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62  ;..  sqlite3 *db
7b40: 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29 20 3f   = (p == NULL) ?
7b50: 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b 0d 0a   NULL : p->db;..
7b60: 20 20 69 6e 74 20 6e 3b 0d 0a 20 20 69 6e 74 20    int n;..  int 
7b70: 72 65 74 20 3d 20 2d 31 3b 20 2f 2a 20 4e 4f 54  ret = -1; /* NOT
7b80: 20 46 4f 55 4e 44 20 2a 2f 0d 0a 0d 0a 20 20 69   FOUND */....  i
7b90: 66 20 28 21 70 20 7c 7c 20 21 64 62 29 20 72 65  f (!p || !db) re
7ba0: 74 75 72 6e 20 72 65 74 3b 0d 0a 20 20 73 71 6c  turn ret;..  sql
7bb0: 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72  ite3_mutex_enter
7bc0: 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20  (db->mutex);..  
7bd0: 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20  for (n = 0; n < 
7be0: 70 2d 3e 6e 43 75 72 73 6f 72 20 26 26 20 70 2d  p->nCursor && p-
7bf0: 3e 61 70 43 73 72 5b 6e 5d 20 21 3d 20 4e 55 4c  >apCsr[n] != NUL
7c00: 4c 3b 20 6e 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 20  L; n++)..  {..  
7c10: 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e    if (p->apCsr[n
7c20: 5d 2d 3e 69 73 54 61 62 6c 65 20 3d 3d 20 30 29  ]->isTable == 0)
7c30: 20 63 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 20   continue;..    
7c40: 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d  if (p->apCsr[n]-
7c50: 3e 69 44 62 20 21 3d 20 69 44 62 29 20 63 6f 6e  >iDb != iDb) con
7c60: 74 69 6e 75 65 3b 0d 0a 23 69 66 20 53 51 4c 49  tinue;..#if SQLI
7c70: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45  TE_VERSION_NUMBE
7c80: 52 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a 20 20  R >= 3010000..  
7c90: 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e    if (p->apCsr[n
7ca0: 5d 2d 3e 75 63 2e 70 43 75 72 73 6f 72 2d 3e 70  ]->uc.pCursor->p
7cb0: 67 6e 6f 52 6f 6f 74 20 3d 3d 20 74 61 62 6c 65  gnoRoot == table
7cc0: 52 6f 6f 74 50 61 67 65 29 0d 0a 23 65 6c 73 65  RootPage)..#else
7cd0: 0d 0a 20 20 20 20 69 66 20 28 70 2d 3e 61 70 43  ..    if (p->apC
7ce0: 73 72 5b 6e 5d 2d 3e 70 43 75 72 73 6f 72 2d 3e  sr[n]->pCursor->
7cf0: 70 67 6e 6f 52 6f 6f 74 20 3d 3d 20 74 61 62 6c  pgnoRoot == tabl
7d00: 65 52 6f 6f 74 50 61 67 65 29 0d 0a 23 65 6e 64  eRootPage)..#end
7d10: 69 66 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20  if..    {..     
7d20: 20 72 65 74 20 3d 20 6e 3b 0d 0a 20 20 20 20 20   ret = n;..     
7d30: 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a   break;..    }..
7d40: 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d    }..  sqlite3_m
7d50: 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d  utex_leave(db->m
7d60: 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 72 65 74 75  utex);....  retu
7d70: 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51  rn ret;..}....SQ
7d80: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e  LITE_API int WIN
7d90: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 75 72 73  API sqlite3_curs
7da0: 6f 72 5f 72 6f 77 69 64 5f 69 6e 74 65 72 6f 70  or_rowid_interop
7db0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70  (sqlite3_stmt *p
7dc0: 73 74 6d 74 2c 20 69 6e 74 20 63 75 72 73 6f 72  stmt, int cursor
7dd0: 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a  , sqlite_int64 *
7de0: 70 72 6f 77 69 64 29 0d 0a 7b 0d 0a 20 20 56 64  prowid)..{..  Vd
7df0: 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 2a 29  be *p = (Vdbe *)
7e00: 70 73 74 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65  pstmt;..  sqlite
7e10: 33 20 2a 64 62 20 3d 20 28 70 20 3d 3d 20 4e 55  3 *db = (p == NU
7e20: 4c 4c 29 20 3f 20 4e 55 4c 4c 20 3a 20 70 2d 3e  LL) ? NULL : p->
7e30: 64 62 3b 0d 0a 20 20 56 64 62 65 43 75 72 73 6f  db;..  VdbeCurso
7e40: 72 20 2a 70 43 3b 0d 0a 23 69 66 20 53 51 4c 49  r *pC;..#if SQLI
7e50: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45  TE_VERSION_NUMBE
7e60: 52 20 3e 3d 20 33 30 31 31 30 30 30 0d 0a 20 20  R >= 3011000..  
7e70: 69 6e 74 20 70 32 20 3d 20 30 3b 0d 0a 23 65 6e  int p2 = 0;..#en
7e80: 64 69 66 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d  dif..  int ret =
7e90: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20   SQLITE_OK;.... 
7ea0: 20 69 66 20 28 21 70 20 7c 7c 20 21 64 62 29 20   if (!p || !db) 
7eb0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52  return SQLITE_ER
7ec0: 52 4f 52 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f  ROR;..  sqlite3_
7ed0: 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e  mutex_enter(db->
7ee0: 6d 75 74 65 78 29 3b 0d 0a 20 20 77 68 69 6c 65  mutex);..  while
7ef0: 20 28 31 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69   (1)..  {..    i
7f00: 66 20 28 63 75 72 73 6f 72 20 3c 20 30 20 7c 7c  f (cursor < 0 ||
7f10: 20 63 75 72 73 6f 72 20 3e 3d 20 70 2d 3e 6e 43   cursor >= p->nC
7f20: 75 72 73 6f 72 29 0d 0a 20 20 20 20 7b 0d 0a 20  ursor)..    {.. 
7f30: 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54       ret = SQLIT
7f40: 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20  E_ERROR;..      
7f50: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20  break;..    }.. 
7f60: 20 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b     if (p->apCsr[
7f70: 63 75 72 73 6f 72 5d 20 3d 3d 20 4e 55 4c 4c 29  cursor] == NULL)
7f80: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72  ..    {..      r
7f90: 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f  et = SQLITE_ERRO
7fa0: 52 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  R;..      break;
7fb0: 0d 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 70  ..    }....    p
7fc0: 43 20 3d 20 70 2d 3e 61 70 43 73 72 5b 63 75 72  C = p->apCsr[cur
7fd0: 73 6f 72 5d 3b 0d 0a 0d 0a 23 69 66 20 53 51 4c  sor];....#if SQL
7fe0: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42  ITE_VERSION_NUMB
7ff0: 45 52 20 3e 3d 20 33 30 31 31 30 30 30 0d 0a 20  ER >= 3011000.. 
8000: 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33     ret = sqlite3
8010: 56 64 62 65 43 75 72 73 6f 72 4d 6f 76 65 74 6f  VdbeCursorMoveto
8020: 28 26 70 43 2c 20 26 70 32 29 3b 0d 0a 23 65 6c  (&pC, &p2);..#el
8030: 73 65 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71  se..    ret = sq
8040: 6c 69 74 65 33 56 64 62 65 43 75 72 73 6f 72 4d  lite3VdbeCursorM
8050: 6f 76 65 74 6f 28 70 43 29 3b 0d 0a 23 65 6e 64  oveto(pC);..#end
8060: 69 66 0d 0a 20 20 20 20 69 66 28 72 65 74 29 0d  if..    if(ret).
8070: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 0d  .      break;...
8080: 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53  .#if SQLITE_VERS
8090: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 30 30  ION_NUMBER < 300
80a0: 38 30 30 37 0d 0a 20 20 20 20 69 66 28 70 43 2d  8007..    if(pC-
80b0: 3e 72 6f 77 69 64 49 73 56 61 6c 69 64 29 0d 0a  >rowidIsValid)..
80c0: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 69 66 20      {..      if 
80d0: 28 70 72 6f 77 69 64 29 20 2a 70 72 6f 77 69 64  (prowid) *prowid
80e0: 20 3d 20 70 43 2d 3e 6c 61 73 74 52 6f 77 69 64   = pC->lastRowid
80f0: 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c  ;..    }..    el
8100: 73 65 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 20  se..#endif..#if 
8110: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e  SQLITE_VERSION_N
8120: 55 4d 42 45 52 20 3e 3d 20 33 30 31 30 30 30 30  UMBER >= 3010000
8130: 0d 0a 20 20 20 20 69 66 28 70 43 2d 3e 65 43 75  ..    if(pC->eCu
8140: 72 54 79 70 65 20 21 3d 20 43 55 52 54 59 50 45  rType != CURTYPE
8150: 5f 42 54 52 45 45 29 0d 0a 23 65 6c 73 65 0d 0a  _BTREE)..#else..
8160: 20 20 20 20 69 66 28 70 43 2d 3e 70 73 65 75 64      if(pC->pseud
8170: 6f 54 61 62 6c 65 52 65 67 20 3e 20 30 29 0d 0a  oTableReg > 0)..
8180: 23 65 6e 64 69 66 0d 0a 20 20 20 20 7b 0d 0a 20  #endif..    {.. 
8190: 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54       ret = SQLIT
81a0: 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20  E_ERROR;..      
81b0: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 23  break;..    }..#
81c0: 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f  if SQLITE_VERSIO
81d0: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 31 30  N_NUMBER >= 3010
81e0: 30 30 30 0d 0a 20 20 20 20 65 6c 73 65 20 69 66  000..    else if
81f0: 28 70 43 2d 3e 6e 75 6c 6c 52 6f 77 20 7c 7c 20  (pC->nullRow || 
8200: 70 43 2d 3e 75 63 2e 70 43 75 72 73 6f 72 3d 3d  pC->uc.pCursor==
8210: 30 29 0d 0a 23 65 6c 73 65 0d 0a 20 20 20 20 65  0)..#else..    e
8220: 6c 73 65 20 69 66 28 70 43 2d 3e 6e 75 6c 6c 52  lse if(pC->nullR
8230: 6f 77 20 7c 7c 20 70 43 2d 3e 70 43 75 72 73 6f  ow || pC->pCurso
8240: 72 3d 3d 30 29 0d 0a 23 65 6e 64 69 66 0d 0a 20  r==0)..#endif.. 
8250: 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 20     {..      ret 
8260: 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d  = SQLITE_ERROR;.
8270: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20  .      break;.. 
8280: 20 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d 0a     }..    else..
8290: 20 20 20 20 7b 0d 0a 23 69 66 20 53 51 4c 49 54      {..#if SQLIT
82a0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
82b0: 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a 20 20 20   >= 3010000..   
82c0: 20 20 20 69 66 20 28 70 43 2d 3e 75 63 2e 70 43     if (pC->uc.pC
82d0: 75 72 73 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d 0a  ursor == NULL)..
82e0: 23 65 6c 73 65 0d 0a 20 20 20 20 20 20 69 66 20  #else..      if 
82f0: 28 70 43 2d 3e 70 43 75 72 73 6f 72 20 3d 3d 20  (pC->pCursor == 
8300: 4e 55 4c 4c 29 0d 0a 23 65 6e 64 69 66 0d 0a 20  NULL)..#endif.. 
8310: 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20       {..        
8320: 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52  ret = SQLITE_ERR
8330: 4f 52 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 65  OR;..        bre
8340: 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 23 69  ak;..      }..#i
8350: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e  f SQLITE_VERSION
8360: 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 31 34 30  _NUMBER >= 30140
8370: 30 30 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65  00..      sqlite
8380: 33 42 74 72 65 65 45 6e 74 65 72 43 75 72 73 6f  3BtreeEnterCurso
8390: 72 28 70 43 2d 3e 75 63 2e 70 43 75 72 73 6f 72  r(pC->uc.pCursor
83a0: 29 3b 0d 0a 20 20 20 20 20 20 2a 70 72 6f 77 69  );..      *prowi
83b0: 64 20 3d 20 73 71 6c 69 74 65 33 42 74 72 65 65  d = sqlite3Btree
83c0: 49 6e 74 65 67 65 72 4b 65 79 28 70 43 2d 3e 75  IntegerKey(pC->u
83d0: 63 2e 70 43 75 72 73 6f 72 29 3b 0d 0a 20 20 20  c.pCursor);..   
83e0: 20 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 4c     sqlite3BtreeL
83f0: 65 61 76 65 43 75 72 73 6f 72 28 70 43 2d 3e 75  eaveCursor(pC->u
8400: 63 2e 70 43 75 72 73 6f 72 29 3b 0d 0a 23 65 6c  c.pCursor);..#el
8410: 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f  if SQLITE_VERSIO
8420: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 31 30  N_NUMBER >= 3010
8430: 30 30 30 0d 0a 20 20 20 20 20 20 73 71 6c 69 74  000..      sqlit
8440: 65 33 42 74 72 65 65 4b 65 79 53 69 7a 65 28 70  e3BtreeKeySize(p
8450: 43 2d 3e 75 63 2e 70 43 75 72 73 6f 72 2c 20 70  C->uc.pCursor, p
8460: 72 6f 77 69 64 29 3b 0d 0a 23 65 6c 73 65 0d 0a  rowid);..#else..
8470: 20 20 20 20 20 20 73 71 6c 69 74 65 33 42 74 72        sqlite3Btr
8480: 65 65 4b 65 79 53 69 7a 65 28 70 43 2d 3e 70 43  eeKeySize(pC->pC
8490: 75 72 73 6f 72 2c 20 70 72 6f 77 69 64 29 3b 0d  ursor, prowid);.
84a0: 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 20 20 69  .#endif..      i
84b0: 66 20 28 70 72 6f 77 69 64 29 20 2a 70 72 6f 77  f (prowid) *prow
84c0: 69 64 20 3d 20 2a 70 72 6f 77 69 64 3b 0d 0a 20  id = *prowid;.. 
84d0: 20 20 20 7d 0d 0a 20 20 20 20 62 72 65 61 6b 3b     }..    break;
84e0: 0d 0a 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33  ..  }..  sqlite3
84f0: 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d  _mutex_leave(db-
8500: 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 72 65  >mutex);....  re
8510: 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a  turn ret;..}....
8520: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  /***************
8530: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8540: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8550: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8560: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2f 0d  **************/.
8570: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 53  ...#if defined(S
8580: 51 4c 49 54 45 5f 43 4f 52 45 29 0d 0a 23 75 6e  QLITE_CORE)..#un
8590: 64 65 66 20 53 51 4c 49 54 45 5f 43 4f 52 45 0d  def SQLITE_CORE.
85a0: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64  .#endif....#if d
85b0: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 56  efined(INTEROP_V
85c0: 49 52 54 55 41 4c 5f 54 41 42 4c 45 29 20 26 26  IRTUAL_TABLE) &&
85d0: 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f   SQLITE_VERSION_
85e0: 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 34 30 30  NUMBER >= 300400
85f0: 31 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f  1..#include "../
8600: 65 78 74 2f 76 74 73 68 69 6d 2e 63 22 0d 0a 23  ext/vtshim.c"..#
8610: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66  endif....#if def
8620: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 46 54 53  ined(INTEROP_FTS
8630: 35 5f 45 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69  5_EXTENSION)..#i
8640: 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 66  nclude "../ext/f
8650: 74 73 35 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a  ts5.c"..#endif..
8660: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
8670: 54 45 52 4f 50 5f 4a 53 4f 4e 31 5f 45 58 54 45  TEROP_JSON1_EXTE
8680: 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 65  NSION)..#include
8690: 20 22 2e 2e 2f 65 78 74 2f 6a 73 6f 6e 31 2e 63   "../ext/json1.c
86a0: 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66  "..#endif....#if
86b0: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50   defined(INTEROP
86c0: 5f 50 45 52 43 45 4e 54 49 4c 45 5f 45 58 54 45  _PERCENTILE_EXTE
86d0: 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 65  NSION)..#include
86e0: 20 22 2e 2e 2f 65 78 74 2f 70 65 72 63 65 6e 74   "../ext/percent
86f0: 69 6c 65 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a  ile.c"..#endif..
8700: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
8710: 54 45 52 4f 50 5f 52 45 47 45 58 50 5f 45 58 54  TEROP_REGEXP_EXT
8720: 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64  ENSION)..#includ
8730: 65 20 22 2e 2e 2f 65 78 74 2f 72 65 67 65 78 70  e "../ext/regexp
8740: 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23  .c"..#endif....#
8750: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
8760: 4f 50 5f 53 48 41 31 5f 45 58 54 45 4e 53 49 4f  OP_SHA1_EXTENSIO
8770: 4e 29 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e  N)..#include "..
8780: 2f 65 78 74 2f 73 68 61 31 2e 63 22 0d 0a 23 65  /ext/sha1.c"..#e
8790: 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69  ndif....#if defi
87a0: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 54 4f 54 59  ned(INTEROP_TOTY
87b0: 50 45 5f 45 58 54 45 4e 53 49 4f 4e 29 0d 0a 23  PE_EXTENSION)..#
87c0: 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f  include "../ext/
87d0: 74 6f 74 79 70 65 2e 63 22 0d 0a 23 65 6e 64 69  totype.c"..#endi
87e0: 66 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  f..../**********
87f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8800: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8810: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8820: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8830: 2a 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54  ***/..../*..** T
8840: 68 65 20 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f  he INTEROP_TEST_
8850: 45 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63 6b 20  EXTENSION block 
8860: 6d 75 73 74 20 62 65 20 61 74 20 74 68 65 20 65  must be at the e
8870: 6e 64 20 6f 66 20 74 68 69 73 20 73 6f 75 72 63  nd of this sourc
8880: 65 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63 61 75  e file..** becau
8890: 73 65 20 69 74 20 69 6e 63 6c 75 64 65 73 20 74  se it includes t
88a0: 68 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e 68  he "sqlite3ext.h
88b0: 22 20 66 69 6c 65 2c 20 77 68 69 63 68 20 64 65  " file, which de
88c0: 66 69 6e 65 73 20 74 68 65 20 73 71 6c 69 74 65  fines the sqlite
88d0: 33 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41 50 49  3..** public API
88e0: 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 20   function names 
88f0: 74 6f 20 62 65 20 6d 61 63 72 6f 73 20 61 6e 64  to be macros and
8900: 20 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75 73   that would caus
8910: 65 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a 20 61  e the code..** a
8920: 62 6f 76 65 20 74 68 69 73 20 70 6f 69 6e 74 20  bove this point 
8930: 74 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e 2e 0d  to malfunction..
8940: 0a 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  .*/..#if defined
8950: 28 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45 58  (INTEROP_TEST_EX
8960: 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 66 20 21 53  TENSION)..#if !S
8970: 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 0d 0a 23 69  QLITE_OS_WIN..#i
8980: 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68  nclude <unistd.h
8990: 3e 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 6e  >..#endif....#in
89a0: 63 6c 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f 73  clude "../core/s
89b0: 71 6c 69 74 65 33 65 78 74 2e 68 22 0d 0a 53 51  qlite3ext.h"..SQ
89c0: 4c 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49  LITE_EXTENSION_I
89d0: 4e 49 54 31 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54  NIT1..../*..** T
89e0: 68 65 20 69 6e 74 65 72 6f 70 45 72 72 6f 72 28  he interopError(
89f0: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 74  ) SQL function t
8a00: 72 65 61 74 73 20 69 74 73 20 66 69 72 73 74 20  reats its first 
8a10: 61 72 67 75 6d 65 6e 74 20 61 73 20 61 6e 20 69  argument as an i
8a20: 6e 74 65 67 65 72 0d 0a 2a 2a 20 65 72 72 6f 72  nteger..** error
8a30: 20 63 6f 64 65 20 74 6f 20 72 65 74 75 72 6e 2e   code to return.
8a40: 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 50 52 49  ..*/..SQLITE_PRI
8a50: 56 41 54 45 20 76 6f 69 64 20 69 6e 74 65 72 6f  VATE void intero
8a60: 70 45 72 72 6f 72 46 75 6e 63 28 0d 0a 20 20 73  pErrorFunc(..  s
8a70: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
8a80: 63 6f 6e 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20  context,..  int 
8a90: 61 72 67 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33  argc,..  sqlite3
8aa0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29  _value **argv..)
8ab0: 7b 0d 0a 20 20 69 6e 74 20 72 63 3b 0d 0a 20 20  {..  int rc;..  
8ac0: 69 66 28 20 61 72 67 63 21 3d 31 20 29 7b 0d 0a  if( argc!=1 ){..
8ad0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
8ae0: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
8af0: 2c 20 22 6e 65 65 64 20 65 78 61 63 74 6c 79 20  , "need exactly 
8b00: 6f 6e 65 20 61 72 67 75 6d 65 6e 74 22 2c 20 2d  one argument", -
8b10: 31 29 3b 0d 0a 20 20 20 20 72 65 74 75 72 6e 3b  1);..    return;
8b20: 0d 0a 20 20 7d 0d 0a 20 20 72 63 20 3d 20 73 71  ..  }..  rc = sq
8b30: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28  lite3_value_int(
8b40: 61 72 67 76 5b 30 5d 29 3b 0d 0a 20 20 73 71 6c  argv[0]);..  sql
8b50: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
8b60: 72 5f 63 6f 64 65 28 63 6f 6e 74 65 78 74 2c 20  r_code(context, 
8b70: 72 63 29 3b 0d 0a 7d 0d 0a 0d 0a 2f 2a 0d 0a 2a  rc);..}..../*..*
8b80: 2a 20 54 68 65 20 69 6e 74 65 72 6f 70 54 65 73  * The interopTes
8b90: 74 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  t() SQL function
8ba0: 20 72 65 74 75 72 6e 73 20 69 74 73 20 66 69 72   returns its fir
8bb0: 73 74 20 61 72 67 75 6d 65 6e 74 20 6f 72 20 72  st argument or r
8bc0: 61 69 73 65 73 20 61 6e 0d 0a 2a 2a 20 65 72 72  aises an..** err
8bd0: 6f 72 20 69 66 20 74 68 65 72 65 20 61 72 65 20  or if there are 
8be0: 6e 6f 74 20 65 6e 6f 75 67 68 20 61 72 67 75 6d  not enough argum
8bf0: 65 6e 74 73 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 54  ents...*/..SQLIT
8c00: 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 69  E_PRIVATE void i
8c10: 6e 74 65 72 6f 70 54 65 73 74 46 75 6e 63 28 0d  nteropTestFunc(.
8c20: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
8c30: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0d 0a 20 20  xt *context,..  
8c40: 69 6e 74 20 61 72 67 63 2c 0d 0a 20 20 73 71 6c  int argc,..  sql
8c50: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
8c60: 76 0d 0a 29 7b 0d 0a 20 20 63 6f 6e 73 74 20 75  v..){..  const u
8c70: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b  nsigned char *z;
8c80: 0d 0a 20 20 69 66 28 20 61 72 67 63 21 3d 31 20  ..  if( argc!=1 
8c90: 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f  ){..    sqlite3_
8ca0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
8cb0: 74 65 78 74 2c 20 22 6e 65 65 64 20 65 78 61 63  text, "need exac
8cc0: 74 6c 79 20 6f 6e 65 20 61 72 67 75 6d 65 6e 74  tly one argument
8cd0: 22 2c 20 2d 31 29 3b 0d 0a 20 20 20 20 72 65 74  ", -1);..    ret
8ce0: 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20 20 7a 20 3d  urn;..  }..  z =
8cf0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
8d00: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0d 0a 20  ext(argv[0]);.. 
8d10: 20 69 66 28 20 7a 20 29 7b 0d 0a 20 20 20 20 73   if( z ){..    s
8d20: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
8d30: 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61  xt(context, (cha
8d40: 72 2a 29 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 45  r*)z, -1, SQLITE
8d50: 5f 53 54 41 54 49 43 29 3b 0d 0a 20 20 7d 65 6c  _STATIC);..  }el
8d60: 73 65 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33  se{..    sqlite3
8d70: 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e  _result_null(con
8d80: 74 65 78 74 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d 0a  text);..  }..}..
8d90: 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 65 20 69 6e 74  ../*..** The int
8da0: 65 72 6f 70 53 6c 65 65 70 28 29 20 53 51 4c 20  eropSleep() SQL 
8db0: 66 75 6e 63 74 69 6f 6e 20 77 61 69 74 73 20 74  function waits t
8dc0: 68 65 20 73 70 65 63 69 66 69 65 64 20 6e 75 6d  he specified num
8dd0: 62 65 72 20 6f 66 20 6d 69 6c 6c 69 73 65 63 6f  ber of milliseco
8de0: 6e 64 73 0d 0a 2a 2a 20 6f 72 20 72 61 69 73 65  nds..** or raise
8df0: 73 20 61 6e 20 65 72 72 6f 72 20 69 66 20 74 68  s an error if th
8e00: 65 72 65 20 61 72 65 20 6e 6f 74 20 65 6e 6f 75  ere are not enou
8e10: 67 68 20 61 72 67 75 6d 65 6e 74 73 2e 0d 0a 2a  gh arguments...*
8e20: 2f 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54  /..SQLITE_PRIVAT
8e30: 45 20 76 6f 69 64 20 69 6e 74 65 72 6f 70 53 6c  E void interopSl
8e40: 65 65 70 46 75 6e 63 28 0d 0a 20 20 73 71 6c 69  eepFunc(..  sqli
8e50: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
8e60: 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20 61 72 67  text,..  int arg
8e70: 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  c,..  sqlite3_va
8e80: 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29 7b 0d 0a  lue **argv..){..
8e90: 20 20 69 6e 74 20 6d 3b 0d 0a 20 20 69 66 28 20    int m;..  if( 
8ea0: 61 72 67 63 21 3d 31 20 29 7b 0d 0a 20 20 20 20  argc!=1 ){..    
8eb0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
8ec0: 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 6e  rror(context, "n
8ed0: 65 65 64 20 65 78 61 63 74 6c 79 20 6f 6e 65 20  eed exactly one 
8ee0: 61 72 67 75 6d 65 6e 74 22 2c 20 2d 31 29 3b 0d  argument", -1);.
8ef0: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0d 0a 20 20  .    return;..  
8f00: 7d 0d 0a 20 20 6d 20 3d 20 73 71 6c 69 74 65 33  }..  m = sqlite3
8f10: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
8f20: 30 5d 29 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45  0]);..#if SQLITE
8f30: 5f 4f 53 5f 57 49 4e 0d 0a 23 69 66 20 53 51 4c  _OS_WIN..#if SQL
8f40: 49 54 45 5f 4f 53 5f 57 49 4e 43 45 0d 0a 20 20  ITE_OS_WINCE..  
8f50: 53 6c 65 65 70 28 6d 29 3b 0d 0a 20 20 73 71 6c  Sleep(m);..  sql
8f60: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28  ite3_result_int(
8f70: 63 6f 6e 74 65 78 74 2c 20 57 41 49 54 5f 4f 42  context, WAIT_OB
8f80: 4a 45 43 54 5f 30 29 3b 0d 0a 23 65 6c 73 65 0d  JECT_0);..#else.
8f90: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
8fa0: 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 53  t_int(context, S
8fb0: 6c 65 65 70 45 78 28 6d 2c 20 54 52 55 45 29 29  leepEx(m, TRUE))
8fc0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 23 65 6c 73 65  ;..#endif..#else
8fd0: 0d 0a 20 20 69 66 28 20 6d 3e 30 20 29 7b 0d 0a  ..  if( m>0 ){..
8fe0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
8ff0: 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74  lt_int64(context
9000: 2c 20 73 6c 65 65 70 28 28 75 6e 73 69 67 6e 65  , sleep((unsigne
9010: 64 29 6d 29 29 3b 0d 0a 20 20 7d 65 6c 73 65 7b  d)m));..  }else{
9020: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  ..    sqlite3_re
9030: 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78  sult_null(contex
9040: 74 29 3b 0d 0a 20 20 7d 0d 0a 23 65 6e 64 69 66  t);..  }..#endif
9050: 0d 0a 7d 0d 0a 0d 0a 2f 2a 20 53 51 4c 69 74 65  ..}..../* SQLite
9060: 20 69 6e 76 6f 6b 65 73 20 74 68 69 73 20 72 6f   invokes this ro
9070: 75 74 69 6e 65 20 6f 6e 63 65 20 77 68 65 6e 20  utine once when 
9080: 69 74 20 6c 6f 61 64 73 20 74 68 65 20 65 78 74  it loads the ext
9090: 65 6e 73 69 6f 6e 2e 0d 0a 2a 2a 20 43 72 65 61  ension...** Crea
90a0: 74 65 20 6e 65 77 20 66 75 6e 63 74 69 6f 6e 73  te new functions
90b0: 2c 20 63 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75  , collating sequ
90c0: 65 6e 63 65 73 2c 20 61 6e 64 20 76 69 72 74 75  ences, and virtu
90d0: 61 6c 20 74 61 62 6c 65 0d 0a 2a 2a 20 6d 6f 64  al table..** mod
90e0: 75 6c 65 73 20 68 65 72 65 2e 20 20 54 68 69 73  ules here.  This
90f0: 20 69 73 20 75 73 75 61 6c 6c 79 20 74 68 65 20   is usually the 
9100: 6f 6e 6c 79 20 65 78 70 6f 72 74 65 64 20 73 79  only exported sy
9110: 6d 62 6f 6c 20 69 6e 0d 0a 2a 2a 20 74 68 65 20  mbol in..** the 
9120: 73 68 61 72 65 64 20 6c 69 62 72 61 72 79 2e 0d  shared library..
9130: 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  .*/..SQLITE_API 
9140: 69 6e 74 20 69 6e 74 65 72 6f 70 5f 74 65 73 74  int interop_test
9150: 5f 65 78 74 65 6e 73 69 6f 6e 5f 69 6e 69 74 28  _extension_init(
9160: 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c  ..  sqlite3 *db,
9170: 0d 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 72  ..  char **pzErr
9180: 4d 73 67 2c 0d 0a 20 20 63 6f 6e 73 74 20 73 71  Msg,..  const sq
9190: 6c 69 74 65 33 5f 61 70 69 5f 72 6f 75 74 69 6e  lite3_api_routin
91a0: 65 73 20 2a 70 41 70 69 0d 0a 29 7b 0d 0a 20 20  es *pApi..){..  
91b0: 69 6e 74 20 72 63 3b 0d 0a 20 20 53 51 4c 49 54  int rc;..  SQLIT
91c0: 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49 54  E_EXTENSION_INIT
91d0: 32 28 70 41 70 69 29 0d 0a 20 20 72 63 20 3d 20  2(pApi)..  rc = 
91e0: 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66  sqlite3_create_f
91f0: 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e 74  unction(db, "int
9200: 65 72 6f 70 45 72 72 6f 72 22 2c 20 2d 31 2c 20  eropError", -1, 
9210: 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a  SQLITE_ANY, 0,..
9220: 20 20 20 20 20 20 69 6e 74 65 72 6f 70 45 72 72        interopErr
9230: 6f 72 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d 0a  orFunc, 0, 0);..
9240: 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45    if( rc==SQLITE
9250: 5f 4f 4b 20 29 7b 0d 0a 20 20 20 20 72 63 20 3d  _OK ){..    rc =
9260: 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f   sqlite3_create_
9270: 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e  function(db, "in
9280: 74 65 72 6f 70 54 65 73 74 22 2c 20 2d 31 2c 20  teropTest", -1, 
9290: 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a  SQLITE_ANY, 0,..
92a0: 20 20 20 20 20 20 20 20 69 6e 74 65 72 6f 70 54          interopT
92b0: 65 73 74 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d  estFunc, 0, 0);.
92c0: 0a 20 20 7d 0d 0a 20 20 69 66 28 20 72 63 3d 3d  .  }..  if( rc==
92d0: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a 20 20  SQLITE_OK ){..  
92e0: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 63    rc = sqlite3_c
92f0: 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64  reate_function(d
9300: 62 2c 20 22 69 6e 74 65 72 6f 70 53 6c 65 65 70  b, "interopSleep
9310: 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f 41 4e 59  ", 1, SQLITE_ANY
9320: 2c 20 30 2c 0d 0a 20 20 20 20 20 20 20 20 69 6e  , 0,..        in
9330: 74 65 72 6f 70 53 6c 65 65 70 46 75 6e 63 2c 20  teropSleepFunc, 
9340: 30 2c 20 30 29 3b 0d 0a 20 20 7d 0d 0a 20 20 72  0, 0);..  }..  r
9350: 65 74 75 72 6e 20 72 63 3b 0d 0a 7d 0d 0a 23 65  eturn rc;..}..#e
9360: 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f  ndif /* SQLITE_O
9370: 53 5f 57 49 4e 20 2a 2f 0d 0a                    S_WIN */..