git.oblomov.eu Git - wine/blob - dlls/msi/tokenize.c

   1 /*
   2 ** 2001 September 15
   3 **
   4 ** The author disclaims copyright to this source code.  In place of
   5 ** a legal notice, here is a blessing:
   6 **
   7 **    May you do good and not evil.
   8 **    May you find forgiveness for yourself and forgive others.
   9 **    May you share freely, never taking more than you give.
  10 **
  11 *************************************************************************
  12 ** An tokenizer for SQL
  13 **
  14 ** This file contains C code that splits an SQL input string up into
  15 ** individual tokens and sends those tokens one-by-one over to the
  16 ** parser for analysis.
  17 */
  18
  19 #include <ctype.h>
  20 #include <stdarg.h>
  21 #include <stdlib.h>
  22
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "wine/unicode.h"
  26 #include "query.h"
  27 #include "sql.tab.h"
  28
  29 /*
  30 ** All the keywords of the SQL language are stored as in a hash
  31 ** table composed of instances of the following structure.
  32 */
  33 typedef struct Keyword Keyword;
  34 struct Keyword {
  35   const WCHAR *zName;             /* The keyword name */
  36   int tokenType;           /* The token value for this keyword */
  37 };
  38
  39 #define MAX_TOKEN_LEN 11
  40
  41 static const WCHAR ABORT_W[] = { 'A','B','O','R','T',0 };
  42 static const WCHAR AFTER_W[] = { 'A','F','T','E','R',0 };
  43 static const WCHAR ALTER_W[] = { 'A','L','T','E','R',0 };
  44 static const WCHAR ALL_W[] = { 'A','L','L',0 };
  45 static const WCHAR AND_W[] = { 'A','N','D',0 };
  46 static const WCHAR AS_W[] = { 'A','S',0 };
  47 static const WCHAR ASC_W[] = { 'A','S','C',0 };
  48 static const WCHAR BEFORE_W[] = { 'B','E','F','O','R','E',0 };
  49 static const WCHAR BEGIN_W[] = { 'B','E','G','I','N','W',0 };
  50 static const WCHAR BETWEEN_W[] = { 'B','E','T','W','E','E','N',0 };
  51 static const WCHAR BY_W[] = { 'B','Y',0 };
  52 static const WCHAR CASCADE_W[] = { 'C','A','S','C','A','D','E',0 };
  53 static const WCHAR CASE_W[] = { 'C','A','S','E',0 };
  54 static const WCHAR CHAR_W[] = { 'C','H','A','R',0 };
  55 static const WCHAR CHARACTER_W[] = { 'C','H','A','R','A','C','T','E','R',0 };
  56 static const WCHAR CHECK_W[] = { 'C','H','E','C','K',0 };
  57 static const WCHAR CLUSTER_W[] = { 'C','L','U','S','T','E','R',0 };
  58 static const WCHAR COLLATE_W[] = { 'C','O','L','L','A','T','E',0 };
  59 static const WCHAR COMMIT_W[] = { 'C','O','M','M','I','T',0 };
  60 static const WCHAR CONFLICT_W[] = { 'C','O','N','F','L','I','C','T',0 };
  61 static const WCHAR CONSTRAINT_W[] = { 'C','O','N','S','T','R','A','I','N','T',0 };
  62 static const WCHAR COPY_W[] = { 'C','O','P','Y',0 };
  63 static const WCHAR CREATE_W[] = { 'C','R','E','A','T','E',0 };
  64 static const WCHAR CROSS_W[] = { 'C','R','O','S','S',0 };
  65 static const WCHAR DEFAULT_W[] = { 'D','E','F','A','U','L','T',0 };
  66 static const WCHAR DEFERRED_W[] = { 'D','E','F','E','R','R','E','D',0 };
  67 static const WCHAR DEFERRABLE_W[] = { 'D','E','F','E','R','R','A','B','L','E',0 };
  68 static const WCHAR DELETE_W[] = { 'D','E','L','E','T','E',0 };
  69 static const WCHAR DELIMITERS_W[] = { 'D','E','L','I','M','I','T','E','R','S',0 };
  70 static const WCHAR DESC_W[] = { 'D','E','S','C',0 };
  71 static const WCHAR DISTINCT_W[] = { 'D','I','S','T','I','N','C','T',0 };
  72 static const WCHAR DROP_W[] = { 'D','R','O','P',0 };
  73 static const WCHAR END_W[] = { 'E','N','D',0 };
  74 static const WCHAR EACH_W[] = { 'E','A','C','H',0 };
  75 static const WCHAR ELSE_W[] = { 'E','L','S','E',0 };
  76 static const WCHAR EXCEPT_W[] = { 'E','X','C','E','P','T',0 };
  77 static const WCHAR EXPLAIN_W[] = { 'E','X','P','L','A','I','N',0 };
  78 static const WCHAR FAIL_W[] = { 'F','A','I','L',0 };
  79 static const WCHAR FOR_W[] = { 'F','O','R',0 };
  80 static const WCHAR FOREIGN_W[] = { 'F','O','R','E','I','G','N',0 };
  81 static const WCHAR FREE_W[] = { 'F','R','E','E',0 };
  82 static const WCHAR FROM_W[] = { 'F','R','O','M',0 };
  83 static const WCHAR FULL_W[] = { 'F','U','L','L',0 };
  84 static const WCHAR GLOB_W[] = { 'G','L','O','B',0 };
  85 static const WCHAR GROUP_W[] = { 'G','R','O','U','P',0 };
  86 static const WCHAR HAVING_W[] = { 'H','A','V','I','N','G',0 };
  87 static const WCHAR HOLD_W[] = { 'H','O','L','D',0 };
  88 static const WCHAR IGNORE_W[] = { 'I','G','N','O','R','E',0 };
  89 static const WCHAR IMMEDIATE_W[] = { 'I','M','M','E','D','I','A','T','E',0 };
  90 static const WCHAR IN_W[] = { 'I','N',0 };
  91 static const WCHAR INDEX_W[] = { 'I','N','D','E','X',0 };
  92 static const WCHAR INITIALLY_W[] = { 'I','N','I','T','I','A','L','L','Y',0 };
  93 static const WCHAR INNER_W[] = { 'I','N','N','E','R',0 };
  94 static const WCHAR INSERT_W[] = { 'I','N','S','E','R','T',0 };
  95 static const WCHAR INSTEAD_W[] = { 'I','N','S','T','E','A','D',0 };
  96 static const WCHAR INT_W[] = { 'I','N','T',0 };
  97 static const WCHAR INTERSECT_W[] = { 'I','N','T','E','R','S','E','C','T',0 };
  98 static const WCHAR INTO_W[] = { 'I','N','T','O',0 };
  99 static const WCHAR IS_W[] = { 'I','S',0 };
 100 static const WCHAR ISNULL_W[] = { 'I','S','N','U','L','L',0 };
 101 static const WCHAR JOIN_W[] = { 'J','O','I','N',0 };
 102 static const WCHAR KEY_W[] = { 'K','E','Y',0 };
 103 static const WCHAR LEFT_W[] = { 'L','E','F','T',0 };
 104 static const WCHAR LIKE_W[] = { 'L','I','K','E',0 };
 105 static const WCHAR LIMIT_W[] = { 'L','I','M','I','T',0 };
 106 static const WCHAR LOCALIZABLE_W[] = { 'L','O','C','A','L','I','Z','A','B','L','E',0 };
 107 static const WCHAR LONG_W[] = { 'L','O','N','G',0 };
 108 static const WCHAR LONGCHAR_W[] = { 'L','O','N','G','C','H','A','R',0 };
 109 static const WCHAR MATCH_W[] = { 'M','A','T','C','H',0 };
 110 static const WCHAR NATURAL_W[] = { 'N','A','T','U','R','A','L',0 };
 111 static const WCHAR NOT_W[] = { 'N','O','T',0 };
 112 static const WCHAR NOTNULL_W[] = { 'N','O','T','N','U','L','L',0 };
 113 static const WCHAR NULL_W[] = { 'N','U','L','L',0 };
 114 static const WCHAR OBJECT_W[] = { 'O','B','J','E','C','T',0 };
 115 static const WCHAR OF_W[] = { 'O','F',0 };
 116 static const WCHAR OFFSET_W[] = { 'O','F','F','S','E','T',0 };
 117 static const WCHAR ON_W[] = { 'O','N',0 };
 118 static const WCHAR OR_W[] = { 'O','R',0 };
 119 static const WCHAR ORDER_W[] = { 'O','R','D','E','R',0 };
 120 static const WCHAR OUTER_W[] = { 'O','U','T','E','R',0 };
 121 static const WCHAR PRAGMA_W[] = { 'P','R','A','G','M','A',0 };
 122 static const WCHAR PRIMARY_W[] = { 'P','R','I','M','A','R','Y',0 };
 123 static const WCHAR RAISE_W[] = { 'R','A','I','S','E',0 };
 124 static const WCHAR REFERENCES_W[] = { 'R','E','F','E','R','E','N','C','E','S',0 };
 125 static const WCHAR REPLACE_W[] = { 'R','E','P','L','A','C','E',0 };
 126 static const WCHAR RESTRICT_W[] = { 'R','E','S','T','R','I','C','T',0 };
 127 static const WCHAR RIGHT_W[] = { 'R','I','G','H','T',0 };
 128 static const WCHAR ROLLBACK_W[] = { 'R','O','L','L','B','A','C','K',0 };
 129 static const WCHAR ROW_W[] = { 'R','O','W',0 };
 130 static const WCHAR SELECT_W[] = { 'S','E','L','E','C','T',0 };
 131 static const WCHAR SET_W[] = { 'S','E','T',0 };
 132 static const WCHAR SHORT_W[] = { 'S','H','O','R','T',0 };
 133 static const WCHAR STATEMENT_W[] = { 'S','T','A','T','E','M','E','N','T',0 };
 134 static const WCHAR TABLE_W[] = { 'T','A','B','L','E',0 };
 135 static const WCHAR TEMP_W[] = { 'T','E','M','P',0 };
 136 static const WCHAR TEMPORARY_W[] = { 'T','E','M','P','O','R','A','R','Y',0 };
 137 static const WCHAR THEN_W[] = { 'T','H','E','N',0 };
 138 static const WCHAR TRANSACTION_W[] = { 'T','R','A','N','S','A','C','T','I','O','N',0 };
 139 static const WCHAR TRIGGER_W[] = { 'T','R','I','G','G','E','R',0 };
 140 static const WCHAR UNION_W[] = { 'U','N','I','O','N',0 };
 141 static const WCHAR UNIQUE_W[] = { 'U','N','I','Q','U','E',0 };
 142 static const WCHAR UPDATE_W[] = { 'U','P','D','A','T','E',0 };
 143 static const WCHAR USING_W[] = { 'U','S','I','N','G',0 };
 144 static const WCHAR VACUUM_W[] = { 'V','A','C','U','U','M',0 };
 145 static const WCHAR VALUES_W[] = { 'V','A','L','U','E','S',0 };
 146 static const WCHAR VIEW_W[] = { 'V','I','E','W',0 };
 147 static const WCHAR WHEN_W[] = { 'W','H','E','N',0 };
 148 static const WCHAR WHERE_W[] = { 'W','H','E','R','E',0 };
 149
 150 /*
 151 ** These are the keywords
 152 */
 153 static const Keyword aKeywordTable[] = {
 154   { ABORT_W, TK_ABORT },
 155   { AFTER_W, TK_AFTER },
 156   { ALTER_W, TK_ALTER },
 157   { ALL_W, TK_ALL },
 158   { AND_W, TK_AND },
 159   { AS_W, TK_AS },
 160   { ASC_W, TK_ASC },
 161   { BEFORE_W, TK_BEFORE },
 162   { BEGIN_W, TK_BEGIN },
 163   { BETWEEN_W, TK_BETWEEN },
 164   { BY_W, TK_BY },
 165   { CASCADE_W, TK_CASCADE },
 166   { CASE_W, TK_CASE },
 167   { CHAR_W, TK_CHAR },
 168   { CHARACTER_W, TK_CHAR },
 169   { CHECK_W, TK_CHECK },
 170   { CLUSTER_W, TK_CLUSTER },
 171   { COLLATE_W, TK_COLLATE },
 172   { COMMIT_W, TK_COMMIT },
 173   { CONFLICT_W, TK_CONFLICT },
 174   { CONSTRAINT_W, TK_CONSTRAINT },
 175   { COPY_W, TK_COPY },
 176   { CREATE_W, TK_CREATE },
 177   { CROSS_W, TK_JOIN_KW },
 178   { DEFAULT_W, TK_DEFAULT },
 179   { DEFERRED_W, TK_DEFERRED },
 180   { DEFERRABLE_W, TK_DEFERRABLE },
 181   { DELETE_W, TK_DELETE },
 182   { DELIMITERS_W, TK_DELIMITERS },
 183   { DESC_W, TK_DESC },
 184   { DISTINCT_W, TK_DISTINCT },
 185   { DROP_W, TK_DROP },
 186   { END_W, TK_END },
 187   { EACH_W, TK_EACH },
 188   { ELSE_W, TK_ELSE },
 189   { EXCEPT_W, TK_EXCEPT },
 190   { EXPLAIN_W, TK_EXPLAIN },
 191   { FAIL_W, TK_FAIL },
 192   { FOR_W, TK_FOR },
 193   { FOREIGN_W, TK_FOREIGN },
 194   { FROM_W, TK_FROM },
 195   { FULL_W, TK_JOIN_KW },
 196   { GLOB_W, TK_GLOB },
 197   { GROUP_W, TK_GROUP },
 198   { HAVING_W, TK_HAVING },
 199   { HOLD_W, TK_HOLD },
 200   { IGNORE_W, TK_IGNORE },
 201   { IMMEDIATE_W, TK_IMMEDIATE },
 202   { IN_W, TK_IN },
 203   { INDEX_W, TK_INDEX },
 204   { INITIALLY_W, TK_INITIALLY },
 205   { INNER_W, TK_JOIN_KW },
 206   { INSERT_W, TK_INSERT },
 207   { INSTEAD_W, TK_INSTEAD },
 208   { INT_W, TK_INT },
 209   { INTERSECT_W, TK_INTERSECT },
 210   { INTO_W, TK_INTO },
 211   { IS_W, TK_IS },
 212   { ISNULL_W, TK_ISNULL },
 213   { JOIN_W, TK_JOIN },
 214   { KEY_W, TK_KEY },
 215   { LEFT_W, TK_JOIN_KW },
 216   { LIKE_W, TK_LIKE },
 217   { LIMIT_W, TK_LIMIT },
 218   { LOCALIZABLE_W, TK_LOCALIZABLE },
 219   { LONG_W, TK_LONG },
 220   { LONGCHAR_W, TK_LONGCHAR },
 221   { MATCH_W, TK_MATCH },
 222   { NATURAL_W, TK_JOIN_KW },
 223   { NOT_W, TK_NOT },
 224   { NOTNULL_W, TK_NOTNULL },
 225   { NULL_W, TK_NULL },
 226   { OBJECT_W, TK_OBJECT },
 227   { OF_W, TK_OF },
 228   { OFFSET_W, TK_OFFSET },
 229   { ON_W, TK_ON },
 230   { OR_W, TK_OR },
 231   { ORDER_W, TK_ORDER },
 232   { OUTER_W, TK_JOIN_KW },
 233   { PRAGMA_W, TK_PRAGMA },
 234   { PRIMARY_W, TK_PRIMARY },
 235   { RAISE_W, TK_RAISE },
 236   { REFERENCES_W, TK_REFERENCES },
 237   { REPLACE_W, TK_REPLACE },
 238   { RESTRICT_W, TK_RESTRICT },
 239   { RIGHT_W, TK_JOIN_KW },
 240   { ROLLBACK_W, TK_ROLLBACK },
 241   { ROW_W, TK_ROW },
 242   { SELECT_W, TK_SELECT },
 243   { SET_W, TK_SET },
 244   { SHORT_W, TK_SHORT },
 245   { STATEMENT_W, TK_STATEMENT },
 246   { TABLE_W, TK_TABLE },
 247   { TEMPORARY_W, TK_TEMPORARY },
 248   { THEN_W, TK_THEN },
 249   { TRANSACTION_W, TK_TRANSACTION },
 250   { TRIGGER_W, TK_TRIGGER },
 251   { UNION_W, TK_UNION },
 252   { UNIQUE_W, TK_UNIQUE },
 253   { UPDATE_W, TK_UPDATE },
 254   { USING_W, TK_USING },
 255   { VACUUM_W, TK_VACUUM },
 256   { VALUES_W, TK_VALUES },
 257   { VIEW_W, TK_VIEW },
 258   { WHEN_W, TK_WHEN },
 259   { WHERE_W, TK_WHERE },
 260 };
 261
 262 #define KEYWORD_COUNT ( sizeof aKeywordTable/sizeof (Keyword) )
 263
 264 /*
 265 ** Comparison function for binary search.
 266 */
 267 static int compKeyword(const void *m1, const void *m2){
 268   const Keyword *k1 = m1, *k2 = m2;
 269
 270   return strcmpiW( k1->zName, k2->zName );
 271 }
 272
 273 /*
 274 ** This function looks up an identifier to determine if it is a
 275 ** keyword.  If it is a keyword, the token code of that keyword is
 276 ** returned.  If the input is not a keyword, TK_ID is returned.
 277 */
 278 static int sqliteKeywordCode(const WCHAR *z, int n){
 279   WCHAR str[MAX_TOKEN_LEN+1];
 280   Keyword key, *r;
 281
 282   if( n>MAX_TOKEN_LEN )
 283     return TK_ID;
 284
 285   memcpy( str, z, n*sizeof (WCHAR) );
 286   str[n] = 0;
 287   key.tokenType = 0;
 288   key.zName = str;
 289   r = bsearch( &key, aKeywordTable, KEYWORD_COUNT, sizeof (Keyword), compKeyword );
 290   if( r )
 291     return r->tokenType;
 292   return TK_ID;
 293 }
 294
 295
 296 /*
 297 ** If X is a character that can be used in an identifier then
 298 ** isIdChar[X] will be 1.  Otherwise isIdChar[X] will be 0.
 299 **
 300 ** In this implementation, an identifier can be a string of
 301 ** alphabetic characters, digits, and "_" plus any character
 302 ** with the high-order bit set.  The latter rule means that
 303 ** any sequence of UTF-8 characters or characters taken from
 304 ** an extended ISO8859 character set can form an identifier.
 305 */
 306 static const char isIdChar[] = {
 307 /* x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 xA xB xC xD xE xF */
 308     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  /* 0x */
 309     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  /* 1x */
 310     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  /* 2x */
 311     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0,  /* 3x */
 312     0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* 4x */
 313     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1,  /* 5x */
 314     0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* 6x */
 315     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0,  /* 7x */
 316     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* 8x */
 317     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* 9x */
 318     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* Ax */
 319     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* Bx */
 320     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* Cx */
 321     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* Dx */
 322     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* Ex */
 323     1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* Fx */
 324 };
 325
 326
 327 /*
 328 ** Return the length of the token that begins at z[0].  Return
 329 ** -1 if the token is (or might be) incomplete.  Store the token
 330 ** type in *tokenType before returning.
 331 */
 332 int sqliteGetToken(const WCHAR *z, int *tokenType){
 333   int i;
 334   switch( *z ){
 335     case ' ': case '\t': case '\n': case '\f': case '\r': {
 336       for(i=1; isspace(z[i]); i++){}
 337       *tokenType = TK_SPACE;
 338       return i;
 339     }
 340     case '-': {
 341       if( z[1]==0 ) return -1;
 342       if( z[1]=='-' ){
 343         for(i=2; z[i] && z[i]!='\n'; i++){}
 344         *tokenType = TK_COMMENT;
 345         return i;
 346       }
 347       *tokenType = TK_MINUS;
 348       return 1;
 349     }
 350     case '(': {
 351       if( z[1]=='+' && z[2]==')' ){
 352         *tokenType = TK_ORACLE_OUTER_JOIN;
 353         return 3;
 354       }else{
 355         *tokenType = TK_LP;
 356         return 1;
 357       }
 358     }
 359     case ')': {
 360       *tokenType = TK_RP;
 361       return 1;
 362     }
 363     case ';': {
 364       *tokenType = TK_SEMI;
 365       return 1;
 366     }
 367     case '+': {
 368       *tokenType = TK_PLUS;
 369       return 1;
 370     }
 371     case '*': {
 372       *tokenType = TK_STAR;
 373       return 1;
 374     }
 375     case '/': {
 376       if( z[1]!='*' || z[2]==0 ){
 377         *tokenType = TK_SLASH;
 378         return 1;
 379       }
 380       for(i=3; z[i] && (z[i]!='/' || z[i-1]!='*'); i++){}
 381       if( z[i] ) i++;
 382       *tokenType = TK_COMMENT;
 383       return i;
 384     }
 385     case '%': {
 386       *tokenType = TK_REM;
 387       return 1;
 388     }
 389     case '=': {
 390       *tokenType = TK_EQ;
 391       return 1 + (z[1]=='=');
 392     }
 393     case '<': {
 394       if( z[1]=='=' ){
 395         *tokenType = TK_LE;
 396         return 2;
 397       }else if( z[1]=='>' ){
 398         *tokenType = TK_NE;
 399         return 2;
 400       }else if( z[1]=='<' ){
 401         *tokenType = TK_LSHIFT;
 402         return 2;
 403       }else{
 404         *tokenType = TK_LT;
 405         return 1;
 406       }
 407     }
 408     case '>': {
 409       if( z[1]=='=' ){
 410         *tokenType = TK_GE;
 411         return 2;
 412       }else if( z[1]=='>' ){
 413         *tokenType = TK_RSHIFT;
 414         return 2;
 415       }else{
 416         *tokenType = TK_GT;
 417         return 1;
 418       }
 419     }
 420     case '!': {
 421       if( z[1]!='=' ){
 422         *tokenType = TK_ILLEGAL;
 423         return 2;
 424       }else{
 425         *tokenType = TK_NE;
 426         return 2;
 427       }
 428     }
 429     case '|': {
 430       if( z[1]!='|' ){
 431         *tokenType = TK_BITOR;
 432         return 1;
 433       }else{
 434         *tokenType = TK_CONCAT;
 435         return 2;
 436       }
 437     }
 438     case '?': {
 439       *tokenType = TK_WILDCARD;
 440       return 1;
 441     }
 442     case ',': {
 443       *tokenType = TK_COMMA;
 444       return 1;
 445     }
 446     case '&': {
 447       *tokenType = TK_BITAND;
 448       return 1;
 449     }
 450     case '~': {
 451       *tokenType = TK_BITNOT;
 452       return 1;
 453     }
 454     case '`': case '\'': case '"': {
 455       int delim = z[0];
 456       for(i=1; z[i]; i++){
 457         if( z[i]==delim ){
 458           if( z[i+1]==delim ){
 459             i++;
 460           }else{
 461             break;
 462           }
 463         }
 464       }
 465       if( z[i] ) i++;
 466       if( delim == '`' )
 467         *tokenType = TK_ID;
 468       else
 469         *tokenType = TK_STRING;
 470       return i;
 471     }
 472     case '.': {
 473       if( !isdigit(z[1]) ){
 474         *tokenType = TK_DOT;
 475         return 1;
 476       }
 477       /* Fall thru into the next case */
 478     }
 479     case '0': case '1': case '2': case '3': case '4':
 480     case '5': case '6': case '7': case '8': case '9': {
 481       *tokenType = TK_INTEGER;
 482       for(i=1; isdigit(z[i]); i++){}
 483       if( z[i]=='.' ){
 484         i++;
 485         while( isdigit(z[i]) ){ i++; }
 486         *tokenType = TK_FLOAT;
 487       }
 488       if( (z[i]=='e' || z[i]=='E') &&
 489            ( isdigit(z[i+1])
 490             || ((z[i+1]=='+' || z[i+1]=='-') && isdigit(z[i+2]))
 491            )
 492       ){
 493         i += 2;
 494         while( isdigit(z[i]) ){ i++; }
 495         *tokenType = TK_FLOAT;
 496       }else if( z[0]=='.' ){
 497         *tokenType = TK_FLOAT;
 498       }
 499       return i;
 500     }
 501     case '[': {
 502       for(i=1; z[i] && z[i-1]!=']'; i++){}
 503       *tokenType = TK_ID;
 504       return i;
 505     }
 506     default: {
 507       if( !isIdChar[*z] ){
 508         break;
 509       }
 510       for(i=1; isIdChar[z[i]]; i++){}
 511       *tokenType = sqliteKeywordCode(z, i);
 512       return i;
 513     }
 514   }
 515   *tokenType = TK_ILLEGAL;
 516   return 1;
 517 }