0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 2a 20 41 44 *********.. * AD
0040: 4f 2e 4e 45 54 20 32 2e 30 20 44 61 74 61 20 50 O.NET 2.0 Data P
0050: 72 6f 76 69 64 65 72 20 66 6f 72 20 53 51 4c 69 rovider for SQLi
0060: 74 65 20 56 65 72 73 69 6f 6e 20 33 2e 58 0d 0a te Version 3.X..
0070: 20 2a 20 57 72 69 74 74 65 6e 20 62 79 20 52 6f * Written by Ro
0080: 62 65 72 74 20 53 69 6d 70 73 6f 6e 20 28 72 6f bert Simpson (ro
0090: 62 65 72 74 40 62 6c 61 63 6b 63 61 73 74 6c 65 bert@blackcastle
00a0: 73 6f 66 74 2e 63 6f 6d 29 0d 0a 20 2a 0d 0a 20 soft.com).. *..
00b0: 2a 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74 68 * Released to th
00c0: 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e 2c e public domain,
00d0: 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77 6e use at your own
00e0: 20 72 69 73 6b 21 0d 0a 20 2a 2a 2a 2a 2a 2a 2a risk!.. *******
00f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0100: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0110: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0120: 2a 2f 0d 0a 0d 0a 23 69 66 64 65 66 20 5f 57 49 */....#ifdef _WI
0130: 4e 33 32 0d 0a 23 64 65 66 69 6e 65 20 53 51 4c N32..#define SQL
0140: 49 54 45 5f 41 50 49 20 5f 5f 64 65 63 6c 73 70 ITE_API __declsp
0150: 65 63 28 64 6c 6c 65 78 70 6f 72 74 29 0d 0a 23 ec(dllexport)..#
0160: 65 6c 73 65 0d 0a 23 64 65 66 69 6e 65 20 57 49 else..#define WI
0170: 4e 41 50 49 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a NAPI..#endif....
0180: 23 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 56 45 #if /* SQLITE_VE
0190: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 RSION_NUMBER >=
01a0: 33 30 31 33 30 30 30 20 26 26 20 2a 2f 20 64 65 3013000 && */ de
01b0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 53 45 fined(INTEROP_SE
01c0: 53 53 49 4f 4e 5f 45 58 54 45 4e 53 49 4f 4e 29 SSION_EXTENSION)
01d0: 0d 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 ..#ifndef SQLITE
01e0: 5f 45 4e 41 42 4c 45 5f 53 45 53 53 49 4f 4e 0d _ENABLE_SESSION.
01f0: 0a 23 64 65 66 69 6e 65 20 53 51 4c 49 54 45 5f .#define SQLITE_
0200: 45 4e 41 42 4c 45 5f 53 45 53 53 49 4f 4e 20 28 ENABLE_SESSION (
0210: 31 29 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 6e 1)..#endif..#ifn
0220: 64 65 66 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c def SQLITE_ENABL
0230: 45 5f 50 52 45 55 50 44 41 54 45 5f 48 4f 4f 4b E_PREUPDATE_HOOK
0240: 0d 0a 23 64 65 66 69 6e 65 20 53 51 4c 49 54 45 ..#define SQLITE
0250: 5f 45 4e 41 42 4c 45 5f 50 52 45 55 50 44 41 54 _ENABLE_PREUPDAT
0260: 45 5f 48 4f 4f 4b 20 28 31 29 0d 0a 23 65 6e 64 E_HOOK (1)..#end
0270: 69 66 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 if..#endif....#i
0280: 6e 63 6c 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f nclude "../core/
0290: 73 71 6c 69 74 65 33 2e 63 22 0d 0a 0d 0a 23 69 sqlite3.c"....#i
02a0: 66 20 21 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e f !SQLITE_OS_WIN
02b0: 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 77 63 68 61 ..#include <wcha
02c0: 72 2e 68 3e 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a r.h>..#endif....
02d0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
02e0: 52 4f 50 5f 49 4e 43 4c 55 44 45 5f 45 58 54 52 ROP_INCLUDE_EXTR
02f0: 41 29 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e A)..#include "..
0300: 2f 65 78 74 2f 65 78 74 72 61 2e 63 22 0d 0a 23 /ext/extra.c"..#
0310: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 endif....#if def
0320: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 49 4e 43 ined(INTEROP_INC
0330: 4c 55 44 45 5f 43 45 52 4f 44 29 0d 0a 23 69 6e LUDE_CEROD)..#in
0340: 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 63 65 clude "../ext/ce
0350: 72 6f 64 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a rod.c"..#endif..
0360: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
0370: 54 45 52 4f 50 5f 49 4e 43 4c 55 44 45 5f 53 45 TEROP_INCLUDE_SE
0380: 45 29 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e E)..#include "..
0390: 2f 65 78 74 2f 73 65 65 2e 63 22 0d 0a 23 65 6e /ext/see.c"..#en
03a0: 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e dif....#if defin
03b0: 65 64 28 49 4e 54 45 52 4f 50 5f 49 4e 43 4c 55 ed(INTEROP_INCLU
03c0: 44 45 5f 5a 49 50 56 46 53 29 0d 0a 23 69 6e 63 DE_ZIPVFS)..#inc
03d0: 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 7a 69 70 lude "../ext/zip
03e0: 76 66 73 2e 63 22 0d 0a 23 69 6e 63 6c 75 64 65 vfs.c"..#include
03f0: 20 22 2e 2e 2f 65 78 74 2f 61 6c 67 6f 72 69 74 "../ext/algorit
0400: 68 6d 73 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a hms.c"..#endif..
0410: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
0420: 54 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e 5f TEROP_EXTENSION_
0430: 46 55 4e 43 54 49 4f 4e 53 29 0d 0a 23 75 6e 64 FUNCTIONS)..#und
0440: 65 66 20 43 4f 4d 50 49 4c 45 5f 53 51 4c 49 54 ef COMPILE_SQLIT
0450: 45 5f 45 58 54 45 4e 53 49 4f 4e 53 5f 41 53 5f E_EXTENSIONS_AS_
0460: 4c 4f 41 44 41 42 4c 45 5f 4d 4f 44 55 4c 45 0d LOADABLE_MODULE.
0470: 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 63 6f .#include "../co
0480: 6e 74 72 69 62 2f 65 78 74 65 6e 73 69 6f 6e 2d ntrib/extension-
0490: 66 75 6e 63 74 69 6f 6e 73 2e 63 22 0d 0a 65 78 functions.c"..ex
04a0: 74 65 72 6e 20 69 6e 74 20 52 65 67 69 73 74 65 tern int Registe
04b0: 72 45 78 74 65 6e 73 69 6f 6e 46 75 6e 63 74 69 rExtensionFuncti
04c0: 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a 64 62 29 ons(sqlite3 *db)
04d0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 ;..#endif....#if
04e0: 20 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 20 26 SQLITE_OS_WIN &
04f0: 26 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f & defined(INTERO
0500: 50 5f 43 4f 44 45 43 29 20 26 26 20 21 64 65 66 P_CODEC) && !def
0510: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 49 4e 43 ined(INTEROP_INC
0520: 4c 55 44 45 5f 53 45 45 29 0d 0a 23 69 66 64 65 LUDE_SEE)..#ifde
0530: 66 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f f SQLITE_ENABLE_
0540: 5a 49 50 56 46 53 0d 0a 23 64 65 66 69 6e 65 20 ZIPVFS..#define
0550: 49 4e 54 45 52 4f 50 5f 43 4f 44 45 43 5f 47 45 INTEROP_CODEC_GE
0560: 54 5f 50 41 47 45 52 28 61 2c 62 2c 63 29 20 73 T_PAGER(a,b,c) s
0570: 71 6c 69 74 65 33 50 61 67 65 72 47 65 74 28 61 qlite3PagerGet(a
0580: 2c 62 2c 63 2c 30 29 0d 0a 23 65 6c 69 66 20 53 ,b,c,0)..#elif S
0590: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 QLITE_VERSION_NU
05a0: 4d 42 45 52 20 3e 3d 20 33 30 31 30 30 30 30 0d MBER >= 3010000.
05b0: 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f 50 .#define INTEROP
05c0: 5f 43 4f 44 45 43 5f 47 45 54 5f 50 41 47 45 52 _CODEC_GET_PAGER
05d0: 28 61 2c 62 2c 63 29 20 73 71 6c 69 74 65 33 50 (a,b,c) sqlite3P
05e0: 61 67 65 72 47 65 74 28 61 2c 62 2c 63 2c 30 29 agerGet(a,b,c,0)
05f0: 0d 0a 23 65 6c 73 65 0d 0a 23 64 65 66 69 6e 65 ..#else..#define
0600: 20 49 4e 54 45 52 4f 50 5f 43 4f 44 45 43 5f 47 INTEROP_CODEC_G
0610: 45 54 5f 50 41 47 45 52 28 61 2c 62 2c 63 29 20 ET_PAGER(a,b,c)
0620: 73 71 6c 69 74 65 33 50 61 67 65 72 47 65 74 28 sqlite3PagerGet(
0630: 61 2c 62 2c 63 29 0d 0a 23 65 6e 64 69 66 0d 0a a,b,c)..#endif..
0640: 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 77 69 6e #include "../win
0650: 2f 63 72 79 70 74 2e 63 22 0d 0a 23 65 6e 64 69 /crypt.c"..#endi
0660: 66 0d 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 69 f....#include "i
0670: 6e 74 65 72 6f 70 2e 68 22 0d 0a 0d 0a 23 64 65 nterop.h"....#de
0680: 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 fine INTEROP_DEB
0690: 55 47 5f 4e 4f 4e 45 20 20 20 20 20 20 20 20 20 UG_NONE
06a0: 20 20 28 30 78 30 30 30 30 29 0d 0a 23 64 65 66 (0x0000)..#def
06b0: 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 ine INTEROP_DEBU
06c0: 47 5f 43 4c 4f 53 45 20 20 20 20 20 20 20 20 20 G_CLOSE
06d0: 20 28 30 78 30 30 30 31 29 0d 0a 23 64 65 66 69 (0x0001)..#defi
06e0: 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ne INTEROP_DEBUG
06f0: 5f 46 49 4e 41 4c 49 5a 45 20 20 20 20 20 20 20 _FINALIZE
0700: 28 30 78 30 30 30 32 29 0d 0a 23 64 65 66 69 6e (0x0002)..#defin
0710: 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f e INTEROP_DEBUG_
0720: 42 41 43 4b 55 50 5f 46 49 4e 49 53 48 20 20 28 BACKUP_FINISH (
0730: 30 78 30 30 30 34 29 0d 0a 23 64 65 66 69 6e 65 0x0004)..#define
0740: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f INTEROP_DEBUG_O
0750: 50 45 4e 20 20 20 20 20 20 20 20 20 20 20 28 30 PEN (0
0760: 78 30 30 30 38 29 0d 0a 23 64 65 66 69 6e 65 20 x0008)..#define
0770: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 INTEROP_DEBUG_OP
0780: 45 4e 31 36 20 20 20 20 20 20 20 20 20 28 30 78 EN16 (0x
0790: 30 30 31 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 0010)..#define I
07a0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 NTEROP_DEBUG_PRE
07b0: 50 41 52 45 20 20 20 20 20 20 20 20 28 30 78 30 PARE (0x0
07c0: 30 32 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 020)..#define IN
07d0: 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 TEROP_DEBUG_PREP
07e0: 41 52 45 31 36 20 20 20 20 20 20 28 30 78 30 30 ARE16 (0x00
07f0: 34 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 40)..#define INT
0800: 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 54 EROP_DEBUG_RESET
0810: 20 20 20 20 20 20 20 20 20 20 28 30 78 30 30 38 (0x008
0820: 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 0)..#define INTE
0830: 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 ROP_DEBUG_CHANGE
0840: 53 20 20 20 20 20 20 20 20 28 30 78 30 31 30 30 S (0x0100
0850: 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 )..#define INTER
0860: 4f 50 5f 44 45 42 55 47 5f 42 52 45 41 4b 20 20 OP_DEBUG_BREAK
0870: 20 20 20 20 20 20 20 20 28 30 78 30 32 30 30 29 (0x0200)
0880: 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 4f ..#define INTERO
0890: 50 5f 44 45 42 55 47 5f 42 4c 4f 42 5f 43 4c 4f P_DEBUG_BLOB_CLO
08a0: 53 45 20 20 20 20 20 28 30 78 30 34 30 30 29 0d SE (0x0400).
08b0: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 5f ...#if defined(_
08c0: 4d 53 43 5f 56 45 52 29 20 26 26 20 64 65 66 69 MSC_VER) && defi
08d0: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 ned(INTEROP_DEBU
08e0: 47 29 20 26 26 20 5c 0d 0a 20 20 20 20 28 49 4e G) && \.. (IN
08f0: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
0900: 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 52 45 41 TEROP_DEBUG_BREA
0910: 4b 29 0d 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 K)..#define sqli
0920: 74 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 te3InteropBreak(
0930: 61 29 20 7b 20 73 71 6c 69 74 65 33 49 6e 74 65 a) { sqlite3Inte
0940: 72 6f 70 44 65 62 75 67 28 22 25 73 5c 6e 22 2c ropDebug("%s\n",
0950: 20 28 61 29 29 3b 20 5f 5f 64 65 62 75 67 62 72 (a)); __debugbr
0960: 65 61 6b 28 29 3b 20 7d 0d 0a 23 65 6c 73 65 0d eak(); }..#else.
0970: 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 74 65 33 .#define sqlite3
0980: 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 61 29 0d InteropBreak(a).
0990: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 74 79 70 65 64 .#endif....typed
09a0: 65 66 20 76 6f 69 64 20 28 2a 53 51 4c 49 54 45 ef void (*SQLITE
09b0: 55 53 45 52 46 55 4e 43 29 28 73 71 6c 69 74 65 USERFUNC)(sqlite
09c0: 33 5f 63 6f 6e 74 65 78 74 20 2a 2c 20 69 6e 74 3_context *, int
09d0: 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 , sqlite3_value
09e0: 2a 2a 29 3b 0d 0a 74 79 70 65 64 65 66 20 76 6f **);..typedef vo
09f0: 69 64 20 28 2a 53 51 4c 49 54 45 46 55 4e 43 46 id (*SQLITEFUNCF
0a00: 49 4e 41 4c 29 28 73 71 6c 69 74 65 33 5f 63 6f INAL)(sqlite3_co
0a10: 6e 74 65 78 74 20 2a 29 3b 0d 0a 0d 0a 2f 2a 0d ntext *);..../*.
0a20: 0a 2a 2a 20 41 6e 20 61 72 72 61 79 20 6f 66 20 .** An array of
0a30: 6e 61 6d 65 73 20 6f 66 20 61 6c 6c 20 63 6f 6d names of all com
0a40: 70 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e pile-time option
0a50: 73 2e 20 20 54 68 69 73 20 61 72 72 61 79 20 73 s. This array s
0a60: 68 6f 75 6c 64 0d 0a 2a 2a 20 62 65 20 73 6f 72 hould..** be sor
0a70: 74 65 64 20 41 2d 5a 2e 0d 0a 2a 2a 0d 0a 2a 2a ted A-Z...**..**
0a80: 20 54 68 69 73 20 61 72 72 61 79 20 6c 6f 6f 6b This array look
0a90: 73 20 6c 61 72 67 65 2c 20 62 75 74 20 69 6e 20 s large, but in
0aa0: 61 20 74 79 70 69 63 61 6c 20 69 6e 73 74 61 6c a typical instal
0ab0: 6c 61 74 69 6f 6e 20 61 63 74 75 61 6c 6c 79 20 lation actually
0ac0: 75 73 65 73 0d 0a 2a 2a 20 6f 6e 6c 79 20 61 20 uses..** only a
0ad0: 68 61 6e 64 66 75 6c 20 6f 66 20 63 6f 6d 70 69 handful of compi
0ae0: 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 73 2c le-time options,
0af0: 20 73 6f 20 6d 6f 73 74 20 74 69 6d 65 73 20 74 so most times t
0b00: 68 69 73 20 61 72 72 61 79 20 69 73 20 75 73 75 his array is usu
0b10: 61 6c 6c 79 0d 0a 2a 2a 20 72 61 74 68 65 72 20 ally..** rather
0b20: 73 68 6f 72 74 20 61 6e 64 20 75 73 65 73 20 6c short and uses l
0b30: 69 74 74 6c 65 20 6d 65 6d 6f 72 79 20 73 70 61 ittle memory spa
0b40: 63 65 2e 0d 0a 2a 2f 0d 0a 73 74 61 74 69 63 20 ce...*/..static
0b50: 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 63 6f 6e const char * con
0b60: 73 74 20 61 7a 49 6e 74 65 72 6f 70 43 6f 6d 70 st azInteropComp
0b70: 69 6c 65 4f 70 74 5b 5d 20 3d 20 7b 0d 0a 0d 0a ileOpt[] = {....
0b80: 2f 2a 20 54 68 65 73 65 20 6d 61 63 72 6f 73 20 /* These macros
0b90: 61 72 65 20 70 72 6f 76 69 64 65 64 20 74 6f 20 are provided to
0ba0: 22 73 74 72 69 6e 67 69 66 79 22 20 74 68 65 20 "stringify" the
0bb0: 76 61 6c 75 65 20 6f 66 20 74 68 65 20 64 65 66 value of the def
0bc0: 69 6e 65 0d 0a 2a 2a 20 66 6f 72 20 74 68 6f 73 ine..** for thos
0bd0: 65 20 6f 70 74 69 6f 6e 73 20 69 6e 20 77 68 69 e options in whi
0be0: 63 68 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 ch the value is
0bf0: 6d 65 61 6e 69 6e 67 66 75 6c 2e 20 2a 2f 0d 0a meaningful. */..
0c00: 23 69 66 6e 64 65 66 20 43 54 49 4d 45 4f 50 54 #ifndef CTIMEOPT
0c10: 5f 56 41 4c 5f 0d 0a 23 64 65 66 69 6e 65 20 43 _VAL_..#define C
0c20: 54 49 4d 45 4f 50 54 5f 56 41 4c 5f 28 6f 70 74 TIMEOPT_VAL_(opt
0c30: 29 20 23 6f 70 74 0d 0a 23 65 6e 64 69 66 0d 0a ) #opt..#endif..
0c40: 0d 0a 23 69 66 6e 64 65 66 20 43 54 49 4d 45 4f ..#ifndef CTIMEO
0c50: 50 54 5f 56 41 4c 0d 0a 23 64 65 66 69 6e 65 20 PT_VAL..#define
0c60: 43 54 49 4d 45 4f 50 54 5f 56 41 4c 28 6f 70 74 CTIMEOPT_VAL(opt
0c70: 29 20 43 54 49 4d 45 4f 50 54 5f 56 41 4c 5f 28 ) CTIMEOPT_VAL_(
0c80: 6f 70 74 29 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a opt)..#endif....
0c90: 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 43 #ifdef INTEROP_C
0ca0: 4f 44 45 43 0d 0a 20 20 22 43 4f 44 45 43 22 2c ODEC.. "CODEC",
0cb0: 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66 ..#endif..#ifdef
0cc0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 0d 0a INTEROP_DEBUG..
0cd0: 20 20 22 44 45 42 55 47 3d 22 20 43 54 49 4d 45 "DEBUG=" CTIME
0ce0: 4f 50 54 5f 56 41 4c 28 49 4e 54 45 52 4f 50 5f OPT_VAL(INTEROP_
0cf0: 44 45 42 55 47 29 2c 0d 0a 23 65 6e 64 69 66 0d DEBUG),..#endif.
0d00: 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f .#ifdef INTEROP_
0d10: 45 58 54 45 4e 53 49 4f 4e 5f 46 55 4e 43 54 49 EXTENSION_FUNCTI
0d20: 4f 4e 53 0d 0a 20 20 22 45 58 54 45 4e 53 49 4f ONS.. "EXTENSIO
0d30: 4e 5f 46 55 4e 43 54 49 4f 4e 53 22 2c 0d 0a 23 N_FUNCTIONS",..#
0d40: 65 6e 64 69 66 0d 0a 23 69 66 64 65 66 20 49 4e endif..#ifdef IN
0d50: 54 45 52 4f 50 5f 49 4e 43 4c 55 44 45 5f 43 45 TEROP_INCLUDE_CE
0d60: 52 4f 44 0d 0a 20 20 22 49 4e 43 4c 55 44 45 5f ROD.. "INCLUDE_
0d70: 43 45 52 4f 44 22 2c 0d 0a 23 65 6e 64 69 66 0d CEROD",..#endif.
0d80: 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f .#ifdef INTEROP_
0d90: 49 4e 43 4c 55 44 45 5f 45 58 54 52 41 0d 0a 20 INCLUDE_EXTRA..
0da0: 20 22 49 4e 43 4c 55 44 45 5f 45 58 54 52 41 22 "INCLUDE_EXTRA"
0db0: 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 ,..#endif..#ifde
0dc0: 66 20 49 4e 54 45 52 4f 50 5f 49 4e 43 4c 55 44 f INTEROP_INCLUD
0dd0: 45 5f 53 45 45 0d 0a 20 20 22 49 4e 43 4c 55 44 E_SEE.. "INCLUD
0de0: 45 5f 53 45 45 22 2c 0d 0a 23 65 6e 64 69 66 0d E_SEE",..#endif.
0df0: 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f .#ifdef INTEROP_
0e00: 49 4e 43 4c 55 44 45 5f 5a 49 50 56 46 53 0d 0a INCLUDE_ZIPVFS..
0e10: 20 20 22 49 4e 43 4c 55 44 45 5f 5a 49 50 56 46 "INCLUDE_ZIPVF
0e20: 53 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 S",..#endif..#if
0e30: 64 65 66 20 49 4e 54 45 52 4f 50 5f 4a 53 4f 4e def INTEROP_JSON
0e40: 31 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 22 1_EXTENSION.. "
0e50: 4a 53 4f 4e 31 5f 45 58 54 45 4e 53 49 4f 4e 22 JSON1_EXTENSION"
0e60: 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 ,..#endif..#ifde
0e70: 66 20 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 f INTEROP_LEGACY
0e80: 5f 43 4c 4f 53 45 0d 0a 20 20 22 4c 45 47 41 43 _CLOSE.. "LEGAC
0e90: 59 5f 43 4c 4f 53 45 22 2c 0d 0a 23 65 6e 64 69 Y_CLOSE",..#endi
0ea0: 66 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f f..#ifdef INTERO
0eb0: 50 5f 4c 4f 47 0d 0a 20 20 22 4c 4f 47 22 2c 0d P_LOG.. "LOG",.
0ec0: 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66 20 .#endif..#ifdef
0ed0: 49 4e 54 45 52 4f 50 5f 50 45 52 43 45 4e 54 49 INTEROP_PERCENTI
0ee0: 4c 45 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 LE_EXTENSION..
0ef0: 22 50 45 52 43 45 4e 54 49 4c 45 5f 45 58 54 45 "PERCENTILE_EXTE
0f00: 4e 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d NSION",..#endif.
0f10: 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f .#ifdef INTEROP_
0f20: 52 45 47 45 58 50 5f 45 58 54 45 4e 53 49 4f 4e REGEXP_EXTENSION
0f30: 0d 0a 20 20 22 52 45 47 45 58 50 5f 45 58 54 45 .. "REGEXP_EXTE
0f40: 4e 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d NSION",..#endif.
0f50: 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f .#ifdef INTEROP_
0f60: 53 45 53 53 49 4f 4e 5f 45 58 54 45 4e 53 49 4f SESSION_EXTENSIO
0f70: 4e 0d 0a 20 20 22 53 45 53 53 49 4f 4e 5f 45 58 N.. "SESSION_EX
0f80: 54 45 4e 53 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 TENSION",..#endi
0f90: 66 0d 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f f..#ifdef INTERO
0fa0: 50 5f 53 48 41 31 5f 45 58 54 45 4e 53 49 4f 4e P_SHA1_EXTENSION
0fb0: 0d 0a 20 20 22 53 48 41 31 5f 45 58 54 45 4e 53 .. "SHA1_EXTENS
0fc0: 49 4f 4e 22 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 ION",..#endif..#
0fd0: 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 54 45 ifdef INTEROP_TE
0fe0: 53 54 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 ST_EXTENSION..
0ff0: 22 54 45 53 54 5f 45 58 54 45 4e 53 49 4f 4e 22 "TEST_EXTENSION"
1000: 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 ,..#endif..#ifde
1010: 66 20 49 4e 54 45 52 4f 50 5f 54 4f 54 59 50 45 f INTEROP_TOTYPE
1020: 5f 45 58 54 45 4e 53 49 4f 4e 0d 0a 20 20 22 54 _EXTENSION.. "T
1030: 4f 54 59 50 45 5f 45 58 54 45 4e 53 49 4f 4e 22 OTYPE_EXTENSION"
1040: 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 ,..#endif..#ifde
1050: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e f SQLITE_VERSION
1060: 5f 4e 55 4d 42 45 52 0d 0a 20 20 22 56 45 52 53 _NUMBER.. "VERS
1070: 49 4f 4e 5f 4e 55 4d 42 45 52 3d 22 20 43 54 49 ION_NUMBER=" CTI
1080: 4d 45 4f 50 54 5f 56 41 4c 28 53 51 4c 49 54 45 MEOPT_VAL(SQLITE
1090: 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 29 _VERSION_NUMBER)
10a0: 2c 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 ,..#endif..#ifde
10b0: 66 20 49 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 f INTEROP_VIRTUA
10c0: 4c 5f 54 41 42 4c 45 0d 0a 20 20 22 56 49 52 54 L_TABLE.. "VIRT
10d0: 55 41 4c 5f 54 41 42 4c 45 22 2c 0d 0a 23 65 6e UAL_TABLE",..#en
10e0: 64 69 66 0d 0a 7d 3b 0d 0a 0d 0a 2f 2a 0d 0a 2a dif..};..../*..*
10f0: 2a 20 47 69 76 65 6e 20 74 68 65 20 6e 61 6d 65 * Given the name
1100: 20 6f 66 20 61 20 63 6f 6d 70 69 6c 65 2d 74 69 of a compile-ti
1110: 6d 65 20 6f 70 74 69 6f 6e 2c 20 72 65 74 75 72 me option, retur
1120: 6e 20 74 72 75 65 20 69 66 20 74 68 61 74 20 6f n true if that o
1130: 70 74 69 6f 6e 0d 0a 2a 2a 20 77 61 73 20 75 73 ption..** was us
1140: 65 64 20 61 6e 64 20 66 61 6c 73 65 20 69 66 20 ed and false if
1150: 6e 6f 74 2e 0d 0a 2a 2a 0d 0a 2a 2a 20 54 68 65 not...**..** The
1160: 20 6e 61 6d 65 20 63 61 6e 20 6f 70 74 69 6f 6e name can option
1170: 61 6c 6c 79 20 62 65 67 69 6e 20 77 69 74 68 20 ally begin with
1180: 22 53 51 4c 49 54 45 5f 22 20 6f 72 20 22 49 4e "SQLITE_" or "IN
1190: 54 45 52 4f 50 5f 22 20 62 75 74 20 74 68 6f 73 TEROP_" but thos
11a0: 65 0d 0a 2a 2a 20 70 72 65 66 69 78 65 73 20 61 e..** prefixes a
11b0: 72 65 20 6e 6f 74 20 72 65 71 75 69 72 65 64 20 re not required
11c0: 66 6f 72 20 61 20 6d 61 74 63 68 2e 0d 0a 2a 2f for a match...*/
11d0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 ..SQLITE_API int
11e0: 20 57 49 4e 41 50 49 20 69 6e 74 65 72 6f 70 5f WINAPI interop_
11f0: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 compileoption_us
1200: 65 64 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a ed(const char *z
1210: 4f 70 74 4e 61 6d 65 29 7b 0d 0a 20 20 69 6e 74 OptName){.. int
1220: 20 69 2c 20 6e 3b 0d 0a 20 20 69 66 28 20 73 71 i, n;.. if( sq
1230: 6c 69 74 65 33 53 74 72 4e 49 43 6d 70 28 7a 4f lite3StrNICmp(zO
1240: 70 74 4e 61 6d 65 2c 20 22 53 51 4c 49 54 45 5f ptName, "SQLITE_
1250: 22 2c 20 37 29 3d 3d 30 20 29 20 7a 4f 70 74 4e ", 7)==0 ) zOptN
1260: 61 6d 65 20 2b 3d 20 37 3b 0d 0a 20 20 69 66 28 ame += 7;.. if(
1270: 20 73 71 6c 69 74 65 33 53 74 72 4e 49 43 6d 70 sqlite3StrNICmp
1280: 28 7a 4f 70 74 4e 61 6d 65 2c 20 22 49 4e 54 45 (zOptName, "INTE
1290: 52 4f 50 5f 22 2c 20 38 29 3d 3d 30 20 29 20 7a ROP_", 8)==0 ) z
12a0: 4f 70 74 4e 61 6d 65 20 2b 3d 20 38 3b 0d 0a 20 OptName += 8;..
12b0: 20 6e 20 3d 20 73 71 6c 69 74 65 33 53 74 72 6c n = sqlite3Strl
12c0: 65 6e 33 30 28 7a 4f 70 74 4e 61 6d 65 29 3b 0d en30(zOptName);.
12d0: 0a 0d 0a 20 20 2f 2a 20 53 69 6e 63 65 20 41 72 ... /* Since Ar
12e0: 72 61 79 53 69 7a 65 28 61 7a 49 6e 74 65 72 6f raySize(azIntero
12f0: 70 43 6f 6d 70 69 6c 65 4f 70 74 29 20 69 73 20 pCompileOpt) is
1300: 6e 6f 72 6d 61 6c 6c 79 20 69 6e 20 73 69 6e 67 normally in sing
1310: 6c 65 20 64 69 67 69 74 73 2c 20 61 0d 0a 20 20 le digits, a..
1320: 2a 2a 20 6c 69 6e 65 61 72 20 73 65 61 72 63 68 ** linear search
1330: 20 69 73 20 61 64 65 71 75 61 74 65 2e 20 20 4e is adequate. N
1340: 6f 20 6e 65 65 64 20 66 6f 72 20 61 20 62 69 6e o need for a bin
1350: 61 72 79 20 73 65 61 72 63 68 2e 20 2a 2f 0d 0a ary search. */..
1360: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 41 72 72 for(i=0; i<Arr
1370: 61 79 53 69 7a 65 28 61 7a 49 6e 74 65 72 6f 70 aySize(azInterop
1380: 43 6f 6d 70 69 6c 65 4f 70 74 29 3b 20 69 2b 2b CompileOpt); i++
1390: 29 7b 0d 0a 20 20 20 20 69 66 28 20 73 71 6c 69 ){.. if( sqli
13a0: 74 65 33 53 74 72 4e 49 43 6d 70 28 7a 4f 70 74 te3StrNICmp(zOpt
13b0: 4e 61 6d 65 2c 20 61 7a 49 6e 74 65 72 6f 70 43 Name, azInteropC
13c0: 6f 6d 70 69 6c 65 4f 70 74 5b 69 5d 2c 20 6e 29 ompileOpt[i], n)
13d0: 3d 3d 30 0d 0a 20 20 20 20 20 26 26 20 73 71 6c ==0.. && sql
13e0: 69 74 65 33 43 74 79 70 65 4d 61 70 5b 28 75 6e ite3CtypeMap[(un
13f0: 73 69 67 6e 65 64 20 63 68 61 72 29 61 7a 49 6e signed char)azIn
1400: 74 65 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 5b teropCompileOpt[
1410: 69 5d 5b 6e 5d 5d 3d 3d 30 0d 0a 20 20 20 20 29 i][n]]==0.. )
1420: 7b 0d 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 {.. return
1430: 31 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a 1;.. }.. }..
1440: 20 20 72 65 74 75 72 6e 20 30 3b 0d 0a 7d 0d 0a return 0;..}..
1450: 0d 0a 2f 2a 0d 0a 2a 2a 20 52 65 74 75 72 6e 20 ../*..** Return
1460: 74 68 65 20 4e 2d 74 68 20 63 6f 6d 70 69 6c 65 the N-th compile
1470: 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 20 73 74 72 -time option str
1480: 69 6e 67 2e 20 20 49 66 20 4e 20 69 73 20 6f 75 ing. If N is ou
1490: 74 20 6f 66 20 72 61 6e 67 65 2c 0d 0a 2a 2a 20 t of range,..**
14a0: 72 65 74 75 72 6e 20 61 20 4e 55 4c 4c 20 70 6f return a NULL po
14b0: 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 inter...*/..SQLI
14c0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 TE_API const cha
14d0: 72 20 2a 57 49 4e 41 50 49 20 69 6e 74 65 72 6f r *WINAPI intero
14e0: 70 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f p_compileoption_
14f0: 67 65 74 28 69 6e 74 20 4e 29 7b 0d 0a 20 20 69 get(int N){.. i
1500: 66 28 20 4e 3e 3d 30 20 26 26 20 4e 3c 41 72 72 f( N>=0 && N<Arr
1510: 61 79 53 69 7a 65 28 61 7a 49 6e 74 65 72 6f 70 aySize(azInterop
1520: 43 6f 6d 70 69 6c 65 4f 70 74 29 20 29 7b 0d 0a CompileOpt) ){..
1530: 20 20 20 20 72 65 74 75 72 6e 20 61 7a 49 6e 74 return azInt
1540: 65 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 5b 4e eropCompileOpt[N
1550: 5d 3b 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 75 72 ];.. }.. retur
1560: 6e 20 30 3b 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 n 0;..}....#if d
1570: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 efined(INTEROP_D
1580: 45 42 55 47 29 20 7c 7c 20 64 65 66 69 6e 65 64 EBUG) || defined
1590: 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 (INTEROP_LOG)..S
15a0: 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 6f QLITE_PRIVATE vo
15b0: 69 64 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f id sqlite3Intero
15c0: 70 44 65 62 75 67 28 63 6f 6e 73 74 20 63 68 61 pDebug(const cha
15d0: 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 r *zFormat, ...)
15e0: 7b 0d 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b {.. va_list ap;
15f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1600: 20 20 20 20 20 20 20 20 20 2f 2a 20 56 61 72 61 /* Vara
1610: 72 67 20 6c 69 73 74 20 2a 2f 0d 0a 23 69 66 20 rg list */..#if
1620: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e SQLITE_VERSION_N
1630: 55 4d 42 45 52 20 3e 3d 20 33 30 32 34 30 30 30 UMBER >= 3024000
1640: 0d 0a 20 20 73 71 6c 69 74 65 33 5f 73 74 72 20 .. sqlite3_str
1650: 61 63 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 acc;
1660: 20 20 20 20 20 20 20 20 2f 2a 20 50 6f 73 74 20 /* Post
1670: 33 2e 32 34 20 53 74 72 69 6e 67 20 61 63 63 75 3.24 String accu
1680: 6d 75 6c 61 74 6f 72 20 2a 2f 0d 0a 23 65 6c 73 mulator */..#els
1690: 65 0d 0a 20 20 53 74 72 41 63 63 75 6d 20 61 63 e.. StrAccum ac
16a0: 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c;
16b0: 20 20 20 20 20 20 20 20 20 2f 2a 20 50 72 65 20 /* Pre
16c0: 33 2e 32 34 20 73 74 72 69 6e 67 20 61 63 63 75 3.24 string accu
16d0: 6d 75 6c 61 74 6f 72 20 2a 2f 0d 0a 23 65 6e 64 mulator */..#end
16e0: 69 66 0d 0a 20 20 63 68 61 72 20 7a 4d 73 67 5b if.. char zMsg[
16f0: 53 51 4c 49 54 45 5f 50 52 49 4e 54 5f 42 55 46 SQLITE_PRINT_BUF
1700: 5f 53 49 5a 45 2a 33 5d 3b 20 2f 2a 20 43 6f 6d _SIZE*3]; /* Com
1710: 70 6c 65 74 65 20 6c 6f 67 20 6d 65 73 73 61 67 plete log messag
1720: 65 20 2a 2f 0d 0a 20 20 76 61 5f 73 74 61 72 74 e */.. va_start
1730: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0d 0a (ap, zFormat);..
1740: 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 #if SQLITE_VERSI
1750: 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 ON_NUMBER >= 300
1760: 38 30 31 30 0d 0a 20 20 73 71 6c 69 74 65 33 53 8010.. sqlite3S
1770: 74 72 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 trAccumInit(&acc
1780: 2c 20 30 2c 20 7a 4d 73 67 2c 20 73 69 7a 65 6f , 0, zMsg, sizeo
1790: 66 28 7a 4d 73 67 29 2c 20 30 29 3b 0d 0a 23 65 f(zMsg), 0);..#e
17a0: 6c 73 65 0d 0a 20 20 73 71 6c 69 74 65 33 53 74 lse.. sqlite3St
17b0: 72 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 2c rAccumInit(&acc,
17c0: 20 7a 4d 73 67 2c 20 73 69 7a 65 6f 66 28 7a 4d zMsg, sizeof(zM
17d0: 73 67 29 2c 20 30 29 3b 0d 0a 20 20 61 63 63 2e sg), 0);.. acc.
17e0: 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 30 3b 0d 0a useMalloc = 0;..
17f0: 23 65 6e 64 69 66 0d 0a 23 69 66 20 53 51 4c 49 #endif..#if SQLI
1800: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
1810: 52 20 3e 3d 20 33 30 32 34 30 30 30 0d 0a 20 20 R >= 3024000..
1820: 73 71 6c 69 74 65 33 5f 73 74 72 5f 76 61 70 70 sqlite3_str_vapp
1830: 65 6e 64 66 28 26 61 63 63 2c 20 7a 46 6f 72 6d endf(&acc, zForm
1840: 61 74 2c 20 61 70 29 3b 0d 0a 23 65 6c 69 66 20 at, ap);..#elif
1850: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e SQLITE_VERSION_N
1860: 55 4d 42 45 52 20 3e 3d 20 33 30 31 31 30 30 30 UMBER >= 3011000
1870: 0d 0a 20 20 73 71 6c 69 74 65 33 56 58 50 72 69 .. sqlite3VXPri
1880: 6e 74 66 28 26 61 63 63 2c 20 7a 46 6f 72 6d 61 ntf(&acc, zForma
1890: 74 2c 20 61 70 29 3b 0d 0a 23 65 6c 73 65 0d 0a t, ap);..#else..
18a0: 20 20 73 71 6c 69 74 65 33 56 58 50 72 69 6e 74 sqlite3VXPrint
18b0: 66 28 26 61 63 63 2c 20 30 2c 20 7a 46 6f 72 6d f(&acc, 0, zForm
18c0: 61 74 2c 20 61 70 29 3b 0d 0a 23 65 6e 64 69 66 at, ap);..#endif
18d0: 0d 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0d .. va_end(ap);.
18e0: 0a 23 69 66 20 53 51 4c 49 54 45 5f 4f 53 5f 57 .#if SQLITE_OS_W
18f0: 49 4e 20 26 26 20 53 51 4c 49 54 45 5f 56 45 52 IN && SQLITE_VER
1900: 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 SION_NUMBER >= 3
1910: 30 30 37 30 31 33 0d 0a 20 20 73 71 6c 69 74 65 007013.. sqlite
1920: 33 5f 77 69 6e 33 32 5f 77 72 69 74 65 5f 64 65 3_win32_write_de
1930: 62 75 67 28 73 71 6c 69 74 65 33 53 74 72 41 63 bug(sqlite3StrAc
1940: 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 2c cumFinish(&acc),
1950: 20 2d 31 29 3b 0d 0a 23 65 6c 69 66 20 53 51 4c -1);..#elif SQL
1960: 49 54 45 5f 4f 53 5f 57 49 4e 20 26 26 20 64 65 ITE_OS_WIN && de
1970: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 57 49 4e fined(SQLITE_WIN
1980: 33 32 5f 48 41 53 5f 41 4e 53 49 29 0d 0a 20 20 32_HAS_ANSI)..
1990: 4f 75 74 70 75 74 44 65 62 75 67 53 74 72 69 6e OutputDebugStrin
19a0: 67 41 28 73 71 6c 69 74 65 33 53 74 72 41 63 63 gA(sqlite3StrAcc
19b0: 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b umFinish(&acc));
19c0: 0d 0a 23 65 6c 69 66 20 53 51 4c 49 54 45 5f 4f ..#elif SQLITE_O
19d0: 53 5f 57 49 4e 20 26 26 20 64 65 66 69 6e 65 64 S_WIN && defined
19e0: 28 53 51 4c 49 54 45 5f 57 49 4e 33 32 5f 48 41 (SQLITE_WIN32_HA
19f0: 53 5f 57 49 44 45 29 0d 0a 20 20 7b 0d 0a 20 20 S_WIDE).. {..
1a00: 20 20 4c 50 57 53 54 52 20 7a 57 69 64 65 4d 73 LPWSTR zWideMs
1a10: 67 20 3d 20 75 74 66 38 54 6f 55 6e 69 63 6f 64 g = utf8ToUnicod
1a20: 65 28 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 e(sqlite3StrAccu
1a30: 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0d mFinish(&acc));.
1a40: 0a 20 20 20 20 69 66 28 20 7a 57 69 64 65 4d 73 . if( zWideMs
1a50: 67 20 29 7b 0d 0a 20 20 20 20 20 20 4f 75 74 70 g ){.. Outp
1a60: 75 74 44 65 62 75 67 53 74 72 69 6e 67 57 28 7a utDebugStringW(z
1a70: 57 69 64 65 4d 73 67 29 3b 0d 0a 20 20 20 20 20 WideMsg);..
1a80: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 57 sqlite3_free(zW
1a90: 69 64 65 4d 73 67 29 3b 0d 0a 20 20 20 20 7d 0d ideMsg);.. }.
1aa0: 0a 20 20 7d 0d 0a 23 65 6c 73 65 0d 0a 20 20 66 . }..#else.. f
1ab0: 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 printf(stderr, "
1ac0: 25 73 22 2c 20 73 71 6c 69 74 65 33 53 74 72 41 %s", sqlite3StrA
1ad0: 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 ccumFinish(&acc)
1ae0: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 23 );..#endif..}..#
1af0: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 endif....#if def
1b00: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 ined(INTEROP_LOG
1b10: 29 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 )..SQLITE_PRIVAT
1b20: 45 20 69 6e 74 20 6c 6f 67 43 6f 6e 66 69 67 75 E int logConfigu
1b30: 72 65 64 20 3d 20 30 3b 0d 0a 0d 0a 53 51 4c 49 red = 0;....SQLI
1b40: 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 TE_PRIVATE void
1b50: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 4c 6f sqlite3InteropLo
1b60: 67 43 61 6c 6c 62 61 63 6b 28 76 6f 69 64 20 2a gCallback(void *
1b70: 70 41 72 67 2c 20 69 6e 74 20 69 43 6f 64 65 2c pArg, int iCode,
1b80: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4d 73 const char *zMs
1b90: 67 29 7b 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e g){.. sqlite3In
1ba0: 74 65 72 6f 70 44 65 62 75 67 28 22 49 4e 54 45 teropDebug("INTE
1bb0: 52 4f 50 5f 4c 4f 47 20 28 25 64 29 20 25 73 5c ROP_LOG (%d) %s\
1bc0: 6e 22 2c 20 69 43 6f 64 65 2c 20 7a 4d 73 67 29 n", iCode, zMsg)
1bd0: 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a ;..}..#endif....
1be0: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 SQLITE_API int W
1bf0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6d 61 INAPI sqlite3_ma
1c00: 6c 6c 6f 63 5f 73 69 7a 65 5f 69 6e 74 65 72 6f lloc_size_intero
1c10: 70 28 76 6f 69 64 20 2a 70 29 7b 0d 0a 20 20 72 p(void *p){.. r
1c20: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 4d 61 6c eturn sqlite3Mal
1c30: 6c 6f 63 53 69 7a 65 28 70 29 3b 0d 0a 7d 0d 0a locSize(p);..}..
1c40: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
1c50: 54 45 52 4f 50 5f 4c 45 47 41 43 59 5f 43 4c 4f TEROP_LEGACY_CLO
1c60: 53 45 29 20 7c 7c 20 53 51 4c 49 54 45 5f 56 45 SE) || SQLITE_VE
1c70: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 RSION_NUMBER < 3
1c80: 30 30 37 30 31 34 0d 0a 53 51 4c 49 54 45 5f 50 007014..SQLITE_P
1c90: 52 49 56 41 54 45 20 76 6f 69 64 20 2a 20 73 71 RIVATE void * sq
1ca0: 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 lite3DbMallocZer
1cb0: 6f 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 o_interop(sqlite
1cc0: 33 20 2a 64 62 2c 20 69 6e 74 20 6e 29 0d 0a 7b 3 *db, int n)..{
1cd0: 0d 0a 20 20 76 6f 69 64 20 2a 70 3b 0d 0a 20 20 .. void *p;..
1ce0: 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 if (db) {.. s
1cf0: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 qlite3_mutex_ent
1d00: 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a er(db->mutex);..
1d10: 20 20 7d 0d 0a 20 20 70 20 3d 20 73 71 6c 69 74 }.. p = sqlit
1d20: 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 28 64 e3DbMallocZero(d
1d30: 62 2c 6e 29 3b 0d 0a 20 20 69 66 20 28 64 62 29 b,n);.. if (db)
1d40: 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f {.. sqlite3_
1d50: 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e mutex_leave(db->
1d60: 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 mutex);.. }..
1d70: 72 65 74 75 72 6e 20 70 3b 0d 0a 7d 0d 0a 0d 0a return p;..}....
1d80: 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 SQLITE_PRIVATE v
1d90: 6f 69 64 20 73 71 6c 69 74 65 33 44 62 46 72 65 oid sqlite3DbFre
1da0: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 e_interop(sqlite
1db0: 33 20 2a 64 62 2c 20 76 6f 69 64 20 2a 70 29 0d 3 *db, void *p).
1dc0: 0a 7b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d .{.. if (db) {.
1dd0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 . sqlite3_mut
1de0: 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 ex_enter(db->mut
1df0: 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 69 66 20 ex);.. }.. if
1e00: 28 70 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 (p) {.. sqlit
1e10: 65 33 4d 65 6d 64 65 62 75 67 53 65 74 54 79 70 e3MemdebugSetTyp
1e20: 65 28 70 2c 20 4d 45 4d 54 59 50 45 5f 44 42 7c e(p, MEMTYPE_DB|
1e30: 4d 45 4d 54 59 50 45 5f 48 45 41 50 29 3b 0d 0a MEMTYPE_HEAP);..
1e40: 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 44 62 }.. sqlite3Db
1e50: 46 72 65 65 28 64 62 2c 70 29 3b 0d 0a 20 20 69 Free(db,p);.. i
1e60: 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71 f (db) {.. sq
1e70: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 lite3_mutex_leav
1e80: 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 e(db->mutex);..
1e90: 20 7d 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d }..}..#endif...
1ea0: 0a 2f 2a 0d 0a 20 20 20 20 54 68 65 20 67 6f 61 ./*.. The goa
1eb0: 6c 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f l of this versio
1ec0: 6e 20 6f 66 20 63 6c 6f 73 65 20 69 73 20 64 69 n of close is di
1ed0: 66 66 65 72 65 6e 74 20 74 68 61 6e 20 74 68 61 fferent than tha
1ee0: 74 20 6f 66 20 73 71 6c 69 74 65 33 5f 63 6c 6f t of sqlite3_clo
1ef0: 73 65 28 29 2c 20 61 6e 64 20 69 73 20 64 65 73 se(), and is des
1f00: 69 67 6e 65 64 20 74 6f 20 6c 65 6e 64 20 69 74 igned to lend it
1f10: 73 65 6c 66 20 62 65 74 74 65 72 20 74 6f 20 2e self better to .
1f20: 4e 45 54 27 73 20 6e 6f 6e 2d 64 65 74 65 72 6d NET's non-determ
1f30: 69 6e 69 73 74 69 63 20 66 69 6e 61 6c 69 7a 65 inistic finalize
1f40: 72 73 20 61 6e 64 0d 0a 20 20 20 20 74 68 65 20 rs and.. the
1f50: 47 43 20 74 68 72 65 61 64 2e 20 20 53 51 4c 69 GC thread. SQLi
1f60: 74 65 20 77 69 6c 6c 20 6e 6f 74 20 63 6c 6f 73 te will not clos
1f70: 65 20 61 20 64 61 74 61 62 61 73 65 20 69 66 20 e a database if
1f80: 73 74 61 74 65 6d 65 6e 74 73 20 61 72 65 20 6f statements are o
1f90: 70 65 6e 20 6f 6e 20 69 74 20 2d 2d 20 62 75 74 pen on it -- but
1fa0: 20 66 6f 72 20 6f 75 72 20 70 75 72 70 6f 73 65 for our purpose
1fb0: 73 2c 20 77 65 27 64 20 72 61 74 68 65 72 20 66 s, we'd rather f
1fc0: 69 6e 61 6c 69 7a 65 20 61 6c 6c 20 61 63 74 69 inalize all acti
1fd0: 76 65 20 73 74 61 74 65 6d 65 6e 74 73 0d 0a 20 ve statements..
1fe0: 20 20 20 61 6e 64 20 66 6f 72 63 69 62 6c 79 20 and forcibly
1ff0: 63 6c 6f 73 65 20 74 68 65 20 64 61 74 61 62 61 close the databa
2000: 73 65 2e 20 20 54 68 65 20 72 65 61 73 6f 6e 20 se. The reason
2010: 69 73 20 73 69 6d 70 6c 65 20 2d 2d 20 61 20 6c is simple -- a l
2020: 6f 74 20 6f 66 20 70 65 6f 70 6c 65 20 64 6f 6e ot of people don
2030: 27 74 20 44 69 73 70 6f 73 65 28 29 20 6f 66 20 't Dispose() of
2040: 74 68 65 69 72 20 6f 62 6a 65 63 74 73 20 63 6f their objects co
2050: 72 72 65 63 74 6c 79 20 61 6e 64 20 6c 65 74 20 rrectly and let
2060: 74 68 65 20 67 61 72 62 61 67 65 20 63 6f 6c 6c the garbage coll
2070: 65 63 74 6f 72 0d 0a 20 20 20 20 64 6f 20 69 74 ector.. do it
2080: 2e 20 20 54 68 69 73 20 6c 65 61 64 73 20 74 6f . This leads to
2090: 20 75 6e 65 78 70 65 63 74 65 64 20 62 65 68 61 unexpected beha
20a0: 76 69 6f 72 20 77 68 65 6e 20 61 20 75 73 65 72 vior when a user
20b0: 20 74 68 69 6e 6b 73 20 74 68 65 79 27 76 65 20 thinks they've
20c0: 63 6c 6f 73 65 64 20 61 20 64 61 74 61 62 61 73 closed a databas
20d0: 65 2c 20 62 75 74 20 69 74 27 73 20 73 74 69 6c e, but it's stil
20e0: 6c 20 6f 70 65 6e 20 62 65 63 61 75 73 65 20 6e l open because n
20f0: 6f 74 20 61 6c 6c 20 74 68 65 20 73 74 61 74 65 ot all the state
2100: 6d 65 6e 74 73 20 68 61 76 65 0d 0a 20 20 20 20 ments have..
2110: 68 69 74 20 74 68 65 20 47 43 20 79 65 74 2e 0d hit the GC yet..
2120: 0a 0d 0a 20 20 20 20 53 6f 2c 20 68 65 72 65 20 ... So, here
2130: 77 65 20 68 61 76 65 20 61 20 70 72 6f 62 6c 65 we have a proble
2140: 6d 20 2e 2e 2e 20 2e 4e 45 54 20 68 61 73 20 61 m ... .NET has a
2150: 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 79 20 pointer to any
2160: 6e 75 6d 62 65 72 20 6f 66 20 73 71 6c 69 74 65 number of sqlite
2170: 33 5f 73 74 6d 74 20 6f 62 6a 65 63 74 73 2e 20 3_stmt objects.
2180: 20 57 65 20 63 61 6e 27 74 20 63 61 6c 6c 20 73 We can't call s
2190: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 qlite3_finalize(
21a0: 29 20 6f 6e 20 74 68 65 73 65 20 62 65 63 61 75 ) on these becau
21b0: 73 65 0d 0a 20 20 20 20 74 68 65 69 72 20 6d 65 se.. their me
21c0: 6d 6f 72 79 20 69 73 20 66 72 65 65 64 20 61 6e mory is freed an
21d0: 64 20 63 61 6e 20 62 65 20 75 73 65 64 20 66 6f d can be used fo
21e0: 72 20 73 6f 6d 65 74 68 69 6e 67 20 65 6c 73 65 r something else
21f0: 2e 20 20 54 68 65 20 47 43 20 74 68 72 65 61 64 . The GC thread
2200: 20 63 6f 75 6c 64 20 70 6f 74 65 6e 74 69 61 6c could potential
2210: 6c 79 20 74 72 79 20 61 6e 64 20 63 61 6c 6c 20 ly try and call
2220: 66 69 6e 61 6c 69 7a 65 20 61 67 61 69 6e 20 6f finalize again o
2230: 6e 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 20 n the statement
2240: 61 66 74 65 72 0d 0a 20 20 20 20 74 68 61 74 20 after.. that
2250: 6d 65 6d 6f 72 79 20 77 61 73 20 64 65 61 6c 6c memory was deall
2260: 6f 63 61 74 65 64 2e 20 20 42 41 44 2e 20 20 53 ocated. BAD. S
2270: 6f 2c 20 77 68 61 74 20 77 65 20 6e 65 65 64 20 o, what we need
2280: 74 6f 20 64 6f 20 69 73 20 6d 61 6b 65 20 61 20 to do is make a
2290: 63 6f 70 79 20 6f 66 20 65 61 63 68 20 73 74 61 copy of each sta
22a0: 74 65 6d 65 6e 74 2c 20 61 6e 64 20 63 61 6c 6c tement, and call
22b0: 20 66 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74 finalize() on t
22c0: 68 65 20 63 6f 70 79 20 2d 2d 20 73 6f 20 74 68 he copy -- so th
22d0: 61 74 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 0d at the original.
22e0: 0a 20 20 20 20 73 74 61 74 65 6d 65 6e 74 27 73 . statement's
22f0: 20 6d 65 6d 6f 72 79 20 69 73 20 70 72 65 73 65 memory is prese
2300: 72 76 65 64 2c 20 61 6e 64 20 6d 61 72 6b 65 64 rved, and marked
2310: 20 61 73 20 42 41 44 2c 20 62 75 74 20 77 65 20 as BAD, but we
2320: 63 61 6e 20 73 74 69 6c 6c 20 6d 61 6e 61 67 65 can still manage
2330: 20 74 6f 20 66 69 6e 61 6c 69 7a 65 20 65 76 65 to finalize eve
2340: 72 79 74 68 69 6e 67 20 61 6e 64 20 66 6f 72 63 rything and forc
2350: 69 62 6c 79 20 63 6c 6f 73 65 20 74 68 65 20 64 ibly close the d
2360: 61 74 61 62 61 73 65 2e 20 20 4c 61 74 65 72 20 atabase. Later
2370: 77 68 65 6e 20 74 68 65 0d 0a 20 20 20 20 47 43 when the.. GC
2380: 20 67 65 74 73 20 61 72 6f 75 6e 64 20 74 6f 20 gets around to
2390: 63 61 6c 6c 69 6e 67 20 66 69 6e 61 6c 69 7a 65 calling finalize
23a0: 5f 69 6e 74 65 72 6f 70 28 29 20 6f 6e 20 74 68 _interop() on th
23b0: 65 20 22 62 61 64 22 20 73 74 61 74 65 6d 65 6e e "bad" statemen
23c0: 74 2c 20 77 65 20 64 65 74 65 63 74 20 74 68 61 t, we detect tha
23d0: 74 20 61 6e 64 20 66 69 6e 69 73 68 20 64 65 61 t and finish dea
23e0: 6c 6c 6f 63 61 74 69 6e 67 20 74 68 65 20 70 6f llocating the po
23f0: 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 inter...*/..SQLI
2400: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 TE_API int WINAP
2410: 49 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f I sqlite3_close_
2420: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 interop(sqlite3
2430: 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 *db)..{.. int r
2440: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65 et;..#if !define
2450: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 d(INTEROP_LEGACY
2460: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54 _CLOSE) && SQLIT
2470: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
2480: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 >= 3007014....#
2490: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
24a0: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e OP_DEBUG) && (IN
24b0: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
24c0: 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f 53 TEROP_DEBUG_CLOS
24d0: 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 E).. sqlite3Int
24e0: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
24f0: 65 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 e3_close_interop
2500: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 (): calling sqli
2510: 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70 29 te3_close_v2(%p)
2520: 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 65 ...\n", db);..#e
2530: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 ndif.... ret =
2540: 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 sqlite3_close_v2
2550: 28 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 (db);....#if def
2560: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 ined(INTEROP_DEB
2570: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f UG) && (INTEROP_
2580: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f DEBUG & INTEROP_
2590: 44 45 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20 DEBUG_CLOSE)..
25a0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
25b0: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f bug("sqlite3_clo
25c0: 73 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 se_interop(): sq
25d0: 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 lite3_close_v2(%
25e0: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c p) returned %d.\
25f0: 6e 22 2c 20 64 62 2c 20 72 65 74 29 3b 0d 0a 23 n", db, ret);..#
2600: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 endif.... retur
2610: 6e 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 n ret;..#else..
2620: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 ret = sqlite3_c
2630: 6c 6f 73 65 28 64 62 29 3b 0d 0a 0d 0a 20 20 69 lose(db);.... i
2640: 66 20 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45 f (ret == SQLITE
2650: 5f 42 55 53 59 29 0d 0a 20 20 7b 0d 0a 20 20 20 _BUSY).. {..
2660: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 sqlite3_mutex_e
2670: 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b nter(db->mutex);
2680: 0d 0a 0d 0a 20 20 20 20 69 66 20 28 21 64 62 2d .... if (!db-
2690: 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d 0a >pVdbe).. {..
26a0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 sqlite3_mu
26b0: 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 tex_leave(db->mu
26c0: 74 65 78 29 3b 0d 0a 20 20 20 20 20 20 72 65 74 tex);.. ret
26d0: 75 72 6e 20 72 65 74 3b 0d 0a 20 20 20 20 7d 0d urn ret;.. }.
26e0: 0a 0d 0a 20 20 20 20 77 68 69 6c 65 20 28 64 62 ... while (db
26f0: 2d 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d ->pVdbe).. {.
2700: 0a 20 20 20 20 20 20 2f 2a 20 4d 61 6b 65 20 61 . /* Make a
2710: 20 63 6f 70 79 20 6f 66 20 74 68 65 20 66 69 72 copy of the fir
2720: 73 74 20 70 72 65 70 61 72 65 64 20 73 74 61 74 st prepared stat
2730: 65 6d 65 6e 74 20 2a 2f 0d 0a 20 20 20 20 20 20 ement */..
2740: 56 64 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 Vdbe *p = (Vdbe
2750: 2a 29 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f *)sqlite3DbMallo
2760: 63 5a 65 72 6f 5f 69 6e 74 65 72 6f 70 28 64 62 cZero_interop(db
2770: 2c 20 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b , sizeof(Vdbe));
2780: 0d 0a 20 20 20 20 20 20 56 64 62 65 20 2a 70 6f .. Vdbe *po
2790: 20 3d 20 64 62 2d 3e 70 56 64 62 65 3b 0d 0a 0d = db->pVdbe;...
27a0: 0a 20 20 20 20 20 20 69 66 20 28 21 70 29 0d 0a . if (!p)..
27b0: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 {..
27c0: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 4e 4f ret = SQLITE_NO
27d0: 4d 45 4d 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 MEM;.. br
27e0: 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 0d eak;.. }...
27f0: 0a 20 20 20 20 20 20 43 6f 70 79 4d 65 6d 6f 72 . CopyMemor
2800: 79 28 70 2c 20 70 6f 2c 20 73 69 7a 65 6f 66 28 y(p, po, sizeof(
2810: 56 64 62 65 29 29 3b 0d 0a 0d 0a 20 20 20 20 20 Vdbe));....
2820: 20 2f 2a 20 50 75 74 20 69 74 20 6f 6e 20 74 68 /* Put it on th
2830: 65 20 63 68 61 69 6e 20 73 6f 20 77 65 20 63 61 e chain so we ca
2840: 6e 20 66 72 65 65 20 69 74 20 2a 2f 0d 0a 20 20 n free it */..
2850: 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 3d 20 db->pVdbe =
2860: 70 3b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 p;.. ret =
2870: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 sqlite3_finalize
2880: 28 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a ((sqlite3_stmt *
2890: 29 70 29 3b 20 2f 2a 20 54 68 69 73 20 77 69 6c )p); /* This wil
28a0: 6c 20 61 6c 73 6f 20 66 72 65 65 20 74 68 65 20 l also free the
28b0: 63 6f 70 79 27 73 20 6d 65 6d 6f 72 79 20 2a 2f copy's memory */
28c0: 0d 0a 20 20 20 20 20 20 69 66 20 28 72 65 74 29 .. if (ret)
28d0: 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 .. {..
28e0: 20 20 20 2f 2a 20 66 69 6e 61 6c 69 7a 65 20 66 /* finalize f
28f0: 61 69 6c 65 64 20 2d 2d 20 73 6f 20 77 65 20 6d ailed -- so we m
2900: 75 73 74 20 70 75 74 20 62 61 63 6b 20 61 6e 79 ust put back any
2910: 74 68 69 6e 67 20 77 65 20 6d 75 6e 67 65 64 20 thing we munged
2920: 2a 2f 0d 0a 20 20 20 20 20 20 20 20 43 6f 70 79 */.. Copy
2930: 4d 65 6d 6f 72 79 28 70 6f 2c 20 70 2c 20 73 69 Memory(po, p, si
2940: 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 20 zeof(Vdbe));..
2950: 20 20 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 db->pVdbe
2960: 3d 20 70 6f 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 = po;....
2970: 20 2f 2a 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20 /*.. **
2980: 4e 4f 54 45 3a 20 4f 6b 2c 20 77 65 20 6d 75 73 NOTE: Ok, we mus
2990: 74 20 66 72 65 65 20 74 68 69 73 20 62 6c 6f 63 t free this bloc
29a0: 6b 20 74 68 61 74 20 2a 77 65 2a 20 61 6c 6c 6f k that *we* allo
29b0: 63 61 74 65 64 20 28 61 62 6f 76 65 29 20 73 69 cated (above) si
29c0: 6e 63 65 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20 nce.. **
29d0: 20 20 20 20 20 20 66 69 6e 61 6c 69 7a 65 20 64 finalize d
29e0: 69 64 20 6e 6f 74 20 64 6f 20 73 6f 2e 0d 0a 20 id not do so...
29f0: 20 20 20 20 20 20 20 2a 2f 0d 0a 20 20 20 20 20 */..
2a00: 20 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 sqlite3DbFree
2a10: 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b _interop(db, p);
2a20: 0d 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b .. break;
2a30: 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 .. }..
2a40: 20 65 6c 73 65 0d 0a 20 20 20 20 20 20 7b 0d 0a else.. {..
2a50: 20 20 20 20 20 20 20 20 5a 65 72 6f 4d 65 6d 6f ZeroMemo
2a60: 72 79 28 70 6f 2c 20 73 69 7a 65 6f 66 28 56 64 ry(po, sizeof(Vd
2a70: 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 20 20 70 be));.. p
2a80: 6f 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42 45 5f o->magic = VDBE_
2a90: 4d 41 47 49 43 5f 44 45 41 44 3b 0d 0a 20 20 20 MAGIC_DEAD;..
2aa0: 20 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 }.. }..
2ab0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c sqlite3_mutex_l
2ac0: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b eave(db->mutex);
2ad0: 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69 .. ret = sqli
2ae0: 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b 0d 0a te3_close(db);..
2af0: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 }.. return re
2b00: 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d t;..#endif..}...
2b10: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
2b20: 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c 49 54 EROP_LOG)..SQLIT
2b30: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 E_API int WINAPI
2b40: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f sqlite3_config_
2b50: 6c 6f 67 5f 69 6e 74 65 72 6f 70 28 29 0d 0a 7b log_interop()..{
2b60: 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 20 20 .. int ret;..
2b70: 69 66 28 20 21 6c 6f 67 43 6f 6e 66 69 67 75 72 if( !logConfigur
2b80: 65 64 20 29 7b 0d 0a 20 20 20 20 72 65 74 20 3d ed ){.. ret =
2b90: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 28 sqlite3_config(
2ba0: 53 51 4c 49 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f SQLITE_CONFIG_LO
2bb0: 47 2c 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f G, sqlite3Intero
2bc0: 70 4c 6f 67 43 61 6c 6c 62 61 63 6b 2c 20 30 29 pLogCallback, 0)
2bd0: 3b 0d 0a 20 20 20 20 69 66 28 20 72 65 74 3d 3d ;.. if( ret==
2be0: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a 20 20 SQLITE_OK ){..
2bf0: 20 20 20 20 6c 6f 67 43 6f 6e 66 69 67 75 72 65 logConfigure
2c00: 64 20 3d 20 31 3b 0d 0a 20 20 20 20 7d 65 6c 73 d = 1;.. }els
2c10: 65 7b 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 e{.. sqlite
2c20: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 3InteropDebug("s
2c30: 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 6c 6f qlite3_config_lo
2c40: 67 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c g_interop(): sql
2c50: 69 74 65 33 5f 63 6f 6e 66 69 67 28 53 51 4c 49 ite3_config(SQLI
2c60: 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f 47 29 20 72 TE_CONFIG_LOG) r
2c70: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 eturned %d.\n",
2c80: 72 65 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 ret);.. }..
2c90: 7d 65 6c 73 65 7b 0d 0a 20 20 20 20 72 65 74 20 }else{.. ret
2ca0: 3d 20 53 51 4c 49 54 45 5f 44 4f 4e 45 3b 0d 0a = SQLITE_DONE;..
2cb0: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 }.. return re
2cc0: 74 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d t;..}..#endif...
2cd0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
2ce0: 74 20 63 68 61 72 20 2a 57 49 4e 41 50 49 20 69 t char *WINAPI i
2cf0: 6e 74 65 72 6f 70 5f 6c 69 62 76 65 72 73 69 6f nterop_libversio
2d00: 6e 28 76 6f 69 64 29 0d 0a 7b 0d 0a 20 20 72 65 n(void)..{.. re
2d10: 74 75 72 6e 20 49 4e 54 45 52 4f 50 5f 56 45 52 turn INTEROP_VER
2d20: 53 49 4f 4e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 SION;..}....SQLI
2d30: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 TE_API const cha
2d40: 72 20 2a 57 49 4e 41 50 49 20 69 6e 74 65 72 6f r *WINAPI intero
2d50: 70 5f 73 6f 75 72 63 65 69 64 28 76 6f 69 64 29 p_sourceid(void)
2d60: 0d 0a 7b 0d 0a 20 20 72 65 74 75 72 6e 20 49 4e ..{.. return IN
2d70: 54 45 52 4f 50 5f 53 4f 55 52 43 45 5f 49 44 20 TEROP_SOURCE_ID
2d80: 22 20 22 20 49 4e 54 45 52 4f 50 5f 53 4f 55 52 " " INTEROP_SOUR
2d90: 43 45 5f 54 49 4d 45 53 54 41 4d 50 3b 0d 0a 7d CE_TIMESTAMP;..}
2da0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 ....SQLITE_API i
2db0: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 nt WINAPI sqlite
2dc0: 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 63 3_open_interop(c
2dd0: 6f 6e 73 74 20 63 68 61 72 20 2a 66 69 6c 65 6e onst char *filen
2de0: 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 ame, const char
2df0: 2a 76 66 73 4e 61 6d 65 2c 20 69 6e 74 20 66 6c *vfsName, int fl
2e00: 61 67 73 2c 20 69 6e 74 20 65 78 74 46 75 6e 63 ags, int extFunc
2e10: 73 2c 20 73 71 6c 69 74 65 33 20 2a 2a 70 70 64 s, sqlite3 **ppd
2e20: 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 b)..{.. int ret
2e30: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 ;....#if defined
2e40: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 (INTEROP_DEBUG)
2e50: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 && (INTEROP_DEBU
2e60: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 G & INTEROP_DEBU
2e70: 47 5f 4f 50 45 4e 29 0d 0a 20 20 73 71 6c 69 74 G_OPEN).. sqlit
2e80: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 e3InteropDebug("
2e90: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 sqlite3_open_int
2ea0: 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 erop(): calling
2eb0: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 76 32 28 sqlite3_open_v2(
2ec0: 5c 22 25 73 5c 22 2c 20 5c 22 25 73 5c 22 2c 20 \"%s\", \"%s\",
2ed0: 25 64 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e %d, %d, %p)...\n
2ee0: 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 76 66 73 ", filename, vfs
2ef0: 4e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 65 78 74 Name, flags, ext
2f00: 46 75 6e 63 73 2c 20 70 70 64 62 29 3b 0d 0a 23 Funcs, ppdb);..#
2f10: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d endif.... ret =
2f20: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 76 32 sqlite3_open_v2
2f30: 28 66 69 6c 65 6e 61 6d 65 2c 20 70 70 64 62 2c (filename, ppdb,
2f40: 20 66 6c 61 67 73 2c 20 76 66 73 4e 61 6d 65 29 flags, vfsName)
2f50: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 ;....#if defined
2f60: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 (INTEROP_DEBUG)
2f70: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 && (INTEROP_DEBU
2f80: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 G & INTEROP_DEBU
2f90: 47 5f 4f 50 45 4e 29 0d 0a 20 20 73 71 6c 69 74 G_OPEN).. sqlit
2fa0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 e3InteropDebug("
2fb0: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 sqlite3_open_int
2fc0: 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f erop(): sqlite3_
2fd0: 6f 70 65 6e 5f 76 32 28 5c 22 25 73 5c 22 2c 20 open_v2(\"%s\",
2fe0: 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 64 2c 20 \"%s\", %d, %d,
2ff0: 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e %p) returned %d.
3000: 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 76 \n", filename, v
3010: 66 73 4e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 65 fsName, flags, e
3020: 78 74 46 75 6e 63 73 2c 20 70 70 64 62 2c 20 72 xtFuncs, ppdb, r
3030: 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a et);..#endif....
3040: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
3050: 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e 5f 46 55 ROP_EXTENSION_FU
3060: 4e 43 54 49 4f 4e 53 29 0d 0a 20 20 69 66 20 28 NCTIONS).. if (
3070: 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45 5f 4f (ret == SQLITE_O
3080: 4b 29 20 26 26 20 70 70 64 62 20 26 26 20 65 78 K) && ppdb && ex
3090: 74 46 75 6e 63 73 29 0d 0a 20 20 20 20 52 65 67 tFuncs).. Reg
30a0: 69 73 74 65 72 45 78 74 65 6e 73 69 6f 6e 46 75 isterExtensionFu
30b0: 6e 63 74 69 6f 6e 73 28 2a 70 70 64 62 29 3b 0d nctions(*ppdb);.
30c0: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 .#endif.... ret
30d0: 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 urn ret;..}....S
30e0: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 QLITE_API int WI
30f0: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6f 70 65 NAPI sqlite3_ope
3100: 6e 31 36 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73 n16_interop(cons
3110: 74 20 63 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65 t char *filename
3120: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 76 66 , const char *vf
3130: 73 4e 61 6d 65 2c 20 69 6e 74 20 66 6c 61 67 73 sName, int flags
3140: 2c 20 69 6e 74 20 65 78 74 46 75 6e 63 73 2c 20 , int extFuncs,
3150: 73 71 6c 69 74 65 33 20 2a 2a 70 70 64 62 29 0d sqlite3 **ppdb).
3160: 0a 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a .{.. int ret;..
3170: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
3180: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 TEROP_DEBUG) &&
3190: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 (INTEROP_DEBUG &
31a0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f INTEROP_DEBUG_O
31b0: 50 45 4e 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 PEN16).. sqlite
31c0: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 3InteropDebug("s
31d0: 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36 5f 69 6e qlite3_open16_in
31e0: 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 terop(): calling
31f0: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e sqlite3_open_in
3200: 74 65 72 6f 70 28 5c 22 25 73 5c 22 2c 20 5c 22 terop(\"%s\", \"
3210: 25 73 5c 22 2c 20 25 64 2c 20 25 64 2c 20 25 70 %s\", %d, %d, %p
3220: 29 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d )...\n", filenam
3230: 65 2c 20 76 66 73 4e 61 6d 65 2c 20 66 6c 61 67 e, vfsName, flag
3240: 73 2c 20 65 78 74 46 75 6e 63 73 2c 20 70 70 64 s, extFuncs, ppd
3250: 62 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 b);..#endif....
3260: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 6f ret = sqlite3_o
3270: 70 65 6e 5f 69 6e 74 65 72 6f 70 28 66 69 6c 65 pen_interop(file
3280: 6e 61 6d 65 2c 20 76 66 73 4e 61 6d 65 2c 20 66 name, vfsName, f
3290: 6c 61 67 73 2c 20 65 78 74 46 75 6e 63 73 2c 20 lags, extFuncs,
32a0: 70 70 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 ppdb);....#if de
32b0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 fined(INTEROP_DE
32c0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 BUG) && (INTEROP
32d0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 _DEBUG & INTEROP
32e0: 5f 44 45 42 55 47 5f 4f 50 45 4e 31 36 29 0d 0a _DEBUG_OPEN16)..
32f0: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 sqlite3Interop
3300: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 6f Debug("sqlite3_o
3310: 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70 28 29 3a pen16_interop():
3320: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 69 6e sqlite3_open_in
3330: 74 65 72 6f 70 28 5c 22 25 73 5c 22 2c 20 5c 22 terop(\"%s\", \"
3340: 25 73 5c 22 2c 20 25 64 2c 20 25 64 2c 20 25 70 %s\", %d, %d, %p
3350: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e ) returned %d.\n
3360: 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 76 66 73 ", filename, vfs
3370: 4e 61 6d 65 2c 20 66 6c 61 67 73 2c 20 65 78 74 Name, flags, ext
3380: 46 75 6e 63 73 2c 20 70 70 64 62 2c 20 72 65 74 Funcs, ppdb, ret
3390: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 );..#endif....
33a0: 69 66 20 28 28 72 65 74 20 3d 3d 20 53 51 4c 49 if ((ret == SQLI
33b0: 54 45 5f 4f 4b 29 20 26 26 20 70 70 64 62 20 26 TE_OK) && ppdb &
33c0: 26 20 21 44 62 48 61 73 50 72 6f 70 65 72 74 79 & !DbHasProperty
33d0: 28 2a 70 70 64 62 2c 20 30 2c 20 44 42 5f 53 63 (*ppdb, 0, DB_Sc
33e0: 68 65 6d 61 4c 6f 61 64 65 64 29 29 0d 0a 20 20 hemaLoaded))..
33f0: 7b 0d 0a 20 20 20 20 45 4e 43 28 2a 70 70 64 62 {.. ENC(*ppdb
3400: 29 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 31 36 ) = SQLITE_UTF16
3410: 4e 41 54 49 56 45 3b 0d 0a 0d 0a 23 69 66 20 53 NATIVE;....#if S
3420: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 QLITE_VERSION_NU
3430: 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 38 0d MBER >= 3008008.
3440: 0a 20 20 20 20 2f 2f 0d 0a 20 20 20 20 2f 2f 20 . //.. //
3450: 42 55 47 46 49 58 3a 20 53 65 65 20 74 69 63 6b BUGFIX: See tick
3460: 65 74 20 5b 37 63 31 35 31 61 32 66 30 65 32 32 et [7c151a2f0e22
3470: 38 30 34 63 5d 2e 0d 0a 20 20 20 20 2f 2f 0d 0a 804c]... //..
3480: 20 20 20 20 53 43 48 45 4d 41 5f 45 4e 43 28 2a SCHEMA_ENC(*
3490: 70 70 64 62 29 20 3d 20 53 51 4c 49 54 45 5f 55 ppdb) = SQLITE_U
34a0: 54 46 31 36 4e 41 54 49 56 45 3b 0d 0a 23 65 6e TF16NATIVE;..#en
34b0: 64 69 66 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 65 dif.. }.... re
34c0: 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a turn ret;..}....
34d0: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 SQLITE_API const
34e0: 20 63 68 61 72 20 2a 57 49 4e 41 50 49 20 73 71 char *WINAPI sq
34f0: 6c 69 74 65 33 5f 65 72 72 6d 73 67 5f 69 6e 74 lite3_errmsg_int
3500: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62 erop(sqlite3 *db
3510: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d , int *plen)..{.
3520: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 . const char *p
3530: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 65 72 val = sqlite3_er
3540: 72 6d 73 67 28 64 62 29 3b 0d 0a 20 20 69 66 20 rmsg(db);.. if
3550: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 (plen) *plen = p
3560: 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 val ? strlen(pva
3570: 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 l) : 0;.. retur
3580: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 n pval;..}....SQ
3590: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e LITE_API int WIN
35a0: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 68 61 6e API sqlite3_chan
35b0: 67 65 73 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ges_interop(sqli
35c0: 74 65 33 20 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 te3 *db)..{.. i
35d0: 6e 74 20 72 65 73 75 6c 74 3b 0d 0a 0d 0a 23 69 nt result;....#i
35e0: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f f defined(INTERO
35f0: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 P_DEBUG) && (INT
3600: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 EROP_DEBUG & INT
3610: 45 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 EROP_DEBUG_CHANG
3620: 45 53 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e ES).. sqlite3In
3630: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 teropDebug("sqli
3640: 74 65 33 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65 te3_changes_inte
3650: 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 rop(): calling s
3660: 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 25 qlite3_changes(%
3670: 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a p)...\n", db);..
3680: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 6e 64 65 #endif....#ifnde
3690: 66 20 4e 44 45 42 55 47 0d 0a 20 20 69 66 20 28 f NDEBUG.. if (
36a0: 21 64 62 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 !db).. sqli
36b0: 74 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 te3InteropBreak(
36c0: 22 6e 75 6c 6c 20 64 61 74 61 62 61 73 65 20 68 "null database h
36d0: 61 6e 64 6c 65 20 66 6f 72 20 73 71 6c 69 74 65 andle for sqlite
36e0: 33 5f 63 68 61 6e 67 65 73 28 29 22 29 3b 0d 0a 3_changes()");..
36f0: 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 73 75 #endif.... resu
3700: 6c 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 68 61 lt = sqlite3_cha
3710: 6e 67 65 73 28 64 62 29 3b 0d 0a 0d 0a 23 69 66 nges(db);....#if
3720: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
3730: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 _DEBUG) && (INTE
3740: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 ROP_DEBUG & INTE
3750: 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 ROP_DEBUG_CHANGE
3760: 53 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 S).. sqlite3Int
3770: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
3780: 65 33 5f 63 68 61 6e 67 65 73 5f 69 6e 74 65 72 e3_changes_inter
3790: 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 63 68 op(): sqlite3_ch
37a0: 61 6e 67 65 73 28 25 70 29 20 72 65 74 75 72 6e anges(%p) return
37b0: 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 72 ed %d.\n", db, r
37c0: 65 73 75 6c 74 29 3b 0d 0a 23 65 6e 64 69 66 0d esult);..#endif.
37d0: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 73 75 ... return resu
37e0: 6c 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 lt;..}....SQLITE
37f0: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 _API int WINAPI
3800: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f sqlite3_prepare_
3810: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 interop(sqlite3
3820: 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 *db, const char
3830: 2a 73 71 6c 2c 20 69 6e 74 20 6e 62 79 74 65 73 *sql, int nbytes
3840: 2c 20 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a , sqlite3_stmt *
3850: 2a 70 70 73 74 6d 74 2c 20 63 6f 6e 73 74 20 63 *ppstmt, const c
3860: 68 61 72 20 2a 2a 70 7a 74 61 69 6c 2c 20 69 6e har **pztail, in
3870: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 t *plen)..{.. i
3880: 6e 74 20 6e 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 nt n;....#if def
3890: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 ined(INTEROP_DEB
38a0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f UG) && (INTEROP_
38b0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f DEBUG & INTEROP_
38c0: 44 45 42 55 47 5f 50 52 45 50 41 52 45 29 0d 0a DEBUG_PREPARE)..
38d0: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 sqlite3Interop
38e0: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 70 Debug("sqlite3_p
38f0: 72 65 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 repare_interop()
3900: 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 : calling sqlite
3910: 33 5f 70 72 65 70 61 72 65 28 25 70 2c 20 5c 22 3_prepare(%p, \"
3920: 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 2e 2e 2e %s\", %d, %p)...
3930: 5c 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 62 \n", db, sql, nb
3940: 79 74 65 73 2c 20 70 70 73 74 6d 74 29 3b 0d 0a ytes, ppstmt);..
3950: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 53 51 #endif....#if SQ
3960: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d LITE_VERSION_NUM
3970: 42 45 52 20 3e 3d 20 33 30 30 33 30 30 39 0d 0a BER >= 3003009..
3980: 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 n = sqlite3_pr
3990: 65 70 61 72 65 5f 76 32 28 64 62 2c 20 73 71 6c epare_v2(db, sql
39a0: 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74 , nbytes, ppstmt
39b0: 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6c 73 , pztail);..#els
39c0: 65 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 e.. n = sqlite3
39d0: 5f 70 72 65 70 61 72 65 28 64 62 2c 20 73 71 6c _prepare(db, sql
39e0: 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74 , nbytes, ppstmt
39f0: 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6e 64 , pztail);..#end
3a00: 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 if....#if define
3a10: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 d(INTEROP_DEBUG)
3a20: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 && (INTEROP_DEB
3a30: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 UG & INTEROP_DEB
3a40: 55 47 5f 50 52 45 50 41 52 45 29 0d 0a 20 20 73 UG_PREPARE).. s
3a50: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 qlite3InteropDeb
3a60: 75 67 28 22 73 71 6c 69 74 65 33 5f 70 72 65 70 ug("sqlite3_prep
3a70: 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 are_interop(): s
3a80: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 25 qlite3_prepare(%
3a90: 70 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 p, \"%s\", %d, %
3aa0: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c p) returned %d.\
3ab0: 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 62 79 n", db, sql, nby
3ac0: 74 65 73 2c 20 70 70 73 74 6d 74 2c 20 6e 29 3b tes, ppstmt, n);
3ad0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 ..#endif.... if
3ae0: 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 (plen) *plen =
3af0: 28 70 7a 74 61 69 6c 20 26 26 20 2a 70 7a 74 61 (pztail && *pzta
3b00: 69 6c 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a il) ? strlen(*pz
3b10: 74 61 69 6c 29 20 3a 20 30 3b 0d 0a 0d 0a 20 20 tail) : 0;....
3b20: 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a return n;..}....
3b30: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 SQLITE_API int W
3b40: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 70 72 INAPI sqlite3_pr
3b50: 65 70 61 72 65 31 36 5f 69 6e 74 65 72 6f 70 28 epare16_interop(
3b60: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e sqlite3 *db, con
3b70: 73 74 20 76 6f 69 64 20 2a 73 71 6c 2c 20 69 6e st void *sql, in
3b80: 74 20 6e 63 68 61 72 73 2c 20 73 71 6c 69 74 65 t nchars, sqlite
3b90: 33 5f 73 74 6d 74 20 2a 2a 70 70 73 74 6d 74 2c 3_stmt **ppstmt,
3ba0: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 2a 70 7a const void **pz
3bb0: 74 61 69 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 tail, int *plen)
3bc0: 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d ..{.. int n;...
3bd0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
3be0: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 EROP_DEBUG) && (
3bf0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 INTEROP_DEBUG &
3c00: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 INTEROP_DEBUG_PR
3c10: 45 50 41 52 45 31 36 29 0d 0a 20 20 73 71 6c 69 EPARE16).. sqli
3c20: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 te3InteropDebug(
3c30: 22 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 "sqlite3_prepare
3c40: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c _interop(): call
3c50: 69 6e 67 20 73 71 6c 69 74 65 33 5f 70 72 65 70 ing sqlite3_prep
3c60: 61 72 65 31 36 28 25 70 2c 20 5c 22 25 73 5c 22 are16(%p, \"%s\"
3c70: 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c , %d, %p)...\n",
3c80: 20 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73 db, sql, nchars
3c90: 2c 20 70 70 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 , ppstmt);..#end
3ca0: 69 66 0d 0a 0d 0a 23 69 66 20 53 51 4c 49 54 45 if....#if SQLITE
3cb0: 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 _VERSION_NUMBER
3cc0: 3e 3d 20 33 30 30 33 30 30 39 0d 0a 20 20 6e 20 >= 3003009.. n
3cd0: 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 = sqlite3_prepar
3ce0: 65 31 36 5f 76 32 28 64 62 2c 20 73 71 6c 2c 20 e16_v2(db, sql,
3cf0: 6e 63 68 61 72 73 20 2a 20 73 69 7a 65 6f 66 28 nchars * sizeof(
3d00: 77 63 68 61 72 5f 74 29 2c 20 70 70 73 74 6d 74 wchar_t), ppstmt
3d10: 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a 23 65 6c 73 , pztail);..#els
3d20: 65 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 e.. n = sqlite3
3d30: 5f 70 72 65 70 61 72 65 31 36 28 64 62 2c 20 73 _prepare16(db, s
3d40: 71 6c 2c 20 6e 63 68 61 72 73 20 2a 20 73 69 7a ql, nchars * siz
3d50: 65 6f 66 28 77 63 68 61 72 5f 74 29 2c 20 70 70 eof(wchar_t), pp
3d60: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a stmt, pztail);..
3d70: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 #endif....#if de
3d80: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 fined(INTEROP_DE
3d90: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 BUG) && (INTEROP
3da0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 _DEBUG & INTEROP
3db0: 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 31 36 _DEBUG_PREPARE16
3dc0: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 ).. sqlite3Inte
3dd0: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 ropDebug("sqlite
3de0: 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 72 6f 3_prepare_intero
3df0: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 70 72 65 p(): sqlite3_pre
3e00: 70 61 72 65 31 36 28 25 70 2c 20 5c 22 25 73 5c pare16(%p, \"%s\
3e10: 22 2c 20 25 64 2c 20 25 70 29 20 72 65 74 75 72 ", %d, %p) retur
3e20: 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 ned %d.\n", db,
3e30: 73 71 6c 2c 20 6e 63 68 61 72 73 2c 20 70 70 73 sql, nchars, pps
3e40: 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65 6e 64 69 66 tmt, n);..#endif
3e50: 0d 0a 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 .... if (plen)
3e60: 2a 70 6c 65 6e 20 3d 20 28 70 7a 74 61 69 6c 20 *plen = (pztail
3e70: 26 26 20 2a 70 7a 74 61 69 6c 29 20 3f 20 77 63 && *pztail) ? wc
3e80: 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 slen((wchar_t *)
3e90: 2a 70 7a 74 61 69 6c 29 20 2a 20 73 69 7a 65 6f *pztail) * sizeo
3ea0: 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d f(wchar_t) : 0;.
3eb0: 0a 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a ... return n;..
3ec0: 7d 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 }....#if defined
3ed0: 28 49 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 4c (INTEROP_VIRTUAL
3ee0: 5f 54 41 42 4c 45 29 20 26 26 20 53 51 4c 49 54 _TABLE) && SQLIT
3ef0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
3f00: 20 3e 3d 20 33 30 30 34 30 30 31 0d 0a 23 69 66 >= 3004001..#if
3f10: 64 65 66 20 5f 57 49 4e 33 32 0a 5f 5f 64 65 63 def _WIN32.__dec
3f20: 6c 73 70 65 63 28 64 6c 6c 65 78 70 6f 72 74 29 lspec(dllexport)
3f30: 0a 23 65 6e 64 69 66 0a 76 6f 69 64 20 2a 73 71 .#endif.void *sq
3f40: 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 64 69 73 lite3_create_dis
3f50: 70 6f 73 61 62 6c 65 5f 6d 6f 64 75 6c 65 28 0d posable_module(.
3f60: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d . sqlite3 *db,.
3f70: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a . const char *z
3f80: 4e 61 6d 65 2c 0d 0a 20 20 63 6f 6e 73 74 20 73 Name,.. const s
3f90: 71 6c 69 74 65 33 5f 6d 6f 64 75 6c 65 20 2a 70 qlite3_module *p
3fa0: 2c 0d 0a 20 20 76 6f 69 64 20 2a 70 43 6c 69 65 ,.. void *pClie
3fb0: 6e 74 44 61 74 61 2c 0d 0a 20 20 76 6f 69 64 28 ntData,.. void(
3fc0: 2a 78 44 65 73 74 72 6f 79 29 28 76 6f 69 64 2a *xDestroy)(void*
3fd0: 29 0d 0a 29 3b 20 2f 2a 20 64 65 66 69 6e 65 64 )..); /* defined
3fe0: 20 69 6e 20 22 73 72 63 2f 65 78 74 2f 76 74 73 in "src/ext/vts
3ff0: 68 69 6d 2e 63 22 20 28 69 6e 63 6c 75 64 65 64 him.c" (included
4000: 20 62 65 6c 6f 77 29 20 2a 2f 0d 0a 0d 0a 53 51 below) */....SQ
4010: 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 2a 57 LITE_API void *W
4020: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 72 INAPI sqlite3_cr
4030: 65 61 74 65 5f 64 69 73 70 6f 73 61 62 6c 65 5f eate_disposable_
4040: 6d 6f 64 75 6c 65 5f 69 6e 74 65 72 6f 70 28 0d module_interop(.
4050: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d . sqlite3 *db,.
4060: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a . const char *z
4070: 4e 61 6d 65 2c 0d 0a 20 20 73 71 6c 69 74 65 33 Name,.. sqlite3
4080: 5f 6d 6f 64 75 6c 65 20 2a 70 4d 6f 64 75 6c 65 _module *pModule
4090: 2c 0d 0a 20 20 69 6e 74 20 69 56 65 72 73 69 6f ,.. int iVersio
40a0: 6e 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43 72 65 n,.. int (*xCre
40b0: 61 74 65 29 28 73 71 6c 69 74 65 33 2a 2c 20 76 ate)(sqlite3*, v
40c0: 6f 69 64 20 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73 oid *, int, cons
40d0: 74 20 63 68 61 72 20 2a 63 6f 6e 73 74 2a 2c 20 t char *const*,
40e0: 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2a 2c sqlite3_vtab **,
40f0: 20 63 68 61 72 2a 2a 29 2c 0d 0a 20 20 69 6e 74 char**),.. int
4100: 20 28 2a 78 43 6f 6e 6e 65 63 74 29 28 73 71 6c (*xConnect)(sql
4110: 69 74 65 33 2a 2c 20 76 6f 69 64 20 2a 2c 20 69 ite3*, void *, i
4120: 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a nt, const char *
4130: 63 6f 6e 73 74 2a 2c 20 73 71 6c 69 74 65 33 5f const*, sqlite3_
4140: 76 74 61 62 20 2a 2a 2c 20 63 68 61 72 2a 2a 29 vtab **, char**)
4150: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 42 65 73 74 ,.. int (*xBest
4160: 49 6e 64 65 78 29 28 73 71 6c 69 74 65 33 5f 76 Index)(sqlite3_v
4170: 74 61 62 20 2a 2c 20 73 71 6c 69 74 65 33 5f 69 tab *, sqlite3_i
4180: 6e 64 65 78 5f 69 6e 66 6f 2a 29 2c 0d 0a 20 20 ndex_info*),..
4190: 69 6e 74 20 28 2a 78 44 69 73 63 6f 6e 6e 65 63 int (*xDisconnec
41a0: 74 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 t)(sqlite3_vtab
41b0: 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 44 65 *),.. int (*xDe
41c0: 73 74 72 6f 79 29 28 73 71 6c 69 74 65 33 5f 76 stroy)(sqlite3_v
41d0: 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 tab *),.. int (
41e0: 2a 78 4f 70 65 6e 29 28 73 71 6c 69 74 65 33 5f *xOpen)(sqlite3_
41f0: 76 74 61 62 20 2a 2c 20 73 71 6c 69 74 65 33 5f vtab *, sqlite3_
4200: 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 2a 29 2c vtab_cursor **),
4210: 0d 0a 20 20 69 6e 74 20 28 2a 78 43 6c 6f 73 65 .. int (*xClose
4220: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 )(sqlite3_vtab_c
4230: 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20 ursor*),.. int
4240: 28 2a 78 46 69 6c 74 65 72 29 28 73 71 6c 69 74 (*xFilter)(sqlit
4250: 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c e3_vtab_cursor*,
4260: 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 int, const char
4270: 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 33 *, int, sqlite3
4280: 5f 76 61 6c 75 65 20 2a 2a 29 2c 0d 0a 20 20 69 _value **),.. i
4290: 6e 74 20 28 2a 78 4e 65 78 74 29 28 73 71 6c 69 nt (*xNext)(sqli
42a0: 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a te3_vtab_cursor*
42b0: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 45 6f 66 ),.. int (*xEof
42c0: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 )(sqlite3_vtab_c
42d0: 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20 ursor*),.. int
42e0: 28 2a 78 43 6f 6c 75 6d 6e 29 28 73 71 6c 69 74 (*xColumn)(sqlit
42f0: 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c e3_vtab_cursor*,
4300: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 sqlite3_context
4310: 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 69 6e 74 20 *, int),.. int
4320: 28 2a 78 52 6f 77 69 64 29 28 73 71 6c 69 74 65 (*xRowid)(sqlite
4330: 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 2a 2c 20 3_vtab_cursor*,
4340: 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 2a 29 sqlite3_int64 *)
4350: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 55 70 64 61 ,.. int (*xUpda
4360: 74 65 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 te)(sqlite3_vtab
4370: 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 33 *, int, sqlite3
4380: 5f 76 61 6c 75 65 20 2a 2a 2c 20 73 71 6c 69 74 _value **, sqlit
4390: 65 33 5f 69 6e 74 36 34 20 2a 29 2c 0d 0a 20 20 e3_int64 *),..
43a0: 69 6e 74 20 28 2a 78 42 65 67 69 6e 29 28 73 71 int (*xBegin)(sq
43b0: 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d 0a lite3_vtab *),..
43c0: 20 20 69 6e 74 20 28 2a 78 53 79 6e 63 29 28 73 int (*xSync)(s
43d0: 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 2c 0d qlite3_vtab *),.
43e0: 0a 20 20 69 6e 74 20 28 2a 78 43 6f 6d 6d 69 74 . int (*xCommit
43f0: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a )(sqlite3_vtab *
4400: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 52 6f 6c ),.. int (*xRol
4410: 6c 62 61 63 6b 29 28 73 71 6c 69 74 65 33 5f 76 lback)(sqlite3_v
4420: 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 tab *),.. int (
4430: 2a 78 46 69 6e 64 46 75 6e 63 74 69 6f 6e 29 28 *xFindFunction)(
4440: 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 sqlite3_vtab *,
4450: 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 int, const char
4460: 2a 2c 20 76 6f 69 64 20 28 2a 2a 70 78 46 75 6e *, void (**pxFun
4470: 63 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 c)(sqlite3_conte
4480: 78 74 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 74 65 xt*, int, sqlite
4490: 33 5f 76 61 6c 75 65 2a 2a 29 2c 20 76 6f 69 64 3_value**), void
44a0: 20 2a 2a 70 70 41 72 67 29 2c 0d 0a 20 20 69 6e **ppArg),.. in
44b0: 74 20 28 2a 78 52 65 6e 61 6d 65 29 28 73 71 6c t (*xRename)(sql
44c0: 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 63 6f 6e ite3_vtab *, con
44d0: 73 74 20 63 68 61 72 20 2a 29 2c 0d 0a 20 20 69 st char *),.. i
44e0: 6e 74 20 28 2a 78 53 61 76 65 70 6f 69 6e 74 29 nt (*xSavepoint)
44f0: 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c (sqlite3_vtab *,
4500: 20 69 6e 74 29 2c 0d 0a 20 20 69 6e 74 20 28 2a int),.. int (*
4510: 78 52 65 6c 65 61 73 65 29 28 73 71 6c 69 74 65 xRelease)(sqlite
4520: 33 5f 76 74 61 62 20 2a 2c 20 69 6e 74 29 2c 0d 3_vtab *, int),.
4530: 0a 20 20 69 6e 74 20 28 2a 78 52 6f 6c 6c 62 61 . int (*xRollba
4540: 63 6b 54 6f 29 28 73 71 6c 69 74 65 33 5f 76 74 ckTo)(sqlite3_vt
4550: 61 62 20 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 76 ab *, int),.. v
4560: 6f 69 64 20 2a 70 43 6c 69 65 6e 74 44 61 74 61 oid *pClientData
4570: 2c 0d 0a 20 20 76 6f 69 64 28 2a 78 44 65 73 74 ,.. void(*xDest
4580: 72 6f 79 4d 6f 64 75 6c 65 29 28 76 6f 69 64 2a royModule)(void*
4590: 29 0d 0a 29 7b 0d 0a 20 20 69 66 20 28 21 70 4d )..){.. if (!pM
45a0: 6f 64 75 6c 65 29 20 72 65 74 75 72 6e 20 30 3b odule) return 0;
45b0: 0d 0a 20 20 6d 65 6d 73 65 74 28 70 4d 6f 64 75 .. memset(pModu
45c0: 6c 65 2c 20 30 2c 20 73 69 7a 65 6f 66 28 2a 70 le, 0, sizeof(*p
45d0: 4d 6f 64 75 6c 65 29 29 3b 0d 0a 20 20 70 4d 6f Module));.. pMo
45e0: 64 75 6c 65 2d 3e 69 56 65 72 73 69 6f 6e 20 3d dule->iVersion =
45f0: 20 69 56 65 72 73 69 6f 6e 3b 0d 0a 20 20 70 4d iVersion;.. pM
4600: 6f 64 75 6c 65 2d 3e 78 43 72 65 61 74 65 20 3d odule->xCreate =
4610: 20 78 43 72 65 61 74 65 3b 0d 0a 20 20 70 4d 6f xCreate;.. pMo
4620: 64 75 6c 65 2d 3e 78 43 6f 6e 6e 65 63 74 20 3d dule->xConnect =
4630: 20 78 43 6f 6e 6e 65 63 74 3b 0d 0a 20 20 70 4d xConnect;.. pM
4640: 6f 64 75 6c 65 2d 3e 78 42 65 73 74 49 6e 64 65 odule->xBestInde
4650: 78 20 3d 20 78 42 65 73 74 49 6e 64 65 78 3b 0d x = xBestIndex;.
4660: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 44 69 73 . pModule->xDis
4670: 63 6f 6e 6e 65 63 74 20 3d 20 78 44 69 73 63 6f connect = xDisco
4680: 6e 6e 65 63 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c nnect;.. pModul
4690: 65 2d 3e 78 44 65 73 74 72 6f 79 20 3d 20 78 44 e->xDestroy = xD
46a0: 65 73 74 72 6f 79 3b 0d 0a 20 20 70 4d 6f 64 75 estroy;.. pModu
46b0: 6c 65 2d 3e 78 4f 70 65 6e 20 3d 20 78 4f 70 65 le->xOpen = xOpe
46c0: 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 n;.. pModule->x
46d0: 43 6c 6f 73 65 20 3d 20 78 43 6c 6f 73 65 3b 0d Close = xClose;.
46e0: 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 46 69 6c . pModule->xFil
46f0: 74 65 72 20 3d 20 78 46 69 6c 74 65 72 3b 0d 0a ter = xFilter;..
4700: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 4e 65 78 74 pModule->xNext
4710: 20 3d 20 78 4e 65 78 74 3b 0d 0a 20 20 70 4d 6f = xNext;.. pMo
4720: 64 75 6c 65 2d 3e 78 45 6f 66 20 3d 20 78 45 6f dule->xEof = xEo
4730: 66 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 f;.. pModule->x
4740: 43 6f 6c 75 6d 6e 20 3d 20 78 43 6f 6c 75 6d 6e Column = xColumn
4750: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 52 ;.. pModule->xR
4760: 6f 77 69 64 20 3d 20 78 52 6f 77 69 64 3b 0d 0a owid = xRowid;..
4770: 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 55 70 64 61 pModule->xUpda
4780: 74 65 20 3d 20 78 55 70 64 61 74 65 3b 0d 0a 20 te = xUpdate;..
4790: 20 70 4d 6f 64 75 6c 65 2d 3e 78 42 65 67 69 6e pModule->xBegin
47a0: 20 3d 20 78 42 65 67 69 6e 3b 0d 0a 20 20 70 4d = xBegin;.. pM
47b0: 6f 64 75 6c 65 2d 3e 78 53 79 6e 63 20 3d 20 78 odule->xSync = x
47c0: 53 79 6e 63 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 Sync;.. pModule
47d0: 2d 3e 78 43 6f 6d 6d 69 74 20 3d 20 78 43 6f 6d ->xCommit = xCom
47e0: 6d 69 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d mit;.. pModule-
47f0: 3e 78 52 6f 6c 6c 62 61 63 6b 20 3d 20 78 52 6f >xRollback = xRo
4800: 6c 6c 62 61 63 6b 3b 0d 0a 20 20 70 4d 6f 64 75 llback;.. pModu
4810: 6c 65 2d 3e 78 46 69 6e 64 46 75 6e 63 74 69 6f le->xFindFunctio
4820: 6e 20 3d 20 78 46 69 6e 64 46 75 6e 63 74 69 6f n = xFindFunctio
4830: 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 n;.. pModule->x
4840: 52 65 6e 61 6d 65 20 3d 20 78 52 65 6e 61 6d 65 Rename = xRename
4850: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 53 ;.. pModule->xS
4860: 61 76 65 70 6f 69 6e 74 20 3d 20 78 53 61 76 65 avepoint = xSave
4870: 70 6f 69 6e 74 3b 0d 0a 20 20 70 4d 6f 64 75 6c point;.. pModul
4880: 65 2d 3e 78 52 65 6c 65 61 73 65 20 3d 20 78 52 e->xRelease = xR
4890: 65 6c 65 61 73 65 3b 0d 0a 20 20 70 4d 6f 64 75 elease;.. pModu
48a0: 6c 65 2d 3e 78 52 6f 6c 6c 62 61 63 6b 54 6f 20 le->xRollbackTo
48b0: 3d 20 78 52 6f 6c 6c 62 61 63 6b 54 6f 3b 0d 0a = xRollbackTo;..
48c0: 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 return sqlite3
48d0: 5f 63 72 65 61 74 65 5f 64 69 73 70 6f 73 61 62 _create_disposab
48e0: 6c 65 5f 6d 6f 64 75 6c 65 28 64 62 2c 20 7a 4e le_module(db, zN
48f0: 61 6d 65 2c 20 70 4d 6f 64 75 6c 65 2c 20 70 43 ame, pModule, pC
4900: 6c 69 65 6e 74 44 61 74 61 2c 20 78 44 65 73 74 lientData, xDest
4910: 72 6f 79 4d 6f 64 75 6c 65 29 3b 0d 0a 7d 0d 0a royModule);..}..
4920: 23 65 6e 64 69 66 0d 0a 0d 0a 53 51 4c 49 54 45 #endif....SQLITE
4930: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 _API int WINAPI
4940: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 64 6f 75 sqlite3_bind_dou
4950: 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ble_interop(sqli
4960: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 te3_stmt *stmt,
4970: 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c 65 int iCol, double
4980: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 *val)..{.. if
4990: 28 21 76 61 6c 29 20 72 65 74 75 72 6e 20 53 51 (!val) return SQ
49a0: 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 72 LITE_ERROR;.. r
49b0: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 eturn sqlite3_bi
49c0: 6e 64 5f 64 6f 75 62 6c 65 28 73 74 6d 74 2c 69 nd_double(stmt,i
49d0: 43 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d Col,*val);..}...
49e0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 .SQLITE_API int
49f0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 62 WINAPI sqlite3_b
4a00: 69 6e 64 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f ind_int64_intero
4a10: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a p(sqlite3_stmt *
4a20: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 stmt, int iCol,
4a30: 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76 61 sqlite_int64 *va
4a40: 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 76 61 l)..{.. if (!va
4a50: 6c 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 l) return SQLITE
4a60: 5f 45 52 52 4f 52 3b 0d 0a 20 20 72 65 74 75 72 _ERROR;.. retur
4a70: 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 69 n sqlite3_bind_i
4a80: 6e 74 36 34 28 73 74 6d 74 2c 69 43 6f 6c 2c 2a nt64(stmt,iCol,*
4a90: 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 val);..}....SQLI
4aa0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 TE_API const cha
4ab0: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 r * WINAPI sqlit
4ac0: 65 33 5f 62 69 6e 64 5f 70 61 72 61 6d 65 74 65 e3_bind_paramete
4ad0: 72 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 r_name_interop(s
4ae0: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
4af0: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 t, int iCol, int
4b00: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f *plen)..{.. co
4b10: 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d nst char *pval =
4b20: 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 70 61 sqlite3_bind_pa
4b30: 72 61 6d 65 74 65 72 5f 6e 61 6d 65 28 73 74 6d rameter_name(stm
4b40: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 t, iCol);.. if
4b50: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 (plen) *plen = p
4b60: 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 val ? strlen(pva
4b70: 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 l) : 0;.. retur
4b80: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 n pval;..}....SQ
4b90: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 LITE_API const c
4ba0: 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c har * WINAPI sql
4bb0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 ite3_column_name
4bc0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
4bd0: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 _stmt *stmt, int
4be0: 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e iCol, int *plen
4bf0: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 )..{.. const ch
4c00: 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 ar *pval = sqlit
4c10: 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 28 73 e3_column_name(s
4c20: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 tmt, iCol);.. i
4c30: 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d f (plen) *plen =
4c40: 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 pval ? strlen(p
4c50: 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 val) : 0;.. ret
4c60: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a urn pval;..}....
4c70: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 SQLITE_API const
4c80: 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 void * WINAPI s
4c90: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 qlite3_column_na
4ca0: 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c me16_interop(sql
4cb0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c ite3_stmt *stmt,
4cc0: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a int iCol, int *
4cd0: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 plen)..{.. cons
4ce0: 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73 t void *pval = s
4cf0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 qlite3_column_na
4d00: 6d 65 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 me16(stmt, iCol)
4d10: 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 2a ;.. if (plen) *
4d20: 70 6c 65 6e 20 3d 20 70 76 61 6c 20 3f 20 77 63 plen = pval ? wc
4d30: 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 slen((wchar_t *)
4d40: 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 pval) * sizeof(w
4d50: 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 char_t) : 0;..
4d60: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d return pval;..}.
4d70: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f ...SQLITE_API co
4d80: 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 nst char * WINAP
4d90: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e I sqlite3_column
4da0: 5f 64 65 63 6c 74 79 70 65 5f 69 6e 74 65 72 6f _decltype_intero
4db0: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a p(sqlite3_stmt *
4dc0: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 stmt, int iCol,
4dd0: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 int *plen)..{..
4de0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 const char *pva
4df0: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 l = sqlite3_colu
4e00: 6d 6e 5f 64 65 63 6c 74 79 70 65 28 73 74 6d 74 mn_decltype(stmt
4e10: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 , iCol);.. if (
4e20: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 plen) *plen = pv
4e30: 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c al ? strlen(pval
4e40: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e ) : 0;.. return
4e50: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c pval;..}....SQL
4e60: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f ITE_API const vo
4e70: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 id * WINAPI sqli
4e80: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 63 6c 74 te3_column_declt
4e90: 79 70 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 ype16_interop(sq
4ea0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 lite3_stmt *stmt
4eb0: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 , int iCol, int
4ec0: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e *plen)..{.. con
4ed0: 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 st void *pval =
4ee0: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 sqlite3_column_d
4ef0: 65 63 6c 74 79 70 65 31 36 28 73 74 6d 74 2c 20 ecltype16(stmt,
4f00: 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c iCol);.. if (pl
4f10: 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 6c en) *plen = pval
4f20: 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 ? wcslen((wchar
4f30: 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a _t *)pval) * siz
4f40: 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 eof(wchar_t) : 0
4f50: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c ;.. return pval
4f60: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 ;..}....SQLITE_A
4f70: 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 PI void WINAPI s
4f80: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f qlite3_column_do
4f90: 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c uble_interop(sql
4fa0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c ite3_stmt *stmt,
4fb0: 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 62 6c int iCol, doubl
4fc0: 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 e *val)..{.. if
4fd0: 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d (!val) return;.
4fe0: 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 . *val = sqlite
4ff0: 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 6c 65 28 3_column_double(
5000: 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d 0a stmt,iCol);..}..
5010: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 ..SQLITE_API voi
5020: 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 d WINAPI sqlite3
5030: 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 5f 69 6e _column_int64_in
5040: 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 terop(sqlite3_st
5050: 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 mt *stmt, int iC
5060: 6f 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 ol, sqlite_int64
5070: 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 *val)..{.. if
5080: 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d 0a (!val) return;..
5090: 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 *val = sqlite3
50a0: 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28 73 74 _column_int64(st
50b0: 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d 0a 0d 0a mt,iCol);..}....
50c0: 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 SQLITE_API void
50d0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6c WINAPI sqlite3_l
50e0: 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 ast_insert_rowid
50f0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
5100: 20 2a 64 62 2c 20 73 71 6c 69 74 65 5f 69 6e 74 *db, sqlite_int
5110: 36 34 20 2a 72 6f 77 49 64 29 0d 0a 7b 0d 0a 20 64 *rowId)..{..
5120: 20 69 66 20 28 21 72 6f 77 49 64 29 20 72 65 74 if (!rowId) ret
5130: 75 72 6e 3b 0d 0a 20 20 2a 72 6f 77 49 64 20 3d urn;.. *rowId =
5140: 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e sqlite3_last_in
5150: 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29 3b 0d sert_rowid(db);.
5160: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 .}....SQLITE_API
5170: 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c void WINAPI sql
5180: 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 75 73 65 64 ite3_memory_used
5190: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 5f _interop(sqlite_
51a0: 69 6e 74 36 34 20 2a 6e 42 79 74 65 73 29 0d 0a int64 *nBytes)..
51b0: 7b 0d 0a 20 20 69 66 20 28 21 6e 42 79 74 65 73 {.. if (!nBytes
51c0: 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 2a 6e 42 ) return;.. *nB
51d0: 79 74 65 73 20 3d 20 73 71 6c 69 74 65 33 5f 6d ytes = sqlite3_m
51e0: 65 6d 6f 72 79 5f 75 73 65 64 28 29 3b 0d 0a 7d emory_used();..}
51f0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 ....SQLITE_API v
5200: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 oid WINAPI sqlit
5210: 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61 e3_memory_highwa
5220: 74 65 72 5f 69 6e 74 65 72 6f 70 28 69 6e 74 20 ter_interop(int
5230: 72 65 73 65 74 46 6c 61 67 2c 20 73 71 6c 69 74 resetFlag, sqlit
5240: 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74 65 73 29 e_int64 *nBytes)
5250: 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 6e 42 79 74 ..{.. if (!nByt
5260: 65 73 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 2a es) return;.. *
5270: 6e 42 79 74 65 73 20 3d 20 73 71 6c 69 74 65 33 nBytes = sqlite3
5280: 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61 74 65 _memory_highwate
5290: 72 28 72 65 73 65 74 46 6c 61 67 29 3b 0d 0a 7d r(resetFlag);..}
52a0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 ....SQLITE_API c
52b0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 onst unsigned ch
52c0: 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 ar * WINAPI sqli
52d0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 5f te3_column_text_
52e0: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f interop(sqlite3_
52f0: 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 stmt *stmt, int
5300: 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 iCol, int *plen)
5310: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 ..{.. const uns
5320: 69 67 6e 65 64 20 63 68 61 72 20 2a 70 76 61 6c igned char *pval
5330: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d = sqlite3_colum
5340: 6e 5f 74 65 78 74 28 73 74 6d 74 2c 20 69 43 6f n_text(stmt, iCo
5350: 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 l);.. if (plen)
5360: 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 *plen = sqlite3
5370: 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28 73 74 _column_bytes(st
5380: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 72 65 mt, iCol);.. re
5390: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d turn pval;..}...
53a0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
53b0: 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 t void * WINAPI
53c0: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 sqlite3_column_t
53d0: 65 78 74 31 36 5f 69 6e 74 65 72 6f 70 28 73 71 ext16_interop(sq
53e0: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 lite3_stmt *stmt
53f0: 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 , int iCol, int
5400: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e *plen)..{.. con
5410: 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 st void *pval =
5420: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 sqlite3_column_t
5430: 65 78 74 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c ext16(stmt, iCol
5440: 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 );.. if (plen)
5450: 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 5f *plen = sqlite3_
5460: 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 31 36 28 73 column_bytes16(s
5470: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 72 tmt, iCol);.. r
5480: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a eturn pval;..}..
5490: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 ..SQLITE_API int
54a0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
54b0: 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 finalize_interop
54c0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
54d0: 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 tmt)..{.. int r
54e0: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65 et;..#if !define
54f0: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 d(INTEROP_LEGACY
5500: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54 _CLOSE) && SQLIT
5510: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
5520: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 >= 3007014....#
5530: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
5540: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e OP_DEBUG) && (IN
5550: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
5560: 54 45 52 4f 50 5f 44 45 42 55 47 5f 46 49 4e 41 TEROP_DEBUG_FINA
5570: 4c 49 5a 45 29 0d 0a 20 20 56 64 62 65 20 2a 70 LIZE).. Vdbe *p
5580: 20 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74 3b = (Vdbe *)stmt;
5590: 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 .. sqlite3 *db
55a0: 3d 20 70 20 3f 20 70 2d 3e 64 62 20 3a 20 30 3b = p ? p->db : 0;
55b0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 .. sqlite3Inter
55c0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 opDebug("sqlite3
55d0: 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f _finalize_intero
55e0: 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c p(): calling sql
55f0: 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 25 70 ite3_finalize(%p
5600: 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c , %p)...\n", db,
5610: 20 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d stmt);..#endif.
5620: 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 ... ret = sqlit
5630: 65 33 5f 66 69 6e 61 6c 69 7a 65 28 73 74 6d 74 e3_finalize(stmt
5640: 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 );....#if define
5650: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 d(INTEROP_DEBUG)
5660: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 && (INTEROP_DEB
5670: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 UG & INTEROP_DEB
5680: 55 47 5f 46 49 4e 41 4c 49 5a 45 29 0d 0a 20 20 UG_FINALIZE)..
5690: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
56a0: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 66 69 6e bug("sqlite3_fin
56b0: 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 28 29 3a alize_interop():
56c0: 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a sqlite3_finaliz
56d0: 65 28 25 70 2c 20 25 70 29 20 72 65 74 75 72 6e e(%p, %p) return
56e0: 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 73 ed %d.\n", db, s
56f0: 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 tmt, ret);..#end
5700: 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 if.... return r
5710: 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 56 64 et;..#else.. Vd
5720: 62 65 20 2a 70 3b 0d 0a 20 20 72 65 74 20 3d 20 be *p;.. ret =
5730: 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20 SQLITE_OK;....
5740: 70 20 3d 20 28 56 64 62 65 20 2a 29 73 74 6d 74 p = (Vdbe *)stmt
5750: 3b 0d 0a 20 20 69 66 20 28 70 29 0d 0a 20 20 7b ;.. if (p).. {
5760: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 20 2a 64 .. sqlite3 *d
5770: 62 20 3d 20 70 2d 3e 64 62 3b 0d 0a 0d 0a 20 20 b = p->db;....
5780: 20 20 69 66 20 28 64 62 20 21 3d 20 4e 55 4c 4c if (db != NULL
5790: 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 ).. sqlite3
57a0: 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d _mutex_enter(db-
57b0: 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 20 20 >mutex);....
57c0: 69 66 20 28 28 70 2d 3e 6d 61 67 69 63 20 3d 3d if ((p->magic ==
57d0: 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 45 41 44 VDBE_MAGIC_DEAD
57e0: 29 20 26 26 20 28 64 62 20 3d 3d 20 4e 55 4c 4c ) && (db == NULL
57f0: 29 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 )).. {..
5800: 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 5f 69 sqlite3DbFree_i
5810: 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b 0d 0a nterop(db, p);..
5820: 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d }.. else.
5830: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 . {.. re
5840: 74 20 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 t = sqlite3_fina
5850: 6c 69 7a 65 28 73 74 6d 74 29 3b 0d 0a 20 20 20 lize(stmt);..
5860: 20 7d 0d 0a 0d 0a 20 20 20 20 69 66 20 28 64 62 }.... if (db
5870: 20 21 3d 20 4e 55 4c 4c 29 0d 0a 20 20 20 20 20 != NULL)..
5880: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c sqlite3_mutex_l
5890: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b eave(db->mutex);
58a0: 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 65 74 75 72 .. }.... retur
58b0: 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a n ret;..#endif..
58c0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
58d0: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 int WINAPI sqlit
58e0: 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 73 68 e3_backup_finish
58f0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
5900: 5f 62 61 63 6b 75 70 20 2a 70 29 0d 0a 7b 0d 0a _backup *p)..{..
5910: 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 int ret;....#i
5920: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f f defined(INTERO
5930: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 P_DEBUG) && (INT
5940: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 EROP_DEBUG & INT
5950: 45 52 4f 50 5f 44 45 42 55 47 5f 42 41 43 4b 55 EROP_DEBUG_BACKU
5960: 50 5f 46 49 4e 49 53 48 29 0d 0a 20 20 73 71 6c P_FINISH).. sql
5970: 69 74 65 33 2a 20 70 44 65 73 74 44 62 20 3d 20 ite3* pDestDb =
5980: 70 20 3f 20 70 2d 3e 70 44 65 73 74 44 62 20 3a p ? p->pDestDb :
5990: 20 30 3b 0d 0a 20 20 73 71 6c 69 74 65 33 2a 20 0;.. sqlite3*
59a0: 70 53 72 63 44 62 20 3d 20 70 20 3f 20 70 2d 3e pSrcDb = p ? p->
59b0: 70 53 72 63 44 62 20 3a 20 30 3b 0d 0a 20 20 73 pSrcDb : 0;.. s
59c0: 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 qlite3InteropDeb
59d0: 75 67 28 22 73 71 6c 69 74 65 33 5f 62 61 63 6b ug("sqlite3_back
59e0: 75 70 5f 66 69 6e 69 73 68 5f 69 6e 74 65 72 6f up_finish_intero
59f0: 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c p(): calling sql
5a00: 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e 69 ite3_backup_fini
5a10: 73 68 28 25 70 2c 20 25 70 2c 20 25 70 29 2e 2e sh(%p, %p, %p)..
5a20: 2e 5c 6e 22 2c 20 70 44 65 73 74 44 62 2c 20 70 .\n", pDestDb, p
5a30: 53 72 63 44 62 2c 20 70 29 3b 0d 0a 23 65 6e 64 SrcDb, p);..#end
5a40: 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 if.... ret = sq
5a50: 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e lite3_backup_fin
5a60: 69 73 68 28 70 29 3b 0d 0a 0d 0a 23 69 66 20 64 ish(p);....#if d
5a70: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 efined(INTEROP_D
5a80: 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f EBUG) && (INTERO
5a90: 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f P_DEBUG & INTERO
5aa0: 50 5f 44 45 42 55 47 5f 42 41 43 4b 55 50 5f 46 P_DEBUG_BACKUP_F
5ab0: 49 4e 49 53 48 29 0d 0a 20 20 73 71 6c 69 74 65 INISH).. sqlite
5ac0: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 3InteropDebug("s
5ad0: 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 qlite3_backup_fi
5ae0: 6e 69 73 68 5f 69 6e 74 65 72 6f 70 28 29 3a 20 nish_interop():
5af0: 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 sqlite3_backup_f
5b00: 69 6e 69 73 68 28 25 70 2c 20 25 70 2c 20 25 70 inish(%p, %p, %p
5b10: 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e ) returned %d.\n
5b20: 22 2c 20 70 44 65 73 74 44 62 2c 20 70 53 72 63 ", pDestDb, pSrc
5b30: 44 62 2c 20 70 2c 20 72 65 74 29 3b 0d 0a 23 65 Db, p, ret);..#e
5b40: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e ndif.... return
5b50: 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 ret;..}....SQLI
5b60: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 TE_API int WINAP
5b70: 49 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 63 I sqlite3_blob_c
5b80: 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c lose_interop(sql
5b90: 69 74 65 33 5f 62 6c 6f 62 20 2a 70 29 0d 0a 7b ite3_blob *p)..{
5ba0: 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a .. int ret;....
5bb0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
5bc0: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 ROP_DEBUG) && (I
5bd0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 NTEROP_DEBUG & I
5be0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 4c 4f NTEROP_DEBUG_BLO
5bf0: 42 5f 43 4c 4f 53 45 29 0d 0a 20 20 73 71 6c 69 B_CLOSE).. sqli
5c00: 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 te3InteropDebug(
5c10: 22 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 63 6c "sqlite3_blob_cl
5c20: 6f 73 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 ose_interop(): c
5c30: 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 62 alling sqlite3_b
5c40: 6c 6f 62 5f 63 6c 6f 73 65 28 25 70 29 2e 2e 2e lob_close(%p)...
5c50: 5c 6e 22 2c 20 70 29 3b 0d 0a 23 65 6e 64 69 66 \n", p);..#endif
5c60: 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 .... ret = sqli
5c70: 74 65 33 5f 62 6c 6f 62 5f 63 6c 6f 73 65 28 70 te3_blob_close(p
5c80: 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 );....#if define
5c90: 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 d(INTEROP_DEBUG)
5ca0: 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 && (INTEROP_DEB
5cb0: 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 UG & INTEROP_DEB
5cc0: 55 47 5f 42 4c 4f 42 5f 43 4c 4f 53 45 29 0d 0a UG_BLOB_CLOSE)..
5cd0: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 sqlite3Interop
5ce0: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 62 Debug("sqlite3_b
5cf0: 6c 6f 62 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f lob_close_intero
5d00: 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 62 6c 6f p(): sqlite3_blo
5d10: 62 5f 63 6c 6f 73 65 28 25 70 29 20 72 65 74 75 b_close(%p) retu
5d20: 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 70 2c 20 rned %d.\n", p,
5d30: 72 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d ret);..#endif...
5d40: 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a . return ret;..
5d50: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
5d60: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 int WINAPI sqlit
5d70: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70 e3_reset_interop
5d80: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
5d90: 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 tmt)..{.. int r
5da0: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65 et;..#if !define
5db0: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 d(INTEROP_LEGACY
5dc0: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54 _CLOSE) && SQLIT
5dd0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
5de0: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 >= 3007014....#
5df0: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
5e00: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e OP_DEBUG) && (IN
5e10: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
5e20: 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 TEROP_DEBUG_RESE
5e30: 54 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 T).. sqlite3Int
5e40: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
5e50: 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 6f 70 e3_reset_interop
5e60: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 (): calling sqli
5e70: 74 65 33 5f 72 65 73 65 74 28 25 70 29 2e 2e 2e te3_reset(%p)...
5e80: 5c 6e 22 2c 20 73 74 6d 74 29 3b 0d 0a 23 65 6e \n", stmt);..#en
5e90: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 dif.... ret = s
5ea0: 71 6c 69 74 65 33 5f 72 65 73 65 74 28 73 74 6d qlite3_reset(stm
5eb0: 74 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e t);....#if defin
5ec0: 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ed(INTEROP_DEBUG
5ed0: 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 ) && (INTEROP_DE
5ee0: 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 BUG & INTEROP_DE
5ef0: 42 55 47 5f 52 45 53 45 54 29 0d 0a 20 20 73 71 BUG_RESET).. sq
5f00: 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 lite3InteropDebu
5f10: 67 28 22 73 71 6c 69 74 65 33 5f 72 65 73 65 74 g("sqlite3_reset
5f20: 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 _interop(): sqli
5f30: 74 65 33 5f 72 65 73 65 74 28 25 70 29 20 72 65 te3_reset(%p) re
5f40: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 73 turned %d.\n", s
5f50: 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 65 6e 64 tmt, ret);..#end
5f60: 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 if.... return r
5f70: 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 et;..#else.. if
5f80: 20 28 73 74 6d 74 20 26 26 20 28 28 56 64 62 65 (stmt && ((Vdbe
5f90: 20 2a 29 73 74 6d 74 29 2d 3e 6d 61 67 69 63 20 *)stmt)->magic
5fa0: 3d 3d 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 45 == VDBE_MAGIC_DE
5fb0: 41 44 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 AD) return SQLIT
5fc0: 45 5f 53 43 48 45 4d 41 3b 0d 0a 20 20 72 65 74 E_SCHEMA;.. ret
5fd0: 20 3d 20 73 71 6c 69 74 65 33 5f 72 65 73 65 74 = sqlite3_reset
5fe0: 28 73 74 6d 74 29 3b 0d 0a 20 20 72 65 74 75 72 (stmt);.. retur
5ff0: 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a n ret;..#endif..
6000: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
6010: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 int WINAPI sqlit
6020: 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69 e3_create_functi
6030: 6f 6e 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 on_interop(sqlit
6040: 65 33 20 2a 70 73 71 6c 2c 20 63 6f 6e 73 74 20 e3 *psql, const
6050: 63 68 61 72 20 2a 7a 46 75 6e 63 74 69 6f 6e 4e char *zFunctionN
6060: 61 6d 65 2c 20 69 6e 74 20 6e 41 72 67 2c 20 69 ame, int nArg, i
6070: 6e 74 20 65 54 65 78 74 52 65 70 2c 20 76 6f 69 nt eTextRep, voi
6080: 64 20 2a 70 76 55 73 65 72 2c 20 53 51 4c 49 54 d *pvUser, SQLIT
6090: 45 55 53 45 52 46 55 4e 43 20 66 75 6e 63 2c 20 EUSERFUNC func,
60a0: 53 51 4c 49 54 45 55 53 45 52 46 55 4e 43 20 66 SQLITEUSERFUNC f
60b0: 75 6e 63 73 74 65 70 2c 20 53 51 4c 49 54 45 46 uncstep, SQLITEF
60c0: 55 4e 43 46 49 4e 41 4c 20 66 75 6e 63 66 69 6e UNCFINAL funcfin
60d0: 61 6c 2c 20 69 6e 74 20 6e 65 65 64 43 6f 6c 6c al, int needColl
60e0: 53 65 71 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e Seq)..{.. int n
60f0: 3b 0d 0a 0d 0a 20 20 69 66 20 28 65 54 65 78 74 ;.... if (eText
6100: 52 65 70 20 3d 3d 20 53 51 4c 49 54 45 5f 55 54 Rep == SQLITE_UT
6110: 46 31 36 29 0d 0a 20 20 20 20 65 54 65 78 74 52 F16).. eTextR
6120: 65 70 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 31 ep = SQLITE_UTF1
6130: 36 4e 41 54 49 56 45 3b 0d 0a 0d 0a 20 20 6e 20 6NATIVE;.... n
6140: 3d 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 = sqlite3_create
6150: 5f 66 75 6e 63 74 69 6f 6e 28 70 73 71 6c 2c 20 _function(psql,
6160: 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 6e zFunctionName, n
6170: 41 72 67 2c 20 65 54 65 78 74 52 65 70 2c 20 70 Arg, eTextRep, p
6180: 76 55 73 65 72 2c 20 66 75 6e 63 2c 20 66 75 6e vUser, func, fun
6190: 63 73 74 65 70 2c 20 66 75 6e 63 66 69 6e 61 6c cstep, funcfinal
61a0: 29 3b 0d 0a 20 20 69 66 20 28 6e 20 3d 3d 20 53 );.. if (n == S
61b0: 51 4c 49 54 45 5f 4f 4b 29 0d 0a 20 20 7b 0d 0a QLITE_OK).. {..
61c0: 20 20 20 20 69 66 20 28 6e 65 65 64 43 6f 6c 6c if (needColl
61d0: 53 65 71 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 Seq).. {..
61e0: 20 20 20 46 75 6e 63 44 65 66 20 2a 70 46 75 6e FuncDef *pFun
61f0: 63 20 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 46 c = sqlite3FindF
6200: 75 6e 63 74 69 6f 6e 28 0d 0a 20 20 20 20 20 20 unction(..
6210: 20 20 20 20 70 73 71 6c 2c 20 7a 46 75 6e 63 74 psql, zFunct
6220: 69 6f 6e 4e 61 6d 65 2c 0d 0a 23 69 66 20 53 51 ionName,..#if SQ
6230: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d LITE_VERSION_NUM
6240: 42 45 52 20 3c 20 33 30 31 32 30 30 30 0d 0a 20 BER < 3012000..
6250: 20 20 20 20 20 20 20 20 20 73 74 72 6c 65 6e 28 strlen(
6260: 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 29 2c 0d zFunctionName),.
6270: 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 20 20 20 .#endif..
6280: 20 20 20 6e 41 72 67 2c 20 65 54 65 78 74 52 65 nArg, eTextRe
6290: 70 2c 20 30 29 3b 0d 0a 20 20 20 20 20 20 69 66 p, 0);.. if
62a0: 28 20 70 46 75 6e 63 20 29 0d 0a 20 20 20 20 20 ( pFunc )..
62b0: 20 7b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 {..#if SQLITE_V
62c0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d ERSION_NUMBER >=
62d0: 20 33 30 30 38 30 30 31 0d 0a 20 20 20 20 20 20 3008001..
62e0: 20 20 70 46 75 6e 63 2d 3e 66 75 6e 63 46 6c 61 pFunc->funcFla
62f0: 67 73 20 7c 3d 20 53 51 4c 49 54 45 5f 46 55 4e gs |= SQLITE_FUN
6300: 43 5f 4e 45 45 44 43 4f 4c 4c 3b 0d 0a 23 65 6c C_NEEDCOLL;..#el
6310: 73 65 0d 0a 20 20 20 20 20 20 20 20 70 46 75 6e se.. pFun
6320: 63 2d 3e 66 6c 61 67 73 20 7c 3d 20 53 51 4c 49 c->flags |= SQLI
6330: 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c TE_FUNC_NEEDCOLL
6340: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 20 ;..#endif..
6350: 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d 0a }.. }.. }..
6360: 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d .. return n;..}
6370: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 ....SQLITE_API v
6380: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 oid WINAPI sqlit
6390: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 5f e3_value_double_
63a0: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f interop(sqlite3_
63b0: 76 61 6c 75 65 20 2a 70 76 61 6c 2c 20 64 6f 75 value *pval, dou
63c0: 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 ble *val)..{..
63d0: 69 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e if (!val) return
63e0: 3b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 ;.. *val = sqli
63f0: 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 te3_value_double
6400: 28 70 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 (pval);..}....SQ
6410: 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49 LITE_API void WI
6420: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c NAPI sqlite3_val
6430: 75 65 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 ue_int64_interop
6440: 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a (sqlite3_value *
6450: 70 76 61 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74 pval, sqlite_int
6460: 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 64 *val)..{.. i
6470: 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b f (!val) return;
6480: 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 74 .. *val = sqlit
6490: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 70 e3_value_int64(p
64a0: 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 val);..}....SQLI
64b0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 75 6e 73 TE_API const uns
64c0: 69 67 6e 65 64 20 63 68 61 72 20 2a 20 57 49 4e igned char * WIN
64d0: 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 API sqlite3_valu
64e0: 65 5f 74 65 78 74 5f 69 6e 74 65 72 6f 70 28 73 e_text_interop(s
64f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 76 61 qlite3_value *va
6500: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b l, int *plen)..{
6510: 0d 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e .. const unsign
6520: 65 64 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 ed char *pval =
6530: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 sqlite3_value_te
6540: 78 74 28 76 61 6c 29 3b 0d 0a 20 20 69 66 20 28 xt(val);.. if (
6550: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71 plen) *plen = sq
6560: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 lite3_value_byte
6570: 73 28 76 61 6c 29 3b 0d 0a 20 20 72 65 74 75 72 s(val);.. retur
6580: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 n pval;..}....SQ
6590: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 LITE_API const v
65a0: 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c oid * WINAPI sql
65b0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 31 ite3_value_text1
65c0: 36 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 6_interop(sqlite
65d0: 33 5f 76 61 6c 75 65 20 2a 76 61 6c 2c 20 69 6e 3_value *val, in
65e0: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 t *plen)..{.. c
65f0: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 onst void *pval
6600: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f = sqlite3_value_
6610: 74 65 78 74 31 36 28 76 61 6c 29 3b 0d 0a 20 20 text16(val);..
6620: 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 if (plen) *plen
6630: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f = sqlite3_value_
6640: 62 79 74 65 73 31 36 28 76 61 6c 29 3b 0d 0a 20 bytes16(val);..
6650: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d return pval;..}
6660: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 ....SQLITE_API v
6670: 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 oid WINAPI sqlit
6680: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 e3_result_double
6690: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
66a0: 5f 63 6f 6e 74 65 78 74 20 2a 70 63 74 78 2c 20 _context *pctx,
66b0: 64 6f 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d double *val)..{.
66c0: 0a 20 20 69 66 20 28 21 76 61 6c 29 20 72 65 74 . if (!val) ret
66d0: 75 72 6e 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f urn;.. sqlite3_
66e0: 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 70 63 result_double(pc
66f0: 74 78 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d tx, *val);..}...
6700: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 .SQLITE_API void
6710: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
6720: 72 65 73 75 6c 74 5f 69 6e 74 36 34 5f 69 6e 74 result_int64_int
6730: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e erop(sqlite3_con
6740: 74 65 78 74 20 2a 70 63 74 78 2c 20 73 71 6c 69 text *pctx, sqli
6750: 74 65 5f 69 6e 74 36 34 20 2a 76 61 6c 29 0d 0a te_int64 *val)..
6760: 7b 0d 0a 20 20 69 66 20 28 21 76 61 6c 29 20 72 {.. if (!val) r
6770: 65 74 75 72 6e 3b 0d 0a 20 20 73 71 6c 69 74 65 eturn;.. sqlite
6780: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 70 3_result_int64(p
6790: 63 74 78 2c 20 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a ctx, *val);..}..
67a0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 ..SQLITE_API int
67b0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
67c0: 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c 63 6f 6d 70 context_collcomp
67d0: 61 72 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 are_interop(sqli
67e0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78 te3_context *ctx
67f0: 2c 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 31 , const void *p1
6800: 2c 20 69 6e 74 20 70 31 6c 65 6e 2c 20 63 6f 6e , int p1len, con
6810: 73 74 20 76 6f 69 64 20 2a 70 32 2c 20 69 6e 74 st void *p2, int
6820: 20 70 32 6c 65 6e 29 0d 0a 7b 0d 0a 23 69 66 20 p2len)..{..#if
6830: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e SQLITE_VERSION_N
6840: 55 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 37 UMBER >= 3008007
6850: 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f .. CollSeq *pCo
6860: 6c 6c 20 3d 20 63 74 78 20 3f 20 73 71 6c 69 74 ll = ctx ? sqlit
6870: 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 e3GetFuncCollSeq
6880: 28 63 74 78 29 20 3a 20 30 3b 0d 0a 23 65 6c 73 (ctx) : 0;..#els
6890: 65 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 e.. CollSeq *pC
68a0: 6f 6c 6c 20 3d 20 63 74 78 20 3f 20 63 74 78 2d oll = ctx ? ctx-
68b0: 3e 70 43 6f 6c 6c 20 3a 20 30 3b 0d 0a 23 65 6e >pColl : 0;..#en
68c0: 64 69 66 0d 0a 20 20 69 66 20 28 21 63 74 78 20 dif.. if (!ctx
68d0: 7c 7c 20 21 63 74 78 2d 3e 70 46 75 6e 63 29 20 || !ctx->pFunc)
68e0: 72 65 74 75 72 6e 20 34 3b 20 2f 2a 20 45 52 52 return 4; /* ERR
68f0: 4f 52 20 2a 2f 0d 0a 20 20 69 66 20 28 21 70 43 OR */.. if (!pC
6900: 6f 6c 6c 20 7c 7c 20 21 70 43 6f 6c 6c 2d 3e 78 oll || !pColl->x
6910: 43 6d 70 29 20 72 65 74 75 72 6e 20 33 3b 20 2f Cmp) return 3; /
6920: 2a 20 45 52 52 4f 52 20 2a 2f 0d 0a 23 69 66 20 * ERROR */..#if
6930: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e SQLITE_VERSION_N
6940: 55 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 31 UMBER >= 3008001
6950: 0d 0a 20 20 69 66 20 28 28 63 74 78 2d 3e 70 46 .. if ((ctx->pF
6960: 75 6e 63 2d 3e 66 75 6e 63 46 6c 61 67 73 20 26 unc->funcFlags &
6970: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 SQLITE_FUNC_NEE
6980: 44 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 72 65 74 DCOLL) == 0) ret
6990: 75 72 6e 20 32 3b 20 2f 2a 20 45 52 52 4f 52 20 urn 2; /* ERROR
69a0: 2a 2f 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 */..#else.. if
69b0: 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c ((ctx->pFunc->fl
69c0: 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e ags & SQLITE_FUN
69d0: 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 C_NEEDCOLL) == 0
69e0: 29 20 72 65 74 75 72 6e 20 32 3b 20 2f 2a 20 45 ) return 2; /* E
69f0: 52 52 4f 52 20 2a 2f 0d 0a 23 65 6e 64 69 66 0d RROR */..#endif.
6a00: 0a 20 20 72 65 74 75 72 6e 20 70 43 6f 6c 6c 2d . return pColl-
6a10: 3e 78 43 6d 70 28 70 43 6f 6c 6c 2d 3e 70 55 73 >xCmp(pColl->pUs
6a20: 65 72 2c 20 70 31 6c 65 6e 2c 20 70 31 2c 20 70 er, p1len, p1, p
6a30: 32 6c 65 6e 2c 20 70 32 29 3b 0d 0a 7d 0d 0a 0d 2len, p2);..}...
6a40: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
6a50: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 t char * WINAPI
6a60: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f sqlite3_context_
6a70: 63 6f 6c 6c 73 65 71 5f 69 6e 74 65 72 6f 70 28 collseq_interop(
6a80: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 sqlite3_context
6a90: 2a 63 74 78 2c 20 69 6e 74 20 2a 70 74 79 70 65 *ctx, int *ptype
6aa0: 2c 20 69 6e 74 20 2a 65 6e 63 2c 20 69 6e 74 20 , int *enc, int
6ab0: 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 23 69 66 20 53 *plen)..{..#if S
6ac0: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 QLITE_VERSION_NU
6ad0: 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 37 0d MBER >= 3008007.
6ae0: 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c . CollSeq *pCol
6af0: 6c 20 3d 20 63 74 78 20 3f 20 73 71 6c 69 74 65 l = ctx ? sqlite
6b00: 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 3GetFuncCollSeq(
6b10: 63 74 78 29 20 3a 20 30 3b 0d 0a 23 65 6c 73 65 ctx) : 0;..#else
6b20: 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f .. CollSeq *pCo
6b30: 6c 6c 20 3d 20 63 74 78 20 3f 20 63 74 78 2d 3e ll = ctx ? ctx->
6b40: 70 43 6f 6c 6c 20 3a 20 30 3b 0d 0a 23 65 6e 64 pColl : 0;..#end
6b50: 69 66 0d 0a 20 20 69 66 20 28 70 74 79 70 65 29 if.. if (ptype)
6b60: 20 2a 70 74 79 70 65 20 3d 20 30 3b 0d 0a 20 20 *ptype = 0;..
6b70: 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 if (plen) *plen
6b80: 3d 20 30 3b 0d 0a 20 20 69 66 20 28 65 6e 63 29 = 0;.. if (enc)
6b90: 20 2a 65 6e 63 20 3d 20 30 3b 0d 0a 0d 0a 20 20 *enc = 0;....
6ba0: 69 66 20 28 21 63 74 78 20 7c 7c 20 21 63 74 78 if (!ctx || !ctx
6bb0: 2d 3e 70 46 75 6e 63 29 20 72 65 74 75 72 6e 20 ->pFunc) return
6bc0: 4e 55 4c 4c 3b 0d 0a 23 69 66 20 53 51 4c 49 54 NULL;..#if SQLIT
6bd0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
6be0: 20 3e 3d 20 33 30 30 38 30 30 31 0d 0a 20 20 69 >= 3008001.. i
6bf0: 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e f ((ctx->pFunc->
6c00: 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51 4c 49 funcFlags & SQLI
6c10: 54 45 5f 46 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c TE_FUNC_NEEDCOLL
6c20: 29 20 3d 3d 20 30 29 20 72 65 74 75 72 6e 20 4e ) == 0) return N
6c30: 55 4c 4c 3b 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 ULL;..#else.. i
6c40: 66 20 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e f ((ctx->pFunc->
6c50: 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 flags & SQLITE_F
6c60: 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d UNC_NEEDCOLL) ==
6c70: 20 30 29 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0) return NULL;
6c80: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 ..#endif.... if
6c90: 20 28 70 43 6f 6c 6c 29 0d 0a 20 20 7b 0d 0a 20 (pColl).. {..
6ca0: 20 20 20 69 66 20 28 65 6e 63 29 20 2a 65 6e 63 if (enc) *enc
6cb0: 20 3d 20 70 43 6f 6c 6c 2d 3e 65 6e 63 3b 0d 0a = pColl->enc;..
6cc0: 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 #if SQLITE_VERSI
6cd0: 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 30 30 37 ON_NUMBER < 3007
6ce0: 30 31 30 0d 0a 20 20 20 20 69 66 20 28 70 74 79 010.. if (pty
6cf0: 70 65 29 20 2a 70 74 79 70 65 20 3d 20 70 43 6f pe) *ptype = pCo
6d00: 6c 6c 2d 3e 74 79 70 65 3b 0d 0a 23 65 6e 64 69 ll->type;..#endi
6d10: 66 0d 0a 20 20 20 20 69 66 20 28 70 6c 65 6e 29 f.. if (plen)
6d20: 20 2a 70 6c 65 6e 20 3d 20 70 43 6f 6c 6c 2d 3e *plen = pColl->
6d30: 7a 4e 61 6d 65 20 3f 20 73 74 72 6c 65 6e 28 70 zName ? strlen(p
6d40: 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65 29 20 3a 20 30 Coll->zName) : 0
6d50: 3b 0d 0a 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 ;.... return
6d60: 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65 3b 0d 0a 20 pColl->zName;..
6d70: 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 4e 55 4c }.. return NUL
6d80: 4c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f L;..}....SQLITE_
6d90: 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 2a API const char *
6da0: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
6db0: 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f column_database_
6dc0: 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c name_interop(sql
6dd0: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c ite3_stmt *stmt,
6de0: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a int iCol, int *
6df0: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 plen)..{.. cons
6e00: 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 t char *pval = s
6e10: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 qlite3_column_da
6e20: 74 61 62 61 73 65 5f 6e 61 6d 65 28 73 74 6d 74 tabase_name(stmt
6e30: 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 , iCol);.. if (
6e40: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 plen) *plen = pv
6e50: 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c al ? strlen(pval
6e60: 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e ) : 0;.. return
6e70: 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c pval;..}....SQL
6e80: 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f ITE_API const vo
6e90: 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 id * WINAPI sqli
6ea0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 te3_column_datab
6eb0: 61 73 65 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 ase_name16_inter
6ec0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 op(sqlite3_stmt
6ed0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c *stmt, int iCol,
6ee0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a int *plen)..{..
6ef0: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 const void *pv
6f00: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c al = sqlite3_col
6f10: 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d umn_database_nam
6f20: 65 31 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b e16(stmt, iCol);
6f30: 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 .. if (plen) *p
6f40: 6c 65 6e 20 3d 20 70 76 61 6c 20 3f 20 77 63 73 len = pval ? wcs
6f50: 6c 65 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70 len((wchar_t *)p
6f60: 76 61 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 val) * sizeof(wc
6f70: 68 61 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 har_t) : 0;.. r
6f80: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a eturn pval;..}..
6f90: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e ..SQLITE_API con
6fa0: 73 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 st char * WINAPI
6fb0: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
6fc0: 74 61 62 6c 65 5f 6e 61 6d 65 5f 69 6e 74 65 72 table_name_inter
6fd0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 op(sqlite3_stmt
6fe0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c *stmt, int iCol,
6ff0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a int *plen)..{..
7000: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 const char *pv
7010: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c al = sqlite3_col
7020: 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 28 73 umn_table_name(s
7030: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 tmt, iCol);.. i
7040: 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d f (plen) *plen =
7050: 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 pval ? strlen(p
7060: 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 val) : 0;.. ret
7070: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a urn pval;..}....
7080: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 SQLITE_API const
7090: 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 void * WINAPI s
70a0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 qlite3_column_ta
70b0: 62 6c 65 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 ble_name16_inter
70c0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 op(sqlite3_stmt
70d0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c *stmt, int iCol,
70e0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a int *plen)..{..
70f0: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 const void *pv
7100: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c al = sqlite3_col
7110: 75 6d 6e 5f 74 61 62 6c 65 5f 6e 61 6d 65 31 36 umn_table_name16
7120: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 (stmt, iCol);..
7130: 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e if (plen) *plen
7140: 20 3d 20 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e = pval ? wcslen
7150: 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c ((wchar_t *)pval
7160: 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 ) * sizeof(wchar
7170: 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 _t) : 0;.. retu
7180: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 rn pval;..}....S
7190: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 QLITE_API const
71a0: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 char * WINAPI sq
71b0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 lite3_column_ori
71c0: 67 69 6e 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 gin_name_interop
71d0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
71e0: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 tmt, int iCol, i
71f0: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 nt *plen)..{..
7200: 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c const char *pval
7210: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d = sqlite3_colum
7220: 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 28 73 74 n_origin_name(st
7230: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 mt, iCol);.. if
7240: 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 (plen) *plen =
7250: 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 pval ? strlen(pv
7260: 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 al) : 0;.. retu
7270: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 rn pval;..}....S
7280: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 QLITE_API const
7290: 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 71 void * WINAPI sq
72a0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 lite3_column_ori
72b0: 67 69 6e 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 gin_name16_inter
72c0: 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 op(sqlite3_stmt
72d0: 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c *stmt, int iCol,
72e0: 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a int *plen)..{..
72f0: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 const void *pv
7300: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c al = sqlite3_col
7310: 75 6d 6e 5f 6f 72 69 67 69 6e 5f 6e 61 6d 65 31 umn_origin_name1
7320: 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 6(stmt, iCol);..
7330: 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 if (plen) *ple
7340: 6e 20 3d 20 70 76 61 6c 20 3f 20 77 63 73 6c 65 n = pval ? wcsle
7350: 6e 28 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 n((wchar_t *)pva
7360: 6c 29 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 l) * sizeof(wcha
7370: 72 5f 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 r_t) : 0;.. ret
7380: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a urn pval;..}....
7390: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 SQLITE_API int W
73a0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 74 61 INAPI sqlite3_ta
73b0: 62 6c 65 5f 63 6f 6c 75 6d 6e 5f 6d 65 74 61 64 ble_column_metad
73c0: 61 74 61 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ata_interop(sqli
73d0: 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 te3 *db, const c
73e0: 68 61 72 20 2a 7a 44 62 4e 61 6d 65 2c 20 63 6f har *zDbName, co
73f0: 6e 73 74 20 63 68 61 72 20 2a 7a 54 61 62 6c 65 nst char *zTable
7400: 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 Name, const char
7410: 20 2a 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 63 *zColumnName, c
7420: 68 61 72 20 63 6f 6e 73 74 20 2a 2a 70 7a 44 61 har const **pzDa
7430: 74 61 54 79 70 65 2c 20 63 68 61 72 20 63 6f 6e taType, char con
7440: 73 74 20 2a 2a 70 7a 43 6f 6c 6c 53 65 71 2c 20 st **pzCollSeq,
7450: 69 6e 74 20 2a 70 4e 6f 74 4e 75 6c 6c 2c 20 69 int *pNotNull, i
7460: 6e 74 20 2a 70 50 72 69 6d 61 72 79 4b 65 79 2c nt *pPrimaryKey,
7470: 20 69 6e 74 20 2a 70 41 75 74 6f 69 6e 63 2c 20 int *pAutoinc,
7480: 69 6e 74 20 2a 70 64 74 4c 65 6e 2c 20 69 6e 74 int *pdtLen, int
7490: 20 2a 70 63 73 4c 65 6e 29 0d 0a 7b 0d 0a 20 20 *pcsLen)..{..
74a0: 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 6e 20 3d 20 int n;.... n =
74b0: 73 71 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63 6f sqlite3_table_co
74c0: 6c 75 6d 6e 5f 6d 65 74 61 64 61 74 61 28 64 62 lumn_metadata(db
74d0: 2c 20 7a 44 62 4e 61 6d 65 2c 20 7a 54 61 62 6c , zDbName, zTabl
74e0: 65 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d 6e 4e 61 eName, zColumnNa
74f0: 6d 65 2c 20 70 7a 44 61 74 61 54 79 70 65 2c 20 me, pzDataType,
7500: 70 7a 43 6f 6c 6c 53 65 71 2c 20 70 4e 6f 74 4e pzCollSeq, pNotN
7510: 75 6c 6c 2c 20 70 50 72 69 6d 61 72 79 4b 65 79 ull, pPrimaryKey
7520: 2c 20 70 41 75 74 6f 69 6e 63 29 3b 0d 0a 0d 0a , pAutoinc);....
7530: 20 20 69 66 20 28 70 64 74 4c 65 6e 29 20 2a 70 if (pdtLen) *p
7540: 64 74 4c 65 6e 20 3d 20 28 70 7a 44 61 74 61 54 dtLen = (pzDataT
7550: 79 70 65 20 26 26 20 2a 70 7a 44 61 74 61 54 79 ype && *pzDataTy
7560: 70 65 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a pe) ? strlen(*pz
7570: 44 61 74 61 54 79 70 65 29 20 3a 20 30 3b 0d 0a DataType) : 0;..
7580: 20 20 69 66 20 28 70 63 73 4c 65 6e 29 20 2a 70 if (pcsLen) *p
7590: 63 73 4c 65 6e 20 3d 20 28 70 7a 43 6f 6c 6c 53 csLen = (pzCollS
75a0: 65 71 20 26 26 20 2a 70 7a 43 6f 6c 6c 53 65 71 eq && *pzCollSeq
75b0: 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f ) ? strlen(*pzCo
75c0: 6c 6c 53 65 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20 llSeq) : 0;....
75d0: 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d return n;..}...
75e0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 .SQLITE_API int
75f0: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 69 WINAPI sqlite3_i
7600: 6e 64 65 78 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f ndex_column_info
7610: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
7620: 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 *db, const char
7630: 20 2a 7a 44 62 2c 20 63 6f 6e 73 74 20 63 68 61 *zDb, const cha
7640: 72 20 2a 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 63 r *zIndexName, c
7650: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75 onst char *zColu
7660: 6d 6e 4e 61 6d 65 2c 20 69 6e 74 20 2a 73 6f 72 mnName, int *sor
7670: 74 4f 72 64 65 72 2c 20 69 6e 74 20 2a 6f 6e 45 tOrder, int *onE
7680: 72 72 6f 72 2c 20 63 6f 6e 73 74 20 63 68 61 72 rror, const char
7690: 20 2a 2a 70 7a 43 6f 6c 6c 2c 20 69 6e 74 20 2a **pzColl, int *
76a0: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 49 6e 64 65 plen)..{.. Inde
76b0: 78 20 2a 70 49 64 78 3b 0d 0a 20 20 54 61 62 6c x *pIdx;.. Tabl
76c0: 65 20 2a 70 54 61 62 3b 0d 0a 20 20 69 6e 74 20 e *pTab;.. int
76d0: 6e 3b 0d 0a 0d 0a 20 20 69 66 20 28 21 64 62 29 n;.... if (!db)
76e0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 return SQLITE_E
76f0: 52 52 4f 52 3b 0d 0a 20 20 73 71 6c 69 74 65 33 RROR;.. sqlite3
7700: 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d _mutex_enter(db-
7710: 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 73 71 6c 69 >mutex);.. sqli
7720: 74 65 33 42 74 72 65 65 45 6e 74 65 72 41 6c 6c te3BtreeEnterAll
7730: 28 64 62 29 3b 0d 0a 0d 0a 20 20 70 49 64 78 20 (db);.... pIdx
7740: 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 49 6e 64 = sqlite3FindInd
7750: 65 78 28 64 62 2c 20 7a 49 6e 64 65 78 4e 61 6d ex(db, zIndexNam
7760: 65 2c 20 7a 44 62 29 3b 0d 0a 0d 0a 20 20 73 71 e, zDb);.... sq
7770: 6c 69 74 65 33 42 74 72 65 65 4c 65 61 76 65 41 lite3BtreeLeaveA
7780: 6c 6c 28 64 62 29 3b 0d 0a 20 20 73 71 6c 69 74 ll(db);.. sqlit
7790: 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 e3_mutex_leave(d
77a0: 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 b->mutex);....
77b0: 69 66 20 28 21 70 49 64 78 29 20 72 65 74 75 72 if (!pIdx) retur
77c0: 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d n SQLITE_ERROR;.
77d0: 0a 0d 0a 20 20 70 54 61 62 20 3d 20 70 49 64 78 ... pTab = pIdx
77e0: 2d 3e 70 54 61 62 6c 65 3b 0d 0a 20 20 66 6f 72 ->pTable;.. for
77f0: 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 70 49 64 (n = 0; n < pId
7800: 78 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20 6e 2b 2b 29 x->nColumn; n++)
7810: 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 6e 74 20 63 .. {.. int c
7820: 6e 75 6d 20 3d 20 70 49 64 78 2d 3e 61 69 43 6f num = pIdx->aiCo
7830: 6c 75 6d 6e 5b 6e 5d 3b 0d 0a 20 20 20 20 69 66 lumn[n];.. if
7840: 20 28 73 71 6c 69 74 65 33 53 74 72 49 43 6d 70 (sqlite3StrICmp
7850: 28 70 54 61 62 2d 3e 61 43 6f 6c 5b 63 6e 75 6d (pTab->aCol[cnum
7860: 5d 2e 7a 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d 6e ].zName, zColumn
7870: 4e 61 6d 65 29 20 3d 3d 20 30 29 0d 0a 20 20 20 Name) == 0)..
7880: 20 7b 0d 0a 20 20 20 20 20 20 69 66 20 28 20 73 {.. if ( s
7890: 6f 72 74 4f 72 64 65 72 20 29 20 2a 73 6f 72 74 ortOrder ) *sort
78a0: 4f 72 64 65 72 20 3d 20 70 49 64 78 2d 3e 61 53 Order = pIdx->aS
78b0: 6f 72 74 4f 72 64 65 72 5b 6e 5d 3b 0d 0a 20 20 ortOrder[n];..
78c0: 20 20 20 20 69 66 20 28 20 70 7a 43 6f 6c 6c 20 if ( pzColl
78d0: 29 20 2a 70 7a 43 6f 6c 6c 20 3d 20 70 49 64 78 ) *pzColl = pIdx
78e0: 2d 3e 61 7a 43 6f 6c 6c 5b 6e 5d 3b 0d 0a 20 20 ->azColl[n];..
78f0: 20 20 20 20 69 66 20 28 20 70 6c 65 6e 20 29 20 if ( plen )
7900: 2a 70 6c 65 6e 20 3d 20 73 74 72 6c 65 6e 28 2a *plen = strlen(*
7910: 70 7a 43 6f 6c 6c 29 3b 0d 0a 20 20 20 20 20 20 pzColl);..
7920: 69 66 20 28 20 6f 6e 45 72 72 6f 72 20 29 20 2a if ( onError ) *
7930: 6f 6e 45 72 72 6f 72 20 3d 20 70 49 64 78 2d 3e onError = pIdx->
7940: 6f 6e 45 72 72 6f 72 3b 0d 0a 0d 0a 20 20 20 20 onError;....
7950: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f return SQLITE_
7960: 4f 4b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d OK;.. }.. }.
7970: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 . return SQLITE
7980: 5f 45 52 52 4f 52 3b 0d 0a 7d 0d 0a 0d 0a 53 51 _ERROR;..}....SQ
7990: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e LITE_API int WIN
79a0: 41 50 49 20 73 71 6c 69 74 65 33 5f 74 61 62 6c API sqlite3_tabl
79b0: 65 5f 63 75 72 73 6f 72 5f 69 6e 74 65 72 6f 70 e_cursor_interop
79c0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 (sqlite3_stmt *p
79d0: 73 74 6d 74 2c 20 69 6e 74 20 69 44 62 2c 20 50 stmt, int iDb, P
79e0: 67 6e 6f 20 74 61 62 6c 65 52 6f 6f 74 50 61 67 gno tableRootPag
79f0: 65 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20 2a 70 e)..{.. Vdbe *p
7a00: 20 3d 20 28 56 64 62 65 20 2a 29 70 73 74 6d 74 = (Vdbe *)pstmt
7a10: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 ;.. sqlite3 *db
7a20: 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29 20 3f = (p == NULL) ?
7a30: 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b 0d 0a NULL : p->db;..
7a40: 20 20 69 6e 74 20 6e 3b 0d 0a 20 20 69 6e 74 20 int n;.. int
7a50: 72 65 74 20 3d 20 2d 31 3b 20 2f 2a 20 4e 4f 54 ret = -1; /* NOT
7a60: 20 46 4f 55 4e 44 20 2a 2f 0d 0a 0d 0a 20 20 69 FOUND */.... i
7a70: 66 20 28 21 70 20 7c 7c 20 21 64 62 29 20 72 65 f (!p || !db) re
7a80: 74 75 72 6e 20 72 65 74 3b 0d 0a 20 20 73 71 6c turn ret;.. sql
7a90: 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72 ite3_mutex_enter
7aa0: 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 20 (db->mutex);..
7ab0: 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 for (n = 0; n <
7ac0: 70 2d 3e 6e 43 75 72 73 6f 72 20 26 26 20 70 2d p->nCursor && p-
7ad0: 3e 61 70 43 73 72 5b 6e 5d 20 21 3d 20 4e 55 4c >apCsr[n] != NUL
7ae0: 4c 3b 20 6e 2b 2b 29 0d 0a 20 20 7b 0d 0a 20 20 L; n++).. {..
7af0: 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e if (p->apCsr[n
7b00: 5d 2d 3e 69 73 54 61 62 6c 65 20 3d 3d 20 30 29 ]->isTable == 0)
7b10: 20 63 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 20 continue;..
7b20: 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d if (p->apCsr[n]-
7b30: 3e 69 44 62 20 21 3d 20 69 44 62 29 20 63 6f 6e >iDb != iDb) con
7b40: 74 69 6e 75 65 3b 0d 0a 23 69 66 20 53 51 4c 49 tinue;..#if SQLI
7b50: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
7b60: 52 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a 20 20 R >= 3010000..
7b70: 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 6e if (p->apCsr[n
7b80: 5d 2d 3e 75 63 2e 70 43 75 72 73 6f 72 2d 3e 70 ]->uc.pCursor->p
7b90: 67 6e 6f 52 6f 6f 74 20 3d 3d 20 74 61 62 6c 65 gnoRoot == table
7ba0: 52 6f 6f 74 50 61 67 65 29 0d 0a 23 65 6c 73 65 RootPage)..#else
7bb0: 0d 0a 20 20 20 20 69 66 20 28 70 2d 3e 61 70 43 .. if (p->apC
7bc0: 73 72 5b 6e 5d 2d 3e 70 43 75 72 73 6f 72 2d 3e sr[n]->pCursor->
7bd0: 70 67 6e 6f 52 6f 6f 74 20 3d 3d 20 74 61 62 6c pgnoRoot == tabl
7be0: 65 52 6f 6f 74 50 61 67 65 29 0d 0a 23 65 6e 64 eRootPage)..#end
7bf0: 69 66 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 if.. {..
7c00: 20 72 65 74 20 3d 20 6e 3b 0d 0a 20 20 20 20 20 ret = n;..
7c10: 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a break;.. }..
7c20: 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d }.. sqlite3_m
7c30: 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d utex_leave(db->m
7c40: 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 utex);.... retu
7c50: 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 rn ret;..}....SQ
7c60: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e LITE_API int WIN
7c70: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 75 72 73 API sqlite3_curs
7c80: 6f 72 5f 72 6f 77 69 64 5f 69 6e 74 65 72 6f 70 or_rowid_interop
7c90: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 (sqlite3_stmt *p
7ca0: 73 74 6d 74 2c 20 69 6e 74 20 63 75 72 73 6f 72 stmt, int cursor
7cb0: 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a , sqlite_int64 *
7cc0: 70 72 6f 77 69 64 29 0d 0a 7b 0d 0a 20 20 56 64 prowid)..{.. Vd
7cd0: 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 2a 29 be *p = (Vdbe *)
7ce0: 70 73 74 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 pstmt;.. sqlite
7cf0: 33 20 2a 64 62 20 3d 20 28 70 20 3d 3d 20 4e 55 3 *db = (p == NU
7d00: 4c 4c 29 20 3f 20 4e 55 4c 4c 20 3a 20 70 2d 3e LL) ? NULL : p->
7d10: 64 62 3b 0d 0a 20 20 56 64 62 65 43 75 72 73 6f db;.. VdbeCurso
7d20: 72 20 2a 70 43 3b 0d 0a 23 69 66 20 53 51 4c 49 r *pC;..#if SQLI
7d30: 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 TE_VERSION_NUMBE
7d40: 52 20 3e 3d 20 33 30 31 31 30 30 30 0d 0a 20 20 R >= 3011000..
7d50: 69 6e 74 20 70 32 20 3d 20 30 3b 0d 0a 23 65 6e int p2 = 0;..#en
7d60: 64 69 66 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d dif.. int ret =
7d70: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 SQLITE_OK;....
7d80: 20 69 66 20 28 21 70 20 7c 7c 20 21 64 62 29 20 if (!p || !db)
7d90: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 return SQLITE_ER
7da0: 52 4f 52 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f ROR;.. sqlite3_
7db0: 6d 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e mutex_enter(db->
7dc0: 6d 75 74 65 78 29 3b 0d 0a 20 20 77 68 69 6c 65 mutex);.. while
7dd0: 20 28 31 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 (1).. {.. i
7de0: 66 20 28 63 75 72 73 6f 72 20 3c 20 30 20 7c 7c f (cursor < 0 ||
7df0: 20 63 75 72 73 6f 72 20 3e 3d 20 70 2d 3e 6e 43 cursor >= p->nC
7e00: 75 72 73 6f 72 29 0d 0a 20 20 20 20 7b 0d 0a 20 ursor).. {..
7e10: 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 ret = SQLIT
7e20: 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 E_ERROR;..
7e30: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 break;.. }..
7e40: 20 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b if (p->apCsr[
7e50: 63 75 72 73 6f 72 5d 20 3d 3d 20 4e 55 4c 4c 29 cursor] == NULL)
7e60: 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 .. {.. r
7e70: 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f et = SQLITE_ERRO
7e80: 52 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b R;.. break;
7e90: 0d 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 70 .. }.... p
7ea0: 43 20 3d 20 70 2d 3e 61 70 43 73 72 5b 63 75 72 C = p->apCsr[cur
7eb0: 73 6f 72 5d 3b 0d 0a 0d 0a 23 69 66 20 53 51 4c sor];....#if SQL
7ec0: 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 ITE_VERSION_NUMB
7ed0: 45 52 20 3e 3d 20 33 30 31 31 30 30 30 0d 0a 20 ER >= 3011000..
7ee0: 20 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 ret = sqlite3
7ef0: 56 64 62 65 43 75 72 73 6f 72 4d 6f 76 65 74 6f VdbeCursorMoveto
7f00: 28 26 70 43 2c 20 26 70 32 29 3b 0d 0a 23 65 6c (&pC, &p2);..#el
7f10: 73 65 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 se.. ret = sq
7f20: 6c 69 74 65 33 56 64 62 65 43 75 72 73 6f 72 4d lite3VdbeCursorM
7f30: 6f 76 65 74 6f 28 70 43 29 3b 0d 0a 23 65 6e 64 oveto(pC);..#end
7f40: 69 66 0d 0a 20 20 20 20 69 66 28 72 65 74 29 0d if.. if(ret).
7f50: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 0d . break;...
7f60: 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 .#if SQLITE_VERS
7f70: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 30 30 ION_NUMBER < 300
7f80: 38 30 30 37 0d 0a 20 20 20 20 69 66 28 70 43 2d 8007.. if(pC-
7f90: 3e 72 6f 77 69 64 49 73 56 61 6c 69 64 29 0d 0a >rowidIsValid)..
7fa0: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 69 66 20 {.. if
7fb0: 28 70 72 6f 77 69 64 29 20 2a 70 72 6f 77 69 64 (prowid) *prowid
7fc0: 20 3d 20 70 43 2d 3e 6c 61 73 74 52 6f 77 69 64 = pC->lastRowid
7fd0: 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c ;.. }.. el
7fe0: 73 65 0d 0a 23 65 6e 64 69 66 0d 0a 23 69 66 20 se..#endif..#if
7ff0: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e SQLITE_VERSION_N
8000: 55 4d 42 45 52 20 3e 3d 20 33 30 31 30 30 30 30 UMBER >= 3010000
8010: 0d 0a 20 20 20 20 69 66 28 70 43 2d 3e 65 43 75 .. if(pC->eCu
8020: 72 54 79 70 65 20 21 3d 20 43 55 52 54 59 50 45 rType != CURTYPE
8030: 5f 42 54 52 45 45 29 0d 0a 23 65 6c 73 65 0d 0a _BTREE)..#else..
8040: 20 20 20 20 69 66 28 70 43 2d 3e 70 73 65 75 64 if(pC->pseud
8050: 6f 54 61 62 6c 65 52 65 67 20 3e 20 30 29 0d 0a oTableReg > 0)..
8060: 23 65 6e 64 69 66 0d 0a 20 20 20 20 7b 0d 0a 20 #endif.. {..
8070: 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 ret = SQLIT
8080: 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 E_ERROR;..
8090: 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 23 break;.. }..#
80a0: 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f if SQLITE_VERSIO
80b0: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 31 30 N_NUMBER >= 3010
80c0: 30 30 30 0d 0a 20 20 20 20 65 6c 73 65 20 69 66 000.. else if
80d0: 28 70 43 2d 3e 6e 75 6c 6c 52 6f 77 20 7c 7c 20 (pC->nullRow ||
80e0: 70 43 2d 3e 75 63 2e 70 43 75 72 73 6f 72 3d 3d pC->uc.pCursor==
80f0: 30 29 0d 0a 23 65 6c 73 65 0d 0a 20 20 20 20 65 0)..#else.. e
8100: 6c 73 65 20 69 66 28 70 43 2d 3e 6e 75 6c 6c 52 lse if(pC->nullR
8110: 6f 77 20 7c 7c 20 70 43 2d 3e 70 43 75 72 73 6f ow || pC->pCurso
8120: 72 3d 3d 30 29 0d 0a 23 65 6e 64 69 66 0d 0a 20 r==0)..#endif..
8130: 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 20 {.. ret
8140: 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d = SQLITE_ERROR;.
8150: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 . break;..
8160: 20 20 20 7d 0d 0a 20 20 20 20 65 6c 73 65 0d 0a }.. else..
8170: 20 20 20 20 7b 0d 0a 23 69 66 20 53 51 4c 49 54 {..#if SQLIT
8180: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
8190: 20 3e 3d 20 33 30 31 30 30 30 30 0d 0a 20 20 20 >= 3010000..
81a0: 20 20 20 69 66 20 28 70 43 2d 3e 75 63 2e 70 43 if (pC->uc.pC
81b0: 75 72 73 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d 0a ursor == NULL)..
81c0: 23 65 6c 73 65 0d 0a 20 20 20 20 20 20 69 66 20 #else.. if
81d0: 28 70 43 2d 3e 70 43 75 72 73 6f 72 20 3d 3d 20 (pC->pCursor ==
81e0: 4e 55 4c 4c 29 0d 0a 23 65 6e 64 69 66 0d 0a 20 NULL)..#endif..
81f0: 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 {..
8200: 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 ret = SQLITE_ERR
8210: 4f 52 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 65 OR;.. bre
8220: 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 23 69 ak;.. }..#i
8230: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e f SQLITE_VERSION
8240: 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 31 34 30 _NUMBER >= 30140
8250: 30 30 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 00.. sqlite
8260: 33 42 74 72 65 65 45 6e 74 65 72 43 75 72 73 6f 3BtreeEnterCurso
8270: 72 28 70 43 2d 3e 75 63 2e 70 43 75 72 73 6f 72 r(pC->uc.pCursor
8280: 29 3b 0d 0a 20 20 20 20 20 20 2a 70 72 6f 77 69 );.. *prowi
8290: 64 20 3d 20 73 71 6c 69 74 65 33 42 74 72 65 65 d = sqlite3Btree
82a0: 49 6e 74 65 67 65 72 4b 65 79 28 70 43 2d 3e 75 IntegerKey(pC->u
82b0: 63 2e 70 43 75 72 73 6f 72 29 3b 0d 0a 20 20 20 c.pCursor);..
82c0: 20 20 20 73 71 6c 69 74 65 33 42 74 72 65 65 4c sqlite3BtreeL
82d0: 65 61 76 65 43 75 72 73 6f 72 28 70 43 2d 3e 75 eaveCursor(pC->u
82e0: 63 2e 70 43 75 72 73 6f 72 29 3b 0d 0a 23 65 6c c.pCursor);..#el
82f0: 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f if SQLITE_VERSIO
8300: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 31 30 N_NUMBER >= 3010
8310: 30 30 30 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 000.. sqlit
8320: 65 33 42 74 72 65 65 4b 65 79 53 69 7a 65 28 70 e3BtreeKeySize(p
8330: 43 2d 3e 75 63 2e 70 43 75 72 73 6f 72 2c 20 70 C->uc.pCursor, p
8340: 72 6f 77 69 64 29 3b 0d 0a 23 65 6c 73 65 0d 0a rowid);..#else..
8350: 20 20 20 20 20 20 73 71 6c 69 74 65 33 42 74 72 sqlite3Btr
8360: 65 65 4b 65 79 53 69 7a 65 28 70 43 2d 3e 70 43 eeKeySize(pC->pC
8370: 75 72 73 6f 72 2c 20 70 72 6f 77 69 64 29 3b 0d ursor, prowid);.
8380: 0a 23 65 6e 64 69 66 0d 0a 20 20 20 20 20 20 69 .#endif.. i
8390: 66 20 28 70 72 6f 77 69 64 29 20 2a 70 72 6f 77 f (prowid) *prow
83a0: 69 64 20 3d 20 2a 70 72 6f 77 69 64 3b 0d 0a 20 id = *prowid;..
83b0: 20 20 20 7d 0d 0a 20 20 20 20 62 72 65 61 6b 3b }.. break;
83c0: 0d 0a 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 .. }.. sqlite3
83d0: 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d _mutex_leave(db-
83e0: 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 20 72 65 >mutex);.... re
83f0: 74 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a turn ret;..}....
8400: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /***************
8410: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
8420: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
8430: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
8440: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2f 0d **************/.
8450: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 53 ...#if defined(S
8460: 51 4c 49 54 45 5f 43 4f 52 45 29 0d 0a 23 75 6e QLITE_CORE)..#un
8470: 64 65 66 20 53 51 4c 49 54 45 5f 43 4f 52 45 0d def SQLITE_CORE.
8480: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 .#endif....#if d
8490: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 56 efined(INTEROP_V
84a0: 49 52 54 55 41 4c 5f 54 41 42 4c 45 29 20 26 26 IRTUAL_TABLE) &&
84b0: 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f SQLITE_VERSION_
84c0: 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 34 30 30 NUMBER >= 300400
84d0: 31 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 1..#include "../
84e0: 65 78 74 2f 76 74 73 68 69 6d 2e 63 22 0d 0a 23 ext/vtshim.c"..#
84f0: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 endif....#if def
8500: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 46 54 53 ined(INTEROP_FTS
8510: 35 5f 45 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 5_EXTENSION)..#i
8520: 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 66 nclude "../ext/f
8530: 74 73 35 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a ts5.c"..#endif..
8540: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
8550: 54 45 52 4f 50 5f 4a 53 4f 4e 31 5f 45 58 54 45 TEROP_JSON1_EXTE
8560: 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 65 NSION)..#include
8570: 20 22 2e 2e 2f 65 78 74 2f 6a 73 6f 6e 31 2e 63 "../ext/json1.c
8580: 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 "..#endif....#if
8590: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
85a0: 5f 50 45 52 43 45 4e 54 49 4c 45 5f 45 58 54 45 _PERCENTILE_EXTE
85b0: 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 65 NSION)..#include
85c0: 20 22 2e 2e 2f 65 78 74 2f 70 65 72 63 65 6e 74 "../ext/percent
85d0: 69 6c 65 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a ile.c"..#endif..
85e0: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
85f0: 54 45 52 4f 50 5f 52 45 47 45 58 50 5f 45 58 54 TEROP_REGEXP_EXT
8600: 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 ENSION)..#includ
8610: 65 20 22 2e 2e 2f 65 78 74 2f 72 65 67 65 78 70 e "../ext/regexp
8620: 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 .c"..#endif....#
8630: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
8640: 4f 50 5f 53 48 41 31 5f 45 58 54 45 4e 53 49 4f OP_SHA1_EXTENSIO
8650: 4e 29 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e N)..#include "..
8660: 2f 65 78 74 2f 73 68 61 31 2e 63 22 0d 0a 23 65 /ext/sha1.c"..#e
8670: 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 ndif....#if defi
8680: 6e 65 64 28 49 4e 54 45 52 4f 50 5f 54 4f 54 59 ned(INTEROP_TOTY
8690: 50 45 5f 45 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 PE_EXTENSION)..#
86a0: 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f include "../ext/
86b0: 74 6f 74 79 70 65 2e 63 22 0d 0a 23 65 6e 64 69 totype.c"..#endi
86c0: 66 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a f..../**********
86d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
86e0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
86f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
8700: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
8710: 2a 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 ***/..../*..** T
8720: 68 65 20 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f he INTEROP_TEST_
8730: 45 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63 6b 20 EXTENSION block
8740: 6d 75 73 74 20 62 65 20 61 74 20 74 68 65 20 65 must be at the e
8750: 6e 64 20 6f 66 20 74 68 69 73 20 73 6f 75 72 63 nd of this sourc
8760: 65 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63 61 75 e file..** becau
8770: 73 65 20 69 74 20 69 6e 63 6c 75 64 65 73 20 74 se it includes t
8780: 68 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e 68 he "sqlite3ext.h
8790: 22 20 66 69 6c 65 2c 20 77 68 69 63 68 20 64 65 " file, which de
87a0: 66 69 6e 65 73 20 74 68 65 20 73 71 6c 69 74 65 fines the sqlite
87b0: 33 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41 50 49 3..** public API
87c0: 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 20 function names
87d0: 74 6f 20 62 65 20 6d 61 63 72 6f 73 20 61 6e 64 to be macros and
87e0: 20 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75 73 that would caus
87f0: 65 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a 20 61 e the code..** a
8800: 62 6f 76 65 20 74 68 69 73 20 70 6f 69 6e 74 20 bove this point
8810: 74 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e 2e 0d to malfunction..
8820: 0a 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 .*/..#if defined
8830: 28 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45 58 (INTEROP_TEST_EX
8840: 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 66 20 21 53 TENSION)..#if !S
8850: 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 0d 0a 23 69 QLITE_OS_WIN..#i
8860: 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68 nclude <unistd.h
8870: 3e 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 6e >..#endif....#in
8880: 63 6c 75 64 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 clude "../core/s
8890: 71 6c 69 74 65 33 65 78 74 2e 68 22 0d 0a 53 51 qlite3ext.h"..SQ
88a0: 4c 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 LITE_EXTENSION_I
88b0: 4e 49 54 31 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 NIT1..../*..** T
88c0: 68 65 20 69 6e 74 65 72 6f 70 45 72 72 6f 72 28 he interopError(
88d0: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 74 ) SQL function t
88e0: 72 65 61 74 73 20 69 74 73 20 66 69 72 73 74 20 reats its first
88f0: 61 72 67 75 6d 65 6e 74 20 61 73 20 61 6e 20 69 argument as an i
8900: 6e 74 65 67 65 72 0d 0a 2a 2a 20 65 72 72 6f 72 nteger..** error
8910: 20 63 6f 64 65 20 74 6f 20 72 65 74 75 72 6e 2e code to return.
8920: 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 50 52 49 ..*/..SQLITE_PRI
8930: 56 41 54 45 20 76 6f 69 64 20 69 6e 74 65 72 6f VATE void intero
8940: 70 45 72 72 6f 72 46 75 6e 63 28 0d 0a 20 20 73 pErrorFunc(.. s
8950: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a qlite3_context *
8960: 63 6f 6e 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20 context,.. int
8970: 61 72 67 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33 argc,.. sqlite3
8980: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29 _value **argv..)
8990: 7b 0d 0a 20 20 69 6e 74 20 72 63 3b 0d 0a 20 20 {.. int rc;..
89a0: 69 66 28 20 61 72 67 63 21 3d 31 20 29 7b 0d 0a if( argc!=1 ){..
89b0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 sqlite3_resu
89c0: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 lt_error(context
89d0: 2c 20 22 6e 65 65 64 20 65 78 61 63 74 6c 79 20 , "need exactly
89e0: 6f 6e 65 20 61 72 67 75 6d 65 6e 74 22 2c 20 2d one argument", -
89f0: 31 29 3b 0d 0a 20 20 20 20 72 65 74 75 72 6e 3b 1);.. return;
8a00: 0d 0a 20 20 7d 0d 0a 20 20 72 63 20 3d 20 73 71 .. }.. rc = sq
8a10: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 lite3_value_int(
8a20: 61 72 67 76 5b 30 5d 29 3b 0d 0a 20 20 73 71 6c argv[0]);.. sql
8a30: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f ite3_result_erro
8a40: 72 5f 63 6f 64 65 28 63 6f 6e 74 65 78 74 2c 20 r_code(context,
8a50: 72 63 29 3b 0d 0a 7d 0d 0a 0d 0a 2f 2a 0d 0a 2a rc);..}..../*..*
8a60: 2a 20 54 68 65 20 69 6e 74 65 72 6f 70 54 65 73 * The interopTes
8a70: 74 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e t() SQL function
8a80: 20 72 65 74 75 72 6e 73 20 69 74 73 20 66 69 72 returns its fir
8a90: 73 74 20 61 72 67 75 6d 65 6e 74 20 6f 72 20 72 st argument or r
8aa0: 61 69 73 65 73 20 61 6e 0d 0a 2a 2a 20 65 72 72 aises an..** err
8ab0: 6f 72 20 69 66 20 74 68 65 72 65 20 61 72 65 20 or if there are
8ac0: 6e 6f 74 20 65 6e 6f 75 67 68 20 61 72 67 75 6d not enough argum
8ad0: 65 6e 74 73 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 54 ents...*/..SQLIT
8ae0: 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 69 E_PRIVATE void i
8af0: 6e 74 65 72 6f 70 54 65 73 74 46 75 6e 63 28 0d nteropTestFunc(.
8b00: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 . sqlite3_conte
8b10: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0d 0a 20 20 xt *context,..
8b20: 69 6e 74 20 61 72 67 63 2c 0d 0a 20 20 73 71 6c int argc,.. sql
8b30: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 ite3_value **arg
8b40: 76 0d 0a 29 7b 0d 0a 20 20 63 6f 6e 73 74 20 75 v..){.. const u
8b50: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b nsigned char *z;
8b60: 0d 0a 20 20 69 66 28 20 61 72 67 63 21 3d 31 20 .. if( argc!=1
8b70: 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f ){.. sqlite3_
8b80: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e result_error(con
8b90: 74 65 78 74 2c 20 22 6e 65 65 64 20 65 78 61 63 text, "need exac
8ba0: 74 6c 79 20 6f 6e 65 20 61 72 67 75 6d 65 6e 74 tly one argument
8bb0: 22 2c 20 2d 31 29 3b 0d 0a 20 20 20 20 72 65 74 ", -1);.. ret
8bc0: 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20 20 7a 20 3d urn;.. }.. z =
8bd0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 sqlite3_value_t
8be0: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0d 0a 20 ext(argv[0]);..
8bf0: 20 69 66 28 20 7a 20 29 7b 0d 0a 20 20 20 20 73 if( z ){.. s
8c00: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 qlite3_result_te
8c10: 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 xt(context, (cha
8c20: 72 2a 29 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 45 r*)z, -1, SQLITE
8c30: 5f 53 54 41 54 49 43 29 3b 0d 0a 20 20 7d 65 6c _STATIC);.. }el
8c40: 73 65 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 se{.. sqlite3
8c50: 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e _result_null(con
8c60: 74 65 78 74 29 3b 0d 0a 20 20 7d 0d 0a 7d 0d 0a text);.. }..}..
8c70: 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 65 20 69 6e 74 ../*..** The int
8c80: 65 72 6f 70 53 6c 65 65 70 28 29 20 53 51 4c 20 eropSleep() SQL
8c90: 66 75 6e 63 74 69 6f 6e 20 77 61 69 74 73 20 74 function waits t
8ca0: 68 65 20 73 70 65 63 69 66 69 65 64 20 6e 75 6d he specified num
8cb0: 62 65 72 20 6f 66 20 6d 69 6c 6c 69 73 65 63 6f ber of milliseco
8cc0: 6e 64 73 0d 0a 2a 2a 20 6f 72 20 72 61 69 73 65 nds..** or raise
8cd0: 73 20 61 6e 20 65 72 72 6f 72 20 69 66 20 74 68 s an error if th
8ce0: 65 72 65 20 61 72 65 20 6e 6f 74 20 65 6e 6f 75 ere are not enou
8cf0: 67 68 20 61 72 67 75 6d 65 6e 74 73 2e 0d 0a 2a gh arguments...*
8d00: 2f 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 /..SQLITE_PRIVAT
8d10: 45 20 76 6f 69 64 20 69 6e 74 65 72 6f 70 53 6c E void interopSl
8d20: 65 65 70 46 75 6e 63 28 0d 0a 20 20 73 71 6c 69 eepFunc(.. sqli
8d30: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e te3_context *con
8d40: 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20 61 72 67 text,.. int arg
8d50: 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 c,.. sqlite3_va
8d60: 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29 7b 0d 0a lue **argv..){..
8d70: 20 20 69 6e 74 20 6d 3b 0d 0a 20 20 69 66 28 20 int m;.. if(
8d80: 61 72 67 63 21 3d 31 20 29 7b 0d 0a 20 20 20 20 argc!=1 ){..
8d90: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 sqlite3_result_e
8da0: 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 6e rror(context, "n
8db0: 65 65 64 20 65 78 61 63 74 6c 79 20 6f 6e 65 20 eed exactly one
8dc0: 61 72 67 75 6d 65 6e 74 22 2c 20 2d 31 29 3b 0d argument", -1);.
8dd0: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0d 0a 20 20 . return;..
8de0: 7d 0d 0a 20 20 6d 20 3d 20 73 71 6c 69 74 65 33 }.. m = sqlite3
8df0: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b _value_int(argv[
8e00: 30 5d 29 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 0]);..#if SQLITE
8e10: 5f 4f 53 5f 57 49 4e 0d 0a 23 69 66 20 53 51 4c _OS_WIN..#if SQL
8e20: 49 54 45 5f 4f 53 5f 57 49 4e 43 45 0d 0a 20 20 ITE_OS_WINCE..
8e30: 53 6c 65 65 70 28 6d 29 3b 0d 0a 20 20 73 71 6c Sleep(m);.. sql
8e40: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 ite3_result_int(
8e50: 63 6f 6e 74 65 78 74 2c 20 57 41 49 54 5f 4f 42 context, WAIT_OB
8e60: 4a 45 43 54 5f 30 29 3b 0d 0a 23 65 6c 73 65 0d JECT_0);..#else.
8e70: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c . sqlite3_resul
8e80: 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 53 t_int(context, S
8e90: 6c 65 65 70 45 78 28 6d 2c 20 54 52 55 45 29 29 leepEx(m, TRUE))
8ea0: 3b 0d 0a 23 65 6e 64 69 66 0d 0a 23 65 6c 73 65 ;..#endif..#else
8eb0: 0d 0a 20 20 69 66 28 20 6d 3e 30 20 29 7b 0d 0a .. if( m>0 ){..
8ec0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 sqlite3_resu
8ed0: 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 lt_int64(context
8ee0: 2c 20 73 6c 65 65 70 28 28 75 6e 73 69 67 6e 65 , sleep((unsigne
8ef0: 64 29 6d 29 29 3b 0d 0a 20 20 7d 65 6c 73 65 7b d)m));.. }else{
8f00: 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 .. sqlite3_re
8f10: 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78 sult_null(contex
8f20: 74 29 3b 0d 0a 20 20 7d 0d 0a 23 65 6e 64 69 66 t);.. }..#endif
8f30: 0d 0a 7d 0d 0a 0d 0a 2f 2a 20 53 51 4c 69 74 65 ..}..../* SQLite
8f40: 20 69 6e 76 6f 6b 65 73 20 74 68 69 73 20 72 6f invokes this ro
8f50: 75 74 69 6e 65 20 6f 6e 63 65 20 77 68 65 6e 20 utine once when
8f60: 69 74 20 6c 6f 61 64 73 20 74 68 65 20 65 78 74 it loads the ext
8f70: 65 6e 73 69 6f 6e 2e 0d 0a 2a 2a 20 43 72 65 61 ension...** Crea
8f80: 74 65 20 6e 65 77 20 66 75 6e 63 74 69 6f 6e 73 te new functions
8f90: 2c 20 63 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75 , collating sequ
8fa0: 65 6e 63 65 73 2c 20 61 6e 64 20 76 69 72 74 75 ences, and virtu
8fb0: 61 6c 20 74 61 62 6c 65 0d 0a 2a 2a 20 6d 6f 64 al table..** mod
8fc0: 75 6c 65 73 20 68 65 72 65 2e 20 20 54 68 69 73 ules here. This
8fd0: 20 69 73 20 75 73 75 61 6c 6c 79 20 74 68 65 20 is usually the
8fe0: 6f 6e 6c 79 20 65 78 70 6f 72 74 65 64 20 73 79 only exported sy
8ff0: 6d 62 6f 6c 20 69 6e 0d 0a 2a 2a 20 74 68 65 20 mbol in..** the
9000: 73 68 61 72 65 64 20 6c 69 62 72 61 72 79 2e 0d shared library..
9010: 0a 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 .*/..SQLITE_API
9020: 69 6e 74 20 69 6e 74 65 72 6f 70 5f 74 65 73 74 int interop_test
9030: 5f 65 78 74 65 6e 73 69 6f 6e 5f 69 6e 69 74 28 _extension_init(
9040: 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c .. sqlite3 *db,
9050: 0d 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 72 .. char **pzErr
9060: 4d 73 67 2c 0d 0a 20 20 63 6f 6e 73 74 20 73 71 Msg,.. const sq
9070: 6c 69 74 65 33 5f 61 70 69 5f 72 6f 75 74 69 6e lite3_api_routin
9080: 65 73 20 2a 70 41 70 69 0d 0a 29 7b 0d 0a 20 20 es *pApi..){..
9090: 69 6e 74 20 72 63 3b 0d 0a 20 20 53 51 4c 49 54 int rc;.. SQLIT
90a0: 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49 54 E_EXTENSION_INIT
90b0: 32 28 70 41 70 69 29 0d 0a 20 20 72 63 20 3d 20 2(pApi).. rc =
90c0: 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 sqlite3_create_f
90d0: 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e 74 unction(db, "int
90e0: 65 72 6f 70 45 72 72 6f 72 22 2c 20 2d 31 2c 20 eropError", -1,
90f0: 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a SQLITE_ANY, 0,..
9100: 20 20 20 20 20 20 69 6e 74 65 72 6f 70 45 72 72 interopErr
9110: 6f 72 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d 0a orFunc, 0, 0);..
9120: 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 if( rc==SQLITE
9130: 5f 4f 4b 20 29 7b 0d 0a 20 20 20 20 72 63 20 3d _OK ){.. rc =
9140: 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f sqlite3_create_
9150: 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e function(db, "in
9160: 74 65 72 6f 70 54 65 73 74 22 2c 20 2d 31 2c 20 teropTest", -1,
9170: 53 51 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a SQLITE_ANY, 0,..
9180: 20 20 20 20 20 20 20 20 69 6e 74 65 72 6f 70 54 interopT
9190: 65 73 74 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d estFunc, 0, 0);.
91a0: 0a 20 20 7d 0d 0a 20 20 69 66 28 20 72 63 3d 3d . }.. if( rc==
91b0: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a 20 20 SQLITE_OK ){..
91c0: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 63 rc = sqlite3_c
91d0: 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64 reate_function(d
91e0: 62 2c 20 22 69 6e 74 65 72 6f 70 53 6c 65 65 70 b, "interopSleep
91f0: 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f 41 4e 59 ", 1, SQLITE_ANY
9200: 2c 20 30 2c 0d 0a 20 20 20 20 20 20 20 20 69 6e , 0,.. in
9210: 74 65 72 6f 70 53 6c 65 65 70 46 75 6e 63 2c 20 teropSleepFunc,
9220: 30 2c 20 30 29 3b 0d 0a 20 20 7d 0d 0a 20 20 72 0, 0);.. }.. r
9230: 65 74 75 72 6e 20 72 63 3b 0d 0a 7d 0d 0a 23 65 eturn rc;..}..#e
9240: 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f ndif /* SQLITE_O
9250: 53 5f 57 49 4e 20 2a 2f 0d 0a S_WIN */..