0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 2a 20 41 44 *********.. * AD
0040: 4f 2e 4e 45 54 20 32 2e 30 20 44 61 74 61 20 50 O.NET 2.0 Data P
0050: 72 6f 76 69 64 65 72 20 66 6f 72 20 53 51 4c 69 rovider for SQLi
0060: 74 65 20 56 65 72 73 69 6f 6e 20 33 2e 58 0d 0a te Version 3.X..
0070: 20 2a 20 57 72 69 74 74 65 6e 20 62 79 20 52 6f * Written by Ro
0080: 62 65 72 74 20 53 69 6d 70 73 6f 6e 20 28 72 6f bert Simpson (ro
0090: 62 65 72 74 40 62 6c 61 63 6b 63 61 73 74 6c 65 bert@blackcastle
00a0: 73 6f 66 74 2e 63 6f 6d 29 0d 0a 20 2a 0d 0a 20 soft.com).. *..
00b0: 2a 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74 68 * Released to th
00c0: 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e 2c e public domain,
00d0: 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77 6e use at your own
00e0: 20 72 69 73 6b 21 0d 0a 20 2a 2a 2a 2a 2a 2a 2a risk!.. *******
00f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0100: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0110: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0120: 2a 2f 0d 0a 0d 0a 23 64 65 66 69 6e 65 20 53 51 */....#define SQ
0130: 4c 49 54 45 5f 41 50 49 20 5f 5f 64 65 63 6c 73 LITE_API __decls
0140: 70 65 63 28 64 6c 6c 65 78 70 6f 72 74 29 0d 0a pec(dllexport)..
0150: 0d 0a 23 69 6e 63 6c 75 64 65 20 22 2e 2e 2f 63 ..#include "../c
0160: 6f 72 65 2f 73 71 6c 69 74 65 33 2e 63 22 0d 0a ore/sqlite3.c"..
0170: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
0180: 54 45 52 4f 50 5f 56 49 52 54 55 41 4c 5f 54 41 TEROP_VIRTUAL_TA
0190: 42 4c 45 29 20 26 26 20 53 51 4c 49 54 45 5f 56 BLE) && SQLITE_V
01a0: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d ERSION_NUMBER >=
01b0: 20 33 30 30 34 30 30 31 0d 0a 23 69 6e 63 6c 75 3004001..#inclu
01c0: 64 65 20 22 2e 2e 2f 65 78 74 2f 76 74 73 68 69 de "../ext/vtshi
01d0: 6d 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a m.c"..#endif....
01e0: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
01f0: 52 4f 50 5f 50 45 52 43 45 4e 54 49 4c 45 5f 45 ROP_PERCENTILE_E
0200: 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c XTENSION)..#incl
0210: 75 64 65 20 22 2e 2e 2f 65 78 74 2f 70 65 72 63 ude "../ext/perc
0220: 65 6e 74 69 6c 65 2e 63 22 0d 0a 23 65 6e 64 69 entile.c"..#endi
0230: 66 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 f....#if defined
0240: 28 49 4e 54 45 52 4f 50 5f 54 4f 54 59 50 45 5f (INTEROP_TOTYPE_
0250: 45 58 54 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 EXTENSION)..#inc
0260: 6c 75 64 65 20 22 2e 2e 2f 65 78 74 2f 74 6f 74 lude "../ext/tot
0270: 79 70 65 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a ype.c"..#endif..
0280: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
0290: 54 45 52 4f 50 5f 52 45 47 45 58 50 5f 45 58 54 TEROP_REGEXP_EXT
02a0: 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 ENSION)..#includ
02b0: 65 20 22 2e 2e 2f 65 78 74 2f 72 65 67 65 78 70 e "../ext/regexp
02c0: 2e 63 22 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 .c"..#endif....#
02d0: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
02e0: 4f 50 5f 45 58 54 45 4e 53 49 4f 4e 5f 46 55 4e OP_EXTENSION_FUN
02f0: 43 54 49 4f 4e 53 29 0d 0a 23 69 6e 63 6c 75 64 CTIONS)..#includ
0300: 65 20 22 2e 2e 2f 63 6f 6e 74 72 69 62 2f 65 78 e "../contrib/ex
0310: 74 65 6e 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e tension-function
0320: 73 2e 63 22 0d 0a 65 78 74 65 72 6e 20 69 6e 74 s.c"..extern int
0330: 20 52 65 67 69 73 74 65 72 45 78 74 65 6e 73 69 RegisterExtensi
0340: 6f 6e 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 onFunctions(sqli
0350: 74 65 33 20 2a 64 62 29 3b 0d 0a 23 65 6e 64 69 te3 *db);..#endi
0360: 66 0d 0a 0d 0a 23 69 66 64 65 66 20 53 51 4c 49 f....#ifdef SQLI
0370: 54 45 5f 4f 53 5f 57 49 4e 0d 0a 23 69 66 20 64 TE_OS_WIN..#if d
0380: 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 43 efined(INTEROP_C
0390: 4f 44 45 43 29 0d 0a 23 69 6e 63 6c 75 64 65 20 ODEC)..#include
03a0: 22 63 72 79 70 74 2e 63 22 0d 0a 23 65 6e 64 69 "crypt.c"..#endi
03b0: 66 0d 0a 0d 0a 23 69 6e 63 6c 75 64 65 20 22 69 f....#include "i
03c0: 6e 74 65 72 6f 70 2e 68 22 0d 0a 0d 0a 23 64 65 nterop.h"....#de
03d0: 66 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 fine INTEROP_DEB
03e0: 55 47 5f 4e 4f 4e 45 20 20 20 20 20 20 20 20 20 UG_NONE
03f0: 20 20 28 30 78 30 30 30 30 29 0d 0a 23 64 65 66 (0x0000)..#def
0400: 69 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 ine INTEROP_DEBU
0410: 47 5f 43 4c 4f 53 45 20 20 20 20 20 20 20 20 20 G_CLOSE
0420: 20 28 30 78 30 30 30 31 29 0d 0a 23 64 65 66 69 (0x0001)..#defi
0430: 6e 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 ne INTEROP_DEBUG
0440: 5f 46 49 4e 41 4c 49 5a 45 20 20 20 20 20 20 20 _FINALIZE
0450: 28 30 78 30 30 30 32 29 0d 0a 23 64 65 66 69 6e (0x0002)..#defin
0460: 65 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f e INTEROP_DEBUG_
0470: 42 41 43 4b 55 50 5f 46 49 4e 49 53 48 20 20 28 BACKUP_FINISH (
0480: 30 78 30 30 30 34 29 0d 0a 23 64 65 66 69 6e 65 0x0004)..#define
0490: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f INTEROP_DEBUG_O
04a0: 50 45 4e 20 20 20 20 20 20 20 20 20 20 20 28 30 PEN (0
04b0: 78 30 30 30 38 29 0d 0a 23 64 65 66 69 6e 65 20 x0008)..#define
04c0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 INTEROP_DEBUG_OP
04d0: 45 4e 31 36 20 20 20 20 20 20 20 20 20 28 30 78 EN16 (0x
04e0: 30 30 31 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 0010)..#define I
04f0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 NTEROP_DEBUG_PRE
0500: 50 41 52 45 20 20 20 20 20 20 20 20 28 30 78 30 PARE (0x0
0510: 30 32 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 020)..#define IN
0520: 54 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 TEROP_DEBUG_PREP
0530: 41 52 45 31 36 20 20 20 20 20 20 28 30 78 30 30 ARE16 (0x00
0540: 34 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 40)..#define INT
0550: 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 53 45 54 EROP_DEBUG_RESET
0560: 20 20 20 20 20 20 20 20 20 20 28 30 78 30 30 38 (0x008
0570: 30 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 0)..#define INTE
0580: 52 4f 50 5f 44 45 42 55 47 5f 43 48 41 4e 47 45 ROP_DEBUG_CHANGE
0590: 53 20 20 20 20 20 20 20 20 28 30 78 30 31 30 30 S (0x0100
05a0: 29 0d 0a 23 64 65 66 69 6e 65 20 49 4e 54 45 52 )..#define INTER
05b0: 4f 50 5f 44 45 42 55 47 5f 42 52 45 41 4b 20 20 OP_DEBUG_BREAK
05c0: 20 20 20 20 20 20 20 20 28 30 78 30 32 30 30 29 (0x0200)
05d0: 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 ....#if defined(
05e0: 5f 4d 53 43 5f 56 45 52 29 20 26 26 20 64 65 66 _MSC_VER) && def
05f0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 ined(INTEROP_DEB
0600: 55 47 29 20 26 26 20 5c 0d 0a 20 20 20 20 28 49 UG) && \.. (I
0610: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 NTEROP_DEBUG & I
0620: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 52 45 NTEROP_DEBUG_BRE
0630: 41 4b 29 0d 0a 23 64 65 66 69 6e 65 20 73 71 6c AK)..#define sql
0640: 69 74 65 33 49 6e 74 65 72 6f 70 42 72 65 61 6b ite3InteropBreak
0650: 28 61 29 20 7b 20 73 71 6c 69 74 65 33 49 6e 74 (a) { sqlite3Int
0660: 65 72 6f 70 44 65 62 75 67 28 22 25 73 5c 6e 22 eropDebug("%s\n"
0670: 2c 20 28 61 29 29 3b 20 5f 5f 64 65 62 75 67 62 , (a)); __debugb
0680: 72 65 61 6b 28 29 3b 20 7d 0d 0a 23 65 6c 73 65 reak(); }..#else
0690: 0d 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 74 65 ..#define sqlite
06a0: 33 49 6e 74 65 72 6f 70 42 72 65 61 6b 28 61 29 3InteropBreak(a)
06b0: 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 74 79 70 65 ..#endif....type
06c0: 64 65 66 20 76 6f 69 64 20 28 2a 53 51 4c 49 54 def void (*SQLIT
06d0: 45 55 53 45 52 46 55 4e 43 29 28 73 71 6c 69 74 EUSERFUNC)(sqlit
06e0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 2c 20 69 6e e3_context *, in
06f0: 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 t, sqlite3_value
0700: 20 2a 2a 29 3b 0d 0a 74 79 70 65 64 65 66 20 76 **);..typedef v
0710: 6f 69 64 20 28 2a 53 51 4c 49 54 45 46 55 4e 43 oid (*SQLITEFUNC
0720: 46 49 4e 41 4c 29 28 73 71 6c 69 74 65 33 5f 63 FINAL)(sqlite3_c
0730: 6f 6e 74 65 78 74 20 2a 29 3b 0d 0a 0d 0a 2f 2a ontext *);..../*
0740: 0a 2a 2a 20 41 6e 20 61 72 72 61 79 20 6f 66 20 .** An array of
0750: 6e 61 6d 65 73 20 6f 66 20 61 6c 6c 20 63 6f 6d names of all com
0760: 70 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e pile-time option
0770: 73 2e 20 20 54 68 69 73 20 61 72 72 61 79 20 73 s. This array s
0780: 68 6f 75 6c 64 0a 2a 2a 20 62 65 20 73 6f 72 74 hould.** be sort
0790: 65 64 20 41 2d 5a 2e 0a 2a 2a 0a 2a 2a 20 54 68 ed A-Z..**.** Th
07a0: 69 73 20 61 72 72 61 79 20 6c 6f 6f 6b 73 20 6c is array looks l
07b0: 61 72 67 65 2c 20 62 75 74 20 69 6e 20 61 20 74 arge, but in a t
07c0: 79 70 69 63 61 6c 20 69 6e 73 74 61 6c 6c 61 74 ypical installat
07d0: 69 6f 6e 20 61 63 74 75 61 6c 6c 79 20 75 73 65 ion actually use
07e0: 73 0a 2a 2a 20 6f 6e 6c 79 20 61 20 68 61 6e 64 s.** only a hand
07f0: 66 75 6c 20 6f 66 20 63 6f 6d 70 69 6c 65 2d 74 ful of compile-t
0800: 69 6d 65 20 6f 70 74 69 6f 6e 73 2c 20 73 6f 20 ime options, so
0810: 6d 6f 73 74 20 74 69 6d 65 73 20 74 68 69 73 20 most times this
0820: 61 72 72 61 79 20 69 73 20 75 73 75 61 6c 6c 79 array is usually
0830: 0a 2a 2a 20 72 61 74 68 65 72 20 73 68 6f 72 74 .** rather short
0840: 20 61 6e 64 20 75 73 65 73 20 6c 69 74 74 6c 65 and uses little
0850: 20 6d 65 6d 6f 72 79 20 73 70 61 63 65 2e 0a 2a memory space..*
0860: 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 /.static const c
0870: 68 61 72 20 2a 20 63 6f 6e 73 74 20 61 7a 49 6e har * const azIn
0880: 74 65 72 6f 70 43 6f 6d 70 69 6c 65 4f 70 74 5b teropCompileOpt[
0890: 5d 20 3d 20 7b 0a 0a 2f 2a 20 54 68 65 73 65 20 ] = {../* These
08a0: 6d 61 63 72 6f 73 20 61 72 65 20 70 72 6f 76 69 macros are provi
08b0: 64 65 64 20 74 6f 20 22 73 74 72 69 6e 67 69 66 ded to "stringif
08c0: 79 22 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 y" the value of
08d0: 74 68 65 20 64 65 66 69 6e 65 0a 2a 2a 20 66 6f the define.** fo
08e0: 72 20 74 68 6f 73 65 20 6f 70 74 69 6f 6e 73 20 r those options
08f0: 69 6e 20 77 68 69 63 68 20 74 68 65 20 76 61 6c in which the val
0900: 75 65 20 69 73 20 6d 65 61 6e 69 6e 67 66 75 6c ue is meaningful
0910: 2e 20 2a 2f 0a 23 69 66 6e 64 65 66 20 43 54 49 . */.#ifndef CTI
0920: 4d 45 4f 50 54 5f 56 41 4c 5f 0a 23 64 65 66 69 MEOPT_VAL_.#defi
0930: 6e 65 20 43 54 49 4d 45 4f 50 54 5f 56 41 4c 5f ne CTIMEOPT_VAL_
0940: 28 6f 70 74 29 20 23 6f 70 74 0a 23 65 6e 64 69 (opt) #opt.#endi
0950: 66 0a 0a 23 69 66 6e 64 65 66 20 43 54 49 4d 45 f..#ifndef CTIME
0960: 4f 50 54 5f 56 41 4c 0a 23 64 65 66 69 6e 65 20 OPT_VAL.#define
0970: 43 54 49 4d 45 4f 50 54 5f 56 41 4c 28 6f 70 74 CTIMEOPT_VAL(opt
0980: 29 20 43 54 49 4d 45 4f 50 54 5f 56 41 4c 5f 28 ) CTIMEOPT_VAL_(
0990: 6f 70 74 29 0a 23 65 6e 64 69 66 0a 0a 23 69 66 opt).#endif..#if
09a0: 64 65 66 20 49 4e 54 45 52 4f 50 5f 43 4f 44 45 def INTEROP_CODE
09b0: 43 0a 20 20 22 43 4f 44 45 43 22 2c 0a 23 65 6e C. "CODEC",.#en
09c0: 64 69 66 0a 23 69 66 64 65 66 20 49 4e 54 45 52 dif.#ifdef INTER
09d0: 4f 50 5f 44 45 42 55 47 0a 20 20 22 44 45 42 55 OP_DEBUG. "DEBU
09e0: 47 3d 22 20 43 54 49 4d 45 4f 50 54 5f 56 41 4c G=" CTIMEOPT_VAL
09f0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 2c (INTEROP_DEBUG),
0a00: 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 66 20 49 .#endif.#ifdef I
0a10: 4e 54 45 52 4f 50 5f 45 58 54 45 4e 53 49 4f 4e NTEROP_EXTENSION
0a20: 5f 46 55 4e 43 54 49 4f 4e 53 0a 20 20 22 45 58 _FUNCTIONS. "EX
0a30: 54 45 4e 53 49 4f 4e 5f 46 55 4e 43 54 49 4f 4e TENSION_FUNCTION
0a40: 53 22 2c 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 S",.#endif.#ifde
0a50: 66 20 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 f INTEROP_LEGACY
0a60: 5f 43 4c 4f 53 45 0a 20 20 22 4c 45 47 41 43 59 _CLOSE. "LEGACY
0a70: 5f 43 4c 4f 53 45 22 2c 0a 23 65 6e 64 69 66 0a _CLOSE",.#endif.
0a80: 23 69 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 4c #ifdef INTEROP_L
0a90: 4f 47 0a 20 20 22 4c 4f 47 22 2c 0a 23 65 6e 64 OG. "LOG",.#end
0aa0: 69 66 0a 23 69 66 64 65 66 20 49 4e 54 45 52 4f if.#ifdef INTERO
0ab0: 50 5f 50 45 52 43 45 4e 54 49 4c 45 5f 45 58 54 P_PERCENTILE_EXT
0ac0: 45 4e 53 49 4f 4e 0a 20 20 22 50 45 52 43 45 4e ENSION. "PERCEN
0ad0: 54 49 4c 45 5f 45 58 54 45 4e 53 49 4f 4e 22 2c TILE_EXTENSION",
0ae0: 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 66 20 49 .#endif.#ifdef I
0af0: 4e 54 45 52 4f 50 5f 52 45 47 45 58 50 5f 45 58 NTEROP_REGEXP_EX
0b00: 54 45 4e 53 49 4f 4e 0a 20 20 22 52 45 47 45 58 TENSION. "REGEX
0b10: 50 5f 45 58 54 45 4e 53 49 4f 4e 22 2c 0a 23 65 P_EXTENSION",.#e
0b20: 6e 64 69 66 0a 23 69 66 64 65 66 20 49 4e 54 45 ndif.#ifdef INTE
0b30: 52 4f 50 5f 54 45 53 54 5f 45 58 54 45 4e 53 49 ROP_TEST_EXTENSI
0b40: 4f 4e 0a 20 20 22 54 45 53 54 5f 45 58 54 45 4e ON. "TEST_EXTEN
0b50: 53 49 4f 4e 22 2c 0a 23 65 6e 64 69 66 0a 23 69 SION",.#endif.#i
0b60: 66 64 65 66 20 49 4e 54 45 52 4f 50 5f 54 4f 54 fdef INTEROP_TOT
0b70: 59 50 45 5f 45 58 54 45 4e 53 49 4f 4e 0a 20 20 YPE_EXTENSION.
0b80: 22 54 4f 54 59 50 45 5f 45 58 54 45 4e 53 49 4f "TOTYPE_EXTENSIO
0b90: 4e 22 2c 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 N",.#endif.#ifde
0ba0: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e f SQLITE_VERSION
0bb0: 5f 4e 55 4d 42 45 52 0a 20 20 22 56 45 52 53 49 _NUMBER. "VERSI
0bc0: 4f 4e 5f 4e 55 4d 42 45 52 3d 22 20 43 54 49 4d ON_NUMBER=" CTIM
0bd0: 45 4f 50 54 5f 56 41 4c 28 53 51 4c 49 54 45 5f EOPT_VAL(SQLITE_
0be0: 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 29 2c VERSION_NUMBER),
0bf0: 0a 23 65 6e 64 69 66 0d 0a 23 69 66 64 65 66 20 .#endif..#ifdef
0c00: 49 4e 54 45 52 4f 50 5f 56 49 52 54 55 41 4c 5f INTEROP_VIRTUAL_
0c10: 54 41 42 4c 45 0d 0a 20 20 22 56 49 52 54 55 41 TABLE.. "VIRTUA
0c20: 4c 5f 54 41 42 4c 45 22 2c 0d 0a 23 65 6e 64 69 L_TABLE",..#endi
0c30: 66 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 47 69 76 65 f.};../*.** Give
0c40: 6e 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 n the name of a
0c50: 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 20 6f 70 74 compile-time opt
0c60: 69 6f 6e 2c 20 72 65 74 75 72 6e 20 74 72 75 65 ion, return true
0c70: 20 69 66 20 74 68 61 74 20 6f 70 74 69 6f 6e 0a if that option.
0c80: 2a 2a 20 77 61 73 20 75 73 65 64 20 61 6e 64 20 ** was used and
0c90: 66 61 6c 73 65 20 69 66 20 6e 6f 74 2e 0a 2a 2a false if not..**
0ca0: 0a 2a 2a 20 54 68 65 20 6e 61 6d 65 20 63 61 6e .** The name can
0cb0: 20 6f 70 74 69 6f 6e 61 6c 6c 79 20 62 65 67 69 optionally begi
0cc0: 6e 20 77 69 74 68 20 22 53 51 4c 49 54 45 5f 22 n with "SQLITE_"
0cd0: 20 6f 72 20 22 49 4e 54 45 52 4f 50 5f 22 20 62 or "INTEROP_" b
0ce0: 75 74 20 74 68 6f 73 65 0a 2a 2a 20 70 72 65 66 ut those.** pref
0cf0: 69 78 65 73 20 61 72 65 20 6e 6f 74 20 72 65 71 ixes are not req
0d00: 75 69 72 65 64 20 66 6f 72 20 61 20 6d 61 74 63 uired for a matc
0d10: 68 2e 0a 2a 2f 0a 53 51 4c 49 54 45 5f 41 50 49 h..*/.SQLITE_API
0d20: 20 69 6e 74 20 57 49 4e 41 50 49 20 69 6e 74 65 int WINAPI inte
0d30: 72 6f 70 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f rop_compileoptio
0d40: 6e 5f 75 73 65 64 28 63 6f 6e 73 74 20 63 68 61 n_used(const cha
0d50: 72 20 2a 7a 4f 70 74 4e 61 6d 65 29 7b 0a 20 20 r *zOptName){.
0d60: 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 69 66 28 20 int i, n;. if(
0d70: 73 71 6c 69 74 65 33 53 74 72 4e 49 43 6d 70 28 sqlite3StrNICmp(
0d80: 7a 4f 70 74 4e 61 6d 65 2c 20 22 53 51 4c 49 54 zOptName, "SQLIT
0d90: 45 5f 22 2c 20 37 29 3d 3d 30 20 29 20 7a 4f 70 E_", 7)==0 ) zOp
0da0: 74 4e 61 6d 65 20 2b 3d 20 37 3b 0a 20 20 69 66 tName += 7;. if
0db0: 28 20 73 71 6c 69 74 65 33 53 74 72 4e 49 43 6d ( sqlite3StrNICm
0dc0: 70 28 7a 4f 70 74 4e 61 6d 65 2c 20 22 49 4e 54 p(zOptName, "INT
0dd0: 45 52 4f 50 5f 22 2c 20 38 29 3d 3d 30 20 29 20 EROP_", 8)==0 )
0de0: 7a 4f 70 74 4e 61 6d 65 20 2b 3d 20 38 3b 0a 20 zOptName += 8;.
0df0: 20 6e 20 3d 20 73 71 6c 69 74 65 33 53 74 72 6c n = sqlite3Strl
0e00: 65 6e 33 30 28 7a 4f 70 74 4e 61 6d 65 29 3b 0a en30(zOptName);.
0e10: 0a 20 20 2f 2a 20 53 69 6e 63 65 20 41 72 72 61 . /* Since Arra
0e20: 79 53 69 7a 65 28 61 7a 49 6e 74 65 72 6f 70 43 ySize(azInteropC
0e30: 6f 6d 70 69 6c 65 4f 70 74 29 20 69 73 20 6e 6f ompileOpt) is no
0e40: 72 6d 61 6c 6c 79 20 69 6e 20 73 69 6e 67 6c 65 rmally in single
0e50: 20 64 69 67 69 74 73 2c 20 61 0a 20 20 2a 2a 20 digits, a. **
0e60: 6c 69 6e 65 61 72 20 73 65 61 72 63 68 20 69 73 linear search is
0e70: 20 61 64 65 71 75 61 74 65 2e 20 20 4e 6f 20 6e adequate. No n
0e80: 65 65 64 20 66 6f 72 20 61 20 62 69 6e 61 72 79 eed for a binary
0e90: 20 73 65 61 72 63 68 2e 20 2a 2f 0a 20 20 66 6f search. */. fo
0ea0: 72 28 69 3d 30 3b 20 69 3c 41 72 72 61 79 53 69 r(i=0; i<ArraySi
0eb0: 7a 65 28 61 7a 49 6e 74 65 72 6f 70 43 6f 6d 70 ze(azInteropComp
0ec0: 69 6c 65 4f 70 74 29 3b 20 69 2b 2b 29 7b 0a 20 ileOpt); i++){.
0ed0: 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 53 74 if( sqlite3St
0ee0: 72 4e 49 43 6d 70 28 7a 4f 70 74 4e 61 6d 65 2c rNICmp(zOptName,
0ef0: 20 61 7a 49 6e 74 65 72 6f 70 43 6f 6d 70 69 6c azInteropCompil
0f00: 65 4f 70 74 5b 69 5d 2c 20 6e 29 3d 3d 30 0a 20 eOpt[i], n)==0.
0f10: 20 20 20 20 26 26 20 73 71 6c 69 74 65 33 43 74 && sqlite3Ct
0f20: 79 70 65 4d 61 70 5b 28 75 6e 73 69 67 6e 65 64 ypeMap[(unsigned
0f30: 20 63 68 61 72 29 61 7a 49 6e 74 65 72 6f 70 43 char)azInteropC
0f40: 6f 6d 70 69 6c 65 4f 70 74 5b 69 5d 5b 6e 5d 5d ompileOpt[i][n]]
0f50: 3d 3d 30 0a 20 20 20 20 29 7b 0a 20 20 20 20 20 ==0. ){.
0f60: 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d return 1;. }
0f70: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b . }. return 0;
0f80: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e .}../*.** Return
0f90: 20 74 68 65 20 4e 2d 74 68 20 63 6f 6d 70 69 6c the N-th compil
0fa0: 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e 20 73 74 e-time option st
0fb0: 72 69 6e 67 2e 20 20 49 66 20 4e 20 69 73 20 6f ring. If N is o
0fc0: 75 74 20 6f 66 20 72 61 6e 67 65 2c 0a 2a 2a 20 ut of range,.**
0fd0: 72 65 74 75 72 6e 20 61 20 4e 55 4c 4c 20 70 6f return a NULL po
0fe0: 69 6e 74 65 72 2e 0a 2a 2f 0a 53 51 4c 49 54 45 inter..*/.SQLITE
0ff0: 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 _API const char
1000: 2a 57 49 4e 41 50 49 20 69 6e 74 65 72 6f 70 5f *WINAPI interop_
1010: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 compileoption_ge
1020: 74 28 69 6e 74 20 4e 29 7b 0a 20 20 69 66 28 20 t(int N){. if(
1030: 4e 3e 3d 30 20 26 26 20 4e 3c 41 72 72 61 79 53 N>=0 && N<ArrayS
1040: 69 7a 65 28 61 7a 49 6e 74 65 72 6f 70 43 6f 6d ize(azInteropCom
1050: 70 69 6c 65 4f 70 74 29 20 29 7b 0a 20 20 20 20 pileOpt) ){.
1060: 72 65 74 75 72 6e 20 61 7a 49 6e 74 65 72 6f 70 return azInterop
1070: 43 6f 6d 70 69 6c 65 4f 70 74 5b 4e 5d 3b 0a 20 CompileOpt[N];.
1080: 20 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d }. return 0;.}
1090: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 ...#if defined(I
10a0: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 7c 7c NTEROP_DEBUG) ||
10b0: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
10c0: 5f 4c 4f 47 29 0d 0a 53 51 4c 49 54 45 5f 50 52 _LOG)..SQLITE_PR
10d0: 49 56 41 54 45 20 76 6f 69 64 20 73 71 6c 69 74 IVATE void sqlit
10e0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 63 e3InteropDebug(c
10f0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d onst char *zForm
1100: 61 74 2c 20 2e 2e 2e 29 7b 0d 0a 20 20 76 61 5f at, ...){.. va_
1110: 6c 69 73 74 20 61 70 3b 20 20 20 20 20 20 20 20 list ap;
1120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1130: 20 2f 2a 20 56 61 72 61 72 67 20 6c 69 73 74 20 /* Vararg list
1140: 2a 2f 0d 0a 20 20 53 74 72 41 63 63 75 6d 20 61 */.. StrAccum a
1150: 63 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 cc;
1160: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 74 72 /* Str
1170: 69 6e 67 20 61 63 63 75 6d 75 6c 61 74 6f 72 20 ing accumulator
1180: 2a 2f 0d 0a 20 20 63 68 61 72 20 7a 4d 73 67 5b */.. char zMsg[
1190: 53 51 4c 49 54 45 5f 50 52 49 4e 54 5f 42 55 46 SQLITE_PRINT_BUF
11a0: 5f 53 49 5a 45 2a 33 5d 3b 20 2f 2a 20 43 6f 6d _SIZE*3]; /* Com
11b0: 70 6c 65 74 65 20 6c 6f 67 20 6d 65 73 73 61 67 plete log messag
11c0: 65 20 2a 2f 0d 0a 20 20 76 61 5f 73 74 61 72 74 e */.. va_start
11d0: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0d 0a (ap, zFormat);..
11e0: 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 sqlite3StrAccu
11f0: 6d 49 6e 69 74 28 26 61 63 63 2c 20 7a 4d 73 67 mInit(&acc, zMsg
1200: 2c 20 73 69 7a 65 6f 66 28 7a 4d 73 67 29 2c 20 , sizeof(zMsg),
1210: 30 29 3b 0d 0a 20 20 61 63 63 2e 75 73 65 4d 61 0);.. acc.useMa
1220: 6c 6c 6f 63 20 3d 20 30 3b 0d 0a 20 20 73 71 6c lloc = 0;.. sql
1230: 69 74 65 33 56 58 50 72 69 6e 74 66 28 26 61 63 ite3VXPrintf(&ac
1240: 63 2c 20 30 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 c, 0, zFormat, a
1250: 70 29 3b 0d 0a 20 20 76 61 5f 65 6e 64 28 61 70 p);.. va_end(ap
1260: 29 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 );..#if SQLITE_V
1270: 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d ERSION_NUMBER >=
1280: 20 33 30 30 37 30 31 33 0d 0a 20 20 73 71 6c 69 3007013.. sqli
1290: 74 65 33 5f 77 69 6e 33 32 5f 77 72 69 74 65 5f te3_win32_write_
12a0: 64 65 62 75 67 28 73 71 6c 69 74 65 33 53 74 72 debug(sqlite3Str
12b0: 41 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 AccumFinish(&acc
12c0: 29 2c 20 2d 31 29 3b 0d 0a 23 65 6c 69 66 20 64 ), -1);..#elif d
12d0: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 57 49 efined(SQLITE_WI
12e0: 4e 33 32 5f 48 41 53 5f 41 4e 53 49 29 0d 0a 20 N32_HAS_ANSI)..
12f0: 20 4f 75 74 70 75 74 44 65 62 75 67 53 74 72 69 OutputDebugStri
1300: 6e 67 41 28 73 71 6c 69 74 65 33 53 74 72 41 63 ngA(sqlite3StrAc
1310: 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29 cumFinish(&acc))
1320: 3b 0d 0a 23 65 6c 69 66 20 64 65 66 69 6e 65 64 ;..#elif defined
1330: 28 53 51 4c 49 54 45 5f 57 49 4e 33 32 5f 48 41 (SQLITE_WIN32_HA
1340: 53 5f 57 49 44 45 29 0d 0a 20 20 7b 0d 0a 20 20 S_WIDE).. {..
1350: 20 20 4c 50 57 53 54 52 20 7a 57 69 64 65 4d 73 LPWSTR zWideMs
1360: 67 20 3d 20 75 74 66 38 54 6f 55 6e 69 63 6f 64 g = utf8ToUnicod
1370: 65 28 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 e(sqlite3StrAccu
1380: 6d 46 69 6e 69 73 68 28 26 61 63 63 29 29 3b 0d mFinish(&acc));.
1390: 0a 20 20 20 20 69 66 28 20 7a 57 69 64 65 4d 73 . if( zWideMs
13a0: 67 20 29 7b 0d 0a 20 20 20 20 20 20 4f 75 74 70 g ){.. Outp
13b0: 75 74 44 65 62 75 67 53 74 72 69 6e 67 57 28 7a utDebugStringW(z
13c0: 57 69 64 65 4d 73 67 29 3b 0d 0a 20 20 20 20 20 WideMsg);..
13d0: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 57 sqlite3_free(zW
13e0: 69 64 65 4d 73 67 29 3b 0d 0a 20 20 20 20 7d 0d ideMsg);.. }.
13f0: 0a 20 20 7d 0d 0a 23 65 6c 73 65 0d 0a 20 20 66 . }..#else.. f
1400: 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 printf(stderr, "
1410: 25 73 22 2c 20 73 71 6c 69 74 65 33 53 74 72 41 %s", sqlite3StrA
1420: 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 ccumFinish(&acc)
1430: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 23 );..#endif..}..#
1440: 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 66 endif....#if def
1450: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 4f 47 ined(INTEROP_LOG
1460: 29 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 54 )..SQLITE_PRIVAT
1470: 45 20 69 6e 74 20 6c 6f 67 43 6f 6e 66 69 67 75 E int logConfigu
1480: 72 65 64 20 3d 20 30 3b 0d 0a 0d 0a 53 51 4c 49 red = 0;....SQLI
1490: 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 TE_PRIVATE void
14a0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 4c 6f sqlite3InteropLo
14b0: 67 43 61 6c 6c 62 61 63 6b 28 76 6f 69 64 20 2a gCallback(void *
14c0: 70 41 72 67 2c 20 69 6e 74 20 69 43 6f 64 65 2c pArg, int iCode,
14d0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4d 73 const char *zMs
14e0: 67 29 7b 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e g){.. sqlite3In
14f0: 74 65 72 6f 70 44 65 62 75 67 28 22 49 4e 54 45 teropDebug("INTE
1500: 52 4f 50 5f 4c 4f 47 20 28 25 64 29 20 25 73 5c ROP_LOG (%d) %s\
1510: 6e 22 2c 20 69 43 6f 64 65 2c 20 7a 4d 73 67 29 n", iCode, zMsg)
1520: 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a ;..}..#endif....
1530: 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 SQLITE_API int W
1540: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 6d 61 INAPI sqlite3_ma
1550: 6c 6c 6f 63 5f 73 69 7a 65 5f 69 6e 74 65 72 6f lloc_size_intero
1560: 70 28 76 6f 69 64 20 2a 70 29 7b 0d 0a 20 20 72 p(void *p){.. r
1570: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 4d 61 6c eturn sqlite3Mal
1580: 6c 6f 63 53 69 7a 65 28 70 29 3b 0d 0a 7d 0d 0a locSize(p);..}..
1590: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
15a0: 54 45 52 4f 50 5f 4c 45 47 41 43 59 5f 43 4c 4f TEROP_LEGACY_CLO
15b0: 53 45 29 20 7c 7c 20 53 51 4c 49 54 45 5f 56 45 SE) || SQLITE_VE
15c0: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3c 20 33 RSION_NUMBER < 3
15d0: 30 30 37 30 31 34 0d 0a 53 51 4c 49 54 45 5f 50 007014..SQLITE_P
15e0: 52 49 56 41 54 45 20 76 6f 69 64 20 2a 20 73 71 RIVATE void * sq
15f0: 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 lite3DbMallocZer
1600: 6f 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 o_interop(sqlite
1610: 33 20 2a 64 62 2c 20 69 6e 74 20 6e 29 0d 0a 7b 3 *db, int n)..{
1620: 0d 0a 20 20 76 6f 69 64 20 2a 70 3b 0d 0a 20 20 .. void *p;..
1630: 69 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 if (db) {.. s
1640: 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 qlite3_mutex_ent
1650: 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a er(db->mutex);..
1660: 20 20 7d 0d 0a 20 20 70 20 3d 20 73 71 6c 69 74 }.. p = sqlit
1670: 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 28 64 e3DbMallocZero(d
1680: 62 2c 6e 29 3b 0d 0a 20 20 69 66 20 28 64 62 29 b,n);.. if (db)
1690: 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f {.. sqlite3_
16a0: 6d 75 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e mutex_leave(db->
16b0: 6d 75 74 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 mutex);.. }..
16c0: 72 65 74 75 72 6e 20 70 3b 0d 0a 7d 0d 0a 0d 0a return p;..}....
16d0: 53 51 4c 49 54 45 5f 50 52 49 56 41 54 45 20 76 SQLITE_PRIVATE v
16e0: 6f 69 64 20 73 71 6c 69 74 65 33 44 62 46 72 65 oid sqlite3DbFre
16f0: 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 e_interop(sqlite
1700: 33 20 2a 64 62 2c 20 76 6f 69 64 20 2a 70 29 0d 3 *db, void *p).
1710: 0a 7b 0d 0a 20 20 69 66 20 28 64 62 29 20 7b 0d .{.. if (db) {.
1720: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 . sqlite3_mut
1730: 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 ex_enter(db->mut
1740: 65 78 29 3b 0d 0a 20 20 7d 0d 0a 20 20 69 66 20 ex);.. }.. if
1750: 28 70 29 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 (p) {.. sqlit
1760: 65 33 4d 65 6d 64 65 62 75 67 53 65 74 54 79 70 e3MemdebugSetTyp
1770: 65 28 70 2c 20 4d 45 4d 54 59 50 45 5f 44 42 7c e(p, MEMTYPE_DB|
1780: 4d 45 4d 54 59 50 45 5f 48 45 41 50 29 3b 0d 0a MEMTYPE_HEAP);..
1790: 20 20 7d 0d 0a 20 20 73 71 6c 69 74 65 33 44 62 }.. sqlite3Db
17a0: 46 72 65 65 28 64 62 2c 70 29 3b 0d 0a 20 20 69 Free(db,p);.. i
17b0: 66 20 28 64 62 29 20 7b 0d 0a 20 20 20 20 73 71 f (db) {.. sq
17c0: 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 lite3_mutex_leav
17d0: 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 20 e(db->mutex);..
17e0: 20 7d 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d }..}..#endif...
17f0: 0a 2f 2a 0d 0a 20 20 20 20 54 68 65 20 67 6f 61 ./*.. The goa
1800: 6c 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f l of this versio
1810: 6e 20 6f 66 20 63 6c 6f 73 65 20 69 73 20 64 69 n of close is di
1820: 66 66 65 72 65 6e 74 20 74 68 61 6e 20 74 68 61 fferent than tha
1830: 74 20 6f 66 20 73 71 6c 69 74 65 33 5f 63 6c 6f t of sqlite3_clo
1840: 73 65 28 29 2c 20 61 6e 64 20 69 73 20 64 65 73 se(), and is des
1850: 69 67 6e 65 64 20 74 6f 20 6c 65 6e 64 20 69 74 igned to lend it
1860: 73 65 6c 66 20 62 65 74 74 65 72 20 74 6f 20 2e self better to .
1870: 4e 45 54 27 73 20 6e 6f 6e 2d 64 65 74 65 72 6d NET's non-determ
1880: 69 6e 69 73 74 69 63 20 66 69 6e 61 6c 69 7a 65 inistic finalize
1890: 72 73 20 61 6e 64 0d 0a 20 20 20 20 74 68 65 20 rs and.. the
18a0: 47 43 20 74 68 72 65 61 64 2e 20 20 53 51 4c 69 GC thread. SQLi
18b0: 74 65 20 77 69 6c 6c 20 6e 6f 74 20 63 6c 6f 73 te will not clos
18c0: 65 20 61 20 64 61 74 61 62 61 73 65 20 69 66 20 e a database if
18d0: 73 74 61 74 65 6d 65 6e 74 73 20 61 72 65 20 6f statements are o
18e0: 70 65 6e 20 6f 6e 20 69 74 20 2d 2d 20 62 75 74 pen on it -- but
18f0: 20 66 6f 72 20 6f 75 72 20 70 75 72 70 6f 73 65 for our purpose
1900: 73 2c 20 77 65 27 64 20 72 61 74 68 65 72 20 66 s, we'd rather f
1910: 69 6e 61 6c 69 7a 65 20 61 6c 6c 20 61 63 74 69 inalize all acti
1920: 76 65 20 73 74 61 74 65 6d 65 6e 74 73 0d 0a 20 ve statements..
1930: 20 20 20 61 6e 64 20 66 6f 72 63 69 62 6c 79 20 and forcibly
1940: 63 6c 6f 73 65 20 74 68 65 20 64 61 74 61 62 61 close the databa
1950: 73 65 2e 20 20 54 68 65 20 72 65 61 73 6f 6e 20 se. The reason
1960: 69 73 20 73 69 6d 70 6c 65 20 2d 2d 20 61 20 6c is simple -- a l
1970: 6f 74 20 6f 66 20 70 65 6f 70 6c 65 20 64 6f 6e ot of people don
1980: 27 74 20 44 69 73 70 6f 73 65 28 29 20 6f 66 20 't Dispose() of
1990: 74 68 65 69 72 20 6f 62 6a 65 63 74 73 20 63 6f their objects co
19a0: 72 72 65 63 74 6c 79 20 61 6e 64 20 6c 65 74 20 rrectly and let
19b0: 74 68 65 20 67 61 72 62 61 67 65 20 63 6f 6c 6c the garbage coll
19c0: 65 63 74 6f 72 0d 0a 20 20 20 20 64 6f 20 69 74 ector.. do it
19d0: 2e 20 20 54 68 69 73 20 6c 65 61 64 73 20 74 6f . This leads to
19e0: 20 75 6e 65 78 70 65 63 74 65 64 20 62 65 68 61 unexpected beha
19f0: 76 69 6f 72 20 77 68 65 6e 20 61 20 75 73 65 72 vior when a user
1a00: 20 74 68 69 6e 6b 73 20 74 68 65 79 27 76 65 20 thinks they've
1a10: 63 6c 6f 73 65 64 20 61 20 64 61 74 61 62 61 73 closed a databas
1a20: 65 2c 20 62 75 74 20 69 74 27 73 20 73 74 69 6c e, but it's stil
1a30: 6c 20 6f 70 65 6e 20 62 65 63 61 75 73 65 20 6e l open because n
1a40: 6f 74 20 61 6c 6c 20 74 68 65 20 73 74 61 74 65 ot all the state
1a50: 6d 65 6e 74 73 20 68 61 76 65 0d 0a 20 20 20 20 ments have..
1a60: 68 69 74 20 74 68 65 20 47 43 20 79 65 74 2e 0d hit the GC yet..
1a70: 0a 0d 0a 20 20 20 20 53 6f 2c 20 68 65 72 65 20 ... So, here
1a80: 77 65 20 68 61 76 65 20 61 20 70 72 6f 62 6c 65 we have a proble
1a90: 6d 20 2e 2e 2e 20 2e 4e 45 54 20 68 61 73 20 61 m ... .NET has a
1aa0: 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 79 20 pointer to any
1ab0: 6e 75 6d 62 65 72 20 6f 66 20 73 71 6c 69 74 65 number of sqlite
1ac0: 33 5f 73 74 6d 74 20 6f 62 6a 65 63 74 73 2e 20 3_stmt objects.
1ad0: 20 57 65 20 63 61 6e 27 74 20 63 61 6c 6c 20 73 We can't call s
1ae0: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 qlite3_finalize(
1af0: 29 20 6f 6e 20 74 68 65 73 65 20 62 65 63 61 75 ) on these becau
1b00: 73 65 0d 0a 20 20 20 20 74 68 65 69 72 20 6d 65 se.. their me
1b10: 6d 6f 72 79 20 69 73 20 66 72 65 65 64 20 61 6e mory is freed an
1b20: 64 20 63 61 6e 20 62 65 20 75 73 65 64 20 66 6f d can be used fo
1b30: 72 20 73 6f 6d 65 74 68 69 6e 67 20 65 6c 73 65 r something else
1b40: 2e 20 20 54 68 65 20 47 43 20 74 68 72 65 61 64 . The GC thread
1b50: 20 63 6f 75 6c 64 20 70 6f 74 65 6e 74 69 61 6c could potential
1b60: 6c 79 20 74 72 79 20 61 6e 64 20 63 61 6c 6c 20 ly try and call
1b70: 66 69 6e 61 6c 69 7a 65 20 61 67 61 69 6e 20 6f finalize again o
1b80: 6e 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 20 n the statement
1b90: 61 66 74 65 72 0d 0a 20 20 20 20 74 68 61 74 20 after.. that
1ba0: 6d 65 6d 6f 72 79 20 77 61 73 20 64 65 61 6c 6c memory was deall
1bb0: 6f 63 61 74 65 64 2e 20 20 42 41 44 2e 20 20 53 ocated. BAD. S
1bc0: 6f 2c 20 77 68 61 74 20 77 65 20 6e 65 65 64 20 o, what we need
1bd0: 74 6f 20 64 6f 20 69 73 20 6d 61 6b 65 20 61 20 to do is make a
1be0: 63 6f 70 79 20 6f 66 20 65 61 63 68 20 73 74 61 copy of each sta
1bf0: 74 65 6d 65 6e 74 2c 20 61 6e 64 20 63 61 6c 6c tement, and call
1c00: 20 66 69 6e 61 6c 69 7a 65 28 29 20 6f 6e 20 74 finalize() on t
1c10: 68 65 20 63 6f 70 79 20 2d 2d 20 73 6f 20 74 68 he copy -- so th
1c20: 61 74 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 0d at the original.
1c30: 0a 20 20 20 20 73 74 61 74 65 6d 65 6e 74 27 73 . statement's
1c40: 20 6d 65 6d 6f 72 79 20 69 73 20 70 72 65 73 65 memory is prese
1c50: 72 76 65 64 2c 20 61 6e 64 20 6d 61 72 6b 65 64 rved, and marked
1c60: 20 61 73 20 42 41 44 2c 20 62 75 74 20 77 65 20 as BAD, but we
1c70: 63 61 6e 20 73 74 69 6c 6c 20 6d 61 6e 61 67 65 can still manage
1c80: 20 74 6f 20 66 69 6e 61 6c 69 7a 65 20 65 76 65 to finalize eve
1c90: 72 79 74 68 69 6e 67 20 61 6e 64 20 66 6f 72 63 rything and forc
1ca0: 69 62 6c 79 20 63 6c 6f 73 65 20 74 68 65 20 64 ibly close the d
1cb0: 61 74 61 62 61 73 65 2e 20 20 4c 61 74 65 72 20 atabase. Later
1cc0: 77 68 65 6e 20 74 68 65 0d 0a 20 20 20 20 47 43 when the.. GC
1cd0: 20 67 65 74 73 20 61 72 6f 75 6e 64 20 74 6f 20 gets around to
1ce0: 63 61 6c 6c 69 6e 67 20 66 69 6e 61 6c 69 7a 65 calling finalize
1cf0: 5f 69 6e 74 65 72 6f 70 28 29 20 6f 6e 20 74 68 _interop() on th
1d00: 65 20 22 62 61 64 22 20 73 74 61 74 65 6d 65 6e e "bad" statemen
1d10: 74 2c 20 77 65 20 64 65 74 65 63 74 20 74 68 61 t, we detect tha
1d20: 74 20 61 6e 64 20 66 69 6e 69 73 68 20 64 65 61 t and finish dea
1d30: 6c 6c 6f 63 61 74 69 6e 67 20 74 68 65 20 70 6f llocating the po
1d40: 69 6e 74 65 72 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 inter...*/..SQLI
1d50: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 TE_API int WINAP
1d60: 49 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f I sqlite3_close_
1d70: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 interop(sqlite3
1d80: 2a 64 62 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 72 *db)..{.. int r
1d90: 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 69 6e 65 et;..#if !define
1da0: 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 41 43 59 d(INTEROP_LEGACY
1db0: 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 4c 49 54 _CLOSE) && SQLIT
1dc0: 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 E_VERSION_NUMBER
1dd0: 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a 0d 0a 23 >= 3007014....#
1de0: 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 if defined(INTER
1df0: 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e OP_DEBUG) && (IN
1e00: 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e TEROP_DEBUG & IN
1e10: 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 4c 4f 53 TEROP_DEBUG_CLOS
1e20: 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 E).. sqlite3Int
1e30: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
1e40: 65 33 5f 63 6c 6f 73 65 5f 69 6e 74 65 72 6f 70 e3_close_interop
1e50: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 (): calling sqli
1e60: 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 70 29 te3_close_v2(%p)
1e70: 2e 2e 2e 5c 6e 22 2c 20 64 62 29 3b 0d 0a 23 65 ...\n", db);..#e
1e80: 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 ndif.... ret =
1e90: 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 sqlite3_close_v2
1ea0: 28 64 62 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 (db);....#if def
1eb0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 ined(INTEROP_DEB
1ec0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f UG) && (INTEROP_
1ed0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f DEBUG & INTEROP_
1ee0: 44 45 42 55 47 5f 43 4c 4f 53 45 29 0d 0a 20 20 DEBUG_CLOSE)..
1ef0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
1f00: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 63 6c 6f bug("sqlite3_clo
1f10: 73 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 se_interop(): sq
1f20: 6c 69 74 65 33 5f 63 6c 6f 73 65 5f 76 32 28 25 lite3_close_v2(%
1f30: 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c p) returned %d.\
1f40: 6e 22 2c 20 64 62 2c 20 72 65 74 29 3b 0d 0a 23 n", db, ret);..#
1f50: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 endif.... retur
1f60: 6e 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 n ret;..#else..
1f70: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 63 ret = sqlite3_c
1f80: 6c 6f 73 65 28 64 62 29 3b 0d 0a 0d 0a 20 20 69 lose(db);.... i
1f90: 66 20 28 72 65 74 20 3d 3d 20 53 51 4c 49 54 45 f (ret == SQLITE
1fa0: 5f 42 55 53 59 29 0d 0a 20 20 7b 0d 0a 20 20 20 _BUSY).. {..
1fb0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 65 sqlite3_mutex_e
1fc0: 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 29 3b nter(db->mutex);
1fd0: 0d 0a 0d 0a 20 20 20 20 69 66 20 28 21 64 62 2d .... if (!db-
1fe0: 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d 0a >pVdbe).. {..
1ff0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 sqlite3_mu
2000: 74 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 tex_leave(db->mu
2010: 74 65 78 29 3b 0d 0a 20 20 20 20 20 20 72 65 74 tex);.. ret
2020: 75 72 6e 20 72 65 74 3b 0d 0a 20 20 20 20 7d 0d urn ret;.. }.
2030: 0a 0d 0a 20 20 20 20 77 68 69 6c 65 20 28 64 62 ... while (db
2040: 2d 3e 70 56 64 62 65 29 0d 0a 20 20 20 20 7b 0d ->pVdbe).. {.
2050: 0a 20 20 20 20 20 20 2f 2a 20 4d 61 6b 65 20 61 . /* Make a
2060: 20 63 6f 70 79 20 6f 66 20 74 68 65 20 66 69 72 copy of the fir
2070: 73 74 20 70 72 65 70 61 72 65 64 20 73 74 61 74 st prepared stat
2080: 65 6d 65 6e 74 20 2a 2f 0d 0a 20 20 20 20 20 20 ement */..
2090: 56 64 62 65 20 2a 70 20 3d 20 28 56 64 62 65 20 Vdbe *p = (Vdbe
20a0: 2a 29 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f *)sqlite3DbMallo
20b0: 63 5a 65 72 6f 5f 69 6e 74 65 72 6f 70 28 64 62 cZero_interop(db
20c0: 2c 20 73 69 7a 65 6f 66 28 56 64 62 65 29 29 3b , sizeof(Vdbe));
20d0: 0d 0a 20 20 20 20 20 20 56 64 62 65 20 2a 70 6f .. Vdbe *po
20e0: 20 3d 20 64 62 2d 3e 70 56 64 62 65 3b 0d 0a 0d = db->pVdbe;...
20f0: 0a 20 20 20 20 20 20 69 66 20 28 21 70 29 0d 0a . if (!p)..
2100: 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 {..
2110: 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 4e 4f ret = SQLITE_NO
2120: 4d 45 4d 3b 0d 0a 20 20 20 20 20 20 20 20 62 72 MEM;.. br
2130: 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a 0d eak;.. }...
2140: 0a 20 20 20 20 20 20 43 6f 70 79 4d 65 6d 6f 72 . CopyMemor
2150: 79 28 70 2c 20 70 6f 2c 20 73 69 7a 65 6f 66 28 y(p, po, sizeof(
2160: 56 64 62 65 29 29 3b 0d 0a 0d 0a 20 20 20 20 20 Vdbe));....
2170: 20 2f 2a 20 50 75 74 20 69 74 20 6f 6e 20 74 68 /* Put it on th
2180: 65 20 63 68 61 69 6e 20 73 6f 20 77 65 20 63 61 e chain so we ca
2190: 6e 20 66 72 65 65 20 69 74 20 2a 2f 0d 0a 20 20 n free it */..
21a0: 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 3d 20 db->pVdbe =
21b0: 70 3b 0d 0a 20 20 20 20 20 20 72 65 74 20 3d 20 p;.. ret =
21c0: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 sqlite3_finalize
21d0: 28 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a ((sqlite3_stmt *
21e0: 29 70 29 3b 20 2f 2a 20 54 68 69 73 20 77 69 6c )p); /* This wil
21f0: 6c 20 61 6c 73 6f 20 66 72 65 65 20 74 68 65 20 l also free the
2200: 63 6f 70 79 27 73 20 6d 65 6d 6f 72 79 20 2a 2f copy's memory */
2210: 0d 0a 20 20 20 20 20 20 69 66 20 28 72 65 74 29 .. if (ret)
2220: 0d 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 .. {..
2230: 20 20 20 2f 2a 20 66 69 6e 61 6c 69 7a 65 20 66 /* finalize f
2240: 61 69 6c 65 64 20 2d 2d 20 73 6f 20 77 65 20 6d ailed -- so we m
2250: 75 73 74 20 70 75 74 20 62 61 63 6b 20 61 6e 79 ust put back any
2260: 74 68 69 6e 67 20 77 65 20 6d 75 6e 67 65 64 20 thing we munged
2270: 2a 2f 0d 0a 20 20 20 20 20 20 20 20 43 6f 70 79 */.. Copy
2280: 4d 65 6d 6f 72 79 28 70 6f 2c 20 70 2c 20 73 69 Memory(po, p, si
2290: 7a 65 6f 66 28 56 64 62 65 29 29 3b 0d 0a 20 20 zeof(Vdbe));..
22a0: 20 20 20 20 20 20 64 62 2d 3e 70 56 64 62 65 20 db->pVdbe
22b0: 3d 20 70 6f 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 = po;....
22c0: 20 2f 2a 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20 /*.. **
22d0: 4e 4f 54 45 3a 20 4f 6b 2c 20 77 65 20 6d 75 73 NOTE: Ok, we mus
22e0: 74 20 66 72 65 65 20 74 68 69 73 20 62 6c 6f 63 t free this bloc
22f0: 6b 20 74 68 61 74 20 2a 77 65 2a 20 61 6c 6c 6f k that *we* allo
2300: 63 61 74 65 64 20 28 61 62 6f 76 65 29 20 73 69 cated (above) si
2310: 6e 63 65 0d 0a 20 20 20 20 20 20 20 20 2a 2a 20 nce.. **
2320: 20 20 20 20 20 20 66 69 6e 61 6c 69 7a 65 20 64 finalize d
2330: 69 64 20 6e 6f 74 20 64 6f 20 73 6f 2e 0d 0a 20 id not do so...
2340: 20 20 20 20 20 20 20 2a 2f 0d 0a 20 20 20 20 20 */..
2350: 20 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 sqlite3DbFree
2360: 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 3b _interop(db, p);
2370: 0d 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b .. break;
2380: 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 .. }..
2390: 20 65 6c 73 65 0d 0a 20 20 20 20 20 20 7b 0d 0a else.. {..
23a0: 20 20 20 20 20 20 20 20 5a 65 72 6f 4d 65 6d 6f ZeroMemo
23b0: 72 79 28 70 6f 2c 20 73 69 7a 65 6f 66 28 56 64 ry(po, sizeof(Vd
23c0: 62 65 29 29 3b 0d 0a 20 20 20 20 20 20 20 20 70 be));.. p
23d0: 6f 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42 45 5f o->magic = VDBE_
23e0: 4d 41 47 49 43 5f 44 45 41 44 3b 0d 0a 20 20 20 MAGIC_DEAD;..
23f0: 20 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 }.. }..
2400: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c sqlite3_mutex_l
2410: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b eave(db->mutex);
2420: 0d 0a 20 20 20 20 72 65 74 20 3d 20 73 71 6c 69 .. ret = sqli
2430: 74 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b 0d 0a te3_close(db);..
2440: 20 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 }.. return re
2450: 74 3b 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d t;..#endif..}...
2460: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
2470: 45 52 4f 50 5f 4c 4f 47 29 0d 0a 53 51 4c 49 54 EROP_LOG)..SQLIT
2480: 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 E_API int WINAPI
2490: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f sqlite3_config_
24a0: 6c 6f 67 5f 69 6e 74 65 72 6f 70 28 29 0d 0a 7b log_interop()..{
24b0: 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 20 20 .. int ret;..
24c0: 69 66 28 20 21 6c 6f 67 43 6f 6e 66 69 67 75 72 if( !logConfigur
24d0: 65 64 20 29 7b 0d 0a 20 20 20 20 72 65 74 20 3d ed ){.. ret =
24e0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 28 sqlite3_config(
24f0: 53 51 4c 49 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f SQLITE_CONFIG_LO
2500: 47 2c 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f G, sqlite3Intero
2510: 70 4c 6f 67 43 61 6c 6c 62 61 63 6b 2c 20 30 29 pLogCallback, 0)
2520: 3b 0d 0a 20 20 20 20 69 66 28 20 72 65 74 3d 3d ;.. if( ret==
2530: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0d 0a 20 20 SQLITE_OK ){..
2540: 20 20 20 20 6c 6f 67 43 6f 6e 66 69 67 75 72 65 logConfigure
2550: 64 20 3d 20 31 3b 0d 0a 20 20 20 20 7d 65 6c 73 d = 1;.. }els
2560: 65 7b 0d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 e{.. sqlite
2570: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 3InteropDebug("s
2580: 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 6c 6f qlite3_config_lo
2590: 67 5f 69 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c g_interop(): sql
25a0: 69 74 65 33 5f 63 6f 6e 66 69 67 28 53 51 4c 49 ite3_config(SQLI
25b0: 54 45 5f 43 4f 4e 46 49 47 5f 4c 4f 47 29 20 72 TE_CONFIG_LOG) r
25c0: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 eturned %d.\n",
25d0: 72 65 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 ret);.. }..
25e0: 7d 65 6c 73 65 7b 0d 0a 20 20 20 20 72 65 74 20 }else{.. ret
25f0: 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 20 20 = SQLITE_OK;..
2600: 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b }.. return ret;
2610: 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 53 ..}..#endif....S
2620: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 QLITE_API const
2630: 63 68 61 72 20 2a 57 49 4e 41 50 49 20 69 6e 74 char *WINAPI int
2640: 65 72 6f 70 5f 6c 69 62 76 65 72 73 69 6f 6e 28 erop_libversion(
2650: 76 6f 69 64 29 0d 0a 7b 0d 0a 20 20 72 65 74 75 void)..{.. retu
2660: 72 6e 20 49 4e 54 45 52 4f 50 5f 56 45 52 53 49 rn INTEROP_VERSI
2670: 4f 4e 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 ON;..}....SQLITE
2680: 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 20 _API const char
2690: 2a 57 49 4e 41 50 49 20 69 6e 74 65 72 6f 70 5f *WINAPI interop_
26a0: 73 6f 75 72 63 65 69 64 28 76 6f 69 64 29 0d 0a sourceid(void)..
26b0: 7b 0d 0a 20 20 72 65 74 75 72 6e 20 49 4e 54 45 {.. return INTE
26c0: 52 4f 50 5f 53 4f 55 52 43 45 5f 49 44 20 22 20 ROP_SOURCE_ID "
26d0: 22 20 49 4e 54 45 52 4f 50 5f 53 4f 55 52 43 45 " INTEROP_SOURCE
26e0: 5f 54 49 4d 45 53 54 41 4d 50 3b 0d 0a 7d 0d 0a _TIMESTAMP;..}..
26f0: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 ..SQLITE_API int
2700: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
2710: 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 63 6f 6e open_interop(con
2720: 73 74 20 63 68 61 72 20 2a 66 69 6c 65 6e 61 6d st char *filenam
2730: 65 2c 20 69 6e 74 20 66 6c 61 67 73 2c 20 73 71 e, int flags, sq
2740: 6c 69 74 65 33 20 2a 2a 70 70 64 62 29 0d 0a 7b lite3 **ppdb)..{
2750: 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a .. int ret;....
2760: 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 #if defined(INTE
2770: 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 ROP_DEBUG) && (I
2780: 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 NTEROP_DEBUG & I
2790: 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 NTEROP_DEBUG_OPE
27a0: 4e 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 N).. sqlite3Int
27b0: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
27c0: 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 e3_open_interop(
27d0: 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 ): calling sqlit
27e0: 65 33 5f 6f 70 65 6e 5f 76 32 28 5c 22 25 73 5c e3_open_v2(\"%s\
27f0: 22 2c 20 25 64 2c 20 25 70 29 2e 2e 2e 5c 6e 22 ", %d, %p)...\n"
2800: 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 , filename, flag
2810: 73 2c 20 70 70 64 62 29 3b 0d 0a 23 65 6e 64 69 s, ppdb);..#endi
2820: 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c f.... ret = sql
2830: 69 74 65 33 5f 6f 70 65 6e 5f 76 32 28 66 69 6c ite3_open_v2(fil
2840: 65 6e 61 6d 65 2c 20 70 70 64 62 2c 20 66 6c 61 ename, ppdb, fla
2850: 67 73 2c 20 4e 55 4c 4c 29 3b 0d 0a 0d 0a 23 69 gs, NULL);....#i
2860: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f f defined(INTERO
2870: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 P_DEBUG) && (INT
2880: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 EROP_DEBUG & INT
2890: 45 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 29 EROP_DEBUG_OPEN)
28a0: 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 .. sqlite3Inter
28b0: 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 opDebug("sqlite3
28c0: 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 29 3a _open_interop():
28d0: 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f 76 32 sqlite3_open_v2
28e0: 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 (\"%s\", %d, %p)
28f0: 20 72 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 returned %d.\n"
2900: 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 , filename, flag
2910: 73 2c 20 70 70 64 62 2c 20 72 65 74 29 3b 0d 0a s, ppdb, ret);..
2920: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 #endif....#if de
2930: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 45 58 fined(INTEROP_EX
2940: 54 45 4e 53 49 4f 4e 5f 46 55 4e 43 54 49 4f 4e TENSION_FUNCTION
2950: 53 29 0d 0a 20 20 69 66 20 28 28 72 65 74 20 3d S).. if ((ret =
2960: 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 20 26 26 20 = SQLITE_OK) &&
2970: 70 70 64 62 29 0d 0a 20 20 20 20 52 65 67 69 73 ppdb).. Regis
2980: 74 65 72 45 78 74 65 6e 73 69 6f 6e 46 75 6e 63 terExtensionFunc
2990: 74 69 6f 6e 73 28 2a 70 70 64 62 29 3b 0d 0a 23 tions(*ppdb);..#
29a0: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 endif.... retur
29b0: 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c n ret;..}....SQL
29c0: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
29d0: 50 49 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 31 PI sqlite3_open1
29e0: 36 5f 69 6e 74 65 72 6f 70 28 63 6f 6e 73 74 20 6_interop(const
29f0: 63 68 61 72 20 2a 66 69 6c 65 6e 61 6d 65 2c 20 char *filename,
2a00: 69 6e 74 20 66 6c 61 67 73 2c 20 73 71 6c 69 74 int flags, sqlit
2a10: 65 33 20 2a 2a 70 70 64 62 29 0d 0a 7b 0d 0a 20 e3 **ppdb)..{..
2a20: 20 69 6e 74 20 72 65 74 3b 0d 0a 0d 0a 23 69 66 int ret;....#if
2a30: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
2a40: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 _DEBUG) && (INTE
2a50: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 ROP_DEBUG & INTE
2a60: 52 4f 50 5f 44 45 42 55 47 5f 4f 50 45 4e 31 36 ROP_DEBUG_OPEN16
2a70: 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 ).. sqlite3Inte
2a80: 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 ropDebug("sqlite
2a90: 33 5f 6f 70 65 6e 31 36 5f 69 6e 74 65 72 6f 70 3_open16_interop
2aa0: 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 (): calling sqli
2ab0: 74 65 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 te3_open_interop
2ac0: 28 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 (\"%s\", %d, %p)
2ad0: 2e 2e 2e 5c 6e 22 2c 20 66 69 6c 65 6e 61 6d 65 ...\n", filename
2ae0: 2c 20 66 6c 61 67 73 2c 20 70 70 64 62 29 3b 0d , flags, ppdb);.
2af0: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 .#endif.... ret
2b00: 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 5f = sqlite3_open_
2b10: 69 6e 74 65 72 6f 70 28 66 69 6c 65 6e 61 6d 65 interop(filename
2b20: 2c 20 66 6c 61 67 73 2c 20 70 70 64 62 29 3b 0d , flags, ppdb);.
2b30: 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 ...#if defined(I
2b40: 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 NTEROP_DEBUG) &&
2b50: 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 (INTEROP_DEBUG
2b60: 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f & INTEROP_DEBUG_
2b70: 4f 50 45 4e 31 36 29 0d 0a 20 20 73 71 6c 69 74 OPEN16).. sqlit
2b80: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 e3InteropDebug("
2b90: 73 71 6c 69 74 65 33 5f 6f 70 65 6e 31 36 5f 69 sqlite3_open16_i
2ba0: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 nterop(): sqlite
2bb0: 33 5f 6f 70 65 6e 5f 69 6e 74 65 72 6f 70 28 5c 3_open_interop(\
2bc0: 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 "%s\", %d, %p) r
2bd0: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 eturned %d.\n",
2be0: 66 69 6c 65 6e 61 6d 65 2c 20 66 6c 61 67 73 2c filename, flags,
2bf0: 20 70 70 64 62 2c 20 72 65 74 29 3b 0d 0a 23 65 ppdb, ret);..#e
2c00: 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 28 72 ndif.... if ((r
2c10: 65 74 20 3d 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 et == SQLITE_OK)
2c20: 20 26 26 20 70 70 64 62 20 26 26 20 21 44 62 48 && ppdb && !DbH
2c30: 61 73 50 72 6f 70 65 72 74 79 28 2a 70 70 64 62 asProperty(*ppdb
2c40: 2c 20 30 2c 20 44 42 5f 53 63 68 65 6d 61 4c 6f , 0, DB_SchemaLo
2c50: 61 64 65 64 29 29 0d 0a 20 20 20 20 45 4e 43 28 aded)).. ENC(
2c60: 2a 70 70 64 62 29 20 3d 20 53 51 4c 49 54 45 5f *ppdb) = SQLITE_
2c70: 55 54 46 31 36 4e 41 54 49 56 45 3b 0d 0a 0d 0a UTF16NATIVE;....
2c80: 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 7d return ret;..}
2c90: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 ....SQLITE_API c
2ca0: 6f 6e 73 74 20 63 68 61 72 20 2a 57 49 4e 41 50 onst char *WINAP
2cb0: 49 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 I sqlite3_errmsg
2cc0: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
2cd0: 20 2a 64 62 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 *db, int *plen)
2ce0: 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 ..{.. const cha
2cf0: 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 r *pval = sqlite
2d00: 33 5f 65 72 72 6d 73 67 28 64 62 29 3b 0d 0a 20 3_errmsg(db);..
2d10: 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e if (plen) *plen
2d20: 20 3d 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e = pval ? strlen
2d30: 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 (pval) : 0;.. r
2d40: 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a eturn pval;..}..
2d50: 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 ..SQLITE_API int
2d60: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
2d70: 63 68 61 6e 67 65 73 5f 69 6e 74 65 72 6f 70 28 changes_interop(
2d80: 73 71 6c 69 74 65 33 20 2a 64 62 29 0d 0a 7b 0d sqlite3 *db)..{.
2d90: 0a 20 20 69 6e 74 20 72 65 73 75 6c 74 3b 0d 0a . int result;..
2da0: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
2db0: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 TEROP_DEBUG) &&
2dc0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 (INTEROP_DEBUG &
2dd0: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 INTEROP_DEBUG_C
2de0: 48 41 4e 47 45 53 29 0d 0a 20 20 73 71 6c 69 74 HANGES).. sqlit
2df0: 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 e3InteropDebug("
2e00: 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 5f sqlite3_changes_
2e10: 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 interop(): calli
2e20: 6e 67 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 ng sqlite3_chang
2e30: 65 73 28 25 70 29 2e 2e 2e 5c 6e 22 2c 20 64 62 es(%p)...\n", db
2e40: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 );..#endif....#i
2e50: 66 6e 64 65 66 20 4e 44 45 42 55 47 0d 0a 20 20 fndef NDEBUG..
2e60: 69 66 20 28 21 64 62 29 0d 0a 20 20 20 20 20 20 if (!db)..
2e70: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 42 72 sqlite3InteropBr
2e80: 65 61 6b 28 22 6e 75 6c 6c 20 64 61 74 61 62 61 eak("null databa
2e90: 73 65 20 68 61 6e 64 6c 65 20 66 6f 72 20 73 71 se handle for sq
2ea0: 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 29 22 lite3_changes()"
2eb0: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 );..#endif....
2ec0: 72 65 73 75 6c 74 20 3d 20 73 71 6c 69 74 65 33 result = sqlite3
2ed0: 5f 63 68 61 6e 67 65 73 28 64 62 29 3b 0d 0a 0d _changes(db);...
2ee0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
2ef0: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 EROP_DEBUG) && (
2f00: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 INTEROP_DEBUG &
2f10: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 43 48 INTEROP_DEBUG_CH
2f20: 41 4e 47 45 53 29 0d 0a 20 20 73 71 6c 69 74 65 ANGES).. sqlite
2f30: 33 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 3InteropDebug("s
2f40: 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 5f 69 qlite3_changes_i
2f50: 6e 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 nterop(): sqlite
2f60: 33 5f 63 68 61 6e 67 65 73 28 25 70 29 20 72 65 3_changes(%p) re
2f70: 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 turned %d.\n", d
2f80: 62 2c 20 72 65 73 75 6c 74 29 3b 0d 0a 23 65 6e b, result);..#en
2f90: 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 dif.... return
2fa0: 72 65 73 75 6c 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 result;..}....SQ
2fb0: 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e LITE_API int WIN
2fc0: 41 50 49 20 73 71 6c 69 74 65 33 5f 70 72 65 70 API sqlite3_prep
2fd0: 61 72 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 are_interop(sqli
2fe0: 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 te3 *db, const c
2ff0: 68 61 72 20 2a 73 71 6c 2c 20 69 6e 74 20 6e 62 har *sql, int nb
3000: 79 74 65 73 2c 20 73 71 6c 69 74 65 33 5f 73 74 ytes, sqlite3_st
3010: 6d 74 20 2a 2a 70 70 73 74 6d 74 2c 20 63 6f 6e mt **ppstmt, con
3020: 73 74 20 63 68 61 72 20 2a 2a 70 7a 74 61 69 6c st char **pztail
3030: 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d , int *plen)..{.
3040: 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 23 69 66 . int n;....#if
3050: 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 defined(INTEROP
3060: 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 45 _DEBUG) && (INTE
3070: 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 45 ROP_DEBUG & INTE
3080: 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41 52 ROP_DEBUG_PREPAR
3090: 45 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 E).. sqlite3Int
30a0: 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 74 eropDebug("sqlit
30b0: 65 33 5f 70 72 65 70 61 72 65 5f 69 6e 74 65 72 e3_prepare_inter
30c0: 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 73 71 op(): calling sq
30d0: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 25 70 lite3_prepare(%p
30e0: 2c 20 5c 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 , \"%s\", %d, %p
30f0: 29 2e 2e 2e 5c 6e 22 2c 20 64 62 2c 20 73 71 6c )...\n", db, sql
3100: 2c 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74 , nbytes, ppstmt
3110: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 );..#endif....#i
3120: 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e f SQLITE_VERSION
3130: 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 33 30 _NUMBER >= 30030
3140: 30 39 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 09.. n = sqlite
3150: 33 5f 70 72 65 70 61 72 65 5f 76 32 28 64 62 2c 3_prepare_v2(db,
3160: 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70 70 sql, nbytes, pp
3170: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a stmt, pztail);..
3180: 23 65 6c 73 65 0d 0a 20 20 6e 20 3d 20 73 71 6c #else.. n = sql
3190: 69 74 65 33 5f 70 72 65 70 61 72 65 28 64 62 2c ite3_prepare(db,
31a0: 20 73 71 6c 2c 20 6e 62 79 74 65 73 2c 20 70 70 sql, nbytes, pp
31b0: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a stmt, pztail);..
31c0: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 64 65 #endif....#if de
31d0: 66 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 fined(INTEROP_DE
31e0: 42 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 BUG) && (INTEROP
31f0: 5f 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 _DEBUG & INTEROP
3200: 5f 44 45 42 55 47 5f 50 52 45 50 41 52 45 29 0d _DEBUG_PREPARE).
3210: 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f . sqlite3Intero
3220: 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f pDebug("sqlite3_
3230: 70 72 65 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 prepare_interop(
3240: 29 3a 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61 ): sqlite3_prepa
3250: 72 65 28 25 70 2c 20 5c 22 25 73 5c 22 2c 20 25 re(%p, \"%s\", %
3260: 64 2c 20 25 70 29 20 72 65 74 75 72 6e 65 64 20 d, %p) returned
3270: 25 64 2e 5c 6e 22 2c 20 64 62 2c 20 73 71 6c 2c %d.\n", db, sql,
3280: 20 6e 62 79 74 65 73 2c 20 70 70 73 74 6d 74 2c nbytes, ppstmt,
3290: 20 6e 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a n);..#endif....
32a0: 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 if (plen) *ple
32b0: 6e 20 3d 20 28 70 7a 74 61 69 6c 20 26 26 20 2a n = (pztail && *
32c0: 70 7a 74 61 69 6c 29 20 3f 20 73 74 72 6c 65 6e pztail) ? strlen
32d0: 28 2a 70 7a 74 61 69 6c 29 20 3a 20 30 3b 0d 0a (*pztail) : 0;..
32e0: 0d 0a 20 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d .. return n;..}
32f0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 ....SQLITE_API i
3300: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 nt WINAPI sqlite
3310: 33 5f 70 72 65 70 61 72 65 31 36 5f 69 6e 74 65 3_prepare16_inte
3320: 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 64 62 2c rop(sqlite3 *db,
3330: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 73 71 6c const void *sql
3340: 2c 20 69 6e 74 20 6e 63 68 61 72 73 2c 20 73 71 , int nchars, sq
3350: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 2a 70 70 73 lite3_stmt **pps
3360: 74 6d 74 2c 20 63 6f 6e 73 74 20 76 6f 69 64 20 tmt, const void
3370: 2a 2a 70 7a 74 61 69 6c 2c 20 69 6e 74 20 2a 70 **pztail, int *p
3380: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 69 6e 74 20 6e len)..{.. int n
3390: 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 ;....#if defined
33a0: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 29 20 (INTEROP_DEBUG)
33b0: 26 26 20 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 && (INTEROP_DEBU
33c0: 47 20 26 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 G & INTEROP_DEBU
33d0: 47 5f 50 52 45 50 41 52 45 31 36 29 0d 0a 20 20 G_PREPARE16)..
33e0: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
33f0: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 70 72 65 bug("sqlite3_pre
3400: 70 61 72 65 5f 69 6e 74 65 72 6f 70 28 29 3a 20 pare_interop():
3410: 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f calling sqlite3_
3420: 70 72 65 70 61 72 65 31 36 28 25 70 2c 20 5c 22 prepare16(%p, \"
3430: 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 2e 2e 2e %s\", %d, %p)...
3440: 5c 6e 22 2c 20 64 62 2c 20 73 71 6c 2c 20 6e 63 \n", db, sql, nc
3450: 68 61 72 73 2c 20 70 70 73 74 6d 74 29 3b 0d 0a hars, ppstmt);..
3460: 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 66 20 53 51 #endif....#if SQ
3470: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d LITE_VERSION_NUM
3480: 42 45 52 20 3e 3d 20 33 30 30 33 30 30 39 0d 0a BER >= 3003009..
3490: 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 n = sqlite3_pr
34a0: 65 70 61 72 65 31 36 5f 76 32 28 64 62 2c 20 73 epare16_v2(db, s
34b0: 71 6c 2c 20 6e 63 68 61 72 73 20 2a 20 73 69 7a ql, nchars * siz
34c0: 65 6f 66 28 77 63 68 61 72 5f 74 29 2c 20 70 70 eof(wchar_t), pp
34d0: 73 74 6d 74 2c 20 70 7a 74 61 69 6c 29 3b 0d 0a stmt, pztail);..
34e0: 23 65 6c 73 65 0d 0a 20 20 6e 20 3d 20 73 71 6c #else.. n = sql
34f0: 69 74 65 33 5f 70 72 65 70 61 72 65 31 36 28 64 ite3_prepare16(d
3500: 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73 20 2a b, sql, nchars *
3510: 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 sizeof(wchar_t)
3520: 2c 20 70 70 73 74 6d 74 2c 20 70 7a 74 61 69 6c , ppstmt, pztail
3530: 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 23 69 );..#endif....#i
3540: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f f defined(INTERO
3550: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 P_DEBUG) && (INT
3560: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 EROP_DEBUG & INT
3570: 45 52 4f 50 5f 44 45 42 55 47 5f 50 52 45 50 41 EROP_DEBUG_PREPA
3580: 52 45 31 36 29 0d 0a 20 20 73 71 6c 69 74 65 33 RE16).. sqlite3
3590: 49 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 InteropDebug("sq
35a0: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 69 6e lite3_prepare_in
35b0: 74 65 72 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 terop(): sqlite3
35c0: 5f 70 72 65 70 61 72 65 31 36 28 25 70 2c 20 5c _prepare16(%p, \
35d0: 22 25 73 5c 22 2c 20 25 64 2c 20 25 70 29 20 72 "%s\", %d, %p) r
35e0: 65 74 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 eturned %d.\n",
35f0: 64 62 2c 20 73 71 6c 2c 20 6e 63 68 61 72 73 2c db, sql, nchars,
3600: 20 70 70 73 74 6d 74 2c 20 6e 29 3b 0d 0a 23 65 ppstmt, n);..#e
3610: 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 70 6c ndif.... if (pl
3620: 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 28 70 7a 74 en) *plen = (pzt
3630: 61 69 6c 20 26 26 20 2a 70 7a 74 61 69 6c 29 20 ail && *pztail)
3640: 3f 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f ? wcslen((wchar_
3650: 74 20 2a 29 2a 70 7a 74 61 69 6c 29 20 2a 20 73 t *)*pztail) * s
3660: 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20 3a izeof(wchar_t) :
3670: 20 30 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 0;.... return
3680: 6e 3b 0d 0a 7d 0d 0a 0d 0a 23 69 66 20 64 65 66 n;..}....#if def
3690: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 56 49 52 ined(INTEROP_VIR
36a0: 54 55 41 4c 5f 54 41 42 4c 45 29 20 26 26 20 53 TUAL_TABLE) && S
36b0: 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 QLITE_VERSION_NU
36c0: 4d 42 45 52 20 3e 3d 20 33 30 30 34 30 30 31 0d MBER >= 3004001.
36d0: 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 .SQLITE_API void
36e0: 20 2a 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 *WINAPI sqlite3
36f0: 5f 63 72 65 61 74 65 5f 64 69 73 70 6f 73 61 62 _create_disposab
3700: 6c 65 5f 6d 6f 64 75 6c 65 5f 69 6e 74 65 72 6f le_module_intero
3710: 70 28 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 p(.. sqlite3 *d
3720: 62 2c 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 b,.. const char
3730: 20 2a 7a 4e 61 6d 65 2c 0d 0a 20 20 73 71 6c 69 *zName,.. sqli
3740: 74 65 33 5f 6d 6f 64 75 6c 65 20 2a 70 4d 6f 64 te3_module *pMod
3750: 75 6c 65 2c 0d 0a 20 20 69 6e 74 20 69 56 65 72 ule,.. int iVer
3760: 73 69 6f 6e 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 sion,.. int (*x
3770: 43 72 65 61 74 65 29 28 73 71 6c 69 74 65 33 2a Create)(sqlite3*
3780: 2c 20 76 6f 69 64 20 2a 2c 20 69 6e 74 2c 20 63 , void *, int, c
3790: 6f 6e 73 74 20 63 68 61 72 20 2a 63 6f 6e 73 74 onst char *const
37a0: 2a 2c 20 73 71 6c 69 74 65 33 5f 76 74 61 62 20 *, sqlite3_vtab
37b0: 2a 2a 2c 20 63 68 61 72 2a 2a 29 2c 0d 0a 20 20 **, char**),..
37c0: 69 6e 74 20 28 2a 78 43 6f 6e 6e 65 63 74 29 28 int (*xConnect)(
37d0: 73 71 6c 69 74 65 33 2a 2c 20 76 6f 69 64 20 2a sqlite3*, void *
37e0: 2c 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 61 , int, const cha
37f0: 72 20 2a 63 6f 6e 73 74 2a 2c 20 73 71 6c 69 74 r *const*, sqlit
3800: 65 33 5f 76 74 61 62 20 2a 2a 2c 20 63 68 61 72 e3_vtab **, char
3810: 2a 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 42 **),.. int (*xB
3820: 65 73 74 49 6e 64 65 78 29 28 73 71 6c 69 74 65 estIndex)(sqlite
3830: 33 5f 76 74 61 62 20 2a 2c 20 73 71 6c 69 74 65 3_vtab *, sqlite
3840: 33 5f 69 6e 64 65 78 5f 69 6e 66 6f 2a 29 2c 0d 3_index_info*),.
3850: 0a 20 20 69 6e 74 20 28 2a 78 44 69 73 63 6f 6e . int (*xDiscon
3860: 6e 65 63 74 29 28 73 71 6c 69 74 65 33 5f 76 74 nect)(sqlite3_vt
3870: 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a ab *),.. int (*
3880: 78 44 65 73 74 72 6f 79 29 28 73 71 6c 69 74 65 xDestroy)(sqlite
3890: 33 5f 76 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 3_vtab *),.. in
38a0: 74 20 28 2a 78 4f 70 65 6e 29 28 73 71 6c 69 74 t (*xOpen)(sqlit
38b0: 65 33 5f 76 74 61 62 20 2a 2c 20 73 71 6c 69 74 e3_vtab *, sqlit
38c0: 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 20 2a e3_vtab_cursor *
38d0: 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43 6c *),.. int (*xCl
38e0: 6f 73 65 29 28 73 71 6c 69 74 65 33 5f 76 74 61 ose)(sqlite3_vta
38f0: 62 5f 63 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 b_cursor*),.. i
3900: 6e 74 20 28 2a 78 46 69 6c 74 65 72 29 28 73 71 nt (*xFilter)(sq
3910: 6c 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f lite3_vtab_curso
3920: 72 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63 r*, int, const c
3930: 68 61 72 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 har *, int, sqli
3940: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 29 2c 0d 0a te3_value **),..
3950: 20 20 69 6e 74 20 28 2a 78 4e 65 78 74 29 28 73 int (*xNext)(s
3960: 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73 qlite3_vtab_curs
3970: 6f 72 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 or*),.. int (*x
3980: 45 6f 66 29 28 73 71 6c 69 74 65 33 5f 76 74 61 Eof)(sqlite3_vta
3990: 62 5f 63 75 72 73 6f 72 2a 29 2c 0d 0a 20 20 69 b_cursor*),.. i
39a0: 6e 74 20 28 2a 78 43 6f 6c 75 6d 6e 29 28 73 71 nt (*xColumn)(sq
39b0: 6c 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f lite3_vtab_curso
39c0: 72 2a 2c 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 r*, sqlite3_cont
39d0: 65 78 74 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 69 ext*, int),.. i
39e0: 6e 74 20 28 2a 78 52 6f 77 69 64 29 28 73 71 6c nt (*xRowid)(sql
39f0: 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 ite3_vtab_cursor
3a00: 2a 2c 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 *, sqlite3_int64
3a10: 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 55 *),.. int (*xU
3a20: 70 64 61 74 65 29 28 73 71 6c 69 74 65 33 5f 76 pdate)(sqlite3_v
3a30: 74 61 62 20 2a 2c 20 69 6e 74 2c 20 73 71 6c 69 tab *, int, sqli
3a40: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 2c 20 73 71 te3_value **, sq
3a50: 6c 69 74 65 33 5f 69 6e 74 36 34 20 2a 29 2c 0d lite3_int64 *),.
3a60: 0a 20 20 69 6e 74 20 28 2a 78 42 65 67 69 6e 29 . int (*xBegin)
3a70: 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 29 (sqlite3_vtab *)
3a80: 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 53 79 6e 63 ,.. int (*xSync
3a90: 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a )(sqlite3_vtab *
3aa0: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 43 6f 6d ),.. int (*xCom
3ab0: 6d 69 74 29 28 73 71 6c 69 74 65 33 5f 76 74 61 mit)(sqlite3_vta
3ac0: 62 20 2a 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 b *),.. int (*x
3ad0: 52 6f 6c 6c 62 61 63 6b 29 28 73 71 6c 69 74 65 Rollback)(sqlite
3ae0: 33 5f 76 74 61 62 20 2a 29 2c 0d 0a 20 20 69 6e 3_vtab *),.. in
3af0: 74 20 28 2a 78 46 69 6e 64 46 75 6e 63 74 69 6f t (*xFindFunctio
3b00: 6e 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 20 n)(sqlite3_vtab
3b10: 2a 2c 20 69 6e 74 2c 20 63 6f 6e 73 74 20 63 68 *, int, const ch
3b20: 61 72 20 2a 2c 20 76 6f 69 64 20 28 2a 2a 70 78 ar *, void (**px
3b30: 46 75 6e 63 29 28 73 71 6c 69 74 65 33 5f 63 6f Func)(sqlite3_co
3b40: 6e 74 65 78 74 2a 2c 20 69 6e 74 2c 20 73 71 6c ntext*, int, sql
3b50: 69 74 65 33 5f 76 61 6c 75 65 2a 2a 29 2c 20 76 ite3_value**), v
3b60: 6f 69 64 20 2a 2a 70 70 41 72 67 29 2c 0d 0a 20 oid **ppArg),..
3b70: 20 69 6e 74 20 28 2a 78 52 65 6e 61 6d 65 29 28 int (*xRename)(
3b80: 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 sqlite3_vtab *,
3b90: 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 2c 0d 0a const char *),..
3ba0: 20 20 69 6e 74 20 28 2a 78 53 61 76 65 70 6f 69 int (*xSavepoi
3bb0: 6e 74 29 28 73 71 6c 69 74 65 33 5f 76 74 61 62 nt)(sqlite3_vtab
3bc0: 20 2a 2c 20 69 6e 74 29 2c 0d 0a 20 20 69 6e 74 *, int),.. int
3bd0: 20 28 2a 78 52 65 6c 65 61 73 65 29 28 73 71 6c (*xRelease)(sql
3be0: 69 74 65 33 5f 76 74 61 62 20 2a 2c 20 69 6e 74 ite3_vtab *, int
3bf0: 29 2c 0d 0a 20 20 69 6e 74 20 28 2a 78 52 6f 6c ),.. int (*xRol
3c00: 6c 62 61 63 6b 54 6f 29 28 73 71 6c 69 74 65 33 lbackTo)(sqlite3
3c10: 5f 76 74 61 62 20 2a 2c 20 69 6e 74 29 2c 0d 0a _vtab *, int),..
3c20: 20 20 76 6f 69 64 20 2a 70 43 6c 69 65 6e 74 44 void *pClientD
3c30: 61 74 61 2c 0d 0a 20 20 76 6f 69 64 28 2a 78 44 ata,.. void(*xD
3c40: 65 73 74 72 6f 79 4d 6f 64 75 6c 65 29 28 76 6f estroyModule)(vo
3c50: 69 64 2a 29 0d 0a 29 7b 0d 0a 20 20 69 66 20 28 id*)..){.. if (
3c60: 21 70 4d 6f 64 75 6c 65 29 20 72 65 74 75 72 6e !pModule) return
3c70: 20 30 3b 0d 0a 20 20 6d 65 6d 73 65 74 28 70 4d 0;.. memset(pM
3c80: 6f 64 75 6c 65 2c 20 30 2c 20 73 69 7a 65 6f 66 odule, 0, sizeof
3c90: 28 2a 70 4d 6f 64 75 6c 65 29 29 3b 0d 0a 20 20 (*pModule));..
3ca0: 70 4d 6f 64 75 6c 65 2d 3e 69 56 65 72 73 69 6f pModule->iVersio
3cb0: 6e 20 3d 20 69 56 65 72 73 69 6f 6e 3b 0d 0a 20 n = iVersion;..
3cc0: 20 70 4d 6f 64 75 6c 65 2d 3e 78 43 72 65 61 74 pModule->xCreat
3cd0: 65 20 3d 20 78 43 72 65 61 74 65 3b 0d 0a 20 20 e = xCreate;..
3ce0: 70 4d 6f 64 75 6c 65 2d 3e 78 43 6f 6e 6e 65 63 pModule->xConnec
3cf0: 74 20 3d 20 78 43 6f 6e 6e 65 63 74 3b 0d 0a 20 t = xConnect;..
3d00: 20 70 4d 6f 64 75 6c 65 2d 3e 78 42 65 73 74 49 pModule->xBestI
3d10: 6e 64 65 78 20 3d 20 78 42 65 73 74 49 6e 64 65 ndex = xBestInde
3d20: 78 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 x;.. pModule->x
3d30: 44 69 73 63 6f 6e 6e 65 63 74 20 3d 20 78 44 69 Disconnect = xDi
3d40: 73 63 6f 6e 6e 65 63 74 3b 0d 0a 20 20 70 4d 6f sconnect;.. pMo
3d50: 64 75 6c 65 2d 3e 78 44 65 73 74 72 6f 79 20 3d dule->xDestroy =
3d60: 20 78 44 65 73 74 72 6f 79 3b 0d 0a 20 20 70 4d xDestroy;.. pM
3d70: 6f 64 75 6c 65 2d 3e 78 4f 70 65 6e 20 3d 20 78 odule->xOpen = x
3d80: 4f 70 65 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 Open;.. pModule
3d90: 2d 3e 78 43 6c 6f 73 65 20 3d 20 78 43 6c 6f 73 ->xClose = xClos
3da0: 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 e;.. pModule->x
3db0: 46 69 6c 74 65 72 20 3d 20 78 46 69 6c 74 65 72 Filter = xFilter
3dc0: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 4e ;.. pModule->xN
3dd0: 65 78 74 20 3d 20 78 4e 65 78 74 3b 0d 0a 20 20 ext = xNext;..
3de0: 70 4d 6f 64 75 6c 65 2d 3e 78 45 6f 66 20 3d 20 pModule->xEof =
3df0: 78 45 6f 66 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 xEof;.. pModule
3e00: 2d 3e 78 43 6f 6c 75 6d 6e 20 3d 20 78 43 6f 6c ->xColumn = xCol
3e10: 75 6d 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d umn;.. pModule-
3e20: 3e 78 52 6f 77 69 64 20 3d 20 78 52 6f 77 69 64 >xRowid = xRowid
3e30: 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 55 ;.. pModule->xU
3e40: 70 64 61 74 65 20 3d 20 78 55 70 64 61 74 65 3b pdate = xUpdate;
3e50: 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d 3e 78 42 65 .. pModule->xBe
3e60: 67 69 6e 20 3d 20 78 42 65 67 69 6e 3b 0d 0a 20 gin = xBegin;..
3e70: 20 70 4d 6f 64 75 6c 65 2d 3e 78 53 79 6e 63 20 pModule->xSync
3e80: 3d 20 78 53 79 6e 63 3b 0d 0a 20 20 70 4d 6f 64 = xSync;.. pMod
3e90: 75 6c 65 2d 3e 78 43 6f 6d 6d 69 74 20 3d 20 78 ule->xCommit = x
3ea0: 43 6f 6d 6d 69 74 3b 0d 0a 20 20 70 4d 6f 64 75 Commit;.. pModu
3eb0: 6c 65 2d 3e 78 52 6f 6c 6c 62 61 63 6b 20 3d 20 le->xRollback =
3ec0: 78 52 6f 6c 6c 62 61 63 6b 3b 0d 0a 20 20 70 4d xRollback;.. pM
3ed0: 6f 64 75 6c 65 2d 3e 78 46 69 6e 64 46 75 6e 63 odule->xFindFunc
3ee0: 74 69 6f 6e 20 3d 20 78 46 69 6e 64 46 75 6e 63 tion = xFindFunc
3ef0: 74 69 6f 6e 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 tion;.. pModule
3f00: 2d 3e 78 52 65 6e 61 6d 65 20 3d 20 78 52 65 6e ->xRename = xRen
3f10: 61 6d 65 3b 0d 0a 20 20 70 4d 6f 64 75 6c 65 2d ame;.. pModule-
3f20: 3e 78 53 61 76 65 70 6f 69 6e 74 20 3d 20 78 53 >xSavepoint = xS
3f30: 61 76 65 70 6f 69 6e 74 3b 0d 0a 20 20 70 4d 6f avepoint;.. pMo
3f40: 64 75 6c 65 2d 3e 78 52 65 6c 65 61 73 65 20 3d dule->xRelease =
3f50: 20 78 52 65 6c 65 61 73 65 3b 0d 0a 20 20 70 4d xRelease;.. pM
3f60: 6f 64 75 6c 65 2d 3e 78 52 6f 6c 6c 62 61 63 6b odule->xRollback
3f70: 54 6f 20 3d 20 78 52 6f 6c 6c 62 61 63 6b 54 6f To = xRollbackTo
3f80: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 ;.. return sqli
3f90: 74 65 33 5f 63 72 65 61 74 65 5f 64 69 73 70 6f te3_create_dispo
3fa0: 73 61 62 6c 65 5f 6d 6f 64 75 6c 65 28 64 62 2c sable_module(db,
3fb0: 20 7a 4e 61 6d 65 2c 20 70 4d 6f 64 75 6c 65 2c zName, pModule,
3fc0: 20 70 43 6c 69 65 6e 74 44 61 74 61 2c 20 78 44 pClientData, xD
3fd0: 65 73 74 72 6f 79 4d 6f 64 75 6c 65 29 3b 0d 0a estroyModule);..
3fe0: 7d 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a 53 51 4c }..#endif....SQL
3ff0: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
4000: 50 49 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f PI sqlite3_bind_
4010: 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 73 double_interop(s
4020: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
4030: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f 75 t, int iCol, dou
4040: 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 ble *val)..{..
4050: 69 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e if (!val) return
4060: 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d 0a SQLITE_ERROR;..
4070: 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 return sqlite3
4080: 5f 62 69 6e 64 5f 64 6f 75 62 6c 65 28 73 74 6d _bind_double(stm
4090: 74 2c 69 43 6f 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d t,iCol,*val);..}
40a0: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 ....SQLITE_API i
40b0: 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 nt WINAPI sqlite
40c0: 33 5f 62 69 6e 64 5f 69 6e 74 36 34 5f 69 6e 74 3_bind_int64_int
40d0: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d erop(sqlite3_stm
40e0: 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f t *stmt, int iCo
40f0: 6c 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 l, sqlite_int64
4100: 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 *val)..{.. if (
4110: 21 76 61 6c 29 20 72 65 74 75 72 6e 20 53 51 4c !val) return SQL
4120: 49 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 72 65 ITE_ERROR;.. re
4130: 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e turn sqlite3_bin
4140: 64 5f 69 6e 74 36 34 28 73 74 6d 74 2c 69 43 6f d_int64(stmt,iCo
4150: 6c 2c 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 l,*val);..}....S
4160: 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 QLITE_API const
4170: 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 char * WINAPI sq
4180: 6c 69 74 65 33 5f 62 69 6e 64 5f 70 61 72 61 6d lite3_bind_param
4190: 65 74 65 72 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f eter_name_intero
41a0: 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a p(sqlite3_stmt *
41b0: 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 stmt, int iCol,
41c0: 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 int *plen)..{..
41d0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 76 61 const char *pva
41e0: 6c 20 3d 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 l = sqlite3_bind
41f0: 5f 70 61 72 61 6d 65 74 65 72 5f 6e 61 6d 65 28 _parameter_name(
4200: 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 stmt, iCol);..
4210: 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 if (plen) *plen
4220: 3d 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 = pval ? strlen(
4230: 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 pval) : 0;.. re
4240: 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d turn pval;..}...
4250: 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 .SQLITE_API cons
4260: 74 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 t char * WINAPI
4270: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e sqlite3_column_n
4280: 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ame_interop(sqli
4290: 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 te3_stmt *stmt,
42a0: 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 int iCol, int *p
42b0: 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 len)..{.. const
42c0: 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 char *pval = sq
42d0: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d lite3_column_nam
42e0: 65 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a e(stmt, iCol);..
42f0: 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 if (plen) *ple
4300: 6e 20 3d 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 n = pval ? strle
4310: 6e 28 70 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 n(pval) : 0;..
4320: 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d return pval;..}.
4330: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 6f ...SQLITE_API co
4340: 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 nst void * WINAP
4350: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e I sqlite3_column
4360: 5f 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 _name16_interop(
4370: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 sqlite3_stmt *st
4380: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e mt, int iCol, in
4390: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 t *plen)..{.. c
43a0: 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 onst void *pval
43b0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e = sqlite3_column
43c0: 5f 6e 61 6d 65 31 36 28 73 74 6d 74 2c 20 69 43 _name16(stmt, iC
43d0: 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e ol);.. if (plen
43e0: 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 6c 20 3f ) *plen = pval ?
43f0: 20 77 63 73 6c 65 6e 28 28 77 63 68 61 72 5f 74 wcslen((wchar_t
4400: 20 2a 29 70 76 61 6c 29 20 2a 20 73 69 7a 65 6f *)pval) * sizeo
4410: 66 28 77 63 68 61 72 5f 74 29 20 3a 20 30 3b 0d f(wchar_t) : 0;.
4420: 0a 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d . return pval;.
4430: 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 .}....SQLITE_API
4440: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49 const char * WI
4450: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c NAPI sqlite3_col
4460: 75 6d 6e 5f 64 65 63 6c 74 79 70 65 5f 69 6e 74 umn_decltype_int
4470: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d erop(sqlite3_stm
4480: 74 20 2a 73 74 6d 74 2c 20 69 6e 74 20 69 43 6f t *stmt, int iCo
4490: 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b l, int *plen)..{
44a0: 0d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a .. const char *
44b0: 70 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 pval = sqlite3_c
44c0: 6f 6c 75 6d 6e 5f 64 65 63 6c 74 79 70 65 28 73 olumn_decltype(s
44d0: 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 tmt, iCol);.. i
44e0: 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d f (plen) *plen =
44f0: 20 70 76 61 6c 20 3f 20 73 74 72 6c 65 6e 28 70 pval ? strlen(p
4500: 76 61 6c 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 val) : 0;.. ret
4510: 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a urn pval;..}....
4520: 53 51 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 SQLITE_API const
4530: 20 76 6f 69 64 20 2a 20 57 49 4e 41 50 49 20 73 void * WINAPI s
4540: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 65 qlite3_column_de
4550: 63 6c 74 79 70 65 31 36 5f 69 6e 74 65 72 6f 70 cltype16_interop
4560: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
4570: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 tmt, int iCol, i
4580: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 nt *plen)..{..
4590: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c const void *pval
45a0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d = sqlite3_colum
45b0: 6e 5f 64 65 63 6c 74 79 70 65 31 36 28 73 74 6d n_decltype16(stm
45c0: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 t, iCol);.. if
45d0: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 (plen) *plen = p
45e0: 76 61 6c 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 val ? wcslen((wc
45f0: 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 har_t *)pval) *
4600: 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20 sizeof(wchar_t)
4610: 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 : 0;.. return p
4620: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 val;..}....SQLIT
4630: 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 E_API void WINAP
4640: 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e I sqlite3_column
4650: 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 72 6f 70 28 _double_interop(
4660: 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 sqlite3_stmt *st
4670: 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 64 6f mt, int iCol, do
4680: 75 62 6c 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 uble *val)..{..
4690: 20 69 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 if (!val) retur
46a0: 6e 3b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c n;.. *val = sql
46b0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 ite3_column_doub
46c0: 6c 65 28 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a le(stmt,iCol);..
46d0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
46e0: 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 void WINAPI sqli
46f0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 te3_column_int64
4700: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
4710: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 _stmt *stmt, int
4720: 20 69 43 6f 6c 2c 20 73 71 6c 69 74 65 5f 69 6e iCol, sqlite_in
4730: 74 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 t64 *val)..{..
4740: 69 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e if (!val) return
4750: 3b 0d 0a 20 20 2a 76 61 6c 20 3d 20 73 71 6c 69 ;.. *val = sqli
4760: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 te3_column_int64
4770: 28 73 74 6d 74 2c 69 43 6f 6c 29 3b 0d 0a 7d 0d (stmt,iCol);..}.
4780: 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 76 6f ...SQLITE_API vo
4790: 69 64 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 id WINAPI sqlite
47a0: 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 3_last_insert_ro
47b0: 77 69 64 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 wid_interop(sqli
47c0: 74 65 33 20 2a 64 62 2c 20 73 71 6c 69 74 65 5f te3 *db, sqlite_
47d0: 69 6e 74 36 34 20 2a 72 6f 77 49 64 29 0d 0a 7b int64 *rowId)..{
47e0: 0d 0a 20 20 69 66 20 28 21 72 6f 77 49 64 29 20 .. if (!rowId)
47f0: 72 65 74 75 72 6e 3b 0d 0a 20 20 2a 72 6f 77 49 return;.. *rowI
4800: 64 20 3d 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 d = sqlite3_last
4810: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 64 62 _insert_rowid(db
4820: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f );..}....SQLITE_
4830: 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 API void WINAPI
4840: 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 75 sqlite3_memory_u
4850: 73 65 64 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 sed_interop(sqli
4860: 74 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74 65 73 te_int64 *nBytes
4870: 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 6e 42 79 )..{.. if (!nBy
4880: 74 65 73 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 tes) return;..
4890: 2a 6e 42 79 74 65 73 20 3d 20 73 71 6c 69 74 65 *nBytes = sqlite
48a0: 33 5f 6d 65 6d 6f 72 79 5f 75 73 65 64 28 29 3b 3_memory_used();
48b0: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
48c0: 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 73 71 I void WINAPI sq
48d0: 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 lite3_memory_hig
48e0: 68 77 61 74 65 72 5f 69 6e 74 65 72 6f 70 28 69 hwater_interop(i
48f0: 6e 74 20 72 65 73 65 74 46 6c 61 67 2c 20 73 71 nt resetFlag, sq
4900: 6c 69 74 65 5f 69 6e 74 36 34 20 2a 6e 42 79 74 lite_int64 *nByt
4910: 65 73 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 6e es)..{.. if (!n
4920: 42 79 74 65 73 29 20 72 65 74 75 72 6e 3b 0d 0a Bytes) return;..
4930: 20 20 2a 6e 42 79 74 65 73 20 3d 20 73 71 6c 69 *nBytes = sqli
4940: 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 te3_memory_highw
4950: 61 74 65 72 28 72 65 73 65 74 46 6c 61 67 29 3b ater(resetFlag);
4960: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
4970: 49 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 I const unsigned
4980: 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 char * WINAPI s
4990: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 qlite3_column_te
49a0: 78 74 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 xt_interop(sqlit
49b0: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 e3_stmt *stmt, i
49c0: 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c nt iCol, int *pl
49d0: 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 en)..{.. const
49e0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70 unsigned char *p
49f0: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f val = sqlite3_co
4a00: 6c 75 6d 6e 5f 74 65 78 74 28 73 74 6d 74 2c 20 lumn_text(stmt,
4a10: 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c iCol);.. if (pl
4a20: 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 en) *plen = sqli
4a30: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 te3_column_bytes
4a40: 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 (stmt, iCol);..
4a50: 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a 7d return pval;..}
4a60: 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 63 ....SQLITE_API c
4a70: 6f 6e 73 74 20 76 6f 69 64 20 2a 20 57 49 4e 41 onst void * WINA
4a80: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d PI sqlite3_colum
4a90: 6e 5f 74 65 78 74 31 36 5f 69 6e 74 65 72 6f 70 n_text16_interop
4aa0: 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 (sqlite3_stmt *s
4ab0: 74 6d 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 tmt, int iCol, i
4ac0: 6e 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 nt *plen)..{..
4ad0: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c const void *pval
4ae0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d = sqlite3_colum
4af0: 6e 5f 74 65 78 74 31 36 28 73 74 6d 74 2c 20 69 n_text16(stmt, i
4b00: 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 Col);.. if (ple
4b10: 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 n) *plen = sqlit
4b20: 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 31 e3_column_bytes1
4b30: 36 28 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 6(stmt, iCol);..
4b40: 20 20 72 65 74 75 72 6e 20 70 76 61 6c 3b 0d 0a return pval;..
4b50: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
4b60: 69 6e 74 20 57 49 4e 41 50 49 20 73 71 6c 69 74 int WINAPI sqlit
4b70: 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 e3_finalize_inte
4b80: 72 6f 70 28 73 71 6c 69 74 65 33 5f 73 74 6d 74 rop(sqlite3_stmt
4b90: 20 2a 73 74 6d 74 29 0d 0a 7b 0d 0a 20 20 69 6e *stmt)..{.. in
4ba0: 74 20 72 65 74 3b 0d 0a 23 69 66 20 21 64 65 66 t ret;..#if !def
4bb0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 4c 45 47 ined(INTEROP_LEG
4bc0: 41 43 59 5f 43 4c 4f 53 45 29 20 26 26 20 53 51 ACY_CLOSE) && SQ
4bd0: 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e 55 4d LITE_VERSION_NUM
4be0: 42 45 52 20 3e 3d 20 33 30 30 37 30 31 34 0d 0a BER >= 3007014..
4bf0: 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e ..#if defined(IN
4c00: 54 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 TEROP_DEBUG) &&
4c10: 28 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 (INTEROP_DEBUG &
4c20: 20 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 46 INTEROP_DEBUG_F
4c30: 49 4e 41 4c 49 5a 45 29 0d 0a 20 20 56 64 62 65 INALIZE).. Vdbe
4c40: 20 2a 70 20 3d 20 28 56 64 62 65 20 2a 29 73 74 *p = (Vdbe *)st
4c50: 6d 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a mt;.. sqlite3 *
4c60: 64 62 20 3d 20 70 20 3f 20 70 2d 3e 64 62 20 3a db = p ? p->db :
4c70: 20 30 3b 0d 0a 20 20 73 71 6c 69 74 65 33 49 6e 0;.. sqlite3In
4c80: 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c 69 teropDebug("sqli
4c90: 74 65 33 5f 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 te3_finalize_int
4ca0: 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 erop(): calling
4cb0: 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 sqlite3_finalize
4cc0: 28 25 70 2c 20 25 70 29 2e 2e 2e 5c 6e 22 2c 20 (%p, %p)...\n",
4cd0: 64 62 2c 20 73 74 6d 74 29 3b 0d 0a 23 65 6e 64 db, stmt);..#end
4ce0: 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d 20 73 71 if.... ret = sq
4cf0: 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 73 lite3_finalize(s
4d00: 74 6d 74 29 3b 0d 0a 0d 0a 23 69 66 20 64 65 66 tmt);....#if def
4d10: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 ined(INTEROP_DEB
4d20: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f UG) && (INTEROP_
4d30: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f DEBUG & INTEROP_
4d40: 44 45 42 55 47 5f 46 49 4e 41 4c 49 5a 45 29 0d DEBUG_FINALIZE).
4d50: 0a 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f . sqlite3Intero
4d60: 70 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f pDebug("sqlite3_
4d70: 66 69 6e 61 6c 69 7a 65 5f 69 6e 74 65 72 6f 70 finalize_interop
4d80: 28 29 3a 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 (): sqlite3_fina
4d90: 6c 69 7a 65 28 25 70 2c 20 25 70 29 20 72 65 74 lize(%p, %p) ret
4da0: 75 72 6e 65 64 20 25 64 2e 5c 6e 22 2c 20 64 62 urned %d.\n", db
4db0: 2c 20 73 74 6d 74 2c 20 72 65 74 29 3b 0d 0a 23 , stmt, ret);..#
4dc0: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 75 72 endif.... retur
4dd0: 6e 20 72 65 74 3b 0d 0a 23 65 6c 73 65 0d 0a 20 n ret;..#else..
4de0: 20 56 64 62 65 20 2a 70 3b 0d 0a 20 20 72 65 74 Vdbe *p;.. ret
4df0: 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d = SQLITE_OK;...
4e00: 0a 20 20 70 20 3d 20 28 56 64 62 65 20 2a 29 73 . p = (Vdbe *)s
4e10: 74 6d 74 3b 0d 0a 20 20 69 66 20 28 70 29 0d 0a tmt;.. if (p)..
4e20: 20 20 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 {.. sqlite3
4e30: 20 2a 64 62 20 3d 20 70 2d 3e 64 62 3b 0d 0a 0d *db = p->db;...
4e40: 0a 20 20 20 20 69 66 20 28 64 62 20 21 3d 20 4e . if (db != N
4e50: 55 4c 4c 29 0d 0a 20 20 20 20 20 20 73 71 6c 69 ULL).. sqli
4e60: 74 65 33 5f 6d 75 74 65 78 5f 65 6e 74 65 72 28 te3_mutex_enter(
4e70: 64 62 2d 3e 6d 75 74 65 78 29 3b 0d 0a 0d 0a 20 db->mutex);....
4e80: 20 20 20 69 66 20 28 28 70 2d 3e 6d 61 67 69 63 if ((p->magic
4e90: 20 3d 3d 20 56 44 42 45 5f 4d 41 47 49 43 5f 44 == VDBE_MAGIC_D
4ea0: 45 41 44 29 20 26 26 20 28 64 62 20 3d 3d 20 4e EAD) && (db == N
4eb0: 55 4c 4c 29 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 ULL)).. {..
4ec0: 20 20 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 sqlite3DbFre
4ed0: 65 5f 69 6e 74 65 72 6f 70 28 64 62 2c 20 70 29 e_interop(db, p)
4ee0: 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 65 6c ;.. }.. el
4ef0: 73 65 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 se.. {..
4f00: 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f 66 ret = sqlite3_f
4f10: 69 6e 61 6c 69 7a 65 28 73 74 6d 74 29 3b 0d 0a inalize(stmt);..
4f20: 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 69 66 20 }.... if
4f30: 28 64 62 20 21 3d 20 4e 55 4c 4c 29 0d 0a 20 20 (db != NULL)..
4f40: 20 20 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 sqlite3_mute
4f50: 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 x_leave(db->mute
4f60: 78 29 3b 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 65 x);.. }.... re
4f70: 74 75 72 6e 20 72 65 74 3b 0d 0a 23 65 6e 64 69 turn ret;..#endi
4f80: 66 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 f..}....SQLITE_A
4f90: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 PI int WINAPI sq
4fa0: 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 69 6e lite3_backup_fin
4fb0: 69 73 68 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 ish_interop(sqli
4fc0: 74 65 33 5f 62 61 63 6b 75 70 20 2a 70 29 0d 0a te3_backup *p)..
4fd0: 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 0d {.. int ret;...
4fe0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
4ff0: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 EROP_DEBUG) && (
5000: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 INTEROP_DEBUG &
5010: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 42 41 INTEROP_DEBUG_BA
5020: 43 4b 55 50 5f 46 49 4e 49 53 48 29 0d 0a 20 20 CKUP_FINISH)..
5030: 73 71 6c 69 74 65 33 2a 20 70 44 65 73 74 44 62 sqlite3* pDestDb
5040: 20 3d 20 70 20 3f 20 70 2d 3e 70 44 65 73 74 44 = p ? p->pDestD
5050: 62 20 3a 20 30 3b 0d 0a 20 20 73 71 6c 69 74 65 b : 0;.. sqlite
5060: 33 2a 20 70 53 72 63 44 62 20 3d 20 70 20 3f 20 3* pSrcDb = p ?
5070: 70 2d 3e 70 53 72 63 44 62 20 3a 20 30 3b 0d 0a p->pSrcDb : 0;..
5080: 20 20 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 sqlite3Interop
5090: 44 65 62 75 67 28 22 73 71 6c 69 74 65 33 5f 62 Debug("sqlite3_b
50a0: 61 63 6b 75 70 5f 66 69 6e 69 73 68 5f 69 6e 74 ackup_finish_int
50b0: 65 72 6f 70 28 29 3a 20 63 61 6c 6c 69 6e 67 20 erop(): calling
50c0: 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f 66 sqlite3_backup_f
50d0: 69 6e 69 73 68 28 25 70 2c 20 25 70 2c 20 25 70 inish(%p, %p, %p
50e0: 29 2e 2e 2e 5c 6e 22 2c 20 70 44 65 73 74 44 62 )...\n", pDestDb
50f0: 2c 20 70 53 72 63 44 62 2c 20 70 29 3b 0d 0a 23 , pSrcDb, p);..#
5100: 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 20 3d endif.... ret =
5110: 20 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 5f sqlite3_backup_
5120: 66 69 6e 69 73 68 28 70 29 3b 0d 0a 0d 0a 23 69 finish(p);....#i
5130: 66 20 64 65 66 69 6e 65 64 28 49 4e 54 45 52 4f f defined(INTERO
5140: 50 5f 44 45 42 55 47 29 20 26 26 20 28 49 4e 54 P_DEBUG) && (INT
5150: 45 52 4f 50 5f 44 45 42 55 47 20 26 20 49 4e 54 EROP_DEBUG & INT
5160: 45 52 4f 50 5f 44 45 42 55 47 5f 42 41 43 4b 55 EROP_DEBUG_BACKU
5170: 50 5f 46 49 4e 49 53 48 29 0d 0a 20 20 73 71 6c P_FINISH).. sql
5180: 69 74 65 33 49 6e 74 65 72 6f 70 44 65 62 75 67 ite3InteropDebug
5190: 28 22 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 70 ("sqlite3_backup
51a0: 5f 66 69 6e 69 73 68 5f 69 6e 74 65 72 6f 70 28 _finish_interop(
51b0: 29 3a 20 73 71 6c 69 74 65 33 5f 62 61 63 6b 75 ): sqlite3_backu
51c0: 70 5f 66 69 6e 69 73 68 28 25 70 2c 20 25 70 2c p_finish(%p, %p,
51d0: 20 25 70 29 20 72 65 74 75 72 6e 65 64 20 25 64 %p) returned %d
51e0: 2e 5c 6e 22 2c 20 70 44 65 73 74 44 62 2c 20 70 .\n", pDestDb, p
51f0: 53 72 63 44 62 2c 20 70 2c 20 72 65 74 29 3b 0d SrcDb, p, ret);.
5200: 0a 23 65 6e 64 69 66 0d 0a 0d 0a 20 20 72 65 74 .#endif.... ret
5210: 75 72 6e 20 72 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 urn ret;..}....S
5220: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 QLITE_API int WI
5230: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 72 65 73 NAPI sqlite3_res
5240: 65 74 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 et_interop(sqlit
5250: 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 29 0d 0a e3_stmt *stmt)..
5260: 7b 0d 0a 20 20 69 6e 74 20 72 65 74 3b 0d 0a 23 {.. int ret;..#
5270: 69 66 20 21 64 65 66 69 6e 65 64 28 49 4e 54 45 if !defined(INTE
5280: 52 4f 50 5f 4c 45 47 41 43 59 5f 43 4c 4f 53 45 ROP_LEGACY_CLOSE
5290: 29 20 26 26 20 53 51 4c 49 54 45 5f 56 45 52 53 ) && SQLITE_VERS
52a0: 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 ION_NUMBER >= 30
52b0: 30 37 30 31 34 0d 0a 0d 0a 23 69 66 20 64 65 66 07014....#if def
52c0: 69 6e 65 64 28 49 4e 54 45 52 4f 50 5f 44 45 42 ined(INTEROP_DEB
52d0: 55 47 29 20 26 26 20 28 49 4e 54 45 52 4f 50 5f UG) && (INTEROP_
52e0: 44 45 42 55 47 20 26 20 49 4e 54 45 52 4f 50 5f DEBUG & INTEROP_
52f0: 44 45 42 55 47 5f 52 45 53 45 54 29 0d 0a 20 20 DEBUG_RESET)..
5300: 73 71 6c 69 74 65 33 49 6e 74 65 72 6f 70 44 65 sqlite3InteropDe
5310: 62 75 67 28 22 73 71 6c 69 74 65 33 5f 72 65 73 bug("sqlite3_res
5320: 65 74 5f 69 6e 74 65 72 6f 70 28 29 3a 20 63 61 et_interop(): ca
5330: 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 72 65 lling sqlite3_re
5340: 73 65 74 28 25 70 29 2e 2e 2e 5c 6e 22 2c 20 73 set(%p)...\n", s
5350: 74 6d 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d tmt);..#endif...
5360: 0a 20 20 72 65 74 20 3d 20 73 71 6c 69 74 65 33 . ret = sqlite3
5370: 5f 72 65 73 65 74 28 73 74 6d 74 29 3b 0d 0a 0d _reset(stmt);...
5380: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 49 4e 54 .#if defined(INT
5390: 45 52 4f 50 5f 44 45 42 55 47 29 20 26 26 20 28 EROP_DEBUG) && (
53a0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 20 26 20 INTEROP_DEBUG &
53b0: 49 4e 54 45 52 4f 50 5f 44 45 42 55 47 5f 52 45 INTEROP_DEBUG_RE
53c0: 53 45 54 29 0d 0a 20 20 73 71 6c 69 74 65 33 49 SET).. sqlite3I
53d0: 6e 74 65 72 6f 70 44 65 62 75 67 28 22 73 71 6c nteropDebug("sql
53e0: 69 74 65 33 5f 72 65 73 65 74 5f 69 6e 74 65 72 ite3_reset_inter
53f0: 6f 70 28 29 3a 20 73 71 6c 69 74 65 33 5f 72 65 op(): sqlite3_re
5400: 73 65 74 28 25 70 29 20 72 65 74 75 72 6e 65 64 set(%p) returned
5410: 20 25 64 2e 5c 6e 22 2c 20 73 74 6d 74 2c 20 72 %d.\n", stmt, r
5420: 65 74 29 3b 0d 0a 23 65 6e 64 69 66 0d 0a 0d 0a et);..#endif....
5430: 20 20 72 65 74 75 72 6e 20 72 65 74 3b 0d 0a 23 return ret;..#
5440: 65 6c 73 65 0d 0a 20 20 69 66 20 28 73 74 6d 74 else.. if (stmt
5450: 20 26 26 20 28 28 56 64 62 65 20 2a 29 73 74 6d && ((Vdbe *)stm
5460: 74 29 2d 3e 6d 61 67 69 63 20 3d 3d 20 56 44 42 t)->magic == VDB
5470: 45 5f 4d 41 47 49 43 5f 44 45 41 44 29 20 72 65 E_MAGIC_DEAD) re
5480: 74 75 72 6e 20 53 51 4c 49 54 45 5f 53 43 48 45 turn SQLITE_SCHE
5490: 4d 41 3b 0d 0a 20 20 72 65 74 20 3d 20 73 71 6c MA;.. ret = sql
54a0: 69 74 65 33 5f 72 65 73 65 74 28 73 74 6d 74 29 ite3_reset(stmt)
54b0: 3b 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 3b ;.. return ret;
54c0: 0d 0a 23 65 6e 64 69 66 0d 0a 7d 0d 0a 0d 0a 53 ..#endif..}....S
54d0: 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 QLITE_API int WI
54e0: 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 63 72 65 NAPI sqlite3_cre
54f0: 61 74 65 5f 66 75 6e 63 74 69 6f 6e 5f 69 6e 74 ate_function_int
5500: 65 72 6f 70 28 73 71 6c 69 74 65 33 20 2a 70 73 erop(sqlite3 *ps
5510: 71 6c 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a ql, const char *
5520: 7a 46 75 6e 63 74 69 6f 6e 4e 61 6d 65 2c 20 69 zFunctionName, i
5530: 6e 74 20 6e 41 72 67 2c 20 69 6e 74 20 65 54 65 nt nArg, int eTe
5540: 78 74 52 65 70 2c 20 76 6f 69 64 20 2a 70 76 55 xtRep, void *pvU
5550: 73 65 72 2c 20 53 51 4c 49 54 45 55 53 45 52 46 ser, SQLITEUSERF
5560: 55 4e 43 20 66 75 6e 63 2c 20 53 51 4c 49 54 45 UNC func, SQLITE
5570: 55 53 45 52 46 55 4e 43 20 66 75 6e 63 73 74 65 USERFUNC funcste
5580: 70 2c 20 53 51 4c 49 54 45 46 55 4e 43 46 49 4e p, SQLITEFUNCFIN
5590: 41 4c 20 66 75 6e 63 66 69 6e 61 6c 2c 20 69 6e AL funcfinal, in
55a0: 74 20 6e 65 65 64 43 6f 6c 6c 53 65 71 29 0d 0a t needCollSeq)..
55b0: 7b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 {.. int n;....
55c0: 20 69 66 20 28 65 54 65 78 74 52 65 70 20 3d 3d if (eTextRep ==
55d0: 20 53 51 4c 49 54 45 5f 55 54 46 31 36 29 0d 0a SQLITE_UTF16)..
55e0: 20 20 20 20 65 54 65 78 74 52 65 70 20 3d 20 53 eTextRep = S
55f0: 51 4c 49 54 45 5f 55 54 46 31 36 4e 41 54 49 56 QLITE_UTF16NATIV
5600: 45 3b 0d 0a 0d 0a 20 20 6e 20 3d 20 73 71 6c 69 E;.... n = sqli
5610: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 te3_create_funct
5620: 69 6f 6e 28 70 73 71 6c 2c 20 7a 46 75 6e 63 74 ion(psql, zFunct
5630: 69 6f 6e 4e 61 6d 65 2c 20 6e 41 72 67 2c 20 65 ionName, nArg, e
5640: 54 65 78 74 52 65 70 2c 20 70 76 55 73 65 72 2c TextRep, pvUser,
5650: 20 66 75 6e 63 2c 20 66 75 6e 63 73 74 65 70 2c func, funcstep,
5660: 20 66 75 6e 63 66 69 6e 61 6c 29 3b 0d 0a 20 20 funcfinal);..
5670: 69 66 20 28 6e 20 3d 3d 20 53 51 4c 49 54 45 5f if (n == SQLITE_
5680: 4f 4b 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 OK).. {.. if
5690: 20 28 6e 65 65 64 43 6f 6c 6c 53 65 71 29 0d 0a (needCollSeq)..
56a0: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 46 75 6e {.. Fun
56b0: 63 44 65 66 20 2a 70 46 75 6e 63 20 3d 20 73 71 cDef *pFunc = sq
56c0: 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69 6f lite3FindFunctio
56d0: 6e 28 70 73 71 6c 2c 20 7a 46 75 6e 63 74 69 6f n(psql, zFunctio
56e0: 6e 4e 61 6d 65 2c 20 73 74 72 6c 65 6e 28 7a 46 nName, strlen(zF
56f0: 75 6e 63 74 69 6f 6e 4e 61 6d 65 29 2c 20 6e 41 unctionName), nA
5700: 72 67 2c 20 65 54 65 78 74 52 65 70 2c 20 30 29 rg, eTextRep, 0)
5710: 3b 0d 0a 20 20 20 20 20 20 69 66 28 20 70 46 75 ;.. if( pFu
5720: 6e 63 20 29 0d 0a 20 20 20 20 20 20 7b 0d 0a 23 nc ).. {..#
5730: 69 66 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f if SQLITE_VERSIO
5740: 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 38 N_NUMBER >= 3008
5750: 30 30 31 0d 0a 20 20 20 20 20 20 20 20 70 46 75 001.. pFu
5760: 6e 63 2d 3e 66 75 6e 63 46 6c 61 67 73 20 7c 3d nc->funcFlags |=
5770: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 45 SQLITE_FUNC_NEE
5780: 44 43 4f 4c 4c 3b 0d 0a 23 65 6c 73 65 0d 0a 20 DCOLL;..#else..
5790: 20 20 20 20 20 20 20 70 46 75 6e 63 2d 3e 66 6c pFunc->fl
57a0: 61 67 73 20 7c 3d 20 53 51 4c 49 54 45 5f 46 55 ags |= SQLITE_FU
57b0: 4e 43 5f 4e 45 45 44 43 4f 4c 4c 3b 0d 0a 23 65 NC_NEEDCOLL;..#e
57c0: 6e 64 69 66 0d 0a 20 20 20 20 20 20 7d 0d 0a 20 ndif.. }..
57d0: 20 20 20 7d 0d 0a 20 20 7d 0d 0a 0d 0a 20 20 72 }.. }.... r
57e0: 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d 0a 53 eturn n;..}....S
57f0: 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 QLITE_API void W
5800: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 76 61 INAPI sqlite3_va
5810: 6c 75 65 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 72 lue_double_inter
5820: 6f 70 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 op(sqlite3_value
5830: 20 2a 70 76 61 6c 2c 20 64 6f 75 62 6c 65 20 2a *pval, double *
5840: 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 val)..{.. if (!
5850: 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 val) return;..
5860: 2a 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 *val = sqlite3_v
5870: 61 6c 75 65 5f 64 6f 75 62 6c 65 28 70 76 61 6c alue_double(pval
5880: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f );..}....SQLITE_
5890: 41 50 49 20 76 6f 69 64 20 57 49 4e 41 50 49 20 API void WINAPI
58a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e sqlite3_value_in
58b0: 74 36 34 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 t64_interop(sqli
58c0: 74 65 33 5f 76 61 6c 75 65 20 2a 70 76 61 6c 2c te3_value *pval,
58d0: 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 76 sqlite_int64 *v
58e0: 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 76 al)..{.. if (!v
58f0: 61 6c 29 20 72 65 74 75 72 6e 3b 0d 0a 20 20 2a al) return;.. *
5900: 76 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 val = sqlite3_va
5910: 6c 75 65 5f 69 6e 74 36 34 28 70 76 61 6c 29 3b lue_int64(pval);
5920: 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 ..}....SQLITE_AP
5930: 49 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 I const unsigned
5940: 20 63 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 char * WINAPI s
5950: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 qlite3_value_tex
5960: 74 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 t_interop(sqlite
5970: 33 5f 76 61 6c 75 65 20 2a 76 61 6c 2c 20 69 6e 3_value *val, in
5980: 74 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 t *plen)..{.. c
5990: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 onst unsigned ch
59a0: 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 ar *pval = sqlit
59b0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 76 61 e3_value_text(va
59c0: 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e 29 l);.. if (plen)
59d0: 20 2a 70 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 *plen = sqlite3
59e0: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 76 61 6c _value_bytes(val
59f0: 29 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 );.. return pva
5a00: 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f l;..}....SQLITE_
5a10: 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a API const void *
5a20: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
5a30: 76 61 6c 75 65 5f 74 65 78 74 31 36 5f 69 6e 74 value_text16_int
5a40: 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 76 61 6c erop(sqlite3_val
5a50: 75 65 20 2a 76 61 6c 2c 20 69 6e 74 20 2a 70 6c ue *val, int *pl
5a60: 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 en)..{.. const
5a70: 76 6f 69 64 20 2a 70 76 61 6c 20 3d 20 73 71 6c void *pval = sql
5a80: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 31 ite3_value_text1
5a90: 36 28 76 61 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6(val);.. if (p
5aa0: 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 73 71 6c len) *plen = sql
5ab0: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 ite3_value_bytes
5ac0: 31 36 28 76 61 6c 29 3b 0d 0a 20 20 72 65 74 75 16(val);.. retu
5ad0: 72 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 rn pval;..}....S
5ae0: 51 4c 49 54 45 5f 41 50 49 20 76 6f 69 64 20 57 QLITE_API void W
5af0: 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 72 65 INAPI sqlite3_re
5b00: 73 75 6c 74 5f 64 6f 75 62 6c 65 5f 69 6e 74 65 sult_double_inte
5b10: 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 rop(sqlite3_cont
5b20: 65 78 74 20 2a 70 63 74 78 2c 20 64 6f 75 62 6c ext *pctx, doubl
5b30: 65 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 69 66 e *val)..{.. if
5b40: 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e 3b 0d (!val) return;.
5b50: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c . sqlite3_resul
5b60: 74 5f 64 6f 75 62 6c 65 28 70 63 74 78 2c 20 2a t_double(pctx, *
5b70: 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 val);..}....SQLI
5b80: 54 45 5f 41 50 49 20 76 6f 69 64 20 57 49 4e 41 TE_API void WINA
5b90: 50 49 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c PI sqlite3_resul
5ba0: 74 5f 69 6e 74 36 34 5f 69 6e 74 65 72 6f 70 28 t_int64_interop(
5bb0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 sqlite3_context
5bc0: 2a 70 63 74 78 2c 20 73 71 6c 69 74 65 5f 69 6e *pctx, sqlite_in
5bd0: 74 36 34 20 2a 76 61 6c 29 0d 0a 7b 0d 0a 20 20 t64 *val)..{..
5be0: 69 66 20 28 21 76 61 6c 29 20 72 65 74 75 72 6e if (!val) return
5bf0: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 ;.. sqlite3_res
5c00: 75 6c 74 5f 69 6e 74 36 34 28 70 63 74 78 2c 20 ult_int64(pctx,
5c10: 2a 76 61 6c 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c *val);..}....SQL
5c20: 49 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 ITE_API int WINA
5c30: 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 PI sqlite3_conte
5c40: 78 74 5f 63 6f 6c 6c 63 6f 6d 70 61 72 65 5f 69 xt_collcompare_i
5c50: 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 5f 63 nterop(sqlite3_c
5c60: 6f 6e 74 65 78 74 20 2a 63 74 78 2c 20 63 6f 6e ontext *ctx, con
5c70: 73 74 20 76 6f 69 64 20 2a 70 31 2c 20 69 6e 74 st void *p1, int
5c80: 20 70 31 6c 65 6e 2c 20 63 6f 6e 73 74 20 76 6f p1len, const vo
5c90: 69 64 20 2a 70 32 2c 20 69 6e 74 20 70 32 6c 65 id *p2, int p2le
5ca0: 6e 29 0d 0a 7b 0d 0a 20 20 69 66 20 28 21 63 74 n)..{.. if (!ct
5cb0: 78 20 7c 7c 20 21 63 74 78 2d 3e 70 46 75 6e 63 x || !ctx->pFunc
5cc0: 20 7c 7c 20 21 63 74 78 2d 3e 70 43 6f 6c 6c 20 || !ctx->pColl
5cd0: 7c 7c 20 21 63 74 78 2d 3e 70 43 6f 6c 6c 2d 3e || !ctx->pColl->
5ce0: 78 43 6d 70 29 20 72 65 74 75 72 6e 20 33 3b 20 xCmp) return 3;
5cf0: 2f 2a 20 45 52 52 4f 52 20 2a 2f 0d 0a 23 69 66 /* ERROR */..#if
5d00: 20 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f SQLITE_VERSION_
5d10: 4e 55 4d 42 45 52 20 3e 3d 20 33 30 30 38 30 30 NUMBER >= 300800
5d20: 31 0d 0a 20 20 69 66 20 28 28 63 74 78 2d 3e 70 1.. if ((ctx->p
5d30: 46 75 6e 63 2d 3e 66 75 6e 63 46 6c 61 67 73 20 Func->funcFlags
5d40: 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4e 45 & SQLITE_FUNC_NE
5d50: 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 72 65 EDCOLL) == 0) re
5d60: 74 75 72 6e 20 32 3b 20 2f 2a 20 45 52 52 4f 52 turn 2; /* ERROR
5d70: 20 2a 2f 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 */..#else.. if
5d80: 20 28 28 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 ((ctx->pFunc->f
5d90: 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 lags & SQLITE_FU
5da0: 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 NC_NEEDCOLL) ==
5db0: 30 29 20 72 65 74 75 72 6e 20 32 3b 20 2f 2a 20 0) return 2; /*
5dc0: 45 52 52 4f 52 20 2a 2f 0d 0a 23 65 6e 64 69 66 ERROR */..#endif
5dd0: 0d 0a 20 20 72 65 74 75 72 6e 20 63 74 78 2d 3e .. return ctx->
5de0: 70 43 6f 6c 6c 2d 3e 78 43 6d 70 28 63 74 78 2d pColl->xCmp(ctx-
5df0: 3e 70 43 6f 6c 6c 2d 3e 70 55 73 65 72 2c 20 70 >pColl->pUser, p
5e00: 31 6c 65 6e 2c 20 70 31 2c 20 70 32 6c 65 6e 2c 1len, p1, p2len,
5e10: 20 70 32 29 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 p2);..}....SQLI
5e20: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 TE_API const cha
5e30: 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 r * WINAPI sqlit
5e40: 65 33 5f 63 6f 6e 74 65 78 74 5f 63 6f 6c 6c 73 e3_context_colls
5e50: 65 71 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 eq_interop(sqlit
5e60: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c e3_context *ctx,
5e70: 20 69 6e 74 20 2a 70 74 79 70 65 2c 20 69 6e 74 int *ptype, int
5e80: 20 2a 65 6e 63 2c 20 69 6e 74 20 2a 70 6c 65 6e *enc, int *plen
5e90: 29 0d 0a 7b 0d 0a 20 20 43 6f 6c 6c 53 65 71 20 )..{.. CollSeq
5ea0: 2a 70 43 6f 6c 6c 20 3d 20 63 74 78 20 3f 20 63 *pColl = ctx ? c
5eb0: 74 78 2d 3e 70 43 6f 6c 6c 20 3a 20 30 3b 0d 0a tx->pColl : 0;..
5ec0: 20 20 69 66 20 28 70 74 79 70 65 29 20 2a 70 74 if (ptype) *pt
5ed0: 79 70 65 20 3d 20 30 3b 0d 0a 20 20 69 66 20 28 ype = 0;.. if (
5ee0: 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 30 3b plen) *plen = 0;
5ef0: 0d 0a 20 20 69 66 20 28 65 6e 63 29 20 2a 65 6e .. if (enc) *en
5f00: 63 20 3d 20 30 3b 0d 0a 0d 0a 20 20 69 66 20 28 c = 0;.... if (
5f10: 21 63 74 78 20 7c 7c 20 21 63 74 78 2d 3e 70 46 !ctx || !ctx->pF
5f20: 75 6e 63 29 20 72 65 74 75 72 6e 20 4e 55 4c 4c unc) return NULL
5f30: 3b 0d 0a 23 69 66 20 53 51 4c 49 54 45 5f 56 45 ;..#if SQLITE_VE
5f40: 52 53 49 4f 4e 5f 4e 55 4d 42 45 52 20 3e 3d 20 RSION_NUMBER >=
5f50: 33 30 30 38 30 30 31 0d 0a 20 20 69 66 20 28 28 3008001.. if ((
5f60: 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 75 6e 63 ctx->pFunc->func
5f70: 46 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 Flags & SQLITE_F
5f80: 55 4e 43 5f 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d UNC_NEEDCOLL) ==
5f90: 20 30 29 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0) return NULL;
5fa0: 0d 0a 23 65 6c 73 65 0d 0a 20 20 69 66 20 28 28 ..#else.. if ((
5fb0: 63 74 78 2d 3e 70 46 75 6e 63 2d 3e 66 6c 61 67 ctx->pFunc->flag
5fc0: 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f s & SQLITE_FUNC_
5fd0: 4e 45 45 44 43 4f 4c 4c 29 20 3d 3d 20 30 29 20 NEEDCOLL) == 0)
5fe0: 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0d 0a 23 65 return NULL;..#e
5ff0: 6e 64 69 66 0d 0a 0d 0a 20 20 69 66 20 28 70 43 ndif.... if (pC
6000: 6f 6c 6c 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 oll).. {.. i
6010: 66 20 28 65 6e 63 29 20 2a 65 6e 63 20 3d 20 70 f (enc) *enc = p
6020: 43 6f 6c 6c 2d 3e 65 6e 63 3b 0d 0a 23 69 66 20 Coll->enc;..#if
6030: 53 51 4c 49 54 45 5f 56 45 52 53 49 4f 4e 5f 4e SQLITE_VERSION_N
6040: 55 4d 42 45 52 20 3c 20 33 30 30 37 30 31 30 0d UMBER < 3007010.
6050: 0a 20 20 20 20 69 66 20 28 70 74 79 70 65 29 20 . if (ptype)
6060: 2a 70 74 79 70 65 20 3d 20 70 43 6f 6c 6c 2d 3e *ptype = pColl->
6070: 74 79 70 65 3b 0d 0a 23 65 6e 64 69 66 0d 0a 20 type;..#endif..
6080: 20 20 20 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c if (plen) *pl
6090: 65 6e 20 3d 20 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d en = pColl->zNam
60a0: 65 20 3f 20 73 74 72 6c 65 6e 28 70 43 6f 6c 6c e ? strlen(pColl
60b0: 2d 3e 7a 4e 61 6d 65 29 20 3a 20 30 3b 0d 0a 0d ->zName) : 0;...
60c0: 0a 20 20 20 20 72 65 74 75 72 6e 20 70 43 6f 6c . return pCol
60d0: 6c 2d 3e 7a 4e 61 6d 65 3b 0d 0a 20 20 7d 0d 0a l->zName;.. }..
60e0: 20 20 72 65 74 75 72 6e 20 4e 55 4c 4c 3b 0d 0a return NULL;..
60f0: 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 }....SQLITE_API
6100: 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 57 49 4e const char * WIN
6110: 41 50 49 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 API sqlite3_colu
6120: 6d 6e 5f 64 61 74 61 62 61 73 65 5f 6e 61 6d 65 mn_database_name
6130: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
6140: 5f 73 74 6d 74 20 2a 73 74 6d 74 2c 20 69 6e 74 _stmt *stmt, int
6150: 20 69 43 6f 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e iCol, int *plen
6160: 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 74 20 63 68 )..{.. const ch
6170: 61 72 20 2a 70 76 61 6c 20 3d 20 73 71 6c 69 74 ar *pval = sqlit
6180: 65 33 5f 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 e3_column_databa
6190: 73 65 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 69 43 se_name(stmt, iC
61a0: 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c 65 6e ol);.. if (plen
61b0: 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 6c 20 3f ) *plen = pval ?
61c0: 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 3a 20 strlen(pval) :
61d0: 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 76 61 0;.. return pva
61e0: 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f l;..}....SQLITE_
61f0: 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a API const void *
6200: 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f WINAPI sqlite3_
6210: 63 6f 6c 75 6d 6e 5f 64 61 74 61 62 61 73 65 5f column_database_
6220: 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 name16_interop(s
6230: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
6240: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 t, int iCol, int
6250: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f *plen)..{.. co
6260: 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d nst void *pval =
6270: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
6280: 64 61 74 61 62 61 73 65 5f 6e 61 6d 65 31 36 28 database_name16(
6290: 73 74 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 stmt, iCol);..
62a0: 69 66 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 if (plen) *plen
62b0: 3d 20 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e 28 = pval ? wcslen(
62c0: 28 77 63 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 (wchar_t *)pval)
62d0: 20 2a 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f * sizeof(wchar_
62e0: 74 29 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 t) : 0;.. retur
62f0: 6e 20 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 n pval;..}....SQ
6300: 4c 49 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 LITE_API const c
6310: 68 61 72 20 2a 20 57 49 4e 41 50 49 20 73 71 6c har * WINAPI sql
6320: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c ite3_column_tabl
6330: 65 5f 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 e_name_interop(s
6340: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
6350: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 t, int iCol, int
6360: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f *plen)..{.. co
6370: 6e 73 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d nst char *pval =
6380: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
6390: 74 61 62 6c 65 5f 6e 61 6d 65 28 73 74 6d 74 2c table_name(stmt,
63a0: 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 iCol);.. if (p
63b0: 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 len) *plen = pva
63c0: 6c 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 l ? strlen(pval)
63d0: 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 : 0;.. return
63e0: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 pval;..}....SQLI
63f0: 54 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 TE_API const voi
6400: 64 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 d * WINAPI sqlit
6410: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 61 62 6c 65 5f e3_column_table_
6420: 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 name16_interop(s
6430: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
6440: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 t, int iCol, int
6450: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f *plen)..{.. co
6460: 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d nst void *pval =
6470: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
6480: 74 61 62 6c 65 5f 6e 61 6d 65 31 36 28 73 74 6d table_name16(stm
6490: 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 t, iCol);.. if
64a0: 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 (plen) *plen = p
64b0: 76 61 6c 20 3f 20 77 63 73 6c 65 6e 28 28 77 63 val ? wcslen((wc
64c0: 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a 20 har_t *)pval) *
64d0: 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 20 sizeof(wchar_t)
64e0: 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 : 0;.. return p
64f0: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 val;..}....SQLIT
6500: 45 5f 41 50 49 20 63 6f 6e 73 74 20 63 68 61 72 E_API const char
6510: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 * WINAPI sqlite
6520: 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 3_column_origin_
6530: 6e 61 6d 65 5f 69 6e 74 65 72 6f 70 28 73 71 6c name_interop(sql
6540: 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d 74 2c ite3_stmt *stmt,
6550: 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 20 2a int iCol, int *
6560: 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f 6e 73 plen)..{.. cons
6570: 74 20 63 68 61 72 20 2a 70 76 61 6c 20 3d 20 73 t char *pval = s
6580: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 qlite3_column_or
6590: 69 67 69 6e 5f 6e 61 6d 65 28 73 74 6d 74 2c 20 igin_name(stmt,
65a0: 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 20 28 70 6c iCol);.. if (pl
65b0: 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 70 76 61 6c en) *plen = pval
65c0: 20 3f 20 73 74 72 6c 65 6e 28 70 76 61 6c 29 20 ? strlen(pval)
65d0: 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 70 : 0;.. return p
65e0: 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 val;..}....SQLIT
65f0: 45 5f 41 50 49 20 63 6f 6e 73 74 20 76 6f 69 64 E_API const void
6600: 20 2a 20 57 49 4e 41 50 49 20 73 71 6c 69 74 65 * WINAPI sqlite
6610: 33 5f 63 6f 6c 75 6d 6e 5f 6f 72 69 67 69 6e 5f 3_column_origin_
6620: 6e 61 6d 65 31 36 5f 69 6e 74 65 72 6f 70 28 73 name16_interop(s
6630: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 73 74 6d qlite3_stmt *stm
6640: 74 2c 20 69 6e 74 20 69 43 6f 6c 2c 20 69 6e 74 t, int iCol, int
6650: 20 2a 70 6c 65 6e 29 0d 0a 7b 0d 0a 20 20 63 6f *plen)..{.. co
6660: 6e 73 74 20 76 6f 69 64 20 2a 70 76 61 6c 20 3d nst void *pval =
6670: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
6680: 6f 72 69 67 69 6e 5f 6e 61 6d 65 31 36 28 73 74 origin_name16(st
6690: 6d 74 2c 20 69 43 6f 6c 29 3b 0d 0a 20 20 69 66 mt, iCol);.. if
66a0: 20 28 70 6c 65 6e 29 20 2a 70 6c 65 6e 20 3d 20 (plen) *plen =
66b0: 70 76 61 6c 20 3f 20 77 63 73 6c 65 6e 28 28 77 pval ? wcslen((w
66c0: 63 68 61 72 5f 74 20 2a 29 70 76 61 6c 29 20 2a char_t *)pval) *
66d0: 20 73 69 7a 65 6f 66 28 77 63 68 61 72 5f 74 29 sizeof(wchar_t)
66e0: 20 3a 20 30 3b 0d 0a 20 20 72 65 74 75 72 6e 20 : 0;.. return
66f0: 70 76 61 6c 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 pval;..}....SQLI
6700: 54 45 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 TE_API int WINAP
6710: 49 20 73 71 6c 69 74 65 33 5f 74 61 62 6c 65 5f I sqlite3_table_
6720: 63 6f 6c 75 6d 6e 5f 6d 65 74 61 64 61 74 61 5f column_metadata_
6730: 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 20 interop(sqlite3
6740: 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 *db, const char
6750: 2a 7a 44 62 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 *zDbName, const
6760: 63 68 61 72 20 2a 7a 54 61 62 6c 65 4e 61 6d 65 char *zTableName
6770: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 43 , const char *zC
6780: 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 63 68 61 72 20 olumnName, char
6790: 2a 2a 70 7a 44 61 74 61 54 79 70 65 2c 20 63 68 **pzDataType, ch
67a0: 61 72 20 2a 2a 70 7a 43 6f 6c 6c 53 65 71 2c 20 ar **pzCollSeq,
67b0: 69 6e 74 20 2a 70 4e 6f 74 4e 75 6c 6c 2c 20 69 int *pNotNull, i
67c0: 6e 74 20 2a 70 50 72 69 6d 61 72 79 4b 65 79 2c nt *pPrimaryKey,
67d0: 20 69 6e 74 20 2a 70 41 75 74 6f 69 6e 63 2c 20 int *pAutoinc,
67e0: 69 6e 74 20 2a 70 64 74 4c 65 6e 2c 20 69 6e 74 int *pdtLen, int
67f0: 20 2a 70 63 73 4c 65 6e 29 0d 0a 7b 0d 0a 20 20 *pcsLen)..{..
6800: 69 6e 74 20 6e 3b 0d 0a 0d 0a 20 20 6e 20 3d 20 int n;.... n =
6810: 73 71 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63 6f sqlite3_table_co
6820: 6c 75 6d 6e 5f 6d 65 74 61 64 61 74 61 28 64 62 lumn_metadata(db
6830: 2c 20 7a 44 62 4e 61 6d 65 2c 20 7a 54 61 62 6c , zDbName, zTabl
6840: 65 4e 61 6d 65 2c 20 7a 43 6f 6c 75 6d 6e 4e 61 eName, zColumnNa
6850: 6d 65 2c 20 70 7a 44 61 74 61 54 79 70 65 2c 20 me, pzDataType,
6860: 70 7a 43 6f 6c 6c 53 65 71 2c 20 70 4e 6f 74 4e pzCollSeq, pNotN
6870: 75 6c 6c 2c 20 70 50 72 69 6d 61 72 79 4b 65 79 ull, pPrimaryKey
6880: 2c 20 70 41 75 74 6f 69 6e 63 29 3b 0d 0a 0d 0a , pAutoinc);....
6890: 20 20 69 66 20 28 70 64 74 4c 65 6e 29 20 2a 70 if (pdtLen) *p
68a0: 64 74 4c 65 6e 20 3d 20 28 70 7a 44 61 74 61 54 dtLen = (pzDataT
68b0: 79 70 65 20 26 26 20 2a 70 7a 44 61 74 61 54 79 ype && *pzDataTy
68c0: 70 65 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a pe) ? strlen(*pz
68d0: 44 61 74 61 54 79 70 65 29 20 3a 20 30 3b 0d 0a DataType) : 0;..
68e0: 20 20 69 66 20 28 70 63 73 4c 65 6e 29 20 2a 70 if (pcsLen) *p
68f0: 63 73 4c 65 6e 20 3d 20 28 70 7a 43 6f 6c 6c 53 csLen = (pzCollS
6900: 65 71 20 26 26 20 2a 70 7a 43 6f 6c 6c 53 65 71 eq && *pzCollSeq
6910: 29 20 3f 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f ) ? strlen(*pzCo
6920: 6c 6c 53 65 71 29 20 3a 20 30 3b 0d 0a 0d 0a 20 llSeq) : 0;....
6930: 20 72 65 74 75 72 6e 20 6e 3b 0d 0a 7d 0d 0a 0d return n;..}...
6940: 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 6e 74 20 .SQLITE_API int
6950: 57 49 4e 41 50 49 20 73 71 6c 69 74 65 33 5f 69 WINAPI sqlite3_i
6960: 6e 64 65 78 5f 63 6f 6c 75 6d 6e 5f 69 6e 66 6f ndex_column_info
6970: 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 65 33 _interop(sqlite3
6980: 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 *db, const char
6990: 20 2a 7a 44 62 2c 20 63 6f 6e 73 74 20 63 68 61 *zDb, const cha
69a0: 72 20 2a 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 63 r *zIndexName, c
69b0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 43 6f 6c 75 onst char *zColu
69c0: 6d 6e 4e 61 6d 65 2c 20 69 6e 74 20 2a 73 6f 72 mnName, int *sor
69d0: 74 4f 72 64 65 72 2c 20 69 6e 74 20 2a 6f 6e 45 tOrder, int *onE
69e0: 72 72 6f 72 2c 20 63 68 61 72 20 2a 2a 70 7a 43 rror, char **pzC
69f0: 6f 6c 6c 2c 20 69 6e 74 20 2a 70 6c 65 6e 29 0d oll, int *plen).
6a00: 0a 7b 0d 0a 20 20 49 6e 64 65 78 20 2a 70 49 64 .{.. Index *pId
6a10: 78 3b 0d 0a 20 20 54 61 62 6c 65 20 2a 70 54 61 x;.. Table *pTa
6a20: 62 3b 0d 0a 20 20 69 6e 74 20 6e 3b 0d 0a 0d 0a b;.. int n;....
6a30: 20 20 69 66 20 28 21 64 62 29 20 72 65 74 75 72 if (!db) retur
6a40: 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0d n SQLITE_ERROR;.
6a50: 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 . sqlite3_mutex
6a60: 5f 65 6e 74 65 72 28 64 62 2d 3e 6d 75 74 65 78 _enter(db->mutex
6a70: 29 3b 0d 0a 20 20 73 71 6c 69 74 65 33 42 74 72 );.. sqlite3Btr
6a80: 65 65 45 6e 74 65 72 41 6c 6c 28 64 62 29 3b 0d eeEnterAll(db);.
6a90: 0a 0d 0a 20 20 70 49 64 78 20 3d 20 73 71 6c 69 ... pIdx = sqli
6aa0: 74 65 33 46 69 6e 64 49 6e 64 65 78 28 64 62 2c te3FindIndex(db,
6ab0: 20 7a 49 6e 64 65 78 4e 61 6d 65 2c 20 7a 44 62 zIndexName, zDb
6ac0: 29 3b 0d 0a 0d 0a 20 20 73 71 6c 69 74 65 33 42 );.... sqlite3B
6ad0: 74 72 65 65 4c 65 61 76 65 41 6c 6c 28 64 62 29 treeLeaveAll(db)
6ae0: 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 ;.. sqlite3_mut
6af0: 65 78 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 ex_leave(db->mut
6b00: 65 78 29 3b 0d 0a 0d 0a 20 20 69 66 20 28 21 70 ex);.... if (!p
6b10: 49 64 78 29 20 72 65 74 75 72 6e 20 53 51 4c 49 Idx) return SQLI
6b20: 54 45 5f 45 52 52 4f 52 3b 0d 0a 0d 0a 20 20 70 TE_ERROR;.... p
6b30: 54 61 62 20 3d 20 70 49 64 78 2d 3e 70 54 61 62 Tab = pIdx->pTab
6b40: 6c 65 3b 0d 0a 20 20 66 6f 72 20 28 6e 20 3d 20 le;.. for (n =
6b50: 30 3b 20 6e 20 3c 20 70 49 64 78 2d 3e 6e 43 6f 0; n < pIdx->nCo
6b60: 6c 75 6d 6e 3b 20 6e 2b 2b 29 0d 0a 20 20 7b 0d lumn; n++).. {.
6b70: 0a 20 20 20 20 69 6e 74 20 63 6e 75 6d 20 3d 20 . int cnum =
6b80: 70 49 64 78 2d 3e 61 69 43 6f 6c 75 6d 6e 5b 6e pIdx->aiColumn[n
6b90: 5d 3b 0d 0a 20 20 20 20 69 66 20 28 73 71 6c 69 ];.. if (sqli
6ba0: 74 65 33 53 74 72 49 43 6d 70 28 70 54 61 62 2d te3StrICmp(pTab-
6bb0: 3e 61 43 6f 6c 5b 63 6e 75 6d 5d 2e 7a 4e 61 6d >aCol[cnum].zNam
6bc0: 65 2c 20 7a 43 6f 6c 75 6d 6e 4e 61 6d 65 29 20 e, zColumnName)
6bd0: 3d 3d 20 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 == 0).. {..
6be0: 20 20 20 20 69 66 20 28 20 73 6f 72 74 4f 72 64 if ( sortOrd
6bf0: 65 72 20 29 20 2a 73 6f 72 74 4f 72 64 65 72 20 er ) *sortOrder
6c00: 3d 20 70 49 64 78 2d 3e 61 53 6f 72 74 4f 72 64 = pIdx->aSortOrd
6c10: 65 72 5b 6e 5d 3b 0d 0a 20 20 20 20 20 20 69 66 er[n];.. if
6c20: 20 28 20 70 7a 43 6f 6c 6c 20 29 20 2a 70 7a 43 ( pzColl ) *pzC
6c30: 6f 6c 6c 20 3d 20 70 49 64 78 2d 3e 61 7a 43 6f oll = pIdx->azCo
6c40: 6c 6c 5b 6e 5d 3b 0d 0a 20 20 20 20 20 20 69 66 ll[n];.. if
6c50: 20 28 20 70 6c 65 6e 20 29 20 2a 70 6c 65 6e 20 ( plen ) *plen
6c60: 3d 20 73 74 72 6c 65 6e 28 2a 70 7a 43 6f 6c 6c = strlen(*pzColl
6c70: 29 3b 0d 0a 20 20 20 20 20 20 69 66 20 28 20 6f );.. if ( o
6c80: 6e 45 72 72 6f 72 20 29 20 2a 6f 6e 45 72 72 6f nError ) *onErro
6c90: 72 20 3d 20 70 49 64 78 2d 3e 6f 6e 45 72 72 6f r = pIdx->onErro
6ca0: 72 3b 0d 0a 0d 0a 20 20 20 20 20 20 72 65 74 75 r;.... retu
6cb0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 20 rn SQLITE_OK;..
6cc0: 20 20 20 7d 0d 0a 20 20 7d 0d 0a 20 20 72 65 74 }.. }.. ret
6cd0: 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 urn SQLITE_ERROR
6ce0: 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 5f 41 ;..}....SQLITE_A
6cf0: 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 73 71 PI int WINAPI sq
6d00: 6c 69 74 65 33 5f 74 61 62 6c 65 5f 63 75 72 73 lite3_table_curs
6d10: 6f 72 5f 69 6e 74 65 72 6f 70 28 73 71 6c 69 74 or_interop(sqlit
6d20: 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d 74 2c 20 e3_stmt *pstmt,
6d30: 69 6e 74 20 69 44 62 2c 20 50 67 6e 6f 20 74 61 int iDb, Pgno ta
6d40: 62 6c 65 52 6f 6f 74 50 61 67 65 29 0d 0a 7b 0d bleRootPage)..{.
6d50: 0a 20 20 56 64 62 65 20 2a 70 20 3d 20 28 56 64 . Vdbe *p = (Vd
6d60: 62 65 20 2a 29 70 73 74 6d 74 3b 0d 0a 20 20 73 be *)pstmt;.. s
6d70: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 28 70 20 qlite3 *db = (p
6d80: 3d 3d 20 4e 55 4c 4c 29 20 3f 20 4e 55 4c 4c 20 == NULL) ? NULL
6d90: 3a 20 70 2d 3e 64 62 3b 0d 0a 20 20 69 6e 74 20 : p->db;.. int
6da0: 6e 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20 n;.. int ret =
6db0: 2d 31 3b 20 2f 2a 20 4e 4f 54 20 46 4f 55 4e 44 -1; /* NOT FOUND
6dc0: 20 2a 2f 0d 0a 0d 0a 20 20 69 66 20 28 21 70 20 */.... if (!p
6dd0: 7c 7c 20 21 64 62 29 20 72 65 74 75 72 6e 20 72 || !db) return r
6de0: 65 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d et;.. sqlite3_m
6df0: 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d utex_enter(db->m
6e00: 75 74 65 78 29 3b 0d 0a 20 20 66 6f 72 20 28 6e utex);.. for (n
6e10: 20 3d 20 30 3b 20 6e 20 3c 20 70 2d 3e 6e 43 75 = 0; n < p->nCu
6e20: 72 73 6f 72 20 26 26 20 70 2d 3e 61 70 43 73 72 rsor && p->apCsr
6e30: 5b 6e 5d 20 21 3d 20 4e 55 4c 4c 3b 20 6e 2b 2b [n] != NULL; n++
6e40: 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 20 28 ).. {.. if (
6e50: 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 69 73 54 p->apCsr[n]->isT
6e60: 61 62 6c 65 20 3d 3d 20 46 41 4c 53 45 29 20 63 able == FALSE) c
6e70: 6f 6e 74 69 6e 75 65 3b 0d 0a 20 20 20 20 69 66 ontinue;.. if
6e80: 20 28 70 2d 3e 61 70 43 73 72 5b 6e 5d 2d 3e 69 (p->apCsr[n]->i
6e90: 44 62 20 21 3d 20 69 44 62 29 20 63 6f 6e 74 69 Db != iDb) conti
6ea0: 6e 75 65 3b 0d 0a 20 20 20 20 69 66 20 28 70 2d nue;.. if (p-
6eb0: 3e 61 70 43 73 72 5b 6e 5d 2d 3e 70 43 75 72 73 >apCsr[n]->pCurs
6ec0: 6f 72 2d 3e 70 67 6e 6f 52 6f 6f 74 20 3d 3d 20 or->pgnoRoot ==
6ed0: 74 61 62 6c 65 52 6f 6f 74 50 61 67 65 29 0d 0a tableRootPage)..
6ee0: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 74 {.. ret
6ef0: 20 3d 20 6e 3b 0d 0a 20 20 20 20 20 20 62 72 65 = n;.. bre
6f00: 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 7d 0d ak;.. }.. }.
6f10: 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 . sqlite3_mutex
6f20: 5f 6c 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 _leave(db->mutex
6f30: 29 3b 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 );.... return r
6f40: 65 74 3b 0d 0a 7d 0d 0a 0d 0a 53 51 4c 49 54 45 et;..}....SQLITE
6f50: 5f 41 50 49 20 69 6e 74 20 57 49 4e 41 50 49 20 _API int WINAPI
6f60: 73 71 6c 69 74 65 33 5f 63 75 72 73 6f 72 5f 72 sqlite3_cursor_r
6f70: 6f 77 69 64 5f 69 6e 74 65 72 6f 70 28 73 71 6c owid_interop(sql
6f80: 69 74 65 33 5f 73 74 6d 74 20 2a 70 73 74 6d 74 ite3_stmt *pstmt
6f90: 2c 20 69 6e 74 20 63 75 72 73 6f 72 2c 20 73 71 , int cursor, sq
6fa0: 6c 69 74 65 5f 69 6e 74 36 34 20 2a 70 72 6f 77 lite_int64 *prow
6fb0: 69 64 29 0d 0a 7b 0d 0a 20 20 56 64 62 65 20 2a id)..{.. Vdbe *
6fc0: 70 20 3d 20 28 56 64 62 65 20 2a 29 70 73 74 6d p = (Vdbe *)pstm
6fd0: 74 3b 0d 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 t;.. sqlite3 *d
6fe0: 62 20 3d 20 28 70 20 3d 3d 20 4e 55 4c 4c 29 20 b = (p == NULL)
6ff0: 3f 20 4e 55 4c 4c 20 3a 20 70 2d 3e 64 62 3b 0d ? NULL : p->db;.
7000: 0a 20 20 56 64 62 65 43 75 72 73 6f 72 20 2a 70 . VdbeCursor *p
7010: 43 3b 0d 0a 20 20 69 6e 74 20 72 65 74 20 3d 20 C;.. int ret =
7020: 53 51 4c 49 54 45 5f 4f 4b 3b 0d 0a 0d 0a 20 20 SQLITE_OK;....
7030: 69 66 20 28 21 70 20 7c 7c 20 21 64 62 29 20 72 if (!p || !db) r
7040: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 eturn SQLITE_ERR
7050: 4f 52 3b 0d 0a 20 20 73 71 6c 69 74 65 33 5f 6d OR;.. sqlite3_m
7060: 75 74 65 78 5f 65 6e 74 65 72 28 64 62 2d 3e 6d utex_enter(db->m
7070: 75 74 65 78 29 3b 0d 0a 20 20 77 68 69 6c 65 20 utex);.. while
7080: 28 31 29 0d 0a 20 20 7b 0d 0a 20 20 20 20 69 66 (1).. {.. if
7090: 20 28 63 75 72 73 6f 72 20 3c 20 30 20 7c 7c 20 (cursor < 0 ||
70a0: 63 75 72 73 6f 72 20 3e 3d 20 70 2d 3e 6e 43 75 cursor >= p->nCu
70b0: 72 73 6f 72 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 rsor).. {..
70c0: 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 ret = SQLITE
70d0: 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 _ERROR;.. b
70e0: 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 reak;.. }..
70f0: 20 20 69 66 20 28 70 2d 3e 61 70 43 73 72 5b 63 if (p->apCsr[c
7100: 75 72 73 6f 72 5d 20 3d 3d 20 4e 55 4c 4c 29 0d ursor] == NULL).
7110: 0a 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 72 65 . {.. re
7120: 74 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 t = SQLITE_ERROR
7130: 3b 0d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0d ;.. break;.
7140: 0a 20 20 20 20 7d 0d 0a 0d 0a 20 20 20 20 70 43 . }.... pC
7150: 20 3d 20 70 2d 3e 61 70 43 73 72 5b 63 75 72 73 = p->apCsr[curs
7160: 6f 72 5d 3b 0d 0a 0d 0a 20 20 20 20 72 65 74 20 or];.... ret
7170: 3d 20 73 71 6c 69 74 65 33 56 64 62 65 43 75 72 = sqlite3VdbeCur
7180: 73 6f 72 4d 6f 76 65 74 6f 28 70 43 29 3b 0d 0a sorMoveto(pC);..
7190: 20 20 20 20 69 66 28 72 65 74 29 0d 0a 20 20 20 if(ret)..
71a0: 20 20 20 62 72 65 61 6b 3b 0d 0a 0d 0a 20 20 20 break;....
71b0: 20 69 66 28 70 43 2d 3e 72 6f 77 69 64 49 73 56 if(pC->rowidIsV
71c0: 61 6c 69 64 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 alid).. {..
71d0: 20 20 20 20 69 66 20 28 70 72 6f 77 69 64 29 20 if (prowid)
71e0: 2a 70 72 6f 77 69 64 20 3d 20 70 43 2d 3e 6c 61 *prowid = pC->la
71f0: 73 74 52 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d stRowid;.. }.
7200: 0a 20 20 20 20 65 6c 73 65 20 69 66 28 70 43 2d . else if(pC-
7210: 3e 70 73 65 75 64 6f 54 61 62 6c 65 52 65 67 20 >pseudoTableReg
7220: 3e 20 30 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 > 0).. {..
7230: 20 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f ret = SQLITE_
7240: 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 62 72 ERROR;.. br
7250: 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 eak;.. }..
7260: 20 65 6c 73 65 20 69 66 28 70 43 2d 3e 6e 75 6c else if(pC->nul
7270: 6c 52 6f 77 20 7c 7c 20 70 43 2d 3e 70 43 75 72 lRow || pC->pCur
7280: 73 6f 72 3d 3d 30 29 0d 0a 20 20 20 20 7b 0d 0a sor==0).. {..
7290: 20 20 20 20 20 20 72 65 74 20 3d 20 53 51 4c 49 ret = SQLI
72a0: 54 45 5f 45 52 52 4f 52 3b 0d 0a 20 20 20 20 20 TE_ERROR;..
72b0: 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20 7d 0d 0a break;.. }..
72c0: 20 20 20 20 65 6c 73 65 0d 0a 20 20 20 20 7b 0d else.. {.
72d0: 0a 20 20 20 20 20 20 69 66 20 28 70 43 2d 3e 70 . if (pC->p
72e0: 43 75 72 73 6f 72 20 3d 3d 20 4e 55 4c 4c 29 0d Cursor == NULL).
72f0: 0a 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 . {..
7300: 20 20 72 65 74 20 3d 20 53 51 4c 49 54 45 5f 45 ret = SQLITE_E
7310: 52 52 4f 52 3b 0d 0a 20 20 20 20 20 20 20 20 62 RROR;.. b
7320: 72 65 61 6b 3b 0d 0a 20 20 20 20 20 20 7d 0d 0a reak;.. }..
7330: 20 20 20 20 20 20 73 71 6c 69 74 65 33 42 74 72 sqlite3Btr
7340: 65 65 4b 65 79 53 69 7a 65 28 70 43 2d 3e 70 43 eeKeySize(pC->pC
7350: 75 72 73 6f 72 2c 20 70 72 6f 77 69 64 29 3b 0d ursor, prowid);.
7360: 0a 20 20 20 20 20 20 69 66 20 28 70 72 6f 77 69 . if (prowi
7370: 64 29 20 2a 70 72 6f 77 69 64 20 3d 20 2a 70 72 d) *prowid = *pr
7380: 6f 77 69 64 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 owid;.. }..
7390: 20 20 62 72 65 61 6b 3b 0d 0a 20 20 7d 0d 0a 20 break;.. }..
73a0: 20 73 71 6c 69 74 65 33 5f 6d 75 74 65 78 5f 6c sqlite3_mutex_l
73b0: 65 61 76 65 28 64 62 2d 3e 6d 75 74 65 78 29 3b eave(db->mutex);
73c0: 0d 0a 0d 0a 20 20 72 65 74 75 72 6e 20 72 65 74 .... return ret
73d0: 3b 0d 0a 7d 0d 0a 23 65 6e 64 69 66 20 2f 2a 20 ;..}..#endif /*
73e0: 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 20 2a 2f SQLITE_OS_WIN */
73f0: 0d 0a 0d 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ..../***********
7400: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
7410: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
7420: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
7430: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
7440: 2a 2a 2f 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 **/..../*..** Th
7450: 65 20 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45 e INTEROP_TEST_E
7460: 58 54 45 4e 53 49 4f 4e 20 62 6c 6f 63 6b 20 6d XTENSION block m
7470: 75 73 74 20 62 65 20 61 74 20 74 68 65 20 65 6e ust be at the en
7480: 64 20 6f 66 20 74 68 69 73 20 73 6f 75 72 63 65 d of this source
7490: 20 66 69 6c 65 0d 0a 2a 2a 20 62 65 63 61 75 73 file..** becaus
74a0: 65 20 69 74 20 69 6e 63 6c 75 64 65 73 20 74 68 e it includes th
74b0: 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e 68 22 e "sqlite3ext.h"
74c0: 20 66 69 6c 65 2c 20 77 68 69 63 68 20 64 65 66 file, which def
74d0: 69 6e 65 73 20 74 68 65 20 73 71 6c 69 74 65 33 ines the sqlite3
74e0: 0d 0a 2a 2a 20 70 75 62 6c 69 63 20 41 50 49 20 ..** public API
74f0: 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 20 74 function names t
7500: 6f 20 62 65 20 6d 61 63 72 6f 73 20 61 6e 64 20 o be macros and
7510: 74 68 61 74 20 77 6f 75 6c 64 20 63 61 75 73 65 that would cause
7520: 20 74 68 65 20 63 6f 64 65 0d 0a 2a 2a 20 61 62 the code..** ab
7530: 6f 76 65 20 74 68 69 73 20 70 6f 69 6e 74 20 74 ove this point t
7540: 6f 20 6d 61 6c 66 75 6e 63 74 69 6f 6e 2e 0d 0a o malfunction...
7550: 2a 2f 0d 0a 23 69 66 20 64 65 66 69 6e 65 64 28 */..#if defined(
7560: 49 4e 54 45 52 4f 50 5f 54 45 53 54 5f 45 58 54 INTEROP_TEST_EXT
7570: 45 4e 53 49 4f 4e 29 0d 0a 23 69 6e 63 6c 75 64 ENSION)..#includ
7580: 65 20 22 2e 2e 2f 63 6f 72 65 2f 73 71 6c 69 74 e "../core/sqlit
7590: 65 33 65 78 74 2e 68 22 0d 0a 53 51 4c 49 54 45 e3ext.h"..SQLITE
75a0: 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49 54 31 _EXTENSION_INIT1
75b0: 0d 0a 0d 0a 2f 2a 0d 0a 2a 2a 20 54 68 65 20 69 ..../*..** The i
75c0: 6e 74 65 72 6f 70 54 65 73 74 28 29 20 53 51 4c nteropTest() SQL
75d0: 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e function return
75e0: 73 20 69 74 73 20 66 69 72 73 74 20 61 72 67 75 s its first argu
75f0: 6d 65 6e 74 20 6f 72 20 72 61 69 73 65 73 20 61 ment or raises a
7600: 6e 0d 0a 2a 2a 20 65 72 72 6f 72 20 69 66 20 74 n..** error if t
7610: 68 65 72 65 20 61 72 65 20 6e 6f 74 20 65 6e 6f here are not eno
7620: 75 67 68 20 61 72 67 75 6d 65 6e 74 73 2e 0d 0a ugh arguments...
7630: 2a 2f 0d 0a 53 51 4c 49 54 45 5f 50 52 49 56 41 */..SQLITE_PRIVA
7640: 54 45 20 76 6f 69 64 20 69 6e 74 65 72 6f 70 54 TE void interopT
7650: 65 73 74 46 75 6e 63 28 0d 0a 20 20 73 71 6c 69 estFunc(.. sqli
7660: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e te3_context *con
7670: 74 65 78 74 2c 0d 0a 20 20 69 6e 74 20 61 72 67 text,.. int arg
7680: 63 2c 0d 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 c,.. sqlite3_va
7690: 6c 75 65 20 2a 2a 61 72 67 76 0d 0a 29 7b 0d 0a lue **argv..){..
76a0: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 const unsigned
76b0: 20 63 68 61 72 20 2a 7a 3b 0d 0a 20 20 69 66 28 char *z;.. if(
76c0: 20 61 72 67 63 21 3d 31 20 29 7b 0d 0a 20 20 20 argc!=1 ){..
76d0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f sqlite3_result_
76e0: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 error(context, "
76f0: 6e 65 65 64 20 65 78 61 63 74 6c 79 20 6f 6e 65 need exactly one
7700: 20 61 72 67 75 6d 65 6e 74 22 2c 20 2d 31 29 3b argument", -1);
7710: 0d 0a 20 20 20 20 72 65 74 75 72 6e 3b 0d 0a 20 .. return;..
7720: 20 7d 0d 0a 20 20 7a 20 3d 20 73 71 6c 69 74 65 }.. z = sqlite
7730: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 3_value_text(arg
7740: 76 5b 30 5d 29 3b 0d 0a 20 20 69 66 28 20 7a 20 v[0]);.. if( z
7750: 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f ){.. sqlite3_
7760: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 result_text(cont
7770: 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 2d ext, (char*)z, -
7780: 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 1, SQLITE_STATIC
7790: 29 3b 0d 0a 20 20 7d 65 6c 73 65 7b 0d 0a 20 20 );.. }else{..
77a0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 sqlite3_result
77b0: 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0d _null(context);.
77c0: 0a 20 20 7d 0d 0a 7d 0d 0a 0d 0a 2f 2a 0d 0a 2a . }..}..../*..*
77d0: 2a 20 54 68 65 20 69 6e 74 65 72 6f 70 53 6c 65 * The interopSle
77e0: 65 70 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f ep() SQL functio
77f0: 6e 20 77 61 69 74 73 20 74 68 65 20 73 70 65 63 n waits the spec
7800: 69 66 69 65 64 20 6e 75 6d 62 65 72 20 6f 66 20 ified number of
7810: 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 0d 0a 2a 2a milliseconds..**
7820: 20 6f 72 20 72 61 69 73 65 73 20 61 6e 20 65 72 or raises an er
7830: 72 6f 72 20 69 66 20 74 68 65 72 65 20 61 72 65 ror if there are
7840: 20 6e 6f 74 20 65 6e 6f 75 67 68 20 61 72 67 75 not enough argu
7850: 6d 65 6e 74 73 2e 0d 0a 2a 2f 0d 0a 53 51 4c 49 ments...*/..SQLI
7860: 54 45 5f 50 52 49 56 41 54 45 20 76 6f 69 64 20 TE_PRIVATE void
7870: 69 6e 74 65 72 6f 70 53 6c 65 65 70 46 75 6e 63 interopSleepFunc
7880: 28 0d 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e (.. sqlite3_con
7890: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0d 0a text *context,..
78a0: 20 20 69 6e 74 20 61 72 67 63 2c 0d 0a 20 20 73 int argc,.. s
78b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 qlite3_value **a
78c0: 72 67 76 0d 0a 29 7b 0d 0a 20 20 69 6e 74 20 6d rgv..){.. int m
78d0: 3b 0d 0a 20 20 69 66 28 20 61 72 67 63 21 3d 31 ;.. if( argc!=1
78e0: 20 29 7b 0d 0a 20 20 20 20 73 71 6c 69 74 65 33 ){.. sqlite3
78f0: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f _result_error(co
7900: 6e 74 65 78 74 2c 20 22 6e 65 65 64 20 65 78 61 ntext, "need exa
7910: 63 74 6c 79 20 6f 6e 65 20 61 72 67 75 6d 65 6e ctly one argumen
7920: 74 22 2c 20 2d 31 29 3b 0d 0a 20 20 20 20 72 65 t", -1);.. re
7930: 74 75 72 6e 3b 0d 0a 20 20 7d 0d 0a 20 20 6d 20 turn;.. }.. m
7940: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f = sqlite3_value_
7950: 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0d 0a 23 int(argv[0]);..#
7960: 69 66 20 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e if SQLITE_OS_WIN
7970: 43 45 0d 0a 20 20 53 6c 65 65 70 28 6d 29 3b 0d CE.. Sleep(m);.
7980: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c . sqlite3_resul
7990: 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 57 t_int(context, W
79a0: 41 49 54 5f 4f 42 4a 45 43 54 5f 30 29 3b 0d 0a AIT_OBJECT_0);..
79b0: 23 65 6c 73 65 0d 0a 20 20 73 71 6c 69 74 65 33 #else.. sqlite3
79c0: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 _result_int(cont
79d0: 65 78 74 2c 20 53 6c 65 65 70 45 78 28 6d 2c 20 ext, SleepEx(m,
79e0: 54 52 55 45 29 29 3b 0d 0a 23 65 6e 64 69 66 0d TRUE));..#endif.
79f0: 0a 7d 0d 0a 0d 0a 2f 2a 20 53 51 4c 69 74 65 20 .}..../* SQLite
7a00: 69 6e 76 6f 6b 65 73 20 74 68 69 73 20 72 6f 75 invokes this rou
7a10: 74 69 6e 65 20 6f 6e 63 65 20 77 68 65 6e 20 69 tine once when i
7a20: 74 20 6c 6f 61 64 73 20 74 68 65 20 65 78 74 65 t loads the exte
7a30: 6e 73 69 6f 6e 2e 0d 0a 2a 2a 20 43 72 65 61 74 nsion...** Creat
7a40: 65 20 6e 65 77 20 66 75 6e 63 74 69 6f 6e 73 2c e new functions,
7a50: 20 63 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 collating seque
7a60: 6e 63 65 73 2c 20 61 6e 64 20 76 69 72 74 75 61 nces, and virtua
7a70: 6c 20 74 61 62 6c 65 0d 0a 2a 2a 20 6d 6f 64 75 l table..** modu
7a80: 6c 65 73 20 68 65 72 65 2e 20 20 54 68 69 73 20 les here. This
7a90: 69 73 20 75 73 75 61 6c 6c 79 20 74 68 65 20 6f is usually the o
7aa0: 6e 6c 79 20 65 78 70 6f 72 74 65 64 20 73 79 6d nly exported sym
7ab0: 62 6f 6c 20 69 6e 0d 0a 2a 2a 20 74 68 65 20 73 bol in..** the s
7ac0: 68 61 72 65 64 20 6c 69 62 72 61 72 79 2e 0d 0a hared library...
7ad0: 2a 2f 0d 0a 53 51 4c 49 54 45 5f 41 50 49 20 69 */..SQLITE_API i
7ae0: 6e 74 20 69 6e 74 65 72 6f 70 5f 74 65 73 74 5f nt interop_test_
7af0: 65 78 74 65 6e 73 69 6f 6e 5f 69 6e 69 74 28 0d extension_init(.
7b00: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 2c 0d . sqlite3 *db,.
7b10: 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d . char **pzErrM
7b20: 73 67 2c 0d 0a 20 20 63 6f 6e 73 74 20 73 71 6c sg,.. const sql
7b30: 69 74 65 33 5f 61 70 69 5f 72 6f 75 74 69 6e 65 ite3_api_routine
7b40: 73 20 2a 70 41 70 69 0d 0a 29 7b 0d 0a 20 20 69 s *pApi..){.. i
7b50: 6e 74 20 72 63 3b 0d 0a 20 20 53 51 4c 49 54 45 nt rc;.. SQLITE
7b60: 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e 49 54 32 _EXTENSION_INIT2
7b70: 28 70 41 70 69 29 0d 0a 20 20 72 63 20 3d 20 73 (pApi).. rc = s
7b80: 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 qlite3_create_fu
7b90: 6e 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e 74 65 nction(db, "inte
7ba0: 72 6f 70 54 65 73 74 22 2c 20 2d 31 2c 20 53 51 ropTest", -1, SQ
7bb0: 4c 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a 20 20 LITE_ANY, 0,..
7bc0: 20 20 20 20 69 6e 74 65 72 6f 70 54 65 73 74 46 interopTestF
7bd0: 75 6e 63 2c 20 30 2c 20 30 29 3b 0d 0a 20 20 69 unc, 0, 0);.. i
7be0: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b f( rc==SQLITE_OK
7bf0: 20 29 7b 0d 0a 20 20 20 20 72 63 20 3d 20 73 71 ){.. rc = sq
7c00: 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e lite3_create_fun
7c10: 63 74 69 6f 6e 28 64 62 2c 20 22 69 6e 74 65 72 ction(db, "inter
7c20: 6f 70 53 6c 65 65 70 22 2c 20 31 2c 20 53 51 4c opSleep", 1, SQL
7c30: 49 54 45 5f 41 4e 59 2c 20 30 2c 0d 0a 20 20 20 ITE_ANY, 0,..
7c40: 20 20 20 20 20 69 6e 74 65 72 6f 70 53 6c 65 65 interopSlee
7c50: 70 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0d 0a 20 pFunc, 0, 0);..
7c60: 20 7d 0d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b }.. return rc;
7c70: 0d 0a 7d 0d 0a 23 65 6e 64 69 66 0d 0a ..}..#endif..