System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact 822ba5d06caee940bf51535faab3eac8f845b7a2:


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 6e 63 6c 75 64 65 20 22 2e 2e 2f 63 6f 72  #include "../cor
0190: 65 2f 73 71 6c 69 74 65 33 2e 63 22 0d 0a 0d 0a  e/sqlite3.c"....
01a0: 23 69 66 20 21 53 51 4c 49 54 45 5f 4f 53 5f 57  #if !SQLITE_OS_W
01b0: 49 4e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 77 63  IN..#include <wc
01c0: 68 61 72 2e 68 3e 0d 0a 23 65 6e 64 69 66 0d 0a  har.h>..#endif..
01d0: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
01e0: 54 45 52 4f 50 5f 49 4e 43 4c 55 44 45 5f 45 58  TEROP_INCLUDE_EX
01f0: 54 52 41 29 0d 0a 23 69 6e 63 6c 75 64 65 20 22  TRA)..#include "
0200: 2e 2e 2f 65 78 74 2f 65 78 74 72 61 2e 63 22 0d  ../ext/extra.c".
0210: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64  .#endif....#if d
0220: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 49  efined(INTEROP_I
0230: 4e 43 4c 55 44 45 5f 43 45 52 4f 44 29 0d 0a 23  NCLUDE_CEROD)..#
0240: 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f  include "../ext/
0250: 63 65 72 6f 64 2e 63 22 0d 0a 23 65 6e 64 69 66  cerod.c"..#endif
0260: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28  ....#if defined(
0270: 49 4e 54 45 52 4f 50 5f 49 4e 43 4c 55 44 45 5f  INTEROP_INCLUDE_
0280: 53 45 45 29 0d 0a 23 69 6e 63 6c 75 64 65 20 22  SEE)..#include "
0290: 2e 2e 2f 65 78 74 2f 73 65 65 2e 63 22 0d 0a 23  ../ext/see.c"..#
02a0: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66  endif....#if def
02b0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 49 4e 43  ined(INTEROP_INC
02c0: 4c 55 44 45 5f 5a 49 50 56 46 53 29 0d 0a 23 69  LUDE_ZIPVFS)..#i
02d0: 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 7a  nclude "../ext/z
02e0: 69 70 76 66 73 2e 63 22 0d 0a 23 69 6e 63 6c 75  ipvfs.c"..#inclu
02f0: 64 65 20 22 2e 2e 2f 65 78 74 2f 61 6c 67 6f 72  de "../ext/algor
0300: 69 74 68 6d 73 2e 63 22 0d 0a 23 65 6e 64 69 66  ithms.c"..#endif
0310: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28  ....#if defined(
0320: 49 4e 54 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f  INTEROP_EXTENSIO
0330: 4e 5f 46 55 4e 43 54 49 4f 4e 53 29 0d 0a 23 75  N_FUNCTIONS)..#u
0340: 6e 64 65 66 20 43 4f 4d 50 49 4c 45 5f 53 51 4c  ndef COMPILE_SQL
0350: 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 53 5f 41  ITE_EXTENSIONS_A
0360: 53 5f 4c 4f 41 44 41 42 4c 45 5f 4d 4f 44 55 4c  S_LOADABLE_MODUL
0370: 45 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f  E..#include "../
0380: 63 6f 6e 74 72 69 62 2f 65 78 74 65 6e 73 69 6f  contrib/extensio
0390: 6e 2d 66 75 6e 63 74 69 6f 6e 73 2e 63 22 0d 0a  n-functions.c"..
03a0: 65 78 74 65 72 6e 20 69 6e 74 20 52 65 67 69 73  extern int Regis
03b0: 74 65 72 45 78 74 65 6e 73 69 6f 6e 46 75 6e 63  terExtensionFunc
03c0: 74 69 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a 64  tions(sqlite3 *d
03d0: 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23  b);..#endif....#
03e0: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
03f0: 4f 50 5f 43 4f 44 45 43 29 20 26 26 20 21 64 65  OP_CODEC) && !de
0400: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 49 4e  fined(INTEROP_IN
0410: 43 4c 55 44 45 5f 53 45 45 29 0d 0a 23 69 66 64  CLUDE_SEE)..#ifd
0420: 65 66 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45  ef SQLITE_ENABLE
0430: 5f 5a 49 50 56 46 53 0d 0a 23 64 65 66 69 6e 65  _ZIPVFS..#define
0440: 20 49 4e 54 45 52 4f 50 5f 43 4f 44 45 43 5f 47   INTEROP_CODEC_G
0450: 45 54 5f 50 41 47 45 52 28 61 2c 62 2c 63 29 20  ET_PAGER(a,b,c) 
0460: 73 71 6c 69 74 65 33 50 61 67 65 72 47 65 74 28  sqlite3PagerGet(
0470: 61 2c 62 2c 63 2c 30 29 0d 0a 23 65 6c 69 66 20  a,b,c,0)..#elif 
0480: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e  SQLITE_VERSION_N
0490: 55 4d 42 45 52 20 3e 20 33 30 30 39 30 30 32 0d  UMBER > 3009002.
04a0: 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50  .#define INTEROP
04b0: 5f 43 4f 44 45 43 5f 47 45 54 5f 50 41 47 45 52  _CODEC_GET_PAGER
04c0: 28 61 2c 62 2c 63 29 20 73 71 6c 69 74 65 33 50  (a,b,c) sqlite3P
04d0: 61 67 65 72 47 65 74 28 61 2c 62 2c 63 2c 30 29  agerGet(a,b,c,0)
04e0: 0d 0a 23 65 6c 73 65 0d 0a 23 64 65 66 69 6e 65  ..#else..#define
04f0: 20 49 4e 54 45 52 4f 50 5f 43 4f 44 45 43 5f 47   INTEROP_CODEC_G
0500: 45 54 5f 50 41 47 45 52 28 61 2c 62 2c 63 29 20  ET_PAGER(a,b,c) 
0510: 73 71 6c 69 74 65 33 50 61 67 65 72 47 65 74 28  sqlite3PagerGet(
0520: 61 2c 62 2c 63 29 0d 0a 23 65 6e 64 69 66 0d 0a  a,b,c)..#endif..
0530: 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 77 69 6e  #include "../win
0540: 2f 63 72 79 70 74 2e 63 22 0d 0a 23 65 6e 64 69  /crypt.c"..#endi
0550: 66 0d 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 69  f....#include "i
0560: 6e 74 65 72 6f 70 2e 68 22 0d 0a 0d 0a 23 64 65  nterop.h"....#de
0570: 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42  fine INTEROP_DEB
0580: 55 47 5f 4e 4f 4e 45 20 20 20 20 20 20 20 20 20  UG_NONE         
0590: 20 20 28 30 78 30 30 30 30 29 0d 0a 23 64 65 66    (0x0000)..#def
05a0: 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55  ine INTEROP_DEBU
05b0: 47 5f 43 4c 4f 53 45 20 20 20 20 20 20 20 20 20  G_CLOSE         
05c0: 20 28 30 78 30 30 30 31 29 0d 0a 23 64 65 66 69   (0x0001)..#defi
05d0: 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ne INTEROP_DEBUG
05e0: 5f 46 49 4e 41 4c 49 5a 45 20 20 20 20 20 20 20  _FINALIZE       
05f0: 28 30 78 30 30 30 32 29 0d 0a 23 64 65 66 69 6e  (0x0002)..#defin
0600: 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f  e INTEROP_DEBUG_
0610: 42 41 43 4b 55 50 5f 46 49 4e 49 53 48 20 20 28  BACKUP_FINISH  (
0620: 30 78 30 30 30 34 29 0d 0a 23 64 65 66 69 6e 65  0x0004)..#define
0630: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f   INTEROP_DEBUG_O
0640: 50 45 4e 20 20 20 20 20 20 20 20 20 20 20 28 30  PEN           (0
0650: 78 30 30 30 38 29 0d 0a 23 64 65 66 69 6e 65 20  x0008)..#define 
0660: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50  INTEROP_DEBUG_OP
0670: 45 4e 31 36 20 20 20 20 20 20 20 20 20 28 30 78  EN16         (0x
0680: 30 30 31 30 29 0d 0a 23 64 65 66 69 6e 65 20 49  0010)..#define I
0690: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45  NTEROP_DEBUG_PRE
06a0: 50 41 52 45 20 20 20 20 20 20 20 20 28 30 78 30  PARE        (0x0
06b0: 30 32 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e  020)..#define IN
06c0: 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50  TEROP_DEBUG_PREP
06d0: 41 52 45 31 36 20 20 20 20 20 20 28 30 78 30 30  ARE16      (0x00
06e0: 34 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54  40)..#define INT
06f0: 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 54  EROP_DEBUG_RESET
0700: 20 20 20 20 20 20 20 20 20 20 28 30 78 30 30 38            (0x008
0710: 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45  0)..#define INTE
0720: 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45  ROP_DEBUG_CHANGE
0730: 53 20 20 20 20 20 20 20 20 28 30 78 30 31 30 30  S        (0x0100
0740: 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52  )..#define INTER
0750: 4f 50 5f 44 45 42 55 47 5f 42 52 45 41 4b 20 20  OP_DEBUG_BREAK  
0760: 20 20 20 20 20 20 20 20 28 30 78 30 32 30 30 29          (0x0200)
0770: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28  ....#if defined(
0780: 5f 4d 53 43 5f 56 45 52 29 20 26 26 20 64 65 66  _MSC_VER) && def
0790: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42  ined(INTEROP_DEB
07a0: 55 47 29 20 26 26 20 5c 0d 0a 20 20 20 20 28 49  UG) && \..    (I
07b0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49  NTEROP_DEBUG & I
07c0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 52 45  NTEROP_DEBUG_BRE
07d0: 41 4b 29 0d 0a 23 64 65 66 69 6e 65 20 73 71 6c  AK)..#define sql
07e0: 69 74 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b  ite3InteropBreak
07f0: 28 61 29 20 7b 20 73 71 6c 69 74 65 33 49 6e 74  (a) { sqlite3Int
0800: 65 72 6f 70 44 65 62 75 67 28 22 25 73 5c 6e 22  eropDebug("%s\n"
0810: 2c 20 28 61 29 29 3b 20 5f 5f 64 65 62 75 67 62  , (a)); __debugb
0820: 72 65 61 6b 28 29 3b 20 7d 0d 0a 23 65 6c 73 65  reak(); }..#else
0830: 0d 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 74 65  ..#define sqlite
0840: 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 61 29  3InteropBreak(a)
0850: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 74 79 70 65  ..#endif....type
0860: 64 65 66 20 76 6f 69 64 20 28 2a 53 51 4c 49 54  def void (*SQLIT
0870: 45 55 53 45 52 46 55 4e 43 29 28 73 71 6c 69 74  EUSERFUNC)(sqlit
0880: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 2c 20 69 6e  e3_context *, in
0890: 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  t, sqlite3_value
08a0: 20 2a 2a 29 3b 0d 0a 74 79 70 65 64 65 66 20 76   **);..typedef v
08b0: 6f 69 64 20 28 2a 53 51 4c 49 54 45 46 55 4e 43  oid (*SQLITEFUNC
08c0: 46 49 4e 41 4c 29 28 73 71 6c 69 74 65 33 5f 63  FINAL)(sqlite3_c
08d0: 6f 6e 74 65 78 74 20 2a 29 3b 0d 0a 0d 0a 2f 2a  ontext *);..../*
08e0: 0d 0a 2a 2a 20 41 6e 20 61 72 72 61 79 20 6f 66  ..** An array of
08f0: 20 6e 61 6d 65 73 20 6f 66 20 61 6c 6c 20 63 6f   names of all co
0900: 6d 70 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f  mpile-time optio
0910: 6e 73 2e 20 20 54 68 69 73 20 61 72 72 61 79 20  ns.  This array 
0920: 73 68 6f 75 6c 64 0d 0a 2a 2a 20 62 65 20 73 6f  should..** be so
0930: 72 74 65 64 20 41 2d 5a 2e 0d 0a 2a 2a 0d 0a 2a  rted A-Z...**..*
0940: 2a 20 54 68 69 73 20 61 72 72 61 79 20 6c 6f 6f  * This array loo
0950: 6b 73 20 6c 61 72 67 65 2c 20 62 75 74 20 69 6e  ks large, but in
0960: 20 61 20 74 79 70 69 63 61 6c 20 69 6e 73 74 61   a typical insta
0970: 6c 6c 61 74 69 6f 6e 20 61 63 74 75 61 6c 6c 79  llation actually
0980: 20 75 73 65 73 0d 0a 2a 2a 20 6f 6e 6c 79 20 61   uses..** only a
0990: 20 68 61 6e 64 66 75 6c 20 6f 66 20 63 6f 6d 70   handful of comp
09a0: 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 73  ile-time options
09b0: 2c 20 73 6f 20 6d 6f 73 74 20 74 69 6d 65 73 20  , so most times 
09c0: 74 68 69 73 20 61 72 72 61 79 20 69 73 20 75 73  this array is us
09d0: 75 61 6c 6c 79 0d 0a 2a 2a 20 72 61 74 68 65 72  ually..** rather
09e0: 20 73 68 6f 72 74 20 61 6e 64 20 75 73 65 73 20   short and uses 
09f0: 6c 69 74 74 6c 65 20 6d 65 6d 6f 72 79 20 73 70  little memory sp
0a00: 61 63 65 2e 0d 0a 2a 2f 0d 0a 73 74 61 74 69 63  ace...*/..static
0a10: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 63 6f   const char * co
0a20: 6e 73 74 20 61 7a 49 6e 74 65 72 6f 70 43 6f 6d  nst azInteropCom
0a30: 70 69 6c 65 4f 70 74 5b 5d 20 3d 20 7b 0d 0a 0d  pileOpt[] = {...
0a40: 0a 2f 2a 20 54 68 65 73 65 20 6d 61 63 72 6f 73  ./* These macros
0a50: 20 61 72 65 20 70 72 6f 76 69 64 65 64 20 74 6f   are provided to
0a60: 20 22 73 74 72 69 6e 67 69 66 79 22 20 74 68 65   "stringify" the
0a70: 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 64 65   value of the de
0a80: 66 69 6e 65 0d 0a 2a 2a 20 66 6f 72 20 74 68 6f  fine..** for tho
0a90: 73 65 20 6f 70 74 69 6f 6e 73 20 69 6e 20 77 68  se options in wh
0aa0: 69 63 68 20 74 68 65 20 76 61 6c 75 65 20 69 73  ich the value is
0ab0: 20 6d 65 61 6e 69 6e 67 66 75 6c 2e 20 2a 2f 0d   meaningful. */.
0ac0: 0a 23 69 66 6e 64 65 66 20 43 54 49 4d 45 4f 50  .#ifndef CTIMEOP
0ad0: 54 5f 56 41 4c 5f 0d 0a 23 64 65 66 69 6e 65 20  T_VAL_..#define 
0ae0: 43 54 49 4d 45 4f 50 54 5f 56 41 4c 5f 28 6f 70  CTIMEOPT_VAL_(op
0af0: 74 29 20 23 6f 70 74 0d 0a 23 65 6e 64 69 66 0d  t) #opt..#endif.
0b00: 0a 0d 0a 23 69 66 6e 64 65 66 20 43 54 49 4d 45  ...#ifndef CTIME
0b10: 4f 50 54 5f 56 41 4c 0d 0a 23 64 65 66 69 6e 65  OPT_VAL..#define
0b20: 20 43 54 49 4d 45 4f 50 54 5f 56 41 4c 28 6f 70   CTIMEOPT_VAL(op
0b30: 74 29 20 43 54 49 4d 45 4f 50 54 5f 56 41 4c 5f  t) CTIMEOPT_VAL_
0b40: 28 6f 70 74 29 0d 0a 23 65 6e 64 69 66 0d 0a 0d  (opt)..#endif...
0b50: 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f  .#ifdef INTEROP_
0b60: 43 4f 44 45 43 0d 0a 20 20 22 43 4f 44 45 43 22  CODEC..  "CODEC"
0b70: 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65  ,..#endif..#ifde
0b80: 66 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 0d  f INTEROP_DEBUG.
0b90: 0a 20 20 22 44 45 42 55 47 3d 22 20 43 54 49 4d  .  "DEBUG=" CTIM
0ba0: 45 4f 50 54 5f 56 41 4c 28 49 4e 54 45 52 4f 50  EOPT_VAL(INTEROP
0bb0: 5f 44 45 42 55 47 29 2c 0d 0a 23 65 6e 64 69 66  _DEBUG),..#endif
0bc0: 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50  ..#ifdef INTEROP
0bd0: 5f 45 58 54 45 4e 53 49 4f 4e 5f 46 55 4e 43 54  _EXTENSION_FUNCT
0be0: 49 4f 4e 53 0d 0a 20 20 22 45 58 54 45 4e 53 49  IONS..  "EXTENSI
0bf0: 4f 4e 5f 46 55 4e 43 54 49 4f 4e 53 22 2c 0d 0a  ON_FUNCTIONS",..
0c00: 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66 20 49  #endif..#ifdef I
0c10: 4e 54 45 52 4f 50 5f 49 4e 43 4c 55 44 45 5f 43  NTEROP_INCLUDE_C
0c20: 45 52 4f 44 0d 0a 20 20 22 49 4e 43 4c 55 44 45  EROD..  "INCLUDE
0c30: 5f 43 45 52 4f 44 22 2c 0d 0a 23 65 6e 64 69 66  _CEROD",..#endif
0c40: 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50  ..#ifdef INTEROP
0c50: 5f 49 4e 43 4c 55 44 45 5f 45 58 54 52 41 0d 0a  _INCLUDE_EXTRA..
0c60: 20 20 22 49 4e 43 4c 55 44 45 5f 45 58 54 52 41    "INCLUDE_EXTRA
0c70: 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64  ",..#endif..#ifd
0c80: 65 66 20 49 4e 54 45 52 4f 50 5f 49 4e 43 4c 55  ef INTEROP_INCLU
0c90: 44 45 5f 53 45 45 0d 0a 20 20 22 49 4e 43 4c 55  DE_SEE..  "INCLU
0ca0: 44 45 5f 53 45 45 22 2c 0d 0a 23 65 6e 64 69 66  DE_SEE",..#endif
0cb0: 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50  ..#ifdef INTEROP
0cc0: 5f 49 4e 43 4c 55 44 45 5f 5a 49 50 56 46 53 0d  _INCLUDE_ZIPVFS.
0cd0: 0a 20 20 22 49 4e 43 4c 55 44 45 5f 5a 49 50 56  .  "INCLUDE_ZIPV
0ce0: 46 53 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69  FS",..#endif..#i
0cf0: 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 4a 53 4f  fdef INTEROP_JSO
0d00: 4e 31 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20  N1_EXTENSION..  
0d10: 22 4a 53 4f 4e 31 5f 45 58 54 45 4e 53 49 4f 4e  "JSON1_EXTENSION
0d20: 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64  ",..#endif..#ifd
0d30: 65 66 20 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43  ef INTEROP_LEGAC
0d40: 59 5f 43 4c 4f 53 45 0d 0a 20 20 22 4c 45 47 41  Y_CLOSE..  "LEGA
0d50: 43 59 5f 43 4c 4f 53 45 22 2c 0d 0a 23 65 6e 64  CY_CLOSE",..#end
0d60: 69 66 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52  if..#ifdef INTER
0d70: 4f 50 5f 4c 4f 47 0d 0a 20 20 22 4c 4f 47 22 2c  OP_LOG..  "LOG",
0d80: 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66  ..#endif..#ifdef
0d90: 20 49 4e 54 45 52 4f 50 5f 50 45 52 43 45 4e 54   INTEROP_PERCENT
0da0: 49 4c 45 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20  ILE_EXTENSION.. 
0db0: 20 22 50 45 52 43 45 4e 54 49 4c 45 5f 45 58 54   "PERCENTILE_EXT
0dc0: 45 4e 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66  ENSION",..#endif
0dd0: 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50  ..#ifdef INTEROP
0de0: 5f 52 45 47 45 58 50 5f 45 58 54 45 4e 53 49 4f  _REGEXP_EXTENSIO
0df0: 4e 0d 0a 20 20 22 52 45 47 45 58 50 5f 45 58 54  N..  "REGEXP_EXT
0e00: 45 4e 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66  ENSION",..#endif
0e10: 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50  ..#ifdef INTEROP
0e20: 5f 54 45 53 54 5f 45 58 54 45 4e 53 49 4f 4e 0d  _TEST_EXTENSION.
0e30: 0a 20 20 22 54 45 53 54 5f 45 58 54 45 4e 53 49  .  "TEST_EXTENSI
0e40: 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69  ON",..#endif..#i
0e50: 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 54 4f 54  fdef INTEROP_TOT
0e60: 59 50 45 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20  YPE_EXTENSION.. 
0e70: 20 22 54 4f 54 59 50 45 5f 45 58 54 45 4e 53 49   "TOTYPE_EXTENSI
0e80: 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69  ON",..#endif..#i
0e90: 66 64 65 66 20 53 51 4c 49 54 45 5f 56 45 52 53  fdef SQLITE_VERS
0ea0: 49 4f 4e 5f 4e 55 4d 42 45 52 0d 0a 20 20 22 56  ION_NUMBER..  "V
0eb0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 3d 22 20  ERSION_NUMBER=" 
0ec0: 43 54 49 4d 45 4f 50 54 5f 56 41 4c 28 53 51 4c  CTIMEOPT_VAL(SQL
0ed0: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42  ITE_VERSION_NUMB
0ee0: 45 52 29 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69  ER),..#endif..#i
0ef0: 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 56 49 52  fdef INTEROP_VIR
0f00: 54 55 41 4c 5f 54 41 42 4c 45 0d 0a 20 20 22 56  TUAL_TABLE..  "V
0f10: 49 52 54 55 41 4c 5f 54 41 42 4c 45 22 2c 0d 0a  IRTUAL_TABLE",..
0f20: 23 65 6e 64 69 66 0d 0a 7d 3b 0d 0a 0d 0a 2f 2a  #endif..};..../*
0f30: 0d 0a 2a 2a 20 47 69 76 65 6e 20 74 68 65 20 6e  ..** Given the n
0f40: 61 6d 65 20 6f 66 20 61 20 63 6f 6d 70 69 6c 65  ame of a compile
0f50: 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 2c 20 72 65  -time option, re
0f60: 74 75 72 6e 20 74 72 75 65 20 69 66 20 74 68 61  turn true if tha
0f70: 74 20 6f 70 74 69 6f 6e 0d 0a 2a 2a 20 77 61 73  t option..** was
0f80: 20 75 73 65 64 20 61 6e 64 20 66 61 6c 73 65 20   used and false 
0f90: 69 66 20 6e 6f 74 2e 0d 0a 2a 2a 0d 0a 2a 2a 20  if not...**..** 
0fa0: 54 68 65 20 6e 61 6d 65 20 63 61 6e 20 6f 70 74  The name can opt
0fb0: 69 6f 6e 61 6c 6c 79 20 62 65 67 69 6e 20 77 69  ionally begin wi
0fc0: 74 68 20 22 53 51 4c 49 54 45 5f 22 20 6f 72 20  th "SQLITE_" or 
0fd0: 22 49 4e 54 45 52 4f 50 5f 22 20 62 75 74 20 74  "INTEROP_" but t
0fe0: 68 6f 73 65 0d 0a 2a 2a 20 70 72 65 66 69 78 65  hose..** prefixe
0ff0: 73 20 61 72 65 20 6e 6f 74 20 72 65 71 75 69 72  s are not requir
1000: 65 64 20 66 6f 72 20 61 20 6d 61 74 63 68 2e 0d  ed for a match..
1010: 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  .*/..SQLITE_API 
1020: 69 6e 74 20 57 49 4e 41 50 49 20 69 6e 74 65 72  int WINAPI inter
1030: 6f 70 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  op_compileoption
1040: 5f 75 73 65 64 28 63 6f 6e 73 74 20 63 68 61 72  _used(const char
1050: 20 2a 7a 4f 70 74 4e 61 6d 65 29 7b 0d 0a 20 20   *zOptName){..  
1060: 69 6e 74 20 69 2c 20 6e 3b 0d 0a 20 20 69 66 28  int i, n;..  if(
1070: 20 73 71 6c 69 74 65 33 53 74 72 4e 49 43 6d 70   sqlite3StrNICmp
1080: 28 7a 4f 70 74 4e 61 6d 65 2c 20 22 53 51 4c 49  (zOptName, "SQLI
1090: 54 45 5f 22 2c 20 37 29 3d 3d 30 20 29 20 7a 4f  TE_", 7)==0 ) zO
10a0: 70 74 4e 61 6d 65 20 2b 3d 20 37 3b 0d 0a 20 20  ptName += 7;..  
10b0: 69 66 28 20 73 71 6c 69 74 65 33 53 74 72 4e 49  if( sqlite3StrNI
10c0: 43 6d 70 28 7a 4f 70 74 4e 61 6d 65 2c 20 22 49  Cmp(zOptName, "I
10d0: 4e 54 45 52 4f 50 5f 22 2c 20 38 29 3d 3d 30 20  NTEROP_", 8)==0 
10e0: 29 20 7a 4f 70 74 4e 61 6d 65 20 2b 3d 20 38 3b  ) zOptName += 8;
10f0: 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 53  ..  n = sqlite3S
1100: 74 72 6c 65 6e 33 30 28 7a 4f 70 74 4e 61 6d 65  trlen30(zOptName
1110: 29 3b 0d 0a 0d 0a 20 20 2f 2a 20 53 69 6e 63 65  );....  /* Since
1120: 20 41 72 72 61 79 53 69 7a 65 28 61 7a 49 6e 74   ArraySize(azInt
1130: 65 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 29 20  eropCompileOpt) 
1140: 69 73 20 6e 6f 72 6d 61 6c 6c 79 20 69 6e 20 73  is normally in s
1150: 69 6e 67 6c 65 20 64 69 67 69 74 73 2c 20 61 0d  ingle digits, a.
1160: 0a 20 20 2a 2a 20 6c 69 6e 65 61 72 20 73 65 61  .  ** linear sea
1170: 72 63 68 20 69 73 20 61 64 65 71 75 61 74 65 2e  rch is adequate.
1180: 20 20 4e 6f 20 6e 65 65 64 20 66 6f 72 20 61 20    No need for a 
1190: 62 69 6e 61 72 79 20 73 65 61 72 63 68 2e 20 2a  binary search. *
11a0: 2f 0d 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c  /..  for(i=0; i<
11b0: 41 72 72 61 79 53 69 7a 65 28 61 7a 49 6e 74 65  ArraySize(azInte
11c0: 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 29 3b 20  ropCompileOpt); 
11d0: 69 2b 2b 29 7b 0d 0a 20 20 20 20 69 66 28 20 73  i++){..    if( s
11e0: 71 6c 69 74 65 33 53 74 72 4e 49 43 6d 70 28 7a  qlite3StrNICmp(z
11f0: 4f 70 74 4e 61 6d 65 2c 20 61 7a 49 6e 74 65 72  OptName, azInter
1200: 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 5b 69 5d 2c  opCompileOpt[i],
1210: 20 6e 29 3d 3d 30 0d 0a 20 20 20 20 20 26 26 20   n)==0..     && 
1220: 73 71 6c 69 74 65 33 43 74 79 70 65 4d 61 70 5b  sqlite3CtypeMap[
1230: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 29 61  (unsigned char)a
1240: 7a 49 6e 74 65 72 6f 70 43 6f 6d 70 69 6c 65 4f  zInteropCompileO
1250: 70 74 5b 69 5d 5b 6e 5d 5d 3d 3d 30 0d 0a 20 20  pt[i][n]]==0..  
1260: 20 20 29 7b 0d 0a 20 20 20 20 20 20 72 65 74 75    ){..      retu
1270: 72 6e 20 31 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20  rn 1;..    }..  
1280: 7d 0d 0a 20 20 72 65 74 75 72 6e 20 30 3b 0d 0a  }..  return 0;..
1290: 7d 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 52 65 74 75  }..../*..** Retu
12a0: 72 6e 20 74 68 65 20 4e 2d 74 68 20 63 6f 6d 70  rn the N-th comp
12b0: 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 20  ile-time option 
12c0: 73 74 72 69 6e 67 2e 20 20 49 66 20 4e 20 69 73  string.  If N is
12d0: 20 6f 75 74 20 6f 66 20 72 61 6e 67 65 2c 0d 0a   out of range,..
12e0: 2a 2a 20 72 65 74 75 72 6e 20 61 20 4e 55 4c 4c  ** return a NULL
12f0: 20 70 6f 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53   pointer...*/..S
1300: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
1310: 63 68 61 72 20 2a 57 49 4e 41 50 49 20 69 6e 74  char *WINAPI int
1320: 65 72 6f 70 5f 63 6f 6d 70 69 6c 65 6f 70 74 69  erop_compileopti
1330: 6f 6e 5f 67 65 74 28 69 6e 74 20 4e 29 7b 0d 0a  on_get(int N){..
1340: 20 20 69 66 28 20 4e 3e 3d 30 20 26 26 20 4e 3c    if( N>=0 && N<
1350: 41 72 72 61 79 53 69 7a 65 28 61 7a 49 6e 74 65  ArraySize(azInte
1360: 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 29 20 29  ropCompileOpt) )
1370: 7b 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 61 7a  {..    return az
1380: 49 6e 74 65 72 6f 70 43 6f 6d 70 69 6c 65 4f 70  InteropCompileOp
1390: 74 5b 4e 5d 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65  t[N];..  }..  re
13a0: 74 75 72 6e 20 30 3b 0d 0a 7d 0d 0a 0d 0a 23 69  turn 0;..}....#i
13b0: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
13c0: 50 5f 44 45 42 55 47 29 20 7c 7c 20 64 65 66 69  P_DEBUG) || defi
13d0: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 29  ned(INTEROP_LOG)
13e0: 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45  ..SQLITE_PRIVATE
13f0: 20 76 6f 69 64 20 73 71 6c 69 74 65 33 49 6e 74   void sqlite3Int
1400: 65 72 6f 70 44 65 62 75 67 28 63 6f 6e 73 74 20  eropDebug(const 
1410: 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e  char *zFormat, .
1420: 2e 2e 29 7b 0d 0a 20 20 76 61 5f 6c 69 73 74 20  ..){..  va_list 
1430: 61 70 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  ap;             
1440: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 56              /* V
1450: 61 72 61 72 67 20 6c 69 73 74 20 2a 2f 0d 0a 20  ararg list */.. 
1460: 20 53 74 72 41 63 63 75 6d 20 61 63 63 3b 20 20   StrAccum acc;  
1470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1480: 20 20 20 20 20 2f 2a 20 53 74 72 69 6e 67 20 61       /* String a
1490: 63 63 75 6d 75 6c 61 74 6f 72 20 2a 2f 0d 0a 20  ccumulator */.. 
14a0: 20 63 68 61 72 20 7a 4d 73 67 5b 53 51 4c 49 54   char zMsg[SQLIT
14b0: 45 5f 50 52 49 4e 54 5f 42 55 46 5f 53 49 5a 45  E_PRINT_BUF_SIZE
14c0: 2a 33 5d 3b 20 2f 2a 20 43 6f 6d 70 6c 65 74 65  *3]; /* Complete
14d0: 20 6c 6f 67 20 6d 65 73 73 61 67 65 20 2a 2f 0d   log message */.
14e0: 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20  .  va_start(ap, 
14f0: 7a 46 6f 72 6d 61 74 29 3b 0d 0a 23 69 66 20 53  zFormat);..#if S
1500: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55  QLITE_VERSION_NU
1510: 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 31 30 0d  MBER >= 3008010.
1520: 0a 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63  .  sqlite3StrAcc
1530: 75 6d 49 6e 69 74 28 26 61 63 63 2c 20 30 2c 20  umInit(&acc, 0, 
1540: 7a 4d 73 67 2c 20 73 69 7a 65 6f 66 28 7a 4d 73  zMsg, sizeof(zMs
1550: 67 29 2c 20 30 29 3b 0d 0a 23 65 6c 73 65 0d 0a  g), 0);..#else..
1560: 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75    sqlite3StrAccu
1570: 6d 49 6e 69 74 28 26 61 63 63 2c 20 7a 4d 73 67  mInit(&acc, zMsg
1580: 2c 20 73 69 7a 65 6f 66 28 7a 4d 73 67 29 2c 20  , sizeof(zMsg), 
1590: 30 29 3b 0d 0a 20 20 61 63 63 2e 75 73 65 4d 61  0);..  acc.useMa
15a0: 6c 6c 6f 63 20 3d 20 30 3b 0d 0a 23 65 6e 64 69  lloc = 0;..#endi
15b0: 66 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45  f..#if SQLITE_VE
15c0: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20  RSION_NUMBER >= 
15d0: 33 30 31 31 30 30 30 0d 0a 20 20 73 71 6c 69 74  3011000..  sqlit
15e0: 65 33 56 58 50 72 69 6e 74 66 28 26 61 63 63 2c  e3VXPrintf(&acc,
15f0: 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0d 0a   zFormat, ap);..
1600: 23 65 6c 73 65 0d 0a 20 20 73 71 6c 69 74 65 33  #else..  sqlite3
1610: 56 58 50 72 69 6e 74 66 28 26 61 63 63 2c 20 30  VXPrintf(&acc, 0
1620: 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0d  , zFormat, ap);.
1630: 0a 23 65 6e 64 69 66 0d 0a 20 20 76 61 5f 65 6e  .#endif..  va_en
1640: 64 28 61 70 29 3b 0d 0a 23 69 66 20 53 51 4c 49  d(ap);..#if SQLI
1650: 54 45 5f 4f 53 5f 57 49 4e 20 26 26 20 53 51 4c  TE_OS_WIN && SQL
1660: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42  ITE_VERSION_NUMB
1670: 45 52 20 3e 3d 20 33 30 30 37 30 31 33 0d 0a 20  ER >= 3007013.. 
1680: 20 73 71 6c 69 74 65 33 5f 77 69 6e 33 32 5f 77   sqlite3_win32_w
1690: 72 69 74 65 5f 64 65 62 75 67 28 73 71 6c 69 74  rite_debug(sqlit
16a0: 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68  e3StrAccumFinish
16b0: 28 26 61 63 63 29 2c 20 2d 31 29 3b 0d 0a 23 65  (&acc), -1);..#e
16c0: 6c 69 66 20 53 51 4c 49 54 45 5f 4f 53 5f 57 49  lif SQLITE_OS_WI
16d0: 4e 20 26 26 20 64 65 66 69 6e 65 64 28 53 51 4c  N && defined(SQL
16e0: 49 54 45 5f 57 49 4e 33 32 5f 48 41 53 5f 41 4e  ITE_WIN32_HAS_AN
16f0: 53 49 29 0d 0a 20 20 4f 75 74 70 75 74 44 65 62  SI)..  OutputDeb
1700: 75 67 53 74 72 69 6e 67 41 28 73 71 6c 69 74 65  ugStringA(sqlite
1710: 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28  3StrAccumFinish(
1720: 26 61 63 63 29 29 3b 0d 0a 23 65 6c 69 66 20 53  &acc));..#elif S
1730: 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 20 26 26 20  QLITE_OS_WIN && 
1740: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 57  defined(SQLITE_W
1750: 49 4e 33 32 5f 48 41 53 5f 57 49 44 45 29 0d 0a  IN32_HAS_WIDE)..
1760: 20 20 7b 0d 0a 20 20 20 20 4c 50 57 53 54 52 20    {..    LPWSTR 
1770: 7a 57 69 64 65 4d 73 67 20 3d 20 75 74 66 38 54  zWideMsg = utf8T
1780: 6f 55 6e 69 63 6f 64 65 28 73 71 6c 69 74 65 33  oUnicode(sqlite3
1790: 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 26  StrAccumFinish(&
17a0: 61 63 63 29 29 3b 0d 0a 20 20 20 20 69 66 28 20  acc));..    if( 
17b0: 7a 57 69 64 65 4d 73 67 20 29 7b 0d 0a 20 20 20  zWideMsg ){..   
17c0: 20 20 20 4f 75 74 70 75 74 44 65 62 75 67 53 74     OutputDebugSt
17d0: 72 69 6e 67 57 28 7a 57 69 64 65 4d 73 67 29 3b  ringW(zWideMsg);
17e0: 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  ..      sqlite3_
17f0: 66 72 65 65 28 7a 57 69 64 65 4d 73 67 29 3b 0d  free(zWideMsg);.
1800: 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a 23 65 6c  .    }..  }..#el
1810: 73 65 0d 0a 20 20 66 70 72 69 6e 74 66 28 73 74  se..  fprintf(st
1820: 64 65 72 72 2c 20 22 25 73 22 2c 20 73 71 6c 69  derr, "%s", sqli
1830: 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73  te3StrAccumFinis
1840: 68 28 26 61 63 63 29 29 3b 0d 0a 23 65 6e 64 69  h(&acc));..#endi
1850: 66 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a  f..}..#endif....
1860: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
1870: 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c 49 54 45  ROP_LOG)..SQLITE
1880: 5f 50 52 49 56 41 54 45 20 69 6e 74 20 6c 6f 67  _PRIVATE int log
1890: 43 6f 6e 66 69 67 75 72 65 64 20 3d 20 30 3b 0d  Configured = 0;.
18a0: 0a 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54  ...SQLITE_PRIVAT
18b0: 45 20 76 6f 69 64 20 73 71 6c 69 74 65 33 49 6e  E void sqlite3In
18c0: 74 65 72 6f 70 4c 6f 67 43 61 6c 6c 62 61 63 6b  teropLogCallback
18d0: 28 76 6f 69 64 20 2a 70 41 72 67 2c 20 69 6e 74  (void *pArg, int
18e0: 20 69 43 6f 64 65 2c 20 63 6f 6e 73 74 20 63 68   iCode, const ch
18f0: 61 72 20 2a 7a 4d 73 67 29 7b 0d 0a 20 20 73 71  ar *zMsg){..  sq
1900: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75  lite3InteropDebu
1910: 67 28 22 49 4e 54 45 52 4f 50 5f 4c 4f 47 20 28  g("INTEROP_LOG (
1920: 25 64 29 20 25 73 5c 6e 22 2c 20 69 43 6f 64 65  %d) %s\n", iCode
1930: 2c 20 7a 4d 73 67 29 3b 0d 0a 7d 0d 0a 23 65 6e  , zMsg);..}..#en
1940: 64 69 66 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  dif....SQLITE_AP
1950: 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c  I int WINAPI sql
1960: 69 74 65 33 5f 6d 61 6c 6c 6f 63 5f 73 69 7a 65  ite3_malloc_size
1970: 5f 69 6e 74 65 72 6f 70 28 76 6f 69 64 20 2a 70  _interop(void *p
1980: 29 7b 0d 0a 20 20 72 65 74 75 72 6e 20 73 71 6c  ){..  return sql
1990: 69 74 65 33 4d 61 6c 6c 6f 63 53 69 7a 65 28 70  ite3MallocSize(p
19a0: 29 3b 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65 66  );..}....#if def
19b0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47  ined(INTEROP_LEG
19c0: 41 43 59 5f 43 4c 4f 53 45 29 20 7c 7c 20 53 51  ACY_CLOSE) || SQ
19d0: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d  LITE_VERSION_NUM
19e0: 42 45 52 20 3c 20 33 30 30 37 30 31 34 0d 0a 53  BER < 3007014..S
19f0: 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f  QLITE_PRIVATE vo
1a00: 69 64 20 2a 20 73 71 6c 69 74 65 33 44 62 4d 61  id * sqlite3DbMa
1a10: 6c 6c 6f 63 5a 65 72 6f 5f 69 6e 74 65 72 6f 70  llocZero_interop
1a20: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e  (sqlite3 *db, in
1a30: 74 20 6e 29 0d 0a 7b 0d 0a 20 20 76 6f 69 64 20  t n)..{..  void 
1a40: 2a 70 3b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b  *p;..  if (db) {
1a50: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75  ..    sqlite3_mu
1a60: 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75  tex_enter(db->mu
1a70: 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 70 20  tex);..  }..  p 
1a80: 3d 20 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f  = sqlite3DbMallo
1a90: 63 5a 65 72 6f 28 64 62 2c 6e 29 3b 0d 0a 20 20  cZero(db,n);..  
1aa0: 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73  if (db) {..    s
1ab0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61  qlite3_mutex_lea
1ac0: 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a  ve(db->mutex);..
1ad0: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 70 3b    }..  return p;
1ae0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 50 52  ..}....SQLITE_PR
1af0: 49 56 41 54 45 20 76 6f 69 64 20 73 71 6c 69 74  IVATE void sqlit
1b00: 65 33 44 62 46 72 65 65 5f 69 6e 74 65 72 6f 70  e3DbFree_interop
1b10: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 76 6f  (sqlite3 *db, vo
1b20: 69 64 20 2a 70 29 0d 0a 7b 0d 0a 20 20 69 66 20  id *p)..{..  if 
1b30: 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69  (db) {..    sqli
1b40: 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28  te3_mutex_enter(
1b50: 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 7d  db->mutex);..  }
1b60: 0d 0a 20 20 69 66 20 28 70 29 20 7b 0d 0a 20 20  ..  if (p) {..  
1b70: 20 20 73 71 6c 69 74 65 33 4d 65 6d 64 65 62 75    sqlite3Memdebu
1b80: 67 53 65 74 54 79 70 65 28 70 2c 20 4d 45 4d 54  gSetType(p, MEMT
1b90: 59 50 45 5f 44 42 7c 4d 45 4d 54 59 50 45 5f 48  YPE_DB|MEMTYPE_H
1ba0: 45 41 50 29 3b 0d 0a 20 20 7d 0d 0a 20 20 73 71  EAP);..  }..  sq
1bb0: 6c 69 74 65 33 44 62 46 72 65 65 28 64 62 2c 70  lite3DbFree(db,p
1bc0: 29 3b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d  );..  if (db) {.
1bd0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74  .    sqlite3_mut
1be0: 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74  ex_leave(db->mut
1bf0: 65 78 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d 0a 23 65  ex);..  }..}..#e
1c00: 6e 64 69 66 0d 0a 0d 0a 2f 2a 0d 0a 20 20 20 20  ndif..../*..    
1c10: 54 68 65 20 67 6f 61 6c 20 6f 66 20 74 68 69 73  The goal of this
1c20: 20 76 65 72 73 69 6f 6e 20 6f 66 20 63 6c 6f 73   version of clos
1c30: 65 20 69 73 20 64 69 66 66 65 72 65 6e 74 20 74  e is different t
1c40: 68 61 6e 20 74 68 61 74 20 6f 66 20 73 71 6c 69  han that of sqli
1c50: 74 65 33 5f 63 6c 6f 73 65 28 29 2c 20 61 6e 64  te3_close(), and
1c60: 20 69 73 20 64 65 73 69 67 6e 65 64 20 74 6f 20   is designed to 
1c70: 6c 65 6e 64 20 69 74 73 65 6c 66 20 62 65 74 74  lend itself bett
1c80: 65 72 20 74 6f 20 2e 4e 45 54 27 73 20 6e 6f 6e  er to .NET's non
1c90: 2d 64 65 74 65 72 6d 69 6e 69 73 74 69 63 20 66  -deterministic f
1ca0: 69 6e 61 6c 69 7a 65 72 73 20 61 6e 64 0d 0a 20  inalizers and.. 
1cb0: 20 20 20 74 68 65 20 47 43 20 74 68 72 65 61 64     the GC thread
1cc0: 2e 20 20 53 51 4c 69 74 65 20 77 69 6c 6c 20 6e  .  SQLite will n
1cd0: 6f 74 20 63 6c 6f 73 65 20 61 20 64 61 74 61 62  ot close a datab
1ce0: 61 73 65 20 69 66 20 73 74 61 74 65 6d 65 6e 74  ase if statement
1cf0: 73 20 61 72 65 20 6f 70 65 6e 20 6f 6e 20 69 74  s are open on it
1d00: 20 2d 2d 20 62 75 74 20 66 6f 72 20 6f 75 72 20   -- but for our 
1d10: 70 75 72 70 6f 73 65 73 2c 20 77 65 27 64 20 72  purposes, we'd r
1d20: 61 74 68 65 72 20 66 69 6e 61 6c 69 7a 65 20 61  ather finalize a
1d30: 6c 6c 20 61 63 74 69 76 65 20 73 74 61 74 65 6d  ll active statem
1d40: 65 6e 74 73 0d 0a 20 20 20 20 61 6e 64 20 66 6f  ents..    and fo
1d50: 72 63 69 62 6c 79 20 63 6c 6f 73 65 20 74 68 65  rcibly close the
1d60: 20 64 61 74 61 62 61 73 65 2e 20 20 54 68 65 20   database.  The 
1d70: 72 65 61 73 6f 6e 20 69 73 20 73 69 6d 70 6c 65  reason is simple
1d80: 20 2d 2d 20 61 20 6c 6f 74 20 6f 66 20 70 65 6f   -- a lot of peo
1d90: 70 6c 65 20 64 6f 6e 27 74 20 44 69 73 70 6f 73  ple don't Dispos
1da0: 65 28 29 20 6f 66 20 74 68 65 69 72 20 6f 62 6a  e() of their obj
1db0: 65 63 74 73 20 63 6f 72 72 65 63 74 6c 79 20 61  ects correctly a
1dc0: 6e 64 20 6c 65 74 20 74 68 65 20 67 61 72 62 61  nd let the garba
1dd0: 67 65 20 63 6f 6c 6c 65 63 74 6f 72 0d 0a 20 20  ge collector..  
1de0: 20 20 64 6f 20 69 74 2e 20 20 54 68 69 73 20 6c    do it.  This l
1df0: 65 61 64 73 20 74 6f 20 75 6e 65 78 70 65 63 74  eads to unexpect
1e00: 65 64 20 62 65 68 61 76 69 6f 72 20 77 68 65 6e  ed behavior when
1e10: 20 61 20 75 73 65 72 20 74 68 69 6e 6b 73 20 74   a user thinks t
1e20: 68 65 79 27 76 65 20 63 6c 6f 73 65 64 20 61 20  hey've closed a 
1e30: 64 61 74 61 62 61 73 65 2c 20 62 75 74 20 69 74  database, but it
1e40: 27 73 20 73 74 69 6c 6c 20 6f 70 65 6e 20 62 65  's still open be
1e50: 63 61 75 73 65 20 6e 6f 74 20 61 6c 6c 20 74 68  cause not all th
1e60: 65 20 73 74 61 74 65 6d 65 6e 74 73 20 68 61 76  e statements hav
1e70: 65 0d 0a 20 20 20 20 68 69 74 20 74 68 65 20 47  e..    hit the G
1e80: 43 20 79 65 74 2e 0d 0a 0d 0a 20 20 20 20 53 6f  C yet.....    So
1e90: 2c 20 68 65 72 65 20 77 65 20 68 61 76 65 20 61  , here we have a
1ea0: 20 70 72 6f 62 6c 65 6d 20 2e 2e 2e 20 2e 4e 45   problem ... .NE
1eb0: 54 20 68 61 73 20 61 20 70 6f 69 6e 74 65 72 20  T has a pointer 
1ec0: 74 6f 20 61 6e 79 20 6e 75 6d 62 65 72 20 6f 66  to any number of
1ed0: 20 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 6f 62   sqlite3_stmt ob
1ee0: 6a 65 63 74 73 2e 20 20 57 65 20 63 61 6e 27 74  jects.  We can't
1ef0: 20 63 61 6c 6c 20 73 71 6c 69 74 65 33 5f 66 69   call sqlite3_fi
1f00: 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74 68 65 73  nalize() on thes
1f10: 65 20 62 65 63 61 75 73 65 0d 0a 20 20 20 20 74  e because..    t
1f20: 68 65 69 72 20 6d 65 6d 6f 72 79 20 69 73 20 66  heir memory is f
1f30: 72 65 65 64 20 61 6e 64 20 63 61 6e 20 62 65 20  reed and can be 
1f40: 75 73 65 64 20 66 6f 72 20 73 6f 6d 65 74 68 69  used for somethi
1f50: 6e 67 20 65 6c 73 65 2e 20 20 54 68 65 20 47 43  ng else.  The GC
1f60: 20 74 68 72 65 61 64 20 63 6f 75 6c 64 20 70 6f   thread could po
1f70: 74 65 6e 74 69 61 6c 6c 79 20 74 72 79 20 61 6e  tentially try an
1f80: 64 20 63 61 6c 6c 20 66 69 6e 61 6c 69 7a 65 20  d call finalize 
1f90: 61 67 61 69 6e 20 6f 6e 20 74 68 65 20 73 74 61  again on the sta
1fa0: 74 65 6d 65 6e 74 20 61 66 74 65 72 0d 0a 20 20  tement after..  
1fb0: 20 20 74 68 61 74 20 6d 65 6d 6f 72 79 20 77 61    that memory wa
1fc0: 73 20 64 65 61 6c 6c 6f 63 61 74 65 64 2e 20 20  s deallocated.  
1fd0: 42 41 44 2e 20 20 53 6f 2c 20 77 68 61 74 20 77  BAD.  So, what w
1fe0: 65 20 6e 65 65 64 20 74 6f 20 64 6f 20 69 73 20  e need to do is 
1ff0: 6d 61 6b 65 20 61 20 63 6f 70 79 20 6f 66 20 65  make a copy of e
2000: 61 63 68 20 73 74 61 74 65 6d 65 6e 74 2c 20 61  ach statement, a
2010: 6e 64 20 63 61 6c 6c 20 66 69 6e 61 6c 69 7a 65  nd call finalize
2020: 28 29 20 6f 6e 20 74 68 65 20 63 6f 70 79 20 2d  () on the copy -
2030: 2d 20 73 6f 20 74 68 61 74 20 74 68 65 20 6f 72  - so that the or
2040: 69 67 69 6e 61 6c 0d 0a 20 20 20 20 73 74 61 74  iginal..    stat
2050: 65 6d 65 6e 74 27 73 20 6d 65 6d 6f 72 79 20 69  ement's memory i
2060: 73 20 70 72 65 73 65 72 76 65 64 2c 20 61 6e 64  s preserved, and
2070: 20 6d 61 72 6b 65 64 20 61 73 20 42 41 44 2c 20   marked as BAD, 
2080: 62 75 74 20 77 65 20 63 61 6e 20 73 74 69 6c 6c  but we can still
2090: 20 6d 61 6e 61 67 65 20 74 6f 20 66 69 6e 61 6c   manage to final
20a0: 69 7a 65 20 65 76 65 72 79 74 68 69 6e 67 20 61  ize everything a
20b0: 6e 64 20 66 6f 72 63 69 62 6c 79 20 63 6c 6f 73  nd forcibly clos
20c0: 65 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20  e the database. 
20d0: 20 4c 61 74 65 72 20 77 68 65 6e 20 74 68 65 0d   Later when the.
20e0: 0a 20 20 20 20 47 43 20 67 65 74 73 20 61 72 6f  .    GC gets aro
20f0: 75 6e 64 20 74 6f 20 63 61 6c 6c 69 6e 67 20 66  und to calling f
2100: 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 28  inalize_interop(
2110: 29 20 6f 6e 20 74 68 65 20 22 62 61 64 22 20 73  ) on the "bad" s
2120: 74 61 74 65 6d 65 6e 74 2c 20 77 65 20 64 65 74  tatement, we det
2130: 65 63 74 20 74 68 61 74 20 61 6e 64 20 66 69 6e  ect that and fin
2140: 69 73 68 20 64 65 61 6c 6c 6f 63 61 74 69 6e 67  ish deallocating
2150: 20 74 68 65 20 70 6f 69 6e 74 65 72 2e 0d 0a 2a   the pointer...*
2160: 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e  /..SQLITE_API in
2170: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  t WINAPI sqlite3
2180: 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 28 73  _close_interop(s
2190: 71 6c 69 74 65 33 20 2a 64 62 29 0d 0a 7b 0d 0a  qlite3 *db)..{..
21a0: 20 20 69 6e 74 20 72 65 74 3b 0d 0a 23 69 66 20    int ret;..#if 
21b0: 21 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50  !defined(INTEROP
21c0: 5f 4c 45 47 41 43 59 5f 43 4c 4f 53 45 29 20 26  _LEGACY_CLOSE) &
21d0: 26 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e  & SQLITE_VERSION
21e0: 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 37 30  _NUMBER >= 30070
21f0: 31 34 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  14....#if define
2200: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
2210: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
2220: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
2230: 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20 73 71 6c  UG_CLOSE)..  sql
2240: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67  ite3InteropDebug
2250: 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f  ("sqlite3_close_
2260: 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69  interop(): calli
2270: 6e 67 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65  ng sqlite3_close
2280: 5f 76 32 28 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64  _v2(%p)...\n", d
2290: 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20  b);..#endif.... 
22a0: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 63   ret = sqlite3_c
22b0: 6c 6f 73 65 5f 76 32 28 64 62 29 3b 0d 0a 0d 0a  lose_v2(db);....
22c0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
22d0: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49  ROP_DEBUG) && (I
22e0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49  NTEROP_DEBUG & I
22f0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f  NTEROP_DEBUG_CLO
2300: 53 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  SE)..  sqlite3In
2310: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
2320: 74 65 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f  te3_close_intero
2330: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 63 6c 6f  p(): sqlite3_clo
2340: 73 65 5f 76 32 28 25 70 29 20 72 65 74 75 72 6e  se_v2(%p) return
2350: 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 72  ed %d.\n", db, r
2360: 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a  et);..#endif....
2370: 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23    return ret;..#
2380: 65 6c 73 65 0d 0a 20 20 72 65 74 20 3d 20 73 71  else..  ret = sq
2390: 6c 69 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b  lite3_close(db);
23a0: 0d 0a 0d 0a 20 20 69 66 20 28 72 65 74 20 3d 3d  ....  if (ret ==
23b0: 20 53 51 4c 49 54 45 5f 42 55 53 59 29 0d 0a 20   SQLITE_BUSY).. 
23c0: 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   {..    sqlite3_
23d0: 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e  mutex_enter(db->
23e0: 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 20 20 69  mutex);....    i
23f0: 66 20 28 21 64 62 2d 3e 70 56 64 62 65 29 0d 0a  f (!db->pVdbe)..
2400: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 73 71 6c      {..      sql
2410: 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65  ite3_mutex_leave
2420: 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20  (db->mutex);..  
2430: 20 20 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d      return ret;.
2440: 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 77 68  .    }....    wh
2450: 69 6c 65 20 28 64 62 2d 3e 70 56 64 62 65 29 0d  ile (db->pVdbe).
2460: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2f 2a  .    {..      /*
2470: 20 4d 61 6b 65 20 61 20 63 6f 70 79 20 6f 66 20   Make a copy of 
2480: 74 68 65 20 66 69 72 73 74 20 70 72 65 70 61 72  the first prepar
2490: 65 64 20 73 74 61 74 65 6d 65 6e 74 20 2a 2f 0d  ed statement */.
24a0: 0a 20 20 20 20 20 20 56 64 62 65 20 2a 70 20 3d  .      Vdbe *p =
24b0: 20 28 56 64 62 65 20 2a 29 73 71 6c 69 74 65 33   (Vdbe *)sqlite3
24c0: 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 5f 69 6e 74  DbMallocZero_int
24d0: 65 72 6f 70 28 64 62 2c 20 73 69 7a 65 6f 66 28  erop(db, sizeof(
24e0: 56 64 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 56  Vdbe));..      V
24f0: 64 62 65 20 2a 70 6f 20 3d 20 64 62 2d 3e 70 56  dbe *po = db->pV
2500: 64 62 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 69 66  dbe;....      if
2510: 20 28 21 70 29 0d 0a 20 20 20 20 20 20 7b 0d 0a   (!p)..      {..
2520: 20 20 20 20 20 20 20 20 72 65 74 20 3d 20 53 51          ret = SQ
2530: 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0d 0a 20 20 20  LITE_NOMEM;..   
2540: 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20       break;..   
2550: 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 20 20 43 6f     }....      Co
2560: 70 79 4d 65 6d 6f 72 79 28 70 2c 20 70 6f 2c 20  pyMemory(p, po, 
2570: 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a  sizeof(Vdbe));..
2580: 0d 0a 20 20 20 20 20 20 2f 2a 20 50 75 74 20 69  ..      /* Put i
2590: 74 20 6f 6e 20 74 68 65 20 63 68 61 69 6e 20 73  t on the chain s
25a0: 6f 20 77 65 20 63 61 6e 20 66 72 65 65 20 69 74  o we can free it
25b0: 20 2a 2f 0d 0a 20 20 20 20 20 20 64 62 2d 3e 70   */..      db->p
25c0: 56 64 62 65 20 3d 20 70 3b 0d 0a 20 20 20 20 20  Vdbe = p;..     
25d0: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 66   ret = sqlite3_f
25e0: 69 6e 61 6c 69 7a 65 28 28 73 71 6c 69 74 65 33  inalize((sqlite3
25f0: 5f 73 74 6d 74 20 2a 29 70 29 3b 20 2f 2a 20 54  _stmt *)p); /* T
2600: 68 69 73 20 77 69 6c 6c 20 61 6c 73 6f 20 66 72  his will also fr
2610: 65 65 20 74 68 65 20 63 6f 70 79 27 73 20 6d 65  ee the copy's me
2620: 6d 6f 72 79 20 2a 2f 0d 0a 20 20 20 20 20 20 69  mory */..      i
2630: 66 20 28 72 65 74 29 0d 0a 20 20 20 20 20 20 7b  f (ret)..      {
2640: 0d 0a 20 20 20 20 20 20 20 20 2f 2a 20 66 69 6e  ..        /* fin
2650: 61 6c 69 7a 65 20 66 61 69 6c 65 64 20 2d 2d 20  alize failed -- 
2660: 73 6f 20 77 65 20 6d 75 73 74 20 70 75 74 20 62  so we must put b
2670: 61 63 6b 20 61 6e 79 74 68 69 6e 67 20 77 65 20  ack anything we 
2680: 6d 75 6e 67 65 64 20 2a 2f 0d 0a 20 20 20 20 20  munged */..     
2690: 20 20 20 43 6f 70 79 4d 65 6d 6f 72 79 28 70 6f     CopyMemory(po
26a0: 2c 20 70 2c 20 73 69 7a 65 6f 66 28 56 64 62 65  , p, sizeof(Vdbe
26b0: 29 29 3b 0d 0a 20 20 20 20 20 20 20 20 64 62 2d  ));..        db-
26c0: 3e 70 56 64 62 65 20 3d 20 70 6f 3b 0d 0a 0d 0a  >pVdbe = po;....
26d0: 20 20 20 20 20 20 20 20 2f 2a 0d 0a 20 20 20 20          /*..    
26e0: 20 20 20 20 2a 2a 20 4e 4f 54 45 3a 20 4f 6b 2c      ** NOTE: Ok,
26f0: 20 77 65 20 6d 75 73 74 20 66 72 65 65 20 74 68   we must free th
2700: 69 73 20 62 6c 6f 63 6b 20 74 68 61 74 20 2a 77  is block that *w
2710: 65 2a 20 61 6c 6c 6f 63 61 74 65 64 20 28 61 62  e* allocated (ab
2720: 6f 76 65 29 20 73 69 6e 63 65 0d 0a 20 20 20 20  ove) since..    
2730: 20 20 20 20 2a 2a 20 20 20 20 20 20 20 66 69 6e      **       fin
2740: 61 6c 69 7a 65 20 64 69 64 20 6e 6f 74 20 64 6f  alize did not do
2750: 20 73 6f 2e 0d 0a 20 20 20 20 20 20 20 20 2a 2f   so...        */
2760: 0d 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65  ..        sqlite
2770: 33 44 62 46 72 65 65 5f 69 6e 74 65 72 6f 70 28  3DbFree_interop(
2780: 64 62 2c 20 70 29 3b 0d 0a 20 20 20 20 20 20 20  db, p);..       
2790: 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d   break;..      }
27a0: 0d 0a 20 20 20 20 20 20 65 6c 73 65 0d 0a 20 20  ..      else..  
27b0: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 5a      {..        Z
27c0: 65 72 6f 4d 65 6d 6f 72 79 28 70 6f 2c 20 73 69  eroMemory(po, si
27d0: 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 20  zeof(Vdbe));..  
27e0: 20 20 20 20 20 20 70 6f 2d 3e 6d 61 67 69 63 20        po->magic 
27f0: 3d 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 45 41  = VDBE_MAGIC_DEA
2800: 44 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20  D;..      }..   
2810: 20 7d 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   }..    sqlite3_
2820: 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e  mutex_leave(db->
2830: 6d 75 74 65 78 29 3b 0d 0a 20 20 20 20 72 65 74  mutex);..    ret
2840: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65   = sqlite3_close
2850: 28 64 62 29 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65  (db);..  }..  re
2860: 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 69  turn ret;..#endi
2870: 66 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65 66 69  f..}....#if defi
2880: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 29  ned(INTEROP_LOG)
2890: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74  ..SQLITE_API int
28a0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
28b0: 63 6f 6e 66 69 67 5f 6c 6f 67 5f 69 6e 74 65 72  config_log_inter
28c0: 6f 70 28 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  op()..{..  int r
28d0: 65 74 3b 0d 0a 20 20 69 66 28 20 21 6c 6f 67 43  et;..  if( !logC
28e0: 6f 6e 66 69 67 75 72 65 64 20 29 7b 0d 0a 20 20  onfigured ){..  
28f0: 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f    ret = sqlite3_
2900: 63 6f 6e 66 69 67 28 53 51 4c 49 54 45 5f 43 4f  config(SQLITE_CO
2910: 4e 46 49 47 5f 4c 4f 47 2c 20 73 71 6c 69 74 65  NFIG_LOG, sqlite
2920: 33 49 6e 74 65 72 6f 70 4c 6f 67 43 61 6c 6c 62  3InteropLogCallb
2930: 61 63 6b 2c 20 30 29 3b 0d 0a 20 20 20 20 69 66  ack, 0);..    if
2940: 28 20 72 65 74 3d 3d 53 51 4c 49 54 45 5f 4f 4b  ( ret==SQLITE_OK
2950: 20 29 7b 0d 0a 20 20 20 20 20 20 6c 6f 67 43 6f   ){..      logCo
2960: 6e 66 69 67 75 72 65 64 20 3d 20 31 3b 0d 0a 20  nfigured = 1;.. 
2970: 20 20 20 7d 65 6c 73 65 7b 0d 0a 20 20 20 20 20     }else{..     
2980: 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44   sqlite3InteropD
2990: 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 6f  ebug("sqlite3_co
29a0: 6e 66 69 67 5f 6c 6f 67 5f 69 6e 74 65 72 6f 70  nfig_log_interop
29b0: 28 29 3a 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66  (): sqlite3_conf
29c0: 69 67 28 53 51 4c 49 54 45 5f 43 4f 4e 46 49 47  ig(SQLITE_CONFIG
29d0: 5f 4c 4f 47 29 20 72 65 74 75 72 6e 65 64 20 25  _LOG) returned %
29e0: 64 2e 5c 6e 22 2c 20 72 65 74 29 3b 0d 0a 20 20  d.\n", ret);..  
29f0: 20 20 7d 0d 0a 20 20 7d 65 6c 73 65 7b 0d 0a 20    }..  }else{.. 
2a00: 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f     ret = SQLITE_
2a10: 4f 4b 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75  OK;..  }..  retu
2a20: 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 23 65 6e 64  rn ret;..}..#end
2a30: 69 66 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  if....SQLITE_API
2a40: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 57 49 4e   const char *WIN
2a50: 41 50 49 20 69 6e 74 65 72 6f 70 5f 6c 69 62 76  API interop_libv
2a60: 65 72 73 69 6f 6e 28 76 6f 69 64 29 0d 0a 7b 0d  ersion(void)..{.
2a70: 0a 20 20 72 65 74 75 72 6e 20 49 4e 54 45 52 4f  .  return INTERO
2a80: 50 5f 56 45 52 53 49 4f 4e 3b 0d 0a 7d 0d 0a 0d  P_VERSION;..}...
2a90: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73  .SQLITE_API cons
2aa0: 74 20 63 68 61 72 20 2a 57 49 4e 41 50 49 20 69  t char *WINAPI i
2ab0: 6e 74 65 72 6f 70 5f 73 6f 75 72 63 65 69 64 28  nterop_sourceid(
2ac0: 76 6f 69 64 29 0d 0a 7b 0d 0a 20 20 72 65 74 75  void)..{..  retu
2ad0: 72 6e 20 49 4e 54 45 52 4f 50 5f 53 4f 55 52 43  rn INTEROP_SOURC
2ae0: 45 5f 49 44 20 22 20 22 20 49 4e 54 45 52 4f 50  E_ID " " INTEROP
2af0: 5f 53 4f 55 52 43 45 5f 54 49 4d 45 53 54 41 4d  _SOURCE_TIMESTAM
2b00: 50 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  P;..}....SQLITE_
2b10: 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73  API int WINAPI s
2b20: 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65  qlite3_open_inte
2b30: 72 6f 70 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  rop(const char *
2b40: 66 69 6c 65 6e 61 6d 65 2c 20 63 6f 6e 73 74 20  filename, const 
2b50: 63 68 61 72 20 2a 76 66 73 4e 61 6d 65 2c 20 69  char *vfsName, i
2b60: 6e 74 20 66 6c 61 67 73 2c 20 69 6e 74 20 65 78  nt flags, int ex
2b70: 74 46 75 6e 63 73 2c 20 73 71 6c 69 74 65 33 20  tFuncs, sqlite3 
2b80: 2a 2a 70 70 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e  **ppdb)..{..  in
2b90: 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20 64 65  t ret;....#if de
2ba0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
2bb0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
2bc0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
2bd0: 5f 44 45 42 55 47 5f 4f 50 45 4e 29 0d 0a 20 20  _DEBUG_OPEN)..  
2be0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65  sqlite3InteropDe
2bf0: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65  bug("sqlite3_ope
2c00: 6e 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c  n_interop(): cal
2c10: 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 6f 70 65  ling sqlite3_ope
2c20: 6e 5f 76 32 28 5c 22 25 73 5c 22 2c 20 5c 22 25  n_v2(\"%s\", \"%
2c30: 73 5c 22 2c 20 25 64 2c 20 25 64 2c 20 25 70 29  s\", %d, %d, %p)
2c40: 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65  ...\n", filename
2c50: 2c 20 76 66 73 4e 61 6d 65 2c 20 66 6c 61 67 73  , vfsName, flags
2c60: 2c 20 65 78 74 46 75 6e 63 73 2c 20 70 70 64 62  , extFuncs, ppdb
2c70: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20  );..#endif....  
2c80: 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70  ret = sqlite3_op
2c90: 65 6e 5f 76 32 28 66 69 6c 65 6e 61 6d 65 2c 20  en_v2(filename, 
2ca0: 70 70 64 62 2c 20 66 6c 61 67 73 2c 20 76 66 73  ppdb, flags, vfs
2cb0: 4e 61 6d 65 29 3b 0d 0a 0d 0a 23 69 66 20 64 65  Name);....#if de
2cc0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
2cd0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
2ce0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
2cf0: 5f 44 45 42 55 47 5f 4f 50 45 4e 29 0d 0a 20 20  _DEBUG_OPEN)..  
2d00: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65  sqlite3InteropDe
2d10: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65  bug("sqlite3_ope
2d20: 6e 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c  n_interop(): sql
2d30: 69 74 65 33 5f 6f 70 65 6e 5f 76 32 28 5c 22 25  ite3_open_v2(\"%
2d40: 73 5c 22 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c  s\", \"%s\", %d,
2d50: 20 25 64 2c 20 25 70 29 20 72 65 74 75 72 6e 65   %d, %p) returne
2d60: 64 20 25 64 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61  d %d.\n", filena
2d70: 6d 65 2c 20 76 66 73 4e 61 6d 65 2c 20 66 6c 61  me, vfsName, fla
2d80: 67 73 2c 20 65 78 74 46 75 6e 63 73 2c 20 70 70  gs, extFuncs, pp
2d90: 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69  db, ret);..#endi
2da0: 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  f....#if defined
2db0: 28 49 4e 54 45 52 4f 50 5f 45 58 54 45 4e 53 49  (INTEROP_EXTENSI
2dc0: 4f 4e 5f 46 55 4e 43 54 49 4f 4e 53 29 0d 0a 20  ON_FUNCTIONS).. 
2dd0: 20 69 66 20 28 28 72 65 74 20 3d 3d 20 53 51 4c   if ((ret == SQL
2de0: 49 54 45 5f 4f 4b 29 20 26 26 20 70 70 64 62 20  ITE_OK) && ppdb 
2df0: 26 26 20 65 78 74 46 75 6e 63 73 29 0d 0a 20 20  && extFuncs)..  
2e00: 20 20 52 65 67 69 73 74 65 72 45 78 74 65 6e 73    RegisterExtens
2e10: 69 6f 6e 46 75 6e 63 74 69 6f 6e 73 28 2a 70 70  ionFunctions(*pp
2e20: 64 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a  db);..#endif....
2e30: 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d    return ret;..}
2e40: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69  ....SQLITE_API i
2e50: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65  nt WINAPI sqlite
2e60: 33 5f 6f 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70  3_open16_interop
2e70: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 66 69 6c  (const char *fil
2e80: 65 6e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61  ename, const cha
2e90: 72 20 2a 76 66 73 4e 61 6d 65 2c 20 69 6e 74 20  r *vfsName, int 
2ea0: 66 6c 61 67 73 2c 20 69 6e 74 20 65 78 74 46 75  flags, int extFu
2eb0: 6e 63 73 2c 20 73 71 6c 69 74 65 33 20 2a 2a 70  ncs, sqlite3 **p
2ec0: 70 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  pdb)..{..  int r
2ed0: 65 74 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  et;....#if defin
2ee0: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
2ef0: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45  ) && (INTEROP_DE
2f00: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45  BUG & INTEROP_DE
2f10: 42 55 47 5f 4f 50 45 4e 31 36 29 0d 0a 20 20 73  BUG_OPEN16)..  s
2f20: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
2f30: 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 6e  ug("sqlite3_open
2f40: 31 36 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61  16_interop(): ca
2f50: 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 6f 70  lling sqlite3_op
2f60: 65 6e 5f 69 6e 74 65 72 6f 70 28 5c 22 25 73 5c  en_interop(\"%s\
2f70: 22 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25  ", \"%s\", %d, %
2f80: 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 66 69  d, %p)...\n", fi
2f90: 6c 65 6e 61 6d 65 2c 20 76 66 73 4e 61 6d 65 2c  lename, vfsName,
2fa0: 20 66 6c 61 67 73 2c 20 65 78 74 46 75 6e 63 73   flags, extFuncs
2fb0: 2c 20 70 70 64 62 29 3b 0d 0a 23 65 6e 64 69 66  , ppdb);..#endif
2fc0: 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69  ....  ret = sqli
2fd0: 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70  te3_open_interop
2fe0: 28 66 69 6c 65 6e 61 6d 65 2c 20 76 66 73 4e 61  (filename, vfsNa
2ff0: 6d 65 2c 20 66 6c 61 67 73 2c 20 65 78 74 46 75  me, flags, extFu
3000: 6e 63 73 2c 20 70 70 64 62 29 3b 0d 0a 0d 0a 23  ncs, ppdb);....#
3010: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
3020: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
3030: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
3040: 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e  TEROP_DEBUG_OPEN
3050: 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  16)..  sqlite3In
3060: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
3070: 74 65 33 5f 6f 70 65 6e 31 36 5f 69 6e 74 65 72  te3_open16_inter
3080: 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 6f 70  op(): sqlite3_op
3090: 65 6e 5f 69 6e 74 65 72 6f 70 28 5c 22 25 73 5c  en_interop(\"%s\
30a0: 22 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25  ", \"%s\", %d, %
30b0: 64 2c 20 25 70 29 20 72 65 74 75 72 6e 65 64 20  d, %p) returned 
30c0: 25 64 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65  %d.\n", filename
30d0: 2c 20 76 66 73 4e 61 6d 65 2c 20 66 6c 61 67 73  , vfsName, flags
30e0: 2c 20 65 78 74 46 75 6e 63 73 2c 20 70 70 64 62  , extFuncs, ppdb
30f0: 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d  , ret);..#endif.
3100: 0a 0d 0a 20 20 69 66 20 28 28 72 65 74 20 3d 3d  ...  if ((ret ==
3110: 20 53 51 4c 49 54 45 5f 4f 4b 29 20 26 26 20 70   SQLITE_OK) && p
3120: 70 64 62 20 26 26 20 21 44 62 48 61 73 50 72 6f  pdb && !DbHasPro
3130: 70 65 72 74 79 28 2a 70 70 64 62 2c 20 30 2c 20  perty(*ppdb, 0, 
3140: 44 42 5f 53 63 68 65 6d 61 4c 6f 61 64 65 64 29  DB_SchemaLoaded)
3150: 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 45 4e 43 28  )..  {..    ENC(
3160: 2a 70 70 64 62 29 20 3d 20 53 51 4c 49 54 45 5f  *ppdb) = SQLITE_
3170: 55 54 46 31 36 4e 41 54 49 56 45 3b 0d 0a 0d 0a  UTF16NATIVE;....
3180: 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49  #if SQLITE_VERSI
3190: 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30  ON_NUMBER >= 300
31a0: 38 30 30 38 0d 0a 20 20 20 20 2f 2f 0d 0a 20 20  8008..    //..  
31b0: 20 20 2f 2f 20 42 55 47 46 49 58 3a 20 53 65 65    // BUGFIX: See
31c0: 20 74 69 63 6b 65 74 20 5b 37 63 31 35 31 61 32   ticket [7c151a2
31d0: 66 30 65 32 32 38 30 34 63 5d 2e 0d 0a 20 20 20  f0e22804c]...   
31e0: 20 2f 2f 0d 0a 20 20 20 20 53 43 48 45 4d 41 5f   //..    SCHEMA_
31f0: 45 4e 43 28 2a 70 70 64 62 29 20 3d 20 53 51 4c  ENC(*ppdb) = SQL
3200: 49 54 45 5f 55 54 46 31 36 4e 41 54 49 56 45 3b  ITE_UTF16NATIVE;
3210: 0d 0a 23 65 6e 64 69 66 0d 0a 20 20 7d 0d 0a 0d  ..#endif..  }...
3220: 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a  .  return ret;..
3230: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
3240: 63 6f 6e 73 74 20 63 68 61 72 20 2a 57 49 4e 41  const char *WINA
3250: 50 49 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73  PI sqlite3_errms
3260: 67 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  g_interop(sqlite
3270: 33 20 2a 64 62 2c 20 69 6e 74 20 2a 70 6c 65 6e  3 *db, int *plen
3280: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68  )..{..  const ch
3290: 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74  ar *pval = sqlit
32a0: 65 33 5f 65 72 72 6d 73 67 28 64 62 29 3b 0d 0a  e3_errmsg(db);..
32b0: 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65    if (plen) *ple
32c0: 6e 20 3d 20 70 76 61 6c 20 3f 20 73 74 72 6c 65  n = pval ? strle
32d0: 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20  n(pval) : 0;..  
32e0: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d  return pval;..}.
32f0: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e  ...SQLITE_API in
3300: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  t WINAPI sqlite3
3310: 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65 72 6f 70  _changes_interop
3320: 28 73 71 6c 69 74 65 33 20 2a 64 62 29 0d 0a 7b  (sqlite3 *db)..{
3330: 0d 0a 20 20 69 6e 74 20 72 65 73 75 6c 74 3b 0d  ..  int result;.
3340: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49  ...#if defined(I
3350: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26  NTEROP_DEBUG) &&
3360: 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20   (INTEROP_DEBUG 
3370: 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f  & INTEROP_DEBUG_
3380: 43 48 41 4e 47 45 53 29 0d 0a 20 20 73 71 6c 69  CHANGES)..  sqli
3390: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28  te3InteropDebug(
33a0: 22 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73  "sqlite3_changes
33b0: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c  _interop(): call
33c0: 69 6e 67 20 73 71 6c 69 74 65 33 5f 63 68 61 6e  ing sqlite3_chan
33d0: 67 65 73 28 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64  ges(%p)...\n", d
33e0: 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23  b);..#endif....#
33f0: 69 66 6e 64 65 66 20 4e 44 45 42 55 47 0d 0a 20  ifndef NDEBUG.. 
3400: 20 69 66 20 28 21 64 62 29 0d 0a 20 20 20 20 20   if (!db)..     
3410: 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 42   sqlite3InteropB
3420: 72 65 61 6b 28 22 6e 75 6c 6c 20 64 61 74 61 62  reak("null datab
3430: 61 73 65 20 68 61 6e 64 6c 65 20 66 6f 72 20 73  ase handle for s
3440: 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 29  qlite3_changes()
3450: 22 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20  ");..#endif.... 
3460: 20 72 65 73 75 6c 74 20 3d 20 73 71 6c 69 74 65   result = sqlite
3470: 33 5f 63 68 61 6e 67 65 73 28 64 62 29 3b 0d 0a  3_changes(db);..
3480: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
3490: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20  TEROP_DEBUG) && 
34a0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26  (INTEROP_DEBUG &
34b0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 43   INTEROP_DEBUG_C
34c0: 48 41 4e 47 45 53 29 0d 0a 20 20 73 71 6c 69 74  HANGES)..  sqlit
34d0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22  e3InteropDebug("
34e0: 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 5f  sqlite3_changes_
34f0: 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74  interop(): sqlit
3500: 65 33 5f 63 68 61 6e 67 65 73 28 25 70 29 20 72  e3_changes(%p) r
3510: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20  eturned %d.\n", 
3520: 64 62 2c 20 72 65 73 75 6c 74 29 3b 0d 0a 23 65  db, result);..#e
3530: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e  ndif....  return
3540: 20 72 65 73 75 6c 74 3b 0d 0a 7d 0d 0a 0d 0a 53   result;..}....S
3550: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49  QLITE_API int WI
3560: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 70 72 65  NAPI sqlite3_pre
3570: 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c  pare_interop(sql
3580: 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20  ite3 *db, const 
3590: 63 68 61 72 20 2a 73 71 6c 2c 20 69 6e 74 20 6e  char *sql, int n
35a0: 62 79 74 65 73 2c 20 73 71 6c 69 74 65 33 5f 73  bytes, sqlite3_s
35b0: 74 6d 74 20 2a 2a 70 70 73 74 6d 74 2c 20 63 6f  tmt **ppstmt, co
35c0: 6e 73 74 20 63 68 61 72 20 2a 2a 70 7a 74 61 69  nst char **pztai
35d0: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
35e0: 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 23 69  ..  int n;....#i
35f0: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
3600: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
3610: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
3620: 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41  EROP_DEBUG_PREPA
3630: 52 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  RE)..  sqlite3In
3640: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
3650: 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65  te3_prepare_inte
3660: 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73  rop(): calling s
3670: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 25  qlite3_prepare(%
3680: 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25  p, \"%s\", %d, %
3690: 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c 20 73 71  p)...\n", db, sq
36a0: 6c 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d  l, nbytes, ppstm
36b0: 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23  t);..#endif....#
36c0: 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f  if SQLITE_VERSIO
36d0: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 33  N_NUMBER >= 3003
36e0: 30 30 39 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74  009..  n = sqlit
36f0: 65 33 5f 70 72 65 70 61 72 65 5f 76 32 28 64 62  e3_prepare_v2(db
3700: 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70  , sql, nbytes, p
3710: 70 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d  pstmt, pztail);.
3720: 0a 23 65 6c 73 65 0d 0a 20 20 6e 20 3d 20 73 71  .#else..  n = sq
3730: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 64 62  lite3_prepare(db
3740: 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70  , sql, nbytes, p
3750: 70 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d  pstmt, pztail);.
3760: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64  .#endif....#if d
3770: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44  efined(INTEROP_D
3780: 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f  EBUG) && (INTERO
3790: 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f  P_DEBUG & INTERO
37a0: 50 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 29  P_DEBUG_PREPARE)
37b0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
37c0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
37d0: 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 72 6f 70  _prepare_interop
37e0: 28 29 3a 20 73 71 6c 69 74 65 33 5f 70 72 65 70  (): sqlite3_prep
37f0: 61 72 65 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20  are(%p, \"%s\", 
3800: 25 64 2c 20 25 70 29 20 72 65 74 75 72 6e 65 64  %d, %p) returned
3810: 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 73 71 6c   %d.\n", db, sql
3820: 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74  , nbytes, ppstmt
3830: 2c 20 6e 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d  , n);..#endif...
3840: 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c  .  if (plen) *pl
3850: 65 6e 20 3d 20 28 70 7a 74 61 69 6c 20 26 26 20  en = (pztail && 
3860: 2a 70 7a 74 61 69 6c 29 20 3f 20 73 74 72 6c 65  *pztail) ? strle
3870: 6e 28 2a 70 7a 74 61 69 6c 29 20 3a 20 30 3b 0d  n(*pztail) : 0;.
3880: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a  ...  return n;..
3890: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
38a0: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
38b0: 65 33 5f 70 72 65 70 61 72 65 31 36 5f 69 6e 74  e3_prepare16_int
38c0: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62  erop(sqlite3 *db
38d0: 2c 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 73 71  , const void *sq
38e0: 6c 2c 20 69 6e 74 20 6e 63 68 61 72 73 2c 20 73  l, int nchars, s
38f0: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 2a 70 70  qlite3_stmt **pp
3900: 73 74 6d 74 2c 20 63 6f 6e 73 74 20 76 6f 69 64  stmt, const void
3910: 20 2a 2a 70 7a 74 61 69 6c 2c 20 69 6e 74 20 2a   **pztail, int *
3920: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20  plen)..{..  int 
3930: 6e 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  n;....#if define
3940: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
3950: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
3960: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
3970: 55 47 5f 50 52 45 50 41 52 45 31 36 29 0d 0a 20  UG_PREPARE16).. 
3980: 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44   sqlite3InteropD
3990: 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 70 72  ebug("sqlite3_pr
39a0: 65 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a  epare_interop():
39b0: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33   calling sqlite3
39c0: 5f 70 72 65 70 61 72 65 31 36 28 25 70 2c 20 5c  _prepare16(%p, \
39d0: 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 2e 2e  "%s\", %d, %p)..
39e0: 2e 5c 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e  .\n", db, sql, n
39f0: 63 68 61 72 73 2c 20 70 70 73 74 6d 74 29 3b 0d  chars, ppstmt);.
3a00: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 53  .#endif....#if S
3a10: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55  QLITE_VERSION_NU
3a20: 4d 42 45 52 20 3e 3d 20 33 30 30 33 30 30 39 0d  MBER >= 3003009.
3a30: 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 70  .  n = sqlite3_p
3a40: 72 65 70 61 72 65 31 36 5f 76 32 28 64 62 2c 20  repare16_v2(db, 
3a50: 73 71 6c 2c 20 6e 63 68 61 72 73 20 2a 20 73 69  sql, nchars * si
3a60: 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 2c 20 70  zeof(wchar_t), p
3a70: 70 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d  pstmt, pztail);.
3a80: 0a 23 65 6c 73 65 0d 0a 20 20 6e 20 3d 20 73 71  .#else..  n = sq
3a90: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 31 36 28  lite3_prepare16(
3aa0: 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73 20  db, sql, nchars 
3ab0: 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74  * sizeof(wchar_t
3ac0: 29 2c 20 70 70 73 74 6d 74 2c 20 70 7a 74 61 69  ), ppstmt, pztai
3ad0: 6c 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23  l);..#endif....#
3ae0: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
3af0: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
3b00: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
3b10: 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50  TEROP_DEBUG_PREP
3b20: 41 52 45 31 36 29 0d 0a 20 20 73 71 6c 69 74 65  ARE16)..  sqlite
3b30: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
3b40: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69  qlite3_prepare_i
3b50: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65  nterop(): sqlite
3b60: 33 5f 70 72 65 70 61 72 65 31 36 28 25 70 2c 20  3_prepare16(%p, 
3b70: 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20  \"%s\", %d, %p) 
3b80: 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c  returned %d.\n",
3b90: 20 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73   db, sql, nchars
3ba0: 2c 20 70 70 73 74 6d 74 2c 20 6e 29 3b 0d 0a 23  , ppstmt, n);..#
3bb0: 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 70  endif....  if (p
3bc0: 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 28 70 7a  len) *plen = (pz
3bd0: 74 61 69 6c 20 26 26 20 2a 70 7a 74 61 69 6c 29  tail && *pztail)
3be0: 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72   ? wcslen((wchar
3bf0: 5f 74 20 2a 29 2a 70 7a 74 61 69 6c 29 20 2a 20  _t *)*pztail) * 
3c00: 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20  sizeof(wchar_t) 
3c10: 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e  : 0;....  return
3c20: 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65   n;..}....#if de
3c30: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 56 49  fined(INTEROP_VI
3c40: 52 54 55 41 4c 5f 54 41 42 4c 45 29 20 26 26 20  RTUAL_TABLE) && 
3c50: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e  SQLITE_VERSION_N
3c60: 55 4d 42 45 52 20 3e 3d 20 33 30 30 34 30 30 31  UMBER >= 3004001
3c70: 0d 0a 23 69 66 64 65 66 20 5f 57 49 4e 33 32 0a  ..#ifdef _WIN32.
3c80: 5f 5f 64 65 63 6c 73 70 65 63 28 64 6c 6c 65 78  __declspec(dllex
3c90: 70 6f 72 74 29 0a 23 65 6e 64 69 66 0a 76 6f 69  port).#endif.voi
3ca0: 64 20 2a 73 71 6c 69 74 65 33 5f 63 72 65 61 74  d *sqlite3_creat
3cb0: 65 5f 64 69 73 70 6f 73 61 62 6c 65 5f 6d 6f 64  e_disposable_mod
3cc0: 75 6c 65 28 0d 0a 20 20 73 71 6c 69 74 65 33 20  ule(..  sqlite3 
3cd0: 2a 64 62 2c 0d 0a 20 20 63 6f 6e 73 74 20 63 68  *db,..  const ch
3ce0: 61 72 20 2a 7a 4e 61 6d 65 2c 0d 0a 20 20 63 6f  ar *zName,..  co
3cf0: 6e 73 74 20 73 71 6c 69 74 65 33 5f 6d 6f 64 75  nst sqlite3_modu
3d00: 6c 65 20 2a 70 2c 0d 0a 20 20 76 6f 69 64 20 2a  le *p,..  void *
3d10: 70 43 6c 69 65 6e 74 44 61 74 61 2c 0d 0a 20 20  pClientData,..  
3d20: 76 6f 69 64 28 2a 78 44 65 73 74 72 6f 79 29 28  void(*xDestroy)(
3d30: 76 6f 69 64 2a 29 0d 0a 29 3b 20 2f 2a 20 64 65  void*)..); /* de
3d40: 66 69 6e 65 64 20 69 6e 20 22 73 72 63 2f 65 78  fined in "src/ex
3d50: 74 2f 76 74 73 68 69 6d 2e 63 22 20 28 69 6e 63  t/vtshim.c" (inc
3d60: 6c 75 64 65 64 20 62 65 6c 6f 77 29 20 2a 2f 0d  luded below) */.
3d70: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f  ...SQLITE_API vo
3d80: 69 64 20 2a 57 49 4e 41 50 49 20 73 71 6c 69 74  id *WINAPI sqlit
3d90: 65 33 5f 63 72 65 61 74 65 5f 64 69 73 70 6f 73  e3_create_dispos
3da0: 61 62 6c 65 5f 6d 6f 64 75 6c 65 5f 69 6e 74 65  able_module_inte
3db0: 72 6f 70 28 0d 0a 20 20 73 71 6c 69 74 65 33 20  rop(..  sqlite3 
3dc0: 2a 64 62 2c 0d 0a 20 20 63 6f 6e 73 74 20 63 68  *db,..  const ch
3dd0: 61 72 20 2a 7a 4e 61 6d 65 2c 0d 0a 20 20 73 71  ar *zName,..  sq
3de0: 6c 69 74 65 33 5f 6d 6f 64 75 6c 65 20 2a 70 4d  lite3_module *pM
3df0: 6f 64 75 6c 65 2c 0d 0a 20 20 69 6e 74 20 69 56  odule,..  int iV
3e00: 65 72 73 69 6f 6e 2c 0d 0a 20 20 69 6e 74 20 28  ersion,..  int (
3e10: 2a 78 43 72 65 61 74 65 29 28 73 71 6c 69 74 65  *xCreate)(sqlite
3e20: 33 2a 2c 20 76 6f 69 64 20 2a 2c 20 69 6e 74 2c  3*, void *, int,
3e30: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 63 6f 6e   const char *con
3e40: 73 74 2a 2c 20 73 71 6c 69 74 65 33 5f 76 74 61  st*, sqlite3_vta
3e50: 62 20 2a 2a 2c 20 63 68 61 72 2a 2a 29 2c 0d 0a  b **, char**),..
3e60: 20 20 69 6e 74 20 28 2a 78 43 6f 6e 6e 65 63 74    int (*xConnect
3e70: 29 28 73 71 6c 69 74 65 33 2a 2c 20 76 6f 69 64  )(sqlite3*, void
3e80: 20 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63   *, int, const c
3e90: 68 61 72 20 2a 63 6f 6e 73 74 2a 2c 20 73 71 6c  har *const*, sql
3ea0: 69 74 65 33 5f 76 74 61 62 20 2a 2a 2c 20 63 68  ite3_vtab **, ch
3eb0: 61 72 2a 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a  ar**),..  int (*
3ec0: 78 42 65 73 74 49 6e 64 65 78 29 28 73 71 6c 69  xBestIndex)(sqli
3ed0: 74 65 33 5f 76 74 61 62 20 2a 2c 20 73 71 6c 69  te3_vtab *, sqli
3ee0: 74 65 33 5f 69 6e 64 65 78 5f 69 6e 66 6f 2a 29  te3_index_info*)
3ef0: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 44 69 73 63  ,..  int (*xDisc
3f00: 6f 6e 6e 65 63 74 29 28 73 71 6c 69 74 65 33 5f  onnect)(sqlite3_
3f10: 76 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20  vtab *),..  int 
3f20: 28 2a 78 44 65 73 74 72 6f 79 29 28 73 71 6c 69  (*xDestroy)(sqli
3f30: 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d 0a 20 20  te3_vtab *),..  
3f40: 69 6e 74 20 28 2a 78 4f 70 65 6e 29 28 73 71 6c  int (*xOpen)(sql
3f50: 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 73 71 6c  ite3_vtab *, sql
3f60: 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72  ite3_vtab_cursor
3f70: 20 2a 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78   **),..  int (*x
3f80: 43 6c 6f 73 65 29 28 73 71 6c 69 74 65 33 5f 76  Close)(sqlite3_v
3f90: 74 61 62 5f 63 75 72 73 6f 72 2a 29 2c 0d 0a 20  tab_cursor*),.. 
3fa0: 20 69 6e 74 20 28 2a 78 46 69 6c 74 65 72 29 28   int (*xFilter)(
3fb0: 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 75 72  sqlite3_vtab_cur
3fc0: 73 6f 72 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73 74  sor*, int, const
3fd0: 20 63 68 61 72 20 2a 2c 20 69 6e 74 2c 20 73 71   char *, int, sq
3fe0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 29 2c  lite3_value **),
3ff0: 0d 0a 20 20 69 6e 74 20 28 2a 78 4e 65 78 74 29  ..  int (*xNext)
4000: 28 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 75  (sqlite3_vtab_cu
4010: 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20 28  rsor*),..  int (
4020: 2a 78 45 6f 66 29 28 73 71 6c 69 74 65 33 5f 76  *xEof)(sqlite3_v
4030: 74 61 62 5f 63 75 72 73 6f 72 2a 29 2c 0d 0a 20  tab_cursor*),.. 
4040: 20 69 6e 74 20 28 2a 78 43 6f 6c 75 6d 6e 29 28   int (*xColumn)(
4050: 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 75 72  sqlite3_vtab_cur
4060: 73 6f 72 2a 2c 20 73 71 6c 69 74 65 33 5f 63 6f  sor*, sqlite3_co
4070: 6e 74 65 78 74 2a 2c 20 69 6e 74 29 2c 0d 0a 20  ntext*, int),.. 
4080: 20 69 6e 74 20 28 2a 78 52 6f 77 69 64 29 28 73   int (*xRowid)(s
4090: 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73  qlite3_vtab_curs
40a0: 6f 72 2a 2c 20 73 71 6c 69 74 65 33 5f 69 6e 74  or*, sqlite3_int
40b0: 36 34 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a  64 *),..  int (*
40c0: 78 55 70 64 61 74 65 29 28 73 71 6c 69 74 65 33  xUpdate)(sqlite3
40d0: 5f 76 74 61 62 20 2a 2c 20 69 6e 74 2c 20 73 71  _vtab *, int, sq
40e0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 2c 20  lite3_value **, 
40f0: 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 2a 29  sqlite3_int64 *)
4100: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 42 65 67 69  ,..  int (*xBegi
4110: 6e 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20  n)(sqlite3_vtab 
4120: 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 53 79  *),..  int (*xSy
4130: 6e 63 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62  nc)(sqlite3_vtab
4140: 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43   *),..  int (*xC
4150: 6f 6d 6d 69 74 29 28 73 71 6c 69 74 65 33 5f 76  ommit)(sqlite3_v
4160: 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28  tab *),..  int (
4170: 2a 78 52 6f 6c 6c 62 61 63 6b 29 28 73 71 6c 69  *xRollback)(sqli
4180: 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d 0a 20 20  te3_vtab *),..  
4190: 69 6e 74 20 28 2a 78 46 69 6e 64 46 75 6e 63 74  int (*xFindFunct
41a0: 69 6f 6e 29 28 73 71 6c 69 74 65 33 5f 76 74 61  ion)(sqlite3_vta
41b0: 62 20 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73 74 20  b *, int, const 
41c0: 63 68 61 72 20 2a 2c 20 76 6f 69 64 20 28 2a 2a  char *, void (**
41d0: 70 78 46 75 6e 63 29 28 73 71 6c 69 74 65 33 5f  pxFunc)(sqlite3_
41e0: 63 6f 6e 74 65 78 74 2a 2c 20 69 6e 74 2c 20 73  context*, int, s
41f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 2a 2a 29 2c  qlite3_value**),
4200: 20 76 6f 69 64 20 2a 2a 70 70 41 72 67 29 2c 0d   void **ppArg),.
4210: 0a 20 20 69 6e 74 20 28 2a 78 52 65 6e 61 6d 65  .  int (*xRename
4220: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a  )(sqlite3_vtab *
4230: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 2c  , const char *),
4240: 0d 0a 20 20 69 6e 74 20 28 2a 78 53 61 76 65 70  ..  int (*xSavep
4250: 6f 69 6e 74 29 28 73 71 6c 69 74 65 33 5f 76 74  oint)(sqlite3_vt
4260: 61 62 20 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 69  ab *, int),..  i
4270: 6e 74 20 28 2a 78 52 65 6c 65 61 73 65 29 28 73  nt (*xRelease)(s
4280: 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 69  qlite3_vtab *, i
4290: 6e 74 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 52  nt),..  int (*xR
42a0: 6f 6c 6c 62 61 63 6b 54 6f 29 28 73 71 6c 69 74  ollbackTo)(sqlit
42b0: 65 33 5f 76 74 61 62 20 2a 2c 20 69 6e 74 29 2c  e3_vtab *, int),
42c0: 0d 0a 20 20 76 6f 69 64 20 2a 70 43 6c 69 65 6e  ..  void *pClien
42d0: 74 44 61 74 61 2c 0d 0a 20 20 76 6f 69 64 28 2a  tData,..  void(*
42e0: 78 44 65 73 74 72 6f 79 4d 6f 64 75 6c 65 29 28  xDestroyModule)(
42f0: 76 6f 69 64 2a 29 0d 0a 29 7b 0d 0a 20 20 69 66  void*)..){..  if
4300: 20 28 21 70 4d 6f 64 75 6c 65 29 20 72 65 74 75   (!pModule) retu
4310: 72 6e 20 30 3b 0d 0a 20 20 6d 65 6d 73 65 74 28  rn 0;..  memset(
4320: 70 4d 6f 64 75 6c 65 2c 20 30 2c 20 73 69 7a 65  pModule, 0, size
4330: 6f 66 28 2a 70 4d 6f 64 75 6c 65 29 29 3b 0d 0a  of(*pModule));..
4340: 20 20 70 4d 6f 64 75 6c 65 2d 3e 69 56 65 72 73    pModule->iVers
4350: 69 6f 6e 20 3d 20 69 56 65 72 73 69 6f 6e 3b 0d  ion = iVersion;.
4360: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 43 72 65  .  pModule->xCre
4370: 61 74 65 20 3d 20 78 43 72 65 61 74 65 3b 0d 0a  ate = xCreate;..
4380: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 43 6f 6e 6e    pModule->xConn
4390: 65 63 74 20 3d 20 78 43 6f 6e 6e 65 63 74 3b 0d  ect = xConnect;.
43a0: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 42 65 73  .  pModule->xBes
43b0: 74 49 6e 64 65 78 20 3d 20 78 42 65 73 74 49 6e  tIndex = xBestIn
43c0: 64 65 78 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d  dex;..  pModule-
43d0: 3e 78 44 69 73 63 6f 6e 6e 65 63 74 20 3d 20 78  >xDisconnect = x
43e0: 44 69 73 63 6f 6e 6e 65 63 74 3b 0d 0a 20 20 70  Disconnect;..  p
43f0: 4d 6f 64 75 6c 65 2d 3e 78 44 65 73 74 72 6f 79  Module->xDestroy
4400: 20 3d 20 78 44 65 73 74 72 6f 79 3b 0d 0a 20 20   = xDestroy;..  
4410: 70 4d 6f 64 75 6c 65 2d 3e 78 4f 70 65 6e 20 3d  pModule->xOpen =
4420: 20 78 4f 70 65 6e 3b 0d 0a 20 20 70 4d 6f 64 75   xOpen;..  pModu
4430: 6c 65 2d 3e 78 43 6c 6f 73 65 20 3d 20 78 43 6c  le->xClose = xCl
4440: 6f 73 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d  ose;..  pModule-
4450: 3e 78 46 69 6c 74 65 72 20 3d 20 78 46 69 6c 74  >xFilter = xFilt
4460: 65 72 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e  er;..  pModule->
4470: 78 4e 65 78 74 20 3d 20 78 4e 65 78 74 3b 0d 0a  xNext = xNext;..
4480: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 45 6f 66 20    pModule->xEof 
4490: 3d 20 78 45 6f 66 3b 0d 0a 20 20 70 4d 6f 64 75  = xEof;..  pModu
44a0: 6c 65 2d 3e 78 43 6f 6c 75 6d 6e 20 3d 20 78 43  le->xColumn = xC
44b0: 6f 6c 75 6d 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c  olumn;..  pModul
44c0: 65 2d 3e 78 52 6f 77 69 64 20 3d 20 78 52 6f 77  e->xRowid = xRow
44d0: 69 64 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e  id;..  pModule->
44e0: 78 55 70 64 61 74 65 20 3d 20 78 55 70 64 61 74  xUpdate = xUpdat
44f0: 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78  e;..  pModule->x
4500: 42 65 67 69 6e 20 3d 20 78 42 65 67 69 6e 3b 0d  Begin = xBegin;.
4510: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 53 79 6e  .  pModule->xSyn
4520: 63 20 3d 20 78 53 79 6e 63 3b 0d 0a 20 20 70 4d  c = xSync;..  pM
4530: 6f 64 75 6c 65 2d 3e 78 43 6f 6d 6d 69 74 20 3d  odule->xCommit =
4540: 20 78 43 6f 6d 6d 69 74 3b 0d 0a 20 20 70 4d 6f   xCommit;..  pMo
4550: 64 75 6c 65 2d 3e 78 52 6f 6c 6c 62 61 63 6b 20  dule->xRollback 
4560: 3d 20 78 52 6f 6c 6c 62 61 63 6b 3b 0d 0a 20 20  = xRollback;..  
4570: 70 4d 6f 64 75 6c 65 2d 3e 78 46 69 6e 64 46 75  pModule->xFindFu
4580: 6e 63 74 69 6f 6e 20 3d 20 78 46 69 6e 64 46 75  nction = xFindFu
4590: 6e 63 74 69 6f 6e 3b 0d 0a 20 20 70 4d 6f 64 75  nction;..  pModu
45a0: 6c 65 2d 3e 78 52 65 6e 61 6d 65 20 3d 20 78 52  le->xRename = xR
45b0: 65 6e 61 6d 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c  ename;..  pModul
45c0: 65 2d 3e 78 53 61 76 65 70 6f 69 6e 74 20 3d 20  e->xSavepoint = 
45d0: 78 53 61 76 65 70 6f 69 6e 74 3b 0d 0a 20 20 70  xSavepoint;..  p
45e0: 4d 6f 64 75 6c 65 2d 3e 78 52 65 6c 65 61 73 65  Module->xRelease
45f0: 20 3d 20 78 52 65 6c 65 61 73 65 3b 0d 0a 20 20   = xRelease;..  
4600: 70 4d 6f 64 75 6c 65 2d 3e 78 52 6f 6c 6c 62 61  pModule->xRollba
4610: 63 6b 54 6f 20 3d 20 78 52 6f 6c 6c 62 61 63 6b  ckTo = xRollback
4620: 54 6f 3b 0d 0a 20 20 72 65 74 75 72 6e 20 73 71  To;..  return sq
4630: 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 64 69 73  lite3_create_dis
4640: 70 6f 73 61 62 6c 65 5f 6d 6f 64 75 6c 65 28 64  posable_module(d
4650: 62 2c 20 7a 4e 61 6d 65 2c 20 70 4d 6f 64 75 6c  b, zName, pModul
4660: 65 2c 20 70 43 6c 69 65 6e 74 44 61 74 61 2c 20  e, pClientData, 
4670: 78 44 65 73 74 72 6f 79 4d 6f 64 75 6c 65 29 3b  xDestroyModule);
4680: 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 53  ..}..#endif....S
4690: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49  QLITE_API int WI
46a0: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62 69 6e  NAPI sqlite3_bin
46b0: 64 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70  d_double_interop
46c0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73  (sqlite3_stmt *s
46d0: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 64  tmt, int iCol, d
46e0: 6f 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a  ouble *val)..{..
46f0: 20 20 69 66 20 28 21 76 61 6c 29 20 72 65 74 75    if (!val) retu
4700: 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b  rn SQLITE_ERROR;
4710: 0d 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74  ..  return sqlit
4720: 65 33 5f 62 69 6e 64 5f 64 6f 75 62 6c 65 28 73  e3_bind_double(s
4730: 74 6d 74 2c 69 43 6f 6c 2c 2a 76 61 6c 29 3b 0d  tmt,iCol,*val);.
4740: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
4750: 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69   int WINAPI sqli
4760: 74 65 33 5f 62 69 6e 64 5f 69 6e 74 36 34 5f 69  te3_bind_int64_i
4770: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73  nterop(sqlite3_s
4780: 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69  tmt *stmt, int i
4790: 43 6f 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36  Col, sqlite_int6
47a0: 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66  4 *val)..{..  if
47b0: 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e 20 53   (!val) return S
47c0: 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20  QLITE_ERROR;..  
47d0: 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62  return sqlite3_b
47e0: 69 6e 64 5f 69 6e 74 36 34 28 73 74 6d 74 2c 69  ind_int64(stmt,i
47f0: 43 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d  Col,*val);..}...
4800: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73  .SQLITE_API cons
4810: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20  t char * WINAPI 
4820: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 70 61 72  sqlite3_bind_par
4830: 61 6d 65 74 65 72 5f 6e 61 6d 65 5f 69 6e 74 65  ameter_name_inte
4840: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74  rop(sqlite3_stmt
4850: 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c   *stmt, int iCol
4860: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d  , int *plen)..{.
4870: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70  .  const char *p
4880: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 62 69  val = sqlite3_bi
4890: 6e 64 5f 70 61 72 61 6d 65 74 65 72 5f 6e 61 6d  nd_parameter_nam
48a0: 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a  e(stmt, iCol);..
48b0: 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65    if (plen) *ple
48c0: 6e 20 3d 20 70 76 61 6c 20 3f 20 73 74 72 6c 65  n = pval ? strle
48d0: 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20  n(pval) : 0;..  
48e0: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d  return pval;..}.
48f0: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f  ...SQLITE_API co
4900: 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50  nst char * WINAP
4910: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  I sqlite3_column
4920: 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71  _name_interop(sq
4930: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74  lite3_stmt *stmt
4940: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20  , int iCol, int 
4950: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e  *plen)..{..  con
4960: 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20  st char *pval = 
4970: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e  sqlite3_column_n
4980: 61 6d 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b  ame(stmt, iCol);
4990: 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70  ..  if (plen) *p
49a0: 6c 65 6e 20 3d 20 70 76 61 6c 20 3f 20 73 74 72  len = pval ? str
49b0: 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a  len(pval) : 0;..
49c0: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a    return pval;..
49d0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
49e0: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e  const void * WIN
49f0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  API sqlite3_colu
4a00: 6d 6e 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f  mn_name16_intero
4a10: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
4a20: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
4a30: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20  int *plen)..{.. 
4a40: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61   const void *pva
4a50: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  l = sqlite3_colu
4a60: 6d 6e 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20  mn_name16(stmt, 
4a70: 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c  iCol);..  if (pl
4a80: 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 6c  en) *plen = pval
4a90: 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72   ? wcslen((wchar
4aa0: 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a  _t *)pval) * siz
4ab0: 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30  eof(wchar_t) : 0
4ac0: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c  ;..  return pval
4ad0: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
4ae0: 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20  PI const char * 
4af0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63  WINAPI sqlite3_c
4b00: 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65 5f 69  olumn_decltype_i
4b10: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73  nterop(sqlite3_s
4b20: 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69  tmt *stmt, int i
4b30: 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d  Col, int *plen).
4b40: 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  .{..  const char
4b50: 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33   *pval = sqlite3
4b60: 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65  _column_decltype
4b70: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20  (stmt, iCol);.. 
4b80: 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e   if (plen) *plen
4b90: 20 3d 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e   = pval ? strlen
4ba0: 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72  (pval) : 0;..  r
4bb0: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a  eturn pval;..}..
4bc0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e  ..SQLITE_API con
4bd0: 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49  st void * WINAPI
4be0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
4bf0: 64 65 63 6c 74 79 70 65 31 36 5f 69 6e 74 65 72  decltype16_inter
4c00: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
4c10: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
4c20: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
4c30: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76    const void *pv
4c40: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
4c50: 75 6d 6e 5f 64 65 63 6c 74 79 70 65 31 36 28 73  umn_decltype16(s
4c60: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69  tmt, iCol);..  i
4c70: 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d  f (plen) *plen =
4c80: 20 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e 28 28   pval ? wcslen((
4c90: 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 20  wchar_t *)pval) 
4ca0: 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74  * sizeof(wchar_t
4cb0: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
4cc0: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
4cd0: 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e  ITE_API void WIN
4ce0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  API sqlite3_colu
4cf0: 6d 6e 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f  mn_double_intero
4d00: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
4d10: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
4d20: 64 6f 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d  double *val)..{.
4d30: 0a 20 20 69 66 20 28 21 76 61 6c 29 20 72 65 74  .  if (!val) ret
4d40: 75 72 6e 3b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73  urn;..  *val = s
4d50: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f  qlite3_column_do
4d60: 75 62 6c 65 28 73 74 6d 74 2c 69 43 6f 6c 29 3b  uble(stmt,iCol);
4d70: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
4d80: 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71  I void WINAPI sq
4d90: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74  lite3_column_int
4da0: 36 34 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  64_interop(sqlit
4db0: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69  e3_stmt *stmt, i
4dc0: 6e 74 20 69 43 6f 6c 2c 20 73 71 6c 69 74 65 5f  nt iCol, sqlite_
4dd0: 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a  int64 *val)..{..
4de0: 20 20 69 66 20 28 21 76 61 6c 29 20 72 65 74 75    if (!val) retu
4df0: 72 6e 3b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71  rn;..  *val = sq
4e00: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74  lite3_column_int
4e10: 36 34 28 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a  64(stmt,iCol);..
4e20: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
4e30: 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69  void WINAPI sqli
4e40: 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f  te3_last_insert_
4e50: 72 6f 77 69 64 5f 69 6e 74 65 72 6f 70 28 73 71  rowid_interop(sq
4e60: 6c 69 74 65 33 20 2a 64 62 2c 20 73 71 6c 69 74  lite3 *db, sqlit
4e70: 65 5f 69 6e 74 36 34 20 2a 72 6f 77 49 64 29 0d  e_int64 *rowId).
4e80: 0a 7b 0d 0a 20 20 69 66 20 28 21 72 6f 77 49 64  .{..  if (!rowId
4e90: 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 2a 72 6f  ) return;..  *ro
4ea0: 77 49 64 20 3d 20 73 71 6c 69 74 65 33 5f 6c 61  wId = sqlite3_la
4eb0: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
4ec0: 64 62 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  db);..}....SQLIT
4ed0: 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50  E_API void WINAP
4ee0: 49 20 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72 79  I sqlite3_memory
4ef0: 5f 75 73 65 64 5f 69 6e 74 65 72 6f 70 28 73 71  _used_interop(sq
4f00: 6c 69 74 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74  lite_int64 *nByt
4f10: 65 73 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 6e  es)..{..  if (!n
4f20: 42 79 74 65 73 29 20 72 65 74 75 72 6e 3b 0d 0a  Bytes) return;..
4f30: 20 20 2a 6e 42 79 74 65 73 20 3d 20 73 71 6c 69    *nBytes = sqli
4f40: 74 65 33 5f 6d 65 6d 6f 72 79 5f 75 73 65 64 28  te3_memory_used(
4f50: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  );..}....SQLITE_
4f60: 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20  API void WINAPI 
4f70: 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68  sqlite3_memory_h
4f80: 69 67 68 77 61 74 65 72 5f 69 6e 74 65 72 6f 70  ighwater_interop
4f90: 28 69 6e 74 20 72 65 73 65 74 46 6c 61 67 2c 20  (int resetFlag, 
4fa0: 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 6e 42  sqlite_int64 *nB
4fb0: 79 74 65 73 29 0d 0a 7b 0d 0a 20 20 69 66 20 28  ytes)..{..  if (
4fc0: 21 6e 42 79 74 65 73 29 20 72 65 74 75 72 6e 3b  !nBytes) return;
4fd0: 0d 0a 20 20 2a 6e 42 79 74 65 73 20 3d 20 73 71  ..  *nBytes = sq
4fe0: 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67  lite3_memory_hig
4ff0: 68 77 61 74 65 72 28 72 65 73 65 74 46 6c 61 67  hwater(resetFlag
5000: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  );..}....SQLITE_
5010: 41 50 49 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  API const unsign
5020: 65 64 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49  ed char * WINAPI
5030: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
5040: 74 65 78 74 5f 69 6e 74 65 72 6f 70 28 73 71 6c  text_interop(sql
5050: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c  ite3_stmt *stmt,
5060: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a   int iCol, int *
5070: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73  plen)..{..  cons
5080: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
5090: 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f  *pval = sqlite3_
50a0: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 73 74 6d 74  column_text(stmt
50b0: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28  , iCol);..  if (
50c0: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71  plen) *plen = sq
50d0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74  lite3_column_byt
50e0: 65 73 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d  es(stmt, iCol);.
50f0: 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d  .  return pval;.
5100: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
5110: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49   const void * WI
5120: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c  NAPI sqlite3_col
5130: 75 6d 6e 5f 74 65 78 74 31 36 5f 69 6e 74 65 72  umn_text16_inter
5140: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
5150: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
5160: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
5170: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76    const void *pv
5180: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
5190: 75 6d 6e 5f 74 65 78 74 31 36 28 73 74 6d 74 2c  umn_text16(stmt,
51a0: 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70   iCol);..  if (p
51b0: 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71 6c  len) *plen = sql
51c0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65  ite3_column_byte
51d0: 73 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b  s16(stmt, iCol);
51e0: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b  ..  return pval;
51f0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
5200: 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c  I int WINAPI sql
5210: 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e  ite3_finalize_in
5220: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74  terop(sqlite3_st
5230: 6d 74 20 2a 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20  mt *stmt)..{..  
5240: 69 6e 74 20 72 65 74 3b 0d 0a 23 69 66 20 21 64  int ret;..#if !d
5250: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c  efined(INTEROP_L
5260: 45 47 41 43 59 5f 43 4c 4f 53 45 29 20 26 26 20  EGACY_CLOSE) && 
5270: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e  SQLITE_VERSION_N
5280: 55 4d 42 45 52 20 3e 3d 20 33 30 30 37 30 31 34  UMBER >= 3007014
5290: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28  ....#if defined(
52a0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26  INTEROP_DEBUG) &
52b0: 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  & (INTEROP_DEBUG
52c0: 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47   & INTEROP_DEBUG
52d0: 5f 46 49 4e 41 4c 49 5a 45 29 0d 0a 20 20 56 64  _FINALIZE)..  Vd
52e0: 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 2a 29  be *p = (Vdbe *)
52f0: 73 74 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33  stmt;..  sqlite3
5300: 20 2a 64 62 20 3d 20 70 20 3f 20 70 2d 3e 64 62   *db = p ? p->db
5310: 20 3a 20 30 3b 0d 0a 20 20 73 71 6c 69 74 65 33   : 0;..  sqlite3
5320: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71  InteropDebug("sq
5330: 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69  lite3_finalize_i
5340: 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e  nterop(): callin
5350: 67 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69  g sqlite3_finali
5360: 7a 65 28 25 70 2c 20 25 70 29 2e 2e 2e 5c 6e 22  ze(%p, %p)...\n"
5370: 2c 20 64 62 2c 20 73 74 6d 74 29 3b 0d 0a 23 65  , db, stmt);..#e
5380: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20  ndif....  ret = 
5390: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65  sqlite3_finalize
53a0: 28 73 74 6d 74 29 3b 0d 0a 0d 0a 23 69 66 20 64  (stmt);....#if d
53b0: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44  efined(INTEROP_D
53c0: 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f  EBUG) && (INTERO
53d0: 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f  P_DEBUG & INTERO
53e0: 50 5f 44 45 42 55 47 5f 46 49 4e 41 4c 49 5a 45  P_DEBUG_FINALIZE
53f0: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65  )..  sqlite3Inte
5400: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65  ropDebug("sqlite
5410: 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72  3_finalize_inter
5420: 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 66 69  op(): sqlite3_fi
5430: 6e 61 6c 69 7a 65 28 25 70 2c 20 25 70 29 20 72  nalize(%p, %p) r
5440: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20  eturned %d.\n", 
5450: 64 62 2c 20 73 74 6d 74 2c 20 72 65 74 29 3b 0d  db, stmt, ret);.
5460: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74  .#endif....  ret
5470: 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d  urn ret;..#else.
5480: 0a 20 20 56 64 62 65 20 2a 70 3b 0d 0a 20 20 72  .  Vdbe *p;..  r
5490: 65 74 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d  et = SQLITE_OK;.
54a0: 0a 0d 0a 20 20 70 20 3d 20 28 56 64 62 65 20 2a  ...  p = (Vdbe *
54b0: 29 73 74 6d 74 3b 0d 0a 20 20 69 66 20 28 70 29  )stmt;..  if (p)
54c0: 0d 0a 20 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74  ..  {..    sqlit
54d0: 65 33 20 2a 64 62 20 3d 20 70 2d 3e 64 62 3b 0d  e3 *db = p->db;.
54e0: 0a 0d 0a 20 20 20 20 69 66 20 28 64 62 20 21 3d  ...    if (db !=
54f0: 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 20 20 73 71   NULL)..      sq
5500: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65  lite3_mutex_ente
5510: 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 0d  r(db->mutex);...
5520: 0a 20 20 20 20 69 66 20 28 28 70 2d 3e 6d 61 67  .    if ((p->mag
5530: 69 63 20 3d 3d 20 56 44 42 45 5f 4d 41 47 49 43  ic == VDBE_MAGIC
5540: 5f 44 45 41 44 29 20 26 26 20 28 64 62 20 3d 3d  _DEAD) && (db ==
5550: 20 4e 55 4c 4c 29 29 0d 0a 20 20 20 20 7b 0d 0a   NULL))..    {..
5560: 20 20 20 20 20 20 73 71 6c 69 74 65 33 44 62 46        sqlite3DbF
5570: 72 65 65 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20  ree_interop(db, 
5580: 70 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20  p);..    }..    
5590: 65 6c 73 65 0d 0a 20 20 20 20 7b 0d 0a 20 20 20  else..    {..   
55a0: 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33     ret = sqlite3
55b0: 5f 66 69 6e 61 6c 69 7a 65 28 73 74 6d 74 29 3b  _finalize(stmt);
55c0: 0d 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 69  ..    }....    i
55d0: 66 20 28 64 62 20 21 3d 20 4e 55 4c 4c 29 0d 0a  f (db != NULL)..
55e0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75        sqlite3_mu
55f0: 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75  tex_leave(db->mu
5600: 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 0d 0a 20 20  tex);..  }....  
5610: 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6e  return ret;..#en
5620: 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  dif..}....SQLITE
5630: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20  _API int WINAPI 
5640: 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66  sqlite3_backup_f
5650: 69 6e 69 73 68 5f 69 6e 74 65 72 6f 70 28 73 71  inish_interop(sq
5660: 6c 69 74 65 33 5f 62 61 63 6b 75 70 20 2a 70 29  lite3_backup *p)
5670: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d  ..{..  int ret;.
5680: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49  ...#if defined(I
5690: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26  NTEROP_DEBUG) &&
56a0: 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20   (INTEROP_DEBUG 
56b0: 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f  & INTEROP_DEBUG_
56c0: 42 41 43 4b 55 50 5f 46 49 4e 49 53 48 29 0d 0a  BACKUP_FINISH)..
56d0: 20 20 73 71 6c 69 74 65 33 2a 20 70 44 65 73 74    sqlite3* pDest
56e0: 44 62 20 3d 20 70 20 3f 20 70 2d 3e 70 44 65 73  Db = p ? p->pDes
56f0: 74 44 62 20 3a 20 30 3b 0d 0a 20 20 73 71 6c 69  tDb : 0;..  sqli
5700: 74 65 33 2a 20 70 53 72 63 44 62 20 3d 20 70 20  te3* pSrcDb = p 
5710: 3f 20 70 2d 3e 70 53 72 63 44 62 20 3a 20 30 3b  ? p->pSrcDb : 0;
5720: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
5730: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
5740: 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 5f 69  _backup_finish_i
5750: 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e  nterop(): callin
5760: 67 20 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70  g sqlite3_backup
5770: 5f 66 69 6e 69 73 68 28 25 70 2c 20 25 70 2c 20  _finish(%p, %p, 
5780: 25 70 29 2e 2e 2e 5c 6e 22 2c 20 70 44 65 73 74  %p)...\n", pDest
5790: 44 62 2c 20 70 53 72 63 44 62 2c 20 70 29 3b 0d  Db, pSrcDb, p);.
57a0: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74  .#endif....  ret
57b0: 20 3d 20 73 71 6c 69 74 65 33 5f 62 61 63 6b 75   = sqlite3_backu
57c0: 70 5f 66 69 6e 69 73 68 28 70 29 3b 0d 0a 0d 0a  p_finish(p);....
57d0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
57e0: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49  ROP_DEBUG) && (I
57f0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49  NTEROP_DEBUG & I
5800: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 41 43  NTEROP_DEBUG_BAC
5810: 4b 55 50 5f 46 49 4e 49 53 48 29 0d 0a 20 20 73  KUP_FINISH)..  s
5820: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
5830: 75 67 28 22 73 71 6c 69 74 65 33 5f 62 61 63 6b  ug("sqlite3_back
5840: 75 70 5f 66 69 6e 69 73 68 5f 69 6e 74 65 72 6f  up_finish_intero
5850: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 62 61 63  p(): sqlite3_bac
5860: 6b 75 70 5f 66 69 6e 69 73 68 28 25 70 2c 20 25  kup_finish(%p, %
5870: 70 2c 20 25 70 29 20 72 65 74 75 72 6e 65 64 20  p, %p) returned 
5880: 25 64 2e 5c 6e 22 2c 20 70 44 65 73 74 44 62 2c  %d.\n", pDestDb,
5890: 20 70 53 72 63 44 62 2c 20 70 2c 20 72 65 74 29   pSrcDb, p, ret)
58a0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72  ;..#endif....  r
58b0: 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d  eturn ret;..}...
58c0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
58d0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 72  WINAPI sqlite3_r
58e0: 65 73 65 74 5f 69 6e 74 65 72 6f 70 28 73 71 6c  eset_interop(sql
58f0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 29  ite3_stmt *stmt)
5900: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d  ..{..  int ret;.
5910: 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28 49 4e  .#if !defined(IN
5920: 54 45 52 4f 50 5f 4c 45 47 41 43 59 5f 43 4c 4f  TEROP_LEGACY_CLO
5930: 53 45 29 20 26 26 20 53 51 4c 49 54 45 5f 56 45  SE) && SQLITE_VE
5940: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20  RSION_NUMBER >= 
5950: 33 30 30 37 30 31 34 0d 0a 0d 0a 23 69 66 20 64  3007014....#if d
5960: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44  efined(INTEROP_D
5970: 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f  EBUG) && (INTERO
5980: 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f  P_DEBUG & INTERO
5990: 50 5f 44 45 42 55 47 5f 52 45 53 45 54 29 0d 0a  P_DEBUG_RESET)..
59a0: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70    sqlite3Interop
59b0: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 72  Debug("sqlite3_r
59c0: 65 73 65 74 5f 69 6e 74 65 72 6f 70 28 29 3a 20  eset_interop(): 
59d0: 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f  calling sqlite3_
59e0: 72 65 73 65 74 28 25 70 29 2e 2e 2e 5c 6e 22 2c  reset(%p)...\n",
59f0: 20 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d   stmt);..#endif.
5a00: 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74  ...  ret = sqlit
5a10: 65 33 5f 72 65 73 65 74 28 73 74 6d 74 29 3b 0d  e3_reset(stmt);.
5a20: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49  ...#if defined(I
5a30: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26  NTEROP_DEBUG) &&
5a40: 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20   (INTEROP_DEBUG 
5a50: 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f  & INTEROP_DEBUG_
5a60: 52 45 53 45 54 29 0d 0a 20 20 73 71 6c 69 74 65  RESET)..  sqlite
5a70: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
5a80: 71 6c 69 74 65 33 5f 72 65 73 65 74 5f 69 6e 74  qlite3_reset_int
5a90: 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f  erop(): sqlite3_
5aa0: 72 65 73 65 74 28 25 70 29 20 72 65 74 75 72 6e  reset(%p) return
5ab0: 65 64 20 25 64 2e 5c 6e 22 2c 20 73 74 6d 74 2c  ed %d.\n", stmt,
5ac0: 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a   ret);..#endif..
5ad0: 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d  ..  return ret;.
5ae0: 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 28 73 74  .#else..  if (st
5af0: 6d 74 20 26 26 20 28 28 56 64 62 65 20 2a 29 73  mt && ((Vdbe *)s
5b00: 74 6d 74 29 2d 3e 6d 61 67 69 63 20 3d 3d 20 56  tmt)->magic == V
5b10: 44 42 45 5f 4d 41 47 49 43 5f 44 45 41 44 29 20  DBE_MAGIC_DEAD) 
5b20: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 53 43  return SQLITE_SC
5b30: 48 45 4d 41 3b 0d 0a 20 20 72 65 74 20 3d 20 73  HEMA;..  ret = s
5b40: 71 6c 69 74 65 33 5f 72 65 73 65 74 28 73 74 6d  qlite3_reset(stm
5b50: 74 29 3b 0d 0a 20 20 72 65 74 75 72 6e 20 72 65  t);..  return re
5b60: 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d  t;..#endif..}...
5b70: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
5b80: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63  WINAPI sqlite3_c
5b90: 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 5f 69  reate_function_i
5ba0: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a  nterop(sqlite3 *
5bb0: 70 73 71 6c 2c 20 63 6f 6e 73 74 20 63 68 61 72  psql, const char
5bc0: 20 2a 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c   *zFunctionName,
5bd0: 20 69 6e 74 20 6e 41 72 67 2c 20 69 6e 74 20 65   int nArg, int e
5be0: 54 65 78 74 52 65 70 2c 20 76 6f 69 64 20 2a 70  TextRep, void *p
5bf0: 76 55 73 65 72 2c 20 53 51 4c 49 54 45 55 53 45  vUser, SQLITEUSE
5c00: 52 46 55 4e 43 20 66 75 6e 63 2c 20 53 51 4c 49  RFUNC func, SQLI
5c10: 54 45 55 53 45 52 46 55 4e 43 20 66 75 6e 63 73  TEUSERFUNC funcs
5c20: 74 65 70 2c 20 53 51 4c 49 54 45 46 55 4e 43 46  tep, SQLITEFUNCF
5c30: 49 4e 41 4c 20 66 75 6e 63 66 69 6e 61 6c 2c 20  INAL funcfinal, 
5c40: 69 6e 74 20 6e 65 65 64 43 6f 6c 6c 53 65 71 29  int needCollSeq)
5c50: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d  ..{..  int n;...
5c60: 0a 20 20 69 66 20 28 65 54 65 78 74 52 65 70 20  .  if (eTextRep 
5c70: 3d 3d 20 53 51 4c 49 54 45 5f 55 54 46 31 36 29  == SQLITE_UTF16)
5c80: 0d 0a 20 20 20 20 65 54 65 78 74 52 65 70 20 3d  ..    eTextRep =
5c90: 20 53 51 4c 49 54 45 5f 55 54 46 31 36 4e 41 54   SQLITE_UTF16NAT
5ca0: 49 56 45 3b 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71  IVE;....  n = sq
5cb0: 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e  lite3_create_fun
5cc0: 63 74 69 6f 6e 28 70 73 71 6c 2c 20 7a 46 75 6e  ction(psql, zFun
5cd0: 63 74 69 6f 6e 4e 61 6d 65 2c 20 6e 41 72 67 2c  ctionName, nArg,
5ce0: 20 65 54 65 78 74 52 65 70 2c 20 70 76 55 73 65   eTextRep, pvUse
5cf0: 72 2c 20 66 75 6e 63 2c 20 66 75 6e 63 73 74 65  r, func, funcste
5d00: 70 2c 20 66 75 6e 63 66 69 6e 61 6c 29 3b 0d 0a  p, funcfinal);..
5d10: 20 20 69 66 20 28 6e 20 3d 3d 20 53 51 4c 49 54    if (n == SQLIT
5d20: 45 5f 4f 4b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20  E_OK)..  {..    
5d30: 69 66 20 28 6e 65 65 64 43 6f 6c 6c 53 65 71 29  if (needCollSeq)
5d40: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 46  ..    {..      F
5d50: 75 6e 63 44 65 66 20 2a 70 46 75 6e 63 20 3d 20  uncDef *pFunc = 
5d60: 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74  sqlite3FindFunct
5d70: 69 6f 6e 28 70 73 71 6c 2c 20 7a 46 75 6e 63 74  ion(psql, zFunct
5d80: 69 6f 6e 4e 61 6d 65 2c 20 73 74 72 6c 65 6e 28  ionName, strlen(
5d90: 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 29 2c 20  zFunctionName), 
5da0: 6e 41 72 67 2c 20 65 54 65 78 74 52 65 70 2c 20  nArg, eTextRep, 
5db0: 30 29 3b 0d 0a 20 20 20 20 20 20 69 66 28 20 70  0);..      if( p
5dc0: 46 75 6e 63 20 29 0d 0a 20 20 20 20 20 20 7b 0d  Func )..      {.
5dd0: 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53  .#if SQLITE_VERS
5de0: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30  ION_NUMBER >= 30
5df0: 30 38 30 30 31 0d 0a 20 20 20 20 20 20 20 20 70  08001..        p
5e00: 46 75 6e 63 2d 3e 66 75 6e 63 46 6c 61 67 73 20  Func->funcFlags 
5e10: 7c 3d 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e  |= SQLITE_FUNC_N
5e20: 45 45 44 43 4f 4c 4c 3b 0d 0a 23 65 6c 73 65 0d  EEDCOLL;..#else.
5e30: 0a 20 20 20 20 20 20 20 20 70 46 75 6e 63 2d 3e  .        pFunc->
5e40: 66 6c 61 67 73 20 7c 3d 20 53 51 4c 49 54 45 5f  flags |= SQLITE_
5e50: 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 3b 0d 0a  FUNC_NEEDCOLL;..
5e60: 23 65 6e 64 69 66 0d 0a 20 20 20 20 20 20 7d 0d  #endif..      }.
5e70: 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a 0d 0a 20  .    }..  }.... 
5e80: 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d   return n;..}...
5e90: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64  .SQLITE_API void
5ea0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
5eb0: 76 61 6c 75 65 5f 64 6f 75 62 6c 65 5f 69 6e 74  value_double_int
5ec0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 76 61 6c  erop(sqlite3_val
5ed0: 75 65 20 2a 70 76 61 6c 2c 20 64 6f 75 62 6c 65  ue *pval, double
5ee0: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20   *val)..{..  if 
5ef0: 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d 0a  (!val) return;..
5f00: 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 33    *val = sqlite3
5f10: 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 70 76  _value_double(pv
5f20: 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  al);..}....SQLIT
5f30: 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50  E_API void WINAP
5f40: 49 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  I sqlite3_value_
5f50: 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 71  int64_interop(sq
5f60: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 70 76 61  lite3_value *pva
5f70: 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20  l, sqlite_int64 
5f80: 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 28  *val)..{..  if (
5f90: 21 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d 0a 20  !val) return;.. 
5fa0: 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f   *val = sqlite3_
5fb0: 76 61 6c 75 65 5f 69 6e 74 36 34 28 70 76 61 6c  value_int64(pval
5fc0: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  );..}....SQLITE_
5fd0: 41 50 49 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  API const unsign
5fe0: 65 64 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49  ed char * WINAPI
5ff0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
6000: 65 78 74 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  ext_interop(sqli
6010: 74 65 33 5f 76 61 6c 75 65 20 2a 76 61 6c 2c 20  te3_value *val, 
6020: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20  int *plen)..{.. 
6030: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
6040: 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c  char *pval = sql
6050: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
6060: 76 61 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65  val);..  if (ple
6070: 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74  n) *plen = sqlit
6080: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 76  e3_value_bytes(v
6090: 61 6c 29 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70  al);..  return p
60a0: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  val;..}....SQLIT
60b0: 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64  E_API const void
60c0: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65   * WINAPI sqlite
60d0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 31 36 5f 69  3_value_text16_i
60e0: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 76  nterop(sqlite3_v
60f0: 61 6c 75 65 20 2a 76 61 6c 2c 20 69 6e 74 20 2a  alue *val, int *
6100: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73  plen)..{..  cons
6110: 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73  t void *pval = s
6120: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
6130: 74 31 36 28 76 61 6c 29 3b 0d 0a 20 20 69 66 20  t16(val);..  if 
6140: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 73  (plen) *plen = s
6150: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
6160: 65 73 31 36 28 76 61 6c 29 3b 0d 0a 20 20 72 65  es16(val);..  re
6170: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d  turn pval;..}...
6180: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64  .SQLITE_API void
6190: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
61a0: 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 5f 69 6e  result_double_in
61b0: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f  terop(sqlite3_co
61c0: 6e 74 65 78 74 20 2a 70 63 74 78 2c 20 64 6f 75  ntext *pctx, dou
61d0: 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20  ble *val)..{..  
61e0: 69 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e  if (!val) return
61f0: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  ;..  sqlite3_res
6200: 75 6c 74 5f 64 6f 75 62 6c 65 28 70 63 74 78 2c  ult_double(pctx,
6210: 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51   *val);..}....SQ
6220: 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49  LITE_API void WI
6230: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 72 65 73  NAPI sqlite3_res
6240: 75 6c 74 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f  ult_int64_intero
6250: 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  p(sqlite3_contex
6260: 74 20 2a 70 63 74 78 2c 20 73 71 6c 69 74 65 5f  t *pctx, sqlite_
6270: 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a  int64 *val)..{..
6280: 20 20 69 66 20 28 21 76 61 6c 29 20 72 65 74 75    if (!val) retu
6290: 72 6e 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 72  rn;..  sqlite3_r
62a0: 65 73 75 6c 74 5f 69 6e 74 36 34 28 70 63 74 78  esult_int64(pctx
62b0: 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53  , *val);..}....S
62c0: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49  QLITE_API int WI
62d0: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6e  NAPI sqlite3_con
62e0: 74 65 78 74 5f 63 6f 6c 6c 63 6f 6d 70 61 72 65  text_collcompare
62f0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
6300: 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c 20 63  _context *ctx, c
6310: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 31 2c 20 69  onst void *p1, i
6320: 6e 74 20 70 31 6c 65 6e 2c 20 63 6f 6e 73 74 20  nt p1len, const 
6330: 76 6f 69 64 20 2a 70 32 2c 20 69 6e 74 20 70 32  void *p2, int p2
6340: 6c 65 6e 29 0d 0a 7b 0d 0a 23 69 66 20 53 51 4c  len)..{..#if SQL
6350: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42  ITE_VERSION_NUMB
6360: 45 52 20 3e 3d 20 33 30 30 38 30 30 37 0d 0a 20  ER >= 3008007.. 
6370: 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20   CollSeq *pColl 
6380: 3d 20 63 74 78 20 3f 20 73 71 6c 69 74 65 33 47  = ctx ? sqlite3G
6390: 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 74  etFuncCollSeq(ct
63a0: 78 29 20 3a 20 30 3b 0d 0a 23 65 6c 73 65 0d 0a  x) : 0;..#else..
63b0: 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c    CollSeq *pColl
63c0: 20 3d 20 63 74 78 20 3f 20 63 74 78 2d 3e 70 43   = ctx ? ctx->pC
63d0: 6f 6c 6c 20 3a 20 30 3b 0d 0a 23 65 6e 64 69 66  oll : 0;..#endif
63e0: 0d 0a 20 20 69 66 20 28 21 63 74 78 20 7c 7c 20  ..  if (!ctx || 
63f0: 21 63 74 78 2d 3e 70 46 75 6e 63 29 20 72 65 74  !ctx->pFunc) ret
6400: 75 72 6e 20 34 3b 20 2f 2a 20 45 52 52 4f 52 20  urn 4; /* ERROR 
6410: 2a 2f 0d 0a 20 20 69 66 20 28 21 70 43 6f 6c 6c  */..  if (!pColl
6420: 20 7c 7c 20 21 70 43 6f 6c 6c 2d 3e 78 43 6d 70   || !pColl->xCmp
6430: 29 20 72 65 74 75 72 6e 20 33 3b 20 2f 2a 20 45  ) return 3; /* E
6440: 52 52 4f 52 20 2a 2f 0d 0a 23 69 66 20 53 51 4c  RROR */..#if SQL
6450: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42  ITE_VERSION_NUMB
6460: 45 52 20 3e 3d 20 33 30 30 38 30 30 31 0d 0a 20  ER >= 3008001.. 
6470: 20 69 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63   if ((ctx->pFunc
6480: 2d 3e 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51  ->funcFlags & SQ
6490: 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f  LITE_FUNC_NEEDCO
64a0: 4c 4c 29 20 3d 3d 20 30 29 20 72 65 74 75 72 6e  LL) == 0) return
64b0: 20 32 3b 20 2f 2a 20 45 52 52 4f 52 20 2a 2f 0d   2; /* ERROR */.
64c0: 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 28 28 63  .#else..  if ((c
64d0: 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c 61 67 73  tx->pFunc->flags
64e0: 20 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e   & SQLITE_FUNC_N
64f0: 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 72  EEDCOLL) == 0) r
6500: 65 74 75 72 6e 20 32 3b 20 2f 2a 20 45 52 52 4f  eturn 2; /* ERRO
6510: 52 20 2a 2f 0d 0a 23 65 6e 64 69 66 0d 0a 20 20  R */..#endif..  
6520: 72 65 74 75 72 6e 20 70 43 6f 6c 6c 2d 3e 78 43  return pColl->xC
6530: 6d 70 28 70 43 6f 6c 6c 2d 3e 70 55 73 65 72 2c  mp(pColl->pUser,
6540: 20 70 31 6c 65 6e 2c 20 70 31 2c 20 70 32 6c 65   p1len, p1, p2le
6550: 6e 2c 20 70 32 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51  n, p2);..}....SQ
6560: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63  LITE_API const c
6570: 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c  har * WINAPI sql
6580: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 63 6f 6c  ite3_context_col
6590: 6c 73 65 71 5f 69 6e 74 65 72 6f 70 28 73 71 6c  lseq_interop(sql
65a0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 74  ite3_context *ct
65b0: 78 2c 20 69 6e 74 20 2a 70 74 79 70 65 2c 20 69  x, int *ptype, i
65c0: 6e 74 20 2a 65 6e 63 2c 20 69 6e 74 20 2a 70 6c  nt *enc, int *pl
65d0: 65 6e 29 0d 0a 7b 0d 0a 23 69 66 20 53 51 4c 49  en)..{..#if SQLI
65e0: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45  TE_VERSION_NUMBE
65f0: 52 20 3e 3d 20 33 30 30 38 30 30 37 0d 0a 20 20  R >= 3008007..  
6600: 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d  CollSeq *pColl =
6610: 20 63 74 78 20 3f 20 73 71 6c 69 74 65 33 47 65   ctx ? sqlite3Ge
6620: 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 74 78  tFuncCollSeq(ctx
6630: 29 20 3a 20 30 3b 0d 0a 23 65 6c 73 65 0d 0a 20  ) : 0;..#else.. 
6640: 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20   CollSeq *pColl 
6650: 3d 20 63 74 78 20 3f 20 63 74 78 2d 3e 70 43 6f  = ctx ? ctx->pCo
6660: 6c 6c 20 3a 20 30 3b 0d 0a 23 65 6e 64 69 66 0d  ll : 0;..#endif.
6670: 0a 20 20 69 66 20 28 70 74 79 70 65 29 20 2a 70  .  if (ptype) *p
6680: 74 79 70 65 20 3d 20 30 3b 0d 0a 20 20 69 66 20  type = 0;..  if 
6690: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 30  (plen) *plen = 0
66a0: 3b 0d 0a 20 20 69 66 20 28 65 6e 63 29 20 2a 65  ;..  if (enc) *e
66b0: 6e 63 20 3d 20 30 3b 0d 0a 0d 0a 20 20 69 66 20  nc = 0;....  if 
66c0: 28 21 63 74 78 20 7c 7c 20 21 63 74 78 2d 3e 70  (!ctx || !ctx->p
66d0: 46 75 6e 63 29 20 72 65 74 75 72 6e 20 4e 55 4c  Func) return NUL
66e0: 4c 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56  L;..#if SQLITE_V
66f0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d  ERSION_NUMBER >=
6700: 20 33 30 30 38 30 30 31 0d 0a 20 20 69 66 20 28   3008001..  if (
6710: 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 75 6e  (ctx->pFunc->fun
6720: 63 46 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f  cFlags & SQLITE_
6730: 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d  FUNC_NEEDCOLL) =
6740: 3d 20 30 29 20 72 65 74 75 72 6e 20 4e 55 4c 4c  = 0) return NULL
6750: 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 28  ;..#else..  if (
6760: 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c 61  (ctx->pFunc->fla
6770: 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e 43  gs & SQLITE_FUNC
6780: 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 29  _NEEDCOLL) == 0)
6790: 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0d 0a 23   return NULL;..#
67a0: 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 70  endif....  if (p
67b0: 43 6f 6c 6c 29 0d 0a 20 20 7b 0d 0a 20 20 20 20  Coll)..  {..    
67c0: 69 66 20 28 65 6e 63 29 20 2a 65 6e 63 20 3d 20  if (enc) *enc = 
67d0: 70 43 6f 6c 6c 2d 3e 65 6e 63 3b 0d 0a 23 69 66  pColl->enc;..#if
67e0: 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f   SQLITE_VERSION_
67f0: 4e 55 4d 42 45 52 20 3c 20 33 30 30 37 30 31 30  NUMBER < 3007010
6800: 0d 0a 20 20 20 20 69 66 20 28 70 74 79 70 65 29  ..    if (ptype)
6810: 20 2a 70 74 79 70 65 20 3d 20 70 43 6f 6c 6c 2d   *ptype = pColl-
6820: 3e 74 79 70 65 3b 0d 0a 23 65 6e 64 69 66 0d 0a  >type;..#endif..
6830: 20 20 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70      if (plen) *p
6840: 6c 65 6e 20 3d 20 70 43 6f 6c 6c 2d 3e 7a 4e 61  len = pColl->zNa
6850: 6d 65 20 3f 20 73 74 72 6c 65 6e 28 70 43 6f 6c  me ? strlen(pCol
6860: 6c 2d 3e 7a 4e 61 6d 65 29 20 3a 20 30 3b 0d 0a  l->zName) : 0;..
6870: 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 70 43 6f  ..    return pCo
6880: 6c 6c 2d 3e 7a 4e 61 6d 65 3b 0d 0a 20 20 7d 0d  ll->zName;..  }.
6890: 0a 20 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0d  .  return NULL;.
68a0: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
68b0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49   const char * WI
68c0: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c  NAPI sqlite3_col
68d0: 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d  umn_database_nam
68e0: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  e_interop(sqlite
68f0: 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e  3_stmt *stmt, in
6900: 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65  t iCol, int *ple
6910: 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63  n)..{..  const c
6920: 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69  har *pval = sqli
6930: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62  te3_column_datab
6940: 61 73 65 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69  ase_name(stmt, i
6950: 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65  Col);..  if (ple
6960: 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 6c 20  n) *plen = pval 
6970: 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a  ? strlen(pval) :
6980: 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76   0;..  return pv
6990: 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  al;..}....SQLITE
69a0: 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 20  _API const void 
69b0: 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  * WINAPI sqlite3
69c0: 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65  _column_database
69d0: 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28  _name16_interop(
69e0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
69f0: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
6a00: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
6a10: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20  onst void *pval 
6a20: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
6a30: 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d 65 31 36  _database_name16
6a40: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20  (stmt, iCol);.. 
6a50: 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e   if (plen) *plen
6a60: 20 3d 20 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e   = pval ? wcslen
6a70: 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c  ((wchar_t *)pval
6a80: 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72  ) * sizeof(wchar
6a90: 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75  _t) : 0;..  retu
6aa0: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn pval;..}....S
6ab0: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
6ac0: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71  char * WINAPI sq
6ad0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62  lite3_column_tab
6ae0: 6c 65 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28  le_name_interop(
6af0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
6b00: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
6b10: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
6b20: 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20  onst char *pval 
6b30: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
6b40: 5f 74 61 62 6c 65 5f 6e 61 6d 65 28 73 74 6d 74  _table_name(stmt
6b50: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28  , iCol);..  if (
6b60: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76  plen) *plen = pv
6b70: 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c  al ? strlen(pval
6b80: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
6b90: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
6ba0: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f  ITE_API const vo
6bb0: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69  id * WINAPI sqli
6bc0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c 65  te3_column_table
6bd0: 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28  _name16_interop(
6be0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
6bf0: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
6c00: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
6c10: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20  onst void *pval 
6c20: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
6c30: 5f 74 61 62 6c 65 5f 6e 61 6d 65 31 36 28 73 74  _table_name16(st
6c40: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66  mt, iCol);..  if
6c50: 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20   (plen) *plen = 
6c60: 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e 28 28 77  pval ? wcslen((w
6c70: 63 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a  char_t *)pval) *
6c80: 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29   sizeof(wchar_t)
6c90: 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20   : 0;..  return 
6ca0: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  pval;..}....SQLI
6cb0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61  TE_API const cha
6cc0: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  r * WINAPI sqlit
6cd0: 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e  e3_column_origin
6ce0: 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71  _name_interop(sq
6cf0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74  lite3_stmt *stmt
6d00: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20  , int iCol, int 
6d10: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e  *plen)..{..  con
6d20: 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20  st char *pval = 
6d30: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f  sqlite3_column_o
6d40: 72 69 67 69 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c  rigin_name(stmt,
6d50: 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70   iCol);..  if (p
6d60: 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61  len) *plen = pva
6d70: 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29  l ? strlen(pval)
6d80: 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20   : 0;..  return 
6d90: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  pval;..}....SQLI
6da0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69  TE_API const voi
6db0: 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  d * WINAPI sqlit
6dc0: 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e  e3_column_origin
6dd0: 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28  _name16_interop(
6de0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
6df0: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
6e00: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
6e10: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20  onst void *pval 
6e20: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
6e30: 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 31 36 28 73  _origin_name16(s
6e40: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69  tmt, iCol);..  i
6e50: 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d  f (plen) *plen =
6e60: 20 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e 28 28   pval ? wcslen((
6e70: 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 20  wchar_t *)pval) 
6e80: 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74  * sizeof(wchar_t
6e90: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
6ea0: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
6eb0: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41  ITE_API int WINA
6ec0: 50 49 20 73 71 6c 69 74 65 33 5f 74 61 62 6c 65  PI sqlite3_table
6ed0: 5f 63 6f 6c 75 6d 6e 5f 6d 65 74 61 64 61 74 61  _column_metadata
6ee0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
6ef0: 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72   *db, const char
6f00: 20 2a 7a 44 62 4e 61 6d 65 2c 20 63 6f 6e 73 74   *zDbName, const
6f10: 20 63 68 61 72 20 2a 7a 54 61 62 6c 65 4e 61 6d   char *zTableNam
6f20: 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  e, const char *z
6f30: 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 63 68 61 72  ColumnName, char
6f40: 20 63 6f 6e 73 74 20 2a 2a 70 7a 44 61 74 61 54   const **pzDataT
6f50: 79 70 65 2c 20 63 68 61 72 20 63 6f 6e 73 74 20  ype, char const 
6f60: 2a 2a 70 7a 43 6f 6c 6c 53 65 71 2c 20 69 6e 74  **pzCollSeq, int
6f70: 20 2a 70 4e 6f 74 4e 75 6c 6c 2c 20 69 6e 74 20   *pNotNull, int 
6f80: 2a 70 50 72 69 6d 61 72 79 4b 65 79 2c 20 69 6e  *pPrimaryKey, in
6f90: 74 20 2a 70 41 75 74 6f 69 6e 63 2c 20 69 6e 74  t *pAutoinc, int
6fa0: 20 2a 70 64 74 4c 65 6e 2c 20 69 6e 74 20 2a 70   *pdtLen, int *p
6fb0: 63 73 4c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74  csLen)..{..  int
6fc0: 20 6e 3b 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c   n;....  n = sql
6fd0: 69 74 65 33 5f 74 61 62 6c 65 5f 63 6f 6c 75 6d  ite3_table_colum
6fe0: 6e 5f 6d 65 74 61 64 61 74 61 28 64 62 2c 20 7a  n_metadata(db, z
6ff0: 44 62 4e 61 6d 65 2c 20 7a 54 61 62 6c 65 4e 61  DbName, zTableNa
7000: 6d 65 2c 20 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 2c  me, zColumnName,
7010: 20 70 7a 44 61 74 61 54 79 70 65 2c 20 70 7a 43   pzDataType, pzC
7020: 6f 6c 6c 53 65 71 2c 20 70 4e 6f 74 4e 75 6c 6c  ollSeq, pNotNull
7030: 2c 20 70 50 72 69 6d 61 72 79 4b 65 79 2c 20 70  , pPrimaryKey, p
7040: 41 75 74 6f 69 6e 63 29 3b 0d 0a 0d 0a 20 20 69  Autoinc);....  i
7050: 66 20 28 70 64 74 4c 65 6e 29 20 2a 70 64 74 4c  f (pdtLen) *pdtL
7060: 65 6e 20 3d 20 28 70 7a 44 61 74 61 54 79 70 65  en = (pzDataType
7070: 20 26 26 20 2a 70 7a 44 61 74 61 54 79 70 65 29   && *pzDataType)
7080: 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 44 61 74   ? strlen(*pzDat
7090: 61 54 79 70 65 29 20 3a 20 30 3b 0d 0a 20 20 69  aType) : 0;..  i
70a0: 66 20 28 70 63 73 4c 65 6e 29 20 2a 70 63 73 4c  f (pcsLen) *pcsL
70b0: 65 6e 20 3d 20 28 70 7a 43 6f 6c 6c 53 65 71 20  en = (pzCollSeq 
70c0: 26 26 20 2a 70 7a 43 6f 6c 6c 53 65 71 29 20 3f  && *pzCollSeq) ?
70d0: 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c 53   strlen(*pzCollS
70e0: 65 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65  eq) : 0;....  re
70f0: 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51  turn n;..}....SQ
7100: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e  LITE_API int WIN
7110: 41 50 49 20 73 71 6c 69 74 65 33 5f 69 6e 64 65  API sqlite3_inde
7120: 78 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f 5f 69 6e  x_column_info_in
7130: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64  terop(sqlite3 *d
7140: 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  b, const char *z
7150: 44 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  Db, const char *
7160: 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 63 6f 6e 73  zIndexName, cons
7170: 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75 6d 6e 4e  t char *zColumnN
7180: 61 6d 65 2c 20 69 6e 74 20 2a 73 6f 72 74 4f 72  ame, int *sortOr
7190: 64 65 72 2c 20 69 6e 74 20 2a 6f 6e 45 72 72 6f  der, int *onErro
71a0: 72 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 2a  r, const char **
71b0: 70 7a 43 6f 6c 6c 2c 20 69 6e 74 20 2a 70 6c 65  pzColl, int *ple
71c0: 6e 29 0d 0a 7b 0d 0a 20 20 49 6e 64 65 78 20 2a  n)..{..  Index *
71d0: 70 49 64 78 3b 0d 0a 20 20 54 61 62 6c 65 20 2a  pIdx;..  Table *
71e0: 70 54 61 62 3b 0d 0a 20 20 69 6e 74 20 6e 3b 0d  pTab;..  int n;.
71f0: 0a 0d 0a 20 20 69 66 20 28 21 64 62 29 20 72 65  ...  if (!db) re
7200: 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f  turn SQLITE_ERRO
7210: 52 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75  R;..  sqlite3_mu
7220: 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75  tex_enter(db->mu
7230: 74 65 78 29 3b 0d 0a 20 20 73 71 6c 69 74 65 33  tex);..  sqlite3
7240: 42 74 72 65 65 45 6e 74 65 72 41 6c 6c 28 64 62  BtreeEnterAll(db
7250: 29 3b 0d 0a 0d 0a 20 20 70 49 64 78 20 3d 20 73  );....  pIdx = s
7260: 71 6c 69 74 65 33 46 69 6e 64 49 6e 64 65 78 28  qlite3FindIndex(
7270: 64 62 2c 20 7a 49 6e 64 65 78 4e 61 6d 65 2c 20  db, zIndexName, 
7280: 7a 44 62 29 3b 0d 0a 0d 0a 20 20 73 71 6c 69 74  zDb);....  sqlit
7290: 65 33 42 74 72 65 65 4c 65 61 76 65 41 6c 6c 28  e3BtreeLeaveAll(
72a0: 64 62 29 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f  db);..  sqlite3_
72b0: 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e  mutex_leave(db->
72c0: 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 69 66 20  mutex);....  if 
72d0: 28 21 70 49 64 78 29 20 72 65 74 75 72 6e 20 53  (!pIdx) return S
72e0: 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 0d 0a  QLITE_ERROR;....
72f0: 20 20 70 54 61 62 20 3d 20 70 49 64 78 2d 3e 70    pTab = pIdx->p
7300: 54 61 62 6c 65 3b 0d 0a 20 20 66 6f 72 20 28 6e  Table;..  for (n
7310: 20 3d 20 30 3b 20 6e 20 3c 20 70 49 64 78 2d 3e   = 0; n < pIdx->
7320: 6e 43 6f 6c 75 6d 6e 3b 20 6e 2b 2b 29 0d 0a 20  nColumn; n++).. 
7330: 20 7b 0d 0a 20 20 20 20 69 6e 74 20 63 6e 75 6d   {..    int cnum
7340: 20 3d 20 70 49 64 78 2d 3e 61 69 43 6f 6c 75 6d   = pIdx->aiColum
7350: 6e 5b 6e 5d 3b 0d 0a 20 20 20 20 69 66 20 28 73  n[n];..    if (s
7360: 71 6c 69 74 65 33 53 74 72 49 43 6d 70 28 70 54  qlite3StrICmp(pT
7370: 61 62 2d 3e 61 43 6f 6c 5b 63 6e 75 6d 5d 2e 7a  ab->aCol[cnum].z
7380: 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d 6e 4e 61 6d  Name, zColumnNam
7390: 65 29 20 3d 3d 20 30 29 0d 0a 20 20 20 20 7b 0d  e) == 0)..    {.
73a0: 0a 20 20 20 20 20 20 69 66 20 28 20 73 6f 72 74  .      if ( sort
73b0: 4f 72 64 65 72 20 29 20 2a 73 6f 72 74 4f 72 64  Order ) *sortOrd
73c0: 65 72 20 3d 20 70 49 64 78 2d 3e 61 53 6f 72 74  er = pIdx->aSort
73d0: 4f 72 64 65 72 5b 6e 5d 3b 0d 0a 20 20 20 20 20  Order[n];..     
73e0: 20 69 66 20 28 20 70 7a 43 6f 6c 6c 20 29 20 2a   if ( pzColl ) *
73f0: 70 7a 43 6f 6c 6c 20 3d 20 70 49 64 78 2d 3e 61  pzColl = pIdx->a
7400: 7a 43 6f 6c 6c 5b 6e 5d 3b 0d 0a 20 20 20 20 20  zColl[n];..     
7410: 20 69 66 20 28 20 70 6c 65 6e 20 29 20 2a 70 6c   if ( plen ) *pl
7420: 65 6e 20 3d 20 73 74 72 6c 65 6e 28 2a 70 7a 43  en = strlen(*pzC
7430: 6f 6c 6c 29 3b 0d 0a 20 20 20 20 20 20 69 66 20  oll);..      if 
7440: 28 20 6f 6e 45 72 72 6f 72 20 29 20 2a 6f 6e 45  ( onError ) *onE
7450: 72 72 6f 72 20 3d 20 70 49 64 78 2d 3e 6f 6e 45  rror = pIdx->onE
7460: 72 72 6f 72 3b 0d 0a 0d 0a 20 20 20 20 20 20 72  rror;....      r
7470: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b  eturn SQLITE_OK;
7480: 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a 20 20  ..    }..  }..  
7490: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52  return SQLITE_ER
74a0: 52 4f 52 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  ROR;..}....SQLIT
74b0: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49  E_API int WINAPI
74c0: 20 73 71 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63   sqlite3_table_c
74d0: 75 72 73 6f 72 5f 69 6e 74 65 72 6f 70 28 73 71  ursor_interop(sq
74e0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d  lite3_stmt *pstm
74f0: 74 2c 20 69 6e 74 20 69 44 62 2c 20 50 67 6e 6f  t, int iDb, Pgno
7500: 20 74 61 62 6c 65 52 6f 6f 74 50 61 67 65 29 0d   tableRootPage).
7510: 0a 7b 0d 0a 20 20 56 64 62 65 20 2a 70 20 3d 20  .{..  Vdbe *p = 
7520: 28 56 64 62 65 20 2a 29 70 73 74 6d 74 3b 0d 0a  (Vdbe *)pstmt;..
7530: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20    sqlite3 *db = 
7540: 28 70 20 3d 3d 20 4e 55 4c 4c 29 20 3f 20 4e 55  (p == NULL) ? NU
7550: 4c 4c 20 3a 20 70 2d 3e 64 62 3b 0d 0a 20 20 69  LL : p->db;..  i
7560: 6e 74 20 6e 3b 0d 0a 20 20 69 6e 74 20 72 65 74  nt n;..  int ret
7570: 20 3d 20 2d 31 3b 20 2f 2a 20 4e 4f 54 20 46 4f   = -1; /* NOT FO
7580: 55 4e 44 20 2a 2f 0d 0a 0d 0a 20 20 69 66 20 28  UND */....  if (
7590: 21 70 20 7c 7c 20 21 64 62 29 20 72 65 74 75 72  !p || !db) retur
75a0: 6e 20 72 65 74 3b 0d 0a 20 20 73 71 6c 69 74 65  n ret;..  sqlite
75b0: 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62  3_mutex_enter(db
75c0: 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 66 6f 72  ->mutex);..  for
75d0: 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 70 2d 3e   (n = 0; n < p->
75e0: 6e 43 75 72 73 6f 72 20 26 26 20 70 2d 3e 61 70  nCursor && p->ap
75f0: 43 73 72 5b 6e 5d 20 21 3d 20 4e 55 4c 4c 3b 20  Csr[n] != NULL; 
7600: 6e 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69  n++)..  {..    i
7610: 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e  f (p->apCsr[n]->
7620: 69 73 54 61 62 6c 65 20 3d 3d 20 30 29 20 63 6f  isTable == 0) co
7630: 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 20 69 66 20  ntinue;..    if 
7640: 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 69 44  (p->apCsr[n]->iD
7650: 62 20 21 3d 20 69 44 62 29 20 63 6f 6e 74 69 6e  b != iDb) contin
7660: 75 65 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f  ue;..#if SQLITE_
7670: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e  VERSION_NUMBER >
7680: 3d 20 33 30 31 30 30 30 30 0d 0a 20 20 20 20 69  = 3010000..    i
7690: 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e  f (p->apCsr[n]->
76a0: 75 63 2e 70 43 75 72 73 6f 72 2d 3e 70 67 6e 6f  uc.pCursor->pgno
76b0: 52 6f 6f 74 20 3d 3d 20 74 61 62 6c 65 52 6f 6f  Root == tableRoo
76c0: 74 50 61 67 65 29 0d 0a 23 65 6c 73 65 0d 0a 20  tPage)..#else.. 
76d0: 20 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b     if (p->apCsr[
76e0: 6e 5d 2d 3e 70 43 75 72 73 6f 72 2d 3e 70 67 6e  n]->pCursor->pgn
76f0: 6f 52 6f 6f 74 20 3d 3d 20 74 61 62 6c 65 52 6f  oRoot == tableRo
7700: 6f 74 50 61 67 65 29 0d 0a 23 65 6e 64 69 66 0d  otPage)..#endif.
7710: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65  .    {..      re
7720: 74 20 3d 20 6e 3b 0d 0a 20 20 20 20 20 20 62 72  t = n;..      br
7730: 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d  eak;..    }..  }
7740: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65  ..  sqlite3_mute
7750: 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65  x_leave(db->mute
7760: 78 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20  x);....  return 
7770: 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  ret;..}....SQLIT
7780: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49  E_API int WINAPI
7790: 20 73 71 6c 69 74 65 33 5f 63 75 72 73 6f 72 5f   sqlite3_cursor_
77a0: 72 6f 77 69 64 5f 69 6e 74 65 72 6f 70 28 73 71  rowid_interop(sq
77b0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d  lite3_stmt *pstm
77c0: 74 2c 20 69 6e 74 20 63 75 72 73 6f 72 2c 20 73  t, int cursor, s
77d0: 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 70 72 6f  qlite_int64 *pro
77e0: 77 69 64 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20  wid)..{..  Vdbe 
77f0: 2a 70 20 3d 20 28 56 64 62 65 20 2a 29 70 73 74  *p = (Vdbe *)pst
7800: 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a  mt;..  sqlite3 *
7810: 64 62 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29  db = (p == NULL)
7820: 20 3f 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b   ? NULL : p->db;
7830: 0d 0a 20 20 56 64 62 65 43 75 72 73 6f 72 20 2a  ..  VdbeCursor *
7840: 70 43 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f  pC;..#if SQLITE_
7850: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e  VERSION_NUMBER >
7860: 3d 20 33 30 31 31 30 30 30 0d 0a 20 20 69 6e 74  = 3011000..  int
7870: 20 70 32 20 3d 20 30 3b 0d 0a 23 65 6e 64 69 66   p2 = 0;..#endif
7880: 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20 53 51  ..  int ret = SQ
7890: 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20 69 66  LITE_OK;....  if
78a0: 20 28 21 70 20 7c 7c 20 21 64 62 29 20 72 65 74   (!p || !db) ret
78b0: 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52  urn SQLITE_ERROR
78c0: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74  ;..  sqlite3_mut
78d0: 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74  ex_enter(db->mut
78e0: 65 78 29 3b 0d 0a 20 20 77 68 69 6c 65 20 28 31  ex);..  while (1
78f0: 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 20 28  )..  {..    if (
7900: 63 75 72 73 6f 72 20 3c 20 30 20 7c 7c 20 63 75  cursor < 0 || cu
7910: 72 73 6f 72 20 3e 3d 20 70 2d 3e 6e 43 75 72 73  rsor >= p->nCurs
7920: 6f 72 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20  or)..    {..    
7930: 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45    ret = SQLITE_E
7940: 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 72 65  RROR;..      bre
7950: 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20  ak;..    }..    
7960: 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 63 75 72  if (p->apCsr[cur
7970: 73 6f 72 5d 20 3d 3d 20 4e 55 4c 4c 29 0d 0a 20  sor] == NULL).. 
7980: 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 20     {..      ret 
7990: 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d  = SQLITE_ERROR;.
79a0: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20  .      break;.. 
79b0: 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 70 43 20 3d     }....    pC =
79c0: 20 70 2d 3e 61 70 43 73 72 5b 63 75 72 73 6f 72   p->apCsr[cursor
79d0: 5d 3b 0d 0a 0d 0a 23 69 66 20 53 51 4c 49 54 45  ];....#if SQLITE
79e0: 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20  _VERSION_NUMBER 
79f0: 3e 3d 20 33 30 31 31 30 30 30 0d 0a 20 20 20 20  >= 3011000..    
7a00: 72 65 74 20 3d 20 73 71 6c 69 74 65 33 56 64 62  ret = sqlite3Vdb
7a10: 65 43 75 72 73 6f 72 4d 6f 76 65 74 6f 28 26 70  eCursorMoveto(&p
7a20: 43 2c 20 26 70 32 29 3b 0d 0a 23 65 6c 73 65 0d  C, &p2);..#else.
7a30: 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74  .    ret = sqlit
7a40: 65 33 56 64 62 65 43 75 72 73 6f 72 4d 6f 76 65  e3VdbeCursorMove
7a50: 74 6f 28 70 43 29 3b 0d 0a 23 65 6e 64 69 66 0d  to(pC);..#endif.
7a60: 0a 20 20 20 20 69 66 28 72 65 74 29 0d 0a 20 20  .    if(ret)..  
7a70: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 0d 0a 23 69      break;....#i
7a80: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e  f SQLITE_VERSION
7a90: 5f 4e 55 4d 42 45 52 20 3c 20 33 30 30 38 30 30  _NUMBER < 300800
7aa0: 37 0d 0a 20 20 20 20 69 66 28 70 43 2d 3e 72 6f  7..    if(pC->ro
7ab0: 77 69 64 49 73 56 61 6c 69 64 29 0d 0a 20 20 20  widIsValid)..   
7ac0: 20 7b 0d 0a 20 20 20 20 20 20 69 66 20 28 70 72   {..      if (pr
7ad0: 6f 77 69 64 29 20 2a 70 72 6f 77 69 64 20 3d 20  owid) *prowid = 
7ae0: 70 43 2d 3e 6c 61 73 74 52 6f 77 69 64 3b 0d 0a  pC->lastRowid;..
7af0: 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d      }..    else.
7b00: 0a 23 65 6e 64 69 66 0d 0a 23 69 66 20 53 51 4c  .#endif..#if SQL
7b10: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42  ITE_VERSION_NUMB
7b20: 45 52 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a 20  ER >= 3010000.. 
7b30: 20 20 20 69 66 28 70 43 2d 3e 75 63 2e 70 73 65     if(pC->uc.pse
7b40: 75 64 6f 54 61 62 6c 65 52 65 67 20 3e 20 30 29  udoTableReg > 0)
7b50: 0d 0a 23 65 6c 73 65 0d 0a 20 20 20 20 69 66 28  ..#else..    if(
7b60: 70 43 2d 3e 70 73 65 75 64 6f 54 61 62 6c 65 52  pC->pseudoTableR
7b70: 65 67 20 3e 20 30 29 0d 0a 23 65 6e 64 69 66 0d  eg > 0)..#endif.
7b80: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65  .    {..      re
7b90: 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52  t = SQLITE_ERROR
7ba0: 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d  ;..      break;.
7bb0: 0a 20 20 20 20 7d 0d 0a 23 69 66 20 53 51 4c 49  .    }..#if SQLI
7bc0: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45  TE_VERSION_NUMBE
7bd0: 52 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a 20 20  R >= 3010000..  
7be0: 20 20 65 6c 73 65 20 69 66 28 70 43 2d 3e 6e 75    else if(pC->nu
7bf0: 6c 6c 52 6f 77 20 7c 7c 20 70 43 2d 3e 75 63 2e  llRow || pC->uc.
7c00: 70 43 75 72 73 6f 72 3d 3d 30 29 0d 0a 23 65 6c  pCursor==0)..#el
7c10: 73 65 0d 0a 20 20 20 20 65 6c 73 65 20 69 66 28  se..    else if(
7c20: 70 43 2d 3e 6e 75 6c 6c 52 6f 77 20 7c 7c 20 70  pC->nullRow || p
7c30: 43 2d 3e 70 43 75 72 73 6f 72 3d 3d 30 29 0d 0a  C->pCursor==0)..
7c40: 23 65 6e 64 69 66 0d 0a 20 20 20 20 7b 0d 0a 20  #endif..    {.. 
7c50: 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54       ret = SQLIT
7c60: 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20  E_ERROR;..      
7c70: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20  break;..    }.. 
7c80: 20 20 20 65 6c 73 65 0d 0a 20 20 20 20 7b 0d 0a     else..    {..
7c90: 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49  #if SQLITE_VERSI
7ca0: 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 31  ON_NUMBER >= 301
7cb0: 30 30 30 30 0d 0a 20 20 20 20 20 20 69 66 20 28  0000..      if (
7cc0: 70 43 2d 3e 75 63 2e 70 43 75 72 73 6f 72 20 3d  pC->uc.pCursor =
7cd0: 3d 20 4e 55 4c 4c 29 0d 0a 23 65 6c 73 65 0d 0a  = NULL)..#else..
7ce0: 20 20 20 20 20 20 69 66 20 28 70 43 2d 3e 70 43        if (pC->pC
7cf0: 75 72 73 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d 0a  ursor == NULL)..
7d00: 23 65 6e 64 69 66 0d 0a 20 20 20 20 20 20 7b 0d  #endif..      {.
7d10: 0a 20 20 20 20 20 20 20 20 72 65 74 20 3d 20 53  .        ret = S
7d20: 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20  QLITE_ERROR;..  
7d30: 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20        break;..  
7d40: 20 20 20 20 7d 0d 0a 23 69 66 20 53 51 4c 49 54      }..#if SQLIT
7d50: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
7d60: 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a 20 20 20   >= 3010000..   
7d70: 20 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 4b     sqlite3BtreeK
7d80: 65 79 53 69 7a 65 28 70 43 2d 3e 75 63 2e 70 43  eySize(pC->uc.pC
7d90: 75 72 73 6f 72 2c 20 70 72 6f 77 69 64 29 3b 0d  ursor, prowid);.
7da0: 0a 23 65 6c 73 65 0d 0a 20 20 20 20 20 20 73 71  .#else..      sq
7db0: 6c 69 74 65 33 42 74 72 65 65 4b 65 79 53 69 7a  lite3BtreeKeySiz
7dc0: 65 28 70 43 2d 3e 70 43 75 72 73 6f 72 2c 20 70  e(pC->pCursor, p
7dd0: 72 6f 77 69 64 29 3b 0d 0a 23 65 6e 64 69 66 0d  rowid);..#endif.
7de0: 0a 20 20 20 20 20 20 69 66 20 28 70 72 6f 77 69  .      if (prowi
7df0: 64 29 20 2a 70 72 6f 77 69 64 20 3d 20 2a 70 72  d) *prowid = *pr
7e00: 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20  owid;..    }..  
7e10: 20 20 62 72 65 61 6b 3b 0d 0a 20 20 7d 0d 0a 20    break;..  }.. 
7e20: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c   sqlite3_mutex_l
7e30: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b  eave(db->mutex);
7e40: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74  ....  return ret
7e50: 3b 0d 0a 7d 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a  ;..}..../*******
7e60: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
7e70: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
7e80: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
7e90: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
7ea0: 2a 2a 2a 2a 2a 2a 2f 0d 0a 0d 0a 23 69 66 20 64  ******/....#if d
7eb0: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 43 4f  efined(SQLITE_CO
7ec0: 52 45 29 0d 0a 23 75 6e 64 65 66 20 53 51 4c 49  RE)..#undef SQLI
7ed0: 54 45 5f 43 4f 52 45 0d 0a 23 65 6e 64 69 66 0d  TE_CORE..#endif.
7ee0: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49  ...#if defined(I
7ef0: 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 4c 5f 54  NTEROP_VIRTUAL_T
7f00: 41 42 4c 45 29 20 26 26 20 53 51 4c 49 54 45 5f  ABLE) && SQLITE_
7f10: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e  VERSION_NUMBER >
7f20: 3d 20 33 30 30 34 30 30 31 0d 0a 23 69 6e 63 6c  = 3004001..#incl
7f30: 75 64 65 20 22 2e 2e 2f 65 78 74 2f 76 74 73 68  ude "../ext/vtsh
7f40: 69 6d 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d  im.c"..#endif...
7f50: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54  .#if defined(INT
7f60: 45 52 4f 50 5f 46 54 53 35 5f 45 58 54 45 4e 53  EROP_FTS5_EXTENS
7f70: 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 65 20 22  ION)..#include "
7f80: 2e 2e 2f 65 78 74 2f 66 74 73 35 2e 63 22 0d 0a  ../ext/fts5.c"..
7f90: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65  #endif....#if de
7fa0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4a 53  fined(INTEROP_JS
7fb0: 4f 4e 31 5f 45 58 54 45 4e 53 49 4f 4e 29 0d 0a  ON1_EXTENSION)..
7fc0: 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74  #include "../ext
7fd0: 2f 6a 73 6f 6e 31 2e 63 22 0d 0a 23 65 6e 64 69  /json1.c"..#endi
7fe0: 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  f....#if defined
7ff0: 28 49 4e 54 45 52 4f 50 5f 50 45 52 43 45 4e 54  (INTEROP_PERCENT
8000: 49 4c 45 5f 45 58 54 45 4e 53 49 4f 4e 29 0d 0a  ILE_EXTENSION)..
8010: 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74  #include "../ext
8020: 2f 70 65 72 63 65 6e 74 69 6c 65 2e 63 22 0d 0a  /percentile.c"..
8030: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65  #endif....#if de
8040: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 52 45  fined(INTEROP_RE
8050: 47 45 58 50 5f 45 58 54 45 4e 53 49 4f 4e 29 0d  GEXP_EXTENSION).
8060: 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78  .#include "../ex
8070: 74 2f 72 65 67 65 78 70 2e 63 22 0d 0a 23 65 6e  t/regexp.c"..#en
8080: 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  dif....#if defin
8090: 65 64 28 49 4e 54 45 52 4f 50 5f 54 4f 54 59 50  ed(INTEROP_TOTYP
80a0: 45 5f 45 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69  E_EXTENSION)..#i
80b0: 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 74  nclude "../ext/t
80c0: 6f 74 79 70 65 2e 63 22 0d 0a 23 65 6e 64 69 66  otype.c"..#endif
80d0: 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ..../***********
80e0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
80f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8100: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8110: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
8120: 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68  **/..../*..** Th
8130: 65 20 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45  e INTEROP_TEST_E
8140: 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63 6b 20 6d  XTENSION block m
8150: 75 73 74 20 62 65 20 61 74 20 74 68 65 20 65 6e  ust be at the en
8160: 64 20 6f 66 20 74 68 69 73 20 73 6f 75 72 63 65  d of this source
8170: 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63 61 75 73   file..** becaus
8180: 65 20 69 74 20 69 6e 63 6c 75 64 65 73 20 74 68  e it includes th
8190: 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e 68 22  e "sqlite3ext.h"
81a0: 20 66 69 6c 65 2c 20 77 68 69 63 68 20 64 65 66   file, which def
81b0: 69 6e 65 73 20 74 68 65 20 73 71 6c 69 74 65 33  ines the sqlite3
81c0: 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41 50 49 20  ..** public API 
81d0: 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 20 74  function names t
81e0: 6f 20 62 65 20 6d 61 63 72 6f 73 20 61 6e 64 20  o be macros and 
81f0: 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75 73 65  that would cause
8200: 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a 20 61 62   the code..** ab
8210: 6f 76 65 20 74 68 69 73 20 70 6f 69 6e 74 20 74  ove this point t
8220: 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e 2e 0d 0a  o malfunction...
8230: 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28  */..#if defined(
8240: 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45 58 54  INTEROP_TEST_EXT
8250: 45 4e 53 49 4f 4e 29 0d 0a 23 69 66 20 21 53 51  ENSION)..#if !SQ
8260: 4c 49 54 45 5f 4f 53 5f 57 49 4e 0d 0a 23 69 6e  LITE_OS_WIN..#in
8270: 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68 3e  clude <unistd.h>
8280: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 6e 63  ..#endif....#inc
8290: 6c 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 71  lude "../core/sq
82a0: 6c 69 74 65 33 65 78 74 2e 68 22 0d 0a 53 51 4c  lite3ext.h"..SQL
82b0: 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e  ITE_EXTENSION_IN
82c0: 49 54 31 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68  IT1..../*..** Th
82d0: 65 20 69 6e 74 65 72 6f 70 54 65 73 74 28 29 20  e interopTest() 
82e0: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 72 65 74  SQL function ret
82f0: 75 72 6e 73 20 69 74 73 20 66 69 72 73 74 20 61  urns its first a
8300: 72 67 75 6d 65 6e 74 20 6f 72 20 72 61 69 73 65  rgument or raise
8310: 73 20 61 6e 0d 0a 2a 2a 20 65 72 72 6f 72 20 69  s an..** error i
8320: 66 20 74 68 65 72 65 20 61 72 65 20 6e 6f 74 20  f there are not 
8330: 65 6e 6f 75 67 68 20 61 72 67 75 6d 65 6e 74 73  enough arguments
8340: 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 50 52  ...*/..SQLITE_PR
8350: 49 56 41 54 45 20 76 6f 69 64 20 69 6e 74 65 72  IVATE void inter
8360: 6f 70 54 65 73 74 46 75 6e 63 28 0d 0a 20 20 73  opTestFunc(..  s
8370: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
8380: 63 6f 6e 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20  context,..  int 
8390: 61 72 67 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33  argc,..  sqlite3
83a0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29  _value **argv..)
83b0: 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  {..  const unsig
83c0: 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0d 0a 20 20  ned char *z;..  
83d0: 69 66 28 20 61 72 67 63 21 3d 31 20 29 7b 0d 0a  if( argc!=1 ){..
83e0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
83f0: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
8400: 2c 20 22 6e 65 65 64 20 65 78 61 63 74 6c 79 20  , "need exactly 
8410: 6f 6e 65 20 61 72 67 75 6d 65 6e 74 22 2c 20 2d  one argument", -
8420: 31 29 3b 0d 0a 20 20 20 20 72 65 74 75 72 6e 3b  1);..    return;
8430: 0d 0a 20 20 7d 0d 0a 20 20 7a 20 3d 20 73 71 6c  ..  }..  z = sql
8440: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
8450: 61 72 67 76 5b 30 5d 29 3b 0d 0a 20 20 69 66 28  argv[0]);..  if(
8460: 20 7a 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74   z ){..    sqlit
8470: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
8480: 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a  ontext, (char*)z
8490: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41  , -1, SQLITE_STA
84a0: 54 49 43 29 3b 0d 0a 20 20 7d 65 6c 73 65 7b 0d  TIC);..  }else{.
84b0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
84c0: 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78 74  ult_null(context
84d0: 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d 0a 0d 0a 2f 2a  );..  }..}..../*
84e0: 0d 0a 2a 2a 20 54 68 65 20 69 6e 74 65 72 6f 70  ..** The interop
84f0: 53 6c 65 65 70 28 29 20 53 51 4c 20 66 75 6e 63  Sleep() SQL func
8500: 74 69 6f 6e 20 77 61 69 74 73 20 74 68 65 20 73  tion waits the s
8510: 70 65 63 69 66 69 65 64 20 6e 75 6d 62 65 72 20  pecified number 
8520: 6f 66 20 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 0d  of milliseconds.
8530: 0a 2a 2a 20 6f 72 20 72 61 69 73 65 73 20 61 6e  .** or raises an
8540: 20 65 72 72 6f 72 20 69 66 20 74 68 65 72 65 20   error if there 
8550: 61 72 65 20 6e 6f 74 20 65 6e 6f 75 67 68 20 61  are not enough a
8560: 72 67 75 6d 65 6e 74 73 2e 0d 0a 2a 2f 0d 0a 53  rguments...*/..S
8570: 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f  QLITE_PRIVATE vo
8580: 69 64 20 69 6e 74 65 72 6f 70 53 6c 65 65 70 46  id interopSleepF
8590: 75 6e 63 28 0d 0a 20 20 73 71 6c 69 74 65 33 5f  unc(..  sqlite3_
85a0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
85b0: 2c 0d 0a 20 20 69 6e 74 20 61 72 67 63 2c 0d 0a  ,..  int argc,..
85c0: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
85d0: 2a 2a 61 72 67 76 0d 0a 29 7b 0d 0a 20 20 69 6e  **argv..){..  in
85e0: 74 20 6d 3b 0d 0a 20 20 69 66 28 20 61 72 67 63  t m;..  if( argc
85f0: 21 3d 31 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69  !=1 ){..    sqli
8600: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
8610: 28 63 6f 6e 74 65 78 74 2c 20 22 6e 65 65 64 20  (context, "need 
8620: 65 78 61 63 74 6c 79 20 6f 6e 65 20 61 72 67 75  exactly one argu
8630: 6d 65 6e 74 22 2c 20 2d 31 29 3b 0d 0a 20 20 20  ment", -1);..   
8640: 20 72 65 74 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20   return;..  }.. 
8650: 20 6d 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   m = sqlite3_val
8660: 75 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b  ue_int(argv[0]);
8670: 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 4f 53 5f  ..#if SQLITE_OS_
8680: 57 49 4e 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f  WIN..#if SQLITE_
8690: 4f 53 5f 57 49 4e 43 45 0d 0a 20 20 53 6c 65 65  OS_WINCE..  Slee
86a0: 70 28 6d 29 3b 0d 0a 20 20 73 71 6c 69 74 65 33  p(m);..  sqlite3
86b0: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
86c0: 65 78 74 2c 20 57 41 49 54 5f 4f 42 4a 45 43 54  ext, WAIT_OBJECT
86d0: 5f 30 29 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 73  _0);..#else..  s
86e0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
86f0: 74 28 63 6f 6e 74 65 78 74 2c 20 53 6c 65 65 70  t(context, Sleep
8700: 45 78 28 6d 2c 20 54 52 55 45 29 29 3b 0d 0a 23  Ex(m, TRUE));..#
8710: 65 6e 64 69 66 0d 0a 23 65 6c 73 65 0d 0a 20 20  endif..#else..  
8720: 69 66 28 20 6d 3e 30 20 29 7b 0d 0a 20 20 20 20  if( m>0 ){..    
8730: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
8740: 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 73 6c  nt64(context, sl
8750: 65 65 70 28 28 75 6e 73 69 67 6e 65 64 29 6d 29  eep((unsigned)m)
8760: 29 3b 0d 0a 20 20 7d 65 6c 73 65 7b 0d 0a 20 20  );..  }else{..  
8770: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
8780: 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0d  _null(context);.
8790: 0a 20 20 7d 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d  .  }..#endif..}.
87a0: 0a 0d 0a 2f 2a 20 53 51 4c 69 74 65 20 69 6e 76  .../* SQLite inv
87b0: 6f 6b 65 73 20 74 68 69 73 20 72 6f 75 74 69 6e  okes this routin
87c0: 65 20 6f 6e 63 65 20 77 68 65 6e 20 69 74 20 6c  e once when it l
87d0: 6f 61 64 73 20 74 68 65 20 65 78 74 65 6e 73 69  oads the extensi
87e0: 6f 6e 2e 0d 0a 2a 2a 20 43 72 65 61 74 65 20 6e  on...** Create n
87f0: 65 77 20 66 75 6e 63 74 69 6f 6e 73 2c 20 63 6f  ew functions, co
8800: 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65  llating sequence
8810: 73 2c 20 61 6e 64 20 76 69 72 74 75 61 6c 20 74  s, and virtual t
8820: 61 62 6c 65 0d 0a 2a 2a 20 6d 6f 64 75 6c 65 73  able..** modules
8830: 20 68 65 72 65 2e 20 20 54 68 69 73 20 69 73 20   here.  This is 
8840: 75 73 75 61 6c 6c 79 20 74 68 65 20 6f 6e 6c 79  usually the only
8850: 20 65 78 70 6f 72 74 65 64 20 73 79 6d 62 6f 6c   exported symbol
8860: 20 69 6e 0d 0a 2a 2a 20 74 68 65 20 73 68 61 72   in..** the shar
8870: 65 64 20 6c 69 62 72 61 72 79 2e 0d 0a 2a 2f 0d  ed library...*/.
8880: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
8890: 69 6e 74 65 72 6f 70 5f 74 65 73 74 5f 65 78 74  interop_test_ext
88a0: 65 6e 73 69 6f 6e 5f 69 6e 69 74 28 0d 0a 20 20  ension_init(..  
88b0: 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d 0a 20 20  sqlite3 *db,..  
88c0: 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d 73 67 2c  char **pzErrMsg,
88d0: 0d 0a 20 20 63 6f 6e 73 74 20 73 71 6c 69 74 65  ..  const sqlite
88e0: 33 5f 61 70 69 5f 72 6f 75 74 69 6e 65 73 20 2a  3_api_routines *
88f0: 70 41 70 69 0d 0a 29 7b 0d 0a 20 20 69 6e 74 20  pApi..){..  int 
8900: 72 63 3b 0d 0a 20 20 53 51 4c 49 54 45 5f 45 58  rc;..  SQLITE_EX
8910: 54 45 4e 53 49 4f 4e 5f 49 4e 49 54 32 28 70 41  TENSION_INIT2(pA
8920: 70 69 29 0d 0a 20 20 72 63 20 3d 20 73 71 6c 69  pi)..  rc = sqli
8930: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74  te3_create_funct
8940: 69 6f 6e 28 64 62 2c 20 22 69 6e 74 65 72 6f 70  ion(db, "interop
8950: 54 65 73 74 22 2c 20 2d 31 2c 20 53 51 4c 49 54  Test", -1, SQLIT
8960: 45 5f 41 4e 59 2c 20 30 2c 0d 0a 20 20 20 20 20  E_ANY, 0,..     
8970: 20 69 6e 74 65 72 6f 70 54 65 73 74 46 75 6e 63   interopTestFunc
8980: 2c 20 30 2c 20 30 29 3b 0d 0a 20 20 69 66 28 20  , 0, 0);..  if( 
8990: 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b  rc==SQLITE_OK ){
89a0: 0d 0a 20 20 20 20 72 63 20 3d 20 73 71 6c 69 74  ..    rc = sqlit
89b0: 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69  e3_create_functi
89c0: 6f 6e 28 64 62 2c 20 22 69 6e 74 65 72 6f 70 53  on(db, "interopS
89d0: 6c 65 65 70 22 2c 20 31 2c 20 53 51 4c 49 54 45  leep", 1, SQLITE
89e0: 5f 41 4e 59 2c 20 30 2c 0d 0a 20 20 20 20 20 20  _ANY, 0,..      
89f0: 20 20 69 6e 74 65 72 6f 70 53 6c 65 65 70 46 75    interopSleepFu
8a00: 6e 63 2c 20 30 2c 20 30 29 3b 0d 0a 20 20 7d 0d  nc, 0, 0);..  }.
8a10: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0d 0a 7d  .  return rc;..}
8a20: 0d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49  ..#endif /* SQLI
8a30: 54 45 5f 4f 53 5f 57 49 4e 20 2a 2f 0d 0a        TE_OS_WIN */..