System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact d069e2c02955d3fd7609601a729fce875508d03e:


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 20 0d 0a  soft.com).. * ..
00b0: 20 2a 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74   * Released to t
00c0: 68 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e  he public domain
00d0: 2c 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77  , use at your ow
00e0: 6e 20 72 69 73 6b 21 0d 0a 20 2a 2a 2a 2a 2a 2a  n 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 2a 2f 0d 0a 0d 0a 23 64 65 66 69 6e 65 20 53  **/....#define S
0130: 51 4c 49 54 45 5f 41 50 49 20 5f 5f 64 65 63 6c  QLITE_API __decl
0140: 73 70 65 63 28 64 6c 6c 65 78 70 6f 72 74 29 0d  spec(dllexport).
0150: 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f  ...#include "../
0160: 63 6f 72 65 2f 73 71 6c 69 74 65 33 2e 63 22 0d  core/sqlite3.c".
0170: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49  ...#if defined(I
0180: 4e 54 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e  NTEROP_EXTENSION
0190: 5f 46 55 4e 43 54 49 4f 4e 53 29 0d 0a 23 69 6e  _FUNCTIONS)..#in
01a0: 63 6c 75 64 65 20 22 2e 2e 2f 63 6f 6e 74 72 69  clude "../contri
01b0: 62 2f 65 78 74 65 6e 73 69 6f 6e 2d 66 75 6e 63  b/extension-func
01c0: 74 69 6f 6e 73 2e 63 22 0d 0a 65 78 74 65 72 6e  tions.c"..extern
01d0: 20 69 6e 74 20 52 65 67 69 73 74 65 72 45 78 74   int RegisterExt
01e0: 65 6e 73 69 6f 6e 46 75 6e 63 74 69 6f 6e 73 28  ensionFunctions(
01f0: 73 71 6c 69 74 65 33 20 2a 64 62 29 3b 0d 0a 23  sqlite3 *db);..#
0200: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 64 65 66 20  endif....#ifdef 
0210: 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 0d 0a 23  SQLITE_OS_WIN..#
0220: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
0230: 4f 50 5f 43 4f 44 45 43 29 0d 0a 23 69 6e 63 6c  OP_CODEC)..#incl
0240: 75 64 65 20 22 63 72 79 70 74 2e 63 22 0d 0a 23  ude "crypt.c"..#
0250: 65 6e 64 69 66 0d 0a 0d 0a 23 64 65 66 69 6e 65  endif....#define
0260: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4e   INTEROP_DEBUG_N
0270: 4f 4e 45 20 20 20 20 20 20 20 20 20 20 20 28 30  ONE           (0
0280: 78 30 30 30 30 29 0d 0a 23 64 65 66 69 6e 65 20  x0000)..#define 
0290: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c  INTEROP_DEBUG_CL
02a0: 4f 53 45 20 20 20 20 20 20 20 20 20 20 28 30 78  OSE          (0x
02b0: 30 30 30 31 29 0d 0a 23 64 65 66 69 6e 65 20 49  0001)..#define I
02c0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e  NTEROP_DEBUG_FIN
02d0: 41 4c 49 5a 45 20 20 20 20 20 20 20 28 30 78 30  ALIZE       (0x0
02e0: 30 30 32 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e  002)..#define IN
02f0: 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 41 43 4b  TEROP_DEBUG_BACK
0300: 55 50 5f 46 49 4e 49 53 48 20 20 28 30 78 30 30  UP_FINISH  (0x00
0310: 30 34 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54  04)..#define INT
0320: 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 20  EROP_DEBUG_OPEN 
0330: 20 20 20 20 20 20 20 20 20 20 28 30 78 30 30 30            (0x000
0340: 38 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45  8)..#define INTE
0350: 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 31 36  ROP_DEBUG_OPEN16
0360: 20 20 20 20 20 20 20 20 20 28 30 78 30 30 31 30           (0x0010
0370: 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52  )..#define INTER
0380: 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45  OP_DEBUG_PREPARE
0390: 20 20 20 20 20 20 20 20 28 30 78 30 30 32 30 29          (0x0020)
03a0: 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f  ..#define INTERO
03b0: 50 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 31  P_DEBUG_PREPARE1
03c0: 36 20 20 20 20 20 20 28 30 78 30 30 34 30 29 0d  6      (0x0040).
03d0: 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50  .#define INTEROP
03e0: 5f 44 45 42 55 47 5f 52 45 53 45 54 20 20 20 20  _DEBUG_RESET    
03f0: 20 20 20 20 20 20 28 30 78 30 30 38 30 29 0d 0a        (0x0080)..
0400: 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f  #define INTEROP_
0410: 44 45 42 55 47 5f 43 48 41 4e 47 45 53 20 20 20  DEBUG_CHANGES   
0420: 20 20 20 20 20 28 30 78 30 31 30 30 29 0d 0a 23       (0x0100)..#
0430: 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44  define INTEROP_D
0440: 45 42 55 47 5f 42 52 45 41 4b 20 20 20 20 20 20  EBUG_BREAK      
0450: 20 20 20 20 28 30 78 30 32 30 30 29 0d 0a 0d 0a      (0x0200)....
0460: 23 69 66 20 64 65 66 69 6e 65 64 28 5f 4d 53 43  #if defined(_MSC
0470: 5f 56 45 52 29 20 26 26 20 64 65 66 69 6e 65 64  _VER) && defined
0480: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20  (INTEROP_DEBUG) 
0490: 26 26 20 5c 0d 0a 20 20 20 20 28 49 4e 54 45 52  && \..    (INTER
04a0: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52  OP_DEBUG & INTER
04b0: 4f 50 5f 44 45 42 55 47 5f 42 52 45 41 4b 29 0d  OP_DEBUG_BREAK).
04c0: 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 74 65 33  .#define sqlite3
04d0: 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 61 29 20  InteropBreak(a) 
04e0: 7b 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70  { sqlite3Interop
04f0: 44 65 62 75 67 28 22 25 73 5c 6e 22 2c 20 28 61  Debug("%s\n", (a
0500: 29 29 3b 20 5f 5f 64 65 62 75 67 62 72 65 61 6b  )); __debugbreak
0510: 28 29 3b 20 7d 0d 0a 23 65 6c 73 65 0d 0a 23 64  (); }..#else..#d
0520: 65 66 69 6e 65 20 73 71 6c 69 74 65 33 49 6e 74  efine sqlite3Int
0530: 65 72 6f 70 42 72 65 61 6b 28 61 29 0d 0a 23 65  eropBreak(a)..#e
0540: 6e 64 69 66 0d 0a 0d 0a 74 79 70 65 64 65 66 20  ndif....typedef 
0550: 76 6f 69 64 20 28 2a 53 51 4c 49 54 45 55 53 45  void (*SQLITEUSE
0560: 52 46 55 4e 43 29 28 73 71 6c 69 74 65 33 5f 63  RFUNC)(sqlite3_c
0570: 6f 6e 74 65 78 74 20 2a 2c 20 69 6e 74 2c 20 73  ontext *, int, s
0580: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 29  qlite3_value **)
0590: 3b 0d 0a 74 79 70 65 64 65 66 20 76 6f 69 64 20  ;..typedef void 
05a0: 28 2a 53 51 4c 49 54 45 46 55 4e 43 46 49 4e 41  (*SQLITEFUNCFINA
05b0: 4c 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  L)(sqlite3_conte
05c0: 78 74 20 2a 29 3b 0d 0a 0d 0a 23 69 66 20 64 65  xt *);....#if de
05d0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
05e0: 42 55 47 29 20 7c 7c 20 64 65 66 69 6e 65 64 28  BUG) || defined(
05f0: 49 4e 54 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51  INTEROP_LOG)..SQ
0600: 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69  LITE_PRIVATE voi
0610: 64 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70  d sqlite3Interop
0620: 44 65 62 75 67 28 63 6f 6e 73 74 20 63 68 61 72  Debug(const char
0630: 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b   *zFormat, ...){
0640: 0d 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 20  ..  va_list ap; 
0650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0660: 20 20 20 20 20 20 20 20 2f 2a 20 56 61 72 61 72          /* Varar
0670: 67 20 6c 69 73 74 20 2a 2f 0d 0a 20 20 53 74 72  g list */..  Str
0680: 41 63 63 75 6d 20 61 63 63 3b 20 20 20 20 20 20  Accum acc;      
0690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
06a0: 20 2f 2a 20 53 74 72 69 6e 67 20 61 63 63 75 6d   /* String accum
06b0: 75 6c 61 74 6f 72 20 2a 2f 0a 20 20 63 68 61 72  ulator */.  char
06c0: 20 7a 4d 73 67 5b 53 51 4c 49 54 45 5f 50 52 49   zMsg[SQLITE_PRI
06d0: 4e 54 5f 42 55 46 5f 53 49 5a 45 2a 33 5d 3b 20  NT_BUF_SIZE*3]; 
06e0: 2f 2a 20 43 6f 6d 70 6c 65 74 65 20 6c 6f 67 20  /* Complete log 
06f0: 6d 65 73 73 61 67 65 20 2a 2f 0d 0a 20 20 76 61  message */..  va
0700: 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d  _start(ap, zForm
0710: 61 74 29 3b 0a 20 20 73 71 6c 69 74 65 33 53 74  at);.  sqlite3St
0720: 72 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 2c  rAccumInit(&acc,
0730: 20 7a 4d 73 67 2c 20 73 69 7a 65 6f 66 28 7a 4d   zMsg, sizeof(zM
0740: 73 67 29 2c 20 30 29 3b 0a 20 20 61 63 63 2e 75  sg), 0);.  acc.u
0750: 73 65 4d 61 6c 6c 6f 63 20 3d 20 30 3b 0a 20 20  seMalloc = 0;.  
0760: 73 71 6c 69 74 65 33 56 58 50 72 69 6e 74 66 28  sqlite3VXPrintf(
0770: 26 61 63 63 2c 20 30 2c 20 7a 46 6f 72 6d 61 74  &acc, 0, zFormat
0780: 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28  , ap);.  va_end(
0790: 61 70 29 3b 0a 23 69 66 20 53 51 4c 49 54 45 5f  ap);.#if SQLITE_
07a0: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e  VERSION_NUMBER >
07b0: 3d 20 33 30 30 37 30 31 33 0a 20 20 73 71 6c 69  = 3007013.  sqli
07c0: 74 65 33 5f 77 69 6e 33 32 5f 77 72 69 74 65 5f  te3_win32_write_
07d0: 64 65 62 75 67 28 73 71 6c 69 74 65 33 53 74 72  debug(sqlite3Str
07e0: 41 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63  AccumFinish(&acc
07f0: 29 2c 20 2d 31 29 3b 0a 23 65 6c 69 66 20 64 65  ), -1);.#elif de
0800: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 57 49 4e  fined(SQLITE_WIN
0810: 33 32 5f 48 41 53 5f 41 4e 53 49 29 0a 20 20 4f  32_HAS_ANSI).  O
0820: 75 74 70 75 74 44 65 62 75 67 53 74 72 69 6e 67  utputDebugString
0830: 41 28 73 71 6c 69 74 65 33 53 74 72 41 63 63 75  A(sqlite3StrAccu
0840: 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0a  mFinish(&acc));.
0850: 23 65 6c 69 66 20 64 65 66 69 6e 65 64 28 53 51  #elif defined(SQ
0860: 4c 49 54 45 5f 57 49 4e 33 32 5f 48 41 53 5f 57  LITE_WIN32_HAS_W
0870: 49 44 45 29 0a 20 20 7b 0a 20 20 20 20 4c 50 57  IDE).  {.    LPW
0880: 53 54 52 20 7a 57 69 64 65 4d 73 67 20 3d 20 75  STR zWideMsg = u
0890: 74 66 38 54 6f 55 6e 69 63 6f 64 65 28 73 71 6c  tf8ToUnicode(sql
08a0: 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69  ite3StrAccumFini
08b0: 73 68 28 26 61 63 63 29 29 3b 0a 20 20 20 20 69  sh(&acc));.    i
08c0: 66 28 20 7a 57 69 64 65 4d 73 67 20 29 7b 0a 20  f( zWideMsg ){. 
08d0: 20 20 20 20 20 4f 75 74 70 75 74 44 65 62 75 67       OutputDebug
08e0: 53 74 72 69 6e 67 57 28 7a 57 69 64 65 4d 73 67  StringW(zWideMsg
08f0: 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  );.      sqlite3
0900: 5f 66 72 65 65 28 7a 57 69 64 65 4d 73 67 29 3b  _free(zWideMsg);
0910: 0a 20 20 20 20 7d 0a 20 20 7d 0a 23 65 6c 73 65  .    }.  }.#else
0920: 0a 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72  .  fprintf(stder
0930: 72 2c 20 22 25 73 22 2c 20 73 71 6c 69 74 65 33  r, "%s", sqlite3
0940: 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 26  StrAccumFinish(&
0950: 61 63 63 29 29 3b 0a 23 65 6e 64 69 66 0a 7d 0d  acc));.#endif.}.
0960: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64  .#endif....#if d
0970: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c  efined(INTEROP_L
0980: 4f 47 29 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56  OG)..SQLITE_PRIV
0990: 41 54 45 20 69 6e 74 20 6c 6f 67 43 6f 6e 66 69  ATE int logConfi
09a0: 67 75 72 65 64 20 3d 20 30 3b 0d 0a 0d 0a 53 51  gured = 0;....SQ
09b0: 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69  LITE_PRIVATE voi
09c0: 64 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70  d sqlite3Interop
09d0: 4c 6f 67 43 61 6c 6c 62 61 63 6b 28 76 6f 69 64  LogCallback(void
09e0: 20 2a 70 41 72 67 2c 20 69 6e 74 20 69 43 6f 64   *pArg, int iCod
09f0: 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  e, const char *z
0a00: 4d 73 67 29 7b 0d 0a 20 20 73 71 6c 69 74 65 33  Msg){..  sqlite3
0a10: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 49 4e  InteropDebug("IN
0a20: 54 45 52 4f 50 5f 4c 4f 47 20 28 25 64 29 20 25  TEROP_LOG (%d) %
0a30: 73 5c 6e 22 2c 20 69 43 6f 64 65 2c 20 7a 4d 73  s\n", iCode, zMs
0a40: 67 29 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a  g);..}..#endif..
0a50: 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52  ..#if SQLITE_VER
0a60: 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 30  SION_NUMBER < 30
0a70: 30 37 30 31 34 0d 0a 53 51 4c 49 54 45 5f 50 52  07014..SQLITE_PR
0a80: 49 56 41 54 45 20 76 6f 69 64 20 2a 20 73 71 6c  IVATE void * sql
0a90: 69 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f  ite3DbMallocZero
0aa0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
0ab0: 20 2a 64 62 2c 20 69 6e 74 20 6e 29 0d 0a 7b 0d   *db, int n)..{.
0ac0: 0a 20 20 76 6f 69 64 20 2a 70 3b 0d 0a 20 20 69  .  void *p;..  i
0ad0: 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71  f (db) {..    sq
0ae0: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65  lite3_mutex_ente
0af0: 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20  r(db->mutex);.. 
0b00: 20 7d 0d 0a 20 20 70 20 3d 20 73 71 6c 69 74 65   }..  p = sqlite
0b10: 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 28 64 62  3DbMallocZero(db
0b20: 2c 6e 29 3b 0d 0a 20 20 69 66 20 28 64 62 29 20  ,n);..  if (db) 
0b30: 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d  {..    sqlite3_m
0b40: 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d  utex_leave(db->m
0b50: 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 72  utex);..  }..  r
0b60: 65 74 75 72 6e 20 70 3b 0d 0a 7d 0d 0a 0d 0a 53  eturn p;..}....S
0b70: 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f  QLITE_PRIVATE vo
0b80: 69 64 20 73 71 6c 69 74 65 33 44 62 46 72 65 65  id sqlite3DbFree
0b90: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
0ba0: 20 2a 64 62 2c 20 76 6f 69 64 20 2a 70 29 0d 0a   *db, void *p)..
0bb0: 7b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d 0a  {..  if (db) {..
0bc0: 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65      sqlite3_mute
0bd0: 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65  x_enter(db->mute
0be0: 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 69 66 20 28  x);..  }..  if (
0bf0: 70 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65  p) {..    sqlite
0c00: 33 4d 65 6d 64 65 62 75 67 53 65 74 54 79 70 65  3MemdebugSetType
0c10: 28 70 2c 20 4d 45 4d 54 59 50 45 5f 44 42 7c 4d  (p, MEMTYPE_DB|M
0c20: 45 4d 54 59 50 45 5f 48 45 41 50 29 3b 0d 0a 20  EMTYPE_HEAP);.. 
0c30: 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 44 62 46   }..  sqlite3DbF
0c40: 72 65 65 28 64 62 2c 70 29 3b 0d 0a 20 20 69 66  ree(db,p);..  if
0c50: 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71 6c   (db) {..    sql
0c60: 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65  ite3_mutex_leave
0c70: 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20  (db->mutex);..  
0c80: 7d 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a  }..}..#endif....
0c90: 2f 2a 0d 0a 20 20 20 20 54 68 65 20 67 6f 61 6c  /*..    The goal
0ca0: 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f 6e   of this version
0cb0: 20 6f 66 20 63 6c 6f 73 65 20 69 73 20 64 69 66   of close is dif
0cc0: 66 65 72 65 6e 74 20 74 68 61 6e 20 74 68 61 74  ferent than that
0cd0: 20 6f 66 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73   of sqlite3_clos
0ce0: 65 28 29 2c 20 61 6e 64 20 69 73 20 64 65 73 69  e(), and is desi
0cf0: 67 6e 65 64 20 74 6f 20 6c 65 6e 64 20 69 74 73  gned to lend its
0d00: 65 6c 66 20 62 65 74 74 65 72 20 74 6f 20 2e 4e  elf better to .N
0d10: 45 54 27 73 20 6e 6f 6e 2d 64 65 74 65 72 6d 69  ET's non-determi
0d20: 6e 69 73 74 69 63 20 66 69 6e 61 6c 69 7a 65 72  nistic finalizer
0d30: 73 20 61 6e 64 0d 0a 20 20 20 20 74 68 65 20 47  s and..    the G
0d40: 43 20 74 68 72 65 61 64 2e 20 20 53 51 4c 69 74  C thread.  SQLit
0d50: 65 20 77 69 6c 6c 20 6e 6f 74 20 63 6c 6f 73 65  e will not close
0d60: 20 61 20 64 61 74 61 62 61 73 65 20 69 66 20 73   a database if s
0d70: 74 61 74 65 6d 65 6e 74 73 20 61 72 65 20 6f 70  tatements are op
0d80: 65 6e 20 6f 6e 20 69 74 20 2d 2d 20 62 75 74 20  en on it -- but 
0d90: 66 6f 72 20 6f 75 72 20 70 75 72 70 6f 73 65 73  for our purposes
0da0: 2c 20 77 65 27 64 20 72 61 74 68 65 72 20 66 69  , we'd rather fi
0db0: 6e 61 6c 69 7a 65 20 61 6c 6c 20 61 63 74 69 76  nalize all activ
0dc0: 65 20 73 74 61 74 65 6d 65 6e 74 73 0d 0a 20 20  e statements..  
0dd0: 20 20 61 6e 64 20 66 6f 72 63 69 62 6c 79 20 63    and forcibly c
0de0: 6c 6f 73 65 20 74 68 65 20 64 61 74 61 62 61 73  lose the databas
0df0: 65 2e 20 20 54 68 65 20 72 65 61 73 6f 6e 20 69  e.  The reason i
0e00: 73 20 73 69 6d 70 6c 65 20 2d 2d 20 61 20 6c 6f  s simple -- a lo
0e10: 74 20 6f 66 20 70 65 6f 70 6c 65 20 64 6f 6e 27  t of people don'
0e20: 74 20 44 69 73 70 6f 73 65 28 29 20 6f 66 20 74  t Dispose() of t
0e30: 68 65 69 72 20 6f 62 6a 65 63 74 73 20 63 6f 72  heir objects cor
0e40: 72 65 63 74 6c 79 20 61 6e 64 20 6c 65 74 20 74  rectly and let t
0e50: 68 65 20 67 61 72 62 61 67 65 20 63 6f 6c 6c 65  he garbage colle
0e60: 63 74 6f 72 0d 0a 20 20 20 20 64 6f 20 69 74 2e  ctor..    do it.
0e70: 20 20 54 68 69 73 20 6c 65 61 64 73 20 74 6f 20    This leads to 
0e80: 75 6e 65 78 70 65 63 74 65 64 20 62 65 68 61 76  unexpected behav
0e90: 69 6f 72 20 77 68 65 6e 20 61 20 75 73 65 72 20  ior when a user 
0ea0: 74 68 69 6e 6b 73 20 74 68 65 79 27 76 65 20 63  thinks they've c
0eb0: 6c 6f 73 65 64 20 61 20 64 61 74 61 62 61 73 65  losed a database
0ec0: 2c 20 62 75 74 20 69 74 27 73 20 73 74 69 6c 6c  , but it's still
0ed0: 20 6f 70 65 6e 20 62 65 63 61 75 73 65 20 6e 6f   open because no
0ee0: 74 20 61 6c 6c 20 74 68 65 20 73 74 61 74 65 6d  t all the statem
0ef0: 65 6e 74 73 20 68 61 76 65 0d 0a 20 20 20 20 68  ents have..    h
0f00: 69 74 20 74 68 65 20 47 43 20 79 65 74 2e 0d 0a  it the GC yet...
0f10: 0d 0a 20 20 20 20 53 6f 2c 20 68 65 72 65 20 77  ..    So, here w
0f20: 65 20 68 61 76 65 20 61 20 70 72 6f 62 6c 65 6d  e have a problem
0f30: 20 2e 2e 2e 20 2e 4e 45 54 20 68 61 73 20 61 20   ... .NET has a 
0f40: 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 79 20 6e  pointer to any n
0f50: 75 6d 62 65 72 20 6f 66 20 73 71 6c 69 74 65 33  umber of sqlite3
0f60: 5f 73 74 6d 74 20 6f 62 6a 65 63 74 73 2e 20 20  _stmt objects.  
0f70: 57 65 20 63 61 6e 27 74 20 63 61 6c 6c 20 73 71  We can't call sq
0f80: 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 29  lite3_finalize()
0f90: 20 6f 6e 20 74 68 65 73 65 20 62 65 63 61 75 73   on these becaus
0fa0: 65 0d 0a 20 20 20 20 74 68 65 69 72 20 6d 65 6d  e..    their mem
0fb0: 6f 72 79 20 69 73 20 66 72 65 65 64 20 61 6e 64  ory is freed and
0fc0: 20 63 61 6e 20 62 65 20 75 73 65 64 20 66 6f 72   can be used for
0fd0: 20 73 6f 6d 65 74 68 69 6e 67 20 65 6c 73 65 2e   something else.
0fe0: 20 20 54 68 65 20 47 43 20 74 68 72 65 61 64 20    The GC thread 
0ff0: 63 6f 75 6c 64 20 70 6f 74 65 6e 74 69 61 6c 6c  could potentiall
1000: 79 20 74 72 79 20 61 6e 64 20 63 61 6c 6c 20 66  y try and call f
1010: 69 6e 61 6c 69 7a 65 20 61 67 61 69 6e 20 6f 6e  inalize again on
1020: 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 20 61   the statement a
1030: 66 74 65 72 0d 0a 20 20 20 20 74 68 61 74 20 6d  fter..    that m
1040: 65 6d 6f 72 79 20 77 61 73 20 64 65 61 6c 6c 6f  emory was deallo
1050: 63 61 74 65 64 2e 20 20 42 41 44 2e 20 20 53 6f  cated.  BAD.  So
1060: 2c 20 77 68 61 74 20 77 65 20 6e 65 65 64 20 74  , what we need t
1070: 6f 20 64 6f 20 69 73 20 6d 61 6b 65 20 61 20 63  o do is make a c
1080: 6f 70 79 20 6f 66 20 65 61 63 68 20 73 74 61 74  opy of each stat
1090: 65 6d 65 6e 74 2c 20 61 6e 64 20 63 61 6c 6c 20  ement, and call 
10a0: 66 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74 68  finalize() on th
10b0: 65 20 63 6f 70 79 20 2d 2d 20 73 6f 20 74 68 61  e copy -- so tha
10c0: 74 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 0d 0a  t the original..
10d0: 20 20 20 20 73 74 61 74 65 6d 65 6e 74 27 73 20      statement's 
10e0: 6d 65 6d 6f 72 79 20 69 73 20 70 72 65 73 65 72  memory is preser
10f0: 76 65 64 2c 20 61 6e 64 20 6d 61 72 6b 65 64 20  ved, and marked 
1100: 61 73 20 42 41 44 2c 20 62 75 74 20 77 65 20 63  as BAD, but we c
1110: 61 6e 20 73 74 69 6c 6c 20 6d 61 6e 61 67 65 20  an still manage 
1120: 74 6f 20 66 69 6e 61 6c 69 7a 65 20 65 76 65 72  to finalize ever
1130: 79 74 68 69 6e 67 20 61 6e 64 20 66 6f 72 63 69  ything and forci
1140: 62 6c 79 20 63 6c 6f 73 65 20 74 68 65 20 64 61  bly close the da
1150: 74 61 62 61 73 65 2e 20 20 4c 61 74 65 72 20 77  tabase.  Later w
1160: 68 65 6e 20 74 68 65 20 0d 0a 20 20 20 20 47 43  hen the ..    GC
1170: 20 67 65 74 73 20 61 72 6f 75 6e 64 20 74 6f 20   gets around to 
1180: 63 61 6c 6c 69 6e 67 20 66 69 6e 61 6c 69 7a 65  calling finalize
1190: 5f 69 6e 74 65 72 6f 70 28 29 20 6f 6e 20 74 68  _interop() on th
11a0: 65 20 22 62 61 64 22 20 73 74 61 74 65 6d 65 6e  e "bad" statemen
11b0: 74 2c 20 77 65 20 64 65 74 65 63 74 20 74 68 61  t, we detect tha
11c0: 74 20 61 6e 64 20 66 69 6e 69 73 68 20 64 65 61  t and finish dea
11d0: 6c 6c 6f 63 61 74 69 6e 67 20 74 68 65 20 70 6f  llocating the po
11e0: 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49  inter...*/..SQLI
11f0: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
1200: 49 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f  I sqlite3_close_
1210: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20  interop(sqlite3 
1220: 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  *db)..{..  int r
1230: 65 74 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f  et;..#if SQLITE_
1240: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e  VERSION_NUMBER >
1250: 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 69 66  = 3007014....#if
1260: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50   defined(INTEROP
1270: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45  _DEBUG) && (INTE
1280: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45  ROP_DEBUG & INTE
1290: 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f 53 45 29  ROP_DEBUG_CLOSE)
12a0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
12b0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
12c0: 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 28 29  _close_interop()
12d0: 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65  : calling sqlite
12e0: 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70 29 2e 2e  3_close_v2(%p)..
12f0: 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 65 6e 64  .\n", db);..#end
1300: 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71  if....  ret = sq
1310: 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 64  lite3_close_v2(d
1320: 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  b);....#if defin
1330: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
1340: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45  ) && (INTEROP_DE
1350: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45  BUG & INTEROP_DE
1360: 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20 73 71  BUG_CLOSE)..  sq
1370: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75  lite3InteropDebu
1380: 67 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65  g("sqlite3_close
1390: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69  _interop(): sqli
13a0: 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70 29  te3_close_v2(%p)
13b0: 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22   returned %d.\n"
13c0: 2c 20 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65 6e  , db, ret);..#en
13d0: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20  dif....  return 
13e0: 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 72  ret;..#else..  r
13f0: 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 6c 6f  et = sqlite3_clo
1400: 73 65 28 64 62 29 3b 0d 0a 0d 0a 20 20 69 66 20  se(db);....  if 
1410: 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45 5f 42  (ret == SQLITE_B
1420: 55 53 59 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 73  USY)..  {..    s
1430: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74  qlite3_mutex_ent
1440: 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a  er(db->mutex);..
1450: 0d 0a 20 20 20 20 69 66 20 28 21 64 62 2d 3e 70  ..    if (!db->p
1460: 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d 0a 20 20  Vdbe)..    {..  
1470: 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65      sqlite3_mute
1480: 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65  x_leave(db->mute
1490: 78 29 3b 0d 0a 20 20 20 20 20 20 72 65 74 75 72  x);..      retur
14a0: 6e 20 72 65 74 3b 0d 0a 20 20 20 20 7d 0d 0a 0d  n ret;..    }...
14b0: 0a 20 20 20 20 77 68 69 6c 65 20 28 64 62 2d 3e  .    while (db->
14c0: 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d 0a 20  pVdbe)..    {.. 
14d0: 20 20 20 20 20 2f 2a 20 4d 61 6b 65 20 61 20 63       /* Make a c
14e0: 6f 70 79 20 6f 66 20 74 68 65 20 66 69 72 73 74  opy of the first
14f0: 20 70 72 65 70 61 72 65 64 20 73 74 61 74 65 6d   prepared statem
1500: 65 6e 74 20 2a 2f 0d 0a 20 20 20 20 20 20 56 64  ent */..      Vd
1510: 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 2a 29  be *p = (Vdbe *)
1520: 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 5a  sqlite3DbMallocZ
1530: 65 72 6f 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20  ero_interop(db, 
1540: 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a  sizeof(Vdbe));..
1550: 20 20 20 20 20 20 56 64 62 65 20 2a 70 6f 20 3d        Vdbe *po =
1560: 20 64 62 2d 3e 70 56 64 62 65 3b 0d 0a 0d 0a 20   db->pVdbe;.... 
1570: 20 20 20 20 20 69 66 20 28 21 70 29 20 0d 0a 20       if (!p) .. 
1580: 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20       {..        
1590: 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 4e 4f 4d  ret = SQLITE_NOM
15a0: 45 4d 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 65  EM;..        bre
15b0: 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 0d 0a  ak;..      }....
15c0: 20 20 20 20 20 20 43 6f 70 79 4d 65 6d 6f 72 79        CopyMemory
15d0: 28 70 2c 20 70 6f 2c 20 73 69 7a 65 6f 66 28 56  (p, po, sizeof(V
15e0: 64 62 65 29 29 3b 0d 0a 0d 0a 20 20 20 20 20 20  dbe));....      
15f0: 2f 2a 20 50 75 74 20 69 74 20 6f 6e 20 74 68 65  /* Put it on the
1600: 20 63 68 61 69 6e 20 73 6f 20 77 65 20 63 61 6e   chain so we can
1610: 20 66 72 65 65 20 69 74 20 2a 2f 0d 0a 20 20 20   free it */..   
1620: 20 20 20 64 62 2d 3e 70 56 64 62 65 20 3d 20 70     db->pVdbe = p
1630: 3b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 73  ;..      ret = s
1640: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28  qlite3_finalize(
1650: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 29  (sqlite3_stmt *)
1660: 70 29 3b 20 2f 2a 20 54 68 69 73 20 77 69 6c 6c  p); /* This will
1670: 20 61 6c 73 6f 20 66 72 65 65 20 74 68 65 20 63   also free the c
1680: 6f 70 79 27 73 20 6d 65 6d 6f 72 79 20 2a 2f 0d  opy's memory */.
1690: 0a 20 20 20 20 20 20 69 66 20 28 72 65 74 29 0d  .      if (ret).
16a0: 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20  .      {..      
16b0: 20 20 2f 2a 20 66 69 6e 61 6c 69 7a 65 20 66 61    /* finalize fa
16c0: 69 6c 65 64 20 2d 2d 20 73 6f 20 77 65 20 6d 75  iled -- so we mu
16d0: 73 74 20 70 75 74 20 62 61 63 6b 20 61 6e 79 74  st put back anyt
16e0: 68 69 6e 67 20 77 65 20 6d 75 6e 67 65 64 20 2a  hing we munged *
16f0: 2f 0d 0a 20 20 20 20 20 20 20 20 43 6f 70 79 4d  /..        CopyM
1700: 65 6d 6f 72 79 28 70 6f 2c 20 70 2c 20 73 69 7a  emory(po, p, siz
1710: 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 20 20  eof(Vdbe));..   
1720: 20 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 3d       db->pVdbe =
1730: 20 70 6f 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20   po;....        
1740: 2f 2a 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20 4e  /*..        ** N
1750: 4f 54 45 3a 20 4f 6b 2c 20 77 65 20 6d 75 73 74  OTE: Ok, we must
1760: 20 66 72 65 65 20 74 68 69 73 20 62 6c 6f 63 6b   free this block
1770: 20 74 68 61 74 20 2a 77 65 2a 20 61 6c 6c 6f 63   that *we* alloc
1780: 61 74 65 64 20 28 61 62 6f 76 65 29 20 73 69 6e  ated (above) sin
1790: 63 65 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20 20  ce..        **  
17a0: 20 20 20 20 20 66 69 6e 61 6c 69 7a 65 20 64 69       finalize di
17b0: 64 20 6e 6f 74 20 64 6f 20 73 6f 2e 0d 0a 20 20  d not do so...  
17c0: 20 20 20 20 20 20 2a 2f 0d 0a 20 20 20 20 20 20        */..      
17d0: 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 5f    sqlite3DbFree_
17e0: 69 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b 0d  interop(db, p);.
17f0: 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0d  .        break;.
1800: 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 20  .      }..      
1810: 65 6c 73 65 0d 0a 20 20 20 20 20 20 7b 0d 0a 20  else..      {.. 
1820: 20 20 20 20 20 20 20 5a 65 72 6f 4d 65 6d 6f 72         ZeroMemor
1830: 79 28 70 6f 2c 20 73 69 7a 65 6f 66 28 56 64 62  y(po, sizeof(Vdb
1840: 65 29 29 3b 0d 0a 20 20 20 20 20 20 20 20 70 6f  e));..        po
1850: 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42 45 5f 4d  ->magic = VDBE_M
1860: 41 47 49 43 5f 44 45 41 44 3b 0d 0a 20 20 20 20  AGIC_DEAD;..    
1870: 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20    }..    }..    
1880: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65  sqlite3_mutex_le
1890: 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d  ave(db->mutex);.
18a0: 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74  .    ret = sqlit
18b0: 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b 0d 0a 20  e3_close(db);.. 
18c0: 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74   }..  return ret
18d0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a  ;..#endif..}....
18e0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
18f0: 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c 49 54 45  ROP_LOG)..SQLITE
1900: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20  _API int WINAPI 
1910: 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 6c  sqlite3_config_l
1920: 6f 67 5f 69 6e 74 65 72 6f 70 28 29 0d 0a 7b 0d  og_interop()..{.
1930: 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 20 20 69  .  int ret;..  i
1940: 66 28 20 21 6c 6f 67 43 6f 6e 66 69 67 75 72 65  f( !logConfigure
1950: 64 20 29 7b 0d 0a 20 20 20 20 72 65 74 20 3d 20  d ){..    ret = 
1960: 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 28 53  sqlite3_config(S
1970: 51 4c 49 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f 47  QLITE_CONFIG_LOG
1980: 2c 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70  , sqlite3Interop
1990: 4c 6f 67 43 61 6c 6c 62 61 63 6b 2c 20 30 29 3b  LogCallback, 0);
19a0: 0d 0a 20 20 20 20 69 66 28 20 72 65 74 3d 3d 53  ..    if( ret==S
19b0: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a 20 20 20  QLITE_OK ){..   
19c0: 20 20 20 6c 6f 67 43 6f 6e 66 69 67 75 72 65 64     logConfigured
19d0: 20 3d 20 31 3b 0d 0a 20 20 20 20 7d 65 6c 73 65   = 1;..    }else
19e0: 7b 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  {..      sqlite3
19f0: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71  InteropDebug("sq
1a00: 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 6c 6f 67  lite3_config_log
1a10: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69  _interop(): sqli
1a20: 74 65 33 5f 63 6f 6e 66 69 67 28 53 51 4c 49 54  te3_config(SQLIT
1a30: 45 5f 43 4f 4e 46 49 47 5f 4c 4f 47 29 20 72 65  E_CONFIG_LOG) re
1a40: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 72  turned %d.\n", r
1a50: 65 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d  et);..    }..  }
1a60: 65 6c 73 65 7b 0d 0a 20 20 20 20 72 65 74 20 3d  else{..    ret =
1a70: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 20 20 7d   SQLITE_OK;..  }
1a80: 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d  ..  return ret;.
1a90: 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 53 51  .}..#endif....SQ
1aa0: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e  LITE_API int WIN
1ab0: 41 50 49 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e  API sqlite3_open
1ac0: 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73 74 20 63  _interop(const c
1ad0: 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65 2c 20 69  har *filename, i
1ae0: 6e 74 20 66 6c 61 67 73 2c 20 73 71 6c 69 74 65  nt flags, sqlite
1af0: 33 20 2a 2a 70 70 64 62 29 0d 0a 7b 0d 0a 20 20  3 **ppdb)..{..  
1b00: 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20  int ret;....#if 
1b10: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f  defined(INTEROP_
1b20: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52  DEBUG) && (INTER
1b30: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52  OP_DEBUG & INTER
1b40: 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 29 0d 0a  OP_DEBUG_OPEN)..
1b50: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70    sqlite3Interop
1b60: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f  Debug("sqlite3_o
1b70: 70 65 6e 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63  pen_interop(): c
1b80: 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 6f  alling sqlite3_o
1b90: 70 65 6e 5f 76 32 28 5c 22 25 73 5c 22 2c 20 25  pen_v2(\"%s\", %
1ba0: 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 66 69  d, %p)...\n", fi
1bb0: 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70  lename, flags, p
1bc0: 70 64 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d  pdb);..#endif...
1bd0: 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33  .  ret = sqlite3
1be0: 5f 6f 70 65 6e 5f 76 32 28 66 69 6c 65 6e 61 6d  _open_v2(filenam
1bf0: 65 2c 20 70 70 64 62 2c 20 66 6c 61 67 73 2c 20  e, ppdb, flags, 
1c00: 4e 55 4c 4c 29 3b 0d 0a 0d 0a 23 69 66 20 64 65  NULL);....#if de
1c10: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
1c20: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
1c30: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
1c40: 5f 44 45 42 55 47 5f 4f 50 45 4e 29 0d 0a 20 20  _DEBUG_OPEN)..  
1c50: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65  sqlite3InteropDe
1c60: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65  bug("sqlite3_ope
1c70: 6e 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c  n_interop(): sql
1c80: 69 74 65 33 5f 6f 70 65 6e 5f 76 32 28 5c 22 25  ite3_open_v2(\"%
1c90: 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 65 74  s\", %d, %p) ret
1ca0: 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 66 69  urned %d.\n", fi
1cb0: 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70  lename, flags, p
1cc0: 70 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64  pdb, ret);..#end
1cd0: 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  if....#if define
1ce0: 64 28 49 4e 54 45 52 4f 50 5f 45 58 54 45 4e 53  d(INTEROP_EXTENS
1cf0: 49 4f 4e 5f 46 55 4e 43 54 49 4f 4e 53 29 0d 0a  ION_FUNCTIONS)..
1d00: 20 20 69 66 20 28 72 65 74 20 3d 3d 20 53 51 4c    if (ret == SQL
1d10: 49 54 45 5f 4f 4b 29 0d 0a 20 20 20 20 52 65 67  ITE_OK)..    Reg
1d20: 69 73 74 65 72 45 78 74 65 6e 73 69 6f 6e 46 75  isterExtensionFu
1d30: 6e 63 74 69 6f 6e 73 28 2a 70 70 64 62 29 3b 0d  nctions(*ppdb);.
1d40: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74  .#endif....  ret
1d50: 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53  urn ret;..}....S
1d60: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49  QLITE_API int WI
1d70: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6f 70 65  NAPI sqlite3_ope
1d80: 6e 31 36 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73  n16_interop(cons
1d90: 74 20 63 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65  t char *filename
1da0: 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 73 71 6c  , int flags, sql
1db0: 69 74 65 33 20 2a 2a 70 70 64 62 29 0d 0a 7b 0d  ite3 **ppdb)..{.
1dc0: 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23  .  int ret;....#
1dd0: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
1de0: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
1df0: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
1e00: 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e  TEROP_DEBUG_OPEN
1e10: 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  16)..  sqlite3In
1e20: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
1e30: 74 65 33 5f 6f 70 65 6e 31 36 5f 69 6e 74 65 72  te3_open16_inter
1e40: 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71  op(): calling sq
1e50: 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72  lite3_open_inter
1e60: 6f 70 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25  op(\"%s\", %d, %
1e70: 70 29 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61  p)...\n", filena
1e80: 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64 62 29  me, flags, ppdb)
1e90: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72  ;..#endif....  r
1ea0: 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70 65  et = sqlite3_ope
1eb0: 6e 5f 69 6e 74 65 72 6f 70 28 66 69 6c 65 6e 61  n_interop(filena
1ec0: 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64 62 29  me, flags, ppdb)
1ed0: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  ;....#if defined
1ee0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20  (INTEROP_DEBUG) 
1ef0: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  && (INTEROP_DEBU
1f00: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55  G & INTEROP_DEBU
1f10: 47 5f 4f 50 45 4e 31 36 29 0d 0a 20 20 73 71 6c  G_OPEN16)..  sql
1f20: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67  ite3InteropDebug
1f30: 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36  ("sqlite3_open16
1f40: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69  _interop(): sqli
1f50: 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70  te3_open_interop
1f60: 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29  (\"%s\", %d, %p)
1f70: 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22   returned %d.\n"
1f80: 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67  , filename, flag
1f90: 73 2c 20 70 70 64 62 2c 20 72 65 74 29 3b 0d 0a  s, ppdb, ret);..
1fa0: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28  #endif....  if (
1fb0: 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45 5f 4f  (ret == SQLITE_O
1fc0: 4b 29 20 26 26 20 21 44 62 48 61 73 50 72 6f 70  K) && !DbHasProp
1fd0: 65 72 74 79 28 2a 70 70 64 62 2c 20 30 2c 20 44  erty(*ppdb, 0, D
1fe0: 42 5f 53 63 68 65 6d 61 4c 6f 61 64 65 64 29 29  B_SchemaLoaded))
1ff0: 0d 0a 20 20 20 20 45 4e 43 28 2a 70 70 64 62 29  ..    ENC(*ppdb)
2000: 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 31 36 4e   = SQLITE_UTF16N
2010: 41 54 49 56 45 3b 0d 0a 0d 0a 20 20 72 65 74 75  ATIVE;....  retu
2020: 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51  rn ret;..}....SQ
2030: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63  LITE_API const c
2040: 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c  har * WINAPI sql
2050: 69 74 65 33 5f 65 72 72 6d 73 67 5f 69 6e 74 65  ite3_errmsg_inte
2060: 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c  rop(sqlite3 *db,
2070: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
2080: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76    const char *pv
2090: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 65 72 72  al = sqlite3_err
20a0: 6d 73 67 28 64 62 29 3b 0d 0a 20 20 2a 70 6c 65  msg(db);..  *ple
20b0: 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20  n = (pval != 0) 
20c0: 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a  ? strlen(pval) :
20d0: 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76   0;..  return pv
20e0: 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  al;..}....SQLITE
20f0: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20  _API int WINAPI 
2100: 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 5f  sqlite3_changes_
2110: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20  interop(sqlite3 
2120: 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  *db)..{..  int r
2130: 65 73 75 6c 74 3b 0d 0a 0d 0a 23 69 66 20 64 65  esult;....#if de
2140: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
2150: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
2160: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
2170: 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 53 29 0d  _DEBUG_CHANGES).
2180: 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f  .  sqlite3Intero
2190: 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f  pDebug("sqlite3_
21a0: 63 68 61 6e 67 65 73 5f 69 6e 74 65 72 6f 70 28  changes_interop(
21b0: 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74  ): calling sqlit
21c0: 65 33 5f 63 68 61 6e 67 65 73 28 25 70 29 2e 2e  e3_changes(%p)..
21d0: 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 65 6e 64  .\n", db);..#end
21e0: 69 66 0d 0a 0d 0a 23 69 66 6e 64 65 66 20 4e 44  if....#ifndef ND
21f0: 45 42 55 47 0d 0a 20 20 69 66 20 28 21 64 62 29  EBUG..  if (!db)
2200: 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 49  ..      sqlite3I
2210: 6e 74 65 72 6f 70 42 72 65 61 6b 28 22 6e 75 6c  nteropBreak("nul
2220: 6c 20 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c  l database handl
2230: 65 20 66 6f 72 20 73 71 6c 69 74 65 33 5f 63 68  e for sqlite3_ch
2240: 61 6e 67 65 73 28 29 22 29 3b 0d 0a 23 65 6e 64  anges()");..#end
2250: 69 66 0d 0a 0d 0a 20 20 72 65 73 75 6c 74 20 3d  if....  result =
2260: 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73   sqlite3_changes
2270: 28 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66  (db);....#if def
2280: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42  ined(INTEROP_DEB
2290: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f  UG) && (INTEROP_
22a0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f  DEBUG & INTEROP_
22b0: 44 45 42 55 47 5f 43 48 41 4e 47 45 53 29 0d 0a  DEBUG_CHANGES)..
22c0: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70    sqlite3Interop
22d0: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63  Debug("sqlite3_c
22e0: 68 61 6e 67 65 73 5f 69 6e 74 65 72 6f 70 28 29  hanges_interop()
22f0: 3a 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65  : sqlite3_change
2300: 73 28 25 70 29 20 72 65 74 75 72 6e 65 64 20 25  s(%p) returned %
2310: 64 2e 5c 6e 22 2c 20 64 62 2c 20 72 65 73 75 6c  d.\n", db, resul
2320: 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20  t);..#endif.... 
2330: 20 72 65 74 75 72 6e 20 72 65 73 75 6c 74 3b 0d   return result;.
2340: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
2350: 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69   int WINAPI sqli
2360: 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65  te3_prepare_inte
2370: 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c  rop(sqlite3 *db,
2380: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 73 71 6c   const char *sql
2390: 2c 20 69 6e 74 20 6e 62 79 74 65 73 2c 20 73 71  , int nbytes, sq
23a0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 2a 70 70 73  lite3_stmt **pps
23b0: 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  tmt, const char 
23c0: 2a 2a 70 7a 74 61 69 6c 2c 20 69 6e 74 20 2a 70  **pztail, int *p
23d0: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e  len)..{..  int n
23e0: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  ;....#if defined
23f0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20  (INTEROP_DEBUG) 
2400: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  && (INTEROP_DEBU
2410: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55  G & INTEROP_DEBU
2420: 47 5f 50 52 45 50 41 52 45 29 0d 0a 20 20 73 71  G_PREPARE)..  sq
2430: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75  lite3InteropDebu
2440: 67 28 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61  g("sqlite3_prepa
2450: 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61  re_interop(): ca
2460: 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 70 72  lling sqlite3_pr
2470: 65 70 61 72 65 28 25 70 2c 20 5c 22 25 73 5c 22  epare(%p, \"%s\"
2480: 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c  , %d, %p)...\n",
2490: 20 64 62 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73   db, sql, nbytes
24a0: 2c 20 70 70 73 74 6d 74 29 3b 0d 0a 23 65 6e 64  , ppstmt);..#end
24b0: 69 66 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69  if....  n = sqli
24c0: 74 65 33 5f 70 72 65 70 61 72 65 28 64 62 2c 20  te3_prepare(db, 
24d0: 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70 70 73  sql, nbytes, pps
24e0: 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 0d  tmt, pztail);...
24f0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54  .#if defined(INT
2500: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28  EROP_DEBUG) && (
2510: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20  INTEROP_DEBUG & 
2520: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52  INTEROP_DEBUG_PR
2530: 45 50 41 52 45 29 0d 0a 20 20 73 71 6c 69 74 65  EPARE)..  sqlite
2540: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
2550: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69  qlite3_prepare_i
2560: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65  nterop(): sqlite
2570: 33 5f 70 72 65 70 61 72 65 28 25 70 2c 20 5c 22  3_prepare(%p, \"
2580: 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 65  %s\", %d, %p) re
2590: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64  turned %d.\n", d
25a0: 62 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20  b, sql, nbytes, 
25b0: 70 70 73 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65 6e  ppstmt, n);..#en
25c0: 64 69 66 0d 0a 0d 0a 20 20 2a 70 6c 65 6e 20 3d  dif....  *plen =
25d0: 20 28 2a 70 7a 74 61 69 6c 20 21 3d 20 30 29 20   (*pztail != 0) 
25e0: 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 74 61 69 6c  ? strlen(*pztail
25f0: 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74 75  ) : 0;....  retu
2600: 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  rn n;..}....SQLI
2610: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
2620: 49 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72  I sqlite3_prepar
2630: 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  e16_interop(sqli
2640: 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 76  te3 *db, const v
2650: 6f 69 64 20 2a 73 71 6c 2c 20 69 6e 74 20 6e 63  oid *sql, int nc
2660: 68 61 72 73 2c 20 73 71 6c 69 74 65 33 5f 73 74  hars, sqlite3_st
2670: 6d 74 20 2a 2a 70 70 73 74 6d 74 2c 20 63 6f 6e  mt **ppstmt, con
2680: 73 74 20 76 6f 69 64 20 2a 2a 70 7a 74 61 69 6c  st void **pztail
2690: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d  , int *plen)..{.
26a0: 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 23 69 66  .  int n;....#if
26b0: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50   defined(INTEROP
26c0: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45  _DEBUG) && (INTE
26d0: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45  ROP_DEBUG & INTE
26e0: 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41 52  ROP_DEBUG_PREPAR
26f0: 45 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33 49  E16)..  sqlite3I
2700: 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c  nteropDebug("sql
2710: 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74  ite3_prepare_int
2720: 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20  erop(): calling 
2730: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 31  sqlite3_prepare1
2740: 36 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64  6(%p, \"%s\", %d
2750: 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c  , %p)...\n", db,
2760: 20 73 71 6c 2c 20 6e 63 68 61 72 73 2c 20 70 70   sql, nchars, pp
2770: 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a  stmt);..#endif..
2780: 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ..  n = sqlite3_
2790: 70 72 65 70 61 72 65 31 36 28 64 62 2c 20 73 71  prepare16(db, sq
27a0: 6c 2c 20 6e 63 68 61 72 73 20 2a 20 73 69 7a 65  l, nchars * size
27b0: 6f 66 28 77 63 68 61 72 5f 74 29 2c 20 70 70 73  of(wchar_t), pps
27c0: 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 0d  tmt, pztail);...
27d0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54  .#if defined(INT
27e0: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28  EROP_DEBUG) && (
27f0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20  INTEROP_DEBUG & 
2800: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52  INTEROP_DEBUG_PR
2810: 45 50 41 52 45 31 36 29 0d 0a 20 20 73 71 6c 69  EPARE16)..  sqli
2820: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28  te3InteropDebug(
2830: 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65  "sqlite3_prepare
2840: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69  _interop(): sqli
2850: 74 65 33 5f 70 72 65 70 61 72 65 31 36 28 25 70  te3_prepare16(%p
2860: 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70  , \"%s\", %d, %p
2870: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e  ) returned %d.\n
2880: 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61  ", db, sql, ncha
2890: 72 73 2c 20 70 70 73 74 6d 74 2c 20 6e 29 3b 0d  rs, ppstmt, n);.
28a0: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 2a 70 6c  .#endif....  *pl
28b0: 65 6e 20 3d 20 28 2a 70 7a 74 61 69 6c 20 21 3d  en = (*pztail !=
28c0: 20 30 29 20 3f 20 77 63 73 6c 65 6e 28 28 77 63   0) ? wcslen((wc
28d0: 68 61 72 5f 74 20 2a 29 2a 70 7a 74 61 69 6c 29  har_t *)*pztail)
28e0: 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f   * sizeof(wchar_
28f0: 74 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74  t) : 0;....  ret
2900: 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c  urn n;..}....SQL
2910: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41  ITE_API int WINA
2920: 50 49 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f  PI sqlite3_bind_
2930: 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73  double_interop(s
2940: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d  qlite3_stmt *stm
2950: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75  t, int iCol, dou
2960: 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 09 72  ble *val)..{...r
2970: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69  eturn sqlite3_bi
2980: 6e 64 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69  nd_double(stmt,i
2990: 43 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d  Col,*val);..}...
29a0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
29b0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62  WINAPI sqlite3_b
29c0: 69 6e 64 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f  ind_int64_intero
29d0: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
29e0: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
29f0: 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76 61  sqlite_int64 *va
2a00: 6c 29 0d 0a 7b 0d 0a 09 72 65 74 75 72 6e 20 73  l)..{...return s
2a10: 71 6c 69 74 65 33 5f 62 69 6e 64 5f 69 6e 74 36  qlite3_bind_int6
2a20: 34 28 73 74 6d 74 2c 69 43 6f 6c 2c 2a 76 61 6c  4(stmt,iCol,*val
2a30: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  );..}....SQLITE_
2a40: 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  API const char *
2a50: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
2a60: 62 69 6e 64 5f 70 61 72 61 6d 65 74 65 72 5f 6e  bind_parameter_n
2a70: 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  ame_interop(sqli
2a80: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20  te3_stmt *stmt, 
2a90: 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70  int iCol, int *p
2aa0: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74  len)..{..  const
2ab0: 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71   char *pval = sq
2ac0: 6c 69 74 65 33 5f 62 69 6e 64 5f 70 61 72 61 6d  lite3_bind_param
2ad0: 65 74 65 72 5f 6e 61 6d 65 28 73 74 6d 74 2c 20  eter_name(stmt, 
2ae0: 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20  iCol);..  *plen 
2af0: 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20  = (pval != 0) ? 
2b00: 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30  strlen(pval) : 0
2b10: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c  ;..  return pval
2b20: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
2b30: 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20  PI const char * 
2b40: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63  WINAPI sqlite3_c
2b50: 6f 6c 75 6d 6e 5f 6e 61 6d 65 5f 69 6e 74 65 72  olumn_name_inter
2b60: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
2b70: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
2b80: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
2b90: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76    const char *pv
2ba0: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
2bb0: 75 6d 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69  umn_name(stmt, i
2bc0: 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d  Col);..  *plen =
2bd0: 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73   (pval != 0) ? s
2be0: 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b  trlen(pval) : 0;
2bf0: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b  ..  return pval;
2c00: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
2c10: 49 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57  I const void * W
2c20: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f  INAPI sqlite3_co
2c30: 6c 75 6d 6e 5f 6e 61 6d 65 31 36 5f 69 6e 74 65  lumn_name16_inte
2c40: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74  rop(sqlite3_stmt
2c50: 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c   *stmt, int iCol
2c60: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d  , int *plen)..{.
2c70: 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70  .  const void *p
2c80: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  val = sqlite3_co
2c90: 6c 75 6d 6e 5f 6e 61 6d 65 31 36 28 73 74 6d 74  lumn_name16(stmt
2ca0: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65  , iCol);..  *ple
2cb0: 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20  n = (pval != 0) 
2cc0: 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f  ? wcslen((wchar_
2cd0: 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65  t *)pval) * size
2ce0: 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b  of(wchar_t) : 0;
2cf0: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b  ..  return pval;
2d00: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
2d10: 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57  I const char * W
2d20: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f  INAPI sqlite3_co
2d30: 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65 5f 69 6e  lumn_decltype_in
2d40: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74  terop(sqlite3_st
2d50: 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43  mt *stmt, int iC
2d60: 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a  ol, int *plen)..
2d70: 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  {..  const char 
2d80: 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f  *pval = sqlite3_
2d90: 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65 28  column_decltype(
2da0: 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20  stmt, iCol);..  
2db0: 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d  *plen = (pval !=
2dc0: 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61   0) ? strlen(pva
2dd0: 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72  l) : 0;..  retur
2de0: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51  n pval;..}....SQ
2df0: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76  LITE_API const v
2e00: 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c  oid * WINAPI sql
2e10: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c  ite3_column_decl
2e20: 74 79 70 65 31 36 5f 69 6e 74 65 72 6f 70 28 73  type16_interop(s
2e30: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d  qlite3_stmt *stm
2e40: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74  t, int iCol, int
2e50: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f   *plen)..{..  co
2e60: 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d  nst void *pval =
2e70: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
2e80: 64 65 63 6c 74 79 70 65 31 36 28 73 74 6d 74 2c  decltype16(stmt,
2e90: 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e   iCol);..  *plen
2ea0: 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f   = (pval != 0) ?
2eb0: 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74   wcslen((wchar_t
2ec0: 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f   *)pval) * sizeo
2ed0: 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d  f(wchar_t) : 0;.
2ee0: 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d  .  return pval;.
2ef0: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
2f00: 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c   void WINAPI sql
2f10: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62  ite3_column_doub
2f20: 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  le_interop(sqlit
2f30: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69  e3_stmt *stmt, i
2f40: 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c 65 20  nt iCol, double 
2f50: 2a 76 61 6c 29 0d 0a 7b 0d 0a 09 2a 76 61 6c 20  *val)..{...*val 
2f60: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
2f70: 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69 43 6f  _double(stmt,iCo
2f80: 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  l);..}....SQLITE
2f90: 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49  _API void WINAPI
2fa0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
2fb0: 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 71  int64_interop(sq
2fc0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74  lite3_stmt *stmt
2fd0: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 73 71 6c 69  , int iCol, sqli
2fe0: 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a  te_int64 *val)..
2ff0: 7b 0d 0a 09 2a 76 61 6c 20 3d 20 73 71 6c 69 74  {...*val = sqlit
3000: 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28  e3_column_int64(
3010: 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d 0a  stmt,iCol);..}..
3020: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69  ..SQLITE_API voi
3030: 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  d WINAPI sqlite3
3040: 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77  _last_insert_row
3050: 69 64 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  id_interop(sqlit
3060: 65 33 20 2a 64 62 2c 20 73 71 6c 69 74 65 5f 69  e3 *db, sqlite_i
3070: 6e 74 36 34 20 2a 72 6f 77 49 64 29 0d 0a 7b 0d  nt64 *rowId)..{.
3080: 0a 09 2a 72 6f 77 49 64 20 3d 20 73 71 6c 69 74  ..*rowId = sqlit
3090: 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72  e3_last_insert_r
30a0: 6f 77 69 64 28 64 62 29 3b 0d 0a 7d 0d 0a 0d 0a  owid(db);..}....
30b0: 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20  SQLITE_API void 
30c0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6d  WINAPI sqlite3_m
30d0: 65 6d 6f 72 79 5f 75 73 65 64 5f 69 6e 74 65 72  emory_used_inter
30e0: 6f 70 28 73 71 6c 69 74 65 5f 69 6e 74 36 34 20  op(sqlite_int64 
30f0: 2a 6e 42 79 74 65 73 29 0d 0a 7b 0d 0a 09 2a 6e  *nBytes)..{...*n
3100: 42 79 74 65 73 20 3d 20 73 71 6c 69 74 65 33 5f  Bytes = sqlite3_
3110: 6d 65 6d 6f 72 79 5f 75 73 65 64 28 29 3b 0d 0a  memory_used();..
3120: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
3130: 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69  void WINAPI sqli
3140: 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77  te3_memory_highw
3150: 61 74 65 72 5f 69 6e 74 65 72 6f 70 28 69 6e 74  ater_interop(int
3160: 20 72 65 73 65 74 46 6c 61 67 2c 20 73 71 6c 69   resetFlag, sqli
3170: 74 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74 65 73  te_int64 *nBytes
3180: 29 0d 0a 7b 0d 0a 09 2a 6e 42 79 74 65 73 20 3d  )..{...*nBytes =
3190: 20 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f   sqlite3_memory_
31a0: 68 69 67 68 77 61 74 65 72 28 72 65 73 65 74 46  highwater(resetF
31b0: 6c 61 67 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  lag);..}....SQLI
31c0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 75 6e 73  TE_API const uns
31d0: 69 67 6e 65 64 20 63 68 61 72 20 2a 20 57 49 4e  igned char * WIN
31e0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  API sqlite3_colu
31f0: 6d 6e 5f 74 65 78 74 5f 69 6e 74 65 72 6f 70 28  mn_text_interop(
3200: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
3210: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
3220: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
3230: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
3240: 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74  ar *pval = sqlit
3250: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 73  e3_column_text(s
3260: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a  tmt, iCol);..  *
3270: 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20  plen = (pval != 
3280: 30 29 20 3f 20 73 74 72 6c 65 6e 28 28 63 68 61  0) ? strlen((cha
3290: 72 20 2a 29 70 76 61 6c 29 20 3a 20 30 3b 0d 0a  r *)pval) : 0;..
32a0: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a    return pval;..
32b0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
32c0: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e  const void * WIN
32d0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  API sqlite3_colu
32e0: 6d 6e 5f 74 65 78 74 31 36 5f 69 6e 74 65 72 6f  mn_text16_intero
32f0: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
3300: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
3310: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20  int *plen)..{.. 
3320: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61   const void *pva
3330: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  l = sqlite3_colu
3340: 6d 6e 5f 74 65 78 74 31 36 28 73 74 6d 74 2c 20  mn_text16(stmt, 
3350: 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20  iCol);..  *plen 
3360: 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20  = (pval != 0) ? 
3370: 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20  wcslen((wchar_t 
3380: 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66  *)pval) * sizeof
3390: 28 77 63 68 61 72 5f 74 29 3a 20 30 3b 0d 0a 20  (wchar_t): 0;.. 
33a0: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d   return pval;..}
33b0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69  ....SQLITE_API i
33c0: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65  nt WINAPI sqlite
33d0: 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72  3_finalize_inter
33e0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
33f0: 2a 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74  *stmt)..{..  int
3400: 20 72 65 74 3b 0d 0a 23 69 66 20 53 51 4c 49 54   ret;..#if SQLIT
3410: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
3420: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23   >= 3007014....#
3430: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
3440: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
3450: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
3460: 54 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41  TEROP_DEBUG_FINA
3470: 4c 49 5a 45 29 0d 0a 20 20 56 64 62 65 20 2a 70  LIZE)..  Vdbe *p
3480: 20 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74 3b   = (Vdbe *)stmt;
3490: 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  ..  sqlite3 *db 
34a0: 3d 20 70 2d 3e 64 62 3b 0d 0a 20 20 73 71 6c 69  = p->db;..  sqli
34b0: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28  te3InteropDebug(
34c0: 22 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a  "sqlite3_finaliz
34d0: 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c  e_interop(): cal
34e0: 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 66 69 6e  ling sqlite3_fin
34f0: 61 6c 69 7a 65 28 25 70 2c 20 25 70 29 2e 2e 2e  alize(%p, %p)...
3500: 5c 6e 22 2c 20 64 62 2c 20 73 74 6d 74 29 3b 0d  \n", db, stmt);.
3510: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74  .#endif....  ret
3520: 20 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c   = sqlite3_final
3530: 69 7a 65 28 73 74 6d 74 29 3b 0d 0a 0d 0a 23 69  ize(stmt);....#i
3540: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
3550: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
3560: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
3570: 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41 4c  EROP_DEBUG_FINAL
3580: 49 5a 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49  IZE)..  sqlite3I
3590: 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c  nteropDebug("sql
35a0: 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e  ite3_finalize_in
35b0: 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33  terop(): sqlite3
35c0: 5f 66 69 6e 61 6c 69 7a 65 28 25 70 2c 20 25 70  _finalize(%p, %p
35d0: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e  ) returned %d.\n
35e0: 22 2c 20 64 62 2c 20 73 74 6d 74 2c 20 72 65 74  ", db, stmt, ret
35f0: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20  );..#endif....  
3600: 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6c  return ret;..#el
3610: 73 65 0d 0a 20 20 56 64 62 65 20 2a 70 3b 0d 0a  se..  Vdbe *p;..
3620: 20 20 69 6e 74 20 72 65 74 20 3d 20 53 51 4c 49    int ret = SQLI
3630: 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20 70 20 3d 20  TE_OK;....  p = 
3640: 28 56 64 62 65 20 2a 29 73 74 6d 74 3b 0d 0a 20  (Vdbe *)stmt;.. 
3650: 20 69 66 20 28 70 29 0d 0a 20 20 7b 0d 0a 20 20   if (p)..  {..  
3660: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20    sqlite3 *db = 
3670: 70 2d 3e 64 62 3b 0d 0a 0d 0a 20 20 20 20 69 66  p->db;....    if
3680: 20 28 64 62 20 21 3d 20 4e 55 4c 4c 29 0d 0a 20   (db != NULL).. 
3690: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74       sqlite3_mut
36a0: 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74  ex_enter(db->mut
36b0: 65 78 29 3b 0d 0a 0d 0a 20 20 20 20 69 66 20 28  ex);....    if (
36c0: 28 70 2d 3e 6d 61 67 69 63 20 3d 3d 20 56 44 42  (p->magic == VDB
36d0: 45 5f 4d 41 47 49 43 5f 44 45 41 44 29 20 26 26  E_MAGIC_DEAD) &&
36e0: 20 28 64 62 20 3d 3d 20 4e 55 4c 4c 29 29 0d 0a   (db == NULL))..
36f0: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 73 71 6c      {..      sql
3700: 69 74 65 33 44 62 46 72 65 65 5f 69 6e 74 65 72  ite3DbFree_inter
3710: 6f 70 28 64 62 2c 20 70 29 3b 0d 0a 20 20 20 20  op(db, p);..    
3720: 7d 0d 0a 20 20 20 20 65 6c 73 65 0d 0a 20 20 20  }..    else..   
3730: 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20   {..      ret = 
3740: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65  sqlite3_finalize
3750: 28 73 74 6d 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a  (stmt);..    }..
3760: 0d 0a 20 20 20 20 69 66 20 28 64 62 20 21 3d 20  ..    if (db != 
3770: 4e 55 4c 4c 29 0d 0a 20 20 20 20 20 20 73 71 6c  NULL)..      sql
3780: 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65  ite3_mutex_leave
3790: 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20  (db->mutex);..  
37a0: 7d 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65  }....  return re
37b0: 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d  t;..#endif..}...
37c0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
37d0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62  WINAPI sqlite3_b
37e0: 61 63 6b 75 70 5f 66 69 6e 69 73 68 5f 69 6e 74  ackup_finish_int
37f0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 62 61 63  erop(sqlite3_bac
3800: 6b 75 70 20 2a 70 29 0d 0a 7b 0d 0a 20 20 69 6e  kup *p)..{..  in
3810: 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20 64 65  t ret;....#if de
3820: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
3830: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
3840: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
3850: 5f 44 45 42 55 47 5f 42 41 43 4b 55 50 5f 46 49  _DEBUG_BACKUP_FI
3860: 4e 49 53 48 29 0d 0a 20 20 73 71 6c 69 74 65 33  NISH)..  sqlite3
3870: 2a 20 70 44 65 73 74 44 62 20 3d 20 70 2d 3e 70  * pDestDb = p->p
3880: 44 65 73 74 44 62 3b 0d 0a 20 20 73 71 6c 69 74  DestDb;..  sqlit
3890: 65 33 2a 20 70 53 72 63 44 62 20 3d 20 70 2d 3e  e3* pSrcDb = p->
38a0: 70 53 72 63 44 62 3b 0d 0a 20 20 73 71 6c 69 74  pSrcDb;..  sqlit
38b0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22  e3InteropDebug("
38c0: 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66  sqlite3_backup_f
38d0: 69 6e 69 73 68 5f 69 6e 74 65 72 6f 70 28 29 3a  inish_interop():
38e0: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33   calling sqlite3
38f0: 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 28 25  _backup_finish(%
3900: 70 2c 20 25 70 2c 20 25 70 29 2e 2e 2e 5c 6e 22  p, %p, %p)...\n"
3910: 2c 20 70 44 65 73 74 44 62 2c 20 70 53 72 63 44  , pDestDb, pSrcD
3920: 62 2c 20 70 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a  b, p);..#endif..
3930: 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65  ..  ret = sqlite
3940: 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 28  3_backup_finish(
3950: 70 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  p);....#if defin
3960: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
3970: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45  ) && (INTEROP_DE
3980: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45  BUG & INTEROP_DE
3990: 42 55 47 5f 42 41 43 4b 55 50 5f 46 49 4e 49 53  BUG_BACKUP_FINIS
39a0: 48 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74  H)..  sqlite3Int
39b0: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74  eropDebug("sqlit
39c0: 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68  e3_backup_finish
39d0: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69  _interop(): sqli
39e0: 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73  te3_backup_finis
39f0: 68 28 25 70 2c 20 25 70 2c 20 25 70 29 20 72 65  h(%p, %p, %p) re
3a00: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 70  turned %d.\n", p
3a10: 44 65 73 74 44 62 2c 20 70 53 72 63 44 62 2c 20  DestDb, pSrcDb, 
3a20: 70 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66  p, ret);..#endif
3a30: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74  ....  return ret
3a40: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
3a50: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71  PI int WINAPI sq
3a60: 6c 69 74 65 33 5f 72 65 73 65 74 5f 69 6e 74 65  lite3_reset_inte
3a70: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74  rop(sqlite3_stmt
3a80: 20 2a 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e   *stmt)..{..  in
3a90: 74 20 72 65 74 3b 0d 0a 23 69 66 20 53 51 4c 49  t ret;..#if SQLI
3aa0: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45  TE_VERSION_NUMBE
3ab0: 52 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a  R >= 3007014....
3ac0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
3ad0: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49  ROP_DEBUG) && (I
3ae0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49  NTEROP_DEBUG & I
3af0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53  NTEROP_DEBUG_RES
3b00: 45 54 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  ET)..  sqlite3In
3b10: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
3b20: 74 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f  te3_reset_intero
3b30: 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c  p(): calling sql
3b40: 69 74 65 33 5f 72 65 73 65 74 28 25 70 29 2e 2e  ite3_reset(%p)..
3b50: 2e 5c 6e 22 2c 20 73 74 6d 74 29 3b 0d 0a 23 65  .\n", stmt);..#e
3b60: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20  ndif....  ret = 
3b70: 73 71 6c 69 74 65 33 5f 72 65 73 65 74 28 73 74  sqlite3_reset(st
3b80: 6d 74 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69  mt);....#if defi
3b90: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  ned(INTEROP_DEBU
3ba0: 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44  G) && (INTEROP_D
3bb0: 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44  EBUG & INTEROP_D
3bc0: 45 42 55 47 5f 52 45 53 45 54 29 0d 0a 20 20 73  EBUG_RESET)..  s
3bd0: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
3be0: 75 67 28 22 73 71 6c 69 74 65 33 5f 72 65 73 65  ug("sqlite3_rese
3bf0: 74 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c  t_interop(): sql
3c00: 69 74 65 33 5f 72 65 73 65 74 28 25 70 29 20 72  ite3_reset(%p) r
3c10: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20  eturned %d.\n", 
3c20: 73 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e  stmt, ret);..#en
3c30: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20  dif....  return 
3c40: 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69  ret;..#else..  i
3c50: 66 20 28 28 28 56 64 62 65 20 2a 29 73 74 6d 74  f (((Vdbe *)stmt
3c60: 29 2d 3e 6d 61 67 69 63 20 3d 3d 20 56 44 42 45  )->magic == VDBE
3c70: 5f 4d 41 47 49 43 5f 44 45 41 44 29 20 72 65 74  _MAGIC_DEAD) ret
3c80: 75 72 6e 20 53 51 4c 49 54 45 5f 53 43 48 45 4d  urn SQLITE_SCHEM
3c90: 41 3b 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69  A;..  ret = sqli
3ca0: 74 65 33 5f 72 65 73 65 74 28 73 74 6d 74 29 3b  te3_reset(stmt);
3cb0: 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d  ..  return ret;.
3cc0: 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 51  .#endif..}....SQ
3cd0: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e  LITE_API int WIN
3ce0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 72 65 61  API sqlite3_crea
3cf0: 74 65 5f 66 75 6e 63 74 69 6f 6e 5f 69 6e 74 65  te_function_inte
3d00: 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 70 73 71  rop(sqlite3 *psq
3d10: 6c 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  l, const char *z
3d20: 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 69 6e  FunctionName, in
3d30: 74 20 6e 41 72 67 2c 20 69 6e 74 20 65 54 65 78  t nArg, int eTex
3d40: 74 52 65 70 2c 20 76 6f 69 64 20 2a 70 76 55 73  tRep, void *pvUs
3d50: 65 72 2c 20 53 51 4c 49 54 45 55 53 45 52 46 55  er, SQLITEUSERFU
3d60: 4e 43 20 66 75 6e 63 2c 20 53 51 4c 49 54 45 55  NC func, SQLITEU
3d70: 53 45 52 46 55 4e 43 20 66 75 6e 63 73 74 65 70  SERFUNC funcstep
3d80: 2c 20 53 51 4c 49 54 45 46 55 4e 43 46 49 4e 41  , SQLITEFUNCFINA
3d90: 4c 20 66 75 6e 63 66 69 6e 61 6c 2c 20 69 6e 74  L funcfinal, int
3da0: 20 6e 65 65 64 43 6f 6c 6c 53 65 71 29 0d 0a 7b   needCollSeq)..{
3db0: 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20  ..  int n;....  
3dc0: 69 66 20 28 65 54 65 78 74 52 65 70 20 3d 3d 20  if (eTextRep == 
3dd0: 53 51 4c 49 54 45 5f 55 54 46 31 36 29 0d 0a 20  SQLITE_UTF16).. 
3de0: 20 20 20 65 54 65 78 74 52 65 70 20 3d 20 53 51     eTextRep = SQ
3df0: 4c 49 54 45 5f 55 54 46 31 36 4e 41 54 49 56 45  LITE_UTF16NATIVE
3e00: 3b 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74  ;....  n = sqlit
3e10: 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69  e3_create_functi
3e20: 6f 6e 28 70 73 71 6c 2c 20 7a 46 75 6e 63 74 69  on(psql, zFuncti
3e30: 6f 6e 4e 61 6d 65 2c 20 6e 41 72 67 2c 20 65 54  onName, nArg, eT
3e40: 65 78 74 52 65 70 2c 20 30 2c 20 66 75 6e 63 2c  extRep, 0, func,
3e50: 20 66 75 6e 63 73 74 65 70 2c 20 66 75 6e 63 66   funcstep, funcf
3e60: 69 6e 61 6c 29 3b 0d 0a 20 20 69 66 20 28 6e 20  inal);..  if (n 
3e70: 3d 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20  == SQLITE_OK).. 
3e80: 20 7b 0d 0a 20 20 20 20 69 66 20 28 6e 65 65 64   {..    if (need
3e90: 43 6f 6c 6c 53 65 71 29 0d 0a 20 20 20 20 7b 0d  CollSeq)..    {.
3ea0: 0a 20 20 20 20 20 20 46 75 6e 63 44 65 66 20 2a  .      FuncDef *
3eb0: 70 46 75 6e 63 20 3d 20 73 71 6c 69 74 65 33 46  pFunc = sqlite3F
3ec0: 69 6e 64 46 75 6e 63 74 69 6f 6e 28 70 73 71 6c  indFunction(psql
3ed0: 2c 20 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c  , zFunctionName,
3ee0: 20 73 74 72 6c 65 6e 28 7a 46 75 6e 63 74 69 6f   strlen(zFunctio
3ef0: 6e 4e 61 6d 65 29 2c 20 6e 41 72 67 2c 20 65 54  nName), nArg, eT
3f00: 65 78 74 52 65 70 2c 20 30 29 3b 0d 0a 20 20 20  extRep, 0);..   
3f10: 20 20 20 69 66 28 20 70 46 75 6e 63 20 29 0d 0a     if( pFunc )..
3f20: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20        {..       
3f30: 20 70 46 75 6e 63 2d 3e 66 6c 61 67 73 20 7c 3d   pFunc->flags |=
3f40: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45   SQLITE_FUNC_NEE
3f50: 44 43 4f 4c 4c 3b 0d 0a 20 20 20 20 20 20 7d 0d  DCOLL;..      }.
3f60: 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a 0d 0a 20  .    }..  }.... 
3f70: 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d   return n;..}...
3f80: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64  .SQLITE_API void
3f90: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
3fa0: 76 61 6c 75 65 5f 64 6f 75 62 6c 65 5f 69 6e 74  value_double_int
3fb0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 76 61 6c  erop(sqlite3_val
3fc0: 75 65 20 2a 70 76 61 6c 2c 20 64 6f 75 62 6c 65  ue *pval, double
3fd0: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 2a 76 61   *val)..{..  *va
3fe0: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  l = sqlite3_valu
3ff0: 65 5f 64 6f 75 62 6c 65 28 70 76 61 6c 29 3b 0d  e_double(pval);.
4000: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
4010: 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c   void WINAPI sql
4020: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34  ite3_value_int64
4030: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
4040: 5f 76 61 6c 75 65 20 2a 70 76 61 6c 2c 20 73 71  _value *pval, sq
4050: 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29  lite_int64 *val)
4060: 0d 0a 7b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71  ..{..  *val = sq
4070: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36  lite3_value_int6
4080: 34 28 70 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53  4(pval);..}....S
4090: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
40a0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 20  unsigned char * 
40b0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 76  WINAPI sqlite3_v
40c0: 61 6c 75 65 5f 74 65 78 74 5f 69 6e 74 65 72 6f  alue_text_intero
40d0: 70 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20  p(sqlite3_value 
40e0: 2a 76 61 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29  *val, int *plen)
40f0: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73  ..{..  const uns
4100: 69 67 6e 65 64 20 63 68 61 72 20 2a 70 76 61 6c  igned char *pval
4110: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
4120: 5f 74 65 78 74 28 76 61 6c 29 3b 0d 0a 20 20 2a  _text(val);..  *
4130: 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20  plen = (pval != 
4140: 30 29 20 3f 20 73 74 72 6c 65 6e 28 28 63 68 61  0) ? strlen((cha
4150: 72 20 2a 29 70 76 61 6c 29 20 3a 20 30 3b 0d 0a  r *)pval) : 0;..
4160: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a    return pval;..
4170: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
4180: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e  const void * WIN
4190: 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  API sqlite3_valu
41a0: 65 5f 74 65 78 74 31 36 5f 69 6e 74 65 72 6f 70  e_text16_interop
41b0: 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a  (sqlite3_value *
41c0: 76 61 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d  val, int *plen).
41d0: 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64  .{..  const void
41e0: 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33   *pval = sqlite3
41f0: 5f 76 61 6c 75 65 5f 74 65 78 74 31 36 28 76 61  _value_text16(va
4200: 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28  l);..  *plen = (
4210: 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63 73  pval != 0) ? wcs
4220: 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70  len((wchar_t *)p
4230: 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63  val) * sizeof(wc
4240: 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72  har_t) : 0;..  r
4250: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a  eturn pval;..}..
4260: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69  ..SQLITE_API voi
4270: 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  d WINAPI sqlite3
4280: 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 5f 69  _result_double_i
4290: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63  nterop(sqlite3_c
42a0: 6f 6e 74 65 78 74 20 2a 70 63 74 78 2c 20 64 6f  ontext *pctx, do
42b0: 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20  uble *val)..{.. 
42c0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
42d0: 64 6f 75 62 6c 65 28 70 63 74 78 2c 20 2a 76 61  double(pctx, *va
42e0: 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  l);..}....SQLITE
42f0: 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49  _API void WINAPI
4300: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
4310: 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 71  int64_interop(sq
4320: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70  lite3_context *p
4330: 63 74 78 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36  ctx, sqlite_int6
4340: 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 73 71  4 *val)..{..  sq
4350: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
4360: 36 34 28 70 63 74 78 2c 20 2a 76 61 6c 29 3b 0d  64(pctx, *val);.
4370: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
4380: 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69   int WINAPI sqli
4390: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c  te3_context_coll
43a0: 63 6f 6d 70 61 72 65 5f 69 6e 74 65 72 6f 70 28  compare_interop(
43b0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
43c0: 2a 63 74 78 2c 20 63 6f 6e 73 74 20 76 6f 69 64  *ctx, const void
43d0: 20 2a 70 31 2c 20 69 6e 74 20 70 31 6c 65 6e 2c   *p1, int p1len,
43e0: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 32 2c   const void *p2,
43f0: 20 69 6e 74 20 70 32 6c 65 6e 29 0d 0a 7b 0d 0a   int p2len)..{..
4400: 20 20 69 66 20 28 28 63 74 78 2d 3e 70 46 75 6e    if ((ctx->pFun
4410: 63 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54  c->flags & SQLIT
4420: 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29  E_FUNC_NEEDCOLL)
4430: 20 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 32 3b   == 0) return 2;
4440: 0d 0a 20 20 72 65 74 75 72 6e 20 63 74 78 2d 3e  ..  return ctx->
4450: 70 43 6f 6c 6c 2d 3e 78 43 6d 70 28 63 74 78 2d  pColl->xCmp(ctx-
4460: 3e 70 43 6f 6c 6c 2d 3e 70 55 73 65 72 2c 20 70  >pColl->pUser, p
4470: 31 6c 65 6e 2c 20 70 31 2c 20 70 32 6c 65 6e 2c  1len, p1, p2len,
4480: 20 70 32 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49   p2);..}....SQLI
4490: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61  TE_API const cha
44a0: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  r * WINAPI sqlit
44b0: 65 33 5f 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c 73  e3_context_colls
44c0: 65 71 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  eq_interop(sqlit
44d0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c  e3_context *ctx,
44e0: 20 69 6e 74 20 2a 70 74 79 70 65 2c 20 69 6e 74   int *ptype, int
44f0: 20 2a 65 6e 63 2c 20 69 6e 74 20 2a 70 6c 65 6e   *enc, int *plen
4500: 29 0d 0a 7b 0d 0a 20 20 43 6f 6c 6c 53 65 71 20  )..{..  CollSeq 
4510: 2a 70 43 6f 6c 6c 20 3d 20 63 74 78 2d 3e 70 43  *pColl = ctx->pC
4520: 6f 6c 6c 3b 0d 0a 20 20 2a 70 74 79 70 65 20 3d  oll;..  *ptype =
4530: 20 30 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 30   0;..  *plen = 0
4540: 3b 0d 0a 20 20 2a 65 6e 63 20 3d 20 30 3b 0d 0a  ;..  *enc = 0;..
4550: 0d 0a 20 20 69 66 20 28 28 63 74 78 2d 3e 70 46  ..  if ((ctx->pF
4560: 75 6e 63 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c  unc->flags & SQL
4570: 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c  ITE_FUNC_NEEDCOL
4580: 4c 29 20 3d 3d 20 30 29 20 72 65 74 75 72 6e 20  L) == 0) return 
4590: 4e 55 4c 4c 3b 0d 0a 0d 0a 20 20 69 66 20 28 70  NULL;....  if (p
45a0: 43 6f 6c 6c 29 0d 0a 20 20 7b 0d 0a 20 20 20 20  Coll)..  {..    
45b0: 2a 65 6e 63 20 3d 20 70 43 6f 6c 6c 2d 3e 65 6e  *enc = pColl->en
45c0: 63 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56  c;..#if SQLITE_V
45d0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20  ERSION_NUMBER < 
45e0: 33 30 30 37 30 31 30 0d 0a 20 20 20 20 2a 70 74  3007010..    *pt
45f0: 79 70 65 20 3d 20 70 43 6f 6c 6c 2d 3e 74 79 70  ype = pColl->typ
4600: 65 3b 0d 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20  e;..#endif..    
4610: 2a 70 6c 65 6e 20 3d 20 28 70 43 6f 6c 6c 2d 3e  *plen = (pColl->
4620: 7a 4e 61 6d 65 20 21 3d 20 30 29 20 3f 20 73 74  zName != 0) ? st
4630: 72 6c 65 6e 28 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d  rlen(pColl->zNam
4640: 65 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 20 20 72  e) : 0;....    r
4650: 65 74 75 72 6e 20 70 43 6f 6c 6c 2d 3e 7a 4e 61  eturn pColl->zNa
4660: 6d 65 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75  me;..  }..  retu
4670: 72 6e 20 4e 55 4c 4c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn NULL;..}....S
4680: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
4690: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71  char * WINAPI sq
46a0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74  lite3_column_dat
46b0: 61 62 61 73 65 5f 6e 61 6d 65 5f 69 6e 74 65 72  abase_name_inter
46c0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
46d0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
46e0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
46f0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76    const char *pv
4700: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
4710: 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d  umn_database_nam
4720: 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a  e(stmt, iCol);..
4730: 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20    *plen = (pval 
4740: 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 70  != 0) ? strlen(p
4750: 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74  val) : 0;..  ret
4760: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a  urn pval;..}....
4770: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74  SQLITE_API const
4780: 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73   void * WINAPI s
4790: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61  qlite3_column_da
47a0: 74 61 62 61 73 65 5f 6e 61 6d 65 31 36 5f 69 6e  tabase_name16_in
47b0: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74  terop(sqlite3_st
47c0: 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43  mt *stmt, int iC
47d0: 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a  ol, int *plen)..
47e0: 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20  {..  const void 
47f0: 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f  *pval = sqlite3_
4800: 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f  column_database_
4810: 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20 69 43 6f  name16(stmt, iCo
4820: 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28  l);..  *plen = (
4830: 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63 73  pval != 0) ? wcs
4840: 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70  len((wchar_t *)p
4850: 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63  val) * sizeof(wc
4860: 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72  har_t) : 0;..  r
4870: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a  eturn pval;..}..
4880: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e  ..SQLITE_API con
4890: 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49  st char * WINAPI
48a0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
48b0: 74 61 62 6c 65 5f 6e 61 6d 65 5f 69 6e 74 65 72  table_name_inter
48c0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
48d0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
48e0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
48f0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76    const char *pv
4900: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
4910: 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 28 73  umn_table_name(s
4920: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a  tmt, iCol);..  *
4930: 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20  plen = (pval != 
4940: 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c  0) ? strlen(pval
4950: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
4960: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
4970: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f  ITE_API const vo
4980: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69  id * WINAPI sqli
4990: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c 65  te3_column_table
49a0: 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28  _name16_interop(
49b0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
49c0: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
49d0: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
49e0: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20  onst void *pval 
49f0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
4a00: 5f 74 61 62 6c 65 5f 6e 61 6d 65 31 36 28 73 74  _table_name16(st
4a10: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70  mt, iCol);..  *p
4a20: 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30  len = (pval != 0
4a30: 29 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61  ) ? wcslen((wcha
4a40: 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69  r_t *)pval) * si
4a50: 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20  zeof(wchar_t) : 
4a60: 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61  0;..  return pva
4a70: 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  l;..}....SQLITE_
4a80: 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  API const char *
4a90: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
4aa0: 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61  column_origin_na
4ab0: 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  me_interop(sqlit
4ac0: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69  e3_stmt *stmt, i
4ad0: 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c  nt iCol, int *pl
4ae0: 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20  en)..{..  const 
4af0: 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c  char *pval = sql
4b00: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67  ite3_column_orig
4b10: 69 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43  in_name(stmt, iC
4b20: 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20  ol);..  *plen = 
4b30: 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 74  (pval != 0) ? st
4b40: 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d  rlen(pval) : 0;.
4b50: 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d  .  return pval;.
4b60: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
4b70: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49   const void * WI
4b80: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c  NAPI sqlite3_col
4b90: 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 31  umn_origin_name1
4ba0: 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  6_interop(sqlite
4bb0: 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e  3_stmt *stmt, in
4bc0: 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65  t iCol, int *ple
4bd0: 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 76  n)..{..  const v
4be0: 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69  oid *pval = sqli
4bf0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69  te3_column_origi
4c00: 6e 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20 69  n_name16(stmt, i
4c10: 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d  Col);..  *plen =
4c20: 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77   (pval != 0) ? w
4c30: 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a  cslen((wchar_t *
4c40: 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28  )pval) * sizeof(
4c50: 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20  wchar_t) : 0;.. 
4c60: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d   return pval;..}
4c70: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69  ....SQLITE_API i
4c80: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65  nt WINAPI sqlite
4c90: 33 5f 74 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d  3_table_column_m
4ca0: 65 74 61 64 61 74 61 5f 69 6e 74 65 72 6f 70 28  etadata_interop(
4cb0: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e  sqlite3 *db, con
4cc0: 73 74 20 63 68 61 72 20 2a 7a 44 62 4e 61 6d 65  st char *zDbName
4cd0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54  , const char *zT
4ce0: 61 62 6c 65 4e 61 6d 65 2c 20 63 6f 6e 73 74 20  ableName, const 
4cf0: 63 68 61 72 20 2a 7a 43 6f 6c 75 6d 6e 4e 61 6d  char *zColumnNam
4d00: 65 2c 20 63 68 61 72 20 2a 2a 70 7a 44 61 74 61  e, char **pzData
4d10: 54 79 70 65 2c 20 63 68 61 72 20 2a 2a 70 7a 43  Type, char **pzC
4d20: 6f 6c 6c 53 65 71 2c 20 69 6e 74 20 2a 70 4e 6f  ollSeq, int *pNo
4d30: 74 4e 75 6c 6c 2c 20 69 6e 74 20 2a 70 50 72 69  tNull, int *pPri
4d40: 6d 61 72 79 4b 65 79 2c 20 69 6e 74 20 2a 70 41  maryKey, int *pA
4d50: 75 74 6f 69 6e 63 2c 20 69 6e 74 20 2a 70 64 74  utoinc, int *pdt
4d60: 4c 65 6e 2c 20 69 6e 74 20 2a 70 63 73 4c 65 6e  Len, int *pcsLen
4d70: 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a  )..{..  int n;..
4d80: 20 20 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65    ..  n = sqlite
4d90: 33 5f 74 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d  3_table_column_m
4da0: 65 74 61 64 61 74 61 28 64 62 2c 20 7a 44 62 4e  etadata(db, zDbN
4db0: 61 6d 65 2c 20 7a 54 61 62 6c 65 4e 61 6d 65 2c  ame, zTableName,
4dc0: 20 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 70 7a   zColumnName, pz
4dd0: 44 61 74 61 54 79 70 65 2c 20 70 7a 43 6f 6c 6c  DataType, pzColl
4de0: 53 65 71 2c 20 70 4e 6f 74 4e 75 6c 6c 2c 20 70  Seq, pNotNull, p
4df0: 50 72 69 6d 61 72 79 4b 65 79 2c 20 70 41 75 74  PrimaryKey, pAut
4e00: 6f 69 6e 63 29 3b 0d 0a 20 20 2a 70 64 74 4c 65  oinc);..  *pdtLe
4e10: 6e 20 3d 20 28 2a 70 7a 44 61 74 61 54 79 70 65  n = (*pzDataType
4e20: 20 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28   != 0) ? strlen(
4e30: 2a 70 7a 44 61 74 61 54 79 70 65 29 20 3a 20 30  *pzDataType) : 0
4e40: 3b 0d 0a 20 20 2a 70 63 73 4c 65 6e 20 3d 20 28  ;..  *pcsLen = (
4e50: 2a 70 7a 43 6f 6c 6c 53 65 71 20 21 3d 20 30 29  *pzCollSeq != 0)
4e60: 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c   ? strlen(*pzCol
4e70: 6c 53 65 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20  lSeq) : 0;....  
4e80: 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a  return n;..}....
4e90: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57  SQLITE_API int W
4ea0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 69 6e  INAPI sqlite3_in
4eb0: 64 65 78 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f 5f  dex_column_info_
4ec0: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20  interop(sqlite3 
4ed0: 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  *db, const char 
4ee0: 2a 7a 44 62 2c 20 63 6f 6e 73 74 20 63 68 61 72  *zDb, const char
4ef0: 20 2a 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 63 6f   *zIndexName, co
4f00: 6e 73 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75 6d  nst char *zColum
4f10: 6e 4e 61 6d 65 2c 20 69 6e 74 20 2a 73 6f 72 74  nName, int *sort
4f20: 4f 72 64 65 72 2c 20 69 6e 74 20 2a 6f 6e 45 72  Order, int *onEr
4f30: 72 6f 72 2c 20 63 68 61 72 20 2a 2a 70 7a 43 6f  ror, char **pzCo
4f40: 6c 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a  ll, int *plen)..
4f50: 7b 0d 0a 20 20 49 6e 64 65 78 20 2a 70 49 64 78  {..  Index *pIdx
4f60: 3b 0d 0a 20 20 54 61 62 6c 65 20 2a 70 54 61 62  ;..  Table *pTab
4f70: 3b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20  ;..  int n;.... 
4f80: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65   sqlite3_mutex_e
4f90: 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b  nter(db->mutex);
4fa0: 0a 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 45  .  sqlite3BtreeE
4fb0: 6e 74 65 72 41 6c 6c 28 64 62 29 3b 0a 0d 0a 20  nterAll(db);... 
4fc0: 20 70 49 64 78 20 3d 20 73 71 6c 69 74 65 33 46   pIdx = sqlite3F
4fd0: 69 6e 64 49 6e 64 65 78 28 64 62 2c 20 7a 49 6e  indIndex(db, zIn
4fe0: 64 65 78 4e 61 6d 65 2c 20 7a 44 62 29 3b 0d 0a  dexName, zDb);..
4ff0: 0d 0a 20 20 73 71 6c 69 74 65 33 42 74 72 65 65  ..  sqlite3Btree
5000: 4c 65 61 76 65 41 6c 6c 28 64 62 29 3b 0a 20 20  LeaveAll(db);.  
5010: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65  sqlite3_mutex_le
5020: 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0a  ave(db->mutex);.
5030: 0d 0a 20 20 69 66 20 28 21 70 49 64 78 29 20 72  ..  if (!pIdx) r
5040: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52  eturn SQLITE_ERR
5050: 4f 52 3b 0d 0a 0d 0a 20 20 70 54 61 62 20 3d 20  OR;....  pTab = 
5060: 70 49 64 78 2d 3e 70 54 61 62 6c 65 3b 0d 0a 20  pIdx->pTable;.. 
5070: 20 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c   for (n = 0; n <
5080: 20 70 49 64 78 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20   pIdx->nColumn; 
5090: 6e 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69  n++)..  {..    i
50a0: 6e 74 20 63 6e 75 6d 20 3d 20 70 49 64 78 2d 3e  nt cnum = pIdx->
50b0: 61 69 43 6f 6c 75 6d 6e 5b 6e 5d 3b 0d 0a 20 20  aiColumn[n];..  
50c0: 20 20 69 66 20 28 73 71 6c 69 74 65 33 53 74 72    if (sqlite3Str
50d0: 49 43 6d 70 28 70 54 61 62 2d 3e 61 43 6f 6c 5b  ICmp(pTab->aCol[
50e0: 63 6e 75 6d 5d 2e 7a 4e 61 6d 65 2c 20 7a 43 6f  cnum].zName, zCo
50f0: 6c 75 6d 6e 4e 61 6d 65 29 20 3d 3d 20 30 29 0d  lumnName) == 0).
5100: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2a 73  .    {..      *s
5110: 6f 72 74 4f 72 64 65 72 20 3d 20 70 49 64 78 2d  ortOrder = pIdx-
5120: 3e 61 53 6f 72 74 4f 72 64 65 72 5b 6e 5d 3b 0d  >aSortOrder[n];.
5130: 0a 20 20 20 20 20 20 2a 70 7a 43 6f 6c 6c 20 3d  .      *pzColl =
5140: 20 70 49 64 78 2d 3e 61 7a 43 6f 6c 6c 5b 6e 5d   pIdx->azColl[n]
5150: 3b 0d 0a 20 20 20 20 20 20 2a 70 6c 65 6e 20 3d  ;..      *plen =
5160: 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c 29   strlen(*pzColl)
5170: 3b 0d 0a 20 20 20 20 20 20 2a 6f 6e 45 72 72 6f  ;..      *onErro
5180: 72 20 3d 20 70 49 64 78 2d 3e 6f 6e 45 72 72 6f  r = pIdx->onErro
5190: 72 3b 0d 0a 0d 0a 20 20 20 20 20 20 72 65 74 75  r;....      retu
51a0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 20  rn SQLITE_OK;.. 
51b0: 20 20 20 7d 0d 0a 20 20 7d 0d 0a 20 20 72 65 74     }..  }..  ret
51c0: 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52  urn SQLITE_ERROR
51d0: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
51e0: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71  PI int WINAPI sq
51f0: 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63 75 72 73  lite3_table_curs
5200: 6f 72 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  or_interop(sqlit
5210: 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d 74 2c 20  e3_stmt *pstmt, 
5220: 69 6e 74 20 69 44 62 2c 20 50 67 6e 6f 20 74 61  int iDb, Pgno ta
5230: 62 6c 65 52 6f 6f 74 50 61 67 65 29 0d 0a 7b 0d  bleRootPage)..{.
5240: 0a 20 20 56 64 62 65 20 2a 70 20 3d 20 28 56 64  .  Vdbe *p = (Vd
5250: 62 65 20 2a 29 70 73 74 6d 74 3b 0d 0a 20 20 73  be *)pstmt;..  s
5260: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 28 70 20  qlite3 *db = (p 
5270: 3d 3d 20 4e 55 4c 4c 29 20 3f 20 4e 55 4c 4c 20  == NULL) ? NULL 
5280: 3a 20 70 2d 3e 64 62 3b 0d 0a 20 20 69 6e 74 20  : p->db;..  int 
5290: 6e 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20  n;..  int ret = 
52a0: 2d 31 3b 0d 0a 0d 0a 20 20 73 71 6c 69 74 65 33  -1;....  sqlite3
52b0: 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d  _mutex_enter(db-
52c0: 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 66 6f 72 20  >mutex);..  for 
52d0: 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 70 2d 3e 6e  (n = 0; n < p->n
52e0: 43 75 72 73 6f 72 20 26 26 20 70 2d 3e 61 70 43  Cursor && p->apC
52f0: 73 72 5b 6e 5d 20 21 3d 20 4e 55 4c 4c 3b 20 6e  sr[n] != NULL; n
5300: 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66  ++)..  {..    if
5310: 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 69   (p->apCsr[n]->i
5320: 73 54 61 62 6c 65 20 3d 3d 20 46 41 4c 53 45 29  sTable == FALSE)
5330: 20 63 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 20   continue;..    
5340: 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d  if (p->apCsr[n]-
5350: 3e 69 44 62 20 21 3d 20 69 44 62 29 20 63 6f 6e  >iDb != iDb) con
5360: 74 69 6e 75 65 3b 0d 0a 20 20 20 20 69 66 20 28  tinue;..    if (
5370: 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 70 43 75  p->apCsr[n]->pCu
5380: 72 73 6f 72 2d 3e 70 67 6e 6f 52 6f 6f 74 20 3d  rsor->pgnoRoot =
5390: 3d 20 74 61 62 6c 65 52 6f 6f 74 50 61 67 65 29  = tableRootPage)
53a0: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72  ..    {..      r
53b0: 65 74 20 3d 20 6e 3b 0d 0a 20 20 20 20 20 20 62  et = n;..      b
53c0: 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20  reak;..    }..  
53d0: 7d 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74  }..  sqlite3_mut
53e0: 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74  ex_leave(db->mut
53f0: 65 78 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e  ex);....  return
5400: 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49   ret;..}....SQLI
5410: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
5420: 49 20 73 71 6c 69 74 65 33 5f 63 75 72 73 6f 72  I sqlite3_cursor
5430: 5f 72 6f 77 69 64 5f 69 6e 74 65 72 6f 70 28 73  _rowid_interop(s
5440: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 73 74  qlite3_stmt *pst
5450: 6d 74 2c 20 69 6e 74 20 63 75 72 73 6f 72 2c 20  mt, int cursor, 
5460: 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 70 72  sqlite_int64 *pr
5470: 6f 77 69 64 29 0d 0a 7b 0d 0a 20 20 56 64 62 65  owid)..{..  Vdbe
5480: 20 2a 70 20 3d 20 28 56 64 62 65 20 2a 29 70 73   *p = (Vdbe *)ps
5490: 74 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20  tmt;..  sqlite3 
54a0: 2a 64 62 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c  *db = (p == NULL
54b0: 29 20 3f 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62  ) ? NULL : p->db
54c0: 3b 0d 0a 20 20 56 64 62 65 43 75 72 73 6f 72 20  ;..  VdbeCursor 
54d0: 2a 70 43 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20  *pC;..  int ret 
54e0: 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a  = SQLITE_OK;....
54f0: 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f    sqlite3_mutex_
5500: 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29  enter(db->mutex)
5510: 3b 0d 0a 20 20 77 68 69 6c 65 20 28 31 29 0d 0a  ;..  while (1)..
5520: 20 20 7b 0d 0a 20 20 20 20 69 66 20 28 63 75 72    {..    if (cur
5530: 73 6f 72 20 3c 20 30 20 7c 7c 20 63 75 72 73 6f  sor < 0 || curso
5540: 72 20 3e 3d 20 70 2d 3e 6e 43 75 72 73 6f 72 29  r >= p->nCursor)
5550: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72  ..    {..      r
5560: 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f  et = SQLITE_ERRO
5570: 52 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  R;..      break;
5580: 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 69 66 20  ..    }..    if 
5590: 28 70 2d 3e 61 70 43 73 72 5b 63 75 72 73 6f 72  (p->apCsr[cursor
55a0: 5d 20 3d 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20  ] == NULL)..    
55b0: 7b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 53  {..      ret = S
55c0: 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20  QLITE_ERROR;..  
55d0: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20      break;..    
55e0: 7d 0d 0a 0d 0a 20 20 20 20 70 43 20 3d 20 70 2d  }....    pC = p-
55f0: 3e 61 70 43 73 72 5b 63 75 72 73 6f 72 5d 3b 0d  >apCsr[cursor];.
5600: 0a 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c  ...    ret = sql
5610: 69 74 65 33 56 64 62 65 43 75 72 73 6f 72 4d 6f  ite3VdbeCursorMo
5620: 76 65 74 6f 28 70 43 29 3b 0d 0a 20 20 20 20 69  veto(pC);..    i
5630: 66 28 72 65 74 29 0d 0a 20 20 20 20 20 20 62 72  f(ret)..      br
5640: 65 61 6b 3b 0d 0a 0d 0a 20 20 20 20 69 66 28 70  eak;....    if(p
5650: 43 2d 3e 72 6f 77 69 64 49 73 56 61 6c 69 64 29  C->rowidIsValid)
5660: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2a  ..    {..      *
5670: 70 72 6f 77 69 64 20 3d 20 70 43 2d 3e 6c 61 73  prowid = pC->las
5680: 74 52 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a  tRowid;..    }..
5690: 20 20 20 20 65 6c 73 65 20 69 66 28 70 43 2d 3e      else if(pC->
56a0: 70 73 65 75 64 6f 54 61 62 6c 65 52 65 67 20 3e  pseudoTableReg >
56b0: 20 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20   0)..    {..    
56c0: 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45    ret = SQLITE_E
56d0: 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 72 65  RROR;..      bre
56e0: 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20  ak;..    }..    
56f0: 65 6c 73 65 20 69 66 28 70 43 2d 3e 6e 75 6c 6c  else if(pC->null
5700: 52 6f 77 20 7c 7c 20 70 43 2d 3e 70 43 75 72 73  Row || pC->pCurs
5710: 6f 72 3d 3d 30 29 0d 0a 20 20 20 20 7b 0d 0a 20  or==0)..    {.. 
5720: 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54       ret = SQLIT
5730: 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20  E_ERROR;..      
5740: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20  break;..    }.. 
5750: 20 20 20 65 6c 73 65 0d 0a 20 20 20 20 7b 0d 0a     else..    {..
5760: 20 20 20 20 20 20 69 66 20 28 70 43 2d 3e 70 43        if (pC->pC
5770: 75 72 73 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d 0a  ursor == NULL)..
5780: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20        {..       
5790: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52   ret = SQLITE_ER
57a0: 52 4f 52 3b 0d 0a 20 20 20 20 20 20 20 20 62 72  ROR;..        br
57b0: 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20  eak;..      }.. 
57c0: 20 20 20 20 20 73 71 6c 69 74 65 33 42 74 72 65       sqlite3Btre
57d0: 65 4b 65 79 53 69 7a 65 28 70 43 2d 3e 70 43 75  eKeySize(pC->pCu
57e0: 72 73 6f 72 2c 20 70 72 6f 77 69 64 29 3b 0d 0a  rsor, prowid);..
57f0: 20 20 20 20 20 20 2a 70 72 6f 77 69 64 20 3d 20        *prowid = 
5800: 2a 70 72 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d  *prowid;..    }.
5810: 0a 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 7d  .    break;..  }
5820: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65  ..  sqlite3_mute
5830: 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65  x_leave(db->mute
5840: 78 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20  x);....  return 
5850: 72 65 74 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 20  ret;..}..#endif 
5860: 2f 2a 20 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e  /* SQLITE_OS_WIN
5870: 20 2a 2f 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a   */..../********
5880: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
5890: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
58a0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
58b0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
58c0: 2a 2a 2a 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a  *****/..../*..**
58d0: 20 54 68 65 20 49 4e 54 45 52 4f 50 5f 54 45 53   The INTEROP_TES
58e0: 54 5f 45 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63  T_EXTENSION bloc
58f0: 6b 20 6d 75 73 74 20 62 65 20 61 74 20 74 68 65  k must be at the
5900: 20 65 6e 64 20 6f 66 20 74 68 69 73 20 73 6f 75   end of this sou
5910: 72 63 65 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63  rce file..** bec
5920: 61 75 73 65 20 69 74 20 69 6e 63 6c 75 64 65 73  ause it includes
5930: 20 74 68 65 20 22 73 71 6c 69 74 65 33 65 78 74   the "sqlite3ext
5940: 2e 68 22 20 66 69 6c 65 2c 20 77 68 69 63 68 20  .h" file, which 
5950: 64 65 66 69 6e 65 73 20 74 68 65 20 73 71 6c 69  defines the sqli
5960: 74 65 33 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41  te3..** public A
5970: 50 49 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65  PI function name
5980: 73 20 74 6f 20 62 65 20 6d 61 63 72 6f 73 20 61  s to be macros a
5990: 6e 64 20 74 68 61 74 20 77 6f 75 6c 64 20 63 61  nd that would ca
59a0: 75 73 65 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a  use the code..**
59b0: 20 61 62 6f 76 65 20 74 68 69 73 20 70 6f 69 6e   above this poin
59c0: 74 20 74 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e  t to malfunction
59d0: 2e 0d 0a 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e  ...*/..#if defin
59e0: 65 64 28 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f  ed(INTEROP_TEST_
59f0: 45 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63  EXTENSION)..#inc
5a00: 6c 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 71  lude "../core/sq
5a10: 6c 69 74 65 33 65 78 74 2e 68 22 0d 0a 53 51 4c  lite3ext.h"..SQL
5a20: 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e  ITE_EXTENSION_IN
5a30: 49 54 31 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68  IT1..../*..** Th
5a40: 65 20 69 6e 74 65 72 6f 70 54 65 73 74 28 29 20  e interopTest() 
5a50: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 72 65 74  SQL function ret
5a60: 75 72 6e 73 20 69 74 73 20 66 69 72 73 74 20 61  urns its first a
5a70: 72 67 75 6d 65 6e 74 20 6f 72 20 72 61 69 73 65  rgument or raise
5a80: 73 20 61 6e 0d 0a 2a 2a 20 65 72 72 6f 72 20 69  s an..** error i
5a90: 66 20 74 68 65 72 65 20 61 72 65 20 6e 6f 74 20  f there are not 
5aa0: 65 6e 6f 75 67 68 20 61 72 67 75 6d 65 6e 74 73  enough arguments
5ab0: 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 50 52  ...*/..SQLITE_PR
5ac0: 49 56 41 54 45 20 76 6f 69 64 20 69 6e 74 65 72  IVATE void inter
5ad0: 6f 70 54 65 73 74 46 75 6e 63 28 0d 0a 20 20 73  opTestFunc(..  s
5ae0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
5af0: 63 6f 6e 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20  context,..  int 
5b00: 61 72 67 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33  argc,..  sqlite3
5b10: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29  _value **argv..)
5b20: 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  {..  const unsig
5b30: 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0d 0a 20 20  ned char *z;..  
5b40: 69 66 28 20 61 72 67 63 21 3d 31 20 29 7b 0d 0a  if( argc!=1 ){..
5b50: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
5b60: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
5b70: 2c 20 22 6e 65 65 64 20 65 78 61 63 74 6c 79 20  , "need exactly 
5b80: 6f 6e 65 20 61 72 67 75 6d 65 6e 74 22 2c 20 2d  one argument", -
5b90: 31 29 3b 0d 0a 20 20 20 20 72 65 74 75 72 6e 3b  1);..    return;
5ba0: 0d 0a 20 20 7d 0d 0a 20 20 7a 20 3d 20 73 71 6c  ..  }..  z = sql
5bb0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
5bc0: 61 72 67 76 5b 30 5d 29 3b 0d 0a 20 20 69 66 28  argv[0]);..  if(
5bd0: 20 7a 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74   z ){..    sqlit
5be0: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
5bf0: 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a  ontext, (char*)z
5c00: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41  , -1, SQLITE_STA
5c10: 54 49 43 29 3b 0d 0a 20 20 7d 65 6c 73 65 7b 0d  TIC);..  }else{.
5c20: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
5c30: 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78 74  ult_null(context
5c40: 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d 0a 0d 0a 2f 2a  );..  }..}..../*
5c50: 0d 0a 2a 2a 20 54 68 65 20 69 6e 74 65 72 6f 70  ..** The interop
5c60: 53 6c 65 65 70 28 29 20 53 51 4c 20 66 75 6e 63  Sleep() SQL func
5c70: 74 69 6f 6e 20 77 61 69 74 73 20 74 68 65 20 73  tion waits the s
5c80: 70 65 63 69 66 69 65 64 20 6e 75 6d 62 65 72 20  pecified number 
5c90: 6f 66 20 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 0d  of milliseconds.
5ca0: 0a 2a 2a 20 6f 72 20 72 61 69 73 65 73 20 61 6e  .** or raises an
5cb0: 20 65 72 72 6f 72 20 69 66 20 74 68 65 72 65 20   error if there 
5cc0: 61 72 65 20 6e 6f 74 20 65 6e 6f 75 67 68 20 61  are not enough a
5cd0: 72 67 75 6d 65 6e 74 73 2e 0d 0a 2a 2f 0d 0a 53  rguments...*/..S
5ce0: 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f  QLITE_PRIVATE vo
5cf0: 69 64 20 69 6e 74 65 72 6f 70 53 6c 65 65 70 46  id interopSleepF
5d00: 75 6e 63 28 0d 0a 20 20 73 71 6c 69 74 65 33 5f  unc(..  sqlite3_
5d10: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
5d20: 2c 0d 0a 20 20 69 6e 74 20 61 72 67 63 2c 0d 0a  ,..  int argc,..
5d30: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
5d40: 2a 2a 61 72 67 76 0d 0a 29 7b 0d 0a 20 20 69 6e  **argv..){..  in
5d50: 74 20 6d 3b 0d 0a 20 20 69 66 28 20 61 72 67 63  t m;..  if( argc
5d60: 21 3d 31 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69  !=1 ){..    sqli
5d70: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
5d80: 28 63 6f 6e 74 65 78 74 2c 20 22 6e 65 65 64 20  (context, "need 
5d90: 65 78 61 63 74 6c 79 20 6f 6e 65 20 61 72 67 75  exactly one argu
5da0: 6d 65 6e 74 22 2c 20 2d 31 29 3b 0d 0a 20 20 20  ment", -1);..   
5db0: 20 72 65 74 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20   return;..  }.. 
5dc0: 20 6d 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   m = sqlite3_val
5dd0: 75 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b  ue_int(argv[0]);
5de0: 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 4f 53 5f  ..#if SQLITE_OS_
5df0: 57 49 4e 43 45 0d 0a 20 20 53 6c 65 65 70 28 6d  WINCE..  Sleep(m
5e00: 29 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65  );..  sqlite3_re
5e10: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
5e20: 2c 20 57 41 49 54 5f 4f 42 4a 45 43 54 5f 30 29  , WAIT_OBJECT_0)
5e30: 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 73 71 6c 69  ;..#else..  sqli
5e40: 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63  te3_result_int(c
5e50: 6f 6e 74 65 78 74 2c 20 53 6c 65 65 70 45 78 28  ontext, SleepEx(
5e60: 6d 2c 20 54 52 55 45 29 29 3b 0d 0a 23 65 6e 64  m, TRUE));..#end
5e70: 69 66 0d 0a 7d 0d 0a 0d 0a 2f 2a 20 53 51 4c 69  if..}..../* SQLi
5e80: 74 65 20 69 6e 76 6f 6b 65 73 20 74 68 69 73 20  te invokes this 
5e90: 72 6f 75 74 69 6e 65 20 6f 6e 63 65 20 77 68 65  routine once whe
5ea0: 6e 20 69 74 20 6c 6f 61 64 73 20 74 68 65 20 65  n it loads the e
5eb0: 78 74 65 6e 73 69 6f 6e 2e 0d 0a 2a 2a 20 43 72  xtension...** Cr
5ec0: 65 61 74 65 20 6e 65 77 20 66 75 6e 63 74 69 6f  eate new functio
5ed0: 6e 73 2c 20 63 6f 6c 6c 61 74 69 6e 67 20 73 65  ns, collating se
5ee0: 71 75 65 6e 63 65 73 2c 20 61 6e 64 20 76 69 72  quences, and vir
5ef0: 74 75 61 6c 20 74 61 62 6c 65 0d 0a 2a 2a 20 6d  tual table..** m
5f00: 6f 64 75 6c 65 73 20 68 65 72 65 2e 20 20 54 68  odules here.  Th
5f10: 69 73 20 69 73 20 75 73 75 61 6c 6c 79 20 74 68  is is usually th
5f20: 65 20 6f 6e 6c 79 20 65 78 70 6f 72 74 65 64 20  e only exported 
5f30: 73 79 6d 62 6f 6c 20 69 6e 0d 0a 2a 2a 20 74 68  symbol in..** th
5f40: 65 20 73 68 61 72 65 64 20 6c 69 62 72 61 72 79  e shared library
5f50: 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41 50  ...*/..SQLITE_AP
5f60: 49 20 69 6e 74 20 69 6e 74 65 72 6f 70 5f 74 65  I int interop_te
5f70: 73 74 5f 65 78 74 65 6e 73 69 6f 6e 5f 69 6e 69  st_extension_ini
5f80: 74 28 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  t(..  sqlite3 *d
5f90: 62 2c 0d 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45  b,..  char **pzE
5fa0: 72 72 4d 73 67 2c 0d 0a 20 20 63 6f 6e 73 74 20  rrMsg,..  const 
5fb0: 73 71 6c 69 74 65 33 5f 61 70 69 5f 72 6f 75 74  sqlite3_api_rout
5fc0: 69 6e 65 73 20 2a 70 41 70 69 0d 0a 29 7b 0d 0a  ines *pApi..){..
5fd0: 20 20 69 6e 74 20 72 63 3b 0d 0a 20 20 53 51 4c    int rc;..  SQL
5fe0: 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e  ITE_EXTENSION_IN
5ff0: 49 54 32 28 70 41 70 69 29 0d 0a 20 20 72 63 20  IT2(pApi)..  rc 
6000: 3d 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65  = sqlite3_create
6010: 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69  _function(db, "i
6020: 6e 74 65 72 6f 70 54 65 73 74 22 2c 20 2d 31 2c  nteropTest", -1,
6030: 20 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d   SQLITE_ANY, 0,.
6040: 0a 20 20 20 20 20 20 69 6e 74 65 72 6f 70 54 65  .      interopTe
6050: 73 74 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d 0a  stFunc, 0, 0);..
6060: 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45    if( rc==SQLITE
6070: 5f 4f 4b 20 29 7b 0d 0a 20 20 20 20 72 63 20 3d  _OK ){..    rc =
6080: 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f   sqlite3_create_
6090: 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e  function(db, "in
60a0: 74 65 72 6f 70 53 6c 65 65 70 22 2c 20 31 2c 20  teropSleep", 1, 
60b0: 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a  SQLITE_ANY, 0,..
60c0: 20 20 20 20 20 20 20 20 69 6e 74 65 72 6f 70 53          interopS
60d0: 6c 65 65 70 46 75 6e 63 2c 20 30 2c 20 30 29 3b  leepFunc, 0, 0);
60e0: 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20  ..  }..  return 
60f0: 72 63 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a  rc;..}..#endif..