/ Hex Artifact Content
Login

Artifact dfd0dd496dac46c2b14a88292cd9e141aae3ba63:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou 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 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61 74  C functions that
01a0: 20 69 6d 70 6c 65 6d 65 6e 74 20 76 61 72 69 6f   implement vario
01b0: 75 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69  us SQL.** functi
01c0: 6f 6e 73 20 6f 66 20 53 51 4c 69 74 65 2e 20 20  ons of SQLite.  
01d0: 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 69 73 20  .**.** There is 
01e0: 6f 6e 6c 79 20 6f 6e 65 20 65 78 70 6f 72 74 65  only one exporte
01f0: 64 20 73 79 6d 62 6f 6c 20 69 6e 20 74 68 69 73  d symbol in this
0200: 20 66 69 6c 65 20 2d 20 74 68 65 20 66 75 6e 63   file - the func
0210: 74 69 6f 6e 0a 2a 2a 20 73 71 6c 69 74 65 52 65  tion.** sqliteRe
0220: 67 69 73 74 65 72 42 75 69 6c 64 69 6e 46 75 6e  gisterBuildinFun
0230: 63 74 69 6f 6e 73 28 29 20 66 6f 75 6e 64 20 61  ctions() found a
0240: 74 20 74 68 65 20 62 6f 74 74 6f 6d 20 6f 66 20  t the bottom of 
0250: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 20 41 6c 6c  the file..** All
0260: 20 6f 74 68 65 72 20 63 6f 64 65 20 68 61 73 20   other code has 
0270: 66 69 6c 65 20 73 63 6f 70 65 2e 0a 2a 2a 0a 2a  file scope..**.*
0280: 2a 20 24 49 64 3a 20 66 75 6e 63 2e 63 2c 76 20  * $Id: func.c,v 
0290: 31 2e 31 35 39 20 32 30 30 37 2f 30 35 2f 31 35  1.159 2007/05/15
02a0: 20 31 34 3a 34 30 3a 31 31 20 64 72 68 20 45 78   14:40:11 drh Ex
02b0: 70 20 24 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20  p $.*/.#include 
02c0: 22 73 71 6c 69 74 65 49 6e 74 2e 68 22 0a 23 69  "sqliteInt.h".#i
02d0: 6e 63 6c 75 64 65 20 3c 63 74 79 70 65 2e 68 3e  nclude <ctype.h>
02e0: 0a 2f 2a 20 23 69 6e 63 6c 75 64 65 20 3c 6d 61  ./* #include <ma
02f0: 74 68 2e 68 3e 20 2a 2f 0a 23 69 6e 63 6c 75 64  th.h> */.#includ
0300: 65 20 3c 73 74 64 6c 69 62 2e 68 3e 0a 23 69 6e  e <stdlib.h>.#in
0310: 63 6c 75 64 65 20 3c 61 73 73 65 72 74 2e 68 3e  clude <assert.h>
0320: 0a 23 69 6e 63 6c 75 64 65 20 22 76 64 62 65 49  .#include "vdbeI
0330: 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 22  nt.h".#include "
0340: 6f 73 2e 68 22 0a 0a 2f 2a 0a 2a 2a 20 52 65 74  os.h"../*.** Ret
0350: 75 72 6e 20 74 68 65 20 63 6f 6c 6c 61 74 69 6e  urn the collatin
0360: 67 20 66 75 6e 63 74 69 6f 6e 20 61 73 73 6f 63  g function assoc
0370: 69 61 74 65 64 20 77 69 74 68 20 61 20 66 75 6e  iated with a fun
0380: 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63  ction..*/.static
0390: 20 43 6f 6c 6c 53 65 71 20 2a 73 71 6c 69 74 65   CollSeq *sqlite
03a0: 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28  3GetFuncCollSeq(
03b0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
03c0: 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 72 65 74  *context){.  ret
03d0: 75 72 6e 20 63 6f 6e 74 65 78 74 2d 3e 70 43 6f  urn context->pCo
03e0: 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  ll;.}../*.** Imp
03f0: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
0400: 68 65 20 6e 6f 6e 2d 61 67 67 72 65 67 61 74 65  he non-aggregate
0410: 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28 29   min() and max()
0420: 20 66 75 6e 63 74 69 6f 6e 73 0a 2a 2f 0a 73 74   functions.*/.st
0430: 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78  atic void minmax
0440: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
0450: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
0460: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
0470: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
0480: 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69 3b  argv.){.  int i;
0490: 0a 20 20 69 6e 74 20 6d 61 73 6b 3b 20 20 20 20  .  int mask;    
04a0: 2f 2a 20 30 20 66 6f 72 20 6d 69 6e 28 29 20 6f  /* 0 for min() o
04b0: 72 20 30 78 66 66 66 66 66 66 66 66 20 66 6f 72  r 0xffffffff for
04c0: 20 6d 61 78 28 29 20 2a 2f 0a 20 20 69 6e 74 20   max() */.  int 
04d0: 69 42 65 73 74 3b 0a 20 20 43 6f 6c 6c 53 65 71  iBest;.  CollSeq
04e0: 20 2a 70 43 6f 6c 6c 3b 0a 0a 20 20 69 66 28 20   *pColl;..  if( 
04f0: 61 72 67 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  argc==0 ) return
0500: 3b 0a 20 20 6d 61 73 6b 20 3d 20 73 71 6c 69 74  ;.  mask = sqlit
0510: 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e  e3_user_data(con
0520: 74 65 78 74 29 3d 3d 30 20 3f 20 30 20 3a 20 2d  text)==0 ? 0 : -
0530: 31 3b 0a 20 20 70 43 6f 6c 6c 20 3d 20 73 71 6c  1;.  pColl = sql
0540: 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53  ite3GetFuncCollS
0550: 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61  eq(context);.  a
0560: 73 73 65 72 74 28 20 70 43 6f 6c 6c 20 29 3b 0a  ssert( pColl );.
0570: 20 20 61 73 73 65 72 74 28 20 6d 61 73 6b 3d 3d    assert( mask==
0580: 2d 31 20 7c 7c 20 6d 61 73 6b 3d 3d 30 20 29 3b  -1 || mask==0 );
0590: 0a 20 20 69 42 65 73 74 20 3d 20 30 3b 0a 20 20  .  iBest = 0;.  
05a0: 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  if( sqlite3_valu
05b0: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d  e_type(argv[0])=
05c0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72  =SQLITE_NULL ) r
05d0: 65 74 75 72 6e 3b 0a 20 20 66 6f 72 28 69 3d 31  eturn;.  for(i=1
05e0: 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29 7b 0a  ; i<argc; i++){.
05f0: 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f      if( sqlite3_
0600: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
0610: 69 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  i])==SQLITE_NULL
0620: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 69   ) return;.    i
0630: 66 28 20 28 73 71 6c 69 74 65 33 4d 65 6d 43 6f  f( (sqlite3MemCo
0640: 6d 70 61 72 65 28 61 72 67 76 5b 69 42 65 73 74  mpare(argv[iBest
0650: 5d 2c 20 61 72 67 76 5b 69 5d 2c 20 70 43 6f 6c  ], argv[i], pCol
0660: 6c 29 5e 6d 61 73 6b 29 3e 3d 30 20 29 7b 0a 20  l)^mask)>=0 ){. 
0670: 20 20 20 20 20 69 42 65 73 74 20 3d 20 69 3b 0a       iBest = i;.
0680: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69      }.  }.  sqli
0690: 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65  te3_result_value
06a0: 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 69  (context, argv[i
06b0: 42 65 73 74 5d 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  Best]);.}../*.**
06c0: 20 52 65 74 75 72 6e 20 74 68 65 20 74 79 70 65   Return the type
06d0: 20 6f 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74   of the argument
06e0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
06f0: 20 74 79 70 65 6f 66 46 75 6e 63 28 0a 20 20 73   typeofFunc(.  s
0700: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
0710: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
0720: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
0730: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
0740: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d   const char *z =
0750: 20 30 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71   0;.  switch( sq
0760: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
0770: 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20  (argv[0]) ){.   
0780: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 4e 55 4c   case SQLITE_NUL
0790: 4c 3a 20 20 20 20 7a 20 3d 20 22 6e 75 6c 6c 22  L:    z = "null"
07a0: 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20  ;    break;.    
07b0: 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54 45  case SQLITE_INTE
07c0: 47 45 52 3a 20 7a 20 3d 20 22 69 6e 74 65 67 65  GER: z = "intege
07d0: 72 22 3b 20 62 72 65 61 6b 3b 0a 20 20 20 20 63  r"; break;.    c
07e0: 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58 54 3a  ase SQLITE_TEXT:
07f0: 20 20 20 20 7a 20 3d 20 22 74 65 78 74 22 3b 20      z = "text"; 
0800: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61     break;.    ca
0810: 73 65 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a  se SQLITE_FLOAT:
0820: 20 20 20 7a 20 3d 20 22 72 65 61 6c 22 3b 20 20     z = "real";  
0830: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73    break;.    cas
0840: 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a 20 20  e SQLITE_BLOB:  
0850: 20 20 7a 20 3d 20 22 62 6c 6f 62 22 3b 20 20 20    z = "blob";   
0860: 20 62 72 65 61 6b 3b 0a 20 20 7d 0a 20 20 73 71   break;.  }.  sq
0870: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
0880: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 2c 20 2d 31  t(context, z, -1
0890: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29  , SQLITE_STATIC)
08a0: 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  ;.}.../*.** Impl
08b0: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
08c0: 65 20 6c 65 6e 67 74 68 28 29 20 66 75 6e 63 74  e length() funct
08d0: 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  ion.*/.static vo
08e0: 69 64 20 6c 65 6e 67 74 68 46 75 6e 63 28 0a 20  id lengthFunc(. 
08f0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
0900: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
0910: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
0920: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
0930: 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a 0a 20 20 61  .  int len;..  a
0940: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
0950: 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71 6c 69  ;.  switch( sqli
0960: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
0970: 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63  rgv[0]) ){.    c
0980: 61 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a  ase SQLITE_BLOB:
0990: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
09a0: 5f 49 4e 54 45 47 45 52 3a 0a 20 20 20 20 63 61  _INTEGER:.    ca
09b0: 73 65 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a  se SQLITE_FLOAT:
09c0: 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33   {.      sqlite3
09d0: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
09e0: 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  ext, sqlite3_val
09f0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
0a00: 29 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  ));.      break;
0a10: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20  .    }.    case 
0a20: 53 51 4c 49 54 45 5f 54 45 58 54 3a 20 7b 0a 20  SQLITE_TEXT: {. 
0a30: 20 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67       const unsig
0a40: 6e 65 64 20 63 68 61 72 20 2a 7a 20 3d 20 73 71  ned char *z = sq
0a50: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
0a60: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20  (argv[0]);.     
0a70: 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75   if( z==0 ) retu
0a80: 72 6e 3b 0a 20 20 20 20 20 20 6c 65 6e 20 3d 20  rn;.      len = 
0a90: 30 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20  0;.      while( 
0aa0: 2a 7a 20 29 7b 0a 20 20 20 20 20 20 20 20 6c 65  *z ){.        le
0ab0: 6e 2b 2b 3b 0a 20 20 20 20 20 20 20 20 53 51 4c  n++;.        SQL
0ac0: 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29  ITE_SKIP_UTF8(z)
0ad0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
0ae0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
0af0: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 6c 65 6e 29  nt(context, len)
0b00: 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20  ;.      break;. 
0b10: 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75 6c 74     }.    default
0b20: 3a 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  : {.      sqlite
0b30: 33 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f  3_result_null(co
0b40: 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 62 72  ntext);.      br
0b50: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  eak;.    }.  }.}
0b60: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
0b70: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 61 62  tation of the ab
0b80: 73 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a  s() function.*/.
0b90: 73 74 61 74 69 63 20 76 6f 69 64 20 61 62 73 46  static void absF
0ba0: 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  unc(sqlite3_cont
0bb0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
0bc0: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
0bd0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
0be0: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
0bf0: 20 29 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71   );.  switch( sq
0c00: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
0c10: 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20  (argv[0]) ){.   
0c20: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54   case SQLITE_INT
0c30: 45 47 45 52 3a 20 7b 0a 20 20 20 20 20 20 69 36  EGER: {.      i6
0c40: 34 20 69 56 61 6c 20 3d 20 73 71 6c 69 74 65 33  4 iVal = sqlite3
0c50: 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67  _value_int64(arg
0c60: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 66 28  v[0]);.      if(
0c70: 20 69 56 61 6c 3c 30 20 29 7b 0a 20 20 20 20 20   iVal<0 ){.     
0c80: 20 20 20 69 66 28 20 28 69 56 61 6c 3c 3c 31 29     if( (iVal<<1)
0c90: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20  ==0 ){.         
0ca0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0cb0: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22  error(context, "
0cc0: 69 6e 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77  integer overflow
0cd0: 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 20 20  ", -1);.        
0ce0: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20    return;.      
0cf0: 20 20 7d 0a 20 20 20 20 20 20 20 20 69 56 61 6c    }.        iVal
0d00: 20 3d 20 2d 69 56 61 6c 3b 0a 20 20 20 20 20 20   = -iVal;.      
0d10: 7d 20 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  } .      sqlite3
0d20: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f  _result_int64(co
0d30: 6e 74 65 78 74 2c 20 69 56 61 6c 29 3b 0a 20 20  ntext, iVal);.  
0d40: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
0d50: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0d60: 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20 20 20 20 73  _NULL: {.      s
0d70: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e 75  qlite3_result_nu
0d80: 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  ll(context);.   
0d90: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
0da0: 20 20 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a 20      default: {. 
0db0: 20 20 20 20 20 64 6f 75 62 6c 65 20 72 56 61 6c       double rVal
0dc0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
0dd0: 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d 29  _double(argv[0])
0de0: 3b 0a 20 20 20 20 20 20 69 66 28 20 72 56 61 6c  ;.      if( rVal
0df0: 3c 30 20 29 20 72 56 61 6c 20 3d 20 2d 72 56 61  <0 ) rVal = -rVa
0e00: 6c 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  l;.      sqlite3
0e10: 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63  _result_double(c
0e20: 6f 6e 74 65 78 74 2c 20 72 56 61 6c 29 3b 0a 20  ontext, rVal);. 
0e30: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
0e40: 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  }.  }.}../*.** I
0e50: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
0e60: 20 74 68 65 20 73 75 62 73 74 72 28 29 20 66 75   the substr() fu
0e70: 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 73 75  nction..**.** su
0e80: 62 73 74 72 28 78 2c 70 31 2c 70 32 29 20 20 72  bstr(x,p1,p2)  r
0e90: 65 74 75 72 6e 73 20 70 32 20 63 68 61 72 61 63  eturns p2 charac
0ea0: 74 65 72 73 20 6f 66 20 78 5b 5d 20 62 65 67 69  ters of x[] begi
0eb0: 6e 6e 69 6e 67 20 77 69 74 68 20 70 31 2e 0a 2a  nning with p1..*
0ec0: 2a 20 70 31 20 69 73 20 31 2d 69 6e 64 65 78 65  * p1 is 1-indexe
0ed0: 64 2e 20 20 53 6f 20 73 75 62 73 74 72 28 78 2c  d.  So substr(x,
0ee0: 31 2c 31 29 20 72 65 74 75 72 6e 73 20 74 68 65  1,1) returns the
0ef0: 20 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72   first character
0f00: 0a 2a 2a 20 6f 66 20 78 2e 20 20 49 66 20 78 20  .** of x.  If x 
0f10: 69 73 20 74 65 78 74 2c 20 74 68 65 6e 20 77 65  is text, then we
0f20: 20 61 63 74 75 61 6c 6c 79 20 63 6f 75 6e 74 20   actually count 
0f30: 55 54 46 2d 38 20 63 68 61 72 61 63 74 65 72 73  UTF-8 characters
0f40: 2e 0a 2a 2a 20 49 66 20 78 20 69 73 20 61 20 62  ..** If x is a b
0f50: 6c 6f 62 2c 20 74 68 65 6e 20 77 65 20 63 6f 75  lob, then we cou
0f60: 6e 74 20 62 79 74 65 73 2e 0a 2a 2a 0a 2a 2a 20  nt bytes..**.** 
0f70: 49 66 20 70 31 20 69 73 20 6e 65 67 61 74 69 76  If p1 is negativ
0f80: 65 2c 20 74 68 65 6e 20 77 65 20 62 65 67 69 6e  e, then we begin
0f90: 20 61 62 73 28 70 31 29 20 66 72 6f 6d 20 74 68   abs(p1) from th
0fa0: 65 20 65 6e 64 20 6f 66 20 78 5b 5d 2e 0a 2a 2f  e end of x[]..*/
0fb0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 75 62  .static void sub
0fc0: 73 74 72 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  strFunc(.  sqlit
0fd0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
0fe0: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
0ff0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
1000: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e   **argv.){.  con
1010: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
1020: 20 2a 7a 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73   *z;.  const uns
1030: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 32 3b 0a  igned char *z2;.
1040: 20 20 69 6e 74 20 6c 65 6e 3b 0a 20 20 69 6e 74    int len;.  int
1050: 20 70 30 74 79 70 65 3b 0a 20 20 69 36 34 20 70   p0type;.  i64 p
1060: 31 2c 20 70 32 3b 0a 0a 20 20 61 73 73 65 72 74  1, p2;..  assert
1070: 28 20 61 72 67 63 3d 3d 33 20 29 3b 0a 20 20 70  ( argc==3 );.  p
1080: 30 74 79 70 65 20 3d 20 73 71 6c 69 74 65 33 5f  0type = sqlite3_
1090: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
10a0: 30 5d 29 3b 0a 20 20 69 66 28 20 70 30 74 79 70  0]);.  if( p0typ
10b0: 65 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 20 29  e==SQLITE_BLOB )
10c0: 7b 0a 20 20 20 20 6c 65 6e 20 3d 20 73 71 6c 69  {.    len = sqli
10d0: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
10e0: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 7a 20  argv[0]);.    z 
10f0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
1100: 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20  blob(argv[0]);. 
1110: 20 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65     if( z==0 ) re
1120: 74 75 72 6e 3b 0a 20 20 20 20 61 73 73 65 72 74  turn;.    assert
1130: 28 20 6c 65 6e 3d 3d 73 71 6c 69 74 65 33 5f 76  ( len==sqlite3_v
1140: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
1150: 30 5d 29 20 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  0]) );.  }else{.
1160: 20 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f      z = sqlite3_
1170: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
1180: 30 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 3d 3d  0]);.    if( z==
1190: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  0 ) return;.    
11a0: 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 66 6f 72  len = 0;.    for
11b0: 28 7a 32 3d 7a 3b 20 2a 7a 32 3b 20 6c 65 6e 2b  (z2=z; *z2; len+
11c0: 2b 29 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45  +){.      SQLITE
11d0: 5f 53 4b 49 50 5f 55 54 46 38 28 7a 32 29 3b 0a  _SKIP_UTF8(z2);.
11e0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 70 31 20 3d      }.  }.  p1 =
11f0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
1200: 6e 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 70  nt(argv[1]);.  p
1210: 32 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  2 = sqlite3_valu
1220: 65 5f 69 6e 74 28 61 72 67 76 5b 32 5d 29 3b 0a  e_int(argv[2]);.
1230: 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20    if( p1<0 ){.  
1240: 20 20 70 31 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20    p1 += len;.   
1250: 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20   if( p1<0 ){.   
1260: 20 20 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20     p2 += p1;.   
1270: 20 20 20 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d     p1 = 0;.    }
1280: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 70 31 3e  .  }else if( p1>
1290: 30 20 29 7b 0a 20 20 20 20 70 31 2d 2d 3b 0a 20  0 ){.    p1--;. 
12a0: 20 7d 0a 20 20 69 66 28 20 70 31 2b 70 32 3e 6c   }.  if( p1+p2>l
12b0: 65 6e 20 29 7b 0a 20 20 20 20 70 32 20 3d 20 6c  en ){.    p2 = l
12c0: 65 6e 2d 70 31 3b 0a 20 20 7d 0a 20 20 69 66 28  en-p1;.  }.  if(
12d0: 20 70 30 74 79 70 65 21 3d 53 51 4c 49 54 45 5f   p0type!=SQLITE_
12e0: 42 4c 4f 42 20 29 7b 0a 20 20 20 20 77 68 69 6c  BLOB ){.    whil
12f0: 65 28 20 2a 7a 20 26 26 20 70 31 20 29 7b 0a 20  e( *z && p1 ){. 
1300: 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50       SQLITE_SKIP
1310: 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20  _UTF8(z);.      
1320: 70 31 2d 2d 3b 0a 20 20 20 20 7d 0a 20 20 20 20  p1--;.    }.    
1330: 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32 20 26 26  for(z2=z; *z2 &&
1340: 20 70 32 3b 20 70 32 2d 2d 29 7b 0a 20 20 20 20   p2; p2--){.    
1350: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
1360: 46 38 28 7a 32 29 3b 0a 20 20 20 20 7d 0a 20 20  F8(z2);.    }.  
1370: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
1380: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28  _text(context, (
1390: 63 68 61 72 2a 29 7a 2c 20 7a 32 2d 7a 2c 20 53  char*)z, z2-z, S
13a0: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29  QLITE_TRANSIENT)
13b0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 69  ;.  }else{.    i
13c0: 66 28 20 70 32 3c 30 20 29 20 70 32 20 3d 20 30  f( p2<0 ) p2 = 0
13d0: 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  ;.    sqlite3_re
13e0: 73 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e 74 65 78  sult_blob(contex
13f0: 74 2c 20 28 63 68 61 72 2a 29 26 7a 5b 70 31 5d  t, (char*)&z[p1]
1400: 2c 20 70 32 2c 20 53 51 4c 49 54 45 5f 54 52 41  , p2, SQLITE_TRA
1410: 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a 0a  NSIENT);.  }.}..
1420: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
1430: 74 69 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75 6e  tion of the roun
1440: 64 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a  d() function.*/.
1450: 73 74 61 74 69 63 20 76 6f 69 64 20 72 6f 75 6e  static void roun
1460: 64 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  dFunc(sqlite3_co
1470: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
1480: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
1490: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
14a0: 0a 20 20 69 6e 74 20 6e 20 3d 20 30 3b 0a 20 20  .  int n = 0;.  
14b0: 64 6f 75 62 6c 65 20 72 3b 0a 20 20 63 68 61 72  double r;.  char
14c0: 20 7a 42 75 66 5b 35 30 30 5d 3b 20 20 2f 2a 20   zBuf[500];  /* 
14d0: 6c 61 72 67 65 72 20 74 68 61 6e 20 74 68 65 20  larger than the 
14e0: 25 66 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f  %f representatio
14f0: 6e 20 6f 66 20 74 68 65 20 6c 61 72 67 65 73 74  n of the largest
1500: 20 64 6f 75 62 6c 65 20 2a 2f 0a 20 20 61 73 73   double */.  ass
1510: 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20  ert( argc==1 || 
1520: 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28  argc==2 );.  if(
1530: 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20   argc==2 ){.    
1540: 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 3d  if( SQLITE_NULL=
1550: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
1560: 79 70 65 28 61 72 67 76 5b 31 5d 29 20 29 20 72  ype(argv[1]) ) r
1570: 65 74 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20 73  eturn;.    n = s
1580: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
1590: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69  (argv[1]);.    i
15a0: 66 28 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33 30  f( n>30 ) n = 30
15b0: 3b 0a 20 20 20 20 69 66 28 20 6e 3c 30 20 29 20  ;.    if( n<0 ) 
15c0: 6e 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28  n = 0;.  }.  if(
15d0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
15e0: 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51  ype(argv[0])==SQ
15f0: 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75  LITE_NULL ) retu
1600: 72 6e 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74 65  rn;.  r = sqlite
1610: 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61  3_value_double(a
1620: 72 67 76 5b 30 5d 29 3b 0a 20 20 73 71 6c 69 74  rgv[0]);.  sqlit
1630: 65 33 5f 73 6e 70 72 69 6e 74 66 28 73 69 7a 65  e3_snprintf(size
1640: 6f 66 28 7a 42 75 66 29 2c 7a 42 75 66 2c 22 25  of(zBuf),zBuf,"%
1650: 2e 2a 66 22 2c 6e 2c 72 29 3b 0a 20 20 73 71 6c  .*f",n,r);.  sql
1660: 69 74 65 33 41 74 6f 46 28 7a 42 75 66 2c 20 26  ite3AtoF(zBuf, &
1670: 72 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65  r);.  sqlite3_re
1680: 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74  sult_double(cont
1690: 65 78 74 2c 20 72 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  ext, r);.}../*.*
16a0: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
16b0: 20 6f 66 20 74 68 65 20 75 70 70 65 72 28 29 20   of the upper() 
16c0: 61 6e 64 20 6c 6f 77 65 72 28 29 20 53 51 4c 20  and lower() SQL 
16d0: 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74  functions..*/.st
16e0: 61 74 69 63 20 76 6f 69 64 20 75 70 70 65 72 46  atic void upperF
16f0: 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  unc(sqlite3_cont
1700: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
1710: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
1720: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
1730: 20 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e   char *z1;.  con
1740: 73 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69  st char *z2;.  i
1750: 6e 74 20 69 2c 20 6e 3b 0a 20 20 69 66 28 20 61  nt i, n;.  if( a
1760: 72 67 63 3c 31 20 7c 7c 20 53 51 4c 49 54 45 5f  rgc<1 || SQLITE_
1770: 4e 55 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61  NULL==sqlite3_va
1780: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
1790: 29 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 7a 32  ) ) return;.  z2
17a0: 20 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65   = (char*)sqlite
17b0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
17c0: 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20 73 71 6c  v[0]);.  n = sql
17d0: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
17e0: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20  (argv[0]);.  /* 
17f0: 56 65 72 69 66 79 20 74 68 61 74 20 74 68 65 20  Verify that the 
1800: 63 61 6c 6c 20 74 6f 20 5f 62 79 74 65 73 28 29  call to _bytes()
1810: 20 64 6f 65 73 20 6e 6f 74 20 69 6e 76 61 6c 69   does not invali
1820: 64 61 74 65 20 74 68 65 20 5f 74 65 78 74 28 29  date the _text()
1830: 20 70 6f 69 6e 74 65 72 20 2a 2f 0a 20 20 61 73   pointer */.  as
1840: 73 65 72 74 28 20 7a 32 3d 3d 28 63 68 61 72 2a  sert( z2==(char*
1850: 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  )sqlite3_value_t
1860: 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a  ext(argv[0]) );.
1870: 20 20 69 66 28 20 7a 32 20 29 7b 0a 20 20 20 20    if( z2 ){.    
1880: 7a 31 20 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c  z1 = sqlite3_mal
1890: 6c 6f 63 28 6e 2b 31 29 3b 0a 20 20 20 20 69 66  loc(n+1);.    if
18a0: 28 20 7a 31 20 29 7b 0a 20 20 20 20 20 20 6d 65  ( z1 ){.      me
18b0: 6d 63 70 79 28 7a 31 2c 20 7a 32 2c 20 6e 2b 31  mcpy(z1, z2, n+1
18c0: 29 3b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30  );.      for(i=0
18d0: 3b 20 7a 31 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20  ; z1[i]; i++){. 
18e0: 20 20 20 20 20 20 20 7a 31 5b 69 5d 20 3d 20 74         z1[i] = t
18f0: 6f 75 70 70 65 72 28 7a 31 5b 69 5d 29 3b 0a 20  oupper(z1[i]);. 
1900: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71 6c       }.      sql
1910: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
1920: 28 63 6f 6e 74 65 78 74 2c 20 7a 31 2c 20 2d 31  (context, z1, -1
1930: 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b  , sqlite3_free);
1940: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61  .    }.  }.}.sta
1950: 74 69 63 20 76 6f 69 64 20 6c 6f 77 65 72 46 75  tic void lowerFu
1960: 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  nc(sqlite3_conte
1970: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
1980: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
1990: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
19a0: 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73  char *z1;.  cons
19b0: 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e  t char *z2;.  in
19c0: 74 20 69 2c 20 6e 3b 0a 20 20 69 66 28 20 61 72  t i, n;.  if( ar
19d0: 67 63 3c 31 20 7c 7c 20 53 51 4c 49 54 45 5f 4e  gc<1 || SQLITE_N
19e0: 55 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c  ULL==sqlite3_val
19f0: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
1a00: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 7a 32 20   ) return;.  z2 
1a10: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
1a20: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
1a30: 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69  [0]);.  n = sqli
1a40: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
1a50: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56  argv[0]);.  /* V
1a60: 65 72 69 66 79 20 74 68 61 74 20 74 68 65 20 63  erify that the c
1a70: 61 6c 6c 20 74 6f 20 5f 62 79 74 65 73 28 29 20  all to _bytes() 
1a80: 64 6f 65 73 20 6e 6f 74 20 69 6e 76 61 6c 69 64  does not invalid
1a90: 61 74 65 20 74 68 65 20 5f 74 65 78 74 28 29 20  ate the _text() 
1aa0: 70 6f 69 6e 74 65 72 20 2a 2f 0a 20 20 61 73 73  pointer */.  ass
1ab0: 65 72 74 28 20 7a 32 3d 3d 28 63 68 61 72 2a 29  ert( z2==(char*)
1ac0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
1ad0: 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20  xt(argv[0]) );. 
1ae0: 20 69 66 28 20 7a 32 20 29 7b 0a 20 20 20 20 7a   if( z2 ){.    z
1af0: 31 20 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c  1 = sqlite3_mall
1b00: 6f 63 28 6e 2b 31 29 3b 0a 20 20 20 20 69 66 28  oc(n+1);.    if(
1b10: 20 7a 31 20 29 7b 0a 20 20 20 20 20 20 6d 65 6d   z1 ){.      mem
1b20: 63 70 79 28 7a 31 2c 20 7a 32 2c 20 6e 2b 31 29  cpy(z1, z2, n+1)
1b30: 3b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b  ;.      for(i=0;
1b40: 20 7a 31 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20   z1[i]; i++){.  
1b50: 20 20 20 20 20 20 7a 31 5b 69 5d 20 3d 20 74 6f        z1[i] = to
1b60: 6c 6f 77 65 72 28 7a 31 5b 69 5d 29 3b 0a 20 20  lower(z1[i]);.  
1b70: 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71 6c 69      }.      sqli
1b80: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
1b90: 63 6f 6e 74 65 78 74 2c 20 7a 31 2c 20 2d 31 2c  context, z1, -1,
1ba0: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a   sqlite3_free);.
1bb0: 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a      }.  }.}../*.
1bc0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
1bd0: 6e 20 6f 66 20 74 68 65 20 49 46 4e 55 4c 4c 28  n of the IFNULL(
1be0: 29 2c 20 4e 56 4c 28 29 2c 20 61 6e 64 20 43 4f  ), NVL(), and CO
1bf0: 41 4c 45 53 43 45 28 29 20 66 75 6e 63 74 69 6f  ALESCE() functio
1c00: 6e 73 2e 20 20 0a 2a 2a 20 41 6c 6c 20 74 68 72  ns.  .** All thr
1c10: 65 65 20 64 6f 20 74 68 65 20 73 61 6d 65 20 74  ee do the same t
1c20: 68 69 6e 67 2e 20 20 54 68 65 79 20 72 65 74 75  hing.  They retu
1c30: 72 6e 20 74 68 65 20 66 69 72 73 74 20 6e 6f 6e  rn the first non
1c40: 2d 4e 55 4c 4c 0a 2a 2a 20 61 72 67 75 6d 65 6e  -NULL.** argumen
1c50: 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  t..*/.static voi
1c60: 64 20 69 66 6e 75 6c 6c 46 75 6e 63 28 0a 20 20  d ifnullFunc(.  
1c70: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
1c80: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
1c90: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
1ca0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
1cb0: 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72 28 69    int i;.  for(i
1cc0: 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29  =0; i<argc; i++)
1cd0: 7b 0a 20 20 20 20 69 66 28 20 53 51 4c 49 54 45  {.    if( SQLITE
1ce0: 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f 76  _NULL!=sqlite3_v
1cf0: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 69  alue_type(argv[i
1d00: 5d 29 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  ]) ){.      sqli
1d10: 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65  te3_result_value
1d20: 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 69  (context, argv[i
1d30: 5d 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  ]);.      break;
1d40: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
1d50: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
1d60: 6f 6e 20 6f 66 20 72 61 6e 64 6f 6d 28 29 2e 20  on of random(). 
1d70: 20 52 65 74 75 72 6e 20 61 20 72 61 6e 64 6f 6d   Return a random
1d80: 20 69 6e 74 65 67 65 72 2e 20 20 0a 2a 2f 0a 73   integer.  .*/.s
1d90: 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f  tatic void rando
1da0: 6d 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  mFunc(.  sqlite3
1db0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
1dc0: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
1dd0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
1de0: 2a 61 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74  *argv.){.  sqlit
1df0: 65 5f 69 6e 74 36 34 20 72 3b 0a 20 20 73 71 6c  e_int64 r;.  sql
1e00: 69 74 65 33 52 61 6e 64 6f 6d 6e 65 73 73 28 73  ite3Randomness(s
1e10: 69 7a 65 6f 66 28 72 29 2c 20 26 72 29 3b 0a 20  izeof(r), &r);. 
1e20: 20 69 66 28 20 28 72 3c 3c 31 29 3d 3d 30 20 29   if( (r<<1)==0 )
1e30: 20 72 20 3d 20 30 3b 20 20 2f 2a 20 50 72 65 76   r = 0;  /* Prev
1e40: 65 6e 74 20 30 78 38 30 30 30 2e 2e 2e 2e 20 61  ent 0x8000.... a
1e50: 73 20 74 68 65 20 72 65 73 75 6c 74 20 73 6f 20  s the result so 
1e60: 74 68 61 74 20 77 65 20 2a 2f 0a 20 20 20 20 20  that we */.     
1e70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1e80: 20 20 20 20 20 2f 2a 20 63 61 6e 20 61 6c 77 61       /* can alwa
1e90: 79 73 20 64 6f 20 61 62 73 28 29 20 6f 66 20 74  ys do abs() of t
1ea0: 68 65 20 72 65 73 75 6c 74 20 2a 2f 0a 20 20 73  he result */.  s
1eb0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
1ec0: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b  t64(context, r);
1ed0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
1ee0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72 61 6e 64  entation of rand
1ef0: 6f 6d 62 6c 6f 62 28 4e 29 2e 20 20 52 65 74 75  omblob(N).  Retu
1f00: 72 6e 20 61 20 72 61 6e 64 6f 6d 20 62 6c 6f 62  rn a random blob
1f10: 0a 2a 2a 20 74 68 61 74 20 69 73 20 4e 20 62 79  .** that is N by
1f20: 74 65 73 20 6c 6f 6e 67 2e 0a 2a 2f 0a 73 74 61  tes long..*/.sta
1f30: 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d 42  tic void randomB
1f40: 6c 6f 62 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  lob(.  sqlite3_c
1f50: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
1f60: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
1f70: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
1f80: 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a  rgv.){.  int n;.
1f90: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
1fa0: 2a 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72  *p;.  assert( ar
1fb0: 67 63 3d 3d 31 20 29 3b 0a 20 20 6e 20 3d 20 73  gc==1 );.  n = s
1fc0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
1fd0: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28  (argv[0]);.  if(
1fe0: 20 6e 3c 31 20 29 7b 0a 20 20 20 20 6e 20 3d 20   n<1 ){.    n = 
1ff0: 31 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 3e 53  1;.  }.  if( n>S
2000: 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48  QLITE_MAX_LENGTH
2010: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   ){.    sqlite3_
2020: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f  result_error_too
2030: 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  big(context);.  
2040: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20    return;.  }.  
2050: 70 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63  p = sqliteMalloc
2060: 28 6e 29 3b 0a 20 20 69 66 28 20 70 20 29 7b 0a  (n);.  if( p ){.
2070: 20 20 20 20 73 71 6c 69 74 65 33 52 61 6e 64 6f      sqlite3Rando
2080: 6d 6e 65 73 73 28 6e 2c 20 70 29 3b 0a 20 20 20  mness(n, p);.   
2090: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
20a0: 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 63  blob(context, (c
20b0: 68 61 72 2a 29 70 2c 20 6e 2c 20 73 71 6c 69 74  har*)p, n, sqlit
20c0: 65 33 46 72 65 65 58 29 3b 0a 20 20 7d 0a 7d 0a  e3FreeX);.  }.}.
20d0: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
20e0: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73  ation of the las
20f0: 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29  t_insert_rowid()
2100: 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20   SQL function.  
2110: 54 68 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61  The return.** va
2120: 6c 75 65 20 69 73 20 74 68 65 20 73 61 6d 65 20  lue is the same 
2130: 61 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c  as the sqlite3_l
2140: 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64  ast_insert_rowid
2150: 28 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e  () API function.
2160: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
2170: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69  last_insert_rowi
2180: 64 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  d(.  sqlite3_con
2190: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a  text *context, .
21a0: 20 20 69 6e 74 20 61 72 67 2c 20 0a 20 20 73 71    int arg, .  sq
21b0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
21c0: 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20  gv.){.  sqlite3 
21d0: 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 75 73  *db = sqlite3_us
21e0: 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29  er_data(context)
21f0: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  ;.  sqlite3_resu
2200: 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74  lt_int64(context
2210: 2c 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69  , sqlite3_last_i
2220: 6e 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29  nsert_rowid(db))
2230: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
2240: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
2250: 20 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66   changes() SQL f
2260: 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65  unction.  The re
2270: 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68  turn value is th
2280: 65 0a 2a 2a 20 73 61 6d 65 20 61 73 20 74 68 65  e.** same as the
2290: 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73   sqlite3_changes
22a0: 28 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e  () API function.
22b0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
22c0: 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69 74  changes(.  sqlit
22d0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
22e0: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 2c 0a  ext,.  int arg,.
22f0: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
2300: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69  **argv.){.  sqli
2310: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
2320: 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74  3_user_data(cont
2330: 65 78 74 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f  ext);.  sqlite3_
2340: 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65  result_int(conte
2350: 78 74 2c 20 73 71 6c 69 74 65 33 5f 63 68 61 6e  xt, sqlite3_chan
2360: 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a  ges(db));.}../*.
2370: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
2380: 6e 20 6f 66 20 74 68 65 20 74 6f 74 61 6c 5f 63  n of the total_c
2390: 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75 6e  hanges() SQL fun
23a0: 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 74 75  ction.  The retu
23b0: 72 6e 20 76 61 6c 75 65 20 69 73 0a 2a 2a 20 74  rn value is.** t
23c0: 68 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 73  he same as the s
23d0: 71 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61  qlite3_total_cha
23e0: 6e 67 65 73 28 29 20 41 50 49 20 66 75 6e 63 74  nges() API funct
23f0: 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ion..*/.static v
2400: 6f 69 64 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65  oid total_change
2410: 73 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  s(.  sqlite3_con
2420: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
2430: 20 69 6e 74 20 61 72 67 2c 0a 20 20 73 71 6c 69   int arg,.  sqli
2440: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
2450: 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  .){.  sqlite3 *d
2460: 62 20 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72  b = sqlite3_user
2470: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a  _data(context);.
2480: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2490: 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  _int(context, sq
24a0: 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e  lite3_total_chan
24b0: 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a  ges(db));.}../*.
24c0: 2a 2a 20 41 20 73 74 72 75 63 74 75 72 65 20 64  ** A structure d
24d0: 65 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64  efining how to d
24e0: 6f 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d  o GLOB-style com
24f0: 70 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72  parisons..*/.str
2500: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
2510: 7b 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b  {.  u8 matchAll;
2520: 0a 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a  .  u8 matchOne;.
2530: 20 20 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20    u8 matchSet;. 
2540: 20 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a   u8 noCase;.};..
2550: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74 72  static const str
2560: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
2570: 67 6c 6f 62 49 6e 66 6f 20 3d 20 7b 20 27 2a 27  globInfo = { '*'
2580: 2c 20 27 3f 27 2c 20 27 5b 27 2c 20 30 20 7d 3b  , '?', '[', 0 };
2590: 0a 2f 2a 20 54 68 65 20 63 6f 72 72 65 63 74 20  ./* The correct 
25a0: 53 51 4c 2d 39 32 20 62 65 68 61 76 69 6f 72 20  SQL-92 behavior 
25b0: 69 73 20 66 6f 72 20 74 68 65 20 4c 49 4b 45 20  is for the LIKE 
25c0: 6f 70 65 72 61 74 6f 72 20 74 6f 20 69 67 6e 6f  operator to igno
25d0: 72 65 0a 2a 2a 20 63 61 73 65 2e 20 20 54 68 75  re.** case.  Thu
25e0: 73 20 20 27 61 27 20 4c 49 4b 45 20 27 41 27 20  s  'a' LIKE 'A' 
25f0: 77 6f 75 6c 64 20 62 65 20 74 72 75 65 2e 20 2a  would be true. *
2600: 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73  /.static const s
2610: 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66  truct compareInf
2620: 6f 20 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 20 3d  o likeInfoNorm =
2630: 20 7b 20 27 25 27 2c 20 27 5f 27 2c 20 20 20 30   { '%', '_',   0
2640: 2c 20 31 20 7d 3b 0a 2f 2a 20 49 66 20 53 51 4c  , 1 };./* If SQL
2650: 49 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54 49  ITE_CASE_SENSITI
2660: 56 45 5f 4c 49 4b 45 20 69 73 20 64 65 66 69 6e  VE_LIKE is defin
2670: 65 64 2c 20 74 68 65 6e 20 74 68 65 20 4c 49 4b  ed, then the LIK
2680: 45 20 6f 70 65 72 61 74 6f 72 0a 2a 2a 20 69 73  E operator.** is
2690: 20 63 61 73 65 20 73 65 6e 73 69 74 69 76 65 20   case sensitive 
26a0: 63 61 75 73 69 6e 67 20 27 61 27 20 4c 49 4b 45  causing 'a' LIKE
26b0: 20 27 41 27 20 74 6f 20 62 65 20 66 61 6c 73 65   'A' to be false
26c0: 20 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74   */.static const
26d0: 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49   struct compareI
26e0: 6e 66 6f 20 6c 69 6b 65 49 6e 66 6f 41 6c 74 20  nfo likeInfoAlt 
26f0: 3d 20 7b 20 27 25 27 2c 20 27 5f 27 2c 20 20 20  = { '%', '_',   
2700: 30 2c 20 30 20 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52  0, 0 };../*.** R
2710: 65 61 64 20 61 20 73 69 6e 67 6c 65 20 55 54 46  ead a single UTF
2720: 2d 38 20 63 68 61 72 61 63 74 65 72 20 61 6e 64  -8 character and
2730: 20 72 65 74 75 72 6e 20 69 74 73 20 76 61 6c 75   return its valu
2740: 65 2e 0a 2a 2f 0a 75 33 32 20 73 71 6c 69 74 65  e..*/.u32 sqlite
2750: 33 52 65 61 64 55 74 66 38 28 63 6f 6e 73 74 20  3ReadUtf8(const 
2760: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
2770: 29 7b 0a 20 20 75 33 32 20 63 3b 0a 20 20 53 51  ){.  u32 c;.  SQ
2780: 4c 49 54 45 5f 52 45 41 44 5f 55 54 46 38 28 7a  LITE_READ_UTF8(z
2790: 2c 20 63 29 3b 0a 20 20 72 65 74 75 72 6e 20 63  , c);.  return c
27a0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 61  ;.}../*.** Compa
27b0: 72 65 20 74 77 6f 20 55 54 46 2d 38 20 73 74 72  re two UTF-8 str
27c0: 69 6e 67 73 20 66 6f 72 20 65 71 75 61 6c 69 74  ings for equalit
27d0: 79 20 77 68 65 72 65 20 74 68 65 20 66 69 72 73  y where the firs
27e0: 74 20 73 74 72 69 6e 67 20 63 61 6e 0a 2a 2a 20  t string can.** 
27f0: 70 6f 74 65 6e 74 69 61 6c 6c 79 20 62 65 20 61  potentially be a
2800: 20 22 67 6c 6f 62 22 20 65 78 70 72 65 73 73 69   "glob" expressi
2810: 6f 6e 2e 20 20 52 65 74 75 72 6e 20 74 72 75 65  on.  Return true
2820: 20 28 31 29 20 69 66 20 74 68 65 79 0a 2a 2a 20   (1) if they.** 
2830: 61 72 65 20 74 68 65 20 73 61 6d 65 20 61 6e 64  are the same and
2840: 20 66 61 6c 73 65 20 28 30 29 20 69 66 20 74 68   false (0) if th
2850: 65 79 20 61 72 65 20 64 69 66 66 65 72 65 6e 74  ey are different
2860: 2e 0a 2a 2a 0a 2a 2a 20 47 6c 6f 62 62 69 6e 67  ..**.** Globbing
2870: 20 72 75 6c 65 73 3a 0a 2a 2a 0a 2a 2a 20 20 20   rules:.**.**   
2880: 20 20 20 27 2a 27 20 20 20 20 20 20 20 4d 61 74     '*'       Mat
2890: 63 68 65 73 20 61 6e 79 20 73 65 71 75 65 6e 63  ches any sequenc
28a0: 65 20 6f 66 20 7a 65 72 6f 20 6f 72 20 6d 6f 72  e of zero or mor
28b0: 65 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a 2a  e characters..**
28c0: 0a 2a 2a 20 20 20 20 20 20 27 3f 27 20 20 20 20  .**      '?'    
28d0: 20 20 20 4d 61 74 63 68 65 73 20 65 78 61 63 74     Matches exact
28e0: 6c 79 20 6f 6e 65 20 63 68 61 72 61 63 74 65 72  ly one character
28f0: 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 5b 2e 2e 2e  ..**.**     [...
2900: 5d 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 6f  ]      Matches o
2910: 6e 65 20 63 68 61 72 61 63 74 65 72 20 66 72 6f  ne character fro
2920: 6d 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c  m the enclosed l
2930: 69 73 74 20 6f 66 0a 2a 2a 20 20 20 20 20 20 20  ist of.**       
2940: 20 20 20 20 20 20 20 20 20 63 68 61 72 61 63 74           charact
2950: 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 5b  ers..**.**     [
2960: 5e 2e 2e 2e 5d 20 20 20 20 20 4d 61 74 63 68 65  ^...]     Matche
2970: 73 20 6f 6e 65 20 63 68 61 72 61 63 74 65 72 20  s one character 
2980: 6e 6f 74 20 69 6e 20 74 68 65 20 65 6e 63 6c 6f  not in the enclo
2990: 73 65 64 20 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a 20  sed list..**.** 
29a0: 57 69 74 68 20 74 68 65 20 5b 2e 2e 2e 5d 20 61  With the [...] a
29b0: 6e 64 20 5b 5e 2e 2e 2e 5d 20 6d 61 74 63 68 69  nd [^...] matchi
29c0: 6e 67 2c 20 61 20 27 5d 27 20 63 68 61 72 61 63  ng, a ']' charac
29d0: 74 65 72 20 63 61 6e 20 62 65 20 69 6e 63 6c 75  ter can be inclu
29e0: 64 65 64 0a 2a 2a 20 69 6e 20 74 68 65 20 6c 69  ded.** in the li
29f0: 73 74 20 62 79 20 6d 61 6b 69 6e 67 20 69 74 20  st by making it 
2a00: 74 68 65 20 66 69 72 73 74 20 63 68 61 72 61 63  the first charac
2a10: 74 65 72 20 61 66 74 65 72 20 27 5b 27 20 6f 72  ter after '[' or
2a20: 20 27 5e 27 2e 20 20 41 0a 2a 2a 20 72 61 6e 67   '^'.  A.** rang
2a30: 65 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20  e of characters 
2a40: 63 61 6e 20 62 65 20 73 70 65 63 69 66 69 65 64  can be specified
2a50: 20 75 73 69 6e 67 20 27 2d 27 2e 20 20 45 78 61   using '-'.  Exa
2a60: 6d 70 6c 65 3a 0a 2a 2a 20 22 5b 61 2d 7a 5d 22  mple:.** "[a-z]"
2a70: 20 6d 61 74 63 68 65 73 20 61 6e 79 20 73 69 6e   matches any sin
2a80: 67 6c 65 20 6c 6f 77 65 72 2d 63 61 73 65 20 6c  gle lower-case l
2a90: 65 74 74 65 72 2e 20 20 54 6f 20 6d 61 74 63 68  etter.  To match
2aa0: 20 61 20 27 2d 27 2c 20 6d 61 6b 65 0a 2a 2a 20   a '-', make.** 
2ab0: 69 74 20 74 68 65 20 6c 61 73 74 20 63 68 61 72  it the last char
2ac0: 61 63 74 65 72 20 69 6e 20 74 68 65 20 6c 69 73  acter in the lis
2ad0: 74 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72 6f  t..**.** This ro
2ae0: 75 74 69 6e 65 20 69 73 20 75 73 75 61 6c 6c 79  utine is usually
2af0: 20 71 75 69 63 6b 2c 20 62 75 74 20 63 61 6e 20   quick, but can 
2b00: 62 65 20 4e 2a 2a 32 20 69 6e 20 74 68 65 20 77  be N**2 in the w
2b10: 6f 72 73 74 20 63 61 73 65 2e 0a 2a 2a 0a 2a 2a  orst case..**.**
2b20: 20 48 69 6e 74 73 3a 20 74 6f 20 6d 61 74 63 68   Hints: to match
2b30: 20 27 2a 27 20 6f 72 20 27 3f 27 2c 20 70 75 74   '*' or '?', put
2b40: 20 74 68 65 6d 20 69 6e 20 22 5b 5d 22 2e 20 20   them in "[]".  
2b50: 4c 69 6b 65 20 74 68 69 73 3a 0a 2a 2a 0a 2a 2a  Like this:.**.**
2b60: 20 20 20 20 20 20 20 20 20 61 62 63 5b 2a 5d 78           abc[*]x
2b70: 79 7a 20 20 20 20 20 20 20 20 4d 61 74 63 68 65  yz        Matche
2b80: 73 20 22 61 62 63 2a 78 79 7a 22 20 6f 6e 6c 79  s "abc*xyz" only
2b90: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 70  .*/.static int p
2ba0: 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 0a 20  atternCompare(. 
2bb0: 20 63 6f 6e 73 74 20 75 38 20 2a 7a 50 61 74 74   const u8 *zPatt
2bc0: 65 72 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20  ern,            
2bd0: 20 20 2f 2a 20 54 68 65 20 67 6c 6f 62 20 70 61    /* The glob pa
2be0: 74 74 65 72 6e 20 2a 2f 0a 20 20 63 6f 6e 73 74  ttern */.  const
2bf0: 20 75 38 20 2a 7a 53 74 72 69 6e 67 2c 20 20 20   u8 *zString,   
2c00: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54              /* T
2c10: 68 65 20 73 74 72 69 6e 67 20 74 6f 20 63 6f 6d  he string to com
2c20: 70 61 72 65 20 61 67 61 69 6e 73 74 20 74 68 65  pare against the
2c30: 20 67 6c 6f 62 20 2a 2f 0a 20 20 63 6f 6e 73 74   glob */.  const
2c40: 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49   struct compareI
2c50: 6e 66 6f 20 2a 70 49 6e 66 6f 2c 20 2f 2a 20 49  nfo *pInfo, /* I
2c60: 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74  nformation about
2c70: 20 68 6f 77 20 74 6f 20 64 6f 20 74 68 65 20 63   how to do the c
2c80: 6f 6d 70 61 72 65 20 2a 2f 0a 20 20 63 6f 6e 73  ompare */.  cons
2c90: 74 20 69 6e 74 20 65 73 63 20 20 20 20 20 20 20  t int esc       
2ca0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
2cb0: 54 68 65 20 65 73 63 61 70 65 20 63 68 61 72 61  The escape chara
2cc0: 63 74 65 72 20 2a 2f 0a 29 7b 0a 20 20 72 65 67  cter */.){.  reg
2cd0: 69 73 74 65 72 20 69 6e 74 20 63 3b 0a 20 20 69  ister int c;.  i
2ce0: 6e 74 20 69 6e 76 65 72 74 3b 0a 20 20 69 6e 74  nt invert;.  int
2cf0: 20 73 65 65 6e 3b 0a 20 20 69 6e 74 20 63 32 3b   seen;.  int c2;
2d00: 0a 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 20 3d  .  u8 matchOne =
2d10: 20 70 49 6e 66 6f 2d 3e 6d 61 74 63 68 4f 6e 65   pInfo->matchOne
2d20: 3b 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 20  ;.  u8 matchAll 
2d30: 3d 20 70 49 6e 66 6f 2d 3e 6d 61 74 63 68 41 6c  = pInfo->matchAl
2d40: 6c 3b 0a 20 20 75 38 20 6d 61 74 63 68 53 65 74  l;.  u8 matchSet
2d50: 20 3d 20 70 49 6e 66 6f 2d 3e 6d 61 74 63 68 53   = pInfo->matchS
2d60: 65 74 3b 0a 20 20 75 38 20 6e 6f 43 61 73 65 20  et;.  u8 noCase 
2d70: 3d 20 70 49 6e 66 6f 2d 3e 6e 6f 43 61 73 65 3b  = pInfo->noCase;
2d80: 20 0a 20 20 69 6e 74 20 70 72 65 76 45 73 63 61   .  int prevEsca
2d90: 70 65 20 3d 20 30 3b 20 20 20 20 20 2f 2a 20 54  pe = 0;     /* T
2da0: 72 75 65 20 69 66 20 74 68 65 20 70 72 65 76 69  rue if the previ
2db0: 6f 75 73 20 63 68 61 72 61 63 74 65 72 20 77 61  ous character wa
2dc0: 73 20 27 65 73 63 61 70 65 27 20 2a 2f 0a 0a 20  s 'escape' */.. 
2dd0: 20 77 68 69 6c 65 28 20 28 63 20 3d 20 2a 7a 50   while( (c = *zP
2de0: 61 74 74 65 72 6e 29 21 3d 30 20 29 7b 0a 20 20  attern)!=0 ){.  
2df0: 20 20 69 66 28 20 21 70 72 65 76 45 73 63 61 70    if( !prevEscap
2e00: 65 20 26 26 20 63 3d 3d 6d 61 74 63 68 41 6c 6c  e && c==matchAll
2e10: 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28   ){.      while(
2e20: 20 28 63 3d 7a 50 61 74 74 65 72 6e 5b 31 5d 29   (c=zPattern[1])
2e30: 20 3d 3d 20 6d 61 74 63 68 41 6c 6c 20 7c 7c 20   == matchAll || 
2e40: 63 20 3d 3d 20 6d 61 74 63 68 4f 6e 65 20 29 7b  c == matchOne ){
2e50: 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d  .        if( c==
2e60: 6d 61 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20 20  matchOne ){.    
2e70: 20 20 20 20 20 20 69 66 28 20 2a 7a 53 74 72 69        if( *zStri
2e80: 6e 67 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30  ng==0 ) return 0
2e90: 3b 0a 20 20 20 20 20 20 20 20 20 20 53 51 4c 49  ;.          SQLI
2ea0: 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 53 74  TE_SKIP_UTF8(zSt
2eb0: 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 20 20 7d  ring);.        }
2ec0: 0a 20 20 20 20 20 20 20 20 7a 50 61 74 74 65 72  .        zPatter
2ed0: 6e 2b 2b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  n++;.      }.   
2ee0: 20 20 20 69 66 28 20 63 20 26 26 20 65 73 63 20     if( c && esc 
2ef0: 26 26 20 73 71 6c 69 74 65 33 52 65 61 64 55 74  && sqlite3ReadUt
2f00: 66 38 28 26 7a 50 61 74 74 65 72 6e 5b 31 5d 29  f8(&zPattern[1])
2f10: 3d 3d 65 73 63 20 29 7b 0a 20 20 20 20 20 20 20  ==esc ){.       
2f20: 20 75 38 20 63 6f 6e 73 74 20 2a 7a 54 65 6d 70   u8 const *zTemp
2f30: 20 3d 20 26 7a 50 61 74 74 65 72 6e 5b 31 5d 3b   = &zPattern[1];
2f40: 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f  .        SQLITE_
2f50: 53 4b 49 50 5f 55 54 46 38 28 7a 54 65 6d 70 29  SKIP_UTF8(zTemp)
2f60: 3b 0a 20 20 20 20 20 20 20 20 63 20 3d 20 2a 7a  ;.        c = *z
2f70: 54 65 6d 70 3b 0a 20 20 20 20 20 20 7d 0a 20 20  Temp;.      }.  
2f80: 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29 20 72      if( c==0 ) r
2f90: 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 69  eturn 1;.      i
2fa0: 66 28 20 63 3d 3d 6d 61 74 63 68 53 65 74 20 29  f( c==matchSet )
2fb0: 7b 0a 20 20 20 20 20 20 20 20 61 73 73 65 72 74  {.        assert
2fc0: 28 20 65 73 63 3d 3d 30 20 29 3b 20 20 20 2f 2a  ( esc==0 );   /*
2fd0: 20 54 68 69 73 20 69 73 20 47 4c 4f 42 2c 20 6e   This is GLOB, n
2fe0: 6f 74 20 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20  ot LIKE */.     
2ff0: 20 20 20 77 68 69 6c 65 28 20 2a 7a 53 74 72 69     while( *zStri
3000: 6e 67 20 26 26 20 70 61 74 74 65 72 6e 43 6f 6d  ng && patternCom
3010: 70 61 72 65 28 26 7a 50 61 74 74 65 72 6e 5b 31  pare(&zPattern[1
3020: 5d 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c  ],zString,pInfo,
3030: 65 73 63 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  esc)==0 ){.     
3040: 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50       SQLITE_SKIP
3050: 5f 55 54 46 38 28 7a 53 74 72 69 6e 67 29 3b 0a  _UTF8(zString);.
3060: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
3070: 20 20 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e    return *zStrin
3080: 67 21 3d 30 3b 0a 20 20 20 20 20 20 7d 65 6c 73  g!=0;.      }els
3090: 65 7b 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65  e{.        while
30a0: 28 20 28 63 32 20 3d 20 2a 7a 53 74 72 69 6e 67  ( (c2 = *zString
30b0: 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )!=0 ){.        
30c0: 20 20 69 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a    if( noCase ){.
30d0: 20 20 20 20 20 20 20 20 20 20 20 20 63 32 20 3d              c2 =
30e0: 20 73 71 6c 69 74 65 33 55 70 70 65 72 54 6f 4c   sqlite3UpperToL
30f0: 6f 77 65 72 5b 63 32 5d 3b 0a 20 20 20 20 20 20  ower[c2];.      
3100: 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74 65        c = sqlite
3110: 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 63 5d  3UpperToLower[c]
3120: 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 77 68  ;.            wh
3130: 69 6c 65 28 20 63 32 20 21 3d 20 30 20 26 26 20  ile( c2 != 0 && 
3140: 63 32 20 21 3d 20 63 20 29 7b 20 63 32 20 3d 20  c2 != c ){ c2 = 
3150: 73 71 6c 69 74 65 33 55 70 70 65 72 54 6f 4c 6f  sqlite3UpperToLo
3160: 77 65 72 5b 2a 2b 2b 7a 53 74 72 69 6e 67 5d 3b  wer[*++zString];
3170: 20 7d 0a 20 20 20 20 20 20 20 20 20 20 7d 65 6c   }.          }el
3180: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20  se{.            
3190: 77 68 69 6c 65 28 20 63 32 20 21 3d 20 30 20 26  while( c2 != 0 &
31a0: 26 20 63 32 20 21 3d 20 63 20 29 7b 20 63 32 20  & c2 != c ){ c2 
31b0: 3d 20 2a 2b 2b 7a 53 74 72 69 6e 67 3b 20 7d 0a  = *++zString; }.
31c0: 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20            }.    
31d0: 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20        if( c2==0 
31e0: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
31f0: 20 20 20 20 20 20 69 66 28 20 70 61 74 74 65 72        if( patter
3200: 6e 43 6f 6d 70 61 72 65 28 26 7a 50 61 74 74 65  nCompare(&zPatte
3210: 72 6e 5b 31 5d 2c 7a 53 74 72 69 6e 67 2c 70 49  rn[1],zString,pI
3220: 6e 66 6f 2c 65 73 63 29 20 29 20 72 65 74 75 72  nfo,esc) ) retur
3230: 6e 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20 53  n 1;.          S
3240: 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28  QLITE_SKIP_UTF8(
3250: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
3260: 20 20 7d 0a 20 20 20 20 20 20 20 20 72 65 74 75    }.        retu
3270: 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20  rn 0;.      }.  
3280: 20 20 7d 65 6c 73 65 20 69 66 28 20 21 70 72 65    }else if( !pre
3290: 76 45 73 63 61 70 65 20 26 26 20 63 3d 3d 6d 61  vEscape && c==ma
32a0: 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20 20 20 20  tchOne ){.      
32b0: 69 66 28 20 2a 7a 53 74 72 69 6e 67 3d 3d 30 20  if( *zString==0 
32c0: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
32d0: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
32e0: 46 38 28 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20  F8(zString);.   
32f0: 20 20 20 7a 50 61 74 74 65 72 6e 2b 2b 3b 0a 20     zPattern++;. 
3300: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d     }else if( c==
3310: 6d 61 74 63 68 53 65 74 20 29 7b 0a 20 20 20 20  matchSet ){.    
3320: 20 20 69 6e 74 20 70 72 69 6f 72 5f 63 20 3d 20    int prior_c = 
3330: 30 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74 28  0;.      assert(
3340: 20 65 73 63 3d 3d 30 20 29 3b 20 20 20 20 2f 2a   esc==0 );    /*
3350: 20 54 68 69 73 20 6f 6e 6c 79 20 6f 63 63 75 72   This only occur
3360: 73 20 66 6f 72 20 47 4c 4f 42 2c 20 6e 6f 74 20  s for GLOB, not 
3370: 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20 73 65  LIKE */.      se
3380: 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 69 6e  en = 0;.      in
3390: 76 65 72 74 20 3d 20 30 3b 0a 20 20 20 20 20 20  vert = 0;.      
33a0: 63 20 3d 20 73 71 6c 69 74 65 33 52 65 61 64 55  c = sqlite3ReadU
33b0: 74 66 38 28 7a 53 74 72 69 6e 67 29 3b 0a 20 20  tf8(zString);.  
33c0: 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29 20 72      if( c==0 ) r
33d0: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 63  eturn 0;.      c
33e0: 32 20 3d 20 2a 2b 2b 7a 50 61 74 74 65 72 6e 3b  2 = *++zPattern;
33f0: 0a 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 27  .      if( c2=='
3400: 5e 27 20 29 7b 20 69 6e 76 65 72 74 20 3d 20 31  ^' ){ invert = 1
3410: 3b 20 63 32 20 3d 20 2a 2b 2b 7a 50 61 74 74 65  ; c2 = *++zPatte
3420: 72 6e 3b 20 7d 0a 20 20 20 20 20 20 69 66 28 20  rn; }.      if( 
3430: 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20 20 20 20  c2==']' ){.     
3440: 20 20 20 69 66 28 20 63 3d 3d 27 5d 27 20 29 20     if( c==']' ) 
3450: 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20  seen = 1;.      
3460: 20 20 63 32 20 3d 20 2a 2b 2b 7a 50 61 74 74 65    c2 = *++zPatte
3470: 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  rn;.      }.    
3480: 20 20 77 68 69 6c 65 28 20 28 63 32 20 3d 20 73    while( (c2 = s
3490: 71 6c 69 74 65 33 52 65 61 64 55 74 66 38 28 7a  qlite3ReadUtf8(z
34a0: 50 61 74 74 65 72 6e 29 29 21 3d 30 20 26 26 20  Pattern))!=0 && 
34b0: 63 32 21 3d 27 5d 27 20 29 7b 0a 20 20 20 20 20  c2!=']' ){.     
34c0: 20 20 20 69 66 28 20 63 32 3d 3d 27 2d 27 20 26     if( c2=='-' &
34d0: 26 20 7a 50 61 74 74 65 72 6e 5b 31 5d 21 3d 27  & zPattern[1]!='
34e0: 5d 27 20 26 26 20 7a 50 61 74 74 65 72 6e 5b 31  ]' && zPattern[1
34f0: 5d 21 3d 30 20 26 26 20 70 72 69 6f 72 5f 63 3e  ]!=0 && prior_c>
3500: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 7a  0 ){.          z
3510: 50 61 74 74 65 72 6e 2b 2b 3b 0a 20 20 20 20 20  Pattern++;.     
3520: 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65       c2 = sqlite
3530: 33 52 65 61 64 55 74 66 38 28 7a 50 61 74 74 65  3ReadUtf8(zPatte
3540: 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 69  rn);.          i
3550: 66 28 20 63 3e 3d 70 72 69 6f 72 5f 63 20 26 26  f( c>=prior_c &&
3560: 20 63 3c 3d 63 32 20 29 20 73 65 65 6e 20 3d 20   c<=c2 ) seen = 
3570: 31 3b 0a 20 20 20 20 20 20 20 20 20 20 70 72 69  1;.          pri
3580: 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20  or_c = 0;.      
3590: 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d 63    }else if( c==c
35a0: 32 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 73  2 ){.          s
35b0: 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 20  een = 1;.       
35c0: 20 20 20 70 72 69 6f 72 5f 63 20 3d 20 63 32 3b     prior_c = c2;
35d0: 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a  .        }else{.
35e0: 20 20 20 20 20 20 20 20 20 20 70 72 69 6f 72 5f            prior_
35f0: 63 20 3d 20 63 32 3b 0a 20 20 20 20 20 20 20 20  c = c2;.        
3600: 7d 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54 45  }.        SQLITE
3610: 5f 53 4b 49 50 5f 55 54 46 38 28 7a 50 61 74 74  _SKIP_UTF8(zPatt
3620: 65 72 6e 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  ern);.      }.  
3630: 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20 7c 7c      if( c2==0 ||
3640: 20 28 73 65 65 6e 20 5e 20 69 6e 76 65 72 74 29   (seen ^ invert)
3650: 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a  ==0 ) return 0;.
3660: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
3670: 50 5f 55 54 46 38 28 7a 53 74 72 69 6e 67 29 3b  P_UTF8(zString);
3680: 0a 20 20 20 20 20 20 7a 50 61 74 74 65 72 6e 2b  .      zPattern+
3690: 2b 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28  +;.    }else if(
36a0: 20 65 73 63 20 26 26 20 21 70 72 65 76 45 73 63   esc && !prevEsc
36b0: 61 70 65 20 26 26 20 73 71 6c 69 74 65 33 52 65  ape && sqlite3Re
36c0: 61 64 55 74 66 38 28 7a 50 61 74 74 65 72 6e 29  adUtf8(zPattern)
36d0: 3d 3d 65 73 63 29 7b 0a 20 20 20 20 20 20 70 72  ==esc){.      pr
36e0: 65 76 45 73 63 61 70 65 20 3d 20 31 3b 0a 20 20  evEscape = 1;.  
36f0: 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f      SQLITE_SKIP_
3700: 55 54 46 38 28 7a 50 61 74 74 65 72 6e 29 3b 0a  UTF8(zPattern);.
3710: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
3720: 20 69 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a 20   if( noCase ){. 
3730: 20 20 20 20 20 20 20 69 66 28 20 73 71 6c 69 74         if( sqlit
3740: 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 63  e3UpperToLower[c
3750: 5d 20 21 3d 20 73 71 6c 69 74 65 33 55 70 70 65  ] != sqlite3Uppe
3760: 72 54 6f 4c 6f 77 65 72 5b 2a 7a 53 74 72 69 6e  rToLower[*zStrin
3770: 67 5d 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20  g] ) return 0;. 
3780: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20       }else{.    
3790: 20 20 20 20 69 66 28 20 63 20 21 3d 20 2a 7a 53      if( c != *zS
37a0: 74 72 69 6e 67 20 29 20 72 65 74 75 72 6e 20 30  tring ) return 0
37b0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
37c0: 7a 50 61 74 74 65 72 6e 2b 2b 3b 0a 20 20 20 20  zPattern++;.    
37d0: 20 20 7a 53 74 72 69 6e 67 2b 2b 3b 0a 20 20 20    zString++;.   
37e0: 20 20 20 70 72 65 76 45 73 63 61 70 65 20 3d 20     prevEscape = 
37f0: 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72  0;.    }.  }.  r
3800: 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 3d 3d  eturn *zString==
3810: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e  0;.}../*.** Coun
3820: 74 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20  t the number of 
3830: 74 69 6d 65 73 20 74 68 61 74 20 74 68 65 20 4c  times that the L
3840: 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 28 6f 72  IKE operator (or
3850: 20 47 4c 4f 42 20 77 68 69 63 68 20 69 73 0a 2a   GLOB which is.*
3860: 2a 20 6a 75 73 74 20 61 20 76 61 72 69 61 74 69  * just a variati
3870: 6f 6e 20 6f 66 20 4c 49 4b 45 29 20 67 65 74 73  on of LIKE) gets
3880: 20 63 61 6c 6c 65 64 2e 20 20 54 68 69 73 20 69   called.  This i
3890: 73 20 75 73 65 64 20 66 6f 72 20 74 65 73 74 69  s used for testi
38a0: 6e 67 0a 2a 2a 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23  ng.** only..*/.#
38b0: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53  ifdef SQLITE_TES
38c0: 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 6c 69  T.int sqlite3_li
38d0: 6b 65 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a 23 65  ke_count = 0;.#e
38e0: 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  ndif.../*.** Imp
38f0: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
3900: 68 65 20 6c 69 6b 65 28 29 20 53 51 4c 20 66 75  he like() SQL fu
3910: 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 66 75  nction.  This fu
3920: 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74  nction implement
3930: 73 0a 2a 2a 20 74 68 65 20 62 75 69 6c 64 2d 69  s.** the build-i
3940: 6e 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 2e  n LIKE operator.
3950: 20 20 54 68 65 20 66 69 72 73 74 20 61 72 67 75    The first argu
3960: 6d 65 6e 74 20 74 6f 20 74 68 65 20 66 75 6e 63  ment to the func
3970: 74 69 6f 6e 20 69 73 20 74 68 65 0a 2a 2a 20 70  tion is the.** p
3980: 61 74 74 65 72 6e 20 61 6e 64 20 74 68 65 20 73  attern and the s
3990: 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 69  econd argument i
39a0: 73 20 74 68 65 20 73 74 72 69 6e 67 2e 20 20 53  s the string.  S
39b0: 6f 2c 20 74 68 65 20 53 51 4c 20 73 74 61 74 65  o, the SQL state
39c0: 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20  ments:.**.**    
39d0: 20 20 20 41 20 4c 49 4b 45 20 42 0a 2a 2a 0a 2a     A LIKE B.**.*
39e0: 2a 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64  * is implemented
39f0: 20 61 73 20 6c 69 6b 65 28 42 2c 41 29 2e 0a 2a   as like(B,A)..*
3a00: 2a 0a 2a 2a 20 54 68 69 73 20 73 61 6d 65 20 66  *.** This same f
3a10: 75 6e 63 74 69 6f 6e 20 28 77 69 74 68 20 61 20  unction (with a 
3a20: 64 69 66 66 65 72 65 6e 74 20 63 6f 6d 70 61 72  different compar
3a30: 65 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65 29  eInfo structure)
3a40: 20 63 6f 6d 70 75 74 65 73 0a 2a 2a 20 74 68 65   computes.** the
3a50: 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f 72 2e 0a   GLOB operator..
3a60: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
3a70: 69 6b 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  ikeFunc(.  sqlit
3a80: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
3a90: 65 78 74 2c 20 0a 20 20 69 6e 74 20 61 72 67 63  ext, .  int argc
3aa0: 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  , .  sqlite3_val
3ab0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63  ue **argv.){.  c
3ac0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
3ad0: 61 72 20 2a 7a 41 2c 20 2a 7a 42 3b 0a 20 20 69  ar *zA, *zB;.  i
3ae0: 6e 74 20 65 73 63 61 70 65 20 3d 20 30 3b 0a 0a  nt escape = 0;..
3af0: 20 20 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f 76    zB = sqlite3_v
3b00: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
3b10: 5d 29 3b 0a 20 20 7a 41 20 3d 20 73 71 6c 69 74  ]);.  zA = sqlit
3b20: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
3b30: 67 76 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c 69  gv[1]);..  /* Li
3b40: 6d 69 74 20 74 68 65 20 6c 65 6e 67 74 68 20 6f  mit the length o
3b50: 66 20 74 68 65 20 4c 49 4b 45 20 6f 72 20 47 4c  f the LIKE or GL
3b60: 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 20 61 76  OB pattern to av
3b70: 6f 69 64 20 70 72 6f 62 6c 65 6d 73 0a 20 20 2a  oid problems.  *
3b80: 2a 20 6f 66 20 64 65 65 70 20 72 65 63 75 72 73  * of deep recurs
3b90: 69 6f 6e 20 61 6e 64 20 4e 2a 4e 20 62 65 68 61  ion and N*N beha
3ba0: 76 69 6f 72 20 69 6e 20 70 61 74 74 65 72 6e 43  vior in patternC
3bb0: 6f 6d 70 61 72 65 28 29 2e 0a 20 20 2a 2f 0a 20  ompare()..  */. 
3bc0: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
3bd0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
3be0: 29 3e 53 51 4c 49 54 45 5f 4d 41 58 5f 4c 49 4b  )>SQLITE_MAX_LIK
3bf0: 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48  E_PATTERN_LENGTH
3c00: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   ){.    sqlite3_
3c10: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
3c20: 74 65 78 74 2c 20 22 4c 49 4b 45 20 6f 72 20 47  text, "LIKE or G
3c30: 4c 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 6f 20  LOB pattern too 
3c40: 63 6f 6d 70 6c 65 78 22 2c 20 2d 31 29 3b 0a 20  complex", -1);. 
3c50: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20     return;.  }. 
3c60: 20 61 73 73 65 72 74 28 20 7a 42 3d 3d 73 71 6c   assert( zB==sql
3c70: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
3c80: 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a 20  argv[0]) );  /* 
3c90: 45 6e 63 6f 64 69 6e 67 20 64 69 64 20 6e 6f 74  Encoding did not
3ca0: 20 63 68 61 6e 67 65 20 2a 2f 0a 0a 20 20 69 66   change */..  if
3cb0: 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20 20  ( argc==3 ){.   
3cc0: 20 2f 2a 20 54 68 65 20 65 73 63 61 70 65 20 63   /* The escape c
3cd0: 68 61 72 61 63 74 65 72 20 73 74 72 69 6e 67 20  haracter string 
3ce0: 6d 75 73 74 20 63 6f 6e 73 69 73 74 20 6f 66 20  must consist of 
3cf0: 61 20 73 69 6e 67 6c 65 20 55 54 46 2d 38 20 63  a single UTF-8 c
3d00: 68 61 72 61 63 74 65 72 2e 0a 20 20 20 20 2a 2a  haracter..    **
3d10: 20 4f 74 68 65 72 77 69 73 65 2c 20 72 65 74 75   Otherwise, retu
3d20: 72 6e 20 61 6e 20 65 72 72 6f 72 2e 0a 20 20 20  rn an error..   
3d30: 20 2a 2f 0a 20 20 20 20 63 6f 6e 73 74 20 75 6e   */.    const un
3d40: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 45 73  signed char *zEs
3d50: 63 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  c = sqlite3_valu
3d60: 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d 29 3b  e_text(argv[2]);
3d70: 0a 20 20 20 20 69 66 28 20 7a 45 73 63 3d 3d 30  .    if( zEsc==0
3d80: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 69   ) return;.    i
3d90: 66 28 20 73 71 6c 69 74 65 33 55 74 66 38 43 68  f( sqlite3Utf8Ch
3da0: 61 72 4c 65 6e 28 28 63 68 61 72 2a 29 7a 45 73  arLen((char*)zEs
3db0: 63 2c 20 2d 31 29 21 3d 31 20 29 7b 0a 20 20 20  c, -1)!=1 ){.   
3dc0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
3dd0: 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c  t_error(context,
3de0: 20 0a 20 20 20 20 20 20 20 20 20 20 22 45 53 43   .          "ESC
3df0: 41 50 45 20 65 78 70 72 65 73 73 69 6f 6e 20 6d  APE expression m
3e00: 75 73 74 20 62 65 20 61 20 73 69 6e 67 6c 65 20  ust be a single 
3e10: 63 68 61 72 61 63 74 65 72 22 2c 20 2d 31 29 3b  character", -1);
3e20: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  .      return;. 
3e30: 20 20 20 7d 0a 20 20 20 20 65 73 63 61 70 65 20     }.    escape 
3e40: 3d 20 73 71 6c 69 74 65 33 52 65 61 64 55 74 66  = sqlite3ReadUtf
3e50: 38 28 7a 45 73 63 29 3b 0a 20 20 7d 0a 20 20 69  8(zEsc);.  }.  i
3e60: 66 28 20 7a 41 20 26 26 20 7a 42 20 29 7b 0a 20  f( zA && zB ){. 
3e70: 20 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72     struct compar
3e80: 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 20 3d 20 73  eInfo *pInfo = s
3e90: 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61  qlite3_user_data
3ea0: 28 63 6f 6e 74 65 78 74 29 3b 0a 23 69 66 64 65  (context);.#ifde
3eb0: 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 20 20  f SQLITE_TEST.  
3ec0: 20 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63    sqlite3_like_c
3ed0: 6f 75 6e 74 2b 2b 3b 0a 23 65 6e 64 69 66 0a 20  ount++;.#endif. 
3ee0: 20 20 20 0a 20 20 20 20 73 71 6c 69 74 65 33 5f     .    sqlite3_
3ef0: 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65  result_int(conte
3f00: 78 74 2c 20 70 61 74 74 65 72 6e 43 6f 6d 70 61  xt, patternCompa
3f10: 72 65 28 7a 42 2c 20 7a 41 2c 20 70 49 6e 66 6f  re(zB, zA, pInfo
3f20: 2c 20 65 73 63 61 70 65 29 29 3b 0a 20 20 7d 0a  , escape));.  }.
3f30: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
3f40: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 4e  ntation of the N
3f50: 55 4c 4c 49 46 28 78 2c 79 29 20 66 75 6e 63 74  ULLIF(x,y) funct
3f60: 69 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c 74  ion.  The result
3f70: 20 69 73 20 74 68 65 20 66 69 72 73 74 0a 2a 2a   is the first.**
3f80: 20 61 72 67 75 6d 65 6e 74 20 69 66 20 74 68 65   argument if the
3f90: 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20 64   arguments are d
3fa0: 69 66 66 65 72 65 6e 74 2e 20 20 54 68 65 20 72  ifferent.  The r
3fb0: 65 73 75 6c 74 20 69 73 20 4e 55 4c 4c 20 69 66  esult is NULL if
3fc0: 20 74 68 65 0a 2a 2a 20 61 72 67 75 6d 65 6e 74   the.** argument
3fd0: 73 20 61 72 65 20 65 71 75 61 6c 20 74 6f 20 65  s are equal to e
3fe0: 61 63 68 20 6f 74 68 65 72 2e 0a 2a 2f 0a 73 74  ach other..*/.st
3ff0: 61 74 69 63 20 76 6f 69 64 20 6e 75 6c 6c 69 66  atic void nullif
4000: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
4010: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
4020: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
4030: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
4040: 61 72 67 76 0a 29 7b 0a 20 20 43 6f 6c 6c 53 65  argv.){.  CollSe
4050: 71 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74  q *pColl = sqlit
4060: 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71  e3GetFuncCollSeq
4070: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 69 66 28  (context);.  if(
4080: 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61   sqlite3MemCompa
4090: 72 65 28 61 72 67 76 5b 30 5d 2c 20 61 72 67 76  re(argv[0], argv
40a0: 5b 31 5d 2c 20 70 43 6f 6c 6c 29 21 3d 30 20 29  [1], pColl)!=0 )
40b0: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  {.    sqlite3_re
40c0: 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65  sult_value(conte
40d0: 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20  xt, argv[0]);.  
40e0: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  }.}../*.** Imple
40f0: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
4100: 20 56 45 52 53 49 4f 4e 28 2a 29 20 66 75 6e 63   VERSION(*) func
4110: 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c  tion.  The resul
4120: 74 20 69 73 20 74 68 65 20 76 65 72 73 69 6f 6e  t is the version
4130: 0a 2a 2a 20 6f 66 20 74 68 65 20 53 51 4c 69 74  .** of the SQLit
4140: 65 20 6c 69 62 72 61 72 79 20 74 68 61 74 20 69  e library that i
4150: 73 20 72 75 6e 6e 69 6e 67 2e 0a 2a 2f 0a 73 74  s running..*/.st
4160: 61 74 69 63 20 76 6f 69 64 20 76 65 72 73 69 6f  atic void versio
4170: 6e 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  nFunc(.  sqlite3
4180: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
4190: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
41a0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
41b0: 2a 61 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74  *argv.){.  sqlit
41c0: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
41d0: 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f  ontext, sqlite3_
41e0: 76 65 72 73 69 6f 6e 2c 20 2d 31 2c 20 53 51 4c  version, -1, SQL
41f0: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a  ITE_STATIC);.}..
4200: 2f 2a 20 41 72 72 61 79 20 66 6f 72 20 63 6f 6e  /* Array for con
4210: 76 65 72 74 69 6e 67 20 66 72 6f 6d 20 68 61 6c  verting from hal
4220: 66 2d 62 79 74 65 73 20 28 6e 79 62 62 6c 65 73  f-bytes (nybbles
4230: 29 20 69 6e 74 6f 20 41 53 43 49 49 20 68 65 78  ) into ASCII hex
4240: 0a 2a 2a 20 64 69 67 69 74 73 2e 20 2a 2f 0a 73  .** digits. */.s
4250: 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72  tatic const char
4260: 20 68 65 78 64 69 67 69 74 73 5b 5d 20 3d 20 7b   hexdigits[] = {
4270: 0a 20 20 27 30 27 2c 20 27 31 27 2c 20 27 32 27  .  '0', '1', '2'
4280: 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35 27 2c  , '3', '4', '5',
4290: 20 27 36 27 2c 20 27 37 27 2c 0a 20 20 27 38 27   '6', '7',.  '8'
42a0: 2c 20 27 39 27 2c 20 27 41 27 2c 20 27 42 27 2c  , '9', 'A', 'B',
42b0: 20 27 43 27 2c 20 27 44 27 2c 20 27 45 27 2c 20   'C', 'D', 'E', 
42c0: 27 46 27 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 45  'F' .};../*.** E
42d0: 58 50 45 52 49 4d 45 4e 54 41 4c 20 2d 20 54 68  XPERIMENTAL - Th
42e0: 69 73 20 69 73 20 6e 6f 74 20 61 6e 20 6f 66 66  is is not an off
42f0: 69 63 69 61 6c 20 66 75 6e 63 74 69 6f 6e 2e 20  icial function. 
4300: 20 54 68 65 20 69 6e 74 65 72 66 61 63 65 20 6d   The interface m
4310: 61 79 0a 2a 2a 20 63 68 61 6e 67 65 2e 20 20 54  ay.** change.  T
4320: 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 6d 61 79  his function may
4330: 20 64 69 73 61 70 70 65 61 72 2e 20 20 44 6f 20   disappear.  Do 
4340: 6e 6f 74 20 77 72 69 74 65 20 63 6f 64 65 20 74  not write code t
4350: 68 61 74 20 64 65 70 65 6e 64 73 0a 2a 2a 20 6f  hat depends.** o
4360: 6e 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e  n this function.
4370: 0a 2a 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  .**.** Implement
4380: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 51 55 4f  ation of the QUO
4390: 54 45 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20  TE() function.  
43a0: 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 74 61  This function ta
43b0: 6b 65 73 20 61 20 73 69 6e 67 6c 65 0a 2a 2a 20  kes a single.** 
43c0: 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74 68  argument.  If th
43d0: 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e 75  e argument is nu
43e0: 6d 65 72 69 63 2c 20 74 68 65 20 72 65 74 75 72  meric, the retur
43f0: 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65 20 73  n value is the s
4400: 61 6d 65 20 61 73 0a 2a 2a 20 74 68 65 20 61 72  ame as.** the ar
4410: 67 75 6d 65 6e 74 2e 20 20 49 66 20 74 68 65 20  gument.  If the 
4420: 61 72 67 75 6d 65 6e 74 20 69 73 20 4e 55 4c 4c  argument is NULL
4430: 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c  , the return val
4440: 75 65 20 69 73 20 74 68 65 20 73 74 72 69 6e 67  ue is the string
4450: 0a 2a 2a 20 22 4e 55 4c 4c 22 2e 20 20 4f 74 68  .** "NULL".  Oth
4460: 65 72 77 69 73 65 2c 20 74 68 65 20 61 72 67 75  erwise, the argu
4470: 6d 65 6e 74 20 69 73 20 65 6e 63 6c 6f 73 65 64  ment is enclosed
4480: 20 69 6e 20 73 69 6e 67 6c 65 20 71 75 6f 74 65   in single quote
4490: 73 20 77 69 74 68 0a 2a 2a 20 73 69 6e 67 6c 65  s with.** single
44a0: 2d 71 75 6f 74 65 20 65 73 63 61 70 65 73 2e 0a  -quote escapes..
44b0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 71  */.static void q
44c0: 75 6f 74 65 46 75 6e 63 28 73 71 6c 69 74 65 33  uoteFunc(sqlite3
44d0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
44e0: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
44f0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
4500: 76 29 7b 0a 20 20 69 66 28 20 61 72 67 63 3c 31  v){.  if( argc<1
4510: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 73 77 69   ) return;.  swi
4520: 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61 6c  tch( sqlite3_val
4530: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
4540: 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51 4c   ){.    case SQL
4550: 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20 20  ITE_NULL: {.    
4560: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
4570: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 22  _text(context, "
4580: 4e 55 4c 4c 22 2c 20 34 2c 20 53 51 4c 49 54 45  NULL", 4, SQLITE
4590: 5f 53 54 41 54 49 43 29 3b 0a 20 20 20 20 20 20  _STATIC);.      
45a0: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
45b0: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54   case SQLITE_INT
45c0: 45 47 45 52 3a 0a 20 20 20 20 63 61 73 65 20 53  EGER:.    case S
45d0: 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20  QLITE_FLOAT: {. 
45e0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
45f0: 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78  ult_value(contex
4600: 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20  t, argv[0]);.   
4610: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
4620: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
4630: 42 4c 4f 42 3a 20 7b 0a 20 20 20 20 20 20 63 68  BLOB: {.      ch
4640: 61 72 20 2a 7a 54 65 78 74 20 3d 20 30 3b 0a 20  ar *zText = 0;. 
4650: 20 20 20 20 20 63 68 61 72 20 63 6f 6e 73 74 20       char const 
4660: 2a 7a 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33  *zBlob = sqlite3
4670: 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76  _value_blob(argv
4680: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 6e 74 20  [0]);.      int 
4690: 6e 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f  nBlob = sqlite3_
46a0: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
46b0: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 61 73 73 65  [0]);.      asse
46c0: 72 74 28 20 7a 42 6c 6f 62 3d 3d 73 71 6c 69 74  rt( zBlob==sqlit
46d0: 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72  e3_value_blob(ar
46e0: 67 76 5b 30 5d 29 20 29 3b 20 2f 2a 20 4e 6f 20  gv[0]) ); /* No 
46f0: 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20  encoding change 
4700: 2a 2f 0a 0a 20 20 20 20 20 20 69 66 28 20 32 2a  */..      if( 2*
4710: 6e 42 6c 6f 62 2b 34 3e 53 51 4c 49 54 45 5f 4d  nBlob+4>SQLITE_M
4720: 41 58 5f 4c 45 4e 47 54 48 20 29 7b 0a 20 20 20  AX_LENGTH ){.   
4730: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
4740: 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67  ult_error_toobig
4750: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20  (context);.     
4760: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20     return;.     
4770: 20 7d 0a 20 20 20 20 20 20 7a 54 65 78 74 20 3d   }.      zText =
4780: 20 28 63 68 61 72 20 2a 29 73 71 6c 69 74 65 4d   (char *)sqliteM
4790: 61 6c 6c 6f 63 28 28 32 2a 6e 42 6c 6f 62 29 2b  alloc((2*nBlob)+
47a0: 34 29 3b 20 0a 20 20 20 20 20 20 69 66 28 20 21  4); .      if( !
47b0: 7a 54 65 78 74 20 29 7b 0a 20 20 20 20 20 20 20  zText ){.       
47c0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
47d0: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22  error(context, "
47e0: 6f 75 74 20 6f 66 20 6d 65 6d 6f 72 79 22 2c 20  out of memory", 
47f0: 2d 31 29 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  -1);.      }else
4800: 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 69 3b  {.        int i;
4810: 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30  .        for(i=0
4820: 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b 2b 29 7b  ; i<nBlob; i++){
4830: 0a 20 20 20 20 20 20 20 20 20 20 7a 54 65 78 74  .          zText
4840: 5b 28 69 2a 32 29 2b 32 5d 20 3d 20 68 65 78 64  [(i*2)+2] = hexd
4850: 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 3e  igits[(zBlob[i]>
4860: 3e 34 29 26 30 78 30 46 5d 3b 0a 20 20 20 20 20  >4)&0x0F];.     
4870: 20 20 20 20 20 7a 54 65 78 74 5b 28 69 2a 32 29       zText[(i*2)
4880: 2b 33 5d 20 3d 20 68 65 78 64 69 67 69 74 73 5b  +3] = hexdigits[
4890: 28 7a 42 6c 6f 62 5b 69 5d 29 26 30 78 30 46 5d  (zBlob[i])&0x0F]
48a0: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
48b0: 20 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c 6f 62      zText[(nBlob
48c0: 2a 32 29 2b 32 5d 20 3d 20 27 5c 27 27 3b 0a 20  *2)+2] = '\'';. 
48d0: 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42         zText[(nB
48e0: 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20 27 5c 30 27  lob*2)+3] = '\0'
48f0: 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b  ;.        zText[
4900: 30 5d 20 3d 20 27 58 27 3b 0a 20 20 20 20 20 20  0] = 'X';.      
4910: 20 20 7a 54 65 78 74 5b 31 5d 20 3d 20 27 5c 27    zText[1] = '\'
4920: 27 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  ';.        sqlit
4930: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
4940: 6f 6e 74 65 78 74 2c 20 7a 54 65 78 74 2c 20 2d  ontext, zText, -
4950: 31 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49  1, SQLITE_TRANSI
4960: 45 4e 54 29 3b 0a 20 20 20 20 20 20 20 20 73 71  ENT);.        sq
4970: 6c 69 74 65 46 72 65 65 28 7a 54 65 78 74 29 3b  liteFree(zText);
4980: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 62  .      }.      b
4990: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20  reak;.    }.    
49a0: 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58 54  case SQLITE_TEXT
49b0: 3a 20 7b 0a 20 20 20 20 20 20 69 6e 74 20 69 2c  : {.      int i,
49c0: 6a 3b 0a 20 20 20 20 20 20 75 36 34 20 6e 3b 0a  j;.      u64 n;.
49d0: 20 20 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69        const unsi
49e0: 67 6e 65 64 20 63 68 61 72 20 2a 7a 41 72 67 20  gned char *zArg 
49f0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
4a00: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
4a10: 20 20 20 20 20 63 68 61 72 20 2a 7a 3b 0a 0a 20       char *z;.. 
4a20: 20 20 20 20 20 69 66 28 20 7a 41 72 67 3d 3d 30       if( zArg==0
4a30: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20   ) return;.     
4a40: 20 66 6f 72 28 69 3d 30 2c 20 6e 3d 30 3b 20 7a   for(i=0, n=0; z
4a50: 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 20 69 66  Arg[i]; i++){ if
4a60: 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c 27 27 20  ( zArg[i]=='\'' 
4a70: 29 20 6e 2b 2b 3b 20 7d 0a 20 20 20 20 20 20 69  ) n++; }.      i
4a80: 66 28 20 69 2b 6e 2b 33 3e 53 51 4c 49 54 45 5f  f( i+n+3>SQLITE_
4a90: 4d 41 58 5f 4c 45 4e 47 54 48 20 29 7b 0a 20 20  MAX_LENGTH ){.  
4aa0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
4ab0: 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69  sult_error_toobi
4ac0: 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  g(context);.    
4ad0: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20      return;.    
4ae0: 20 20 7d 0a 20 20 20 20 20 20 7a 20 3d 20 73 71    }.      z = sq
4af0: 6c 69 74 65 4d 61 6c 6c 6f 63 28 20 69 2b 6e 2b  liteMalloc( i+n+
4b00: 33 20 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a  3 );.      if( z
4b10: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
4b20: 20 20 20 20 7a 5b 30 5d 20 3d 20 27 5c 27 27 3b      z[0] = '\'';
4b30: 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 2c 20  .      for(i=0, 
4b40: 6a 3d 31 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b  j=1; zArg[i]; i+
4b50: 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 6a 2b  +){.        z[j+
4b60: 2b 5d 20 3d 20 7a 41 72 67 5b 69 5d 3b 0a 20 20  +] = zArg[i];.  
4b70: 20 20 20 20 20 20 69 66 28 20 7a 41 72 67 5b 69        if( zArg[i
4b80: 5d 3d 3d 27 5c 27 27 20 29 7b 0a 20 20 20 20 20  ]=='\'' ){.     
4b90: 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c       z[j++] = '\
4ba0: 27 27 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20  '';.        }.  
4bb0: 20 20 20 20 7d 0a 20 20 20 20 20 20 7a 5b 6a 2b      }.      z[j+
4bc0: 2b 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20  +] = '\'';.     
4bd0: 20 7a 5b 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 20   z[j] = 0;.     
4be0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
4bf0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 2c  text(context, z,
4c00: 20 6a 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53   j, SQLITE_TRANS
4c10: 49 45 4e 54 29 3b 0a 20 20 20 20 20 20 73 71 6c  IENT);.      sql
4c20: 69 74 65 46 72 65 65 28 7a 29 3b 0a 20 20 20 20  iteFree(z);.    
4c30: 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  }.  }.}../*.** T
4c40: 68 65 20 68 65 78 28 29 20 66 75 6e 63 74 69 6f  he hex() functio
4c50: 6e 2e 20 20 49 6e 74 65 72 70 72 65 74 20 74 68  n.  Interpret th
4c60: 65 20 61 72 67 75 6d 65 6e 74 20 61 73 20 61 20  e argument as a 
4c70: 62 6c 6f 62 2e 20 20 52 65 74 75 72 6e 0a 2a 2a  blob.  Return.**
4c80: 20 61 20 68 65 78 61 64 65 63 69 6d 61 6c 20 72   a hexadecimal r
4c90: 65 6e 64 65 72 69 6e 67 20 61 73 20 74 65 78 74  endering as text
4ca0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
4cb0: 20 68 65 78 46 75 6e 63 28 0a 20 20 73 71 6c 69   hexFunc(.  sqli
4cc0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
4cd0: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
4ce0: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
4cf0: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e  e **argv.){.  in
4d00: 74 20 69 2c 20 6e 3b 0a 20 20 63 6f 6e 73 74 20  t i, n;.  const 
4d10: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70  unsigned char *p
4d20: 42 6c 6f 62 3b 0a 20 20 63 68 61 72 20 2a 7a 48  Blob;.  char *zH
4d30: 65 78 2c 20 2a 7a 3b 0a 20 20 61 73 73 65 72 74  ex, *z;.  assert
4d40: 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 70  ( argc==1 );.  p
4d50: 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76  Blob = sqlite3_v
4d60: 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30  alue_blob(argv[0
4d70: 5d 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65  ]);.  n = sqlite
4d80: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
4d90: 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 6e 2a  gv[0]);.  if( n*
4da0: 32 2b 31 3e 53 51 4c 49 54 45 5f 4d 41 58 5f 4c  2+1>SQLITE_MAX_L
4db0: 45 4e 47 54 48 20 29 7b 0a 20 20 20 20 73 71 6c  ENGTH ){.    sql
4dc0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
4dd0: 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74  r_toobig(context
4de0: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  );.    return;. 
4df0: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 42 6c   }.  assert( pBl
4e00: 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75  ob==sqlite3_valu
4e10: 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 20  e_blob(argv[0]) 
4e20: 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69  );  /* No encodi
4e30: 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a  ng change */.  z
4e40: 20 3d 20 7a 48 65 78 20 3d 20 73 71 6c 69 74 65   = zHex = sqlite
4e50: 33 5f 6d 61 6c 6c 6f 63 28 6e 2a 32 20 2b 20 31  3_malloc(n*2 + 1
4e60: 29 3b 0a 20 20 69 66 28 20 7a 48 65 78 3d 3d 30  );.  if( zHex==0
4e70: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 66 6f 72   ) return;.  for
4e80: 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b 2c 20  (i=0; i<n; i++, 
4e90: 70 42 6c 6f 62 2b 2b 29 7b 0a 20 20 20 20 75 6e  pBlob++){.    un
4ea0: 73 69 67 6e 65 64 20 63 68 61 72 20 63 20 3d 20  signed char c = 
4eb0: 2a 70 42 6c 6f 62 3b 0a 20 20 20 20 2a 28 7a 2b  *pBlob;.    *(z+
4ec0: 2b 29 20 3d 20 68 65 78 64 69 67 69 74 73 5b 28  +) = hexdigits[(
4ed0: 63 3e 3e 34 29 26 30 78 66 5d 3b 0a 20 20 20 20  c>>4)&0xf];.    
4ee0: 2a 28 7a 2b 2b 29 20 3d 20 68 65 78 64 69 67 69  *(z++) = hexdigi
4ef0: 74 73 5b 63 26 30 78 66 5d 3b 0a 20 20 7d 0a 20  ts[c&0xf];.  }. 
4f00: 20 2a 7a 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74   *z = 0;.  sqlit
4f10: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
4f20: 6f 6e 74 65 78 74 2c 20 7a 48 65 78 2c 20 6e 2a  ontext, zHex, n*
4f30: 32 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29  2, sqlite3_free)
4f40: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 7a  ;.}../*.** The z
4f50: 65 72 6f 62 6c 6f 62 28 4e 29 20 66 75 6e 63 74  eroblob(N) funct
4f60: 69 6f 6e 20 72 65 74 75 72 6e 73 20 61 20 7a 65  ion returns a ze
4f70: 72 6f 2d 66 69 6c 6c 65 64 20 62 6c 6f 62 20 6f  ro-filled blob o
4f80: 66 20 73 69 7a 65 20 4e 20 62 79 74 65 73 2e 0a  f size N bytes..
4f90: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 7a  */.static void z
4fa0: 65 72 6f 62 6c 6f 62 46 75 6e 63 28 0a 20 20 73  eroblobFunc(.  s
4fb0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
4fc0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
4fd0: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
4fe0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
4ff0: 20 69 6e 74 20 6e 3b 0a 20 20 61 73 73 65 72 74   int n;.  assert
5000: 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 6e  ( argc==1 );.  n
5010: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
5020: 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  _int(argv[0]);. 
5030: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
5040: 7a 65 72 6f 62 6c 6f 62 28 63 6f 6e 74 65 78 74  zeroblob(context
5050: 2c 20 6e 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  , n);.}../*.** T
5060: 68 65 20 72 65 70 6c 61 63 65 28 29 20 66 75 6e  he replace() fun
5070: 63 74 69 6f 6e 2e 20 20 54 68 72 65 65 20 61 72  ction.  Three ar
5080: 67 75 6d 65 6e 74 73 20 61 72 65 20 61 6c 6c 20  guments are all 
5090: 73 74 72 69 6e 67 73 3a 20 63 61 6c 6c 0a 2a 2a  strings: call.**
50a0: 20 74 68 65 6d 20 41 2c 20 42 2c 20 61 6e 64 20   them A, B, and 
50b0: 43 2e 20 54 68 65 20 72 65 73 75 6c 74 20 69 73  C. The result is
50c0: 20 61 6c 73 6f 20 61 20 73 74 72 69 6e 67 20 77   also a string w
50d0: 68 69 63 68 20 69 73 20 64 65 72 69 76 65 64 0a  hich is derived.
50e0: 2a 2a 20 66 72 6f 6d 20 41 20 62 79 20 72 65 70  ** from A by rep
50f0: 6c 61 63 69 6e 67 20 65 76 65 72 79 20 6f 63 63  lacing every occ
5100: 75 72 61 6e 63 65 20 6f 66 20 42 20 77 69 74 68  urance of B with
5110: 20 43 2e 20 20 54 68 65 20 6d 61 74 63 68 0a 2a   C.  The match.*
5120: 2a 20 6d 75 73 74 20 62 65 20 65 78 61 63 74 2e  * must be exact.
5130: 20 20 43 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75    Collating sequ
5140: 65 6e 63 65 73 20 61 72 65 20 6e 6f 74 20 75 73  ences are not us
5150: 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  ed..*/.static vo
5160: 69 64 20 72 65 70 6c 61 63 65 46 75 6e 63 28 0a  id replaceFunc(.
5170: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
5180: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
5190: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
51a0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
51b0: 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  {.  const unsign
51c0: 65 64 20 63 68 61 72 20 2a 7a 53 74 72 3b 20 20  ed char *zStr;  
51d0: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 69 6e 70        /* The inp
51e0: 75 74 20 73 74 72 69 6e 67 20 41 20 2a 2f 0a 20  ut string A */. 
51f0: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
5200: 63 68 61 72 20 2a 7a 50 61 74 74 65 72 6e 3b 20  char *zPattern; 
5210: 20 20 20 2f 2a 20 54 68 65 20 70 61 74 74 65 72     /* The patter
5220: 6e 20 73 74 72 69 6e 67 20 42 20 2a 2f 0a 20 20  n string B */.  
5230: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
5240: 68 61 72 20 2a 7a 52 65 70 3b 20 20 20 20 20 20  har *zRep;      
5250: 20 20 2f 2a 20 54 68 65 20 72 65 70 6c 61 63 65    /* The replace
5260: 6d 65 6e 74 20 73 74 72 69 6e 67 20 43 20 2a 2f  ment string C */
5270: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
5280: 20 2a 7a 4f 75 74 3b 20 20 20 20 20 20 20 20 20   *zOut;         
5290: 20 20 20 20 20 2f 2a 20 54 68 65 20 6f 75 74 70       /* The outp
52a0: 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 53 74 72  ut */.  int nStr
52b0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ;               
52c0: 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 53 74 72   /* Size of zStr
52d0: 20 2a 2f 0a 20 20 69 6e 74 20 6e 50 61 74 74 65   */.  int nPatte
52e0: 72 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f  rn;            /
52f0: 2a 20 53 69 7a 65 20 6f 66 20 7a 50 61 74 74 65  * Size of zPatte
5300: 72 6e 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 70  rn */.  int nRep
5310: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ;               
5320: 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 52 65 70   /* Size of zRep
5330: 20 2a 2f 0a 20 20 69 36 34 20 6e 4f 75 74 3b 20   */.  i64 nOut; 
5340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
5350: 2a 20 4d 61 78 69 6d 75 6d 20 73 69 7a 65 20 6f  * Maximum size o
5360: 66 20 7a 4f 75 74 20 2a 2f 0a 20 20 69 6e 74 20  f zOut */.  int 
5370: 6c 6f 6f 70 4c 69 6d 69 74 3b 20 20 20 20 20 20  loopLimit;      
5380: 20 20 20 20 20 2f 2a 20 4c 61 73 74 20 7a 53 74       /* Last zSt
5390: 72 5b 5d 20 74 68 61 74 20 6d 69 67 68 74 20 6d  r[] that might m
53a0: 61 74 63 68 20 7a 50 61 74 74 65 72 6e 5b 5d 20  atch zPattern[] 
53b0: 2a 2f 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 20 20  */.  int i, j;  
53c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
53d0: 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 73 20 2a   Loop counters *
53e0: 2f 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  /..  assert( arg
53f0: 63 3d 3d 33 20 29 3b 0a 20 20 7a 53 74 72 20 3d  c==3 );.  zStr =
5400: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
5410: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
5420: 69 66 28 20 7a 53 74 72 3d 3d 30 20 29 20 72 65  if( zStr==0 ) re
5430: 74 75 72 6e 3b 0a 20 20 6e 53 74 72 20 3d 20 73  turn;.  nStr = s
5440: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
5450: 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61  es(argv[0]);.  a
5460: 73 73 65 72 74 28 20 7a 53 74 72 3d 3d 73 71 6c  ssert( zStr==sql
5470: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
5480: 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a 20  argv[0]) );  /* 
5490: 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e  No encoding chan
54a0: 67 65 20 2a 2f 0a 20 20 7a 50 61 74 74 65 72 6e  ge */.  zPattern
54b0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
54c0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a  _text(argv[1]);.
54d0: 20 20 69 66 28 20 7a 50 61 74 74 65 72 6e 3d 3d    if( zPattern==
54e0: 30 20 7c 7c 20 7a 50 61 74 74 65 72 6e 5b 30 5d  0 || zPattern[0]
54f0: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
5500: 6e 50 61 74 74 65 72 6e 20 3d 20 73 71 6c 69 74  nPattern = sqlit
5510: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
5520: 72 67 76 5b 31 5d 29 3b 0a 20 20 61 73 73 65 72  rgv[1]);.  asser
5530: 74 28 20 7a 50 61 74 74 65 72 6e 3d 3d 73 71 6c  t( zPattern==sql
5540: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
5550: 61 72 67 76 5b 31 5d 29 20 29 3b 20 20 2f 2a 20  argv[1]) );  /* 
5560: 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e  No encoding chan
5570: 67 65 20 2a 2f 0a 20 20 7a 52 65 70 20 3d 20 73  ge */.  zRep = s
5580: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
5590: 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 69 66  t(argv[2]);.  if
55a0: 28 20 7a 52 65 70 3d 3d 30 20 29 20 72 65 74 75  ( zRep==0 ) retu
55b0: 72 6e 3b 0a 20 20 6e 52 65 70 20 3d 20 73 71 6c  rn;.  nRep = sql
55c0: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
55d0: 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 61 73 73  (argv[2]);.  ass
55e0: 65 72 74 28 20 7a 52 65 70 3d 3d 73 71 6c 69 74  ert( zRep==sqlit
55f0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
5600: 67 76 5b 32 5d 29 20 29 3b 0a 20 20 6e 4f 75 74  gv[2]) );.  nOut
5610: 20 3d 20 6e 53 74 72 20 2b 20 31 3b 0a 20 20 61   = nStr + 1;.  a
5620: 73 73 65 72 74 28 20 6e 4f 75 74 3c 53 51 4c 49  ssert( nOut<SQLI
5630: 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48 20 29 3b  TE_MAX_LENGTH );
5640: 0a 20 20 7a 4f 75 74 20 3d 20 73 71 6c 69 74 65  .  zOut = sqlite
5650: 33 5f 6d 61 6c 6c 6f 63 28 28 69 6e 74 29 6e 4f  3_malloc((int)nO
5660: 75 74 29 3b 0a 20 20 69 66 28 20 7a 4f 75 74 3d  ut);.  if( zOut=
5670: 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  =0 ){.    return
5680: 3b 0a 20 20 7d 0a 20 20 6c 6f 6f 70 4c 69 6d 69  ;.  }.  loopLimi
5690: 74 20 3d 20 6e 53 74 72 20 2d 20 6e 50 61 74 74  t = nStr - nPatt
56a0: 65 72 6e 3b 20 20 0a 20 20 66 6f 72 28 69 3d 6a  ern;  .  for(i=j
56b0: 3d 30 3b 20 69 3c 3d 6c 6f 6f 70 4c 69 6d 69 74  =0; i<=loopLimit
56c0: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20  ; i++){.    if( 
56d0: 7a 53 74 72 5b 69 5d 21 3d 7a 50 61 74 74 65 72  zStr[i]!=zPatter
56e0: 6e 5b 30 5d 20 7c 7c 20 6d 65 6d 63 6d 70 28 26  n[0] || memcmp(&
56f0: 7a 53 74 72 5b 69 5d 2c 20 7a 50 61 74 74 65 72  zStr[i], zPatter
5700: 6e 2c 20 6e 50 61 74 74 65 72 6e 29 20 29 7b 0a  n, nPattern) ){.
5710: 20 20 20 20 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20        zOut[j++] 
5720: 3d 20 7a 53 74 72 5b 69 5d 3b 0a 20 20 20 20 7d  = zStr[i];.    }
5730: 65 6c 73 65 7b 0a 20 20 20 20 20 20 6e 4f 75 74  else{.      nOut
5740: 20 2b 3d 20 6e 52 65 70 20 2d 20 6e 50 61 74 74   += nRep - nPatt
5750: 65 72 6e 3b 0a 20 20 20 20 20 20 69 66 28 20 6e  ern;.      if( n
5760: 4f 75 74 3e 3d 53 51 4c 49 54 45 5f 4d 41 58 5f  Out>=SQLITE_MAX_
5770: 4c 45 4e 47 54 48 20 29 7b 0a 20 20 20 20 20 20  LENGTH ){.      
5780: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
5790: 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f  _error_toobig(co
57a0: 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 20 20  ntext);.        
57b0: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 4f 75  sqlite3_free(zOu
57c0: 74 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75  t);.        retu
57d0: 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  rn;.      }.    
57e0: 20 20 7a 4f 75 74 20 3d 20 73 71 6c 69 74 65 33    zOut = sqlite3
57f0: 5f 72 65 61 6c 6c 6f 63 28 7a 4f 75 74 2c 20 28  _realloc(zOut, (
5800: 69 6e 74 29 6e 4f 75 74 29 3b 0a 20 20 20 20 20  int)nOut);.     
5810: 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a   if( zOut==0 ){.
5820: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a          return;.
5830: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 6d 65        }.      me
5840: 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20 7a  mcpy(&zOut[j], z
5850: 52 65 70 2c 20 6e 52 65 70 29 3b 0a 20 20 20 20  Rep, nRep);.    
5860: 20 20 6a 20 2b 3d 20 6e 52 65 70 3b 0a 20 20 20    j += nRep;.   
5870: 20 20 20 69 20 2b 3d 20 6e 50 61 74 74 65 72 6e     i += nPattern
5880: 2d 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20  -1;.    }.  }.  
5890: 61 73 73 65 72 74 28 20 6a 2b 6e 53 74 72 2d 69  assert( j+nStr-i
58a0: 2b 31 3d 3d 6e 4f 75 74 20 29 3b 0a 20 20 6d 65  +1==nOut );.  me
58b0: 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20 26  mcpy(&zOut[j], &
58c0: 7a 53 74 72 5b 69 5d 2c 20 6e 53 74 72 2d 69 29  zStr[i], nStr-i)
58d0: 3b 0a 20 20 6a 20 2b 3d 20 6e 53 74 72 20 2d 20  ;.  j += nStr - 
58e0: 69 3b 0a 20 20 61 73 73 65 72 74 28 20 6a 3c 3d  i;.  assert( j<=
58f0: 6e 4f 75 74 20 29 3b 0a 20 20 7a 4f 75 74 5b 6a  nOut );.  zOut[j
5900: 5d 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 33  ] = 0;.  sqlite3
5910: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
5920: 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 4f 75  text, (char*)zOu
5930: 74 2c 20 6a 2c 20 73 71 6c 69 74 65 33 5f 66 72  t, j, sqlite3_fr
5940: 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  ee);.}../*.** Im
5950: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
5960: 74 68 65 20 54 52 49 4d 28 29 2c 20 4c 54 52 49  the TRIM(), LTRI
5970: 4d 28 29 2c 20 61 6e 64 20 52 54 52 49 4d 28 29  M(), and RTRIM()
5980: 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2a 20 54   functions..** T
5990: 68 65 20 75 73 65 72 64 61 74 61 20 69 73 20 30  he userdata is 0
59a0: 78 31 20 66 6f 72 20 6c 65 66 74 20 74 72 69 6d  x1 for left trim
59b0: 2c 20 30 78 32 20 66 6f 72 20 72 69 67 68 74 20  , 0x2 for right 
59c0: 74 72 69 6d 2c 20 30 78 33 20 66 6f 72 20 62 6f  trim, 0x3 for bo
59d0: 74 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  th..*/.static vo
59e0: 69 64 20 74 72 69 6d 46 75 6e 63 28 0a 20 20 73  id trimFunc(.  s
59f0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
5a00: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
5a10: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
5a20: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
5a30: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
5a40: 63 68 61 72 20 2a 7a 49 6e 3b 20 20 20 20 20 20  char *zIn;      
5a50: 20 20 20 2f 2a 20 49 6e 70 75 74 20 73 74 72 69     /* Input stri
5a60: 6e 67 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 6e  ng */.  const un
5a70: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 43 68  signed char *zCh
5a80: 61 72 53 65 74 3b 20 20 20 20 2f 2a 20 53 65 74  arSet;    /* Set
5a90: 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 74   of characters t
5aa0: 6f 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74 20  o trim */.  int 
5ab0: 6e 49 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20  nIn;            
5ac0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
5ad0: 20 4e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73   Number of bytes
5ae0: 20 69 6e 20 69 6e 70 75 74 20 2a 2f 0a 20 20 69   in input */.  i
5af0: 6e 74 20 66 6c 61 67 73 3b 20 20 20 20 20 20 20  nt flags;       
5b00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5b10: 20 2f 2a 20 31 3a 20 74 72 69 6d 6c 65 66 74 20   /* 1: trimleft 
5b20: 20 32 3a 20 74 72 69 6d 72 69 67 68 74 20 20 33   2: trimright  3
5b30: 3a 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74 20  : trim */.  int 
5b40: 69 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  i;              
5b50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
5b60: 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a 2f   Loop counter */
5b70: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
5b80: 20 2a 61 4c 65 6e 3b 20 20 20 20 20 20 20 20 20   *aLen;         
5b90: 20 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20 6f       /* Length o
5ba0: 66 20 65 61 63 68 20 63 68 61 72 61 63 74 65 72  f each character
5bb0: 20 69 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a   in zCharSet */.
5bc0: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
5bd0: 20 63 68 61 72 20 2a 2a 61 7a 43 68 61 72 3b 20   char **azChar; 
5be0: 20 20 20 20 2f 2a 20 49 6e 64 69 76 69 64 75 61      /* Individua
5bf0: 6c 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 20  l characters in 
5c00: 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20 20 69 6e  zCharSet */.  in
5c10: 74 20 6e 43 68 61 72 3b 20 20 20 20 20 20 20 20  t nChar;        
5c20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5c30: 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 63 68 61  /* Number of cha
5c40: 72 61 63 74 65 72 73 20 69 6e 20 7a 43 68 61 72  racters in zChar
5c50: 53 65 74 20 2a 2f 0a 0a 20 20 69 66 28 20 73 71  Set */..  if( sq
5c60: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
5c70: 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54  (argv[0])==SQLIT
5c80: 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 72 65  E_NULL ){.    re
5c90: 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 7a 49 6e 20  turn;.  }.  zIn 
5ca0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
5cb0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
5cc0: 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20 72 65   if( zIn==0 ) re
5cd0: 74 75 72 6e 3b 0a 20 20 6e 49 6e 20 3d 20 73 71  turn;.  nIn = sq
5ce0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
5cf0: 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61 73  s(argv[0]);.  as
5d00: 73 65 72 74 28 20 7a 49 6e 3d 3d 73 71 6c 69 74  sert( zIn==sqlit
5d10: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
5d20: 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28 20  gv[0]) );.  if( 
5d30: 61 72 67 63 3d 3d 31 20 29 7b 0a 20 20 20 20 73  argc==1 ){.    s
5d40: 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e 73 69  tatic const unsi
5d50: 67 6e 65 64 20 63 68 61 72 20 6c 65 6e 4f 6e 65  gned char lenOne
5d60: 5b 5d 20 3d 20 7b 20 31 20 7d 3b 0a 20 20 20 20  [] = { 1 };.    
5d70: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e 73  static const uns
5d80: 69 67 6e 65 64 20 63 68 61 72 20 2a 61 7a 4f 6e  igned char *azOn
5d90: 65 5b 5d 20 3d 20 7b 20 28 75 38 2a 29 22 20 22  e[] = { (u8*)" "
5da0: 20 7d 3b 0a 20 20 20 20 6e 43 68 61 72 20 3d 20   };.    nChar = 
5db0: 31 3b 0a 20 20 20 20 61 4c 65 6e 20 3d 20 28 75  1;.    aLen = (u
5dc0: 38 2a 29 6c 65 6e 4f 6e 65 3b 0a 20 20 20 20 61  8*)lenOne;.    a
5dd0: 7a 43 68 61 72 20 3d 20 61 7a 4f 6e 65 3b 0a 20  zChar = azOne;. 
5de0: 20 20 20 7a 43 68 61 72 53 65 74 20 3d 20 30 3b     zCharSet = 0;
5df0: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 28 7a 43  .  }else if( (zC
5e00: 68 61 72 53 65 74 20 3d 20 73 71 6c 69 74 65 33  harSet = sqlite3
5e10: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
5e20: 5b 31 5d 29 29 3d 3d 30 20 29 7b 0a 20 20 20 20  [1]))==0 ){.    
5e30: 72 65 74 75 72 6e 3b 0a 20 20 7d 65 6c 73 65 7b  return;.  }else{
5e40: 0a 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  .    const unsig
5e50: 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0a 20 20 20  ned char *z;.   
5e60: 20 66 6f 72 28 7a 3d 7a 43 68 61 72 53 65 74 2c   for(z=zCharSet,
5e70: 20 6e 43 68 61 72 3d 30 3b 20 2a 7a 3b 20 6e 43   nChar=0; *z; nC
5e80: 68 61 72 2b 2b 29 7b 0a 20 20 20 20 20 20 53 51  har++){.      SQ
5e90: 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a  LITE_SKIP_UTF8(z
5ea0: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28  );.    }.    if(
5eb0: 20 6e 43 68 61 72 3e 30 20 29 7b 0a 20 20 20 20   nChar>0 ){.    
5ec0: 20 20 61 7a 43 68 61 72 20 3d 20 73 71 6c 69 74    azChar = sqlit
5ed0: 65 33 5f 6d 61 6c 6c 6f 63 28 20 6e 43 68 61 72  e3_malloc( nChar
5ee0: 2a 28 73 69 7a 65 6f 66 28 63 68 61 72 2a 29 2b  *(sizeof(char*)+
5ef0: 31 29 20 29 3b 0a 20 20 20 20 20 20 69 66 28 20  1) );.      if( 
5f00: 61 7a 43 68 61 72 3d 3d 30 20 29 7b 0a 20 20 20  azChar==0 ){.   
5f10: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20       return;.   
5f20: 20 20 20 7d 0a 20 20 20 20 20 20 61 4c 65 6e 20     }.      aLen 
5f30: 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72  = (unsigned char
5f40: 2a 29 26 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d  *)&azChar[nChar]
5f50: 3b 0a 20 20 20 20 20 20 66 6f 72 28 7a 3d 7a 43  ;.      for(z=zC
5f60: 68 61 72 53 65 74 2c 20 6e 43 68 61 72 3d 30 3b  harSet, nChar=0;
5f70: 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a 20   *z; nChar++){. 
5f80: 20 20 20 20 20 20 20 61 7a 43 68 61 72 5b 6e 43         azChar[nC
5f90: 68 61 72 5d 20 3d 20 7a 3b 0a 20 20 20 20 20 20  har] = z;.      
5fa0: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
5fb0: 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 20 20 61  F8(z);.        a
5fc0: 4c 65 6e 5b 6e 43 68 61 72 5d 20 3d 20 7a 20 2d  Len[nChar] = z -
5fd0: 20 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d 3b 0a   azChar[nChar];.
5fe0: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20        }.    }.  
5ff0: 7d 0a 20 20 69 66 28 20 6e 43 68 61 72 3e 30 20  }.  if( nChar>0 
6000: 29 7b 0a 20 20 20 20 66 6c 61 67 73 20 3d 20 28  ){.    flags = (
6010: 69 6e 74 29 73 71 6c 69 74 65 33 5f 75 73 65 72  int)sqlite3_user
6020: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a  _data(context);.
6030: 20 20 20 20 69 66 28 20 66 6c 61 67 73 20 26 20      if( flags & 
6040: 31 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65  1 ){.      while
6050: 28 20 6e 49 6e 3e 30 20 29 7b 0a 20 20 20 20 20  ( nIn>0 ){.     
6060: 20 20 20 69 6e 74 20 6c 65 6e 3b 0a 20 20 20 20     int len;.    
6070: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e      for(i=0; i<n
6080: 43 68 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  Char; i++){.    
6090: 20 20 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e        len = aLen
60a0: 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69  [i];.          i
60b0: 66 28 20 6d 65 6d 63 6d 70 28 7a 49 6e 2c 20 61  f( memcmp(zIn, a
60c0: 7a 43 68 61 72 5b 69 5d 2c 20 6c 65 6e 29 3d 3d  zChar[i], len)==
60d0: 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20  0 ) break;.     
60e0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28     }.        if(
60f0: 20 69 3e 3d 6e 43 68 61 72 20 29 20 62 72 65 61   i>=nChar ) brea
6100: 6b 3b 0a 20 20 20 20 20 20 20 20 7a 49 6e 20 2b  k;.        zIn +
6110: 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 20 20 6e  = len;.        n
6120: 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20 20  In -= len;.     
6130: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28   }.    }.    if(
6140: 20 66 6c 61 67 73 20 26 20 32 20 29 7b 0a 20 20   flags & 2 ){.  
6150: 20 20 20 20 77 68 69 6c 65 28 20 6e 49 6e 3e 30      while( nIn>0
6160: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20   ){.        int 
6170: 6c 65 6e 3b 0a 20 20 20 20 20 20 20 20 66 6f 72  len;.        for
6180: 28 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20 69  (i=0; i<nChar; i
6190: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6c  ++){.          l
61a0: 65 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20  en = aLen[i];.  
61b0: 20 20 20 20 20 20 20 20 69 66 28 20 6c 65 6e 3c          if( len<
61c0: 3d 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28 26  =nIn && memcmp(&
61d0: 7a 49 6e 5b 6e 49 6e 2d 6c 65 6e 5d 2c 61 7a 43  zIn[nIn-len],azC
61e0: 68 61 72 5b 69 5d 2c 6c 65 6e 29 3d 3d 30 20 29  har[i],len)==0 )
61f0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20   break;.        
6200: 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 69 3e  }.        if( i>
6210: 3d 6e 43 68 61 72 20 29 20 62 72 65 61 6b 3b 0a  =nChar ) break;.
6220: 20 20 20 20 20 20 20 20 6e 49 6e 20 2d 3d 20 6c          nIn -= l
6230: 65 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  en;.      }.    
6240: 7d 0a 20 20 20 20 69 66 28 20 7a 43 68 61 72 53  }.    if( zCharS
6250: 65 74 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  et ){.      sqli
6260: 74 65 33 5f 66 72 65 65 28 61 7a 43 68 61 72 29  te3_free(azChar)
6270: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71  ;.    }.  }.  sq
6280: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
6290: 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72  t(context, (char
62a0: 2a 29 7a 49 6e 2c 20 6e 49 6e 2c 20 53 51 4c 49  *)zIn, nIn, SQLI
62b0: 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 7d  TE_TRANSIENT);.}
62c0: 0a 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  ..#ifdef SQLITE_
62d0: 53 4f 55 4e 44 45 58 0a 2f 2a 0a 2a 2a 20 43 6f  SOUNDEX./*.** Co
62e0: 6d 70 75 74 65 20 74 68 65 20 73 6f 75 6e 64 65  mpute the sounde
62f0: 78 20 65 6e 63 6f 64 69 6e 67 20 6f 66 20 61 20  x encoding of a 
6300: 77 6f 72 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  word..*/.static 
6310: 76 6f 69 64 20 73 6f 75 6e 64 65 78 46 75 6e 63  void soundexFunc
6320: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
6330: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
6340: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
6350: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
6360: 0a 29 7b 0a 20 20 63 68 61 72 20 7a 52 65 73 75  .){.  char zResu
6370: 6c 74 5b 38 5d 3b 0a 20 20 63 6f 6e 73 74 20 75  lt[8];.  const u
6380: 38 20 2a 7a 49 6e 3b 0a 20 20 69 6e 74 20 69 2c  8 *zIn;.  int i,
6390: 20 6a 3b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e   j;.  static con
63a0: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
63b0: 20 69 43 6f 64 65 5b 5d 20 3d 20 7b 0a 20 20 20   iCode[] = {.   
63c0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
63d0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
63e0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
63f0: 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c  .    0, 0, 0, 0,
6400: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
6410: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
6420: 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30  , 0,.    0, 0, 0
6430: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
6440: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
6450: 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20  0, 0, 0,.    0, 
6460: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
6470: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
6480: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20   0, 0, 0, 0,.   
6490: 20 30 2c 20 30 2c 20 31 2c 20 32 2c 20 33 2c 20   0, 0, 1, 2, 3, 
64a0: 30 2c 20 31 2c 20 32 2c 20 30 2c 20 30 2c 20 32  0, 1, 2, 0, 0, 2
64b0: 2c 20 32 2c 20 34 2c 20 35 2c 20 35 2c 20 30 2c  , 2, 4, 5, 5, 0,
64c0: 0a 20 20 20 20 31 2c 20 32 2c 20 36 2c 20 32 2c  .    1, 2, 6, 2,
64d0: 20 33 2c 20 30 2c 20 31 2c 20 30 2c 20 32 2c 20   3, 0, 1, 0, 2, 
64e0: 30 2c 20 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 2, 0, 0, 0, 0
64f0: 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 31  , 0,.    0, 0, 1
6500: 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 32 2c  , 2, 3, 0, 1, 2,
6510: 20 30 2c 20 30 2c 20 32 2c 20 32 2c 20 34 2c 20   0, 0, 2, 2, 4, 
6520: 35 2c 20 35 2c 20 30 2c 0a 20 20 20 20 31 2c 20  5, 5, 0,.    1, 
6530: 32 2c 20 36 2c 20 32 2c 20 33 2c 20 30 2c 20 31  2, 6, 2, 3, 0, 1
6540: 2c 20 30 2c 20 32 2c 20 30 2c 20 32 2c 20 30 2c  , 0, 2, 0, 2, 0,
6550: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 7d   0, 0, 0, 0,.  }
6560: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
6570: 3d 3d 31 20 29 3b 0a 20 20 7a 49 6e 20 3d 20 28  ==1 );.  zIn = (
6580: 75 38 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  u8*)sqlite3_valu
6590: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
65a0: 0a 20 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20  .  if( zIn==0 ) 
65b0: 7a 49 6e 20 3d 20 28 75 38 2a 29 22 22 3b 0a 20  zIn = (u8*)"";. 
65c0: 20 66 6f 72 28 69 3d 30 3b 20 7a 49 6e 5b 69 5d   for(i=0; zIn[i]
65d0: 20 26 26 20 21 69 73 61 6c 70 68 61 28 7a 49 6e   && !isalpha(zIn
65e0: 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d 0a 20 20 69  [i]); i++){}.  i
65f0: 66 28 20 7a 49 6e 5b 69 5d 20 29 7b 0a 20 20 20  f( zIn[i] ){.   
6600: 20 75 38 20 70 72 65 76 63 6f 64 65 20 3d 20 69   u8 prevcode = i
6610: 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30 78 37 66  Code[zIn[i]&0x7f
6620: 5d 3b 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b 30  ];.    zResult[0
6630: 5d 20 3d 20 74 6f 75 70 70 65 72 28 7a 49 6e 5b  ] = toupper(zIn[
6640: 69 5d 29 3b 0a 20 20 20 20 66 6f 72 28 6a 3d 31  i]);.    for(j=1
6650: 3b 20 6a 3c 34 20 26 26 20 7a 49 6e 5b 69 5d 3b  ; j<4 && zIn[i];
6660: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74   i++){.      int
6670: 20 63 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49   code = iCode[zI
6680: 6e 5b 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20  n[i]&0x7f];.    
6690: 20 20 69 66 28 20 63 6f 64 65 3e 30 20 29 7b 0a    if( code>0 ){.
66a0: 20 20 20 20 20 20 20 20 69 66 28 20 63 6f 64 65          if( code
66b0: 21 3d 70 72 65 76 63 6f 64 65 20 29 7b 0a 20 20  !=prevcode ){.  
66c0: 20 20 20 20 20 20 20 20 70 72 65 76 63 6f 64 65          prevcode
66d0: 20 3d 20 63 6f 64 65 3b 0a 20 20 20 20 20 20 20   = code;.       
66e0: 20 20 20 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20     zResult[j++] 
66f0: 3d 20 63 6f 64 65 20 2b 20 27 30 27 3b 0a 20 20  = code + '0';.  
6700: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 65        }.      }e
6710: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 70 72 65  lse{.        pre
6720: 76 63 6f 64 65 20 3d 20 30 3b 0a 20 20 20 20 20  vcode = 0;.     
6730: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 77 68 69   }.    }.    whi
6740: 6c 65 28 20 6a 3c 34 20 29 7b 0a 20 20 20 20 20  le( j<4 ){.     
6750: 20 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20   zResult[j++] = 
6760: 27 30 27 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a  '0';.    }.    z
6770: 52 65 73 75 6c 74 5b 6a 5d 20 3d 20 30 3b 0a 20  Result[j] = 0;. 
6780: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
6790: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
67a0: 7a 52 65 73 75 6c 74 2c 20 34 2c 20 53 51 4c 49  zResult, 4, SQLI
67b0: 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20  TE_TRANSIENT);. 
67c0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69   }else{.    sqli
67d0: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
67e0: 63 6f 6e 74 65 78 74 2c 20 22 3f 30 30 30 22 2c  context, "?000",
67f0: 20 34 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49   4, SQLITE_STATI
6800: 43 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66  C);.  }.}.#endif
6810: 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  ..#ifndef SQLITE
6820: 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54 45 4e  _OMIT_LOAD_EXTEN
6830: 53 49 4f 4e 0a 2f 2a 0a 2a 2a 20 41 20 66 75 6e  SION./*.** A fun
6840: 63 74 69 6f 6e 20 74 68 61 74 20 6c 6f 61 64 73  ction that loads
6850: 20 61 20 73 68 61 72 65 64 2d 6c 69 62 72 61 72   a shared-librar
6860: 79 20 65 78 74 65 6e 73 69 6f 6e 20 74 68 65 6e  y extension then
6870: 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 2e 0a 2a   returns NULL..*
6880: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 6f  /.static void lo
6890: 61 64 45 78 74 28 73 71 6c 69 74 65 33 5f 63 6f  adExt(sqlite3_co
68a0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
68b0: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
68c0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
68d0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
68e0: 46 69 6c 65 20 3d 20 28 63 6f 6e 73 74 20 63 68  File = (const ch
68f0: 61 72 20 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  ar *)sqlite3_val
6900: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
6910: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
6920: 7a 50 72 6f 63 3b 0a 20 20 73 71 6c 69 74 65 33  zProc;.  sqlite3
6930: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 75   *db = sqlite3_u
6940: 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74  ser_data(context
6950: 29 3b 0a 20 20 63 68 61 72 20 2a 7a 45 72 72 4d  );.  char *zErrM
6960: 73 67 20 3d 20 30 3b 0a 0a 20 20 69 66 28 20 61  sg = 0;..  if( a
6970: 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 7a 50  rgc==2 ){.    zP
6980: 72 6f 63 20 3d 20 28 63 6f 6e 73 74 20 63 68 61  roc = (const cha
6990: 72 20 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  r *)sqlite3_valu
69a0: 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 3b  e_text(argv[1]);
69b0: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 50  .  }else{.    zP
69c0: 72 6f 63 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69  roc = 0;.  }.  i
69d0: 66 28 20 7a 46 69 6c 65 20 26 26 20 73 71 6c 69  f( zFile && sqli
69e0: 74 65 33 5f 6c 6f 61 64 5f 65 78 74 65 6e 73 69  te3_load_extensi
69f0: 6f 6e 28 64 62 2c 20 7a 46 69 6c 65 2c 20 7a 50  on(db, zFile, zP
6a00: 72 6f 63 2c 20 26 7a 45 72 72 4d 73 67 29 20 29  roc, &zErrMsg) )
6a10: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  {.    sqlite3_re
6a20: 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65  sult_error(conte
6a30: 78 74 2c 20 7a 45 72 72 4d 73 67 2c 20 2d 31 29  xt, zErrMsg, -1)
6a40: 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72  ;.    sqlite3_fr
6a50: 65 65 28 7a 45 72 72 4d 73 67 29 3b 0a 20 20 7d  ee(zErrMsg);.  }
6a60: 0a 7d 0a 23 65 6e 64 69 66 0a 0a 23 69 66 64 65  .}.#endif..#ifde
6a70: 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 2f 2a  f SQLITE_TEST./*
6a80: 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f  .** This functio
6a90: 6e 20 67 65 6e 65 72 61 74 65 73 20 61 20 73 74  n generates a st
6aa0: 72 69 6e 67 20 6f 66 20 72 61 6e 64 6f 6d 20 63  ring of random c
6ab0: 68 61 72 61 63 74 65 72 73 2e 20 20 55 73 65 64  haracters.  Used
6ac0: 20 66 6f 72 0a 2a 2a 20 67 65 6e 65 72 61 74 69   for.** generati
6ad0: 6e 67 20 74 65 73 74 20 64 61 74 61 2e 0a 2a 2f  ng test data..*/
6ae0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e  .static void ran
6af0: 64 53 74 72 28 73 71 6c 69 74 65 33 5f 63 6f 6e  dStr(sqlite3_con
6b00: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
6b10: 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33  nt argc, sqlite3
6b20: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a  _value **argv){.
6b30: 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75    static const u
6b40: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 7a 53 72  nsigned char zSr
6b50: 63 5b 5d 20 3d 20 0a 20 20 20 20 20 22 61 62 63  c[] = .     "abc
6b60: 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73  defghijklmnopqrs
6b70: 74 75 76 77 78 79 7a 22 0a 20 20 20 20 20 22 41  tuvwxyz".     "A
6b80: 42 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51  BCDEFGHIJKLMNOPQ
6b90: 52 53 54 55 56 57 58 59 5a 22 0a 20 20 20 20 20  RSTUVWXYZ".     
6ba0: 22 30 31 32 33 34 35 36 37 38 39 22 0a 20 20 20  "0123456789".   
6bb0: 20 20 22 2e 2d 21 2c 3a 2a 5e 2b 3d 5f 7c 3f 2f    ".-!,:*^+=_|?/
6bc0: 3c 3e 20 22 3b 0a 20 20 69 6e 74 20 69 4d 69 6e  <> ";.  int iMin
6bd0: 2c 20 69 4d 61 78 2c 20 6e 2c 20 72 2c 20 69 3b  , iMax, n, r, i;
6be0: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
6bf0: 20 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20 20 69   zBuf[1000];.  i
6c00: 66 28 20 61 72 67 63 3e 3d 31 20 29 7b 0a 20 20  f( argc>=1 ){.  
6c10: 20 20 69 4d 69 6e 20 3d 20 73 71 6c 69 74 65 33    iMin = sqlite3
6c20: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
6c30: 30 5d 29 3b 0a 20 20 20 20 69 66 28 20 69 4d 69  0]);.    if( iMi
6c40: 6e 3c 30 20 29 20 69 4d 69 6e 20 3d 20 30 3b 0a  n<0 ) iMin = 0;.
6c50: 20 20 20 20 69 66 28 20 69 4d 69 6e 3e 3d 73 69      if( iMin>=si
6c60: 7a 65 6f 66 28 7a 42 75 66 29 20 29 20 69 4d 69  zeof(zBuf) ) iMi
6c70: 6e 20 3d 20 73 69 7a 65 6f 66 28 7a 42 75 66 29  n = sizeof(zBuf)
6c80: 2d 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  -1;.  }else{.   
6c90: 20 69 4d 69 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20   iMin = 1;.  }. 
6ca0: 20 69 66 28 20 61 72 67 63 3e 3d 32 20 29 7b 0a   if( argc>=2 ){.
6cb0: 20 20 20 20 69 4d 61 78 20 3d 20 73 71 6c 69 74      iMax = sqlit
6cc0: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67  e3_value_int(arg
6cd0: 76 5b 31 5d 29 3b 0a 20 20 20 20 69 66 28 20 69  v[1]);.    if( i
6ce0: 4d 61 78 3c 69 4d 69 6e 20 29 20 69 4d 61 78 20  Max<iMin ) iMax 
6cf0: 3d 20 69 4d 69 6e 3b 0a 20 20 20 20 69 66 28 20  = iMin;.    if( 
6d00: 69 4d 61 78 3e 3d 73 69 7a 65 6f 66 28 7a 42 75  iMax>=sizeof(zBu
6d10: 66 29 20 29 20 69 4d 61 78 20 3d 20 73 69 7a 65  f) ) iMax = size
6d20: 6f 66 28 7a 42 75 66 29 2d 31 3b 0a 20 20 7d 65  of(zBuf)-1;.  }e
6d30: 6c 73 65 7b 0a 20 20 20 20 69 4d 61 78 20 3d 20  lse{.    iMax = 
6d40: 35 30 3b 0a 20 20 7d 0a 20 20 6e 20 3d 20 69 4d  50;.  }.  n = iM
6d50: 69 6e 3b 0a 20 20 69 66 28 20 69 4d 61 78 3e 69  in;.  if( iMax>i
6d60: 4d 69 6e 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  Min ){.    sqlit
6d70: 65 33 52 61 6e 64 6f 6d 6e 65 73 73 28 73 69 7a  e3Randomness(siz
6d80: 65 6f 66 28 72 29 2c 20 26 72 29 3b 0a 20 20 20  eof(r), &r);.   
6d90: 20 72 20 26 3d 20 30 78 37 66 66 66 66 66 66 66   r &= 0x7fffffff
6da0: 3b 0a 20 20 20 20 6e 20 2b 3d 20 72 25 28 69 4d  ;.    n += r%(iM
6db0: 61 78 20 2b 20 31 20 2d 20 69 4d 69 6e 29 3b 0a  ax + 1 - iMin);.
6dc0: 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 6e 3c    }.  assert( n<
6dd0: 73 69 7a 65 6f 66 28 7a 42 75 66 29 20 29 3b 0a  sizeof(zBuf) );.
6de0: 20 20 73 71 6c 69 74 65 33 52 61 6e 64 6f 6d 6e    sqlite3Randomn
6df0: 65 73 73 28 6e 2c 20 7a 42 75 66 29 3b 0a 20 20  ess(n, zBuf);.  
6e00: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b  for(i=0; i<n; i+
6e10: 2b 29 7b 0a 20 20 20 20 7a 42 75 66 5b 69 5d 20  +){.    zBuf[i] 
6e20: 3d 20 7a 53 72 63 5b 7a 42 75 66 5b 69 5d 25 28  = zSrc[zBuf[i]%(
6e30: 73 69 7a 65 6f 66 28 7a 53 72 63 29 2d 31 29 5d  sizeof(zSrc)-1)]
6e40: 3b 0a 20 20 7d 0a 20 20 7a 42 75 66 5b 6e 5d 20  ;.  }.  zBuf[n] 
6e50: 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72  = 0;.  sqlite3_r
6e60: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
6e70: 78 74 2c 20 28 63 68 61 72 2a 29 7a 42 75 66 2c  xt, (char*)zBuf,
6e80: 20 6e 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53   n, SQLITE_TRANS
6e90: 49 45 4e 54 29 3b 0a 7d 0a 23 65 6e 64 69 66 20  IENT);.}.#endif 
6ea0: 2f 2a 20 53 51 4c 49 54 45 5f 54 45 53 54 20 2a  /* SQLITE_TEST *
6eb0: 2f 0a 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  /..#ifdef SQLITE
6ec0: 5f 54 45 53 54 0a 2f 2a 0a 2a 2a 20 54 68 65 20  _TEST./*.** The 
6ed0: 66 6f 6c 6c 6f 77 69 6e 67 20 74 77 6f 20 53 51  following two SQ
6ee0: 4c 20 66 75 6e 63 74 69 6f 6e 73 20 61 72 65 20  L functions are 
6ef0: 75 73 65 64 20 74 6f 20 74 65 73 74 20 72 65 74  used to test ret
6f00: 75 72 6e 69 6e 67 20 61 20 74 65 78 74 0a 2a 2a  urning a text.**
6f10: 20 72 65 73 75 6c 74 20 77 69 74 68 20 61 20 64   result with a d
6f20: 65 73 74 72 75 63 74 6f 72 2e 20 46 75 6e 63 74  estructor. Funct
6f30: 69 6f 6e 20 27 74 65 73 74 5f 64 65 73 74 72 75  ion 'test_destru
6f40: 63 74 6f 72 27 20 74 61 6b 65 73 20 6f 6e 65 20  ctor' takes one 
6f50: 61 72 67 75 6d 65 6e 74 0a 2a 2a 20 61 6e 64 20  argument.** and 
6f60: 72 65 74 75 72 6e 73 20 74 68 65 20 73 61 6d 65  returns the same
6f70: 20 61 72 67 75 6d 65 6e 74 20 69 6e 74 65 72 70   argument interp
6f80: 72 65 74 65 64 20 61 73 20 54 45 58 54 2e 20 41  reted as TEXT. A
6f90: 20 64 65 73 74 72 75 63 74 6f 72 20 69 73 0a 2a   destructor is.*
6fa0: 2a 20 70 61 73 73 65 64 20 77 69 74 68 20 74 68  * passed with th
6fb0: 65 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74  e sqlite3_result
6fc0: 5f 74 65 78 74 28 29 20 63 61 6c 6c 2e 0a 2a 2a  _text() call..**
6fd0: 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  .** SQL function
6fe0: 20 27 74 65 73 74 5f 64 65 73 74 72 75 63 74 6f   'test_destructo
6ff0: 72 5f 63 6f 75 6e 74 27 20 72 65 74 75 72 6e 73  r_count' returns
7000: 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 6f   the number of o
7010: 75 74 73 74 61 6e 64 69 6e 67 20 0a 2a 2a 20 61  utstanding .** a
7020: 6c 6c 6f 63 61 74 69 6f 6e 73 20 6d 61 64 65 20  llocations made 
7030: 62 79 20 27 74 65 73 74 5f 64 65 73 74 72 75 63  by 'test_destruc
7040: 74 6f 72 27 3b 0a 2a 2a 0a 2a 2a 20 57 41 52 4e  tor';.**.** WARN
7050: 49 4e 47 3a 20 4e 6f 74 20 74 68 72 65 61 64 73  ING: Not threads
7060: 61 66 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69  afe..*/.static i
7070: 6e 74 20 74 65 73 74 5f 64 65 73 74 72 75 63 74  nt test_destruct
7080: 6f 72 5f 63 6f 75 6e 74 5f 76 61 72 20 3d 20 30  or_count_var = 0
7090: 3b 0a 73 74 61 74 69 63 20 76 6f 69 64 20 64 65  ;.static void de
70a0: 73 74 72 75 63 74 6f 72 28 76 6f 69 64 20 2a 70  structor(void *p
70b0: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 56 61 6c 20  ){.  char *zVal 
70c0: 3d 20 28 63 68 61 72 20 2a 29 70 3b 0a 20 20 61  = (char *)p;.  a
70d0: 73 73 65 72 74 28 7a 56 61 6c 29 3b 0a 20 20 7a  ssert(zVal);.  z
70e0: 56 61 6c 2d 2d 3b 0a 20 20 73 71 6c 69 74 65 46  Val--;.  sqliteF
70f0: 72 65 65 28 7a 56 61 6c 29 3b 0a 20 20 74 65 73  ree(zVal);.  tes
7100: 74 5f 64 65 73 74 72 75 63 74 6f 72 5f 63 6f 75  t_destructor_cou
7110: 6e 74 5f 76 61 72 2d 2d 3b 0a 7d 0a 73 74 61 74  nt_var--;.}.stat
7120: 69 63 20 76 6f 69 64 20 74 65 73 74 5f 64 65 73  ic void test_des
7130: 74 72 75 63 74 6f 72 28 0a 20 20 73 71 6c 69 74  tructor(.  sqlit
7140: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70 43 74 78  e3_context *pCtx
7150: 2c 20 0a 20 20 69 6e 74 20 6e 41 72 67 2c 0a 20  , .  int nArg,. 
7160: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
7170: 2a 61 72 67 76 0a 29 7b 0a 20 20 63 68 61 72 20  *argv.){.  char 
7180: 2a 7a 56 61 6c 3b 0a 20 20 69 6e 74 20 6c 65 6e  *zVal;.  int len
7190: 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  ;.  sqlite3 *db 
71a0: 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64  = sqlite3_user_d
71b0: 61 74 61 28 70 43 74 78 29 3b 0a 20 0a 20 20 74  ata(pCtx);. .  t
71c0: 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72 5f 63  est_destructor_c
71d0: 6f 75 6e 74 5f 76 61 72 2b 2b 3b 0a 20 20 61 73  ount_var++;.  as
71e0: 73 65 72 74 28 20 6e 41 72 67 3d 3d 31 20 29 3b  sert( nArg==1 );
71f0: 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76  .  if( sqlite3_v
7200: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
7210: 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20  ])==SQLITE_NULL 
7220: 29 20 72 65 74 75 72 6e 3b 0a 20 20 6c 65 6e 20  ) return;.  len 
7230: 3d 20 73 71 6c 69 74 65 33 56 61 6c 75 65 42 79  = sqlite3ValueBy
7240: 74 65 73 28 61 72 67 76 5b 30 5d 2c 20 45 4e 43  tes(argv[0], ENC
7250: 28 64 62 29 29 3b 20 0a 20 20 7a 56 61 6c 20 3d  (db)); .  zVal =
7260: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 6c 65   sqliteMalloc(le
7270: 6e 2b 33 29 3b 0a 20 20 7a 56 61 6c 5b 6c 65 6e  n+3);.  zVal[len
7280: 5d 20 3d 20 30 3b 0a 20 20 7a 56 61 6c 5b 6c 65  ] = 0;.  zVal[le
7290: 6e 2d 31 5d 20 3d 20 30 3b 0a 20 20 61 73 73 65  n-1] = 0;.  asse
72a0: 72 74 28 20 7a 56 61 6c 20 29 3b 0a 20 20 7a 56  rt( zVal );.  zV
72b0: 61 6c 2b 2b 3b 0a 20 20 6d 65 6d 63 70 79 28 7a  al++;.  memcpy(z
72c0: 56 61 6c 2c 20 73 71 6c 69 74 65 33 56 61 6c 75  Val, sqlite3Valu
72d0: 65 54 65 78 74 28 61 72 67 76 5b 30 5d 2c 20 45  eText(argv[0], E
72e0: 4e 43 28 64 62 29 29 2c 20 6c 65 6e 29 3b 0a 20  NC(db)), len);. 
72f0: 20 69 66 28 20 45 4e 43 28 64 62 29 3d 3d 53 51   if( ENC(db)==SQ
7300: 4c 49 54 45 5f 55 54 46 38 20 29 7b 0a 20 20 20  LITE_UTF8 ){.   
7310: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
7320: 74 65 78 74 28 70 43 74 78 2c 20 7a 56 61 6c 2c  text(pCtx, zVal,
7330: 20 2d 31 2c 20 64 65 73 74 72 75 63 74 6f 72 29   -1, destructor)
7340: 3b 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  ;.#ifndef SQLITE
7350: 5f 4f 4d 49 54 5f 55 54 46 31 36 0a 20 20 7d 65  _OMIT_UTF16.  }e
7360: 6c 73 65 20 69 66 28 20 45 4e 43 28 64 62 29 3d  lse if( ENC(db)=
7370: 3d 53 51 4c 49 54 45 5f 55 54 46 31 36 4c 45 20  =SQLITE_UTF16LE 
7380: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
7390: 65 73 75 6c 74 5f 74 65 78 74 31 36 6c 65 28 70  esult_text16le(p
73a0: 43 74 78 2c 20 7a 56 61 6c 2c 20 2d 31 2c 20 64  Ctx, zVal, -1, d
73b0: 65 73 74 72 75 63 74 6f 72 29 3b 0a 20 20 7d 65  estructor);.  }e
73c0: 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  lse{.    sqlite3
73d0: 5f 72 65 73 75 6c 74 5f 74 65 78 74 31 36 62 65  _result_text16be
73e0: 28 70 43 74 78 2c 20 7a 56 61 6c 2c 20 2d 31 2c  (pCtx, zVal, -1,
73f0: 20 64 65 73 74 72 75 63 74 6f 72 29 3b 0a 23 65   destructor);.#e
7400: 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f  ndif /* SQLITE_O
7410: 4d 49 54 5f 55 54 46 31 36 20 2a 2f 0a 20 20 7d  MIT_UTF16 */.  }
7420: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74  .}.static void t
7430: 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72 5f 63  est_destructor_c
7440: 6f 75 6e 74 28 0a 20 20 73 71 6c 69 74 65 33 5f  ount(.  sqlite3_
7450: 63 6f 6e 74 65 78 74 20 2a 70 43 74 78 2c 20 0a  context *pCtx, .
7460: 20 20 69 6e 74 20 6e 41 72 67 2c 0a 20 20 73 71    int nArg,.  sq
7470: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
7480: 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f  gv.){.  sqlite3_
7490: 72 65 73 75 6c 74 5f 69 6e 74 28 70 43 74 78 2c  result_int(pCtx,
74a0: 20 74 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72   test_destructor
74b0: 5f 63 6f 75 6e 74 5f 76 61 72 29 3b 0a 7d 0a 23  _count_var);.}.#
74c0: 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f  endif /* SQLITE_
74d0: 54 45 53 54 20 2a 2f 0a 0a 23 69 66 64 65 66 20  TEST */..#ifdef 
74e0: 53 51 4c 49 54 45 5f 54 45 53 54 0a 2f 2a 0a 2a  SQLITE_TEST./*.*
74f0: 2a 20 52 6f 75 74 69 6e 65 73 20 66 6f 72 20 74  * Routines for t
7500: 65 73 74 69 6e 67 20 74 68 65 20 73 71 6c 69 74  esting the sqlit
7510: 65 33 5f 67 65 74 5f 61 75 78 64 61 74 61 28 29  e3_get_auxdata()
7520: 20 61 6e 64 20 73 71 6c 69 74 65 33 5f 73 65 74   and sqlite3_set
7530: 5f 61 75 78 64 61 74 61 28 29 0a 2a 2a 20 69 6e  _auxdata().** in
7540: 74 65 72 66 61 63 65 2e 0a 2a 2a 0a 2a 2a 20 54  terface..**.** T
7550: 68 65 20 74 65 73 74 5f 61 75 78 64 61 74 61 28  he test_auxdata(
7560: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 61  ) SQL function a
7570: 74 74 65 6d 70 74 73 20 74 6f 20 72 65 67 69 73  ttempts to regis
7580: 74 65 72 20 65 61 63 68 20 6f 66 20 69 74 73 20  ter each of its 
7590: 61 72 67 75 6d 65 6e 74 73 0a 2a 2a 20 61 73 20  arguments.** as 
75a0: 61 75 78 69 6c 69 61 72 79 20 64 61 74 61 2e 20  auxiliary data. 
75b0: 20 49 66 20 74 68 65 72 65 20 61 72 65 20 6e 6f   If there are no
75c0: 20 70 72 69 6f 72 20 72 65 67 69 73 74 72 61 74   prior registrat
75d0: 69 6f 6e 73 20 6f 66 20 61 75 78 20 64 61 74 61  ions of aux data
75e0: 20 66 6f 72 0a 2a 2a 20 74 68 61 74 20 61 72 67   for.** that arg
75f0: 75 6d 65 6e 74 20 28 6d 65 61 6e 69 6e 67 20 74  ument (meaning t
7600: 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e  he argument is n
7610: 6f 74 20 61 20 63 6f 6e 73 74 61 6e 74 20 6f 72  ot a constant or
7620: 20 74 68 69 73 20 69 73 20 69 74 73 20 66 69 72   this is its fir
7630: 73 74 0a 2a 2a 20 63 61 6c 6c 29 20 74 68 65 6e  st.** call) then
7640: 20 74 68 65 20 72 65 73 75 6c 74 20 66 6f 72 20   the result for 
7650: 74 68 61 74 20 61 72 67 75 6d 65 6e 74 20 69 73  that argument is
7660: 20 30 2e 20 20 49 66 20 74 68 65 72 65 20 69 73   0.  If there is
7670: 20 61 20 70 72 69 6f 72 0a 2a 2a 20 72 65 67 69   a prior.** regi
7680: 73 74 72 61 74 69 6f 6e 2c 20 74 68 65 20 72 65  stration, the re
7690: 73 75 6c 74 20 66 6f 72 20 74 68 61 74 20 61 72  sult for that ar
76a0: 67 75 6d 65 6e 74 20 69 73 20 31 2e 20 20 54 68  gument is 1.  Th
76b0: 65 20 6f 76 65 72 61 6c 6c 20 72 65 73 75 6c 74  e overall result
76c0: 0a 2a 2a 20 69 73 20 74 68 65 20 69 6e 64 69 76  .** is the indiv
76d0: 69 64 75 61 6c 20 61 72 67 75 6d 65 6e 74 20 72  idual argument r
76e0: 65 73 75 6c 74 73 20 73 65 70 61 72 61 74 65 64  esults separated
76f0: 20 62 79 20 73 70 61 63 65 73 2e 0a 2a 2f 0a 73   by spaces..*/.s
7700: 74 61 74 69 63 20 76 6f 69 64 20 66 72 65 65 5f  tatic void free_
7710: 74 65 73 74 5f 61 75 78 64 61 74 61 28 76 6f 69  test_auxdata(voi
7720: 64 20 2a 70 29 20 7b 73 71 6c 69 74 65 46 72 65  d *p) {sqliteFre
7730: 65 28 70 29 3b 7d 0a 73 74 61 74 69 63 20 76 6f  e(p);}.static vo
7740: 69 64 20 74 65 73 74 5f 61 75 78 64 61 74 61 28  id test_auxdata(
7750: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
7760: 78 74 20 2a 70 43 74 78 2c 20 0a 20 20 69 6e 74  xt *pCtx, .  int
7770: 20 6e 41 72 67 2c 0a 20 20 73 71 6c 69 74 65 33   nArg,.  sqlite3
7780: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
7790: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 63 68 61 72  .  int i;.  char
77a0: 20 2a 7a 52 65 74 20 3d 20 73 71 6c 69 74 65 4d   *zRet = sqliteM
77b0: 61 6c 6c 6f 63 28 6e 41 72 67 2a 32 29 3b 0a 20  alloc(nArg*2);. 
77c0: 20 69 66 28 20 21 7a 52 65 74 20 29 20 72 65 74   if( !zRet ) ret
77d0: 75 72 6e 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20  urn;.  for(i=0; 
77e0: 69 3c 6e 41 72 67 3b 20 69 2b 2b 29 7b 0a 20 20  i<nArg; i++){.  
77f0: 20 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 7a 20    char const *z 
7800: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
7810: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
7820: 5b 69 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 20  [i]);.    if( z 
7830: 29 7b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a  ){.      char *z
7840: 41 75 78 20 3d 20 73 71 6c 69 74 65 33 5f 67 65  Aux = sqlite3_ge
7850: 74 5f 61 75 78 64 61 74 61 28 70 43 74 78 2c 20  t_auxdata(pCtx, 
7860: 69 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 41  i);.      if( zA
7870: 75 78 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 52  ux ){.        zR
7880: 65 74 5b 69 2a 32 5d 20 3d 20 27 31 27 3b 0a 20  et[i*2] = '1';. 
7890: 20 20 20 20 20 20 20 69 66 28 20 73 74 72 63 6d         if( strcm
78a0: 70 28 7a 41 75 78 2c 20 7a 29 20 29 7b 0a 20 20  p(zAux, z) ){.  
78b0: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
78c0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 70 43 74  result_error(pCt
78d0: 78 2c 20 22 41 75 78 69 6c 61 72 79 20 64 61 74  x, "Auxilary dat
78e0: 61 20 63 6f 72 72 75 70 74 69 6f 6e 22 2c 20 2d  a corruption", -
78f0: 31 29 3b 0a 20 20 20 20 20 20 20 20 20 20 72 65  1);.          re
7900: 74 75 72 6e 3b 0a 20 20 20 20 20 20 20 20 7d 0a  turn;.        }.
7910: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20        }else{.   
7920: 20 20 20 20 20 7a 52 65 74 5b 69 2a 32 5d 20 3d       zRet[i*2] =
7930: 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7a 41   '0';.        zA
7940: 75 78 20 3d 20 73 71 6c 69 74 65 53 74 72 44 75  ux = sqliteStrDu
7950: 70 28 7a 29 3b 0a 20 20 20 20 20 20 20 20 73 71  p(z);.        sq
7960: 6c 69 74 65 33 5f 73 65 74 5f 61 75 78 64 61 74  lite3_set_auxdat
7970: 61 28 70 43 74 78 2c 20 69 2c 20 7a 41 75 78 2c  a(pCtx, i, zAux,
7980: 20 66 72 65 65 5f 74 65 73 74 5f 61 75 78 64 61   free_test_auxda
7990: 74 61 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  ta);.      }.   
79a0: 20 20 20 7a 52 65 74 5b 69 2a 32 2b 31 5d 20 3d     zRet[i*2+1] =
79b0: 20 27 20 27 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a   ' ';.    }.  }.
79c0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
79d0: 5f 74 65 78 74 28 70 43 74 78 2c 20 7a 52 65 74  _text(pCtx, zRet
79e0: 2c 20 32 2a 6e 41 72 67 2d 31 2c 20 66 72 65 65  , 2*nArg-1, free
79f0: 5f 74 65 73 74 5f 61 75 78 64 61 74 61 29 3b 0a  _test_auxdata);.
7a00: 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49  }.#endif /* SQLI
7a10: 54 45 5f 54 45 53 54 20 2a 2f 0a 0a 23 69 66 64  TE_TEST */..#ifd
7a20: 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 2f  ef SQLITE_TEST./
7a30: 2a 0a 2a 2a 20 41 20 66 75 6e 63 74 69 6f 6e 20  *.** A function 
7a40: 74 6f 20 74 65 73 74 20 65 72 72 6f 72 20 72 65  to test error re
7a50: 70 6f 72 74 69 6e 67 20 66 72 6f 6d 20 75 73 65  porting from use
7a60: 72 20 66 75 6e 63 74 69 6f 6e 73 2e 20 54 68 69  r functions. Thi
7a70: 73 20 66 75 6e 63 74 69 6f 6e 0a 2a 2a 20 72 65  s function.** re
7a80: 74 75 72 6e 73 20 61 20 63 6f 70 79 20 6f 66 20  turns a copy of 
7a90: 69 74 27 73 20 66 69 72 73 74 20 61 72 67 75 6d  it's first argum
7aa0: 65 6e 74 20 61 73 20 61 6e 20 65 72 72 6f 72 2e  ent as an error.
7ab0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
7ac0: 74 65 73 74 5f 65 72 72 6f 72 28 0a 20 20 73 71  test_error(.  sq
7ad0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70  lite3_context *p
7ae0: 43 74 78 2c 20 0a 20 20 69 6e 74 20 6e 41 72 67  Ctx, .  int nArg
7af0: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
7b00: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 73 71  e **argv.){.  sq
7b10: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
7b20: 6f 72 28 70 43 74 78 2c 20 28 63 68 61 72 2a 29  or(pCtx, (char*)
7b30: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
7b40: 78 74 28 61 72 67 76 5b 30 5d 29 2c 20 30 29 3b  xt(argv[0]), 0);
7b50: 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c  .}.#endif /* SQL
7b60: 49 54 45 5f 54 45 53 54 20 2a 2f 0a 0a 2f 2a 0a  ITE_TEST */../*.
7b70: 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f  ** An instance o
7b80: 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20  f the following 
7b90: 73 74 72 75 63 74 75 72 65 20 68 6f 6c 64 73 20  structure holds 
7ba0: 74 68 65 20 63 6f 6e 74 65 78 74 20 6f 66 20 61  the context of a
7bb0: 0a 2a 2a 20 73 75 6d 28 29 20 6f 72 20 61 76 67  .** sum() or avg
7bc0: 28 29 20 61 67 67 72 65 67 61 74 65 20 63 6f 6d  () aggregate com
7bd0: 70 75 74 61 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70  putation..*/.typ
7be0: 65 64 65 66 20 73 74 72 75 63 74 20 53 75 6d 43  edef struct SumC
7bf0: 74 78 20 53 75 6d 43 74 78 3b 0a 73 74 72 75 63  tx SumCtx;.struc
7c00: 74 20 53 75 6d 43 74 78 20 7b 0a 20 20 64 6f 75  t SumCtx {.  dou
7c10: 62 6c 65 20 72 53 75 6d 3b 20 20 20 20 20 20 2f  ble rSum;      /
7c20: 2a 20 46 6c 6f 61 74 69 6e 67 20 70 6f 69 6e 74  * Floating point
7c30: 20 73 75 6d 20 2a 2f 0a 20 20 69 36 34 20 69 53   sum */.  i64 iS
7c40: 75 6d 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 49  um;         /* I
7c50: 6e 74 65 67 65 72 20 73 75 6d 20 2a 2f 20 20 20  nteger sum */   
7c60: 0a 20 20 69 36 34 20 63 6e 74 3b 20 20 20 20 20  .  i64 cnt;     
7c70: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
7c80: 66 20 65 6c 65 6d 65 6e 74 73 20 73 75 6d 6d 65  f elements summe
7c90: 64 20 2a 2f 0a 20 20 75 38 20 6f 76 65 72 66 6c  d */.  u8 overfl
7ca0: 6f 77 3b 20 20 20 20 20 20 2f 2a 20 54 72 75 65  ow;      /* True
7cb0: 20 69 66 20 69 6e 74 65 67 65 72 20 6f 76 65 72   if integer over
7cc0: 66 6c 6f 77 20 73 65 65 6e 20 2a 2f 0a 20 20 75  flow seen */.  u
7cd0: 38 20 61 70 70 72 6f 78 3b 20 20 20 20 20 20 20  8 approx;       
7ce0: 20 2f 2a 20 54 72 75 65 20 69 66 20 6e 6f 6e 2d   /* True if non-
7cf0: 69 6e 74 65 67 65 72 20 76 61 6c 75 65 20 77 61  integer value wa
7d00: 73 20 69 6e 70 75 74 20 74 6f 20 74 68 65 20 73  s input to the s
7d10: 75 6d 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  um */.};../*.** 
7d20: 52 6f 75 74 69 6e 65 73 20 75 73 65 64 20 74 6f  Routines used to
7d30: 20 63 6f 6d 70 75 74 65 20 74 68 65 20 73 75 6d   compute the sum
7d40: 2c 20 61 76 65 72 61 67 65 2c 20 61 6e 64 20 74  , average, and t
7d50: 6f 74 61 6c 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20  otal..**.** The 
7d60: 53 55 4d 28 29 20 66 75 6e 63 74 69 6f 6e 20 66  SUM() function f
7d70: 6f 6c 6c 6f 77 73 20 74 68 65 20 28 62 72 6f 6b  ollows the (brok
7d80: 65 6e 29 20 53 51 4c 20 73 74 61 6e 64 61 72 64  en) SQL standard
7d90: 20 77 68 69 63 68 20 6d 65 61 6e 73 0a 2a 2a 20   which means.** 
7da0: 74 68 61 74 20 69 74 20 72 65 74 75 72 6e 73 20  that it returns 
7db0: 4e 55 4c 4c 20 69 66 20 69 74 20 73 75 6d 73 20  NULL if it sums 
7dc0: 6f 76 65 72 20 6e 6f 20 69 6e 70 75 74 73 2e 20  over no inputs. 
7dd0: 20 54 4f 54 41 4c 20 72 65 74 75 72 6e 73 0a 2a   TOTAL returns.*
7de0: 2a 20 30 2e 30 20 69 6e 20 74 68 61 74 20 63 61  * 0.0 in that ca
7df0: 73 65 2e 20 20 49 6e 20 61 64 64 69 74 69 6f 6e  se.  In addition
7e00: 2c 20 54 4f 54 41 4c 20 61 6c 77 61 79 73 20 72  , TOTAL always r
7e10: 65 74 75 72 6e 73 20 61 20 66 6c 6f 61 74 20 77  eturns a float w
7e20: 68 65 72 65 0a 2a 2a 20 53 55 4d 20 6d 69 67 68  here.** SUM migh
7e30: 74 20 72 65 74 75 72 6e 20 61 6e 20 69 6e 74 65  t return an inte
7e40: 67 65 72 20 69 66 20 69 74 20 6e 65 76 65 72 20  ger if it never 
7e50: 65 6e 63 6f 75 6e 74 65 72 73 20 61 20 66 6c 6f  encounters a flo
7e60: 61 74 69 6e 67 20 70 6f 69 6e 74 0a 2a 2a 20 76  ating point.** v
7e70: 61 6c 75 65 2e 20 20 54 4f 54 41 4c 20 6e 65 76  alue.  TOTAL nev
7e80: 65 72 20 66 61 69 6c 73 2c 20 62 75 74 20 53 55  er fails, but SU
7e90: 4d 20 6d 69 67 68 74 20 74 68 72 6f 75 67 68 20  M might through 
7ea0: 61 6e 20 65 78 63 65 70 74 69 6f 6e 20 69 66 0a  an exception if.
7eb0: 2a 2a 20 69 74 20 6f 76 65 72 66 6c 6f 77 73 20  ** it overflows 
7ec0: 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a 73  an integer..*/.s
7ed0: 74 61 74 69 63 20 76 6f 69 64 20 73 75 6d 53 74  tatic void sumSt
7ee0: 65 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  ep(sqlite3_conte
7ef0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
7f00: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
7f10: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
7f20: 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 69 6e 74  SumCtx *p;.  int
7f30: 20 74 79 70 65 3b 0a 20 20 61 73 73 65 72 74 28   type;.  assert(
7f40: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 70 20   argc==1 );.  p 
7f50: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
7f60: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
7f70: 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29  ext, sizeof(*p))
7f80: 3b 0a 20 20 74 79 70 65 20 3d 20 73 71 6c 69 74  ;.  type = sqlit
7f90: 65 33 5f 76 61 6c 75 65 5f 6e 75 6d 65 72 69 63  e3_value_numeric
7fa0: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3b 0a  _type(argv[0]);.
7fb0: 20 20 69 66 28 20 70 20 26 26 20 74 79 70 65 21    if( p && type!
7fc0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a  =SQLITE_NULL ){.
7fd0: 20 20 20 20 70 2d 3e 63 6e 74 2b 2b 3b 0a 20 20      p->cnt++;.  
7fe0: 20 20 69 66 28 20 74 79 70 65 3d 3d 53 51 4c 49    if( type==SQLI
7ff0: 54 45 5f 49 4e 54 45 47 45 52 20 29 7b 0a 20 20  TE_INTEGER ){.  
8000: 20 20 20 20 69 36 34 20 76 20 3d 20 73 71 6c 69      i64 v = sqli
8010: 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28  te3_value_int64(
8020: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20  argv[0]);.      
8030: 70 2d 3e 72 53 75 6d 20 2b 3d 20 76 3b 0a 20 20  p->rSum += v;.  
8040: 20 20 20 20 69 66 28 20 28 70 2d 3e 61 70 70 72      if( (p->appr
8050: 6f 78 7c 70 2d 3e 6f 76 65 72 66 6c 6f 77 29 3d  ox|p->overflow)=
8060: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69 36  =0 ){.        i6
8070: 34 20 69 4e 65 77 53 75 6d 20 3d 20 70 2d 3e 69  4 iNewSum = p->i
8080: 53 75 6d 20 2b 20 76 3b 0a 20 20 20 20 20 20 20  Sum + v;.       
8090: 20 69 6e 74 20 73 31 20 3d 20 70 2d 3e 69 53 75   int s1 = p->iSu
80a0: 6d 20 3e 3e 20 28 73 69 7a 65 6f 66 28 69 36 34  m >> (sizeof(i64
80b0: 29 2a 38 2d 31 29 3b 0a 20 20 20 20 20 20 20 20  )*8-1);.        
80c0: 69 6e 74 20 73 32 20 3d 20 76 20 20 20 20 20 20  int s2 = v      
80d0: 20 3e 3e 20 28 73 69 7a 65 6f 66 28 69 36 34 29   >> (sizeof(i64)
80e0: 2a 38 2d 31 29 3b 0a 20 20 20 20 20 20 20 20 69  *8-1);.        i
80f0: 6e 74 20 73 33 20 3d 20 69 4e 65 77 53 75 6d 20  nt s3 = iNewSum 
8100: 3e 3e 20 28 73 69 7a 65 6f 66 28 69 36 34 29 2a  >> (sizeof(i64)*
8110: 38 2d 31 29 3b 0a 20 20 20 20 20 20 20 20 70 2d  8-1);.        p-
8120: 3e 6f 76 65 72 66 6c 6f 77 20 3d 20 28 73 31 26  >overflow = (s1&
8130: 73 32 26 7e 73 33 29 20 7c 20 28 7e 73 31 26 7e  s2&~s3) | (~s1&~
8140: 73 32 26 73 33 29 3b 0a 20 20 20 20 20 20 20 20  s2&s3);.        
8150: 70 2d 3e 69 53 75 6d 20 3d 20 69 4e 65 77 53 75  p->iSum = iNewSu
8160: 6d 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  m;.      }.    }
8170: 65 6c 73 65 7b 0a 20 20 20 20 20 20 70 2d 3e 72  else{.      p->r
8180: 53 75 6d 20 2b 3d 20 73 71 6c 69 74 65 33 5f 76  Sum += sqlite3_v
8190: 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67 76  alue_double(argv
81a0: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e 61  [0]);.      p->a
81b0: 70 70 72 6f 78 20 3d 20 31 3b 0a 20 20 20 20 7d  pprox = 1;.    }
81c0: 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f  .  }.}.static vo
81d0: 69 64 20 73 75 6d 46 69 6e 61 6c 69 7a 65 28 73  id sumFinalize(s
81e0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
81f0: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d 43  context){.  SumC
8200: 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c  tx *p;.  p = sql
8210: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
8220: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
8230: 30 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20 70  0);.  if( p && p
8240: 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20 20 69  ->cnt>0 ){.    i
8250: 66 28 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20 29  f( p->overflow )
8260: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
8270: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
8280: 74 65 78 74 2c 22 69 6e 74 65 67 65 72 20 6f 76  text,"integer ov
8290: 65 72 66 6c 6f 77 22 2c 2d 31 29 3b 0a 20 20 20  erflow",-1);.   
82a0: 20 7d 65 6c 73 65 20 69 66 28 20 70 2d 3e 61 70   }else if( p->ap
82b0: 70 72 6f 78 20 29 7b 0a 20 20 20 20 20 20 73 71  prox ){.      sq
82c0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75  lite3_result_dou
82d0: 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e  ble(context, p->
82e0: 72 53 75 6d 29 3b 0a 20 20 20 20 7d 65 6c 73 65  rSum);.    }else
82f0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
8300: 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e  result_int64(con
8310: 74 65 78 74 2c 20 70 2d 3e 69 53 75 6d 29 3b 0a  text, p->iSum);.
8320: 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74      }.  }.}.stat
8330: 69 63 20 76 6f 69 64 20 61 76 67 46 69 6e 61 6c  ic void avgFinal
8340: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
8350: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
8360: 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20   SumCtx *p;.  p 
8370: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
8380: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
8390: 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70  ext, 0);.  if( p
83a0: 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a   && p->cnt>0 ){.
83b0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
83c0: 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78  lt_double(contex
83d0: 74 2c 20 70 2d 3e 72 53 75 6d 2f 28 64 6f 75 62  t, p->rSum/(doub
83e0: 6c 65 29 70 2d 3e 63 6e 74 29 3b 0a 20 20 7d 0a  le)p->cnt);.  }.
83f0: 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f  }.static void to
8400: 74 61 6c 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69  talFinalize(sqli
8410: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
8420: 74 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20  text){.  SumCtx 
8430: 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65  *p;.  p = sqlite
8440: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
8450: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b  ext(context, 0);
8460: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
8470: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
8480: 2c 20 70 20 3f 20 70 2d 3e 72 53 75 6d 20 3a 20  , p ? p->rSum : 
8490: 30 2e 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  0.0);.}../*.** T
84a0: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72  he following str
84b0: 75 63 74 75 72 65 20 6b 65 65 70 73 20 74 72 61  ucture keeps tra
84c0: 63 6b 20 6f 66 20 73 74 61 74 65 20 69 6e 66 6f  ck of state info
84d0: 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68 65 0a  rmation for the.
84e0: 2a 2a 20 63 6f 75 6e 74 28 29 20 61 67 67 72 65  ** count() aggre
84f0: 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  gate function..*
8500: 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75 63 74  /.typedef struct
8510: 20 43 6f 75 6e 74 43 74 78 20 43 6f 75 6e 74 43   CountCtx CountC
8520: 74 78 3b 0a 73 74 72 75 63 74 20 43 6f 75 6e 74  tx;.struct Count
8530: 43 74 78 20 7b 0a 20 20 69 36 34 20 6e 3b 0a 7d  Ctx {.  i64 n;.}
8540: 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65  ;../*.** Routine
8550: 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 74  s to implement t
8560: 68 65 20 63 6f 75 6e 74 28 29 20 61 67 67 72 65  he count() aggre
8570: 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  gate function..*
8580: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f  /.static void co
8590: 75 6e 74 53 74 65 70 28 73 71 6c 69 74 65 33 5f  untStep(sqlite3_
85a0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
85b0: 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69  , int argc, sqli
85c0: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
85d0: 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a 70  ){.  CountCtx *p
85e0: 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  p = sqlite3_
85f0: 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78  aggregate_contex
8600: 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f  t(context, sizeo
8610: 66 28 2a 70 29 29 3b 0a 20 20 69 66 28 20 28 61  f(*p));.  if( (a
8620: 72 67 63 3d 3d 30 20 7c 7c 20 53 51 4c 49 54 45  rgc==0 || SQLITE
8630: 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f 76  _NULL!=sqlite3_v
8640: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
8650: 5d 29 29 20 26 26 20 70 20 29 7b 0a 20 20 20 20  ])) && p ){.    
8660: 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a 7d 20 20 20  p->n++;.  }.}   
8670: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 75  .static void cou
8680: 6e 74 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  ntFinalize(sqlit
8690: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
86a0: 65 78 74 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78  ext){.  CountCtx
86b0: 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74   *p;.  p = sqlit
86c0: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
86d0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29  text(context, 0)
86e0: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  ;.  sqlite3_resu
86f0: 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74  lt_int64(context
8700: 2c 20 70 20 3f 20 70 2d 3e 6e 20 3a 20 30 29 3b  , p ? p->n : 0);
8710: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e  .}../*.** Routin
8720: 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20  es to implement 
8730: 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20  min() and max() 
8740: 61 67 67 72 65 67 61 74 65 20 66 75 6e 63 74 69  aggregate functi
8750: 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ons..*/.static v
8760: 6f 69 64 20 6d 69 6e 6d 61 78 53 74 65 70 28 73  oid minmaxStep(s
8770: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
8780: 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67  context, int arg
8790: 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  c, sqlite3_value
87a0: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 4d 65 6d 20   **argv){.  Mem 
87b0: 2a 70 41 72 67 20 20 3d 20 28 4d 65 6d 20 2a 29  *pArg  = (Mem *)
87c0: 61 72 67 76 5b 30 5d 3b 0a 20 20 4d 65 6d 20 2a  argv[0];.  Mem *
87d0: 70 42 65 73 74 3b 0a 0a 20 20 69 66 28 20 73 71  pBest;..  if( sq
87e0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
87f0: 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54  (argv[0])==SQLIT
8800: 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b  E_NULL ) return;
8810: 0a 20 20 70 42 65 73 74 20 3d 20 28 4d 65 6d 20  .  pBest = (Mem 
8820: 2a 29 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  *)sqlite3_aggreg
8830: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
8840: 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 42 65  ext, sizeof(*pBe
8850: 73 74 29 29 3b 0a 20 20 69 66 28 20 21 70 42 65  st));.  if( !pBe
8860: 73 74 20 29 20 72 65 74 75 72 6e 3b 0a 0a 20 20  st ) return;..  
8870: 69 66 28 20 70 42 65 73 74 2d 3e 66 6c 61 67 73  if( pBest->flags
8880: 20 29 7b 0a 20 20 20 20 69 6e 74 20 6d 61 78 3b   ){.    int max;
8890: 0a 20 20 20 20 69 6e 74 20 63 6d 70 3b 0a 20 20  .    int cmp;.  
88a0: 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c    CollSeq *pColl
88b0: 20 3d 20 73 71 6c 69 74 65 33 47 65 74 46 75 6e   = sqlite3GetFun
88c0: 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74 65 78 74  cCollSeq(context
88d0: 29 3b 0a 20 20 20 20 2f 2a 20 54 68 69 73 20 73  );.    /* This s
88e0: 74 65 70 20 66 75 6e 63 74 69 6f 6e 20 69 73 20  tep function is 
88f0: 75 73 65 64 20 66 6f 72 20 62 6f 74 68 20 74 68  used for both th
8900: 65 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28  e min() and max(
8910: 29 20 61 67 67 72 65 67 61 74 65 73 2c 0a 20 20  ) aggregates,.  
8920: 20 20 2a 2a 20 74 68 65 20 6f 6e 6c 79 20 64 69    ** the only di
8930: 66 66 65 72 65 6e 63 65 20 62 65 74 77 65 65 6e  fference between
8940: 20 74 68 65 20 74 77 6f 20 62 65 69 6e 67 20 74   the two being t
8950: 68 61 74 20 74 68 65 20 73 65 6e 73 65 20 6f 66  hat the sense of
8960: 20 74 68 65 0a 20 20 20 20 2a 2a 20 63 6f 6d 70   the.    ** comp
8970: 61 72 69 73 6f 6e 20 69 73 20 69 6e 76 65 72 74  arison is invert
8980: 65 64 2e 20 46 6f 72 20 74 68 65 20 6d 61 78 28  ed. For the max(
8990: 29 20 61 67 67 72 65 67 61 74 65 2c 20 74 68 65  ) aggregate, the
89a0: 0a 20 20 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f  .    ** sqlite3_
89b0: 75 73 65 72 5f 64 61 74 61 28 29 20 66 75 6e 63  user_data() func
89c0: 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 28 76 6f  tion returns (vo
89d0: 69 64 20 2a 29 2d 31 2e 20 46 6f 72 20 6d 69 6e  id *)-1. For min
89e0: 28 29 20 69 74 0a 20 20 20 20 2a 2a 20 72 65 74  () it.    ** ret
89f0: 75 72 6e 73 20 28 76 6f 69 64 20 2a 29 64 62 2c  urns (void *)db,
8a00: 20 77 68 65 72 65 20 64 62 20 69 73 20 74 68 65   where db is the
8a10: 20 73 71 6c 69 74 65 33 2a 20 64 61 74 61 62 61   sqlite3* databa
8a20: 73 65 20 70 6f 69 6e 74 65 72 2e 0a 20 20 20 20  se pointer..    
8a30: 2a 2a 20 54 68 65 72 65 66 6f 72 65 20 74 68 65  ** Therefore the
8a40: 20 6e 65 78 74 20 73 74 61 74 65 6d 65 6e 74 20   next statement 
8a50: 73 65 74 73 20 76 61 72 69 61 62 6c 65 20 27 6d  sets variable 'm
8a60: 61 78 27 20 74 6f 20 31 20 66 6f 72 20 74 68 65  ax' to 1 for the
8a70: 20 6d 61 78 28 29 0a 20 20 20 20 2a 2a 20 61 67   max().    ** ag
8a80: 67 72 65 67 61 74 65 2c 20 6f 72 20 30 20 66 6f  gregate, or 0 fo
8a90: 72 20 6d 69 6e 28 29 2e 0a 20 20 20 20 2a 2f 0a  r min()..    */.
8aa0: 20 20 20 20 6d 61 78 20 3d 20 73 71 6c 69 74 65      max = sqlite
8ab0: 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74  3_user_data(cont
8ac0: 65 78 74 29 21 3d 30 3b 0a 20 20 20 20 63 6d 70  ext)!=0;.    cmp
8ad0: 20 3d 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d   = sqlite3MemCom
8ae0: 70 61 72 65 28 70 42 65 73 74 2c 20 70 41 72 67  pare(pBest, pArg
8af0: 2c 20 70 43 6f 6c 6c 29 3b 0a 20 20 20 20 69 66  , pColl);.    if
8b00: 28 20 28 6d 61 78 20 26 26 20 63 6d 70 3c 30 29  ( (max && cmp<0)
8b10: 20 7c 7c 20 28 21 6d 61 78 20 26 26 20 63 6d 70   || (!max && cmp
8b20: 3e 30 29 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  >0) ){.      sql
8b30: 69 74 65 33 56 64 62 65 4d 65 6d 43 6f 70 79 28  ite3VdbeMemCopy(
8b40: 70 42 65 73 74 2c 20 70 41 72 67 29 3b 0a 20 20  pBest, pArg);.  
8b50: 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20    }.  }else{.   
8b60: 20 73 71 6c 69 74 65 33 56 64 62 65 4d 65 6d 43   sqlite3VdbeMemC
8b70: 6f 70 79 28 70 42 65 73 74 2c 20 70 41 72 67 29  opy(pBest, pArg)
8b80: 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76  ;.  }.}.static v
8b90: 6f 69 64 20 6d 69 6e 4d 61 78 46 69 6e 61 6c 69  oid minMaxFinali
8ba0: 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  ze(sqlite3_conte
8bb0: 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20  xt *context){.  
8bc0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 70  sqlite3_value *p
8bd0: 52 65 73 3b 0a 20 20 70 52 65 73 20 3d 20 28 73  Res;.  pRes = (s
8be0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 29 73  qlite3_value *)s
8bf0: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
8c00: 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74  _context(context
8c10: 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 52 65 73  , 0);.  if( pRes
8c20: 20 29 7b 0a 20 20 20 20 69 66 28 20 70 52 65 73   ){.    if( pRes
8c30: 2d 3e 66 6c 61 67 73 20 29 7b 0a 20 20 20 20 20  ->flags ){.     
8c40: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
8c50: 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 70  value(context, p
8c60: 52 65 73 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20  Res);.    }.    
8c70: 73 71 6c 69 74 65 33 56 64 62 65 4d 65 6d 52 65  sqlite3VdbeMemRe
8c80: 6c 65 61 73 65 28 70 52 65 73 29 3b 0a 20 20 7d  lease(pRes);.  }
8c90: 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20  .}.../*.** This 
8ca0: 66 75 6e 63 74 69 6f 6e 20 72 65 67 69 73 74 65  function registe
8cb0: 72 65 64 20 61 6c 6c 20 6f 66 20 74 68 65 20 61  red all of the a
8cc0: 62 6f 76 65 20 43 20 66 75 6e 63 74 69 6f 6e 73  bove C functions
8cd0: 20 61 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74   as SQL.** funct
8ce0: 69 6f 6e 73 2e 20 20 54 68 69 73 20 73 68 6f 75  ions.  This shou
8cf0: 6c 64 20 62 65 20 74 68 65 20 6f 6e 6c 79 20 72  ld be the only r
8d00: 6f 75 74 69 6e 65 20 69 6e 20 74 68 69 73 20 66  outine in this f
8d10: 69 6c 65 20 77 69 74 68 0a 2a 2a 20 65 78 74 65  ile with.** exte
8d20: 72 6e 61 6c 20 6c 69 6e 6b 61 67 65 2e 0a 2a 2f  rnal linkage..*/
8d30: 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67  .void sqlite3Reg
8d40: 69 73 74 65 72 42 75 69 6c 74 69 6e 46 75 6e 63  isterBuiltinFunc
8d50: 74 69 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a 64  tions(sqlite3 *d
8d60: 62 29 7b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e  b){.  static con
8d70: 73 74 20 73 74 72 75 63 74 20 7b 0a 20 20 20 20  st struct {.    
8d80: 20 63 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a 20 20   char *zName;.  
8d90: 20 20 20 73 69 67 6e 65 64 20 63 68 61 72 20 6e     signed char n
8da0: 41 72 67 3b 0a 20 20 20 20 20 75 38 20 61 72 67  Arg;.     u8 arg
8db0: 54 79 70 65 3b 20 20 20 20 20 20 20 20 20 20 20  Type;           
8dc0: 2f 2a 20 66 66 3a 20 64 62 20 20 20 31 3a 20 30  /* ff: db   1: 0
8dd0: 2c 20 32 3a 20 31 2c 20 33 3a 20 32 2c 2e 2e 2e  , 2: 1, 3: 2,...
8de0: 20 20 4e 3a 20 20 4e 2d 31 2e 20 2a 2f 0a 20 20    N:  N-1. */.  
8df0: 20 20 20 75 38 20 65 54 65 78 74 52 65 70 3b 20     u8 eTextRep; 
8e00: 20 20 20 20 20 20 20 20 20 2f 2a 20 31 3a 20 55           /* 1: U
8e10: 54 46 2d 31 36 2e 20 20 30 3a 20 55 54 46 2d 38  TF-16.  0: UTF-8
8e20: 20 2a 2f 0a 20 20 20 20 20 75 38 20 6e 65 65 64   */.     u8 need
8e30: 43 6f 6c 6c 53 65 71 3b 0a 20 20 20 20 20 76 6f  CollSeq;.     vo
8e40: 69 64 20 28 2a 78 46 75 6e 63 29 28 73 71 6c 69  id (*xFunc)(sqli
8e50: 74 65 33 5f 63 6f 6e 74 65 78 74 2a 2c 69 6e 74  te3_context*,int
8e60: 2c 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a  ,sqlite3_value *
8e70: 2a 29 3b 0a 20 20 7d 20 61 46 75 6e 63 73 5b 5d  *);.  } aFuncs[]
8e80: 20 3d 20 7b 0a 20 20 20 20 7b 20 22 6d 69 6e 22   = {.    { "min"
8e90: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
8ea0: 2d 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54  -1, 0, SQLITE_UT
8eb0: 46 38 2c 20 20 20 20 31 2c 20 6d 69 6e 6d 61 78  F8,    1, minmax
8ec0: 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20 22 6d  Func },.    { "m
8ed0: 69 6e 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  in",            
8ee0: 20 20 20 20 30 2c 20 30 2c 20 53 51 4c 49 54 45      0, 0, SQLITE
8ef0: 5f 55 54 46 38 2c 20 20 20 20 31 2c 20 30 20 20  _UTF8,    1, 0  
8f00: 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b          },.    {
8f10: 20 22 6d 61 78 22 2c 20 20 20 20 20 20 20 20 20   "max",         
8f20: 20 20 20 20 20 20 2d 31 2c 20 31 2c 20 53 51 4c        -1, 1, SQL
8f30: 49 54 45 5f 55 54 46 38 2c 20 20 20 20 31 2c 20  ITE_UTF8,    1, 
8f40: 6d 69 6e 6d 61 78 46 75 6e 63 20 7d 2c 0a 20 20  minmaxFunc },.  
8f50: 20 20 7b 20 22 6d 61 78 22 2c 20 20 20 20 20 20    { "max",      
8f60: 20 20 20 20 20 20 20 20 20 20 30 2c 20 31 2c 20            0, 1, 
8f70: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20  SQLITE_UTF8,    
8f80: 31 2c 20 30 20 20 20 20 20 20 20 20 20 20 7d 2c  1, 0          },
8f90: 0a 20 20 20 20 7b 20 22 74 79 70 65 6f 66 22 2c  .    { "typeof",
8fa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
8fb0: 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  0, SQLITE_UTF8, 
8fc0: 20 20 20 30 2c 20 74 79 70 65 6f 66 46 75 6e 63     0, typeofFunc
8fd0: 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 65 6e 67 74   },.    { "lengt
8fe0: 68 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  h",             
8ff0: 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46  1, 0, SQLITE_UTF
9000: 38 2c 20 20 20 20 30 2c 20 6c 65 6e 67 74 68 46  8,    0, lengthF
9010: 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20 22 73 75  unc },.    { "su
9020: 62 73 74 72 22 2c 20 20 20 20 20 20 20 20 20 20  bstr",          
9030: 20 20 20 33 2c 20 30 2c 20 53 51 4c 49 54 45 5f     3, 0, SQLITE_
9040: 55 54 46 38 2c 20 20 20 20 30 2c 20 73 75 62 73  UTF8,    0, subs
9050: 74 72 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20  trFunc },.    { 
9060: 22 61 62 73 22 2c 20 20 20 20 20 20 20 20 20 20  "abs",          
9070: 20 20 20 20 20 20 31 2c 20 30 2c 20 53 51 4c 49        1, 0, SQLI
9080: 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20 61  TE_UTF8,    0, a
9090: 62 73 46 75 6e 63 20 20 20 20 7d 2c 0a 20 20 20  bsFunc    },.   
90a0: 20 7b 20 22 72 6f 75 6e 64 22 2c 20 20 20 20 20   { "round",     
90b0: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53           1, 0, S
90c0: 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30  QLITE_UTF8,    0
90d0: 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 7d 2c 0a  , roundFunc  },.
90e0: 20 20 20 20 7b 20 22 72 6f 75 6e 64 22 2c 20 20      { "round",  
90f0: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30              2, 0
9100: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20  , SQLITE_UTF8,  
9110: 20 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20    0, roundFunc  
9120: 7d 2c 0a 20 20 20 20 7b 20 22 75 70 70 65 72 22  },.    { "upper"
9130: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  ,              1
9140: 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  , 0, SQLITE_UTF8
9150: 2c 20 20 20 20 30 2c 20 75 70 70 65 72 46 75 6e  ,    0, upperFun
9160: 63 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 6f 77  c  },.    { "low
9170: 65 72 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  er",            
9180: 20 20 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55    1, 0, SQLITE_U
9190: 54 46 38 2c 20 20 20 20 30 2c 20 6c 6f 77 65 72  TF8,    0, lower
91a0: 46 75 6e 63 20 20 7d 2c 0a 20 20 20 20 7b 20 22  Func  },.    { "
91b0: 63 6f 61 6c 65 73 63 65 22 2c 20 20 20 20 20 20  coalesce",      
91c0: 20 20 20 20 2d 31 2c 20 30 2c 20 53 51 4c 49 54      -1, 0, SQLIT
91d0: 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20 69 66  E_UTF8,    0, if
91e0: 6e 75 6c 6c 46 75 6e 63 20 7d 2c 0a 20 20 20 20  nullFunc },.    
91f0: 7b 20 22 63 6f 61 6c 65 73 63 65 22 2c 20 20 20  { "coalesce",   
9200: 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 53 51          0, 0, SQ
9210: 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c  LITE_UTF8,    0,
9220: 20 30 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20   0          },. 
9230: 20 20 20 7b 20 22 63 6f 61 6c 65 73 63 65 22 2c     { "coalesce",
9240: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
9250: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20   SQLITE_UTF8,   
9260: 20 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 7d   0, 0          }
9270: 2c 0a 20 20 20 20 7b 20 22 68 65 78 22 2c 20 20  ,.    { "hex",  
9280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
9290: 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c   0, SQLITE_UTF8,
92a0: 20 20 20 20 30 2c 20 68 65 78 46 75 6e 63 20 20      0, hexFunc  
92b0: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 69 66 6e 75    },.    { "ifnu
92c0: 6c 6c 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  ll",            
92d0: 20 32 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54   2, 0, SQLITE_UT
92e0: 46 38 2c 20 20 20 20 31 2c 20 69 66 6e 75 6c 6c  F8,    1, ifnull
92f0: 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20 22 72  Func },.    { "r
9300: 61 6e 64 6f 6d 22 2c 20 20 20 20 20 20 20 20 20  andom",         
9310: 20 20 20 2d 31 2c 20 30 2c 20 53 51 4c 49 54 45     -1, 0, SQLITE
9320: 5f 55 54 46 38 2c 20 20 20 20 30 2c 20 72 61 6e  _UTF8,    0, ran
9330: 64 6f 6d 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b  domFunc },.    {
9340: 20 22 72 61 6e 64 6f 6d 62 6c 6f 62 22 2c 20 20   "randomblob",  
9350: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53 51 4c         1, 0, SQL
9360: 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20  ITE_UTF8,    0, 
9370: 72 61 6e 64 6f 6d 42 6c 6f 62 20 7d 2c 0a 20 20  randomBlob },.  
9380: 20 20 7b 20 22 6e 75 6c 6c 69 66 22 2c 20 20 20    { "nullif",   
9390: 20 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20            2, 0, 
93a0: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20  SQLITE_UTF8,    
93b0: 31 2c 20 6e 75 6c 6c 69 66 46 75 6e 63 20 7d 2c  1, nullifFunc },
93c0: 0a 20 20 20 20 7b 20 22 73 71 6c 69 74 65 5f 76  .    { "sqlite_v
93d0: 65 72 73 69 6f 6e 22 2c 20 20 20 20 20 30 2c 20  ersion",     0, 
93e0: 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  0, SQLITE_UTF8, 
93f0: 20 20 20 30 2c 20 76 65 72 73 69 6f 6e 46 75 6e     0, versionFun
9400: 63 7d 2c 0a 20 20 20 20 7b 20 22 71 75 6f 74 65  c},.    { "quote
9410: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ",              
9420: 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46  1, 0, SQLITE_UTF
9430: 38 2c 20 20 20 20 30 2c 20 71 75 6f 74 65 46 75  8,    0, quoteFu
9440: 6e 63 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 61  nc  },.    { "la
9450: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 22  st_insert_rowid"
9460: 2c 20 20 30 2c 20 30 78 66 66 2c 20 53 51 4c 49  ,  0, 0xff, SQLI
9470: 54 45 5f 55 54 46 38 2c 20 30 2c 20 6c 61 73 74  TE_UTF8, 0, last
9480: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 20 7d 2c  _insert_rowid },
9490: 0a 20 20 20 20 7b 20 22 63 68 61 6e 67 65 73 22  .    { "changes"
94a0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20  ,            0, 
94b0: 30 78 66 66 2c 20 53 51 4c 49 54 45 5f 55 54 46  0xff, SQLITE_UTF
94c0: 38 2c 20 30 2c 20 63 68 61 6e 67 65 73 20 20 20  8, 0, changes   
94d0: 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b          },.    {
94e0: 20 22 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 22   "total_changes"
94f0: 2c 20 20 20 20 20 20 30 2c 20 30 78 66 66 2c 20  ,      0, 0xff, 
9500: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c 20  SQLITE_UTF8, 0, 
9510: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 20 20 20  total_changes   
9520: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72 65 70 6c    },.    { "repl
9530: 61 63 65 22 2c 20 20 20 20 20 20 20 20 20 20 20  ace",           
9540: 20 33 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54   3, 0, SQLITE_UT
9550: 46 38 2c 20 20 20 20 30 2c 20 72 65 70 6c 61 63  F8,    0, replac
9560: 65 46 75 6e 63 20 20 20 20 20 20 20 7d 2c 0a 20  eFunc       },. 
9570: 20 20 20 7b 20 22 6c 74 72 69 6d 22 2c 20 20 20     { "ltrim",   
9580: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 31 2c             1, 1,
9590: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20   SQLITE_UTF8,   
95a0: 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20   0, trimFunc    
95b0: 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22        },.    { "
95c0: 6c 74 72 69 6d 22 2c 20 20 20 20 20 20 20 20 20  ltrim",         
95d0: 20 20 20 20 20 32 2c 20 31 2c 20 53 51 4c 49 54       2, 1, SQLIT
95e0: 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20 74 72  E_UTF8,    0, tr
95f0: 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 20  imFunc          
9600: 7d 2c 0a 20 20 20 20 7b 20 22 72 74 72 69 6d 22  },.    { "rtrim"
9610: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  ,              1
9620: 2c 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  , 2, SQLITE_UTF8
9630: 2c 20 20 20 20 30 2c 20 74 72 69 6d 46 75 6e 63  ,    0, trimFunc
9640: 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20            },.   
9650: 20 7b 20 22 72 74 72 69 6d 22 2c 20 20 20 20 20   { "rtrim",     
9660: 20 20 20 20 20 20 20 20 20 32 2c 20 32 2c 20 53           2, 2, S
9670: 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30  QLITE_UTF8,    0
9680: 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20  , trimFunc      
9690: 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 74 72      },.    { "tr
96a0: 69 6d 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  im",            
96b0: 20 20 20 31 2c 20 33 2c 20 53 51 4c 49 54 45 5f     1, 3, SQLITE_
96c0: 55 54 46 38 2c 20 20 20 20 30 2c 20 74 72 69 6d  UTF8,    0, trim
96d0: 46 75 6e 63 20 20 20 20 20 20 20 20 20 20 7d 2c  Func          },
96e0: 0a 20 20 20 20 7b 20 22 74 72 69 6d 22 2c 20 20  .    { "trim",  
96f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20               2, 
9700: 33 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  3, SQLITE_UTF8, 
9710: 20 20 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20     0, trimFunc  
9720: 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b          },.    {
9730: 20 22 7a 65 72 6f 62 6c 6f 62 22 2c 20 20 20 20   "zeroblob",    
9740: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53 51 4c         1, 0, SQL
9750: 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20  ITE_UTF8,    0, 
9760: 7a 65 72 6f 62 6c 6f 62 46 75 6e 63 20 20 20 20  zeroblobFunc    
9770: 20 20 7d 2c 0a 23 69 66 64 65 66 20 53 51 4c 49    },.#ifdef SQLI
9780: 54 45 5f 53 4f 55 4e 44 45 58 0a 20 20 20 20 7b  TE_SOUNDEX.    {
9790: 20 22 73 6f 75 6e 64 65 78 22 2c 20 20 20 20 20   "soundex",     
97a0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53 51 4c         1, 0, SQL
97b0: 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20  ITE_UTF8,    0, 
97c0: 73 6f 75 6e 64 65 78 46 75 6e 63 7d 2c 0a 23 65  soundexFunc},.#e
97d0: 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 53 51 4c  ndif.#ifndef SQL
97e0: 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58  ITE_OMIT_LOAD_EX
97f0: 54 45 4e 53 49 4f 4e 0a 20 20 20 20 7b 20 22 6c  TENSION.    { "l
9800: 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 22 2c 20  oad_extension", 
9810: 20 20 20 20 31 2c 20 30 78 66 66 2c 20 53 51 4c      1, 0xff, SQL
9820: 49 54 45 5f 55 54 46 38 2c 20 30 2c 20 6c 6f 61  ITE_UTF8, 0, loa
9830: 64 45 78 74 20 7d 2c 0a 20 20 20 20 7b 20 22 6c  dExt },.    { "l
9840: 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 22 2c 20  oad_extension", 
9850: 20 20 20 20 32 2c 20 30 78 66 66 2c 20 53 51 4c      2, 0xff, SQL
9860: 49 54 45 5f 55 54 46 38 2c 20 30 2c 20 6c 6f 61  ITE_UTF8, 0, loa
9870: 64 45 78 74 20 7d 2c 0a 23 65 6e 64 69 66 0a 23  dExt },.#endif.#
9880: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53  ifdef SQLITE_TES
9890: 54 0a 20 20 20 20 7b 20 22 72 61 6e 64 73 74 72  T.    { "randstr
98a0: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ",              
98b0: 20 32 2c 20 30 2c 20 20 20 20 53 51 4c 49 54 45   2, 0,    SQLITE
98c0: 5f 55 54 46 38 2c 20 30 2c 20 72 61 6e 64 53 74  _UTF8, 0, randSt
98d0: 72 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 74  r    },.    { "t
98e0: 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72 22 2c  est_destructor",
98f0: 20 20 20 20 20 20 20 31 2c 20 30 78 66 66 2c 20         1, 0xff, 
9900: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c 20  SQLITE_UTF8, 0, 
9910: 74 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72 7d  test_destructor}
9920: 2c 0a 20 20 20 20 7b 20 22 74 65 73 74 5f 64 65  ,.    { "test_de
9930: 73 74 72 75 63 74 6f 72 5f 63 6f 75 6e 74 22 2c  structor_count",
9940: 20 30 2c 20 30 2c 20 20 20 20 53 51 4c 49 54 45   0, 0,    SQLITE
9950: 5f 55 54 46 38 2c 20 30 2c 20 74 65 73 74 5f 64  _UTF8, 0, test_d
9960: 65 73 74 72 75 63 74 6f 72 5f 63 6f 75 6e 74 7d  estructor_count}
9970: 2c 0a 20 20 20 20 7b 20 22 74 65 73 74 5f 61 75  ,.    { "test_au
9980: 78 64 61 74 61 22 2c 20 20 20 20 20 20 20 20 20  xdata",         
9990: 2d 31 2c 20 30 2c 20 20 20 20 53 51 4c 49 54 45  -1, 0,    SQLITE
99a0: 5f 55 54 46 38 2c 20 30 2c 20 74 65 73 74 5f 61  _UTF8, 0, test_a
99b0: 75 78 64 61 74 61 7d 2c 0a 20 20 20 20 7b 20 22  uxdata},.    { "
99c0: 74 65 73 74 5f 65 72 72 6f 72 22 2c 20 20 20 20  test_error",    
99d0: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 20 20          1, 0,   
99e0: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c   SQLITE_UTF8, 0,
99f0: 20 74 65 73 74 5f 65 72 72 6f 72 7d 2c 0a 23 65   test_error},.#e
9a00: 6e 64 69 66 0a 20 20 7d 3b 0a 20 20 73 74 61 74  ndif.  };.  stat
9a10: 69 63 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20  ic const struct 
9a20: 7b 0a 20 20 20 20 63 68 61 72 20 2a 7a 4e 61 6d  {.    char *zNam
9a30: 65 3b 0a 20 20 20 20 73 69 67 6e 65 64 20 63 68  e;.    signed ch
9a40: 61 72 20 6e 41 72 67 3b 0a 20 20 20 20 75 38 20  ar nArg;.    u8 
9a50: 61 72 67 54 79 70 65 3b 0a 20 20 20 20 75 38 20  argType;.    u8 
9a60: 6e 65 65 64 43 6f 6c 6c 53 65 71 3b 0a 20 20 20  needCollSeq;.   
9a70: 20 76 6f 69 64 20 28 2a 78 53 74 65 70 29 28 73   void (*xStep)(s
9a80: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 2a 2c  qlite3_context*,
9a90: 69 6e 74 2c 73 71 6c 69 74 65 33 5f 76 61 6c 75  int,sqlite3_valu
9aa0: 65 2a 2a 29 3b 0a 20 20 20 20 76 6f 69 64 20 28  e**);.    void (
9ab0: 2a 78 46 69 6e 61 6c 69 7a 65 29 28 73 71 6c 69  *xFinalize)(sqli
9ac0: 74 65 33 5f 63 6f 6e 74 65 78 74 2a 29 3b 0a 20  te3_context*);. 
9ad0: 20 7d 20 61 41 67 67 73 5b 5d 20 3d 20 7b 0a 20   } aAggs[] = {. 
9ae0: 20 20 20 7b 20 22 6d 69 6e 22 2c 20 20 20 20 31     { "min",    1
9af0: 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78 53 74  , 0, 1, minmaxSt
9b00: 65 70 2c 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61  ep,   minMaxFina
9b10: 6c 69 7a 65 20 7d 2c 0a 20 20 20 20 7b 20 22 6d  lize },.    { "m
9b20: 61 78 22 2c 20 20 20 20 31 2c 20 31 2c 20 31 2c  ax",    1, 1, 1,
9b30: 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20 20 20 6d   minmaxStep,   m
9b40: 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 20 7d 2c  inMaxFinalize },
9b50: 0a 20 20 20 20 7b 20 22 73 75 6d 22 2c 20 20 20  .    { "sum",   
9b60: 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53 74 65   1, 0, 0, sumSte
9b70: 70 2c 20 20 20 20 20 20 73 75 6d 46 69 6e 61 6c  p,      sumFinal
9b80: 69 7a 65 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20  ize    },.    { 
9b90: 22 74 6f 74 61 6c 22 2c 20 20 31 2c 20 30 2c 20  "total",  1, 0, 
9ba0: 30 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20  0, sumStep,     
9bb0: 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a 65 20 20   totalFinalize  
9bc0: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61 76 67 22    },.    { "avg"
9bd0: 2c 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75  ,    1, 0, 0, su
9be0: 6d 53 74 65 70 2c 20 20 20 20 20 20 61 76 67 46  mStep,      avgF
9bf0: 69 6e 61 6c 69 7a 65 20 20 20 20 7d 2c 0a 20 20  inalize    },.  
9c00: 20 20 7b 20 22 63 6f 75 6e 74 22 2c 20 20 30 2c    { "count",  0,
9c10: 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65 70   0, 0, countStep
9c20: 2c 20 20 20 20 63 6f 75 6e 74 46 69 6e 61 6c 69  ,    countFinali
9c30: 7a 65 20 20 7d 2c 0a 20 20 20 20 7b 20 22 63 6f  ze  },.    { "co
9c40: 75 6e 74 22 2c 20 20 31 2c 20 30 2c 20 30 2c 20  unt",  1, 0, 0, 
9c50: 63 6f 75 6e 74 53 74 65 70 2c 20 20 20 20 63 6f  countStep,    co
9c60: 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20 7d 2c 0a  untFinalize  },.
9c70: 20 20 7d 3b 0a 20 20 69 6e 74 20 69 3b 0a 0a 20    };.  int i;.. 
9c80: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a 65   for(i=0; i<size
9c90: 6f 66 28 61 46 75 6e 63 73 29 2f 73 69 7a 65 6f  of(aFuncs)/sizeo
9ca0: 66 28 61 46 75 6e 63 73 5b 30 5d 29 3b 20 69 2b  f(aFuncs[0]); i+
9cb0: 2b 29 7b 0a 20 20 20 20 76 6f 69 64 20 2a 70 41  +){.    void *pA
9cc0: 72 67 3b 0a 20 20 20 20 75 38 20 61 72 67 54 79  rg;.    u8 argTy
9cd0: 70 65 20 3d 20 61 46 75 6e 63 73 5b 69 5d 2e 61  pe = aFuncs[i].a
9ce0: 72 67 54 79 70 65 3b 0a 20 20 20 20 69 66 28 20  rgType;.    if( 
9cf0: 61 72 67 54 79 70 65 3d 3d 30 78 66 66 20 29 7b  argType==0xff ){
9d00: 0a 20 20 20 20 20 20 70 41 72 67 20 3d 20 64 62  .      pArg = db
9d10: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ;.    }else{.   
9d20: 20 20 20 70 41 72 67 20 3d 20 28 76 6f 69 64 2a     pArg = (void*
9d30: 29 28 69 6e 74 29 61 72 67 54 79 70 65 3b 0a 20  )(int)argType;. 
9d40: 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33     }.    sqlite3
9d50: 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c 20 61  CreateFunc(db, a
9d60: 46 75 6e 63 73 5b 69 5d 2e 7a 4e 61 6d 65 2c 20  Funcs[i].zName, 
9d70: 61 46 75 6e 63 73 5b 69 5d 2e 6e 41 72 67 2c 0a  aFuncs[i].nArg,.
9d80: 20 20 20 20 20 20 20 20 61 46 75 6e 63 73 5b 69          aFuncs[i
9d90: 5d 2e 65 54 65 78 74 52 65 70 2c 20 70 41 72 67  ].eTextRep, pArg
9da0: 2c 20 61 46 75 6e 63 73 5b 69 5d 2e 78 46 75 6e  , aFuncs[i].xFun
9db0: 63 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 69 66  c, 0, 0);.    if
9dc0: 28 20 61 46 75 6e 63 73 5b 69 5d 2e 6e 65 65 64  ( aFuncs[i].need
9dd0: 43 6f 6c 6c 53 65 71 20 29 7b 0a 20 20 20 20 20  CollSeq ){.     
9de0: 20 46 75 6e 63 44 65 66 20 2a 70 46 75 6e 63 20   FuncDef *pFunc 
9df0: 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e  = sqlite3FindFun
9e00: 63 74 69 6f 6e 28 64 62 2c 20 61 46 75 6e 63 73  ction(db, aFuncs
9e10: 5b 69 5d 2e 7a 4e 61 6d 65 2c 20 0a 20 20 20 20  [i].zName, .    
9e20: 20 20 20 20 20 20 73 74 72 6c 65 6e 28 61 46 75        strlen(aFu
9e30: 6e 63 73 5b 69 5d 2e 7a 4e 61 6d 65 29 2c 20 61  ncs[i].zName), a
9e40: 46 75 6e 63 73 5b 69 5d 2e 6e 41 72 67 2c 20 61  Funcs[i].nArg, a
9e50: 46 75 6e 63 73 5b 69 5d 2e 65 54 65 78 74 52 65  Funcs[i].eTextRe
9e60: 70 2c 20 30 29 3b 0a 20 20 20 20 20 20 69 66 28  p, 0);.      if(
9e70: 20 70 46 75 6e 63 20 26 26 20 61 46 75 6e 63 73   pFunc && aFuncs
9e80: 5b 69 5d 2e 6e 65 65 64 43 6f 6c 6c 53 65 71 20  [i].needCollSeq 
9e90: 29 7b 0a 20 20 20 20 20 20 20 20 70 46 75 6e 63  ){.        pFunc
9ea0: 2d 3e 6e 65 65 64 43 6f 6c 6c 53 65 71 20 3d 20  ->needCollSeq = 
9eb0: 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  1;.      }.    }
9ec0: 0a 20 20 7d 0a 23 69 66 6e 64 65 66 20 53 51 4c  .  }.#ifndef SQL
9ed0: 49 54 45 5f 4f 4d 49 54 5f 41 4c 54 45 52 54 41  ITE_OMIT_ALTERTA
9ee0: 42 4c 45 0a 20 20 73 71 6c 69 74 65 33 41 6c 74  BLE.  sqlite3Alt
9ef0: 65 72 46 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b  erFunctions(db);
9f00: 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20  .#endif.#ifndef 
9f10: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 50 41 52 53  SQLITE_OMIT_PARS
9f20: 45 52 0a 20 20 73 71 6c 69 74 65 33 41 74 74 61  ER.  sqlite3Atta
9f30: 63 68 46 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b  chFunctions(db);
9f40: 0a 23 65 6e 64 69 66 0a 20 20 66 6f 72 28 69 3d  .#endif.  for(i=
9f50: 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 41 67 67  0; i<sizeof(aAgg
9f60: 73 29 2f 73 69 7a 65 6f 66 28 61 41 67 67 73 5b  s)/sizeof(aAggs[
9f70: 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 76  0]); i++){.    v
9f80: 6f 69 64 20 2a 70 41 72 67 20 3d 20 28 76 6f 69  oid *pArg = (voi
9f90: 64 2a 29 28 69 6e 74 29 61 41 67 67 73 5b 69 5d  d*)(int)aAggs[i]
9fa0: 2e 61 72 67 54 79 70 65 3b 0a 20 20 20 20 73 71  .argType;.    sq
9fb0: 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e 63 28  lite3CreateFunc(
9fc0: 64 62 2c 20 61 41 67 67 73 5b 69 5d 2e 7a 4e 61  db, aAggs[i].zNa
9fd0: 6d 65 2c 20 61 41 67 67 73 5b 69 5d 2e 6e 41 72  me, aAggs[i].nAr
9fe0: 67 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  g, SQLITE_UTF8, 
9ff0: 0a 20 20 20 20 20 20 20 20 70 41 72 67 2c 20 30  .        pArg, 0
a000: 2c 20 61 41 67 67 73 5b 69 5d 2e 78 53 74 65 70  , aAggs[i].xStep
a010: 2c 20 61 41 67 67 73 5b 69 5d 2e 78 46 69 6e 61  , aAggs[i].xFina
a020: 6c 69 7a 65 29 3b 0a 20 20 20 20 69 66 28 20 61  lize);.    if( a
a030: 41 67 67 73 5b 69 5d 2e 6e 65 65 64 43 6f 6c 6c  Aggs[i].needColl
a040: 53 65 71 20 29 7b 0a 20 20 20 20 20 20 46 75 6e  Seq ){.      Fun
a050: 63 44 65 66 20 2a 70 46 75 6e 63 20 3d 20 73 71  cDef *pFunc = sq
a060: 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69 6f  lite3FindFunctio
a070: 6e 28 20 64 62 2c 20 61 41 67 67 73 5b 69 5d 2e  n( db, aAggs[i].
a080: 7a 4e 61 6d 65 2c 0a 20 20 20 20 20 20 20 20 20  zName,.         
a090: 20 73 74 72 6c 65 6e 28 61 41 67 67 73 5b 69 5d   strlen(aAggs[i]
a0a0: 2e 7a 4e 61 6d 65 29 2c 20 61 41 67 67 73 5b 69  .zName), aAggs[i
a0b0: 5d 2e 6e 41 72 67 2c 20 53 51 4c 49 54 45 5f 55  ].nArg, SQLITE_U
a0c0: 54 46 38 2c 20 30 29 3b 0a 20 20 20 20 20 20 69  TF8, 0);.      i
a0d0: 66 28 20 70 46 75 6e 63 20 26 26 20 61 41 67 67  f( pFunc && aAgg
a0e0: 73 5b 69 5d 2e 6e 65 65 64 43 6f 6c 6c 53 65 71  s[i].needCollSeq
a0f0: 20 29 7b 0a 20 20 20 20 20 20 20 20 70 46 75 6e   ){.        pFun
a100: 63 2d 3e 6e 65 65 64 43 6f 6c 6c 53 65 71 20 3d  c->needCollSeq =
a110: 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   1;.      }.    
a120: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 52  }.  }.  sqlite3R
a130: 65 67 69 73 74 65 72 44 61 74 65 54 69 6d 65 46  egisterDateTimeF
a140: 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a 20 20  unctions(db);.  
a150: 73 71 6c 69 74 65 33 5f 6f 76 65 72 6c 6f 61 64  sqlite3_overload
a160: 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 4d  _function(db, "M
a170: 41 54 43 48 22 2c 20 32 29 3b 0a 23 69 66 64 65  ATCH", 2);.#ifde
a180: 66 20 53 51 4c 49 54 45 5f 53 53 45 0a 20 20 28  f SQLITE_SSE.  (
a190: 76 6f 69 64 29 73 71 6c 69 74 65 33 53 73 65 46  void)sqlite3SseF
a1a0: 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a 23 65  unctions(db);.#e
a1b0: 6e 64 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49  ndif.#ifdef SQLI
a1c0: 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54 49 56  TE_CASE_SENSITIV
a1d0: 45 5f 4c 49 4b 45 0a 20 20 73 71 6c 69 74 65 33  E_LIKE.  sqlite3
a1e0: 52 65 67 69 73 74 65 72 4c 69 6b 65 46 75 6e 63  RegisterLikeFunc
a1f0: 74 69 6f 6e 73 28 64 62 2c 20 31 29 3b 0a 23 65  tions(db, 1);.#e
a200: 6c 73 65 0a 20 20 73 71 6c 69 74 65 33 52 65 67  lse.  sqlite3Reg
a210: 69 73 74 65 72 4c 69 6b 65 46 75 6e 63 74 69 6f  isterLikeFunctio
a220: 6e 73 28 64 62 2c 20 30 29 3b 0a 23 65 6e 64 69  ns(db, 0);.#endi
a230: 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74  f.}../*.** Set t
a240: 68 65 20 4c 49 4b 45 4f 50 54 20 66 6c 61 67 20  he LIKEOPT flag 
a250: 6f 6e 20 74 68 65 20 32 2d 61 72 67 75 6d 65 6e  on the 2-argumen
a260: 74 20 66 75 6e 63 74 69 6f 6e 20 77 69 74 68 20  t function with 
a270: 74 68 65 20 67 69 76 65 6e 20 6e 61 6d 65 2e 0a  the given name..
a280: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73  */.static void s
a290: 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 73 71  etLikeOptFlag(sq
a2a0: 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74  lite3 *db, const
a2b0: 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 69 6e   char *zName, in
a2c0: 74 20 66 6c 61 67 56 61 6c 29 7b 0a 20 20 46 75  t flagVal){.  Fu
a2d0: 6e 63 44 65 66 20 2a 70 44 65 66 3b 0a 20 20 70  ncDef *pDef;.  p
a2e0: 44 65 66 20 3d 20 73 71 6c 69 74 65 33 46 69 6e  Def = sqlite3Fin
a2f0: 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20 7a 4e  dFunction(db, zN
a300: 61 6d 65 2c 20 73 74 72 6c 65 6e 28 7a 4e 61 6d  ame, strlen(zNam
a310: 65 29 2c 20 32 2c 20 53 51 4c 49 54 45 5f 55 54  e), 2, SQLITE_UT
a320: 46 38 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 44  F8, 0);.  if( pD
a330: 65 66 20 29 7b 0a 20 20 20 20 70 44 65 66 2d 3e  ef ){.    pDef->
a340: 66 6c 61 67 73 20 3d 20 66 6c 61 67 56 61 6c 3b  flags = flagVal;
a350: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65  .  }.}../*.** Re
a360: 67 69 73 74 65 72 20 74 68 65 20 62 75 69 6c 74  gister the built
a370: 2d 69 6e 20 4c 49 4b 45 20 61 6e 64 20 47 4c 4f  -in LIKE and GLO
a380: 42 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 54 68  B functions.  Th
a390: 65 20 63 61 73 65 53 65 6e 73 69 74 69 76 65 0a  e caseSensitive.
a3a0: 2a 2a 20 70 61 72 61 6d 65 74 65 72 20 64 65 74  ** parameter det
a3b0: 65 72 6d 69 6e 65 73 20 77 68 65 74 68 65 72 20  ermines whether 
a3c0: 6f 72 20 6e 6f 74 20 74 68 65 20 4c 49 4b 45 20  or not the LIKE 
a3d0: 6f 70 65 72 61 74 6f 72 20 69 73 20 63 61 73 65  operator is case
a3e0: 0a 2a 2a 20 73 65 6e 73 69 74 69 76 65 2e 20 20  .** sensitive.  
a3f0: 47 4c 4f 42 20 69 73 20 61 6c 77 61 79 73 20 63  GLOB is always c
a400: 61 73 65 20 73 65 6e 73 69 74 69 76 65 2e 0a 2a  ase sensitive..*
a410: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65  /.void sqlite3Re
a420: 67 69 73 74 65 72 4c 69 6b 65 46 75 6e 63 74 69  gisterLikeFuncti
a430: 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a 64 62 2c  ons(sqlite3 *db,
a440: 20 69 6e 74 20 63 61 73 65 53 65 6e 73 69 74 69   int caseSensiti
a450: 76 65 29 7b 0a 20 20 73 74 72 75 63 74 20 63 6f  ve){.  struct co
a460: 6d 70 61 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f  mpareInfo *pInfo
a470: 3b 0a 20 20 69 66 28 20 63 61 73 65 53 65 6e 73  ;.  if( caseSens
a480: 69 74 69 76 65 20 29 7b 0a 20 20 20 20 70 49 6e  itive ){.    pIn
a490: 66 6f 20 3d 20 28 73 74 72 75 63 74 20 63 6f 6d  fo = (struct com
a4a0: 70 61 72 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49  pareInfo*)&likeI
a4b0: 6e 66 6f 41 6c 74 3b 0a 20 20 7d 65 6c 73 65 7b  nfoAlt;.  }else{
a4c0: 0a 20 20 20 20 70 49 6e 66 6f 20 3d 20 28 73 74  .    pInfo = (st
a4d0: 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  ruct compareInfo
a4e0: 2a 29 26 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 3b  *)&likeInfoNorm;
a4f0: 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 43 72  .  }.  sqlite3Cr
a500: 65 61 74 65 46 75 6e 63 28 64 62 2c 20 22 6c 69  eateFunc(db, "li
a510: 6b 65 22 2c 20 32 2c 20 53 51 4c 49 54 45 5f 55  ke", 2, SQLITE_U
a520: 54 46 38 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65  TF8, pInfo, like
a530: 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 73  Func, 0, 0);.  s
a540: 71 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e 63  qlite3CreateFunc
a550: 28 64 62 2c 20 22 6c 69 6b 65 22 2c 20 33 2c 20  (db, "like", 3, 
a560: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 70 49 6e  SQLITE_UTF8, pIn
a570: 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c  fo, likeFunc, 0,
a580: 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 43 72   0);.  sqlite3Cr
a590: 65 61 74 65 46 75 6e 63 28 64 62 2c 20 22 67 6c  eateFunc(db, "gl
a5a0: 6f 62 22 2c 20 32 2c 20 53 51 4c 49 54 45 5f 55  ob", 2, SQLITE_U
a5b0: 54 46 38 2c 20 0a 20 20 20 20 20 20 28 73 74 72  TF8, .      (str
a5c0: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a  uct compareInfo*
a5d0: 29 26 67 6c 6f 62 49 6e 66 6f 2c 20 6c 69 6b 65  )&globInfo, like
a5e0: 46 75 6e 63 2c 20 30 2c 30 29 3b 0a 20 20 73 65  Func, 0,0);.  se
a5f0: 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 64 62 2c  tLikeOptFlag(db,
a600: 20 22 67 6c 6f 62 22 2c 20 53 51 4c 49 54 45 5f   "glob", SQLITE_
a610: 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49  FUNC_LIKE | SQLI
a620: 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3b 0a 20  TE_FUNC_CASE);. 
a630: 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28   setLikeOptFlag(
a640: 64 62 2c 20 22 6c 69 6b 65 22 2c 20 0a 20 20 20  db, "like", .   
a650: 20 20 20 63 61 73 65 53 65 6e 73 69 74 69 76 65     caseSensitive
a660: 20 3f 20 28 53 51 4c 49 54 45 5f 46 55 4e 43 5f   ? (SQLITE_FUNC_
a670: 4c 49 4b 45 20 7c 20 53 51 4c 49 54 45 5f 46 55  LIKE | SQLITE_FU
a680: 4e 43 5f 43 41 53 45 29 20 3a 20 53 51 4c 49 54  NC_CASE) : SQLIT
a690: 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 3b 0a 7d 0a  E_FUNC_LIKE);.}.
a6a0: 0a 2f 2a 0a 2a 2a 20 70 45 78 70 72 20 70 6f 69  ./*.** pExpr poi
a6b0: 6e 74 73 20 74 6f 20 61 6e 20 65 78 70 72 65 73  nts to an expres
a6c0: 73 69 6f 6e 20 77 68 69 63 68 20 69 6d 70 6c 65  sion which imple
a6d0: 6d 65 6e 74 73 20 61 20 66 75 6e 63 74 69 6f 6e  ments a function
a6e0: 2e 20 20 49 66 0a 2a 2a 20 69 74 20 69 73 20 61  .  If.** it is a
a6f0: 70 70 72 6f 70 72 69 61 74 65 20 74 6f 20 61 70  ppropriate to ap
a700: 70 6c 79 20 74 68 65 20 4c 49 4b 45 20 6f 70 74  ply the LIKE opt
a710: 69 6d 69 7a 61 74 69 6f 6e 20 74 6f 20 74 68 61  imization to tha
a720: 74 20 66 75 6e 63 74 69 6f 6e 0a 2a 2a 20 74 68  t function.** th
a730: 65 6e 20 73 65 74 20 61 57 63 5b 30 5d 20 74 68  en set aWc[0] th
a740: 72 6f 75 67 68 20 61 57 63 5b 32 5d 20 74 6f 20  rough aWc[2] to 
a750: 74 68 65 20 77 69 6c 64 63 61 72 64 20 63 68 61  the wildcard cha
a760: 72 61 63 74 65 72 73 20 61 6e 64 0a 2a 2a 20 72  racters and.** r
a770: 65 74 75 72 6e 20 54 52 55 45 2e 20 20 49 66 20  eturn TRUE.  If 
a780: 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 69 73 20  the function is 
a790: 6e 6f 74 20 61 20 4c 49 4b 45 2d 73 74 79 6c 65  not a LIKE-style
a7a0: 20 66 75 6e 63 74 69 6f 6e 20 74 68 65 6e 0a 2a   function then.*
a7b0: 2a 20 72 65 74 75 72 6e 20 46 41 4c 53 45 2e 0a  * return FALSE..
a7c0: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 49 73  */.int sqlite3Is
a7d0: 4c 69 6b 65 46 75 6e 63 74 69 6f 6e 28 73 71 6c  LikeFunction(sql
a7e0: 69 74 65 33 20 2a 64 62 2c 20 45 78 70 72 20 2a  ite3 *db, Expr *
a7f0: 70 45 78 70 72 2c 20 69 6e 74 20 2a 70 49 73 4e  pExpr, int *pIsN
a800: 6f 63 61 73 65 2c 20 63 68 61 72 20 2a 61 57 63  ocase, char *aWc
a810: 29 7b 0a 20 20 46 75 6e 63 44 65 66 20 2a 70 44  ){.  FuncDef *pD
a820: 65 66 3b 0a 20 20 69 66 28 20 70 45 78 70 72 2d  ef;.  if( pExpr-
a830: 3e 6f 70 21 3d 54 4b 5f 46 55 4e 43 54 49 4f 4e  >op!=TK_FUNCTION
a840: 20 7c 7c 20 21 70 45 78 70 72 2d 3e 70 4c 69 73   || !pExpr->pLis
a850: 74 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  t ){.    return 
a860: 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 45 78  0;.  }.  if( pEx
a870: 70 72 2d 3e 70 4c 69 73 74 2d 3e 6e 45 78 70 72  pr->pList->nExpr
a880: 21 3d 32 20 29 7b 0a 20 20 20 20 72 65 74 75 72  !=2 ){.    retur
a890: 6e 20 30 3b 0a 20 20 7d 0a 20 20 70 44 65 66 20  n 0;.  }.  pDef 
a8a0: 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e  = sqlite3FindFun
a8b0: 63 74 69 6f 6e 28 64 62 2c 20 28 63 68 61 72 2a  ction(db, (char*
a8c0: 29 70 45 78 70 72 2d 3e 74 6f 6b 65 6e 2e 7a 2c  )pExpr->token.z,
a8d0: 20 70 45 78 70 72 2d 3e 74 6f 6b 65 6e 2e 6e 2c   pExpr->token.n,
a8e0: 20 32 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20   2,.            
a8f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a900: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 29   SQLITE_UTF8, 0)
a910: 3b 0a 20 20 69 66 28 20 70 44 65 66 3d 3d 30 20  ;.  if( pDef==0 
a920: 7c 7c 20 28 70 44 65 66 2d 3e 66 6c 61 67 73 20  || (pDef->flags 
a930: 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49  & SQLITE_FUNC_LI
a940: 4b 45 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65  KE)==0 ){.    re
a950: 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f  turn 0;.  }..  /
a960: 2a 20 54 68 65 20 6d 65 6d 63 70 79 28 29 20 73  * The memcpy() s
a970: 74 61 74 65 6d 65 6e 74 20 61 73 73 75 6d 65 73  tatement assumes
a980: 20 74 68 61 74 20 74 68 65 20 77 69 6c 64 63 61   that the wildca
a990: 72 64 20 63 68 61 72 61 63 74 65 72 73 20 61 72  rd characters ar
a9a0: 65 0a 20 20 2a 2a 20 74 68 65 20 66 69 72 73 74  e.  ** the first
a9b0: 20 74 68 72 65 65 20 73 74 61 74 65 6d 65 6e 74   three statement
a9c0: 73 20 69 6e 20 74 68 65 20 63 6f 6d 70 61 72 65  s in the compare
a9d0: 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65 2e 20  Info structure. 
a9e0: 20 54 68 65 0a 20 20 2a 2a 20 61 73 73 65 72 74   The.  ** assert
a9f0: 73 28 29 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20  s() that follow 
aa00: 76 65 72 69 66 79 20 74 68 61 74 20 61 73 73 75  verify that assu
aa10: 6d 70 74 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6d 65  mption.  */.  me
aa20: 6d 63 70 79 28 61 57 63 2c 20 70 44 65 66 2d 3e  mcpy(aWc, pDef->
aa30: 70 55 73 65 72 44 61 74 61 2c 20 33 29 3b 0a 20  pUserData, 3);. 
aa40: 20 61 73 73 65 72 74 28 20 28 63 68 61 72 2a 29   assert( (char*)
aa50: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d 3d 20  &likeInfoAlt == 
aa60: 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f  (char*)&likeInfo
aa70: 41 6c 74 2e 6d 61 74 63 68 41 6c 6c 20 29 3b 0a  Alt.matchAll );.
aa80: 20 20 61 73 73 65 72 74 28 20 26 28 28 63 68 61    assert( &((cha
aa90: 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 29  r*)&likeInfoAlt)
aaa0: 5b 31 5d 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c  [1] == (char*)&l
aab0: 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68  ikeInfoAlt.match
aac0: 4f 6e 65 20 29 3b 0a 20 20 61 73 73 65 72 74 28  One );.  assert(
aad0: 20 26 28 28 63 68 61 72 2a 29 26 6c 69 6b 65 49   &((char*)&likeI
aae0: 6e 66 6f 41 6c 74 29 5b 32 5d 20 3d 3d 20 28 63  nfoAlt)[2] == (c
aaf0: 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c  har*)&likeInfoAl
ab00: 74 2e 6d 61 74 63 68 53 65 74 20 29 3b 0a 20 20  t.matchSet );.  
ab10: 2a 70 49 73 4e 6f 63 61 73 65 20 3d 20 28 70 44  *pIsNocase = (pD
ab20: 65 66 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49  ef->flags & SQLI
ab30: 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d 3d 30  TE_FUNC_CASE)==0
ab40: 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a  ;.  return 1;.}.