/ Hex Artifact Content
Login

Artifact 301b81af2e831b2e929f0ba252739c32a0c756e5:


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 39 39 20 32 30 30 35 2f 30 36 2f 32 32 20  1.99 2005/06/22 
02a0: 31 30 3a 35 33 3a 35 39 20 64 72 68 20 45 78 70  10:53:59 drh Exp
02b0: 20 24 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22   $.*/.#include "
02c0: 73 71 6c 69 74 65 49 6e 74 2e 68 22 0a 23 69 6e  sqliteInt.h".#in
02d0: 63 6c 75 64 65 20 3c 63 74 79 70 65 2e 68 3e 0a  clude <ctype.h>.
02e0: 23 69 6e 63 6c 75 64 65 20 3c 6d 61 74 68 2e 68  #include <math.h
02f0: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64 6c  >.#include <stdl
0300: 69 62 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c  ib.h>.#include <
0310: 61 73 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c 75  assert.h>.#inclu
0320: 64 65 20 22 76 64 62 65 49 6e 74 2e 68 22 0a 23  de "vdbeInt.h".#
0330: 69 6e 63 6c 75 64 65 20 22 6f 73 2e 68 22 0a 0a  include "os.h"..
0340: 73 74 61 74 69 63 20 43 6f 6c 6c 53 65 71 20 2a  static CollSeq *
0350: 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f  sqlite3GetFuncCo
0360: 6c 6c 53 65 71 28 73 71 6c 69 74 65 33 5f 63 6f  llSeq(sqlite3_co
0370: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b  ntext *context){
0380: 0a 20 20 72 65 74 75 72 6e 20 63 6f 6e 74 65 78  .  return contex
0390: 74 2d 3e 70 43 6f 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a  t->pColl;.}../*.
03a0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
03b0: 6e 20 6f 66 20 74 68 65 20 6e 6f 6e 2d 61 67 67  n of the non-agg
03c0: 72 65 67 61 74 65 20 6d 69 6e 28 29 20 61 6e 64  regate min() and
03d0: 20 6d 61 78 28 29 20 66 75 6e 63 74 69 6f 6e 73   max() functions
03e0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
03f0: 6d 69 6e 6d 61 78 46 75 6e 63 28 0a 20 20 73 71  minmaxFunc(.  sq
0400: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
0410: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
0420: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
0430: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
0440: 69 6e 74 20 69 3b 0a 20 20 69 6e 74 20 6d 61 73  int i;.  int mas
0450: 6b 3b 20 20 20 20 2f 2a 20 30 20 66 6f 72 20 6d  k;    /* 0 for m
0460: 69 6e 28 29 20 6f 72 20 30 78 66 66 66 66 66 66  in() or 0xffffff
0470: 66 66 20 66 6f 72 20 6d 61 78 28 29 20 2a 2f 0a  ff for max() */.
0480: 20 20 69 6e 74 20 69 42 65 73 74 3b 0a 20 20 43    int iBest;.  C
0490: 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 3b 0a 0a  ollSeq *pColl;..
04a0: 20 20 69 66 28 20 61 72 67 63 3d 3d 30 20 29 20    if( argc==0 ) 
04b0: 72 65 74 75 72 6e 3b 0a 20 20 6d 61 73 6b 20 3d  return;.  mask =
04c0: 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61   sqlite3_user_da
04d0: 74 61 28 63 6f 6e 74 65 78 74 29 3d 3d 30 20 3f  ta(context)==0 ?
04e0: 20 30 20 3a 20 2d 31 3b 0a 20 20 70 43 6f 6c 6c   0 : -1;.  pColl
04f0: 20 3d 20 73 71 6c 69 74 65 33 47 65 74 46 75 6e   = sqlite3GetFun
0500: 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74 65 78 74  cCollSeq(context
0510: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 43 6f  );.  assert( pCo
0520: 6c 6c 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20  ll );.  assert( 
0530: 6d 61 73 6b 3d 3d 2d 31 20 7c 7c 20 6d 61 73 6b  mask==-1 || mask
0540: 3d 3d 30 20 29 3b 0a 20 20 69 42 65 73 74 20 3d  ==0 );.  iBest =
0550: 20 30 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65   0;.  if( sqlite
0560: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
0570: 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[0])==SQLITE_NU
0580: 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 66  LL ) return;.  f
0590: 6f 72 28 69 3d 31 3b 20 69 3c 61 72 67 63 3b 20  or(i=1; i<argc; 
05a0: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 73 71  i++){.    if( sq
05b0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
05c0: 28 61 72 67 76 5b 69 5d 29 3d 3d 53 51 4c 49 54  (argv[i])==SQLIT
05d0: 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b  E_NULL ) return;
05e0: 0a 20 20 20 20 69 66 28 20 28 73 71 6c 69 74 65  .    if( (sqlite
05f0: 33 4d 65 6d 43 6f 6d 70 61 72 65 28 61 72 67 76  3MemCompare(argv
0600: 5b 69 42 65 73 74 5d 2c 20 61 72 67 76 5b 69 5d  [iBest], argv[i]
0610: 2c 20 70 43 6f 6c 6c 29 5e 6d 61 73 6b 29 3e 3d  , pColl)^mask)>=
0620: 30 20 29 7b 0a 20 20 20 20 20 20 69 42 65 73 74  0 ){.      iBest
0630: 20 3d 20 69 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a   = i;.    }.  }.
0640: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
0650: 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20  _value(context, 
0660: 61 72 67 76 5b 69 42 65 73 74 5d 29 3b 0a 7d 0a  argv[iBest]);.}.
0670: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68  ./*.** Return th
0680: 65 20 74 79 70 65 20 6f 66 20 74 68 65 20 61 72  e type of the ar
0690: 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69  gument..*/.stati
06a0: 63 20 76 6f 69 64 20 74 79 70 65 6f 66 46 75 6e  c void typeofFun
06b0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
06c0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
06d0: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
06e0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
06f0: 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61  v.){.  const cha
0700: 72 20 2a 7a 20 3d 20 30 3b 0a 20 20 73 77 69 74  r *z = 0;.  swit
0710: 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ch( sqlite3_valu
0720: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20  e_type(argv[0]) 
0730: 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49  ){.    case SQLI
0740: 54 45 5f 4e 55 4c 4c 3a 20 20 20 20 7a 20 3d 20  TE_NULL:    z = 
0750: 22 6e 75 6c 6c 22 3b 20 20 20 20 62 72 65 61 6b  "null";    break
0760: 3b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  ;.    case SQLIT
0770: 45 5f 49 4e 54 45 47 45 52 3a 20 7a 20 3d 20 22  E_INTEGER: z = "
0780: 69 6e 74 65 67 65 72 22 3b 20 62 72 65 61 6b 3b  integer"; break;
0790: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
07a0: 5f 54 45 58 54 3a 20 20 20 20 7a 20 3d 20 22 74  _TEXT:    z = "t
07b0: 65 78 74 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a  ext";    break;.
07c0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
07d0: 46 4c 4f 41 54 3a 20 20 20 7a 20 3d 20 22 72 65  FLOAT:   z = "re
07e0: 61 6c 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20  al";    break;. 
07f0: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42     case SQLITE_B
0800: 4c 4f 42 3a 20 20 20 20 7a 20 3d 20 22 62 6c 6f  LOB:    z = "blo
0810: 62 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  b";    break;.  
0820: 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  }.  sqlite3_resu
0830: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
0840: 20 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53   z, -1, SQLITE_S
0850: 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  TATIC);.}../*.**
0860: 20 43 6f 6e 76 65 72 74 20 74 68 65 20 61 72 67   Convert the arg
0870: 75 6d 65 6e 74 20 74 6f 20 61 20 6e 75 6d 65 72  ument to a numer
0880: 69 63 20 74 79 70 65 2e 0a 2a 2f 0a 73 74 61 74  ic type..*/.stat
0890: 69 63 20 76 6f 69 64 20 6e 75 6d 65 72 69 63 46  ic void numericF
08a0: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
08b0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
08c0: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
08d0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
08e0: 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63  rgv.){.  const c
08f0: 68 61 72 20 2a 7a 20 3d 20 30 3b 0a 20 20 73 77  har *z = 0;.  sw
0900: 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61  itch( sqlite3_va
0910: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
0920: 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51  ) ){.    case SQ
0930: 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20  LITE_NULL: {.   
0940: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
0950: 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 30  t_int(context, 0
0960: 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  );.      break;.
0970: 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 53      }.    case S
0980: 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 0a 20  QLITE_INTEGER:. 
0990: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 46     case SQLITE_F
09a0: 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 73 71  LOAT: {.      sq
09b0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c  lite3_result_val
09c0: 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76  ue(context, argv
09d0: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 62 72 65 61  [0]);.      brea
09e0: 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73  k;.    }.    cas
09f0: 65 20 53 51 4c 49 54 45 5f 54 45 58 54 3a 0a 20  e SQLITE_TEXT:. 
0a00: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42     case SQLITE_B
0a10: 4c 4f 42 3a 20 7b 0a 20 20 20 20 20 20 7a 20 3d  LOB: {.      z =
0a20: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
0a30: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
0a40: 20 20 20 20 77 68 69 6c 65 28 20 2a 7a 20 26 26      while( *z &&
0a50: 20 2a 7a 21 3d 27 2e 27 20 29 7b 20 7a 2b 2b 3b   *z!='.' ){ z++;
0a60: 20 7d 0a 20 20 20 20 20 20 69 66 28 20 2a 7a 20   }.      if( *z 
0a70: 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  ){.        sqlit
0a80: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
0a90: 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65  (context, sqlite
0aa0: 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61  3_value_double(a
0ab0: 72 67 76 5b 30 5d 29 29 3b 0a 20 20 20 20 20 20  rgv[0]));.      
0ac0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 73  }else{.        s
0ad0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
0ae0: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  t64(context, sql
0af0: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34  ite3_value_int64
0b00: 28 61 72 67 76 5b 30 5d 29 29 3b 0a 20 20 20 20  (argv[0]));.    
0b10: 20 20 7d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b    }.      break;
0b20: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
0b30: 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 74 68 65 20  .** Convert the 
0b40: 61 72 67 75 6d 65 6e 74 20 74 6f 20 54 45 58 54  argument to TEXT
0b50: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
0b60: 74 65 78 74 46 75 6e 63 28 0a 20 20 73 71 6c 69  textFunc(.  sqli
0b70: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
0b80: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
0b90: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
0ba0: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 73 77  e **argv.){.  sw
0bb0: 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61  itch( sqlite3_va
0bc0: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
0bd0: 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51  ) ){.    case SQ
0be0: 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20  LITE_NULL: {.   
0bf0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
0c00: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
0c10: 22 22 2c 20 30 2c 20 53 51 4c 49 54 45 5f 53 54  "", 0, SQLITE_ST
0c20: 41 54 49 43 29 3b 0a 20 20 20 20 20 20 62 72 65  ATIC);.      bre
0c30: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61  ak;.    }.    ca
0c40: 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a 0a  se SQLITE_BLOB:.
0c50: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
0c60: 49 4e 54 45 47 45 52 3a 0a 20 20 20 20 63 61 73  INTEGER:.    cas
0c70: 65 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20  e SQLITE_FLOAT: 
0c80: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
0c90: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
0ca0: 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  ext, sqlite3_val
0cb0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
0cc0: 2c 0a 20 20 20 20 20 20 20 20 20 20 73 71 6c 69  ,.          sqli
0cd0: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
0ce0: 61 72 67 76 5b 30 5d 29 2c 20 53 51 4c 49 54 45  argv[0]), SQLITE
0cf0: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20  _TRANSIENT);.   
0d00: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
0d10: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
0d20: 54 45 58 54 3a 20 7b 0a 20 20 20 20 20 20 73 71  TEXT: {.      sq
0d30: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c  lite3_result_val
0d40: 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76  ue(context, argv
0d50: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 62 72 65 61  [0]);.      brea
0d60: 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a  k;.    }.  }.}..
0d70: 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 74 68  /*.** Convert th
0d80: 65 20 61 72 67 75 6d 65 6e 74 20 74 6f 20 54 45  e argument to TE
0d90: 58 54 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  XT.*/.static voi
0da0: 64 20 62 6c 6f 62 46 75 6e 63 28 0a 20 20 73 71  d blobFunc(.  sq
0db0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
0dc0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
0dd0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
0de0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
0df0: 73 77 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f  switch( sqlite3_
0e00: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
0e10: 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20  0]) ){.    case 
0e20: 53 51 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a 20  SQLITE_NULL: {. 
0e30: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
0e40: 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e 74 65 78 74  ult_blob(context
0e50: 2c 20 22 22 2c 20 30 2c 20 53 51 4c 49 54 45 5f  , "", 0, SQLITE_
0e60: 53 54 41 54 49 43 29 3b 0a 20 20 20 20 20 20 62  STATIC);.      b
0e70: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20  reak;.    }.    
0e80: 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58 54  case SQLITE_TEXT
0e90: 3a 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  :.    case SQLIT
0ea0: 45 5f 49 4e 54 45 47 45 52 3a 0a 20 20 20 20 63  E_INTEGER:.    c
0eb0: 61 73 65 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54  ase SQLITE_FLOAT
0ec0: 3a 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  : {.      sqlite
0ed0: 33 5f 72 65 73 75 6c 74 5f 62 6c 6f 62 28 63 6f  3_result_blob(co
0ee0: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 76  ntext, sqlite3_v
0ef0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
0f00: 5d 29 2c 0a 20 20 20 20 20 20 20 20 20 20 73 71  ]),.          sq
0f10: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
0f20: 73 28 61 72 67 76 5b 30 5d 29 2c 20 53 51 4c 49  s(argv[0]), SQLI
0f30: 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20  TE_TRANSIENT);. 
0f40: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
0f50: 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  }.    case SQLIT
0f60: 45 5f 42 4c 4f 42 3a 20 7b 0a 20 20 20 20 20 20  E_BLOB: {.      
0f70: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76  sqlite3_result_v
0f80: 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72  alue(context, ar
0f90: 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 62 72  gv[0]);.      br
0fa0: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  eak;.    }.  }.}
0fb0: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
0fc0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 65  tation of the le
0fd0: 6e 67 74 68 28 29 20 66 75 6e 63 74 69 6f 6e 0a  ngth() function.
0fe0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
0ff0: 65 6e 67 74 68 46 75 6e 63 28 0a 20 20 73 71 6c  engthFunc(.  sql
1000: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
1010: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
1020: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
1030: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
1040: 6e 74 20 6c 65 6e 3b 0a 0a 20 20 61 73 73 65 72  nt len;..  asser
1050: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
1060: 73 77 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f  switch( sqlite3_
1070: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
1080: 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20  0]) ){.    case 
1090: 53 51 4c 49 54 45 5f 42 4c 4f 42 3a 0a 20 20 20  SQLITE_BLOB:.   
10a0: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54   case SQLITE_INT
10b0: 45 47 45 52 3a 0a 20 20 20 20 63 61 73 65 20 53  EGER:.    case S
10c0: 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20  QLITE_FLOAT: {. 
10d0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
10e0: 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c  ult_int(context,
10f0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
1100: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 29 3b 0a  ytes(argv[0]));.
1110: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
1120: 20 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49   }.    case SQLI
1130: 54 45 5f 54 45 58 54 3a 20 7b 0a 20 20 20 20 20  TE_TEXT: {.     
1140: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d   const char *z =
1150: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
1160: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
1170: 20 20 20 20 66 6f 72 28 6c 65 6e 3d 30 3b 20 2a      for(len=0; *
1180: 7a 3b 20 7a 2b 2b 29 7b 20 69 66 28 20 28 30 78  z; z++){ if( (0x
1190: 63 30 26 2a 7a 29 21 3d 30 78 38 30 20 29 20 6c  c0&*z)!=0x80 ) l
11a0: 65 6e 2b 2b 3b 20 7d 0a 20 20 20 20 20 20 73 71  en++; }.      sq
11b0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
11c0: 28 63 6f 6e 74 65 78 74 2c 20 6c 65 6e 29 3b 0a  (context, len);.
11d0: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
11e0: 20 7d 0a 20 20 20 20 64 65 66 61 75 6c 74 3a 20   }.    default: 
11f0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
1200: 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74  result_null(cont
1210: 65 78 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61  ext);.      brea
1220: 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a  k;.    }.  }.}..
1230: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
1240: 74 69 6f 6e 20 6f 66 20 74 68 65 20 61 62 73 28  tion of the abs(
1250: 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74  ) function.*/.st
1260: 61 74 69 63 20 76 6f 69 64 20 61 62 73 46 75 6e  atic void absFun
1270: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
1280: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
1290: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
12a0: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 61  lue **argv){.  a
12b0: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
12c0: 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71 6c 69  ;.  switch( sqli
12d0: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
12e0: 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63  rgv[0]) ){.    c
12f0: 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54 45 47  ase SQLITE_INTEG
1300: 45 52 3a 20 7b 0a 20 20 20 20 20 20 69 36 34 20  ER: {.      i64 
1310: 69 56 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76  iVal = sqlite3_v
1320: 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67 76 5b  alue_int64(argv[
1330: 30 5d 29 3b 0a 20 20 20 20 20 20 69 66 28 20 69  0]);.      if( i
1340: 56 61 6c 3c 30 20 29 20 69 56 61 6c 20 3d 20 69  Val<0 ) iVal = i
1350: 56 61 6c 20 2a 20 2d 31 3b 0a 20 20 20 20 20 20  Val * -1;.      
1360: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
1370: 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 69 56  nt64(context, iV
1380: 61 6c 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b  al);.      break
1390: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65  ;.    }.    case
13a0: 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a   SQLITE_NULL: {.
13b0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
13c0: 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78  sult_null(contex
13d0: 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  t);.      break;
13e0: 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75  .    }.    defau
13f0: 6c 74 3a 20 7b 0a 20 20 20 20 20 20 64 6f 75 62  lt: {.      doub
1400: 6c 65 20 72 56 61 6c 20 3d 20 73 71 6c 69 74 65  le rVal = sqlite
1410: 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61  3_value_double(a
1420: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69  rgv[0]);.      i
1430: 66 28 20 72 56 61 6c 3c 30 20 29 20 72 56 61 6c  f( rVal<0 ) rVal
1440: 20 3d 20 72 56 61 6c 20 2a 20 2d 31 2e 30 3b 0a   = rVal * -1.0;.
1450: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
1460: 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74  sult_double(cont
1470: 65 78 74 2c 20 72 56 61 6c 29 3b 0a 20 20 20 20  ext, rVal);.    
1480: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
1490: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c   }.}../*.** Impl
14a0: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
14b0: 65 20 73 75 62 73 74 72 28 29 20 66 75 6e 63 74  e substr() funct
14c0: 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  ion.*/.static vo
14d0: 69 64 20 73 75 62 73 74 72 46 75 6e 63 28 0a 20  id substrFunc(. 
14e0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
14f0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
1500: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
1510: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
1520: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
1530: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
1540: 7a 32 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69  z2;.  int i;.  i
1550: 6e 74 20 70 31 2c 20 70 32 2c 20 6c 65 6e 3b 0a  nt p1, p2, len;.
1560: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
1570: 3d 33 20 29 3b 0a 20 20 7a 20 3d 20 73 71 6c 69  =3 );.  z = sqli
1580: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
1590: 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a  rgv[0]);.  if( z
15a0: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
15b0: 70 31 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  p1 = sqlite3_val
15c0: 75 65 5f 69 6e 74 28 61 72 67 76 5b 31 5d 29 3b  ue_int(argv[1]);
15d0: 0a 20 20 70 32 20 3d 20 73 71 6c 69 74 65 33 5f  .  p2 = sqlite3_
15e0: 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 32  value_int(argv[2
15f0: 5d 29 3b 0a 20 20 66 6f 72 28 6c 65 6e 3d 30 2c  ]);.  for(len=0,
1600: 20 7a 32 3d 7a 3b 20 2a 7a 32 3b 20 7a 32 2b 2b   z2=z; *z2; z2++
1610: 29 7b 20 69 66 28 20 28 30 78 63 30 26 2a 7a 32  ){ if( (0xc0&*z2
1620: 29 21 3d 30 78 38 30 20 29 20 6c 65 6e 2b 2b 3b  )!=0x80 ) len++;
1630: 20 7d 0a 20 20 69 66 28 20 70 31 3c 30 20 29 7b   }.  if( p1<0 ){
1640: 0a 20 20 20 20 70 31 20 2b 3d 20 6c 65 6e 3b 0a  .    p1 += len;.
1650: 20 20 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a      if( p1<0 ){.
1660: 20 20 20 20 20 20 70 32 20 2b 3d 20 70 31 3b 0a        p2 += p1;.
1670: 20 20 20 20 20 20 70 31 20 3d 20 30 3b 0a 20 20        p1 = 0;.  
1680: 20 20 7d 0a 20 20 7d 65 6c 73 65 20 69 66 28 20    }.  }else if( 
1690: 70 31 3e 30 20 29 7b 0a 20 20 20 20 70 31 2d 2d  p1>0 ){.    p1--
16a0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 31 2b 70  ;.  }.  if( p1+p
16b0: 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20 70 32 20  2>len ){.    p2 
16c0: 3d 20 6c 65 6e 2d 70 31 3b 0a 20 20 7d 0a 20 20  = len-p1;.  }.  
16d0: 66 6f 72 28 69 3d 30 3b 20 69 3c 70 31 20 26 26  for(i=0; i<p1 &&
16e0: 20 7a 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20   z[i]; i++){.   
16f0: 20 69 66 28 20 28 7a 5b 69 5d 26 30 78 63 30 29   if( (z[i]&0xc0)
1700: 3d 3d 30 78 38 30 20 29 20 70 31 2b 2b 3b 0a 20  ==0x80 ) p1++;. 
1710: 20 7d 0a 20 20 77 68 69 6c 65 28 20 7a 5b 69 5d   }.  while( z[i]
1720: 20 26 26 20 28 7a 5b 69 5d 26 30 78 63 30 29 3d   && (z[i]&0xc0)=
1730: 3d 30 78 38 30 20 29 7b 20 69 2b 2b 3b 20 70 31  =0x80 ){ i++; p1
1740: 2b 2b 3b 20 7d 0a 20 20 66 6f 72 28 3b 20 69 3c  ++; }.  for(; i<
1750: 70 31 2b 70 32 20 26 26 20 7a 5b 69 5d 3b 20 69  p1+p2 && z[i]; i
1760: 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 28 7a 5b  ++){.    if( (z[
1770: 69 5d 26 30 78 63 30 29 3d 3d 30 78 38 30 20 29  i]&0xc0)==0x80 )
1780: 20 70 32 2b 2b 3b 0a 20 20 7d 0a 20 20 77 68 69   p2++;.  }.  whi
1790: 6c 65 28 20 7a 5b 69 5d 20 26 26 20 28 7a 5b 69  le( z[i] && (z[i
17a0: 5d 26 30 78 63 30 29 3d 3d 30 78 38 30 20 29 7b  ]&0xc0)==0x80 ){
17b0: 20 69 2b 2b 3b 20 70 32 2b 2b 3b 20 7d 0a 20 20   i++; p2++; }.  
17c0: 69 66 28 20 70 32 3c 30 20 29 20 70 32 20 3d 20  if( p2<0 ) p2 = 
17d0: 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  0;.  sqlite3_res
17e0: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
17f0: 2c 20 26 7a 5b 70 31 5d 2c 20 70 32 2c 20 53 51  , &z[p1], p2, SQ
1800: 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b  LITE_TRANSIENT);
1810: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
1820: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
1830: 72 6f 75 6e 64 28 29 20 66 75 6e 63 74 69 6f 6e  round() function
1840: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
1850: 72 6f 75 6e 64 46 75 6e 63 28 73 71 6c 69 74 65  roundFunc(sqlite
1860: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
1870: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
1880: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
1890: 67 76 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30  gv){.  int n = 0
18a0: 3b 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20  ;.  double r;.  
18b0: 63 68 61 72 20 7a 42 75 66 5b 31 30 30 5d 3b 0a  char zBuf[100];.
18c0: 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d    assert( argc==
18d0: 31 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a  1 || argc==2 );.
18e0: 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29 7b    if( argc==2 ){
18f0: 0a 20 20 20 20 69 66 28 20 53 51 4c 49 54 45 5f  .    if( SQLITE_
1900: 4e 55 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61  NULL==sqlite3_va
1910: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d  lue_type(argv[1]
1920: 29 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  ) ) return;.    
1930: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
1940: 65 5f 69 6e 74 28 61 72 67 76 5b 31 5d 29 3b 0a  e_int(argv[1]);.
1950: 20 20 20 20 69 66 28 20 6e 3e 33 30 20 29 20 6e      if( n>30 ) n
1960: 20 3d 20 33 30 3b 0a 20 20 20 20 69 66 28 20 6e   = 30;.    if( n
1970: 3c 30 20 29 20 6e 20 3d 20 30 3b 0a 20 20 7d 0a  <0 ) n = 0;.  }.
1980: 20 20 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c    if( SQLITE_NUL
1990: 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  L==sqlite3_value
19a0: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29  _type(argv[0]) )
19b0: 20 72 65 74 75 72 6e 3b 0a 20 20 72 20 3d 20 73   return;.  r = s
19c0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75  qlite3_value_dou
19d0: 62 6c 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ble(argv[0]);.  
19e0: 73 70 72 69 6e 74 66 28 7a 42 75 66 2c 22 25 2e  sprintf(zBuf,"%.
19f0: 2a 66 22 2c 6e 2c 72 29 3b 0a 20 20 73 71 6c 69  *f",n,r);.  sqli
1a00: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
1a10: 63 6f 6e 74 65 78 74 2c 20 7a 42 75 66 2c 20 2d  context, zBuf, -
1a20: 31 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49  1, SQLITE_TRANSI
1a30: 45 4e 54 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  ENT);.}../*.** I
1a40: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
1a50: 20 74 68 65 20 75 70 70 65 72 28 29 20 61 6e 64   the upper() and
1a60: 20 6c 6f 77 65 72 28 29 20 53 51 4c 20 66 75 6e   lower() SQL fun
1a70: 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69  ctions..*/.stati
1a80: 63 20 76 6f 69 64 20 75 70 70 65 72 46 75 6e 63  c void upperFunc
1a90: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
1aa0: 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61   *context, int a
1ab0: 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  rgc, sqlite3_val
1ac0: 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 75 6e  ue **argv){.  un
1ad0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0a  signed char *z;.
1ae0: 20 20 69 6e 74 20 69 3b 0a 20 20 69 66 28 20 61    int i;.  if( a
1af0: 72 67 63 3c 31 20 7c 7c 20 53 51 4c 49 54 45 5f  rgc<1 || SQLITE_
1b00: 4e 55 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61  NULL==sqlite3_va
1b10: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
1b20: 29 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 7a 20  ) ) return;.  z 
1b30: 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 73  = sqliteMalloc(s
1b40: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
1b50: 65 73 28 61 72 67 76 5b 30 5d 29 2b 31 29 3b 0a  es(argv[0])+1);.
1b60: 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74    if( z==0 ) ret
1b70: 75 72 6e 3b 0a 20 20 73 74 72 63 70 79 28 7a 2c  urn;.  strcpy(z,
1b80: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
1b90: 65 78 74 28 61 72 67 76 5b 30 5d 29 29 3b 0a 20  ext(argv[0]));. 
1ba0: 20 66 6f 72 28 69 3d 30 3b 20 7a 5b 69 5d 3b 20   for(i=0; z[i]; 
1bb0: 69 2b 2b 29 7b 0a 20 20 20 20 7a 5b 69 5d 20 3d  i++){.    z[i] =
1bc0: 20 74 6f 75 70 70 65 72 28 7a 5b 69 5d 29 3b 0a   toupper(z[i]);.
1bd0: 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65    }.  sqlite3_re
1be0: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
1bf0: 74 2c 20 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 45  t, z, -1, SQLITE
1c00: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 73  _TRANSIENT);.  s
1c10: 71 6c 69 74 65 46 72 65 65 28 7a 29 3b 0a 7d 0a  qliteFree(z);.}.
1c20: 73 74 61 74 69 63 20 76 6f 69 64 20 6c 6f 77 65  static void lowe
1c30: 72 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  rFunc(sqlite3_co
1c40: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
1c50: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
1c60: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
1c70: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
1c80: 20 2a 7a 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20   *z;.  int i;.  
1c90: 69 66 28 20 61 72 67 63 3c 31 20 7c 7c 20 53 51  if( argc<1 || SQ
1ca0: 4c 49 54 45 5f 4e 55 4c 4c 3d 3d 73 71 6c 69 74  LITE_NULL==sqlit
1cb0: 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72  e3_value_type(ar
1cc0: 67 76 5b 30 5d 29 20 29 20 72 65 74 75 72 6e 3b  gv[0]) ) return;
1cd0: 0a 20 20 7a 20 3d 20 73 71 6c 69 74 65 4d 61 6c  .  z = sqliteMal
1ce0: 6c 6f 63 28 73 71 6c 69 74 65 33 5f 76 61 6c 75  loc(sqlite3_valu
1cf0: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29  e_bytes(argv[0])
1d00: 2b 31 29 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20  +1);.  if( z==0 
1d10: 29 20 72 65 74 75 72 6e 3b 0a 20 20 73 74 72 63  ) return;.  strc
1d20: 70 79 28 7a 2c 20 73 71 6c 69 74 65 33 5f 76 61  py(z, sqlite3_va
1d30: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
1d40: 29 29 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 7a  ));.  for(i=0; z
1d50: 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 7a  [i]; i++){.    z
1d60: 5b 69 5d 20 3d 20 74 6f 6c 6f 77 65 72 28 7a 5b  [i] = tolower(z[
1d70: 69 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  i]);.  }.  sqlit
1d80: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
1d90: 6f 6e 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 53  ontext, z, -1, S
1da0: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29  QLITE_TRANSIENT)
1db0: 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 7a  ;.  sqliteFree(z
1dc0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  );.}../*.** Impl
1dd0: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
1de0: 65 20 49 46 4e 55 4c 4c 28 29 2c 20 4e 56 4c 28  e IFNULL(), NVL(
1df0: 29 2c 20 61 6e 64 20 43 4f 41 4c 45 53 43 45 28  ), and COALESCE(
1e00: 29 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 0a 2a  ) functions.  .*
1e10: 2a 20 41 6c 6c 20 74 68 72 65 65 20 64 6f 20 74  * All three do t
1e20: 68 65 20 73 61 6d 65 20 74 68 69 6e 67 2e 20 20  he same thing.  
1e30: 54 68 65 79 20 72 65 74 75 72 6e 20 74 68 65 20  They return the 
1e40: 66 69 72 73 74 20 6e 6f 6e 2d 4e 55 4c 4c 0a 2a  first non-NULL.*
1e50: 2a 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73  * argument..*/.s
1e60: 74 61 74 69 63 20 76 6f 69 64 20 69 66 6e 75 6c  tatic void ifnul
1e70: 6c 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  lFunc(.  sqlite3
1e80: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
1e90: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
1ea0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
1eb0: 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69  *argv.){.  int i
1ec0: 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 61  ;.  for(i=0; i<a
1ed0: 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69  rgc; i++){.    i
1ee0: 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 21 3d  f( SQLITE_NULL!=
1ef0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
1f00: 70 65 28 61 72 67 76 5b 69 5d 29 20 29 7b 0a 20  pe(argv[i]) ){. 
1f10: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
1f20: 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78  ult_value(contex
1f30: 74 2c 20 61 72 67 76 5b 69 5d 29 3b 0a 20 20 20  t, argv[i]);.   
1f40: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
1f50: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70    }.}../*.** Imp
1f60: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72  lementation of r
1f70: 61 6e 64 6f 6d 28 29 2e 20 20 52 65 74 75 72 6e  andom().  Return
1f80: 20 61 20 72 61 6e 64 6f 6d 20 69 6e 74 65 67 65   a random intege
1f90: 72 2e 20 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76  r.  .*/.static v
1fa0: 6f 69 64 20 72 61 6e 64 6f 6d 46 75 6e 63 28 0a  oid randomFunc(.
1fb0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
1fc0: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
1fd0: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
1fe0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
1ff0: 7b 0a 20 20 69 6e 74 20 72 3b 0a 20 20 73 71 6c  {.  int r;.  sql
2000: 69 74 65 33 52 61 6e 64 6f 6d 6e 65 73 73 28 73  ite3Randomness(s
2010: 69 7a 65 6f 66 28 72 29 2c 20 26 72 29 3b 0a 20  izeof(r), &r);. 
2020: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
2030: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b  int(context, r);
2040: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
2050: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
2060: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69  last_insert_rowi
2070: 64 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  d() SQL function
2080: 2e 20 20 54 68 65 20 72 65 74 75 72 6e 0a 2a 2a  .  The return.**
2090: 20 76 61 6c 75 65 20 69 73 20 74 68 65 20 73 61   value is the sa
20a0: 6d 65 20 61 73 20 74 68 65 20 73 71 6c 69 74 65  me as the sqlite
20b0: 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f  3_last_insert_ro
20c0: 77 69 64 28 29 20 41 50 49 20 66 75 6e 63 74 69  wid() API functi
20d0: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  on..*/.static vo
20e0: 69 64 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72  id last_insert_r
20f0: 6f 77 69 64 28 0a 20 20 73 71 6c 69 74 65 33 5f  owid(.  sqlite3_
2100: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
2110: 2c 20 0a 20 20 69 6e 74 20 61 72 67 2c 20 0a 20  , .  int arg, . 
2120: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
2130: 2a 61 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74  *argv.){.  sqlit
2140: 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33  e3 *db = sqlite3
2150: 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65  _user_data(conte
2160: 78 74 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72  xt);.  sqlite3_r
2170: 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74  esult_int64(cont
2180: 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 6c 61 73  ext, sqlite3_las
2190: 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 64  t_insert_rowid(d
21a0: 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  b));.}../*.** Im
21b0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
21c0: 74 68 65 20 63 68 61 6e 67 65 73 28 29 20 53 51  the changes() SQ
21d0: 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65  L function.  The
21e0: 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73   return value is
21f0: 20 74 68 65 0a 2a 2a 20 73 61 6d 65 20 61 73 20   the.** same as 
2200: 74 68 65 20 73 71 6c 69 74 65 33 5f 63 68 61 6e  the sqlite3_chan
2210: 67 65 73 28 29 20 41 50 49 20 66 75 6e 63 74 69  ges() API functi
2220: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  on..*/.static vo
2230: 69 64 20 63 68 61 6e 67 65 73 28 0a 20 20 73 71  id changes(.  sq
2240: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
2250: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
2260: 67 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  g,.  sqlite3_val
2270: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 73  ue **argv.){.  s
2280: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c  qlite3 *db = sql
2290: 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63  ite3_user_data(c
22a0: 6f 6e 74 65 78 74 29 3b 0a 20 20 73 71 6c 69 74  ontext);.  sqlit
22b0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f  e3_result_int(co
22c0: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 63  ntext, sqlite3_c
22d0: 68 61 6e 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a  hanges(db));.}..
22e0: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
22f0: 74 69 6f 6e 20 6f 66 20 74 68 65 20 74 6f 74 61  tion of the tota
2300: 6c 5f 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20  l_changes() SQL 
2310: 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72  function.  The r
2320: 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 0a 2a  eturn value is.*
2330: 2a 20 74 68 65 20 73 61 6d 65 20 61 73 20 74 68  * the same as th
2340: 65 20 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c 5f  e sqlite3_total_
2350: 63 68 61 6e 67 65 73 28 29 20 41 50 49 20 66 75  changes() API fu
2360: 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69  nction..*/.stati
2370: 63 20 76 6f 69 64 20 74 6f 74 61 6c 5f 63 68 61  c void total_cha
2380: 6e 67 65 73 28 0a 20 20 73 71 6c 69 74 65 33 5f  nges(.  sqlite3_
2390: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
23a0: 2c 0a 20 20 69 6e 74 20 61 72 67 2c 0a 20 20 73  ,.  int arg,.  s
23b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
23c0: 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33  rgv.){.  sqlite3
23d0: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 75   *db = sqlite3_u
23e0: 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74  ser_data(context
23f0: 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  );.  sqlite3_res
2400: 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c  ult_int(context,
2410: 20 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63   sqlite3_total_c
2420: 68 61 6e 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a  hanges(db));.}..
2430: 2f 2a 0a 2a 2a 20 41 20 73 74 72 75 63 74 75 72  /*.** A structur
2440: 65 20 64 65 66 69 6e 69 6e 67 20 68 6f 77 20 74  e defining how t
2450: 6f 20 64 6f 20 47 4c 4f 42 2d 73 74 79 6c 65 20  o do GLOB-style 
2460: 63 6f 6d 70 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a  comparisons..*/.
2470: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
2480: 66 6f 20 7b 0a 20 20 75 38 20 6d 61 74 63 68 41  fo {.  u8 matchA
2490: 6c 6c 3b 0a 20 20 75 38 20 6d 61 74 63 68 4f 6e  ll;.  u8 matchOn
24a0: 65 3b 0a 20 20 75 38 20 6d 61 74 63 68 53 65 74  e;.  u8 matchSet
24b0: 3b 0a 20 20 75 38 20 6e 6f 43 61 73 65 3b 0a 7d  ;.  u8 noCase;.}
24c0: 3b 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73  ;.static const s
24d0: 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66  truct compareInf
24e0: 6f 20 67 6c 6f 62 49 6e 66 6f 20 3d 20 7b 20 27  o globInfo = { '
24f0: 2a 27 2c 20 27 3f 27 2c 20 27 5b 27 2c 20 30 20  *', '?', '[', 0 
2500: 7d 3b 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20  };.static const 
2510: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
2520: 66 6f 20 6c 69 6b 65 49 6e 66 6f 20 3d 20 7b 20  fo likeInfo = { 
2530: 27 25 27 2c 20 27 5f 27 2c 20 20 20 30 2c 20 31  '%', '_',   0, 1
2540: 20 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 58 20 69 73 20   };../*.** X is 
2550: 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 65  a pointer to the
2560: 20 66 69 72 73 74 20 62 79 74 65 20 6f 66 20 61   first byte of a
2570: 20 55 54 46 2d 38 20 63 68 61 72 61 63 74 65 72   UTF-8 character
2580: 2e 20 20 49 6e 63 72 65 6d 65 6e 74 0a 2a 2a 20  .  Increment.** 
2590: 58 20 73 6f 20 74 68 61 74 20 69 74 20 70 6f 69  X so that it poi
25a0: 6e 74 73 20 74 6f 20 74 68 65 20 6e 65 78 74 20  nts to the next 
25b0: 63 68 61 72 61 63 74 65 72 2e 20 20 54 68 69 73  character.  This
25c0: 20 6f 6e 6c 79 20 77 6f 72 6b 73 20 72 69 67 68   only works righ
25d0: 74 0a 2a 2a 20 69 66 20 58 20 70 6f 69 6e 74 73  t.** if X points
25e0: 20 74 6f 20 61 20 77 65 6c 6c 2d 66 6f 72 6d 65   to a well-forme
25f0: 64 20 55 54 46 2d 38 20 73 74 72 69 6e 67 2e 0a  d UTF-8 string..
2600: 2a 2f 0a 23 64 65 66 69 6e 65 20 73 71 6c 69 74  */.#define sqlit
2610: 65 4e 65 78 74 43 68 61 72 28 58 29 20 20 77 68  eNextChar(X)  wh
2620: 69 6c 65 28 20 28 30 78 63 30 26 2a 2b 2b 28 58  ile( (0xc0&*++(X
2630: 29 29 3d 3d 30 78 38 30 20 29 7b 7d 0a 23 64 65  ))==0x80 ){}.#de
2640: 66 69 6e 65 20 73 71 6c 69 74 65 43 68 61 72 56  fine sqliteCharV
2650: 61 6c 28 58 29 20 20 20 73 71 6c 69 74 65 33 52  al(X)   sqlite3R
2660: 65 61 64 55 74 66 38 28 58 29 0a 0a 0a 2f 2a 0a  eadUtf8(X).../*.
2670: 2a 2a 20 43 6f 6d 70 61 72 65 20 74 77 6f 20 55  ** Compare two U
2680: 54 46 2d 38 20 73 74 72 69 6e 67 73 20 66 6f 72  TF-8 strings for
2690: 20 65 71 75 61 6c 69 74 79 20 77 68 65 72 65 20   equality where 
26a0: 74 68 65 20 66 69 72 73 74 20 73 74 72 69 6e 67  the first string
26b0: 20 63 61 6e 0a 2a 2a 20 70 6f 74 65 6e 74 69 61   can.** potentia
26c0: 6c 6c 79 20 62 65 20 61 20 22 67 6c 6f 62 22 20  lly be a "glob" 
26d0: 65 78 70 72 65 73 73 69 6f 6e 2e 20 20 52 65 74  expression.  Ret
26e0: 75 72 6e 20 74 72 75 65 20 28 31 29 20 69 66 20  urn true (1) if 
26f0: 74 68 65 79 0a 2a 2a 20 61 72 65 20 74 68 65 20  they.** are the 
2700: 73 61 6d 65 20 61 6e 64 20 66 61 6c 73 65 20 28  same and false (
2710: 30 29 20 69 66 20 74 68 65 79 20 61 72 65 20 64  0) if they are d
2720: 69 66 66 65 72 65 6e 74 2e 0a 2a 2a 0a 2a 2a 20  ifferent..**.** 
2730: 47 6c 6f 62 62 69 6e 67 20 72 75 6c 65 73 3a 0a  Globbing rules:.
2740: 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 2a 27 20 20  **.**      '*'  
2750: 20 20 20 20 20 4d 61 74 63 68 65 73 20 61 6e 79       Matches any
2760: 20 73 65 71 75 65 6e 63 65 20 6f 66 20 7a 65 72   sequence of zer
2770: 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61 72 61 63  o or more charac
2780: 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20  ters..**.**     
2790: 20 27 3f 27 20 20 20 20 20 20 20 4d 61 74 63 68   '?'       Match
27a0: 65 73 20 65 78 61 63 74 6c 79 20 6f 6e 65 20 63  es exactly one c
27b0: 68 61 72 61 63 74 65 72 2e 0a 2a 2a 0a 2a 2a 20  haracter..**.** 
27c0: 20 20 20 20 5b 2e 2e 2e 5d 20 20 20 20 20 20 4d      [...]      M
27d0: 61 74 63 68 65 73 20 6f 6e 65 20 63 68 61 72 61  atches one chara
27e0: 63 74 65 72 20 66 72 6f 6d 20 74 68 65 20 65 6e  cter from the en
27f0: 63 6c 6f 73 65 64 20 6c 69 73 74 20 6f 66 0a 2a  closed list of.*
2800: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  *               
2810: 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a 2a 0a   characters..**.
2820: 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d 20 20 20  **     [^...]   
2830: 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68    Matches one ch
2840: 61 72 61 63 74 65 72 20 6e 6f 74 20 69 6e 20 74  aracter not in t
2850: 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74  he enclosed list
2860: 2e 0a 2a 2a 0a 2a 2a 20 57 69 74 68 20 74 68 65  ..**.** With the
2870: 20 5b 2e 2e 2e 5d 20 61 6e 64 20 5b 5e 2e 2e 2e   [...] and [^...
2880: 5d 20 6d 61 74 63 68 69 6e 67 2c 20 61 20 27 5d  ] matching, a ']
2890: 27 20 63 68 61 72 61 63 74 65 72 20 63 61 6e 20  ' character can 
28a0: 62 65 20 69 6e 63 6c 75 64 65 64 0a 2a 2a 20 69  be included.** i
28b0: 6e 20 74 68 65 20 6c 69 73 74 20 62 79 20 6d 61  n the list by ma
28c0: 6b 69 6e 67 20 69 74 20 74 68 65 20 66 69 72 73  king it the firs
28d0: 74 20 63 68 61 72 61 63 74 65 72 20 61 66 74 65  t character afte
28e0: 72 20 27 5b 27 20 6f 72 20 27 5e 27 2e 20 20 41  r '[' or '^'.  A
28f0: 0a 2a 2a 20 72 61 6e 67 65 20 6f 66 20 63 68 61  .** range of cha
2900: 72 61 63 74 65 72 73 20 63 61 6e 20 62 65 20 73  racters can be s
2910: 70 65 63 69 66 69 65 64 20 75 73 69 6e 67 20 27  pecified using '
2920: 2d 27 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 2a 2a  -'.  Example:.**
2930: 20 22 5b 61 2d 7a 5d 22 20 6d 61 74 63 68 65 73   "[a-z]" matches
2940: 20 61 6e 79 20 73 69 6e 67 6c 65 20 6c 6f 77 65   any single lowe
2950: 72 2d 63 61 73 65 20 6c 65 74 74 65 72 2e 20 20  r-case letter.  
2960: 54 6f 20 6d 61 74 63 68 20 61 20 27 2d 27 2c 20  To match a '-', 
2970: 6d 61 6b 65 0a 2a 2a 20 69 74 20 74 68 65 20 6c  make.** it the l
2980: 61 73 74 20 63 68 61 72 61 63 74 65 72 20 69 6e  ast character in
2990: 20 74 68 65 20 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a   the list..**.**
29a0: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73   This routine is
29b0: 20 75 73 75 61 6c 6c 79 20 71 75 69 63 6b 2c 20   usually quick, 
29c0: 62 75 74 20 63 61 6e 20 62 65 20 4e 2a 2a 32 20  but can be N**2 
29d0: 69 6e 20 74 68 65 20 77 6f 72 73 74 20 63 61 73  in the worst cas
29e0: 65 2e 0a 2a 2a 0a 2a 2a 20 48 69 6e 74 73 3a 20  e..**.** Hints: 
29f0: 74 6f 20 6d 61 74 63 68 20 27 2a 27 20 6f 72 20  to match '*' or 
2a00: 27 3f 27 2c 20 70 75 74 20 74 68 65 6d 20 69 6e  '?', put them in
2a10: 20 22 5b 5d 22 2e 20 20 4c 69 6b 65 20 74 68 69   "[]".  Like thi
2a20: 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 20  s:.**.**        
2a30: 20 61 62 63 5b 2a 5d 78 79 7a 20 20 20 20 20 20   abc[*]xyz      
2a40: 20 20 4d 61 74 63 68 65 73 20 22 61 62 63 2a 78    Matches "abc*x
2a50: 79 7a 22 20 6f 6e 6c 79 0a 2a 2f 0a 73 74 61 74  yz" only.*/.stat
2a60: 69 63 20 69 6e 74 20 70 61 74 74 65 72 6e 43 6f  ic int patternCo
2a70: 6d 70 61 72 65 28 0a 20 20 63 6f 6e 73 74 20 75  mpare(.  const u
2a80: 38 20 2a 7a 50 61 74 74 65 72 6e 2c 20 20 20 20  8 *zPattern,    
2a90: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65            /* The
2aa0: 20 67 6c 6f 62 20 70 61 74 74 65 72 6e 20 2a 2f   glob pattern */
2ab0: 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 53 74  .  const u8 *zSt
2ac0: 72 69 6e 67 2c 20 20 20 20 20 20 20 20 20 20 20  ring,           
2ad0: 20 20 20 20 2f 2a 20 54 68 65 20 73 74 72 69 6e      /* The strin
2ae0: 67 20 74 6f 20 63 6f 6d 70 61 72 65 20 61 67 61  g to compare aga
2af0: 69 6e 73 74 20 74 68 65 20 67 6c 6f 62 20 2a 2f  inst the glob */
2b00: 0a 20 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20  .  const struct 
2b10: 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70 49 6e  compareInfo *pIn
2b20: 66 6f 2c 20 2f 2a 20 49 6e 66 6f 72 6d 61 74 69  fo, /* Informati
2b30: 6f 6e 20 61 62 6f 75 74 20 68 6f 77 20 74 6f 20  on about how to 
2b40: 64 6f 20 74 68 65 20 63 6f 6d 70 61 72 65 20 2a  do the compare *
2b50: 2f 0a 20 20 63 6f 6e 73 74 20 69 6e 74 20 65 73  /.  const int es
2b60: 63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  c               
2b70: 20 20 20 20 20 2f 2a 20 54 68 65 20 65 73 63 61       /* The esca
2b80: 70 65 20 63 68 61 72 61 63 74 65 72 20 2a 2f 0a  pe character */.
2b90: 29 7b 0a 20 20 72 65 67 69 73 74 65 72 20 69 6e  ){.  register in
2ba0: 74 20 63 3b 0a 20 20 69 6e 74 20 69 6e 76 65 72  t c;.  int inver
2bb0: 74 3b 0a 20 20 69 6e 74 20 73 65 65 6e 3b 0a 20  t;.  int seen;. 
2bc0: 20 69 6e 74 20 63 32 3b 0a 20 20 75 38 20 6d 61   int c2;.  u8 ma
2bd0: 74 63 68 4f 6e 65 20 3d 20 70 49 6e 66 6f 2d 3e  tchOne = pInfo->
2be0: 6d 61 74 63 68 4f 6e 65 3b 0a 20 20 75 38 20 6d  matchOne;.  u8 m
2bf0: 61 74 63 68 41 6c 6c 20 3d 20 70 49 6e 66 6f 2d  atchAll = pInfo-
2c00: 3e 6d 61 74 63 68 41 6c 6c 3b 0a 20 20 75 38 20  >matchAll;.  u8 
2c10: 6d 61 74 63 68 53 65 74 20 3d 20 70 49 6e 66 6f  matchSet = pInfo
2c20: 2d 3e 6d 61 74 63 68 53 65 74 3b 0a 20 20 75 38  ->matchSet;.  u8
2c30: 20 6e 6f 43 61 73 65 20 3d 20 70 49 6e 66 6f 2d   noCase = pInfo-
2c40: 3e 6e 6f 43 61 73 65 3b 20 0a 20 20 69 6e 74 20  >noCase; .  int 
2c50: 70 72 65 76 45 73 63 61 70 65 20 3d 20 30 3b 20  prevEscape = 0; 
2c60: 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 74      /* True if t
2c70: 68 65 20 70 72 65 76 69 6f 75 73 20 63 68 61 72  he previous char
2c80: 61 63 74 65 72 20 77 61 73 20 27 65 73 63 61 70  acter was 'escap
2c90: 65 27 20 2a 2f 0a 0a 20 20 77 68 69 6c 65 28 20  e' */..  while( 
2ca0: 28 63 20 3d 20 2a 7a 50 61 74 74 65 72 6e 29 21  (c = *zPattern)!
2cb0: 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 21 70  =0 ){.    if( !p
2cc0: 72 65 76 45 73 63 61 70 65 20 26 26 20 63 3d 3d  revEscape && c==
2cd0: 6d 61 74 63 68 41 6c 6c 20 29 7b 0a 20 20 20 20  matchAll ){.    
2ce0: 20 20 77 68 69 6c 65 28 20 28 63 3d 7a 50 61 74    while( (c=zPat
2cf0: 74 65 72 6e 5b 31 5d 29 20 3d 3d 20 6d 61 74 63  tern[1]) == matc
2d00: 68 41 6c 6c 20 7c 7c 20 63 20 3d 3d 20 6d 61 74  hAll || c == mat
2d10: 63 68 4f 6e 65 20 29 7b 0a 20 20 20 20 20 20 20  chOne ){.       
2d20: 20 69 66 28 20 63 3d 3d 6d 61 74 63 68 4f 6e 65   if( c==matchOne
2d30: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66   ){.          if
2d40: 28 20 2a 7a 53 74 72 69 6e 67 3d 3d 30 20 29 20  ( *zString==0 ) 
2d50: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20  return 0;.      
2d60: 20 20 20 20 73 71 6c 69 74 65 4e 65 78 74 43 68      sqliteNextCh
2d70: 61 72 28 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20  ar(zString);.   
2d80: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7a       }.        z
2d90: 50 61 74 74 65 72 6e 2b 2b 3b 0a 20 20 20 20 20  Pattern++;.     
2da0: 20 7d 0a 20 20 20 20 20 20 69 66 28 20 63 20 26   }.      if( c &
2db0: 26 20 65 73 63 20 26 26 20 73 71 6c 69 74 65 33  & esc && sqlite3
2dc0: 52 65 61 64 55 74 66 38 28 26 7a 50 61 74 74 65  ReadUtf8(&zPatte
2dd0: 72 6e 5b 31 5d 29 3d 3d 65 73 63 20 29 7b 0a 20  rn[1])==esc ){. 
2de0: 20 20 20 20 20 20 20 75 38 20 63 6f 6e 73 74 20         u8 const 
2df0: 2a 7a 54 65 6d 70 20 3d 20 26 7a 50 61 74 74 65  *zTemp = &zPatte
2e00: 72 6e 5b 31 5d 3b 0a 20 20 20 20 20 20 20 20 73  rn[1];.        s
2e10: 71 6c 69 74 65 4e 65 78 74 43 68 61 72 28 7a 54  qliteNextChar(zT
2e20: 65 6d 70 29 3b 0a 20 20 20 20 20 20 20 20 63 20  emp);.        c 
2e30: 3d 20 2a 7a 54 65 6d 70 3b 0a 20 20 20 20 20 20  = *zTemp;.      
2e40: 7d 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30  }.      if( c==0
2e50: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20   ) return 1;.   
2e60: 20 20 20 69 66 28 20 63 3d 3d 6d 61 74 63 68 53     if( c==matchS
2e70: 65 74 20 29 7b 0a 20 20 20 20 20 20 20 20 61 73  et ){.        as
2e80: 73 65 72 74 28 20 65 73 63 3d 3d 30 20 29 3b 20  sert( esc==0 ); 
2e90: 20 20 2f 2a 20 54 68 69 73 20 69 73 20 47 4c 4f    /* This is GLO
2ea0: 42 2c 20 6e 6f 74 20 4c 49 4b 45 20 2a 2f 0a 20  B, not LIKE */. 
2eb0: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a 7a         while( *z
2ec0: 53 74 72 69 6e 67 20 26 26 20 70 61 74 74 65 72  String && patter
2ed0: 6e 43 6f 6d 70 61 72 65 28 26 7a 50 61 74 74 65  nCompare(&zPatte
2ee0: 72 6e 5b 31 5d 2c 7a 53 74 72 69 6e 67 2c 70 49  rn[1],zString,pI
2ef0: 6e 66 6f 2c 65 73 63 29 3d 3d 30 20 29 7b 0a 20  nfo,esc)==0 ){. 
2f00: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 4e           sqliteN
2f10: 65 78 74 43 68 61 72 28 7a 53 74 72 69 6e 67 29  extChar(zString)
2f20: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
2f30: 20 20 20 20 72 65 74 75 72 6e 20 2a 7a 53 74 72      return *zStr
2f40: 69 6e 67 21 3d 30 3b 0a 20 20 20 20 20 20 7d 65  ing!=0;.      }e
2f50: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 77 68 69  lse{.        whi
2f60: 6c 65 28 20 28 63 32 20 3d 20 2a 7a 53 74 72 69  le( (c2 = *zStri
2f70: 6e 67 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20  ng)!=0 ){.      
2f80: 20 20 20 20 69 66 28 20 6e 6f 43 61 73 65 20 29      if( noCase )
2f90: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 63 32  {.            c2
2fa0: 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65 72 54   = sqlite3UpperT
2fb0: 6f 4c 6f 77 65 72 5b 63 32 5d 3b 0a 20 20 20 20  oLower[c2];.    
2fc0: 20 20 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69          c = sqli
2fd0: 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b  te3UpperToLower[
2fe0: 63 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20  c];.            
2ff0: 77 68 69 6c 65 28 20 63 32 20 21 3d 20 30 20 26  while( c2 != 0 &
3000: 26 20 63 32 20 21 3d 20 63 20 29 7b 20 63 32 20  & c2 != c ){ c2 
3010: 3d 20 73 71 6c 69 74 65 33 55 70 70 65 72 54 6f  = sqlite3UpperTo
3020: 4c 6f 77 65 72 5b 2a 2b 2b 7a 53 74 72 69 6e 67  Lower[*++zString
3030: 5d 3b 20 7d 0a 20 20 20 20 20 20 20 20 20 20 7d  ]; }.          }
3040: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20  else{.          
3050: 20 20 77 68 69 6c 65 28 20 63 32 20 21 3d 20 30    while( c2 != 0
3060: 20 26 26 20 63 32 20 21 3d 20 63 20 29 7b 20 63   && c2 != c ){ c
3070: 32 20 3d 20 2a 2b 2b 7a 53 74 72 69 6e 67 3b 20  2 = *++zString; 
3080: 7d 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20  }.          }.  
3090: 20 20 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d          if( c2==
30a0: 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20  0 ) return 0;.  
30b0: 20 20 20 20 20 20 20 20 69 66 28 20 70 61 74 74          if( patt
30c0: 65 72 6e 43 6f 6d 70 61 72 65 28 26 7a 50 61 74  ernCompare(&zPat
30d0: 74 65 72 6e 5b 31 5d 2c 7a 53 74 72 69 6e 67 2c  tern[1],zString,
30e0: 70 49 6e 66 6f 2c 65 73 63 29 20 29 20 72 65 74  pInfo,esc) ) ret
30f0: 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 20 20 20  urn 1;.         
3100: 20 73 71 6c 69 74 65 4e 65 78 74 43 68 61 72 28   sqliteNextChar(
3110: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
3120: 20 20 7d 0a 20 20 20 20 20 20 20 20 72 65 74 75    }.        retu
3130: 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20  rn 0;.      }.  
3140: 20 20 7d 65 6c 73 65 20 69 66 28 20 21 70 72 65    }else if( !pre
3150: 76 45 73 63 61 70 65 20 26 26 20 63 3d 3d 6d 61  vEscape && c==ma
3160: 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20 20 20 20  tchOne ){.      
3170: 69 66 28 20 2a 7a 53 74 72 69 6e 67 3d 3d 30 20  if( *zString==0 
3180: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
3190: 20 20 73 71 6c 69 74 65 4e 65 78 74 43 68 61 72    sqliteNextChar
31a0: 28 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20  (zString);.     
31b0: 20 7a 50 61 74 74 65 72 6e 2b 2b 3b 0a 20 20 20   zPattern++;.   
31c0: 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61   }else if( c==ma
31d0: 74 63 68 53 65 74 20 29 7b 0a 20 20 20 20 20 20  tchSet ){.      
31e0: 69 6e 74 20 70 72 69 6f 72 5f 63 20 3d 20 30 3b  int prior_c = 0;
31f0: 0a 20 20 20 20 20 20 61 73 73 65 72 74 28 20 65  .      assert( e
3200: 73 63 3d 3d 30 20 29 3b 20 20 20 20 2f 2a 20 54  sc==0 );    /* T
3210: 68 69 73 20 6f 6e 6c 79 20 6f 63 63 75 72 73 20  his only occurs 
3220: 66 6f 72 20 47 4c 4f 42 2c 20 6e 6f 74 20 4c 49  for GLOB, not LI
3230: 4b 45 20 2a 2f 0a 20 20 20 20 20 20 73 65 65 6e  KE */.      seen
3240: 20 3d 20 30 3b 0a 20 20 20 20 20 20 69 6e 76 65   = 0;.      inve
3250: 72 74 20 3d 20 30 3b 0a 20 20 20 20 20 20 63 20  rt = 0;.      c 
3260: 3d 20 73 71 6c 69 74 65 43 68 61 72 56 61 6c 28  = sqliteCharVal(
3270: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
3280: 69 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72  if( c==0 ) retur
3290: 6e 20 30 3b 0a 20 20 20 20 20 20 63 32 20 3d 20  n 0;.      c2 = 
32a0: 2a 2b 2b 7a 50 61 74 74 65 72 6e 3b 0a 20 20 20  *++zPattern;.   
32b0: 20 20 20 69 66 28 20 63 32 3d 3d 27 5e 27 20 29     if( c2=='^' )
32c0: 7b 20 69 6e 76 65 72 74 20 3d 20 31 3b 20 63 32  { invert = 1; c2
32d0: 20 3d 20 2a 2b 2b 7a 50 61 74 74 65 72 6e 3b 20   = *++zPattern; 
32e0: 7d 0a 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d  }.      if( c2==
32f0: 27 5d 27 20 29 7b 0a 20 20 20 20 20 20 20 20 69  ']' ){.        i
3300: 66 28 20 63 3d 3d 27 5d 27 20 29 20 73 65 65 6e  f( c==']' ) seen
3310: 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 63 32   = 1;.        c2
3320: 20 3d 20 2a 2b 2b 7a 50 61 74 74 65 72 6e 3b 0a   = *++zPattern;.
3330: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 77 68        }.      wh
3340: 69 6c 65 28 20 28 63 32 20 3d 20 73 71 6c 69 74  ile( (c2 = sqlit
3350: 65 43 68 61 72 56 61 6c 28 7a 50 61 74 74 65 72  eCharVal(zPatter
3360: 6e 29 29 21 3d 30 20 26 26 20 63 32 21 3d 27 5d  n))!=0 && c2!=']
3370: 27 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28  ' ){.        if(
3380: 20 63 32 3d 3d 27 2d 27 20 26 26 20 7a 50 61 74   c2=='-' && zPat
3390: 74 65 72 6e 5b 31 5d 21 3d 27 5d 27 20 26 26 20  tern[1]!=']' && 
33a0: 7a 50 61 74 74 65 72 6e 5b 31 5d 21 3d 30 20 26  zPattern[1]!=0 &
33b0: 26 20 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a 20  & prior_c>0 ){. 
33c0: 20 20 20 20 20 20 20 20 20 7a 50 61 74 74 65 72           zPatter
33d0: 6e 2b 2b 3b 0a 20 20 20 20 20 20 20 20 20 20 63  n++;.          c
33e0: 32 20 3d 20 73 71 6c 69 74 65 43 68 61 72 56 61  2 = sqliteCharVa
33f0: 6c 28 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20  l(zPattern);.   
3400: 20 20 20 20 20 20 20 69 66 28 20 63 3e 3d 70 72         if( c>=pr
3410: 69 6f 72 5f 63 20 26 26 20 63 3c 3d 63 32 20 29  ior_c && c<=c2 )
3420: 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20   seen = 1;.     
3430: 20 20 20 20 20 70 72 69 6f 72 5f 63 20 3d 20 30       prior_c = 0
3440: 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 20  ;.        }else 
3450: 69 66 28 20 63 3d 3d 63 32 20 29 7b 0a 20 20 20  if( c==c2 ){.   
3460: 20 20 20 20 20 20 20 73 65 65 6e 20 3d 20 31 3b         seen = 1;
3470: 0a 20 20 20 20 20 20 20 20 20 20 70 72 69 6f 72  .          prior
3480: 5f 63 20 3d 20 63 32 3b 0a 20 20 20 20 20 20 20  _c = c2;.       
3490: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
34a0: 20 20 70 72 69 6f 72 5f 63 20 3d 20 63 32 3b 0a    prior_c = c2;.
34b0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
34c0: 20 20 73 71 6c 69 74 65 4e 65 78 74 43 68 61 72    sqliteNextChar
34d0: 28 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20  (zPattern);.    
34e0: 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20 63 32    }.      if( c2
34f0: 3d 3d 30 20 7c 7c 20 28 73 65 65 6e 20 5e 20 69  ==0 || (seen ^ i
3500: 6e 76 65 72 74 29 3d 3d 30 20 29 20 72 65 74 75  nvert)==0 ) retu
3510: 72 6e 20 30 3b 0a 20 20 20 20 20 20 73 71 6c 69  rn 0;.      sqli
3520: 74 65 4e 65 78 74 43 68 61 72 28 7a 53 74 72 69  teNextChar(zStri
3530: 6e 67 29 3b 0a 20 20 20 20 20 20 7a 50 61 74 74  ng);.      zPatt
3540: 65 72 6e 2b 2b 3b 0a 20 20 20 20 7d 65 6c 73 65  ern++;.    }else
3550: 20 69 66 28 20 65 73 63 20 26 26 20 21 70 72 65   if( esc && !pre
3560: 76 45 73 63 61 70 65 20 26 26 20 73 71 6c 69 74  vEscape && sqlit
3570: 65 33 52 65 61 64 55 74 66 38 28 7a 50 61 74 74  e3ReadUtf8(zPatt
3580: 65 72 6e 29 3d 3d 65 73 63 29 7b 0a 20 20 20 20  ern)==esc){.    
3590: 20 20 70 72 65 76 45 73 63 61 70 65 20 3d 20 31    prevEscape = 1
35a0: 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 4e 65  ;.      sqliteNe
35b0: 78 74 43 68 61 72 28 7a 50 61 74 74 65 72 6e 29  xtChar(zPattern)
35c0: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ;.    }else{.   
35d0: 20 20 20 69 66 28 20 6e 6f 43 61 73 65 20 29 7b     if( noCase ){
35e0: 0a 20 20 20 20 20 20 20 20 69 66 28 20 73 71 6c  .        if( sql
35f0: 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72  ite3UpperToLower
3600: 5b 63 5d 20 21 3d 20 73 71 6c 69 74 65 33 55 70  [c] != sqlite3Up
3610: 70 65 72 54 6f 4c 6f 77 65 72 5b 2a 7a 53 74 72  perToLower[*zStr
3620: 69 6e 67 5d 20 29 20 72 65 74 75 72 6e 20 30 3b  ing] ) return 0;
3630: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
3640: 20 20 20 20 20 20 69 66 28 20 63 20 21 3d 20 2a        if( c != *
3650: 7a 53 74 72 69 6e 67 20 29 20 72 65 74 75 72 6e  zString ) return
3660: 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   0;.      }.    
3670: 20 20 7a 50 61 74 74 65 72 6e 2b 2b 3b 0a 20 20    zPattern++;.  
3680: 20 20 20 20 7a 53 74 72 69 6e 67 2b 2b 3b 0a 20      zString++;. 
3690: 20 20 20 20 20 70 72 65 76 45 73 63 61 70 65 20       prevEscape 
36a0: 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  = 0;.    }.  }. 
36b0: 20 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67   return *zString
36c0: 3d 3d 30 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 49  ==0;.}.../*.** I
36d0: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
36e0: 20 74 68 65 20 6c 69 6b 65 28 29 20 53 51 4c 20   the like() SQL 
36f0: 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20  function.  This 
3700: 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65  function impleme
3710: 6e 74 73 0a 2a 2a 20 74 68 65 20 62 75 69 6c 64  nts.** the build
3720: 2d 69 6e 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f  -in LIKE operato
3730: 72 2e 20 20 54 68 65 20 66 69 72 73 74 20 61 72  r.  The first ar
3740: 67 75 6d 65 6e 74 20 74 6f 20 74 68 65 20 66 75  gument to the fu
3750: 6e 63 74 69 6f 6e 20 69 73 20 74 68 65 0a 2a 2a  nction is the.**
3760: 20 70 61 74 74 65 72 6e 20 61 6e 64 20 74 68 65   pattern and the
3770: 20 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74   second argument
3780: 20 69 73 20 74 68 65 20 73 74 72 69 6e 67 2e 20   is the string. 
3790: 20 53 6f 2c 20 74 68 65 20 53 51 4c 20 73 74 61   So, the SQL sta
37a0: 74 65 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20 20  tements:.**.**  
37b0: 20 20 20 20 20 41 20 4c 49 4b 45 20 42 0a 2a 2a       A LIKE B.**
37c0: 0a 2a 2a 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74  .** is implement
37d0: 65 64 20 61 73 20 6c 69 6b 65 28 42 2c 41 29 2e  ed as like(B,A).
37e0: 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 70 6f  .**.** If the po
37f0: 69 6e 74 65 72 20 72 65 74 72 69 65 76 65 64 20  inter retrieved 
3800: 62 79 20 76 69 61 20 61 20 63 61 6c 6c 20 74 6f  by via a call to
3810: 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61   sqlite3_user_da
3820: 74 61 28 29 20 69 73 0a 2a 2a 20 6e 6f 74 20 4e  ta() is.** not N
3830: 55 4c 4c 2c 20 74 68 65 6e 20 74 68 69 73 20 66  ULL, then this f
3840: 75 6e 63 74 69 6f 6e 20 75 73 65 73 20 55 54 46  unction uses UTF
3850: 2d 31 36 2e 20 4f 74 68 65 72 77 69 73 65 20 55  -16. Otherwise U
3860: 54 46 2d 38 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  TF-8..*/.static 
3870: 76 6f 69 64 20 6c 69 6b 65 46 75 6e 63 28 0a 20  void likeFunc(. 
3880: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
3890: 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20 20 69 6e   *context, .  in
38a0: 74 20 61 72 67 63 2c 20 0a 20 20 73 71 6c 69 74  t argc, .  sqlit
38b0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
38c0: 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  ){.  const unsig
38d0: 6e 65 64 20 63 68 61 72 20 2a 7a 41 20 3d 20 73  ned char *zA = s
38e0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
38f0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 63 6f  t(argv[0]);.  co
3900: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
3910: 72 20 2a 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f  r *zB = sqlite3_
3920: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
3930: 31 5d 29 3b 0a 20 20 69 6e 74 20 65 73 63 61 70  1]);.  int escap
3940: 65 20 3d 20 30 3b 0a 20 20 69 66 28 20 61 72 67  e = 0;.  if( arg
3950: 63 3d 3d 33 20 29 7b 0a 20 20 20 20 2f 2a 20 54  c==3 ){.    /* T
3960: 68 65 20 65 73 63 61 70 65 20 63 68 61 72 61 63  he escape charac
3970: 74 65 72 20 73 74 72 69 6e 67 20 6d 75 73 74 20  ter string must 
3980: 63 6f 6e 73 69 73 74 20 6f 66 20 61 20 73 69 6e  consist of a sin
3990: 67 6c 65 20 55 54 46 2d 38 20 63 68 61 72 61 63  gle UTF-8 charac
39a0: 74 65 72 2e 0a 20 20 20 20 2a 2a 20 4f 74 68 65  ter..    ** Othe
39b0: 72 77 69 73 65 2c 20 72 65 74 75 72 6e 20 61 6e  rwise, return an
39c0: 20 65 72 72 6f 72 2e 0a 20 20 20 20 2a 2f 0a 20   error..    */. 
39d0: 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65     const unsigne
39e0: 64 20 63 68 61 72 20 2a 7a 45 73 63 20 3d 20 73  d char *zEsc = s
39f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
3a00: 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 20 20  t(argv[2]);.    
3a10: 69 66 28 20 73 71 6c 69 74 65 33 75 74 66 38 43  if( sqlite3utf8C
3a20: 68 61 72 4c 65 6e 28 7a 45 73 63 2c 20 2d 31 29  harLen(zEsc, -1)
3a30: 21 3d 31 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  !=1 ){.      sql
3a40: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
3a50: 72 28 63 6f 6e 74 65 78 74 2c 20 0a 20 20 20 20  r(context, .    
3a60: 20 20 20 20 20 20 22 45 53 43 41 50 45 20 65 78        "ESCAPE ex
3a70: 70 72 65 73 73 69 6f 6e 20 6d 75 73 74 20 62 65  pression must be
3a80: 20 61 20 73 69 6e 67 6c 65 20 63 68 61 72 61 63   a single charac
3a90: 74 65 72 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20  ter", -1);.     
3aa0: 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20   return;.    }. 
3ab0: 20 20 20 65 73 63 61 70 65 20 3d 20 73 71 6c 69     escape = sqli
3ac0: 74 65 33 52 65 61 64 55 74 66 38 28 7a 45 73 63  te3ReadUtf8(zEsc
3ad0: 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 41 20  );.  }.  if( zA 
3ae0: 26 26 20 7a 42 20 29 7b 0a 20 20 20 20 73 71 6c  && zB ){.    sql
3af0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28  ite3_result_int(
3b00: 63 6f 6e 74 65 78 74 2c 20 70 61 74 74 65 72 6e  context, pattern
3b10: 43 6f 6d 70 61 72 65 28 7a 41 2c 20 7a 42 2c 20  Compare(zA, zB, 
3b20: 26 6c 69 6b 65 49 6e 66 6f 2c 20 65 73 63 61 70  &likeInfo, escap
3b30: 65 29 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  e));.  }.}../*.*
3b40: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
3b50: 20 6f 66 20 74 68 65 20 67 6c 6f 62 28 29 20 53   of the glob() S
3b60: 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68  QL function.  Th
3b70: 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c  is function impl
3b80: 65 6d 65 6e 74 73 0a 2a 2a 20 74 68 65 20 62 75  ements.** the bu
3b90: 69 6c 64 2d 69 6e 20 47 4c 4f 42 20 6f 70 65 72  ild-in GLOB oper
3ba0: 61 74 6f 72 2e 20 20 54 68 65 20 66 69 72 73 74  ator.  The first
3bb0: 20 61 72 67 75 6d 65 6e 74 20 74 6f 20 74 68 65   argument to the
3bc0: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 74 68 65   function is the
3bd0: 0a 2a 2a 20 73 74 72 69 6e 67 20 61 6e 64 20 74  .** string and t
3be0: 68 65 20 73 65 63 6f 6e 64 20 61 72 67 75 6d 65  he second argume
3bf0: 6e 74 20 69 73 20 74 68 65 20 70 61 74 74 65 72  nt is the patter
3c00: 6e 2e 20 20 53 6f 2c 20 74 68 65 20 53 51 4c 20  n.  So, the SQL 
3c10: 73 74 61 74 65 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a  statements:.**.*
3c20: 2a 20 20 20 20 20 20 20 41 20 47 4c 4f 42 20 42  *       A GLOB B
3c30: 0a 2a 2a 0a 2a 2a 20 69 73 20 69 6d 70 6c 65 6d  .**.** is implem
3c40: 65 6e 74 65 64 20 61 73 20 67 6c 6f 62 28 42 2c  ented as glob(B,
3c50: 41 29 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  A)..*/.static vo
3c60: 69 64 20 67 6c 6f 62 46 75 6e 63 28 73 71 6c 69  id globFunc(sqli
3c70: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
3c80: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 2c 20 73  text, int arg, s
3c90: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
3ca0: 72 67 76 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  rgv){.  const un
3cb0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41 20  signed char *zA 
3cc0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
3cd0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
3ce0: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
3cf0: 63 68 61 72 20 2a 7a 42 20 3d 20 73 71 6c 69 74  char *zB = sqlit
3d00: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
3d10: 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a 41  gv[1]);.  if( zA
3d20: 20 26 26 20 7a 42 20 29 7b 0a 20 20 20 20 73 71   && zB ){.    sq
3d30: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
3d40: 28 63 6f 6e 74 65 78 74 2c 20 70 61 74 74 65 72  (context, patter
3d50: 6e 43 6f 6d 70 61 72 65 28 7a 41 2c 20 7a 42 2c  nCompare(zA, zB,
3d60: 20 26 67 6c 6f 62 49 6e 66 6f 2c 20 30 29 29 3b   &globInfo, 0));
3d70: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
3d80: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
3d90: 74 68 65 20 4e 55 4c 4c 49 46 28 78 2c 79 29 20  the NULLIF(x,y) 
3da0: 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72  function.  The r
3db0: 65 73 75 6c 74 20 69 73 20 74 68 65 20 66 69 72  esult is the fir
3dc0: 73 74 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 20 69  st.** argument i
3dd0: 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 20  f the arguments 
3de0: 61 72 65 20 64 69 66 66 65 72 65 6e 74 2e 20 20  are different.  
3df0: 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 4e 55  The result is NU
3e00: 4c 4c 20 69 66 20 74 68 65 0a 2a 2a 20 61 72 67  LL if the.** arg
3e10: 75 6d 65 6e 74 73 20 61 72 65 20 65 71 75 61 6c  uments are equal
3e20: 20 74 6f 20 65 61 63 68 20 6f 74 68 65 72 2e 0a   to each other..
3e30: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6e  */.static void n
3e40: 75 6c 6c 69 66 46 75 6e 63 28 0a 20 20 73 71 6c  ullifFunc(.  sql
3e50: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
3e60: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
3e70: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
3e80: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 43  ue **argv.){.  C
3e90: 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20  ollSeq *pColl = 
3ea0: 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f  sqlite3GetFuncCo
3eb0: 6c 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a  llSeq(context);.
3ec0: 20 20 69 66 28 20 73 71 6c 69 74 65 33 4d 65 6d    if( sqlite3Mem
3ed0: 43 6f 6d 70 61 72 65 28 61 72 67 76 5b 30 5d 2c  Compare(argv[0],
3ee0: 20 61 72 67 76 5b 31 5d 2c 20 70 43 6f 6c 6c 29   argv[1], pColl)
3ef0: 21 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  !=0 ){.    sqlit
3f00: 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28  e3_result_value(
3f10: 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 30 5d  context, argv[0]
3f20: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
3f30: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
3f40: 66 20 74 68 65 20 56 45 52 53 49 4f 4e 28 2a 29  f the VERSION(*)
3f50: 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20   function.  The 
3f60: 72 65 73 75 6c 74 20 69 73 20 74 68 65 20 76 65  result is the ve
3f70: 72 73 69 6f 6e 0a 2a 2a 20 6f 66 20 74 68 65 20  rsion.** of the 
3f80: 53 51 4c 69 74 65 20 6c 69 62 72 61 72 79 20 74  SQLite library t
3f90: 68 61 74 20 69 73 20 72 75 6e 6e 69 6e 67 2e 0a  hat is running..
3fa0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 76  */.static void v
3fb0: 65 72 73 69 6f 6e 46 75 6e 63 28 0a 20 20 73 71  ersionFunc(.  sq
3fc0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
3fd0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
3fe0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
3ff0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
4000: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
4010: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  ext(context, sql
4020: 69 74 65 33 5f 76 65 72 73 69 6f 6e 2c 20 2d 31  ite3_version, -1
4030: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29  , SQLITE_STATIC)
4040: 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 45 58 50 45  ;.}.../*.** EXPE
4050: 52 49 4d 45 4e 54 41 4c 20 2d 20 54 68 69 73 20  RIMENTAL - This 
4060: 69 73 20 6e 6f 74 20 61 6e 20 6f 66 66 69 63 69  is not an offici
4070: 61 6c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68  al function.  Th
4080: 65 20 69 6e 74 65 72 66 61 63 65 20 6d 61 79 0a  e interface may.
4090: 2a 2a 20 63 68 61 6e 67 65 2e 20 20 54 68 69 73  ** change.  This
40a0: 20 66 75 6e 63 74 69 6f 6e 20 6d 61 79 20 64 69   function may di
40b0: 73 61 70 70 65 61 72 2e 20 20 44 6f 20 6e 6f 74  sappear.  Do not
40c0: 20 77 72 69 74 65 20 63 6f 64 65 20 74 68 61 74   write code that
40d0: 20 64 65 70 65 6e 64 73 0a 2a 2a 20 6f 6e 20 74   depends.** on t
40e0: 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a  his function..**
40f0: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
4100: 6f 6e 20 6f 66 20 74 68 65 20 51 55 4f 54 45 28  on of the QUOTE(
4110: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69  ) function.  Thi
4120: 73 20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73  s function takes
4130: 20 61 20 73 69 6e 67 6c 65 0a 2a 2a 20 61 72 67   a single.** arg
4140: 75 6d 65 6e 74 2e 20 20 49 66 20 74 68 65 20 61  ument.  If the a
4150: 72 67 75 6d 65 6e 74 20 69 73 20 6e 75 6d 65 72  rgument is numer
4160: 69 63 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76  ic, the return v
4170: 61 6c 75 65 20 69 73 20 74 68 65 20 73 61 6d 65  alue is the same
4180: 20 61 73 0a 2a 2a 20 74 68 65 20 61 72 67 75 6d   as.** the argum
4190: 65 6e 74 2e 20 20 49 66 20 74 68 65 20 61 72 67  ent.  If the arg
41a0: 75 6d 65 6e 74 20 69 73 20 4e 55 4c 4c 2c 20 74  ument is NULL, t
41b0: 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20  he return value 
41c0: 69 73 20 74 68 65 20 73 74 72 69 6e 67 0a 2a 2a  is the string.**
41d0: 20 22 4e 55 4c 4c 22 2e 20 20 4f 74 68 65 72 77   "NULL".  Otherw
41e0: 69 73 65 2c 20 74 68 65 20 61 72 67 75 6d 65 6e  ise, the argumen
41f0: 74 20 69 73 20 65 6e 63 6c 6f 73 65 64 20 69 6e  t is enclosed in
4200: 20 73 69 6e 67 6c 65 20 71 75 6f 74 65 73 20 77   single quotes w
4210: 69 74 68 0a 2a 2a 20 73 69 6e 67 6c 65 2d 71 75  ith.** single-qu
4220: 6f 74 65 20 65 73 63 61 70 65 73 2e 0a 2a 2f 0a  ote escapes..*/.
4230: 73 74 61 74 69 63 20 76 6f 69 64 20 71 75 6f 74  static void quot
4240: 65 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  eFunc(sqlite3_co
4250: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
4260: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
4270: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
4280: 0a 20 20 69 66 28 20 61 72 67 63 3c 31 20 29 20  .  if( argc<1 ) 
4290: 72 65 74 75 72 6e 3b 0a 20 20 73 77 69 74 63 68  return;.  switch
42a0: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
42b0: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
42c0: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
42d0: 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20 20 20 20 73  _NULL: {.      s
42e0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
42f0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 22 4e 55 4c  xt(context, "NUL
4300: 4c 22 2c 20 34 2c 20 53 51 4c 49 54 45 5f 53 54  L", 4, SQLITE_ST
4310: 41 54 49 43 29 3b 0a 20 20 20 20 20 20 62 72 65  ATIC);.      bre
4320: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61  ak;.    }.    ca
4330: 73 65 20 53 51 4c 49 54 45 5f 49 4e 54 45 47 45  se SQLITE_INTEGE
4340: 52 3a 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49  R:.    case SQLI
4350: 54 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20  TE_FLOAT: {.    
4360: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
4370: 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20  _value(context, 
4380: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20  argv[0]);.      
4390: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
43a0: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f   case SQLITE_BLO
43b0: 42 3a 20 7b 0a 20 20 20 20 20 20 73 74 61 74 69  B: {.      stati
43c0: 63 20 63 6f 6e 73 74 20 63 68 61 72 20 68 65 78  c const char hex
43d0: 64 69 67 69 74 73 5b 5d 20 3d 20 7b 20 0a 20 20  digits[] = { .  
43e0: 20 20 20 20 20 20 27 30 27 2c 20 27 31 27 2c 20        '0', '1', 
43f0: 27 32 27 2c 20 27 33 27 2c 20 27 34 27 2c 20 27  '2', '3', '4', '
4400: 35 27 2c 20 27 36 27 2c 20 27 37 27 2c 0a 20 20  5', '6', '7',.  
4410: 20 20 20 20 20 20 27 38 27 2c 20 27 39 27 2c 20        '8', '9', 
4420: 27 41 27 2c 20 27 42 27 2c 20 27 43 27 2c 20 27  'A', 'B', 'C', '
4430: 44 27 2c 20 27 45 27 2c 20 27 46 27 20 0a 20 20  D', 'E', 'F' .  
4440: 20 20 20 20 7d 3b 0a 20 20 20 20 20 20 63 68 61      };.      cha
4450: 72 20 2a 7a 54 65 78 74 20 3d 20 30 3b 0a 20 20  r *zText = 0;.  
4460: 20 20 20 20 69 6e 74 20 6e 42 6c 6f 62 20 3d 20      int nBlob = 
4470: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
4480: 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  tes(argv[0]);.  
4490: 20 20 20 20 63 68 61 72 20 63 6f 6e 73 74 20 2a      char const *
44a0: 7a 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f  zBlob = sqlite3_
44b0: 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b  value_blob(argv[
44c0: 30 5d 29 3b 0a 0a 20 20 20 20 20 20 7a 54 65 78  0]);..      zTex
44d0: 74 20 3d 20 28 63 68 61 72 20 2a 29 73 71 6c 69  t = (char *)sqli
44e0: 74 65 4d 61 6c 6c 6f 63 28 28 32 2a 6e 42 6c 6f  teMalloc((2*nBlo
44f0: 62 29 2b 34 29 3b 20 0a 20 20 20 20 20 20 69 66  b)+4); .      if
4500: 28 20 21 7a 54 65 78 74 20 29 7b 0a 20 20 20 20  ( !zText ){.    
4510: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
4520: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
4530: 2c 20 22 6f 75 74 20 6f 66 20 6d 65 6d 6f 72 79  , "out of memory
4540: 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 7d 65  ", -1);.      }e
4550: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 69 6e 74  lse{.        int
4560: 20 69 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28   i;.        for(
4570: 69 3d 30 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b  i=0; i<nBlob; i+
4580: 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 54  +){.          zT
4590: 65 78 74 5b 28 69 2a 32 29 2b 32 5d 20 3d 20 68  ext[(i*2)+2] = h
45a0: 65 78 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b  exdigits[(zBlob[
45b0: 69 5d 3e 3e 34 29 26 30 78 30 46 5d 3b 0a 20 20  i]>>4)&0x0F];.  
45c0: 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 69          zText[(i
45d0: 2a 32 29 2b 33 5d 20 3d 20 68 65 78 64 69 67 69  *2)+3] = hexdigi
45e0: 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 29 26 30 78  ts[(zBlob[i])&0x
45f0: 30 46 5d 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  0F];.        }. 
4600: 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42         zText[(nB
4610: 6c 6f 62 2a 32 29 2b 32 5d 20 3d 20 27 5c 27 27  lob*2)+2] = '\''
4620: 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b  ;.        zText[
4630: 28 6e 42 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20 27  (nBlob*2)+3] = '
4640: 5c 30 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65  \0';.        zTe
4650: 78 74 5b 30 5d 20 3d 20 27 58 27 3b 0a 20 20 20  xt[0] = 'X';.   
4660: 20 20 20 20 20 7a 54 65 78 74 5b 31 5d 20 3d 20       zText[1] = 
4670: 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 73 71  '\'';.        sq
4680: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
4690: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 54 65 78 74  t(context, zText
46a0: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41  , -1, SQLITE_TRA
46b0: 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20 20 20 20  NSIENT);.       
46c0: 20 73 71 6c 69 74 65 46 72 65 65 28 7a 54 65 78   sqliteFree(zTex
46d0: 74 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  t);.      }.    
46e0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
46f0: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54     case SQLITE_T
4700: 45 58 54 3a 20 7b 0a 20 20 20 20 20 20 69 6e 74  EXT: {.      int
4710: 20 69 2c 6a 2c 6e 3b 0a 20 20 20 20 20 20 63 6f   i,j,n;.      co
4720: 6e 73 74 20 63 68 61 72 20 2a 7a 41 72 67 20 3d  nst char *zArg =
4730: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
4740: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
4750: 20 20 20 20 63 68 61 72 20 2a 7a 3b 0a 0a 20 20      char *z;..  
4760: 20 20 20 20 66 6f 72 28 69 3d 6e 3d 30 3b 20 7a      for(i=n=0; z
4770: 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 20 69 66  Arg[i]; i++){ if
4780: 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c 27 27 20  ( zArg[i]=='\'' 
4790: 29 20 6e 2b 2b 3b 20 7d 0a 20 20 20 20 20 20 7a  ) n++; }.      z
47a0: 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28   = sqliteMalloc(
47b0: 20 69 2b 6e 2b 33 20 29 3b 0a 20 20 20 20 20 20   i+n+3 );.      
47c0: 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72  if( z==0 ) retur
47d0: 6e 3b 0a 20 20 20 20 20 20 7a 5b 30 5d 20 3d 20  n;.      z[0] = 
47e0: 27 5c 27 27 3b 0a 20 20 20 20 20 20 66 6f 72 28  '\'';.      for(
47f0: 69 3d 30 2c 20 6a 3d 31 3b 20 7a 41 72 67 5b 69  i=0, j=1; zArg[i
4800: 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  ]; i++){.       
4810: 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a 41 72 67 5b 69   z[j++] = zArg[i
4820: 5d 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 7a  ];.        if( z
4830: 41 72 67 5b 69 5d 3d 3d 27 5c 27 27 20 29 7b 0a  Arg[i]=='\'' ){.
4840: 20 20 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d            z[j++]
4850: 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20   = '\'';.       
4860: 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20   }.      }.     
4870: 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a   z[j++] = '\'';.
4880: 20 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 30 3b 0a        z[j] = 0;.
4890: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
48a0: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
48b0: 74 2c 20 7a 2c 20 6a 2c 20 53 51 4c 49 54 45 5f  t, z, j, SQLITE_
48c0: 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20  TRANSIENT);.    
48d0: 20 20 73 71 6c 69 74 65 46 72 65 65 28 7a 29 3b    sqliteFree(z);
48e0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 23 69  .    }.  }.}..#i
48f0: 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e  fdef SQLITE_SOUN
4900: 44 45 58 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 75 74  DEX./*.** Comput
4910: 65 20 74 68 65 20 73 6f 75 6e 64 65 78 20 65 6e  e the soundex en
4920: 63 6f 64 69 6e 67 20 6f 66 20 61 20 77 6f 72 64  coding of a word
4930: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
4940: 20 73 6f 75 6e 64 65 78 46 75 6e 63 28 73 71 6c   soundexFunc(sql
4950: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
4960: 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c  ntext, int argc,
4970: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
4980: 2a 61 72 67 76 29 7b 0a 20 20 63 68 61 72 20 7a  *argv){.  char z
4990: 52 65 73 75 6c 74 5b 38 5d 3b 0a 20 20 63 6f 6e  Result[8];.  con
49a0: 73 74 20 75 38 20 2a 7a 49 6e 3b 0a 20 20 69 6e  st u8 *zIn;.  in
49b0: 74 20 69 2c 20 6a 3b 0a 20 20 73 74 61 74 69 63  t i, j;.  static
49c0: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
49d0: 63 68 61 72 20 69 43 6f 64 65 5b 5d 20 3d 20 7b  char iCode[] = {
49e0: 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c  .    0, 0, 0, 0,
49f0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
4a00: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
4a10: 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30  , 0,.    0, 0, 0
4a20: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
4a30: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
4a40: 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20  0, 0, 0,.    0, 
4a50: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
4a60: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
4a70: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20   0, 0, 0, 0,.   
4a80: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
4a90: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
4aa0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
4ab0: 0a 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 32 2c  .    0, 0, 1, 2,
4ac0: 20 33 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c 20   3, 0, 1, 2, 0, 
4ad0: 30 2c 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20 35  0, 2, 2, 4, 5, 5
4ae0: 2c 20 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20 36  , 0,.    1, 2, 6
4af0: 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30 2c  , 2, 3, 0, 1, 0,
4b00: 20 32 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c 20   2, 0, 2, 0, 0, 
4b10: 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20  0, 0, 0,.    0, 
4b20: 30 2c 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20 31  0, 1, 2, 3, 0, 1
4b30: 2c 20 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32 2c  , 2, 0, 0, 2, 2,
4b40: 20 34 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20 20   4, 5, 5, 0,.   
4b50: 20 31 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c 20   1, 2, 6, 2, 3, 
4b60: 30 2c 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20 32  0, 1, 0, 2, 0, 2
4b70: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
4b80: 0a 20 20 7d 3b 0a 20 20 61 73 73 65 72 74 28 20  .  };.  assert( 
4b90: 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 7a 49 6e  argc==1 );.  zIn
4ba0: 20 3d 20 28 75 38 2a 29 73 71 6c 69 74 65 33 5f   = (u8*)sqlite3_
4bb0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
4bc0: 30 5d 29 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20  0]);.  for(i=0; 
4bd0: 7a 49 6e 5b 69 5d 20 26 26 20 21 69 73 61 6c 70  zIn[i] && !isalp
4be0: 68 61 28 7a 49 6e 5b 69 5d 29 3b 20 69 2b 2b 29  ha(zIn[i]); i++)
4bf0: 7b 7d 0a 20 20 69 66 28 20 7a 49 6e 5b 69 5d 20  {}.  if( zIn[i] 
4c00: 29 7b 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b 30  ){.    zResult[0
4c10: 5d 20 3d 20 74 6f 75 70 70 65 72 28 7a 49 6e 5b  ] = toupper(zIn[
4c20: 69 5d 29 3b 0a 20 20 20 20 66 6f 72 28 6a 3d 31  i]);.    for(j=1
4c30: 3b 20 6a 3c 34 20 26 26 20 7a 49 6e 5b 69 5d 3b  ; j<4 && zIn[i];
4c40: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74   i++){.      int
4c50: 20 63 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49   code = iCode[zI
4c60: 6e 5b 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20  n[i]&0x7f];.    
4c70: 20 20 69 66 28 20 63 6f 64 65 3e 30 20 29 7b 0a    if( code>0 ){.
4c80: 20 20 20 20 20 20 20 20 7a 52 65 73 75 6c 74 5b          zResult[
4c90: 6a 2b 2b 5d 20 3d 20 63 6f 64 65 20 2b 20 27 30  j++] = code + '0
4ca0: 27 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  ';.      }.    }
4cb0: 0a 20 20 20 20 77 68 69 6c 65 28 20 6a 3c 34 20  .    while( j<4 
4cc0: 29 7b 0a 20 20 20 20 20 20 7a 52 65 73 75 6c 74  ){.      zResult
4cd0: 5b 6a 2b 2b 5d 20 3d 20 27 30 27 3b 0a 20 20 20  [j++] = '0';.   
4ce0: 20 7d 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a   }.    zResult[j
4cf0: 5d 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 74  ] = 0;.    sqlit
4d00: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
4d10: 6f 6e 74 65 78 74 2c 20 7a 52 65 73 75 6c 74 2c  ontext, zResult,
4d20: 20 34 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53   4, SQLITE_TRANS
4d30: 49 45 4e 54 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  IENT);.  }else{.
4d40: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
4d50: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
4d60: 20 22 3f 30 30 30 22 2c 20 34 2c 20 53 51 4c 49   "?000", 4, SQLI
4d70: 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 7d 0a  TE_STATIC);.  }.
4d80: 7d 0a 23 65 6e 64 69 66 0a 0a 23 69 66 64 65 66  }.#endif..#ifdef
4d90: 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 2f 2a 0a   SQLITE_TEST./*.
4da0: 2a 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e  ** This function
4db0: 20 67 65 6e 65 72 61 74 65 73 20 61 20 73 74 72   generates a str
4dc0: 69 6e 67 20 6f 66 20 72 61 6e 64 6f 6d 20 63 68  ing of random ch
4dd0: 61 72 61 63 74 65 72 73 2e 20 20 55 73 65 64 20  aracters.  Used 
4de0: 66 6f 72 0a 2a 2a 20 67 65 6e 65 72 61 74 69 6e  for.** generatin
4df0: 67 20 74 65 73 74 20 64 61 74 61 2e 0a 2a 2f 0a  g test data..*/.
4e00: 73 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64  static void rand
4e10: 53 74 72 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  Str(sqlite3_cont
4e20: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
4e30: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
4e40: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
4e50: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e   static const un
4e60: 73 69 67 6e 65 64 20 63 68 61 72 20 7a 53 72 63  signed char zSrc
4e70: 5b 5d 20 3d 20 0a 20 20 20 20 20 22 61 62 63 64  [] = .     "abcd
4e80: 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74  efghijklmnopqrst
4e90: 75 76 77 78 79 7a 22 0a 20 20 20 20 20 22 41 42  uvwxyz".     "AB
4ea0: 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52  CDEFGHIJKLMNOPQR
4eb0: 53 54 55 56 57 58 59 5a 22 0a 20 20 20 20 20 22  STUVWXYZ".     "
4ec0: 30 31 32 33 34 35 36 37 38 39 22 0a 20 20 20 20  0123456789".    
4ed0: 20 22 2e 2d 21 2c 3a 2a 5e 2b 3d 5f 7c 3f 2f 3c   ".-!,:*^+=_|?/<
4ee0: 3e 20 22 3b 0a 20 20 69 6e 74 20 69 4d 69 6e 2c  > ";.  int iMin,
4ef0: 20 69 4d 61 78 2c 20 6e 2c 20 72 2c 20 69 3b 0a   iMax, n, r, i;.
4f00: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
4f10: 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20 20 69 66  zBuf[1000];.  if
4f20: 28 20 61 72 67 63 3e 3d 31 20 29 7b 0a 20 20 20  ( argc>=1 ){.   
4f30: 20 69 4d 69 6e 20 3d 20 73 71 6c 69 74 65 33 5f   iMin = sqlite3_
4f40: 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 30  value_int(argv[0
4f50: 5d 29 3b 0a 20 20 20 20 69 66 28 20 69 4d 69 6e  ]);.    if( iMin
4f60: 3c 30 20 29 20 69 4d 69 6e 20 3d 20 30 3b 0a 20  <0 ) iMin = 0;. 
4f70: 20 20 20 69 66 28 20 69 4d 69 6e 3e 3d 73 69 7a     if( iMin>=siz
4f80: 65 6f 66 28 7a 42 75 66 29 20 29 20 69 4d 69 6e  eof(zBuf) ) iMin
4f90: 20 3d 20 73 69 7a 65 6f 66 28 7a 42 75 66 29 2d   = sizeof(zBuf)-
4fa0: 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  1;.  }else{.    
4fb0: 69 4d 69 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20 20  iMin = 1;.  }.  
4fc0: 69 66 28 20 61 72 67 63 3e 3d 32 20 29 7b 0a 20  if( argc>=2 ){. 
4fd0: 20 20 20 69 4d 61 78 20 3d 20 73 71 6c 69 74 65     iMax = sqlite
4fe0: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76  3_value_int(argv
4ff0: 5b 31 5d 29 3b 0a 20 20 20 20 69 66 28 20 69 4d  [1]);.    if( iM
5000: 61 78 3c 69 4d 69 6e 20 29 20 69 4d 61 78 20 3d  ax<iMin ) iMax =
5010: 20 69 4d 69 6e 3b 0a 20 20 20 20 69 66 28 20 69   iMin;.    if( i
5020: 4d 61 78 3e 3d 73 69 7a 65 6f 66 28 7a 42 75 66  Max>=sizeof(zBuf
5030: 29 20 29 20 69 4d 61 78 20 3d 20 73 69 7a 65 6f  ) ) iMax = sizeo
5040: 66 28 7a 42 75 66 29 2d 31 3b 0a 20 20 7d 65 6c  f(zBuf)-1;.  }el
5050: 73 65 7b 0a 20 20 20 20 69 4d 61 78 20 3d 20 35  se{.    iMax = 5
5060: 30 3b 0a 20 20 7d 0a 20 20 6e 20 3d 20 69 4d 69  0;.  }.  n = iMi
5070: 6e 3b 0a 20 20 69 66 28 20 69 4d 61 78 3e 69 4d  n;.  if( iMax>iM
5080: 69 6e 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  in ){.    sqlite
5090: 33 52 61 6e 64 6f 6d 6e 65 73 73 28 73 69 7a 65  3Randomness(size
50a0: 6f 66 28 72 29 2c 20 26 72 29 3b 0a 20 20 20 20  of(r), &r);.    
50b0: 72 20 26 3d 20 30 78 37 66 66 66 66 66 66 66 3b  r &= 0x7fffffff;
50c0: 0a 20 20 20 20 6e 20 2b 3d 20 72 25 28 69 4d 61  .    n += r%(iMa
50d0: 78 20 2b 20 31 20 2d 20 69 4d 69 6e 29 3b 0a 20  x + 1 - iMin);. 
50e0: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 6e 3c 73   }.  assert( n<s
50f0: 69 7a 65 6f 66 28 7a 42 75 66 29 20 29 3b 0a 20  izeof(zBuf) );. 
5100: 20 73 71 6c 69 74 65 33 52 61 6e 64 6f 6d 6e 65   sqlite3Randomne
5110: 73 73 28 6e 2c 20 7a 42 75 66 29 3b 0a 20 20 66  ss(n, zBuf);.  f
5120: 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b  or(i=0; i<n; i++
5130: 29 7b 0a 20 20 20 20 7a 42 75 66 5b 69 5d 20 3d  ){.    zBuf[i] =
5140: 20 7a 53 72 63 5b 7a 42 75 66 5b 69 5d 25 28 73   zSrc[zBuf[i]%(s
5150: 69 7a 65 6f 66 28 7a 53 72 63 29 2d 31 29 5d 3b  izeof(zSrc)-1)];
5160: 0a 20 20 7d 0a 20 20 7a 42 75 66 5b 6e 5d 20 3d  .  }.  zBuf[n] =
5170: 20 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65   0;.  sqlite3_re
5180: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
5190: 74 2c 20 7a 42 75 66 2c 20 6e 2c 20 53 51 4c 49  t, zBuf, n, SQLI
51a0: 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 7d  TE_TRANSIENT);.}
51b0: 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54  .#endif /* SQLIT
51c0: 45 5f 54 45 53 54 20 2a 2f 0a 0a 23 69 66 64 65  E_TEST */..#ifde
51d0: 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 2f 2a  f SQLITE_TEST./*
51e0: 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e  .** The followin
51f0: 67 20 74 77 6f 20 53 51 4c 20 66 75 6e 63 74 69  g two SQL functi
5200: 6f 6e 73 20 61 72 65 20 75 73 65 64 20 74 6f 20  ons are used to 
5210: 74 65 73 74 20 72 65 74 75 72 6e 69 6e 67 20 61  test returning a
5220: 20 74 65 78 74 0a 2a 2a 20 72 65 73 75 6c 74 20   text.** result 
5230: 77 69 74 68 20 61 20 64 65 73 74 72 75 63 74 6f  with a destructo
5240: 72 2e 20 46 75 6e 63 74 69 6f 6e 20 27 74 65 73  r. Function 'tes
5250: 74 5f 64 65 73 74 72 75 63 74 6f 72 27 20 74 61  t_destructor' ta
5260: 6b 65 73 20 6f 6e 65 20 61 72 67 75 6d 65 6e 74  kes one argument
5270: 0a 2a 2a 20 61 6e 64 20 72 65 74 75 72 6e 73 20  .** and returns 
5280: 74 68 65 20 73 61 6d 65 20 61 72 67 75 6d 65 6e  the same argumen
5290: 74 20 69 6e 74 65 72 70 72 65 74 65 64 20 61 73  t interpreted as
52a0: 20 54 45 58 54 2e 20 41 20 64 65 73 74 72 75 63   TEXT. A destruc
52b0: 74 6f 72 20 69 73 0a 2a 2a 20 70 61 73 73 65 64  tor is.** passed
52c0: 20 77 69 74 68 20 74 68 65 20 73 71 6c 69 74 65   with the sqlite
52d0: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 29 20  3_result_text() 
52e0: 63 61 6c 6c 2e 0a 2a 2a 0a 2a 2a 20 53 51 4c 20  call..**.** SQL 
52f0: 66 75 6e 63 74 69 6f 6e 20 27 74 65 73 74 5f 64  function 'test_d
5300: 65 73 74 72 75 63 74 6f 72 5f 63 6f 75 6e 74 27  estructor_count'
5310: 20 72 65 74 75 72 6e 73 20 74 68 65 20 6e 75 6d   returns the num
5320: 62 65 72 20 6f 66 20 6f 75 74 73 74 61 6e 64 69  ber of outstandi
5330: 6e 67 20 0a 2a 2a 20 61 6c 6c 6f 63 61 74 69 6f  ng .** allocatio
5340: 6e 73 20 6d 61 64 65 20 62 79 20 27 74 65 73 74  ns made by 'test
5350: 5f 64 65 73 74 72 75 63 74 6f 72 27 3b 0a 2a 2a  _destructor';.**
5360: 0a 2a 2a 20 57 41 52 4e 49 4e 47 3a 20 4e 6f 74  .** WARNING: Not
5370: 20 74 68 72 65 61 64 73 61 66 65 2e 0a 2a 2f 0a   threadsafe..*/.
5380: 73 74 61 74 69 63 20 69 6e 74 20 74 65 73 74 5f  static int test_
5390: 64 65 73 74 72 75 63 74 6f 72 5f 63 6f 75 6e 74  destructor_count
53a0: 5f 76 61 72 20 3d 20 30 3b 0a 73 74 61 74 69 63  _var = 0;.static
53b0: 20 76 6f 69 64 20 64 65 73 74 72 75 63 74 6f 72   void destructor
53c0: 28 76 6f 69 64 20 2a 70 29 7b 0a 20 20 63 68 61  (void *p){.  cha
53d0: 72 20 2a 7a 56 61 6c 20 3d 20 28 63 68 61 72 20  r *zVal = (char 
53e0: 2a 29 70 3b 0a 20 20 61 73 73 65 72 74 28 7a 56  *)p;.  assert(zV
53f0: 61 6c 29 3b 0a 20 20 7a 56 61 6c 2d 2d 3b 0a 20  al);.  zVal--;. 
5400: 20 73 71 6c 69 74 65 46 72 65 65 28 7a 56 61 6c   sqliteFree(zVal
5410: 29 3b 0a 20 20 74 65 73 74 5f 64 65 73 74 72 75  );.  test_destru
5420: 63 74 6f 72 5f 63 6f 75 6e 74 5f 76 61 72 2d 2d  ctor_count_var--
5430: 3b 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  ;.}.static void 
5440: 74 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72 28  test_destructor(
5450: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
5460: 78 74 20 2a 70 43 74 78 2c 20 0a 20 20 69 6e 74  xt *pCtx, .  int
5470: 20 6e 41 72 67 2c 0a 20 20 73 71 6c 69 74 65 33   nArg,.  sqlite3
5480: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
5490: 0a 20 20 63 68 61 72 20 2a 7a 56 61 6c 3b 0a 20  .  char *zVal;. 
54a0: 20 69 6e 74 20 6c 65 6e 3b 0a 20 20 73 71 6c 69   int len;.  sqli
54b0: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
54c0: 33 5f 75 73 65 72 5f 64 61 74 61 28 70 43 74 78  3_user_data(pCtx
54d0: 29 3b 0a 20 0a 20 20 74 65 73 74 5f 64 65 73 74  );. .  test_dest
54e0: 72 75 63 74 6f 72 5f 63 6f 75 6e 74 5f 76 61 72  ructor_count_var
54f0: 2b 2b 3b 0a 20 20 61 73 73 65 72 74 28 20 6e 41  ++;.  assert( nA
5500: 72 67 3d 3d 31 20 29 3b 0a 20 20 69 66 28 20 73  rg==1 );.  if( s
5510: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
5520: 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49  e(argv[0])==SQLI
5530: 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e  TE_NULL ) return
5540: 3b 0a 20 20 6c 65 6e 20 3d 20 73 71 6c 69 74 65  ;.  len = sqlite
5550: 33 56 61 6c 75 65 42 79 74 65 73 28 61 72 67 76  3ValueBytes(argv
5560: 5b 30 5d 2c 20 64 62 2d 3e 65 6e 63 29 3b 20 0a  [0], db->enc); .
5570: 20 20 7a 56 61 6c 20 3d 20 73 71 6c 69 74 65 4d    zVal = sqliteM
5580: 61 6c 6c 6f 63 28 6c 65 6e 2b 33 29 3b 0a 20 20  alloc(len+3);.  
5590: 7a 56 61 6c 5b 6c 65 6e 5d 20 3d 20 30 3b 0a 20  zVal[len] = 0;. 
55a0: 20 7a 56 61 6c 5b 6c 65 6e 2d 31 5d 20 3d 20 30   zVal[len-1] = 0
55b0: 3b 0a 20 20 61 73 73 65 72 74 28 20 7a 56 61 6c  ;.  assert( zVal
55c0: 20 29 3b 0a 20 20 7a 56 61 6c 2b 2b 3b 0a 20 20   );.  zVal++;.  
55d0: 6d 65 6d 63 70 79 28 7a 56 61 6c 2c 20 73 71 6c  memcpy(zVal, sql
55e0: 69 74 65 33 56 61 6c 75 65 54 65 78 74 28 61 72  ite3ValueText(ar
55f0: 67 76 5b 30 5d 2c 20 64 62 2d 3e 65 6e 63 29 2c  gv[0], db->enc),
5600: 20 6c 65 6e 29 3b 0a 20 20 69 66 28 20 64 62 2d   len);.  if( db-
5610: 3e 65 6e 63 3d 3d 53 51 4c 49 54 45 5f 55 54 46  >enc==SQLITE_UTF
5620: 38 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  8 ){.    sqlite3
5630: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 70 43 74  _result_text(pCt
5640: 78 2c 20 7a 56 61 6c 2c 20 2d 31 2c 20 64 65 73  x, zVal, -1, des
5650: 74 72 75 63 74 6f 72 29 3b 0a 23 69 66 6e 64 65  tructor);.#ifnde
5660: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 55 54  f SQLITE_OMIT_UT
5670: 46 31 36 0a 20 20 7d 65 6c 73 65 20 69 66 28 20  F16.  }else if( 
5680: 64 62 2d 3e 65 6e 63 3d 3d 53 51 4c 49 54 45 5f  db->enc==SQLITE_
5690: 55 54 46 31 36 4c 45 20 29 7b 0a 20 20 20 20 73  UTF16LE ){.    s
56a0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
56b0: 78 74 31 36 6c 65 28 70 43 74 78 2c 20 7a 56 61  xt16le(pCtx, zVa
56c0: 6c 2c 20 2d 31 2c 20 64 65 73 74 72 75 63 74 6f  l, -1, destructo
56d0: 72 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  r);.  }else{.   
56e0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
56f0: 74 65 78 74 31 36 62 65 28 70 43 74 78 2c 20 7a  text16be(pCtx, z
5700: 56 61 6c 2c 20 2d 31 2c 20 64 65 73 74 72 75 63  Val, -1, destruc
5710: 74 6f 72 29 3b 0a 23 65 6e 64 69 66 20 2f 2a 20  tor);.#endif /* 
5720: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 55 54 46 31  SQLITE_OMIT_UTF1
5730: 36 20 2a 2f 0a 20 20 7d 0a 7d 0a 73 74 61 74 69  6 */.  }.}.stati
5740: 63 20 76 6f 69 64 20 74 65 73 74 5f 64 65 73 74  c void test_dest
5750: 72 75 63 74 6f 72 5f 63 6f 75 6e 74 28 0a 20 20  ructor_count(.  
5760: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
5770: 2a 70 43 74 78 2c 20 0a 20 20 69 6e 74 20 6e 41  *pCtx, .  int nA
5780: 72 67 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  rg,.  sqlite3_va
5790: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
57a0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
57b0: 6e 74 28 70 43 74 78 2c 20 74 65 73 74 5f 64 65  nt(pCtx, test_de
57c0: 73 74 72 75 63 74 6f 72 5f 63 6f 75 6e 74 5f 76  structor_count_v
57d0: 61 72 29 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a  ar);.}.#endif /*
57e0: 20 53 51 4c 49 54 45 5f 54 45 53 54 20 2a 2f 0a   SQLITE_TEST */.
57f0: 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54  .#ifdef SQLITE_T
5800: 45 53 54 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e  EST./*.** Routin
5810: 65 73 20 66 6f 72 20 74 65 73 74 69 6e 67 20 74  es for testing t
5820: 68 65 20 73 71 6c 69 74 65 33 5f 67 65 74 5f 61  he sqlite3_get_a
5830: 75 78 64 61 74 61 28 29 20 61 6e 64 20 73 71 6c  uxdata() and sql
5840: 69 74 65 33 5f 73 65 74 5f 61 75 78 64 61 74 61  ite3_set_auxdata
5850: 28 29 0a 2a 2a 20 69 6e 74 65 72 66 61 63 65 2e  ().** interface.
5860: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 74 65 73 74 5f  .**.** The test_
5870: 61 75 78 64 61 74 61 28 29 20 53 51 4c 20 66 75  auxdata() SQL fu
5880: 6e 63 74 69 6f 6e 20 61 74 74 65 6d 70 74 73 20  nction attempts 
5890: 74 6f 20 72 65 67 69 73 74 65 72 20 65 61 63 68  to register each
58a0: 20 6f 66 20 69 74 73 20 61 72 67 75 6d 65 6e 74   of its argument
58b0: 73 0a 2a 2a 20 61 73 20 61 75 78 69 6c 69 61 72  s.** as auxiliar
58c0: 79 20 64 61 74 61 2e 20 20 49 66 20 74 68 65 72  y data.  If ther
58d0: 65 20 61 72 65 20 6e 6f 20 70 72 69 6f 72 20 72  e are no prior r
58e0: 65 67 69 73 74 72 61 74 69 6f 6e 73 20 6f 66 20  egistrations of 
58f0: 61 75 78 20 64 61 74 61 20 66 6f 72 0a 2a 2a 20  aux data for.** 
5900: 74 68 61 74 20 61 72 67 75 6d 65 6e 74 20 28 6d  that argument (m
5910: 65 61 6e 69 6e 67 20 74 68 65 20 61 72 67 75 6d  eaning the argum
5920: 65 6e 74 20 69 73 20 6e 6f 74 20 61 20 63 6f 6e  ent is not a con
5930: 73 74 61 6e 74 20 6f 72 20 74 68 69 73 20 69 73  stant or this is
5940: 20 69 74 73 20 66 69 72 73 74 0a 2a 2a 20 63 61   its first.** ca
5950: 6c 6c 29 20 74 68 65 6e 20 74 68 65 20 72 65 73  ll) then the res
5960: 75 6c 74 20 66 6f 72 20 74 68 61 74 20 61 72 67  ult for that arg
5970: 75 6d 65 6e 74 20 69 73 20 30 2e 20 20 49 66 20  ument is 0.  If 
5980: 74 68 65 72 65 20 69 73 20 61 20 70 72 69 6f 72  there is a prior
5990: 0a 2a 2a 20 72 65 67 69 73 74 72 61 74 69 6f 6e  .** registration
59a0: 2c 20 74 68 65 20 72 65 73 75 6c 74 20 66 6f 72  , the result for
59b0: 20 74 68 61 74 20 61 72 67 75 6d 65 6e 74 20 69   that argument i
59c0: 73 20 31 2e 20 20 54 68 65 20 6f 76 65 72 61 6c  s 1.  The overal
59d0: 6c 20 72 65 73 75 6c 74 0a 2a 2a 20 69 73 20 74  l result.** is t
59e0: 68 65 20 69 6e 64 69 76 69 64 75 61 6c 20 61 72  he individual ar
59f0: 67 75 6d 65 6e 74 20 72 65 73 75 6c 74 73 20 73  gument results s
5a00: 65 70 61 72 61 74 65 64 20 62 79 20 73 70 61 63  eparated by spac
5a10: 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  es..*/.static vo
5a20: 69 64 20 66 72 65 65 5f 74 65 73 74 5f 61 75 78  id free_test_aux
5a30: 64 61 74 61 28 76 6f 69 64 20 2a 70 29 20 7b 73  data(void *p) {s
5a40: 71 6c 69 74 65 46 72 65 65 28 70 29 3b 7d 0a 73  qliteFree(p);}.s
5a50: 74 61 74 69 63 20 76 6f 69 64 20 74 65 73 74 5f  tatic void test_
5a60: 61 75 78 64 61 74 61 28 0a 20 20 73 71 6c 69 74  auxdata(.  sqlit
5a70: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70 43 74 78  e3_context *pCtx
5a80: 2c 20 0a 20 20 69 6e 74 20 6e 41 72 67 2c 0a 20  , .  int nArg,. 
5a90: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
5aa0: 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69  *argv.){.  int i
5ab0: 3b 0a 20 20 63 68 61 72 20 2a 7a 52 65 74 20 3d  ;.  char *zRet =
5ac0: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 6e 41   sqliteMalloc(nA
5ad0: 72 67 2a 32 29 3b 0a 20 20 69 66 28 20 21 7a 52  rg*2);.  if( !zR
5ae0: 65 74 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 66  et ) return;.  f
5af0: 6f 72 28 69 3d 30 3b 20 69 3c 6e 41 72 67 3b 20  or(i=0; i<nArg; 
5b00: 69 2b 2b 29 7b 0a 20 20 20 20 63 68 61 72 20 63  i++){.    char c
5b10: 6f 6e 73 74 20 2a 7a 20 3d 20 73 71 6c 69 74 65  onst *z = sqlite
5b20: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
5b30: 76 5b 69 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a  v[i]);.    if( z
5b40: 20 29 7b 0a 20 20 20 20 20 20 63 68 61 72 20 2a   ){.      char *
5b50: 7a 41 75 78 20 3d 20 73 71 6c 69 74 65 33 5f 67  zAux = sqlite3_g
5b60: 65 74 5f 61 75 78 64 61 74 61 28 70 43 74 78 2c  et_auxdata(pCtx,
5b70: 20 69 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a   i);.      if( z
5b80: 41 75 78 20 29 7b 0a 20 20 20 20 20 20 20 20 7a  Aux ){.        z
5b90: 52 65 74 5b 69 2a 32 5d 20 3d 20 27 31 27 3b 0a  Ret[i*2] = '1';.
5ba0: 20 20 20 20 20 20 20 20 69 66 28 20 73 74 72 63          if( strc
5bb0: 6d 70 28 7a 41 75 78 2c 20 7a 29 20 29 7b 0a 20  mp(zAux, z) ){. 
5bc0: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33           sqlite3
5bd0: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 70 43  _result_error(pC
5be0: 74 78 2c 20 22 41 75 78 69 6c 61 72 79 20 64 61  tx, "Auxilary da
5bf0: 74 61 20 63 6f 72 72 75 70 74 69 6f 6e 22 2c 20  ta corruption", 
5c00: 2d 31 29 3b 0a 20 20 20 20 20 20 20 20 20 20 72  -1);.          r
5c10: 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 20 20 7d  eturn;.        }
5c20: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
5c30: 20 20 20 20 20 20 7a 52 65 74 5b 69 2a 32 5d 20        zRet[i*2] 
5c40: 3d 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7a  = '0';.        z
5c50: 41 75 78 20 3d 20 73 71 6c 69 74 65 53 74 72 44  Aux = sqliteStrD
5c60: 75 70 28 7a 29 3b 0a 20 20 20 20 20 20 20 20 73  up(z);.        s
5c70: 71 6c 69 74 65 33 5f 73 65 74 5f 61 75 78 64 61  qlite3_set_auxda
5c80: 74 61 28 70 43 74 78 2c 20 69 2c 20 7a 41 75 78  ta(pCtx, i, zAux
5c90: 2c 20 66 72 65 65 5f 74 65 73 74 5f 61 75 78 64  , free_test_auxd
5ca0: 61 74 61 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  ata);.      }.  
5cb0: 20 20 20 20 7a 52 65 74 5b 69 2a 32 2b 31 5d 20      zRet[i*2+1] 
5cc0: 3d 20 27 20 27 3b 0a 20 20 20 20 7d 0a 20 20 7d  = ' ';.    }.  }
5cd0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
5ce0: 74 5f 74 65 78 74 28 70 43 74 78 2c 20 7a 52 65  t_text(pCtx, zRe
5cf0: 74 2c 20 32 2a 6e 41 72 67 2d 31 2c 20 66 72 65  t, 2*nArg-1, fre
5d00: 65 5f 74 65 73 74 5f 61 75 78 64 61 74 61 29 3b  e_test_auxdata);
5d10: 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c  .}.#endif /* SQL
5d20: 49 54 45 5f 54 45 53 54 20 2a 2f 0a 0a 23 69 66  ITE_TEST */..#if
5d30: 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a  def SQLITE_TEST.
5d40: 2f 2a 0a 2a 2a 20 41 20 66 75 6e 63 74 69 6f 6e  /*.** A function
5d50: 20 74 6f 20 74 65 73 74 20 65 72 72 6f 72 20 72   to test error r
5d60: 65 70 6f 72 74 69 6e 67 20 66 72 6f 6d 20 75 73  eporting from us
5d70: 65 72 20 66 75 6e 63 74 69 6f 6e 73 2e 20 54 68  er functions. Th
5d80: 69 73 20 66 75 6e 63 74 69 6f 6e 0a 2a 2a 20 72  is function.** r
5d90: 65 74 75 72 6e 73 20 61 20 63 6f 70 79 20 6f 66  eturns a copy of
5da0: 20 69 74 27 73 20 66 69 72 73 74 20 61 72 67 75   it's first argu
5db0: 6d 65 6e 74 20 61 73 20 61 6e 20 65 72 72 6f 72  ment as an error
5dc0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
5dd0: 20 74 65 73 74 5f 65 72 72 6f 72 28 0a 20 20 73   test_error(.  s
5de0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
5df0: 70 43 74 78 2c 20 0a 20 20 69 6e 74 20 6e 41 72  pCtx, .  int nAr
5e00: 67 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  g,.  sqlite3_val
5e10: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 73  ue **argv.){.  s
5e20: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
5e30: 72 6f 72 28 70 43 74 78 2c 20 73 71 6c 69 74 65  ror(pCtx, sqlite
5e40: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
5e50: 76 5b 30 5d 29 2c 20 30 29 3b 0a 7d 0a 23 65 6e  v[0]), 0);.}.#en
5e60: 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 54 45  dif /* SQLITE_TE
5e70: 53 54 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20  ST */../*.** An 
5e80: 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65 20  instance of the 
5e90: 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 74  following struct
5ea0: 75 72 65 20 68 6f 6c 64 73 20 74 68 65 20 63 6f  ure holds the co
5eb0: 6e 74 65 78 74 20 6f 66 20 61 0a 2a 2a 20 73 75  ntext of a.** su
5ec0: 6d 28 29 20 6f 72 20 61 76 67 28 29 20 61 67 67  m() or avg() agg
5ed0: 72 65 67 61 74 65 20 63 6f 6d 70 75 74 61 74 69  regate computati
5ee0: 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73  on..*/.typedef s
5ef0: 74 72 75 63 74 20 53 75 6d 43 74 78 20 53 75 6d  truct SumCtx Sum
5f00: 43 74 78 3b 0a 73 74 72 75 63 74 20 53 75 6d 43  Ctx;.struct SumC
5f10: 74 78 20 7b 0a 20 20 64 6f 75 62 6c 65 20 73 75  tx {.  double su
5f20: 6d 3b 20 20 20 20 20 2f 2a 20 53 75 6d 20 6f 66  m;     /* Sum of
5f30: 20 74 65 72 6d 73 20 2a 2f 0a 20 20 69 6e 74 20   terms */.  int 
5f40: 63 6e 74 3b 20 20 20 20 20 20 20 20 2f 2a 20 4e  cnt;        /* N
5f50: 75 6d 62 65 72 20 6f 66 20 65 6c 65 6d 65 6e 74  umber of element
5f60: 73 20 73 75 6d 6d 65 64 20 2a 2f 0a 7d 3b 0a 0a  s summed */.};..
5f70: 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20 75  /*.** Routines u
5f80: 73 65 64 20 74 6f 20 63 6f 6d 70 75 74 65 20 74  sed to compute t
5f90: 68 65 20 73 75 6d 20 6f 72 20 61 76 65 72 61 67  he sum or averag
5fa0: 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  e..*/.static voi
5fb0: 64 20 73 75 6d 53 74 65 70 28 73 71 6c 69 74 65  d sumStep(sqlite
5fc0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
5fd0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
5fe0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
5ff0: 67 76 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70  gv){.  SumCtx *p
6000: 3b 0a 20 20 69 66 28 20 61 72 67 63 3c 31 20 29  ;.  if( argc<1 )
6010: 20 72 65 74 75 72 6e 3b 0a 20 20 70 20 3d 20 73   return;.  p = s
6020: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
6030: 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74  _context(context
6040: 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20  , sizeof(*p));. 
6050: 20 69 66 28 20 70 20 26 26 20 53 51 4c 49 54 45   if( p && SQLITE
6060: 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f 76  _NULL!=sqlite3_v
6070: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
6080: 5d 29 20 29 7b 0a 20 20 20 20 70 2d 3e 73 75 6d  ]) ){.    p->sum
6090: 20 2b 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75   += sqlite3_valu
60a0: 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d  e_double(argv[0]
60b0: 29 3b 0a 20 20 20 20 70 2d 3e 63 6e 74 2b 2b 3b  );.    p->cnt++;
60c0: 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f  .  }.}.static vo
60d0: 69 64 20 73 75 6d 46 69 6e 61 6c 69 7a 65 28 73  id sumFinalize(s
60e0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
60f0: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d 43  context){.  SumC
6100: 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c  tx *p;.  p = sql
6110: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
6120: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
6130: 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 73  sizeof(*p));.  s
6140: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f  qlite3_result_do
6150: 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 20  uble(context, p 
6160: 3f 20 70 2d 3e 73 75 6d 20 3a 20 30 2e 30 29 3b  ? p->sum : 0.0);
6170: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 61  .}.static void a
6180: 76 67 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  vgFinalize(sqlit
6190: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
61a0: 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a  ext){.  SumCtx *
61b0: 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  p;.  p = sqlite3
61c0: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
61d0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65  xt(context, size
61e0: 6f 66 28 2a 70 29 29 3b 0a 20 20 69 66 28 20 70  of(*p));.  if( p
61f0: 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a   && p->cnt>0 ){.
6200: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
6210: 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78  lt_double(contex
6220: 74 2c 20 70 2d 3e 73 75 6d 2f 28 64 6f 75 62 6c  t, p->sum/(doubl
6230: 65 29 70 2d 3e 63 6e 74 29 3b 0a 20 20 7d 0a 7d  e)p->cnt);.  }.}
6240: 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61  ../*.** An insta
6250: 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f  nce of the follo
6260: 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 68  wing structure h
6270: 6f 6c 64 73 20 74 68 65 20 63 6f 6e 74 65 78 74  olds the context
6280: 20 6f 66 20 61 0a 2a 2a 20 76 61 72 69 61 6e 63   of a.** varianc
6290: 65 20 6f 72 20 73 74 61 6e 64 61 72 64 20 64 65  e or standard de
62a0: 76 69 61 74 69 6f 6e 20 63 6f 6d 70 75 74 61 74  viation computat
62b0: 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20  ion..*/.typedef 
62c0: 73 74 72 75 63 74 20 53 74 64 44 65 76 43 74 78  struct StdDevCtx
62d0: 20 53 74 64 44 65 76 43 74 78 3b 0a 73 74 72 75   StdDevCtx;.stru
62e0: 63 74 20 53 74 64 44 65 76 43 74 78 20 7b 0a 20  ct StdDevCtx {. 
62f0: 20 64 6f 75 62 6c 65 20 73 75 6d 3b 20 20 20 20   double sum;    
6300: 20 2f 2a 20 53 75 6d 20 6f 66 20 74 65 72 6d 73   /* Sum of terms
6310: 20 2a 2f 0a 20 20 64 6f 75 62 6c 65 20 73 75 6d   */.  double sum
6320: 32 3b 20 20 20 20 2f 2a 20 53 75 6d 20 6f 66 20  2;    /* Sum of 
6330: 74 68 65 20 73 71 75 61 72 65 73 20 6f 66 20 74  the squares of t
6340: 65 72 6d 73 20 2a 2f 0a 20 20 69 6e 74 20 63 6e  erms */.  int cn
6350: 74 3b 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d  t;        /* Num
6360: 62 65 72 20 6f 66 20 74 65 72 6d 73 20 63 6f 75  ber of terms cou
6370: 6e 74 65 64 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a  nted */.};../*.*
6380: 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20  * The following 
6390: 73 74 72 75 63 74 75 72 65 20 6b 65 65 70 73 20  structure keeps 
63a0: 74 72 61 63 6b 20 6f 66 20 73 74 61 74 65 20 69  track of state i
63b0: 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74  nformation for t
63c0: 68 65 0a 2a 2a 20 63 6f 75 6e 74 28 29 20 61 67  he.** count() ag
63d0: 67 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e  gregate function
63e0: 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72  ..*/.typedef str
63f0: 75 63 74 20 43 6f 75 6e 74 43 74 78 20 43 6f 75  uct CountCtx Cou
6400: 6e 74 43 74 78 3b 0a 73 74 72 75 63 74 20 43 6f  ntCtx;.struct Co
6410: 75 6e 74 43 74 78 20 7b 0a 20 20 69 6e 74 20 6e  untCtx {.  int n
6420: 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74  ;.};../*.** Rout
6430: 69 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e  ines to implemen
6440: 74 20 74 68 65 20 63 6f 75 6e 74 28 29 20 61 67  t the count() ag
6450: 67 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e  gregate function
6460: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
6470: 20 63 6f 75 6e 74 53 74 65 70 28 73 71 6c 69 74   countStep(sqlit
6480: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
6490: 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73  ext, int argc, s
64a0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
64b0: 72 67 76 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78  rgv){.  CountCtx
64c0: 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74   *p;.  p = sqlit
64d0: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
64e0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69  text(context, si
64f0: 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 69 66 28  zeof(*p));.  if(
6500: 20 28 61 72 67 63 3d 3d 30 20 7c 7c 20 53 51 4c   (argc==0 || SQL
6510: 49 54 45 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65  ITE_NULL!=sqlite
6520: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
6530: 76 5b 30 5d 29 29 20 26 26 20 70 20 29 7b 0a 20  v[0])) && p ){. 
6540: 20 20 20 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a 7d     p->n++;.  }.}
6550: 20 20 20 0a 73 74 61 74 69 63 20 76 6f 69 64 20     .static void 
6560: 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 28 73 71  countFinalize(sq
6570: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
6580: 6f 6e 74 65 78 74 29 7b 0a 20 20 43 6f 75 6e 74  ontext){.  Count
6590: 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71  Ctx *p;.  p = sq
65a0: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
65b0: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
65c0: 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20   sizeof(*p));.  
65d0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
65e0: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20  nt(context, p ? 
65f0: 70 2d 3e 6e 20 3a 20 30 29 3b 0a 7d 0a 0a 2f 2a  p->n : 0);.}../*
6600: 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f  .** This functio
6610: 6e 20 74 72 61 63 6b 73 20 73 74 61 74 65 20 69  n tracks state i
6620: 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74  nformation for t
6630: 68 65 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78  he min() and max
6640: 28 29 0a 2a 2a 20 61 67 67 72 65 67 61 74 65 20  ().** aggregate 
6650: 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 74 79  functions..*/.ty
6660: 70 65 64 65 66 20 73 74 72 75 63 74 20 4d 69 6e  pedef struct Min
6670: 4d 61 78 43 74 78 20 4d 69 6e 4d 61 78 43 74 78  MaxCtx MinMaxCtx
6680: 3b 0a 73 74 72 75 63 74 20 4d 69 6e 4d 61 78 43  ;.struct MinMaxC
6690: 74 78 20 7b 0a 20 20 63 68 61 72 20 2a 7a 3b 20  tx {.  char *z; 
66a0: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 62          /* The b
66b0: 65 73 74 20 73 6f 20 66 61 72 20 2a 2f 0a 20 20  est so far */.  
66c0: 63 68 61 72 20 7a 42 75 66 5b 32 38 5d 3b 20 20  char zBuf[28];  
66d0: 20 2f 2a 20 53 70 61 63 65 20 74 68 61 74 20 63   /* Space that c
66e0: 61 6e 20 62 65 20 75 73 65 64 20 66 6f 72 20 73  an be used for s
66f0: 74 6f 72 61 67 65 20 2a 2f 0a 7d 3b 0a 0a 2f 2a  torage */.};../*
6700: 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20 74 6f 20  .** Routines to 
6710: 69 6d 70 6c 65 6d 65 6e 74 20 6d 69 6e 28 29 20  implement min() 
6720: 61 6e 64 20 6d 61 78 28 29 20 61 67 67 72 65 67  and max() aggreg
6730: 61 74 65 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a  ate functions..*
6740: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d 69  /.static void mi
6750: 6e 6d 61 78 53 74 65 70 28 73 71 6c 69 74 65 33  nmaxStep(sqlite3
6760: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
6770: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
6780: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
6790: 76 29 7b 0a 20 20 4d 65 6d 20 2a 70 41 72 67 20  v){.  Mem *pArg 
67a0: 20 3d 20 28 4d 65 6d 20 2a 29 61 72 67 76 5b 30   = (Mem *)argv[0
67b0: 5d 3b 0a 20 20 4d 65 6d 20 2a 70 42 65 73 74 3b  ];.  Mem *pBest;
67c0: 0a 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f  ..  if( sqlite3_
67d0: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
67e0: 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  0])==SQLITE_NULL
67f0: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 70 42 65   ) return;.  pBe
6800: 73 74 20 3d 20 28 4d 65 6d 20 2a 29 73 71 6c 69  st = (Mem *)sqli
6810: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
6820: 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  ntext(context, s
6830: 69 7a 65 6f 66 28 2a 70 42 65 73 74 29 29 3b 0a  izeof(*pBest));.
6840: 20 20 69 66 28 20 21 70 42 65 73 74 20 29 20 72    if( !pBest ) r
6850: 65 74 75 72 6e 3b 0a 0a 20 20 69 66 28 20 70 42  eturn;..  if( pB
6860: 65 73 74 2d 3e 66 6c 61 67 73 20 29 7b 0a 20 20  est->flags ){.  
6870: 20 20 69 6e 74 20 6d 61 78 3b 0a 20 20 20 20 69    int max;.    i
6880: 6e 74 20 63 6d 70 3b 0a 20 20 20 20 43 6f 6c 6c  nt cmp;.    Coll
6890: 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c  Seq *pColl = sql
68a0: 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53  ite3GetFuncCollS
68b0: 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  eq(context);.   
68c0: 20 2f 2a 20 54 68 69 73 20 73 74 65 70 20 66 75   /* This step fu
68d0: 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64 20 66  nction is used f
68e0: 6f 72 20 62 6f 74 68 20 74 68 65 20 6d 69 6e 28  or both the min(
68f0: 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67 67 72  ) and max() aggr
6900: 65 67 61 74 65 73 2c 0a 20 20 20 20 2a 2a 20 74  egates,.    ** t
6910: 68 65 20 6f 6e 6c 79 20 64 69 66 66 65 72 65 6e  he only differen
6920: 63 65 20 62 65 74 77 65 65 6e 20 74 68 65 20 74  ce between the t
6930: 77 6f 20 62 65 69 6e 67 20 74 68 61 74 20 74 68  wo being that th
6940: 65 20 73 65 6e 73 65 20 6f 66 20 74 68 65 0a 20  e sense of the. 
6950: 20 20 20 2a 2a 20 63 6f 6d 70 61 72 69 73 6f 6e     ** comparison
6960: 20 69 73 20 69 6e 76 65 72 74 65 64 2e 20 46 6f   is inverted. Fo
6970: 72 20 74 68 65 20 6d 61 78 28 29 20 61 67 67 72  r the max() aggr
6980: 65 67 61 74 65 2c 20 74 68 65 0a 20 20 20 20 2a  egate, the.    *
6990: 2a 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64  * sqlite3_user_d
69a0: 61 74 61 28 29 20 66 75 6e 63 74 69 6f 6e 20 72  ata() function r
69b0: 65 74 75 72 6e 73 20 28 76 6f 69 64 20 2a 29 2d  eturns (void *)-
69c0: 31 2e 20 46 6f 72 20 6d 69 6e 28 29 20 69 74 0a  1. For min() it.
69d0: 20 20 20 20 2a 2a 20 72 65 74 75 72 6e 73 20 28      ** returns (
69e0: 76 6f 69 64 20 2a 29 64 62 2c 20 77 68 65 72 65  void *)db, where
69f0: 20 64 62 20 69 73 20 74 68 65 20 73 71 6c 69 74   db is the sqlit
6a00: 65 33 2a 20 64 61 74 61 62 61 73 65 20 70 6f 69  e3* database poi
6a10: 6e 74 65 72 2e 0a 20 20 20 20 2a 2a 20 54 68 65  nter..    ** The
6a20: 72 65 66 6f 72 65 20 74 68 65 20 6e 65 78 74 20  refore the next 
6a30: 73 74 61 74 65 6d 65 6e 74 20 73 65 74 73 20 76  statement sets v
6a40: 61 72 69 61 62 6c 65 20 27 6d 61 78 27 20 74 6f  ariable 'max' to
6a50: 20 31 20 66 6f 72 20 74 68 65 20 6d 61 78 28 29   1 for the max()
6a60: 0a 20 20 20 20 2a 2a 20 61 67 67 72 65 67 61 74  .    ** aggregat
6a70: 65 2c 20 6f 72 20 30 20 66 6f 72 20 6d 69 6e 28  e, or 0 for min(
6a80: 29 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 6d 61  )..    */.    ma
6a90: 78 20 3d 20 28 28 73 71 6c 69 74 65 33 5f 75 73  x = ((sqlite3_us
6aa0: 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29  er_data(context)
6ab0: 3d 3d 28 76 6f 69 64 20 2a 29 2d 31 29 3f 31 3a  ==(void *)-1)?1:
6ac0: 30 29 3b 0a 20 20 20 20 63 6d 70 20 3d 20 73 71  0);.    cmp = sq
6ad0: 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28  lite3MemCompare(
6ae0: 70 42 65 73 74 2c 20 70 41 72 67 2c 20 70 43 6f  pBest, pArg, pCo
6af0: 6c 6c 29 3b 0a 20 20 20 20 69 66 28 20 28 6d 61  ll);.    if( (ma
6b00: 78 20 26 26 20 63 6d 70 3c 30 29 20 7c 7c 20 28  x && cmp<0) || (
6b10: 21 6d 61 78 20 26 26 20 63 6d 70 3e 30 29 20 29  !max && cmp>0) )
6b20: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 56  {.      sqlite3V
6b30: 64 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74  dbeMemCopy(pBest
6b40: 2c 20 70 41 72 67 29 3b 0a 20 20 20 20 7d 0a 20  , pArg);.    }. 
6b50: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69   }else{.    sqli
6b60: 74 65 33 56 64 62 65 4d 65 6d 43 6f 70 79 28 70  te3VdbeMemCopy(p
6b70: 42 65 73 74 2c 20 70 41 72 67 29 3b 0a 20 20 7d  Best, pArg);.  }
6b80: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d  .}.static void m
6b90: 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 28 73 71  inMaxFinalize(sq
6ba0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
6bb0: 6f 6e 74 65 78 74 29 7b 0a 20 20 73 71 6c 69 74  ontext){.  sqlit
6bc0: 65 33 5f 76 61 6c 75 65 20 2a 70 52 65 73 3b 0a  e3_value *pRes;.
6bd0: 20 20 70 52 65 73 20 3d 20 28 73 71 6c 69 74 65    pRes = (sqlite
6be0: 33 5f 76 61 6c 75 65 20 2a 29 73 71 6c 69 74 65  3_value *)sqlite
6bf0: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
6c00: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a  ext(context, siz
6c10: 65 6f 66 28 4d 65 6d 29 29 3b 0a 20 20 69 66 28  eof(Mem));.  if(
6c20: 20 70 52 65 73 2d 3e 66 6c 61 67 73 20 29 7b 0a   pRes->flags ){.
6c30: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
6c40: 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74  lt_value(context
6c50: 2c 20 70 52 65 73 29 3b 0a 20 20 7d 0a 20 20 73  , pRes);.  }.  s
6c60: 71 6c 69 74 65 33 56 64 62 65 4d 65 6d 52 65 6c  qlite3VdbeMemRel
6c70: 65 61 73 65 28 70 52 65 73 29 3b 0a 7d 0a 0a 0a  ease(pRes);.}...
6c80: 2f 2a 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74  /*.** This funct
6c90: 69 6f 6e 20 72 65 67 69 73 74 65 72 65 64 20 61  ion registered a
6ca0: 6c 6c 20 6f 66 20 74 68 65 20 61 62 6f 76 65 20  ll of the above 
6cb0: 43 20 66 75 6e 63 74 69 6f 6e 73 20 61 73 20 53  C functions as S
6cc0: 51 4c 0a 2a 2a 20 66 75 6e 63 74 69 6f 6e 73 2e  QL.** functions.
6cd0: 20 20 54 68 69 73 20 73 68 6f 75 6c 64 20 62 65    This should be
6ce0: 20 74 68 65 20 6f 6e 6c 79 20 72 6f 75 74 69 6e   the only routin
6cf0: 65 20 69 6e 20 74 68 69 73 20 66 69 6c 65 20 77  e in this file w
6d00: 69 74 68 0a 2a 2a 20 65 78 74 65 72 6e 61 6c 20  ith.** external 
6d10: 6c 69 6e 6b 61 67 65 2e 0a 2a 2f 0a 76 6f 69 64  linkage..*/.void
6d20: 20 73 71 6c 69 74 65 33 52 65 67 69 73 74 65 72   sqlite3Register
6d30: 42 75 69 6c 74 69 6e 46 75 6e 63 74 69 6f 6e 73  BuiltinFunctions
6d40: 28 73 71 6c 69 74 65 33 20 2a 64 62 29 7b 0a 20  (sqlite3 *db){. 
6d50: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74   static const st
6d60: 72 75 63 74 20 7b 0a 20 20 20 20 20 63 68 61 72  ruct {.     char
6d70: 20 2a 7a 4e 61 6d 65 3b 0a 20 20 20 20 20 73 69   *zName;.     si
6d80: 67 6e 65 64 20 63 68 61 72 20 6e 41 72 67 3b 0a  gned char nArg;.
6d90: 20 20 20 20 20 75 38 20 61 72 67 54 79 70 65 3b       u8 argType;
6da0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 30 3a             /* 0:
6db0: 20 6e 6f 6e 65 2e 20 20 31 3a 20 64 62 20 20 32   none.  1: db  2
6dc0: 3a 20 28 2d 31 29 20 2a 2f 0a 20 20 20 20 20 75  : (-1) */.     u
6dd0: 38 20 65 54 65 78 74 52 65 70 3b 20 20 20 20 20  8 eTextRep;     
6de0: 20 20 20 20 20 2f 2a 20 31 3a 20 55 54 46 2d 31       /* 1: UTF-1
6df0: 36 2e 20 20 30 3a 20 55 54 46 2d 38 20 2a 2f 0a  6.  0: UTF-8 */.
6e00: 20 20 20 20 20 75 38 20 6e 65 65 64 43 6f 6c 6c       u8 needColl
6e10: 53 65 71 3b 0a 20 20 20 20 20 76 6f 69 64 20 28  Seq;.     void (
6e20: 2a 78 46 75 6e 63 29 28 73 71 6c 69 74 65 33 5f  *xFunc)(sqlite3_
6e30: 63 6f 6e 74 65 78 74 2a 2c 69 6e 74 2c 73 71 6c  context*,int,sql
6e40: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 29 3b 0a  ite3_value **);.
6e50: 20 20 7d 20 61 46 75 6e 63 73 5b 5d 20 3d 20 7b    } aFuncs[] = {
6e60: 0a 20 20 20 20 7b 20 22 6d 69 6e 22 2c 20 20 20  .    { "min",   
6e70: 20 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20              -1, 
6e80: 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  0, SQLITE_UTF8, 
6e90: 20 20 20 31 2c 20 6d 69 6e 6d 61 78 46 75 6e 63     1, minmaxFunc
6ea0: 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 69 6e 22 2c   },.    { "min",
6eb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6ec0: 30 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46  0, 0, SQLITE_UTF
6ed0: 38 2c 20 20 20 20 31 2c 20 30 20 20 20 20 20 20  8,    1, 0      
6ee0: 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 61      },.    { "ma
6ef0: 78 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  x",             
6f00: 20 20 2d 31 2c 20 32 2c 20 53 51 4c 49 54 45 5f    -1, 2, SQLITE_
6f10: 55 54 46 38 2c 20 20 20 20 31 2c 20 6d 69 6e 6d  UTF8,    1, minm
6f20: 61 78 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20  axFunc },.    { 
6f30: 22 6d 61 78 22 2c 20 20 20 20 20 20 20 20 20 20  "max",          
6f40: 20 20 20 20 20 20 30 2c 20 32 2c 20 53 51 4c 49        0, 2, SQLI
6f50: 54 45 5f 55 54 46 38 2c 20 20 20 20 31 2c 20 30  TE_UTF8,    1, 0
6f60: 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20            },.   
6f70: 20 7b 20 22 74 79 70 65 6f 66 22 2c 20 20 20 20   { "typeof",    
6f80: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53           1, 0, S
6f90: 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30  QLITE_UTF8,    0
6fa0: 2c 20 74 79 70 65 6f 66 46 75 6e 63 20 7d 2c 0a  , typeofFunc },.
6fb0: 20 20 20 20 7b 20 22 6c 65 6e 67 74 68 22 2c 20      { "length", 
6fc0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
6fd0: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20  , SQLITE_UTF8,  
6fe0: 20 20 30 2c 20 6c 65 6e 67 74 68 46 75 6e 63 20    0, lengthFunc 
6ff0: 7d 2c 0a 20 20 20 20 7b 20 22 73 75 62 73 74 72  },.    { "substr
7000: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 33  ",             3
7010: 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  , 0, SQLITE_UTF8
7020: 2c 20 20 20 20 30 2c 20 73 75 62 73 74 72 46 75  ,    0, substrFu
7030: 6e 63 20 7d 2c 0a 23 69 66 6e 64 65 66 20 53 51  nc },.#ifndef SQ
7040: 4c 49 54 45 5f 4f 4d 49 54 5f 55 54 46 31 36 0a  LITE_OMIT_UTF16.
7050: 20 20 20 20 7b 20 22 73 75 62 73 74 72 22 2c 20      { "substr", 
7060: 20 20 20 20 20 20 20 20 20 20 20 20 33 2c 20 30              3, 0
7070: 2c 20 53 51 4c 49 54 45 5f 55 54 46 31 36 4c 45  , SQLITE_UTF16LE
7080: 2c 20 30 2c 20 73 71 6c 69 74 65 33 75 74 66 31  , 0, sqlite3utf1
7090: 36 53 75 62 73 74 72 20 7d 2c 0a 23 65 6e 64 69  6Substr },.#endi
70a0: 66 0a 20 20 20 20 7b 20 22 61 62 73 22 2c 20 20  f.    { "abs",  
70b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
70c0: 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c   0, SQLITE_UTF8,
70d0: 20 20 20 20 30 2c 20 61 62 73 46 75 6e 63 20 20      0, absFunc  
70e0: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72 6f 75 6e    },.    { "roun
70f0: 64 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  d",             
7100: 20 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54   1, 0, SQLITE_UT
7110: 46 38 2c 20 20 20 20 30 2c 20 72 6f 75 6e 64 46  F8,    0, roundF
7120: 75 6e 63 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72  unc  },.    { "r
7130: 6f 75 6e 64 22 2c 20 20 20 20 20 20 20 20 20 20  ound",          
7140: 20 20 20 20 32 2c 20 30 2c 20 53 51 4c 49 54 45      2, 0, SQLITE
7150: 5f 55 54 46 38 2c 20 20 20 20 30 2c 20 72 6f 75  _UTF8,    0, rou
7160: 6e 64 46 75 6e 63 20 20 7d 2c 0a 20 20 20 20 7b  ndFunc  },.    {
7170: 20 22 75 70 70 65 72 22 2c 20 20 20 20 20 20 20   "upper",       
7180: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53 51 4c         1, 0, SQL
7190: 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20  ITE_UTF8,    0, 
71a0: 75 70 70 65 72 46 75 6e 63 20 20 7d 2c 0a 20 20  upperFunc  },.  
71b0: 20 20 7b 20 22 6c 6f 77 65 72 22 2c 20 20 20 20    { "lower",    
71c0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
71d0: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20  SQLITE_UTF8,    
71e0: 30 2c 20 6c 6f 77 65 72 46 75 6e 63 20 20 7d 2c  0, lowerFunc  },
71f0: 0a 20 20 20 20 7b 20 22 63 6f 61 6c 65 73 63 65  .    { "coalesce
7200: 22 2c 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20  ",          -1, 
7210: 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  0, SQLITE_UTF8, 
7220: 20 20 20 30 2c 20 69 66 6e 75 6c 6c 46 75 6e 63     0, ifnullFunc
7230: 20 7d 2c 0a 20 20 20 20 7b 20 22 63 6f 61 6c 65   },.    { "coale
7240: 73 63 65 22 2c 20 20 20 20 20 20 20 20 20 20 20  sce",           
7250: 30 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46  0, 0, SQLITE_UTF
7260: 38 2c 20 20 20 20 30 2c 20 30 20 20 20 20 20 20  8,    0, 0      
7270: 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 63 6f      },.    { "co
7280: 61 6c 65 73 63 65 22 2c 20 20 20 20 20 20 20 20  alesce",        
7290: 20 20 20 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f     1, 0, SQLITE_
72a0: 55 54 46 38 2c 20 20 20 20 30 2c 20 30 20 20 20  UTF8,    0, 0   
72b0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
72c0: 22 69 66 6e 75 6c 6c 22 2c 20 20 20 20 20 20 20  "ifnull",       
72d0: 20 20 20 20 20 20 32 2c 20 30 2c 20 53 51 4c 49        2, 0, SQLI
72e0: 54 45 5f 55 54 46 38 2c 20 20 20 20 31 2c 20 69  TE_UTF8,    1, i
72f0: 66 6e 75 6c 6c 46 75 6e 63 20 7d 2c 0a 20 20 20  fnullFunc },.   
7300: 20 7b 20 22 72 61 6e 64 6f 6d 22 2c 20 20 20 20   { "random",    
7310: 20 20 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 53          -1, 0, S
7320: 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30  QLITE_UTF8,    0
7330: 2c 20 72 61 6e 64 6f 6d 46 75 6e 63 20 7d 2c 0a  , randomFunc },.
7340: 20 20 20 20 7b 20 22 6c 69 6b 65 22 2c 20 20 20      { "like",   
7350: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30              2, 0
7360: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20  , SQLITE_UTF8,  
7370: 20 20 30 2c 20 6c 69 6b 65 46 75 6e 63 20 20 20    0, likeFunc   
7380: 7d 2c 0a 20 20 20 20 7b 20 22 6c 69 6b 65 22 2c  },.    { "like",
7390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 33                 3
73a0: 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  , 0, SQLITE_UTF8
73b0: 2c 20 20 20 20 30 2c 20 6c 69 6b 65 46 75 6e 63  ,    0, likeFunc
73c0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 67 6c 6f     },.    { "glo
73d0: 62 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  b",             
73e0: 20 20 32 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55    2, 0, SQLITE_U
73f0: 54 46 38 2c 20 20 20 20 30 2c 20 67 6c 6f 62 46  TF8,    0, globF
7400: 75 6e 63 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22  unc   },.    { "
7410: 6e 75 6c 6c 69 66 22 2c 20 20 20 20 20 20 20 20  nullif",        
7420: 20 20 20 20 20 32 2c 20 30 2c 20 53 51 4c 49 54       2, 0, SQLIT
7430: 45 5f 55 54 46 38 2c 20 20 20 20 31 2c 20 6e 75  E_UTF8,    1, nu
7440: 6c 6c 69 66 46 75 6e 63 20 7d 2c 0a 20 20 20 20  llifFunc },.    
7450: 7b 20 22 73 71 6c 69 74 65 5f 76 65 72 73 69 6f  { "sqlite_versio
7460: 6e 22 2c 20 20 20 20 20 30 2c 20 30 2c 20 53 51  n",     0, 0, SQ
7470: 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c  LITE_UTF8,    0,
7480: 20 76 65 72 73 69 6f 6e 46 75 6e 63 7d 2c 0a 20   versionFunc},. 
7490: 20 20 20 7b 20 22 71 75 6f 74 65 22 2c 20 20 20     { "quote",   
74a0: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
74b0: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20   SQLITE_UTF8,   
74c0: 20 30 2c 20 71 75 6f 74 65 46 75 6e 63 20 20 7d   0, quoteFunc  }
74d0: 2c 0a 20 20 20 20 7b 20 22 6c 61 73 74 5f 69 6e  ,.    { "last_in
74e0: 73 65 72 74 5f 72 6f 77 69 64 22 2c 20 20 30 2c  sert_rowid",  0,
74f0: 20 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c   1, SQLITE_UTF8,
7500: 20 20 20 20 30 2c 20 6c 61 73 74 5f 69 6e 73 65      0, last_inse
7510: 72 74 5f 72 6f 77 69 64 20 7d 2c 0a 20 20 20 20  rt_rowid },.    
7520: 7b 20 22 63 68 61 6e 67 65 73 22 2c 20 20 20 20  { "changes",    
7530: 20 20 20 20 20 20 20 20 30 2c 20 31 2c 20 53 51          0, 1, SQ
7540: 4c 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c  LITE_UTF8,    0,
7550: 20 63 68 61 6e 67 65 73 20 20 20 20 7d 2c 0a 20   changes    },. 
7560: 20 20 20 7b 20 22 74 6f 74 61 6c 5f 63 68 61 6e     { "total_chan
7570: 67 65 73 22 2c 20 20 20 20 20 20 30 2c 20 31 2c  ges",      0, 1,
7580: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 20 20   SQLITE_UTF8,   
7590: 20 30 2c 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65   0, total_change
75a0: 73 20 7d 2c 0a 20 20 20 20 7b 20 22 74 65 78 74  s },.    { "text
75b0: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ",              
75c0: 20 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54   1, 0, SQLITE_UT
75d0: 46 38 2c 20 20 20 20 30 2c 20 74 65 78 74 46 75  F8,    0, textFu
75e0: 6e 63 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b  nc      },.    {
75f0: 20 22 6e 75 6d 65 72 69 63 22 2c 20 20 20 20 20   "numeric",     
7600: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53 51 4c         1, 0, SQL
7610: 49 54 45 5f 55 54 46 38 2c 20 20 20 20 30 2c 20  ITE_UTF8,    0, 
7620: 6e 75 6d 65 72 69 63 46 75 6e 63 20 20 20 7d 2c  numericFunc   },
7630: 0a 20 20 20 20 7b 20 22 62 6c 6f 62 22 2c 20 20  .    { "blob",  
7640: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
7650: 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  0, SQLITE_UTF8, 
7660: 20 20 20 30 2c 20 62 6c 6f 62 46 75 6e 63 20 20     0, blobFunc  
7670: 20 20 20 20 7d 2c 0a 23 69 66 64 65 66 20 53 51      },.#ifdef SQ
7680: 4c 49 54 45 5f 53 4f 55 4e 44 45 58 0a 20 20 20  LITE_SOUNDEX.   
7690: 20 7b 20 22 73 6f 75 6e 64 65 78 22 2c 20 20 20   { "soundex",   
76a0: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 53           1, 0, S
76b0: 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c 20 73  QLITE_UTF8, 0, s
76c0: 6f 75 6e 64 65 78 46 75 6e 63 7d 2c 0a 23 65 6e  oundexFunc},.#en
76d0: 64 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49 54  dif.#ifdef SQLIT
76e0: 45 5f 54 45 53 54 0a 20 20 20 20 7b 20 22 72 61  E_TEST.    { "ra
76f0: 6e 64 73 74 72 22 2c 20 20 20 20 20 20 20 20 20  ndstr",         
7700: 20 20 20 20 20 20 32 2c 20 30 2c 20 53 51 4c 49        2, 0, SQLI
7710: 54 45 5f 55 54 46 38 2c 20 30 2c 20 72 61 6e 64  TE_UTF8, 0, rand
7720: 53 74 72 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20  Str    },.    { 
7730: 22 74 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72  "test_destructor
7740: 22 2c 20 20 20 20 20 20 20 31 2c 20 31 2c 20 53  ",       1, 1, S
7750: 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c 20 74  QLITE_UTF8, 0, t
7760: 65 73 74 5f 64 65 73 74 72 75 63 74 6f 72 7d 2c  est_destructor},
7770: 0a 20 20 20 20 7b 20 22 74 65 73 74 5f 64 65 73  .    { "test_des
7780: 74 72 75 63 74 6f 72 5f 63 6f 75 6e 74 22 2c 20  tructor_count", 
7790: 30 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54 46  0, 0, SQLITE_UTF
77a0: 38 2c 20 30 2c 20 74 65 73 74 5f 64 65 73 74 72  8, 0, test_destr
77b0: 75 63 74 6f 72 5f 63 6f 75 6e 74 7d 2c 0a 20 20  uctor_count},.  
77c0: 20 20 7b 20 22 74 65 73 74 5f 61 75 78 64 61 74    { "test_auxdat
77d0: 61 22 2c 20 20 20 20 20 20 20 20 20 2d 31 2c 20  a",         -1, 
77e0: 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  0, SQLITE_UTF8, 
77f0: 30 2c 20 74 65 73 74 5f 61 75 78 64 61 74 61 7d  0, test_auxdata}
7800: 2c 0a 20 20 20 20 7b 20 22 74 65 73 74 5f 65 72  ,.    { "test_er
7810: 72 6f 72 22 2c 20 20 20 20 20 20 20 20 20 20 20  ror",           
7820: 20 31 2c 20 30 2c 20 53 51 4c 49 54 45 5f 55 54   1, 0, SQLITE_UT
7830: 46 38 2c 20 30 2c 20 74 65 73 74 5f 65 72 72 6f  F8, 0, test_erro
7840: 72 7d 2c 0a 23 65 6e 64 69 66 0a 20 20 7d 3b 0a  r},.#endif.  };.
7850: 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73    static const s
7860: 74 72 75 63 74 20 7b 0a 20 20 20 20 63 68 61 72  truct {.    char
7870: 20 2a 7a 4e 61 6d 65 3b 0a 20 20 20 20 73 69 67   *zName;.    sig
7880: 6e 65 64 20 63 68 61 72 20 6e 41 72 67 3b 0a 20  ned char nArg;. 
7890: 20 20 20 75 38 20 61 72 67 54 79 70 65 3b 0a 20     u8 argType;. 
78a0: 20 20 20 75 38 20 6e 65 65 64 43 6f 6c 6c 53 65     u8 needCollSe
78b0: 71 3b 0a 20 20 20 20 76 6f 69 64 20 28 2a 78 53  q;.    void (*xS
78c0: 74 65 70 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e  tep)(sqlite3_con
78d0: 74 65 78 74 2a 2c 69 6e 74 2c 73 71 6c 69 74 65  text*,int,sqlite
78e0: 33 5f 76 61 6c 75 65 2a 2a 29 3b 0a 20 20 20 20  3_value**);.    
78f0: 76 6f 69 64 20 28 2a 78 46 69 6e 61 6c 69 7a 65  void (*xFinalize
7900: 29 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  )(sqlite3_contex
7910: 74 2a 29 3b 0a 20 20 7d 20 61 41 67 67 73 5b 5d  t*);.  } aAggs[]
7920: 20 3d 20 7b 0a 20 20 20 20 7b 20 22 6d 69 6e 22   = {.    { "min"
7930: 2c 20 20 20 20 31 2c 20 30 2c 20 31 2c 20 6d 69  ,    1, 0, 1, mi
7940: 6e 6d 61 78 53 74 65 70 2c 20 20 20 6d 69 6e 4d  nmaxStep,   minM
7950: 61 78 46 69 6e 61 6c 69 7a 65 20 7d 2c 0a 20 20  axFinalize },.  
7960: 20 20 7b 20 22 6d 61 78 22 2c 20 20 20 20 31 2c    { "max",    1,
7970: 20 32 2c 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65   2, 1, minmaxSte
7980: 70 2c 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c  p,   minMaxFinal
7990: 69 7a 65 20 7d 2c 0a 20 20 20 20 7b 20 22 73 75  ize },.    { "su
79a0: 6d 22 2c 20 20 20 20 31 2c 20 30 2c 20 30 2c 20  m",    1, 0, 0, 
79b0: 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20 73 75  sumStep,      su
79c0: 6d 46 69 6e 61 6c 69 7a 65 20 20 20 20 7d 2c 0a  mFinalize    },.
79d0: 20 20 20 20 7b 20 22 61 76 67 22 2c 20 20 20 20      { "avg",    
79e0: 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53 74 65 70  1, 0, 0, sumStep
79f0: 2c 20 20 20 20 20 20 61 76 67 46 69 6e 61 6c 69  ,      avgFinali
7a00: 7a 65 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22  ze    },.    { "
7a10: 63 6f 75 6e 74 22 2c 20 20 30 2c 20 30 2c 20 30  count",  0, 0, 0
7a20: 2c 20 63 6f 75 6e 74 53 74 65 70 2c 20 20 20 20  , countStep,    
7a30: 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20 7d  countFinalize  }
7a40: 2c 0a 20 20 20 20 7b 20 22 63 6f 75 6e 74 22 2c  ,.    { "count",
7a50: 20 20 31 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74    1, 0, 0, count
7a60: 53 74 65 70 2c 20 20 20 20 63 6f 75 6e 74 46 69  Step,    countFi
7a70: 6e 61 6c 69 7a 65 20 20 7d 2c 0a 20 20 7d 3b 0a  nalize  },.  };.
7a80: 20 20 69 6e 74 20 69 3b 0a 0a 20 20 66 6f 72 28    int i;..  for(
7a90: 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 46  i=0; i<sizeof(aF
7aa0: 75 6e 63 73 29 2f 73 69 7a 65 6f 66 28 61 46 75  uncs)/sizeof(aFu
7ab0: 6e 63 73 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20  ncs[0]); i++){. 
7ac0: 20 20 20 76 6f 69 64 20 2a 70 41 72 67 20 3d 20     void *pArg = 
7ad0: 30 3b 0a 20 20 20 20 73 77 69 74 63 68 28 20 61  0;.    switch( a
7ae0: 46 75 6e 63 73 5b 69 5d 2e 61 72 67 54 79 70 65  Funcs[i].argType
7af0: 20 29 7b 0a 20 20 20 20 20 20 63 61 73 65 20 31   ){.      case 1
7b00: 3a 20 70 41 72 67 20 3d 20 64 62 3b 20 62 72 65  : pArg = db; bre
7b10: 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20 32  ak;.      case 2
7b20: 3a 20 70 41 72 67 20 3d 20 28 76 6f 69 64 20 2a  : pArg = (void *
7b30: 29 28 2d 31 29 3b 20 62 72 65 61 6b 3b 0a 20 20  )(-1); break;.  
7b40: 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f    }.    sqlite3_
7b50: 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28  create_function(
7b60: 64 62 2c 20 61 46 75 6e 63 73 5b 69 5d 2e 7a 4e  db, aFuncs[i].zN
7b70: 61 6d 65 2c 20 61 46 75 6e 63 73 5b 69 5d 2e 6e  ame, aFuncs[i].n
7b80: 41 72 67 2c 0a 20 20 20 20 20 20 20 20 61 46 75  Arg,.        aFu
7b90: 6e 63 73 5b 69 5d 2e 65 54 65 78 74 52 65 70 2c  ncs[i].eTextRep,
7ba0: 20 70 41 72 67 2c 20 61 46 75 6e 63 73 5b 69 5d   pArg, aFuncs[i]
7bb0: 2e 78 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0a 20  .xFunc, 0, 0);. 
7bc0: 20 20 20 69 66 28 20 61 46 75 6e 63 73 5b 69 5d     if( aFuncs[i]
7bd0: 2e 6e 65 65 64 43 6f 6c 6c 53 65 71 20 29 7b 0a  .needCollSeq ){.
7be0: 20 20 20 20 20 20 46 75 6e 63 44 65 66 20 2a 70        FuncDef *p
7bf0: 46 75 6e 63 20 3d 20 73 71 6c 69 74 65 33 46 69  Func = sqlite3Fi
7c00: 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20 61  ndFunction(db, a
7c10: 46 75 6e 63 73 5b 69 5d 2e 7a 4e 61 6d 65 2c 20  Funcs[i].zName, 
7c20: 0a 20 20 20 20 20 20 20 20 20 20 73 74 72 6c 65  .          strle
7c30: 6e 28 61 46 75 6e 63 73 5b 69 5d 2e 7a 4e 61 6d  n(aFuncs[i].zNam
7c40: 65 29 2c 20 61 46 75 6e 63 73 5b 69 5d 2e 6e 41  e), aFuncs[i].nA
7c50: 72 67 2c 20 61 46 75 6e 63 73 5b 69 5d 2e 65 54  rg, aFuncs[i].eT
7c60: 65 78 74 52 65 70 2c 20 30 29 3b 0a 20 20 20 20  extRep, 0);.    
7c70: 20 20 69 66 28 20 70 46 75 6e 63 20 26 26 20 61    if( pFunc && a
7c80: 46 75 6e 63 73 5b 69 5d 2e 6e 65 65 64 43 6f 6c  Funcs[i].needCol
7c90: 6c 53 65 71 20 29 7b 0a 20 20 20 20 20 20 20 20  lSeq ){.        
7ca0: 70 46 75 6e 63 2d 3e 6e 65 65 64 43 6f 6c 6c 53  pFunc->needCollS
7cb0: 65 71 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a  eq = 1;.      }.
7cc0: 20 20 20 20 7d 0a 20 20 7d 0a 23 69 66 6e 64 65      }.  }.#ifnde
7cd0: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 4c  f SQLITE_OMIT_AL
7ce0: 54 45 52 54 41 42 4c 45 0a 20 20 73 71 6c 69 74  TERTABLE.  sqlit
7cf0: 65 33 41 6c 74 65 72 46 75 6e 63 74 69 6f 6e 73  e3AlterFunctions
7d00: 28 64 62 29 3b 0a 23 65 6e 64 69 66 0a 20 20 66  (db);.#endif.  f
7d10: 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66  or(i=0; i<sizeof
7d20: 28 61 41 67 67 73 29 2f 73 69 7a 65 6f 66 28 61  (aAggs)/sizeof(a
7d30: 41 67 67 73 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a  Aggs[0]); i++){.
7d40: 20 20 20 20 76 6f 69 64 20 2a 70 41 72 67 20 3d      void *pArg =
7d50: 20 30 3b 0a 20 20 20 20 73 77 69 74 63 68 28 20   0;.    switch( 
7d60: 61 41 67 67 73 5b 69 5d 2e 61 72 67 54 79 70 65  aAggs[i].argType
7d70: 20 29 7b 0a 20 20 20 20 20 20 63 61 73 65 20 31   ){.      case 1
7d80: 3a 20 70 41 72 67 20 3d 20 64 62 3b 20 62 72 65  : pArg = db; bre
7d90: 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20 32  ak;.      case 2
7da0: 3a 20 70 41 72 67 20 3d 20 28 76 6f 69 64 20 2a  : pArg = (void *
7db0: 29 28 2d 31 29 3b 20 62 72 65 61 6b 3b 0a 20 20  )(-1); break;.  
7dc0: 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f    }.    sqlite3_
7dd0: 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28  create_function(
7de0: 64 62 2c 20 61 41 67 67 73 5b 69 5d 2e 7a 4e 61  db, aAggs[i].zNa
7df0: 6d 65 2c 20 61 41 67 67 73 5b 69 5d 2e 6e 41 72  me, aAggs[i].nAr
7e00: 67 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  g, SQLITE_UTF8, 
7e10: 0a 20 20 20 20 20 20 20 20 70 41 72 67 2c 20 30  .        pArg, 0
7e20: 2c 20 61 41 67 67 73 5b 69 5d 2e 78 53 74 65 70  , aAggs[i].xStep
7e30: 2c 20 61 41 67 67 73 5b 69 5d 2e 78 46 69 6e 61  , aAggs[i].xFina
7e40: 6c 69 7a 65 29 3b 0a 20 20 20 20 69 66 28 20 61  lize);.    if( a
7e50: 41 67 67 73 5b 69 5d 2e 6e 65 65 64 43 6f 6c 6c  Aggs[i].needColl
7e60: 53 65 71 20 29 7b 0a 20 20 20 20 20 20 46 75 6e  Seq ){.      Fun
7e70: 63 44 65 66 20 2a 70 46 75 6e 63 20 3d 20 73 71  cDef *pFunc = sq
7e80: 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69 6f  lite3FindFunctio
7e90: 6e 28 20 64 62 2c 20 61 41 67 67 73 5b 69 5d 2e  n( db, aAggs[i].
7ea0: 7a 4e 61 6d 65 2c 0a 20 20 20 20 20 20 20 20 20  zName,.         
7eb0: 20 73 74 72 6c 65 6e 28 61 41 67 67 73 5b 69 5d   strlen(aAggs[i]
7ec0: 2e 7a 4e 61 6d 65 29 2c 20 61 41 67 67 73 5b 69  .zName), aAggs[i
7ed0: 5d 2e 6e 41 72 67 2c 20 53 51 4c 49 54 45 5f 55  ].nArg, SQLITE_U
7ee0: 54 46 38 2c 20 30 29 3b 0a 20 20 20 20 20 20 69  TF8, 0);.      i
7ef0: 66 28 20 70 46 75 6e 63 20 26 26 20 61 41 67 67  f( pFunc && aAgg
7f00: 73 5b 69 5d 2e 6e 65 65 64 43 6f 6c 6c 53 65 71  s[i].needCollSeq
7f10: 20 29 7b 0a 20 20 20 20 20 20 20 20 70 46 75 6e   ){.        pFun
7f20: 63 2d 3e 6e 65 65 64 43 6f 6c 6c 53 65 71 20 3d  c->needCollSeq =
7f30: 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   1;.      }.    
7f40: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 52  }.  }.  sqlite3R
7f50: 65 67 69 73 74 65 72 44 61 74 65 54 69 6d 65 46  egisterDateTimeF
7f60: 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a 23 69  unctions(db);.#i
7f70: 66 64 65 66 20 53 51 4c 49 54 45 5f 53 53 45 0a  fdef SQLITE_SSE.
7f80: 20 20 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 53    {.    sqlite3S
7f90: 73 65 46 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b  seFunctions(db);
7fa0: 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 7d 0a        .  }.#endif.}.