| OLD | NEW |
| (Empty) |
| 1 /* | |
| 2 ** 2002 February 23 | |
| 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 ** This file contains the C functions that implement various SQL | |
| 13 ** functions of SQLite. | |
| 14 ** | |
| 15 ** There is only one exported symbol in this file - the function | |
| 16 ** sqliteRegisterBuildinFunctions() found at the bottom of the file. | |
| 17 ** All other code has file scope. | |
| 18 */ | |
| 19 #include "sqliteInt.h" | |
| 20 #include <stdlib.h> | |
| 21 #include <assert.h> | |
| 22 #include "vdbeInt.h" | |
| 23 | |
| 24 /* | |
| 25 ** Return the collating function associated with a function. | |
| 26 */ | |
| 27 static CollSeq *sqlite3GetFuncCollSeq(sqlite3_context *context){ | |
| 28 return context->pColl; | |
| 29 } | |
| 30 | |
| 31 /* | |
| 32 ** Implementation of the non-aggregate min() and max() functions | |
| 33 */ | |
| 34 static void minmaxFunc( | |
| 35 sqlite3_context *context, | |
| 36 int argc, | |
| 37 sqlite3_value **argv | |
| 38 ){ | |
| 39 int i; | |
| 40 int mask; /* 0 for min() or 0xffffffff for max() */ | |
| 41 int iBest; | |
| 42 CollSeq *pColl; | |
| 43 | |
| 44 assert( argc>1 ); | |
| 45 mask = sqlite3_user_data(context)==0 ? 0 : -1; | |
| 46 pColl = sqlite3GetFuncCollSeq(context); | |
| 47 assert( pColl ); | |
| 48 assert( mask==-1 || mask==0 ); | |
| 49 iBest = 0; | |
| 50 if( sqlite3_value_type(argv[0])==SQLITE_NULL ) return; | |
| 51 for(i=1; i<argc; i++){ | |
| 52 if( sqlite3_value_type(argv[i])==SQLITE_NULL ) return; | |
| 53 if( (sqlite3MemCompare(argv[iBest], argv[i], pColl)^mask)>=0 ){ | |
| 54 testcase( mask==0 ); | |
| 55 iBest = i; | |
| 56 } | |
| 57 } | |
| 58 sqlite3_result_value(context, argv[iBest]); | |
| 59 } | |
| 60 | |
| 61 /* | |
| 62 ** Return the type of the argument. | |
| 63 */ | |
| 64 static void typeofFunc( | |
| 65 sqlite3_context *context, | |
| 66 int NotUsed, | |
| 67 sqlite3_value **argv | |
| 68 ){ | |
| 69 const char *z = 0; | |
| 70 UNUSED_PARAMETER(NotUsed); | |
| 71 switch( sqlite3_value_type(argv[0]) ){ | |
| 72 case SQLITE_INTEGER: z = "integer"; break; | |
| 73 case SQLITE_TEXT: z = "text"; break; | |
| 74 case SQLITE_FLOAT: z = "real"; break; | |
| 75 case SQLITE_BLOB: z = "blob"; break; | |
| 76 default: z = "null"; break; | |
| 77 } | |
| 78 sqlite3_result_text(context, z, -1, SQLITE_STATIC); | |
| 79 } | |
| 80 | |
| 81 | |
| 82 /* | |
| 83 ** Implementation of the length() function | |
| 84 */ | |
| 85 static void lengthFunc( | |
| 86 sqlite3_context *context, | |
| 87 int argc, | |
| 88 sqlite3_value **argv | |
| 89 ){ | |
| 90 int len; | |
| 91 | |
| 92 assert( argc==1 ); | |
| 93 UNUSED_PARAMETER(argc); | |
| 94 switch( sqlite3_value_type(argv[0]) ){ | |
| 95 case SQLITE_BLOB: | |
| 96 case SQLITE_INTEGER: | |
| 97 case SQLITE_FLOAT: { | |
| 98 sqlite3_result_int(context, sqlite3_value_bytes(argv[0])); | |
| 99 break; | |
| 100 } | |
| 101 case SQLITE_TEXT: { | |
| 102 const unsigned char *z = sqlite3_value_text(argv[0]); | |
| 103 if( z==0 ) return; | |
| 104 len = 0; | |
| 105 while( *z ){ | |
| 106 len++; | |
| 107 SQLITE_SKIP_UTF8(z); | |
| 108 } | |
| 109 sqlite3_result_int(context, len); | |
| 110 break; | |
| 111 } | |
| 112 default: { | |
| 113 sqlite3_result_null(context); | |
| 114 break; | |
| 115 } | |
| 116 } | |
| 117 } | |
| 118 | |
| 119 /* | |
| 120 ** Implementation of the abs() function | |
| 121 */ | |
| 122 static void absFunc(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 123 assert( argc==1 ); | |
| 124 UNUSED_PARAMETER(argc); | |
| 125 switch( sqlite3_value_type(argv[0]) ){ | |
| 126 case SQLITE_INTEGER: { | |
| 127 i64 iVal = sqlite3_value_int64(argv[0]); | |
| 128 if( iVal<0 ){ | |
| 129 if( (iVal<<1)==0 ){ | |
| 130 sqlite3_result_error(context, "integer overflow", -1); | |
| 131 return; | |
| 132 } | |
| 133 iVal = -iVal; | |
| 134 } | |
| 135 sqlite3_result_int64(context, iVal); | |
| 136 break; | |
| 137 } | |
| 138 case SQLITE_NULL: { | |
| 139 sqlite3_result_null(context); | |
| 140 break; | |
| 141 } | |
| 142 default: { | |
| 143 double rVal = sqlite3_value_double(argv[0]); | |
| 144 if( rVal<0 ) rVal = -rVal; | |
| 145 sqlite3_result_double(context, rVal); | |
| 146 break; | |
| 147 } | |
| 148 } | |
| 149 } | |
| 150 | |
| 151 /* | |
| 152 ** Implementation of the substr() function. | |
| 153 ** | |
| 154 ** substr(x,p1,p2) returns p2 characters of x[] beginning with p1. | |
| 155 ** p1 is 1-indexed. So substr(x,1,1) returns the first character | |
| 156 ** of x. If x is text, then we actually count UTF-8 characters. | |
| 157 ** If x is a blob, then we count bytes. | |
| 158 ** | |
| 159 ** If p1 is negative, then we begin abs(p1) from the end of x[]. | |
| 160 */ | |
| 161 static void substrFunc( | |
| 162 sqlite3_context *context, | |
| 163 int argc, | |
| 164 sqlite3_value **argv | |
| 165 ){ | |
| 166 const unsigned char *z; | |
| 167 const unsigned char *z2; | |
| 168 int len; | |
| 169 int p0type; | |
| 170 i64 p1, p2; | |
| 171 int negP2 = 0; | |
| 172 | |
| 173 assert( argc==3 || argc==2 ); | |
| 174 if( sqlite3_value_type(argv[1])==SQLITE_NULL | |
| 175 || (argc==3 && sqlite3_value_type(argv[2])==SQLITE_NULL) | |
| 176 ){ | |
| 177 return; | |
| 178 } | |
| 179 p0type = sqlite3_value_type(argv[0]); | |
| 180 if( p0type==SQLITE_BLOB ){ | |
| 181 len = sqlite3_value_bytes(argv[0]); | |
| 182 z = sqlite3_value_blob(argv[0]); | |
| 183 if( z==0 ) return; | |
| 184 assert( len==sqlite3_value_bytes(argv[0]) ); | |
| 185 }else{ | |
| 186 z = sqlite3_value_text(argv[0]); | |
| 187 if( z==0 ) return; | |
| 188 len = 0; | |
| 189 for(z2=z; *z2; len++){ | |
| 190 SQLITE_SKIP_UTF8(z2); | |
| 191 } | |
| 192 } | |
| 193 p1 = sqlite3_value_int(argv[1]); | |
| 194 if( argc==3 ){ | |
| 195 p2 = sqlite3_value_int(argv[2]); | |
| 196 if( p2<0 ){ | |
| 197 p2 = -p2; | |
| 198 negP2 = 1; | |
| 199 } | |
| 200 }else{ | |
| 201 p2 = sqlite3_context_db_handle(context)->aLimit[SQLITE_LIMIT_LENGTH]; | |
| 202 } | |
| 203 if( p1<0 ){ | |
| 204 p1 += len; | |
| 205 if( p1<0 ){ | |
| 206 p2 += p1; | |
| 207 if( p2<0 ) p2 = 0; | |
| 208 p1 = 0; | |
| 209 } | |
| 210 }else if( p1>0 ){ | |
| 211 p1--; | |
| 212 }else if( p2>0 ){ | |
| 213 p2--; | |
| 214 } | |
| 215 if( negP2 ){ | |
| 216 p1 -= p2; | |
| 217 if( p1<0 ){ | |
| 218 p2 += p1; | |
| 219 p1 = 0; | |
| 220 } | |
| 221 } | |
| 222 assert( p1>=0 && p2>=0 ); | |
| 223 if( p1+p2>len ){ | |
| 224 p2 = len-p1; | |
| 225 if( p2<0 ) p2 = 0; | |
| 226 } | |
| 227 if( p0type!=SQLITE_BLOB ){ | |
| 228 while( *z && p1 ){ | |
| 229 SQLITE_SKIP_UTF8(z); | |
| 230 p1--; | |
| 231 } | |
| 232 for(z2=z; *z2 && p2; p2--){ | |
| 233 SQLITE_SKIP_UTF8(z2); | |
| 234 } | |
| 235 sqlite3_result_text(context, (char*)z, (int)(z2-z), SQLITE_TRANSIENT); | |
| 236 }else{ | |
| 237 sqlite3_result_blob(context, (char*)&z[p1], (int)p2, SQLITE_TRANSIENT); | |
| 238 } | |
| 239 } | |
| 240 | |
| 241 /* | |
| 242 ** Implementation of the round() function | |
| 243 */ | |
| 244 #ifndef SQLITE_OMIT_FLOATING_POINT | |
| 245 static void roundFunc(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 246 int n = 0; | |
| 247 double r; | |
| 248 char *zBuf; | |
| 249 assert( argc==1 || argc==2 ); | |
| 250 if( argc==2 ){ | |
| 251 if( SQLITE_NULL==sqlite3_value_type(argv[1]) ) return; | |
| 252 n = sqlite3_value_int(argv[1]); | |
| 253 if( n>30 ) n = 30; | |
| 254 if( n<0 ) n = 0; | |
| 255 } | |
| 256 if( sqlite3_value_type(argv[0])==SQLITE_NULL ) return; | |
| 257 r = sqlite3_value_double(argv[0]); | |
| 258 zBuf = sqlite3_mprintf("%.*f",n,r); | |
| 259 if( zBuf==0 ){ | |
| 260 sqlite3_result_error_nomem(context); | |
| 261 }else{ | |
| 262 sqlite3AtoF(zBuf, &r); | |
| 263 sqlite3_free(zBuf); | |
| 264 sqlite3_result_double(context, r); | |
| 265 } | |
| 266 } | |
| 267 #endif | |
| 268 | |
| 269 /* | |
| 270 ** Allocate nByte bytes of space using sqlite3_malloc(). If the | |
| 271 ** allocation fails, call sqlite3_result_error_nomem() to notify | |
| 272 ** the database handle that malloc() has failed and return NULL. | |
| 273 ** If nByte is larger than the maximum string or blob length, then | |
| 274 ** raise an SQLITE_TOOBIG exception and return NULL. | |
| 275 */ | |
| 276 static void *contextMalloc(sqlite3_context *context, i64 nByte){ | |
| 277 char *z; | |
| 278 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 279 assert( nByte>0 ); | |
| 280 testcase( nByte==db->aLimit[SQLITE_LIMIT_LENGTH] ); | |
| 281 testcase( nByte==db->aLimit[SQLITE_LIMIT_LENGTH]+1 ); | |
| 282 if( nByte>db->aLimit[SQLITE_LIMIT_LENGTH] ){ | |
| 283 sqlite3_result_error_toobig(context); | |
| 284 z = 0; | |
| 285 }else{ | |
| 286 z = sqlite3Malloc((int)nByte); | |
| 287 if( !z ){ | |
| 288 sqlite3_result_error_nomem(context); | |
| 289 } | |
| 290 } | |
| 291 return z; | |
| 292 } | |
| 293 | |
| 294 /* | |
| 295 ** Implementation of the upper() and lower() SQL functions. | |
| 296 */ | |
| 297 static void upperFunc(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 298 char *z1; | |
| 299 const char *z2; | |
| 300 int i, n; | |
| 301 UNUSED_PARAMETER(argc); | |
| 302 z2 = (char*)sqlite3_value_text(argv[0]); | |
| 303 n = sqlite3_value_bytes(argv[0]); | |
| 304 /* Verify that the call to _bytes() does not invalidate the _text() pointer */ | |
| 305 assert( z2==(char*)sqlite3_value_text(argv[0]) ); | |
| 306 if( z2 ){ | |
| 307 z1 = contextMalloc(context, ((i64)n)+1); | |
| 308 if( z1 ){ | |
| 309 memcpy(z1, z2, n+1); | |
| 310 for(i=0; z1[i]; i++){ | |
| 311 z1[i] = (char)sqlite3Toupper(z1[i]); | |
| 312 } | |
| 313 sqlite3_result_text(context, z1, -1, sqlite3_free); | |
| 314 } | |
| 315 } | |
| 316 } | |
| 317 static void lowerFunc(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 318 u8 *z1; | |
| 319 const char *z2; | |
| 320 int i, n; | |
| 321 UNUSED_PARAMETER(argc); | |
| 322 z2 = (char*)sqlite3_value_text(argv[0]); | |
| 323 n = sqlite3_value_bytes(argv[0]); | |
| 324 /* Verify that the call to _bytes() does not invalidate the _text() pointer */ | |
| 325 assert( z2==(char*)sqlite3_value_text(argv[0]) ); | |
| 326 if( z2 ){ | |
| 327 z1 = contextMalloc(context, ((i64)n)+1); | |
| 328 if( z1 ){ | |
| 329 memcpy(z1, z2, n+1); | |
| 330 for(i=0; z1[i]; i++){ | |
| 331 z1[i] = sqlite3Tolower(z1[i]); | |
| 332 } | |
| 333 sqlite3_result_text(context, (char *)z1, -1, sqlite3_free); | |
| 334 } | |
| 335 } | |
| 336 } | |
| 337 | |
| 338 /* | |
| 339 ** Implementation of the IFNULL(), NVL(), and COALESCE() functions. | |
| 340 ** All three do the same thing. They return the first non-NULL | |
| 341 ** argument. | |
| 342 */ | |
| 343 static void ifnullFunc( | |
| 344 sqlite3_context *context, | |
| 345 int argc, | |
| 346 sqlite3_value **argv | |
| 347 ){ | |
| 348 int i; | |
| 349 for(i=0; i<argc; i++){ | |
| 350 if( SQLITE_NULL!=sqlite3_value_type(argv[i]) ){ | |
| 351 sqlite3_result_value(context, argv[i]); | |
| 352 break; | |
| 353 } | |
| 354 } | |
| 355 } | |
| 356 | |
| 357 /* | |
| 358 ** Implementation of random(). Return a random integer. | |
| 359 */ | |
| 360 static void randomFunc( | |
| 361 sqlite3_context *context, | |
| 362 int NotUsed, | |
| 363 sqlite3_value **NotUsed2 | |
| 364 ){ | |
| 365 sqlite_int64 r; | |
| 366 UNUSED_PARAMETER2(NotUsed, NotUsed2); | |
| 367 sqlite3_randomness(sizeof(r), &r); | |
| 368 if( r<0 ){ | |
| 369 /* We need to prevent a random number of 0x8000000000000000 | |
| 370 ** (or -9223372036854775808) since when you do abs() of that | |
| 371 ** number of you get the same value back again. To do this | |
| 372 ** in a way that is testable, mask the sign bit off of negative | |
| 373 ** values, resulting in a positive value. Then take the | |
| 374 ** 2s complement of that positive value. The end result can | |
| 375 ** therefore be no less than -9223372036854775807. | |
| 376 */ | |
| 377 r = -(r ^ (((sqlite3_int64)1)<<63)); | |
| 378 } | |
| 379 sqlite3_result_int64(context, r); | |
| 380 } | |
| 381 | |
| 382 /* | |
| 383 ** Implementation of randomblob(N). Return a random blob | |
| 384 ** that is N bytes long. | |
| 385 */ | |
| 386 static void randomBlob( | |
| 387 sqlite3_context *context, | |
| 388 int argc, | |
| 389 sqlite3_value **argv | |
| 390 ){ | |
| 391 int n; | |
| 392 unsigned char *p; | |
| 393 assert( argc==1 ); | |
| 394 UNUSED_PARAMETER(argc); | |
| 395 n = sqlite3_value_int(argv[0]); | |
| 396 if( n<1 ){ | |
| 397 n = 1; | |
| 398 } | |
| 399 p = contextMalloc(context, n); | |
| 400 if( p ){ | |
| 401 sqlite3_randomness(n, p); | |
| 402 sqlite3_result_blob(context, (char*)p, n, sqlite3_free); | |
| 403 } | |
| 404 } | |
| 405 | |
| 406 /* | |
| 407 ** Implementation of the last_insert_rowid() SQL function. The return | |
| 408 ** value is the same as the sqlite3_last_insert_rowid() API function. | |
| 409 */ | |
| 410 static void last_insert_rowid( | |
| 411 sqlite3_context *context, | |
| 412 int NotUsed, | |
| 413 sqlite3_value **NotUsed2 | |
| 414 ){ | |
| 415 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 416 UNUSED_PARAMETER2(NotUsed, NotUsed2); | |
| 417 sqlite3_result_int64(context, sqlite3_last_insert_rowid(db)); | |
| 418 } | |
| 419 | |
| 420 /* | |
| 421 ** Implementation of the changes() SQL function. The return value is the | |
| 422 ** same as the sqlite3_changes() API function. | |
| 423 */ | |
| 424 static void changes( | |
| 425 sqlite3_context *context, | |
| 426 int NotUsed, | |
| 427 sqlite3_value **NotUsed2 | |
| 428 ){ | |
| 429 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 430 UNUSED_PARAMETER2(NotUsed, NotUsed2); | |
| 431 sqlite3_result_int(context, sqlite3_changes(db)); | |
| 432 } | |
| 433 | |
| 434 /* | |
| 435 ** Implementation of the total_changes() SQL function. The return value is | |
| 436 ** the same as the sqlite3_total_changes() API function. | |
| 437 */ | |
| 438 static void total_changes( | |
| 439 sqlite3_context *context, | |
| 440 int NotUsed, | |
| 441 sqlite3_value **NotUsed2 | |
| 442 ){ | |
| 443 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 444 UNUSED_PARAMETER2(NotUsed, NotUsed2); | |
| 445 sqlite3_result_int(context, sqlite3_total_changes(db)); | |
| 446 } | |
| 447 | |
| 448 /* | |
| 449 ** A structure defining how to do GLOB-style comparisons. | |
| 450 */ | |
| 451 struct compareInfo { | |
| 452 u8 matchAll; | |
| 453 u8 matchOne; | |
| 454 u8 matchSet; | |
| 455 u8 noCase; | |
| 456 }; | |
| 457 | |
| 458 /* | |
| 459 ** For LIKE and GLOB matching on EBCDIC machines, assume that every | |
| 460 ** character is exactly one byte in size. Also, all characters are | |
| 461 ** able to participate in upper-case-to-lower-case mappings in EBCDIC | |
| 462 ** whereas only characters less than 0x80 do in ASCII. | |
| 463 */ | |
| 464 #if defined(SQLITE_EBCDIC) | |
| 465 # define sqlite3Utf8Read(A,C) (*(A++)) | |
| 466 # define GlogUpperToLower(A) A = sqlite3UpperToLower[A] | |
| 467 #else | |
| 468 # define GlogUpperToLower(A) if( A<0x80 ){ A = sqlite3UpperToLower[A]; } | |
| 469 #endif | |
| 470 | |
| 471 static const struct compareInfo globInfo = { '*', '?', '[', 0 }; | |
| 472 /* The correct SQL-92 behavior is for the LIKE operator to ignore | |
| 473 ** case. Thus 'a' LIKE 'A' would be true. */ | |
| 474 static const struct compareInfo likeInfoNorm = { '%', '_', 0, 1 }; | |
| 475 /* If SQLITE_CASE_SENSITIVE_LIKE is defined, then the LIKE operator | |
| 476 ** is case sensitive causing 'a' LIKE 'A' to be false */ | |
| 477 static const struct compareInfo likeInfoAlt = { '%', '_', 0, 0 }; | |
| 478 | |
| 479 /* | |
| 480 ** Compare two UTF-8 strings for equality where the first string can | |
| 481 ** potentially be a "glob" expression. Return true (1) if they | |
| 482 ** are the same and false (0) if they are different. | |
| 483 ** | |
| 484 ** Globbing rules: | |
| 485 ** | |
| 486 ** '*' Matches any sequence of zero or more characters. | |
| 487 ** | |
| 488 ** '?' Matches exactly one character. | |
| 489 ** | |
| 490 ** [...] Matches one character from the enclosed list of | |
| 491 ** characters. | |
| 492 ** | |
| 493 ** [^...] Matches one character not in the enclosed list. | |
| 494 ** | |
| 495 ** With the [...] and [^...] matching, a ']' character can be included | |
| 496 ** in the list by making it the first character after '[' or '^'. A | |
| 497 ** range of characters can be specified using '-'. Example: | |
| 498 ** "[a-z]" matches any single lower-case letter. To match a '-', make | |
| 499 ** it the last character in the list. | |
| 500 ** | |
| 501 ** This routine is usually quick, but can be N**2 in the worst case. | |
| 502 ** | |
| 503 ** Hints: to match '*' or '?', put them in "[]". Like this: | |
| 504 ** | |
| 505 ** abc[*]xyz Matches "abc*xyz" only | |
| 506 */ | |
| 507 static int patternCompare( | |
| 508 const u8 *zPattern, /* The glob pattern */ | |
| 509 const u8 *zString, /* The string to compare against the glob */ | |
| 510 const struct compareInfo *pInfo, /* Information about how to do the compare */ | |
| 511 const int esc /* The escape character */ | |
| 512 ){ | |
| 513 int c, c2; | |
| 514 int invert; | |
| 515 int seen; | |
| 516 u8 matchOne = pInfo->matchOne; | |
| 517 u8 matchAll = pInfo->matchAll; | |
| 518 u8 matchSet = pInfo->matchSet; | |
| 519 u8 noCase = pInfo->noCase; | |
| 520 int prevEscape = 0; /* True if the previous character was 'escape' */ | |
| 521 | |
| 522 while( (c = sqlite3Utf8Read(zPattern,&zPattern))!=0 ){ | |
| 523 if( !prevEscape && c==matchAll ){ | |
| 524 while( (c=sqlite3Utf8Read(zPattern,&zPattern)) == matchAll | |
| 525 || c == matchOne ){ | |
| 526 if( c==matchOne && sqlite3Utf8Read(zString, &zString)==0 ){ | |
| 527 return 0; | |
| 528 } | |
| 529 } | |
| 530 if( c==0 ){ | |
| 531 return 1; | |
| 532 }else if( c==esc ){ | |
| 533 c = sqlite3Utf8Read(zPattern, &zPattern); | |
| 534 if( c==0 ){ | |
| 535 return 0; | |
| 536 } | |
| 537 }else if( c==matchSet ){ | |
| 538 assert( esc==0 ); /* This is GLOB, not LIKE */ | |
| 539 assert( matchSet<0x80 ); /* '[' is a single-byte character */ | |
| 540 while( *zString && patternCompare(&zPattern[-1],zString,pInfo,esc)==0 ){ | |
| 541 SQLITE_SKIP_UTF8(zString); | |
| 542 } | |
| 543 return *zString!=0; | |
| 544 } | |
| 545 while( (c2 = sqlite3Utf8Read(zString,&zString))!=0 ){ | |
| 546 if( noCase ){ | |
| 547 GlogUpperToLower(c2); | |
| 548 GlogUpperToLower(c); | |
| 549 while( c2 != 0 && c2 != c ){ | |
| 550 c2 = sqlite3Utf8Read(zString, &zString); | |
| 551 GlogUpperToLower(c2); | |
| 552 } | |
| 553 }else{ | |
| 554 while( c2 != 0 && c2 != c ){ | |
| 555 c2 = sqlite3Utf8Read(zString, &zString); | |
| 556 } | |
| 557 } | |
| 558 if( c2==0 ) return 0; | |
| 559 if( patternCompare(zPattern,zString,pInfo,esc) ) return 1; | |
| 560 } | |
| 561 return 0; | |
| 562 }else if( !prevEscape && c==matchOne ){ | |
| 563 if( sqlite3Utf8Read(zString, &zString)==0 ){ | |
| 564 return 0; | |
| 565 } | |
| 566 }else if( c==matchSet ){ | |
| 567 int prior_c = 0; | |
| 568 assert( esc==0 ); /* This only occurs for GLOB, not LIKE */ | |
| 569 seen = 0; | |
| 570 invert = 0; | |
| 571 c = sqlite3Utf8Read(zString, &zString); | |
| 572 if( c==0 ) return 0; | |
| 573 c2 = sqlite3Utf8Read(zPattern, &zPattern); | |
| 574 if( c2=='^' ){ | |
| 575 invert = 1; | |
| 576 c2 = sqlite3Utf8Read(zPattern, &zPattern); | |
| 577 } | |
| 578 if( c2==']' ){ | |
| 579 if( c==']' ) seen = 1; | |
| 580 c2 = sqlite3Utf8Read(zPattern, &zPattern); | |
| 581 } | |
| 582 while( c2 && c2!=']' ){ | |
| 583 if( c2=='-' && zPattern[0]!=']' && zPattern[0]!=0 && prior_c>0 ){ | |
| 584 c2 = sqlite3Utf8Read(zPattern, &zPattern); | |
| 585 if( c>=prior_c && c<=c2 ) seen = 1; | |
| 586 prior_c = 0; | |
| 587 }else{ | |
| 588 if( c==c2 ){ | |
| 589 seen = 1; | |
| 590 } | |
| 591 prior_c = c2; | |
| 592 } | |
| 593 c2 = sqlite3Utf8Read(zPattern, &zPattern); | |
| 594 } | |
| 595 if( c2==0 || (seen ^ invert)==0 ){ | |
| 596 return 0; | |
| 597 } | |
| 598 }else if( esc==c && !prevEscape ){ | |
| 599 prevEscape = 1; | |
| 600 }else{ | |
| 601 c2 = sqlite3Utf8Read(zString, &zString); | |
| 602 if( noCase ){ | |
| 603 GlogUpperToLower(c); | |
| 604 GlogUpperToLower(c2); | |
| 605 } | |
| 606 if( c!=c2 ){ | |
| 607 return 0; | |
| 608 } | |
| 609 prevEscape = 0; | |
| 610 } | |
| 611 } | |
| 612 return *zString==0; | |
| 613 } | |
| 614 | |
| 615 /* | |
| 616 ** Count the number of times that the LIKE operator (or GLOB which is | |
| 617 ** just a variation of LIKE) gets called. This is used for testing | |
| 618 ** only. | |
| 619 */ | |
| 620 #ifdef SQLITE_TEST | |
| 621 int sqlite3_like_count = 0; | |
| 622 #endif | |
| 623 | |
| 624 | |
| 625 /* | |
| 626 ** Implementation of the like() SQL function. This function implements | |
| 627 ** the build-in LIKE operator. The first argument to the function is the | |
| 628 ** pattern and the second argument is the string. So, the SQL statements: | |
| 629 ** | |
| 630 ** A LIKE B | |
| 631 ** | |
| 632 ** is implemented as like(B,A). | |
| 633 ** | |
| 634 ** This same function (with a different compareInfo structure) computes | |
| 635 ** the GLOB operator. | |
| 636 */ | |
| 637 static void likeFunc( | |
| 638 sqlite3_context *context, | |
| 639 int argc, | |
| 640 sqlite3_value **argv | |
| 641 ){ | |
| 642 const unsigned char *zA, *zB; | |
| 643 int escape = 0; | |
| 644 int nPat; | |
| 645 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 646 | |
| 647 zB = sqlite3_value_text(argv[0]); | |
| 648 zA = sqlite3_value_text(argv[1]); | |
| 649 | |
| 650 /* Limit the length of the LIKE or GLOB pattern to avoid problems | |
| 651 ** of deep recursion and N*N behavior in patternCompare(). | |
| 652 */ | |
| 653 nPat = sqlite3_value_bytes(argv[0]); | |
| 654 testcase( nPat==db->aLimit[SQLITE_LIMIT_LIKE_PATTERN_LENGTH] ); | |
| 655 testcase( nPat==db->aLimit[SQLITE_LIMIT_LIKE_PATTERN_LENGTH]+1 ); | |
| 656 if( nPat > db->aLimit[SQLITE_LIMIT_LIKE_PATTERN_LENGTH] ){ | |
| 657 sqlite3_result_error(context, "LIKE or GLOB pattern too complex", -1); | |
| 658 return; | |
| 659 } | |
| 660 assert( zB==sqlite3_value_text(argv[0]) ); /* Encoding did not change */ | |
| 661 | |
| 662 if( argc==3 ){ | |
| 663 /* The escape character string must consist of a single UTF-8 character. | |
| 664 ** Otherwise, return an error. | |
| 665 */ | |
| 666 const unsigned char *zEsc = sqlite3_value_text(argv[2]); | |
| 667 if( zEsc==0 ) return; | |
| 668 if( sqlite3Utf8CharLen((char*)zEsc, -1)!=1 ){ | |
| 669 sqlite3_result_error(context, | |
| 670 "ESCAPE expression must be a single character", -1); | |
| 671 return; | |
| 672 } | |
| 673 escape = sqlite3Utf8Read(zEsc, &zEsc); | |
| 674 } | |
| 675 if( zA && zB ){ | |
| 676 struct compareInfo *pInfo = sqlite3_user_data(context); | |
| 677 #ifdef SQLITE_TEST | |
| 678 sqlite3_like_count++; | |
| 679 #endif | |
| 680 | |
| 681 sqlite3_result_int(context, patternCompare(zB, zA, pInfo, escape)); | |
| 682 } | |
| 683 } | |
| 684 | |
| 685 /* | |
| 686 ** Implementation of the NULLIF(x,y) function. The result is the first | |
| 687 ** argument if the arguments are different. The result is NULL if the | |
| 688 ** arguments are equal to each other. | |
| 689 */ | |
| 690 static void nullifFunc( | |
| 691 sqlite3_context *context, | |
| 692 int NotUsed, | |
| 693 sqlite3_value **argv | |
| 694 ){ | |
| 695 CollSeq *pColl = sqlite3GetFuncCollSeq(context); | |
| 696 UNUSED_PARAMETER(NotUsed); | |
| 697 if( sqlite3MemCompare(argv[0], argv[1], pColl)!=0 ){ | |
| 698 sqlite3_result_value(context, argv[0]); | |
| 699 } | |
| 700 } | |
| 701 | |
| 702 /* | |
| 703 ** Implementation of the sqlite_version() function. The result is the version | |
| 704 ** of the SQLite library that is running. | |
| 705 */ | |
| 706 static void versionFunc( | |
| 707 sqlite3_context *context, | |
| 708 int NotUsed, | |
| 709 sqlite3_value **NotUsed2 | |
| 710 ){ | |
| 711 UNUSED_PARAMETER2(NotUsed, NotUsed2); | |
| 712 sqlite3_result_text(context, sqlite3_version, -1, SQLITE_STATIC); | |
| 713 } | |
| 714 | |
| 715 /* | |
| 716 ** Implementation of the sqlite_source_id() function. The result is a string | |
| 717 ** that identifies the particular version of the source code used to build | |
| 718 ** SQLite. | |
| 719 */ | |
| 720 static void sourceidFunc( | |
| 721 sqlite3_context *context, | |
| 722 int NotUsed, | |
| 723 sqlite3_value **NotUsed2 | |
| 724 ){ | |
| 725 UNUSED_PARAMETER2(NotUsed, NotUsed2); | |
| 726 sqlite3_result_text(context, SQLITE_SOURCE_ID, -1, SQLITE_STATIC); | |
| 727 } | |
| 728 | |
| 729 /* Array for converting from half-bytes (nybbles) into ASCII hex | |
| 730 ** digits. */ | |
| 731 static const char hexdigits[] = { | |
| 732 '0', '1', '2', '3', '4', '5', '6', '7', | |
| 733 '8', '9', 'A', 'B', 'C', 'D', 'E', 'F' | |
| 734 }; | |
| 735 | |
| 736 /* | |
| 737 ** EXPERIMENTAL - This is not an official function. The interface may | |
| 738 ** change. This function may disappear. Do not write code that depends | |
| 739 ** on this function. | |
| 740 ** | |
| 741 ** Implementation of the QUOTE() function. This function takes a single | |
| 742 ** argument. If the argument is numeric, the return value is the same as | |
| 743 ** the argument. If the argument is NULL, the return value is the string | |
| 744 ** "NULL". Otherwise, the argument is enclosed in single quotes with | |
| 745 ** single-quote escapes. | |
| 746 */ | |
| 747 static void quoteFunc(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 748 assert( argc==1 ); | |
| 749 UNUSED_PARAMETER(argc); | |
| 750 switch( sqlite3_value_type(argv[0]) ){ | |
| 751 case SQLITE_INTEGER: | |
| 752 case SQLITE_FLOAT: { | |
| 753 sqlite3_result_value(context, argv[0]); | |
| 754 break; | |
| 755 } | |
| 756 case SQLITE_BLOB: { | |
| 757 char *zText = 0; | |
| 758 char const *zBlob = sqlite3_value_blob(argv[0]); | |
| 759 int nBlob = sqlite3_value_bytes(argv[0]); | |
| 760 assert( zBlob==sqlite3_value_blob(argv[0]) ); /* No encoding change */ | |
| 761 zText = (char *)contextMalloc(context, (2*(i64)nBlob)+4); | |
| 762 if( zText ){ | |
| 763 int i; | |
| 764 for(i=0; i<nBlob; i++){ | |
| 765 zText[(i*2)+2] = hexdigits[(zBlob[i]>>4)&0x0F]; | |
| 766 zText[(i*2)+3] = hexdigits[(zBlob[i])&0x0F]; | |
| 767 } | |
| 768 zText[(nBlob*2)+2] = '\''; | |
| 769 zText[(nBlob*2)+3] = '\0'; | |
| 770 zText[0] = 'X'; | |
| 771 zText[1] = '\''; | |
| 772 sqlite3_result_text(context, zText, -1, SQLITE_TRANSIENT); | |
| 773 sqlite3_free(zText); | |
| 774 } | |
| 775 break; | |
| 776 } | |
| 777 case SQLITE_TEXT: { | |
| 778 int i,j; | |
| 779 u64 n; | |
| 780 const unsigned char *zArg = sqlite3_value_text(argv[0]); | |
| 781 char *z; | |
| 782 | |
| 783 if( zArg==0 ) return; | |
| 784 for(i=0, n=0; zArg[i]; i++){ if( zArg[i]=='\'' ) n++; } | |
| 785 z = contextMalloc(context, ((i64)i)+((i64)n)+3); | |
| 786 if( z ){ | |
| 787 z[0] = '\''; | |
| 788 for(i=0, j=1; zArg[i]; i++){ | |
| 789 z[j++] = zArg[i]; | |
| 790 if( zArg[i]=='\'' ){ | |
| 791 z[j++] = '\''; | |
| 792 } | |
| 793 } | |
| 794 z[j++] = '\''; | |
| 795 z[j] = 0; | |
| 796 sqlite3_result_text(context, z, j, sqlite3_free); | |
| 797 } | |
| 798 break; | |
| 799 } | |
| 800 default: { | |
| 801 assert( sqlite3_value_type(argv[0])==SQLITE_NULL ); | |
| 802 sqlite3_result_text(context, "NULL", 4, SQLITE_STATIC); | |
| 803 break; | |
| 804 } | |
| 805 } | |
| 806 } | |
| 807 | |
| 808 /* | |
| 809 ** The hex() function. Interpret the argument as a blob. Return | |
| 810 ** a hexadecimal rendering as text. | |
| 811 */ | |
| 812 static void hexFunc( | |
| 813 sqlite3_context *context, | |
| 814 int argc, | |
| 815 sqlite3_value **argv | |
| 816 ){ | |
| 817 int i, n; | |
| 818 const unsigned char *pBlob; | |
| 819 char *zHex, *z; | |
| 820 assert( argc==1 ); | |
| 821 UNUSED_PARAMETER(argc); | |
| 822 pBlob = sqlite3_value_blob(argv[0]); | |
| 823 n = sqlite3_value_bytes(argv[0]); | |
| 824 assert( pBlob==sqlite3_value_blob(argv[0]) ); /* No encoding change */ | |
| 825 z = zHex = contextMalloc(context, ((i64)n)*2 + 1); | |
| 826 if( zHex ){ | |
| 827 for(i=0; i<n; i++, pBlob++){ | |
| 828 unsigned char c = *pBlob; | |
| 829 *(z++) = hexdigits[(c>>4)&0xf]; | |
| 830 *(z++) = hexdigits[c&0xf]; | |
| 831 } | |
| 832 *z = 0; | |
| 833 sqlite3_result_text(context, zHex, n*2, sqlite3_free); | |
| 834 } | |
| 835 } | |
| 836 | |
| 837 /* | |
| 838 ** The zeroblob(N) function returns a zero-filled blob of size N bytes. | |
| 839 */ | |
| 840 static void zeroblobFunc( | |
| 841 sqlite3_context *context, | |
| 842 int argc, | |
| 843 sqlite3_value **argv | |
| 844 ){ | |
| 845 i64 n; | |
| 846 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 847 assert( argc==1 ); | |
| 848 UNUSED_PARAMETER(argc); | |
| 849 n = sqlite3_value_int64(argv[0]); | |
| 850 testcase( n==db->aLimit[SQLITE_LIMIT_LENGTH] ); | |
| 851 testcase( n==db->aLimit[SQLITE_LIMIT_LENGTH]+1 ); | |
| 852 if( n>db->aLimit[SQLITE_LIMIT_LENGTH] ){ | |
| 853 sqlite3_result_error_toobig(context); | |
| 854 }else{ | |
| 855 sqlite3_result_zeroblob(context, (int)n); | |
| 856 } | |
| 857 } | |
| 858 | |
| 859 /* | |
| 860 ** The replace() function. Three arguments are all strings: call | |
| 861 ** them A, B, and C. The result is also a string which is derived | |
| 862 ** from A by replacing every occurance of B with C. The match | |
| 863 ** must be exact. Collating sequences are not used. | |
| 864 */ | |
| 865 static void replaceFunc( | |
| 866 sqlite3_context *context, | |
| 867 int argc, | |
| 868 sqlite3_value **argv | |
| 869 ){ | |
| 870 const unsigned char *zStr; /* The input string A */ | |
| 871 const unsigned char *zPattern; /* The pattern string B */ | |
| 872 const unsigned char *zRep; /* The replacement string C */ | |
| 873 unsigned char *zOut; /* The output */ | |
| 874 int nStr; /* Size of zStr */ | |
| 875 int nPattern; /* Size of zPattern */ | |
| 876 int nRep; /* Size of zRep */ | |
| 877 i64 nOut; /* Maximum size of zOut */ | |
| 878 int loopLimit; /* Last zStr[] that might match zPattern[] */ | |
| 879 int i, j; /* Loop counters */ | |
| 880 | |
| 881 assert( argc==3 ); | |
| 882 UNUSED_PARAMETER(argc); | |
| 883 zStr = sqlite3_value_text(argv[0]); | |
| 884 if( zStr==0 ) return; | |
| 885 nStr = sqlite3_value_bytes(argv[0]); | |
| 886 assert( zStr==sqlite3_value_text(argv[0]) ); /* No encoding change */ | |
| 887 zPattern = sqlite3_value_text(argv[1]); | |
| 888 if( zPattern==0 ){ | |
| 889 assert( sqlite3_value_type(argv[1])==SQLITE_NULL | |
| 890 || sqlite3_context_db_handle(context)->mallocFailed ); | |
| 891 return; | |
| 892 } | |
| 893 if( zPattern[0]==0 ){ | |
| 894 assert( sqlite3_value_type(argv[1])!=SQLITE_NULL ); | |
| 895 sqlite3_result_value(context, argv[0]); | |
| 896 return; | |
| 897 } | |
| 898 nPattern = sqlite3_value_bytes(argv[1]); | |
| 899 assert( zPattern==sqlite3_value_text(argv[1]) ); /* No encoding change */ | |
| 900 zRep = sqlite3_value_text(argv[2]); | |
| 901 if( zRep==0 ) return; | |
| 902 nRep = sqlite3_value_bytes(argv[2]); | |
| 903 assert( zRep==sqlite3_value_text(argv[2]) ); | |
| 904 nOut = nStr + 1; | |
| 905 assert( nOut<SQLITE_MAX_LENGTH ); | |
| 906 zOut = contextMalloc(context, (i64)nOut); | |
| 907 if( zOut==0 ){ | |
| 908 return; | |
| 909 } | |
| 910 loopLimit = nStr - nPattern; | |
| 911 for(i=j=0; i<=loopLimit; i++){ | |
| 912 if( zStr[i]!=zPattern[0] || memcmp(&zStr[i], zPattern, nPattern) ){ | |
| 913 zOut[j++] = zStr[i]; | |
| 914 }else{ | |
| 915 u8 *zOld; | |
| 916 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 917 nOut += nRep - nPattern; | |
| 918 testcase( nOut-1==db->aLimit[SQLITE_LIMIT_LENGTH] ); | |
| 919 testcase( nOut-2==db->aLimit[SQLITE_LIMIT_LENGTH] ); | |
| 920 if( nOut-1>db->aLimit[SQLITE_LIMIT_LENGTH] ){ | |
| 921 sqlite3_result_error_toobig(context); | |
| 922 sqlite3DbFree(db, zOut); | |
| 923 return; | |
| 924 } | |
| 925 zOld = zOut; | |
| 926 zOut = sqlite3_realloc(zOut, (int)nOut); | |
| 927 if( zOut==0 ){ | |
| 928 sqlite3_result_error_nomem(context); | |
| 929 sqlite3DbFree(db, zOld); | |
| 930 return; | |
| 931 } | |
| 932 memcpy(&zOut[j], zRep, nRep); | |
| 933 j += nRep; | |
| 934 i += nPattern-1; | |
| 935 } | |
| 936 } | |
| 937 assert( j+nStr-i+1==nOut ); | |
| 938 memcpy(&zOut[j], &zStr[i], nStr-i); | |
| 939 j += nStr - i; | |
| 940 assert( j<=nOut ); | |
| 941 zOut[j] = 0; | |
| 942 sqlite3_result_text(context, (char*)zOut, j, sqlite3_free); | |
| 943 } | |
| 944 | |
| 945 /* | |
| 946 ** Implementation of the TRIM(), LTRIM(), and RTRIM() functions. | |
| 947 ** The userdata is 0x1 for left trim, 0x2 for right trim, 0x3 for both. | |
| 948 */ | |
| 949 static void trimFunc( | |
| 950 sqlite3_context *context, | |
| 951 int argc, | |
| 952 sqlite3_value **argv | |
| 953 ){ | |
| 954 const unsigned char *zIn; /* Input string */ | |
| 955 const unsigned char *zCharSet; /* Set of characters to trim */ | |
| 956 int nIn; /* Number of bytes in input */ | |
| 957 int flags; /* 1: trimleft 2: trimright 3: trim */ | |
| 958 int i; /* Loop counter */ | |
| 959 unsigned char *aLen = 0; /* Length of each character in zCharSet */ | |
| 960 unsigned char **azChar = 0; /* Individual characters in zCharSet */ | |
| 961 int nChar; /* Number of characters in zCharSet */ | |
| 962 | |
| 963 if( sqlite3_value_type(argv[0])==SQLITE_NULL ){ | |
| 964 return; | |
| 965 } | |
| 966 zIn = sqlite3_value_text(argv[0]); | |
| 967 if( zIn==0 ) return; | |
| 968 nIn = sqlite3_value_bytes(argv[0]); | |
| 969 assert( zIn==sqlite3_value_text(argv[0]) ); | |
| 970 if( argc==1 ){ | |
| 971 static const unsigned char lenOne[] = { 1 }; | |
| 972 static unsigned char * const azOne[] = { (u8*)" " }; | |
| 973 nChar = 1; | |
| 974 aLen = (u8*)lenOne; | |
| 975 azChar = (unsigned char **)azOne; | |
| 976 zCharSet = 0; | |
| 977 }else if( (zCharSet = sqlite3_value_text(argv[1]))==0 ){ | |
| 978 return; | |
| 979 }else{ | |
| 980 const unsigned char *z; | |
| 981 for(z=zCharSet, nChar=0; *z; nChar++){ | |
| 982 SQLITE_SKIP_UTF8(z); | |
| 983 } | |
| 984 if( nChar>0 ){ | |
| 985 azChar = contextMalloc(context, ((i64)nChar)*(sizeof(char*)+1)); | |
| 986 if( azChar==0 ){ | |
| 987 return; | |
| 988 } | |
| 989 aLen = (unsigned char*)&azChar[nChar]; | |
| 990 for(z=zCharSet, nChar=0; *z; nChar++){ | |
| 991 azChar[nChar] = (unsigned char *)z; | |
| 992 SQLITE_SKIP_UTF8(z); | |
| 993 aLen[nChar] = (u8)(z - azChar[nChar]); | |
| 994 } | |
| 995 } | |
| 996 } | |
| 997 if( nChar>0 ){ | |
| 998 flags = SQLITE_PTR_TO_INT(sqlite3_user_data(context)); | |
| 999 if( flags & 1 ){ | |
| 1000 while( nIn>0 ){ | |
| 1001 int len = 0; | |
| 1002 for(i=0; i<nChar; i++){ | |
| 1003 len = aLen[i]; | |
| 1004 if( len<=nIn && memcmp(zIn, azChar[i], len)==0 ) break; | |
| 1005 } | |
| 1006 if( i>=nChar ) break; | |
| 1007 zIn += len; | |
| 1008 nIn -= len; | |
| 1009 } | |
| 1010 } | |
| 1011 if( flags & 2 ){ | |
| 1012 while( nIn>0 ){ | |
| 1013 int len = 0; | |
| 1014 for(i=0; i<nChar; i++){ | |
| 1015 len = aLen[i]; | |
| 1016 if( len<=nIn && memcmp(&zIn[nIn-len],azChar[i],len)==0 ) break; | |
| 1017 } | |
| 1018 if( i>=nChar ) break; | |
| 1019 nIn -= len; | |
| 1020 } | |
| 1021 } | |
| 1022 if( zCharSet ){ | |
| 1023 sqlite3_free((void*)azChar); | |
| 1024 } | |
| 1025 } | |
| 1026 sqlite3_result_text(context, (char*)zIn, nIn, SQLITE_TRANSIENT); | |
| 1027 } | |
| 1028 | |
| 1029 | |
| 1030 #ifdef SQLITE_SOUNDEX | |
| 1031 /* | |
| 1032 ** Compute the soundex encoding of a word. | |
| 1033 */ | |
| 1034 static void soundexFunc( | |
| 1035 sqlite3_context *context, | |
| 1036 int argc, | |
| 1037 sqlite3_value **argv | |
| 1038 ){ | |
| 1039 char zResult[8]; | |
| 1040 const u8 *zIn; | |
| 1041 int i, j; | |
| 1042 static const unsigned char iCode[] = { | |
| 1043 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | |
| 1044 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | |
| 1045 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | |
| 1046 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | |
| 1047 0, 0, 1, 2, 3, 0, 1, 2, 0, 0, 2, 2, 4, 5, 5, 0, | |
| 1048 1, 2, 6, 2, 3, 0, 1, 0, 2, 0, 2, 0, 0, 0, 0, 0, | |
| 1049 0, 0, 1, 2, 3, 0, 1, 2, 0, 0, 2, 2, 4, 5, 5, 0, | |
| 1050 1, 2, 6, 2, 3, 0, 1, 0, 2, 0, 2, 0, 0, 0, 0, 0, | |
| 1051 }; | |
| 1052 assert( argc==1 ); | |
| 1053 zIn = (u8*)sqlite3_value_text(argv[0]); | |
| 1054 if( zIn==0 ) zIn = (u8*)""; | |
| 1055 for(i=0; zIn[i] && !sqlite3Isalpha(zIn[i]); i++){} | |
| 1056 if( zIn[i] ){ | |
| 1057 u8 prevcode = iCode[zIn[i]&0x7f]; | |
| 1058 zResult[0] = sqlite3Toupper(zIn[i]); | |
| 1059 for(j=1; j<4 && zIn[i]; i++){ | |
| 1060 int code = iCode[zIn[i]&0x7f]; | |
| 1061 if( code>0 ){ | |
| 1062 if( code!=prevcode ){ | |
| 1063 prevcode = code; | |
| 1064 zResult[j++] = code + '0'; | |
| 1065 } | |
| 1066 }else{ | |
| 1067 prevcode = 0; | |
| 1068 } | |
| 1069 } | |
| 1070 while( j<4 ){ | |
| 1071 zResult[j++] = '0'; | |
| 1072 } | |
| 1073 zResult[j] = 0; | |
| 1074 sqlite3_result_text(context, zResult, 4, SQLITE_TRANSIENT); | |
| 1075 }else{ | |
| 1076 sqlite3_result_text(context, "?000", 4, SQLITE_STATIC); | |
| 1077 } | |
| 1078 } | |
| 1079 #endif | |
| 1080 | |
| 1081 #ifndef SQLITE_OMIT_LOAD_EXTENSION | |
| 1082 /* | |
| 1083 ** A function that loads a shared-library extension then returns NULL. | |
| 1084 */ | |
| 1085 static void loadExt(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 1086 const char *zFile = (const char *)sqlite3_value_text(argv[0]); | |
| 1087 const char *zProc; | |
| 1088 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 1089 char *zErrMsg = 0; | |
| 1090 | |
| 1091 if( argc==2 ){ | |
| 1092 zProc = (const char *)sqlite3_value_text(argv[1]); | |
| 1093 }else{ | |
| 1094 zProc = 0; | |
| 1095 } | |
| 1096 if( zFile && sqlite3_load_extension(db, zFile, zProc, &zErrMsg) ){ | |
| 1097 sqlite3_result_error(context, zErrMsg, -1); | |
| 1098 sqlite3_free(zErrMsg); | |
| 1099 } | |
| 1100 } | |
| 1101 #endif | |
| 1102 | |
| 1103 | |
| 1104 /* | |
| 1105 ** An instance of the following structure holds the context of a | |
| 1106 ** sum() or avg() aggregate computation. | |
| 1107 */ | |
| 1108 typedef struct SumCtx SumCtx; | |
| 1109 struct SumCtx { | |
| 1110 double rSum; /* Floating point sum */ | |
| 1111 i64 iSum; /* Integer sum */ | |
| 1112 i64 cnt; /* Number of elements summed */ | |
| 1113 u8 overflow; /* True if integer overflow seen */ | |
| 1114 u8 approx; /* True if non-integer value was input to the sum */ | |
| 1115 }; | |
| 1116 | |
| 1117 /* | |
| 1118 ** Routines used to compute the sum, average, and total. | |
| 1119 ** | |
| 1120 ** The SUM() function follows the (broken) SQL standard which means | |
| 1121 ** that it returns NULL if it sums over no inputs. TOTAL returns | |
| 1122 ** 0.0 in that case. In addition, TOTAL always returns a float where | |
| 1123 ** SUM might return an integer if it never encounters a floating point | |
| 1124 ** value. TOTAL never fails, but SUM might through an exception if | |
| 1125 ** it overflows an integer. | |
| 1126 */ | |
| 1127 static void sumStep(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 1128 SumCtx *p; | |
| 1129 int type; | |
| 1130 assert( argc==1 ); | |
| 1131 UNUSED_PARAMETER(argc); | |
| 1132 p = sqlite3_aggregate_context(context, sizeof(*p)); | |
| 1133 type = sqlite3_value_numeric_type(argv[0]); | |
| 1134 if( p && type!=SQLITE_NULL ){ | |
| 1135 p->cnt++; | |
| 1136 if( type==SQLITE_INTEGER ){ | |
| 1137 i64 v = sqlite3_value_int64(argv[0]); | |
| 1138 p->rSum += v; | |
| 1139 if( (p->approx|p->overflow)==0 ){ | |
| 1140 i64 iNewSum = p->iSum + v; | |
| 1141 int s1 = (int)(p->iSum >> (sizeof(i64)*8-1)); | |
| 1142 int s2 = (int)(v >> (sizeof(i64)*8-1)); | |
| 1143 int s3 = (int)(iNewSum >> (sizeof(i64)*8-1)); | |
| 1144 p->overflow = ((s1&s2&~s3) | (~s1&~s2&s3))?1:0; | |
| 1145 p->iSum = iNewSum; | |
| 1146 } | |
| 1147 }else{ | |
| 1148 p->rSum += sqlite3_value_double(argv[0]); | |
| 1149 p->approx = 1; | |
| 1150 } | |
| 1151 } | |
| 1152 } | |
| 1153 static void sumFinalize(sqlite3_context *context){ | |
| 1154 SumCtx *p; | |
| 1155 p = sqlite3_aggregate_context(context, 0); | |
| 1156 if( p && p->cnt>0 ){ | |
| 1157 if( p->overflow ){ | |
| 1158 sqlite3_result_error(context,"integer overflow",-1); | |
| 1159 }else if( p->approx ){ | |
| 1160 sqlite3_result_double(context, p->rSum); | |
| 1161 }else{ | |
| 1162 sqlite3_result_int64(context, p->iSum); | |
| 1163 } | |
| 1164 } | |
| 1165 } | |
| 1166 static void avgFinalize(sqlite3_context *context){ | |
| 1167 SumCtx *p; | |
| 1168 p = sqlite3_aggregate_context(context, 0); | |
| 1169 if( p && p->cnt>0 ){ | |
| 1170 sqlite3_result_double(context, p->rSum/(double)p->cnt); | |
| 1171 } | |
| 1172 } | |
| 1173 static void totalFinalize(sqlite3_context *context){ | |
| 1174 SumCtx *p; | |
| 1175 p = sqlite3_aggregate_context(context, 0); | |
| 1176 /* (double)0 In case of SQLITE_OMIT_FLOATING_POINT... */ | |
| 1177 sqlite3_result_double(context, p ? p->rSum : (double)0); | |
| 1178 } | |
| 1179 | |
| 1180 /* | |
| 1181 ** The following structure keeps track of state information for the | |
| 1182 ** count() aggregate function. | |
| 1183 */ | |
| 1184 typedef struct CountCtx CountCtx; | |
| 1185 struct CountCtx { | |
| 1186 i64 n; | |
| 1187 }; | |
| 1188 | |
| 1189 /* | |
| 1190 ** Routines to implement the count() aggregate function. | |
| 1191 */ | |
| 1192 static void countStep(sqlite3_context *context, int argc, sqlite3_value **argv){ | |
| 1193 CountCtx *p; | |
| 1194 p = sqlite3_aggregate_context(context, sizeof(*p)); | |
| 1195 if( (argc==0 || SQLITE_NULL!=sqlite3_value_type(argv[0])) && p ){ | |
| 1196 p->n++; | |
| 1197 } | |
| 1198 | |
| 1199 #ifndef SQLITE_OMIT_DEPRECATED | |
| 1200 /* The sqlite3_aggregate_count() function is deprecated. But just to make | |
| 1201 ** sure it still operates correctly, verify that its count agrees with our | |
| 1202 ** internal count when using count(*) and when the total count can be | |
| 1203 ** expressed as a 32-bit integer. */ | |
| 1204 assert( argc==1 || p==0 || p->n>0x7fffffff | |
| 1205 || p->n==sqlite3_aggregate_count(context) ); | |
| 1206 #endif | |
| 1207 } | |
| 1208 static void countFinalize(sqlite3_context *context){ | |
| 1209 CountCtx *p; | |
| 1210 p = sqlite3_aggregate_context(context, 0); | |
| 1211 sqlite3_result_int64(context, p ? p->n : 0); | |
| 1212 } | |
| 1213 | |
| 1214 /* | |
| 1215 ** Routines to implement min() and max() aggregate functions. | |
| 1216 */ | |
| 1217 static void minmaxStep( | |
| 1218 sqlite3_context *context, | |
| 1219 int NotUsed, | |
| 1220 sqlite3_value **argv | |
| 1221 ){ | |
| 1222 Mem *pArg = (Mem *)argv[0]; | |
| 1223 Mem *pBest; | |
| 1224 UNUSED_PARAMETER(NotUsed); | |
| 1225 | |
| 1226 if( sqlite3_value_type(argv[0])==SQLITE_NULL ) return; | |
| 1227 pBest = (Mem *)sqlite3_aggregate_context(context, sizeof(*pBest)); | |
| 1228 if( !pBest ) return; | |
| 1229 | |
| 1230 if( pBest->flags ){ | |
| 1231 int max; | |
| 1232 int cmp; | |
| 1233 CollSeq *pColl = sqlite3GetFuncCollSeq(context); | |
| 1234 /* This step function is used for both the min() and max() aggregates, | |
| 1235 ** the only difference between the two being that the sense of the | |
| 1236 ** comparison is inverted. For the max() aggregate, the | |
| 1237 ** sqlite3_user_data() function returns (void *)-1. For min() it | |
| 1238 ** returns (void *)db, where db is the sqlite3* database pointer. | |
| 1239 ** Therefore the next statement sets variable 'max' to 1 for the max() | |
| 1240 ** aggregate, or 0 for min(). | |
| 1241 */ | |
| 1242 max = sqlite3_user_data(context)!=0; | |
| 1243 cmp = sqlite3MemCompare(pBest, pArg, pColl); | |
| 1244 if( (max && cmp<0) || (!max && cmp>0) ){ | |
| 1245 sqlite3VdbeMemCopy(pBest, pArg); | |
| 1246 } | |
| 1247 }else{ | |
| 1248 sqlite3VdbeMemCopy(pBest, pArg); | |
| 1249 } | |
| 1250 } | |
| 1251 static void minMaxFinalize(sqlite3_context *context){ | |
| 1252 sqlite3_value *pRes; | |
| 1253 pRes = (sqlite3_value *)sqlite3_aggregate_context(context, 0); | |
| 1254 if( pRes ){ | |
| 1255 if( ALWAYS(pRes->flags) ){ | |
| 1256 sqlite3_result_value(context, pRes); | |
| 1257 } | |
| 1258 sqlite3VdbeMemRelease(pRes); | |
| 1259 } | |
| 1260 } | |
| 1261 | |
| 1262 /* | |
| 1263 ** group_concat(EXPR, ?SEPARATOR?) | |
| 1264 */ | |
| 1265 static void groupConcatStep( | |
| 1266 sqlite3_context *context, | |
| 1267 int argc, | |
| 1268 sqlite3_value **argv | |
| 1269 ){ | |
| 1270 const char *zVal; | |
| 1271 StrAccum *pAccum; | |
| 1272 const char *zSep; | |
| 1273 int nVal, nSep; | |
| 1274 assert( argc==1 || argc==2 ); | |
| 1275 if( sqlite3_value_type(argv[0])==SQLITE_NULL ) return; | |
| 1276 pAccum = (StrAccum*)sqlite3_aggregate_context(context, sizeof(*pAccum)); | |
| 1277 | |
| 1278 if( pAccum ){ | |
| 1279 sqlite3 *db = sqlite3_context_db_handle(context); | |
| 1280 int firstTerm = pAccum->useMalloc==0; | |
| 1281 pAccum->useMalloc = 1; | |
| 1282 pAccum->mxAlloc = db->aLimit[SQLITE_LIMIT_LENGTH]; | |
| 1283 if( !firstTerm ){ | |
| 1284 if( argc==2 ){ | |
| 1285 zSep = (char*)sqlite3_value_text(argv[1]); | |
| 1286 nSep = sqlite3_value_bytes(argv[1]); | |
| 1287 }else{ | |
| 1288 zSep = ","; | |
| 1289 nSep = 1; | |
| 1290 } | |
| 1291 sqlite3StrAccumAppend(pAccum, zSep, nSep); | |
| 1292 } | |
| 1293 zVal = (char*)sqlite3_value_text(argv[0]); | |
| 1294 nVal = sqlite3_value_bytes(argv[0]); | |
| 1295 sqlite3StrAccumAppend(pAccum, zVal, nVal); | |
| 1296 } | |
| 1297 } | |
| 1298 static void groupConcatFinalize(sqlite3_context *context){ | |
| 1299 StrAccum *pAccum; | |
| 1300 pAccum = sqlite3_aggregate_context(context, 0); | |
| 1301 if( pAccum ){ | |
| 1302 if( pAccum->tooBig ){ | |
| 1303 sqlite3_result_error_toobig(context); | |
| 1304 }else if( pAccum->mallocFailed ){ | |
| 1305 sqlite3_result_error_nomem(context); | |
| 1306 }else{ | |
| 1307 sqlite3_result_text(context, sqlite3StrAccumFinish(pAccum), -1, | |
| 1308 sqlite3_free); | |
| 1309 } | |
| 1310 } | |
| 1311 } | |
| 1312 | |
| 1313 /* | |
| 1314 ** This function registered all of the above C functions as SQL | |
| 1315 ** functions. This should be the only routine in this file with | |
| 1316 ** external linkage. | |
| 1317 */ | |
| 1318 void sqlite3RegisterBuiltinFunctions(sqlite3 *db){ | |
| 1319 #ifndef SQLITE_OMIT_ALTERTABLE | |
| 1320 sqlite3AlterFunctions(db); | |
| 1321 #endif | |
| 1322 if( !db->mallocFailed ){ | |
| 1323 int rc = sqlite3_overload_function(db, "MATCH", 2); | |
| 1324 assert( rc==SQLITE_NOMEM || rc==SQLITE_OK ); | |
| 1325 if( rc==SQLITE_NOMEM ){ | |
| 1326 db->mallocFailed = 1; | |
| 1327 } | |
| 1328 } | |
| 1329 } | |
| 1330 | |
| 1331 /* | |
| 1332 ** Set the LIKEOPT flag on the 2-argument function with the given name. | |
| 1333 */ | |
| 1334 static void setLikeOptFlag(sqlite3 *db, const char *zName, u8 flagVal){ | |
| 1335 FuncDef *pDef; | |
| 1336 pDef = sqlite3FindFunction(db, zName, sqlite3Strlen30(zName), | |
| 1337 2, SQLITE_UTF8, 0); | |
| 1338 if( ALWAYS(pDef) ){ | |
| 1339 pDef->flags = flagVal; | |
| 1340 } | |
| 1341 } | |
| 1342 | |
| 1343 /* | |
| 1344 ** Register the built-in LIKE and GLOB functions. The caseSensitive | |
| 1345 ** parameter determines whether or not the LIKE operator is case | |
| 1346 ** sensitive. GLOB is always case sensitive. | |
| 1347 */ | |
| 1348 void sqlite3RegisterLikeFunctions(sqlite3 *db, int caseSensitive){ | |
| 1349 struct compareInfo *pInfo; | |
| 1350 if( caseSensitive ){ | |
| 1351 pInfo = (struct compareInfo*)&likeInfoAlt; | |
| 1352 }else{ | |
| 1353 pInfo = (struct compareInfo*)&likeInfoNorm; | |
| 1354 } | |
| 1355 sqlite3CreateFunc(db, "like", 2, SQLITE_ANY, pInfo, likeFunc, 0, 0); | |
| 1356 sqlite3CreateFunc(db, "like", 3, SQLITE_ANY, pInfo, likeFunc, 0, 0); | |
| 1357 sqlite3CreateFunc(db, "glob", 2, SQLITE_ANY, | |
| 1358 (struct compareInfo*)&globInfo, likeFunc, 0,0); | |
| 1359 setLikeOptFlag(db, "glob", SQLITE_FUNC_LIKE | SQLITE_FUNC_CASE); | |
| 1360 setLikeOptFlag(db, "like", | |
| 1361 caseSensitive ? (SQLITE_FUNC_LIKE | SQLITE_FUNC_CASE) : SQLITE_FUNC_LIKE); | |
| 1362 } | |
| 1363 | |
| 1364 /* | |
| 1365 ** pExpr points to an expression which implements a function. If | |
| 1366 ** it is appropriate to apply the LIKE optimization to that function | |
| 1367 ** then set aWc[0] through aWc[2] to the wildcard characters and | |
| 1368 ** return TRUE. If the function is not a LIKE-style function then | |
| 1369 ** return FALSE. | |
| 1370 */ | |
| 1371 int sqlite3IsLikeFunction(sqlite3 *db, Expr *pExpr, int *pIsNocase, char *aWc){ | |
| 1372 FuncDef *pDef; | |
| 1373 if( pExpr->op!=TK_FUNCTION | |
| 1374 || !pExpr->x.pList | |
| 1375 || pExpr->x.pList->nExpr!=2 | |
| 1376 ){ | |
| 1377 return 0; | |
| 1378 } | |
| 1379 assert( !ExprHasProperty(pExpr, EP_xIsSelect) ); | |
| 1380 pDef = sqlite3FindFunction(db, pExpr->u.zToken, | |
| 1381 sqlite3Strlen30(pExpr->u.zToken), | |
| 1382 2, SQLITE_UTF8, 0); | |
| 1383 if( NEVER(pDef==0) || (pDef->flags & SQLITE_FUNC_LIKE)==0 ){ | |
| 1384 return 0; | |
| 1385 } | |
| 1386 | |
| 1387 /* The memcpy() statement assumes that the wildcard characters are | |
| 1388 ** the first three statements in the compareInfo structure. The | |
| 1389 ** asserts() that follow verify that assumption | |
| 1390 */ | |
| 1391 memcpy(aWc, pDef->pUserData, 3); | |
| 1392 assert( (char*)&likeInfoAlt == (char*)&likeInfoAlt.matchAll ); | |
| 1393 assert( &((char*)&likeInfoAlt)[1] == (char*)&likeInfoAlt.matchOne ); | |
| 1394 assert( &((char*)&likeInfoAlt)[2] == (char*)&likeInfoAlt.matchSet ); | |
| 1395 *pIsNocase = (pDef->flags & SQLITE_FUNC_CASE)==0; | |
| 1396 return 1; | |
| 1397 } | |
| 1398 | |
| 1399 /* | |
| 1400 ** All all of the FuncDef structures in the aBuiltinFunc[] array above | |
| 1401 ** to the global function hash table. This occurs at start-time (as | |
| 1402 ** a consequence of calling sqlite3_initialize()). | |
| 1403 ** | |
| 1404 ** After this routine runs | |
| 1405 */ | |
| 1406 void sqlite3RegisterGlobalFunctions(void){ | |
| 1407 /* | |
| 1408 ** The following array holds FuncDef structures for all of the functions | |
| 1409 ** defined in this file. | |
| 1410 ** | |
| 1411 ** The array cannot be constant since changes are made to the | |
| 1412 ** FuncDef.pHash elements at start-time. The elements of this array | |
| 1413 ** are read-only after initialization is complete. | |
| 1414 */ | |
| 1415 static SQLITE_WSD FuncDef aBuiltinFunc[] = { | |
| 1416 FUNCTION(ltrim, 1, 1, 0, trimFunc ), | |
| 1417 FUNCTION(ltrim, 2, 1, 0, trimFunc ), | |
| 1418 FUNCTION(rtrim, 1, 2, 0, trimFunc ), | |
| 1419 FUNCTION(rtrim, 2, 2, 0, trimFunc ), | |
| 1420 FUNCTION(trim, 1, 3, 0, trimFunc ), | |
| 1421 FUNCTION(trim, 2, 3, 0, trimFunc ), | |
| 1422 FUNCTION(min, -1, 0, 1, minmaxFunc ), | |
| 1423 FUNCTION(min, 0, 0, 1, 0 ), | |
| 1424 AGGREGATE(min, 1, 0, 1, minmaxStep, minMaxFinalize ), | |
| 1425 FUNCTION(max, -1, 1, 1, minmaxFunc ), | |
| 1426 FUNCTION(max, 0, 1, 1, 0 ), | |
| 1427 AGGREGATE(max, 1, 1, 1, minmaxStep, minMaxFinalize ), | |
| 1428 FUNCTION(typeof, 1, 0, 0, typeofFunc ), | |
| 1429 FUNCTION(length, 1, 0, 0, lengthFunc ), | |
| 1430 FUNCTION(substr, 2, 0, 0, substrFunc ), | |
| 1431 FUNCTION(substr, 3, 0, 0, substrFunc ), | |
| 1432 FUNCTION(abs, 1, 0, 0, absFunc ), | |
| 1433 #ifndef SQLITE_OMIT_FLOATING_POINT | |
| 1434 FUNCTION(round, 1, 0, 0, roundFunc ), | |
| 1435 FUNCTION(round, 2, 0, 0, roundFunc ), | |
| 1436 #endif | |
| 1437 FUNCTION(upper, 1, 0, 0, upperFunc ), | |
| 1438 FUNCTION(lower, 1, 0, 0, lowerFunc ), | |
| 1439 FUNCTION(coalesce, 1, 0, 0, 0 ), | |
| 1440 FUNCTION(coalesce, -1, 0, 0, ifnullFunc ), | |
| 1441 FUNCTION(coalesce, 0, 0, 0, 0 ), | |
| 1442 FUNCTION(hex, 1, 0, 0, hexFunc ), | |
| 1443 FUNCTION(ifnull, 2, 0, 1, ifnullFunc ), | |
| 1444 FUNCTION(random, 0, 0, 0, randomFunc ), | |
| 1445 FUNCTION(randomblob, 1, 0, 0, randomBlob ), | |
| 1446 FUNCTION(nullif, 2, 0, 1, nullifFunc ), | |
| 1447 FUNCTION(sqlite_version, 0, 0, 0, versionFunc ), | |
| 1448 FUNCTION(sqlite_source_id, 0, 0, 0, sourceidFunc ), | |
| 1449 FUNCTION(quote, 1, 0, 0, quoteFunc ), | |
| 1450 FUNCTION(last_insert_rowid, 0, 0, 0, last_insert_rowid), | |
| 1451 FUNCTION(changes, 0, 0, 0, changes ), | |
| 1452 FUNCTION(total_changes, 0, 0, 0, total_changes ), | |
| 1453 FUNCTION(replace, 3, 0, 0, replaceFunc ), | |
| 1454 FUNCTION(zeroblob, 1, 0, 0, zeroblobFunc ), | |
| 1455 #ifdef SQLITE_SOUNDEX | |
| 1456 FUNCTION(soundex, 1, 0, 0, soundexFunc ), | |
| 1457 #endif | |
| 1458 #ifndef SQLITE_OMIT_LOAD_EXTENSION | |
| 1459 FUNCTION(load_extension, 1, 0, 0, loadExt ), | |
| 1460 FUNCTION(load_extension, 2, 0, 0, loadExt ), | |
| 1461 #endif | |
| 1462 AGGREGATE(sum, 1, 0, 0, sumStep, sumFinalize ), | |
| 1463 AGGREGATE(total, 1, 0, 0, sumStep, totalFinalize ), | |
| 1464 AGGREGATE(avg, 1, 0, 0, sumStep, avgFinalize ), | |
| 1465 /* AGGREGATE(count, 0, 0, 0, countStep, countFinalize ), */ | |
| 1466 {0,SQLITE_UTF8,SQLITE_FUNC_COUNT,0,0,0,countStep,countFinalize,"count",0}, | |
| 1467 AGGREGATE(count, 1, 0, 0, countStep, countFinalize ), | |
| 1468 AGGREGATE(group_concat, 1, 0, 0, groupConcatStep, groupConcatFinalize), | |
| 1469 AGGREGATE(group_concat, 2, 0, 0, groupConcatStep, groupConcatFinalize), | |
| 1470 | |
| 1471 LIKEFUNC(glob, 2, &globInfo, SQLITE_FUNC_LIKE|SQLITE_FUNC_CASE), | |
| 1472 #ifdef SQLITE_CASE_SENSITIVE_LIKE | |
| 1473 LIKEFUNC(like, 2, &likeInfoAlt, SQLITE_FUNC_LIKE|SQLITE_FUNC_CASE), | |
| 1474 LIKEFUNC(like, 3, &likeInfoAlt, SQLITE_FUNC_LIKE|SQLITE_FUNC_CASE), | |
| 1475 #else | |
| 1476 LIKEFUNC(like, 2, &likeInfoNorm, SQLITE_FUNC_LIKE), | |
| 1477 LIKEFUNC(like, 3, &likeInfoNorm, SQLITE_FUNC_LIKE), | |
| 1478 #endif | |
| 1479 }; | |
| 1480 | |
| 1481 int i; | |
| 1482 FuncDefHash *pHash = &GLOBAL(FuncDefHash, sqlite3GlobalFunctions); | |
| 1483 FuncDef *aFunc = (FuncDef*)&GLOBAL(FuncDef, aBuiltinFunc); | |
| 1484 | |
| 1485 for(i=0; i<ArraySize(aBuiltinFunc); i++){ | |
| 1486 sqlite3FuncDefInsert(pHash, &aFunc[i]); | |
| 1487 } | |
| 1488 sqlite3RegisterDateTimeFunctions(); | |
| 1489 } | |
| OLD | NEW |