0000: 2f 2a 0a 2a 2a 20 32 30 30 31 20 53 65 70 74 65 /*.** 2001 Septe
0010: 6d 62 65 72 20 31 35 0a 2a 2a 0a 2a 2a 20 54 68 mber 15.**.** Th
0020: 65 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 e author disclai
0030: 6d 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 ms copyright to
0040: 74 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 this source code
0050: 2e 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a . In place of.*
0060: 2a 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 * a legal notice
0070: 2c 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 , here is a bles
0080: 73 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d sing:.**.** M
0090: 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 ay you do good a
00a0: 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 nd not evil..**
00b0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 May you find
00c0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 forgiveness for
00d0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 yourself and for
00e0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 give others..**
00f0: 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 May you share
0100: 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 freely, never t
0110: 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 aking more than
0120: 79 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a you give..**.***
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0170: 2a 2a 2a 2a 2a 2a 0a 2a 2a 20 41 6e 20 74 6f 6b ******.** An tok
0180: 65 6e 69 7a 65 72 20 66 6f 72 20 53 51 4c 0a 2a enizer for SQL.*
0190: 2a 0a 2a 2a 20 54 68 69 73 20 66 69 6c 65 20 63 *.** This file c
01a0: 6f 6e 74 61 69 6e 73 20 43 20 63 6f 64 65 20 74 ontains C code t
01b0: 68 61 74 20 73 70 6c 69 74 73 20 61 6e 20 53 51 hat splits an SQ
01c0: 4c 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 75 L input string u
01d0: 70 20 69 6e 74 6f 0a 2a 2a 20 69 6e 64 69 76 69 p into.** indivi
01e0: 64 75 61 6c 20 74 6f 6b 65 6e 73 20 61 6e 64 20 dual tokens and
01f0: 73 65 6e 64 73 20 74 68 6f 73 65 20 74 6f 6b 65 sends those toke
0200: 6e 73 20 6f 6e 65 2d 62 79 2d 6f 6e 65 20 6f 76 ns one-by-one ov
0210: 65 72 20 74 6f 20 74 68 65 0a 2a 2a 20 70 61 72 er to the.** par
0220: 73 65 72 20 66 6f 72 20 61 6e 61 6c 79 73 69 73 ser for analysis
0230: 2e 0a 2a 2a 0a 2a 2a 20 24 49 64 3a 20 74 6f 6b ..**.** $Id: tok
0240: 65 6e 69 7a 65 2e 63 2c 76 20 31 2e 31 31 30 20 enize.c,v 1.110
0250: 32 30 30 35 2f 31 32 2f 30 39 20 32 30 3a 30 32 2005/12/09 20:02
0260: 3a 30 36 20 64 72 68 20 45 78 70 20 24 0a 2a 2f :06 drh Exp $.*/
0270: 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 .#include "sqlit
0280: 65 49 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 eInt.h".#include
0290: 20 22 6f 73 2e 68 22 0a 23 69 6e 63 6c 75 64 65 "os.h".#include
02a0: 20 3c 63 74 79 70 65 2e 68 3e 0a 23 69 6e 63 6c <ctype.h>.#incl
02b0: 75 64 65 20 3c 73 74 64 6c 69 62 2e 68 3e 0a 0a ude <stdlib.h>..
02c0: 2f 2a 0a 2a 2a 20 54 68 65 20 73 71 6c 69 74 65 /*.** The sqlite
02d0: 33 4b 65 79 77 6f 72 64 43 6f 64 65 20 66 75 6e 3KeywordCode fun
02e0: 63 74 69 6f 6e 20 6c 6f 6f 6b 73 20 75 70 20 61 ction looks up a
02f0: 6e 20 69 64 65 6e 74 69 66 69 65 72 20 74 6f 20 n identifier to
0300: 64 65 74 65 72 6d 69 6e 65 20 69 66 0a 2a 2a 20 determine if.**
0310: 69 74 20 69 73 20 61 20 6b 65 79 77 6f 72 64 2e it is a keyword.
0320: 20 20 49 66 20 69 74 20 69 73 20 61 20 6b 65 79 If it is a key
0330: 77 6f 72 64 2c 20 74 68 65 20 74 6f 6b 65 6e 20 word, the token
0340: 63 6f 64 65 20 6f 66 20 74 68 61 74 20 6b 65 79 code of that key
0350: 77 6f 72 64 20 69 73 20 0a 2a 2a 20 72 65 74 75 word is .** retu
0360: 72 6e 65 64 2e 20 20 49 66 20 74 68 65 20 69 6e rned. If the in
0370: 70 75 74 20 69 73 20 6e 6f 74 20 61 20 6b 65 79 put is not a key
0380: 77 6f 72 64 2c 20 54 4b 5f 49 44 20 69 73 20 72 word, TK_ID is r
0390: 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 eturned..**.** T
03a0: 68 65 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f he implementatio
03b0: 6e 20 6f 66 20 74 68 69 73 20 72 6f 75 74 69 6e n of this routin
03c0: 65 20 77 61 73 20 67 65 6e 65 72 61 74 65 64 20 e was generated
03d0: 62 79 20 61 20 70 72 6f 67 72 61 6d 2c 0a 2a 2a by a program,.**
03e0: 20 6d 6b 6b 65 79 77 6f 72 64 68 61 73 68 2e 68 mkkeywordhash.h
03f0: 2c 20 6c 6f 63 61 74 65 64 20 69 6e 20 74 68 65 , located in the
0400: 20 74 6f 6f 6c 20 73 75 62 64 69 72 65 63 74 6f tool subdirecto
0410: 72 79 20 6f 66 20 74 68 65 20 64 69 73 74 72 69 ry of the distri
0420: 62 75 74 69 6f 6e 2e 0a 2a 2a 20 54 68 65 20 6f bution..** The o
0430: 75 74 70 75 74 20 6f 66 20 74 68 65 20 6d 6b 6b utput of the mkk
0440: 65 79 77 6f 72 64 68 61 73 68 2e 63 20 70 72 6f eywordhash.c pro
0450: 67 72 61 6d 20 69 73 20 77 72 69 74 74 65 6e 20 gram is written
0460: 69 6e 74 6f 20 61 20 66 69 6c 65 0a 2a 2a 20 6e into a file.** n
0470: 61 6d 65 64 20 6b 65 79 77 6f 72 64 68 61 73 68 amed keywordhash
0480: 2e 68 20 61 6e 64 20 74 68 65 6e 20 69 6e 63 6c .h and then incl
0490: 75 64 65 64 20 69 6e 74 6f 20 74 68 69 73 20 73 uded into this s
04a0: 6f 75 72 63 65 20 66 69 6c 65 20 62 79 0a 2a 2a ource file by.**
04b0: 20 74 68 65 20 23 69 6e 63 6c 75 64 65 20 62 65 the #include be
04c0: 6c 6f 77 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 low..*/.#include
04d0: 20 22 6b 65 79 77 6f 72 64 68 61 73 68 2e 68 22 "keywordhash.h"
04e0: 0a 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 58 20 69 73 .../*.** If X is
04f0: 20 61 20 63 68 61 72 61 63 74 65 72 20 74 68 61 a character tha
0500: 74 20 63 61 6e 20 62 65 20 75 73 65 64 20 69 6e t can be used in
0510: 20 61 6e 20 69 64 65 6e 74 69 66 69 65 72 20 61 an identifier a
0520: 6e 64 0a 2a 2a 20 58 26 30 78 38 30 3d 3d 30 20 nd.** X&0x80==0
0530: 74 68 65 6e 20 73 71 6c 69 74 65 33 49 73 49 64 then sqlite3IsId
0540: 43 68 61 72 5b 58 5d 20 77 69 6c 6c 20 62 65 20 Char[X] will be
0550: 31 2e 20 20 49 66 20 58 26 30 78 38 30 3d 3d 30 1. If X&0x80==0
0560: 78 38 30 20 74 68 65 6e 0a 2a 2a 20 58 20 69 73 x80 then.** X is
0570: 20 61 6c 77 61 79 73 20 61 6e 20 69 64 65 6e 74 always an ident
0580: 69 66 69 65 72 20 63 68 61 72 61 63 74 65 72 2e ifier character.
0590: 20 20 28 48 65 6e 63 65 20 61 6c 6c 20 55 54 46 (Hence all UTF
05a0: 2d 38 0a 2a 2a 20 63 68 61 72 61 63 74 65 72 73 -8.** characters
05b0: 20 63 61 6e 20 62 65 20 70 61 72 74 20 6f 66 20 can be part of
05c0: 61 6e 20 69 64 65 6e 74 69 66 69 65 72 29 2e 20 an identifier).
05d0: 20 73 71 6c 69 74 65 33 49 73 49 64 43 68 61 72 sqlite3IsIdChar
05e0: 5b 58 5d 20 77 69 6c 6c 0a 2a 2a 20 62 65 20 30 [X] will.** be 0
05f0: 20 66 6f 72 20 65 76 65 72 79 20 63 68 61 72 61 for every chara
0600: 63 74 65 72 20 69 6e 20 74 68 65 20 6c 6f 77 65 cter in the lowe
0610: 72 20 31 32 38 20 41 53 43 49 49 20 63 68 61 72 r 128 ASCII char
0620: 61 63 74 65 72 73 0a 2a 2a 20 74 68 61 74 20 63 acters.** that c
0630: 61 6e 6e 6f 74 20 62 65 20 75 73 65 64 20 61 73 annot be used as
0640: 20 70 61 72 74 20 6f 66 20 61 6e 20 69 64 65 6e part of an iden
0650: 74 69 66 69 65 72 2e 0a 2a 2a 0a 2a 2a 20 49 6e tifier..**.** In
0660: 20 74 68 69 73 20 69 6d 70 6c 65 6d 65 6e 74 61 this implementa
0670: 74 69 6f 6e 2c 20 61 6e 20 69 64 65 6e 74 69 66 tion, an identif
0680: 69 65 72 20 63 61 6e 20 62 65 20 61 20 73 74 72 ier can be a str
0690: 69 6e 67 20 6f 66 0a 2a 2a 20 61 6c 70 68 61 62 ing of.** alphab
06a0: 65 74 69 63 20 63 68 61 72 61 63 74 65 72 73 2c etic characters,
06b0: 20 64 69 67 69 74 73 2c 20 61 6e 64 20 22 5f 22 digits, and "_"
06c0: 20 70 6c 75 73 20 61 6e 79 20 63 68 61 72 61 63 plus any charac
06d0: 74 65 72 0a 2a 2a 20 77 69 74 68 20 74 68 65 20 ter.** with the
06e0: 68 69 67 68 2d 6f 72 64 65 72 20 62 69 74 20 73 high-order bit s
06f0: 65 74 2e 20 20 54 68 65 20 6c 61 74 74 65 72 20 et. The latter
0700: 72 75 6c 65 20 6d 65 61 6e 73 20 74 68 61 74 0a rule means that.
0710: 2a 2a 20 61 6e 79 20 73 65 71 75 65 6e 63 65 20 ** any sequence
0720: 6f 66 20 55 54 46 2d 38 20 63 68 61 72 61 63 74 of UTF-8 charact
0730: 65 72 73 20 6f 72 20 63 68 61 72 61 63 74 65 72 ers or character
0740: 73 20 74 61 6b 65 6e 20 66 72 6f 6d 0a 2a 2a 20 s taken from.**
0750: 61 6e 20 65 78 74 65 6e 64 65 64 20 49 53 4f 38 an extended ISO8
0760: 38 35 39 20 63 68 61 72 61 63 74 65 72 20 73 65 859 character se
0770: 74 20 63 61 6e 20 66 6f 72 6d 20 61 6e 20 69 64 t can form an id
0780: 65 6e 74 69 66 69 65 72 2e 0a 2a 2a 0a 2a 2a 20 entifier..**.**
0790: 54 69 63 6b 65 74 20 23 31 30 36 36 2e 20 20 74 Ticket #1066. t
07a0: 68 65 20 53 51 4c 20 73 74 61 6e 64 61 72 64 20 he SQL standard
07b0: 64 6f 65 73 20 6e 6f 74 20 61 6c 6c 6f 77 20 27 does not allow '
07c0: 24 27 20 69 6e 20 74 68 65 0a 2a 2a 20 6d 69 64 $' in the.** mid
07d0: 64 6c 65 20 6f 66 20 69 64 65 6e 74 66 69 65 72 dle of identfier
07e0: 73 2e 20 20 42 75 74 20 6d 61 6e 79 20 53 51 4c s. But many SQL
07f0: 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 73 implementations
0800: 20 64 6f 2e 20 0a 2a 2a 20 53 51 4c 69 74 65 20 do. .** SQLite
0810: 77 69 6c 6c 20 61 6c 6c 6f 77 20 27 24 27 20 69 will allow '$' i
0820: 6e 20 69 64 65 6e 74 69 66 69 65 72 73 20 66 6f n identifiers fo
0830: 72 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 2e r compatibility.
0840: 0a 2a 2a 20 42 75 74 20 74 68 65 20 66 65 61 74 .** But the feat
0850: 75 72 65 20 69 73 20 75 6e 64 6f 63 75 6d 65 6e ure is undocumen
0860: 74 65 64 2e 0a 2a 2f 0a 63 6f 6e 73 74 20 63 68 ted..*/.const ch
0870: 61 72 20 73 71 6c 69 74 65 33 49 73 49 64 43 68 ar sqlite3IsIdCh
0880: 61 72 5b 5d 20 3d 20 7b 0a 2f 2a 20 78 30 20 78 ar[] = {./* x0 x
0890: 31 20 78 32 20 78 33 20 78 34 20 78 35 20 78 36 1 x2 x3 x4 x5 x6
08a0: 20 78 37 20 78 38 20 78 39 20 78 41 20 78 42 20 x7 x8 x9 xA xB
08b0: 78 43 20 78 44 20 78 45 20 78 46 20 2a 2f 0a 20 xC xD xE xF */.
08c0: 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 31 0, 0, 0, 0, 1
08d0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c , 0, 0, 0, 0, 0,
08e0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 0, 0, 0, 0, 0,
08f0: 30 2c 20 20 2f 2a 20 32 78 20 2a 2f 0a 20 20 20 0, /* 2x */.
0900: 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 1, 1, 1, 1, 1,
0910: 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 30 1, 1, 1, 1, 1, 0
0920: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c , 0, 0, 0, 0, 0,
0930: 20 20 2f 2a 20 33 78 20 2a 2f 0a 20 20 20 20 30 /* 3x */. 0
0940: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c , 1, 1, 1, 1, 1,
0950: 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 1, 1, 1, 1, 1,
0960: 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 20 1, 1, 1, 1, 1,
0970: 2f 2a 20 34 78 20 2a 2f 0a 20 20 20 20 31 2c 20 /* 4x */. 1,
0980: 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 1, 1, 1, 1, 1, 1
0990: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 30 2c , 1, 1, 1, 1, 0,
09a0: 20 30 2c 20 30 2c 20 30 2c 20 31 2c 20 20 2f 2a 0, 0, 0, 1, /*
09b0: 20 35 78 20 2a 2f 0a 20 20 20 20 30 2c 20 31 2c 5x */. 0, 1,
09c0: 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 1, 1, 1, 1, 1,
09d0: 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 1, 1, 1, 1, 1, 1
09e0: 2c 20 31 2c 20 31 2c 20 31 2c 20 20 2f 2a 20 36 , 1, 1, 1, /* 6
09f0: 78 20 2a 2f 0a 20 20 20 20 31 2c 20 31 2c 20 31 x */. 1, 1, 1
0a00: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c , 1, 1, 1, 1, 1,
0a10: 20 31 2c 20 31 2c 20 31 2c 20 30 2c 20 30 2c 20 1, 1, 1, 0, 0,
0a20: 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20 37 78 20 0, 0, 0, /* 7x
0a30: 2a 2f 0a 7d 3b 0a 0a 23 64 65 66 69 6e 65 20 49 */.};..#define I
0a40: 64 43 68 61 72 28 43 29 20 20 28 28 28 63 3d 43 dChar(C) (((c=C
0a50: 29 26 30 78 38 30 29 21 3d 30 20 7c 7c 20 28 63 )&0x80)!=0 || (c
0a60: 3e 30 78 31 66 20 26 26 20 73 71 6c 69 74 65 33 >0x1f && sqlite3
0a70: 49 73 49 64 43 68 61 72 5b 63 2d 30 78 32 30 5d IsIdChar[c-0x20]
0a80: 29 29 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e ))../*.** Return
0a90: 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 74 the length of t
0aa0: 68 65 20 74 6f 6b 65 6e 20 74 68 61 74 20 62 65 he token that be
0ab0: 67 69 6e 73 20 61 74 20 7a 5b 30 5d 2e 20 0a 2a gins at z[0]. .*
0ac0: 2a 20 53 74 6f 72 65 20 74 68 65 20 74 6f 6b 65 * Store the toke
0ad0: 6e 20 74 79 70 65 20 69 6e 20 2a 74 6f 6b 65 6e n type in *token
0ae0: 54 79 70 65 20 62 65 66 6f 72 65 20 72 65 74 75 Type before retu
0af0: 72 6e 69 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 rning..*/.static
0b00: 20 69 6e 74 20 67 65 74 54 6f 6b 65 6e 28 63 6f int getToken(co
0b10: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 nst unsigned cha
0b20: 72 20 2a 7a 2c 20 69 6e 74 20 2a 74 6f 6b 65 6e r *z, int *token
0b30: 54 79 70 65 29 7b 0a 20 20 69 6e 74 20 69 2c 20 Type){. int i,
0b40: 63 3b 0a 20 20 73 77 69 74 63 68 28 20 2a 7a 20 c;. switch( *z
0b50: 29 7b 0a 20 20 20 20 63 61 73 65 20 27 20 27 3a ){. case ' ':
0b60: 20 63 61 73 65 20 27 5c 74 27 3a 20 63 61 73 65 case '\t': case
0b70: 20 27 5c 6e 27 3a 20 63 61 73 65 20 27 5c 66 27 '\n': case '\f'
0b80: 3a 20 63 61 73 65 20 27 5c 72 27 3a 20 7b 0a 20 : case '\r': {.
0b90: 20 20 20 20 20 66 6f 72 28 69 3d 31 3b 20 69 73 for(i=1; is
0ba0: 73 70 61 63 65 28 7a 5b 69 5d 29 3b 20 69 2b 2b space(z[i]); i++
0bb0: 29 7b 7d 0a 20 20 20 20 20 20 2a 74 6f 6b 65 6e ){}. *token
0bc0: 54 79 70 65 20 3d 20 54 4b 5f 53 50 41 43 45 3b Type = TK_SPACE;
0bd0: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 69 3b . return i;
0be0: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 . }. case
0bf0: 27 2d 27 3a 20 7b 0a 20 20 20 20 20 20 69 66 28 '-': {. if(
0c00: 20 7a 5b 31 5d 3d 3d 27 2d 27 20 29 7b 0a 20 20 z[1]=='-' ){.
0c10: 20 20 20 20 20 20 66 6f 72 28 69 3d 32 3b 20 28 for(i=2; (
0c20: 63 3d 7a 5b 69 5d 29 21 3d 30 20 26 26 20 63 21 c=z[i])!=0 && c!
0c30: 3d 27 5c 6e 27 3b 20 69 2b 2b 29 7b 7d 0a 20 20 ='\n'; i++){}.
0c40: 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 70 65 *tokenType
0c50: 20 3d 20 54 4b 5f 43 4f 4d 4d 45 4e 54 3b 0a 20 = TK_COMMENT;.
0c60: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 69 3b return i;
0c70: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 2a . }. *
0c80: 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 4d tokenType = TK_M
0c90: 49 4e 55 53 3b 0a 20 20 20 20 20 20 72 65 74 75 INUS;. retu
0ca0: 72 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 rn 1;. }.
0cb0: 63 61 73 65 20 27 28 27 3a 20 7b 0a 20 20 20 20 case '(': {.
0cc0: 20 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 *tokenType = T
0cd0: 4b 5f 4c 50 3b 0a 20 20 20 20 20 20 72 65 74 75 K_LP;. retu
0ce0: 72 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 rn 1;. }.
0cf0: 63 61 73 65 20 27 29 27 3a 20 7b 0a 20 20 20 20 case ')': {.
0d00: 20 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 *tokenType = T
0d10: 4b 5f 52 50 3b 0a 20 20 20 20 20 20 72 65 74 75 K_RP;. retu
0d20: 72 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 rn 1;. }.
0d30: 63 61 73 65 20 27 3b 27 3a 20 7b 0a 20 20 20 20 case ';': {.
0d40: 20 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 *tokenType = T
0d50: 4b 5f 53 45 4d 49 3b 0a 20 20 20 20 20 20 72 65 K_SEMI;. re
0d60: 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 turn 1;. }.
0d70: 20 20 63 61 73 65 20 27 2b 27 3a 20 7b 0a 20 20 case '+': {.
0d80: 20 20 20 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d *tokenType =
0d90: 20 54 4b 5f 50 4c 55 53 3b 0a 20 20 20 20 20 20 TK_PLUS;.
0da0: 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d 0a return 1;. }.
0db0: 20 20 20 20 63 61 73 65 20 27 2a 27 3a 20 7b 0a case '*': {.
0dc0: 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 70 65 *tokenType
0dd0: 20 3d 20 54 4b 5f 53 54 41 52 3b 0a 20 20 20 20 = TK_STAR;.
0de0: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 return 1;.
0df0: 7d 0a 20 20 20 20 63 61 73 65 20 27 2f 27 3a 20 }. case '/':
0e00: 7b 0a 20 20 20 20 20 20 69 66 28 20 7a 5b 31 5d {. if( z[1]
0e10: 21 3d 27 2a 27 20 7c 7c 20 7a 5b 32 5d 3d 3d 30 !='*' || z[2]==0
0e20: 20 29 7b 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b ){. *tok
0e30: 65 6e 54 79 70 65 20 3d 20 54 4b 5f 53 4c 41 53 enType = TK_SLAS
0e40: 48 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 H;. retur
0e50: 6e 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 n 1;. }.
0e60: 20 20 20 66 6f 72 28 69 3d 33 2c 20 63 3d 7a 5b for(i=3, c=z[
0e70: 32 5d 3b 20 28 63 21 3d 27 2a 27 20 7c 7c 20 7a 2]; (c!='*' || z
0e80: 5b 69 5d 21 3d 27 2f 27 29 20 26 26 20 28 63 3d [i]!='/') && (c=
0e90: 7a 5b 69 5d 29 21 3d 30 3b 20 69 2b 2b 29 7b 7d z[i])!=0; i++){}
0ea0: 0a 20 20 20 20 20 20 69 66 28 20 63 20 29 20 69 . if( c ) i
0eb0: 2b 2b 3b 0a 20 20 20 20 20 20 2a 74 6f 6b 65 6e ++;. *token
0ec0: 54 79 70 65 20 3d 20 54 4b 5f 43 4f 4d 4d 45 4e Type = TK_COMMEN
0ed0: 54 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 T;. return
0ee0: 69 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 i;. }. cas
0ef0: 65 20 27 25 27 3a 20 7b 0a 20 20 20 20 20 20 2a e '%': {. *
0f00: 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 52 tokenType = TK_R
0f10: 45 4d 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e EM;. return
0f20: 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 1;. }. ca
0f30: 73 65 20 27 3d 27 3a 20 7b 0a 20 20 20 20 20 20 se '=': {.
0f40: 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f *tokenType = TK_
0f50: 45 51 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e EQ;. return
0f60: 20 31 20 2b 20 28 7a 5b 31 5d 3d 3d 27 3d 27 29 1 + (z[1]=='=')
0f70: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 ;. }. case
0f80: 20 27 3c 27 3a 20 7b 0a 20 20 20 20 20 20 69 66 '<': {. if
0f90: 28 20 28 63 3d 7a 5b 31 5d 29 3d 3d 27 3d 27 20 ( (c=z[1])=='='
0fa0: 29 7b 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 ){. *toke
0fb0: 6e 54 79 70 65 20 3d 20 54 4b 5f 4c 45 3b 0a 20 nType = TK_LE;.
0fc0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 32 3b return 2;
0fd0: 0a 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28 . }else if(
0fe0: 20 63 3d 3d 27 3e 27 20 29 7b 0a 20 20 20 20 20 c=='>' ){.
0ff0: 20 20 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 *tokenType =
1000: 54 4b 5f 4e 45 3b 0a 20 20 20 20 20 20 20 20 72 TK_NE;. r
1010: 65 74 75 72 6e 20 32 3b 0a 20 20 20 20 20 20 7d eturn 2;. }
1020: 65 6c 73 65 20 69 66 28 20 63 3d 3d 27 3c 27 20 else if( c=='<'
1030: 29 7b 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 ){. *toke
1040: 6e 54 79 70 65 20 3d 20 54 4b 5f 4c 53 48 49 46 nType = TK_LSHIF
1050: 54 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 T;. retur
1060: 6e 20 32 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 n 2;. }else
1070: 7b 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e {. *token
1080: 54 79 70 65 20 3d 20 54 4b 5f 4c 54 3b 0a 20 20 Type = TK_LT;.
1090: 20 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a return 1;.
10a0: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 }. }.
10b0: 20 20 63 61 73 65 20 27 3e 27 3a 20 7b 0a 20 20 case '>': {.
10c0: 20 20 20 20 69 66 28 20 28 63 3d 7a 5b 31 5d 29 if( (c=z[1])
10d0: 3d 3d 27 3d 27 20 29 7b 0a 20 20 20 20 20 20 20 =='=' ){.
10e0: 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b *tokenType = TK
10f0: 5f 47 45 3b 0a 20 20 20 20 20 20 20 20 72 65 74 _GE;. ret
1100: 75 72 6e 20 32 3b 0a 20 20 20 20 20 20 7d 65 6c urn 2;. }el
1110: 73 65 20 69 66 28 20 63 3d 3d 27 3e 27 20 29 7b se if( c=='>' ){
1120: 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 . *tokenT
1130: 79 70 65 20 3d 20 54 4b 5f 52 53 48 49 46 54 3b ype = TK_RSHIFT;
1140: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 . return
1150: 32 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 2;. }else{.
1160: 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 *tokenTy
1170: 70 65 20 3d 20 54 4b 5f 47 54 3b 0a 20 20 20 20 pe = TK_GT;.
1180: 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 return 1;.
1190: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 }. }.
11a0: 63 61 73 65 20 27 21 27 3a 20 7b 0a 20 20 20 20 case '!': {.
11b0: 20 20 69 66 28 20 7a 5b 31 5d 21 3d 27 3d 27 20 if( z[1]!='='
11c0: 29 7b 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 ){. *toke
11d0: 6e 54 79 70 65 20 3d 20 54 4b 5f 49 4c 4c 45 47 nType = TK_ILLEG
11e0: 41 4c 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 AL;. retu
11f0: 72 6e 20 32 3b 0a 20 20 20 20 20 20 7d 65 6c 73 rn 2;. }els
1200: 65 7b 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 e{. *toke
1210: 6e 54 79 70 65 20 3d 20 54 4b 5f 4e 45 3b 0a 20 nType = TK_NE;.
1220: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 32 3b return 2;
1230: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 . }. }.
1240: 20 20 20 63 61 73 65 20 27 7c 27 3a 20 7b 0a 20 case '|': {.
1250: 20 20 20 20 20 69 66 28 20 7a 5b 31 5d 21 3d 27 if( z[1]!='
1260: 7c 27 20 29 7b 0a 20 20 20 20 20 20 20 20 2a 74 |' ){. *t
1270: 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 42 49 okenType = TK_BI
1280: 54 4f 52 3b 0a 20 20 20 20 20 20 20 20 72 65 74 TOR;. ret
1290: 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 7d 65 6c urn 1;. }el
12a0: 73 65 7b 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b se{. *tok
12b0: 65 6e 54 79 70 65 20 3d 20 54 4b 5f 43 4f 4e 43 enType = TK_CONC
12c0: 41 54 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 AT;. retu
12d0: 72 6e 20 32 3b 0a 20 20 20 20 20 20 7d 0a 20 20 rn 2;. }.
12e0: 20 20 7d 0a 20 20 20 20 63 61 73 65 20 27 2c 27 }. case ','
12f0: 3a 20 7b 0a 20 20 20 20 20 20 2a 74 6f 6b 65 6e : {. *token
1300: 54 79 70 65 20 3d 20 54 4b 5f 43 4f 4d 4d 41 3b Type = TK_COMMA;
1310: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b . return 1;
1320: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 . }. case
1330: 27 26 27 3a 20 7b 0a 20 20 20 20 20 20 2a 74 6f '&': {. *to
1340: 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 42 49 54 kenType = TK_BIT
1350: 41 4e 44 3b 0a 20 20 20 20 20 20 72 65 74 75 72 AND;. retur
1360: 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 n 1;. }. c
1370: 61 73 65 20 27 7e 27 3a 20 7b 0a 20 20 20 20 20 ase '~': {.
1380: 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b *tokenType = TK
1390: 5f 42 49 54 4e 4f 54 3b 0a 20 20 20 20 20 20 72 _BITNOT;. r
13a0: 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 eturn 1;. }.
13b0: 20 20 20 63 61 73 65 20 27 60 27 3a 0a 20 20 20 case '`':.
13c0: 20 63 61 73 65 20 27 5c 27 27 3a 0a 20 20 20 20 case '\'':.
13d0: 63 61 73 65 20 27 22 27 3a 20 7b 0a 20 20 20 20 case '"': {.
13e0: 20 20 69 6e 74 20 64 65 6c 69 6d 20 3d 20 7a 5b int delim = z[
13f0: 30 5d 3b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 0];. for(i=
1400: 31 3b 20 28 63 3d 7a 5b 69 5d 29 21 3d 30 3b 20 1; (c=z[i])!=0;
1410: 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 69 66 i++){. if
1420: 28 20 63 3d 3d 64 65 6c 69 6d 20 29 7b 0a 20 20 ( c==delim ){.
1430: 20 20 20 20 20 20 20 20 69 66 28 20 7a 5b 69 2b if( z[i+
1440: 31 5d 3d 3d 64 65 6c 69 6d 20 29 7b 0a 20 20 20 1]==delim ){.
1450: 20 20 20 20 20 20 20 20 20 69 2b 2b 3b 0a 20 20 i++;.
1460: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 }else{.
1470: 20 20 20 20 20 20 20 20 20 20 20 62 72 65 61 6b break
1480: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 ;. }.
1490: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a }. }.
14a0: 20 20 20 20 20 20 69 66 28 20 63 20 29 7b 0a 20 if( c ){.
14b0: 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 70 *tokenTyp
14c0: 65 20 3d 20 54 4b 5f 53 54 52 49 4e 47 3b 0a 20 e = TK_STRING;.
14d0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 69 2b return i+
14e0: 31 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 1;. }else{.
14f0: 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 *tokenTy
1500: 70 65 20 3d 20 54 4b 5f 49 4c 4c 45 47 41 4c 3b pe = TK_ILLEGAL;
1510: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 . return
1520: 69 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d i;. }. }
1530: 0a 20 20 20 20 63 61 73 65 20 27 2e 27 3a 20 7b . case '.': {
1540: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f .#ifndef SQLITE_
1550: 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f OMIT_FLOATING_PO
1560: 49 4e 54 0a 20 20 20 20 20 20 69 66 28 20 21 69 INT. if( !i
1570: 73 64 69 67 69 74 28 7a 5b 31 5d 29 20 29 0a 23 sdigit(z[1]) ).#
1580: 65 6e 64 69 66 0a 20 20 20 20 20 20 7b 0a 20 20 endif. {.
1590: 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 70 65 *tokenType
15a0: 20 3d 20 54 4b 5f 44 4f 54 3b 0a 20 20 20 20 20 = TK_DOT;.
15b0: 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 return 1;.
15c0: 20 20 20 7d 0a 20 20 20 20 20 20 2f 2a 20 49 66 }. /* If
15d0: 20 74 68 65 20 6e 65 78 74 20 63 68 61 72 61 63 the next charac
15e0: 74 65 72 20 69 73 20 61 20 64 69 67 69 74 2c 20 ter is a digit,
15f0: 74 68 69 73 20 69 73 20 61 20 66 6c 6f 61 74 69 this is a floati
1600: 6e 67 20 70 6f 69 6e 74 0a 20 20 20 20 20 20 2a ng point. *
1610: 2a 20 6e 75 6d 62 65 72 20 74 68 61 74 20 62 65 * number that be
1620: 67 69 6e 73 20 77 69 74 68 20 22 2e 22 2e 20 20 gins with ".".
1630: 46 61 6c 6c 20 74 68 72 75 20 69 6e 74 6f 20 74 Fall thru into t
1640: 68 65 20 6e 65 78 74 20 63 61 73 65 20 2a 2f 0a he next case */.
1650: 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 27 }. case '
1660: 30 27 3a 20 63 61 73 65 20 27 31 27 3a 20 63 61 0': case '1': ca
1670: 73 65 20 27 32 27 3a 20 63 61 73 65 20 27 33 27 se '2': case '3'
1680: 3a 20 63 61 73 65 20 27 34 27 3a 0a 20 20 20 20 : case '4':.
1690: 63 61 73 65 20 27 35 27 3a 20 63 61 73 65 20 27 case '5': case '
16a0: 36 27 3a 20 63 61 73 65 20 27 37 27 3a 20 63 61 6': case '7': ca
16b0: 73 65 20 27 38 27 3a 20 63 61 73 65 20 27 39 27 se '8': case '9'
16c0: 3a 20 7b 0a 20 20 20 20 20 20 2a 74 6f 6b 65 6e : {. *token
16d0: 54 79 70 65 20 3d 20 54 4b 5f 49 4e 54 45 47 45 Type = TK_INTEGE
16e0: 52 3b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 R;. for(i=0
16f0: 3b 20 69 73 64 69 67 69 74 28 7a 5b 69 5d 29 3b ; isdigit(z[i]);
1700: 20 69 2b 2b 29 7b 7d 0a 23 69 66 6e 64 65 66 20 i++){}.#ifndef
1710: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 SQLITE_OMIT_FLOA
1720: 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20 20 TING_POINT.
1730: 20 69 66 28 20 7a 5b 69 5d 3d 3d 27 2e 27 20 29 if( z[i]=='.' )
1740: 7b 0a 20 20 20 20 20 20 20 20 69 2b 2b 3b 0a 20 {. i++;.
1750: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 69 73 while( is
1760: 64 69 67 69 74 28 7a 5b 69 5d 29 20 29 7b 20 69 digit(z[i]) ){ i
1770: 2b 2b 3b 20 7d 0a 20 20 20 20 20 20 20 20 2a 74 ++; }. *t
1780: 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 46 4c okenType = TK_FL
1790: 4f 41 54 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 OAT;. }.
17a0: 20 20 20 69 66 28 20 28 7a 5b 69 5d 3d 3d 27 65 if( (z[i]=='e
17b0: 27 20 7c 7c 20 7a 5b 69 5d 3d 3d 27 45 27 29 20 ' || z[i]=='E')
17c0: 26 26 0a 20 20 20 20 20 20 20 20 20 20 20 28 20 &&. (
17d0: 69 73 64 69 67 69 74 28 7a 5b 69 2b 31 5d 29 20 isdigit(z[i+1])
17e0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 7c 7c 20 . ||
17f0: 28 28 7a 5b 69 2b 31 5d 3d 3d 27 2b 27 20 7c 7c ((z[i+1]=='+' ||
1800: 20 7a 5b 69 2b 31 5d 3d 3d 27 2d 27 29 20 26 26 z[i+1]=='-') &&
1810: 20 69 73 64 69 67 69 74 28 7a 5b 69 2b 32 5d 29 isdigit(z[i+2])
1820: 29 0a 20 20 20 20 20 20 20 20 20 20 20 29 0a 20 ). ).
1830: 20 20 20 20 20 29 7b 0a 20 20 20 20 20 20 20 20 ){.
1840: 69 20 2b 3d 20 32 3b 0a 20 20 20 20 20 20 20 20 i += 2;.
1850: 77 68 69 6c 65 28 20 69 73 64 69 67 69 74 28 7a while( isdigit(z
1860: 5b 69 5d 29 20 29 7b 20 69 2b 2b 3b 20 7d 0a 20 [i]) ){ i++; }.
1870: 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 70 *tokenTyp
1880: 65 20 3d 20 54 4b 5f 46 4c 4f 41 54 3b 0a 20 20 e = TK_FLOAT;.
1890: 20 20 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20 }.#endif.
18a0: 20 20 20 72 65 74 75 72 6e 20 69 3b 0a 20 20 20 return i;.
18b0: 20 7d 0a 20 20 20 20 63 61 73 65 20 27 5b 27 3a }. case '[':
18c0: 20 7b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 31 {. for(i=1
18d0: 2c 20 63 3d 7a 5b 30 5d 3b 20 63 21 3d 27 5d 27 , c=z[0]; c!=']'
18e0: 20 26 26 20 28 63 3d 7a 5b 69 5d 29 21 3d 30 3b && (c=z[i])!=0;
18f0: 20 69 2b 2b 29 7b 7d 0a 20 20 20 20 20 20 2a 74 i++){}. *t
1900: 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 49 44 okenType = TK_ID
1910: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 69 ;. return i
1920: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 ;. }. case
1930: 20 27 3f 27 3a 20 7b 0a 20 20 20 20 20 20 2a 74 '?': {. *t
1940: 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 56 41 okenType = TK_VA
1950: 52 49 41 42 4c 45 3b 0a 20 20 20 20 20 20 66 6f RIABLE;. fo
1960: 72 28 69 3d 31 3b 20 69 73 64 69 67 69 74 28 7a r(i=1; isdigit(z
1970: 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d 0a 20 20 20 [i]); i++){}.
1980: 20 20 20 72 65 74 75 72 6e 20 69 3b 0a 20 20 20 return i;.
1990: 20 7d 0a 20 20 20 20 63 61 73 65 20 27 23 27 3a }. case '#':
19a0: 20 7b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 31 {. for(i=1
19b0: 3b 20 69 73 64 69 67 69 74 28 7a 5b 69 5d 29 3b ; isdigit(z[i]);
19c0: 20 69 2b 2b 29 7b 7d 0a 20 20 20 20 20 20 69 66 i++){}. if
19d0: 28 20 69 3e 31 20 29 7b 0a 20 20 20 20 20 20 20 ( i>1 ){.
19e0: 20 2f 2a 20 50 61 72 61 6d 65 74 65 72 73 20 6f /* Parameters o
19f0: 66 20 74 68 65 20 66 6f 72 6d 20 23 4e 4e 4e 20 f the form #NNN
1a00: 28 77 68 65 72 65 20 4e 4e 4e 20 69 73 20 61 20 (where NNN is a
1a10: 6e 75 6d 62 65 72 29 20 61 72 65 20 75 73 65 64 number) are used
1a20: 0a 20 20 20 20 20 20 20 20 2a 2a 20 69 6e 74 65 . ** inte
1a30: 72 6e 61 6c 6c 79 20 62 79 20 73 71 6c 69 74 65 rnally by sqlite
1a40: 33 4e 65 73 74 65 64 50 61 72 73 65 2e 20 20 2a 3NestedParse. *
1a50: 2f 0a 20 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e /. *token
1a60: 54 79 70 65 20 3d 20 54 4b 5f 52 45 47 49 53 54 Type = TK_REGIST
1a70: 45 52 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 ER;. retu
1a80: 72 6e 20 69 3b 0a 20 20 20 20 20 20 7d 0a 20 20 rn i;. }.
1a90: 20 20 20 20 2f 2a 20 46 61 6c 6c 20 74 68 72 6f /* Fall thro
1aa0: 75 67 68 20 69 6e 74 6f 20 74 68 65 20 6e 65 78 ugh into the nex
1ab0: 74 20 63 61 73 65 20 69 66 20 74 68 65 20 27 23 t case if the '#
1ac0: 27 20 69 73 20 6e 6f 74 20 66 6f 6c 6c 6f 77 65 ' is not followe
1ad0: 64 20 62 79 0a 20 20 20 20 20 20 2a 2a 20 61 20 d by. ** a
1ae0: 64 69 67 69 74 2e 20 54 72 79 20 74 6f 20 6d 61 digit. Try to ma
1af0: 74 63 68 20 23 41 41 41 41 20 77 68 65 72 65 20 tch #AAAA where
1b00: 41 41 41 41 20 69 73 20 61 20 70 61 72 61 6d 65 AAAA is a parame
1b10: 74 65 72 20 6e 61 6d 65 2e 20 2a 2f 0a 20 20 20 ter name. */.
1b20: 20 7d 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 }.#ifndef SQLIT
1b30: 45 5f 4f 4d 49 54 5f 54 43 4c 5f 56 41 52 49 41 E_OMIT_TCL_VARIA
1b40: 42 4c 45 0a 20 20 20 20 63 61 73 65 20 27 24 27 BLE. case '$'
1b50: 3a 0a 23 65 6e 64 69 66 0a 20 20 20 20 63 61 73 :.#endif. cas
1b60: 65 20 27 3a 27 3a 20 7b 0a 20 20 20 20 20 20 69 e ':': {. i
1b70: 6e 74 20 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 nt n = 0;.
1b80: 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f *tokenType = TK_
1b90: 56 41 52 49 41 42 4c 45 3b 0a 20 20 20 20 20 20 VARIABLE;.
1ba0: 66 6f 72 28 69 3d 31 3b 20 28 63 3d 7a 5b 69 5d for(i=1; (c=z[i]
1bb0: 29 21 3d 30 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 )!=0; i++){.
1bc0: 20 20 20 20 69 66 28 20 49 64 43 68 61 72 28 63 if( IdChar(c
1bd0: 29 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6e ) ){. n
1be0: 2b 2b 3b 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 ++;.#ifndef SQLI
1bf0: 54 45 5f 4f 4d 49 54 5f 54 43 4c 5f 56 41 52 49 TE_OMIT_TCL_VARI
1c00: 41 42 4c 45 0a 20 20 20 20 20 20 20 20 7d 65 6c ABLE. }el
1c10: 73 65 20 69 66 28 20 63 3d 3d 27 28 27 20 26 26 se if( c=='(' &&
1c20: 20 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20 n>0 ){.
1c30: 20 20 64 6f 7b 0a 20 20 20 20 20 20 20 20 20 20 do{.
1c40: 20 20 69 2b 2b 3b 0a 20 20 20 20 20 20 20 20 20 i++;.
1c50: 20 7d 77 68 69 6c 65 28 20 28 63 3d 7a 5b 69 5d }while( (c=z[i]
1c60: 29 21 3d 30 20 26 26 20 21 69 73 73 70 61 63 65 )!=0 && !isspace
1c70: 28 63 29 20 26 26 20 63 21 3d 27 29 27 20 29 3b (c) && c!=')' );
1c80: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 63 . if( c
1c90: 3d 3d 27 29 27 20 29 7b 0a 20 20 20 20 20 20 20 ==')' ){.
1ca0: 20 20 20 20 20 69 2b 2b 3b 0a 20 20 20 20 20 20 i++;.
1cb0: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
1cc0: 20 20 20 20 20 20 20 2a 74 6f 6b 65 6e 54 79 70 *tokenTyp
1cd0: 65 20 3d 20 54 4b 5f 49 4c 4c 45 47 41 4c 3b 0a e = TK_ILLEGAL;.
1ce0: 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 }.
1cf0: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 break;.
1d00: 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 }else if( c
1d10: 3d 3d 27 3a 27 20 26 26 20 7a 5b 69 2b 31 5d 3d ==':' && z[i+1]=
1d20: 3d 27 3a 27 20 29 7b 0a 20 20 20 20 20 20 20 20 =':' ){.
1d30: 20 20 69 2b 2b 3b 0a 23 65 6e 64 69 66 0a 20 20 i++;.#endif.
1d40: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 }else{.
1d50: 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 break;.
1d60: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a }. }.
1d70: 20 20 20 20 20 20 69 66 28 20 6e 3d 3d 30 20 29 if( n==0 )
1d80: 20 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b *tokenType = TK
1d90: 5f 49 4c 4c 45 47 41 4c 3b 0a 20 20 20 20 20 20 _ILLEGAL;.
1da0: 72 65 74 75 72 6e 20 69 3b 0a 20 20 20 20 7d 0a return i;. }.
1db0: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f #ifndef SQLITE_O
1dc0: 4d 49 54 5f 42 4c 4f 42 5f 4c 49 54 45 52 41 4c MIT_BLOB_LITERAL
1dd0: 0a 20 20 20 20 63 61 73 65 20 27 78 27 3a 20 63 . case 'x': c
1de0: 61 73 65 20 27 58 27 3a 20 7b 0a 20 20 20 20 20 ase 'X': {.
1df0: 20 69 66 28 20 28 63 3d 7a 5b 31 5d 29 3d 3d 27 if( (c=z[1])=='
1e00: 5c 27 27 20 7c 7c 20 63 3d 3d 27 22 27 20 29 7b \'' || c=='"' ){
1e10: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 64 65 6c . int del
1e20: 69 6d 20 3d 20 63 3b 0a 20 20 20 20 20 20 20 20 im = c;.
1e30: 2a 74 6f 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f *tokenType = TK_
1e40: 42 4c 4f 42 3b 0a 20 20 20 20 20 20 20 20 66 6f BLOB;. fo
1e50: 72 28 69 3d 32 3b 20 28 63 3d 7a 5b 69 5d 29 21 r(i=2; (c=z[i])!
1e60: 3d 30 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 =0; i++){.
1e70: 20 20 20 20 69 66 28 20 63 3d 3d 64 65 6c 69 6d if( c==delim
1e80: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 ){.
1e90: 69 66 28 20 69 25 32 20 29 20 2a 74 6f 6b 65 6e if( i%2 ) *token
1ea0: 54 79 70 65 20 3d 20 54 4b 5f 49 4c 4c 45 47 41 Type = TK_ILLEGA
1eb0: 4c 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 62 L;. b
1ec0: 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 20 20 reak;.
1ed0: 7d 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 }. if(
1ee0: 21 69 73 78 64 69 67 69 74 28 63 29 20 29 7b 0a !isxdigit(c) ){.
1ef0: 20 20 20 20 20 20 20 20 20 20 20 20 2a 74 6f 6b *tok
1f00: 65 6e 54 79 70 65 20 3d 20 54 4b 5f 49 4c 4c 45 enType = TK_ILLE
1f10: 47 41 4c 3b 0a 20 20 20 20 20 20 20 20 20 20 20 GAL;.
1f20: 20 72 65 74 75 72 6e 20 69 3b 0a 20 20 20 20 20 return i;.
1f30: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d }. }
1f40: 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 20 29 . if( c )
1f50: 20 69 2b 2b 3b 0a 20 20 20 20 20 20 20 20 72 65 i++;. re
1f60: 74 75 72 6e 20 69 3b 0a 20 20 20 20 20 20 7d 0a turn i;. }.
1f70: 20 20 20 20 20 20 2f 2a 20 4f 74 68 65 72 77 69 /* Otherwi
1f80: 73 65 20 66 61 6c 6c 20 74 68 72 6f 75 67 68 20 se fall through
1f90: 74 6f 20 74 68 65 20 6e 65 78 74 20 63 61 73 65 to the next case
1fa0: 20 2a 2f 0a 20 20 20 20 7d 0a 23 65 6e 64 69 66 */. }.#endif
1fb0: 0a 20 20 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a . default: {.
1fc0: 20 20 20 20 20 20 69 66 28 20 21 49 64 43 68 61 if( !IdCha
1fd0: 72 28 2a 7a 29 20 29 7b 0a 20 20 20 20 20 20 20 r(*z) ){.
1fe0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d 0a break;. }.
1ff0: 20 20 20 20 20 20 66 6f 72 28 69 3d 31 3b 20 49 for(i=1; I
2000: 64 43 68 61 72 28 7a 5b 69 5d 29 3b 20 69 2b 2b dChar(z[i]); i++
2010: 29 7b 7d 0a 20 20 20 20 20 20 2a 74 6f 6b 65 6e ){}. *token
2020: 54 79 70 65 20 3d 20 6b 65 79 77 6f 72 64 43 6f Type = keywordCo
2030: 64 65 28 28 63 68 61 72 2a 29 7a 2c 20 69 29 3b de((char*)z, i);
2040: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 69 3b . return i;
2050: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 2a 74 6f . }. }. *to
2060: 6b 65 6e 54 79 70 65 20 3d 20 54 4b 5f 49 4c 4c kenType = TK_ILL
2070: 45 47 41 4c 3b 0a 20 20 72 65 74 75 72 6e 20 31 EGAL;. return 1
2080: 3b 0a 7d 0a 69 6e 74 20 73 71 6c 69 74 65 33 47 ;.}.int sqlite3G
2090: 65 74 54 6f 6b 65 6e 28 63 6f 6e 73 74 20 75 6e etToken(const un
20a0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 2c 20 signed char *z,
20b0: 69 6e 74 20 2a 74 6f 6b 65 6e 54 79 70 65 29 7b int *tokenType){
20c0: 0a 20 20 72 65 74 75 72 6e 20 67 65 74 54 6f 6b . return getTok
20d0: 65 6e 28 7a 2c 20 74 6f 6b 65 6e 54 79 70 65 29 en(z, tokenType)
20e0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 75 6e 20 74 ;.}../*.** Run t
20f0: 68 65 20 70 61 72 73 65 72 20 6f 6e 20 74 68 65 he parser on the
2100: 20 67 69 76 65 6e 20 53 51 4c 20 73 74 72 69 6e given SQL strin
2110: 67 2e 20 20 54 68 65 20 70 61 72 73 65 72 20 73 g. The parser s
2120: 74 72 75 63 74 75 72 65 20 69 73 0a 2a 2a 20 70 tructure is.** p
2130: 61 73 73 65 64 20 69 6e 2e 20 20 41 6e 20 53 51 assed in. An SQ
2140: 4c 49 54 45 5f 20 73 74 61 74 75 73 20 63 6f 64 LITE_ status cod
2150: 65 20 69 73 20 72 65 74 75 72 6e 65 64 2e 20 20 e is returned.
2160: 49 66 20 61 6e 20 65 72 72 6f 72 20 6f 63 63 75 If an error occu
2170: 72 73 0a 2a 2a 20 61 6e 64 20 70 7a 45 72 72 4d rs.** and pzErrM
2180: 73 67 21 3d 4e 55 4c 4c 20 74 68 65 6e 20 61 6e sg!=NULL then an
2190: 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 20 6d error message m
21a0: 69 67 68 74 20 62 65 20 77 72 69 74 74 65 6e 20 ight be written
21b0: 69 6e 74 6f 20 0a 2a 2a 20 6d 65 6d 6f 72 79 20 into .** memory
21c0: 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 6d 61 obtained from ma
21d0: 6c 6c 6f 63 28 29 20 61 6e 64 20 2a 70 7a 45 72 lloc() and *pzEr
21e0: 72 4d 73 67 20 6d 61 64 65 20 74 6f 20 70 6f 69 rMsg made to poi
21f0: 6e 74 20 74 6f 20 74 68 61 74 0a 2a 2a 20 65 72 nt to that.** er
2200: 72 6f 72 20 6d 65 73 73 61 67 65 2e 20 20 4f 72 ror message. Or
2210: 20 6d 61 79 62 65 20 6e 6f 74 2e 0a 2a 2f 0a 69 maybe not..*/.i
2220: 6e 74 20 73 71 6c 69 74 65 33 52 75 6e 50 61 72 nt sqlite3RunPar
2230: 73 65 72 28 50 61 72 73 65 20 2a 70 50 61 72 73 ser(Parse *pPars
2240: 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a e, const char *z
2250: 53 71 6c 2c 20 63 68 61 72 20 2a 2a 70 7a 45 72 Sql, char **pzEr
2260: 72 4d 73 67 29 7b 0a 20 20 69 6e 74 20 6e 45 72 rMsg){. int nEr
2270: 72 20 3d 20 30 3b 0a 20 20 69 6e 74 20 69 3b 0a r = 0;. int i;.
2280: 20 20 76 6f 69 64 20 2a 70 45 6e 67 69 6e 65 3b void *pEngine;
2290: 0a 20 20 69 6e 74 20 74 6f 6b 65 6e 54 79 70 65 . int tokenType
22a0: 3b 0a 20 20 69 6e 74 20 6c 61 73 74 54 6f 6b 65 ;. int lastToke
22b0: 6e 50 61 72 73 65 64 20 3d 20 2d 31 3b 0a 20 20 nParsed = -1;.
22c0: 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 70 50 sqlite3 *db = pP
22d0: 61 72 73 65 2d 3e 64 62 3b 0a 20 20 65 78 74 65 arse->db;. exte
22e0: 72 6e 20 76 6f 69 64 20 2a 73 71 6c 69 74 65 33 rn void *sqlite3
22f0: 50 61 72 73 65 72 41 6c 6c 6f 63 28 76 6f 69 64 ParserAlloc(void
2300: 2a 28 2a 29 28 69 6e 74 29 29 3b 0a 20 20 65 78 *(*)(int));. ex
2310: 74 65 72 6e 20 76 6f 69 64 20 73 71 6c 69 74 65 tern void sqlite
2320: 33 50 61 72 73 65 72 46 72 65 65 28 76 6f 69 64 3ParserFree(void
2330: 2a 2c 20 76 6f 69 64 28 2a 29 28 76 6f 69 64 2a *, void(*)(void*
2340: 29 29 3b 0a 20 20 65 78 74 65 72 6e 20 69 6e 74 ));. extern int
2350: 20 73 71 6c 69 74 65 33 50 61 72 73 65 72 28 76 sqlite3Parser(v
2360: 6f 69 64 2a 2c 20 69 6e 74 2c 20 54 6f 6b 65 6e oid*, int, Token
2370: 2c 20 50 61 72 73 65 2a 29 3b 0a 0a 20 20 64 62 , Parse*);.. db
2380: 2d 3e 66 6c 61 67 73 20 26 3d 20 7e 53 51 4c 49 ->flags &= ~SQLI
2390: 54 45 5f 49 6e 74 65 72 72 75 70 74 3b 0a 20 20 TE_Interrupt;.
23a0: 70 50 61 72 73 65 2d 3e 72 63 20 3d 20 53 51 4c pParse->rc = SQL
23b0: 49 54 45 5f 4f 4b 3b 0a 20 20 69 20 3d 20 30 3b ITE_OK;. i = 0;
23c0: 0a 20 20 70 45 6e 67 69 6e 65 20 3d 20 73 71 6c . pEngine = sql
23d0: 69 74 65 33 50 61 72 73 65 72 41 6c 6c 6f 63 28 ite3ParserAlloc(
23e0: 28 76 6f 69 64 2a 28 2a 29 28 69 6e 74 29 29 73 (void*(*)(int))s
23f0: 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 58 29 3b 0a qlite3MallocX);.
2400: 20 20 69 66 28 20 70 45 6e 67 69 6e 65 3d 3d 30 if( pEngine==0
2410: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 ){. return S
2420: 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d QLITE_NOMEM;. }
2430: 0a 20 20 61 73 73 65 72 74 28 20 70 50 61 72 73 . assert( pPars
2440: 65 2d 3e 73 4c 61 73 74 54 6f 6b 65 6e 2e 64 79 e->sLastToken.dy
2450: 6e 3d 3d 30 20 29 3b 0a 20 20 61 73 73 65 72 74 n==0 );. assert
2460: 28 20 70 50 61 72 73 65 2d 3e 70 4e 65 77 54 61 ( pParse->pNewTa
2470: 62 6c 65 3d 3d 30 20 29 3b 0a 20 20 61 73 73 65 ble==0 );. asse
2480: 72 74 28 20 70 50 61 72 73 65 2d 3e 70 4e 65 77 rt( pParse->pNew
2490: 54 72 69 67 67 65 72 3d 3d 30 20 29 3b 0a 20 20 Trigger==0 );.
24a0: 61 73 73 65 72 74 28 20 70 50 61 72 73 65 2d 3e assert( pParse->
24b0: 6e 56 61 72 3d 3d 30 20 29 3b 0a 20 20 61 73 73 nVar==0 );. ass
24c0: 65 72 74 28 20 70 50 61 72 73 65 2d 3e 6e 56 61 ert( pParse->nVa
24d0: 72 45 78 70 72 3d 3d 30 20 29 3b 0a 20 20 61 73 rExpr==0 );. as
24e0: 73 65 72 74 28 20 70 50 61 72 73 65 2d 3e 6e 56 sert( pParse->nV
24f0: 61 72 45 78 70 72 41 6c 6c 6f 63 3d 3d 30 20 29 arExprAlloc==0 )
2500: 3b 0a 20 20 61 73 73 65 72 74 28 20 70 50 61 72 ;. assert( pPar
2510: 73 65 2d 3e 61 70 56 61 72 45 78 70 72 3d 3d 30 se->apVarExpr==0
2520: 20 29 3b 0a 20 20 70 50 61 72 73 65 2d 3e 7a 54 );. pParse->zT
2530: 61 69 6c 20 3d 20 70 50 61 72 73 65 2d 3e 7a 53 ail = pParse->zS
2540: 71 6c 20 3d 20 7a 53 71 6c 3b 0a 20 20 77 68 69 ql = zSql;. whi
2550: 6c 65 28 20 73 71 6c 69 74 65 33 54 73 64 28 29 le( sqlite3Tsd()
2560: 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 3d 3d ->mallocFailed==
2570: 30 20 26 26 20 7a 53 71 6c 5b 69 5d 21 3d 30 20 0 && zSql[i]!=0
2580: 29 7b 0a 20 20 20 20 61 73 73 65 72 74 28 20 69 ){. assert( i
2590: 3e 3d 30 20 29 3b 0a 20 20 20 20 70 50 61 72 73 >=0 );. pPars
25a0: 65 2d 3e 73 4c 61 73 74 54 6f 6b 65 6e 2e 7a 20 e->sLastToken.z
25b0: 3d 20 28 75 38 2a 29 26 7a 53 71 6c 5b 69 5d 3b = (u8*)&zSql[i];
25c0: 0a 20 20 20 20 61 73 73 65 72 74 28 20 70 50 61 . assert( pPa
25d0: 72 73 65 2d 3e 73 4c 61 73 74 54 6f 6b 65 6e 2e rse->sLastToken.
25e0: 64 79 6e 3d 3d 30 20 29 3b 0a 20 20 20 20 70 50 dyn==0 );. pP
25f0: 61 72 73 65 2d 3e 73 4c 61 73 74 54 6f 6b 65 6e arse->sLastToken
2600: 2e 6e 20 3d 20 67 65 74 54 6f 6b 65 6e 28 28 75 .n = getToken((u
2610: 6e 73 69 67 6e 65 64 20 63 68 61 72 2a 29 26 7a nsigned char*)&z
2620: 53 71 6c 5b 69 5d 2c 26 74 6f 6b 65 6e 54 79 70 Sql[i],&tokenTyp
2630: 65 29 3b 0a 20 20 20 20 69 20 2b 3d 20 70 50 61 e);. i += pPa
2640: 72 73 65 2d 3e 73 4c 61 73 74 54 6f 6b 65 6e 2e rse->sLastToken.
2650: 6e 3b 0a 20 20 20 20 73 77 69 74 63 68 28 20 74 n;. switch( t
2660: 6f 6b 65 6e 54 79 70 65 20 29 7b 0a 20 20 20 20 okenType ){.
2670: 20 20 63 61 73 65 20 54 4b 5f 53 50 41 43 45 3a case TK_SPACE:
2680: 0a 20 20 20 20 20 20 63 61 73 65 20 54 4b 5f 43 . case TK_C
2690: 4f 4d 4d 45 4e 54 3a 20 7b 0a 20 20 20 20 20 20 OMMENT: {.
26a0: 20 20 69 66 28 20 28 64 62 2d 3e 66 6c 61 67 73 if( (db->flags
26b0: 20 26 20 53 51 4c 49 54 45 5f 49 6e 74 65 72 72 & SQLITE_Interr
26c0: 75 70 74 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 upt)!=0 ){.
26d0: 20 20 20 20 20 70 50 61 72 73 65 2d 3e 72 63 20 pParse->rc
26e0: 3d 20 53 51 4c 49 54 45 5f 49 4e 54 45 52 52 55 = SQLITE_INTERRU
26f0: 50 54 3b 0a 20 20 20 20 20 20 20 20 20 20 73 71 PT;. sq
2700: 6c 69 74 65 33 53 65 74 53 74 72 69 6e 67 28 70 lite3SetString(p
2710: 7a 45 72 72 4d 73 67 2c 20 22 69 6e 74 65 72 72 zErrMsg, "interr
2720: 75 70 74 22 2c 20 28 63 68 61 72 2a 29 30 29 3b upt", (char*)0);
2730: 0a 20 20 20 20 20 20 20 20 20 20 67 6f 74 6f 20 . goto
2740: 61 62 6f 72 74 5f 70 61 72 73 65 3b 0a 20 20 20 abort_parse;.
2750: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 62 }. b
2760: 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 reak;. }.
2770: 20 20 20 20 63 61 73 65 20 54 4b 5f 49 4c 4c 45 case TK_ILLE
2780: 47 41 4c 3a 20 7b 0a 20 20 20 20 20 20 20 20 69 GAL: {. i
2790: 66 28 20 70 7a 45 72 72 4d 73 67 20 29 7b 0a 20 f( pzErrMsg ){.
27a0: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 46 sqliteF
27b0: 72 65 65 28 2a 70 7a 45 72 72 4d 73 67 29 3b 0a ree(*pzErrMsg);.
27c0: 20 20 20 20 20 20 20 20 20 20 2a 70 7a 45 72 72 *pzErr
27d0: 4d 73 67 20 3d 20 73 71 6c 69 74 65 33 4d 50 72 Msg = sqlite3MPr
27e0: 69 6e 74 66 28 22 75 6e 72 65 63 6f 67 6e 69 7a intf("unrecogniz
27f0: 65 64 20 74 6f 6b 65 6e 3a 20 5c 22 25 54 5c 22 ed token: \"%T\"
2800: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ",.
2810: 20 20 20 20 20 20 20 20 20 20 20 20 20 26 70 50 &pP
2820: 61 72 73 65 2d 3e 73 4c 61 73 74 54 6f 6b 65 6e arse->sLastToken
2830: 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 );. }.
2840: 20 20 20 20 20 6e 45 72 72 2b 2b 3b 0a 20 20 20 nErr++;.
2850: 20 20 20 20 20 67 6f 74 6f 20 61 62 6f 72 74 5f goto abort_
2860: 70 61 72 73 65 3b 0a 20 20 20 20 20 20 7d 0a 20 parse;. }.
2870: 20 20 20 20 20 63 61 73 65 20 54 4b 5f 53 45 4d case TK_SEM
2880: 49 3a 20 7b 0a 20 20 20 20 20 20 20 20 70 50 61 I: {. pPa
2890: 72 73 65 2d 3e 7a 54 61 69 6c 20 3d 20 26 7a 53 rse->zTail = &zS
28a0: 71 6c 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 2f ql[i];. /
28b0: 2a 20 46 61 6c 6c 20 74 68 72 75 20 69 6e 74 6f * Fall thru into
28c0: 20 74 68 65 20 64 65 66 61 75 6c 74 20 63 61 73 the default cas
28d0: 65 20 2a 2f 0a 20 20 20 20 20 20 7d 0a 20 20 20 e */. }.
28e0: 20 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a 20 20 default: {.
28f0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 50 61 72 sqlite3Par
2900: 73 65 72 28 70 45 6e 67 69 6e 65 2c 20 74 6f 6b ser(pEngine, tok
2910: 65 6e 54 79 70 65 2c 20 70 50 61 72 73 65 2d 3e enType, pParse->
2920: 73 4c 61 73 74 54 6f 6b 65 6e 2c 20 70 50 61 72 sLastToken, pPar
2930: 73 65 29 3b 0a 20 20 20 20 20 20 20 20 6c 61 73 se);. las
2940: 74 54 6f 6b 65 6e 50 61 72 73 65 64 20 3d 20 74 tTokenParsed = t
2950: 6f 6b 65 6e 54 79 70 65 3b 0a 20 20 20 20 20 20 okenType;.
2960: 20 20 69 66 28 20 70 50 61 72 73 65 2d 3e 72 63 if( pParse->rc
2970: 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 !=SQLITE_OK ){.
2980: 20 20 20 20 20 20 20 20 20 67 6f 74 6f 20 61 62 goto ab
2990: 6f 72 74 5f 70 61 72 73 65 3b 0a 20 20 20 20 20 ort_parse;.
29a0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 62 72 65 }. bre
29b0: 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 ak;. }.
29c0: 7d 0a 20 20 7d 0a 61 62 6f 72 74 5f 70 61 72 73 }. }.abort_pars
29d0: 65 3a 0a 20 20 69 66 28 20 7a 53 71 6c 5b 69 5d e:. if( zSql[i]
29e0: 3d 3d 30 20 26 26 20 6e 45 72 72 3d 3d 30 20 26 ==0 && nErr==0 &
29f0: 26 20 70 50 61 72 73 65 2d 3e 72 63 3d 3d 53 51 & pParse->rc==SQ
2a00: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 69 LITE_OK ){. i
2a10: 66 28 20 6c 61 73 74 54 6f 6b 65 6e 50 61 72 73 f( lastTokenPars
2a20: 65 64 21 3d 54 4b 5f 53 45 4d 49 20 29 7b 0a 20 ed!=TK_SEMI ){.
2a30: 20 20 20 20 20 73 71 6c 69 74 65 33 50 61 72 73 sqlite3Pars
2a40: 65 72 28 70 45 6e 67 69 6e 65 2c 20 54 4b 5f 53 er(pEngine, TK_S
2a50: 45 4d 49 2c 20 70 50 61 72 73 65 2d 3e 73 4c 61 EMI, pParse->sLa
2a60: 73 74 54 6f 6b 65 6e 2c 20 70 50 61 72 73 65 29 stToken, pParse)
2a70: 3b 0a 20 20 20 20 20 20 70 50 61 72 73 65 2d 3e ;. pParse->
2a80: 7a 54 61 69 6c 20 3d 20 26 7a 53 71 6c 5b 69 5d zTail = &zSql[i]
2a90: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 ;. }. sqli
2aa0: 74 65 33 50 61 72 73 65 72 28 70 45 6e 67 69 6e te3Parser(pEngin
2ab0: 65 2c 20 30 2c 20 70 50 61 72 73 65 2d 3e 73 4c e, 0, pParse->sL
2ac0: 61 73 74 54 6f 6b 65 6e 2c 20 70 50 61 72 73 65 astToken, pParse
2ad0: 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 );. }. sqlite3
2ae0: 50 61 72 73 65 72 46 72 65 65 28 70 45 6e 67 69 ParserFree(pEngi
2af0: 6e 65 2c 20 73 71 6c 69 74 65 33 46 72 65 65 58 ne, sqlite3FreeX
2b00: 29 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 );. if( sqlite3
2b10: 54 73 64 28 29 2d 3e 6d 61 6c 6c 6f 63 46 61 69 Tsd()->mallocFai
2b20: 6c 65 64 20 29 7b 0a 20 20 20 20 70 50 61 72 73 led ){. pPars
2b30: 65 2d 3e 72 63 20 3d 20 53 51 4c 49 54 45 5f 4e e->rc = SQLITE_N
2b40: 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 69 66 28 20 OMEM;. }. if(
2b50: 70 50 61 72 73 65 2d 3e 72 63 21 3d 53 51 4c 49 pParse->rc!=SQLI
2b60: 54 45 5f 4f 4b 20 26 26 20 70 50 61 72 73 65 2d TE_OK && pParse-
2b70: 3e 72 63 21 3d 53 51 4c 49 54 45 5f 44 4f 4e 45 >rc!=SQLITE_DONE
2b80: 20 26 26 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 && pParse->zErr
2b90: 4d 73 67 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 Msg==0 ){. sq
2ba0: 6c 69 74 65 33 53 65 74 53 74 72 69 6e 67 28 26 lite3SetString(&
2bb0: 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 2c pParse->zErrMsg,
2bc0: 20 73 71 6c 69 74 65 33 45 72 72 53 74 72 28 70 sqlite3ErrStr(p
2bd0: 50 61 72 73 65 2d 3e 72 63 29 2c 20 28 63 68 61 Parse->rc), (cha
2be0: 72 2a 29 30 29 3b 0a 20 20 7d 0a 20 20 69 66 28 r*)0);. }. if(
2bf0: 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 pParse->zErrMsg
2c00: 20 29 7b 0a 20 20 20 20 69 66 28 20 70 7a 45 72 ){. if( pzEr
2c10: 72 4d 73 67 20 26 26 20 2a 70 7a 45 72 72 4d 73 rMsg && *pzErrMs
2c20: 67 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 2a 70 g==0 ){. *p
2c30: 7a 45 72 72 4d 73 67 20 3d 20 70 50 61 72 73 65 zErrMsg = pParse
2c40: 2d 3e 7a 45 72 72 4d 73 67 3b 0a 20 20 20 20 7d ->zErrMsg;. }
2c50: 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c 69 else{. sqli
2c60: 74 65 46 72 65 65 28 70 50 61 72 73 65 2d 3e 7a teFree(pParse->z
2c70: 45 72 72 4d 73 67 29 3b 0a 20 20 20 20 7d 0a 20 ErrMsg);. }.
2c80: 20 20 20 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d pParse->zErrM
2c90: 73 67 20 3d 20 30 3b 0a 20 20 20 20 69 66 28 20 sg = 0;. if(
2ca0: 21 6e 45 72 72 20 29 20 6e 45 72 72 2b 2b 3b 0a !nErr ) nErr++;.
2cb0: 20 20 7d 0a 20 20 69 66 28 20 70 50 61 72 73 65 }. if( pParse
2cc0: 2d 3e 70 56 64 62 65 20 26 26 20 70 50 61 72 73 ->pVdbe && pPars
2cd0: 65 2d 3e 6e 45 72 72 3e 30 20 26 26 20 70 50 61 e->nErr>0 && pPa
2ce0: 72 73 65 2d 3e 6e 65 73 74 65 64 3d 3d 30 20 29 rse->nested==0 )
2cf0: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 56 64 62 {. sqlite3Vdb
2d00: 65 44 65 6c 65 74 65 28 70 50 61 72 73 65 2d 3e eDelete(pParse->
2d10: 70 56 64 62 65 29 3b 0a 20 20 20 20 70 50 61 72 pVdbe);. pPar
2d20: 73 65 2d 3e 70 56 64 62 65 20 3d 20 30 3b 0a 20 se->pVdbe = 0;.
2d30: 20 7d 0a 20 20 73 71 6c 69 74 65 33 44 65 6c 65 }. sqlite3Dele
2d40: 74 65 54 61 62 6c 65 28 70 50 61 72 73 65 2d 3e teTable(pParse->
2d50: 64 62 2c 20 70 50 61 72 73 65 2d 3e 70 4e 65 77 db, pParse->pNew
2d60: 54 61 62 6c 65 29 3b 0a 20 20 73 71 6c 69 74 65 Table);. sqlite
2d70: 33 44 65 6c 65 74 65 54 72 69 67 67 65 72 28 70 3DeleteTrigger(p
2d80: 50 61 72 73 65 2d 3e 70 4e 65 77 54 72 69 67 67 Parse->pNewTrigg
2d90: 65 72 29 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 er);. sqliteFre
2da0: 65 28 70 50 61 72 73 65 2d 3e 61 70 56 61 72 45 e(pParse->apVarE
2db0: 78 70 72 29 3b 0a 20 20 69 66 28 20 6e 45 72 72 xpr);. if( nErr
2dc0: 3e 30 20 26 26 20 28 70 50 61 72 73 65 2d 3e 72 >0 && (pParse->r
2dd0: 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 7c 7c 20 c==SQLITE_OK ||
2de0: 70 50 61 72 73 65 2d 3e 72 63 3d 3d 53 51 4c 49 pParse->rc==SQLI
2df0: 54 45 5f 44 4f 4e 45 29 20 29 7b 0a 20 20 20 20 TE_DONE) ){.
2e00: 70 50 61 72 73 65 2d 3e 72 63 20 3d 20 53 51 4c pParse->rc = SQL
2e10: 49 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 20 ITE_ERROR;. }.
2e20: 20 72 65 74 75 72 6e 20 6e 45 72 72 3b 0a 7d 0a return nErr;.}.