0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 2a 20 41 44 *********.. * AD
0040: 4f 2e 4e 45 54 20 32 2e 30 20 44 61 74 61 20 50 O.NET 2.0 Data P
0050: 72 6f 76 69 64 65 72 20 66 6f 72 20 53 51 4c 69 rovider for SQLi
0060: 74 65 20 56 65 72 73 69 6f 6e 20 33 2e 58 0d 0a te Version 3.X..
0070: 20 2a 20 57 72 69 74 74 65 6e 20 62 79 20 52 6f * Written by Ro
0080: 62 65 72 74 20 53 69 6d 70 73 6f 6e 20 28 72 6f bert Simpson (ro
0090: 62 65 72 74 40 62 6c 61 63 6b 63 61 73 74 6c 65 bert@blackcastle
00a0: 73 6f 66 74 2e 63 6f 6d 29 0d 0a 20 2a 0d 0a 20 soft.com).. *..
00b0: 2a 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74 68 * Released to th
00c0: 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e 2c e public domain,
00d0: 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77 6e use at your own
00e0: 20 72 69 73 6b 21 0d 0a 20 2a 2a 2a 2a 2a 2a 2a risk!.. *******
00f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0100: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0110: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0120: 2a 2f 0d 0a 0d 0a 23 64 65 66 69 6e 65 20 53 51 */....#define SQ
0130: 4c 49 54 45 5f 41 50 49 20 5f 5f 64 65 63 6c 73 LITE_API __decls
0140: 70 65 63 28 64 6c 6c 65 78 70 6f 72 74 29 0d 0a pec(dllexport)..
0150: 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 63 ..#include "../c
0160: 6f 72 65 2f 73 71 6c 69 74 65 33 2e 63 22 0d 0a ore/sqlite3.c"..
0170: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
0180: 54 45 52 4f 50 5f 56 49 52 54 55 41 4c 5f 54 41 TEROP_VIRTUAL_TA
0190: 42 4c 45 29 20 26 26 20 53 51 4c 49 54 45 5f 56 BLE) && SQLITE_V
01a0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d ERSION_NUMBER >=
01b0: 20 33 30 30 34 30 30 31 0d 0a 23 69 6e 63 6c 75 3004001..#inclu
01c0: 64 65 20 22 2e 2e 2f 65 78 74 2f 76 74 73 68 69 de "../ext/vtshi
01d0: 6d 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a m.c"..#endif....
01e0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
01f0: 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e 5f 46 55 ROP_EXTENSION_FU
0200: 4e 43 54 49 4f 4e 53 29 0d 0a 23 69 6e 63 6c 75 NCTIONS)..#inclu
0210: 64 65 20 22 2e 2e 2f 63 6f 6e 74 72 69 62 2f 65 de "../contrib/e
0220: 78 74 65 6e 73 69 6f 6e 2d 66 75 6e 63 74 69 6f xtension-functio
0230: 6e 73 2e 63 22 0d 0a 65 78 74 65 72 6e 20 69 6e ns.c"..extern in
0240: 74 20 52 65 67 69 73 74 65 72 45 78 74 65 6e 73 t RegisterExtens
0250: 69 6f 6e 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c ionFunctions(sql
0260: 69 74 65 33 20 2a 64 62 29 3b 0d 0a 23 65 6e 64 ite3 *db);..#end
0270: 69 66 0d 0a 0d 0a 23 69 66 64 65 66 20 53 51 4c if....#ifdef SQL
0280: 49 54 45 5f 4f 53 5f 57 49 4e 0d 0a 23 69 66 20 ITE_OS_WIN..#if
0290: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f defined(INTEROP_
02a0: 43 4f 44 45 43 29 0d 0a 23 69 6e 63 6c 75 64 65 CODEC)..#include
02b0: 20 22 63 72 79 70 74 2e 63 22 0d 0a 23 65 6e 64 "crypt.c"..#end
02c0: 69 66 0d 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 if....#include "
02d0: 69 6e 74 65 72 6f 70 2e 68 22 0d 0a 0d 0a 23 64 interop.h"....#d
02e0: 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 efine INTEROP_DE
02f0: 42 55 47 5f 4e 4f 4e 45 20 20 20 20 20 20 20 20 BUG_NONE
0300: 20 20 20 28 30 78 30 30 30 30 29 0d 0a 23 64 65 (0x0000)..#de
0310: 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 fine INTEROP_DEB
0320: 55 47 5f 43 4c 4f 53 45 20 20 20 20 20 20 20 20 UG_CLOSE
0330: 20 20 28 30 78 30 30 30 31 29 0d 0a 23 64 65 66 (0x0001)..#def
0340: 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 ine INTEROP_DEBU
0350: 47 5f 46 49 4e 41 4c 49 5a 45 20 20 20 20 20 20 G_FINALIZE
0360: 20 28 30 78 30 30 30 32 29 0d 0a 23 64 65 66 69 (0x0002)..#defi
0370: 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ne INTEROP_DEBUG
0380: 5f 42 41 43 4b 55 50 5f 46 49 4e 49 53 48 20 20 _BACKUP_FINISH
0390: 28 30 78 30 30 30 34 29 0d 0a 23 64 65 66 69 6e (0x0004)..#defin
03a0: 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f e INTEROP_DEBUG_
03b0: 4f 50 45 4e 20 20 20 20 20 20 20 20 20 20 20 28 OPEN (
03c0: 30 78 30 30 30 38 29 0d 0a 23 64 65 66 69 6e 65 0x0008)..#define
03d0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f INTEROP_DEBUG_O
03e0: 50 45 4e 31 36 20 20 20 20 20 20 20 20 20 28 30 PEN16 (0
03f0: 78 30 30 31 30 29 0d 0a 23 64 65 66 69 6e 65 20 x0010)..#define
0400: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 INTEROP_DEBUG_PR
0410: 45 50 41 52 45 20 20 20 20 20 20 20 20 28 30 78 EPARE (0x
0420: 30 30 32 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 0020)..#define I
0430: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 NTEROP_DEBUG_PRE
0440: 50 41 52 45 31 36 20 20 20 20 20 20 28 30 78 30 PARE16 (0x0
0450: 30 34 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 040)..#define IN
0460: 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 TEROP_DEBUG_RESE
0470: 54 20 20 20 20 20 20 20 20 20 20 28 30 78 30 30 T (0x00
0480: 38 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 80)..#define INT
0490: 45 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 EROP_DEBUG_CHANG
04a0: 45 53 20 20 20 20 20 20 20 20 28 30 78 30 31 30 ES (0x010
04b0: 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 0)..#define INTE
04c0: 52 4f 50 5f 44 45 42 55 47 5f 42 52 45 41 4b 20 ROP_DEBUG_BREAK
04d0: 20 20 20 20 20 20 20 20 20 28 30 78 30 32 30 30 (0x0200
04e0: 29 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 )....#if defined
04f0: 28 5f 4d 53 43 5f 56 45 52 29 20 26 26 20 64 65 (_MSC_VER) && de
0500: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 fined(INTEROP_DE
0510: 42 55 47 29 20 26 26 20 5c 0d 0a 20 20 20 20 28 BUG) && \.. (
0520: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 INTEROP_DEBUG &
0530: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 52 INTEROP_DEBUG_BR
0540: 45 41 4b 29 0d 0a 23 64 65 66 69 6e 65 20 73 71 EAK)..#define sq
0550: 6c 69 74 65 33 49 6e 74 65 72 6f 70 42 72 65 61 lite3InteropBrea
0560: 6b 28 61 29 20 7b 20 73 71 6c 69 74 65 33 49 6e k(a) { sqlite3In
0570: 74 65 72 6f 70 44 65 62 75 67 28 22 25 73 5c 6e teropDebug("%s\n
0580: 22 2c 20 28 61 29 29 3b 20 5f 5f 64 65 62 75 67 ", (a)); __debug
0590: 62 72 65 61 6b 28 29 3b 20 7d 0d 0a 23 65 6c 73 break(); }..#els
05a0: 65 0d 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 74 e..#define sqlit
05b0: 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 61 e3InteropBreak(a
05c0: 29 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 74 79 70 )..#endif....typ
05d0: 65 64 65 66 20 76 6f 69 64 20 28 2a 53 51 4c 49 edef void (*SQLI
05e0: 54 45 55 53 45 52 46 55 4e 43 29 28 73 71 6c 69 TEUSERFUNC)(sqli
05f0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 2c 20 69 te3_context *, i
0600: 6e 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 nt, sqlite3_valu
0610: 65 20 2a 2a 29 3b 0d 0a 74 79 70 65 64 65 66 20 e **);..typedef
0620: 76 6f 69 64 20 28 2a 53 51 4c 49 54 45 46 55 4e void (*SQLITEFUN
0630: 43 46 49 4e 41 4c 29 28 73 71 6c 69 74 65 33 5f CFINAL)(sqlite3_
0640: 63 6f 6e 74 65 78 74 20 2a 29 3b 0d 0a 0d 0a 23 context *);....#
0650: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
0660: 4f 50 5f 44 45 42 55 47 29 20 7c 7c 20 64 65 66 OP_DEBUG) || def
0670: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 ined(INTEROP_LOG
0680: 29 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 )..SQLITE_PRIVAT
0690: 45 20 76 6f 69 64 20 73 71 6c 69 74 65 33 49 6e E void sqlite3In
06a0: 74 65 72 6f 70 44 65 62 75 67 28 63 6f 6e 73 74 teropDebug(const
06b0: 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 char *zFormat,
06c0: 2e 2e 2e 29 7b 0d 0a 20 20 76 61 5f 6c 69 73 74 ...){.. va_list
06d0: 20 61 70 3b 20 20 20 20 20 20 20 20 20 20 20 20 ap;
06e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
06f0: 56 61 72 61 72 67 20 6c 69 73 74 20 2a 2f 0d 0a Vararg list */..
0700: 20 20 53 74 72 41 63 63 75 6d 20 61 63 63 3b 20 StrAccum acc;
0710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0720: 20 20 20 20 20 20 2f 2a 20 53 74 72 69 6e 67 20 /* String
0730: 61 63 63 75 6d 75 6c 61 74 6f 72 20 2a 2f 0a 20 accumulator */.
0740: 20 63 68 61 72 20 7a 4d 73 67 5b 53 51 4c 49 54 char zMsg[SQLIT
0750: 45 5f 50 52 49 4e 54 5f 42 55 46 5f 53 49 5a 45 E_PRINT_BUF_SIZE
0760: 2a 33 5d 3b 20 2f 2a 20 43 6f 6d 70 6c 65 74 65 *3]; /* Complete
0770: 20 6c 6f 67 20 6d 65 73 73 61 67 65 20 2a 2f 0d log message */.
0780: 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 . va_start(ap,
0790: 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 73 71 6c 69 zFormat);. sqli
07a0: 74 65 33 53 74 72 41 63 63 75 6d 49 6e 69 74 28 te3StrAccumInit(
07b0: 26 61 63 63 2c 20 7a 4d 73 67 2c 20 73 69 7a 65 &acc, zMsg, size
07c0: 6f 66 28 7a 4d 73 67 29 2c 20 30 29 3b 0a 20 20 of(zMsg), 0);.
07d0: 61 63 63 2e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 acc.useMalloc =
07e0: 30 3b 0a 20 20 73 71 6c 69 74 65 33 56 58 50 72 0;. sqlite3VXPr
07f0: 69 6e 74 66 28 26 61 63 63 2c 20 30 2c 20 7a 46 intf(&acc, 0, zF
0800: 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 76 61 ormat, ap);. va
0810: 5f 65 6e 64 28 61 70 29 3b 0a 23 69 66 20 53 51 _end(ap);.#if SQ
0820: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d LITE_VERSION_NUM
0830: 42 45 52 20 3e 3d 20 33 30 30 37 30 31 33 0d 0a BER >= 3007013..
0840: 20 20 73 71 6c 69 74 65 33 5f 77 69 6e 33 32 5f sqlite3_win32_
0850: 77 72 69 74 65 5f 64 65 62 75 67 28 73 71 6c 69 write_debug(sqli
0860: 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73 te3StrAccumFinis
0870: 68 28 26 61 63 63 29 2c 20 2d 31 29 3b 0a 23 65 h(&acc), -1);.#e
0880: 6c 69 66 20 64 65 66 69 6e 65 64 28 53 51 4c 49 lif defined(SQLI
0890: 54 45 5f 57 49 4e 33 32 5f 48 41 53 5f 41 4e 53 TE_WIN32_HAS_ANS
08a0: 49 29 0a 20 20 4f 75 74 70 75 74 44 65 62 75 67 I). OutputDebug
08b0: 53 74 72 69 6e 67 41 28 73 71 6c 69 74 65 33 53 StringA(sqlite3S
08c0: 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 26 61 trAccumFinish(&a
08d0: 63 63 29 29 3b 0a 23 65 6c 69 66 20 64 65 66 69 cc));.#elif defi
08e0: 6e 65 64 28 53 51 4c 49 54 45 5f 57 49 4e 33 32 ned(SQLITE_WIN32
08f0: 5f 48 41 53 5f 57 49 44 45 29 0a 20 20 7b 0a 20 _HAS_WIDE). {.
0900: 20 20 20 4c 50 57 53 54 52 20 7a 57 69 64 65 4d LPWSTR zWideM
0910: 73 67 20 3d 20 75 74 66 38 54 6f 55 6e 69 63 6f sg = utf8ToUnico
0920: 64 65 28 73 71 6c 69 74 65 33 53 74 72 41 63 63 de(sqlite3StrAcc
0930: 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b umFinish(&acc));
0940: 0a 20 20 20 20 69 66 28 20 7a 57 69 64 65 4d 73 . if( zWideMs
0950: 67 20 29 7b 0a 20 20 20 20 20 20 4f 75 74 70 75 g ){. Outpu
0960: 74 44 65 62 75 67 53 74 72 69 6e 67 57 28 7a 57 tDebugStringW(zW
0970: 69 64 65 4d 73 67 29 3b 0a 20 20 20 20 20 20 73 ideMsg);. s
0980: 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 57 69 64 qlite3_free(zWid
0990: 65 4d 73 67 29 3b 0a 20 20 20 20 7d 0a 20 20 7d eMsg);. }. }
09a0: 0a 23 65 6c 73 65 0a 20 20 66 70 72 69 6e 74 66 .#else. fprintf
09b0: 28 73 74 64 65 72 72 2c 20 22 25 73 22 2c 20 73 (stderr, "%s", s
09c0: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 qlite3StrAccumFi
09d0: 6e 69 73 68 28 26 61 63 63 29 29 3b 0a 23 65 6e nish(&acc));.#en
09e0: 64 69 66 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d dif.}..#endif...
09f0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
0a00: 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c 49 54 EROP_LOG)..SQLIT
0a10: 45 5f 50 52 49 56 41 54 45 20 69 6e 74 20 6c 6f E_PRIVATE int lo
0a20: 67 43 6f 6e 66 69 67 75 72 65 64 20 3d 20 30 3b gConfigured = 0;
0a30: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 ....SQLITE_PRIVA
0a40: 54 45 20 76 6f 69 64 20 73 71 6c 69 74 65 33 49 TE void sqlite3I
0a50: 6e 74 65 72 6f 70 4c 6f 67 43 61 6c 6c 62 61 63 nteropLogCallbac
0a60: 6b 28 76 6f 69 64 20 2a 70 41 72 67 2c 20 69 6e k(void *pArg, in
0a70: 74 20 69 43 6f 64 65 2c 20 63 6f 6e 73 74 20 63 t iCode, const c
0a80: 68 61 72 20 2a 7a 4d 73 67 29 7b 0d 0a 20 20 73 har *zMsg){.. s
0a90: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 qlite3InteropDeb
0aa0: 75 67 28 22 49 4e 54 45 52 4f 50 5f 4c 4f 47 20 ug("INTEROP_LOG
0ab0: 28 25 64 29 20 25 73 5c 6e 22 2c 20 69 43 6f 64 (%d) %s\n", iCod
0ac0: 65 2c 20 7a 4d 73 67 29 3b 0d 0a 7d 0d 0a 23 65 e, zMsg);..}..#e
0ad0: 6e 64 69 66 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 ndif....SQLITE_A
0ae0: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 PI int WINAPI sq
0af0: 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 5f 73 69 7a lite3_malloc_siz
0b00: 65 5f 69 6e 74 65 72 6f 70 28 76 6f 69 64 20 2a e_interop(void *
0b10: 70 29 7b 0d 0a 20 20 72 65 74 75 72 6e 20 73 71 p){.. return sq
0b20: 6c 69 74 65 33 4d 61 6c 6c 6f 63 53 69 7a 65 28 lite3MallocSize(
0b30: 70 29 3b 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65 p);..}....#if de
0b40: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 45 fined(INTEROP_LE
0b50: 47 41 43 59 5f 43 4c 4f 53 45 29 20 7c 7c 20 53 GACY_CLOSE) || S
0b60: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 QLITE_VERSION_NU
0b70: 4d 42 45 52 20 3c 20 33 30 30 37 30 31 34 0d 0a MBER < 3007014..
0b80: 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 SQLITE_PRIVATE v
0b90: 6f 69 64 20 2a 20 73 71 6c 69 74 65 33 44 62 4d oid * sqlite3DbM
0ba0: 61 6c 6c 6f 63 5a 65 72 6f 5f 69 6e 74 65 72 6f allocZero_intero
0bb0: 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 p(sqlite3 *db, i
0bc0: 6e 74 20 6e 29 0d 0a 7b 0d 0a 20 20 76 6f 69 64 nt n)..{.. void
0bd0: 20 2a 70 3b 0d 0a 20 20 69 66 20 28 64 62 29 20 *p;.. if (db)
0be0: 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d {.. sqlite3_m
0bf0: 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d utex_enter(db->m
0c00: 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 70 utex);.. }.. p
0c10: 20 3d 20 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c = sqlite3DbMall
0c20: 6f 63 5a 65 72 6f 28 64 62 2c 6e 29 3b 0d 0a 20 ocZero(db,n);..
0c30: 20 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 if (db) {..
0c40: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 sqlite3_mutex_le
0c50: 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d ave(db->mutex);.
0c60: 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 70 . }.. return p
0c70: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 50 ;..}....SQLITE_P
0c80: 52 49 56 41 54 45 20 76 6f 69 64 20 73 71 6c 69 RIVATE void sqli
0c90: 74 65 33 44 62 46 72 65 65 5f 69 6e 74 65 72 6f te3DbFree_intero
0ca0: 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 76 p(sqlite3 *db, v
0cb0: 6f 69 64 20 2a 70 29 0d 0a 7b 0d 0a 20 20 69 66 oid *p)..{.. if
0cc0: 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71 6c (db) {.. sql
0cd0: 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72 ite3_mutex_enter
0ce0: 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 (db->mutex);..
0cf0: 7d 0d 0a 20 20 69 66 20 28 70 29 20 7b 0d 0a 20 }.. if (p) {..
0d00: 20 20 20 73 71 6c 69 74 65 33 4d 65 6d 64 65 62 sqlite3Memdeb
0d10: 75 67 53 65 74 54 79 70 65 28 70 2c 20 4d 45 4d ugSetType(p, MEM
0d20: 54 59 50 45 5f 44 42 7c 4d 45 4d 54 59 50 45 5f TYPE_DB|MEMTYPE_
0d30: 48 45 41 50 29 3b 0d 0a 20 20 7d 0d 0a 20 20 73 HEAP);.. }.. s
0d40: 71 6c 69 74 65 33 44 62 46 72 65 65 28 64 62 2c qlite3DbFree(db,
0d50: 70 29 3b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b p);.. if (db) {
0d60: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 .. sqlite3_mu
0d70: 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 tex_leave(db->mu
0d80: 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d 0a 23 tex);.. }..}..#
0d90: 65 6e 64 69 66 0d 0a 0d 0a 2f 2a 0d 0a 20 20 20 endif..../*..
0da0: 20 54 68 65 20 67 6f 61 6c 20 6f 66 20 74 68 69 The goal of thi
0db0: 73 20 76 65 72 73 69 6f 6e 20 6f 66 20 63 6c 6f s version of clo
0dc0: 73 65 20 69 73 20 64 69 66 66 65 72 65 6e 74 20 se is different
0dd0: 74 68 61 6e 20 74 68 61 74 20 6f 66 20 73 71 6c than that of sql
0de0: 69 74 65 33 5f 63 6c 6f 73 65 28 29 2c 20 61 6e ite3_close(), an
0df0: 64 20 69 73 20 64 65 73 69 67 6e 65 64 20 74 6f d is designed to
0e00: 20 6c 65 6e 64 20 69 74 73 65 6c 66 20 62 65 74 lend itself bet
0e10: 74 65 72 20 74 6f 20 2e 4e 45 54 27 73 20 6e 6f ter to .NET's no
0e20: 6e 2d 64 65 74 65 72 6d 69 6e 69 73 74 69 63 20 n-deterministic
0e30: 66 69 6e 61 6c 69 7a 65 72 73 20 61 6e 64 0d 0a finalizers and..
0e40: 20 20 20 20 74 68 65 20 47 43 20 74 68 72 65 61 the GC threa
0e50: 64 2e 20 20 53 51 4c 69 74 65 20 77 69 6c 6c 20 d. SQLite will
0e60: 6e 6f 74 20 63 6c 6f 73 65 20 61 20 64 61 74 61 not close a data
0e70: 62 61 73 65 20 69 66 20 73 74 61 74 65 6d 65 6e base if statemen
0e80: 74 73 20 61 72 65 20 6f 70 65 6e 20 6f 6e 20 69 ts are open on i
0e90: 74 20 2d 2d 20 62 75 74 20 66 6f 72 20 6f 75 72 t -- but for our
0ea0: 20 70 75 72 70 6f 73 65 73 2c 20 77 65 27 64 20 purposes, we'd
0eb0: 72 61 74 68 65 72 20 66 69 6e 61 6c 69 7a 65 20 rather finalize
0ec0: 61 6c 6c 20 61 63 74 69 76 65 20 73 74 61 74 65 all active state
0ed0: 6d 65 6e 74 73 0d 0a 20 20 20 20 61 6e 64 20 66 ments.. and f
0ee0: 6f 72 63 69 62 6c 79 20 63 6c 6f 73 65 20 74 68 orcibly close th
0ef0: 65 20 64 61 74 61 62 61 73 65 2e 20 20 54 68 65 e database. The
0f00: 20 72 65 61 73 6f 6e 20 69 73 20 73 69 6d 70 6c reason is simpl
0f10: 65 20 2d 2d 20 61 20 6c 6f 74 20 6f 66 20 70 65 e -- a lot of pe
0f20: 6f 70 6c 65 20 64 6f 6e 27 74 20 44 69 73 70 6f ople don't Dispo
0f30: 73 65 28 29 20 6f 66 20 74 68 65 69 72 20 6f 62 se() of their ob
0f40: 6a 65 63 74 73 20 63 6f 72 72 65 63 74 6c 79 20 jects correctly
0f50: 61 6e 64 20 6c 65 74 20 74 68 65 20 67 61 72 62 and let the garb
0f60: 61 67 65 20 63 6f 6c 6c 65 63 74 6f 72 0d 0a 20 age collector..
0f70: 20 20 20 64 6f 20 69 74 2e 20 20 54 68 69 73 20 do it. This
0f80: 6c 65 61 64 73 20 74 6f 20 75 6e 65 78 70 65 63 leads to unexpec
0f90: 74 65 64 20 62 65 68 61 76 69 6f 72 20 77 68 65 ted behavior whe
0fa0: 6e 20 61 20 75 73 65 72 20 74 68 69 6e 6b 73 20 n a user thinks
0fb0: 74 68 65 79 27 76 65 20 63 6c 6f 73 65 64 20 61 they've closed a
0fc0: 20 64 61 74 61 62 61 73 65 2c 20 62 75 74 20 69 database, but i
0fd0: 74 27 73 20 73 74 69 6c 6c 20 6f 70 65 6e 20 62 t's still open b
0fe0: 65 63 61 75 73 65 20 6e 6f 74 20 61 6c 6c 20 74 ecause not all t
0ff0: 68 65 20 73 74 61 74 65 6d 65 6e 74 73 20 68 61 he statements ha
1000: 76 65 0d 0a 20 20 20 20 68 69 74 20 74 68 65 20 ve.. hit the
1010: 47 43 20 79 65 74 2e 0d 0a 0d 0a 20 20 20 20 53 GC yet..... S
1020: 6f 2c 20 68 65 72 65 20 77 65 20 68 61 76 65 20 o, here we have
1030: 61 20 70 72 6f 62 6c 65 6d 20 2e 2e 2e 20 2e 4e a problem ... .N
1040: 45 54 20 68 61 73 20 61 20 70 6f 69 6e 74 65 72 ET has a pointer
1050: 20 74 6f 20 61 6e 79 20 6e 75 6d 62 65 72 20 6f to any number o
1060: 66 20 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 6f f sqlite3_stmt o
1070: 62 6a 65 63 74 73 2e 20 20 57 65 20 63 61 6e 27 bjects. We can'
1080: 74 20 63 61 6c 6c 20 73 71 6c 69 74 65 33 5f 66 t call sqlite3_f
1090: 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74 68 65 inalize() on the
10a0: 73 65 20 62 65 63 61 75 73 65 0d 0a 20 20 20 20 se because..
10b0: 74 68 65 69 72 20 6d 65 6d 6f 72 79 20 69 73 20 their memory is
10c0: 66 72 65 65 64 20 61 6e 64 20 63 61 6e 20 62 65 freed and can be
10d0: 20 75 73 65 64 20 66 6f 72 20 73 6f 6d 65 74 68 used for someth
10e0: 69 6e 67 20 65 6c 73 65 2e 20 20 54 68 65 20 47 ing else. The G
10f0: 43 20 74 68 72 65 61 64 20 63 6f 75 6c 64 20 70 C thread could p
1100: 6f 74 65 6e 74 69 61 6c 6c 79 20 74 72 79 20 61 otentially try a
1110: 6e 64 20 63 61 6c 6c 20 66 69 6e 61 6c 69 7a 65 nd call finalize
1120: 20 61 67 61 69 6e 20 6f 6e 20 74 68 65 20 73 74 again on the st
1130: 61 74 65 6d 65 6e 74 20 61 66 74 65 72 0d 0a 20 atement after..
1140: 20 20 20 74 68 61 74 20 6d 65 6d 6f 72 79 20 77 that memory w
1150: 61 73 20 64 65 61 6c 6c 6f 63 61 74 65 64 2e 20 as deallocated.
1160: 20 42 41 44 2e 20 20 53 6f 2c 20 77 68 61 74 20 BAD. So, what
1170: 77 65 20 6e 65 65 64 20 74 6f 20 64 6f 20 69 73 we need to do is
1180: 20 6d 61 6b 65 20 61 20 63 6f 70 79 20 6f 66 20 make a copy of
1190: 65 61 63 68 20 73 74 61 74 65 6d 65 6e 74 2c 20 each statement,
11a0: 61 6e 64 20 63 61 6c 6c 20 66 69 6e 61 6c 69 7a and call finaliz
11b0: 65 28 29 20 6f 6e 20 74 68 65 20 63 6f 70 79 20 e() on the copy
11c0: 2d 2d 20 73 6f 20 74 68 61 74 20 74 68 65 20 6f -- so that the o
11d0: 72 69 67 69 6e 61 6c 0d 0a 20 20 20 20 73 74 61 riginal.. sta
11e0: 74 65 6d 65 6e 74 27 73 20 6d 65 6d 6f 72 79 20 tement's memory
11f0: 69 73 20 70 72 65 73 65 72 76 65 64 2c 20 61 6e is preserved, an
1200: 64 20 6d 61 72 6b 65 64 20 61 73 20 42 41 44 2c d marked as BAD,
1210: 20 62 75 74 20 77 65 20 63 61 6e 20 73 74 69 6c but we can stil
1220: 6c 20 6d 61 6e 61 67 65 20 74 6f 20 66 69 6e 61 l manage to fina
1230: 6c 69 7a 65 20 65 76 65 72 79 74 68 69 6e 67 20 lize everything
1240: 61 6e 64 20 66 6f 72 63 69 62 6c 79 20 63 6c 6f and forcibly clo
1250: 73 65 20 74 68 65 20 64 61 74 61 62 61 73 65 2e se the database.
1260: 20 20 4c 61 74 65 72 20 77 68 65 6e 20 74 68 65 Later when the
1270: 0d 0a 20 20 20 20 47 43 20 67 65 74 73 20 61 72 .. GC gets ar
1280: 6f 75 6e 64 20 74 6f 20 63 61 6c 6c 69 6e 67 20 ound to calling
1290: 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 finalize_interop
12a0: 28 29 20 6f 6e 20 74 68 65 20 22 62 61 64 22 20 () on the "bad"
12b0: 73 74 61 74 65 6d 65 6e 74 2c 20 77 65 20 64 65 statement, we de
12c0: 74 65 63 74 20 74 68 61 74 20 61 6e 64 20 66 69 tect that and fi
12d0: 6e 69 73 68 20 64 65 61 6c 6c 6f 63 61 74 69 6e nish deallocatin
12e0: 67 20 74 68 65 20 70 6f 69 6e 74 65 72 2e 0d 0a g the pointer...
12f0: 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 */..SQLITE_API i
1300: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 nt WINAPI sqlite
1310: 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 28 3_close_interop(
1320: 73 71 6c 69 74 65 33 20 2a 64 62 29 0d 0a 7b 0d sqlite3 *db)..{.
1330: 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 23 69 66 . int ret;..#if
1340: 20 21 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f !defined(INTERO
1350: 50 5f 4c 45 47 41 43 59 5f 43 4c 4f 53 45 29 20 P_LEGACY_CLOSE)
1360: 26 26 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f && SQLITE_VERSIO
1370: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 37 N_NUMBER >= 3007
1380: 30 31 34 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 014....#if defin
1390: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ed(INTEROP_DEBUG
13a0: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 ) && (INTEROP_DE
13b0: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 BUG & INTEROP_DE
13c0: 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20 73 71 BUG_CLOSE).. sq
13d0: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 lite3InteropDebu
13e0: 67 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 g("sqlite3_close
13f0: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c _interop(): call
1400: 69 6e 67 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 ing sqlite3_clos
1410: 65 5f 76 32 28 25 70 29 2e 2e 2e 5c 6e 22 2c 20 e_v2(%p)...\n",
1420: 64 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a db);..#endif....
1430: 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f ret = sqlite3_
1440: 63 6c 6f 73 65 5f 76 32 28 64 62 29 3b 0d 0a 0d close_v2(db);...
1450: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
1460: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 EROP_DEBUG) && (
1470: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 INTEROP_DEBUG &
1480: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c INTEROP_DEBUG_CL
1490: 4f 53 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 OSE).. sqlite3I
14a0: 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c nteropDebug("sql
14b0: 69 74 65 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 ite3_close_inter
14c0: 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 63 6c op(): sqlite3_cl
14d0: 6f 73 65 5f 76 32 28 25 70 29 20 72 65 74 75 72 ose_v2(%p) retur
14e0: 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 ned %d.\n", db,
14f0: 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d ret);..#endif...
1500: 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a . return ret;..
1510: 23 65 6c 73 65 0d 0a 20 20 72 65 74 20 3d 20 73 #else.. ret = s
1520: 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 qlite3_close(db)
1530: 3b 0d 0a 0d 0a 20 20 69 66 20 28 72 65 74 20 3d ;.... if (ret =
1540: 3d 20 53 51 4c 49 54 45 5f 42 55 53 59 29 0d 0a = SQLITE_BUSY)..
1550: 20 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 {.. sqlite3
1560: 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d _mutex_enter(db-
1570: 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 20 20 >mutex);....
1580: 69 66 20 28 21 64 62 2d 3e 70 56 64 62 65 29 0d if (!db->pVdbe).
1590: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 73 71 . {.. sq
15a0: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 lite3_mutex_leav
15b0: 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 e(db->mutex);..
15c0: 20 20 20 20 20 72 65 74 75 72 6e 20 72 65 74 3b return ret;
15d0: 0d 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 77 .. }.... w
15e0: 68 69 6c 65 20 28 64 62 2d 3e 70 56 64 62 65 29 hile (db->pVdbe)
15f0: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2f .. {.. /
1600: 2a 20 4d 61 6b 65 20 61 20 63 6f 70 79 20 6f 66 * Make a copy of
1610: 20 74 68 65 20 66 69 72 73 74 20 70 72 65 70 61 the first prepa
1620: 72 65 64 20 73 74 61 74 65 6d 65 6e 74 20 2a 2f red statement */
1630: 0d 0a 20 20 20 20 20 20 56 64 62 65 20 2a 70 20 .. Vdbe *p
1640: 3d 20 28 56 64 62 65 20 2a 29 73 71 6c 69 74 65 = (Vdbe *)sqlite
1650: 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 5f 69 6e 3DbMallocZero_in
1660: 74 65 72 6f 70 28 64 62 2c 20 73 69 7a 65 6f 66 terop(db, sizeof
1670: 28 56 64 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 (Vdbe));..
1680: 56 64 62 65 20 2a 70 6f 20 3d 20 64 62 2d 3e 70 Vdbe *po = db->p
1690: 56 64 62 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 69 Vdbe;.... i
16a0: 66 20 28 21 70 29 0d 0a 20 20 20 20 20 20 7b 0d f (!p).. {.
16b0: 0a 20 20 20 20 20 20 20 20 72 65 74 20 3d 20 53 . ret = S
16c0: 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0d 0a 20 20 QLITE_NOMEM;..
16d0: 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 break;..
16e0: 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 20 20 43 }.... C
16f0: 6f 70 79 4d 65 6d 6f 72 79 28 70 2c 20 70 6f 2c opyMemory(p, po,
1700: 20 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d sizeof(Vdbe));.
1710: 0a 0d 0a 20 20 20 20 20 20 2f 2a 20 50 75 74 20 ... /* Put
1720: 69 74 20 6f 6e 20 74 68 65 20 63 68 61 69 6e 20 it on the chain
1730: 73 6f 20 77 65 20 63 61 6e 20 66 72 65 65 20 69 so we can free i
1740: 74 20 2a 2f 0d 0a 20 20 20 20 20 20 64 62 2d 3e t */.. db->
1750: 70 56 64 62 65 20 3d 20 70 3b 0d 0a 20 20 20 20 pVdbe = p;..
1760: 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f ret = sqlite3_
1770: 66 69 6e 61 6c 69 7a 65 28 28 73 71 6c 69 74 65 finalize((sqlite
1780: 33 5f 73 74 6d 74 20 2a 29 70 29 3b 20 2f 2a 20 3_stmt *)p); /*
1790: 54 68 69 73 20 77 69 6c 6c 20 61 6c 73 6f 20 66 This will also f
17a0: 72 65 65 20 74 68 65 20 63 6f 70 79 27 73 20 6d ree the copy's m
17b0: 65 6d 6f 72 79 20 2a 2f 0d 0a 20 20 20 20 20 20 emory */..
17c0: 69 66 20 28 72 65 74 29 0d 0a 20 20 20 20 20 20 if (ret)..
17d0: 7b 0d 0a 20 20 20 20 20 20 20 20 2f 2a 20 66 69 {.. /* fi
17e0: 6e 61 6c 69 7a 65 20 66 61 69 6c 65 64 20 2d 2d nalize failed --
17f0: 20 73 6f 20 77 65 20 6d 75 73 74 20 70 75 74 20 so we must put
1800: 62 61 63 6b 20 61 6e 79 74 68 69 6e 67 20 77 65 back anything we
1810: 20 6d 75 6e 67 65 64 20 2a 2f 0d 0a 20 20 20 20 munged */..
1820: 20 20 20 20 43 6f 70 79 4d 65 6d 6f 72 79 28 70 CopyMemory(p
1830: 6f 2c 20 70 2c 20 73 69 7a 65 6f 66 28 56 64 62 o, p, sizeof(Vdb
1840: 65 29 29 3b 0d 0a 20 20 20 20 20 20 20 20 64 62 e));.. db
1850: 2d 3e 70 56 64 62 65 20 3d 20 70 6f 3b 0d 0a 0d ->pVdbe = po;...
1860: 0a 20 20 20 20 20 20 20 20 2f 2a 0d 0a 20 20 20 . /*..
1870: 20 20 20 20 20 2a 2a 20 4e 4f 54 45 3a 20 4f 6b ** NOTE: Ok
1880: 2c 20 77 65 20 6d 75 73 74 20 66 72 65 65 20 74 , we must free t
1890: 68 69 73 20 62 6c 6f 63 6b 20 74 68 61 74 20 2a his block that *
18a0: 77 65 2a 20 61 6c 6c 6f 63 61 74 65 64 20 28 61 we* allocated (a
18b0: 62 6f 76 65 29 20 73 69 6e 63 65 0d 0a 20 20 20 bove) since..
18c0: 20 20 20 20 20 2a 2a 20 20 20 20 20 20 20 66 69 ** fi
18d0: 6e 61 6c 69 7a 65 20 64 69 64 20 6e 6f 74 20 64 nalize did not d
18e0: 6f 20 73 6f 2e 0d 0a 20 20 20 20 20 20 20 20 2a o so... *
18f0: 2f 0d 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 /.. sqlit
1900: 65 33 44 62 46 72 65 65 5f 69 6e 74 65 72 6f 70 e3DbFree_interop
1910: 28 64 62 2c 20 70 29 3b 0d 0a 20 20 20 20 20 20 (db, p);..
1920: 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 20 20 break;..
1930: 7d 0d 0a 20 20 20 20 20 20 65 6c 73 65 0d 0a 20 }.. else..
1940: 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 {..
1950: 5a 65 72 6f 4d 65 6d 6f 72 79 28 70 6f 2c 20 73 ZeroMemory(po, s
1960: 69 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 izeof(Vdbe));..
1970: 20 20 20 20 20 20 20 70 6f 2d 3e 6d 61 67 69 63 po->magic
1980: 20 3d 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 45 = VDBE_MAGIC_DE
1990: 41 44 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 AD;.. }..
19a0: 20 20 7d 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 }.. sqlite3
19b0: 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d _mutex_leave(db-
19c0: 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 20 20 72 65 >mutex);.. re
19d0: 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 t = sqlite3_clos
19e0: 65 28 64 62 29 3b 0d 0a 20 20 7d 0d 0a 20 20 72 e(db);.. }.. r
19f0: 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 eturn ret;..#end
1a00: 69 66 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65 66 if..}....#if def
1a10: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 ined(INTEROP_LOG
1a20: 29 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e )..SQLITE_API in
1a30: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 t WINAPI sqlite3
1a40: 5f 63 6f 6e 66 69 67 5f 6c 6f 67 5f 69 6e 74 65 _config_log_inte
1a50: 72 6f 70 28 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 rop()..{.. int
1a60: 72 65 74 3b 0d 0a 20 20 69 66 28 20 21 6c 6f 67 ret;.. if( !log
1a70: 43 6f 6e 66 69 67 75 72 65 64 20 29 7b 0d 0a 20 Configured ){..
1a80: 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 ret = sqlite3
1a90: 5f 63 6f 6e 66 69 67 28 53 51 4c 49 54 45 5f 43 _config(SQLITE_C
1aa0: 4f 4e 46 49 47 5f 4c 4f 47 2c 20 73 71 6c 69 74 ONFIG_LOG, sqlit
1ab0: 65 33 49 6e 74 65 72 6f 70 4c 6f 67 43 61 6c 6c e3InteropLogCall
1ac0: 62 61 63 6b 2c 20 30 29 3b 0d 0a 20 20 20 20 69 back, 0);.. i
1ad0: 66 28 20 72 65 74 3d 3d 53 51 4c 49 54 45 5f 4f f( ret==SQLITE_O
1ae0: 4b 20 29 7b 0d 0a 20 20 20 20 20 20 6c 6f 67 43 K ){.. logC
1af0: 6f 6e 66 69 67 75 72 65 64 20 3d 20 31 3b 0d 0a onfigured = 1;..
1b00: 20 20 20 20 7d 65 6c 73 65 7b 0d 0a 20 20 20 20 }else{..
1b10: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 sqlite3Interop
1b20: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 Debug("sqlite3_c
1b30: 6f 6e 66 69 67 5f 6c 6f 67 5f 69 6e 74 65 72 6f onfig_log_intero
1b40: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 63 6f 6e p(): sqlite3_con
1b50: 66 69 67 28 53 51 4c 49 54 45 5f 43 4f 4e 46 49 fig(SQLITE_CONFI
1b60: 47 5f 4c 4f 47 29 20 72 65 74 75 72 6e 65 64 20 G_LOG) returned
1b70: 25 64 2e 5c 6e 22 2c 20 72 65 74 29 3b 0d 0a 20 %d.\n", ret);..
1b80: 20 20 20 7d 0d 0a 20 20 7d 65 6c 73 65 7b 0d 0a }.. }else{..
1b90: 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 ret = SQLITE
1ba0: 5f 4f 4b 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 _OK;.. }.. ret
1bb0: 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 23 65 6e urn ret;..}..#en
1bc0: 64 69 66 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 dif....SQLITE_AP
1bd0: 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 73 71 I const char *sq
1be0: 6c 69 74 65 33 5f 6c 69 62 76 65 72 73 69 6f 6e lite3_libversion
1bf0: 5f 69 6e 74 65 72 6f 70 28 76 6f 69 64 29 0d 0a _interop(void)..
1c00: 7b 0d 0a 20 20 72 65 74 75 72 6e 20 49 4e 54 45 {.. return INTE
1c10: 52 4f 50 5f 56 45 52 53 49 4f 4e 3b 0d 0a 7d 0d ROP_VERSION;..}.
1c20: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f ...SQLITE_API co
1c30: 6e 73 74 20 63 68 61 72 20 2a 73 71 6c 69 74 65 nst char *sqlite
1c40: 33 5f 73 6f 75 72 63 65 69 64 5f 69 6e 74 65 72 3_sourceid_inter
1c50: 6f 70 28 76 6f 69 64 29 0d 0a 7b 0d 0a 20 20 72 op(void)..{.. r
1c60: 65 74 75 72 6e 20 49 4e 54 45 52 4f 50 5f 53 4f eturn INTEROP_SO
1c70: 55 52 43 45 5f 49 44 20 22 20 22 20 49 4e 54 45 URCE_ID " " INTE
1c80: 52 4f 50 5f 53 4f 55 52 43 45 5f 54 49 4d 45 53 ROP_SOURCE_TIMES
1c90: 54 41 4d 50 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 TAMP;..}....SQLI
1ca0: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 TE_API int WINAP
1cb0: 49 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 I sqlite3_open_i
1cc0: 6e 74 65 72 6f 70 28 63 6f 6e 73 74 20 63 68 61 nterop(const cha
1cd0: 72 20 2a 66 69 6c 65 6e 61 6d 65 2c 20 69 6e 74 r *filename, int
1ce0: 20 66 6c 61 67 73 2c 20 73 71 6c 69 74 65 33 20 flags, sqlite3
1cf0: 2a 2a 70 70 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e **ppdb)..{.. in
1d00: 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20 64 65 t ret;....#if de
1d10: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 fined(INTEROP_DE
1d20: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 BUG) && (INTEROP
1d30: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 _DEBUG & INTEROP
1d40: 5f 44 45 42 55 47 5f 4f 50 45 4e 29 0d 0a 20 20 _DEBUG_OPEN)..
1d50: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
1d60: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 bug("sqlite3_ope
1d70: 6e 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c n_interop(): cal
1d80: 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 6f 70 65 ling sqlite3_ope
1d90: 6e 5f 76 32 28 5c 22 25 73 5c 22 2c 20 25 64 2c n_v2(\"%s\", %d,
1da0: 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 %p)...\n", file
1db0: 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64 name, flags, ppd
1dc0: 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 b);..#endif....
1dd0: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 6f ret = sqlite3_o
1de0: 70 65 6e 5f 76 32 28 66 69 6c 65 6e 61 6d 65 2c pen_v2(filename,
1df0: 20 70 70 64 62 2c 20 66 6c 61 67 73 2c 20 4e 55 ppdb, flags, NU
1e00: 4c 4c 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 LL);....#if defi
1e10: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 ned(INTEROP_DEBU
1e20: 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 G) && (INTEROP_D
1e30: 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 EBUG & INTEROP_D
1e40: 45 42 55 47 5f 4f 50 45 4e 29 0d 0a 20 20 73 71 EBUG_OPEN).. sq
1e50: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 lite3InteropDebu
1e60: 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f g("sqlite3_open_
1e70: 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 interop(): sqlit
1e80: 65 33 5f 6f 70 65 6e 5f 76 32 28 5c 22 25 73 5c e3_open_v2(\"%s\
1e90: 22 2c 20 25 64 2c 20 25 70 29 20 72 65 74 75 72 ", %d, %p) retur
1ea0: 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 66 69 6c 65 ned %d.\n", file
1eb0: 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 64 name, flags, ppd
1ec0: 62 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 b, ret);..#endif
1ed0: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 ....#if defined(
1ee0: 49 4e 54 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f INTEROP_EXTENSIO
1ef0: 4e 5f 46 55 4e 43 54 49 4f 4e 53 29 0d 0a 20 20 N_FUNCTIONS)..
1f00: 69 66 20 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 if (ret == SQLIT
1f10: 45 5f 4f 4b 29 0d 0a 20 20 20 20 52 65 67 69 73 E_OK).. Regis
1f20: 74 65 72 45 78 74 65 6e 73 69 6f 6e 46 75 6e 63 terExtensionFunc
1f30: 74 69 6f 6e 73 28 2a 70 70 64 62 29 3b 0d 0a 23 tions(*ppdb);..#
1f40: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 endif.... retur
1f50: 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c n ret;..}....SQL
1f60: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
1f70: 50 49 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 31 PI sqlite3_open1
1f80: 36 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73 74 20 6_interop(const
1f90: 63 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65 2c 20 char *filename,
1fa0: 69 6e 74 20 66 6c 61 67 73 2c 20 73 71 6c 69 74 int flags, sqlit
1fb0: 65 33 20 2a 2a 70 70 64 62 29 0d 0a 7b 0d 0a 20 e3 **ppdb)..{..
1fc0: 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 int ret;....#if
1fd0: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
1fe0: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 _DEBUG) && (INTE
1ff0: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 ROP_DEBUG & INTE
2000: 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 31 36 ROP_DEBUG_OPEN16
2010: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 ).. sqlite3Inte
2020: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 ropDebug("sqlite
2030: 33 5f 6f 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70 3_open16_interop
2040: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 (): calling sqli
2050: 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 te3_open_interop
2060: 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 (\"%s\", %d, %p)
2070: 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65 ...\n", filename
2080: 2c 20 66 6c 61 67 73 2c 20 70 70 64 62 29 3b 0d , flags, ppdb);.
2090: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 .#endif.... ret
20a0: 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f = sqlite3_open_
20b0: 69 6e 74 65 72 6f 70 28 66 69 6c 65 6e 61 6d 65 interop(filename
20c0: 2c 20 66 6c 61 67 73 2c 20 70 70 64 62 29 3b 0d , flags, ppdb);.
20d0: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 ...#if defined(I
20e0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 NTEROP_DEBUG) &&
20f0: 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 (INTEROP_DEBUG
2100: 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f & INTEROP_DEBUG_
2110: 4f 50 45 4e 31 36 29 0d 0a 20 20 73 71 6c 69 74 OPEN16).. sqlit
2120: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 e3InteropDebug("
2130: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36 5f 69 sqlite3_open16_i
2140: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 nterop(): sqlite
2150: 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 5c 3_open_interop(\
2160: 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 "%s\", %d, %p) r
2170: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 eturned %d.\n",
2180: 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c filename, flags,
2190: 20 70 70 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65 ppdb, ret);..#e
21a0: 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 28 72 ndif.... if ((r
21b0: 65 74 20 3d 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 et == SQLITE_OK)
21c0: 20 26 26 20 21 44 62 48 61 73 50 72 6f 70 65 72 && !DbHasProper
21d0: 74 79 28 2a 70 70 64 62 2c 20 30 2c 20 44 42 5f ty(*ppdb, 0, DB_
21e0: 53 63 68 65 6d 61 4c 6f 61 64 65 64 29 29 0d 0a SchemaLoaded))..
21f0: 20 20 20 20 45 4e 43 28 2a 70 70 64 62 29 20 3d ENC(*ppdb) =
2200: 20 53 51 4c 49 54 45 5f 55 54 46 31 36 4e 41 54 SQLITE_UTF16NAT
2210: 49 56 45 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e IVE;.... return
2220: 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 ret;..}....SQLI
2230: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 TE_API const cha
2240: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 r * WINAPI sqlit
2250: 65 33 5f 65 72 72 6d 73 67 5f 69 6e 74 65 72 6f e3_errmsg_intero
2260: 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 p(sqlite3 *db, i
2270: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 nt *plen)..{..
2280: 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c const char *pval
2290: 20 3d 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 = sqlite3_errms
22a0: 67 28 64 62 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 g(db);.. *plen
22b0: 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 = (pval != 0) ?
22c0: 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 strlen(pval) : 0
22d0: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c ;.. return pval
22e0: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 ;..}....SQLITE_A
22f0: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 PI int WINAPI sq
2300: 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 5f 69 6e lite3_changes_in
2310: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 terop(sqlite3 *d
2320: 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 73 b)..{.. int res
2330: 75 6c 74 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 ult;....#if defi
2340: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 ned(INTEROP_DEBU
2350: 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 G) && (INTEROP_D
2360: 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 EBUG & INTEROP_D
2370: 45 42 55 47 5f 43 48 41 4e 47 45 53 29 0d 0a 20 EBUG_CHANGES)..
2380: 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 sqlite3InteropD
2390: 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 68 ebug("sqlite3_ch
23a0: 61 6e 67 65 73 5f 69 6e 74 65 72 6f 70 28 29 3a anges_interop():
23b0: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 calling sqlite3
23c0: 5f 63 68 61 6e 67 65 73 28 25 70 29 2e 2e 2e 5c _changes(%p)...\
23d0: 6e 22 2c 20 64 62 29 3b 0d 0a 23 65 6e 64 69 66 n", db);..#endif
23e0: 0d 0a 0d 0a 23 69 66 6e 64 65 66 20 4e 44 45 42 ....#ifndef NDEB
23f0: 55 47 0d 0a 20 20 69 66 20 28 21 64 62 29 0d 0a UG.. if (!db)..
2400: 20 20 20 20 20 20 73 71 6c 69 74 65 33 49 6e 74 sqlite3Int
2410: 65 72 6f 70 42 72 65 61 6b 28 22 6e 75 6c 6c 20 eropBreak("null
2420: 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65 20 database handle
2430: 66 6f 72 20 73 71 6c 69 74 65 33 5f 63 68 61 6e for sqlite3_chan
2440: 67 65 73 28 29 22 29 3b 0d 0a 23 65 6e 64 69 66 ges()");..#endif
2450: 0d 0a 0d 0a 20 20 72 65 73 75 6c 74 20 3d 20 73 .... result = s
2460: 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 64 qlite3_changes(d
2470: 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e b);....#if defin
2480: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ed(INTEROP_DEBUG
2490: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 ) && (INTEROP_DE
24a0: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 BUG & INTEROP_DE
24b0: 42 55 47 5f 43 48 41 4e 47 45 53 29 0d 0a 20 20 BUG_CHANGES)..
24c0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
24d0: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 68 61 bug("sqlite3_cha
24e0: 6e 67 65 73 5f 69 6e 74 65 72 6f 70 28 29 3a 20 nges_interop():
24f0: 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 sqlite3_changes(
2500: 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e %p) returned %d.
2510: 5c 6e 22 2c 20 64 62 2c 20 72 65 73 75 6c 74 29 \n", db, result)
2520: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 ;..#endif.... r
2530: 65 74 75 72 6e 20 72 65 73 75 6c 74 3b 0d 0a 7d eturn result;..}
2540: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 ....SQLITE_API i
2550: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 nt WINAPI sqlite
2560: 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 72 6f 3_prepare_intero
2570: 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 p(sqlite3 *db, c
2580: 6f 6e 73 74 20 63 68 61 72 20 2a 73 71 6c 2c 20 onst char *sql,
2590: 69 6e 74 20 6e 62 79 74 65 73 2c 20 73 71 6c 69 int nbytes, sqli
25a0: 74 65 33 5f 73 74 6d 74 20 2a 2a 70 70 73 74 6d te3_stmt **ppstm
25b0: 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 2a t, const char **
25c0: 70 7a 74 61 69 6c 2c 20 69 6e 74 20 2a 70 6c 65 pztail, int *ple
25d0: 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d n)..{.. int n;.
25e0: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 ...#if defined(I
25f0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 NTEROP_DEBUG) &&
2600: 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 (INTEROP_DEBUG
2610: 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f & INTEROP_DEBUG_
2620: 50 52 45 50 41 52 45 29 0d 0a 20 20 73 71 6c 69 PREPARE).. sqli
2630: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 te3InteropDebug(
2640: 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 "sqlite3_prepare
2650: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c _interop(): call
2660: 69 6e 67 20 73 71 6c 69 74 65 33 5f 70 72 65 70 ing sqlite3_prep
2670: 61 72 65 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20 are(%p, \"%s\",
2680: 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 %d, %p)...\n", d
2690: 62 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 b, sql, nbytes,
26a0: 70 70 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 ppstmt);..#endif
26b0: 0d 0a 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 ....#if SQLITE_V
26c0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d ERSION_NUMBER >=
26d0: 20 33 30 30 33 30 30 39 0d 0a 20 20 6e 20 3d 20 3003009.. n =
26e0: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f sqlite3_prepare_
26f0: 76 32 28 64 62 2c 20 73 71 6c 2c 20 6e 62 79 74 v2(db, sql, nbyt
2700: 65 73 2c 20 70 70 73 74 6d 74 2c 20 70 7a 74 61 es, ppstmt, pzta
2710: 69 6c 29 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 6e il);..#else.. n
2720: 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 = sqlite3_prepa
2730: 72 65 28 64 62 2c 20 73 71 6c 2c 20 6e 62 79 74 re(db, sql, nbyt
2740: 65 73 2c 20 70 70 73 74 6d 74 2c 20 70 7a 74 61 es, ppstmt, pzta
2750: 69 6c 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a il);..#endif....
2760: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
2770: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 ROP_DEBUG) && (I
2780: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 NTEROP_DEBUG & I
2790: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 NTEROP_DEBUG_PRE
27a0: 50 41 52 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 PARE).. sqlite3
27b0: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 InteropDebug("sq
27c0: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e lite3_prepare_in
27d0: 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 terop(): sqlite3
27e0: 5f 70 72 65 70 61 72 65 28 25 70 2c 20 5c 22 25 _prepare(%p, \"%
27f0: 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 65 74 s\", %d, %p) ret
2800: 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 urned %d.\n", db
2810: 2c 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70 , sql, nbytes, p
2820: 70 73 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65 6e 64 pstmt, n);..#end
2830: 69 66 0d 0a 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 if.... *plen =
2840: 28 2a 70 7a 74 61 69 6c 20 21 3d 20 30 29 20 3f (*pztail != 0) ?
2850: 20 73 74 72 6c 65 6e 28 2a 70 7a 74 61 69 6c 29 strlen(*pztail)
2860: 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 : 0;.... retur
2870: 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 n n;..}....SQLIT
2880: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 E_API int WINAPI
2890: 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 sqlite3_prepare
28a0: 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 16_interop(sqlit
28b0: 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 76 6f e3 *db, const vo
28c0: 69 64 20 2a 73 71 6c 2c 20 69 6e 74 20 6e 63 68 id *sql, int nch
28d0: 61 72 73 2c 20 73 71 6c 69 74 65 33 5f 73 74 6d ars, sqlite3_stm
28e0: 74 20 2a 2a 70 70 73 74 6d 74 2c 20 63 6f 6e 73 t **ppstmt, cons
28f0: 74 20 76 6f 69 64 20 2a 2a 70 7a 74 61 69 6c 2c t void **pztail,
2900: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a int *plen)..{..
2910: 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 23 69 66 20 int n;....#if
2920: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f defined(INTEROP_
2930: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 DEBUG) && (INTER
2940: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 OP_DEBUG & INTER
2950: 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 OP_DEBUG_PREPARE
2960: 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 16).. sqlite3In
2970: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 teropDebug("sqli
2980: 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 te3_prepare_inte
2990: 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 rop(): calling s
29a0: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 31 36 qlite3_prepare16
29b0: 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c (%p, \"%s\", %d,
29c0: 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c 20 %p)...\n", db,
29d0: 73 71 6c 2c 20 6e 63 68 61 72 73 2c 20 70 70 73 sql, nchars, pps
29e0: 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d tmt);..#endif...
29f0: 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 .#if SQLITE_VERS
2a00: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 ION_NUMBER >= 30
2a10: 30 33 30 30 39 0d 0a 20 20 6e 20 3d 20 73 71 6c 03009.. n = sql
2a20: 69 74 65 33 5f 70 72 65 70 61 72 65 31 36 5f 76 ite3_prepare16_v
2a30: 32 28 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 2(db, sql, nchar
2a40: 73 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 s * sizeof(wchar
2a50: 5f 74 29 2c 20 70 70 73 74 6d 74 2c 20 70 7a 74 _t), ppstmt, pzt
2a60: 61 69 6c 29 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 ail);..#else..
2a70: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 70 n = sqlite3_prep
2a80: 61 72 65 31 36 28 64 62 2c 20 73 71 6c 2c 20 6e are16(db, sql, n
2a90: 63 68 61 72 73 20 2a 20 73 69 7a 65 6f 66 28 77 chars * sizeof(w
2aa0: 63 68 61 72 5f 74 29 2c 20 70 70 73 74 6d 74 2c char_t), ppstmt,
2ab0: 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6e 64 69 pztail);..#endi
2ac0: 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 f....#if defined
2ad0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 (INTEROP_DEBUG)
2ae0: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 && (INTEROP_DEBU
2af0: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 G & INTEROP_DEBU
2b00: 47 5f 50 52 45 50 41 52 45 31 36 29 0d 0a 20 20 G_PREPARE16)..
2b10: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
2b20: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 70 72 65 bug("sqlite3_pre
2b30: 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 pare_interop():
2b40: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 31 sqlite3_prepare1
2b50: 36 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64 6(%p, \"%s\", %d
2b60: 2c 20 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 , %p) returned %
2b70: 64 2e 5c 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 d.\n", db, sql,
2b80: 6e 63 68 61 72 73 2c 20 70 70 73 74 6d 74 2c 20 nchars, ppstmt,
2b90: 6e 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 n);..#endif....
2ba0: 20 2a 70 6c 65 6e 20 3d 20 28 2a 70 7a 74 61 69 *plen = (*pztai
2bb0: 6c 20 21 3d 20 30 29 20 3f 20 77 63 73 6c 65 6e l != 0) ? wcslen
2bc0: 28 28 77 63 68 61 72 5f 74 20 2a 29 2a 70 7a 74 ((wchar_t *)*pzt
2bd0: 61 69 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 ail) * sizeof(wc
2be0: 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 0d 0a 20 har_t) : 0;....
2bf0: 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d return n;..}...
2c00: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
2c10: 45 52 4f 50 5f 56 49 52 54 55 41 4c 5f 54 41 42 EROP_VIRTUAL_TAB
2c20: 4c 45 29 20 26 26 20 53 51 4c 49 54 45 5f 56 45 LE) && SQLITE_VE
2c30: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 RSION_NUMBER >=
2c40: 33 30 30 34 30 30 31 0d 0a 53 51 4c 49 54 45 5f 3004001..SQLITE_
2c50: 41 50 49 20 76 6f 69 64 20 2a 57 49 4e 41 50 49 API void *WINAPI
2c60: 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f sqlite3_create_
2c70: 64 69 73 70 6f 73 61 62 6c 65 5f 6d 6f 64 75 6c disposable_modul
2c80: 65 5f 69 6e 74 65 72 6f 70 28 0d 0a 20 20 73 71 e_interop(.. sq
2c90: 6c 69 74 65 33 20 2a 64 62 2c 0d 0a 20 20 63 6f lite3 *db,.. co
2ca0: 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c nst char *zName,
2cb0: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 6f 64 75 .. sqlite3_modu
2cc0: 6c 65 20 2a 70 4d 6f 64 75 6c 65 2c 0d 0a 20 20 le *pModule,..
2cd0: 69 6e 74 20 69 56 65 72 73 69 6f 6e 2c 0d 0a 20 int iVersion,..
2ce0: 20 69 6e 74 20 28 2a 78 43 72 65 61 74 65 29 28 int (*xCreate)(
2cf0: 73 71 6c 69 74 65 33 2a 2c 20 76 6f 69 64 20 2a sqlite3*, void *
2d00: 2c 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 , int, const cha
2d10: 72 20 2a 63 6f 6e 73 74 2a 2c 20 73 71 6c 69 74 r *const*, sqlit
2d20: 65 33 5f 76 74 61 62 20 2a 2a 2c 20 63 68 61 72 e3_vtab **, char
2d30: 2a 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43 **),.. int (*xC
2d40: 6f 6e 6e 65 63 74 29 28 73 71 6c 69 74 65 33 2a onnect)(sqlite3*
2d50: 2c 20 76 6f 69 64 20 2a 2c 20 69 6e 74 2c 20 63 , void *, int, c
2d60: 6f 6e 73 74 20 63 68 61 72 20 2a 63 6f 6e 73 74 onst char *const
2d70: 2a 2c 20 73 71 6c 69 74 65 33 5f 76 74 61 62 20 *, sqlite3_vtab
2d80: 2a 2a 2c 20 63 68 61 72 2a 2a 29 2c 0d 0a 20 20 **, char**),..
2d90: 69 6e 74 20 28 2a 78 42 65 73 74 49 6e 64 65 78 int (*xBestIndex
2da0: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a )(sqlite3_vtab *
2db0: 2c 20 73 71 6c 69 74 65 33 5f 69 6e 64 65 78 5f , sqlite3_index_
2dc0: 69 6e 66 6f 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 info*),.. int (
2dd0: 2a 78 44 69 73 63 6f 6e 6e 65 63 74 29 28 73 71 *xDisconnect)(sq
2de0: 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d 0a lite3_vtab *),..
2df0: 20 20 69 6e 74 20 28 2a 78 44 65 73 74 72 6f 79 int (*xDestroy
2e00: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a )(sqlite3_vtab *
2e10: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 4f 70 65 ),.. int (*xOpe
2e20: 6e 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 n)(sqlite3_vtab
2e30: 2a 2c 20 73 71 6c 69 74 65 33 5f 76 74 61 62 5f *, sqlite3_vtab_
2e40: 63 75 72 73 6f 72 20 2a 2a 29 2c 0d 0a 20 20 69 cursor **),.. i
2e50: 6e 74 20 28 2a 78 43 6c 6f 73 65 29 28 73 71 6c nt (*xClose)(sql
2e60: 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 ite3_vtab_cursor
2e70: 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 46 69 *),.. int (*xFi
2e80: 6c 74 65 72 29 28 73 71 6c 69 74 65 33 5f 76 74 lter)(sqlite3_vt
2e90: 61 62 5f 63 75 72 73 6f 72 2a 2c 20 69 6e 74 2c ab_cursor*, int,
2ea0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 2c 20 69 const char *, i
2eb0: 6e 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 nt, sqlite3_valu
2ec0: 65 20 2a 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a e **),.. int (*
2ed0: 78 4e 65 78 74 29 28 73 71 6c 69 74 65 33 5f 76 xNext)(sqlite3_v
2ee0: 74 61 62 5f 63 75 72 73 6f 72 2a 29 2c 0d 0a 20 tab_cursor*),..
2ef0: 20 69 6e 74 20 28 2a 78 45 6f 66 29 28 73 71 6c int (*xEof)(sql
2f00: 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 ite3_vtab_cursor
2f10: 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43 6f *),.. int (*xCo
2f20: 6c 75 6d 6e 29 28 73 71 6c 69 74 65 33 5f 76 74 lumn)(sqlite3_vt
2f30: 61 62 5f 63 75 72 73 6f 72 2a 2c 20 73 71 6c 69 ab_cursor*, sqli
2f40: 74 65 33 5f 63 6f 6e 74 65 78 74 2a 2c 20 69 6e te3_context*, in
2f50: 74 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 52 6f t),.. int (*xRo
2f60: 77 69 64 29 28 73 71 6c 69 74 65 33 5f 76 74 61 wid)(sqlite3_vta
2f70: 62 5f 63 75 72 73 6f 72 2a 2c 20 73 71 6c 69 74 b_cursor*, sqlit
2f80: 65 33 5f 69 6e 74 36 34 20 2a 29 2c 0d 0a 20 20 e3_int64 *),..
2f90: 69 6e 74 20 28 2a 78 55 70 64 61 74 65 29 28 73 int (*xUpdate)(s
2fa0: 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 69 qlite3_vtab *, i
2fb0: 6e 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 nt, sqlite3_valu
2fc0: 65 20 2a 2a 2c 20 73 71 6c 69 74 65 33 5f 69 6e e **, sqlite3_in
2fd0: 74 36 34 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 t64 *),.. int (
2fe0: 2a 78 42 65 67 69 6e 29 28 73 71 6c 69 74 65 33 *xBegin)(sqlite3
2ff0: 5f 76 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 _vtab *),.. int
3000: 20 28 2a 78 53 79 6e 63 29 28 73 71 6c 69 74 65 (*xSync)(sqlite
3010: 33 5f 76 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 3_vtab *),.. in
3020: 74 20 28 2a 78 43 6f 6d 6d 69 74 29 28 73 71 6c t (*xCommit)(sql
3030: 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d 0a 20 ite3_vtab *),..
3040: 20 69 6e 74 20 28 2a 78 52 6f 6c 6c 62 61 63 6b int (*xRollback
3050: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a )(sqlite3_vtab *
3060: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 46 69 6e ),.. int (*xFin
3070: 64 46 75 6e 63 74 69 6f 6e 29 28 73 71 6c 69 74 dFunction)(sqlit
3080: 65 33 5f 76 74 61 62 20 2a 2c 20 69 6e 74 2c 20 e3_vtab *, int,
3090: 63 6f 6e 73 74 20 63 68 61 72 20 2a 2c 20 76 6f const char *, vo
30a0: 69 64 20 28 2a 2a 70 78 46 75 6e 63 29 28 73 71 id (**pxFunc)(sq
30b0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 2a 2c 20 lite3_context*,
30c0: 69 6e 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c int, sqlite3_val
30d0: 75 65 2a 2a 29 2c 20 76 6f 69 64 20 2a 2a 70 70 ue**), void **pp
30e0: 41 72 67 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 Arg),.. int (*x
30f0: 52 65 6e 61 6d 65 29 28 73 71 6c 69 74 65 33 5f Rename)(sqlite3_
3100: 76 74 61 62 20 2a 2c 20 63 6f 6e 73 74 20 63 68 vtab *, const ch
3110: 61 72 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a ar *),.. int (*
3120: 78 53 61 76 65 70 6f 69 6e 74 29 28 73 71 6c 69 xSavepoint)(sqli
3130: 74 65 33 5f 76 74 61 62 20 2a 2c 20 69 6e 74 29 te3_vtab *, int)
3140: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 52 65 6c 65 ,.. int (*xRele
3150: 61 73 65 29 28 73 71 6c 69 74 65 33 5f 76 74 61 ase)(sqlite3_vta
3160: 62 20 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 69 6e b *, int),.. in
3170: 74 20 28 2a 78 52 6f 6c 6c 62 61 63 6b 54 6f 29 t (*xRollbackTo)
3180: 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c (sqlite3_vtab *,
3190: 20 69 6e 74 29 2c 0d 0a 20 20 76 6f 69 64 20 2a int),.. void *
31a0: 70 43 6c 69 65 6e 74 44 61 74 61 2c 0d 0a 20 20 pClientData,..
31b0: 76 6f 69 64 28 2a 78 44 65 73 74 72 6f 79 4d 6f void(*xDestroyMo
31c0: 64 75 6c 65 29 28 76 6f 69 64 2a 29 0d 0a 29 7b dule)(void*)..){
31d0: 0d 0a 20 20 6d 65 6d 73 65 74 28 70 4d 6f 64 75 .. memset(pModu
31e0: 6c 65 2c 20 30 2c 20 73 69 7a 65 6f 66 28 2a 70 le, 0, sizeof(*p
31f0: 4d 6f 64 75 6c 65 29 29 3b 0d 0a 20 20 70 4d 6f Module));.. pMo
3200: 64 75 6c 65 2d 3e 69 56 65 72 73 69 6f 6e 20 3d dule->iVersion =
3210: 20 69 56 65 72 73 69 6f 6e 3b 0d 0a 20 20 70 4d iVersion;.. pM
3220: 6f 64 75 6c 65 2d 3e 78 43 72 65 61 74 65 20 3d odule->xCreate =
3230: 20 78 43 72 65 61 74 65 3b 0d 0a 20 20 70 4d 6f xCreate;.. pMo
3240: 64 75 6c 65 2d 3e 78 43 6f 6e 6e 65 63 74 20 3d dule->xConnect =
3250: 20 78 43 6f 6e 6e 65 63 74 3b 0d 0a 20 20 70 4d xConnect;.. pM
3260: 6f 64 75 6c 65 2d 3e 78 42 65 73 74 49 6e 64 65 odule->xBestInde
3270: 78 20 3d 20 78 42 65 73 74 49 6e 64 65 78 3b 0d x = xBestIndex;.
3280: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 44 69 73 . pModule->xDis
3290: 63 6f 6e 6e 65 63 74 20 3d 20 78 44 69 73 63 6f connect = xDisco
32a0: 6e 6e 65 63 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c nnect;.. pModul
32b0: 65 2d 3e 78 44 65 73 74 72 6f 79 20 3d 20 78 44 e->xDestroy = xD
32c0: 65 73 74 72 6f 79 3b 0d 0a 20 20 70 4d 6f 64 75 estroy;.. pModu
32d0: 6c 65 2d 3e 78 4f 70 65 6e 20 3d 20 78 4f 70 65 le->xOpen = xOpe
32e0: 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 n;.. pModule->x
32f0: 43 6c 6f 73 65 20 3d 20 78 43 6c 6f 73 65 3b 0d Close = xClose;.
3300: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 46 69 6c . pModule->xFil
3310: 74 65 72 20 3d 20 78 46 69 6c 74 65 72 3b 0d 0a ter = xFilter;..
3320: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 4e 65 78 74 pModule->xNext
3330: 20 3d 20 78 4e 65 78 74 3b 0d 0a 20 20 70 4d 6f = xNext;.. pMo
3340: 64 75 6c 65 2d 3e 78 45 6f 66 20 3d 20 78 45 6f dule->xEof = xEo
3350: 66 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 f;.. pModule->x
3360: 43 6f 6c 75 6d 6e 20 3d 20 78 43 6f 6c 75 6d 6e Column = xColumn
3370: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 52 ;.. pModule->xR
3380: 6f 77 69 64 20 3d 20 78 52 6f 77 69 64 3b 0d 0a owid = xRowid;..
3390: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 55 70 64 61 pModule->xUpda
33a0: 74 65 20 3d 20 78 55 70 64 61 74 65 3b 0d 0a 20 te = xUpdate;..
33b0: 20 70 4d 6f 64 75 6c 65 2d 3e 78 42 65 67 69 6e pModule->xBegin
33c0: 20 3d 20 78 42 65 67 69 6e 3b 0d 0a 20 20 70 4d = xBegin;.. pM
33d0: 6f 64 75 6c 65 2d 3e 78 53 79 6e 63 20 3d 20 78 odule->xSync = x
33e0: 53 79 6e 63 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 Sync;.. pModule
33f0: 2d 3e 78 43 6f 6d 6d 69 74 20 3d 20 78 43 6f 6d ->xCommit = xCom
3400: 6d 69 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d mit;.. pModule-
3410: 3e 78 52 6f 6c 6c 62 61 63 6b 20 3d 20 78 52 6f >xRollback = xRo
3420: 6c 6c 62 61 63 6b 3b 0d 0a 20 20 70 4d 6f 64 75 llback;.. pModu
3430: 6c 65 2d 3e 78 46 69 6e 64 46 75 6e 63 74 69 6f le->xFindFunctio
3440: 6e 20 3d 20 78 46 69 6e 64 46 75 6e 63 74 69 6f n = xFindFunctio
3450: 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 n;.. pModule->x
3460: 52 65 6e 61 6d 65 20 3d 20 78 52 65 6e 61 6d 65 Rename = xRename
3470: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 53 ;.. pModule->xS
3480: 61 76 65 70 6f 69 6e 74 20 3d 20 78 53 61 76 65 avepoint = xSave
3490: 70 6f 69 6e 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c point;.. pModul
34a0: 65 2d 3e 78 52 65 6c 65 61 73 65 20 3d 20 78 52 e->xRelease = xR
34b0: 65 6c 65 61 73 65 3b 0d 0a 20 20 70 4d 6f 64 75 elease;.. pModu
34c0: 6c 65 2d 3e 78 52 6f 6c 6c 62 61 63 6b 54 6f 20 le->xRollbackTo
34d0: 3d 20 78 52 6f 6c 6c 62 61 63 6b 54 6f 3b 0d 0a = xRollbackTo;..
34e0: 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 return sqlite3
34f0: 5f 63 72 65 61 74 65 5f 64 69 73 70 6f 73 61 62 _create_disposab
3500: 6c 65 5f 6d 6f 64 75 6c 65 28 64 62 2c 20 7a 4e le_module(db, zN
3510: 61 6d 65 2c 20 70 4d 6f 64 75 6c 65 2c 20 70 43 ame, pModule, pC
3520: 6c 69 65 6e 74 44 61 74 61 2c 20 78 44 65 73 74 lientData, xDest
3530: 72 6f 79 4d 6f 64 75 6c 65 29 3b 0d 0a 7d 0d 0a royModule);..}..
3540: 23 65 6e 64 69 66 0d 0a 0d 0a 53 51 4c 49 54 45 #endif....SQLITE
3550: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 _API int WINAPI
3560: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 64 6f 75 sqlite3_bind_dou
3570: 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ble_interop(sqli
3580: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 te3_stmt *stmt,
3590: 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c 65 int iCol, double
35a0: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 09 72 65 74 75 *val)..{...retu
35b0: 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f rn sqlite3_bind_
35c0: 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69 43 6f 6c double(stmt,iCol
35d0: 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 ,*val);..}....SQ
35e0: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e LITE_API int WIN
35f0: 41 50 49 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 API sqlite3_bind
3600: 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 _int64_interop(s
3610: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
3620: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 73 71 6c t, int iCol, sql
3630: 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d ite_int64 *val).
3640: 0a 7b 0d 0a 09 72 65 74 75 72 6e 20 73 71 6c 69 .{...return sqli
3650: 74 65 33 5f 62 69 6e 64 5f 69 6e 74 36 34 28 73 te3_bind_int64(s
3660: 74 6d 74 2c 69 43 6f 6c 2c 2a 76 61 6c 29 3b 0d tmt,iCol,*val);.
3670: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 .}....SQLITE_API
3680: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49 const char * WI
3690: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62 69 6e NAPI sqlite3_bin
36a0: 64 5f 70 61 72 61 6d 65 74 65 72 5f 6e 61 6d 65 d_parameter_name
36b0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
36c0: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 _stmt *stmt, int
36d0: 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e iCol, int *plen
36e0: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 )..{.. const ch
36f0: 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 ar *pval = sqlit
3700: 65 33 5f 62 69 6e 64 5f 70 61 72 61 6d 65 74 65 e3_bind_paramete
3710: 72 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43 6f r_name(stmt, iCo
3720: 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 l);.. *plen = (
3730: 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 74 72 pval != 0) ? str
3740: 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a len(pval) : 0;..
3750: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a return pval;..
3760: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
3770: 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e const char * WIN
3780: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 API sqlite3_colu
3790: 6d 6e 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 mn_name_interop(
37a0: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 sqlite3_stmt *st
37b0: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e mt, int iCol, in
37c0: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 t *plen)..{.. c
37d0: 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 onst char *pval
37e0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e = sqlite3_column
37f0: 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43 6f 6c _name(stmt, iCol
3800: 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70 );.. *plen = (p
3810: 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 74 72 6c val != 0) ? strl
3820: 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 en(pval) : 0;..
3830: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d return pval;..}
3840: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 ....SQLITE_API c
3850: 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 onst void * WINA
3860: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d PI sqlite3_colum
3870: 6e 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 n_name16_interop
3880: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
3890: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 tmt, int iCol, i
38a0: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 nt *plen)..{..
38b0: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c const void *pval
38c0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d = sqlite3_colum
38d0: 6e 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20 69 n_name16(stmt, i
38e0: 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d Col);.. *plen =
38f0: 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 (pval != 0) ? w
3900: 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a cslen((wchar_t *
3910: 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 )pval) * sizeof(
3920: 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 wchar_t) : 0;..
3930: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d return pval;..}
3940: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 ....SQLITE_API c
3950: 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 onst char * WINA
3960: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d PI sqlite3_colum
3970: 6e 5f 64 65 63 6c 74 79 70 65 5f 69 6e 74 65 72 n_decltype_inter
3980: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 op(sqlite3_stmt
3990: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c *stmt, int iCol,
39a0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a int *plen)..{..
39b0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 const char *pv
39c0: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c al = sqlite3_col
39d0: 75 6d 6e 5f 64 65 63 6c 74 79 70 65 28 73 74 6d umn_decltype(stm
39e0: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c t, iCol);.. *pl
39f0: 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 en = (pval != 0)
3a00: 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 ? strlen(pval)
3a10: 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 : 0;.. return p
3a20: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 val;..}....SQLIT
3a30: 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 E_API const void
3a40: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 * WINAPI sqlite
3a50: 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 3_column_decltyp
3a60: 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 e16_interop(sqli
3a70: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 te3_stmt *stmt,
3a80: 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 int iCol, int *p
3a90: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 len)..{.. const
3aa0: 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 void *pval = sq
3ab0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63 lite3_column_dec
3ac0: 6c 74 79 70 65 31 36 28 73 74 6d 74 2c 20 69 43 ltype16(stmt, iC
3ad0: 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 ol);.. *plen =
3ae0: 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63 (pval != 0) ? wc
3af0: 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 slen((wchar_t *)
3b00: 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 pval) * sizeof(w
3b10: 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 char_t) : 0;..
3b20: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d return pval;..}.
3b30: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f ...SQLITE_API vo
3b40: 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 id WINAPI sqlite
3b50: 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 6c 65 5f 3_column_double_
3b60: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f interop(sqlite3_
3b70: 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 stmt *stmt, int
3b80: 69 43 6f 6c 2c 20 64 6f 75 62 6c 65 20 2a 76 61 iCol, double *va
3b90: 6c 29 0d 0a 7b 0d 0a 09 2a 76 61 6c 20 3d 20 73 l)..{...*val = s
3ba0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f qlite3_column_do
3bb0: 75 62 6c 65 28 73 74 6d 74 2c 69 43 6f 6c 29 3b uble(stmt,iCol);
3bc0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
3bd0: 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 I void WINAPI sq
3be0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 lite3_column_int
3bf0: 36 34 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 64_interop(sqlit
3c00: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 e3_stmt *stmt, i
3c10: 6e 74 20 69 43 6f 6c 2c 20 73 71 6c 69 74 65 5f nt iCol, sqlite_
3c20: 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a int64 *val)..{..
3c30: 09 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f .*val = sqlite3_
3c40: 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28 73 74 6d column_int64(stm
3c50: 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 t,iCol);..}....S
3c60: 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 QLITE_API void W
3c70: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6c 61 INAPI sqlite3_la
3c80: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 5f st_insert_rowid_
3c90: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 interop(sqlite3
3ca0: 2a 64 62 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 *db, sqlite_int6
3cb0: 34 20 2a 72 6f 77 49 64 29 0d 0a 7b 0d 0a 09 2a 4 *rowId)..{...*
3cc0: 72 6f 77 49 64 20 3d 20 73 71 6c 69 74 65 33 5f rowId = sqlite3_
3cd0: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 last_insert_rowi
3ce0: 64 28 64 62 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c d(db);..}....SQL
3cf0: 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e ITE_API void WIN
3d00: 41 50 49 20 73 71 6c 69 74 65 33 5f 6d 65 6d 6f API sqlite3_memo
3d10: 72 79 5f 75 73 65 64 5f 69 6e 74 65 72 6f 70 28 ry_used_interop(
3d20: 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 6e 42 sqlite_int64 *nB
3d30: 79 74 65 73 29 0d 0a 7b 0d 0a 09 2a 6e 42 79 74 ytes)..{...*nByt
3d40: 65 73 20 3d 20 73 71 6c 69 74 65 33 5f 6d 65 6d es = sqlite3_mem
3d50: 6f 72 79 5f 75 73 65 64 28 29 3b 0d 0a 7d 0d 0a ory_used();..}..
3d60: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 ..SQLITE_API voi
3d70: 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 d WINAPI sqlite3
3d80: 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61 74 65 _memory_highwate
3d90: 72 5f 69 6e 74 65 72 6f 70 28 69 6e 74 20 72 65 r_interop(int re
3da0: 73 65 74 46 6c 61 67 2c 20 73 71 6c 69 74 65 5f setFlag, sqlite_
3db0: 69 6e 74 36 34 20 2a 6e 42 79 74 65 73 29 0d 0a int64 *nBytes)..
3dc0: 7b 0d 0a 09 2a 6e 42 79 74 65 73 20 3d 20 73 71 {...*nBytes = sq
3dd0: 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 lite3_memory_hig
3de0: 68 77 61 74 65 72 28 72 65 73 65 74 46 6c 61 67 hwater(resetFlag
3df0: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f );..}....SQLITE_
3e00: 41 50 49 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e API const unsign
3e10: 65 64 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 ed char * WINAPI
3e20: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
3e30: 74 65 78 74 5f 69 6e 74 65 72 6f 70 28 73 71 6c text_interop(sql
3e40: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c ite3_stmt *stmt,
3e50: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a int iCol, int *
3e60: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 plen)..{.. cons
3e70: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 t unsigned char
3e80: 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f *pval = sqlite3_
3e90: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 73 74 6d 74 column_text(stmt
3ea0: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 , iCol);.. *ple
3eb0: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 n = sqlite3_colu
3ec0: 6d 6e 5f 62 79 74 65 73 28 73 74 6d 74 2c 20 69 mn_bytes(stmt, i
3ed0: 43 6f 6c 29 3b 0d 0a 20 20 72 65 74 75 72 6e 20 Col);.. return
3ee0: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 pval;..}....SQLI
3ef0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 TE_API const voi
3f00: 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 d * WINAPI sqlit
3f10: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 31 36 e3_column_text16
3f20: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
3f30: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 _stmt *stmt, int
3f40: 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e iCol, int *plen
3f50: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f )..{.. const vo
3f60: 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 id *pval = sqlit
3f70: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 31 36 e3_column_text16
3f80: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 (stmt, iCol);..
3f90: 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 *plen = sqlite3
3fa0: 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 31 36 28 _column_bytes16(
3fb0: 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 stmt, iCol);..
3fc0: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d return pval;..}.
3fd0: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e ...SQLITE_API in
3fe0: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 t WINAPI sqlite3
3ff0: 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f _finalize_intero
4000: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a p(sqlite3_stmt *
4010: 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 stmt)..{.. int
4020: 72 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e ret;..#if !defin
4030: 65 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 ed(INTEROP_LEGAC
4040: 59 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 Y_CLOSE) && SQLI
4050: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
4060: 52 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a R >= 3007014....
4070: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
4080: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 ROP_DEBUG) && (I
4090: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 NTEROP_DEBUG & I
40a0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e NTEROP_DEBUG_FIN
40b0: 41 4c 49 5a 45 29 0d 0a 20 20 56 64 62 65 20 2a ALIZE).. Vdbe *
40c0: 70 20 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74 p = (Vdbe *)stmt
40d0: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 ;.. sqlite3 *db
40e0: 20 3d 20 70 2d 3e 64 62 3b 0d 0a 20 20 73 71 6c = p->db;.. sql
40f0: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 ite3InteropDebug
4100: 28 22 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 ("sqlite3_finali
4110: 7a 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 ze_interop(): ca
4120: 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 66 69 lling sqlite3_fi
4130: 6e 61 6c 69 7a 65 28 25 70 2c 20 25 70 29 2e 2e nalize(%p, %p)..
4140: 2e 5c 6e 22 2c 20 64 62 2c 20 73 74 6d 74 29 3b .\n", db, stmt);
4150: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 ..#endif.... re
4160: 74 20 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 t = sqlite3_fina
4170: 6c 69 7a 65 28 73 74 6d 74 29 3b 0d 0a 0d 0a 23 lize(stmt);....#
4180: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
4190: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e OP_DEBUG) && (IN
41a0: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
41b0: 54 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41 TEROP_DEBUG_FINA
41c0: 4c 49 5a 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 LIZE).. sqlite3
41d0: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 InteropDebug("sq
41e0: 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 lite3_finalize_i
41f0: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 nterop(): sqlite
4200: 33 5f 66 69 6e 61 6c 69 7a 65 28 25 70 2c 20 25 3_finalize(%p, %
4210: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c p) returned %d.\
4220: 6e 22 2c 20 64 62 2c 20 73 74 6d 74 2c 20 72 65 n", db, stmt, re
4230: 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 t);..#endif....
4240: 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65 return ret;..#e
4250: 6c 73 65 0d 0a 20 20 56 64 62 65 20 2a 70 3b 0d lse.. Vdbe *p;.
4260: 0a 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f . ret = SQLITE_
4270: 4f 4b 3b 0d 0a 0d 0a 20 20 70 20 3d 20 28 56 64 OK;.... p = (Vd
4280: 62 65 20 2a 29 73 74 6d 74 3b 0d 0a 20 20 69 66 be *)stmt;.. if
4290: 20 28 70 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 73 (p).. {.. s
42a0: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 70 2d 3e qlite3 *db = p->
42b0: 64 62 3b 0d 0a 0d 0a 20 20 20 20 69 66 20 28 64 db;.... if (d
42c0: 62 20 21 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 b != NULL)..
42d0: 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f sqlite3_mutex_
42e0: 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 enter(db->mutex)
42f0: 3b 0d 0a 0d 0a 20 20 20 20 69 66 20 28 28 70 2d ;.... if ((p-
4300: 3e 6d 61 67 69 63 20 3d 3d 20 56 44 42 45 5f 4d >magic == VDBE_M
4310: 41 47 49 43 5f 44 45 41 44 29 20 26 26 20 28 64 AGIC_DEAD) && (d
4320: 62 20 3d 3d 20 4e 55 4c 4c 29 29 0d 0a 20 20 20 b == NULL))..
4330: 20 7b 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 {.. sqlite
4340: 33 44 62 46 72 65 65 5f 69 6e 74 65 72 6f 70 28 3DbFree_interop(
4350: 64 62 2c 20 70 29 3b 0d 0a 20 20 20 20 7d 0d 0a db, p);.. }..
4360: 20 20 20 20 65 6c 73 65 0d 0a 20 20 20 20 7b 0d else.. {.
4370: 0a 20 20 20 20 20 20 72 65 74 20 3d 20 73 71 6c . ret = sql
4380: 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 73 74 ite3_finalize(st
4390: 6d 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 0d 0a 20 mt);.. }....
43a0: 20 20 20 69 66 20 28 64 62 20 21 3d 20 4e 55 4c if (db != NUL
43b0: 4c 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 L).. sqlite
43c0: 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 3_mutex_leave(db
43d0: 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a ->mutex);.. }..
43e0: 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d .. return ret;.
43f0: 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 51 .#endif..}....SQ
4400: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e LITE_API int WIN
4410: 41 50 49 20 73 71 6c 69 74 65 33 5f 62 61 63 6b API sqlite3_back
4420: 75 70 5f 66 69 6e 69 73 68 5f 69 6e 74 65 72 6f up_finish_intero
4430: 70 28 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 p(sqlite3_backup
4440: 20 2a 70 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 *p)..{.. int r
4450: 65 74 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e et;....#if defin
4460: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ed(INTEROP_DEBUG
4470: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 ) && (INTEROP_DE
4480: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 BUG & INTEROP_DE
4490: 42 55 47 5f 42 41 43 4b 55 50 5f 46 49 4e 49 53 BUG_BACKUP_FINIS
44a0: 48 29 0d 0a 20 20 73 71 6c 69 74 65 33 2a 20 70 H).. sqlite3* p
44b0: 44 65 73 74 44 62 20 3d 20 70 2d 3e 70 44 65 73 DestDb = p->pDes
44c0: 74 44 62 3b 0d 0a 20 20 73 71 6c 69 74 65 33 2a tDb;.. sqlite3*
44d0: 20 70 53 72 63 44 62 20 3d 20 70 2d 3e 70 53 72 pSrcDb = p->pSr
44e0: 63 44 62 3b 0d 0a 20 20 73 71 6c 69 74 65 33 49 cDb;.. sqlite3I
44f0: 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c nteropDebug("sql
4500: 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 ite3_backup_fini
4510: 73 68 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 sh_interop(): ca
4520: 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 62 61 lling sqlite3_ba
4530: 63 6b 75 70 5f 66 69 6e 69 73 68 28 25 70 2c 20 ckup_finish(%p,
4540: 25 70 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 70 %p, %p)...\n", p
4550: 44 65 73 74 44 62 2c 20 70 53 72 63 44 62 2c 20 DestDb, pSrcDb,
4560: 70 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 p);..#endif....
4570: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 62 ret = sqlite3_b
4580: 61 63 6b 75 70 5f 66 69 6e 69 73 68 28 70 29 3b ackup_finish(p);
4590: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 ....#if defined(
45a0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 INTEROP_DEBUG) &
45b0: 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 & (INTEROP_DEBUG
45c0: 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 & INTEROP_DEBUG
45d0: 5f 42 41 43 4b 55 50 5f 46 49 4e 49 53 48 29 0d _BACKUP_FINISH).
45e0: 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f . sqlite3Intero
45f0: 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f pDebug("sqlite3_
4600: 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 5f 69 6e backup_finish_in
4610: 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 terop(): sqlite3
4620: 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 28 25 _backup_finish(%
4630: 70 2c 20 25 70 2c 20 25 70 29 20 72 65 74 75 72 p, %p, %p) retur
4640: 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 70 44 65 73 ned %d.\n", pDes
4650: 74 44 62 2c 20 70 53 72 63 44 62 2c 20 70 2c 20 tDb, pSrcDb, p,
4660: 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d ret);..#endif...
4670: 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a . return ret;..
4680: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
4690: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 int WINAPI sqlit
46a0: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70 e3_reset_interop
46b0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
46c0: 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 tmt)..{.. int r
46d0: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65 et;..#if !define
46e0: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 d(INTEROP_LEGACY
46f0: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54 _CLOSE) && SQLIT
4700: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
4710: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 >= 3007014....#
4720: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
4730: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e OP_DEBUG) && (IN
4740: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
4750: 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 TEROP_DEBUG_RESE
4760: 54 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 T).. sqlite3Int
4770: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
4780: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70 e3_reset_interop
4790: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 (): calling sqli
47a0: 74 65 33 5f 72 65 73 65 74 28 25 70 29 2e 2e 2e te3_reset(%p)...
47b0: 5c 6e 22 2c 20 73 74 6d 74 29 3b 0d 0a 23 65 6e \n", stmt);..#en
47c0: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 dif.... ret = s
47d0: 71 6c 69 74 65 33 5f 72 65 73 65 74 28 73 74 6d qlite3_reset(stm
47e0: 74 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e t);....#if defin
47f0: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ed(INTEROP_DEBUG
4800: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 ) && (INTEROP_DE
4810: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 BUG & INTEROP_DE
4820: 42 55 47 5f 52 45 53 45 54 29 0d 0a 20 20 73 71 BUG_RESET).. sq
4830: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 lite3InteropDebu
4840: 67 28 22 73 71 6c 69 74 65 33 5f 72 65 73 65 74 g("sqlite3_reset
4850: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 _interop(): sqli
4860: 74 65 33 5f 72 65 73 65 74 28 25 70 29 20 72 65 te3_reset(%p) re
4870: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 73 turned %d.\n", s
4880: 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 tmt, ret);..#end
4890: 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 if.... return r
48a0: 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 et;..#else.. if
48b0: 20 28 28 28 56 64 62 65 20 2a 29 73 74 6d 74 29 (((Vdbe *)stmt)
48c0: 2d 3e 6d 61 67 69 63 20 3d 3d 20 56 44 42 45 5f ->magic == VDBE_
48d0: 4d 41 47 49 43 5f 44 45 41 44 29 20 72 65 74 75 MAGIC_DEAD) retu
48e0: 72 6e 20 53 51 4c 49 54 45 5f 53 43 48 45 4d 41 rn SQLITE_SCHEMA
48f0: 3b 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 ;.. ret = sqlit
4900: 65 33 5f 72 65 73 65 74 28 73 74 6d 74 29 3b 0d e3_reset(stmt);.
4910: 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a . return ret;..
4920: 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 51 4c #endif..}....SQL
4930: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
4940: 50 49 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 PI sqlite3_creat
4950: 65 5f 66 75 6e 63 74 69 6f 6e 5f 69 6e 74 65 72 e_function_inter
4960: 6f 70 28 73 71 6c 69 74 65 33 20 2a 70 73 71 6c op(sqlite3 *psql
4970: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 , const char *zF
4980: 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 69 6e 74 unctionName, int
4990: 20 6e 41 72 67 2c 20 69 6e 74 20 65 54 65 78 74 nArg, int eText
49a0: 52 65 70 2c 20 76 6f 69 64 20 2a 70 76 55 73 65 Rep, void *pvUse
49b0: 72 2c 20 53 51 4c 49 54 45 55 53 45 52 46 55 4e r, SQLITEUSERFUN
49c0: 43 20 66 75 6e 63 2c 20 53 51 4c 49 54 45 55 53 C func, SQLITEUS
49d0: 45 52 46 55 4e 43 20 66 75 6e 63 73 74 65 70 2c ERFUNC funcstep,
49e0: 20 53 51 4c 49 54 45 46 55 4e 43 46 49 4e 41 4c SQLITEFUNCFINAL
49f0: 20 66 75 6e 63 66 69 6e 61 6c 2c 20 69 6e 74 20 funcfinal, int
4a00: 6e 65 65 64 43 6f 6c 6c 53 65 71 29 0d 0a 7b 0d needCollSeq)..{.
4a10: 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 69 . int n;.... i
4a20: 66 20 28 65 54 65 78 74 52 65 70 20 3d 3d 20 53 f (eTextRep == S
4a30: 51 4c 49 54 45 5f 55 54 46 31 36 29 0d 0a 20 20 QLITE_UTF16)..
4a40: 20 20 65 54 65 78 74 52 65 70 20 3d 20 53 51 4c eTextRep = SQL
4a50: 49 54 45 5f 55 54 46 31 36 4e 41 54 49 56 45 3b ITE_UTF16NATIVE;
4a60: 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 .... n = sqlite
4a70: 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 3_create_functio
4a80: 6e 28 70 73 71 6c 2c 20 7a 46 75 6e 63 74 69 6f n(psql, zFunctio
4a90: 6e 4e 61 6d 65 2c 20 6e 41 72 67 2c 20 65 54 65 nName, nArg, eTe
4aa0: 78 74 52 65 70 2c 20 30 2c 20 66 75 6e 63 2c 20 xtRep, 0, func,
4ab0: 66 75 6e 63 73 74 65 70 2c 20 66 75 6e 63 66 69 funcstep, funcfi
4ac0: 6e 61 6c 29 3b 0d 0a 20 20 69 66 20 28 6e 20 3d nal);.. if (n =
4ad0: 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20 20 = SQLITE_OK)..
4ae0: 7b 0d 0a 20 20 20 20 69 66 20 28 6e 65 65 64 43 {.. if (needC
4af0: 6f 6c 6c 53 65 71 29 0d 0a 20 20 20 20 7b 0d 0a ollSeq).. {..
4b00: 20 20 20 20 20 20 46 75 6e 63 44 65 66 20 2a 70 FuncDef *p
4b10: 46 75 6e 63 20 3d 20 73 71 6c 69 74 65 33 46 69 Func = sqlite3Fi
4b20: 6e 64 46 75 6e 63 74 69 6f 6e 28 70 73 71 6c 2c ndFunction(psql,
4b30: 20 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 zFunctionName,
4b40: 73 74 72 6c 65 6e 28 7a 46 75 6e 63 74 69 6f 6e strlen(zFunction
4b50: 4e 61 6d 65 29 2c 20 6e 41 72 67 2c 20 65 54 65 Name), nArg, eTe
4b60: 78 74 52 65 70 2c 20 30 29 3b 0d 0a 20 20 20 20 xtRep, 0);..
4b70: 20 20 69 66 28 20 70 46 75 6e 63 20 29 0d 0a 20 if( pFunc )..
4b80: 20 20 20 20 20 7b 0d 0a 23 69 66 20 53 51 4c 49 {..#if SQLI
4b90: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
4ba0: 52 20 3e 3d 20 33 30 30 38 30 30 31 0d 0a 20 20 R >= 3008001..
4bb0: 20 20 20 20 20 20 70 46 75 6e 63 2d 3e 66 75 6e pFunc->fun
4bc0: 63 46 6c 61 67 73 20 7c 3d 20 53 51 4c 49 54 45 cFlags |= SQLITE
4bd0: 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 3b 0d _FUNC_NEEDCOLL;.
4be0: 0a 23 65 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 .#else..
4bf0: 70 46 75 6e 63 2d 3e 66 6c 61 67 73 20 7c 3d 20 pFunc->flags |=
4c00: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44 SQLITE_FUNC_NEED
4c10: 43 4f 4c 4c 3b 0d 0a 23 65 6e 64 69 66 0d 0a 20 COLL;..#endif..
4c20: 20 20 20 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 }.. }..
4c30: 20 7d 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 6e }.... return n
4c40: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 ;..}....SQLITE_A
4c50: 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 PI void WINAPI s
4c60: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 qlite3_value_dou
4c70: 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ble_interop(sqli
4c80: 74 65 33 5f 76 61 6c 75 65 20 2a 70 76 61 6c 2c te3_value *pval,
4c90: 20 64 6f 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b double *val)..{
4ca0: 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 .. *val = sqlit
4cb0: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 e3_value_double(
4cc0: 70 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c pval);..}....SQL
4cd0: 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e ITE_API void WIN
4ce0: 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 API sqlite3_valu
4cf0: 65 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 e_int64_interop(
4d00: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 70 sqlite3_value *p
4d10: 76 61 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 val, sqlite_int6
4d20: 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 2a 76 4 *val)..{.. *v
4d30: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c al = sqlite3_val
4d40: 75 65 5f 69 6e 74 36 34 28 70 76 61 6c 29 3b 0d ue_int64(pval);.
4d50: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 .}....SQLITE_API
4d60: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 const unsigned
4d70: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 char * WINAPI sq
4d80: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 lite3_value_text
4d90: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
4da0: 5f 76 61 6c 75 65 20 2a 76 61 6c 2c 20 69 6e 74 _value *val, int
4db0: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f *plen)..{.. co
4dc0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 nst unsigned cha
4dd0: 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 r *pval = sqlite
4de0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 76 61 6c 3_value_text(val
4df0: 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 73 71 );.. *plen = sq
4e00: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 lite3_value_byte
4e10: 73 28 76 61 6c 29 3b 0d 0a 20 20 72 65 74 75 72 s(val);.. retur
4e20: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 n pval;..}....SQ
4e30: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 LITE_API const v
4e40: 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c oid * WINAPI sql
4e50: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 31 ite3_value_text1
4e60: 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 6_interop(sqlite
4e70: 33 5f 76 61 6c 75 65 20 2a 76 61 6c 2c 20 69 6e 3_value *val, in
4e80: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 t *plen)..{.. c
4e90: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 onst void *pval
4ea0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f = sqlite3_value_
4eb0: 74 65 78 74 31 36 28 76 61 6c 29 3b 0d 0a 20 20 text16(val);..
4ec0: 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 5f *plen = sqlite3_
4ed0: 76 61 6c 75 65 5f 62 79 74 65 73 31 36 28 76 61 value_bytes16(va
4ee0: 6c 29 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 l);.. return pv
4ef0: 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 al;..}....SQLITE
4f00: 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 _API void WINAPI
4f10: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f sqlite3_result_
4f20: 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 double_interop(s
4f30: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a qlite3_context *
4f40: 70 63 74 78 2c 20 64 6f 75 62 6c 65 20 2a 76 61 pctx, double *va
4f50: 6c 29 0d 0a 7b 0d 0a 20 20 73 71 6c 69 74 65 33 l)..{.. sqlite3
4f60: 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 70 _result_double(p
4f70: 63 74 78 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a ctx, *val);..}..
4f80: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 ..SQLITE_API voi
4f90: 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 d WINAPI sqlite3
4fa0: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 5f 69 6e _result_int64_in
4fb0: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f terop(sqlite3_co
4fc0: 6e 74 65 78 74 20 2a 70 63 74 78 2c 20 73 71 6c ntext *pctx, sql
4fd0: 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d ite_int64 *val).
4fe0: 0a 7b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 .{.. sqlite3_re
4ff0: 73 75 6c 74 5f 69 6e 74 36 34 28 70 63 74 78 2c sult_int64(pctx,
5000: 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 *val);..}....SQ
5010: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e LITE_API int WIN
5020: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 API sqlite3_cont
5030: 65 78 74 5f 63 6f 6c 6c 63 6f 6d 70 61 72 65 5f ext_collcompare_
5040: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f interop(sqlite3_
5050: 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c 20 63 6f context *ctx, co
5060: 6e 73 74 20 76 6f 69 64 20 2a 70 31 2c 20 69 6e nst void *p1, in
5070: 74 20 70 31 6c 65 6e 2c 20 63 6f 6e 73 74 20 76 t p1len, const v
5080: 6f 69 64 20 2a 70 32 2c 20 69 6e 74 20 70 32 6c oid *p2, int p2l
5090: 65 6e 29 0d 0a 7b 0d 0a 23 69 66 20 53 51 4c 49 en)..{..#if SQLI
50a0: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
50b0: 52 20 3e 3d 20 33 30 30 38 30 30 31 0d 0a 20 20 R >= 3008001..
50c0: 69 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d if ((ctx->pFunc-
50d0: 3e 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51 4c >funcFlags & SQL
50e0: 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c ITE_FUNC_NEEDCOL
50f0: 4c 29 20 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 L) == 0) return
5100: 32 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 2;..#else.. if
5110: 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c ((ctx->pFunc->fl
5120: 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e ags & SQLITE_FUN
5130: 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 C_NEEDCOLL) == 0
5140: 29 20 72 65 74 75 72 6e 20 32 3b 0d 0a 23 65 6e ) return 2;..#en
5150: 64 69 66 0d 0a 20 20 72 65 74 75 72 6e 20 63 74 dif.. return ct
5160: 78 2d 3e 70 43 6f 6c 6c 2d 3e 78 43 6d 70 28 63 x->pColl->xCmp(c
5170: 74 78 2d 3e 70 43 6f 6c 6c 2d 3e 70 55 73 65 72 tx->pColl->pUser
5180: 2c 20 70 31 6c 65 6e 2c 20 70 31 2c 20 70 32 6c , p1len, p1, p2l
5190: 65 6e 2c 20 70 32 29 3b 0d 0a 7d 0d 0a 0d 0a 53 en, p2);..}....S
51a0: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 QLITE_API const
51b0: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 char * WINAPI sq
51c0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 63 6f lite3_context_co
51d0: 6c 6c 73 65 71 5f 69 6e 74 65 72 6f 70 28 73 71 llseq_interop(sq
51e0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 lite3_context *c
51f0: 74 78 2c 20 69 6e 74 20 2a 70 74 79 70 65 2c 20 tx, int *ptype,
5200: 69 6e 74 20 2a 65 6e 63 2c 20 69 6e 74 20 2a 70 int *enc, int *p
5210: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 43 6f 6c 6c 53 len)..{.. CollS
5220: 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 63 74 78 2d eq *pColl = ctx-
5230: 3e 70 43 6f 6c 6c 3b 0d 0a 20 20 2a 70 74 79 70 >pColl;.. *ptyp
5240: 65 20 3d 20 30 3b 0d 0a 20 20 2a 70 6c 65 6e 20 e = 0;.. *plen
5250: 3d 20 30 3b 0d 0a 20 20 2a 65 6e 63 20 3d 20 30 = 0;.. *enc = 0
5260: 3b 0d 0a 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f ;....#if SQLITE_
5270: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e VERSION_NUMBER >
5280: 3d 20 33 30 30 38 30 30 31 0d 0a 20 20 69 66 20 = 3008001.. if
5290: 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 75 ((ctx->pFunc->fu
52a0: 6e 63 46 6c 61 67 73 20 26 20 53 51 4c 49 54 45 ncFlags & SQLITE
52b0: 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 _FUNC_NEEDCOLL)
52c0: 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 4e 55 4c == 0) return NUL
52d0: 4c 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 L;..#else.. if
52e0: 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c ((ctx->pFunc->fl
52f0: 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e ags & SQLITE_FUN
5300: 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 C_NEEDCOLL) == 0
5310: 29 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0d 0a ) return NULL;..
5320: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 #endif.... if (
5330: 70 43 6f 6c 6c 29 0d 0a 20 20 7b 0d 0a 20 20 20 pColl).. {..
5340: 20 2a 65 6e 63 20 3d 20 70 43 6f 6c 6c 2d 3e 65 *enc = pColl->e
5350: 6e 63 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f nc;..#if SQLITE_
5360: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c VERSION_NUMBER <
5370: 20 33 30 30 37 30 31 30 0d 0a 20 20 20 20 2a 70 3007010.. *p
5380: 74 79 70 65 20 3d 20 70 43 6f 6c 6c 2d 3e 74 79 type = pColl->ty
5390: 70 65 3b 0d 0a 23 65 6e 64 69 66 0d 0a 20 20 20 pe;..#endif..
53a0: 20 2a 70 6c 65 6e 20 3d 20 28 70 43 6f 6c 6c 2d *plen = (pColl-
53b0: 3e 7a 4e 61 6d 65 20 21 3d 20 30 29 20 3f 20 73 >zName != 0) ? s
53c0: 74 72 6c 65 6e 28 70 43 6f 6c 6c 2d 3e 7a 4e 61 trlen(pColl->zNa
53d0: 6d 65 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 20 20 me) : 0;....
53e0: 72 65 74 75 72 6e 20 70 43 6f 6c 6c 2d 3e 7a 4e return pColl->zN
53f0: 61 6d 65 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 ame;.. }.. ret
5400: 75 72 6e 20 4e 55 4c 4c 3b 0d 0a 7d 0d 0a 0d 0a urn NULL;..}....
5410: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 SQLITE_API const
5420: 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 char * WINAPI s
5430: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 qlite3_column_da
5440: 74 61 62 61 73 65 5f 6e 61 6d 65 5f 69 6e 74 65 tabase_name_inte
5450: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 rop(sqlite3_stmt
5460: 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c *stmt, int iCol
5470: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d , int *plen)..{.
5480: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 . const char *p
5490: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f val = sqlite3_co
54a0: 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 lumn_database_na
54b0: 6d 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d me(stmt, iCol);.
54c0: 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c . *plen = (pval
54d0: 20 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 != 0) ? strlen(
54e0: 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 pval) : 0;.. re
54f0: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d turn pval;..}...
5500: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
5510: 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 t void * WINAPI
5520: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 sqlite3_column_d
5530: 61 74 61 62 61 73 65 5f 6e 61 6d 65 31 36 5f 69 atabase_name16_i
5540: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 nterop(sqlite3_s
5550: 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 tmt *stmt, int i
5560: 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d Col, int *plen).
5570: 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 .{.. const void
5580: 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 *pval = sqlite3
5590: 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65 _column_database
55a0: 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20 69 43 _name16(stmt, iC
55b0: 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 ol);.. *plen =
55c0: 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 77 63 (pval != 0) ? wc
55d0: 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 slen((wchar_t *)
55e0: 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 pval) * sizeof(w
55f0: 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 char_t) : 0;..
5600: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d return pval;..}.
5610: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f ...SQLITE_API co
5620: 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 nst char * WINAP
5630: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e I sqlite3_column
5640: 5f 74 61 62 6c 65 5f 6e 61 6d 65 5f 69 6e 74 65 _table_name_inte
5650: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 rop(sqlite3_stmt
5660: 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c *stmt, int iCol
5670: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d , int *plen)..{.
5680: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 . const char *p
5690: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f val = sqlite3_co
56a0: 6c 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 28 lumn_table_name(
56b0: 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 stmt, iCol);..
56c0: 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d *plen = (pval !=
56d0: 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 0) ? strlen(pva
56e0: 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 l) : 0;.. retur
56f0: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 n pval;..}....SQ
5700: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 LITE_API const v
5710: 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c oid * WINAPI sql
5720: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c ite3_column_tabl
5730: 65 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 e_name16_interop
5740: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
5750: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 tmt, int iCol, i
5760: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 nt *plen)..{..
5770: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c const void *pval
5780: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d = sqlite3_colum
5790: 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 31 36 28 73 n_table_name16(s
57a0: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a tmt, iCol);.. *
57b0: 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 plen = (pval !=
57c0: 30 29 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 0) ? wcslen((wch
57d0: 61 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 ar_t *)pval) * s
57e0: 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a izeof(wchar_t) :
57f0: 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 0;.. return pv
5800: 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 al;..}....SQLITE
5810: 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 _API const char
5820: 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 * WINAPI sqlite3
5830: 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e _column_origin_n
5840: 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ame_interop(sqli
5850: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 te3_stmt *stmt,
5860: 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 int iCol, int *p
5870: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 len)..{.. const
5880: 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 char *pval = sq
5890: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 lite3_column_ori
58a0: 67 69 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 gin_name(stmt, i
58b0: 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d Col);.. *plen =
58c0: 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 (pval != 0) ? s
58d0: 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b trlen(pval) : 0;
58e0: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b .. return pval;
58f0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
5900: 49 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 I const void * W
5910: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f INAPI sqlite3_co
5920: 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 lumn_origin_name
5930: 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 16_interop(sqlit
5940: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 e3_stmt *stmt, i
5950: 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c nt iCol, int *pl
5960: 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 en)..{.. const
5970: 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 6c void *pval = sql
5980: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 ite3_column_orig
5990: 69 6e 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20 in_name16(stmt,
59a0: 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 iCol);.. *plen
59b0: 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 = (pval != 0) ?
59c0: 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 wcslen((wchar_t
59d0: 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 *)pval) * sizeof
59e0: 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a (wchar_t) : 0;..
59f0: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a return pval;..
5a00: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
5a10: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 int WINAPI sqlit
5a20: 65 33 5f 74 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f e3_table_column_
5a30: 6d 65 74 61 64 61 74 61 5f 69 6e 74 65 72 6f 70 metadata_interop
5a40: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f (sqlite3 *db, co
5a50: 6e 73 74 20 63 68 61 72 20 2a 7a 44 62 4e 61 6d nst char *zDbNam
5a60: 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a e, const char *z
5a70: 54 61 62 6c 65 4e 61 6d 65 2c 20 63 6f 6e 73 74 TableName, const
5a80: 20 63 68 61 72 20 2a 7a 43 6f 6c 75 6d 6e 4e 61 char *zColumnNa
5a90: 6d 65 2c 20 63 68 61 72 20 2a 2a 70 7a 44 61 74 me, char **pzDat
5aa0: 61 54 79 70 65 2c 20 63 68 61 72 20 2a 2a 70 7a aType, char **pz
5ab0: 43 6f 6c 6c 53 65 71 2c 20 69 6e 74 20 2a 70 4e CollSeq, int *pN
5ac0: 6f 74 4e 75 6c 6c 2c 20 69 6e 74 20 2a 70 50 72 otNull, int *pPr
5ad0: 69 6d 61 72 79 4b 65 79 2c 20 69 6e 74 20 2a 70 imaryKey, int *p
5ae0: 41 75 74 6f 69 6e 63 2c 20 69 6e 74 20 2a 70 64 Autoinc, int *pd
5af0: 74 4c 65 6e 2c 20 69 6e 74 20 2a 70 63 73 4c 65 tLen, int *pcsLe
5b00: 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d n)..{.. int n;.
5b10: 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 ... n = sqlite3
5b20: 5f 74 61 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d 65 _table_column_me
5b30: 74 61 64 61 74 61 28 64 62 2c 20 7a 44 62 4e 61 tadata(db, zDbNa
5b40: 6d 65 2c 20 7a 54 61 62 6c 65 4e 61 6d 65 2c 20 me, zTableName,
5b50: 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 70 7a 44 zColumnName, pzD
5b60: 61 74 61 54 79 70 65 2c 20 70 7a 43 6f 6c 6c 53 ataType, pzCollS
5b70: 65 71 2c 20 70 4e 6f 74 4e 75 6c 6c 2c 20 70 50 eq, pNotNull, pP
5b80: 72 69 6d 61 72 79 4b 65 79 2c 20 70 41 75 74 6f rimaryKey, pAuto
5b90: 69 6e 63 29 3b 0d 0a 20 20 2a 70 64 74 4c 65 6e inc);.. *pdtLen
5ba0: 20 3d 20 28 2a 70 7a 44 61 74 61 54 79 70 65 20 = (*pzDataType
5bb0: 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 2a != 0) ? strlen(*
5bc0: 70 7a 44 61 74 61 54 79 70 65 29 20 3a 20 30 3b pzDataType) : 0;
5bd0: 0d 0a 20 20 2a 70 63 73 4c 65 6e 20 3d 20 28 2a .. *pcsLen = (*
5be0: 70 7a 43 6f 6c 6c 53 65 71 20 21 3d 20 30 29 20 pzCollSeq != 0)
5bf0: 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c ? strlen(*pzColl
5c00: 53 65 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 72 Seq) : 0;.... r
5c10: 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 eturn n;..}....S
5c20: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 QLITE_API int WI
5c30: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 69 6e 64 NAPI sqlite3_ind
5c40: 65 78 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f 5f 69 ex_column_info_i
5c50: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a nterop(sqlite3 *
5c60: 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a db, const char *
5c70: 7a 44 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 zDb, const char
5c80: 2a 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 63 6f 6e *zIndexName, con
5c90: 73 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75 6d 6e st char *zColumn
5ca0: 4e 61 6d 65 2c 20 69 6e 74 20 2a 73 6f 72 74 4f Name, int *sortO
5cb0: 72 64 65 72 2c 20 69 6e 74 20 2a 6f 6e 45 72 72 rder, int *onErr
5cc0: 6f 72 2c 20 63 68 61 72 20 2a 2a 70 7a 43 6f 6c or, char **pzCol
5cd0: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b l, int *plen)..{
5ce0: 0d 0a 20 20 49 6e 64 65 78 20 2a 70 49 64 78 3b .. Index *pIdx;
5cf0: 0d 0a 20 20 54 61 62 6c 65 20 2a 70 54 61 62 3b .. Table *pTab;
5d00: 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 .. int n;....
5d10: 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e sqlite3_mutex_en
5d20: 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0a ter(db->mutex);.
5d30: 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 45 6e sqlite3BtreeEn
5d40: 74 65 72 41 6c 6c 28 64 62 29 3b 0a 0d 0a 20 20 terAll(db);...
5d50: 70 49 64 78 20 3d 20 73 71 6c 69 74 65 33 46 69 pIdx = sqlite3Fi
5d60: 6e 64 49 6e 64 65 78 28 64 62 2c 20 7a 49 6e 64 ndIndex(db, zInd
5d70: 65 78 4e 61 6d 65 2c 20 7a 44 62 29 3b 0d 0a 0d exName, zDb);...
5d80: 0a 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 4c . sqlite3BtreeL
5d90: 65 61 76 65 41 6c 6c 28 64 62 29 3b 0a 20 20 73 eaveAll(db);. s
5da0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 qlite3_mutex_lea
5db0: 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0a 0d ve(db->mutex);..
5dc0: 0a 20 20 69 66 20 28 21 70 49 64 78 29 20 72 65 . if (!pIdx) re
5dd0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f turn SQLITE_ERRO
5de0: 52 3b 0d 0a 0d 0a 20 20 70 54 61 62 20 3d 20 70 R;.... pTab = p
5df0: 49 64 78 2d 3e 70 54 61 62 6c 65 3b 0d 0a 20 20 Idx->pTable;..
5e00: 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 for (n = 0; n <
5e10: 70 49 64 78 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20 6e pIdx->nColumn; n
5e20: 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 6e ++).. {.. in
5e30: 74 20 63 6e 75 6d 20 3d 20 70 49 64 78 2d 3e 61 t cnum = pIdx->a
5e40: 69 43 6f 6c 75 6d 6e 5b 6e 5d 3b 0d 0a 20 20 20 iColumn[n];..
5e50: 20 69 66 20 28 73 71 6c 69 74 65 33 53 74 72 49 if (sqlite3StrI
5e60: 43 6d 70 28 70 54 61 62 2d 3e 61 43 6f 6c 5b 63 Cmp(pTab->aCol[c
5e70: 6e 75 6d 5d 2e 7a 4e 61 6d 65 2c 20 7a 43 6f 6c num].zName, zCol
5e80: 75 6d 6e 4e 61 6d 65 29 20 3d 3d 20 30 29 0d 0a umnName) == 0)..
5e90: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2a 73 6f {.. *so
5ea0: 72 74 4f 72 64 65 72 20 3d 20 70 49 64 78 2d 3e rtOrder = pIdx->
5eb0: 61 53 6f 72 74 4f 72 64 65 72 5b 6e 5d 3b 0d 0a aSortOrder[n];..
5ec0: 20 20 20 20 20 20 2a 70 7a 43 6f 6c 6c 20 3d 20 *pzColl =
5ed0: 70 49 64 78 2d 3e 61 7a 43 6f 6c 6c 5b 6e 5d 3b pIdx->azColl[n];
5ee0: 0d 0a 20 20 20 20 20 20 2a 70 6c 65 6e 20 3d 20 .. *plen =
5ef0: 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c 29 3b strlen(*pzColl);
5f00: 0d 0a 20 20 20 20 20 20 2a 6f 6e 45 72 72 6f 72 .. *onError
5f10: 20 3d 20 70 49 64 78 2d 3e 6f 6e 45 72 72 6f 72 = pIdx->onError
5f20: 3b 0d 0a 0d 0a 20 20 20 20 20 20 72 65 74 75 72 ;.... retur
5f30: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 20 20 n SQLITE_OK;..
5f40: 20 20 7d 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 }.. }.. retu
5f50: 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b rn SQLITE_ERROR;
5f60: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
5f70: 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c I int WINAPI sql
5f80: 69 74 65 33 5f 74 61 62 6c 65 5f 63 75 72 73 6f ite3_table_curso
5f90: 72 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 r_interop(sqlite
5fa0: 33 5f 73 74 6d 74 20 2a 70 73 74 6d 74 2c 20 69 3_stmt *pstmt, i
5fb0: 6e 74 20 69 44 62 2c 20 50 67 6e 6f 20 74 61 62 nt iDb, Pgno tab
5fc0: 6c 65 52 6f 6f 74 50 61 67 65 29 0d 0a 7b 0d 0a leRootPage)..{..
5fd0: 20 20 56 64 62 65 20 2a 70 20 3d 20 28 56 64 62 Vdbe *p = (Vdb
5fe0: 65 20 2a 29 70 73 74 6d 74 3b 0d 0a 20 20 73 71 e *)pstmt;.. sq
5ff0: 6c 69 74 65 33 20 2a 64 62 20 3d 20 28 70 20 3d lite3 *db = (p =
6000: 3d 20 4e 55 4c 4c 29 20 3f 20 4e 55 4c 4c 20 3a = NULL) ? NULL :
6010: 20 70 2d 3e 64 62 3b 0d 0a 20 20 69 6e 74 20 6e p->db;.. int n
6020: 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20 2d ;.. int ret = -
6030: 31 3b 0d 0a 0d 0a 20 20 73 71 6c 69 74 65 33 5f 1;.... sqlite3_
6040: 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e mutex_enter(db->
6050: 6d 75 74 65 78 29 3b 0d 0a 20 20 66 6f 72 20 28 mutex);.. for (
6060: 6e 20 3d 20 30 3b 20 6e 20 3c 20 70 2d 3e 6e 43 n = 0; n < p->nC
6070: 75 72 73 6f 72 20 26 26 20 70 2d 3e 61 70 43 73 ursor && p->apCs
6080: 72 5b 6e 5d 20 21 3d 20 4e 55 4c 4c 3b 20 6e 2b r[n] != NULL; n+
6090: 2b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 20 +).. {.. if
60a0: 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 69 73 (p->apCsr[n]->is
60b0: 54 61 62 6c 65 20 3d 3d 20 46 41 4c 53 45 29 20 Table == FALSE)
60c0: 63 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 20 69 continue;.. i
60d0: 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e f (p->apCsr[n]->
60e0: 69 44 62 20 21 3d 20 69 44 62 29 20 63 6f 6e 74 iDb != iDb) cont
60f0: 69 6e 75 65 3b 0d 0a 20 20 20 20 69 66 20 28 70 inue;.. if (p
6100: 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 70 43 75 72 ->apCsr[n]->pCur
6110: 73 6f 72 2d 3e 70 67 6e 6f 52 6f 6f 74 20 3d 3d sor->pgnoRoot ==
6120: 20 74 61 62 6c 65 52 6f 6f 74 50 61 67 65 29 0d tableRootPage).
6130: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 . {.. re
6140: 74 20 3d 20 6e 3b 0d 0a 20 20 20 20 20 20 62 72 t = n;.. br
6150: 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d eak;.. }.. }
6160: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 .. sqlite3_mute
6170: 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 x_leave(db->mute
6180: 78 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 x);.... return
6190: 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 ret;..}....SQLIT
61a0: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 E_API int WINAPI
61b0: 20 73 71 6c 69 74 65 33 5f 63 75 72 73 6f 72 5f sqlite3_cursor_
61c0: 72 6f 77 69 64 5f 69 6e 74 65 72 6f 70 28 73 71 rowid_interop(sq
61d0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d lite3_stmt *pstm
61e0: 74 2c 20 69 6e 74 20 63 75 72 73 6f 72 2c 20 73 t, int cursor, s
61f0: 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 70 72 6f qlite_int64 *pro
6200: 77 69 64 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20 wid)..{.. Vdbe
6210: 2a 70 20 3d 20 28 56 64 62 65 20 2a 29 70 73 74 *p = (Vdbe *)pst
6220: 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a mt;.. sqlite3 *
6230: 64 62 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29 db = (p == NULL)
6240: 20 3f 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b ? NULL : p->db;
6250: 0d 0a 20 20 56 64 62 65 43 75 72 73 6f 72 20 2a .. VdbeCursor *
6260: 70 43 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d pC;.. int ret =
6270: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 SQLITE_OK;....
6280: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 sqlite3_mutex_e
6290: 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b nter(db->mutex);
62a0: 0d 0a 20 20 77 68 69 6c 65 20 28 31 29 0d 0a 20 .. while (1)..
62b0: 20 7b 0d 0a 20 20 20 20 69 66 20 28 63 75 72 73 {.. if (curs
62c0: 6f 72 20 3c 20 30 20 7c 7c 20 63 75 72 73 6f 72 or < 0 || cursor
62d0: 20 3e 3d 20 70 2d 3e 6e 43 75 72 73 6f 72 29 0d >= p->nCursor).
62e0: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 . {.. re
62f0: 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 t = SQLITE_ERROR
6300: 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d ;.. break;.
6310: 0a 20 20 20 20 7d 0d 0a 20 20 20 20 69 66 20 28 . }.. if (
6320: 70 2d 3e 61 70 43 73 72 5b 63 75 72 73 6f 72 5d p->apCsr[cursor]
6330: 20 3d 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 7b == NULL).. {
6340: 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 53 51 .. ret = SQ
6350: 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 LITE_ERROR;..
6360: 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d break;.. }
6370: 0d 0a 0d 0a 20 20 20 20 70 43 20 3d 20 70 2d 3e .... pC = p->
6380: 61 70 43 73 72 5b 63 75 72 73 6f 72 5d 3b 0d 0a apCsr[cursor];..
6390: 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69 .. ret = sqli
63a0: 74 65 33 56 64 62 65 43 75 72 73 6f 72 4d 6f 76 te3VdbeCursorMov
63b0: 65 74 6f 28 70 43 29 3b 0d 0a 20 20 20 20 69 66 eto(pC);.. if
63c0: 28 72 65 74 29 0d 0a 20 20 20 20 20 20 62 72 65 (ret).. bre
63d0: 61 6b 3b 0d 0a 0d 0a 20 20 20 20 69 66 28 70 43 ak;.... if(pC
63e0: 2d 3e 72 6f 77 69 64 49 73 56 61 6c 69 64 29 0d ->rowidIsValid).
63f0: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 2a 70 . {.. *p
6400: 72 6f 77 69 64 20 3d 20 70 43 2d 3e 6c 61 73 74 rowid = pC->last
6410: 52 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a 20 Rowid;.. }..
6420: 20 20 20 65 6c 73 65 20 69 66 28 70 43 2d 3e 70 else if(pC->p
6430: 73 65 75 64 6f 54 61 62 6c 65 52 65 67 20 3e 20 seudoTableReg >
6440: 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 0).. {..
6450: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 ret = SQLITE_ER
6460: 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 ROR;.. brea
6470: 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 65 k;.. }.. e
6480: 6c 73 65 20 69 66 28 70 43 2d 3e 6e 75 6c 6c 52 lse if(pC->nullR
6490: 6f 77 20 7c 7c 20 70 43 2d 3e 70 43 75 72 73 6f ow || pC->pCurso
64a0: 72 3d 3d 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 r==0).. {..
64b0: 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 ret = SQLITE
64c0: 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 _ERROR;.. b
64d0: 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 reak;.. }..
64e0: 20 20 65 6c 73 65 0d 0a 20 20 20 20 7b 0d 0a 20 else.. {..
64f0: 20 20 20 20 20 69 66 20 28 70 43 2d 3e 70 43 75 if (pC->pCu
6500: 72 73 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d 0a 20 rsor == NULL)..
6510: 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 {..
6520: 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 ret = SQLITE_ERR
6530: 4f 52 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 65 OR;.. bre
6540: 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 ak;.. }..
6550: 20 20 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 sqlite3Btree
6560: 4b 65 79 53 69 7a 65 28 70 43 2d 3e 70 43 75 72 KeySize(pC->pCur
6570: 73 6f 72 2c 20 70 72 6f 77 69 64 29 3b 0d 0a 20 sor, prowid);..
6580: 20 20 20 20 20 2a 70 72 6f 77 69 64 20 3d 20 2a *prowid = *
6590: 70 72 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a prowid;.. }..
65a0: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 7d 0d break;.. }.
65b0: 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 . sqlite3_mutex
65c0: 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 _leave(db->mutex
65d0: 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 );.... return r
65e0: 65 74 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 20 2f et;..}..#endif /
65f0: 2a 20 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 20 * SQLITE_OS_WIN
6600: 2a 2f 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a */..../*********
6610: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
6620: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
6630: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
6640: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
6650: 2a 2a 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 ****/..../*..**
6660: 54 68 65 20 49 4e 54 45 52 4f 50 5f 54 45 53 54 The INTEROP_TEST
6670: 5f 45 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63 6b _EXTENSION block
6680: 20 6d 75 73 74 20 62 65 20 61 74 20 74 68 65 20 must be at the
6690: 65 6e 64 20 6f 66 20 74 68 69 73 20 73 6f 75 72 end of this sour
66a0: 63 65 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63 61 ce file..** beca
66b0: 75 73 65 20 69 74 20 69 6e 63 6c 75 64 65 73 20 use it includes
66c0: 74 68 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e the "sqlite3ext.
66d0: 68 22 20 66 69 6c 65 2c 20 77 68 69 63 68 20 64 h" file, which d
66e0: 65 66 69 6e 65 73 20 74 68 65 20 73 71 6c 69 74 efines the sqlit
66f0: 65 33 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41 50 e3..** public AP
6700: 49 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 I function names
6710: 20 74 6f 20 62 65 20 6d 61 63 72 6f 73 20 61 6e to be macros an
6720: 64 20 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75 d that would cau
6730: 73 65 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a 20 se the code..**
6740: 61 62 6f 76 65 20 74 68 69 73 20 70 6f 69 6e 74 above this point
6750: 20 74 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e 2e to malfunction.
6760: 0d 0a 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e 65 ..*/..#if define
6770: 64 28 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45 d(INTEROP_TEST_E
6780: 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c XTENSION)..#incl
6790: 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 71 6c ude "../core/sql
67a0: 69 74 65 33 65 78 74 2e 68 22 0d 0a 53 51 4c 49 ite3ext.h"..SQLI
67b0: 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49 TE_EXTENSION_INI
67c0: 54 31 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 65 T1..../*..** The
67d0: 20 69 6e 74 65 72 6f 70 54 65 73 74 28 29 20 53 interopTest() S
67e0: 51 4c 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 QL function retu
67f0: 72 6e 73 20 69 74 73 20 66 69 72 73 74 20 61 72 rns its first ar
6800: 67 75 6d 65 6e 74 20 6f 72 20 72 61 69 73 65 73 gument or raises
6810: 20 61 6e 0d 0a 2a 2a 20 65 72 72 6f 72 20 69 66 an..** error if
6820: 20 74 68 65 72 65 20 61 72 65 20 6e 6f 74 20 65 there are not e
6830: 6e 6f 75 67 68 20 61 72 67 75 6d 65 6e 74 73 2e nough arguments.
6840: 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 50 52 49 ..*/..SQLITE_PRI
6850: 56 41 54 45 20 76 6f 69 64 20 69 6e 74 65 72 6f VATE void intero
6860: 70 54 65 73 74 46 75 6e 63 28 0d 0a 20 20 73 71 pTestFunc(.. sq
6870: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 lite3_context *c
6880: 6f 6e 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20 61 ontext,.. int a
6890: 72 67 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33 5f rgc,.. sqlite3_
68a0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29 7b value **argv..){
68b0: 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e .. const unsign
68c0: 65 64 20 63 68 61 72 20 2a 7a 3b 0d 0a 20 20 69 ed char *z;.. i
68d0: 66 28 20 61 72 67 63 21 3d 31 20 29 7b 0d 0a 20 f( argc!=1 ){..
68e0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c sqlite3_resul
68f0: 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c t_error(context,
6900: 20 22 6e 65 65 64 20 65 78 61 63 74 6c 79 20 6f "need exactly o
6910: 6e 65 20 61 72 67 75 6d 65 6e 74 22 2c 20 2d 31 ne argument", -1
6920: 29 3b 0d 0a 20 20 20 20 72 65 74 75 72 6e 3b 0d );.. return;.
6930: 0a 20 20 7d 0d 0a 20 20 7a 20 3d 20 73 71 6c 69 . }.. z = sqli
6940: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 te3_value_text(a
6950: 72 67 76 5b 30 5d 29 3b 0d 0a 20 20 69 66 28 20 rgv[0]);.. if(
6960: 7a 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 z ){.. sqlite
6970: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 3_result_text(co
6980: 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 2c ntext, (char*)z,
6990: 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 -1, SQLITE_STAT
69a0: 49 43 29 3b 0d 0a 20 20 7d 65 6c 73 65 7b 0d 0a IC);.. }else{..
69b0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 sqlite3_resu
69c0: 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78 74 29 lt_null(context)
69d0: 3b 0d 0a 20 20 7d 0d 0a 7d 0d 0a 0d 0a 2f 2a 0d ;.. }..}..../*.
69e0: 0a 2a 2a 20 54 68 65 20 69 6e 74 65 72 6f 70 53 .** The interopS
69f0: 6c 65 65 70 28 29 20 53 51 4c 20 66 75 6e 63 74 leep() SQL funct
6a00: 69 6f 6e 20 77 61 69 74 73 20 74 68 65 20 73 70 ion waits the sp
6a10: 65 63 69 66 69 65 64 20 6e 75 6d 62 65 72 20 6f ecified number o
6a20: 66 20 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 0d 0a f milliseconds..
6a30: 2a 2a 20 6f 72 20 72 61 69 73 65 73 20 61 6e 20 ** or raises an
6a40: 65 72 72 6f 72 20 69 66 20 74 68 65 72 65 20 61 error if there a
6a50: 72 65 20 6e 6f 74 20 65 6e 6f 75 67 68 20 61 72 re not enough ar
6a60: 67 75 6d 65 6e 74 73 2e 0d 0a 2a 2f 0d 0a 53 51 guments...*/..SQ
6a70: 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69 LITE_PRIVATE voi
6a80: 64 20 69 6e 74 65 72 6f 70 53 6c 65 65 70 46 75 d interopSleepFu
6a90: 6e 63 28 0d 0a 20 20 73 71 6c 69 74 65 33 5f 63 nc(.. sqlite3_c
6aa0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c ontext *context,
6ab0: 0d 0a 20 20 69 6e 74 20 61 72 67 63 2c 0d 0a 20 .. int argc,..
6ac0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a sqlite3_value *
6ad0: 2a 61 72 67 76 0d 0a 29 7b 0d 0a 20 20 69 6e 74 *argv..){.. int
6ae0: 20 6d 3b 0d 0a 20 20 69 66 28 20 61 72 67 63 21 m;.. if( argc!
6af0: 3d 31 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 =1 ){.. sqlit
6b00: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 e3_result_error(
6b10: 63 6f 6e 74 65 78 74 2c 20 22 6e 65 65 64 20 65 context, "need e
6b20: 78 61 63 74 6c 79 20 6f 6e 65 20 61 72 67 75 6d xactly one argum
6b30: 65 6e 74 22 2c 20 2d 31 29 3b 0d 0a 20 20 20 20 ent", -1);..
6b40: 72 65 74 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20 20 return;.. }..
6b50: 6d 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 m = sqlite3_valu
6b60: 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0d e_int(argv[0]);.
6b70: 0a 23 69 66 20 53 51 4c 49 54 45 5f 4f 53 5f 57 .#if SQLITE_OS_W
6b80: 49 4e 43 45 0d 0a 20 20 53 6c 65 65 70 28 6d 29 INCE.. Sleep(m)
6b90: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 ;.. sqlite3_res
6ba0: 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c ult_int(context,
6bb0: 20 57 41 49 54 5f 4f 42 4a 45 43 54 5f 30 29 3b WAIT_OBJECT_0);
6bc0: 0d 0a 23 65 6c 73 65 0d 0a 20 20 73 71 6c 69 74 ..#else.. sqlit
6bd0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f e3_result_int(co
6be0: 6e 74 65 78 74 2c 20 53 6c 65 65 70 45 78 28 6d ntext, SleepEx(m
6bf0: 2c 20 54 52 55 45 29 29 3b 0d 0a 23 65 6e 64 69 , TRUE));..#endi
6c00: 66 0d 0a 7d 0d 0a 0d 0a 2f 2a 20 53 51 4c 69 74 f..}..../* SQLit
6c10: 65 20 69 6e 76 6f 6b 65 73 20 74 68 69 73 20 72 e invokes this r
6c20: 6f 75 74 69 6e 65 20 6f 6e 63 65 20 77 68 65 6e outine once when
6c30: 20 69 74 20 6c 6f 61 64 73 20 74 68 65 20 65 78 it loads the ex
6c40: 74 65 6e 73 69 6f 6e 2e 0d 0a 2a 2a 20 43 72 65 tension...** Cre
6c50: 61 74 65 20 6e 65 77 20 66 75 6e 63 74 69 6f 6e ate new function
6c60: 73 2c 20 63 6f 6c 6c 61 74 69 6e 67 20 73 65 71 s, collating seq
6c70: 75 65 6e 63 65 73 2c 20 61 6e 64 20 76 69 72 74 uences, and virt
6c80: 75 61 6c 20 74 61 62 6c 65 0d 0a 2a 2a 20 6d 6f ual table..** mo
6c90: 64 75 6c 65 73 20 68 65 72 65 2e 20 20 54 68 69 dules here. Thi
6ca0: 73 20 69 73 20 75 73 75 61 6c 6c 79 20 74 68 65 s is usually the
6cb0: 20 6f 6e 6c 79 20 65 78 70 6f 72 74 65 64 20 73 only exported s
6cc0: 79 6d 62 6f 6c 20 69 6e 0d 0a 2a 2a 20 74 68 65 ymbol in..** the
6cd0: 20 73 68 61 72 65 64 20 6c 69 62 72 61 72 79 2e shared library.
6ce0: 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 ..*/..SQLITE_API
6cf0: 20 69 6e 74 20 69 6e 74 65 72 6f 70 5f 74 65 73 int interop_tes
6d00: 74 5f 65 78 74 65 6e 73 69 6f 6e 5f 69 6e 69 74 t_extension_init
6d10: 28 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 (.. sqlite3 *db
6d20: 2c 0d 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 ,.. char **pzEr
6d30: 72 4d 73 67 2c 0d 0a 20 20 63 6f 6e 73 74 20 73 rMsg,.. const s
6d40: 71 6c 69 74 65 33 5f 61 70 69 5f 72 6f 75 74 69 qlite3_api_routi
6d50: 6e 65 73 20 2a 70 41 70 69 0d 0a 29 7b 0d 0a 20 nes *pApi..){..
6d60: 20 69 6e 74 20 72 63 3b 0d 0a 20 20 53 51 4c 49 int rc;.. SQLI
6d70: 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49 TE_EXTENSION_INI
6d80: 54 32 28 70 41 70 69 29 0d 0a 20 20 72 63 20 3d T2(pApi).. rc =
6d90: 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f sqlite3_create_
6da0: 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e function(db, "in
6db0: 74 65 72 6f 70 54 65 73 74 22 2c 20 2d 31 2c 20 teropTest", -1,
6dc0: 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a SQLITE_ANY, 0,..
6dd0: 20 20 20 20 20 20 69 6e 74 65 72 6f 70 54 65 73 interopTes
6de0: 74 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d 0a 20 tFunc, 0, 0);..
6df0: 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f if( rc==SQLITE_
6e00: 4f 4b 20 29 7b 0d 0a 20 20 20 20 72 63 20 3d 20 OK ){.. rc =
6e10: 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 sqlite3_create_f
6e20: 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e 74 unction(db, "int
6e30: 65 72 6f 70 53 6c 65 65 70 22 2c 20 31 2c 20 53 eropSleep", 1, S
6e40: 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a 20 QLITE_ANY, 0,..
6e50: 20 20 20 20 20 20 20 69 6e 74 65 72 6f 70 53 6c interopSl
6e60: 65 65 70 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d eepFunc, 0, 0);.
6e70: 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 . }.. return r
6e80: 63 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a c;..}..#endif..