System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact acbaa06edb97d3d5ad75aeae766da9c7854a90d2:


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 0d 0a 53 51 4c 49 54 45 5f 50 52 49  BUG)..SQLITE_PRI
05f0: 56 41 54 45 20 76 6f 69 64 20 73 71 6c 69 74 65  VATE void sqlite
0600: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 63 6f  3InteropDebug(co
0610: 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61  nst char *zForma
0620: 74 2c 20 2e 2e 2e 29 7b 0d 0a 20 20 76 61 5f 6c  t, ...){..  va_l
0630: 69 73 74 20 61 70 3b 20 20 20 20 20 20 20 20 20  ist ap;         
0640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0650: 2f 2a 20 56 61 72 61 72 67 20 6c 69 73 74 20 2a  /* Vararg list *
0660: 2f 0d 0a 20 20 53 74 72 41 63 63 75 6d 20 61 63  /..  StrAccum ac
0670: 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  c;              
0680: 20 20 20 20 20 20 20 20 20 2f 2a 20 53 74 72 69           /* Stri
0690: 6e 67 20 61 63 63 75 6d 75 6c 61 74 6f 72 20 2a  ng accumulator *
06a0: 2f 0a 20 20 63 68 61 72 20 7a 4d 73 67 5b 53 51  /.  char zMsg[SQ
06b0: 4c 49 54 45 5f 50 52 49 4e 54 5f 42 55 46 5f 53  LITE_PRINT_BUF_S
06c0: 49 5a 45 2a 33 5d 3b 20 2f 2a 20 43 6f 6d 70 6c  IZE*3]; /* Compl
06d0: 65 74 65 20 6c 6f 67 20 6d 65 73 73 61 67 65 20  ete log message 
06e0: 2a 2f 0d 0a 20 20 76 61 5f 73 74 61 72 74 28 61  */..  va_start(a
06f0: 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 73  p, zFormat);.  s
0700: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 49 6e  qlite3StrAccumIn
0710: 69 74 28 26 61 63 63 2c 20 7a 4d 73 67 2c 20 73  it(&acc, zMsg, s
0720: 69 7a 65 6f 66 28 7a 4d 73 67 29 2c 20 30 29 3b  izeof(zMsg), 0);
0730: 0a 20 20 61 63 63 2e 75 73 65 4d 61 6c 6c 6f 63  .  acc.useMalloc
0740: 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 33 56   = 0;.  sqlite3V
0750: 58 50 72 69 6e 74 66 28 26 61 63 63 2c 20 30 2c  XPrintf(&acc, 0,
0760: 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20   zFormat, ap);. 
0770: 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 23 69 66   va_end(ap);.#if
0780: 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f   SQLITE_VERSION_
0790: 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 37 30 31  NUMBER >= 300701
07a0: 33 0a 20 20 73 71 6c 69 74 65 33 5f 77 69 6e 33  3.  sqlite3_win3
07b0: 32 5f 77 72 69 74 65 5f 64 65 62 75 67 28 73 71  2_write_debug(sq
07c0: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e  lite3StrAccumFin
07d0: 69 73 68 28 26 61 63 63 29 2c 20 2d 31 29 3b 0a  ish(&acc), -1);.
07e0: 23 65 6c 69 66 20 64 65 66 69 6e 65 64 28 53 51  #elif defined(SQ
07f0: 4c 49 54 45 5f 57 49 4e 33 32 5f 48 41 53 5f 41  LITE_WIN32_HAS_A
0800: 4e 53 49 29 0a 20 20 4f 75 74 70 75 74 44 65 62  NSI).  OutputDeb
0810: 75 67 53 74 72 69 6e 67 41 28 73 71 6c 69 74 65  ugStringA(sqlite
0820: 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28  3StrAccumFinish(
0830: 26 61 63 63 29 29 3b 0a 23 65 6c 69 66 20 64 65  &acc));.#elif de
0840: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 57 49 4e  fined(SQLITE_WIN
0850: 33 32 5f 48 41 53 5f 57 49 44 45 29 0a 20 20 7b  32_HAS_WIDE).  {
0860: 0a 20 20 20 20 4c 50 57 53 54 52 20 7a 57 69 64  .    LPWSTR zWid
0870: 65 4d 73 67 20 3d 20 75 74 66 38 54 6f 55 6e 69  eMsg = utf8ToUni
0880: 63 6f 64 65 28 73 71 6c 69 74 65 33 53 74 72 41  code(sqlite3StrA
0890: 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29  ccumFinish(&acc)
08a0: 29 3b 0a 20 20 20 20 69 66 28 20 7a 57 69 64 65  );.    if( zWide
08b0: 4d 73 67 20 29 7b 0a 20 20 20 20 20 20 4f 75 74  Msg ){.      Out
08c0: 70 75 74 44 65 62 75 67 53 74 72 69 6e 67 57 28  putDebugStringW(
08d0: 7a 57 69 64 65 4d 73 67 29 3b 0a 20 20 20 20 20  zWideMsg);.     
08e0: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 57   sqlite3_free(zW
08f0: 69 64 65 4d 73 67 29 3b 0a 20 20 20 20 7d 0a 20  ideMsg);.    }. 
0900: 20 7d 0a 23 65 6c 73 65 0a 20 20 66 70 72 69 6e   }.#else.  fprin
0910: 74 66 28 73 74 64 65 72 72 2c 20 22 25 73 22 2c  tf(stderr, "%s",
0920: 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d   sqlite3StrAccum
0930: 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0a 23  Finish(&acc));.#
0940: 65 6e 64 69 66 0a 7d 0d 0a 23 65 6e 64 69 66 0d  endif.}..#endif.
0950: 0a 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45  ...#if SQLITE_VE
0960: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33  RSION_NUMBER < 3
0970: 30 30 37 30 31 34 0d 0a 53 51 4c 49 54 45 5f 50  007014..SQLITE_P
0980: 52 49 56 41 54 45 20 76 6f 69 64 20 2a 20 73 71  RIVATE void * sq
0990: 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72  lite3DbMallocZer
09a0: 6f 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  o_interop(sqlite
09b0: 33 20 2a 64 62 2c 20 69 6e 74 20 6e 29 0d 0a 7b  3 *db, int n)..{
09c0: 0d 0a 20 20 76 6f 69 64 20 2a 70 3b 0d 0a 20 20  ..  void *p;..  
09d0: 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73  if (db) {..    s
09e0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74  qlite3_mutex_ent
09f0: 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a  er(db->mutex);..
0a00: 20 20 7d 0d 0a 20 20 70 20 3d 20 73 71 6c 69 74    }..  p = sqlit
0a10: 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 28 64  e3DbMallocZero(d
0a20: 62 2c 6e 29 3b 0d 0a 20 20 69 66 20 28 64 62 29  b,n);..  if (db)
0a30: 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   {..    sqlite3_
0a40: 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e  mutex_leave(db->
0a50: 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20  mutex);..  }..  
0a60: 72 65 74 75 72 6e 20 70 3b 0d 0a 7d 0d 0a 0d 0a  return p;..}....
0a70: 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76  SQLITE_PRIVATE v
0a80: 6f 69 64 20 73 71 6c 69 74 65 33 44 62 46 72 65  oid sqlite3DbFre
0a90: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  e_interop(sqlite
0aa0: 33 20 2a 64 62 2c 20 76 6f 69 64 20 2a 70 29 0d  3 *db, void *p).
0ab0: 0a 7b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d  .{..  if (db) {.
0ac0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74  .    sqlite3_mut
0ad0: 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74  ex_enter(db->mut
0ae0: 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 69 66 20  ex);..  }..  if 
0af0: 28 70 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74  (p) {..    sqlit
0b00: 65 33 4d 65 6d 64 65 62 75 67 53 65 74 54 79 70  e3MemdebugSetTyp
0b10: 65 28 70 2c 20 4d 45 4d 54 59 50 45 5f 44 42 7c  e(p, MEMTYPE_DB|
0b20: 4d 45 4d 54 59 50 45 5f 48 45 41 50 29 3b 0d 0a  MEMTYPE_HEAP);..
0b30: 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 44 62    }..  sqlite3Db
0b40: 46 72 65 65 28 64 62 2c 70 29 3b 0d 0a 20 20 69  Free(db,p);..  i
0b50: 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71  f (db) {..    sq
0b60: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76  lite3_mutex_leav
0b70: 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20  e(db->mutex);.. 
0b80: 20 7d 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d   }..}..#endif...
0b90: 0a 2f 2a 0d 0a 20 20 20 20 54 68 65 20 67 6f 61  ./*..    The goa
0ba0: 6c 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f  l of this versio
0bb0: 6e 20 6f 66 20 63 6c 6f 73 65 20 69 73 20 64 69  n of close is di
0bc0: 66 66 65 72 65 6e 74 20 74 68 61 6e 20 74 68 61  fferent than tha
0bd0: 74 20 6f 66 20 73 71 6c 69 74 65 33 5f 63 6c 6f  t of sqlite3_clo
0be0: 73 65 28 29 2c 20 61 6e 64 20 69 73 20 64 65 73  se(), and is des
0bf0: 69 67 6e 65 64 20 74 6f 20 6c 65 6e 64 20 69 74  igned to lend it
0c00: 73 65 6c 66 20 62 65 74 74 65 72 20 74 6f 20 2e  self better to .
0c10: 4e 45 54 27 73 20 6e 6f 6e 2d 64 65 74 65 72 6d  NET's non-determ
0c20: 69 6e 69 73 74 69 63 20 66 69 6e 61 6c 69 7a 65  inistic finalize
0c30: 72 73 20 61 6e 64 0d 0a 20 20 20 20 74 68 65 20  rs and..    the 
0c40: 47 43 20 74 68 72 65 61 64 2e 20 20 53 51 4c 69  GC thread.  SQLi
0c50: 74 65 20 77 69 6c 6c 20 6e 6f 74 20 63 6c 6f 73  te will not clos
0c60: 65 20 61 20 64 61 74 61 62 61 73 65 20 69 66 20  e a database if 
0c70: 73 74 61 74 65 6d 65 6e 74 73 20 61 72 65 20 6f  statements are o
0c80: 70 65 6e 20 6f 6e 20 69 74 20 2d 2d 20 62 75 74  pen on it -- but
0c90: 20 66 6f 72 20 6f 75 72 20 70 75 72 70 6f 73 65   for our purpose
0ca0: 73 2c 20 77 65 27 64 20 72 61 74 68 65 72 20 66  s, we'd rather f
0cb0: 69 6e 61 6c 69 7a 65 20 61 6c 6c 20 61 63 74 69  inalize all acti
0cc0: 76 65 20 73 74 61 74 65 6d 65 6e 74 73 0d 0a 20  ve statements.. 
0cd0: 20 20 20 61 6e 64 20 66 6f 72 63 69 62 6c 79 20     and forcibly 
0ce0: 63 6c 6f 73 65 20 74 68 65 20 64 61 74 61 62 61  close the databa
0cf0: 73 65 2e 20 20 54 68 65 20 72 65 61 73 6f 6e 20  se.  The reason 
0d00: 69 73 20 73 69 6d 70 6c 65 20 2d 2d 20 61 20 6c  is simple -- a l
0d10: 6f 74 20 6f 66 20 70 65 6f 70 6c 65 20 64 6f 6e  ot of people don
0d20: 27 74 20 44 69 73 70 6f 73 65 28 29 20 6f 66 20  't Dispose() of 
0d30: 74 68 65 69 72 20 6f 62 6a 65 63 74 73 20 63 6f  their objects co
0d40: 72 72 65 63 74 6c 79 20 61 6e 64 20 6c 65 74 20  rrectly and let 
0d50: 74 68 65 20 67 61 72 62 61 67 65 20 63 6f 6c 6c  the garbage coll
0d60: 65 63 74 6f 72 0d 0a 20 20 20 20 64 6f 20 69 74  ector..    do it
0d70: 2e 20 20 54 68 69 73 20 6c 65 61 64 73 20 74 6f  .  This leads to
0d80: 20 75 6e 65 78 70 65 63 74 65 64 20 62 65 68 61   unexpected beha
0d90: 76 69 6f 72 20 77 68 65 6e 20 61 20 75 73 65 72  vior when a user
0da0: 20 74 68 69 6e 6b 73 20 74 68 65 79 27 76 65 20   thinks they've 
0db0: 63 6c 6f 73 65 64 20 61 20 64 61 74 61 62 61 73  closed a databas
0dc0: 65 2c 20 62 75 74 20 69 74 27 73 20 73 74 69 6c  e, but it's stil
0dd0: 6c 20 6f 70 65 6e 20 62 65 63 61 75 73 65 20 6e  l open because n
0de0: 6f 74 20 61 6c 6c 20 74 68 65 20 73 74 61 74 65  ot all the state
0df0: 6d 65 6e 74 73 20 68 61 76 65 0d 0a 20 20 20 20  ments have..    
0e00: 68 69 74 20 74 68 65 20 47 43 20 79 65 74 2e 0d  hit the GC yet..
0e10: 0a 0d 0a 20 20 20 20 53 6f 2c 20 68 65 72 65 20  ...    So, here 
0e20: 77 65 20 68 61 76 65 20 61 20 70 72 6f 62 6c 65  we have a proble
0e30: 6d 20 2e 2e 2e 20 2e 4e 45 54 20 68 61 73 20 61  m ... .NET has a
0e40: 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 79 20   pointer to any 
0e50: 6e 75 6d 62 65 72 20 6f 66 20 73 71 6c 69 74 65  number of sqlite
0e60: 33 5f 73 74 6d 74 20 6f 62 6a 65 63 74 73 2e 20  3_stmt objects. 
0e70: 20 57 65 20 63 61 6e 27 74 20 63 61 6c 6c 20 73   We can't call s
0e80: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28  qlite3_finalize(
0e90: 29 20 6f 6e 20 74 68 65 73 65 20 62 65 63 61 75  ) on these becau
0ea0: 73 65 0d 0a 20 20 20 20 74 68 65 69 72 20 6d 65  se..    their me
0eb0: 6d 6f 72 79 20 69 73 20 66 72 65 65 64 20 61 6e  mory is freed an
0ec0: 64 20 63 61 6e 20 62 65 20 75 73 65 64 20 66 6f  d can be used fo
0ed0: 72 20 73 6f 6d 65 74 68 69 6e 67 20 65 6c 73 65  r something else
0ee0: 2e 20 20 54 68 65 20 47 43 20 74 68 72 65 61 64  .  The GC thread
0ef0: 20 63 6f 75 6c 64 20 70 6f 74 65 6e 74 69 61 6c   could potential
0f00: 6c 79 20 74 72 79 20 61 6e 64 20 63 61 6c 6c 20  ly try and call 
0f10: 66 69 6e 61 6c 69 7a 65 20 61 67 61 69 6e 20 6f  finalize again o
0f20: 6e 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 20  n the statement 
0f30: 61 66 74 65 72 0d 0a 20 20 20 20 74 68 61 74 20  after..    that 
0f40: 6d 65 6d 6f 72 79 20 77 61 73 20 64 65 61 6c 6c  memory was deall
0f50: 6f 63 61 74 65 64 2e 20 20 42 41 44 2e 20 20 53  ocated.  BAD.  S
0f60: 6f 2c 20 77 68 61 74 20 77 65 20 6e 65 65 64 20  o, what we need 
0f70: 74 6f 20 64 6f 20 69 73 20 6d 61 6b 65 20 61 20  to do is make a 
0f80: 63 6f 70 79 20 6f 66 20 65 61 63 68 20 73 74 61  copy of each sta
0f90: 74 65 6d 65 6e 74 2c 20 61 6e 64 20 63 61 6c 6c  tement, and call
0fa0: 20 66 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74   finalize() on t
0fb0: 68 65 20 63 6f 70 79 20 2d 2d 20 73 6f 20 74 68  he copy -- so th
0fc0: 61 74 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 0d  at the original.
0fd0: 0a 20 20 20 20 73 74 61 74 65 6d 65 6e 74 27 73  .    statement's
0fe0: 20 6d 65 6d 6f 72 79 20 69 73 20 70 72 65 73 65   memory is prese
0ff0: 72 76 65 64 2c 20 61 6e 64 20 6d 61 72 6b 65 64  rved, and marked
1000: 20 61 73 20 42 41 44 2c 20 62 75 74 20 77 65 20   as BAD, but we 
1010: 63 61 6e 20 73 74 69 6c 6c 20 6d 61 6e 61 67 65  can still manage
1020: 20 74 6f 20 66 69 6e 61 6c 69 7a 65 20 65 76 65   to finalize eve
1030: 72 79 74 68 69 6e 67 20 61 6e 64 20 66 6f 72 63  rything and forc
1040: 69 62 6c 79 20 63 6c 6f 73 65 20 74 68 65 20 64  ibly close the d
1050: 61 74 61 62 61 73 65 2e 20 20 4c 61 74 65 72 20  atabase.  Later 
1060: 77 68 65 6e 20 74 68 65 20 0d 0a 20 20 20 20 47  when the ..    G
1070: 43 20 67 65 74 73 20 61 72 6f 75 6e 64 20 74 6f  C gets around to
1080: 20 63 61 6c 6c 69 6e 67 20 66 69 6e 61 6c 69 7a   calling finaliz
1090: 65 5f 69 6e 74 65 72 6f 70 28 29 20 6f 6e 20 74  e_interop() on t
10a0: 68 65 20 22 62 61 64 22 20 73 74 61 74 65 6d 65  he "bad" stateme
10b0: 6e 74 2c 20 77 65 20 64 65 74 65 63 74 20 74 68  nt, we detect th
10c0: 61 74 20 61 6e 64 20 66 69 6e 69 73 68 20 64 65  at and finish de
10d0: 61 6c 6c 6f 63 61 74 69 6e 67 20 74 68 65 20 70  allocating the p
10e0: 6f 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c  ointer...*/..SQL
10f0: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41  ITE_API int WINA
1100: 50 49 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65  PI sqlite3_close
1110: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
1120: 20 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20   *db)..{..  int 
1130: 72 65 74 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45  ret;..#if SQLITE
1140: 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20  _VERSION_NUMBER 
1150: 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 69  >= 3007014....#i
1160: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
1170: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
1180: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
1190: 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f 53 45  EROP_DEBUG_CLOSE
11a0: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65  )..  sqlite3Inte
11b0: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65  ropDebug("sqlite
11c0: 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 28  3_close_interop(
11d0: 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74  ): calling sqlit
11e0: 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70 29 2e  e3_close_v2(%p).
11f0: 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 65 6e  ..\n", db);..#en
1200: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73  dif....  ret = s
1210: 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28  qlite3_close_v2(
1220: 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69  db);....#if defi
1230: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  ned(INTEROP_DEBU
1240: 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44  G) && (INTEROP_D
1250: 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44  EBUG & INTEROP_D
1260: 45 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20 73  EBUG_CLOSE)..  s
1270: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
1280: 75 67 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f 73  ug("sqlite3_clos
1290: 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c  e_interop(): sql
12a0: 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70  ite3_close_v2(%p
12b0: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e  ) returned %d.\n
12c0: 22 2c 20 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65  ", db, ret);..#e
12d0: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e  ndif....  return
12e0: 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20   ret;..#else..  
12f0: 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 6c  ret = sqlite3_cl
1300: 6f 73 65 28 64 62 29 3b 0d 0a 0d 0a 20 20 69 66  ose(db);....  if
1310: 20 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45 5f   (ret == SQLITE_
1320: 42 55 53 59 29 0d 0a 20 20 7b 0d 0a 20 20 20 20  BUSY)..  {..    
1330: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e  sqlite3_mutex_en
1340: 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d  ter(db->mutex);.
1350: 0a 0d 0a 20 20 20 20 69 66 20 28 21 64 62 2d 3e  ...    if (!db->
1360: 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d 0a 20  pVdbe)..    {.. 
1370: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74       sqlite3_mut
1380: 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74  ex_leave(db->mut
1390: 65 78 29 3b 0d 0a 20 20 20 20 20 20 72 65 74 75  ex);..      retu
13a0: 72 6e 20 72 65 74 3b 0d 0a 20 20 20 20 7d 0d 0a  rn ret;..    }..
13b0: 0d 0a 20 20 20 20 77 68 69 6c 65 20 28 64 62 2d  ..    while (db-
13c0: 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d 0a  >pVdbe)..    {..
13d0: 20 20 20 20 20 20 2f 2a 20 4d 61 6b 65 20 61 20        /* Make a 
13e0: 63 6f 70 79 20 6f 66 20 74 68 65 20 66 69 72 73  copy of the firs
13f0: 74 20 70 72 65 70 61 72 65 64 20 73 74 61 74 65  t prepared state
1400: 6d 65 6e 74 20 2a 2f 0d 0a 20 20 20 20 20 20 56  ment */..      V
1410: 64 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 2a  dbe *p = (Vdbe *
1420: 29 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63  )sqlite3DbMalloc
1430: 5a 65 72 6f 5f 69 6e 74 65 72 6f 70 28 64 62 2c  Zero_interop(db,
1440: 20 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d   sizeof(Vdbe));.
1450: 0a 20 20 20 20 20 20 56 64 62 65 20 2a 70 6f 20  .      Vdbe *po 
1460: 3d 20 64 62 2d 3e 70 56 64 62 65 3b 0d 0a 0d 0a  = db->pVdbe;....
1470: 20 20 20 20 20 20 69 66 20 28 21 70 29 20 0d 0a        if (!p) ..
1480: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20        {..       
1490: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 4e 4f   ret = SQLITE_NO
14a0: 4d 45 4d 3b 0d 0a 20 20 20 20 20 20 20 20 62 72  MEM;..        br
14b0: 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 0d  eak;..      }...
14c0: 0a 20 20 20 20 20 20 43 6f 70 79 4d 65 6d 6f 72  .      CopyMemor
14d0: 79 28 70 2c 20 70 6f 2c 20 73 69 7a 65 6f 66 28  y(p, po, sizeof(
14e0: 56 64 62 65 29 29 3b 0d 0a 0d 0a 20 20 20 20 20  Vdbe));....     
14f0: 20 2f 2a 20 50 75 74 20 69 74 20 6f 6e 20 74 68   /* Put it on th
1500: 65 20 63 68 61 69 6e 20 73 6f 20 77 65 20 63 61  e chain so we ca
1510: 6e 20 66 72 65 65 20 69 74 20 2a 2f 0d 0a 20 20  n free it */..  
1520: 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 3d 20      db->pVdbe = 
1530: 70 3b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20  p;..      ret = 
1540: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65  sqlite3_finalize
1550: 28 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  ((sqlite3_stmt *
1560: 29 70 29 3b 20 2f 2a 20 54 68 69 73 20 77 69 6c  )p); /* This wil
1570: 6c 20 61 6c 73 6f 20 66 72 65 65 20 74 68 65 20  l also free the 
1580: 63 6f 70 79 27 73 20 6d 65 6d 6f 72 79 20 2a 2f  copy's memory */
1590: 0d 0a 20 20 20 20 20 20 69 66 20 28 72 65 74 29  ..      if (ret)
15a0: 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20  ..      {..     
15b0: 20 20 20 2f 2a 20 66 69 6e 61 6c 69 7a 65 20 66     /* finalize f
15c0: 61 69 6c 65 64 20 2d 2d 20 73 6f 20 77 65 20 6d  ailed -- so we m
15d0: 75 73 74 20 70 75 74 20 62 61 63 6b 20 61 6e 79  ust put back any
15e0: 74 68 69 6e 67 20 77 65 20 6d 75 6e 67 65 64 20  thing we munged 
15f0: 2a 2f 0d 0a 20 20 20 20 20 20 20 20 43 6f 70 79  */..        Copy
1600: 4d 65 6d 6f 72 79 28 70 6f 2c 20 70 2c 20 73 69  Memory(po, p, si
1610: 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 20  zeof(Vdbe));..  
1620: 20 20 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20        db->pVdbe 
1630: 3d 20 70 6f 3b 0d 0a 0d 0a 20 20 20 20 20 20 20  = po;....       
1640: 20 2f 2a 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20   /*..        ** 
1650: 4e 4f 54 45 3a 20 4f 6b 2c 20 77 65 20 6d 75 73  NOTE: Ok, we mus
1660: 74 20 66 72 65 65 20 74 68 69 73 20 62 6c 6f 63  t free this bloc
1670: 6b 20 74 68 61 74 20 2a 77 65 2a 20 61 6c 6c 6f  k that *we* allo
1680: 63 61 74 65 64 20 28 61 62 6f 76 65 29 20 73 69  cated (above) si
1690: 6e 63 65 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20  nce..        ** 
16a0: 20 20 20 20 20 20 66 69 6e 61 6c 69 7a 65 20 64        finalize d
16b0: 69 64 20 6e 6f 74 20 64 6f 20 73 6f 2e 0d 0a 20  id not do so... 
16c0: 20 20 20 20 20 20 20 2a 2f 0d 0a 20 20 20 20 20         */..     
16d0: 20 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65     sqlite3DbFree
16e0: 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b  _interop(db, p);
16f0: 0d 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b  ..        break;
1700: 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20  ..      }..     
1710: 20 65 6c 73 65 0d 0a 20 20 20 20 20 20 7b 0d 0a   else..      {..
1720: 20 20 20 20 20 20 20 20 5a 65 72 6f 4d 65 6d 6f          ZeroMemo
1730: 72 79 28 70 6f 2c 20 73 69 7a 65 6f 66 28 56 64  ry(po, sizeof(Vd
1740: 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 20 20 70  be));..        p
1750: 6f 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42 45 5f  o->magic = VDBE_
1760: 4d 41 47 49 43 5f 44 45 41 44 3b 0d 0a 20 20 20  MAGIC_DEAD;..   
1770: 20 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 20     }..    }..   
1780: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c   sqlite3_mutex_l
1790: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b  eave(db->mutex);
17a0: 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69  ..    ret = sqli
17b0: 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b 0d 0a  te3_close(db);..
17c0: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65    }..  return re
17d0: 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d  t;..#endif..}...
17e0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
17f0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6f  WINAPI sqlite3_o
1800: 70 65 6e 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73  pen_interop(cons
1810: 74 20 63 68 61 72 2a 66 69 6c 65 6e 61 6d 65 2c  t char*filename,
1820: 20 69 6e 74 20 66 6c 61 67 73 2c 20 73 71 6c 69   int flags, sqli
1830: 74 65 33 20 2a 2a 70 70 64 62 29 0d 0a 7b 0d 0a  te3 **ppdb)..{..
1840: 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69    int ret;....#i
1850: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
1860: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
1870: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
1880: 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 29  EROP_DEBUG_OPEN)
1890: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
18a0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
18b0: 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 29 3a  _open_interop():
18c0: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33   calling sqlite3
18d0: 5f 6f 70 65 6e 5f 76 32 28 5c 22 25 73 5c 22 2c  _open_v2(\"%s\",
18e0: 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20   %d, %p)...\n", 
18f0: 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c  filename, flags,
1900: 20 70 70 64 62 29 3b 0d 0a 23 65 6e 64 69 66 0d   ppdb);..#endif.
1910: 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74  ...  ret = sqlit
1920: 65 33 5f 6f 70 65 6e 5f 76 32 28 66 69 6c 65 6e  e3_open_v2(filen
1930: 61 6d 65 2c 20 70 70 64 62 2c 20 66 6c 61 67 73  ame, ppdb, flags
1940: 2c 20 4e 55 4c 4c 29 3b 0d 0a 0d 0a 23 69 66 20  , NULL);....#if 
1950: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f  defined(INTEROP_
1960: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52  DEBUG) && (INTER
1970: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52  OP_DEBUG & INTER
1980: 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 29 0d 0a  OP_DEBUG_OPEN)..
1990: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70    sqlite3Interop
19a0: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f  Debug("sqlite3_o
19b0: 70 65 6e 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73  pen_interop(): s
19c0: 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 76 32 28 5c  qlite3_open_v2(\
19d0: 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72  "%s\", %d, %p) r
19e0: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20  eturned %d.\n", 
19f0: 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c  filename, flags,
1a00: 20 70 70 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65   ppdb, ret);..#e
1a10: 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69  ndif....#if defi
1a20: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 45 58 54 45  ned(INTEROP_EXTE
1a30: 4e 53 49 4f 4e 5f 46 55 4e 43 54 49 4f 4e 53 29  NSION_FUNCTIONS)
1a40: 0d 0a 20 20 69 66 20 28 72 65 74 20 3d 3d 20 53  ..  if (ret == S
1a50: 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20 20 20 20 52  QLITE_OK)..    R
1a60: 65 67 69 73 74 65 72 45 78 74 65 6e 73 69 6f 6e  egisterExtension
1a70: 46 75 6e 63 74 69 6f 6e 73 28 2a 70 70 64 62 29  Functions(*ppdb)
1a80: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72  ;..#endif....  r
1a90: 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d  eturn ret;..}...
1aa0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
1ab0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6f  WINAPI sqlite3_o
1ac0: 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70 28 63 6f  pen16_interop(co
1ad0: 6e 73 74 20 63 68 61 72 20 2a 66 69 6c 65 6e 61  nst char *filena
1ae0: 6d 65 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 73  me, int flags, s
1af0: 71 6c 69 74 65 33 20 2a 2a 70 70 64 62 29 0d 0a  qlite3 **ppdb)..
1b00: 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d  {..  int ret;...
1b10: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54  .#if defined(INT
1b20: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28  EROP_DEBUG) && (
1b30: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20  INTEROP_DEBUG & 
1b40: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50  INTEROP_DEBUG_OP
1b50: 45 4e 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33  EN16)..  sqlite3
1b60: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71  InteropDebug("sq
1b70: 6c 69 74 65 33 5f 6f 70 65 6e 31 36 5f 69 6e 74  lite3_open16_int
1b80: 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20  erop(): calling 
1b90: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74  sqlite3_open_int
1ba0: 65 72 6f 70 28 5c 22 25 73 5c 22 2c 20 25 64 2c  erop(\"%s\", %d,
1bb0: 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65   %p)...\n", file
1bc0: 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64  name, flags, ppd
1bd0: 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20  b);..#endif.... 
1be0: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 6f   ret = sqlite3_o
1bf0: 70 65 6e 5f 69 6e 74 65 72 6f 70 28 66 69 6c 65  pen_interop(file
1c00: 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64  name, flags, ppd
1c10: 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  b);....#if defin
1c20: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
1c30: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45  ) && (INTEROP_DE
1c40: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45  BUG & INTEROP_DE
1c50: 42 55 47 5f 4f 50 45 4e 31 36 29 0d 0a 20 20 73  BUG_OPEN16)..  s
1c60: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
1c70: 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 6e  ug("sqlite3_open
1c80: 31 36 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71  16_interop(): sq
1c90: 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72  lite3_open_inter
1ca0: 6f 70 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25  op(\"%s\", %d, %
1cb0: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c  p) returned %d.\
1cc0: 6e 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 66 6c  n", filename, fl
1cd0: 61 67 73 2c 20 70 70 64 62 2c 20 72 65 74 29 3b  ags, ppdb, ret);
1ce0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66  ..#endif....  if
1cf0: 20 28 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45   ((ret == SQLITE
1d00: 5f 4f 4b 29 20 26 26 20 21 44 62 48 61 73 50 72  _OK) && !DbHasPr
1d10: 6f 70 65 72 74 79 28 2a 70 70 64 62 2c 20 30 2c  operty(*ppdb, 0,
1d20: 20 44 42 5f 53 63 68 65 6d 61 4c 6f 61 64 65 64   DB_SchemaLoaded
1d30: 29 29 0d 0a 20 20 20 20 45 4e 43 28 2a 70 70 64  ))..    ENC(*ppd
1d40: 62 29 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 31  b) = SQLITE_UTF1
1d50: 36 4e 41 54 49 56 45 3b 0d 0a 0d 0a 20 20 72 65  6NATIVE;....  re
1d60: 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a  turn ret;..}....
1d70: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74  SQLITE_API const
1d80: 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73   char * WINAPI s
1d90: 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 5f 69 6e  qlite3_errmsg_in
1da0: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64  terop(sqlite3 *d
1db0: 62 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  b, int *plen)..{
1dc0: 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ..  const char *
1dd0: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 65  pval = sqlite3_e
1de0: 72 72 6d 73 67 28 64 62 29 3b 0d 0a 20 20 2a 70  rrmsg(db);..  *p
1df0: 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30  len = (pval != 0
1e00: 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29  ) ? strlen(pval)
1e10: 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20   : 0;..  return 
1e20: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  pval;..}....SQLI
1e30: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
1e40: 49 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65  I sqlite3_change
1e50: 73 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  s_interop(sqlite
1e60: 33 20 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74  3 *db)..{..  int
1e70: 20 72 65 73 75 6c 74 3b 0d 0a 0d 0a 23 69 66 20   result;....#if 
1e80: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f  defined(INTEROP_
1e90: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52  DEBUG) && (INTER
1ea0: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52  OP_DEBUG & INTER
1eb0: 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 53  OP_DEBUG_CHANGES
1ec0: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65  )..  sqlite3Inte
1ed0: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65  ropDebug("sqlite
1ee0: 33 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65 72 6f  3_changes_intero
1ef0: 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c  p(): calling sql
1f00: 69 74 65 33 5f 63 68 61 6e 67 65 73 28 25 70 29  ite3_changes(%p)
1f10: 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 65  ...\n", db);..#e
1f20: 6e 64 69 66 0d 0a 0d 0a 23 69 66 6e 64 65 66 20  ndif....#ifndef 
1f30: 4e 44 45 42 55 47 0d 0a 20 20 69 66 20 28 21 64  NDEBUG..  if (!d
1f40: 62 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65  b)..      sqlite
1f50: 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 22 6e  3InteropBreak("n
1f60: 75 6c 6c 20 64 61 74 61 62 61 73 65 20 68 61 6e  ull database han
1f70: 64 6c 65 20 66 6f 72 20 73 71 6c 69 74 65 33 5f  dle for sqlite3_
1f80: 63 68 61 6e 67 65 73 28 29 22 29 3b 0d 0a 0d 0a  changes()");....
1f90: 20 20 69 66 20 28 21 73 71 6c 69 74 65 33 53 61    if (!sqlite3Sa
1fa0: 66 65 74 79 43 68 65 63 6b 4f 6b 28 64 62 29 29  fetyCheckOk(db))
1fb0: 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 49  ..      sqlite3I
1fc0: 6e 74 65 72 6f 70 42 72 65 61 6b 28 22 62 61 64  nteropBreak("bad
1fd0: 20 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65   database handle
1fe0: 20 66 6f 72 20 73 71 6c 69 74 65 33 5f 63 68 61   for sqlite3_cha
1ff0: 6e 67 65 73 28 29 22 29 3b 0d 0a 23 65 6e 64 69  nges()");..#endi
2000: 66 0d 0a 0d 0a 20 20 72 65 73 75 6c 74 20 3d 20  f....  result = 
2010: 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28  sqlite3_changes(
2020: 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69  db);....#if defi
2030: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  ned(INTEROP_DEBU
2040: 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44  G) && (INTEROP_D
2050: 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44  EBUG & INTEROP_D
2060: 45 42 55 47 5f 43 48 41 4e 47 45 53 29 0d 0a 20  EBUG_CHANGES).. 
2070: 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44   sqlite3InteropD
2080: 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 68  ebug("sqlite3_ch
2090: 61 6e 67 65 73 5f 69 6e 74 65 72 6f 70 28 29 3a  anges_interop():
20a0: 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73   sqlite3_changes
20b0: 28 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 64  (%p) returned %d
20c0: 2e 5c 6e 22 2c 20 64 62 2c 20 72 65 73 75 6c 74  .\n", db, result
20d0: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20  );..#endif....  
20e0: 72 65 74 75 72 6e 20 72 65 73 75 6c 74 3b 0d 0a  return result;..
20f0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
2100: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
2110: 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 72  e3_prepare_inter
2120: 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20  op(sqlite3 *db, 
2130: 63 6f 6e 73 74 20 63 68 61 72 20 2a 73 71 6c 2c  const char *sql,
2140: 20 69 6e 74 20 6e 62 79 74 65 73 2c 20 73 71 6c   int nbytes, sql
2150: 69 74 65 33 5f 73 74 6d 74 20 2a 2a 70 70 73 74  ite3_stmt **ppst
2160: 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  mt, const char *
2170: 2a 70 7a 74 61 69 6c 2c 20 69 6e 74 20 2a 70 6c  *pztail, int *pl
2180: 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b  en)..{..  int n;
2190: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28  ....#if defined(
21a0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26  INTEROP_DEBUG) &
21b0: 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  & (INTEROP_DEBUG
21c0: 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47   & INTEROP_DEBUG
21d0: 5f 50 52 45 50 41 52 45 29 0d 0a 20 20 73 71 6c  _PREPARE)..  sql
21e0: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67  ite3InteropDebug
21f0: 28 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72  ("sqlite3_prepar
2200: 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c  e_interop(): cal
2210: 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 70 72 65  ling sqlite3_pre
2220: 70 61 72 65 28 25 70 2c 20 5c 22 25 73 5c 22 2c  pare(%p, \"%s\",
2230: 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20   %d, %p)...\n", 
2240: 64 62 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c  db, sql, nbytes,
2250: 20 70 70 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69   ppstmt);..#endi
2260: 66 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74  f....  n = sqlit
2270: 65 33 5f 70 72 65 70 61 72 65 28 64 62 2c 20 73  e3_prepare(db, s
2280: 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74  ql, nbytes, ppst
2290: 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 0d 0a  mt, pztail);....
22a0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
22b0: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49  ROP_DEBUG) && (I
22c0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49  NTEROP_DEBUG & I
22d0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45  NTEROP_DEBUG_PRE
22e0: 50 41 52 45 29 0d 0a 20 20 73 71 6c 69 74 65 33  PARE)..  sqlite3
22f0: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71  InteropDebug("sq
2300: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e  lite3_prepare_in
2310: 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33  terop(): sqlite3
2320: 5f 70 72 65 70 61 72 65 28 25 70 2c 20 5c 22 25  _prepare(%p, \"%
2330: 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 65 74  s\", %d, %p) ret
2340: 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62  urned %d.\n", db
2350: 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70  , sql, nbytes, p
2360: 70 73 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65 6e 64  pstmt, n);..#end
2370: 69 66 0d 0a 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20  if....  *plen = 
2380: 28 2a 70 7a 74 61 69 6c 20 21 3d 20 30 29 20 3f  (*pztail != 0) ?
2390: 20 73 74 72 6c 65 6e 28 2a 70 7a 74 61 69 6c 29   strlen(*pztail)
23a0: 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74 75 72   : 0;....  retur
23b0: 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  n n;..}....SQLIT
23c0: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49  E_API int WINAPI
23d0: 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65   sqlite3_prepare
23e0: 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  16_interop(sqlit
23f0: 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 76 6f  e3 *db, const vo
2400: 69 64 20 2a 73 71 6c 2c 20 69 6e 74 20 6e 63 68  id *sql, int nch
2410: 61 72 73 2c 20 73 71 6c 69 74 65 33 5f 73 74 6d  ars, sqlite3_stm
2420: 74 20 2a 2a 70 70 73 74 6d 74 2c 20 63 6f 6e 73  t **ppstmt, cons
2430: 74 20 76 6f 69 64 20 2a 2a 70 7a 74 61 69 6c 2c  t void **pztail,
2440: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
2450: 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 23 69 66 20    int n;....#if 
2460: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f  defined(INTEROP_
2470: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52  DEBUG) && (INTER
2480: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52  OP_DEBUG & INTER
2490: 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45  OP_DEBUG_PREPARE
24a0: 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  16)..  sqlite3In
24b0: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
24c0: 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65  te3_prepare_inte
24d0: 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73  rop(): calling s
24e0: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 31 36  qlite3_prepare16
24f0: 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c  (%p, \"%s\", %d,
2500: 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c 20   %p)...\n", db, 
2510: 73 71 6c 2c 20 6e 63 68 61 72 73 2c 20 70 70 73  sql, nchars, pps
2520: 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d  tmt);..#endif...
2530: 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 70  .  n = sqlite3_p
2540: 72 65 70 61 72 65 31 36 28 64 62 2c 20 73 71 6c  repare16(db, sql
2550: 2c 20 6e 63 68 61 72 73 20 2a 20 73 69 7a 65 6f  , nchars * sizeo
2560: 66 28 77 63 68 61 72 5f 74 29 2c 20 70 70 73 74  f(wchar_t), ppst
2570: 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 0d 0a  mt, pztail);....
2580: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45  #if defined(INTE
2590: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49  ROP_DEBUG) && (I
25a0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49  NTEROP_DEBUG & I
25b0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45  NTEROP_DEBUG_PRE
25c0: 50 41 52 45 31 36 29 0d 0a 20 20 73 71 6c 69 74  PARE16)..  sqlit
25d0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22  e3InteropDebug("
25e0: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f  sqlite3_prepare_
25f0: 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74  interop(): sqlit
2600: 65 33 5f 70 72 65 70 61 72 65 31 36 28 25 70 2c  e3_prepare16(%p,
2610: 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29   \"%s\", %d, %p)
2620: 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22   returned %d.\n"
2630: 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72  , db, sql, nchar
2640: 73 2c 20 70 70 73 74 6d 74 2c 20 6e 29 3b 0d 0a  s, ppstmt, n);..
2650: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 2a 70 6c 65  #endif....  *ple
2660: 6e 20 3d 20 28 2a 70 7a 74 61 69 6c 20 21 3d 20  n = (*pztail != 
2670: 30 29 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68  0) ? wcslen((wch
2680: 61 72 5f 74 20 2a 29 2a 70 7a 74 61 69 6c 29 20  ar_t *)*pztail) 
2690: 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74  * sizeof(wchar_t
26a0: 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74 75  ) : 0;....  retu
26b0: 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  rn n;..}....SQLI
26c0: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
26d0: 49 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 64  I sqlite3_bind_d
26e0: 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71  ouble_interop(sq
26f0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74  lite3_stmt *stmt
2700: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62  , int iCol, doub
2710: 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 09 72 65  le *val)..{...re
2720: 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e  turn sqlite3_bin
2730: 64 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69 43  d_double(stmt,iC
2740: 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a  ol,*val);..}....
2750: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57  SQLITE_API int W
2760: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62 69  INAPI sqlite3_bi
2770: 6e 64 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70  nd_int64_interop
2780: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73  (sqlite3_stmt *s
2790: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 73  tmt, int iCol, s
27a0: 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c  qlite_int64 *val
27b0: 29 0d 0a 7b 0d 0a 09 72 65 74 75 72 6e 20 73 71  )..{...return sq
27c0: 6c 69 74 65 33 5f 62 69 6e 64 5f 69 6e 74 36 34  lite3_bind_int64
27d0: 28 73 74 6d 74 2c 69 43 6f 6c 2c 2a 76 61 6c 29  (stmt,iCol,*val)
27e0: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
27f0: 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20  PI const char * 
2800: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62  WINAPI sqlite3_b
2810: 69 6e 64 5f 70 61 72 61 6d 65 74 65 72 5f 6e 61  ind_parameter_na
2820: 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  me_interop(sqlit
2830: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69  e3_stmt *stmt, i
2840: 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c  nt iCol, int *pl
2850: 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20  en)..{..  const 
2860: 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c  char *pval = sql
2870: 69 74 65 33 5f 62 69 6e 64 5f 70 61 72 61 6d 65  ite3_bind_parame
2880: 74 65 72 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69  ter_name(stmt, i
2890: 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d  Col);..  *plen =
28a0: 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73   (pval != 0) ? s
28b0: 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b  trlen(pval) : 0;
28c0: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b  ..  return pval;
28d0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
28e0: 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57  I const char * W
28f0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f  INAPI sqlite3_co
2900: 6c 75 6d 6e 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f  lumn_name_intero
2910: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
2920: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
2930: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20  int *plen)..{.. 
2940: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61   const char *pva
2950: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  l = sqlite3_colu
2960: 6d 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43  mn_name(stmt, iC
2970: 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20  ol);..  *plen = 
2980: 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 74  (pval != 0) ? st
2990: 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d  rlen(pval) : 0;.
29a0: 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d  .  return pval;.
29b0: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
29c0: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49   const void * WI
29d0: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c  NAPI sqlite3_col
29e0: 75 6d 6e 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72  umn_name16_inter
29f0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
2a00: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
2a10: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
2a20: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76    const void *pv
2a30: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
2a40: 75 6d 6e 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c  umn_name16(stmt,
2a50: 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e   iCol);..  *plen
2a60: 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f   = (pval != 0) ?
2a70: 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74   wcslen((wchar_t
2a80: 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f   *)pval) * sizeo
2a90: 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d  f(wchar_t) : 0;.
2aa0: 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d  .  return pval;.
2ab0: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
2ac0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49   const char * WI
2ad0: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c  NAPI sqlite3_col
2ae0: 75 6d 6e 5f 64 65 63 6c 74 79 70 65 5f 69 6e 74  umn_decltype_int
2af0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d  erop(sqlite3_stm
2b00: 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f  t *stmt, int iCo
2b10: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
2b20: 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ..  const char *
2b30: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63  pval = sqlite3_c
2b40: 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65 28 73  olumn_decltype(s
2b50: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a  tmt, iCol);..  *
2b60: 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20  plen = (pval != 
2b70: 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c  0) ? strlen(pval
2b80: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
2b90: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
2ba0: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f  ITE_API const vo
2bb0: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69  id * WINAPI sqli
2bc0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74  te3_column_declt
2bd0: 79 70 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71  ype16_interop(sq
2be0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74  lite3_stmt *stmt
2bf0: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20  , int iCol, int 
2c00: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e  *plen)..{..  con
2c10: 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20  st void *pval = 
2c20: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64  sqlite3_column_d
2c30: 65 63 6c 74 79 70 65 31 36 28 73 74 6d 74 2c 20  ecltype16(stmt, 
2c40: 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20  iCol);..  *plen 
2c50: 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20  = (pval != 0) ? 
2c60: 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20  wcslen((wchar_t 
2c70: 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66  *)pval) * sizeof
2c80: 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a  (wchar_t) : 0;..
2c90: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a    return pval;..
2ca0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
2cb0: 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69  void WINAPI sqli
2cc0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 6c  te3_column_doubl
2cd0: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  e_interop(sqlite
2ce0: 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e  3_stmt *stmt, in
2cf0: 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c 65 20 2a  t iCol, double *
2d00: 76 61 6c 29 0d 0a 7b 0d 0a 09 2a 76 61 6c 20 3d  val)..{...*val =
2d10: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
2d20: 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69 43 6f 6c  double(stmt,iCol
2d30: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  );..}....SQLITE_
2d40: 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20  API void WINAPI 
2d50: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69  sqlite3_column_i
2d60: 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 71 6c  nt64_interop(sql
2d70: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c  ite3_stmt *stmt,
2d80: 20 69 6e 74 20 69 43 6f 6c 2c 20 73 71 6c 69 74   int iCol, sqlit
2d90: 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a 7b  e_int64 *val)..{
2da0: 0d 0a 09 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65  ...*val = sqlite
2db0: 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28 73  3_column_int64(s
2dc0: 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d 0a 0d  tmt,iCol);..}...
2dd0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64  .SQLITE_API void
2de0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
2df0: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69  last_insert_rowi
2e00: 64 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  d_interop(sqlite
2e10: 33 20 2a 64 62 2c 20 73 71 6c 69 74 65 5f 69 6e  3 *db, sqlite_in
2e20: 74 36 34 20 2a 72 6f 77 49 64 29 0d 0a 7b 0d 0a  t64 *rowId)..{..
2e30: 09 2a 72 6f 77 49 64 20 3d 20 73 71 6c 69 74 65  .*rowId = sqlite
2e40: 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f  3_last_insert_ro
2e50: 77 69 64 28 64 62 29 3b 0d 0a 7d 0d 0a 0d 0a 53  wid(db);..}....S
2e60: 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57  QLITE_API void W
2e70: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6d 65  INAPI sqlite3_me
2e80: 6d 6f 72 79 5f 75 73 65 64 5f 69 6e 74 65 72 6f  mory_used_intero
2e90: 70 28 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a  p(sqlite_int64 *
2ea0: 6e 42 79 74 65 73 29 0d 0a 7b 0d 0a 09 2a 6e 42  nBytes)..{...*nB
2eb0: 79 74 65 73 20 3d 20 73 71 6c 69 74 65 33 5f 6d  ytes = sqlite3_m
2ec0: 65 6d 6f 72 79 5f 75 73 65 64 28 29 3b 0d 0a 7d  emory_used();..}
2ed0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76  ....SQLITE_API v
2ee0: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74  oid WINAPI sqlit
2ef0: 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61  e3_memory_highwa
2f00: 74 65 72 5f 69 6e 74 65 72 6f 70 28 69 6e 74 20  ter_interop(int 
2f10: 72 65 73 65 74 46 6c 61 67 2c 20 73 71 6c 69 74  resetFlag, sqlit
2f20: 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74 65 73 29  e_int64 *nBytes)
2f30: 0d 0a 7b 0d 0a 09 2a 6e 42 79 74 65 73 20 3d 20  ..{...*nBytes = 
2f40: 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68  sqlite3_memory_h
2f50: 69 67 68 77 61 74 65 72 28 72 65 73 65 74 46 6c  ighwater(resetFl
2f60: 61 67 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  ag);..}....SQLIT
2f70: 45 5f 41 50 49 20 63 6f 6e 73 74 20 75 6e 73 69  E_API const unsi
2f80: 67 6e 65 64 20 63 68 61 72 20 2a 20 57 49 4e 41  gned char * WINA
2f90: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d  PI sqlite3_colum
2fa0: 6e 5f 74 65 78 74 5f 69 6e 74 65 72 6f 70 28 73  n_text_interop(s
2fb0: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d  qlite3_stmt *stm
2fc0: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74  t, int iCol, int
2fd0: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f   *plen)..{..  co
2fe0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
2ff0: 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65  r *pval = sqlite
3000: 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 73 74  3_column_text(st
3010: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70  mt, iCol);..  *p
3020: 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30  len = (pval != 0
3030: 29 20 3f 20 73 74 72 6c 65 6e 28 28 63 68 61 72  ) ? strlen((char
3040: 20 2a 29 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20   *)pval) : 0;.. 
3050: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d   return pval;..}
3060: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63  ....SQLITE_API c
3070: 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41  onst void * WINA
3080: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d  PI sqlite3_colum
3090: 6e 5f 74 65 78 74 31 36 5f 69 6e 74 65 72 6f 70  n_text16_interop
30a0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73  (sqlite3_stmt *s
30b0: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69  tmt, int iCol, i
30c0: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20  nt *plen)..{..  
30d0: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c  const void *pval
30e0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d   = sqlite3_colum
30f0: 6e 5f 74 65 78 74 31 36 28 73 74 6d 74 2c 20 69  n_text16(stmt, i
3100: 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d  Col);..  *plen =
3110: 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77   (pval != 0) ? w
3120: 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a  cslen((wchar_t *
3130: 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28  )pval) * sizeof(
3140: 77 63 68 61 72 5f 74 29 3a 20 30 3b 0d 0a 20 20  wchar_t): 0;..  
3150: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d  return pval;..}.
3160: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e  ...SQLITE_API in
3170: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  t WINAPI sqlite3
3180: 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f  _finalize_intero
3190: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
31a0: 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20  stmt)..{..  int 
31b0: 72 65 74 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45  ret;..#if SQLITE
31c0: 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20  _VERSION_NUMBER 
31d0: 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 69  >= 3007014....#i
31e0: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
31f0: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
3200: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
3210: 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41 4c  EROP_DEBUG_FINAL
3220: 49 5a 45 29 0d 0a 20 20 56 64 62 65 20 2a 70 20  IZE)..  Vdbe *p 
3230: 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74 3b 0d  = (Vdbe *)stmt;.
3240: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d  .  sqlite3 *db =
3250: 20 70 2d 3e 64 62 3b 0d 0a 20 20 73 71 6c 69 74   p->db;..  sqlit
3260: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22  e3InteropDebug("
3270: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65  sqlite3_finalize
3280: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c  _interop(): call
3290: 69 6e 67 20 73 71 6c 69 74 65 33 5f 66 69 6e 61  ing sqlite3_fina
32a0: 6c 69 7a 65 28 25 70 2c 20 25 70 29 2e 2e 2e 5c  lize(%p, %p)...\
32b0: 6e 22 2c 20 64 62 2c 20 73 74 6d 74 29 3b 0d 0a  n", db, stmt);..
32c0: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20  #endif....  ret 
32d0: 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69  = sqlite3_finali
32e0: 7a 65 28 73 74 6d 74 29 3b 0d 0a 0d 0a 23 69 66  ze(stmt);....#if
32f0: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50   defined(INTEROP
3300: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45  _DEBUG) && (INTE
3310: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45  ROP_DEBUG & INTE
3320: 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41 4c 49  ROP_DEBUG_FINALI
3330: 5a 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e  ZE)..  sqlite3In
3340: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69  teropDebug("sqli
3350: 74 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74  te3_finalize_int
3360: 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f  erop(): sqlite3_
3370: 66 69 6e 61 6c 69 7a 65 28 25 70 2c 20 25 70 29  finalize(%p, %p)
3380: 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22   returned %d.\n"
3390: 2c 20 64 62 2c 20 73 74 6d 74 2c 20 72 65 74 29  , db, stmt, ret)
33a0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72  ;..#endif....  r
33b0: 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6c 73  eturn ret;..#els
33c0: 65 0d 0a 20 20 56 64 62 65 20 2a 70 3b 0d 0a 20  e..  Vdbe *p;.. 
33d0: 20 69 6e 74 20 72 65 74 20 3d 20 53 51 4c 49 54   int ret = SQLIT
33e0: 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20 70 20 3d 20 28  E_OK;....  p = (
33f0: 56 64 62 65 20 2a 29 73 74 6d 74 3b 0d 0a 20 20  Vdbe *)stmt;..  
3400: 69 66 20 28 70 29 0d 0a 20 20 7b 0d 0a 20 20 20  if (p)..  {..   
3410: 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 70   sqlite3 *db = p
3420: 2d 3e 64 62 3b 0d 0a 0d 0a 20 20 20 20 69 66 20  ->db;....    if 
3430: 28 64 62 20 21 3d 20 4e 55 4c 4c 29 0d 0a 20 20  (db != NULL)..  
3440: 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65      sqlite3_mute
3450: 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65  x_enter(db->mute
3460: 78 29 3b 0d 0a 0d 0a 20 20 20 20 69 66 20 28 28  x);....    if ((
3470: 70 2d 3e 6d 61 67 69 63 20 3d 3d 20 56 44 42 45  p->magic == VDBE
3480: 5f 4d 41 47 49 43 5f 44 45 41 44 29 20 26 26 20  _MAGIC_DEAD) && 
3490: 28 64 62 20 3d 3d 20 4e 55 4c 4c 29 29 0d 0a 20  (db == NULL)).. 
34a0: 20 20 20 7b 0d 0a 20 20 20 20 20 20 73 71 6c 69     {..      sqli
34b0: 74 65 33 44 62 46 72 65 65 5f 69 6e 74 65 72 6f  te3DbFree_intero
34c0: 70 28 64 62 2c 20 70 29 3b 0d 0a 20 20 20 20 7d  p(db, p);..    }
34d0: 0d 0a 20 20 20 20 65 6c 73 65 0d 0a 20 20 20 20  ..    else..    
34e0: 7b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 73  {..      ret = s
34f0: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28  qlite3_finalize(
3500: 73 74 6d 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 0d  stmt);..    }...
3510: 0a 20 20 20 20 69 66 20 28 64 62 20 21 3d 20 4e  .    if (db != N
3520: 55 4c 4c 29 0d 0a 20 20 20 20 20 20 73 71 6c 69  ULL)..      sqli
3530: 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28  te3_mutex_leave(
3540: 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 7d  db->mutex);..  }
3550: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74  ....  return ret
3560: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a  ;..#endif..}....
3570: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57  SQLITE_API int W
3580: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62 61  INAPI sqlite3_ba
3590: 63 6b 75 70 5f 66 69 6e 69 73 68 5f 69 6e 74 65  ckup_finish_inte
35a0: 72 6f 70 28 73 71 6c 69 74 65 33 5f 62 61 63 6b  rop(sqlite3_back
35b0: 75 70 20 2a 70 29 0d 0a 7b 0d 0a 20 20 69 6e 74  up *p)..{..  int
35c0: 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20 64 65 66   ret;....#if def
35d0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42  ined(INTEROP_DEB
35e0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f  UG) && (INTEROP_
35f0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f  DEBUG & INTEROP_
3600: 44 45 42 55 47 5f 42 41 43 4b 55 50 5f 46 49 4e  DEBUG_BACKUP_FIN
3610: 49 53 48 29 0d 0a 20 20 73 71 6c 69 74 65 33 2a  ISH)..  sqlite3*
3620: 20 70 44 65 73 74 44 62 20 3d 20 70 2d 3e 70 44   pDestDb = p->pD
3630: 65 73 74 44 62 3b 0d 0a 20 20 73 71 6c 69 74 65  estDb;..  sqlite
3640: 33 2a 20 70 53 72 63 44 62 20 3d 20 70 2d 3e 70  3* pSrcDb = p->p
3650: 53 72 63 44 62 3b 0d 0a 20 20 73 71 6c 69 74 65  SrcDb;..  sqlite
3660: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
3670: 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69  qlite3_backup_fi
3680: 6e 69 73 68 5f 69 6e 74 65 72 6f 70 28 29 3a 20  nish_interop(): 
3690: 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f  calling sqlite3_
36a0: 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 28 25 70  backup_finish(%p
36b0: 2c 20 25 70 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c  , %p, %p)...\n",
36c0: 20 70 44 65 73 74 44 62 2c 20 70 53 72 63 44 62   pDestDb, pSrcDb
36d0: 2c 20 70 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d  , p);..#endif...
36e0: 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33  .  ret = sqlite3
36f0: 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 28 70  _backup_finish(p
3700: 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  );....#if define
3710: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
3720: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
3730: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
3740: 55 47 5f 42 41 43 4b 55 50 5f 46 49 4e 49 53 48  UG_BACKUP_FINISH
3750: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65  )..  sqlite3Inte
3760: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65  ropDebug("sqlite
3770: 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 5f  3_backup_finish_
3780: 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74  interop(): sqlit
3790: 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68  e3_backup_finish
37a0: 28 25 70 2c 20 25 70 2c 20 25 70 29 20 72 65 74  (%p, %p, %p) ret
37b0: 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 70 44  urned %d.\n", pD
37c0: 65 73 74 44 62 2c 20 70 53 72 63 44 62 2c 20 70  estDb, pSrcDb, p
37d0: 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d  , ret);..#endif.
37e0: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b  ...  return ret;
37f0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
3800: 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c  I int WINAPI sql
3810: 69 74 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72  ite3_reset_inter
3820: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
3830: 2a 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74  *stmt)..{..  int
3840: 20 72 65 74 3b 0d 0a 23 69 66 20 53 51 4c 49 54   ret;..#if SQLIT
3850: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52  E_VERSION_NUMBER
3860: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23   >= 3007014....#
3870: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52  if defined(INTER
3880: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e  OP_DEBUG) && (IN
3890: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e  TEROP_DEBUG & IN
38a0: 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45  TEROP_DEBUG_RESE
38b0: 54 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74  T)..  sqlite3Int
38c0: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74  eropDebug("sqlit
38d0: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70  e3_reset_interop
38e0: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69  (): calling sqli
38f0: 74 65 33 5f 72 65 73 65 74 28 25 70 29 2e 2e 2e  te3_reset(%p)...
3900: 5c 6e 22 2c 20 73 74 6d 74 29 3b 0d 0a 23 65 6e  \n", stmt);..#en
3910: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73  dif....  ret = s
3920: 71 6c 69 74 65 33 5f 72 65 73 65 74 28 73 74 6d  qlite3_reset(stm
3930: 74 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  t);....#if defin
3940: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
3950: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45  ) && (INTEROP_DE
3960: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45  BUG & INTEROP_DE
3970: 42 55 47 5f 52 45 53 45 54 29 0d 0a 20 20 73 71  BUG_RESET)..  sq
3980: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75  lite3InteropDebu
3990: 67 28 22 73 71 6c 69 74 65 33 5f 72 65 73 65 74  g("sqlite3_reset
39a0: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69  _interop(): sqli
39b0: 74 65 33 5f 72 65 73 65 74 28 25 70 29 20 72 65  te3_reset(%p) re
39c0: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 73  turned %d.\n", s
39d0: 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64  tmt, ret);..#end
39e0: 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72  if....  return r
39f0: 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66  et;..#else..  if
3a00: 20 28 28 28 56 64 62 65 20 2a 29 73 74 6d 74 29   (((Vdbe *)stmt)
3a10: 2d 3e 6d 61 67 69 63 20 3d 3d 20 56 44 42 45 5f  ->magic == VDBE_
3a20: 4d 41 47 49 43 5f 44 45 41 44 29 20 72 65 74 75  MAGIC_DEAD) retu
3a30: 72 6e 20 53 51 4c 49 54 45 5f 53 43 48 45 4d 41  rn SQLITE_SCHEMA
3a40: 3b 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74  ;..  ret = sqlit
3a50: 65 33 5f 72 65 73 65 74 28 73 74 6d 74 29 3b 0d  e3_reset(stmt);.
3a60: 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a  .  return ret;..
3a70: 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 51 4c  #endif..}....SQL
3a80: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41  ITE_API int WINA
3a90: 50 49 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74  PI sqlite3_creat
3aa0: 65 5f 66 75 6e 63 74 69 6f 6e 5f 69 6e 74 65 72  e_function_inter
3ab0: 6f 70 28 73 71 6c 69 74 65 33 20 2a 70 73 71 6c  op(sqlite3 *psql
3ac0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46  , const char *zF
3ad0: 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 69 6e 74  unctionName, int
3ae0: 20 6e 41 72 67 2c 20 69 6e 74 20 65 54 65 78 74   nArg, int eText
3af0: 52 65 70 2c 20 76 6f 69 64 20 2a 70 76 55 73 65  Rep, void *pvUse
3b00: 72 2c 20 53 51 4c 49 54 45 55 53 45 52 46 55 4e  r, SQLITEUSERFUN
3b10: 43 20 66 75 6e 63 2c 20 53 51 4c 49 54 45 55 53  C func, SQLITEUS
3b20: 45 52 46 55 4e 43 20 66 75 6e 63 73 74 65 70 2c  ERFUNC funcstep,
3b30: 20 53 51 4c 49 54 45 46 55 4e 43 46 49 4e 41 4c   SQLITEFUNCFINAL
3b40: 20 66 75 6e 63 66 69 6e 61 6c 2c 20 69 6e 74 20   funcfinal, int 
3b50: 6e 65 65 64 43 6f 6c 6c 53 65 71 29 0d 0a 7b 0d  needCollSeq)..{.
3b60: 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 69  .  int n;....  i
3b70: 66 20 28 65 54 65 78 74 52 65 70 20 3d 3d 20 53  f (eTextRep == S
3b80: 51 4c 49 54 45 5f 55 54 46 31 36 29 0d 0a 20 20  QLITE_UTF16)..  
3b90: 20 20 65 54 65 78 74 52 65 70 20 3d 20 53 51 4c    eTextRep = SQL
3ba0: 49 54 45 5f 55 54 46 31 36 4e 41 54 49 56 45 3b  ITE_UTF16NATIVE;
3bb0: 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65  ....  n = sqlite
3bc0: 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f  3_create_functio
3bd0: 6e 28 70 73 71 6c 2c 20 7a 46 75 6e 63 74 69 6f  n(psql, zFunctio
3be0: 6e 4e 61 6d 65 2c 20 6e 41 72 67 2c 20 65 54 65  nName, nArg, eTe
3bf0: 78 74 52 65 70 2c 20 30 2c 20 66 75 6e 63 2c 20  xtRep, 0, func, 
3c00: 66 75 6e 63 73 74 65 70 2c 20 66 75 6e 63 66 69  funcstep, funcfi
3c10: 6e 61 6c 29 3b 0d 0a 20 20 69 66 20 28 6e 20 3d  nal);..  if (n =
3c20: 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20 20  = SQLITE_OK)..  
3c30: 7b 0d 0a 20 20 20 20 69 66 20 28 6e 65 65 64 43  {..    if (needC
3c40: 6f 6c 6c 53 65 71 29 0d 0a 20 20 20 20 7b 0d 0a  ollSeq)..    {..
3c50: 20 20 20 20 20 20 46 75 6e 63 44 65 66 20 2a 70        FuncDef *p
3c60: 46 75 6e 63 20 3d 20 73 71 6c 69 74 65 33 46 69  Func = sqlite3Fi
3c70: 6e 64 46 75 6e 63 74 69 6f 6e 28 70 73 71 6c 2c  ndFunction(psql,
3c80: 20 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20   zFunctionName, 
3c90: 73 74 72 6c 65 6e 28 7a 46 75 6e 63 74 69 6f 6e  strlen(zFunction
3ca0: 4e 61 6d 65 29 2c 20 6e 41 72 67 2c 20 65 54 65  Name), nArg, eTe
3cb0: 78 74 52 65 70 2c 20 30 29 3b 0d 0a 20 20 20 20  xtRep, 0);..    
3cc0: 20 20 69 66 28 20 70 46 75 6e 63 20 29 0d 0a 20    if( pFunc ).. 
3cd0: 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20       {..        
3ce0: 70 46 75 6e 63 2d 3e 66 6c 61 67 73 20 7c 3d 20  pFunc->flags |= 
3cf0: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44  SQLITE_FUNC_NEED
3d00: 43 4f 4c 4c 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a  COLL;..      }..
3d10: 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a 0d 0a 20 20      }..  }....  
3d20: 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a  return n;..}....
3d30: 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20  SQLITE_API void 
3d40: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 76  WINAPI sqlite3_v
3d50: 61 6c 75 65 5f 64 6f 75 62 6c 65 5f 69 6e 74 65  alue_double_inte
3d60: 72 6f 70 28 73 71 6c 69 74 65 33 5f 76 61 6c 75  rop(sqlite3_valu
3d70: 65 20 2a 70 76 61 6c 2c 20 64 6f 75 62 6c 65 20  e *pval, double 
3d80: 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 2a 76 61 6c  *val)..{..  *val
3d90: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
3da0: 5f 64 6f 75 62 6c 65 28 70 76 61 6c 29 3b 0d 0a  _double(pval);..
3db0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
3dc0: 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69  void WINAPI sqli
3dd0: 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 5f  te3_value_int64_
3de0: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f  interop(sqlite3_
3df0: 76 61 6c 75 65 20 2a 70 76 61 6c 2c 20 73 71 6c  value *pval, sql
3e00: 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d  ite_int64 *val).
3e10: 0a 7b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c  .{..  *val = sql
3e20: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34  ite3_value_int64
3e30: 28 70 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51  (pval);..}....SQ
3e40: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 75  LITE_API const u
3e50: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 20 57  nsigned char * W
3e60: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61  INAPI sqlite3_va
3e70: 6c 75 65 5f 74 65 78 74 5f 69 6e 74 65 72 6f 70  lue_text_interop
3e80: 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a  (sqlite3_value *
3e90: 76 61 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d  val, int *plen).
3ea0: 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69  .{..  const unsi
3eb0: 67 6e 65 64 20 63 68 61 72 20 2a 70 76 61 6c 20  gned char *pval 
3ec0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
3ed0: 74 65 78 74 28 76 61 6c 29 3b 0d 0a 20 20 2a 70  text(val);..  *p
3ee0: 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30  len = (pval != 0
3ef0: 29 20 3f 20 73 74 72 6c 65 6e 28 28 63 68 61 72  ) ? strlen((char
3f00: 20 2a 29 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20   *)pval) : 0;.. 
3f10: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d   return pval;..}
3f20: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63  ....SQLITE_API c
3f30: 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41  onst void * WINA
3f40: 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  PI sqlite3_value
3f50: 5f 74 65 78 74 31 36 5f 69 6e 74 65 72 6f 70 28  _text16_interop(
3f60: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 76  sqlite3_value *v
3f70: 61 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a  al, int *plen)..
3f80: 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20  {..  const void 
3f90: 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f  *pval = sqlite3_
3fa0: 76 61 6c 75 65 5f 74 65 78 74 31 36 28 76 61 6c  value_text16(val
3fb0: 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70  );..  *plen = (p
3fc0: 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63 73 6c  val != 0) ? wcsl
3fd0: 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76  en((wchar_t *)pv
3fe0: 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68  al) * sizeof(wch
3ff0: 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65  ar_t) : 0;..  re
4000: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d  turn pval;..}...
4010: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64  .SQLITE_API void
4020: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
4030: 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 5f 69 6e  result_double_in
4040: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f  terop(sqlite3_co
4050: 6e 74 65 78 74 20 2a 70 63 74 78 2c 20 64 6f 75  ntext *pctx, dou
4060: 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20  ble *val)..{..  
4070: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64  sqlite3_result_d
4080: 6f 75 62 6c 65 28 70 63 74 78 2c 20 2a 76 61 6c  ouble(pctx, *val
4090: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  );..}....SQLITE_
40a0: 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20  API void WINAPI 
40b0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
40c0: 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 71 6c  nt64_interop(sql
40d0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70 63  ite3_context *pc
40e0: 74 78 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34  tx, sqlite_int64
40f0: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 73 71 6c   *val)..{..  sql
4100: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36  ite3_result_int6
4110: 34 28 70 63 74 78 2c 20 2a 76 61 6c 29 3b 0d 0a  4(pctx, *val);..
4120: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
4130: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
4140: 65 33 5f 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c 63  e3_context_collc
4150: 6f 6d 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 73  ompare_interop(s
4160: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
4170: 63 74 78 2c 20 63 6f 6e 73 74 20 76 6f 69 64 20  ctx, const void 
4180: 2a 70 31 2c 20 69 6e 74 20 70 31 6c 65 6e 2c 20  *p1, int p1len, 
4190: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 32 2c 20  const void *p2, 
41a0: 69 6e 74 20 70 32 6c 65 6e 29 0d 0a 7b 0d 0a 20  int p2len)..{.. 
41b0: 20 69 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63   if ((ctx->pFunc
41c0: 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45  ->flags & SQLITE
41d0: 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20  _FUNC_NEEDCOLL) 
41e0: 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 32 3b 0d  == 0) return 2;.
41f0: 0a 20 20 72 65 74 75 72 6e 20 63 74 78 2d 3e 70  .  return ctx->p
4200: 43 6f 6c 6c 2d 3e 78 43 6d 70 28 63 74 78 2d 3e  Coll->xCmp(ctx->
4210: 70 43 6f 6c 6c 2d 3e 70 55 73 65 72 2c 20 70 31  pColl->pUser, p1
4220: 6c 65 6e 2c 20 70 31 2c 20 70 32 6c 65 6e 2c 20  len, p1, p2len, 
4230: 70 32 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  p2);..}....SQLIT
4240: 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72  E_API const char
4250: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65   * WINAPI sqlite
4260: 33 5f 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c 73 65  3_context_collse
4270: 71 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  q_interop(sqlite
4280: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c 20  3_context *ctx, 
4290: 69 6e 74 20 2a 70 74 79 70 65 2c 20 69 6e 74 20  int *ptype, int 
42a0: 2a 65 6e 63 2c 20 69 6e 74 20 2a 70 6c 65 6e 29  *enc, int *plen)
42b0: 0d 0a 7b 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a  ..{..  CollSeq *
42c0: 70 43 6f 6c 6c 20 3d 20 63 74 78 2d 3e 70 43 6f  pColl = ctx->pCo
42d0: 6c 6c 3b 0d 0a 20 20 2a 70 74 79 70 65 20 3d 20  ll;..  *ptype = 
42e0: 30 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 30 3b  0;..  *plen = 0;
42f0: 0d 0a 20 20 2a 65 6e 63 20 3d 20 30 3b 0d 0a 0d  ..  *enc = 0;...
4300: 0a 20 20 69 66 20 28 28 63 74 78 2d 3e 70 46 75  .  if ((ctx->pFu
4310: 6e 63 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49  nc->flags & SQLI
4320: 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c  TE_FUNC_NEEDCOLL
4330: 29 20 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 4e  ) == 0) return N
4340: 55 4c 4c 3b 0d 0a 0d 0a 20 20 69 66 20 28 70 43  ULL;....  if (pC
4350: 6f 6c 6c 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 2a  oll)..  {..    *
4360: 65 6e 63 20 3d 20 70 43 6f 6c 6c 2d 3e 65 6e 63  enc = pColl->enc
4370: 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45  ;..#if SQLITE_VE
4380: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33  RSION_NUMBER < 3
4390: 30 30 37 30 31 30 0d 0a 20 20 20 20 2a 70 74 79  007010..    *pty
43a0: 70 65 20 3d 20 70 43 6f 6c 6c 2d 3e 74 79 70 65  pe = pColl->type
43b0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 2a  ;..#endif..    *
43c0: 70 6c 65 6e 20 3d 20 28 70 43 6f 6c 6c 2d 3e 7a  plen = (pColl->z
43d0: 4e 61 6d 65 20 21 3d 20 30 29 20 3f 20 73 74 72  Name != 0) ? str
43e0: 6c 65 6e 28 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65  len(pColl->zName
43f0: 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 20 20 72 65  ) : 0;....    re
4400: 74 75 72 6e 20 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d  turn pColl->zNam
4410: 65 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72  e;..  }..  retur
4420: 6e 20 4e 55 4c 4c 3b 0d 0a 7d 0d 0a 0d 0a 53 51  n NULL;..}....SQ
4430: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63  LITE_API const c
4440: 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c  har * WINAPI sql
4450: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61  ite3_column_data
4460: 62 61 73 65 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f  base_name_intero
4470: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
4480: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
4490: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20  int *plen)..{.. 
44a0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61   const char *pva
44b0: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  l = sqlite3_colu
44c0: 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d 65  mn_database_name
44d0: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20  (stmt, iCol);.. 
44e0: 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21   *plen = (pval !
44f0: 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76  = 0) ? strlen(pv
4500: 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75  al) : 0;..  retu
4510: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn pval;..}....S
4520: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
4530: 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71  void * WINAPI sq
4540: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74  lite3_column_dat
4550: 61 62 61 73 65 5f 6e 61 6d 65 31 36 5f 69 6e 74  abase_name16_int
4560: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d  erop(sqlite3_stm
4570: 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f  t *stmt, int iCo
4580: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
4590: 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a  ..  const void *
45a0: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63  pval = sqlite3_c
45b0: 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e  olumn_database_n
45c0: 61 6d 65 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c  ame16(stmt, iCol
45d0: 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70  );..  *plen = (p
45e0: 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63 73 6c  val != 0) ? wcsl
45f0: 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76  en((wchar_t *)pv
4600: 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68  al) * sizeof(wch
4610: 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65  ar_t) : 0;..  re
4620: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d  turn pval;..}...
4630: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73  .SQLITE_API cons
4640: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20  t char * WINAPI 
4650: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74  sqlite3_column_t
4660: 61 62 6c 65 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f  able_name_intero
4670: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a  p(sqlite3_stmt *
4680: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20  stmt, int iCol, 
4690: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20  int *plen)..{.. 
46a0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61   const char *pva
46b0: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  l = sqlite3_colu
46c0: 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 28 73 74  mn_table_name(st
46d0: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70  mt, iCol);..  *p
46e0: 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30  len = (pval != 0
46f0: 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29  ) ? strlen(pval)
4700: 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20   : 0;..  return 
4710: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  pval;..}....SQLI
4720: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69  TE_API const voi
4730: 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  d * WINAPI sqlit
4740: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c 65 5f  e3_column_table_
4750: 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73  name16_interop(s
4760: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d  qlite3_stmt *stm
4770: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74  t, int iCol, int
4780: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f   *plen)..{..  co
4790: 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d  nst void *pval =
47a0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f   sqlite3_column_
47b0: 74 61 62 6c 65 5f 6e 61 6d 65 31 36 28 73 74 6d  table_name16(stm
47c0: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c  t, iCol);..  *pl
47d0: 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29  en = (pval != 0)
47e0: 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72   ? wcslen((wchar
47f0: 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a  _t *)pval) * siz
4800: 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30  eof(wchar_t) : 0
4810: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c  ;..  return pval
4820: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
4830: 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20  PI const char * 
4840: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63  WINAPI sqlite3_c
4850: 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d  olumn_origin_nam
4860: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  e_interop(sqlite
4870: 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e  3_stmt *stmt, in
4880: 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65  t iCol, int *ple
4890: 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63  n)..{..  const c
48a0: 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69  har *pval = sqli
48b0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69  te3_column_origi
48c0: 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43 6f  n_name(stmt, iCo
48d0: 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28  l);..  *plen = (
48e0: 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 74 72  pval != 0) ? str
48f0: 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a  len(pval) : 0;..
4900: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a    return pval;..
4910: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
4920: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e  const void * WIN
4930: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75  API sqlite3_colu
4940: 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 31 36  mn_origin_name16
4950: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
4960: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74  _stmt *stmt, int
4970: 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e   iCol, int *plen
4980: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f  )..{..  const vo
4990: 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74  id *pval = sqlit
49a0: 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e  e3_column_origin
49b0: 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20 69 43  _name16(stmt, iC
49c0: 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20  ol);..  *plen = 
49d0: 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63  (pval != 0) ? wc
49e0: 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29  slen((wchar_t *)
49f0: 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77  pval) * sizeof(w
4a00: 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20  char_t) : 0;..  
4a10: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d  return pval;..}.
4a20: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e  ...SQLITE_API in
4a30: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  t WINAPI sqlite3
4a40: 5f 74 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d 65  _table_column_me
4a50: 74 61 64 61 74 61 5f 69 6e 74 65 72 6f 70 28 73  tadata_interop(s
4a60: 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73  qlite3 *db, cons
4a70: 74 20 63 68 61 72 20 2a 7a 44 62 4e 61 6d 65 2c  t char *zDbName,
4a80: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 61   const char *zTa
4a90: 62 6c 65 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63  bleName, const c
4aa0: 68 61 72 20 2a 7a 43 6f 6c 75 6d 6e 4e 61 6d 65  har *zColumnName
4ab0: 2c 20 63 68 61 72 20 2a 2a 70 7a 44 61 74 61 54  , char **pzDataT
4ac0: 79 70 65 2c 20 63 68 61 72 20 2a 2a 70 7a 43 6f  ype, char **pzCo
4ad0: 6c 6c 53 65 71 2c 20 69 6e 74 20 2a 70 4e 6f 74  llSeq, int *pNot
4ae0: 4e 75 6c 6c 2c 20 69 6e 74 20 2a 70 50 72 69 6d  Null, int *pPrim
4af0: 61 72 79 4b 65 79 2c 20 69 6e 74 20 2a 70 41 75  aryKey, int *pAu
4b00: 74 6f 69 6e 63 2c 20 69 6e 74 20 2a 70 64 74 4c  toinc, int *pdtL
4b10: 65 6e 2c 20 69 6e 74 20 2a 70 63 73 4c 65 6e 29  en, int *pcsLen)
4b20: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 20  ..{..  int n;.. 
4b30: 20 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33   ..  n = sqlite3
4b40: 5f 74 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d 65  _table_column_me
4b50: 74 61 64 61 74 61 28 64 62 2c 20 7a 44 62 4e 61  tadata(db, zDbNa
4b60: 6d 65 2c 20 7a 54 61 62 6c 65 4e 61 6d 65 2c 20  me, zTableName, 
4b70: 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 70 7a 44  zColumnName, pzD
4b80: 61 74 61 54 79 70 65 2c 20 70 7a 43 6f 6c 6c 53  ataType, pzCollS
4b90: 65 71 2c 20 70 4e 6f 74 4e 75 6c 6c 2c 20 70 50  eq, pNotNull, pP
4ba0: 72 69 6d 61 72 79 4b 65 79 2c 20 70 41 75 74 6f  rimaryKey, pAuto
4bb0: 69 6e 63 29 3b 0d 0a 20 20 2a 70 64 74 4c 65 6e  inc);..  *pdtLen
4bc0: 20 3d 20 28 2a 70 7a 44 61 74 61 54 79 70 65 20   = (*pzDataType 
4bd0: 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 2a  != 0) ? strlen(*
4be0: 70 7a 44 61 74 61 54 79 70 65 29 20 3a 20 30 3b  pzDataType) : 0;
4bf0: 0d 0a 20 20 2a 70 63 73 4c 65 6e 20 3d 20 28 2a  ..  *pcsLen = (*
4c00: 70 7a 43 6f 6c 6c 53 65 71 20 21 3d 20 30 29 20  pzCollSeq != 0) 
4c10: 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c  ? strlen(*pzColl
4c20: 53 65 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72  Seq) : 0;....  r
4c30: 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53  eturn n;..}....S
4c40: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49  QLITE_API int WI
4c50: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 69 6e 64  NAPI sqlite3_ind
4c60: 65 78 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f 5f 69  ex_column_info_i
4c70: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a  nterop(sqlite3 *
4c80: 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  db, const char *
4c90: 7a 44 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  zDb, const char 
4ca0: 2a 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 63 6f 6e  *zIndexName, con
4cb0: 73 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75 6d 6e  st char *zColumn
4cc0: 4e 61 6d 65 2c 20 69 6e 74 20 2a 73 6f 72 74 4f  Name, int *sortO
4cd0: 72 64 65 72 2c 20 69 6e 74 20 2a 6f 6e 45 72 72  rder, int *onErr
4ce0: 6f 72 2c 20 63 68 61 72 20 2a 2a 70 7a 43 6f 6c  or, char **pzCol
4cf0: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
4d00: 0d 0a 20 20 49 6e 64 65 78 20 2a 70 49 64 78 3b  ..  Index *pIdx;
4d10: 0d 0a 20 20 54 61 62 6c 65 20 2a 70 54 61 62 3b  ..  Table *pTab;
4d20: 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20  ..  int n;....  
4d30: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e  sqlite3_mutex_en
4d40: 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0a  ter(db->mutex);.
4d50: 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 45 6e    sqlite3BtreeEn
4d60: 74 65 72 41 6c 6c 28 64 62 29 3b 0a 0d 0a 20 20  terAll(db);...  
4d70: 70 49 64 78 20 3d 20 73 71 6c 69 74 65 33 46 69  pIdx = sqlite3Fi
4d80: 6e 64 49 6e 64 65 78 28 64 62 2c 20 7a 49 6e 64  ndIndex(db, zInd
4d90: 65 78 4e 61 6d 65 2c 20 7a 44 62 29 3b 0d 0a 0d  exName, zDb);...
4da0: 0a 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 4c  .  sqlite3BtreeL
4db0: 65 61 76 65 41 6c 6c 28 64 62 29 3b 0a 20 20 73  eaveAll(db);.  s
4dc0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61  qlite3_mutex_lea
4dd0: 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0a 0d  ve(db->mutex);..
4de0: 0a 20 20 69 66 20 28 21 70 49 64 78 29 20 72 65  .  if (!pIdx) re
4df0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f  turn SQLITE_ERRO
4e00: 52 3b 0d 0a 0d 0a 20 20 70 54 61 62 20 3d 20 70  R;....  pTab = p
4e10: 49 64 78 2d 3e 70 54 61 62 6c 65 3b 0d 0a 20 20  Idx->pTable;..  
4e20: 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20  for (n = 0; n < 
4e30: 70 49 64 78 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20 6e  pIdx->nColumn; n
4e40: 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 6e  ++)..  {..    in
4e50: 74 20 63 6e 75 6d 20 3d 20 70 49 64 78 2d 3e 61  t cnum = pIdx->a
4e60: 69 43 6f 6c 75 6d 6e 5b 6e 5d 3b 0d 0a 20 20 20  iColumn[n];..   
4e70: 20 69 66 20 28 73 71 6c 69 74 65 33 53 74 72 49   if (sqlite3StrI
4e80: 43 6d 70 28 70 54 61 62 2d 3e 61 43 6f 6c 5b 63  Cmp(pTab->aCol[c
4e90: 6e 75 6d 5d 2e 7a 4e 61 6d 65 2c 20 7a 43 6f 6c  num].zName, zCol
4ea0: 75 6d 6e 4e 61 6d 65 29 20 3d 3d 20 30 29 0d 0a  umnName) == 0)..
4eb0: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2a 73 6f      {..      *so
4ec0: 72 74 4f 72 64 65 72 20 3d 20 70 49 64 78 2d 3e  rtOrder = pIdx->
4ed0: 61 53 6f 72 74 4f 72 64 65 72 5b 6e 5d 3b 0d 0a  aSortOrder[n];..
4ee0: 20 20 20 20 20 20 2a 70 7a 43 6f 6c 6c 20 3d 20        *pzColl = 
4ef0: 70 49 64 78 2d 3e 61 7a 43 6f 6c 6c 5b 6e 5d 3b  pIdx->azColl[n];
4f00: 0d 0a 20 20 20 20 20 20 2a 70 6c 65 6e 20 3d 20  ..      *plen = 
4f10: 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c 29 3b  strlen(*pzColl);
4f20: 0d 0a 20 20 20 20 20 20 2a 6f 6e 45 72 72 6f 72  ..      *onError
4f30: 20 3d 20 70 49 64 78 2d 3e 6f 6e 45 72 72 6f 72   = pIdx->onError
4f40: 3b 0d 0a 0d 0a 20 20 20 20 20 20 72 65 74 75 72  ;....      retur
4f50: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 20 20  n SQLITE_OK;..  
4f60: 20 20 7d 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75    }..  }..  retu
4f70: 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b  rn SQLITE_ERROR;
4f80: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
4f90: 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c  I int WINAPI sql
4fa0: 69 74 65 33 5f 74 61 62 6c 65 5f 63 75 72 73 6f  ite3_table_curso
4fb0: 72 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  r_interop(sqlite
4fc0: 33 5f 73 74 6d 74 20 2a 70 73 74 6d 74 2c 20 69  3_stmt *pstmt, i
4fd0: 6e 74 20 69 44 62 2c 20 50 67 6e 6f 20 74 61 62  nt iDb, Pgno tab
4fe0: 6c 65 52 6f 6f 74 50 61 67 65 29 0d 0a 7b 0d 0a  leRootPage)..{..
4ff0: 20 20 56 64 62 65 20 2a 70 20 3d 20 28 56 64 62    Vdbe *p = (Vdb
5000: 65 20 2a 29 70 73 74 6d 74 3b 0d 0a 20 20 73 71  e *)pstmt;..  sq
5010: 6c 69 74 65 33 20 2a 64 62 20 3d 20 28 70 20 3d  lite3 *db = (p =
5020: 3d 20 4e 55 4c 4c 29 20 3f 20 4e 55 4c 4c 20 3a  = NULL) ? NULL :
5030: 20 70 2d 3e 64 62 3b 0d 0a 20 20 69 6e 74 20 6e   p->db;..  int n
5040: 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20 2d  ;..  int ret = -
5050: 31 3b 0d 0a 0d 0a 20 20 73 71 6c 69 74 65 33 5f  1;....  sqlite3_
5060: 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e  mutex_enter(db->
5070: 6d 75 74 65 78 29 3b 0d 0a 20 20 66 6f 72 20 28  mutex);..  for (
5080: 6e 20 3d 20 30 3b 20 6e 20 3c 20 70 2d 3e 6e 43  n = 0; n < p->nC
5090: 75 72 73 6f 72 20 26 26 20 70 2d 3e 61 70 43 73  ursor && p->apCs
50a0: 72 5b 6e 5d 20 21 3d 20 4e 55 4c 4c 3b 20 6e 2b  r[n] != NULL; n+
50b0: 2b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 20  +)..  {..    if 
50c0: 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 69 73  (p->apCsr[n]->is
50d0: 54 61 62 6c 65 20 3d 3d 20 46 41 4c 53 45 29 20  Table == FALSE) 
50e0: 63 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 20 69  continue;..    i
50f0: 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e  f (p->apCsr[n]->
5100: 69 44 62 20 21 3d 20 69 44 62 29 20 63 6f 6e 74  iDb != iDb) cont
5110: 69 6e 75 65 3b 0d 0a 20 20 20 20 69 66 20 28 70  inue;..    if (p
5120: 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 70 43 75 72  ->apCsr[n]->pCur
5130: 73 6f 72 2d 3e 70 67 6e 6f 52 6f 6f 74 20 3d 3d  sor->pgnoRoot ==
5140: 20 74 61 62 6c 65 52 6f 6f 74 50 61 67 65 29 0d   tableRootPage).
5150: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65  .    {..      re
5160: 74 20 3d 20 6e 3b 0d 0a 20 20 20 20 20 20 62 72  t = n;..      br
5170: 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d  eak;..    }..  }
5180: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65  ..  sqlite3_mute
5190: 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65  x_leave(db->mute
51a0: 78 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20  x);....  return 
51b0: 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  ret;..}....SQLIT
51c0: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49  E_API int WINAPI
51d0: 20 73 71 6c 69 74 65 33 5f 63 75 72 73 6f 72 5f   sqlite3_cursor_
51e0: 72 6f 77 69 64 5f 69 6e 74 65 72 6f 70 28 73 71  rowid_interop(sq
51f0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d  lite3_stmt *pstm
5200: 74 2c 20 69 6e 74 20 63 75 72 73 6f 72 2c 20 73  t, int cursor, s
5210: 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 70 72 6f  qlite_int64 *pro
5220: 77 69 64 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20  wid)..{..  Vdbe 
5230: 2a 70 20 3d 20 28 56 64 62 65 20 2a 29 70 73 74  *p = (Vdbe *)pst
5240: 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a  mt;..  sqlite3 *
5250: 64 62 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29  db = (p == NULL)
5260: 20 3f 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b   ? NULL : p->db;
5270: 0d 0a 20 20 56 64 62 65 43 75 72 73 6f 72 20 2a  ..  VdbeCursor *
5280: 70 43 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d  pC;..  int ret =
5290: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20   SQLITE_OK;.... 
52a0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65   sqlite3_mutex_e
52b0: 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b  nter(db->mutex);
52c0: 0d 0a 20 20 77 68 69 6c 65 20 28 31 29 0d 0a 20  ..  while (1).. 
52d0: 20 7b 0d 0a 20 20 20 20 69 66 20 28 63 75 72 73   {..    if (curs
52e0: 6f 72 20 3c 20 30 20 7c 7c 20 63 75 72 73 6f 72  or < 0 || cursor
52f0: 20 3e 3d 20 70 2d 3e 6e 43 75 72 73 6f 72 29 0d   >= p->nCursor).
5300: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65  .    {..      re
5310: 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52  t = SQLITE_ERROR
5320: 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d  ;..      break;.
5330: 0a 20 20 20 20 7d 0d 0a 20 20 20 20 69 66 20 28  .    }..    if (
5340: 70 2d 3e 61 70 43 73 72 5b 63 75 72 73 6f 72 5d  p->apCsr[cursor]
5350: 20 3d 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 7b   == NULL)..    {
5360: 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 53 51  ..      ret = SQ
5370: 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20  LITE_ERROR;..   
5380: 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d     break;..    }
5390: 0d 0a 0d 0a 20 20 20 20 70 43 20 3d 20 70 2d 3e  ....    pC = p->
53a0: 61 70 43 73 72 5b 63 75 72 73 6f 72 5d 3b 0d 0a  apCsr[cursor];..
53b0: 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69  ..    ret = sqli
53c0: 74 65 33 56 64 62 65 43 75 72 73 6f 72 4d 6f 76  te3VdbeCursorMov
53d0: 65 74 6f 28 70 43 29 3b 0d 0a 20 20 20 20 69 66  eto(pC);..    if
53e0: 28 72 65 74 29 0d 0a 20 20 20 20 20 20 62 72 65  (ret)..      bre
53f0: 61 6b 3b 0d 0a 0d 0a 20 20 20 20 69 66 28 70 43  ak;....    if(pC
5400: 2d 3e 72 6f 77 69 64 49 73 56 61 6c 69 64 29 0d  ->rowidIsValid).
5410: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2a 70  .    {..      *p
5420: 72 6f 77 69 64 20 3d 20 70 43 2d 3e 6c 61 73 74  rowid = pC->last
5430: 52 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a 20  Rowid;..    }.. 
5440: 20 20 20 65 6c 73 65 20 69 66 28 70 43 2d 3e 70     else if(pC->p
5450: 73 65 75 64 6f 54 61 62 6c 65 52 65 67 20 3e 20  seudoTableReg > 
5460: 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20  0)..    {..     
5470: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52   ret = SQLITE_ER
5480: 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 72 65 61  ROR;..      brea
5490: 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 65  k;..    }..    e
54a0: 6c 73 65 20 69 66 28 70 43 2d 3e 6e 75 6c 6c 52  lse if(pC->nullR
54b0: 6f 77 20 7c 7c 20 70 43 2d 3e 70 43 75 72 73 6f  ow || pC->pCurso
54c0: 72 3d 3d 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20  r==0)..    {..  
54d0: 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45      ret = SQLITE
54e0: 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62  _ERROR;..      b
54f0: 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20  reak;..    }..  
5500: 20 20 65 6c 73 65 0d 0a 20 20 20 20 7b 0d 0a 20    else..    {.. 
5510: 20 20 20 20 20 69 66 20 28 70 43 2d 3e 70 43 75       if (pC->pCu
5520: 72 73 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d 0a 20  rsor == NULL).. 
5530: 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20       {..        
5540: 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52  ret = SQLITE_ERR
5550: 4f 52 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 65  OR;..        bre
5560: 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20  ak;..      }..  
5570: 20 20 20 20 73 71 6c 69 74 65 33 42 74 72 65 65      sqlite3Btree
5580: 4b 65 79 53 69 7a 65 28 70 43 2d 3e 70 43 75 72  KeySize(pC->pCur
5590: 73 6f 72 2c 20 70 72 6f 77 69 64 29 3b 0d 0a 20  sor, prowid);.. 
55a0: 20 20 20 20 20 2a 70 72 6f 77 69 64 20 3d 20 2a       *prowid = *
55b0: 70 72 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a  prowid;..    }..
55c0: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 7d 0d      break;..  }.
55d0: 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78  .  sqlite3_mutex
55e0: 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78  _leave(db->mutex
55f0: 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72  );....  return r
5600: 65 74 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 20 2f  et;..}..#endif /
5610: 2a 20 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 20  * SQLITE_OS_WIN 
5620: 2a 2f 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a  */..../*********
5630: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
5640: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
5650: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
5660: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
5670: 2a 2a 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20  ****/..../*..** 
5680: 54 68 65 20 49 4e 54 45 52 4f 50 5f 54 45 53 54  The INTEROP_TEST
5690: 5f 45 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63 6b  _EXTENSION block
56a0: 20 6d 75 73 74 20 62 65 20 61 74 20 74 68 65 20   must be at the 
56b0: 65 6e 64 20 6f 66 20 74 68 69 73 20 73 6f 75 72  end of this sour
56c0: 63 65 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63 61  ce file..** beca
56d0: 75 73 65 20 69 74 20 69 6e 63 6c 75 64 65 73 20  use it includes 
56e0: 74 68 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e  the "sqlite3ext.
56f0: 68 22 20 66 69 6c 65 2c 20 77 68 69 63 68 20 64  h" file, which d
5700: 65 66 69 6e 65 73 20 74 68 65 20 73 71 6c 69 74  efines the sqlit
5710: 65 33 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41 50  e3..** public AP
5720: 49 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73  I function names
5730: 20 74 6f 20 62 65 20 6d 61 63 72 6f 73 20 61 6e   to be macros an
5740: 64 20 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75  d that would cau
5750: 73 65 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a 20  se the code..** 
5760: 61 62 6f 76 65 20 74 68 69 73 20 70 6f 69 6e 74  above this point
5770: 20 74 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e 2e   to malfunction.
5780: 0d 0a 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e 65  ..*/..#if define
5790: 64 28 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45  d(INTEROP_TEST_E
57a0: 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c  XTENSION)..#incl
57b0: 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 71 6c  ude "../core/sql
57c0: 69 74 65 33 65 78 74 2e 68 22 0d 0a 53 51 4c 49  ite3ext.h"..SQLI
57d0: 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49  TE_EXTENSION_INI
57e0: 54 31 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 65  T1..../*..** The
57f0: 20 69 6e 74 65 72 6f 70 54 65 73 74 28 29 20 53   interopTest() S
5800: 51 4c 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75  QL function retu
5810: 72 6e 73 20 69 74 73 20 66 69 72 73 74 20 61 72  rns its first ar
5820: 67 75 6d 65 6e 74 20 6f 72 20 72 61 69 73 65 73  gument or raises
5830: 20 61 6e 0d 0a 2a 2a 20 65 72 72 6f 72 20 69 66   an..** error if
5840: 20 74 68 65 72 65 20 61 72 65 20 6e 6f 74 20 65   there are not e
5850: 6e 6f 75 67 68 20 61 72 67 75 6d 65 6e 74 73 2e  nough arguments.
5860: 0d 0a 2a 2f 0d 0a 73 74 61 74 69 63 20 76 6f 69  ..*/..static voi
5870: 64 20 69 6e 74 65 72 6f 70 54 65 73 74 46 75 6e  d interopTestFun
5880: 63 28 0d 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  c(..  sqlite3_co
5890: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0d  ntext *context,.
58a0: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0d 0a 20 20  .  int argc,..  
58b0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
58c0: 61 72 67 76 0d 0a 29 7b 0d 0a 20 20 63 6f 6e 73  argv..){..  cons
58d0: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
58e0: 2a 7a 3b 0d 0a 20 20 69 66 28 20 61 72 67 63 21  *z;..  if( argc!
58f0: 3d 31 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74  =1 ){..    sqlit
5900: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28  e3_result_error(
5910: 63 6f 6e 74 65 78 74 2c 20 22 6e 65 65 64 20 65  context, "need e
5920: 78 61 63 74 6c 79 20 6f 6e 65 20 61 72 67 75 6d  xactly one argum
5930: 65 6e 74 22 2c 20 2d 31 29 3b 0d 0a 20 20 20 20  ent", -1);..    
5940: 72 65 74 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20 20  return;..  }..  
5950: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  z = sqlite3_valu
5960: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
5970: 0d 0a 20 20 69 66 28 20 7a 20 29 7b 0d 0a 20 20  ..  if( z ){..  
5980: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
5990: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28  _text(context, (
59a0: 63 68 61 72 2a 29 7a 2c 20 2d 31 2c 20 53 51 4c  char*)z, -1, SQL
59b0: 49 54 45 5f 53 54 41 54 49 43 29 3b 0d 0a 20 20  ITE_STATIC);..  
59c0: 7d 65 6c 73 65 7b 0d 0a 20 20 20 20 73 71 6c 69  }else{..    sqli
59d0: 74 65 33 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28  te3_result_null(
59e0: 63 6f 6e 74 65 78 74 29 3b 0d 0a 20 20 7d 0d 0a  context);..  }..
59f0: 7d 0d 0a 0d 0a 2f 2a 20 53 51 4c 69 74 65 20 69  }..../* SQLite i
5a00: 6e 76 6f 6b 65 73 20 74 68 69 73 20 72 6f 75 74  nvokes this rout
5a10: 69 6e 65 20 6f 6e 63 65 20 77 68 65 6e 20 69 74  ine once when it
5a20: 20 6c 6f 61 64 73 20 74 68 65 20 65 78 74 65 6e   loads the exten
5a30: 73 69 6f 6e 2e 0d 0a 2a 2a 20 43 72 65 61 74 65  sion...** Create
5a40: 20 6e 65 77 20 66 75 6e 63 74 69 6f 6e 73 2c 20   new functions, 
5a50: 63 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e  collating sequen
5a60: 63 65 73 2c 20 61 6e 64 20 76 69 72 74 75 61 6c  ces, and virtual
5a70: 20 74 61 62 6c 65 0d 0a 2a 2a 20 6d 6f 64 75 6c   table..** modul
5a80: 65 73 20 68 65 72 65 2e 20 20 54 68 69 73 20 69  es here.  This i
5a90: 73 20 75 73 75 61 6c 6c 79 20 74 68 65 20 6f 6e  s usually the on
5aa0: 6c 79 20 65 78 70 6f 72 74 65 64 20 73 79 6d 62  ly exported symb
5ab0: 6f 6c 20 69 6e 0d 0a 2a 2a 20 74 68 65 20 73 68  ol in..** the sh
5ac0: 61 72 65 64 20 6c 69 62 72 61 72 79 2e 0d 0a 2a  ared library...*
5ad0: 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e  /..SQLITE_API in
5ae0: 74 20 69 6e 74 65 72 6f 70 5f 74 65 73 74 5f 65  t interop_test_e
5af0: 78 74 65 6e 73 69 6f 6e 5f 69 6e 69 74 28 0d 0a  xtension_init(..
5b00: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d 0a    sqlite3 *db,..
5b10: 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d 73    char **pzErrMs
5b20: 67 2c 0d 0a 20 20 63 6f 6e 73 74 20 73 71 6c 69  g,..  const sqli
5b30: 74 65 33 5f 61 70 69 5f 72 6f 75 74 69 6e 65 73  te3_api_routines
5b40: 20 2a 70 41 70 69 0d 0a 29 7b 0d 0a 20 20 53 51   *pApi..){..  SQ
5b50: 4c 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49  LITE_EXTENSION_I
5b60: 4e 49 54 32 28 70 41 70 69 29 0d 0a 20 20 72 65  NIT2(pApi)..  re
5b70: 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 63 72 65  turn sqlite3_cre
5b80: 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c  ate_function(db,
5b90: 20 22 69 6e 74 65 72 6f 70 54 65 73 74 22 2c 20   "interopTest", 
5ba0: 2d 31 2c 20 53 51 4c 49 54 45 5f 41 4e 59 2c 20  -1, SQLITE_ANY, 
5bb0: 30 2c 0d 0a 20 20 20 20 20 20 69 6e 74 65 72 6f  0,..      intero
5bc0: 70 54 65 73 74 46 75 6e 63 2c 20 30 2c 20 30 29  pTestFunc, 0, 0)
5bd0: 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a        ;..}..#endif..