0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 2a 20 41 44 *********.. * AD
0040: 4f 2e 4e 45 54 20 32 2e 30 20 44 61 74 61 20 50 O.NET 2.0 Data P
0050: 72 6f 76 69 64 65 72 20 66 6f 72 20 53 51 4c 69 rovider for SQLi
0060: 74 65 20 56 65 72 73 69 6f 6e 20 33 2e 58 0d 0a te Version 3.X..
0070: 20 2a 20 57 72 69 74 74 65 6e 20 62 79 20 52 6f * Written by Ro
0080: 62 65 72 74 20 53 69 6d 70 73 6f 6e 20 28 72 6f bert Simpson (ro
0090: 62 65 72 74 40 62 6c 61 63 6b 63 61 73 74 6c 65 bert@blackcastle
00a0: 73 6f 66 74 2e 63 6f 6d 29 0d 0a 20 2a 20 0d 0a soft.com).. * ..
00b0: 20 2a 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74 * Released to t
00c0: 68 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e he public domain
00d0: 2c 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77 , use at your ow
00e0: 6e 20 72 69 73 6b 21 0d 0a 20 2a 2a 2a 2a 2a 2a n risk!.. ******
00f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0100: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0110: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0120: 2a 2a 2f 0d 0a 0d 0a 23 64 65 66 69 6e 65 20 53 **/....#define S
0130: 51 4c 49 54 45 5f 41 50 49 20 5f 5f 64 65 63 6c QLITE_API __decl
0140: 73 70 65 63 28 64 6c 6c 65 78 70 6f 72 74 29 0d spec(dllexport).
0150: 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f ...#include "../
0160: 63 6f 72 65 2f 73 71 6c 69 74 65 33 2e 63 22 0d core/sqlite3.c".
0170: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 ...#if defined(I
0180: 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 4c 5f 54 NTEROP_VIRTUAL_T
0190: 41 42 4c 45 29 20 26 26 20 53 51 4c 49 54 45 5f ABLE) && SQLITE_
01a0: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e VERSION_NUMBER >
01b0: 3d 20 33 30 30 34 30 30 31 0d 0a 23 69 6e 63 6c = 3004001..#incl
01c0: 75 64 65 20 22 2e 2e 2f 65 78 74 2f 76 74 73 68 ude "../ext/vtsh
01d0: 69 6d 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d im.c"..#endif...
01e0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
01f0: 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e 5f 46 EROP_EXTENSION_F
0200: 55 4e 43 54 49 4f 4e 53 29 0d 0a 23 69 6e 63 6c UNCTIONS)..#incl
0210: 75 64 65 20 22 2e 2e 2f 63 6f 6e 74 72 69 62 2f ude "../contrib/
0220: 65 78 74 65 6e 73 69 6f 6e 2d 66 75 6e 63 74 69 extension-functi
0230: 6f 6e 73 2e 63 22 0d 0a 65 78 74 65 72 6e 20 69 ons.c"..extern i
0240: 6e 74 20 52 65 67 69 73 74 65 72 45 78 74 65 6e nt RegisterExten
0250: 73 69 6f 6e 46 75 6e 63 74 69 6f 6e 73 28 73 71 sionFunctions(sq
0260: 6c 69 74 65 33 20 2a 64 62 29 3b 0d 0a 23 65 6e lite3 *db);..#en
0270: 64 69 66 0d 0a 0d 0a 23 69 66 64 65 66 20 53 51 dif....#ifdef SQ
0280: 4c 49 54 45 5f 4f 53 5f 57 49 4e 0d 0a 23 69 66 LITE_OS_WIN..#if
0290: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
02a0: 5f 43 4f 44 45 43 29 0d 0a 23 69 6e 63 6c 75 64 _CODEC)..#includ
02b0: 65 20 22 63 72 79 70 74 2e 63 22 0d 0a 23 65 6e e "crypt.c"..#en
02c0: 64 69 66 0d 0a 0d 0a 23 64 65 66 69 6e 65 20 49 dif....#define I
02d0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4e 4f 4e NTEROP_DEBUG_NON
02e0: 45 20 20 20 20 20 20 20 20 20 20 20 28 30 78 30 E (0x0
02f0: 30 30 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 000)..#define IN
0300: 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f 53 TEROP_DEBUG_CLOS
0310: 45 20 20 20 20 20 20 20 20 20 20 28 30 78 30 30 E (0x00
0320: 30 31 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 01)..#define INT
0330: 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41 4c EROP_DEBUG_FINAL
0340: 49 5a 45 20 20 20 20 20 20 20 28 30 78 30 30 30 IZE (0x000
0350: 32 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 2)..#define INTE
0360: 52 4f 50 5f 44 45 42 55 47 5f 42 41 43 4b 55 50 ROP_DEBUG_BACKUP
0370: 5f 46 49 4e 49 53 48 20 20 28 30 78 30 30 30 34 _FINISH (0x0004
0380: 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 )..#define INTER
0390: 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 20 20 20 OP_DEBUG_OPEN
03a0: 20 20 20 20 20 20 20 20 28 30 78 30 30 30 38 29 (0x0008)
03b0: 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f ..#define INTERO
03c0: 50 5f 44 45 42 55 47 5f 4f 50 45 4e 31 36 20 20 P_DEBUG_OPEN16
03d0: 20 20 20 20 20 20 20 28 30 78 30 30 31 30 29 0d (0x0010).
03e0: 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 .#define INTEROP
03f0: 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 20 20 _DEBUG_PREPARE
0400: 20 20 20 20 20 20 28 30 78 30 30 32 30 29 0d 0a (0x0020)..
0410: 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f #define INTEROP_
0420: 44 45 42 55 47 5f 50 52 45 50 41 52 45 31 36 20 DEBUG_PREPARE16
0430: 20 20 20 20 20 28 30 78 30 30 34 30 29 0d 0a 23 (0x0040)..#
0440: 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 define INTEROP_D
0450: 45 42 55 47 5f 52 45 53 45 54 20 20 20 20 20 20 EBUG_RESET
0460: 20 20 20 20 28 30 78 30 30 38 30 29 0d 0a 23 64 (0x0080)..#d
0470: 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 efine INTEROP_DE
0480: 42 55 47 5f 43 48 41 4e 47 45 53 20 20 20 20 20 BUG_CHANGES
0490: 20 20 20 28 30 78 30 31 30 30 29 0d 0a 23 64 65 (0x0100)..#de
04a0: 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 fine INTEROP_DEB
04b0: 55 47 5f 42 52 45 41 4b 20 20 20 20 20 20 20 20 UG_BREAK
04c0: 20 20 28 30 78 30 32 30 30 29 0d 0a 0d 0a 23 69 (0x0200)....#i
04d0: 66 20 64 65 66 69 6e 65 64 28 5f 4d 53 43 5f 56 f defined(_MSC_V
04e0: 45 52 29 20 26 26 20 64 65 66 69 6e 65 64 28 49 ER) && defined(I
04f0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 NTEROP_DEBUG) &&
0500: 20 5c 0d 0a 20 20 20 20 28 49 4e 54 45 52 4f 50 \.. (INTEROP
0510: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 _DEBUG & INTEROP
0520: 5f 44 45 42 55 47 5f 42 52 45 41 4b 29 0d 0a 23 _DEBUG_BREAK)..#
0530: 64 65 66 69 6e 65 20 73 71 6c 69 74 65 33 49 6e define sqlite3In
0540: 74 65 72 6f 70 42 72 65 61 6b 28 61 29 20 7b 20 teropBreak(a) {
0550: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
0560: 62 75 67 28 22 25 73 5c 6e 22 2c 20 28 61 29 29 bug("%s\n", (a))
0570: 3b 20 5f 5f 64 65 62 75 67 62 72 65 61 6b 28 29 ; __debugbreak()
0580: 3b 20 7d 0d 0a 23 65 6c 73 65 0d 0a 23 64 65 66 ; }..#else..#def
0590: 69 6e 65 20 73 71 6c 69 74 65 33 49 6e 74 65 72 ine sqlite3Inter
05a0: 6f 70 42 72 65 61 6b 28 61 29 0d 0a 23 65 6e 64 opBreak(a)..#end
05b0: 69 66 0d 0a 0d 0a 74 79 70 65 64 65 66 20 76 6f if....typedef vo
05c0: 69 64 20 28 2a 53 51 4c 49 54 45 55 53 45 52 46 id (*SQLITEUSERF
05d0: 55 4e 43 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e UNC)(sqlite3_con
05e0: 74 65 78 74 20 2a 2c 20 69 6e 74 2c 20 73 71 6c text *, int, sql
05f0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 29 3b 0d ite3_value **);.
0600: 0a 74 79 70 65 64 65 66 20 76 6f 69 64 20 28 2a .typedef void (*
0610: 53 51 4c 49 54 45 46 55 4e 43 46 49 4e 41 4c 29 SQLITEFUNCFINAL)
0620: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 (sqlite3_context
0630: 20 2a 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 *);....#if defi
0640: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 ned(INTEROP_DEBU
0650: 47 29 20 7c 7c 20 64 65 66 69 6e 65 64 28 49 4e G) || defined(IN
0660: 54 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c 49 TEROP_LOG)..SQLI
0670: 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 TE_PRIVATE void
0680: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
0690: 62 75 67 28 63 6f 6e 73 74 20 63 68 61 72 20 2a bug(const char *
06a0: 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0d 0a zFormat, ...){..
06b0: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 20 20 20 va_list ap;
06c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
06d0: 20 20 20 20 20 20 2f 2a 20 56 61 72 61 72 67 20 /* Vararg
06e0: 6c 69 73 74 20 2a 2f 0d 0a 20 20 53 74 72 41 63 list */.. StrAc
06f0: 63 75 6d 20 61 63 63 3b 20 20 20 20 20 20 20 20 cum acc;
0700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f /
0710: 2a 20 53 74 72 69 6e 67 20 61 63 63 75 6d 75 6c * String accumul
0720: 61 74 6f 72 20 2a 2f 0a 20 20 63 68 61 72 20 7a ator */. char z
0730: 4d 73 67 5b 53 51 4c 49 54 45 5f 50 52 49 4e 54 Msg[SQLITE_PRINT
0740: 5f 42 55 46 5f 53 49 5a 45 2a 33 5d 3b 20 2f 2a _BUF_SIZE*3]; /*
0750: 20 43 6f 6d 70 6c 65 74 65 20 6c 6f 67 20 6d 65 Complete log me
0760: 73 73 61 67 65 20 2a 2f 0d 0a 20 20 76 61 5f 73 ssage */.. va_s
0770: 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d 61 74 tart(ap, zFormat
0780: 29 3b 0a 20 20 73 71 6c 69 74 65 33 53 74 72 41 );. sqlite3StrA
0790: 63 63 75 6d 49 6e 69 74 28 26 61 63 63 2c 20 7a ccumInit(&acc, z
07a0: 4d 73 67 2c 20 73 69 7a 65 6f 66 28 7a 4d 73 67 Msg, sizeof(zMsg
07b0: 29 2c 20 30 29 3b 0a 20 20 61 63 63 2e 75 73 65 ), 0);. acc.use
07c0: 4d 61 6c 6c 6f 63 20 3d 20 30 3b 0a 20 20 73 71 Malloc = 0;. sq
07d0: 6c 69 74 65 33 56 58 50 72 69 6e 74 66 28 26 61 lite3VXPrintf(&a
07e0: 63 63 2c 20 30 2c 20 7a 46 6f 72 6d 61 74 2c 20 cc, 0, zFormat,
07f0: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 ap);. va_end(ap
0800: 29 3b 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 );.#if SQLITE_VE
0810: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 RSION_NUMBER >=
0820: 33 30 30 37 30 31 33 0a 20 20 73 71 6c 69 74 65 3007013. sqlite
0830: 33 5f 77 69 6e 33 32 5f 77 72 69 74 65 5f 64 65 3_win32_write_de
0840: 62 75 67 28 73 71 6c 69 74 65 33 53 74 72 41 63 bug(sqlite3StrAc
0850: 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 2c cumFinish(&acc),
0860: 20 2d 31 29 3b 0a 23 65 6c 69 66 20 64 65 66 69 -1);.#elif defi
0870: 6e 65 64 28 53 51 4c 49 54 45 5f 57 49 4e 33 32 ned(SQLITE_WIN32
0880: 5f 48 41 53 5f 41 4e 53 49 29 0a 20 20 4f 75 74 _HAS_ANSI). Out
0890: 70 75 74 44 65 62 75 67 53 74 72 69 6e 67 41 28 putDebugStringA(
08a0: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 sqlite3StrAccumF
08b0: 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0a 23 65 inish(&acc));.#e
08c0: 6c 69 66 20 64 65 66 69 6e 65 64 28 53 51 4c 49 lif defined(SQLI
08d0: 54 45 5f 57 49 4e 33 32 5f 48 41 53 5f 57 49 44 TE_WIN32_HAS_WID
08e0: 45 29 0a 20 20 7b 0a 20 20 20 20 4c 50 57 53 54 E). {. LPWST
08f0: 52 20 7a 57 69 64 65 4d 73 67 20 3d 20 75 74 66 R zWideMsg = utf
0900: 38 54 6f 55 6e 69 63 6f 64 65 28 73 71 6c 69 74 8ToUnicode(sqlit
0910: 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 e3StrAccumFinish
0920: 28 26 61 63 63 29 29 3b 0a 20 20 20 20 69 66 28 (&acc));. if(
0930: 20 7a 57 69 64 65 4d 73 67 20 29 7b 0a 20 20 20 zWideMsg ){.
0940: 20 20 20 4f 75 74 70 75 74 44 65 62 75 67 53 74 OutputDebugSt
0950: 72 69 6e 67 57 28 7a 57 69 64 65 4d 73 67 29 3b ringW(zWideMsg);
0960: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 . sqlite3_f
0970: 72 65 65 28 7a 57 69 64 65 4d 73 67 29 3b 0a 20 ree(zWideMsg);.
0980: 20 20 20 7d 0a 20 20 7d 0a 23 65 6c 73 65 0a 20 }. }.#else.
0990: 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c fprintf(stderr,
09a0: 20 22 25 73 22 2c 20 73 71 6c 69 74 65 33 53 74 "%s", sqlite3St
09b0: 72 41 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 rAccumFinish(&ac
09c0: 63 29 29 3b 0a 23 65 6e 64 69 66 0a 7d 0d 0a 23 c));.#endif.}..#
09d0: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 endif....#if def
09e0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 ined(INTEROP_LOG
09f0: 29 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 )..SQLITE_PRIVAT
0a00: 45 20 69 6e 74 20 6c 6f 67 43 6f 6e 66 69 67 75 E int logConfigu
0a10: 72 65 64 20 3d 20 30 3b 0d 0a 0d 0a 53 51 4c 49 red = 0;....SQLI
0a20: 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 TE_PRIVATE void
0a30: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 4c 6f sqlite3InteropLo
0a40: 67 43 61 6c 6c 62 61 63 6b 28 76 6f 69 64 20 2a gCallback(void *
0a50: 70 41 72 67 2c 20 69 6e 74 20 69 43 6f 64 65 2c pArg, int iCode,
0a60: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4d 73 const char *zMs
0a70: 67 29 7b 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e g){.. sqlite3In
0a80: 74 65 72 6f 70 44 65 62 75 67 28 22 49 4e 54 45 teropDebug("INTE
0a90: 52 4f 50 5f 4c 4f 47 20 28 25 64 29 20 25 73 5c ROP_LOG (%d) %s\
0aa0: 6e 22 2c 20 69 43 6f 64 65 2c 20 7a 4d 73 67 29 n", iCode, zMsg)
0ab0: 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a ;..}..#endif....
0ac0: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 SQLITE_API int W
0ad0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6d 61 INAPI sqlite3_ma
0ae0: 6c 6c 6f 63 5f 73 69 7a 65 5f 69 6e 74 65 72 6f lloc_size_intero
0af0: 70 28 76 6f 69 64 20 2a 70 29 7b 0d 0a 20 20 72 p(void *p){.. r
0b00: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 4d 61 6c eturn sqlite3Mal
0b10: 6c 6f 63 53 69 7a 65 28 70 29 3b 0d 0a 7d 0d 0a locSize(p);..}..
0b20: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
0b30: 54 45 52 4f 50 5f 4c 45 47 41 43 59 5f 43 4c 4f TEROP_LEGACY_CLO
0b40: 53 45 29 20 7c 7c 20 53 51 4c 49 54 45 5f 56 45 SE) || SQLITE_VE
0b50: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 RSION_NUMBER < 3
0b60: 30 30 37 30 31 34 0d 0a 53 51 4c 49 54 45 5f 50 007014..SQLITE_P
0b70: 52 49 56 41 54 45 20 76 6f 69 64 20 2a 20 73 71 RIVATE void * sq
0b80: 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 lite3DbMallocZer
0b90: 6f 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 o_interop(sqlite
0ba0: 33 20 2a 64 62 2c 20 69 6e 74 20 6e 29 0d 0a 7b 3 *db, int n)..{
0bb0: 0d 0a 20 20 76 6f 69 64 20 2a 70 3b 0d 0a 20 20 .. void *p;..
0bc0: 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 if (db) {.. s
0bd0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 qlite3_mutex_ent
0be0: 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a er(db->mutex);..
0bf0: 20 20 7d 0d 0a 20 20 70 20 3d 20 73 71 6c 69 74 }.. p = sqlit
0c00: 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 28 64 e3DbMallocZero(d
0c10: 62 2c 6e 29 3b 0d 0a 20 20 69 66 20 28 64 62 29 b,n);.. if (db)
0c20: 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f {.. sqlite3_
0c30: 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e mutex_leave(db->
0c40: 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 mutex);.. }..
0c50: 72 65 74 75 72 6e 20 70 3b 0d 0a 7d 0d 0a 0d 0a return p;..}....
0c60: 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 SQLITE_PRIVATE v
0c70: 6f 69 64 20 73 71 6c 69 74 65 33 44 62 46 72 65 oid sqlite3DbFre
0c80: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 e_interop(sqlite
0c90: 33 20 2a 64 62 2c 20 76 6f 69 64 20 2a 70 29 0d 3 *db, void *p).
0ca0: 0a 7b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d .{.. if (db) {.
0cb0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 . sqlite3_mut
0cc0: 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 ex_enter(db->mut
0cd0: 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 69 66 20 ex);.. }.. if
0ce0: 28 70 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 (p) {.. sqlit
0cf0: 65 33 4d 65 6d 64 65 62 75 67 53 65 74 54 79 70 e3MemdebugSetTyp
0d00: 65 28 70 2c 20 4d 45 4d 54 59 50 45 5f 44 42 7c e(p, MEMTYPE_DB|
0d10: 4d 45 4d 54 59 50 45 5f 48 45 41 50 29 3b 0d 0a MEMTYPE_HEAP);..
0d20: 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 44 62 }.. sqlite3Db
0d30: 46 72 65 65 28 64 62 2c 70 29 3b 0d 0a 20 20 69 Free(db,p);.. i
0d40: 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71 f (db) {.. sq
0d50: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 lite3_mutex_leav
0d60: 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 e(db->mutex);..
0d70: 20 7d 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d }..}..#endif...
0d80: 0a 2f 2a 0d 0a 20 20 20 20 54 68 65 20 67 6f 61 ./*.. The goa
0d90: 6c 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f l of this versio
0da0: 6e 20 6f 66 20 63 6c 6f 73 65 20 69 73 20 64 69 n of close is di
0db0: 66 66 65 72 65 6e 74 20 74 68 61 6e 20 74 68 61 fferent than tha
0dc0: 74 20 6f 66 20 73 71 6c 69 74 65 33 5f 63 6c 6f t of sqlite3_clo
0dd0: 73 65 28 29 2c 20 61 6e 64 20 69 73 20 64 65 73 se(), and is des
0de0: 69 67 6e 65 64 20 74 6f 20 6c 65 6e 64 20 69 74 igned to lend it
0df0: 73 65 6c 66 20 62 65 74 74 65 72 20 74 6f 20 2e self better to .
0e00: 4e 45 54 27 73 20 6e 6f 6e 2d 64 65 74 65 72 6d NET's non-determ
0e10: 69 6e 69 73 74 69 63 20 66 69 6e 61 6c 69 7a 65 inistic finalize
0e20: 72 73 20 61 6e 64 0d 0a 20 20 20 20 74 68 65 20 rs and.. the
0e30: 47 43 20 74 68 72 65 61 64 2e 20 20 53 51 4c 69 GC thread. SQLi
0e40: 74 65 20 77 69 6c 6c 20 6e 6f 74 20 63 6c 6f 73 te will not clos
0e50: 65 20 61 20 64 61 74 61 62 61 73 65 20 69 66 20 e a database if
0e60: 73 74 61 74 65 6d 65 6e 74 73 20 61 72 65 20 6f statements are o
0e70: 70 65 6e 20 6f 6e 20 69 74 20 2d 2d 20 62 75 74 pen on it -- but
0e80: 20 66 6f 72 20 6f 75 72 20 70 75 72 70 6f 73 65 for our purpose
0e90: 73 2c 20 77 65 27 64 20 72 61 74 68 65 72 20 66 s, we'd rather f
0ea0: 69 6e 61 6c 69 7a 65 20 61 6c 6c 20 61 63 74 69 inalize all acti
0eb0: 76 65 20 73 74 61 74 65 6d 65 6e 74 73 0d 0a 20 ve statements..
0ec0: 20 20 20 61 6e 64 20 66 6f 72 63 69 62 6c 79 20 and forcibly
0ed0: 63 6c 6f 73 65 20 74 68 65 20 64 61 74 61 62 61 close the databa
0ee0: 73 65 2e 20 20 54 68 65 20 72 65 61 73 6f 6e 20 se. The reason
0ef0: 69 73 20 73 69 6d 70 6c 65 20 2d 2d 20 61 20 6c is simple -- a l
0f00: 6f 74 20 6f 66 20 70 65 6f 70 6c 65 20 64 6f 6e ot of people don
0f10: 27 74 20 44 69 73 70 6f 73 65 28 29 20 6f 66 20 't Dispose() of
0f20: 74 68 65 69 72 20 6f 62 6a 65 63 74 73 20 63 6f their objects co
0f30: 72 72 65 63 74 6c 79 20 61 6e 64 20 6c 65 74 20 rrectly and let
0f40: 74 68 65 20 67 61 72 62 61 67 65 20 63 6f 6c 6c the garbage coll
0f50: 65 63 74 6f 72 0d 0a 20 20 20 20 64 6f 20 69 74 ector.. do it
0f60: 2e 20 20 54 68 69 73 20 6c 65 61 64 73 20 74 6f . This leads to
0f70: 20 75 6e 65 78 70 65 63 74 65 64 20 62 65 68 61 unexpected beha
0f80: 76 69 6f 72 20 77 68 65 6e 20 61 20 75 73 65 72 vior when a user
0f90: 20 74 68 69 6e 6b 73 20 74 68 65 79 27 76 65 20 thinks they've
0fa0: 63 6c 6f 73 65 64 20 61 20 64 61 74 61 62 61 73 closed a databas
0fb0: 65 2c 20 62 75 74 20 69 74 27 73 20 73 74 69 6c e, but it's stil
0fc0: 6c 20 6f 70 65 6e 20 62 65 63 61 75 73 65 20 6e l open because n
0fd0: 6f 74 20 61 6c 6c 20 74 68 65 20 73 74 61 74 65 ot all the state
0fe0: 6d 65 6e 74 73 20 68 61 76 65 0d 0a 20 20 20 20 ments have..
0ff0: 68 69 74 20 74 68 65 20 47 43 20 79 65 74 2e 0d hit the GC yet..
1000: 0a 0d 0a 20 20 20 20 53 6f 2c 20 68 65 72 65 20 ... So, here
1010: 77 65 20 68 61 76 65 20 61 20 70 72 6f 62 6c 65 we have a proble
1020: 6d 20 2e 2e 2e 20 2e 4e 45 54 20 68 61 73 20 61 m ... .NET has a
1030: 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 79 20 pointer to any
1040: 6e 75 6d 62 65 72 20 6f 66 20 73 71 6c 69 74 65 number of sqlite
1050: 33 5f 73 74 6d 74 20 6f 62 6a 65 63 74 73 2e 20 3_stmt objects.
1060: 20 57 65 20 63 61 6e 27 74 20 63 61 6c 6c 20 73 We can't call s
1070: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 qlite3_finalize(
1080: 29 20 6f 6e 20 74 68 65 73 65 20 62 65 63 61 75 ) on these becau
1090: 73 65 0d 0a 20 20 20 20 74 68 65 69 72 20 6d 65 se.. their me
10a0: 6d 6f 72 79 20 69 73 20 66 72 65 65 64 20 61 6e mory is freed an
10b0: 64 20 63 61 6e 20 62 65 20 75 73 65 64 20 66 6f d can be used fo
10c0: 72 20 73 6f 6d 65 74 68 69 6e 67 20 65 6c 73 65 r something else
10d0: 2e 20 20 54 68 65 20 47 43 20 74 68 72 65 61 64 . The GC thread
10e0: 20 63 6f 75 6c 64 20 70 6f 74 65 6e 74 69 61 6c could potential
10f0: 6c 79 20 74 72 79 20 61 6e 64 20 63 61 6c 6c 20 ly try and call
1100: 66 69 6e 61 6c 69 7a 65 20 61 67 61 69 6e 20 6f finalize again o
1110: 6e 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 20 n the statement
1120: 61 66 74 65 72 0d 0a 20 20 20 20 74 68 61 74 20 after.. that
1130: 6d 65 6d 6f 72 79 20 77 61 73 20 64 65 61 6c 6c memory was deall
1140: 6f 63 61 74 65 64 2e 20 20 42 41 44 2e 20 20 53 ocated. BAD. S
1150: 6f 2c 20 77 68 61 74 20 77 65 20 6e 65 65 64 20 o, what we need
1160: 74 6f 20 64 6f 20 69 73 20 6d 61 6b 65 20 61 20 to do is make a
1170: 63 6f 70 79 20 6f 66 20 65 61 63 68 20 73 74 61 copy of each sta
1180: 74 65 6d 65 6e 74 2c 20 61 6e 64 20 63 61 6c 6c tement, and call
1190: 20 66 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74 finalize() on t
11a0: 68 65 20 63 6f 70 79 20 2d 2d 20 73 6f 20 74 68 he copy -- so th
11b0: 61 74 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 0d at the original.
11c0: 0a 20 20 20 20 73 74 61 74 65 6d 65 6e 74 27 73 . statement's
11d0: 20 6d 65 6d 6f 72 79 20 69 73 20 70 72 65 73 65 memory is prese
11e0: 72 76 65 64 2c 20 61 6e 64 20 6d 61 72 6b 65 64 rved, and marked
11f0: 20 61 73 20 42 41 44 2c 20 62 75 74 20 77 65 20 as BAD, but we
1200: 63 61 6e 20 73 74 69 6c 6c 20 6d 61 6e 61 67 65 can still manage
1210: 20 74 6f 20 66 69 6e 61 6c 69 7a 65 20 65 76 65 to finalize eve
1220: 72 79 74 68 69 6e 67 20 61 6e 64 20 66 6f 72 63 rything and forc
1230: 69 62 6c 79 20 63 6c 6f 73 65 20 74 68 65 20 64 ibly close the d
1240: 61 74 61 62 61 73 65 2e 20 20 4c 61 74 65 72 20 atabase. Later
1250: 77 68 65 6e 20 74 68 65 20 0d 0a 20 20 20 20 47 when the .. G
1260: 43 20 67 65 74 73 20 61 72 6f 75 6e 64 20 74 6f C gets around to
1270: 20 63 61 6c 6c 69 6e 67 20 66 69 6e 61 6c 69 7a calling finaliz
1280: 65 5f 69 6e 74 65 72 6f 70 28 29 20 6f 6e 20 74 e_interop() on t
1290: 68 65 20 22 62 61 64 22 20 73 74 61 74 65 6d 65 he "bad" stateme
12a0: 6e 74 2c 20 77 65 20 64 65 74 65 63 74 20 74 68 nt, we detect th
12b0: 61 74 20 61 6e 64 20 66 69 6e 69 73 68 20 64 65 at and finish de
12c0: 61 6c 6c 6f 63 61 74 69 6e 67 20 74 68 65 20 70 allocating the p
12d0: 6f 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c ointer...*/..SQL
12e0: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
12f0: 50 49 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 PI sqlite3_close
1300: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
1310: 20 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 *db)..{.. int
1320: 72 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e ret;..#if !defin
1330: 65 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 ed(INTEROP_LEGAC
1340: 59 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 Y_CLOSE) && SQLI
1350: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
1360: 52 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a R >= 3007014....
1370: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
1380: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 ROP_DEBUG) && (I
1390: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 NTEROP_DEBUG & I
13a0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f NTEROP_DEBUG_CLO
13b0: 53 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e SE).. sqlite3In
13c0: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 teropDebug("sqli
13d0: 74 65 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f te3_close_intero
13e0: 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c p(): calling sql
13f0: 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70 ite3_close_v2(%p
1400: 29 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 )...\n", db);..#
1410: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d endif.... ret =
1420: 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 sqlite3_close_v
1430: 32 28 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 2(db);....#if de
1440: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 fined(INTEROP_DE
1450: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 BUG) && (INTEROP
1460: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 _DEBUG & INTEROP
1470: 5f 44 45 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 _DEBUG_CLOSE)..
1480: 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 sqlite3InteropD
1490: 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 6c ebug("sqlite3_cl
14a0: 6f 73 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 ose_interop(): s
14b0: 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 qlite3_close_v2(
14c0: 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e %p) returned %d.
14d0: 5c 6e 22 2c 20 64 62 2c 20 72 65 74 29 3b 0d 0a \n", db, ret);..
14e0: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 #endif.... retu
14f0: 72 6e 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a rn ret;..#else..
1500: 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f ret = sqlite3_
1510: 63 6c 6f 73 65 28 64 62 29 3b 0d 0a 0d 0a 20 20 close(db);....
1520: 69 66 20 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 if (ret == SQLIT
1530: 45 5f 42 55 53 59 29 0d 0a 20 20 7b 0d 0a 20 20 E_BUSY).. {..
1540: 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f sqlite3_mutex_
1550: 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 enter(db->mutex)
1560: 3b 0d 0a 0d 0a 20 20 20 20 69 66 20 28 21 64 62 ;.... if (!db
1570: 2d 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d ->pVdbe).. {.
1580: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d . sqlite3_m
1590: 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d utex_leave(db->m
15a0: 75 74 65 78 29 3b 0d 0a 20 20 20 20 20 20 72 65 utex);.. re
15b0: 74 75 72 6e 20 72 65 74 3b 0d 0a 20 20 20 20 7d turn ret;.. }
15c0: 0d 0a 0d 0a 20 20 20 20 77 68 69 6c 65 20 28 64 .... while (d
15d0: 62 2d 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b b->pVdbe).. {
15e0: 0d 0a 20 20 20 20 20 20 2f 2a 20 4d 61 6b 65 20 .. /* Make
15f0: 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 66 69 a copy of the fi
1600: 72 73 74 20 70 72 65 70 61 72 65 64 20 73 74 61 rst prepared sta
1610: 74 65 6d 65 6e 74 20 2a 2f 0d 0a 20 20 20 20 20 tement */..
1620: 20 56 64 62 65 20 2a 70 20 3d 20 28 56 64 62 65 Vdbe *p = (Vdbe
1630: 20 2a 29 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c *)sqlite3DbMall
1640: 6f 63 5a 65 72 6f 5f 69 6e 74 65 72 6f 70 28 64 ocZero_interop(d
1650: 62 2c 20 73 69 7a 65 6f 66 28 56 64 62 65 29 29 b, sizeof(Vdbe))
1660: 3b 0d 0a 20 20 20 20 20 20 56 64 62 65 20 2a 70 ;.. Vdbe *p
1670: 6f 20 3d 20 64 62 2d 3e 70 56 64 62 65 3b 0d 0a o = db->pVdbe;..
1680: 0d 0a 20 20 20 20 20 20 69 66 20 28 21 70 29 20 .. if (!p)
1690: 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 .. {..
16a0: 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f ret = SQLITE_
16b0: 4e 4f 4d 45 4d 3b 0d 0a 20 20 20 20 20 20 20 20 NOMEM;..
16c0: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d break;.. }.
16d0: 0a 0d 0a 20 20 20 20 20 20 43 6f 70 79 4d 65 6d ... CopyMem
16e0: 6f 72 79 28 70 2c 20 70 6f 2c 20 73 69 7a 65 6f ory(p, po, sizeo
16f0: 66 28 56 64 62 65 29 29 3b 0d 0a 0d 0a 20 20 20 f(Vdbe));....
1700: 20 20 20 2f 2a 20 50 75 74 20 69 74 20 6f 6e 20 /* Put it on
1710: 74 68 65 20 63 68 61 69 6e 20 73 6f 20 77 65 20 the chain so we
1720: 63 61 6e 20 66 72 65 65 20 69 74 20 2a 2f 0d 0a can free it */..
1730: 20 20 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 db->pVdbe
1740: 3d 20 70 3b 0d 0a 20 20 20 20 20 20 72 65 74 20 = p;.. ret
1750: 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 = sqlite3_finali
1760: 7a 65 28 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 ze((sqlite3_stmt
1770: 20 2a 29 70 29 3b 20 2f 2a 20 54 68 69 73 20 77 *)p); /* This w
1780: 69 6c 6c 20 61 6c 73 6f 20 66 72 65 65 20 74 68 ill also free th
1790: 65 20 63 6f 70 79 27 73 20 6d 65 6d 6f 72 79 20 e copy's memory
17a0: 2a 2f 0d 0a 20 20 20 20 20 20 69 66 20 28 72 65 */.. if (re
17b0: 74 29 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 t).. {..
17c0: 20 20 20 20 20 2f 2a 20 66 69 6e 61 6c 69 7a 65 /* finalize
17d0: 20 66 61 69 6c 65 64 20 2d 2d 20 73 6f 20 77 65 failed -- so we
17e0: 20 6d 75 73 74 20 70 75 74 20 62 61 63 6b 20 61 must put back a
17f0: 6e 79 74 68 69 6e 67 20 77 65 20 6d 75 6e 67 65 nything we munge
1800: 64 20 2a 2f 0d 0a 20 20 20 20 20 20 20 20 43 6f d */.. Co
1810: 70 79 4d 65 6d 6f 72 79 28 70 6f 2c 20 70 2c 20 pyMemory(po, p,
1820: 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a sizeof(Vdbe));..
1830: 20 20 20 20 20 20 20 20 64 62 2d 3e 70 56 64 62 db->pVdb
1840: 65 20 3d 20 70 6f 3b 0d 0a 0d 0a 20 20 20 20 20 e = po;....
1850: 20 20 20 2f 2a 0d 0a 20 20 20 20 20 20 20 20 2a /*.. *
1860: 2a 20 4e 4f 54 45 3a 20 4f 6b 2c 20 77 65 20 6d * NOTE: Ok, we m
1870: 75 73 74 20 66 72 65 65 20 74 68 69 73 20 62 6c ust free this bl
1880: 6f 63 6b 20 74 68 61 74 20 2a 77 65 2a 20 61 6c ock that *we* al
1890: 6c 6f 63 61 74 65 64 20 28 61 62 6f 76 65 29 20 located (above)
18a0: 73 69 6e 63 65 0d 0a 20 20 20 20 20 20 20 20 2a since.. *
18b0: 2a 20 20 20 20 20 20 20 66 69 6e 61 6c 69 7a 65 * finalize
18c0: 20 64 69 64 20 6e 6f 74 20 64 6f 20 73 6f 2e 0d did not do so..
18d0: 0a 20 20 20 20 20 20 20 20 2a 2f 0d 0a 20 20 20 . */..
18e0: 20 20 20 20 20 73 71 6c 69 74 65 33 44 62 46 72 sqlite3DbFr
18f0: 65 65 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20 70 ee_interop(db, p
1900: 29 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 65 61 );.. brea
1910: 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 k;.. }..
1920: 20 20 20 65 6c 73 65 0d 0a 20 20 20 20 20 20 7b else.. {
1930: 0d 0a 20 20 20 20 20 20 20 20 5a 65 72 6f 4d 65 .. ZeroMe
1940: 6d 6f 72 79 28 70 6f 2c 20 73 69 7a 65 6f 66 28 mory(po, sizeof(
1950: 56 64 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 20 Vdbe));..
1960: 20 70 6f 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42 po->magic = VDB
1970: 45 5f 4d 41 47 49 43 5f 44 45 41 44 3b 0d 0a 20 E_MAGIC_DEAD;..
1980: 20 20 20 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 }.. }..
1990: 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 sqlite3_mutex
19a0: 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 _leave(db->mutex
19b0: 29 3b 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 );.. ret = sq
19c0: 6c 69 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b lite3_close(db);
19d0: 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 .. }.. return
19e0: 72 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d ret;..#endif..}.
19f0: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 ...#if defined(I
1a00: 4e 54 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c NTEROP_LOG)..SQL
1a10: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
1a20: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 PI sqlite3_confi
1a30: 67 5f 6c 6f 67 5f 69 6e 74 65 72 6f 70 28 29 0d g_log_interop().
1a40: 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a .{.. int ret;..
1a50: 20 20 69 66 28 20 21 6c 6f 67 43 6f 6e 66 69 67 if( !logConfig
1a60: 75 72 65 64 20 29 7b 0d 0a 20 20 20 20 72 65 74 ured ){.. ret
1a70: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 = sqlite3_confi
1a80: 67 28 53 51 4c 49 54 45 5f 43 4f 4e 46 49 47 5f g(SQLITE_CONFIG_
1a90: 4c 4f 47 2c 20 73 71 6c 69 74 65 33 49 6e 74 65 LOG, sqlite3Inte
1aa0: 72 6f 70 4c 6f 67 43 61 6c 6c 62 61 63 6b 2c 20 ropLogCallback,
1ab0: 30 29 3b 0d 0a 20 20 20 20 69 66 28 20 72 65 74 0);.. if( ret
1ac0: 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a ==SQLITE_OK ){..
1ad0: 20 20 20 20 20 20 6c 6f 67 43 6f 6e 66 69 67 75 logConfigu
1ae0: 72 65 64 20 3d 20 31 3b 0d 0a 20 20 20 20 7d 65 red = 1;.. }e
1af0: 6c 73 65 7b 0d 0a 20 20 20 20 20 20 73 71 6c 69 lse{.. sqli
1b00: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 te3InteropDebug(
1b10: 22 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f "sqlite3_config_
1b20: 6c 6f 67 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 log_interop(): s
1b30: 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 28 53 51 qlite3_config(SQ
1b40: 4c 49 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f 47 29 LITE_CONFIG_LOG)
1b50: 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 returned %d.\n"
1b60: 2c 20 72 65 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a , ret);.. }..
1b70: 20 20 7d 65 6c 73 65 7b 0d 0a 20 20 20 20 72 65 }else{.. re
1b80: 74 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a t = SQLITE_OK;..
1b90: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 }.. return re
1ba0: 74 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d t;..}..#endif...
1bb0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 .SQLITE_API int
1bc0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6f WINAPI sqlite3_o
1bd0: 70 65 6e 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73 pen_interop(cons
1be0: 74 20 63 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65 t char *filename
1bf0: 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 73 71 6c , int flags, sql
1c00: 69 74 65 33 20 2a 2a 70 70 64 62 29 0d 0a 7b 0d ite3 **ppdb)..{.
1c10: 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 . int ret;....#
1c20: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
1c30: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e OP_DEBUG) && (IN
1c40: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
1c50: 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e TEROP_DEBUG_OPEN
1c60: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 ).. sqlite3Inte
1c70: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 ropDebug("sqlite
1c80: 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 29 3_open_interop()
1c90: 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 : calling sqlite
1ca0: 33 5f 6f 70 65 6e 5f 76 32 28 5c 22 25 73 5c 22 3_open_v2(\"%s\"
1cb0: 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c , %d, %p)...\n",
1cc0: 20 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 filename, flags
1cd0: 2c 20 70 70 64 62 29 3b 0d 0a 23 65 6e 64 69 66 , ppdb);..#endif
1ce0: 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 .... ret = sqli
1cf0: 74 65 33 5f 6f 70 65 6e 5f 76 32 28 66 69 6c 65 te3_open_v2(file
1d00: 6e 61 6d 65 2c 20 70 70 64 62 2c 20 66 6c 61 67 name, ppdb, flag
1d10: 73 2c 20 4e 55 4c 4c 29 3b 0d 0a 0d 0a 23 69 66 s, NULL);....#if
1d20: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
1d30: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 _DEBUG) && (INTE
1d40: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 ROP_DEBUG & INTE
1d50: 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 29 0d ROP_DEBUG_OPEN).
1d60: 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f . sqlite3Intero
1d70: 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f pDebug("sqlite3_
1d80: 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 29 3a 20 open_interop():
1d90: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 76 32 28 sqlite3_open_v2(
1da0: 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 \"%s\", %d, %p)
1db0: 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c returned %d.\n",
1dc0: 20 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 filename, flags
1dd0: 2c 20 70 70 64 62 2c 20 72 65 74 29 3b 0d 0a 23 , ppdb, ret);..#
1de0: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 endif....#if def
1df0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 45 58 54 ined(INTEROP_EXT
1e00: 45 4e 53 49 4f 4e 5f 46 55 4e 43 54 49 4f 4e 53 ENSION_FUNCTIONS
1e10: 29 0d 0a 20 20 69 66 20 28 72 65 74 20 3d 3d 20 ).. if (ret ==
1e20: 53 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20 20 20 20 SQLITE_OK)..
1e30: 52 65 67 69 73 74 65 72 45 78 74 65 6e 73 69 6f RegisterExtensio
1e40: 6e 46 75 6e 63 74 69 6f 6e 73 28 2a 70 70 64 62 nFunctions(*ppdb
1e50: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 );..#endif....
1e60: 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a return ret;..}..
1e70: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 ..SQLITE_API int
1e80: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
1e90: 6f 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70 28 63 open16_interop(c
1ea0: 6f 6e 73 74 20 63 68 61 72 20 2a 66 69 6c 65 6e onst char *filen
1eb0: 61 6d 65 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 ame, int flags,
1ec0: 73 71 6c 69 74 65 33 20 2a 2a 70 70 64 62 29 0d sqlite3 **ppdb).
1ed0: 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a .{.. int ret;..
1ee0: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
1ef0: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 TEROP_DEBUG) &&
1f00: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 (INTEROP_DEBUG &
1f10: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f INTEROP_DEBUG_O
1f20: 50 45 4e 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 PEN16).. sqlite
1f30: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 3InteropDebug("s
1f40: 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36 5f 69 6e qlite3_open16_in
1f50: 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 terop(): calling
1f60: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e sqlite3_open_in
1f70: 74 65 72 6f 70 28 5c 22 25 73 5c 22 2c 20 25 64 terop(\"%s\", %d
1f80: 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 66 69 6c , %p)...\n", fil
1f90: 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 ename, flags, pp
1fa0: 64 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a db);..#endif....
1fb0: 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f ret = sqlite3_
1fc0: 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 66 69 6c open_interop(fil
1fd0: 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 70 70 ename, flags, pp
1fe0: 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 db);....#if defi
1ff0: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 ned(INTEROP_DEBU
2000: 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 G) && (INTEROP_D
2010: 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 EBUG & INTEROP_D
2020: 45 42 55 47 5f 4f 50 45 4e 31 36 29 0d 0a 20 20 EBUG_OPEN16)..
2030: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
2040: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f 70 65 bug("sqlite3_ope
2050: 6e 31 36 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 n16_interop(): s
2060: 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 qlite3_open_inte
2070: 72 6f 70 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20 rop(\"%s\", %d,
2080: 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e %p) returned %d.
2090: 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 66 \n", filename, f
20a0: 6c 61 67 73 2c 20 70 70 64 62 2c 20 72 65 74 29 lags, ppdb, ret)
20b0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 ;..#endif.... i
20c0: 66 20 28 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 f ((ret == SQLIT
20d0: 45 5f 4f 4b 29 20 26 26 20 21 44 62 48 61 73 50 E_OK) && !DbHasP
20e0: 72 6f 70 65 72 74 79 28 2a 70 70 64 62 2c 20 30 roperty(*ppdb, 0
20f0: 2c 20 44 42 5f 53 63 68 65 6d 61 4c 6f 61 64 65 , DB_SchemaLoade
2100: 64 29 29 0d 0a 20 20 20 20 45 4e 43 28 2a 70 70 d)).. ENC(*pp
2110: 64 62 29 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 db) = SQLITE_UTF
2120: 31 36 4e 41 54 49 56 45 3b 0d 0a 0d 0a 20 20 72 16NATIVE;.... r
2130: 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d eturn ret;..}...
2140: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
2150: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 t char * WINAPI
2160: 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 5f 69 sqlite3_errmsg_i
2170: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a nterop(sqlite3 *
2180: 64 62 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a db, int *plen)..
2190: 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 {.. const char
21a0: 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f *pval = sqlite3_
21b0: 65 72 72 6d 73 67 28 64 62 29 3b 0d 0a 20 20 2a errmsg(db);.. *
21c0: 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 plen = (pval !=
21d0: 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 0) ? strlen(pval
21e0: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e ) : 0;.. return
21f0: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c pval;..}....SQL
2200: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
2210: 50 49 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 PI sqlite3_chang
2220: 65 73 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 es_interop(sqlit
2230: 65 33 20 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e e3 *db)..{.. in
2240: 74 20 72 65 73 75 6c 74 3b 0d 0a 0d 0a 23 69 66 t result;....#if
2250: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
2260: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 _DEBUG) && (INTE
2270: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 ROP_DEBUG & INTE
2280: 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 ROP_DEBUG_CHANGE
2290: 53 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 S).. sqlite3Int
22a0: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
22b0: 65 33 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65 72 e3_changes_inter
22c0: 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 op(): calling sq
22d0: 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 25 70 lite3_changes(%p
22e0: 29 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 )...\n", db);..#
22f0: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 6e 64 65 66 endif....#ifndef
2300: 20 4e 44 45 42 55 47 0d 0a 20 20 69 66 20 28 21 NDEBUG.. if (!
2310: 64 62 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 db).. sqlit
2320: 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 22 e3InteropBreak("
2330: 6e 75 6c 6c 20 64 61 74 61 62 61 73 65 20 68 61 null database ha
2340: 6e 64 6c 65 20 66 6f 72 20 73 71 6c 69 74 65 33 ndle for sqlite3
2350: 5f 63 68 61 6e 67 65 73 28 29 22 29 3b 0d 0a 23 _changes()");..#
2360: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 73 75 6c endif.... resul
2370: 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 68 61 6e t = sqlite3_chan
2380: 67 65 73 28 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 ges(db);....#if
2390: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f defined(INTEROP_
23a0: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 DEBUG) && (INTER
23b0: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 OP_DEBUG & INTER
23c0: 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 53 OP_DEBUG_CHANGES
23d0: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 ).. sqlite3Inte
23e0: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 ropDebug("sqlite
23f0: 33 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65 72 6f 3_changes_intero
2400: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 63 68 61 p(): sqlite3_cha
2410: 6e 67 65 73 28 25 70 29 20 72 65 74 75 72 6e 65 nges(%p) returne
2420: 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 72 65 d %d.\n", db, re
2430: 73 75 6c 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a sult);..#endif..
2440: 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 73 75 6c .. return resul
2450: 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f t;..}....SQLITE_
2460: 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 API int WINAPI s
2470: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69 qlite3_prepare_i
2480: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a nterop(sqlite3 *
2490: 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a db, const char *
24a0: 73 71 6c 2c 20 69 6e 74 20 6e 62 79 74 65 73 2c sql, int nbytes,
24b0: 20 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 2a sqlite3_stmt **
24c0: 70 70 73 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 ppstmt, const ch
24d0: 61 72 20 2a 2a 70 7a 74 61 69 6c 2c 20 69 6e 74 ar **pztail, int
24e0: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e *plen)..{.. in
24f0: 74 20 6e 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 t n;....#if defi
2500: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 ned(INTEROP_DEBU
2510: 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 G) && (INTEROP_D
2520: 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 EBUG & INTEROP_D
2530: 45 42 55 47 5f 50 52 45 50 41 52 45 29 0d 0a 20 EBUG_PREPARE)..
2540: 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 sqlite3InteropD
2550: 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 70 72 ebug("sqlite3_pr
2560: 65 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a epare_interop():
2570: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 calling sqlite3
2580: 5f 70 72 65 70 61 72 65 28 25 70 2c 20 5c 22 25 _prepare(%p, \"%
2590: 73 5c 22 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c s\", %d, %p)...\
25a0: 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 62 79 n", db, sql, nby
25b0: 74 65 73 2c 20 70 70 73 74 6d 74 29 3b 0d 0a 23 tes, ppstmt);..#
25c0: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 53 51 4c endif....#if SQL
25d0: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 ITE_VERSION_NUMB
25e0: 45 52 20 3e 3d 20 33 30 30 33 30 30 39 0d 0a 20 ER >= 3003009..
25f0: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 n = sqlite3_pre
2600: 70 61 72 65 5f 76 32 28 64 62 2c 20 73 71 6c 2c pare_v2(db, sql,
2610: 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74 2c nbytes, ppstmt,
2620: 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6c 73 65 pztail);..#else
2630: 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f .. n = sqlite3_
2640: 70 72 65 70 61 72 65 28 64 62 2c 20 73 71 6c 2c prepare(db, sql,
2650: 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74 2c nbytes, ppstmt,
2660: 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6e 64 69 pztail);..#endi
2670: 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 f....#if defined
2680: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 (INTEROP_DEBUG)
2690: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 && (INTEROP_DEBU
26a0: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 G & INTEROP_DEBU
26b0: 47 5f 50 52 45 50 41 52 45 29 0d 0a 20 20 73 71 G_PREPARE).. sq
26c0: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 lite3InteropDebu
26d0: 67 28 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 g("sqlite3_prepa
26e0: 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 re_interop(): sq
26f0: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 25 70 lite3_prepare(%p
2700: 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 , \"%s\", %d, %p
2710: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e ) returned %d.\n
2720: 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 62 79 74 ", db, sql, nbyt
2730: 65 73 2c 20 70 70 73 74 6d 74 2c 20 6e 29 3b 0d es, ppstmt, n);.
2740: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 2a 70 6c .#endif.... *pl
2750: 65 6e 20 3d 20 28 2a 70 7a 74 61 69 6c 20 21 3d en = (*pztail !=
2760: 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 0) ? strlen(*pz
2770: 74 61 69 6c 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 tail) : 0;....
2780: 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a return n;..}....
2790: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 SQLITE_API int W
27a0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 70 72 INAPI sqlite3_pr
27b0: 65 70 61 72 65 31 36 5f 69 6e 74 65 72 6f 70 28 epare16_interop(
27c0: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e sqlite3 *db, con
27d0: 73 74 20 76 6f 69 64 20 2a 73 71 6c 2c 20 69 6e st void *sql, in
27e0: 74 20 6e 63 68 61 72 73 2c 20 73 71 6c 69 74 65 t nchars, sqlite
27f0: 33 5f 73 74 6d 74 20 2a 2a 70 70 73 74 6d 74 2c 3_stmt **ppstmt,
2800: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 2a 70 7a const void **pz
2810: 74 61 69 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 tail, int *plen)
2820: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d ..{.. int n;...
2830: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
2840: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 EROP_DEBUG) && (
2850: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 INTEROP_DEBUG &
2860: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 INTEROP_DEBUG_PR
2870: 45 50 41 52 45 31 36 29 0d 0a 20 20 73 71 6c 69 EPARE16).. sqli
2880: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 te3InteropDebug(
2890: 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 "sqlite3_prepare
28a0: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c _interop(): call
28b0: 69 6e 67 20 73 71 6c 69 74 65 33 5f 70 72 65 70 ing sqlite3_prep
28c0: 61 72 65 31 36 28 25 70 2c 20 5c 22 25 73 5c 22 are16(%p, \"%s\"
28d0: 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c , %d, %p)...\n",
28e0: 20 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73 db, sql, nchars
28f0: 2c 20 70 70 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 , ppstmt);..#end
2900: 69 66 0d 0a 0d 0a 23 69 66 20 53 51 4c 49 54 45 if....#if SQLITE
2910: 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 _VERSION_NUMBER
2920: 3e 3d 20 33 30 30 33 30 30 39 0d 0a 20 20 6e 20 >= 3003009.. n
2930: 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 = sqlite3_prepar
2940: 65 31 36 5f 76 32 28 64 62 2c 20 73 71 6c 2c 20 e16_v2(db, sql,
2950: 6e 63 68 61 72 73 20 2a 20 73 69 7a 65 6f 66 28 nchars * sizeof(
2960: 77 63 68 61 72 5f 74 29 2c 20 70 70 73 74 6d 74 wchar_t), ppstmt
2970: 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6c 73 , pztail);..#els
2980: 65 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 e.. n = sqlite3
2990: 5f 70 72 65 70 61 72 65 31 36 28 64 62 2c 20 73 _prepare16(db, s
29a0: 71 6c 2c 20 6e 63 68 61 72 73 20 2a 20 73 69 7a ql, nchars * siz
29b0: 65 6f 66 28 77 63 68 61 72 5f 74 29 2c 20 70 70 eof(wchar_t), pp
29c0: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a stmt, pztail);..
29d0: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 #endif....#if de
29e0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 fined(INTEROP_DE
29f0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 BUG) && (INTEROP
2a00: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 _DEBUG & INTEROP
2a10: 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 31 36 _DEBUG_PREPARE16
2a20: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 ).. sqlite3Inte
2a30: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 ropDebug("sqlite
2a40: 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 72 6f 3_prepare_intero
2a50: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 70 72 65 p(): sqlite3_pre
2a60: 70 61 72 65 31 36 28 25 70 2c 20 5c 22 25 73 5c pare16(%p, \"%s\
2a70: 22 2c 20 25 64 2c 20 25 70 29 20 72 65 74 75 72 ", %d, %p) retur
2a80: 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 ned %d.\n", db,
2a90: 73 71 6c 2c 20 6e 63 68 61 72 73 2c 20 70 70 73 sql, nchars, pps
2aa0: 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65 6e 64 69 66 tmt, n);..#endif
2ab0: 0d 0a 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 2a .... *plen = (*
2ac0: 70 7a 74 61 69 6c 20 21 3d 20 30 29 20 3f 20 77 pztail != 0) ? w
2ad0: 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a cslen((wchar_t *
2ae0: 29 2a 70 7a 74 61 69 6c 29 20 2a 20 73 69 7a 65 )*pztail) * size
2af0: 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b of(wchar_t) : 0;
2b00: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d .... return n;.
2b10: 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 .}....#if define
2b20: 64 28 49 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 d(INTEROP_VIRTUA
2b30: 4c 5f 54 41 42 4c 45 29 20 26 26 20 53 51 4c 49 L_TABLE) && SQLI
2b40: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
2b50: 52 20 3e 3d 20 33 30 30 34 30 30 31 0d 0a 53 51 R >= 3004001..SQ
2b60: 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 2a 57 LITE_API void *W
2b70: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 72 INAPI sqlite3_cr
2b80: 65 61 74 65 5f 64 69 73 70 6f 73 61 62 6c 65 5f eate_disposable_
2b90: 6d 6f 64 75 6c 65 5f 69 6e 74 65 72 6f 70 28 0d module_interop(.
2ba0: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d . sqlite3 *db,.
2bb0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a . const char *z
2bc0: 4e 61 6d 65 2c 0d 0a 20 20 73 71 6c 69 74 65 33 Name,.. sqlite3
2bd0: 5f 6d 6f 64 75 6c 65 20 2a 70 4d 6f 64 75 6c 65 _module *pModule
2be0: 2c 0d 0a 20 20 69 6e 74 20 69 56 65 72 73 69 6f ,.. int iVersio
2bf0: 6e 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43 72 65 n,.. int (*xCre
2c00: 61 74 65 29 28 73 71 6c 69 74 65 33 2a 2c 20 76 ate)(sqlite3*, v
2c10: 6f 69 64 20 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73 oid *, int, cons
2c20: 74 20 63 68 61 72 20 2a 63 6f 6e 73 74 2a 2c 20 t char *const*,
2c30: 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2a 2c sqlite3_vtab **,
2c40: 20 63 68 61 72 2a 2a 29 2c 0d 0a 20 20 69 6e 74 char**),.. int
2c50: 20 28 2a 78 43 6f 6e 6e 65 63 74 29 28 73 71 6c (*xConnect)(sql
2c60: 69 74 65 33 2a 2c 20 76 6f 69 64 20 2a 2c 20 69 ite3*, void *, i
2c70: 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a nt, const char *
2c80: 63 6f 6e 73 74 2a 2c 20 73 71 6c 69 74 65 33 5f const*, sqlite3_
2c90: 76 74 61 62 20 2a 2a 2c 20 63 68 61 72 2a 2a 29 vtab **, char**)
2ca0: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 42 65 73 74 ,.. int (*xBest
2cb0: 49 6e 64 65 78 29 28 73 71 6c 69 74 65 33 5f 76 Index)(sqlite3_v
2cc0: 74 61 62 20 2a 2c 20 73 71 6c 69 74 65 33 5f 69 tab *, sqlite3_i
2cd0: 6e 64 65 78 5f 69 6e 66 6f 2a 29 2c 0d 0a 20 20 ndex_info*),..
2ce0: 69 6e 74 20 28 2a 78 44 69 73 63 6f 6e 6e 65 63 int (*xDisconnec
2cf0: 74 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 t)(sqlite3_vtab
2d00: 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 44 65 *),.. int (*xDe
2d10: 73 74 72 6f 79 29 28 73 71 6c 69 74 65 33 5f 76 stroy)(sqlite3_v
2d20: 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 tab *),.. int (
2d30: 2a 78 4f 70 65 6e 29 28 73 71 6c 69 74 65 33 5f *xOpen)(sqlite3_
2d40: 76 74 61 62 20 2a 2c 20 73 71 6c 69 74 65 33 5f vtab *, sqlite3_
2d50: 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 2a 29 2c vtab_cursor **),
2d60: 0d 0a 20 20 69 6e 74 20 28 2a 78 43 6c 6f 73 65 .. int (*xClose
2d70: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 )(sqlite3_vtab_c
2d80: 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20 ursor*),.. int
2d90: 28 2a 78 46 69 6c 74 65 72 29 28 73 71 6c 69 74 (*xFilter)(sqlit
2da0: 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c e3_vtab_cursor*,
2db0: 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 int, const char
2dc0: 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 33 *, int, sqlite3
2dd0: 5f 76 61 6c 75 65 20 2a 2a 29 2c 0d 0a 20 20 69 _value **),.. i
2de0: 6e 74 20 28 2a 78 4e 65 78 74 29 28 73 71 6c 69 nt (*xNext)(sqli
2df0: 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a te3_vtab_cursor*
2e00: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 45 6f 66 ),.. int (*xEof
2e10: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 )(sqlite3_vtab_c
2e20: 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20 ursor*),.. int
2e30: 28 2a 78 43 6f 6c 75 6d 6e 29 28 73 71 6c 69 74 (*xColumn)(sqlit
2e40: 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c e3_vtab_cursor*,
2e50: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 sqlite3_context
2e60: 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 69 6e 74 20 *, int),.. int
2e70: 28 2a 78 52 6f 77 69 64 29 28 73 71 6c 69 74 65 (*xRowid)(sqlite
2e80: 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c 20 3_vtab_cursor*,
2e90: 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 2a 29 sqlite3_int64 *)
2ea0: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 55 70 64 61 ,.. int (*xUpda
2eb0: 74 65 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 te)(sqlite3_vtab
2ec0: 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 33 *, int, sqlite3
2ed0: 5f 76 61 6c 75 65 20 2a 2a 2c 20 73 71 6c 69 74 _value **, sqlit
2ee0: 65 33 5f 69 6e 74 36 34 20 2a 29 2c 0d 0a 20 20 e3_int64 *),..
2ef0: 69 6e 74 20 28 2a 78 42 65 67 69 6e 29 28 73 71 int (*xBegin)(sq
2f00: 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d 0a lite3_vtab *),..
2f10: 20 20 69 6e 74 20 28 2a 78 53 79 6e 63 29 28 73 int (*xSync)(s
2f20: 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d qlite3_vtab *),.
2f30: 0a 20 20 69 6e 74 20 28 2a 78 43 6f 6d 6d 69 74 . int (*xCommit
2f40: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a )(sqlite3_vtab *
2f50: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 52 6f 6c ),.. int (*xRol
2f60: 6c 62 61 63 6b 29 28 73 71 6c 69 74 65 33 5f 76 lback)(sqlite3_v
2f70: 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 tab *),.. int (
2f80: 2a 78 46 69 6e 64 46 75 6e 63 74 69 6f 6e 29 28 *xFindFunction)(
2f90: 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 sqlite3_vtab *,
2fa0: 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 int, const char
2fb0: 2a 2c 20 76 6f 69 64 20 28 2a 2a 70 78 46 75 6e *, void (**pxFun
2fc0: 63 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 c)(sqlite3_conte
2fd0: 78 74 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 xt*, int, sqlite
2fe0: 33 5f 76 61 6c 75 65 2a 2a 29 2c 20 76 6f 69 64 3_value**), void
2ff0: 20 2a 2a 70 70 41 72 67 29 2c 0d 0a 20 20 69 6e **ppArg),.. in
3000: 74 20 28 2a 78 52 65 6e 61 6d 65 29 28 73 71 6c t (*xRename)(sql
3010: 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 63 6f 6e ite3_vtab *, con
3020: 73 74 20 63 68 61 72 20 2a 29 2c 0d 0a 20 20 69 st char *),.. i
3030: 6e 74 20 28 2a 78 53 61 76 65 70 6f 69 6e 74 29 nt (*xSavepoint)
3040: 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c (sqlite3_vtab *,
3050: 20 69 6e 74 29 2c 0d 0a 20 20 69 6e 74 20 28 2a int),.. int (*
3060: 78 52 65 6c 65 61 73 65 29 28 73 71 6c 69 74 65 xRelease)(sqlite
3070: 33 5f 76 74 61 62 20 2a 2c 20 69 6e 74 29 2c 0d 3_vtab *, int),.
3080: 0a 20 20 69 6e 74 20 28 2a 78 52 6f 6c 6c 62 61 . int (*xRollba
3090: 63 6b 54 6f 29 28 73 71 6c 69 74 65 33 5f 76 74 ckTo)(sqlite3_vt
30a0: 61 62 20 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 76 ab *, int),.. v
30b0: 6f 69 64 20 2a 70 43 6c 69 65 6e 74 44 61 74 61 oid *pClientData
30c0: 2c 0d 0a 20 20 76 6f 69 64 28 2a 78 44 65 73 74 ,.. void(*xDest
30d0: 72 6f 79 4d 6f 64 75 6c 65 29 28 76 6f 69 64 2a royModule)(void*
30e0: 29 0d 0a 29 7b 0d 0a 20 20 6d 65 6d 73 65 74 28 )..){.. memset(
30f0: 70 4d 6f 64 75 6c 65 2c 20 30 2c 20 73 69 7a 65 pModule, 0, size
3100: 6f 66 28 2a 70 4d 6f 64 75 6c 65 29 29 3b 0d 0a of(*pModule));..
3110: 20 20 70 4d 6f 64 75 6c 65 2d 3e 69 56 65 72 73 pModule->iVers
3120: 69 6f 6e 20 3d 20 69 56 65 72 73 69 6f 6e 3b 0d ion = iVersion;.
3130: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 43 72 65 . pModule->xCre
3140: 61 74 65 20 3d 20 78 43 72 65 61 74 65 3b 0d 0a ate = xCreate;..
3150: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 43 6f 6e 6e pModule->xConn
3160: 65 63 74 20 3d 20 78 43 6f 6e 6e 65 63 74 3b 0d ect = xConnect;.
3170: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 42 65 73 . pModule->xBes
3180: 74 49 6e 64 65 78 20 3d 20 78 42 65 73 74 49 6e tIndex = xBestIn
3190: 64 65 78 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d dex;.. pModule-
31a0: 3e 78 44 69 73 63 6f 6e 6e 65 63 74 20 3d 20 78 >xDisconnect = x
31b0: 44 69 73 63 6f 6e 6e 65 63 74 3b 0d 0a 20 20 70 Disconnect;.. p
31c0: 4d 6f 64 75 6c 65 2d 3e 78 44 65 73 74 72 6f 79 Module->xDestroy
31d0: 20 3d 20 78 44 65 73 74 72 6f 79 3b 0d 0a 20 20 = xDestroy;..
31e0: 70 4d 6f 64 75 6c 65 2d 3e 78 4f 70 65 6e 20 3d pModule->xOpen =
31f0: 20 78 4f 70 65 6e 3b 0d 0a 20 20 70 4d 6f 64 75 xOpen;.. pModu
3200: 6c 65 2d 3e 78 43 6c 6f 73 65 20 3d 20 78 43 6c le->xClose = xCl
3210: 6f 73 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d ose;.. pModule-
3220: 3e 78 46 69 6c 74 65 72 20 3d 20 78 46 69 6c 74 >xFilter = xFilt
3230: 65 72 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e er;.. pModule->
3240: 78 4e 65 78 74 20 3d 20 78 4e 65 78 74 3b 0d 0a xNext = xNext;..
3250: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 45 6f 66 20 pModule->xEof
3260: 3d 20 78 45 6f 66 3b 0d 0a 20 20 70 4d 6f 64 75 = xEof;.. pModu
3270: 6c 65 2d 3e 78 43 6f 6c 75 6d 6e 20 3d 20 78 43 le->xColumn = xC
3280: 6f 6c 75 6d 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c olumn;.. pModul
3290: 65 2d 3e 78 52 6f 77 69 64 20 3d 20 78 52 6f 77 e->xRowid = xRow
32a0: 69 64 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e id;.. pModule->
32b0: 78 55 70 64 61 74 65 20 3d 20 78 55 70 64 61 74 xUpdate = xUpdat
32c0: 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 e;.. pModule->x
32d0: 42 65 67 69 6e 20 3d 20 78 42 65 67 69 6e 3b 0d Begin = xBegin;.
32e0: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 53 79 6e . pModule->xSyn
32f0: 63 20 3d 20 78 53 79 6e 63 3b 0d 0a 20 20 70 4d c = xSync;.. pM
3300: 6f 64 75 6c 65 2d 3e 78 43 6f 6d 6d 69 74 20 3d odule->xCommit =
3310: 20 78 43 6f 6d 6d 69 74 3b 0d 0a 20 20 70 4d 6f xCommit;.. pMo
3320: 64 75 6c 65 2d 3e 78 52 6f 6c 6c 62 61 63 6b 20 dule->xRollback
3330: 3d 20 78 52 6f 6c 6c 62 61 63 6b 3b 0d 0a 20 20 = xRollback;..
3340: 70 4d 6f 64 75 6c 65 2d 3e 78 46 69 6e 64 46 75 pModule->xFindFu
3350: 6e 63 74 69 6f 6e 20 3d 20 78 46 69 6e 64 46 75 nction = xFindFu
3360: 6e 63 74 69 6f 6e 3b 0d 0a 20 20 70 4d 6f 64 75 nction;.. pModu
3370: 6c 65 2d 3e 78 52 65 6e 61 6d 65 20 3d 20 78 52 le->xRename = xR
3380: 65 6e 61 6d 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c ename;.. pModul
3390: 65 2d 3e 78 53 61 76 65 70 6f 69 6e 74 20 3d 20 e->xSavepoint =
33a0: 78 53 61 76 65 70 6f 69 6e 74 3b 0d 0a 20 20 70 xSavepoint;.. p
33b0: 4d 6f 64 75 6c 65 2d 3e 78 52 65 6c 65 61 73 65 Module->xRelease
33c0: 20 3d 20 78 52 65 6c 65 61 73 65 3b 0d 0a 20 20 = xRelease;..
33d0: 70 4d 6f 64 75 6c 65 2d 3e 78 52 6f 6c 6c 62 61 pModule->xRollba
33e0: 63 6b 54 6f 20 3d 20 78 52 6f 6c 6c 62 61 63 6b ckTo = xRollback
33f0: 54 6f 3b 0d 0a 20 20 72 65 74 75 72 6e 20 73 71 To;.. return sq
3400: 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 64 69 73 lite3_create_dis
3410: 70 6f 73 61 62 6c 65 5f 6d 6f 64 75 6c 65 28 64 posable_module(d
3420: 62 2c 20 7a 4e 61 6d 65 2c 20 70 4d 6f 64 75 6c b, zName, pModul
3430: 65 2c 20 70 43 6c 69 65 6e 74 44 61 74 61 2c 20 e, pClientData,
3440: 78 44 65 73 74 72 6f 79 4d 6f 64 75 6c 65 29 3b xDestroyModule);
3450: 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 53 ..}..#endif....S
3460: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 QLITE_API int WI
3470: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62 69 6e NAPI sqlite3_bin
3480: 64 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70 d_double_interop
3490: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
34a0: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 64 tmt, int iCol, d
34b0: 6f 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a ouble *val)..{..
34c0: 09 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f .return sqlite3_
34d0: 62 69 6e 64 5f 64 6f 75 62 6c 65 28 73 74 6d 74 bind_double(stmt
34e0: 2c 69 43 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d ,iCol,*val);..}.
34f0: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e ...SQLITE_API in
3500: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 t WINAPI sqlite3
3510: 5f 62 69 6e 64 5f 69 6e 74 36 34 5f 69 6e 74 65 _bind_int64_inte
3520: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 rop(sqlite3_stmt
3530: 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c *stmt, int iCol
3540: 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a , sqlite_int64 *
3550: 76 61 6c 29 0d 0a 7b 0d 0a 09 72 65 74 75 72 6e val)..{...return
3560: 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 69 6e sqlite3_bind_in
3570: 74 36 34 28 73 74 6d 74 2c 69 43 6f 6c 2c 2a 76 t64(stmt,iCol,*v
3580: 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 al);..}....SQLIT
3590: 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 E_API const char
35a0: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 * WINAPI sqlite
35b0: 33 5f 62 69 6e 64 5f 70 61 72 61 6d 65 74 65 72 3_bind_parameter
35c0: 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 _name_interop(sq
35d0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 lite3_stmt *stmt
35e0: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 , int iCol, int
35f0: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e *plen)..{.. con
3600: 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 st char *pval =
3610: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 70 61 72 sqlite3_bind_par
3620: 61 6d 65 74 65 72 5f 6e 61 6d 65 28 73 74 6d 74 ameter_name(stmt
3630: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 , iCol);.. *ple
3640: 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 n = (pval != 0)
3650: 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a ? strlen(pval) :
3660: 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 0;.. return pv
3670: 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 al;..}....SQLITE
3680: 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 _API const char
3690: 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 * WINAPI sqlite3
36a0: 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 5f 69 6e 74 _column_name_int
36b0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d erop(sqlite3_stm
36c0: 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f t *stmt, int iCo
36d0: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b l, int *plen)..{
36e0: 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a .. const char *
36f0: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 pval = sqlite3_c
3700: 6f 6c 75 6d 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c olumn_name(stmt,
3710: 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e iCol);.. *plen
3720: 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 3f = (pval != 0) ?
3730: 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 strlen(pval) :
3740: 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 0;.. return pva
3750: 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f l;..}....SQLITE_
3760: 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a API const void *
3770: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
3780: 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 31 36 5f 69 6e column_name16_in
3790: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 terop(sqlite3_st
37a0: 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 mt *stmt, int iC
37b0: 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a ol, int *plen)..
37c0: 7b 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 {.. const void
37d0: 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f *pval = sqlite3_
37e0: 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 31 36 28 73 74 column_name16(st
37f0: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 mt, iCol);.. *p
3800: 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 len = (pval != 0
3810: 29 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 ) ? wcslen((wcha
3820: 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 r_t *)pval) * si
3830: 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 zeof(wchar_t) :
3840: 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 0;.. return pva
3850: 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f l;..}....SQLITE_
3860: 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a API const char *
3870: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
3880: 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65 5f column_decltype_
3890: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f interop(sqlite3_
38a0: 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 stmt *stmt, int
38b0: 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 iCol, int *plen)
38c0: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 ..{.. const cha
38d0: 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 r *pval = sqlite
38e0: 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 3_column_decltyp
38f0: 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a e(stmt, iCol);..
3900: 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c 20 *plen = (pval
3910: 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 70 != 0) ? strlen(p
3920: 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 val) : 0;.. ret
3930: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a urn pval;..}....
3940: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 SQLITE_API const
3950: 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 void * WINAPI s
3960: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 qlite3_column_de
3970: 63 6c 74 79 70 65 31 36 5f 69 6e 74 65 72 6f 70 cltype16_interop
3980: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
3990: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 tmt, int iCol, i
39a0: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 nt *plen)..{..
39b0: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c const void *pval
39c0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d = sqlite3_colum
39d0: 6e 5f 64 65 63 6c 74 79 70 65 31 36 28 73 74 6d n_decltype16(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 77 63 73 6c 65 6e 28 28 77 63 68 61 72 ? wcslen((wchar
3a10: 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a _t *)pval) * siz
3a20: 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 eof(wchar_t) : 0
3a30: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c ;.. return pval
3a40: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 ;..}....SQLITE_A
3a50: 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 PI void WINAPI s
3a60: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f qlite3_column_do
3a70: 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c uble_interop(sql
3a80: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c ite3_stmt *stmt,
3a90: 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c int iCol, doubl
3aa0: 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 09 2a 76 61 e *val)..{...*va
3ab0: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 l = sqlite3_colu
3ac0: 6d 6e 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69 mn_double(stmt,i
3ad0: 43 6f 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 Col);..}....SQLI
3ae0: 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 TE_API void WINA
3af0: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d PI sqlite3_colum
3b00: 6e 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 n_int64_interop(
3b10: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 sqlite3_stmt *st
3b20: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 73 71 mt, int iCol, sq
3b30: 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 lite_int64 *val)
3b40: 0d 0a 7b 0d 0a 09 2a 76 61 6c 20 3d 20 73 71 6c ..{...*val = sql
3b50: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 ite3_column_int6
3b60: 34 28 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 4(stmt,iCol);..}
3b70: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 ....SQLITE_API v
3b80: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 oid WINAPI sqlit
3b90: 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 e3_last_insert_r
3ba0: 6f 77 69 64 5f 69 6e 74 65 72 6f 70 28 73 71 6c owid_interop(sql
3bb0: 69 74 65 33 20 2a 64 62 2c 20 73 71 6c 69 74 65 ite3 *db, sqlite
3bc0: 5f 69 6e 74 36 34 20 2a 72 6f 77 49 64 29 0d 0a _int64 *rowId)..
3bd0: 7b 0d 0a 09 2a 72 6f 77 49 64 20 3d 20 73 71 6c {...*rowId = sql
3be0: 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 ite3_last_insert
3bf0: 5f 72 6f 77 69 64 28 64 62 29 3b 0d 0a 7d 0d 0a _rowid(db);..}..
3c00: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 ..SQLITE_API voi
3c10: 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 d WINAPI sqlite3
3c20: 5f 6d 65 6d 6f 72 79 5f 75 73 65 64 5f 69 6e 74 _memory_used_int
3c30: 65 72 6f 70 28 73 71 6c 69 74 65 5f 69 6e 74 36 erop(sqlite_int6
3c40: 34 20 2a 6e 42 79 74 65 73 29 0d 0a 7b 0d 0a 09 4 *nBytes)..{...
3c50: 2a 6e 42 79 74 65 73 20 3d 20 73 71 6c 69 74 65 *nBytes = sqlite
3c60: 33 5f 6d 65 6d 6f 72 79 5f 75 73 65 64 28 29 3b 3_memory_used();
3c70: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
3c80: 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 I void WINAPI sq
3c90: 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 lite3_memory_hig
3ca0: 68 77 61 74 65 72 5f 69 6e 74 65 72 6f 70 28 69 hwater_interop(i
3cb0: 6e 74 20 72 65 73 65 74 46 6c 61 67 2c 20 73 71 nt resetFlag, sq
3cc0: 6c 69 74 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74 lite_int64 *nByt
3cd0: 65 73 29 0d 0a 7b 0d 0a 09 2a 6e 42 79 74 65 73 es)..{...*nBytes
3ce0: 20 3d 20 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72 = sqlite3_memor
3cf0: 79 5f 68 69 67 68 77 61 74 65 72 28 72 65 73 65 y_highwater(rese
3d00: 74 46 6c 61 67 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 tFlag);..}....SQ
3d10: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 75 LITE_API const u
3d20: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 20 57 nsigned char * W
3d30: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f INAPI sqlite3_co
3d40: 6c 75 6d 6e 5f 74 65 78 74 5f 69 6e 74 65 72 6f lumn_text_intero
3d50: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a p(sqlite3_stmt *
3d60: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 stmt, int iCol,
3d70: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 int *plen)..{..
3d80: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 const unsigned
3d90: 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c char *pval = sql
3da0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 ite3_column_text
3db0: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 (stmt, iCol);..
3dc0: 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 *plen = sqlite3
3dd0: 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28 73 74 _column_bytes(st
3de0: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 72 65 mt, iCol);.. re
3df0: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d turn pval;..}...
3e00: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
3e10: 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 t void * WINAPI
3e20: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 sqlite3_column_t
3e30: 65 78 74 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 ext16_interop(sq
3e40: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 lite3_stmt *stmt
3e50: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 , int iCol, int
3e60: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e *plen)..{.. con
3e70: 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 st void *pval =
3e80: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 sqlite3_column_t
3e90: 65 78 74 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c ext16(stmt, iCol
3ea0: 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 73 71 );.. *plen = sq
3eb0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74 lite3_column_byt
3ec0: 65 73 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 es16(stmt, iCol)
3ed0: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c ;.. return pval
3ee0: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 ;..}....SQLITE_A
3ef0: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 PI int WINAPI sq
3f00: 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 lite3_finalize_i
3f10: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 nterop(sqlite3_s
3f20: 74 6d 74 20 2a 73 74 6d 74 29 0d 0a 7b 0d 0a 20 tmt *stmt)..{..
3f30: 20 69 6e 74 20 72 65 74 3b 0d 0a 23 69 66 20 21 int ret;..#if !
3f40: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f defined(INTEROP_
3f50: 4c 45 47 41 43 59 5f 43 4c 4f 53 45 29 20 26 26 LEGACY_CLOSE) &&
3f60: 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f SQLITE_VERSION_
3f70: 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 37 30 31 NUMBER >= 300701
3f80: 34 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 4....#if defined
3f90: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 (INTEROP_DEBUG)
3fa0: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 && (INTEROP_DEBU
3fb0: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 G & INTEROP_DEBU
3fc0: 47 5f 46 49 4e 41 4c 49 5a 45 29 0d 0a 20 20 56 G_FINALIZE).. V
3fd0: 64 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 2a dbe *p = (Vdbe *
3fe0: 29 73 74 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 )stmt;.. sqlite
3ff0: 33 20 2a 64 62 20 3d 20 70 2d 3e 64 62 3b 0d 0a 3 *db = p->db;..
4000: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 sqlite3Interop
4010: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 66 Debug("sqlite3_f
4020: 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 28 inalize_interop(
4030: 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 ): calling sqlit
4040: 65 33 5f 66 69 6e 61 6c 69 7a 65 28 25 70 2c 20 e3_finalize(%p,
4050: 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c 20 73 %p)...\n", db, s
4060: 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d tmt);..#endif...
4070: 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 . ret = sqlite3
4080: 5f 66 69 6e 61 6c 69 7a 65 28 73 74 6d 74 29 3b _finalize(stmt);
4090: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 ....#if defined(
40a0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 INTEROP_DEBUG) &
40b0: 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 & (INTEROP_DEBUG
40c0: 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 & INTEROP_DEBUG
40d0: 5f 46 49 4e 41 4c 49 5a 45 29 0d 0a 20 20 73 71 _FINALIZE).. sq
40e0: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 lite3InteropDebu
40f0: 67 28 22 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c g("sqlite3_final
4100: 69 7a 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 ize_interop(): s
4110: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 qlite3_finalize(
4120: 25 70 2c 20 25 70 29 20 72 65 74 75 72 6e 65 64 %p, %p) returned
4130: 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 73 74 6d %d.\n", db, stm
4140: 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 t, ret);..#endif
4150: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 .... return ret
4160: 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 56 64 62 65 ;..#else.. Vdbe
4170: 20 2a 70 3b 0d 0a 20 20 72 65 74 20 3d 20 53 51 *p;.. ret = SQ
4180: 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20 70 20 LITE_OK;.... p
4190: 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74 3b 0d = (Vdbe *)stmt;.
41a0: 0a 20 20 69 66 20 28 70 29 0d 0a 20 20 7b 0d 0a . if (p).. {..
41b0: 20 20 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 sqlite3 *db
41c0: 3d 20 70 2d 3e 64 62 3b 0d 0a 0d 0a 20 20 20 20 = p->db;....
41d0: 69 66 20 28 64 62 20 21 3d 20 4e 55 4c 4c 29 0d if (db != NULL).
41e0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d . sqlite3_m
41f0: 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d utex_enter(db->m
4200: 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 20 20 69 66 utex);.... if
4210: 20 28 28 70 2d 3e 6d 61 67 69 63 20 3d 3d 20 56 ((p->magic == V
4220: 44 42 45 5f 4d 41 47 49 43 5f 44 45 41 44 29 20 DBE_MAGIC_DEAD)
4230: 26 26 20 28 64 62 20 3d 3d 20 4e 55 4c 4c 29 29 && (db == NULL))
4240: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 73 .. {.. s
4250: 71 6c 69 74 65 33 44 62 46 72 65 65 5f 69 6e 74 qlite3DbFree_int
4260: 65 72 6f 70 28 64 62 2c 20 70 29 3b 0d 0a 20 20 erop(db, p);..
4270: 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d 0a 20 }.. else..
4280: 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 20 {.. ret
4290: 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 = sqlite3_finali
42a0: 7a 65 28 73 74 6d 74 29 3b 0d 0a 20 20 20 20 7d ze(stmt);.. }
42b0: 0d 0a 0d 0a 20 20 20 20 69 66 20 28 64 62 20 21 .... if (db !
42c0: 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 20 20 73 = NULL).. s
42d0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 qlite3_mutex_lea
42e0: 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a ve(db->mutex);..
42f0: 20 20 7d 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 }.... return
4300: 72 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d ret;..#endif..}.
4310: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e ...SQLITE_API in
4320: 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 t WINAPI sqlite3
4330: 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 5f 69 _backup_finish_i
4340: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 62 nterop(sqlite3_b
4350: 61 63 6b 75 70 20 2a 70 29 0d 0a 7b 0d 0a 20 20 ackup *p)..{..
4360: 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 20 int ret;....#if
4370: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f defined(INTEROP_
4380: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 DEBUG) && (INTER
4390: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 OP_DEBUG & INTER
43a0: 4f 50 5f 44 45 42 55 47 5f 42 41 43 4b 55 50 5f OP_DEBUG_BACKUP_
43b0: 46 49 4e 49 53 48 29 0d 0a 20 20 73 71 6c 69 74 FINISH).. sqlit
43c0: 65 33 2a 20 70 44 65 73 74 44 62 20 3d 20 70 2d e3* pDestDb = p-
43d0: 3e 70 44 65 73 74 44 62 3b 0d 0a 20 20 73 71 6c >pDestDb;.. sql
43e0: 69 74 65 33 2a 20 70 53 72 63 44 62 20 3d 20 70 ite3* pSrcDb = p
43f0: 2d 3e 70 53 72 63 44 62 3b 0d 0a 20 20 73 71 6c ->pSrcDb;.. sql
4400: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 ite3InteropDebug
4410: 28 22 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 ("sqlite3_backup
4420: 5f 66 69 6e 69 73 68 5f 69 6e 74 65 72 6f 70 28 _finish_interop(
4430: 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 ): calling sqlit
4440: 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 e3_backup_finish
4450: 28 25 70 2c 20 25 70 2c 20 25 70 29 2e 2e 2e 5c (%p, %p, %p)...\
4460: 6e 22 2c 20 70 44 65 73 74 44 62 2c 20 70 53 72 n", pDestDb, pSr
4470: 63 44 62 2c 20 70 29 3b 0d 0a 23 65 6e 64 69 66 cDb, p);..#endif
4480: 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 .... ret = sqli
4490: 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 te3_backup_finis
44a0: 68 28 70 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 h(p);....#if def
44b0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 ined(INTEROP_DEB
44c0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f UG) && (INTEROP_
44d0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f DEBUG & INTEROP_
44e0: 44 45 42 55 47 5f 42 41 43 4b 55 50 5f 46 49 4e DEBUG_BACKUP_FIN
44f0: 49 53 48 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 ISH).. sqlite3I
4500: 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c nteropDebug("sql
4510: 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 ite3_backup_fini
4520: 73 68 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 sh_interop(): sq
4530: 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e lite3_backup_fin
4540: 69 73 68 28 25 70 2c 20 25 70 2c 20 25 70 29 20 ish(%p, %p, %p)
4550: 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c returned %d.\n",
4560: 20 70 44 65 73 74 44 62 2c 20 70 53 72 63 44 62 pDestDb, pSrcDb
4570: 2c 20 70 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 , p, ret);..#end
4580: 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 if.... return r
4590: 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 et;..}....SQLITE
45a0: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 _API int WINAPI
45b0: 73 71 6c 69 74 65 33 5f 72 65 73 65 74 5f 69 6e sqlite3_reset_in
45c0: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 terop(sqlite3_st
45d0: 6d 74 20 2a 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20 mt *stmt)..{..
45e0: 69 6e 74 20 72 65 74 3b 0d 0a 23 69 66 20 21 64 int ret;..#if !d
45f0: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c efined(INTEROP_L
4600: 45 47 41 43 59 5f 43 4c 4f 53 45 29 20 26 26 20 EGACY_CLOSE) &&
4610: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e SQLITE_VERSION_N
4620: 55 4d 42 45 52 20 3e 3d 20 33 30 30 37 30 31 34 UMBER >= 3007014
4630: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 ....#if defined(
4640: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 INTEROP_DEBUG) &
4650: 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 & (INTEROP_DEBUG
4660: 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 & INTEROP_DEBUG
4670: 5f 52 45 53 45 54 29 0d 0a 20 20 73 71 6c 69 74 _RESET).. sqlit
4680: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 e3InteropDebug("
4690: 73 71 6c 69 74 65 33 5f 72 65 73 65 74 5f 69 6e sqlite3_reset_in
46a0: 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 terop(): calling
46b0: 20 73 71 6c 69 74 65 33 5f 72 65 73 65 74 28 25 sqlite3_reset(%
46c0: 70 29 2e 2e 2e 5c 6e 22 2c 20 73 74 6d 74 29 3b p)...\n", stmt);
46d0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 ..#endif.... re
46e0: 74 20 3d 20 73 71 6c 69 74 65 33 5f 72 65 73 65 t = sqlite3_rese
46f0: 74 28 73 74 6d 74 29 3b 0d 0a 0d 0a 23 69 66 20 t(stmt);....#if
4700: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f defined(INTEROP_
4710: 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 DEBUG) && (INTER
4720: 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 OP_DEBUG & INTER
4730: 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 54 29 0d OP_DEBUG_RESET).
4740: 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f . sqlite3Intero
4750: 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f pDebug("sqlite3_
4760: 72 65 73 65 74 5f 69 6e 74 65 72 6f 70 28 29 3a reset_interop():
4770: 20 73 71 6c 69 74 65 33 5f 72 65 73 65 74 28 25 sqlite3_reset(%
4780: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c p) returned %d.\
4790: 6e 22 2c 20 73 74 6d 74 2c 20 72 65 74 29 3b 0d n", stmt, ret);.
47a0: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 .#endif.... ret
47b0: 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d urn ret;..#else.
47c0: 0a 20 20 69 66 20 28 28 28 56 64 62 65 20 2a 29 . if (((Vdbe *)
47d0: 73 74 6d 74 29 2d 3e 6d 61 67 69 63 20 3d 3d 20 stmt)->magic ==
47e0: 56 44 42 45 5f 4d 41 47 49 43 5f 44 45 41 44 29 VDBE_MAGIC_DEAD)
47f0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 53 return SQLITE_S
4800: 43 48 45 4d 41 3b 0d 0a 20 20 72 65 74 20 3d 20 CHEMA;.. ret =
4810: 73 71 6c 69 74 65 33 5f 72 65 73 65 74 28 73 74 sqlite3_reset(st
4820: 6d 74 29 3b 0d 0a 20 20 72 65 74 75 72 6e 20 72 mt);.. return r
4830: 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a et;..#endif..}..
4840: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 ..SQLITE_API int
4850: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
4860: 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 5f create_function_
4870: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 interop(sqlite3
4880: 2a 70 73 71 6c 2c 20 63 6f 6e 73 74 20 63 68 61 *psql, const cha
4890: 72 20 2a 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 r *zFunctionName
48a0: 2c 20 69 6e 74 20 6e 41 72 67 2c 20 69 6e 74 20 , int nArg, int
48b0: 65 54 65 78 74 52 65 70 2c 20 76 6f 69 64 20 2a eTextRep, void *
48c0: 70 76 55 73 65 72 2c 20 53 51 4c 49 54 45 55 53 pvUser, SQLITEUS
48d0: 45 52 46 55 4e 43 20 66 75 6e 63 2c 20 53 51 4c ERFUNC func, SQL
48e0: 49 54 45 55 53 45 52 46 55 4e 43 20 66 75 6e 63 ITEUSERFUNC func
48f0: 73 74 65 70 2c 20 53 51 4c 49 54 45 46 55 4e 43 step, SQLITEFUNC
4900: 46 49 4e 41 4c 20 66 75 6e 63 66 69 6e 61 6c 2c FINAL funcfinal,
4910: 20 69 6e 74 20 6e 65 65 64 43 6f 6c 6c 53 65 71 int needCollSeq
4920: 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a )..{.. int n;..
4930: 0d 0a 20 20 69 66 20 28 65 54 65 78 74 52 65 70 .. if (eTextRep
4940: 20 3d 3d 20 53 51 4c 49 54 45 5f 55 54 46 31 36 == SQLITE_UTF16
4950: 29 0d 0a 20 20 20 20 65 54 65 78 74 52 65 70 20 ).. eTextRep
4960: 3d 20 53 51 4c 49 54 45 5f 55 54 46 31 36 4e 41 = SQLITE_UTF16NA
4970: 54 49 56 45 3b 0d 0a 0d 0a 20 20 6e 20 3d 20 73 TIVE;.... n = s
4980: 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 qlite3_create_fu
4990: 6e 63 74 69 6f 6e 28 70 73 71 6c 2c 20 7a 46 75 nction(psql, zFu
49a0: 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 6e 41 72 67 nctionName, nArg
49b0: 2c 20 65 54 65 78 74 52 65 70 2c 20 30 2c 20 66 , eTextRep, 0, f
49c0: 75 6e 63 2c 20 66 75 6e 63 73 74 65 70 2c 20 66 unc, funcstep, f
49d0: 75 6e 63 66 69 6e 61 6c 29 3b 0d 0a 20 20 69 66 uncfinal);.. if
49e0: 20 28 6e 20 3d 3d 20 53 51 4c 49 54 45 5f 4f 4b (n == SQLITE_OK
49f0: 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 20 28 ).. {.. if (
4a00: 6e 65 65 64 43 6f 6c 6c 53 65 71 29 0d 0a 20 20 needCollSeq)..
4a10: 20 20 7b 0d 0a 20 20 20 20 20 20 46 75 6e 63 44 {.. FuncD
4a20: 65 66 20 2a 70 46 75 6e 63 20 3d 20 73 71 6c 69 ef *pFunc = sqli
4a30: 74 65 33 46 69 6e 64 46 75 6e 63 74 69 6f 6e 28 te3FindFunction(
4a40: 70 73 71 6c 2c 20 7a 46 75 6e 63 74 69 6f 6e 4e psql, zFunctionN
4a50: 61 6d 65 2c 20 73 74 72 6c 65 6e 28 7a 46 75 6e ame, strlen(zFun
4a60: 63 74 69 6f 6e 4e 61 6d 65 29 2c 20 6e 41 72 67 ctionName), nArg
4a70: 2c 20 65 54 65 78 74 52 65 70 2c 20 30 29 3b 0d , eTextRep, 0);.
4a80: 0a 20 20 20 20 20 20 69 66 28 20 70 46 75 6e 63 . if( pFunc
4a90: 20 29 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 ).. {..
4aa0: 20 20 20 20 20 70 46 75 6e 63 2d 3e 66 6c 61 67 pFunc->flag
4ab0: 73 20 7c 3d 20 53 51 4c 49 54 45 5f 46 55 4e 43 s |= SQLITE_FUNC
4ac0: 5f 4e 45 45 44 43 4f 4c 4c 3b 0d 0a 20 20 20 20 _NEEDCOLL;..
4ad0: 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d }.. }.. }.
4ae0: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a ... return n;..
4af0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
4b00: 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 void WINAPI sqli
4b10: 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 te3_value_double
4b20: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
4b30: 5f 76 61 6c 75 65 20 2a 70 76 61 6c 2c 20 64 6f _value *pval, do
4b40: 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 uble *val)..{..
4b50: 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f *val = sqlite3_
4b60: 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 70 76 61 value_double(pva
4b70: 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 l);..}....SQLITE
4b80: 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 _API void WINAPI
4b90: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 sqlite3_value_i
4ba0: 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 71 6c nt64_interop(sql
4bb0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 70 76 61 6c ite3_value *pval
4bc0: 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a , sqlite_int64 *
4bd0: 76 61 6c 29 0d 0a 7b 0d 0a 20 20 2a 76 61 6c 20 val)..{.. *val
4be0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f = sqlite3_value_
4bf0: 69 6e 74 36 34 28 70 76 61 6c 29 3b 0d 0a 7d 0d int64(pval);..}.
4c00: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f ...SQLITE_API co
4c10: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 nst unsigned cha
4c20: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 r * WINAPI sqlit
4c30: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 5f 69 6e e3_value_text_in
4c40: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 76 61 terop(sqlite3_va
4c50: 6c 75 65 20 2a 76 61 6c 2c 20 69 6e 74 20 2a 70 lue *val, int *p
4c60: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 len)..{.. const
4c70: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a unsigned char *
4c80: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 pval = sqlite3_v
4c90: 61 6c 75 65 5f 74 65 78 74 28 76 61 6c 29 3b 0d alue_text(val);.
4ca0: 0a 20 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 . *plen = sqlit
4cb0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 76 e3_value_bytes(v
4cc0: 61 6c 29 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 al);.. return p
4cd0: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 val;..}....SQLIT
4ce0: 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 E_API const void
4cf0: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 * WINAPI sqlite
4d00: 33 5f 76 61 6c 75 65 5f 74 65 78 74 31 36 5f 69 3_value_text16_i
4d10: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 76 nterop(sqlite3_v
4d20: 61 6c 75 65 20 2a 76 61 6c 2c 20 69 6e 74 20 2a alue *val, int *
4d30: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 plen)..{.. cons
4d40: 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73 t void *pval = s
4d50: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 qlite3_value_tex
4d60: 74 31 36 28 76 61 6c 29 3b 0d 0a 20 20 2a 70 6c t16(val);.. *pl
4d70: 65 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c en = sqlite3_val
4d80: 75 65 5f 62 79 74 65 73 31 36 28 76 61 6c 29 3b ue_bytes16(val);
4d90: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b .. return pval;
4da0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
4db0: 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 I void WINAPI sq
4dc0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 lite3_result_dou
4dd0: 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ble_interop(sqli
4de0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70 63 74 te3_context *pct
4df0: 78 2c 20 64 6f 75 62 6c 65 20 2a 76 61 6c 29 0d x, double *val).
4e00: 0a 7b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 .{.. sqlite3_re
4e10: 73 75 6c 74 5f 64 6f 75 62 6c 65 28 70 63 74 78 sult_double(pctx
4e20: 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 , *val);..}....S
4e30: 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 QLITE_API void W
4e40: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 72 65 INAPI sqlite3_re
4e50: 73 75 6c 74 5f 69 6e 74 36 34 5f 69 6e 74 65 72 sult_int64_inter
4e60: 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 op(sqlite3_conte
4e70: 78 74 20 2a 70 63 74 78 2c 20 73 71 6c 69 74 65 xt *pctx, sqlite
4e80: 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d _int64 *val)..{.
4e90: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c . sqlite3_resul
4ea0: 74 5f 69 6e 74 36 34 28 70 63 74 78 2c 20 2a 76 t_int64(pctx, *v
4eb0: 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 al);..}....SQLIT
4ec0: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 E_API int WINAPI
4ed0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 sqlite3_context
4ee0: 5f 63 6f 6c 6c 63 6f 6d 70 61 72 65 5f 69 6e 74 _collcompare_int
4ef0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e erop(sqlite3_con
4f00: 74 65 78 74 20 2a 63 74 78 2c 20 63 6f 6e 73 74 text *ctx, const
4f10: 20 76 6f 69 64 20 2a 70 31 2c 20 69 6e 74 20 70 void *p1, int p
4f20: 31 6c 65 6e 2c 20 63 6f 6e 73 74 20 76 6f 69 64 1len, const void
4f30: 20 2a 70 32 2c 20 69 6e 74 20 70 32 6c 65 6e 29 *p2, int p2len)
4f40: 0d 0a 7b 0d 0a 20 20 69 66 20 28 28 63 74 78 2d ..{.. if ((ctx-
4f50: 3e 70 46 75 6e 63 2d 3e 66 6c 61 67 73 20 26 20 >pFunc->flags &
4f60: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 44 SQLITE_FUNC_NEED
4f70: 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 72 65 74 75 COLL) == 0) retu
4f80: 72 6e 20 32 3b 0d 0a 20 20 72 65 74 75 72 6e 20 rn 2;.. return
4f90: 63 74 78 2d 3e 70 43 6f 6c 6c 2d 3e 78 43 6d 70 ctx->pColl->xCmp
4fa0: 28 63 74 78 2d 3e 70 43 6f 6c 6c 2d 3e 70 55 73 (ctx->pColl->pUs
4fb0: 65 72 2c 20 70 31 6c 65 6e 2c 20 70 31 2c 20 70 er, p1len, p1, p
4fc0: 32 6c 65 6e 2c 20 70 32 29 3b 0d 0a 7d 0d 0a 0d 2len, p2);..}...
4fd0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
4fe0: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 t char * WINAPI
4ff0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f sqlite3_context_
5000: 63 6f 6c 6c 73 65 71 5f 69 6e 74 65 72 6f 70 28 collseq_interop(
5010: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 sqlite3_context
5020: 2a 63 74 78 2c 20 69 6e 74 20 2a 70 74 79 70 65 *ctx, int *ptype
5030: 2c 20 69 6e 74 20 2a 65 6e 63 2c 20 69 6e 74 20 , int *enc, int
5040: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 43 6f 6c *plen)..{.. Col
5050: 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 63 74 lSeq *pColl = ct
5060: 78 2d 3e 70 43 6f 6c 6c 3b 0d 0a 20 20 2a 70 74 x->pColl;.. *pt
5070: 79 70 65 20 3d 20 30 3b 0d 0a 20 20 2a 70 6c 65 ype = 0;.. *ple
5080: 6e 20 3d 20 30 3b 0d 0a 20 20 2a 65 6e 63 20 3d n = 0;.. *enc =
5090: 20 30 3b 0d 0a 0d 0a 20 20 69 66 20 28 28 63 74 0;.... if ((ct
50a0: 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c 61 67 73 20 x->pFunc->flags
50b0: 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 & SQLITE_FUNC_NE
50c0: 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 72 65 EDCOLL) == 0) re
50d0: 74 75 72 6e 20 4e 55 4c 4c 3b 0d 0a 0d 0a 20 20 turn NULL;....
50e0: 69 66 20 28 70 43 6f 6c 6c 29 0d 0a 20 20 7b 0d if (pColl).. {.
50f0: 0a 20 20 20 20 2a 65 6e 63 20 3d 20 70 43 6f 6c . *enc = pCol
5100: 6c 2d 3e 65 6e 63 3b 0d 0a 23 69 66 20 53 51 4c l->enc;..#if SQL
5110: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 ITE_VERSION_NUMB
5120: 45 52 20 3c 20 33 30 30 37 30 31 30 0d 0a 20 20 ER < 3007010..
5130: 20 20 2a 70 74 79 70 65 20 3d 20 70 43 6f 6c 6c *ptype = pColl
5140: 2d 3e 74 79 70 65 3b 0d 0a 23 65 6e 64 69 66 0d ->type;..#endif.
5150: 0a 20 20 20 20 2a 70 6c 65 6e 20 3d 20 28 70 43 . *plen = (pC
5160: 6f 6c 6c 2d 3e 7a 4e 61 6d 65 20 21 3d 20 30 29 oll->zName != 0)
5170: 20 3f 20 73 74 72 6c 65 6e 28 70 43 6f 6c 6c 2d ? strlen(pColl-
5180: 3e 7a 4e 61 6d 65 29 20 3a 20 30 3b 0d 0a 0d 0a >zName) : 0;....
5190: 20 20 20 20 72 65 74 75 72 6e 20 70 43 6f 6c 6c return pColl
51a0: 2d 3e 7a 4e 61 6d 65 3b 0d 0a 20 20 7d 0d 0a 20 ->zName;.. }..
51b0: 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0d 0a 7d return NULL;..}
51c0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 ....SQLITE_API c
51d0: 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 onst char * WINA
51e0: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d PI sqlite3_colum
51f0: 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d 65 5f n_database_name_
5200: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f interop(sqlite3_
5210: 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 stmt *stmt, int
5220: 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 iCol, int *plen)
5230: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 ..{.. const cha
5240: 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 r *pval = sqlite
5250: 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 3_column_databas
5260: 65 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43 6f e_name(stmt, iCo
5270: 6c 29 3b 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 l);.. *plen = (
5280: 70 76 61 6c 20 21 3d 20 30 29 20 3f 20 73 74 72 pval != 0) ? str
5290: 6c 65 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a len(pval) : 0;..
52a0: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a return pval;..
52b0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
52c0: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e const void * WIN
52d0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 API sqlite3_colu
52e0: 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d 65 mn_database_name
52f0: 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 16_interop(sqlit
5300: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 e3_stmt *stmt, i
5310: 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c nt iCol, int *pl
5320: 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 en)..{.. const
5330: 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 6c void *pval = sql
5340: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 ite3_column_data
5350: 62 61 73 65 5f 6e 61 6d 65 31 36 28 73 74 6d 74 base_name16(stmt
5360: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c 65 , iCol);.. *ple
5370: 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 20 n = (pval != 0)
5380: 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f ? wcslen((wchar_
5390: 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 t *)pval) * size
53a0: 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b of(wchar_t) : 0;
53b0: 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b .. return pval;
53c0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
53d0: 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 I const char * W
53e0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f INAPI sqlite3_co
53f0: 6c 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 5f lumn_table_name_
5400: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f interop(sqlite3_
5410: 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 stmt *stmt, int
5420: 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 iCol, int *plen)
5430: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 ..{.. const cha
5440: 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 r *pval = sqlite
5450: 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c 65 5f 6e 3_column_table_n
5460: 61 6d 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b ame(stmt, iCol);
5470: 0d 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 .. *plen = (pva
5480: 6c 20 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e l != 0) ? strlen
5490: 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 (pval) : 0;.. r
54a0: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a eturn pval;..}..
54b0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e ..SQLITE_API con
54c0: 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 st void * WINAPI
54d0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
54e0: 74 61 62 6c 65 5f 6e 61 6d 65 31 36 5f 69 6e 74 table_name16_int
54f0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d erop(sqlite3_stm
5500: 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f t *stmt, int iCo
5510: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b l, int *plen)..{
5520: 0d 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a .. const void *
5530: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 pval = sqlite3_c
5540: 6f 6c 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 olumn_table_name
5550: 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 16(stmt, iCol);.
5560: 0a 20 20 2a 70 6c 65 6e 20 3d 20 28 70 76 61 6c . *plen = (pval
5570: 20 21 3d 20 30 29 20 3f 20 77 63 73 6c 65 6e 28 != 0) ? wcslen(
5580: 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 (wchar_t *)pval)
5590: 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f * sizeof(wchar_
55a0: 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 t) : 0;.. retur
55b0: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 n pval;..}....SQ
55c0: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 LITE_API const c
55d0: 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c har * WINAPI sql
55e0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 ite3_column_orig
55f0: 69 6e 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 in_name_interop(
5600: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 sqlite3_stmt *st
5610: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e mt, int iCol, in
5620: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 t *plen)..{.. c
5630: 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 onst char *pval
5640: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e = sqlite3_column
5650: 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 28 73 74 6d _origin_name(stm
5660: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 6c t, iCol);.. *pl
5670: 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 29 en = (pval != 0)
5680: 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 ? strlen(pval)
5690: 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 : 0;.. return p
56a0: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 val;..}....SQLIT
56b0: 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 E_API const void
56c0: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 * WINAPI sqlite
56d0: 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 3_column_origin_
56e0: 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 name16_interop(s
56f0: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
5700: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 t, int iCol, int
5710: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f *plen)..{.. co
5720: 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d nst void *pval =
5730: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
5740: 6f 72 69 67 69 6e 5f 6e 61 6d 65 31 36 28 73 74 origin_name16(st
5750: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 2a 70 mt, iCol);.. *p
5760: 6c 65 6e 20 3d 20 28 70 76 61 6c 20 21 3d 20 30 len = (pval != 0
5770: 29 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 ) ? wcslen((wcha
5780: 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 r_t *)pval) * si
5790: 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 zeof(wchar_t) :
57a0: 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 0;.. return pva
57b0: 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f l;..}....SQLITE_
57c0: 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 API int WINAPI s
57d0: 71 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63 6f 6c qlite3_table_col
57e0: 75 6d 6e 5f 6d 65 74 61 64 61 74 61 5f 69 6e 74 umn_metadata_int
57f0: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62 erop(sqlite3 *db
5800: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44 , const char *zD
5810: 62 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 bName, const cha
5820: 72 20 2a 7a 54 61 62 6c 65 4e 61 6d 65 2c 20 63 r *zTableName, c
5830: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75 onst char *zColu
5840: 6d 6e 4e 61 6d 65 2c 20 63 68 61 72 20 2a 2a 70 mnName, char **p
5850: 7a 44 61 74 61 54 79 70 65 2c 20 63 68 61 72 20 zDataType, char
5860: 2a 2a 70 7a 43 6f 6c 6c 53 65 71 2c 20 69 6e 74 **pzCollSeq, int
5870: 20 2a 70 4e 6f 74 4e 75 6c 6c 2c 20 69 6e 74 20 *pNotNull, int
5880: 2a 70 50 72 69 6d 61 72 79 4b 65 79 2c 20 69 6e *pPrimaryKey, in
5890: 74 20 2a 70 41 75 74 6f 69 6e 63 2c 20 69 6e 74 t *pAutoinc, int
58a0: 20 2a 70 64 74 4c 65 6e 2c 20 69 6e 74 20 2a 70 *pdtLen, int *p
58b0: 63 73 4c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 csLen)..{.. int
58c0: 20 6e 3b 0d 0a 20 20 0d 0a 20 20 6e 20 3d 20 73 n;.. .. n = s
58d0: 71 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63 6f 6c qlite3_table_col
58e0: 75 6d 6e 5f 6d 65 74 61 64 61 74 61 28 64 62 2c umn_metadata(db,
58f0: 20 7a 44 62 4e 61 6d 65 2c 20 7a 54 61 62 6c 65 zDbName, zTable
5900: 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d 6e 4e 61 6d Name, zColumnNam
5910: 65 2c 20 70 7a 44 61 74 61 54 79 70 65 2c 20 70 e, pzDataType, p
5920: 7a 43 6f 6c 6c 53 65 71 2c 20 70 4e 6f 74 4e 75 zCollSeq, pNotNu
5930: 6c 6c 2c 20 70 50 72 69 6d 61 72 79 4b 65 79 2c ll, pPrimaryKey,
5940: 20 70 41 75 74 6f 69 6e 63 29 3b 0d 0a 20 20 2a pAutoinc);.. *
5950: 70 64 74 4c 65 6e 20 3d 20 28 2a 70 7a 44 61 74 pdtLen = (*pzDat
5960: 61 54 79 70 65 20 21 3d 20 30 29 20 3f 20 73 74 aType != 0) ? st
5970: 72 6c 65 6e 28 2a 70 7a 44 61 74 61 54 79 70 65 rlen(*pzDataType
5980: 29 20 3a 20 30 3b 0d 0a 20 20 2a 70 63 73 4c 65 ) : 0;.. *pcsLe
5990: 6e 20 3d 20 28 2a 70 7a 43 6f 6c 6c 53 65 71 20 n = (*pzCollSeq
59a0: 21 3d 20 30 29 20 3f 20 73 74 72 6c 65 6e 28 2a != 0) ? strlen(*
59b0: 70 7a 43 6f 6c 6c 53 65 71 29 20 3a 20 30 3b 0d pzCollSeq) : 0;.
59c0: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a ... return n;..
59d0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
59e0: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 int WINAPI sqlit
59f0: 65 33 5f 69 6e 64 65 78 5f 63 6f 6c 75 6d 6e 5f e3_index_column_
5a00: 69 6e 66 6f 5f 69 6e 74 65 72 6f 70 28 73 71 6c info_interop(sql
5a10: 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 ite3 *db, const
5a20: 63 68 61 72 20 2a 7a 44 62 2c 20 63 6f 6e 73 74 char *zDb, const
5a30: 20 63 68 61 72 20 2a 7a 49 6e 64 65 78 4e 61 6d char *zIndexNam
5a40: 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a e, const char *z
5a50: 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 69 6e 74 20 ColumnName, int
5a60: 2a 73 6f 72 74 4f 72 64 65 72 2c 20 69 6e 74 20 *sortOrder, int
5a70: 2a 6f 6e 45 72 72 6f 72 2c 20 63 68 61 72 20 2a *onError, char *
5a80: 2a 70 7a 43 6f 6c 6c 2c 20 69 6e 74 20 2a 70 6c *pzColl, int *pl
5a90: 65 6e 29 0d 0a 7b 0d 0a 20 20 49 6e 64 65 78 20 en)..{.. Index
5aa0: 2a 70 49 64 78 3b 0d 0a 20 20 54 61 62 6c 65 20 *pIdx;.. Table
5ab0: 2a 70 54 61 62 3b 0d 0a 20 20 69 6e 74 20 6e 3b *pTab;.. int n;
5ac0: 0d 0a 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 .... sqlite3_mu
5ad0: 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 tex_enter(db->mu
5ae0: 74 65 78 29 3b 0a 20 20 73 71 6c 69 74 65 33 42 tex);. sqlite3B
5af0: 74 72 65 65 45 6e 74 65 72 41 6c 6c 28 64 62 29 treeEnterAll(db)
5b00: 3b 0a 0d 0a 20 20 70 49 64 78 20 3d 20 73 71 6c ;... pIdx = sql
5b10: 69 74 65 33 46 69 6e 64 49 6e 64 65 78 28 64 62 ite3FindIndex(db
5b20: 2c 20 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 7a 44 , zIndexName, zD
5b30: 62 29 3b 0d 0a 0d 0a 20 20 73 71 6c 69 74 65 33 b);.... sqlite3
5b40: 42 74 72 65 65 4c 65 61 76 65 41 6c 6c 28 64 62 BtreeLeaveAll(db
5b50: 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 );. sqlite3_mut
5b60: 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 ex_leave(db->mut
5b70: 65 78 29 3b 0a 0d 0a 20 20 69 66 20 28 21 70 49 ex);... if (!pI
5b80: 64 78 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 dx) return SQLIT
5b90: 45 5f 45 52 52 4f 52 3b 0d 0a 0d 0a 20 20 70 54 E_ERROR;.... pT
5ba0: 61 62 20 3d 20 70 49 64 78 2d 3e 70 54 61 62 6c ab = pIdx->pTabl
5bb0: 65 3b 0d 0a 20 20 66 6f 72 20 28 6e 20 3d 20 30 e;.. for (n = 0
5bc0: 3b 20 6e 20 3c 20 70 49 64 78 2d 3e 6e 43 6f 6c ; n < pIdx->nCol
5bd0: 75 6d 6e 3b 20 6e 2b 2b 29 0d 0a 20 20 7b 0d 0a umn; n++).. {..
5be0: 20 20 20 20 69 6e 74 20 63 6e 75 6d 20 3d 20 70 int cnum = p
5bf0: 49 64 78 2d 3e 61 69 43 6f 6c 75 6d 6e 5b 6e 5d Idx->aiColumn[n]
5c00: 3b 0d 0a 20 20 20 20 69 66 20 28 73 71 6c 69 74 ;.. if (sqlit
5c10: 65 33 53 74 72 49 43 6d 70 28 70 54 61 62 2d 3e e3StrICmp(pTab->
5c20: 61 43 6f 6c 5b 63 6e 75 6d 5d 2e 7a 4e 61 6d 65 aCol[cnum].zName
5c30: 2c 20 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 29 20 3d , zColumnName) =
5c40: 3d 20 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 = 0).. {..
5c50: 20 20 20 2a 73 6f 72 74 4f 72 64 65 72 20 3d 20 *sortOrder =
5c60: 70 49 64 78 2d 3e 61 53 6f 72 74 4f 72 64 65 72 pIdx->aSortOrder
5c70: 5b 6e 5d 3b 0d 0a 20 20 20 20 20 20 2a 70 7a 43 [n];.. *pzC
5c80: 6f 6c 6c 20 3d 20 70 49 64 78 2d 3e 61 7a 43 6f oll = pIdx->azCo
5c90: 6c 6c 5b 6e 5d 3b 0d 0a 20 20 20 20 20 20 2a 70 ll[n];.. *p
5ca0: 6c 65 6e 20 3d 20 73 74 72 6c 65 6e 28 2a 70 7a len = strlen(*pz
5cb0: 43 6f 6c 6c 29 3b 0d 0a 20 20 20 20 20 20 2a 6f Coll);.. *o
5cc0: 6e 45 72 72 6f 72 20 3d 20 70 49 64 78 2d 3e 6f nError = pIdx->o
5cd0: 6e 45 72 72 6f 72 3b 0d 0a 0d 0a 20 20 20 20 20 nError;....
5ce0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f return SQLITE_O
5cf0: 4b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a K;.. }.. }..
5d00: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f return SQLITE_
5d10: 45 52 52 4f 52 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c ERROR;..}....SQL
5d20: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
5d30: 50 49 20 73 71 6c 69 74 65 33 5f 74 61 62 6c 65 PI sqlite3_table
5d40: 5f 63 75 72 73 6f 72 5f 69 6e 74 65 72 6f 70 28 _cursor_interop(
5d50: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 73 sqlite3_stmt *ps
5d60: 74 6d 74 2c 20 69 6e 74 20 69 44 62 2c 20 50 67 tmt, int iDb, Pg
5d70: 6e 6f 20 74 61 62 6c 65 52 6f 6f 74 50 61 67 65 no tableRootPage
5d80: 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20 2a 70 20 )..{.. Vdbe *p
5d90: 3d 20 28 56 64 62 65 20 2a 29 70 73 74 6d 74 3b = (Vdbe *)pstmt;
5da0: 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 .. sqlite3 *db
5db0: 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29 20 3f 20 = (p == NULL) ?
5dc0: 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b 0d 0a 20 NULL : p->db;..
5dd0: 20 69 6e 74 20 6e 3b 0d 0a 20 20 69 6e 74 20 72 int n;.. int r
5de0: 65 74 20 3d 20 2d 31 3b 0d 0a 0d 0a 20 20 73 71 et = -1;.... sq
5df0: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65 lite3_mutex_ente
5e00: 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 r(db->mutex);..
5e10: 20 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c for (n = 0; n <
5e20: 20 70 2d 3e 6e 43 75 72 73 6f 72 20 26 26 20 70 p->nCursor && p
5e30: 2d 3e 61 70 43 73 72 5b 6e 5d 20 21 3d 20 4e 55 ->apCsr[n] != NU
5e40: 4c 4c 3b 20 6e 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 LL; n++).. {..
5e50: 20 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b if (p->apCsr[
5e60: 6e 5d 2d 3e 69 73 54 61 62 6c 65 20 3d 3d 20 46 n]->isTable == F
5e70: 41 4c 53 45 29 20 63 6f 6e 74 69 6e 75 65 3b 0d ALSE) continue;.
5e80: 0a 20 20 20 20 69 66 20 28 70 2d 3e 61 70 43 73 . if (p->apCs
5e90: 72 5b 6e 5d 2d 3e 69 44 62 20 21 3d 20 69 44 62 r[n]->iDb != iDb
5ea0: 29 20 63 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 ) continue;..
5eb0: 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d if (p->apCsr[n]
5ec0: 2d 3e 70 43 75 72 73 6f 72 2d 3e 70 67 6e 6f 52 ->pCursor->pgnoR
5ed0: 6f 6f 74 20 3d 3d 20 74 61 62 6c 65 52 6f 6f 74 oot == tableRoot
5ee0: 50 61 67 65 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 Page).. {..
5ef0: 20 20 20 20 72 65 74 20 3d 20 6e 3b 0d 0a 20 20 ret = n;..
5f00: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 break;..
5f10: 7d 0d 0a 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 }.. }.. sqlite
5f20: 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 3_mutex_leave(db
5f30: 2d 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 72 ->mutex);.... r
5f40: 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d eturn ret;..}...
5f50: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 .SQLITE_API int
5f60: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 WINAPI sqlite3_c
5f70: 75 72 73 6f 72 5f 72 6f 77 69 64 5f 69 6e 74 65 ursor_rowid_inte
5f80: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 rop(sqlite3_stmt
5f90: 20 2a 70 73 74 6d 74 2c 20 69 6e 74 20 63 75 72 *pstmt, int cur
5fa0: 73 6f 72 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 sor, sqlite_int6
5fb0: 34 20 2a 70 72 6f 77 69 64 29 0d 0a 7b 0d 0a 20 4 *prowid)..{..
5fc0: 20 56 64 62 65 20 2a 70 20 3d 20 28 56 64 62 65 Vdbe *p = (Vdbe
5fd0: 20 2a 29 70 73 74 6d 74 3b 0d 0a 20 20 73 71 6c *)pstmt;.. sql
5fe0: 69 74 65 33 20 2a 64 62 20 3d 20 28 70 20 3d 3d ite3 *db = (p ==
5ff0: 20 4e 55 4c 4c 29 20 3f 20 4e 55 4c 4c 20 3a 20 NULL) ? NULL :
6000: 70 2d 3e 64 62 3b 0d 0a 20 20 56 64 62 65 43 75 p->db;.. VdbeCu
6010: 72 73 6f 72 20 2a 70 43 3b 0d 0a 20 20 69 6e 74 rsor *pC;.. int
6020: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 4f 4b ret = SQLITE_OK
6030: 3b 0d 0a 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d ;.... sqlite3_m
6040: 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d utex_enter(db->m
6050: 75 74 65 78 29 3b 0d 0a 20 20 77 68 69 6c 65 20 utex);.. while
6060: 28 31 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 (1).. {.. if
6070: 20 28 63 75 72 73 6f 72 20 3c 20 30 20 7c 7c 20 (cursor < 0 ||
6080: 63 75 72 73 6f 72 20 3e 3d 20 70 2d 3e 6e 43 75 cursor >= p->nCu
6090: 72 73 6f 72 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 rsor).. {..
60a0: 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 ret = SQLITE
60b0: 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 _ERROR;.. b
60c0: 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 reak;.. }..
60d0: 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 63 if (p->apCsr[c
60e0: 75 72 73 6f 72 5d 20 3d 3d 20 4e 55 4c 4c 29 0d ursor] == NULL).
60f0: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 . {.. re
6100: 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 t = SQLITE_ERROR
6110: 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d ;.. break;.
6120: 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 70 43 . }.... pC
6130: 20 3d 20 70 2d 3e 61 70 43 73 72 5b 63 75 72 73 = p->apCsr[curs
6140: 6f 72 5d 3b 0d 0a 0d 0a 20 20 20 20 72 65 74 20 or];.... ret
6150: 3d 20 73 71 6c 69 74 65 33 56 64 62 65 43 75 72 = sqlite3VdbeCur
6160: 73 6f 72 4d 6f 76 65 74 6f 28 70 43 29 3b 0d 0a sorMoveto(pC);..
6170: 20 20 20 20 69 66 28 72 65 74 29 0d 0a 20 20 20 if(ret)..
6180: 20 20 20 62 72 65 61 6b 3b 0d 0a 0d 0a 20 20 20 break;....
6190: 20 69 66 28 70 43 2d 3e 72 6f 77 69 64 49 73 56 if(pC->rowidIsV
61a0: 61 6c 69 64 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 alid).. {..
61b0: 20 20 20 20 2a 70 72 6f 77 69 64 20 3d 20 70 43 *prowid = pC
61c0: 2d 3e 6c 61 73 74 52 6f 77 69 64 3b 0d 0a 20 20 ->lastRowid;..
61d0: 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 20 69 66 }.. else if
61e0: 28 70 43 2d 3e 70 73 65 75 64 6f 54 61 62 6c 65 (pC->pseudoTable
61f0: 52 65 67 20 3e 20 30 29 0d 0a 20 20 20 20 7b 0d Reg > 0).. {.
6200: 0a 20 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c . ret = SQL
6210: 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 ITE_ERROR;..
6220: 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d break;.. }.
6230: 0a 20 20 20 20 65 6c 73 65 20 69 66 28 70 43 2d . else if(pC-
6240: 3e 6e 75 6c 6c 52 6f 77 20 7c 7c 20 70 43 2d 3e >nullRow || pC->
6250: 70 43 75 72 73 6f 72 3d 3d 30 29 0d 0a 20 20 20 pCursor==0)..
6260: 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 {.. ret =
6270: 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 SQLITE_ERROR;..
6280: 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 break;..
6290: 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d 0a 20 20 }.. else..
62a0: 20 20 7b 0d 0a 20 20 20 20 20 20 69 66 20 28 70 {.. if (p
62b0: 43 2d 3e 70 43 75 72 73 6f 72 20 3d 3d 20 4e 55 C->pCursor == NU
62c0: 4c 4c 29 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 LL).. {..
62d0: 20 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 ret = SQLI
62e0: 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 TE_ERROR;..
62f0: 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 20 break;..
6300: 20 7d 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 }.. sqlite
6310: 33 42 74 72 65 65 4b 65 79 53 69 7a 65 28 70 43 3BtreeKeySize(pC
6320: 2d 3e 70 43 75 72 73 6f 72 2c 20 70 72 6f 77 69 ->pCursor, prowi
6330: 64 29 3b 0d 0a 20 20 20 20 20 20 2a 70 72 6f 77 d);.. *prow
6340: 69 64 20 3d 20 2a 70 72 6f 77 69 64 3b 0d 0a 20 id = *prowid;..
6350: 20 20 20 7d 0d 0a 20 20 20 20 62 72 65 61 6b 3b }.. break;
6360: 0d 0a 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 .. }.. sqlite3
6370: 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d _mutex_leave(db-
6380: 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 72 65 >mutex);.... re
6390: 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 23 65 turn ret;..}..#e
63a0: 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f ndif /* SQLITE_O
63b0: 53 5f 57 49 4e 20 2a 2f 0d 0a 0d 0a 2f 2a 2a 2a S_WIN */..../***
63c0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
63d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
63e0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
63f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
6400: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2f 0d 0a 0d 0a 2f **********/..../
6410: 2a 0d 0a 2a 2a 20 54 68 65 20 49 4e 54 45 52 4f *..** The INTERO
6420: 50 5f 54 45 53 54 5f 45 58 54 45 4e 53 49 4f 4e P_TEST_EXTENSION
6430: 20 62 6c 6f 63 6b 20 6d 75 73 74 20 62 65 20 61 block must be a
6440: 74 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 69 t the end of thi
6450: 73 20 73 6f 75 72 63 65 20 66 69 6c 65 0d 0a 2a s source file..*
6460: 2a 20 62 65 63 61 75 73 65 20 69 74 20 69 6e 63 * because it inc
6470: 6c 75 64 65 73 20 74 68 65 20 22 73 71 6c 69 74 ludes the "sqlit
6480: 65 33 65 78 74 2e 68 22 20 66 69 6c 65 2c 20 77 e3ext.h" file, w
6490: 68 69 63 68 20 64 65 66 69 6e 65 73 20 74 68 65 hich defines the
64a0: 20 73 71 6c 69 74 65 33 0d 0a 2a 2a 20 70 75 62 sqlite3..** pub
64b0: 6c 69 63 20 41 50 49 20 66 75 6e 63 74 69 6f 6e lic API function
64c0: 20 6e 61 6d 65 73 20 74 6f 20 62 65 20 6d 61 63 names to be mac
64d0: 72 6f 73 20 61 6e 64 20 74 68 61 74 20 77 6f 75 ros and that wou
64e0: 6c 64 20 63 61 75 73 65 20 74 68 65 20 63 6f 64 ld cause the cod
64f0: 65 0d 0a 2a 2a 20 61 62 6f 76 65 20 74 68 69 73 e..** above this
6500: 20 70 6f 69 6e 74 20 74 6f 20 6d 61 6c 66 75 6e point to malfun
6510: 63 74 69 6f 6e 2e 0d 0a 2a 2f 0d 0a 23 69 66 20 ction...*/..#if
6520: 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f defined(INTEROP_
6530: 54 45 53 54 5f 45 58 54 45 4e 53 49 4f 4e 29 0d TEST_EXTENSION).
6540: 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 63 6f .#include "../co
6550: 72 65 2f 73 71 6c 69 74 65 33 65 78 74 2e 68 22 re/sqlite3ext.h"
6560: 0d 0a 53 51 4c 49 54 45 5f 45 58 54 45 4e 53 49 ..SQLITE_EXTENSI
6570: 4f 4e 5f 49 4e 49 54 31 0d 0a 0d 0a 2f 2a 0d 0a ON_INIT1..../*..
6580: 2a 2a 20 54 68 65 20 69 6e 74 65 72 6f 70 54 65 ** The interopTe
6590: 73 74 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f st() SQL functio
65a0: 6e 20 72 65 74 75 72 6e 73 20 69 74 73 20 66 69 n returns its fi
65b0: 72 73 74 20 61 72 67 75 6d 65 6e 74 20 6f 72 20 rst argument or
65c0: 72 61 69 73 65 73 20 61 6e 0d 0a 2a 2a 20 65 72 raises an..** er
65d0: 72 6f 72 20 69 66 20 74 68 65 72 65 20 61 72 65 ror if there are
65e0: 20 6e 6f 74 20 65 6e 6f 75 67 68 20 61 72 67 75 not enough argu
65f0: 6d 65 6e 74 73 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 ments...*/..SQLI
6600: 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 TE_PRIVATE void
6610: 69 6e 74 65 72 6f 70 54 65 73 74 46 75 6e 63 28 interopTestFunc(
6620: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 .. sqlite3_cont
6630: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0d 0a 20 ext *context,..
6640: 20 69 6e 74 20 61 72 67 63 2c 0d 0a 20 20 73 71 int argc,.. sq
6650: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 lite3_value **ar
6660: 67 76 0d 0a 29 7b 0d 0a 20 20 63 6f 6e 73 74 20 gv..){.. const
6670: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a unsigned char *z
6680: 3b 0d 0a 20 20 69 66 28 20 61 72 67 63 21 3d 31 ;.. if( argc!=1
6690: 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 ){.. sqlite3
66a0: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f _result_error(co
66b0: 6e 74 65 78 74 2c 20 22 6e 65 65 64 20 65 78 61 ntext, "need exa
66c0: 63 74 6c 79 20 6f 6e 65 20 61 72 67 75 6d 65 6e ctly one argumen
66d0: 74 22 2c 20 2d 31 29 3b 0d 0a 20 20 20 20 72 65 t", -1);.. re
66e0: 74 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20 20 7a 20 turn;.. }.. z
66f0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f = sqlite3_value_
6700: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0d 0a text(argv[0]);..
6710: 20 20 69 66 28 20 7a 20 29 7b 0d 0a 20 20 20 20 if( z ){..
6720: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 sqlite3_result_t
6730: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 ext(context, (ch
6740: 61 72 2a 29 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 ar*)z, -1, SQLIT
6750: 45 5f 53 54 41 54 49 43 29 3b 0d 0a 20 20 7d 65 E_STATIC);.. }e
6760: 6c 73 65 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 lse{.. sqlite
6770: 33 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 3_result_null(co
6780: 6e 74 65 78 74 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d ntext);.. }..}.
6790: 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 65 20 69 6e .../*..** The in
67a0: 74 65 72 6f 70 53 6c 65 65 70 28 29 20 53 51 4c teropSleep() SQL
67b0: 20 66 75 6e 63 74 69 6f 6e 20 77 61 69 74 73 20 function waits
67c0: 74 68 65 20 73 70 65 63 69 66 69 65 64 20 6e 75 the specified nu
67d0: 6d 62 65 72 20 6f 66 20 6d 69 6c 6c 69 73 65 63 mber of millisec
67e0: 6f 6e 64 73 0d 0a 2a 2a 20 6f 72 20 72 61 69 73 onds..** or rais
67f0: 65 73 20 61 6e 20 65 72 72 6f 72 20 69 66 20 74 es an error if t
6800: 68 65 72 65 20 61 72 65 20 6e 6f 74 20 65 6e 6f here are not eno
6810: 75 67 68 20 61 72 67 75 6d 65 6e 74 73 2e 0d 0a ugh arguments...
6820: 2a 2f 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 */..SQLITE_PRIVA
6830: 54 45 20 76 6f 69 64 20 69 6e 74 65 72 6f 70 53 TE void interopS
6840: 6c 65 65 70 46 75 6e 63 28 0d 0a 20 20 73 71 6c leepFunc(.. sql
6850: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f ite3_context *co
6860: 6e 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20 61 72 ntext,.. int ar
6870: 67 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33 5f 76 gc,.. sqlite3_v
6880: 61 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29 7b 0d alue **argv..){.
6890: 0a 20 20 69 6e 74 20 6d 3b 0d 0a 20 20 69 66 28 . int m;.. if(
68a0: 20 61 72 67 63 21 3d 31 20 29 7b 0d 0a 20 20 20 argc!=1 ){..
68b0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f sqlite3_result_
68c0: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 error(context, "
68d0: 6e 65 65 64 20 65 78 61 63 74 6c 79 20 6f 6e 65 need exactly one
68e0: 20 61 72 67 75 6d 65 6e 74 22 2c 20 2d 31 29 3b argument", -1);
68f0: 0d 0a 20 20 20 20 72 65 74 75 72 6e 3b 0d 0a 20 .. return;..
6900: 20 7d 0d 0a 20 20 6d 20 3d 20 73 71 6c 69 74 65 }.. m = sqlite
6910: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 3_value_int(argv
6920: 5b 30 5d 29 3b 0d 0a 23 69 66 20 53 51 4c 49 54 [0]);..#if SQLIT
6930: 45 5f 4f 53 5f 57 49 4e 43 45 0d 0a 20 20 53 6c E_OS_WINCE.. Sl
6940: 65 65 70 28 6d 29 3b 0d 0a 20 20 73 71 6c 69 74 eep(m);.. sqlit
6950: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f e3_result_int(co
6960: 6e 74 65 78 74 2c 20 57 41 49 54 5f 4f 42 4a 45 ntext, WAIT_OBJE
6970: 43 54 5f 30 29 3b 0d 0a 23 65 6c 73 65 0d 0a 20 CT_0);..#else..
6980: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f sqlite3_result_
6990: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 53 6c 65 int(context, Sle
69a0: 65 70 45 78 28 6d 2c 20 54 52 55 45 29 29 3b 0d epEx(m, TRUE));.
69b0: 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 2f 2a .#endif..}..../*
69c0: 20 53 51 4c 69 74 65 20 69 6e 76 6f 6b 65 73 20 SQLite invokes
69d0: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 6f 6e 63 this routine onc
69e0: 65 20 77 68 65 6e 20 69 74 20 6c 6f 61 64 73 20 e when it loads
69f0: 74 68 65 20 65 78 74 65 6e 73 69 6f 6e 2e 0d 0a the extension...
6a00: 2a 2a 20 43 72 65 61 74 65 20 6e 65 77 20 66 75 ** Create new fu
6a10: 6e 63 74 69 6f 6e 73 2c 20 63 6f 6c 6c 61 74 69 nctions, collati
6a20: 6e 67 20 73 65 71 75 65 6e 63 65 73 2c 20 61 6e ng sequences, an
6a30: 64 20 76 69 72 74 75 61 6c 20 74 61 62 6c 65 0d d virtual table.
6a40: 0a 2a 2a 20 6d 6f 64 75 6c 65 73 20 68 65 72 65 .** modules here
6a50: 2e 20 20 54 68 69 73 20 69 73 20 75 73 75 61 6c . This is usual
6a60: 6c 79 20 74 68 65 20 6f 6e 6c 79 20 65 78 70 6f ly the only expo
6a70: 72 74 65 64 20 73 79 6d 62 6f 6c 20 69 6e 0d 0a rted symbol in..
6a80: 2a 2a 20 74 68 65 20 73 68 61 72 65 64 20 6c 69 ** the shared li
6a90: 62 72 61 72 79 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 brary...*/..SQLI
6aa0: 54 45 5f 41 50 49 20 69 6e 74 20 69 6e 74 65 72 TE_API int inter
6ab0: 6f 70 5f 74 65 73 74 5f 65 78 74 65 6e 73 69 6f op_test_extensio
6ac0: 6e 5f 69 6e 69 74 28 0d 0a 20 20 73 71 6c 69 74 n_init(.. sqlit
6ad0: 65 33 20 2a 64 62 2c 0d 0a 20 20 63 68 61 72 20 e3 *db,.. char
6ae0: 2a 2a 70 7a 45 72 72 4d 73 67 2c 0d 0a 20 20 63 **pzErrMsg,.. c
6af0: 6f 6e 73 74 20 73 71 6c 69 74 65 33 5f 61 70 69 onst sqlite3_api
6b00: 5f 72 6f 75 74 69 6e 65 73 20 2a 70 41 70 69 0d _routines *pApi.
6b10: 0a 29 7b 0d 0a 20 20 69 6e 74 20 72 63 3b 0d 0a .){.. int rc;..
6b20: 20 20 53 51 4c 49 54 45 5f 45 58 54 45 4e 53 49 SQLITE_EXTENSI
6b30: 4f 4e 5f 49 4e 49 54 32 28 70 41 70 69 29 0d 0a ON_INIT2(pApi)..
6b40: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 63 rc = sqlite3_c
6b50: 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64 reate_function(d
6b60: 62 2c 20 22 69 6e 74 65 72 6f 70 54 65 73 74 22 b, "interopTest"
6b70: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 41 4e 59 , -1, SQLITE_ANY
6b80: 2c 20 30 2c 0d 0a 20 20 20 20 20 20 69 6e 74 65 , 0,.. inte
6b90: 72 6f 70 54 65 73 74 46 75 6e 63 2c 20 30 2c 20 ropTestFunc, 0,
6ba0: 30 29 3b 0d 0a 20 20 69 66 28 20 72 63 3d 3d 53 0);.. if( rc==S
6bb0: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a 20 20 20 QLITE_OK ){..
6bc0: 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 63 72 rc = sqlite3_cr
6bd0: 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64 62 eate_function(db
6be0: 2c 20 22 69 6e 74 65 72 6f 70 53 6c 65 65 70 22 , "interopSleep"
6bf0: 2c 20 31 2c 20 53 51 4c 49 54 45 5f 41 4e 59 2c , 1, SQLITE_ANY,
6c00: 20 30 2c 0d 0a 20 20 20 20 20 20 20 20 69 6e 74 0,.. int
6c10: 65 72 6f 70 53 6c 65 65 70 46 75 6e 63 2c 20 30 eropSleepFunc, 0
6c20: 2c 20 30 29 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 , 0);.. }.. re
6c30: 74 75 72 6e 20 72 63 3b 0d 0a 7d 0d 0a 23 65 6e turn rc;..}..#en
6c40: 64 69 66 0d 0a dif..