System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact fc43cc81b410f124a592a7cebfd0bf820d4f289c:


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 28 30 78 30 30 29  ONE       (0x00)
0280: 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f  ..#define INTERO
0290: 50 5f 44 45 42 55 47 5f 43 4c 4f 53 45 20 20 20  P_DEBUG_CLOSE   
02a0: 20 20 20 28 30 78 30 31 29 0d 0a 23 64 65 66 69     (0x01)..#defi
02b0: 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ne INTEROP_DEBUG
02c0: 5f 46 49 4e 41 4c 49 5a 45 20 20 20 28 30 78 30  _FINALIZE   (0x0
02d0: 32 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45  2)..#define INTE
02e0: 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 20 20  ROP_DEBUG_OPEN  
02f0: 20 20 20 20 20 28 30 78 30 34 29 0d 0a 23 64 65       (0x04)..#de
0300: 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42  fine INTEROP_DEB
0310: 55 47 5f 4f 50 45 4e 31 36 20 20 20 20 20 28 30  UG_OPEN16     (0
0320: 78 30 38 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e  x08)..#define IN
0330: 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50  TEROP_DEBUG_PREP
0340: 41 52 45 20 20 20 20 28 30 78 31 30 29 0d 0a 23  ARE    (0x10)..#
0350: 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44  define INTEROP_D
0360: 45 42 55 47 5f 50 52 45 50 41 52 45 31 36 20 20  EBUG_PREPARE16  
0370: 28 30 78 32 30 29 0d 0a 23 64 65 66 69 6e 65 20  (0x20)..#define 
0380: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45  INTEROP_DEBUG_RE
0390: 53 45 54 20 20 20 20 20 20 28 30 78 34 30 29 0d  SET      (0x40).
03a0: 0a 0d 0a 74 79 70 65 64 65 66 20 76 6f 69 64 20  ...typedef void 
03b0: 28 2a 53 51 4c 49 54 45 55 53 45 52 46 55 4e 43  (*SQLITEUSERFUNC
03c0: 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  )(sqlite3_contex
03d0: 74 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65  t *, int, sqlite
03e0: 33 5f 76 61 6c 75 65 20 2a 2a 29 3b 0d 0a 74 79  3_value **);..ty
03f0: 70 65 64 65 66 20 76 6f 69 64 20 28 2a 53 51 4c  pedef void (*SQL
0400: 49 54 45 46 55 4e 43 46 49 4e 41 4c 29 28 73 71  ITEFUNCFINAL)(sq
0410: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 29  lite3_context *)
0420: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  ;....#if defined
0430: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 0d  (INTEROP_DEBUG).
0440: 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20  .SQLITE_PRIVATE 
0450: 76 6f 69 64 20 73 71 6c 69 74 65 33 49 6e 74 65  void sqlite3Inte
0460: 72 6f 70 44 65 62 75 67 28 63 6f 6e 73 74 20 63  ropDebug(const c
0470: 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e  har *zFormat, ..
0480: 2e 29 7b 0d 0a 20 20 76 61 5f 6c 69 73 74 20 61  .){..  va_list a
0490: 70 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  p;              
04a0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 56 61             /* Va
04b0: 72 61 72 67 20 6c 69 73 74 20 2a 2f 0d 0a 20 20  rarg list */..  
04c0: 53 74 72 41 63 63 75 6d 20 61 63 63 3b 20 20 20  StrAccum acc;   
04d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
04e0: 20 20 20 20 2f 2a 20 53 74 72 69 6e 67 20 61 63      /* String ac
04f0: 63 75 6d 75 6c 61 74 6f 72 20 2a 2f 0a 20 20 63  cumulator */.  c
0500: 68 61 72 20 7a 4d 73 67 5b 53 51 4c 49 54 45 5f  har zMsg[SQLITE_
0510: 50 52 49 4e 54 5f 42 55 46 5f 53 49 5a 45 2a 33  PRINT_BUF_SIZE*3
0520: 5d 3b 20 2f 2a 20 43 6f 6d 70 6c 65 74 65 20 6c  ]; /* Complete l
0530: 6f 67 20 6d 65 73 73 61 67 65 20 2a 2f 0d 0a 20  og message */.. 
0540: 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46   va_start(ap, zF
0550: 6f 72 6d 61 74 29 3b 0a 20 20 73 71 6c 69 74 65  ormat);.  sqlite
0560: 33 53 74 72 41 63 63 75 6d 49 6e 69 74 28 26 61  3StrAccumInit(&a
0570: 63 63 2c 20 7a 4d 73 67 2c 20 73 69 7a 65 6f 66  cc, zMsg, sizeof
0580: 28 7a 4d 73 67 29 2c 20 30 29 3b 0a 20 20 61 63  (zMsg), 0);.  ac
0590: 63 2e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 30 3b  c.useMalloc = 0;
05a0: 0a 20 20 73 71 6c 69 74 65 33 56 58 50 72 69 6e  .  sqlite3VXPrin
05b0: 74 66 28 26 61 63 63 2c 20 30 2c 20 7a 46 6f 72  tf(&acc, 0, zFor
05c0: 6d 61 74 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65  mat, ap);.  va_e
05d0: 6e 64 28 61 70 29 3b 0a 23 69 66 20 53 51 4c 49  nd(ap);.#if SQLI
05e0: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45  TE_VERSION_NUMBE
05f0: 52 20 3e 3d 20 33 30 30 37 30 31 33 0a 20 20 73  R >= 3007013.  s
0600: 71 6c 69 74 65 33 5f 77 69 6e 33 32 5f 77 72 69  qlite3_win32_wri
0610: 74 65 5f 64 65 62 75 67 28 73 71 6c 69 74 65 33  te_debug(sqlite3
0620: 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 26  StrAccumFinish(&
0630: 61 63 63 29 2c 20 2d 31 29 3b 0a 23 65 6c 69 66  acc), -1);.#elif
0640: 20 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f   defined(SQLITE_
0650: 57 49 4e 33 32 5f 48 41 53 5f 41 4e 53 49 29 0a  WIN32_HAS_ANSI).
0660: 20 20 4f 75 74 70 75 74 44 65 62 75 67 53 74 72    OutputDebugStr
0670: 69 6e 67 41 28 73 71 6c 69 74 65 33 53 74 72 41  ingA(sqlite3StrA
0680: 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29  ccumFinish(&acc)
0690: 29 3b 0a 23 65 6c 69 66 20 64 65 66 69 6e 65 64  );.#elif defined
06a0: 28 53 51 4c 49 54 45 5f 57 49 4e 33 32 5f 48 41  (SQLITE_WIN32_HA
06b0: 53 5f 57 49 44 45 29 0a 20 20 7b 0a 20 20 20 20  S_WIDE).  {.    
06c0: 4c 50 57 53 54 52 20 7a 57 69 64 65 4d 73 67 20  LPWSTR zWideMsg 
06d0: 3d 20 75 74 66 38 54 6f 55 6e 69 63 6f 64 65 28  = utf8ToUnicode(
06e0: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46  sqlite3StrAccumF
06f0: 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0a 20 20  inish(&acc));.  
0700: 20 20 69 66 28 20 7a 57 69 64 65 4d 73 67 20 29    if( zWideMsg )
0710: 7b 0a 20 20 20 20 20 20 4f 75 74 70 75 74 44 65  {.      OutputDe
0720: 62 75 67 53 74 72 69 6e 67 57 28 7a 57 69 64 65  bugStringW(zWide
0730: 4d 73 67 29 3b 0a 20 20 20 20 20 20 73 71 6c 69  Msg);.      sqli
0740: 74 65 33 5f 66 72 65 65 28 7a 57 69 64 65 4d 73  te3_free(zWideMs
0750: 67 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 23 65  g);.    }.  }.#e
0760: 6c 73 65 0a 20 20 66 70 72 69 6e 74 66 28 73 74  lse.  fprintf(st
0770: 64 65 72 72 2c 20 22 25 73 22 2c 20 73 71 6c 69  derr, "%s", sqli
0780: 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73  te3StrAccumFinis
0790: 68 28 26 61 63 63 29 29 3b 0a 23 65 6e 64 69 66  h(&acc));.#endif
07a0: 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69  .}..#endif....#i
07b0: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e  f SQLITE_VERSION
07c0: 5f 4e 55 4d 42 45 52 20 3c 20 33 30 30 37 30 31  _NUMBER < 300701
07d0: 34 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54  4..SQLITE_PRIVAT
07e0: 45 20 76 6f 69 64 20 2a 20 73 71 6c 69 74 65 33  E void * sqlite3
07f0: 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 5f 69 6e 74  DbMallocZero_int
0800: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62  erop(sqlite3 *db
0810: 2c 20 69 6e 74 20 6e 29 0d 0a 7b 0d 0a 20 20 76  , int n)..{..  v
0820: 6f 69 64 20 2a 70 3b 0d 0a 20 20 69 66 20 28 64  oid *p;..  if (d
0830: 62 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65  b) {..    sqlite
0840: 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62  3_mutex_enter(db
0850: 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a  ->mutex);..  }..
0860: 20 20 70 20 3d 20 73 71 6c 69 74 65 33 44 62 4d    p = sqlite3DbM
0870: 61 6c 6c 6f 63 5a 65 72 6f 28 64 62 2c 6e 29 3b  allocZero(db,n);
0880: 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d 0a 20  ..  if (db) {.. 
0890: 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78     sqlite3_mutex
08a0: 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78  _leave(db->mutex
08b0: 29 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72  );..  }..  retur
08c0: 6e 20 70 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  n p;..}....SQLIT
08d0: 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 73  E_PRIVATE void s
08e0: 71 6c 69 74 65 33 44 62 46 72 65 65 5f 69 6e 74  qlite3DbFree_int
08f0: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62  erop(sqlite3 *db
0900: 2c 20 76 6f 69 64 20 2a 70 29 0d 0a 7b 0d 0a 20  , void *p)..{.. 
0910: 20 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20   if (db) {..    
0920: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e  sqlite3_mutex_en
0930: 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d  ter(db->mutex);.
0940: 0a 20 20 7d 0d 0a 20 20 69 66 20 28 70 29 20 7b  .  }..  if (p) {
0950: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 4d 65 6d  ..    sqlite3Mem
0960: 64 65 62 75 67 53 65 74 54 79 70 65 28 70 2c 20  debugSetType(p, 
0970: 4d 45 4d 54 59 50 45 5f 44 42 7c 4d 45 4d 54 59  MEMTYPE_DB|MEMTY
0980: 50 45 5f 48 45 41 50 29 3b 0d 0a 20 20 7d 0d 0a  PE_HEAP);..  }..
0990: 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 28    sqlite3DbFree(
09a0: 64 62 2c 70 29 3b 0d 0a 20 20 69 66 20 28 64 62  db,p);..  if (db
09b0: 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33  ) {..    sqlite3
09c0: 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d  _mutex_leave(db-
09d0: 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 7d  >mutex);..  }..}
09e0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 2f 2a 0d 0a  ..#endif..../*..
09f0: 20 20 20 20 54 68 65 20 67 6f 61 6c 20 6f 66 20      The goal of 
0a00: 74 68 69 73 20 76 65 72 73 69 6f 6e 20 6f 66 20  this version of 
0a10: 63 6c 6f 73 65 20 69 73 20 64 69 66 66 65 72 65  close is differe
0a20: 6e 74 20 74 68 61 6e 20 74 68 61 74 20 6f 66 20  nt than that of 
0a30: 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 29 2c  sqlite3_close(),
0a40: 20 61 6e 64 20 69 73 20 64 65 73 69 67 6e 65 64   and is designed
0a50: 20 74 6f 20 6c 65 6e 64 20 69 74 73 65 6c 66 20   to lend itself 
0a60: 62 65 74 74 65 72 20 74 6f 20 2e 4e 45 54 27 73  better to .NET's
0a70: 20 6e 6f 6e 2d 64 65 74 65 72 6d 69 6e 69 73 74   non-determinist
0a80: 69 63 20 66 69 6e 61 6c 69 7a 65 72 73 20 61 6e  ic finalizers an
0a90: 64 0d 0a 20 20 20 20 74 68 65 20 47 43 20 74 68  d..    the GC th
0aa0: 72 65 61 64 2e 20 20 53 51 4c 69 74 65 20 77 69  read.  SQLite wi
0ab0: 6c 6c 20 6e 6f 74 20 63 6c 6f 73 65 20 61 20 64  ll not close a d
0ac0: 61 74 61 62 61 73 65 20 69 66 20 73 74 61 74 65  atabase if state
0ad0: 6d 65 6e 74 73 20 61 72 65 20 6f 70 65 6e 20 6f  ments are open o
0ae0: 6e 20 69 74 20 2d 2d 20 62 75 74 20 66 6f 72 20  n it -- but for 
0af0: 6f 75 72 20 70 75 72 70 6f 73 65 73 2c 20 77 65  our purposes, we
0b00: 27 64 20 72 61 74 68 65 72 20 66 69 6e 61 6c 69  'd rather finali
0b10: 7a 65 20 61 6c 6c 20 61 63 74 69 76 65 20 73 74  ze all active st
0b20: 61 74 65 6d 65 6e 74 73 0d 0a 20 20 20 20 61 6e  atements..    an
0b30: 64 20 66 6f 72 63 69 62 6c 79 20 63 6c 6f 73 65  d forcibly close
0b40: 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20   the database.  
0b50: 54 68 65 20 72 65 61 73 6f 6e 20 69 73 20 73 69  The reason is si
0b60: 6d 70 6c 65 20 2d 2d 20 61 20 6c 6f 74 20 6f 66  mple -- a lot of
0b70: 20 70 65 6f 70 6c 65 20 64 6f 6e 27 74 20 44 69   people don't Di
0b80: 73 70 6f 73 65 28 29 20 6f 66 20 74 68 65 69 72  spose() of their
0b90: 20 6f 62 6a 65 63 74 73 20 63 6f 72 72 65 63 74   objects correct
0ba0: 6c 79 20 61 6e 64 20 6c 65 74 20 74 68 65 20 67  ly and let the g
0bb0: 61 72 62 61 67 65 20 63 6f 6c 6c 65 63 74 6f 72  arbage collector
0bc0: 0d 0a 20 20 20 20 64 6f 20 69 74 2e 20 20 54 68  ..    do it.  Th
0bd0: 69 73 20 6c 65 61 64 73 20 74 6f 20 75 6e 65 78  is leads to unex
0be0: 70 65 63 74 65 64 20 62 65 68 61 76 69 6f 72 20  pected behavior 
0bf0: 77 68 65 6e 20 61 20 75 73 65 72 20 74 68 69 6e  when a user thin
0c00: 6b 73 20 74 68 65 79 27 76 65 20 63 6c 6f 73 65  ks they've close
0c10: 64 20 61 20 64 61 74 61 62 61 73 65 2c 20 62 75  d a database, bu
0c20: 74 20 69 74 27 73 20 73 74 69 6c 6c 20 6f 70 65  t it's still ope
0c30: 6e 20 62 65 63 61 75 73 65 20 6e 6f 74 20 61 6c  n because not al
0c40: 6c 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 73  l the statements
0c50: 20 68 61 76 65 0d 0a 20 20 20 20 68 69 74 20 74   have..    hit t
0c60: 68 65 20 47 43 20 79 65 74 2e 0d 0a 0d 0a 20 20  he GC yet.....  
0c70: 20 20 53 6f 2c 20 68 65 72 65 20 77 65 20 68 61    So, here we ha
0c80: 76 65 20 61 20 70 72 6f 62 6c 65 6d 20 2e 2e 2e  ve a problem ...
0c90: 20 2e 4e 45 54 20 68 61 73 20 61 20 70 6f 69 6e   .NET has a poin
0ca0: 74 65 72 20 74 6f 20 61 6e 79 20 6e 75 6d 62 65  ter to any numbe
0cb0: 72 20 6f 66 20 73 71 6c 69 74 65 33 5f 73 74 6d  r of sqlite3_stm
0cc0: 74 20 6f 62 6a 65 63 74 73 2e 20 20 57 65 20 63  t objects.  We c
0cd0: 61 6e 27 74 20 63 61 6c 6c 20 73 71 6c 69 74 65  an't call sqlite
0ce0: 33 5f 66 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20  3_finalize() on 
0cf0: 74 68 65 73 65 20 62 65 63 61 75 73 65 0d 0a 20  these because.. 
0d00: 20 20 20 74 68 65 69 72 20 6d 65 6d 6f 72 79 20     their memory 
0d10: 69 73 20 66 72 65 65 64 20 61 6e 64 20 63 61 6e  is freed and can
0d20: 20 62 65 20 75 73 65 64 20 66 6f 72 20 73 6f 6d   be used for som
0d30: 65 74 68 69 6e 67 20 65 6c 73 65 2e 20 20 54 68  ething else.  Th
0d40: 65 20 47 43 20 74 68 72 65 61 64 20 63 6f 75 6c  e GC thread coul
0d50: 64 20 70 6f 74 65 6e 74 69 61 6c 6c 79 20 74 72  d potentially tr
0d60: 79 20 61 6e 64 20 63 61 6c 6c 20 66 69 6e 61 6c  y and call final
0d70: 69 7a 65 20 61 67 61 69 6e 20 6f 6e 20 74 68 65  ize again on the
0d80: 20 73 74 61 74 65 6d 65 6e 74 20 61 66 74 65 72   statement after
0d90: 0d 0a 20 20 20 20 74 68 61 74 20 6d 65 6d 6f 72  ..    that memor
0da0: 79 20 77 61 73 20 64 65 61 6c 6c 6f 63 61 74 65  y was deallocate
0db0: 64 2e 20 20 42 41 44 2e 20 20 53 6f 2c 20 77 68  d.  BAD.  So, wh
0dc0: 61 74 20 77 65 20 6e 65 65 64 20 74 6f 20 64 6f  at we need to do
0dd0: 20 69 73 20 6d 61 6b 65 20 61 20 63 6f 70 79 20   is make a copy 
0de0: 6f 66 20 65 61 63 68 20 73 74 61 74 65 6d 65 6e  of each statemen
0df0: 74 2c 20 61 6e 64 20 63 61 6c 6c 20 66 69 6e 61  t, and call fina
0e00: 6c 69 7a 65 28 29 20 6f 6e 20 74 68 65 20 63 6f  lize() on the co
0e10: 70 79 20 2d 2d 20 73 6f 20 74 68 61 74 20 74 68  py -- so that th
0e20: 65 20 6f 72 69 67 69 6e 61 6c 0d 0a 20 20 20 20  e original..    
0e30: 73 74 61 74 65 6d 65 6e 74 27 73 20 6d 65 6d 6f  statement's memo
0e40: 72 79 20 69 73 20 70 72 65 73 65 72 76 65 64 2c  ry is preserved,
0e50: 20 61 6e 64 20 6d 61 72 6b 65 64 20 61 73 20 42   and marked as B
0e60: 41 44 2c 20 62 75 74 20 77 65 20 63 61 6e 20 73  AD, but we can s
0e70: 74 69 6c 6c 20 6d 61 6e 61 67 65 20 74 6f 20 66  till manage to f
0e80: 69 6e 61 6c 69 7a 65 20 65 76 65 72 79 74 68 69  inalize everythi
0e90: 6e 67 20 61 6e 64 20 66 6f 72 63 69 62 6c 79 20  ng and forcibly 
0ea0: 63 6c 6f 73 65 20 74 68 65 20 64 61 74 61 62 61  close the databa
0eb0: 73 65 2e 20 20 4c 61 74 65 72 20 77 68 65 6e 20  se.  Later when 
0ec0: 74 68 65 20 0d 0a 20 20 20 20 47 43 20 67 65 74  the ..    GC get
0ed0: 73 20 61 72 6f 75 6e 64 20 74 6f 20 63 61 6c 6c  s around to call
0ee0: 69 6e 67 20 66 69 6e 61 6c 69 7a 65 5f 69 6e 74  ing finalize_int
0ef0: 65 72 6f 70 28 29 20 6f 6e 20 74 68 65 20 22 62  erop() on the "b
0f00: 61 64 22 20 73 74 61 74 65 6d 65 6e 74 2c 20 77  ad" statement, w
0f10: 65 20 64 65 74 65 63 74 20 74 68 61 74 20 61 6e  e detect that an
0f20: 64 20 66 69 6e 69 73 68 20 64 65 61 6c 6c 6f 63  d finish dealloc
0f30: 61 74 69 6e 67 20 74 68 65 20 70 6f 69 6e 74 65  ating the pointe
0f40: 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41  r...*/..SQLITE_A
0f50: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71  PI int WINAPI sq
0f60: 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 69 6e 74 65  lite3_close_inte
0f70: 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62 29  rop(sqlite3 *db)
0f80: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d  ..{..  int ret;.
0f90: 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53  .#if SQLITE_VERS
0fa0: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30  ION_NUMBER >= 30
0fb0: 30 37 30 31 34 0d 0a 0d 0a 23 69 66 20 64 65 66  07014....#if def
0fc0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42  ined(INTEROP_DEB
0fd0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f  UG) && (INTEROP_
0fe0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f  DEBUG & INTEROP_
0ff0: 44 45 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20  DEBUG_CLOSE)..  
1000: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65  sqlite3InteropDe
1010: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f  bug("sqlite3_clo
1020: 73 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61  se_interop(): ca
1030: 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 63 6c  lling sqlite3_cl
1040: 6f 73 65 5f 76 32 28 25 70 29 2e 2e 2e 5c 6e 22  ose_v2(%p)...\n"
1050: 2c 20 64 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a  , db);..#endif..
1060: 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65  ..  ret = sqlite
1070: 33 5f 63 6c 6f 73 65 5f 76 32 28 64 62 29 3b 0d  3_close_v2(db);.
1080: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49  ...#if defined(I
1090: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26  NTEROP_DEBUG) &&
10a0: 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20   (INTEROP_DEBUG 
10b0: 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f  & INTEROP_DEBUG_
10c0: 43 4c 4f 53 45 29 0d 0a 20 20 73 71 6c 69 74 65  CLOSE)..  sqlite
10d0: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
10e0: 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 69 6e 74  qlite3_close_int
10f0: 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f  erop(): sqlite3_
1100: 63 6c 6f 73 65 5f 76 32 28 25 70 29 20 72 65 74  close_v2(%p) ret
1110: 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62  urned %d.\n", db
1120: 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d  , ret);..#endif.
1130: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b  ...  return ret;
1140: 0d 0a 23 65 6c 73 65 0d 0a 20 20 72 65 74 20 3d  ..#else..  ret =
1150: 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 64   sqlite3_close(d
1160: 62 29 3b 0d 0a 0d 0a 20 20 69 66 20 28 72 65 74  b);....  if (ret
1170: 20 3d 3d 20 53 51 4c 49 54 45 5f 42 55 53 59 29   == SQLITE_BUSY)
1180: 0d 0a 20 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74  ..  {..    sqlit
1190: 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64  e3_mutex_enter(d
11a0: 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20  b->mutex);....  
11b0: 20 20 69 66 20 28 21 64 62 2d 3e 70 56 64 62 65    if (!db->pVdbe
11c0: 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20  )..    {..      
11d0: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65  sqlite3_mutex_le
11e0: 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d  ave(db->mutex);.
11f0: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 72 65  .      return re
1200: 74 3b 0d 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20  t;..    }....   
1210: 20 77 68 69 6c 65 20 28 64 62 2d 3e 70 56 64 62   while (db->pVdb
1220: 65 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20  e)..    {..     
1230: 20 2f 2a 20 4d 61 6b 65 20 61 20 63 6f 70 79 20   /* Make a copy 
1240: 6f 66 20 74 68 65 20 66 69 72 73 74 20 70 72 65  of the first pre
1250: 70 61 72 65 64 20 73 74 61 74 65 6d 65 6e 74 20  pared statement 
1260: 2a 2f 0d 0a 20 20 20 20 20 20 56 64 62 65 20 2a  */..      Vdbe *
1270: 70 20 3d 20 28 56 64 62 65 20 2a 29 73 71 6c 69  p = (Vdbe *)sqli
1280: 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 5f  te3DbMallocZero_
1290: 69 6e 74 65 72 6f 70 28 64 62 2c 20 73 69 7a 65  interop(db, size
12a0: 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 20 20 20  of(Vdbe));..    
12b0: 20 20 56 64 62 65 20 2a 70 6f 20 3d 20 64 62 2d    Vdbe *po = db-
12c0: 3e 70 56 64 62 65 3b 0d 0a 0d 0a 20 20 20 20 20  >pVdbe;....     
12d0: 20 69 66 20 28 21 70 29 20 0d 0a 20 20 20 20 20   if (!p) ..     
12e0: 20 7b 0d 0a 20 20 20 20 20 20 20 20 72 65 74 20   {..        ret 
12f0: 3d 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0d  = SQLITE_NOMEM;.
1300: 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0d  .        break;.
1310: 0a 20 20 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20  .      }....    
1320: 20 20 43 6f 70 79 4d 65 6d 6f 72 79 28 70 2c 20    CopyMemory(p, 
1330: 70 6f 2c 20 73 69 7a 65 6f 66 28 56 64 62 65 29  po, sizeof(Vdbe)
1340: 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 2f 2a 20 50  );....      /* P
1350: 75 74 20 69 74 20 6f 6e 20 74 68 65 20 63 68 61  ut it on the cha
1360: 69 6e 20 73 6f 20 77 65 20 63 61 6e 20 66 72 65  in so we can fre
1370: 65 20 69 74 20 2a 2f 0d 0a 20 20 20 20 20 20 64  e it */..      d
1380: 62 2d 3e 70 56 64 62 65 20 3d 20 70 3b 0d 0a 20  b->pVdbe = p;.. 
1390: 20 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74       ret = sqlit
13a0: 65 33 5f 66 69 6e 61 6c 69 7a 65 28 28 73 71 6c  e3_finalize((sql
13b0: 69 74 65 33 5f 73 74 6d 74 20 2a 29 70 29 3b 20  ite3_stmt *)p); 
13c0: 2f 2a 20 54 68 69 73 20 77 69 6c 6c 20 61 6c 73  /* This will als
13d0: 6f 20 66 72 65 65 20 74 68 65 20 63 6f 70 79 27  o free the copy'
13e0: 73 20 6d 65 6d 6f 72 79 20 2a 2f 0d 0a 20 20 20  s memory */..   
13f0: 20 20 20 69 66 20 28 72 65 74 29 0d 0a 20 20 20     if (ret)..   
1400: 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 2f 2a     {..        /*
1410: 20 66 69 6e 61 6c 69 7a 65 20 66 61 69 6c 65 64   finalize failed
1420: 20 2d 2d 20 73 6f 20 77 65 20 6d 75 73 74 20 70   -- so we must p
1430: 75 74 20 62 61 63 6b 20 61 6e 79 74 68 69 6e 67  ut back anything
1440: 20 77 65 20 6d 75 6e 67 65 64 20 2a 2f 0d 0a 20   we munged */.. 
1450: 20 20 20 20 20 20 20 43 6f 70 79 4d 65 6d 6f 72         CopyMemor
1460: 79 28 70 6f 2c 20 70 2c 20 73 69 7a 65 6f 66 28  y(po, p, sizeof(
1470: 56 64 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 20  Vdbe));..       
1480: 20 64 62 2d 3e 70 56 64 62 65 20 3d 20 70 6f 3b   db->pVdbe = po;
1490: 0d 0a 0d 0a 20 20 20 20 20 20 20 20 2f 2a 0d 0a  ....        /*..
14a0: 20 20 20 20 20 20 20 20 2a 2a 20 4e 4f 54 45 3a          ** NOTE:
14b0: 20 4f 6b 2c 20 77 65 20 6d 75 73 74 20 66 72 65   Ok, we must fre
14c0: 65 20 74 68 69 73 20 62 6c 6f 63 6b 20 74 68 61  e this block tha
14d0: 74 20 2a 77 65 2a 20 61 6c 6c 6f 63 61 74 65 64  t *we* allocated
14e0: 20 28 61 62 6f 76 65 29 20 73 69 6e 63 65 0d 0a   (above) since..
14f0: 20 20 20 20 20 20 20 20 2a 2a 20 20 20 20 20 20          **      
1500: 20 66 69 6e 61 6c 69 7a 65 20 64 69 64 20 6e 6f   finalize did no
1510: 74 20 64 6f 20 73 6f 2e 0d 0a 20 20 20 20 20 20  t do so...      
1520: 20 20 2a 2f 0d 0a 20 20 20 20 20 20 20 20 73 71    */..        sq
1530: 6c 69 74 65 33 44 62 46 72 65 65 5f 69 6e 74 65  lite3DbFree_inte
1540: 72 6f 70 28 64 62 2c 20 70 29 3b 0d 0a 20 20 20  rop(db, p);..   
1550: 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20       break;..   
1560: 20 20 20 7d 0d 0a 20 20 20 20 20 20 65 6c 73 65     }..      else
1570: 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20  ..      {..     
1580: 20 20 20 5a 65 72 6f 4d 65 6d 6f 72 79 28 70 6f     ZeroMemory(po
1590: 2c 20 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b  , sizeof(Vdbe));
15a0: 0d 0a 20 20 20 20 20 20 20 20 70 6f 2d 3e 6d 61  ..        po->ma
15b0: 67 69 63 20 3d 20 56 44 42 45 5f 4d 41 47 49 43  gic = VDBE_MAGIC
15c0: 5f 44 45 41 44 3b 0d 0a 20 20 20 20 20 20 7d 0d  _DEAD;..      }.
15d0: 0a 20 20 20 20 7d 0d 0a 20 20 20 20 73 71 6c 69  .    }..    sqli
15e0: 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28  te3_mutex_leave(
15f0: 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 20  db->mutex);..   
1600: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 63   ret = sqlite3_c
1610: 6c 6f 73 65 28 64 62 29 3b 0d 0a 20 20 7d 0d 0a  lose(db);..  }..
1620: 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23    return ret;..#
1630: 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  endif..}....SQLI
1640: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
1650: 49 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69  I sqlite3_open_i
1660: 6e 74 65 72 6f 70 28 63 6f 6e 73 74 20 63 68 61  nterop(const cha
1670: 72 2a 66 69 6c 65 6e 61 6d 65 2c 20 69 6e 74 20  r*filename, int 
1680: 66 6c 61 67 73 2c 20 73 71 6c 69 74 65 33 20 2a  flags, sqlite3 *
1690: 2a 70 70 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74  *ppdb)..{..  int
16a0: 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20 64 65 66   ret;....#if def
16b0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42  ined(INTEROP_DEB
16c0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f  UG) && (INTEROP_
16d0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f  DEBUG & INTEROP_
16e0: 44 45 42 55 47 5f 4f 50 45 4e 29 0d 0a 20 20 73  DEBUG_OPEN)..  s
16f0: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
1700: 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 6e  ug("sqlite3_open
1710: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c  _interop(): call
1720: 69 6e 67 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e  ing sqlite3_open
1730: 5f 76 32 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20  _v2(\"%s\", %d, 
1740: 25 70 29 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e  %p)...\n", filen
1750: 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64 62  ame, flags, ppdb
1760: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20  );..#endif....  
1770: 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70  ret = sqlite3_op
1780: 65 6e 5f 76 32 28 66 69 6c 65 6e 61 6d 65 2c 20  en_v2(filename, 
1790: 70 70 64 62 2c 20 66 6c 61 67 73 2c 20 4e 55 4c  ppdb, flags, NUL
17a0: 4c 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e  L);....#if defin
17b0: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47  ed(INTEROP_DEBUG
17c0: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45  ) && (INTEROP_DE
17d0: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45  BUG & INTEROP_DE
17e0: 42 55 47 5f 4f 50 45 4e 29 0d 0a 20 20 73 71 6c  BUG_OPEN)..  sql
17f0: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67  ite3InteropDebug
1800: 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69  ("sqlite3_open_i
1810: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65  nterop(): sqlite
1820: 33 5f 6f 70 65 6e 5f 76 32 28 5c 22 25 73 5c 22  3_open_v2(\"%s\"
1830: 2c 20 25 64 2c 20 25 70 29 20 72 65 74 75 72 6e  , %d, %p) return
1840: 65 64 20 25 64 2e 5c 6e 22 2c 20 66 69 6c 65 6e  ed %d.\n", filen
1850: 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64 62  ame, flags, ppdb
1860: 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d  , ret);..#endif.
1870: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49  ...#if defined(I
1880: 4e 54 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e  NTEROP_EXTENSION
1890: 5f 46 55 4e 43 54 49 4f 4e 53 29 0d 0a 20 20 69  _FUNCTIONS)..  i
18a0: 66 20 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45  f (ret == SQLITE
18b0: 5f 4f 4b 29 0d 0a 20 20 20 20 52 65 67 69 73 74  _OK)..    Regist
18c0: 65 72 45 78 74 65 6e 73 69 6f 6e 46 75 6e 63 74  erExtensionFunct
18d0: 69 6f 6e 73 28 2a 70 70 64 62 29 3b 0d 0a 23 65  ions(*ppdb);..#e
18e0: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e  ndif....  return
18f0: 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49   ret;..}....SQLI
1900: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50  TE_API int WINAP
1910: 49 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36  I sqlite3_open16
1920: 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73 74 20 63  _interop(const c
1930: 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65 2c 20 69  har *filename, i
1940: 6e 74 20 66 6c 61 67 73 2c 20 73 71 6c 69 74 65  nt flags, sqlite
1950: 33 20 2a 2a 70 70 64 62 29 0d 0a 7b 0d 0a 20 20  3 **ppdb)..{..  
1960: 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20  int ret;....#if 
1970: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f  defined(INTEROP_
1980: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52  DEBUG) && (INTER
1990: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52  OP_DEBUG & INTER
19a0: 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 31 36 29  OP_DEBUG_OPEN16)
19b0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
19c0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
19d0: 5f 6f 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70 28  _open16_interop(
19e0: 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74  ): calling sqlit
19f0: 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28  e3_open_interop(
1a00: 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 2e  \"%s\", %d, %p).
1a10: 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65 2c  ..\n", filename,
1a20: 20 66 6c 61 67 73 2c 20 70 70 64 62 29 3b 0d 0a   flags, ppdb);..
1a30: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20  #endif....  ret 
1a40: 3d 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69  = sqlite3_open_i
1a50: 6e 74 65 72 6f 70 28 66 69 6c 65 6e 61 6d 65 2c  nterop(filename,
1a60: 20 66 6c 61 67 73 2c 20 70 70 64 62 29 3b 0d 0a   flags, ppdb);..
1a70: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
1a80: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20  TEROP_DEBUG) && 
1a90: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26  (INTEROP_DEBUG &
1aa0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f   INTEROP_DEBUG_O
1ab0: 50 45 4e 31 36 29 0d 0a 20 20 73 71 6c 69 74 65  PEN16)..  sqlite
1ac0: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73  3InteropDebug("s
1ad0: 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36 5f 69 6e  qlite3_open16_in
1ae0: 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33  terop(): sqlite3
1af0: 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 5c 22  _open_interop(\"
1b00: 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 65  %s\", %d, %p) re
1b10: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 66  turned %d.\n", f
1b20: 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20  ilename, flags, 
1b30: 70 70 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65 6e  ppdb, ret);..#en
1b40: 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 28 72 65  dif....  if ((re
1b50: 74 20 3d 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 20  t == SQLITE_OK) 
1b60: 26 26 20 21 44 62 48 61 73 50 72 6f 70 65 72 74  && !DbHasPropert
1b70: 79 28 2a 70 70 64 62 2c 20 30 2c 20 44 42 5f 53  y(*ppdb, 0, DB_S
1b80: 63 68 65 6d 61 4c 6f 61 64 65 64 29 29 0d 0a 20  chemaLoaded)).. 
1b90: 20 20 20 45 4e 43 28 2a 70 70 64 62 29 20 3d 20     ENC(*ppdb) = 
1ba0: 53 51 4c 49 54 45 5f 55 54 46 31 36 4e 41 54 49  SQLITE_UTF16NATI
1bb0: 56 45 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20  VE;....  return 
1bc0: 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  ret;..}....SQLIT
1bd0: 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72  E_API const char
1be0: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65   * WINAPI sqlite
1bf0: 33 5f 65 72 72 6d 73 67 5f 69 6e 74 65 72 6f 70  3_errmsg_interop
1c00: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e  (sqlite3 *db, in
1c10: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
1c20: 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20  onst char *pval 
1c30: 3d 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67  = sqlite3_errmsg
1c40: 28 64 62 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d  (db);..  *plen =
1c50: 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73   (pval != 0) ? s
1c60: 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b  trlen(pval) : 0;
1c70: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b  ..  return pval;
1c80: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
1c90: 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c  I int WINAPI sql
1ca0: 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74  ite3_prepare_int
1cb0: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62  erop(sqlite3 *db
1cc0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 73 71  , const char *sq
1cd0: 6c 2c 20 69 6e 74 20 6e 62 79 74 65 73 2c 20 73  l, int nbytes, s
1ce0: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 2a 70 70  qlite3_stmt **pp
1cf0: 73 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72  stmt, const char
1d00: 20 2a 2a 70 7a 74 61 69 6c 2c 20 69 6e 74 20 2a   **pztail, int *
1d10: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20  plen)..{..  int 
1d20: 6e 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  n;....#if define
1d30: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
1d40: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
1d50: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
1d60: 55 47 5f 50 52 45 50 41 52 45 29 0d 0a 20 20 73  UG_PREPARE)..  s
1d70: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62  qlite3InteropDeb
1d80: 75 67 28 22 73 71 6c 69 74 65 33 5f 70 72 65 70  ug("sqlite3_prep
1d90: 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63  are_interop(): c
1da0: 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 70  alling sqlite3_p
1db0: 72 65 70 61 72 65 28 25 70 2c 20 5c 22 25 73 5c  repare(%p, \"%s\
1dc0: 22 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22  ", %d, %p)...\n"
1dd0: 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 62 79 74 65  , db, sql, nbyte
1de0: 73 2c 20 70 70 73 74 6d 74 29 3b 0d 0a 23 65 6e  s, ppstmt);..#en
1df0: 64 69 66 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c  dif....  n = sql
1e00: 69 74 65 33 5f 70 72 65 70 61 72 65 28 64 62 2c  ite3_prepare(db,
1e10: 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70 70   sql, nbytes, pp
1e20: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a  stmt, pztail);..
1e30: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
1e40: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20  TEROP_DEBUG) && 
1e50: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26  (INTEROP_DEBUG &
1e60: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50   INTEROP_DEBUG_P
1e70: 52 45 50 41 52 45 29 0d 0a 20 20 73 71 6c 69 74  REPARE)..  sqlit
1e80: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22  e3InteropDebug("
1e90: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f  sqlite3_prepare_
1ea0: 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74  interop(): sqlit
1eb0: 65 33 5f 70 72 65 70 61 72 65 28 25 70 2c 20 5c  e3_prepare(%p, \
1ec0: 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72  "%s\", %d, %p) r
1ed0: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20  eturned %d.\n", 
1ee0: 64 62 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c  db, sql, nbytes,
1ef0: 20 70 70 73 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65   ppstmt, n);..#e
1f00: 6e 64 69 66 0d 0a 0d 0a 20 20 2a 70 6c 65 6e 20  ndif....  *plen 
1f10: 3d 20 28 2a 70 7a 74 61 69 6c 20 21 3d 20 30 29  = (*pztail != 0)
1f20: 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 74 61 69   ? strlen(*pztai
1f30: 6c 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74  l) : 0;....  ret
1f40: 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c  urn n;..}....SQL
1f50: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41  ITE_API int WINA
1f60: 50 49 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61  PI sqlite3_prepa
1f70: 72 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c  re16_interop(sql
1f80: 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20  ite3 *db, const 
1f90: 76 6f 69 64 20 2a 73 71 6c 2c 20 69 6e 74 20 6e  void *sql, int n
1fa0: 63 68 61 72 73 2c 20 73 71 6c 69 74 65 33 5f 73  chars, sqlite3_s
1fb0: 74 6d 74 20 2a 2a 70 70 73 74 6d 74 2c 20 63 6f  tmt **ppstmt, co
1fc0: 6e 73 74 20 76 6f 69 64 20 2a 2a 70 7a 74 61 69  nst void **pztai
1fd0: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
1fe0: 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 23 69  ..  int n;....#i
1ff0: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f  f defined(INTERO
2000: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54  P_DEBUG) && (INT
2010: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54  EROP_DEBUG & INT
2020: 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41  EROP_DEBUG_PREPA
2030: 52 45 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33  RE16)..  sqlite3
2040: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71  InteropDebug("sq
2050: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e  lite3_prepare_in
2060: 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67  terop(): calling
2070: 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65   sqlite3_prepare
2080: 31 36 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20 25  16(%p, \"%s\", %
2090: 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62  d, %p)...\n", db
20a0: 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73 2c 20 70  , sql, nchars, p
20b0: 70 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d  pstmt);..#endif.
20c0: 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  ...  n = sqlite3
20d0: 5f 70 72 65 70 61 72 65 31 36 28 64 62 2c 20 73  _prepare16(db, s
20e0: 71 6c 2c 20 6e 63 68 61 72 73 20 2a 20 73 69 7a  ql, nchars * siz
20f0: 65 6f 66 28 77 63 68 61 72 5f 74 29 2c 20 70 70  eof(wchar_t), pp
2100: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a  stmt, pztail);..
2110: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e  ..#if defined(IN
2120: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20  TEROP_DEBUG) && 
2130: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26  (INTEROP_DEBUG &
2140: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50   INTEROP_DEBUG_P
2150: 52 45 50 41 52 45 31 36 29 0d 0a 20 20 73 71 6c  REPARE16)..  sql
2160: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67  ite3InteropDebug
2170: 28 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72  ("sqlite3_prepar
2180: 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c  e_interop(): sql
2190: 69 74 65 33 5f 70 72 65 70 61 72 65 31 36 28 25  ite3_prepare16(%
21a0: 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25  p, \"%s\", %d, %
21b0: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c  p) returned %d.\
21c0: 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 63 68  n", db, sql, nch
21d0: 61 72 73 2c 20 70 70 73 74 6d 74 2c 20 6e 29 3b  ars, ppstmt, n);
21e0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 2a 70  ..#endif....  *p
21f0: 6c 65 6e 20 3d 20 28 2a 70 7a 74 61 69 6c 20 21  len = (*pztail !
2200: 3d 20 30 29 20 3f 20 77 63 73 6c 65 6e 28 28 77  = 0) ? wcslen((w
2210: 63 68 61 72 5f 74 20 2a 29 2a 70 7a 74 61 69 6c  char_t *)*pztail
2220: 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72  ) * sizeof(wchar
2230: 5f 74 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65  _t) : 0;....  re
2240: 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51  turn n;..}....SQ
2250: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e  LITE_API int WIN
2260: 41 50 49 20 73 71 6c 69 74 65 33 5f 62 69 6e 64  API sqlite3_bind
2270: 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28  _double_interop(
2280: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
2290: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f  mt, int iCol, do
22a0: 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 09  uble *val)..{...
22b0: 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62  return sqlite3_b
22c0: 69 6e 64 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c  ind_double(stmt,
22d0: 69 43 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a  iCol,*val);..}..
22e0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74  ..SQLITE_API int
22f0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
2300: 62 69 6e 64 5f 69 6e 74 36 34 5f 69 6e 74 65 72  bind_int64_inter
2310: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
2320: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
2330: 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76   sqlite_int64 *v
2340: 61 6c 29 0d 0a 7b 0d 0a 09 72 65 74 75 72 6e 20  al)..{...return 
2350: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 69 6e 74  sqlite3_bind_int
2360: 36 34 28 73 74 6d 74 2c 69 43 6f 6c 2c 2a 76 61  64(stmt,iCol,*va
2370: 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  l);..}....SQLITE
2380: 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20  _API const char 
2390: 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  * WINAPI sqlite3
23a0: 5f 62 69 6e 64 5f 70 61 72 61 6d 65 74 65 72 5f  _bind_parameter_
23b0: 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c  name_interop(sql
23c0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c  ite3_stmt *stmt,
23d0: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a   int iCol, int *
23e0: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73  plen)..{..  cons
23f0: 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73  t char *pval = s
2400: 71 6c 69 74 65 33 5f 62 69 6e 64 5f 70 61 72 61  qlite3_bind_para
2410: 6d 65 74 65 72 5f 6e 61 6d 65 28 73 74 6d 74 2c  meter_name(stmt,
2420: 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e   iCol);..  *plen
2430: 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f   = (pval != 0) ?
2440: 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20   strlen(pval) : 
2450: 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61  0;..  return pva
2460: 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f  l;..}....SQLITE_
2470: 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  API const char *
2480: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f   WINAPI sqlite3_
2490: 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 5f 69 6e 74 65  column_name_inte
24a0: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74  rop(sqlite3_stmt
24b0: 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c   *stmt, int iCol
24c0: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d  , int *plen)..{.
24d0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70  .  const char *p
24e0: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  val = sqlite3_co
24f0: 6c 75 6d 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c 20  lumn_name(stmt, 
2500: 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20  iCol);..  *plen 
2510: 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20  = (pval != 0) ? 
2520: 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30  strlen(pval) : 0
2530: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c  ;..  return pval
2540: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
2550: 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20  PI const void * 
2560: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63  WINAPI sqlite3_c
2570: 6f 6c 75 6d 6e 5f 6e 61 6d 65 31 36 5f 69 6e 74  olumn_name16_int
2580: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d  erop(sqlite3_stm
2590: 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f  t *stmt, int iCo
25a0: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
25b0: 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a  ..  const void *
25c0: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63  pval = sqlite3_c
25d0: 6f 6c 75 6d 6e 5f 6e 61 6d 65 31 36 28 73 74 6d  olumn_name16(stm
25e0: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c  t, iCol);..  *pl
25f0: 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29  en = (pval != 0)
2600: 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72   ? wcslen((wchar
2610: 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a  _t *)pval) * siz
2620: 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30  eof(wchar_t) : 0
2630: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c  ;..  return pval
2640: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41  ;..}....SQLITE_A
2650: 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20  PI const char * 
2660: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63  WINAPI sqlite3_c
2670: 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65 5f 69  olumn_decltype_i
2680: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73  nterop(sqlite3_s
2690: 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69  tmt *stmt, int i
26a0: 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d  Col, int *plen).
26b0: 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  .{..  const char
26c0: 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33   *pval = sqlite3
26d0: 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65  _column_decltype
26e0: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20  (stmt, iCol);.. 
26f0: 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21   *plen = (pval !
2700: 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76  = 0) ? strlen(pv
2710: 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75  al) : 0;..  retu
2720: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn pval;..}....S
2730: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
2740: 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71  void * WINAPI sq
2750: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63  lite3_column_dec
2760: 6c 74 79 70 65 31 36 5f 69 6e 74 65 72 6f 70 28  ltype16_interop(
2770: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
2780: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
2790: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
27a0: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20  onst void *pval 
27b0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
27c0: 5f 64 65 63 6c 74 79 70 65 31 36 28 73 74 6d 74  _decltype16(stmt
27d0: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65  , iCol);..  *ple
27e0: 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20  n = (pval != 0) 
27f0: 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f  ? wcslen((wchar_
2800: 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65  t *)pval) * size
2810: 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b  of(wchar_t) : 0;
2820: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b  ..  return pval;
2830: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
2840: 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71  I void WINAPI sq
2850: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75  lite3_column_dou
2860: 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69  ble_interop(sqli
2870: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20  te3_stmt *stmt, 
2880: 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c 65  int iCol, double
2890: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 09 2a 76 61 6c   *val)..{...*val
28a0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d   = sqlite3_colum
28b0: 6e 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69 43  n_double(stmt,iC
28c0: 6f 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  ol);..}....SQLIT
28d0: 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50  E_API void WINAP
28e0: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  I sqlite3_column
28f0: 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73  _int64_interop(s
2900: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d  qlite3_stmt *stm
2910: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 73 71 6c  t, int iCol, sql
2920: 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d  ite_int64 *val).
2930: 0a 7b 0d 0a 09 2a 76 61 6c 20 3d 20 73 71 6c 69  .{...*val = sqli
2940: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34  te3_column_int64
2950: 28 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d  (stmt,iCol);..}.
2960: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f  ...SQLITE_API co
2970: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
2980: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  r * WINAPI sqlit
2990: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 5f 69  e3_column_text_i
29a0: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73  nterop(sqlite3_s
29b0: 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69  tmt *stmt, int i
29c0: 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d  Col, int *plen).
29d0: 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69  .{..  const unsi
29e0: 67 6e 65 64 20 63 68 61 72 20 2a 70 76 61 6c 20  gned char *pval 
29f0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
2a00: 5f 74 65 78 74 28 73 74 6d 74 2c 20 69 43 6f 6c  _text(stmt, iCol
2a10: 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70  );..  *plen = (p
2a20: 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 74 72 6c  val != 0) ? strl
2a30: 65 6e 28 28 63 68 61 72 20 2a 29 70 76 61 6c 29  en((char *)pval)
2a40: 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20   : 0;..  return 
2a50: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  pval;..}....SQLI
2a60: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69  TE_API const voi
2a70: 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  d * WINAPI sqlit
2a80: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 31 36  e3_column_text16
2a90: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33  _interop(sqlite3
2aa0: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74  _stmt *stmt, int
2ab0: 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e   iCol, int *plen
2ac0: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f  )..{..  const vo
2ad0: 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74  id *pval = sqlit
2ae0: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 31 36  e3_column_text16
2af0: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20  (stmt, iCol);.. 
2b00: 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21   *plen = (pval !
2b10: 3d 20 30 29 20 3f 20 77 63 73 6c 65 6e 28 28 77  = 0) ? wcslen((w
2b20: 63 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a  char_t *)pval) *
2b30: 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29   sizeof(wchar_t)
2b40: 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70  : 0;..  return p
2b50: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  val;..}....SQLIT
2b60: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49  E_API int WINAPI
2b70: 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a   sqlite3_finaliz
2b80: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65  e_interop(sqlite
2b90: 33 5f 73 74 6d 74 20 2a 73 74 6d 74 29 0d 0a 7b  3_stmt *stmt)..{
2ba0: 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 23 69  ..  int ret;..#i
2bb0: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e  f SQLITE_VERSION
2bc0: 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 37 30  _NUMBER >= 30070
2bd0: 31 34 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65  14....#if define
2be0: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29  d(INTEROP_DEBUG)
2bf0: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42   && (INTEROP_DEB
2c00: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42  UG & INTEROP_DEB
2c10: 55 47 5f 46 49 4e 41 4c 49 5a 45 29 0d 0a 20 20  UG_FINALIZE)..  
2c20: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65  sqlite3InteropDe
2c30: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 66 69 6e  bug("sqlite3_fin
2c40: 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 28 29 3a  alize_interop():
2c50: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33   calling sqlite3
2c60: 5f 66 69 6e 61 6c 69 7a 65 28 25 70 29 2e 2e 2e  _finalize(%p)...
2c70: 5c 6e 22 2c 20 73 74 6d 74 29 3b 0d 0a 23 65 6e  \n", stmt);..#en
2c80: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73  dif....  ret = s
2c90: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28  qlite3_finalize(
2ca0: 73 74 6d 74 29 3b 0d 0a 0d 0a 23 69 66 20 64 65  stmt);....#if de
2cb0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45  fined(INTEROP_DE
2cc0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50  BUG) && (INTEROP
2cd0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50  _DEBUG & INTEROP
2ce0: 5f 44 45 42 55 47 5f 46 49 4e 41 4c 49 5a 45 29  _DEBUG_FINALIZE)
2cf0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
2d00: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
2d10: 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f  _finalize_intero
2d20: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 66 69 6e  p(): sqlite3_fin
2d30: 61 6c 69 7a 65 28 25 70 29 20 72 65 74 75 72 6e  alize(%p) return
2d40: 65 64 20 25 64 2e 5c 6e 22 2c 20 73 74 6d 74 2c  ed %d.\n", stmt,
2d50: 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a   ret);..#endif..
2d60: 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d  ..  return ret;.
2d70: 0a 23 65 6c 73 65 0d 0a 20 20 56 64 62 65 20 2a  .#else..  Vdbe *
2d80: 70 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20  p;..  int ret = 
2d90: 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20  SQLITE_OK;....  
2da0: 70 20 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74  p = (Vdbe *)stmt
2db0: 3b 0d 0a 20 20 69 66 20 28 70 29 0d 0a 20 20 7b  ;..  if (p)..  {
2dc0: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 20 2a 64  ..    sqlite3 *d
2dd0: 62 20 3d 20 70 2d 3e 64 62 3b 0d 0a 0d 0a 20 20  b = p->db;....  
2de0: 20 20 69 66 20 28 64 62 20 21 3d 20 4e 55 4c 4c    if (db != NULL
2df0: 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  )..      sqlite3
2e00: 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d  _mutex_enter(db-
2e10: 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 20 20  >mutex);....    
2e20: 69 66 20 28 28 70 2d 3e 6d 61 67 69 63 20 3d 3d  if ((p->magic ==
2e30: 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 45 41 44   VDBE_MAGIC_DEAD
2e40: 29 20 26 26 20 28 64 62 20 3d 3d 20 4e 55 4c 4c  ) && (db == NULL
2e50: 29 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20  ))..    {..     
2e60: 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 5f 69   sqlite3DbFree_i
2e70: 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b 0d 0a  nterop(db, p);..
2e80: 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d      }..    else.
2e90: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65  .    {..      re
2ea0: 74 20 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61  t = sqlite3_fina
2eb0: 6c 69 7a 65 28 73 74 6d 74 29 3b 0d 0a 20 20 20  lize(stmt);..   
2ec0: 20 7d 0d 0a 0d 0a 20 20 20 20 69 66 20 28 64 62   }....    if (db
2ed0: 20 21 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 20   != NULL)..     
2ee0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c   sqlite3_mutex_l
2ef0: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b  eave(db->mutex);
2f00: 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 65 74 75 72  ..  }....  retur
2f10: 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a  n ret;..#endif..
2f20: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
2f30: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
2f40: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70  e3_reset_interop
2f50: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73  (sqlite3_stmt *s
2f60: 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72  tmt)..{..  int r
2f70: 65 74 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f  et;..#if SQLITE_
2f80: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e  VERSION_NUMBER >
2f90: 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 69 66  = 3007014....#if
2fa0: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50   defined(INTEROP
2fb0: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45  _DEBUG) && (INTE
2fc0: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45  ROP_DEBUG & INTE
2fd0: 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 54 29  ROP_DEBUG_RESET)
2fe0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72  ..  sqlite3Inter
2ff0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33  opDebug("sqlite3
3000: 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70 28 29  _reset_interop()
3010: 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65  : calling sqlite
3020: 33 5f 72 65 73 65 74 28 25 70 29 2e 2e 2e 5c 6e  3_reset(%p)...\n
3030: 22 2c 20 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69  ", stmt);..#endi
3040: 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c  f....  ret = sql
3050: 69 74 65 33 5f 72 65 73 65 74 28 73 74 6d 74 29  ite3_reset(stmt)
3060: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64  ;....#if defined
3070: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20  (INTEROP_DEBUG) 
3080: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55  && (INTEROP_DEBU
3090: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55  G & INTEROP_DEBU
30a0: 47 5f 52 45 53 45 54 29 0d 0a 20 20 73 71 6c 69  G_RESET)..  sqli
30b0: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28  te3InteropDebug(
30c0: 22 73 71 6c 69 74 65 33 5f 72 65 73 65 74 5f 69  "sqlite3_reset_i
30d0: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65  nterop(): sqlite
30e0: 33 5f 72 65 73 65 74 28 25 70 29 20 72 65 74 75  3_reset(%p) retu
30f0: 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 73 74 6d  rned %d.\n", stm
3100: 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66  t, ret);..#endif
3110: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74  ....  return ret
3120: 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 28  ;..#else..  if (
3130: 28 28 56 64 62 65 20 2a 29 73 74 6d 74 29 2d 3e  ((Vdbe *)stmt)->
3140: 6d 61 67 69 63 20 3d 3d 20 56 44 42 45 5f 4d 41  magic == VDBE_MA
3150: 47 49 43 5f 44 45 41 44 29 20 72 65 74 75 72 6e  GIC_DEAD) return
3160: 20 53 51 4c 49 54 45 5f 53 43 48 45 4d 41 3b 0d   SQLITE_SCHEMA;.
3170: 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33  .  ret = sqlite3
3180: 5f 72 65 73 65 74 28 73 74 6d 74 29 3b 0d 0a 20  _reset(stmt);.. 
3190: 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65   return ret;..#e
31a0: 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54  ndif..}....SQLIT
31b0: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49  E_API int WINAPI
31c0: 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f   sqlite3_create_
31d0: 66 75 6e 63 74 69 6f 6e 5f 69 6e 74 65 72 6f 70  function_interop
31e0: 28 73 71 6c 69 74 65 33 20 2a 70 73 71 6c 2c 20  (sqlite3 *psql, 
31f0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 75 6e  const char *zFun
3200: 63 74 69 6f 6e 4e 61 6d 65 2c 20 69 6e 74 20 6e  ctionName, int n
3210: 41 72 67 2c 20 69 6e 74 20 65 54 65 78 74 52 65  Arg, int eTextRe
3220: 70 2c 20 76 6f 69 64 20 2a 70 76 55 73 65 72 2c  p, void *pvUser,
3230: 20 53 51 4c 49 54 45 55 53 45 52 46 55 4e 43 20   SQLITEUSERFUNC 
3240: 66 75 6e 63 2c 20 53 51 4c 49 54 45 55 53 45 52  func, SQLITEUSER
3250: 46 55 4e 43 20 66 75 6e 63 73 74 65 70 2c 20 53  FUNC funcstep, S
3260: 51 4c 49 54 45 46 55 4e 43 46 49 4e 41 4c 20 66  QLITEFUNCFINAL f
3270: 75 6e 63 66 69 6e 61 6c 2c 20 69 6e 74 20 6e 65  uncfinal, int ne
3280: 65 64 43 6f 6c 6c 53 65 71 29 0d 0a 7b 0d 0a 20  edCollSeq)..{.. 
3290: 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 69 66 20   int n;....  if 
32a0: 28 65 54 65 78 74 52 65 70 20 3d 3d 20 53 51 4c  (eTextRep == SQL
32b0: 49 54 45 5f 55 54 46 31 36 29 0d 0a 20 20 20 20  ITE_UTF16)..    
32c0: 65 54 65 78 74 52 65 70 20 3d 20 53 51 4c 49 54  eTextRep = SQLIT
32d0: 45 5f 55 54 46 31 36 4e 41 54 49 56 45 3b 0d 0a  E_UTF16NATIVE;..
32e0: 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ..  n = sqlite3_
32f0: 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28  create_function(
3300: 70 73 71 6c 2c 20 7a 46 75 6e 63 74 69 6f 6e 4e  psql, zFunctionN
3310: 61 6d 65 2c 20 6e 41 72 67 2c 20 65 54 65 78 74  ame, nArg, eText
3320: 52 65 70 2c 20 30 2c 20 66 75 6e 63 2c 20 66 75  Rep, 0, func, fu
3330: 6e 63 73 74 65 70 2c 20 66 75 6e 63 66 69 6e 61  ncstep, funcfina
3340: 6c 29 3b 0d 0a 20 20 69 66 20 28 6e 20 3d 3d 20  l);..  if (n == 
3350: 53 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20 20 7b 0d  SQLITE_OK)..  {.
3360: 0a 20 20 20 20 69 66 20 28 6e 65 65 64 43 6f 6c  .    if (needCol
3370: 6c 53 65 71 29 0d 0a 20 20 20 20 7b 0d 0a 20 20  lSeq)..    {..  
3380: 20 20 20 20 46 75 6e 63 44 65 66 20 2a 70 46 75      FuncDef *pFu
3390: 6e 63 20 3d 20 73 71 6c 69 74 65 33 46 69 6e 64  nc = sqlite3Find
33a0: 46 75 6e 63 74 69 6f 6e 28 70 73 71 6c 2c 20 7a  Function(psql, z
33b0: 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 73 74  FunctionName, st
33c0: 72 6c 65 6e 28 7a 46 75 6e 63 74 69 6f 6e 4e 61  rlen(zFunctionNa
33d0: 6d 65 29 2c 20 6e 41 72 67 2c 20 65 54 65 78 74  me), nArg, eText
33e0: 52 65 70 2c 20 30 29 3b 0d 0a 20 20 20 20 20 20  Rep, 0);..      
33f0: 69 66 28 20 70 46 75 6e 63 20 29 0d 0a 20 20 20  if( pFunc )..   
3400: 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 70 46     {..        pF
3410: 75 6e 63 2d 3e 66 6c 61 67 73 20 7c 3d 20 53 51  unc->flags |= SQ
3420: 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f  LITE_FUNC_NEEDCO
3430: 4c 4c 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20  LL;..      }..  
3440: 20 20 7d 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 65    }..  }....  re
3450: 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51  turn n;..}....SQ
3460: 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49  LITE_API void WI
3470: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c  NAPI sqlite3_val
3480: 75 65 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f  ue_double_intero
3490: 70 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20  p(sqlite3_value 
34a0: 2a 70 76 61 6c 2c 20 64 6f 75 62 6c 65 20 2a 76  *pval, double *v
34b0: 61 6c 29 0d 0a 7b 0d 0a 20 20 2a 76 61 6c 20 3d  al)..{..  *val =
34c0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64   sqlite3_value_d
34d0: 6f 75 62 6c 65 28 70 76 61 6c 29 3b 0d 0a 7d 0d  ouble(pval);..}.
34e0: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f  ...SQLITE_API vo
34f0: 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65  id WINAPI sqlite
3500: 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 5f 69 6e  3_value_int64_in
3510: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 76 61  terop(sqlite3_va
3520: 6c 75 65 20 2a 70 76 61 6c 2c 20 73 71 6c 69 74  lue *pval, sqlit
3530: 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a 7b  e_int64 *val)..{
3540: 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74  ..  *val = sqlit
3550: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 70  e3_value_int64(p
3560: 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  val);..}....SQLI
3570: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 75 6e 73  TE_API const uns
3580: 69 67 6e 65 64 20 63 68 61 72 20 2a 20 57 49 4e  igned char * WIN
3590: 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  API sqlite3_valu
35a0: 65 5f 74 65 78 74 5f 69 6e 74 65 72 6f 70 28 73  e_text_interop(s
35b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 76 61  qlite3_value *va
35c0: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b  l, int *plen)..{
35d0: 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  ..  const unsign
35e0: 65 64 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20  ed char *pval = 
35f0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
3600: 78 74 28 76 61 6c 29 3b 0d 0a 20 20 2a 70 6c 65  xt(val);..  *ple
3610: 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20  n = (pval != 0) 
3620: 3f 20 73 74 72 6c 65 6e 28 28 63 68 61 72 20 2a  ? strlen((char *
3630: 29 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72  )pval) : 0;..  r
3640: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a  eturn pval;..}..
3650: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e  ..SQLITE_API con
3660: 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49  st void * WINAPI
3670: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
3680: 65 78 74 31 36 5f 69 6e 74 65 72 6f 70 28 73 71  ext16_interop(sq
3690: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 76 61 6c  lite3_value *val
36a0: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d  , int *plen)..{.
36b0: 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70  .  const void *p
36c0: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  val = sqlite3_va
36d0: 6c 75 65 5f 74 65 78 74 31 36 28 76 61 6c 29 3b  lue_text16(val);
36e0: 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61  ..  *plen = (pva
36f0: 6c 20 21 3d 20 30 29 20 3f 20 77 63 73 6c 65 6e  l != 0) ? wcslen
3700: 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c  ((wchar_t *)pval
3710: 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72  ) * sizeof(wchar
3720: 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75  _t) : 0;..  retu
3730: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn pval;..}....S
3740: 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57  QLITE_API void W
3750: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 72 65  INAPI sqlite3_re
3760: 73 75 6c 74 5f 64 6f 75 62 6c 65 5f 69 6e 74 65  sult_double_inte
3770: 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  rop(sqlite3_cont
3780: 65 78 74 20 2a 70 63 74 78 2c 20 64 6f 75 62 6c  ext *pctx, doubl
3790: 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 73 71  e *val)..{..  sq
37a0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75  lite3_result_dou
37b0: 62 6c 65 28 70 63 74 78 2c 20 2a 76 61 6c 29 3b  ble(pctx, *val);
37c0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50  ..}....SQLITE_AP
37d0: 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71  I void WINAPI sq
37e0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
37f0: 36 34 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74  64_interop(sqlit
3800: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70 63 74 78  e3_context *pctx
3810: 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a  , sqlite_int64 *
3820: 76 61 6c 29 0d 0a 7b 0d 0a 20 20 73 71 6c 69 74  val)..{..  sqlit
3830: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28  e3_result_int64(
3840: 70 63 74 78 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d  pctx, *val);..}.
3850: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e  ...SQLITE_API in
3860: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  t WINAPI sqlite3
3870: 5f 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c 63 6f 6d  _context_collcom
3880: 70 61 72 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e  pare(sqlite3_con
3890: 74 65 78 74 20 2a 63 74 78 2c 20 63 6f 6e 73 74  text *ctx, const
38a0: 20 76 6f 69 64 20 2a 70 31 2c 20 69 6e 74 20 70   void *p1, int p
38b0: 31 6c 65 6e 2c 20 63 6f 6e 73 74 20 76 6f 69 64  1len, const void
38c0: 20 2a 70 32 2c 20 69 6e 74 20 70 32 6c 65 6e 29   *p2, int p2len)
38d0: 0d 0a 7b 0d 0a 20 20 69 66 20 28 28 63 74 78 2d  ..{..  if ((ctx-
38e0: 3e 70 46 75 6e 63 2d 3e 66 6c 61 67 73 20 26 20  >pFunc->flags & 
38f0: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44  SQLITE_FUNC_NEED
3900: 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 72 65 74 75  COLL) == 0) retu
3910: 72 6e 20 32 3b 0d 0a 20 20 72 65 74 75 72 6e 20  rn 2;..  return 
3920: 63 74 78 2d 3e 70 43 6f 6c 6c 2d 3e 78 43 6d 70  ctx->pColl->xCmp
3930: 28 63 74 78 2d 3e 70 43 6f 6c 6c 2d 3e 70 55 73  (ctx->pColl->pUs
3940: 65 72 2c 20 70 31 6c 65 6e 2c 20 70 31 2c 20 70  er, p1len, p1, p
3950: 32 6c 65 6e 2c 20 70 32 29 3b 0d 0a 7d 0d 0a 0d  2len, p2);..}...
3960: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73  .SQLITE_API cons
3970: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20  t char * WINAPI 
3980: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
3990: 63 6f 6c 6c 73 65 71 28 73 71 6c 69 74 65 33 5f  collseq(sqlite3_
39a0: 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c 20 69 6e  context *ctx, in
39b0: 74 20 2a 70 74 79 70 65 2c 20 69 6e 74 20 2a 65  t *ptype, int *e
39c0: 6e 63 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a  nc, int *plen)..
39d0: 7b 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43  {..  CollSeq *pC
39e0: 6f 6c 6c 20 3d 20 63 74 78 2d 3e 70 43 6f 6c 6c  oll = ctx->pColl
39f0: 3b 0d 0a 20 20 2a 70 74 79 70 65 20 3d 20 30 3b  ;..  *ptype = 0;
3a00: 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 30 3b 0d 0a  ..  *plen = 0;..
3a10: 20 20 2a 65 6e 63 20 3d 20 30 3b 0d 0a 0d 0a 20    *enc = 0;.... 
3a20: 20 69 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63   if ((ctx->pFunc
3a30: 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45  ->flags & SQLITE
3a40: 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20  _FUNC_NEEDCOLL) 
3a50: 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 4e 55 4c  == 0) return NUL
3a60: 4c 3b 0d 0a 0d 0a 20 20 69 66 20 28 70 43 6f 6c  L;....  if (pCol
3a70: 6c 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 2a 65 6e  l)..  {..    *en
3a80: 63 20 3d 20 70 43 6f 6c 6c 2d 3e 65 6e 63 3b 0d  c = pColl->enc;.
3a90: 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53  .#if SQLITE_VERS
3aa0: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 30 30  ION_NUMBER < 300
3ab0: 37 30 31 30 0d 0a 20 20 20 20 2a 70 74 79 70 65  7010..    *ptype
3ac0: 20 3d 20 70 43 6f 6c 6c 2d 3e 74 79 70 65 3b 0d   = pColl->type;.
3ad0: 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 2a 70 6c  .#endif..    *pl
3ae0: 65 6e 20 3d 20 28 70 43 6f 6c 6c 2d 3e 7a 4e 61  en = (pColl->zNa
3af0: 6d 65 20 21 3d 20 30 29 20 3f 20 73 74 72 6c 65  me != 0) ? strle
3b00: 6e 28 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65 29 20  n(pColl->zName) 
3b10: 3a 20 30 3b 0d 0a 0d 0a 20 20 20 20 72 65 74 75  : 0;....    retu
3b20: 72 6e 20 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65 3b  rn pColl->zName;
3b30: 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20  ..  }..  return 
3b40: 4e 55 4c 4c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49  NULL;..}....SQLI
3b50: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61  TE_API const cha
3b60: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74  r * WINAPI sqlit
3b70: 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61  e3_column_databa
3b80: 73 65 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28  se_name_interop(
3b90: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
3ba0: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
3bb0: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
3bc0: 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20  onst char *pval 
3bd0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
3be0: 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d 65 28 73  _database_name(s
3bf0: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a  tmt, iCol);..  *
3c00: 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20  plen = (pval != 
3c10: 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c  0) ? strlen(pval
3c20: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e  ) : 0;..  return
3c30: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c   pval;..}....SQL
3c40: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f  ITE_API const vo
3c50: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69  id * WINAPI sqli
3c60: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62  te3_column_datab
3c70: 61 73 65 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72  ase_name16_inter
3c80: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20  op(sqlite3_stmt 
3c90: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c  *stmt, int iCol,
3ca0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
3cb0: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76    const void *pv
3cc0: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c  al = sqlite3_col
3cd0: 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d  umn_database_nam
3ce0: 65 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b  e16(stmt, iCol);
3cf0: 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61  ..  *plen = (pva
3d00: 6c 20 21 3d 20 30 29 20 3f 20 77 63 73 6c 65 6e  l != 0) ? wcslen
3d10: 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c  ((wchar_t *)pval
3d20: 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72  ) * sizeof(wchar
3d30: 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75  _t) : 0;..  retu
3d40: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53  rn pval;..}....S
3d50: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20  QLITE_API const 
3d60: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71  char * WINAPI sq
3d70: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62  lite3_column_tab
3d80: 6c 65 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28  le_name_interop(
3d90: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74  sqlite3_stmt *st
3da0: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e  mt, int iCol, in
3db0: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63  t *plen)..{..  c
3dc0: 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20  onst char *pval 
3dd0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  = sqlite3_column
3de0: 5f 74 61 62 6c 65 5f 6e 61 6d 65 28 73 74 6d 74  _table_name(stmt
3df0: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65  , iCol);..  *ple
3e00: 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20  n = (pval != 0) 
3e10: 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a  ? strlen(pval) :
3e20: 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76   0;..  return pv
3e30: 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45  al;..}....SQLITE
3e40: 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 20  _API const void 
3e50: 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33  * WINAPI sqlite3
3e60: 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61  _column_table_na
3e70: 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c  me16_interop(sql
3e80: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c  ite3_stmt *stmt,
3e90: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a   int iCol, int *
3ea0: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73  plen)..{..  cons
3eb0: 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73  t void *pval = s
3ec0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61  qlite3_column_ta
3ed0: 62 6c 65 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c  ble_name16(stmt,
3ee0: 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e   iCol);..  *plen
3ef0: 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f   = (pval != 0) ?
3f00: 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74   wcslen((wchar_t
3f10: 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f   *)pval) * sizeo
3f20: 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d  f(wchar_t) : 0;.
3f30: 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d  .  return pval;.
3f40: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49  .}....SQLITE_API
3f50: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49   const char * WI
3f60: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c  NAPI sqlite3_col
3f70: 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 5f  umn_origin_name_
3f80: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f  interop(sqlite3_
3f90: 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20  stmt *stmt, int 
3fa0: 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29  iCol, int *plen)
3fb0: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61  ..{..  const cha
3fc0: 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65  r *pval = sqlite
3fd0: 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f  3_column_origin_
3fe0: 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29  name(stmt, iCol)
3ff0: 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76  ;..  *plen = (pv
4000: 61 6c 20 21 3d 20 30 29 20 3f 20 73 74 72 6c 65  al != 0) ? strle
4010: 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20  n(pval) : 0;..  
4020: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d  return pval;..}.
4030: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f  ...SQLITE_API co
4040: 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50  nst void * WINAP
4050: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e  I sqlite3_column
4060: 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 31 36 5f 69  _origin_name16_i
4070: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73  nterop(sqlite3_s
4080: 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69  tmt *stmt, int i
4090: 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d  Col, int *plen).
40a0: 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64  .{..  const void
40b0: 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33   *pval = sqlite3
40c0: 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e  _column_origin_n
40d0: 61 6d 65 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c  ame16(stmt, iCol
40e0: 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70  );..  *plen = (p
40f0: 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63 73 6c  val != 0) ? wcsl
4100: 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76  en((wchar_t *)pv
4110: 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68  al) * sizeof(wch
4120: 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65  ar_t) : 0;..  re
4130: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d  turn pval;..}...
4140: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
4150: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 74  WINAPI sqlite3_t
4160: 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d 65 74 61  able_column_meta
4170: 64 61 74 61 5f 69 6e 74 65 72 6f 70 28 73 71 6c  data_interop(sql
4180: 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20  ite3 *db, const 
4190: 63 68 61 72 20 2a 7a 44 62 4e 61 6d 65 2c 20 63  char *zDbName, c
41a0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 61 62 6c  onst char *zTabl
41b0: 65 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61  eName, const cha
41c0: 72 20 2a 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20  r *zColumnName, 
41d0: 63 68 61 72 20 2a 2a 70 7a 44 61 74 61 54 79 70  char **pzDataTyp
41e0: 65 2c 20 63 68 61 72 20 2a 2a 70 7a 43 6f 6c 6c  e, char **pzColl
41f0: 53 65 71 2c 20 69 6e 74 20 2a 70 4e 6f 74 4e 75  Seq, int *pNotNu
4200: 6c 6c 2c 20 69 6e 74 20 2a 70 50 72 69 6d 61 72  ll, int *pPrimar
4210: 79 4b 65 79 2c 20 69 6e 74 20 2a 70 41 75 74 6f  yKey, int *pAuto
4220: 69 6e 63 2c 20 69 6e 74 20 2a 70 64 74 4c 65 6e  inc, int *pdtLen
4230: 2c 20 69 6e 74 20 2a 70 63 73 4c 65 6e 29 0d 0a  , int *pcsLen)..
4240: 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 20 20 0d  {..  int n;..  .
4250: 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 74  .  n = sqlite3_t
4260: 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d 65 74 61  able_column_meta
4270: 64 61 74 61 28 64 62 2c 20 7a 44 62 4e 61 6d 65  data(db, zDbName
4280: 2c 20 7a 54 61 62 6c 65 4e 61 6d 65 2c 20 7a 43  , zTableName, zC
4290: 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 70 7a 44 61 74  olumnName, pzDat
42a0: 61 54 79 70 65 2c 20 70 7a 43 6f 6c 6c 53 65 71  aType, pzCollSeq
42b0: 2c 20 70 4e 6f 74 4e 75 6c 6c 2c 20 70 50 72 69  , pNotNull, pPri
42c0: 6d 61 72 79 4b 65 79 2c 20 70 41 75 74 6f 69 6e  maryKey, pAutoin
42d0: 63 29 3b 0d 0a 20 20 2a 70 64 74 4c 65 6e 20 3d  c);..  *pdtLen =
42e0: 20 28 2a 70 7a 44 61 74 61 54 79 70 65 20 21 3d   (*pzDataType !=
42f0: 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a   0) ? strlen(*pz
4300: 44 61 74 61 54 79 70 65 29 20 3a 20 30 3b 0d 0a  DataType) : 0;..
4310: 20 20 2a 70 63 73 4c 65 6e 20 3d 20 28 2a 70 7a    *pcsLen = (*pz
4320: 43 6f 6c 6c 53 65 71 20 21 3d 20 30 29 20 3f 20  CollSeq != 0) ? 
4330: 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c 53 65  strlen(*pzCollSe
4340: 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74  q) : 0;....  ret
4350: 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c  urn n;..}....SQL
4360: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41  ITE_API int WINA
4370: 50 49 20 73 71 6c 69 74 65 33 5f 69 6e 64 65 78  PI sqlite3_index
4380: 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f 5f 69 6e 74  _column_info_int
4390: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62  erop(sqlite3 *db
43a0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44  , const char *zD
43b0: 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  b, const char *z
43c0: 49 6e 64 65 78 4e 61 6d 65 2c 20 63 6f 6e 73 74  IndexName, const
43d0: 20 63 68 61 72 20 2a 7a 43 6f 6c 75 6d 6e 4e 61   char *zColumnNa
43e0: 6d 65 2c 20 69 6e 74 20 2a 73 6f 72 74 4f 72 64  me, int *sortOrd
43f0: 65 72 2c 20 69 6e 74 20 2a 6f 6e 45 72 72 6f 72  er, int *onError
4400: 2c 20 63 68 61 72 20 2a 2a 70 7a 43 6f 6c 6c 2c  , char **pzColl,
4410: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a   int *plen)..{..
4420: 20 20 49 6e 64 65 78 20 2a 70 49 64 78 3b 0d 0a    Index *pIdx;..
4430: 20 20 54 61 62 6c 65 20 2a 70 54 61 62 3b 0d 0a    Table *pTab;..
4440: 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 73 71    int n;....  sq
4450: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65  lite3_mutex_ente
4460: 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0a 20 20  r(db->mutex);.  
4470: 73 71 6c 69 74 65 33 42 74 72 65 65 45 6e 74 65  sqlite3BtreeEnte
4480: 72 41 6c 6c 28 64 62 29 3b 0a 0d 0a 20 20 70 49  rAll(db);...  pI
4490: 64 78 20 3d 20 73 71 6c 69 74 65 33 46 69 6e 64  dx = sqlite3Find
44a0: 49 6e 64 65 78 28 64 62 2c 20 7a 49 6e 64 65 78  Index(db, zIndex
44b0: 4e 61 6d 65 2c 20 7a 44 62 29 3b 0d 0a 0d 0a 20  Name, zDb);.... 
44c0: 20 73 71 6c 69 74 65 33 42 74 72 65 65 4c 65 61   sqlite3BtreeLea
44d0: 76 65 41 6c 6c 28 64 62 29 3b 0a 20 20 73 71 6c  veAll(db);.  sql
44e0: 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65  ite3_mutex_leave
44f0: 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0a 0d 0a 20  (db->mutex);... 
4500: 20 69 66 20 28 21 70 49 64 78 29 20 72 65 74 75   if (!pIdx) retu
4510: 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b  rn SQLITE_ERROR;
4520: 0d 0a 0d 0a 20 20 70 54 61 62 20 3d 20 70 49 64  ....  pTab = pId
4530: 78 2d 3e 70 54 61 62 6c 65 3b 0d 0a 20 20 66 6f  x->pTable;..  fo
4540: 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 70 49  r (n = 0; n < pI
4550: 64 78 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20 6e 2b 2b  dx->nColumn; n++
4560: 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 6e 74 20  )..  {..    int 
4570: 63 6e 75 6d 20 3d 20 70 49 64 78 2d 3e 61 69 43  cnum = pIdx->aiC
4580: 6f 6c 75 6d 6e 5b 6e 5d 3b 0d 0a 20 20 20 20 69  olumn[n];..    i
4590: 66 20 28 73 71 6c 69 74 65 33 53 74 72 49 43 6d  f (sqlite3StrICm
45a0: 70 28 70 54 61 62 2d 3e 61 43 6f 6c 5b 63 6e 75  p(pTab->aCol[cnu
45b0: 6d 5d 2e 7a 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d  m].zName, zColum
45c0: 6e 4e 61 6d 65 29 20 3d 3d 20 30 29 0d 0a 20 20  nName) == 0)..  
45d0: 20 20 7b 0d 0a 20 20 20 20 20 20 2a 73 6f 72 74    {..      *sort
45e0: 4f 72 64 65 72 20 3d 20 70 49 64 78 2d 3e 61 53  Order = pIdx->aS
45f0: 6f 72 74 4f 72 64 65 72 5b 6e 5d 3b 0d 0a 20 20  ortOrder[n];..  
4600: 20 20 20 20 2a 70 7a 43 6f 6c 6c 20 3d 20 70 49      *pzColl = pI
4610: 64 78 2d 3e 61 7a 43 6f 6c 6c 5b 6e 5d 3b 0d 0a  dx->azColl[n];..
4620: 20 20 20 20 20 20 2a 70 6c 65 6e 20 3d 20 73 74        *plen = st
4630: 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c 29 3b 0d 0a  rlen(*pzColl);..
4640: 20 20 20 20 20 20 2a 6f 6e 45 72 72 6f 72 20 3d        *onError =
4650: 20 70 49 64 78 2d 3e 6f 6e 45 72 72 6f 72 3b 0d   pIdx->onError;.
4660: 0a 0d 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20  ...      return 
4670: 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 20 20 20 20  SQLITE_OK;..    
4680: 7d 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e  }..  }..  return
4690: 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a   SQLITE_ERROR;..
46a0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20  }....SQLITE_API 
46b0: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74  int WINAPI sqlit
46c0: 65 33 5f 74 61 62 6c 65 5f 63 75 72 73 6f 72 28  e3_table_cursor(
46d0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 73  sqlite3_stmt *ps
46e0: 74 6d 74 2c 20 69 6e 74 20 69 44 62 2c 20 50 67  tmt, int iDb, Pg
46f0: 6e 6f 20 74 61 62 6c 65 52 6f 6f 74 50 61 67 65  no tableRootPage
4700: 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20 2a 70 20  )..{..  Vdbe *p 
4710: 3d 20 28 56 64 62 65 20 2a 29 70 73 74 6d 74 3b  = (Vdbe *)pstmt;
4720: 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  ..  sqlite3 *db 
4730: 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29 20 3f 20  = (p == NULL) ? 
4740: 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b 0d 0a 20  NULL : p->db;.. 
4750: 20 69 6e 74 20 6e 3b 0d 0a 20 20 69 6e 74 20 72   int n;..  int r
4760: 65 74 20 3d 20 2d 31 3b 0d 0a 0d 0a 20 20 73 71  et = -1;....  sq
4770: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65  lite3_mutex_ente
4780: 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20  r(db->mutex);.. 
4790: 20 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c   for (n = 0; n <
47a0: 20 70 2d 3e 6e 43 75 72 73 6f 72 20 26 26 20 70   p->nCursor && p
47b0: 2d 3e 61 70 43 73 72 5b 6e 5d 20 21 3d 20 4e 55  ->apCsr[n] != NU
47c0: 4c 4c 3b 20 6e 2b 2b 29 0d 0a 20 20 7b 0d 0a 20  LL; n++)..  {.. 
47d0: 20 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b     if (p->apCsr[
47e0: 6e 5d 2d 3e 69 73 54 61 62 6c 65 20 3d 3d 20 46  n]->isTable == F
47f0: 41 4c 53 45 29 20 63 6f 6e 74 69 6e 75 65 3b 0d  ALSE) continue;.
4800: 0a 20 20 20 20 69 66 20 28 70 2d 3e 61 70 43 73  .    if (p->apCs
4810: 72 5b 6e 5d 2d 3e 69 44 62 20 21 3d 20 69 44 62  r[n]->iDb != iDb
4820: 29 20 63 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20  ) continue;..   
4830: 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d   if (p->apCsr[n]
4840: 2d 3e 70 43 75 72 73 6f 72 2d 3e 70 67 6e 6f 52  ->pCursor->pgnoR
4850: 6f 6f 74 20 3d 3d 20 74 61 62 6c 65 52 6f 6f 74  oot == tableRoot
4860: 50 61 67 65 29 0d 0a 20 20 20 20 7b 0d 0a 20 20  Page)..    {..  
4870: 20 20 20 20 72 65 74 20 3d 20 6e 3b 0d 0a 20 20      ret = n;..  
4880: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20      break;..    
4890: 7d 0d 0a 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65  }..  }..  sqlite
48a0: 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62  3_mutex_leave(db
48b0: 2d 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 72  ->mutex);....  r
48c0: 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d  eturn ret;..}...
48d0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
48e0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63  WINAPI sqlite3_c
48f0: 75 72 73 6f 72 5f 72 6f 77 69 64 28 73 71 6c 69  ursor_rowid(sqli
4900: 74 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d 74 2c  te3_stmt *pstmt,
4910: 20 69 6e 74 20 63 75 72 73 6f 72 2c 20 73 71 6c   int cursor, sql
4920: 69 74 65 5f 69 6e 74 36 34 20 2a 70 72 6f 77 69  ite_int64 *prowi
4930: 64 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20 2a 70  d)..{..  Vdbe *p
4940: 20 3d 20 28 56 64 62 65 20 2a 29 70 73 74 6d 74   = (Vdbe *)pstmt
4950: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62  ;..  sqlite3 *db
4960: 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29 20 3f   = (p == NULL) ?
4970: 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b 0d 0a   NULL : p->db;..
4980: 20 20 56 64 62 65 43 75 72 73 6f 72 20 2a 70 43    VdbeCursor *pC
4990: 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20 53  ;..  int ret = S
49a0: 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20 73  QLITE_OK;....  s
49b0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74  qlite3_mutex_ent
49c0: 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a  er(db->mutex);..
49d0: 20 20 77 68 69 6c 65 20 28 31 29 0d 0a 20 20 7b    while (1)..  {
49e0: 0d 0a 20 20 20 20 69 66 20 28 63 75 72 73 6f 72  ..    if (cursor
49f0: 20 3c 20 30 20 7c 7c 20 63 75 72 73 6f 72 20 3e   < 0 || cursor >
4a00: 3d 20 70 2d 3e 6e 43 75 72 73 6f 72 29 0d 0a 20  = p->nCursor).. 
4a10: 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 20     {..      ret 
4a20: 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d  = SQLITE_ERROR;.
4a30: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20  .      break;.. 
4a40: 20 20 20 7d 0d 0a 20 20 20 20 69 66 20 28 70 2d     }..    if (p-
4a50: 3e 61 70 43 73 72 5b 63 75 72 73 6f 72 5d 20 3d  >apCsr[cursor] =
4a60: 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 7b 0d 0a  = NULL)..    {..
4a70: 20 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49        ret = SQLI
4a80: 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20  TE_ERROR;..     
4a90: 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a   break;..    }..
4aa0: 0d 0a 20 20 20 20 70 43 20 3d 20 70 2d 3e 61 70  ..    pC = p->ap
4ab0: 43 73 72 5b 63 75 72 73 6f 72 5d 3b 0d 0a 0d 0a  Csr[cursor];....
4ac0: 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65      ret = sqlite
4ad0: 33 56 64 62 65 43 75 72 73 6f 72 4d 6f 76 65 74  3VdbeCursorMovet
4ae0: 6f 28 70 43 29 3b 0d 0a 20 20 20 20 69 66 28 72  o(pC);..    if(r
4af0: 65 74 29 0d 0a 20 20 20 20 20 20 62 72 65 61 6b  et)..      break
4b00: 3b 0d 0a 0d 0a 20 20 20 20 69 66 28 70 43 2d 3e  ;....    if(pC->
4b10: 72 6f 77 69 64 49 73 56 61 6c 69 64 29 0d 0a 20  rowidIsValid).. 
4b20: 20 20 20 7b 0d 0a 20 20 20 20 20 20 2a 70 72 6f     {..      *pro
4b30: 77 69 64 20 3d 20 70 43 2d 3e 6c 61 73 74 52 6f  wid = pC->lastRo
4b40: 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20  wid;..    }..   
4b50: 20 65 6c 73 65 20 69 66 28 70 43 2d 3e 70 73 65   else if(pC->pse
4b60: 75 64 6f 54 61 62 6c 65 52 65 67 20 3e 20 30 29  udoTableReg > 0)
4b70: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72  ..    {..      r
4b80: 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f  et = SQLITE_ERRO
4b90: 52 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  R;..      break;
4ba0: 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c 73  ..    }..    els
4bb0: 65 20 69 66 28 70 43 2d 3e 6e 75 6c 6c 52 6f 77  e if(pC->nullRow
4bc0: 20 7c 7c 20 70 43 2d 3e 70 43 75 72 73 6f 72 3d   || pC->pCursor=
4bd0: 3d 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20  =0)..    {..    
4be0: 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45    ret = SQLITE_E
4bf0: 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 72 65  RROR;..      bre
4c00: 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20  ak;..    }..    
4c10: 65 6c 73 65 0d 0a 20 20 20 20 7b 0d 0a 20 20 20  else..    {..   
4c20: 20 20 20 69 66 20 28 70 43 2d 3e 70 43 75 72 73     if (pC->pCurs
4c30: 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20  or == NULL)..   
4c40: 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 72 65     {..        re
4c50: 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52  t = SQLITE_ERROR
4c60: 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b  ;..        break
4c70: 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 20  ;..      }..    
4c80: 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 4b 65    sqlite3BtreeKe
4c90: 79 53 69 7a 65 28 70 43 2d 3e 70 43 75 72 73 6f  ySize(pC->pCurso
4ca0: 72 2c 20 70 72 6f 77 69 64 29 3b 0d 0a 20 20 20  r, prowid);..   
4cb0: 20 20 20 2a 70 72 6f 77 69 64 20 3d 20 2a 70 72     *prowid = *pr
4cc0: 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20  owid;..    }..  
4cd0: 20 20 62 72 65 61 6b 3b 0d 0a 20 20 7d 0d 0a 20    break;..  }.. 
4ce0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c   sqlite3_mutex_l
4cf0: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b  eave(db->mutex);
4d00: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74  ....  return ret
4d10: 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 20 2f 2a 20  ;..}..#endif /* 
4d20: 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 20 2a 2f  SQLITE_OS_WIN */
4d30: 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ..../***********
4d40: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
4d50: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
4d60: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
4d70: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
4d80: 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68  **/..../*..** Th
4d90: 65 20 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45  e INTEROP_TEST_E
4da0: 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63 6b 20 6d  XTENSION block m
4db0: 75 73 74 20 62 65 20 61 74 20 74 68 65 20 65 6e  ust be at the en
4dc0: 64 20 6f 66 20 74 68 69 73 20 73 6f 75 72 63 65  d of this source
4dd0: 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63 61 75 73   file..** becaus
4de0: 65 20 69 74 20 69 6e 63 6c 75 64 65 73 20 74 68  e it includes th
4df0: 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e 68 22  e "sqlite3ext.h"
4e00: 20 66 69 6c 65 2c 20 77 68 69 63 68 20 64 65 66   file, which def
4e10: 69 6e 65 73 20 74 68 65 20 73 71 6c 69 74 65 33  ines the sqlite3
4e20: 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41 50 49 20  ..** public API 
4e30: 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 20 74  function names t
4e40: 6f 20 62 65 20 6d 61 63 72 6f 73 20 61 6e 64 20  o be macros and 
4e50: 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75 73 65  that would cause
4e60: 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a 20 61 62   the code..** ab
4e70: 6f 76 65 20 74 68 69 73 20 70 6f 69 6e 74 20 74  ove this point t
4e80: 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e 2e 0d 0a  o malfunction...
4e90: 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28  */..#if defined(
4ea0: 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45 58 54  INTEROP_TEST_EXT
4eb0: 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64  ENSION)..#includ
4ec0: 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 71 6c 69 74  e "../core/sqlit
4ed0: 65 33 65 78 74 2e 68 22 0d 0a 53 51 4c 49 54 45  e3ext.h"..SQLITE
4ee0: 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49 54 31  _EXTENSION_INIT1
4ef0: 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 65 20 69  ..../*..** The i
4f00: 6e 74 65 72 6f 70 54 65 73 74 28 29 20 53 51 4c  nteropTest() SQL
4f10: 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e   function return
4f20: 73 20 69 74 73 20 66 69 72 73 74 20 61 72 67 75  s its first argu
4f30: 6d 65 6e 74 20 6f 72 20 72 61 69 73 65 73 20 61  ment or raises a
4f40: 6e 0d 0a 2a 2a 20 65 72 72 6f 72 20 69 66 20 74  n..** error if t
4f50: 68 65 72 65 20 61 72 65 20 6e 6f 74 20 65 6e 6f  here are not eno
4f60: 75 67 68 20 61 72 67 75 6d 65 6e 74 73 2e 0d 0a  ugh arguments...
4f70: 2a 2f 0d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  */..static void 
4f80: 69 6e 74 65 72 6f 70 54 65 73 74 46 75 6e 63 28  interopTestFunc(
4f90: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ..  sqlite3_cont
4fa0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0d 0a 20  ext *context,.. 
4fb0: 20 69 6e 74 20 61 72 67 63 2c 0d 0a 20 20 73 71   int argc,..  sq
4fc0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
4fd0: 67 76 0d 0a 29 7b 0d 0a 20 20 63 6f 6e 73 74 20  gv..){..  const 
4fe0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
4ff0: 3b 0d 0a 20 20 69 66 28 20 61 72 67 63 21 3d 31  ;..  if( argc!=1
5000: 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33   ){..    sqlite3
5010: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
5020: 6e 74 65 78 74 2c 20 22 6e 65 65 64 20 65 78 61  ntext, "need exa
5030: 63 74 6c 79 20 6f 6e 65 20 61 72 67 75 6d 65 6e  ctly one argumen
5040: 74 22 2c 20 2d 31 29 3b 0d 0a 20 20 20 20 72 65  t", -1);..    re
5050: 74 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20 20 7a 20  turn;..  }..  z 
5060: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
5070: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0d 0a  text(argv[0]);..
5080: 20 20 69 66 28 20 7a 20 29 7b 0d 0a 20 20 20 20    if( z ){..    
5090: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
50a0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68  ext(context, (ch
50b0: 61 72 2a 29 7a 2c 20 2d 31 2c 20 53 51 4c 49 54  ar*)z, -1, SQLIT
50c0: 45 5f 53 54 41 54 49 43 29 3b 0d 0a 20 20 7d 65  E_STATIC);..  }e
50d0: 6c 73 65 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65  lse{..    sqlite
50e0: 33 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f  3_result_null(co
50f0: 6e 74 65 78 74 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d  ntext);..  }..}.
5100: 0a 0d 0a 2f 2a 20 53 51 4c 69 74 65 20 69 6e 76  .../* SQLite inv
5110: 6f 6b 65 73 20 74 68 69 73 20 72 6f 75 74 69 6e  okes this routin
5120: 65 20 6f 6e 63 65 20 77 68 65 6e 20 69 74 20 6c  e once when it l
5130: 6f 61 64 73 20 74 68 65 20 65 78 74 65 6e 73 69  oads the extensi
5140: 6f 6e 2e 0d 0a 2a 2a 20 43 72 65 61 74 65 20 6e  on...** Create n
5150: 65 77 20 66 75 6e 63 74 69 6f 6e 73 2c 20 63 6f  ew functions, co
5160: 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65  llating sequence
5170: 73 2c 20 61 6e 64 20 76 69 72 74 75 61 6c 20 74  s, and virtual t
5180: 61 62 6c 65 0d 0a 2a 2a 20 6d 6f 64 75 6c 65 73  able..** modules
5190: 20 68 65 72 65 2e 20 20 54 68 69 73 20 69 73 20   here.  This is 
51a0: 75 73 75 61 6c 6c 79 20 74 68 65 20 6f 6e 6c 79  usually the only
51b0: 20 65 78 70 6f 72 74 65 64 20 73 79 6d 62 6f 6c   exported symbol
51c0: 20 69 6e 0d 0a 2a 2a 20 74 68 65 20 73 68 61 72   in..** the shar
51d0: 65 64 20 6c 69 62 72 61 72 79 2e 0d 0a 2a 2f 0d  ed library...*/.
51e0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20  .SQLITE_API int 
51f0: 69 6e 74 65 72 6f 70 5f 74 65 73 74 5f 65 78 74  interop_test_ext
5200: 65 6e 73 69 6f 6e 5f 69 6e 69 74 28 0d 0a 20 20  ension_init(..  
5210: 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d 0a 20 20  sqlite3 *db,..  
5220: 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d 73 67 2c  char **pzErrMsg,
5230: 0d 0a 20 20 63 6f 6e 73 74 20 73 71 6c 69 74 65  ..  const sqlite
5240: 33 5f 61 70 69 5f 72 6f 75 74 69 6e 65 73 20 2a  3_api_routines *
5250: 70 41 70 69 0d 0a 29 7b 0d 0a 20 20 53 51 4c 49  pApi..){..  SQLI
5260: 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49  TE_EXTENSION_INI
5270: 54 32 28 70 41 70 69 29 0d 0a 20 20 72 65 74 75  T2(pApi)..  retu
5280: 72 6e 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74  rn sqlite3_creat
5290: 65 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22  e_function(db, "
52a0: 69 6e 74 65 72 6f 70 54 65 73 74 22 2c 20 2d 31  interopTest", -1
52b0: 2c 20 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c  , SQLITE_ANY, 0,
52c0: 0d 0a 20 20 20 20 20 20 69 6e 74 65 72 6f 70 54  ..      interopT
52d0: 65 73 74 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d  estFunc, 0, 0);.
52e0: 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a              .}..#endif..