/ Hex Artifact Content
Login

Artifact 610b18afde750686785cdad9196b9fb1b03dc9b3:


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 2d 6c 61 6e 67 75 61 67 65 20 69 6d 70 6c 65  C-language imple
01a0: 6d 65 6e 74 61 74 69 6f 6e 73 20 66 6f 72 20 6d  mentations for m
01b0: 61 6e 79 20 6f 66 20 74 68 65 20 53 51 4c 0a 2a  any of the SQL.*
01c0: 2a 20 66 75 6e 63 74 69 6f 6e 73 20 6f 66 20 53  * functions of S
01d0: 51 4c 69 74 65 2e 20 20 28 53 6f 6d 65 20 66 75  QLite.  (Some fu
01e0: 6e 63 74 69 6f 6e 2c 20 61 6e 64 20 69 6e 20 70  nction, and in p
01f0: 61 72 74 69 63 75 6c 61 72 20 74 68 65 20 64 61  articular the da
0200: 74 65 20 61 6e 64 0a 2a 2a 20 74 69 6d 65 20 66  te and.** time f
0210: 75 6e 63 74 69 6f 6e 73 2c 20 61 72 65 20 69 6d  unctions, are im
0220: 70 6c 65 6d 65 6e 74 65 64 20 73 65 70 61 72 61  plemented separa
0230: 74 65 6c 79 2e 29 0a 2a 2f 0a 23 69 6e 63 6c 75  tely.).*/.#inclu
0240: 64 65 20 22 73 71 6c 69 74 65 49 6e 74 2e 68 22  de "sqliteInt.h"
0250: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64 6c 69  .#include <stdli
0260: 62 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 61  b.h>.#include <a
0270: 73 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c 75 64  ssert.h>.#includ
0280: 65 20 22 76 64 62 65 49 6e 74 2e 68 22 0a 0a 2f  e "vdbeInt.h"../
0290: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20  *.** Return the 
02a0: 63 6f 6c 6c 61 74 69 6e 67 20 66 75 6e 63 74 69  collating functi
02b0: 6f 6e 20 61 73 73 6f 63 69 61 74 65 64 20 77 69  on associated wi
02c0: 74 68 20 61 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  th a function..*
02d0: 2f 0a 73 74 61 74 69 63 20 43 6f 6c 6c 53 65 71  /.static CollSeq
02e0: 20 2a 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63   *sqlite3GetFunc
02f0: 43 6f 6c 6c 53 65 71 28 73 71 6c 69 74 65 33 5f  CollSeq(sqlite3_
0300: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
0310: 29 7b 0a 20 20 72 65 74 75 72 6e 20 63 6f 6e 74  ){.  return cont
0320: 65 78 74 2d 3e 70 43 6f 6c 6c 3b 0a 7d 0a 0a 2f  ext->pColl;.}../
0330: 2a 0a 2a 2a 20 49 6e 64 69 63 61 74 65 20 74 68  *.** Indicate th
0340: 61 74 20 74 68 65 20 61 63 63 75 6d 75 6c 61 74  at the accumulat
0350: 6f 72 20 6c 6f 61 64 20 73 68 6f 75 6c 64 20 62  or load should b
0360: 65 20 73 6b 69 70 70 65 64 20 6f 6e 20 74 68 69  e skipped on thi
0370: 73 0a 2a 2a 20 69 74 65 72 61 74 69 6f 6e 20 6f  s.** iteration o
0380: 66 20 74 68 65 20 61 67 67 72 65 67 61 74 65 20  f the aggregate 
0390: 6c 6f 6f 70 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  loop..*/.static 
03a0: 76 6f 69 64 20 73 71 6c 69 74 65 33 53 6b 69 70  void sqlite3Skip
03b0: 41 63 63 75 6d 75 6c 61 74 6f 72 4c 6f 61 64 28  AccumulatorLoad(
03c0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
03d0: 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 63 6f 6e  *context){.  con
03e0: 74 65 78 74 2d 3e 73 6b 69 70 46 6c 61 67 20 3d  text->skipFlag =
03f0: 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70   1;.}../*.** Imp
0400: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
0410: 68 65 20 6e 6f 6e 2d 61 67 67 72 65 67 61 74 65  he non-aggregate
0420: 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28 29   min() and max()
0430: 20 66 75 6e 63 74 69 6f 6e 73 0a 2a 2f 0a 73 74   functions.*/.st
0440: 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78  atic void minmax
0450: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
0460: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
0470: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
0480: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
0490: 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69 3b  argv.){.  int i;
04a0: 0a 20 20 69 6e 74 20 6d 61 73 6b 3b 20 20 20 20  .  int mask;    
04b0: 2f 2a 20 30 20 66 6f 72 20 6d 69 6e 28 29 20 6f  /* 0 for min() o
04c0: 72 20 30 78 66 66 66 66 66 66 66 66 20 66 6f 72  r 0xffffffff for
04d0: 20 6d 61 78 28 29 20 2a 2f 0a 20 20 69 6e 74 20   max() */.  int 
04e0: 69 42 65 73 74 3b 0a 20 20 43 6f 6c 6c 53 65 71  iBest;.  CollSeq
04f0: 20 2a 70 43 6f 6c 6c 3b 0a 0a 20 20 61 73 73 65   *pColl;..  asse
0500: 72 74 28 20 61 72 67 63 3e 31 20 29 3b 0a 20 20  rt( argc>1 );.  
0510: 6d 61 73 6b 20 3d 20 73 71 6c 69 74 65 33 5f 75  mask = sqlite3_u
0520: 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74  ser_data(context
0530: 29 3d 3d 30 20 3f 20 30 20 3a 20 2d 31 3b 0a 20  )==0 ? 0 : -1;. 
0540: 20 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74 65 33   pColl = sqlite3
0550: 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63  GetFuncCollSeq(c
0560: 6f 6e 74 65 78 74 29 3b 0a 20 20 61 73 73 65 72  ontext);.  asser
0570: 74 28 20 70 43 6f 6c 6c 20 29 3b 0a 20 20 61 73  t( pColl );.  as
0580: 73 65 72 74 28 20 6d 61 73 6b 3d 3d 2d 31 20 7c  sert( mask==-1 |
0590: 7c 20 6d 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 69  | mask==0 );.  i
05a0: 42 65 73 74 20 3d 20 30 3b 0a 20 20 69 66 28 20  Best = 0;.  if( 
05b0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
05c0: 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c  pe(argv[0])==SQL
05d0: 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72  ITE_NULL ) retur
05e0: 6e 3b 0a 20 20 66 6f 72 28 69 3d 31 3b 20 69 3c  n;.  for(i=1; i<
05f0: 61 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  argc; i++){.    
0600: 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  if( sqlite3_valu
0610: 65 5f 74 79 70 65 28 61 72 67 76 5b 69 5d 29 3d  e_type(argv[i])=
0620: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72  =SQLITE_NULL ) r
0630: 65 74 75 72 6e 3b 0a 20 20 20 20 69 66 28 20 28  eturn;.    if( (
0640: 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72  sqlite3MemCompar
0650: 65 28 61 72 67 76 5b 69 42 65 73 74 5d 2c 20 61  e(argv[iBest], a
0660: 72 67 76 5b 69 5d 2c 20 70 43 6f 6c 6c 29 5e 6d  rgv[i], pColl)^m
0670: 61 73 6b 29 3e 3d 30 20 29 7b 0a 20 20 20 20 20  ask)>=0 ){.     
0680: 20 74 65 73 74 63 61 73 65 28 20 6d 61 73 6b 3d   testcase( mask=
0690: 3d 30 20 29 3b 0a 20 20 20 20 20 20 69 42 65 73  =0 );.      iBes
06a0: 74 20 3d 20 69 3b 0a 20 20 20 20 7d 0a 20 20 7d  t = i;.    }.  }
06b0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
06c0: 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c  t_value(context,
06d0: 20 61 72 67 76 5b 69 42 65 73 74 5d 29 3b 0a 7d   argv[iBest]);.}
06e0: 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74  ../*.** Return t
06f0: 68 65 20 74 79 70 65 20 6f 66 20 74 68 65 20 61  he type of the a
0700: 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74  rgument..*/.stat
0710: 69 63 20 76 6f 69 64 20 74 79 70 65 6f 66 46 75  ic void typeofFu
0720: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
0730: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
0740: 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20    int NotUsed,. 
0750: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
0760: 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74  *argv.){.  const
0770: 20 63 68 61 72 20 2a 7a 20 3d 20 30 3b 0a 20 20   char *z = 0;.  
0780: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
0790: 28 4e 6f 74 55 73 65 64 29 3b 0a 20 20 73 77 69  (NotUsed);.  swi
07a0: 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61 6c  tch( sqlite3_val
07b0: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
07c0: 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51 4c   ){.    case SQL
07d0: 49 54 45 5f 49 4e 54 45 47 45 52 3a 20 7a 20 3d  ITE_INTEGER: z =
07e0: 20 22 69 6e 74 65 67 65 72 22 3b 20 62 72 65 61   "integer"; brea
07f0: 6b 3b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49  k;.    case SQLI
0800: 54 45 5f 54 45 58 54 3a 20 20 20 20 7a 20 3d 20  TE_TEXT:    z = 
0810: 22 74 65 78 74 22 3b 20 20 20 20 62 72 65 61 6b  "text";    break
0820: 3b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  ;.    case SQLIT
0830: 45 5f 46 4c 4f 41 54 3a 20 20 20 7a 20 3d 20 22  E_FLOAT:   z = "
0840: 72 65 61 6c 22 3b 20 20 20 20 62 72 65 61 6b 3b  real";    break;
0850: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0860: 5f 42 4c 4f 42 3a 20 20 20 20 7a 20 3d 20 22 62  _BLOB:    z = "b
0870: 6c 6f 62 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a  lob";    break;.
0880: 20 20 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20      default:    
0890: 20 20 20 20 20 20 20 20 20 7a 20 3d 20 22 6e 75           z = "nu
08a0: 6c 6c 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20  ll";    break;. 
08b0: 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73   }.  sqlite3_res
08c0: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
08d0: 2c 20 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f  , z, -1, SQLITE_
08e0: 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 0a 2f 2a 0a  STATIC);.}.../*.
08f0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
0900: 6e 20 6f 66 20 74 68 65 20 6c 65 6e 67 74 68 28  n of the length(
0910: 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74  ) function.*/.st
0920: 61 74 69 63 20 76 6f 69 64 20 6c 65 6e 67 74 68  atic void length
0930: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
0940: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
0950: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
0960: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
0970: 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6c 65  argv.){.  int le
0980: 6e 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72  n;..  assert( ar
0990: 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45  gc==1 );.  UNUSE
09a0: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
09b0: 29 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71 6c  );.  switch( sql
09c0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
09d0: 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20  argv[0]) ){.    
09e0: 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42  case SQLITE_BLOB
09f0: 3a 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  :.    case SQLIT
0a00: 45 5f 49 4e 54 45 47 45 52 3a 0a 20 20 20 20 63  E_INTEGER:.    c
0a10: 61 73 65 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54  ase SQLITE_FLOAT
0a20: 3a 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  : {.      sqlite
0a30: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e  3_result_int(con
0a40: 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 76 61  text, sqlite3_va
0a50: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
0a60: 5d 29 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b  ]));.      break
0a70: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65  ;.    }.    case
0a80: 20 53 51 4c 49 54 45 5f 54 45 58 54 3a 20 7b 0a   SQLITE_TEXT: {.
0a90: 20 20 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69        const unsi
0aa0: 67 6e 65 64 20 63 68 61 72 20 2a 7a 20 3d 20 73  gned char *z = s
0ab0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
0ac0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  t(argv[0]);.    
0ad0: 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74    if( z==0 ) ret
0ae0: 75 72 6e 3b 0a 20 20 20 20 20 20 6c 65 6e 20 3d  urn;.      len =
0af0: 20 30 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 28   0;.      while(
0b00: 20 2a 7a 20 29 7b 0a 20 20 20 20 20 20 20 20 6c   *z ){.        l
0b10: 65 6e 2b 2b 3b 0a 20 20 20 20 20 20 20 20 53 51  en++;.        SQ
0b20: 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a  LITE_SKIP_UTF8(z
0b30: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
0b40: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0b50: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 6c 65 6e  int(context, len
0b60: 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  );.      break;.
0b70: 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75 6c      }.    defaul
0b80: 74 3a 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  t: {.      sqlit
0b90: 65 33 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63  e3_result_null(c
0ba0: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 62  ontext);.      b
0bb0: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  reak;.    }.  }.
0bc0: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
0bd0: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 61  ntation of the a
0be0: 62 73 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  bs() function..*
0bf0: 2a 0a 2a 2a 20 49 4d 50 3a 20 52 2d 32 33 39 37  *.** IMP: R-2397
0c00: 39 2d 32 36 38 35 35 20 54 68 65 20 61 62 73 28  9-26855 The abs(
0c10: 58 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75  X) function retu
0c20: 72 6e 73 20 74 68 65 20 61 62 73 6f 6c 75 74 65  rns the absolute
0c30: 20 76 61 6c 75 65 20 6f 66 0a 2a 2a 20 74 68 65   value of.** the
0c40: 20 6e 75 6d 65 72 69 63 20 61 72 67 75 6d 65 6e   numeric argumen
0c50: 74 20 58 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20  t X. .*/.static 
0c60: 76 6f 69 64 20 61 62 73 46 75 6e 63 28 73 71 6c  void absFunc(sql
0c70: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0c80: 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c  ntext, int argc,
0c90: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
0ca0: 2a 61 72 67 76 29 7b 0a 20 20 61 73 73 65 72 74  *argv){.  assert
0cb0: 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55  ( argc==1 );.  U
0cc0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
0cd0: 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68 28  argc);.  switch(
0ce0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
0cf0: 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a  ype(argv[0]) ){.
0d00: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
0d10: 49 4e 54 45 47 45 52 3a 20 7b 0a 20 20 20 20 20  INTEGER: {.     
0d20: 20 69 36 34 20 69 56 61 6c 20 3d 20 73 71 6c 69   i64 iVal = sqli
0d30: 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28  te3_value_int64(
0d40: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20  argv[0]);.      
0d50: 69 66 28 20 69 56 61 6c 3c 30 20 29 7b 0a 20 20  if( iVal<0 ){.  
0d60: 20 20 20 20 20 20 69 66 28 20 69 56 61 6c 3d 3d        if( iVal==
0d70: 53 4d 41 4c 4c 45 53 54 5f 49 4e 54 36 34 20 29  SMALLEST_INT64 )
0d80: 7b 0a 20 20 20 20 20 20 20 20 20 20 2f 2a 20 49  {.          /* I
0d90: 4d 50 3a 20 52 2d 33 31 36 37 36 2d 34 35 35 30  MP: R-31676-4550
0da0: 39 20 49 66 20 58 20 69 73 20 74 68 65 20 69 6e  9 If X is the in
0db0: 74 65 67 65 72 20 2d 39 32 32 33 33 37 32 30 33  teger -922337203
0dc0: 36 38 35 34 37 37 35 38 30 38 0a 20 20 20 20 20  6854775808.     
0dd0: 20 20 20 20 20 2a 2a 20 74 68 65 6e 20 61 62 73       ** then abs
0de0: 28 58 29 20 74 68 72 6f 77 73 20 61 6e 20 69 6e  (X) throws an in
0df0: 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 20 65  teger overflow e
0e00: 72 72 6f 72 20 73 69 6e 63 65 20 74 68 65 72 65  rror since there
0e10: 20 69 73 20 6e 6f 0a 20 20 20 20 20 20 20 20 20   is no.         
0e20: 20 2a 2a 20 65 71 75 69 76 61 6c 65 6e 74 20 70   ** equivalent p
0e30: 6f 73 69 74 69 76 65 20 36 34 2d 62 69 74 20 74  ositive 64-bit t
0e40: 77 6f 20 63 6f 6d 70 6c 65 6d 65 6e 74 20 76 61  wo complement va
0e50: 6c 75 65 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20  lue. */.        
0e60: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
0e70: 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20  _error(context, 
0e80: 22 69 6e 74 65 67 65 72 20 6f 76 65 72 66 6c 6f  "integer overflo
0e90: 77 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 20  w", -1);.       
0ea0: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20     return;.     
0eb0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 56 61     }.        iVa
0ec0: 6c 20 3d 20 2d 69 56 61 6c 3b 0a 20 20 20 20 20  l = -iVal;.     
0ed0: 20 7d 20 0a 20 20 20 20 20 20 73 71 6c 69 74 65   } .      sqlite
0ee0: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63  3_result_int64(c
0ef0: 6f 6e 74 65 78 74 2c 20 69 56 61 6c 29 3b 0a 20  ontext, iVal);. 
0f00: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
0f10: 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  }.    case SQLIT
0f20: 45 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20 20 20 20  E_NULL: {.      
0f30: 2f 2a 20 49 4d 50 3a 20 52 2d 33 37 34 33 34 2d  /* IMP: R-37434-
0f40: 31 39 39 32 39 20 41 62 73 28 58 29 20 72 65 74  19929 Abs(X) ret
0f50: 75 72 6e 73 20 4e 55 4c 4c 20 69 66 20 58 20 69  urns NULL if X i
0f60: 73 20 4e 55 4c 4c 2e 20 2a 2f 0a 20 20 20 20 20  s NULL. */.     
0f70: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0f80: 6e 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20  null(context);. 
0f90: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
0fa0: 7d 0a 20 20 20 20 64 65 66 61 75 6c 74 3a 20 7b  }.    default: {
0fb0: 0a 20 20 20 20 20 20 2f 2a 20 42 65 63 61 75 73  .      /* Becaus
0fc0: 65 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  e sqlite3_value_
0fd0: 64 6f 75 62 6c 65 28 29 20 72 65 74 75 72 6e 73  double() returns
0fe0: 20 30 2e 30 20 69 66 20 74 68 65 20 61 72 67 75   0.0 if the argu
0ff0: 6d 65 6e 74 20 69 73 20 6e 6f 74 0a 20 20 20 20  ment is not.    
1000: 20 20 2a 2a 20 73 6f 6d 65 74 68 69 6e 67 20 74    ** something t
1010: 68 61 74 20 63 61 6e 20 62 65 20 63 6f 6e 76 65  hat can be conve
1020: 72 74 65 64 20 69 6e 74 6f 20 61 20 6e 75 6d 62  rted into a numb
1030: 65 72 2c 20 77 65 20 68 61 76 65 3a 0a 20 20 20  er, we have:.   
1040: 20 20 20 2a 2a 20 49 4d 50 3a 20 52 2d 35 37 33     ** IMP: R-573
1050: 32 36 2d 33 31 35 34 31 20 41 62 73 28 58 29 20  26-31541 Abs(X) 
1060: 72 65 74 75 72 6e 20 30 2e 30 20 69 66 20 58 20  return 0.0 if X 
1070: 69 73 20 61 20 73 74 72 69 6e 67 20 6f 72 20 62  is a string or b
1080: 6c 6f 62 20 74 68 61 74 0a 20 20 20 20 20 20 2a  lob that.      *
1090: 2a 20 63 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 76  * cannot be conv
10a0: 65 72 74 65 64 20 74 6f 20 61 20 6e 75 6d 65 72  erted to a numer
10b0: 69 63 20 76 61 6c 75 65 2e 20 0a 20 20 20 20 20  ic value. .     
10c0: 20 2a 2f 0a 20 20 20 20 20 20 64 6f 75 62 6c 65   */.      double
10d0: 20 72 56 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f   rVal = sqlite3_
10e0: 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67  value_double(arg
10f0: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 66 28  v[0]);.      if(
1100: 20 72 56 61 6c 3c 30 20 29 20 72 56 61 6c 20 3d   rVal<0 ) rVal =
1110: 20 2d 72 56 61 6c 3b 0a 20 20 20 20 20 20 73 71   -rVal;.      sq
1120: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75  lite3_result_dou
1130: 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 72 56 61  ble(context, rVa
1140: 6c 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  l);.      break;
1150: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
1160: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
1170: 6f 6e 20 6f 66 20 74 68 65 20 69 6e 73 74 72 28  on of the instr(
1180: 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a  ) function..**.*
1190: 2a 20 69 6e 73 74 72 28 68 61 79 73 74 61 63 6b  * instr(haystack
11a0: 2c 6e 65 65 64 6c 65 29 20 66 69 6e 64 73 20 74  ,needle) finds t
11b0: 68 65 20 66 69 72 73 74 20 6f 63 63 75 72 72 65  he first occurre
11c0: 6e 63 65 20 6f 66 20 6e 65 65 64 6c 65 0a 2a 2a  nce of needle.**
11d0: 20 69 6e 20 68 61 79 73 74 61 63 6b 20 61 6e 64   in haystack and
11e0: 20 72 65 74 75 72 6e 73 20 74 68 65 20 6e 75 6d   returns the num
11f0: 62 65 72 20 6f 66 20 70 72 65 76 69 6f 75 73 20  ber of previous 
1200: 63 68 61 72 61 63 74 65 72 73 20 70 6c 75 73 20  characters plus 
1210: 31 2c 0a 2a 2a 20 6f 72 20 30 20 69 66 20 6e 65  1,.** or 0 if ne
1220: 65 64 6c 65 20 64 6f 65 73 20 6e 6f 74 20 6f 63  edle does not oc
1230: 63 75 72 20 77 69 74 68 69 6e 20 68 61 79 73 74  cur within hayst
1240: 61 63 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 62 6f  ack..**.** If bo
1250: 74 68 20 68 61 79 73 74 61 63 6b 20 61 6e 64 20  th haystack and 
1260: 6e 65 65 64 6c 65 20 61 72 65 20 42 4c 4f 42 73  needle are BLOBs
1270: 2c 20 74 68 65 6e 20 74 68 65 20 72 65 73 75 6c  , then the resul
1280: 74 20 69 73 20 6f 6e 65 20 6d 6f 72 65 20 74 68  t is one more th
1290: 61 6e 0a 2a 2a 20 74 68 65 20 6e 75 6d 62 65 72  an.** the number
12a0: 20 6f 66 20 62 79 74 65 73 20 69 6e 20 68 61 79   of bytes in hay
12b0: 73 74 61 63 6b 20 70 72 69 6f 72 20 74 6f 20 74  stack prior to t
12c0: 68 65 20 66 69 72 73 74 20 6f 63 63 75 72 72 65  he first occurre
12d0: 6e 63 65 20 6f 66 20 6e 65 65 64 6c 65 2c 0a 2a  nce of needle,.*
12e0: 2a 20 6f 72 20 30 20 69 66 20 6e 65 65 64 6c 65  * or 0 if needle
12f0: 20 6e 65 76 65 72 20 6f 63 63 75 72 73 20 69 6e   never occurs in
1300: 20 68 61 79 73 74 61 63 6b 2e 0a 2a 2f 0a 73 74   haystack..*/.st
1310: 61 74 69 63 20 76 6f 69 64 20 69 6e 73 74 72 46  atic void instrF
1320: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
1330: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
1340: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
1350: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
1360: 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75  rgv.){.  const u
1370: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 48  nsigned char *zH
1380: 61 79 73 74 61 63 6b 3b 0a 20 20 63 6f 6e 73 74  aystack;.  const
1390: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
13a0: 7a 4e 65 65 64 6c 65 3b 0a 20 20 69 6e 74 20 6e  zNeedle;.  int n
13b0: 48 61 79 73 74 61 63 6b 3b 0a 20 20 69 6e 74 20  Haystack;.  int 
13c0: 6e 4e 65 65 64 6c 65 3b 0a 20 20 69 6e 74 20 74  nNeedle;.  int t
13d0: 79 70 65 48 61 79 73 74 61 63 6b 2c 20 74 79 70  ypeHaystack, typ
13e0: 65 4e 65 65 64 6c 65 3b 0a 20 20 69 6e 74 20 4e  eNeedle;.  int N
13f0: 20 3d 20 31 3b 0a 20 20 69 6e 74 20 69 73 54 65   = 1;.  int isTe
1400: 78 74 3b 0a 0a 20 20 55 4e 55 53 45 44 5f 50 41  xt;..  UNUSED_PA
1410: 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20  RAMETER(argc);. 
1420: 20 74 79 70 65 48 61 79 73 74 61 63 6b 20 3d 20   typeHaystack = 
1430: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
1440: 70 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 74  pe(argv[0]);.  t
1450: 79 70 65 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69  ypeNeedle = sqli
1460: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
1470: 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 74  rgv[1]);.  if( t
1480: 79 70 65 48 61 79 73 74 61 63 6b 3d 3d 53 51 4c  ypeHaystack==SQL
1490: 49 54 45 5f 4e 55 4c 4c 20 7c 7c 20 74 79 70 65  ITE_NULL || type
14a0: 4e 65 65 64 6c 65 3d 3d 53 51 4c 49 54 45 5f 4e  Needle==SQLITE_N
14b0: 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ULL ) return;.  
14c0: 6e 48 61 79 73 74 61 63 6b 20 3d 20 73 71 6c 69  nHaystack = sqli
14d0: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
14e0: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 4e 65 65  argv[0]);.  nNee
14f0: 64 6c 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  dle = sqlite3_va
1500: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 31  lue_bytes(argv[1
1510: 5d 29 3b 0a 20 20 69 66 28 20 74 79 70 65 48 61  ]);.  if( typeHa
1520: 79 73 74 61 63 6b 3d 3d 53 51 4c 49 54 45 5f 42  ystack==SQLITE_B
1530: 4c 4f 42 20 26 26 20 74 79 70 65 4e 65 65 64 6c  LOB && typeNeedl
1540: 65 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 20 29  e==SQLITE_BLOB )
1550: 7b 0a 20 20 20 20 7a 48 61 79 73 74 61 63 6b 20  {.    zHaystack 
1560: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
1570: 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20  blob(argv[0]);. 
1580: 20 20 20 7a 4e 65 65 64 6c 65 20 3d 20 73 71 6c     zNeedle = sql
1590: 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28  ite3_value_blob(
15a0: 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 73  argv[1]);.    is
15b0: 54 65 78 74 20 3d 20 30 3b 0a 20 20 7d 65 6c 73  Text = 0;.  }els
15c0: 65 7b 0a 20 20 20 20 7a 48 61 79 73 74 61 63 6b  e{.    zHaystack
15d0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
15e0: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
15f0: 20 20 20 20 7a 4e 65 65 64 6c 65 20 3d 20 73 71      zNeedle = sq
1600: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
1610: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69  (argv[1]);.    i
1620: 73 54 65 78 74 20 3d 20 31 3b 0a 20 20 7d 0a 20  sText = 1;.  }. 
1630: 20 77 68 69 6c 65 28 20 6e 4e 65 65 64 6c 65 3c   while( nNeedle<
1640: 3d 6e 48 61 79 73 74 61 63 6b 20 26 26 20 6d 65  =nHaystack && me
1650: 6d 63 6d 70 28 7a 48 61 79 73 74 61 63 6b 2c 20  mcmp(zHaystack, 
1660: 7a 4e 65 65 64 6c 65 2c 20 6e 4e 65 65 64 6c 65  zNeedle, nNeedle
1670: 29 21 3d 30 20 29 7b 0a 20 20 20 20 4e 2b 2b 3b  )!=0 ){.    N++;
1680: 0a 20 20 20 20 64 6f 7b 0a 20 20 20 20 20 20 6e  .    do{.      n
1690: 48 61 79 73 74 61 63 6b 2d 2d 3b 0a 20 20 20 20  Haystack--;.    
16a0: 20 20 7a 48 61 79 73 74 61 63 6b 2b 2b 3b 0a 20    zHaystack++;. 
16b0: 20 20 20 7d 77 68 69 6c 65 28 20 69 73 54 65 78     }while( isTex
16c0: 74 20 26 26 20 28 7a 48 61 79 73 74 61 63 6b 5b  t && (zHaystack[
16d0: 30 5d 26 30 78 63 30 29 3d 3d 30 78 38 30 20 29  0]&0xc0)==0x80 )
16e0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 4e 65 65  ;.  }.  if( nNee
16f0: 64 6c 65 3e 6e 48 61 79 73 74 61 63 6b 20 29 20  dle>nHaystack ) 
1700: 4e 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 33  N = 0;.  sqlite3
1710: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
1720: 65 78 74 2c 20 4e 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  ext, N);.}../*.*
1730: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
1740: 20 6f 66 20 74 68 65 20 70 72 69 6e 74 66 28 29   of the printf()
1750: 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74   function..*/.st
1760: 61 74 69 63 20 76 6f 69 64 20 70 72 69 6e 74 66  atic void printf
1770: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
1780: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
1790: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
17a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
17b0: 61 72 67 76 0a 29 7b 0a 20 20 50 72 69 6e 74 66  argv.){.  Printf
17c0: 41 72 67 75 6d 65 6e 74 73 20 78 3b 0a 20 20 53  Arguments x;.  S
17d0: 74 72 41 63 63 75 6d 20 73 74 72 3b 0a 20 20 63  trAccum str;.  c
17e0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d  onst char *zForm
17f0: 61 74 3b 0a 20 20 69 6e 74 20 6e 3b 0a 0a 20 20  at;.  int n;..  
1800: 69 66 28 20 61 72 67 63 3e 3d 31 20 26 26 20 28  if( argc>=1 && (
1810: 7a 46 6f 72 6d 61 74 20 3d 20 28 63 6f 6e 73 74  zFormat = (const
1820: 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76   char*)sqlite3_v
1830: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
1840: 5d 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 78 2e  ]))!=0 ){.    x.
1850: 6e 41 72 67 20 3d 20 61 72 67 63 2d 31 3b 0a 20  nArg = argc-1;. 
1860: 20 20 20 78 2e 6e 55 73 65 64 20 3d 20 30 3b 0a     x.nUsed = 0;.
1870: 20 20 20 20 78 2e 61 70 41 72 67 20 3d 20 61 72      x.apArg = ar
1880: 67 76 2b 31 3b 0a 20 20 20 20 73 71 6c 69 74 65  gv+1;.    sqlite
1890: 33 53 74 72 41 63 63 75 6d 49 6e 69 74 28 26 73  3StrAccumInit(&s
18a0: 74 72 2c 20 30 2c 20 30 2c 20 53 51 4c 49 54 45  tr, 0, 0, SQLITE
18b0: 5f 4d 41 58 5f 4c 45 4e 47 54 48 29 3b 0a 20 20  _MAX_LENGTH);.  
18c0: 20 20 73 74 72 2e 64 62 20 3d 20 73 71 6c 69 74    str.db = sqlit
18d0: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
18e0: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20  ndle(context);. 
18f0: 20 20 20 73 71 6c 69 74 65 33 58 50 72 69 6e 74     sqlite3XPrint
1900: 66 28 26 73 74 72 2c 20 53 51 4c 49 54 45 5f 50  f(&str, SQLITE_P
1910: 52 49 4e 54 46 5f 53 51 4c 46 55 4e 43 2c 20 7a  RINTF_SQLFUNC, z
1920: 46 6f 72 6d 61 74 2c 20 26 78 29 3b 0a 20 20 20  Format, &x);.   
1930: 20 6e 20 3d 20 73 74 72 2e 6e 43 68 61 72 3b 0a   n = str.nChar;.
1940: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
1950: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
1960: 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d   sqlite3StrAccum
1970: 46 69 6e 69 73 68 28 26 73 74 72 29 2c 20 6e 2c  Finish(&str), n,
1980: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
1990: 20 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f           SQLITE_
19a0: 44 59 4e 41 4d 49 43 29 3b 0a 20 20 7d 0a 7d 0a  DYNAMIC);.  }.}.
19b0: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
19c0: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 75 62  ation of the sub
19d0: 73 74 72 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a  str() function..
19e0: 2a 2a 0a 2a 2a 20 73 75 62 73 74 72 28 78 2c 70  **.** substr(x,p
19f0: 31 2c 70 32 29 20 20 72 65 74 75 72 6e 73 20 70  1,p2)  returns p
1a00: 32 20 63 68 61 72 61 63 74 65 72 73 20 6f 66 20  2 characters of 
1a10: 78 5b 5d 20 62 65 67 69 6e 6e 69 6e 67 20 77 69  x[] beginning wi
1a20: 74 68 20 70 31 2e 0a 2a 2a 20 70 31 20 69 73 20  th p1..** p1 is 
1a30: 31 2d 69 6e 64 65 78 65 64 2e 20 20 53 6f 20 73  1-indexed.  So s
1a40: 75 62 73 74 72 28 78 2c 31 2c 31 29 20 72 65 74  ubstr(x,1,1) ret
1a50: 75 72 6e 73 20 74 68 65 20 66 69 72 73 74 20 63  urns the first c
1a60: 68 61 72 61 63 74 65 72 0a 2a 2a 20 6f 66 20 78  haracter.** of x
1a70: 2e 20 20 49 66 20 78 20 69 73 20 74 65 78 74 2c  .  If x is text,
1a80: 20 74 68 65 6e 20 77 65 20 61 63 74 75 61 6c 6c   then we actuall
1a90: 79 20 63 6f 75 6e 74 20 55 54 46 2d 38 20 63 68  y count UTF-8 ch
1aa0: 61 72 61 63 74 65 72 73 2e 0a 2a 2a 20 49 66 20  aracters..** If 
1ab0: 78 20 69 73 20 61 20 62 6c 6f 62 2c 20 74 68 65  x is a blob, the
1ac0: 6e 20 77 65 20 63 6f 75 6e 74 20 62 79 74 65 73  n we count bytes
1ad0: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 70 31 20 69 73  ..**.** If p1 is
1ae0: 20 6e 65 67 61 74 69 76 65 2c 20 74 68 65 6e 20   negative, then 
1af0: 77 65 20 62 65 67 69 6e 20 61 62 73 28 70 31 29  we begin abs(p1)
1b00: 20 66 72 6f 6d 20 74 68 65 20 65 6e 64 20 6f 66   from the end of
1b10: 20 78 5b 5d 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 70   x[]..**.** If p
1b20: 32 20 69 73 20 6e 65 67 61 74 69 76 65 2c 20 72  2 is negative, r
1b30: 65 74 75 72 6e 20 74 68 65 20 70 32 20 63 68 61  eturn the p2 cha
1b40: 72 61 63 74 65 72 73 20 70 72 65 63 65 64 69 6e  racters precedin
1b50: 67 20 70 31 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  g p1..*/.static 
1b60: 76 6f 69 64 20 73 75 62 73 74 72 46 75 6e 63 28  void substrFunc(
1b70: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
1b80: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
1b90: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
1ba0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
1bb0: 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  ){.  const unsig
1bc0: 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0a 20 20 63  ned char *z;.  c
1bd0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
1be0: 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74 20 6c 65  ar *z2;.  int le
1bf0: 6e 3b 0a 20 20 69 6e 74 20 70 30 74 79 70 65 3b  n;.  int p0type;
1c00: 0a 20 20 69 36 34 20 70 31 2c 20 70 32 3b 0a 20  .  i64 p1, p2;. 
1c10: 20 69 6e 74 20 6e 65 67 50 32 20 3d 20 30 3b 0a   int negP2 = 0;.
1c20: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
1c30: 3d 33 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b  =3 || argc==2 );
1c40: 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76  .  if( sqlite3_v
1c50: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31  alue_type(argv[1
1c60: 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a  ])==SQLITE_NULL.
1c70: 20 20 20 7c 7c 20 28 61 72 67 63 3d 3d 33 20 26     || (argc==3 &
1c80: 26 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  & sqlite3_value_
1c90: 74 79 70 65 28 61 72 67 76 5b 32 5d 29 3d 3d 53  type(argv[2])==S
1ca0: 51 4c 49 54 45 5f 4e 55 4c 4c 29 0a 20 20 29 7b  QLITE_NULL).  ){
1cb0: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
1cc0: 0a 20 20 70 30 74 79 70 65 20 3d 20 73 71 6c 69  .  p0type = sqli
1cd0: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
1ce0: 72 67 76 5b 30 5d 29 3b 0a 20 20 70 31 20 3d 20  rgv[0]);.  p1 = 
1cf0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
1d00: 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66  t(argv[1]);.  if
1d10: 28 20 70 30 74 79 70 65 3d 3d 53 51 4c 49 54 45  ( p0type==SQLITE
1d20: 5f 42 4c 4f 42 20 29 7b 0a 20 20 20 20 6c 65 6e  _BLOB ){.    len
1d30: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1d40: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
1d50: 0a 20 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33  .    z = sqlite3
1d60: 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76  _value_blob(argv
1d70: 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 3d  [0]);.    if( z=
1d80: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20  =0 ) return;.   
1d90: 20 61 73 73 65 72 74 28 20 6c 65 6e 3d 3d 73 71   assert( len==sq
1da0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
1db0: 73 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20  s(argv[0]) );.  
1dc0: 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73  }else{.    z = s
1dd0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
1de0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  t(argv[0]);.    
1df0: 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72  if( z==0 ) retur
1e00: 6e 3b 0a 20 20 20 20 6c 65 6e 20 3d 20 30 3b 0a  n;.    len = 0;.
1e10: 20 20 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a      if( p1<0 ){.
1e20: 20 20 20 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20        for(z2=z; 
1e30: 2a 7a 32 3b 20 6c 65 6e 2b 2b 29 7b 0a 20 20 20  *z2; len++){.   
1e40: 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50       SQLITE_SKIP
1e50: 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20 20 20 20  _UTF8(z2);.     
1e60: 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69   }.    }.  }.  i
1e70: 66 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20  f( argc==3 ){.  
1e80: 20 20 70 32 20 3d 20 73 71 6c 69 74 65 33 5f 76    p2 = sqlite3_v
1e90: 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 32 5d  alue_int(argv[2]
1ea0: 29 3b 0a 20 20 20 20 69 66 28 20 70 32 3c 30 20  );.    if( p2<0 
1eb0: 29 7b 0a 20 20 20 20 20 20 70 32 20 3d 20 2d 70  ){.      p2 = -p
1ec0: 32 3b 0a 20 20 20 20 20 20 6e 65 67 50 32 20 3d  2;.      negP2 =
1ed0: 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73   1;.    }.  }els
1ee0: 65 7b 0a 20 20 20 20 70 32 20 3d 20 73 71 6c 69  e{.    p2 = sqli
1ef0: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
1f00: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 2d 3e  andle(context)->
1f10: 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49  aLimit[SQLITE_LI
1f20: 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a 20 20 7d  MIT_LENGTH];.  }
1f30: 0a 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20  .  if( p1<0 ){. 
1f40: 20 20 20 70 31 20 2b 3d 20 6c 65 6e 3b 0a 20 20     p1 += len;.  
1f50: 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20    if( p1<0 ){.  
1f60: 20 20 20 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20      p2 += p1;.  
1f70: 20 20 20 20 69 66 28 20 70 32 3c 30 20 29 20 70      if( p2<0 ) p
1f80: 32 20 3d 20 30 3b 0a 20 20 20 20 20 20 70 31 20  2 = 0;.      p1 
1f90: 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c  = 0;.    }.  }el
1fa0: 73 65 20 69 66 28 20 70 31 3e 30 20 29 7b 0a 20  se if( p1>0 ){. 
1fb0: 20 20 20 70 31 2d 2d 3b 0a 20 20 7d 65 6c 73 65     p1--;.  }else
1fc0: 20 69 66 28 20 70 32 3e 30 20 29 7b 0a 20 20 20   if( p2>0 ){.   
1fd0: 20 70 32 2d 2d 3b 0a 20 20 7d 0a 20 20 69 66 28   p2--;.  }.  if(
1fe0: 20 6e 65 67 50 32 20 29 7b 0a 20 20 20 20 70 31   negP2 ){.    p1
1ff0: 20 2d 3d 20 70 32 3b 0a 20 20 20 20 69 66 28 20   -= p2;.    if( 
2000: 70 31 3c 30 20 29 7b 0a 20 20 20 20 20 20 70 32  p1<0 ){.      p2
2010: 20 2b 3d 20 70 31 3b 0a 20 20 20 20 20 20 70 31   += p1;.      p1
2020: 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a   = 0;.    }.  }.
2030: 20 20 61 73 73 65 72 74 28 20 70 31 3e 3d 30 20    assert( p1>=0 
2040: 26 26 20 70 32 3e 3d 30 20 29 3b 0a 20 20 69 66  && p2>=0 );.  if
2050: 28 20 70 30 74 79 70 65 21 3d 53 51 4c 49 54 45  ( p0type!=SQLITE
2060: 5f 42 4c 4f 42 20 29 7b 0a 20 20 20 20 77 68 69  _BLOB ){.    whi
2070: 6c 65 28 20 2a 7a 20 26 26 20 70 31 20 29 7b 0a  le( *z && p1 ){.
2080: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
2090: 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20 20 20  P_UTF8(z);.     
20a0: 20 70 31 2d 2d 3b 0a 20 20 20 20 7d 0a 20 20 20   p1--;.    }.   
20b0: 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32 20 26   for(z2=z; *z2 &
20c0: 26 20 70 32 3b 20 70 32 2d 2d 29 7b 0a 20 20 20  & p2; p2--){.   
20d0: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
20e0: 54 46 38 28 7a 32 29 3b 0a 20 20 20 20 7d 0a 20  TF8(z2);.    }. 
20f0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
2100: 74 5f 74 65 78 74 36 34 28 63 6f 6e 74 65 78 74  t_text64(context
2110: 2c 20 28 63 68 61 72 2a 29 7a 2c 20 7a 32 2d 7a  , (char*)z, z2-z
2120: 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45  , SQLITE_TRANSIE
2130: 4e 54 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  NT,.            
2140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 51                SQ
2150: 4c 49 54 45 5f 55 54 46 38 29 3b 0a 20 20 7d 65  LITE_UTF8);.  }e
2160: 6c 73 65 7b 0a 20 20 20 20 69 66 28 20 70 31 2b  lse{.    if( p1+
2170: 70 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20 20 20  p2>len ){.      
2180: 70 32 20 3d 20 6c 65 6e 2d 70 31 3b 0a 20 20 20  p2 = len-p1;.   
2190: 20 20 20 69 66 28 20 70 32 3c 30 20 29 20 70 32     if( p2<0 ) p2
21a0: 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 20 20   = 0;.    }.    
21b0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62  sqlite3_result_b
21c0: 6c 6f 62 36 34 28 63 6f 6e 74 65 78 74 2c 20 28  lob64(context, (
21d0: 63 68 61 72 2a 29 26 7a 5b 70 31 5d 2c 20 28 75  char*)&z[p1], (u
21e0: 36 34 29 70 32 2c 20 53 51 4c 49 54 45 5f 54 52  64)p2, SQLITE_TR
21f0: 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a  ANSIENT);.  }.}.
2200: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
2210: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75  ation of the rou
2220: 6e 64 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f  nd() function.*/
2230: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f  .#ifndef SQLITE_
2240: 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f  OMIT_FLOATING_PO
2250: 49 4e 54 0a 73 74 61 74 69 63 20 76 6f 69 64 20  INT.static void 
2260: 72 6f 75 6e 64 46 75 6e 63 28 73 71 6c 69 74 65  roundFunc(sqlite
2270: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
2280: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
2290: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
22a0: 67 76 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30  gv){.  int n = 0
22b0: 3b 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20  ;.  double r;.  
22c0: 63 68 61 72 20 2a 7a 42 75 66 3b 0a 20 20 61 73  char *zBuf;.  as
22d0: 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c  sert( argc==1 ||
22e0: 20 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66   argc==2 );.  if
22f0: 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20  ( argc==2 ){.   
2300: 20 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c   if( SQLITE_NULL
2310: 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ==sqlite3_value_
2320: 74 79 70 65 28 61 72 67 76 5b 31 5d 29 20 29 20  type(argv[1]) ) 
2330: 72 65 74 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20  return;.    n = 
2340: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
2350: 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20  t(argv[1]);.    
2360: 69 66 28 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33  if( n>30 ) n = 3
2370: 30 3b 0a 20 20 20 20 69 66 28 20 6e 3c 30 20 29  0;.    if( n<0 )
2380: 20 6e 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66   n = 0;.  }.  if
2390: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
23a0: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53  type(argv[0])==S
23b0: 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74  QLITE_NULL ) ret
23c0: 75 72 6e 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74  urn;.  r = sqlit
23d0: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28  e3_value_double(
23e0: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 49  argv[0]);.  /* I
23f0: 66 20 59 3d 3d 30 20 61 6e 64 20 58 20 77 69 6c  f Y==0 and X wil
2400: 6c 20 66 69 74 20 69 6e 20 61 20 36 34 2d 62 69  l fit in a 64-bi
2410: 74 20 69 6e 74 2c 0a 20 20 2a 2a 20 68 61 6e 64  t int,.  ** hand
2420: 6c 65 20 74 68 65 20 72 6f 75 6e 64 69 6e 67 20  le the rounding 
2430: 64 69 72 65 63 74 6c 79 2c 0a 20 20 2a 2a 20 6f  directly,.  ** o
2440: 74 68 65 72 77 69 73 65 20 75 73 65 20 70 72 69  therwise use pri
2450: 6e 74 66 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20  ntf..  */.  if( 
2460: 6e 3d 3d 30 20 26 26 20 72 3e 3d 30 20 26 26 20  n==0 && r>=0 && 
2470: 72 3c 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2d  r<LARGEST_INT64-
2480: 31 20 29 7b 0a 20 20 20 20 72 20 3d 20 28 64 6f  1 ){.    r = (do
2490: 75 62 6c 65 29 28 28 73 71 6c 69 74 65 5f 69 6e  uble)((sqlite_in
24a0: 74 36 34 29 28 72 2b 30 2e 35 29 29 3b 0a 20 20  t64)(r+0.5));.  
24b0: 7d 65 6c 73 65 20 69 66 28 20 6e 3d 3d 30 20 26  }else if( n==0 &
24c0: 26 20 72 3c 30 20 26 26 20 28 2d 72 29 3c 4c 41  & r<0 && (-r)<LA
24d0: 52 47 45 53 54 5f 49 4e 54 36 34 2d 31 20 29 7b  RGEST_INT64-1 ){
24e0: 0a 20 20 20 20 72 20 3d 20 2d 28 64 6f 75 62 6c  .    r = -(doubl
24f0: 65 29 28 28 73 71 6c 69 74 65 5f 69 6e 74 36 34  e)((sqlite_int64
2500: 29 28 28 2d 72 29 2b 30 2e 35 29 29 3b 0a 20 20  )((-r)+0.5));.  
2510: 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 42 75 66 20  }else{.    zBuf 
2520: 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74  = sqlite3_mprint
2530: 66 28 22 25 2e 2a 66 22 2c 6e 2c 72 29 3b 0a 20  f("%.*f",n,r);. 
2540: 20 20 20 69 66 28 20 7a 42 75 66 3d 3d 30 20 29     if( zBuf==0 )
2550: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
2560: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d  result_error_nom
2570: 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  em(context);.   
2580: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d     return;.    }
2590: 0a 20 20 20 20 73 71 6c 69 74 65 33 41 74 6f 46  .    sqlite3AtoF
25a0: 28 7a 42 75 66 2c 20 26 72 2c 20 73 71 6c 69 74  (zBuf, &r, sqlit
25b0: 65 33 53 74 72 6c 65 6e 33 30 28 7a 42 75 66 29  e3Strlen30(zBuf)
25c0: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 29 3b 0a  , SQLITE_UTF8);.
25d0: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
25e0: 28 7a 42 75 66 29 3b 0a 20 20 7d 0a 20 20 73 71  (zBuf);.  }.  sq
25f0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75  lite3_result_dou
2600: 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b  ble(context, r);
2610: 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a  .}.#endif../*.**
2620: 20 41 6c 6c 6f 63 61 74 65 20 6e 42 79 74 65 20   Allocate nByte 
2630: 62 79 74 65 73 20 6f 66 20 73 70 61 63 65 20 75  bytes of space u
2640: 73 69 6e 67 20 73 71 6c 69 74 65 33 5f 6d 61 6c  sing sqlite3_mal
2650: 6c 6f 63 28 29 2e 20 49 66 20 74 68 65 0a 2a 2a  loc(). If the.**
2660: 20 61 6c 6c 6f 63 61 74 69 6f 6e 20 66 61 69 6c   allocation fail
2670: 73 2c 20 63 61 6c 6c 20 73 71 6c 69 74 65 33 5f  s, call sqlite3_
2680: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d  result_error_nom
2690: 65 6d 28 29 20 74 6f 20 6e 6f 74 69 66 79 0a 2a  em() to notify.*
26a0: 2a 20 74 68 65 20 64 61 74 61 62 61 73 65 20 68  * the database h
26b0: 61 6e 64 6c 65 20 74 68 61 74 20 6d 61 6c 6c 6f  andle that mallo
26c0: 63 28 29 20 68 61 73 20 66 61 69 6c 65 64 20 61  c() has failed a
26d0: 6e 64 20 72 65 74 75 72 6e 20 4e 55 4c 4c 2e 0a  nd return NULL..
26e0: 2a 2a 20 49 66 20 6e 42 79 74 65 20 69 73 20 6c  ** If nByte is l
26f0: 61 72 67 65 72 20 74 68 61 6e 20 74 68 65 20 6d  arger than the m
2700: 61 78 69 6d 75 6d 20 73 74 72 69 6e 67 20 6f 72  aximum string or
2710: 20 62 6c 6f 62 20 6c 65 6e 67 74 68 2c 20 74 68   blob length, th
2720: 65 6e 0a 2a 2a 20 72 61 69 73 65 20 61 6e 20 53  en.** raise an S
2730: 51 4c 49 54 45 5f 54 4f 4f 42 49 47 20 65 78 63  QLITE_TOOBIG exc
2740: 65 70 74 69 6f 6e 20 61 6e 64 20 72 65 74 75 72  eption and retur
2750: 6e 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69  n NULL..*/.stati
2760: 63 20 76 6f 69 64 20 2a 63 6f 6e 74 65 78 74 4d  c void *contextM
2770: 61 6c 6c 6f 63 28 73 71 6c 69 74 65 33 5f 63 6f  alloc(sqlite3_co
2780: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
2790: 69 36 34 20 6e 42 79 74 65 29 7b 0a 20 20 63 68  i64 nByte){.  ch
27a0: 61 72 20 2a 7a 3b 0a 20 20 73 71 6c 69 74 65 33  ar *z;.  sqlite3
27b0: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
27c0: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
27d0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61 73 73  (context);.  ass
27e0: 65 72 74 28 20 6e 42 79 74 65 3e 30 20 29 3b 0a  ert( nByte>0 );.
27f0: 20 20 74 65 73 74 63 61 73 65 28 20 6e 42 79 74    testcase( nByt
2800: 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  e==db->aLimit[SQ
2810: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
2820: 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65  H] );.  testcase
2830: 28 20 6e 42 79 74 65 3d 3d 64 62 2d 3e 61 4c 69  ( nByte==db->aLi
2840: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
2850: 5f 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20  _LENGTH]+1 );.  
2860: 69 66 28 20 6e 42 79 74 65 3e 64 62 2d 3e 61 4c  if( nByte>db->aL
2870: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
2880: 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20  T_LENGTH] ){.   
2890: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
28a0: 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f 6e  error_toobig(con
28b0: 74 65 78 74 29 3b 0a 20 20 20 20 7a 20 3d 20 30  text);.    z = 0
28c0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a  ;.  }else{.    z
28d0: 20 3d 20 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63   = sqlite3Malloc
28e0: 28 6e 42 79 74 65 29 3b 0a 20 20 20 20 69 66 28  (nByte);.    if(
28f0: 20 21 7a 20 29 7b 0a 20 20 20 20 20 20 73 71 6c   !z ){.      sql
2900: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
2910: 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29  r_nomem(context)
2920: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65  ;.    }.  }.  re
2930: 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  turn z;.}../*.**
2940: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
2950: 6f 66 20 74 68 65 20 75 70 70 65 72 28 29 20 61  of the upper() a
2960: 6e 64 20 6c 6f 77 65 72 28 29 20 53 51 4c 20 66  nd lower() SQL f
2970: 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61  unctions..*/.sta
2980: 74 69 63 20 76 6f 69 64 20 75 70 70 65 72 46 75  tic void upperFu
2990: 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  nc(sqlite3_conte
29a0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
29b0: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
29c0: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
29d0: 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73  char *z1;.  cons
29e0: 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e  t char *z2;.  in
29f0: 74 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44  t i, n;.  UNUSED
2a00: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
2a10: 3b 0a 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29  ;.  z2 = (char*)
2a20: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
2a30: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e  xt(argv[0]);.  n
2a40: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
2a50: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
2a60: 0a 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61  .  /* Verify tha
2a70: 74 20 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62  t the call to _b
2a80: 79 74 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20  ytes() does not 
2a90: 69 6e 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f  invalidate the _
2aa0: 74 65 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a  text() pointer *
2ab0: 2f 0a 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d  /.  assert( z2==
2ac0: 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76  (char*)sqlite3_v
2ad0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
2ae0: 5d 29 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29  ]) );.  if( z2 )
2af0: 7b 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65  {.    z1 = conte
2b00: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
2b10: 2c 20 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20  , ((i64)n)+1);. 
2b20: 20 20 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20     if( z1 ){.   
2b30: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b     for(i=0; i<n;
2b40: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a   i++){.        z
2b50: 31 5b 69 5d 20 3d 20 28 63 68 61 72 29 73 71 6c  1[i] = (char)sql
2b60: 69 74 65 33 54 6f 75 70 70 65 72 28 7a 32 5b 69  ite3Toupper(z2[i
2b70: 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  ]);.      }.    
2b80: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2b90: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a  _text(context, z
2ba0: 31 2c 20 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72  1, n, sqlite3_fr
2bb0: 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  ee);.    }.  }.}
2bc0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 6f 77  .static void low
2bd0: 65 72 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63  erFunc(sqlite3_c
2be0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
2bf0: 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74   int argc, sqlit
2c00: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29  e3_value **argv)
2c10: 7b 0a 20 20 63 68 61 72 20 2a 7a 31 3b 0a 20 20  {.  char *z1;.  
2c20: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b 0a  const char *z2;.
2c30: 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55 4e    int i, n;.  UN
2c40: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
2c50: 72 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63 68  rgc);.  z2 = (ch
2c60: 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  ar*)sqlite3_valu
2c70: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
2c80: 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76  .  n = sqlite3_v
2c90: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
2ca0: 30 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66 79  0]);.  /* Verify
2cb0: 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c 20 74   that the call t
2cc0: 6f 20 5f 62 79 74 65 73 28 29 20 64 6f 65 73 20  o _bytes() does 
2cd0: 6e 6f 74 20 69 6e 76 61 6c 69 64 61 74 65 20 74  not invalidate t
2ce0: 68 65 20 5f 74 65 78 74 28 29 20 70 6f 69 6e 74  he _text() point
2cf0: 65 72 20 2a 2f 0a 20 20 61 73 73 65 72 74 28 20  er */.  assert( 
2d00: 7a 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69 74  z2==(char*)sqlit
2d10: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
2d20: 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28 20  gv[0]) );.  if( 
2d30: 7a 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20 63  z2 ){.    z1 = c
2d40: 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e  ontextMalloc(con
2d50: 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2b 31  text, ((i64)n)+1
2d60: 29 3b 0a 20 20 20 20 69 66 28 20 7a 31 20 29 7b  );.    if( z1 ){
2d70: 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20  .      for(i=0; 
2d80: 69 3c 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20  i<n; i++){.     
2d90: 20 20 20 7a 31 5b 69 5d 20 3d 20 73 71 6c 69 74     z1[i] = sqlit
2da0: 65 33 54 6f 6c 6f 77 65 72 28 7a 32 5b 69 5d 29  e3Tolower(z2[i])
2db0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
2dc0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
2dd0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 31 2c  ext(context, z1,
2de0: 20 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65   n, sqlite3_free
2df0: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a  );.    }.  }.}..
2e00: 2f 2a 0a 2a 2a 20 53 6f 6d 65 20 66 75 6e 63 74  /*.** Some funct
2e10: 69 6f 6e 73 20 6c 69 6b 65 20 43 4f 41 4c 45 53  ions like COALES
2e20: 43 45 28 29 20 61 6e 64 20 49 46 4e 55 4c 4c 28  CE() and IFNULL(
2e30: 29 20 61 6e 64 20 55 4e 4c 49 4b 45 4c 59 28 29  ) and UNLIKELY()
2e40: 20 61 72 65 20 69 6d 70 6c 65 6d 65 6e 74 65 64   are implemented
2e50: 0a 2a 2a 20 61 73 20 56 44 42 45 20 63 6f 64 65  .** as VDBE code
2e60: 20 73 6f 20 74 68 61 74 20 75 6e 75 73 65 64 20   so that unused 
2e70: 61 72 67 75 6d 65 6e 74 20 76 61 6c 75 65 73 20  argument values 
2e80: 64 6f 20 6e 6f 74 20 68 61 76 65 20 74 6f 20 62  do not have to b
2e90: 65 20 63 6f 6d 70 75 74 65 64 2e 0a 2a 2a 20 48  e computed..** H
2ea0: 6f 77 65 76 65 72 2c 20 77 65 20 73 74 69 6c 6c  owever, we still
2eb0: 20 6e 65 65 64 20 73 6f 6d 65 20 6b 69 6e 64 20   need some kind 
2ec0: 6f 66 20 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c  of function impl
2ed0: 65 6d 65 6e 74 61 74 69 6f 6e 20 66 6f 72 20 74  ementation for t
2ee0: 68 69 73 0a 2a 2a 20 72 6f 75 74 69 6e 65 73 20  his.** routines 
2ef0: 69 6e 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20  in the function 
2f00: 74 61 62 6c 65 2e 20 20 54 68 65 20 6e 6f 6f 70  table.  The noop
2f10: 46 75 6e 63 20 6d 61 63 72 6f 20 70 72 6f 76 69  Func macro provi
2f20: 64 65 73 20 74 68 69 73 2e 0a 2a 2a 20 6e 6f 6f  des this..** noo
2f30: 70 46 75 6e 63 20 77 69 6c 6c 20 6e 65 76 65 72  pFunc will never
2f40: 20 62 65 20 63 61 6c 6c 65 64 20 73 6f 20 69 74   be called so it
2f50: 20 64 6f 65 73 6e 27 74 20 6d 61 74 74 65 72 20   doesn't matter 
2f60: 77 68 61 74 20 74 68 65 20 69 6d 70 6c 65 6d 65  what the impleme
2f70: 6e 74 61 74 69 6f 6e 0a 2a 2a 20 69 73 2e 20 20  ntation.** is.  
2f80: 57 65 20 6d 69 67 68 74 20 61 73 20 77 65 6c 6c  We might as well
2f90: 20 75 73 65 20 74 68 65 20 22 76 65 72 73 69 6f   use the "versio
2fa0: 6e 28 29 22 20 66 75 6e 63 74 69 6f 6e 20 61 73  n()" function as
2fb0: 20 61 20 73 75 62 73 74 69 74 75 74 65 2e 0a 2a   a substitute..*
2fc0: 2f 0a 23 64 65 66 69 6e 65 20 6e 6f 6f 70 46 75  /.#define noopFu
2fd0: 6e 63 20 76 65 72 73 69 6f 6e 46 75 6e 63 20 20  nc versionFunc  
2fe0: 20 2f 2a 20 53 75 62 73 74 69 74 75 74 65 20 66   /* Substitute f
2ff0: 75 6e 63 74 69 6f 6e 20 2d 20 6e 65 76 65 72 20  unction - never 
3000: 63 61 6c 6c 65 64 20 2a 2f 0a 0a 2f 2a 0a 2a 2a  called */../*.**
3010: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
3020: 6f 66 20 72 61 6e 64 6f 6d 28 29 2e 20 20 52 65  of random().  Re
3030: 74 75 72 6e 20 61 20 72 61 6e 64 6f 6d 20 69 6e  turn a random in
3040: 74 65 67 65 72 2e 20 20 0a 2a 2f 0a 73 74 61 74  teger.  .*/.stat
3050: 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d 46 75  ic void randomFu
3060: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
3070: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
3080: 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20    int NotUsed,. 
3090: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
30a0: 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73  *NotUsed2.){.  s
30b0: 71 6c 69 74 65 5f 69 6e 74 36 34 20 72 3b 0a 20  qlite_int64 r;. 
30c0: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
30d0: 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55  R2(NotUsed, NotU
30e0: 73 65 64 32 29 3b 0a 20 20 73 71 6c 69 74 65 33  sed2);.  sqlite3
30f0: 5f 72 61 6e 64 6f 6d 6e 65 73 73 28 73 69 7a 65  _randomness(size
3100: 6f 66 28 72 29 2c 20 26 72 29 3b 0a 20 20 69 66  of(r), &r);.  if
3110: 28 20 72 3c 30 20 29 7b 0a 20 20 20 20 2f 2a 20  ( r<0 ){.    /* 
3120: 57 65 20 6e 65 65 64 20 74 6f 20 70 72 65 76 65  We need to preve
3130: 6e 74 20 61 20 72 61 6e 64 6f 6d 20 6e 75 6d 62  nt a random numb
3140: 65 72 20 6f 66 20 30 78 38 30 30 30 30 30 30 30  er of 0x80000000
3150: 30 30 30 30 30 30 30 30 20 0a 20 20 20 20 2a 2a  00000000 .    **
3160: 20 28 6f 72 20 2d 39 32 32 33 33 37 32 30 33 36   (or -9223372036
3170: 38 35 34 37 37 35 38 30 38 29 20 73 69 6e 63 65  854775808) since
3180: 20 77 68 65 6e 20 79 6f 75 20 64 6f 20 61 62 73   when you do abs
3190: 28 29 20 6f 66 20 74 68 61 74 0a 20 20 20 20 2a  () of that.    *
31a0: 2a 20 6e 75 6d 62 65 72 20 6f 66 20 79 6f 75 20  * number of you 
31b0: 67 65 74 20 74 68 65 20 73 61 6d 65 20 76 61 6c  get the same val
31c0: 75 65 20 62 61 63 6b 20 61 67 61 69 6e 2e 20 20  ue back again.  
31d0: 54 6f 20 64 6f 20 74 68 69 73 0a 20 20 20 20 2a  To do this.    *
31e0: 2a 20 69 6e 20 61 20 77 61 79 20 74 68 61 74 20  * in a way that 
31f0: 69 73 20 74 65 73 74 61 62 6c 65 2c 20 6d 61 73  is testable, mas
3200: 6b 20 74 68 65 20 73 69 67 6e 20 62 69 74 20 6f  k the sign bit o
3210: 66 66 20 6f 66 20 6e 65 67 61 74 69 76 65 0a 20  ff of negative. 
3220: 20 20 20 2a 2a 20 76 61 6c 75 65 73 2c 20 72 65     ** values, re
3230: 73 75 6c 74 69 6e 67 20 69 6e 20 61 20 70 6f 73  sulting in a pos
3240: 69 74 69 76 65 20 76 61 6c 75 65 2e 20 20 54 68  itive value.  Th
3250: 65 6e 20 74 61 6b 65 20 74 68 65 20 0a 20 20 20  en take the .   
3260: 20 2a 2a 20 32 73 20 63 6f 6d 70 6c 65 6d 65 6e   ** 2s complemen
3270: 74 20 6f 66 20 74 68 61 74 20 70 6f 73 69 74 69  t of that positi
3280: 76 65 20 76 61 6c 75 65 2e 20 20 54 68 65 20 65  ve value.  The e
3290: 6e 64 20 72 65 73 75 6c 74 20 63 61 6e 0a 20 20  nd result can.  
32a0: 20 20 2a 2a 20 74 68 65 72 65 66 6f 72 65 20 62    ** therefore b
32b0: 65 20 6e 6f 20 6c 65 73 73 20 74 68 61 6e 20 2d  e no less than -
32c0: 39 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35  9223372036854775
32d0: 38 30 37 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20  807..    */.    
32e0: 72 20 3d 20 2d 28 72 20 26 20 4c 41 52 47 45 53  r = -(r & LARGES
32f0: 54 5f 49 4e 54 36 34 29 3b 0a 20 20 7d 0a 20 20  T_INT64);.  }.  
3300: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
3310: 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 72 29  nt64(context, r)
3320: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
3330: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72 61 6e  mentation of ran
3340: 64 6f 6d 62 6c 6f 62 28 4e 29 2e 20 20 52 65 74  domblob(N).  Ret
3350: 75 72 6e 20 61 20 72 61 6e 64 6f 6d 20 62 6c 6f  urn a random blo
3360: 62 0a 2a 2a 20 74 68 61 74 20 69 73 20 4e 20 62  b.** that is N b
3370: 79 74 65 73 20 6c 6f 6e 67 2e 0a 2a 2f 0a 73 74  ytes long..*/.st
3380: 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d  atic void random
3390: 42 6c 6f 62 28 0a 20 20 73 71 6c 69 74 65 33 5f  Blob(.  sqlite3_
33a0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
33b0: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
33c0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
33d0: 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b  argv.){.  int n;
33e0: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
33f0: 20 2a 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61   *p;.  assert( a
3400: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
3410: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
3420: 63 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65  c);.  n = sqlite
3430: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76  3_value_int(argv
3440: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 6e 3c 31 20  [0]);.  if( n<1 
3450: 29 7b 0a 20 20 20 20 6e 20 3d 20 31 3b 0a 20 20  ){.    n = 1;.  
3460: 7d 0a 20 20 70 20 3d 20 63 6f 6e 74 65 78 74 4d  }.  p = contextM
3470: 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 6e  alloc(context, n
3480: 29 3b 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 20  );.  if( p ){.  
3490: 20 20 73 71 6c 69 74 65 33 5f 72 61 6e 64 6f 6d    sqlite3_random
34a0: 6e 65 73 73 28 6e 2c 20 70 29 3b 0a 20 20 20 20  ness(n, p);.    
34b0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62  sqlite3_result_b
34c0: 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 63 68  lob(context, (ch
34d0: 61 72 2a 29 70 2c 20 6e 2c 20 73 71 6c 69 74 65  ar*)p, n, sqlite
34e0: 33 5f 66 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a  3_free);.  }.}..
34f0: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
3500: 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73 74  tion of the last
3510: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20  _insert_rowid() 
3520: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54  SQL function.  T
3530: 68 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c  he return.** val
3540: 75 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61  ue is the same a
3550: 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 61  s the sqlite3_la
3560: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
3570: 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a  ) API function..
3580: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
3590: 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64  ast_insert_rowid
35a0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
35b0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20  ext *context, . 
35c0: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a 20   int NotUsed, . 
35d0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
35e0: 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73  *NotUsed2.){.  s
35f0: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c  qlite3 *db = sql
3600: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
3610: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b  handle(context);
3620: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
3630: 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f  TER2(NotUsed, No
3640: 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d  tUsed2);.  /* IM
3650: 50 3a 20 52 2d 35 31 35 31 33 2d 31 32 30 32 36  P: R-51513-12026
3660: 20 54 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74   The last_insert
3670: 5f 72 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e  _rowid() SQL fun
3680: 63 74 69 6f 6e 20 69 73 20 61 0a 20 20 2a 2a 20  ction is a.  ** 
3690: 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74  wrapper around t
36a0: 68 65 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f  he sqlite3_last_
36b0: 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 43  insert_rowid() C
36c0: 2f 43 2b 2b 20 69 6e 74 65 72 66 61 63 65 0a 20  /C++ interface. 
36d0: 20 2a 2a 20 66 75 6e 63 74 69 6f 6e 2e 20 2a 2f   ** function. */
36e0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
36f0: 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c  t_int64(context,
3700: 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e   sqlite3_last_in
3710: 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29 3b  sert_rowid(db));
3720: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
3730: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
3740: 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75  changes() SQL fu
3750: 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d  nction..**.** IM
3760: 50 3a 20 52 2d 36 32 30 37 33 2d 31 31 32 30 39  P: R-62073-11209
3770: 20 54 68 65 20 63 68 61 6e 67 65 73 28 29 20 53   The changes() S
3780: 51 4c 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61  QL function is a
3790: 20 77 72 61 70 70 65 72 0a 2a 2a 20 61 72 6f 75   wrapper.** arou
37a0: 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63  nd the sqlite3_c
37b0: 68 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b 20 66  hanges() C/C++ f
37c0: 75 6e 63 74 69 6f 6e 20 61 6e 64 20 68 65 6e 63  unction and henc
37d0: 65 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 73 61  e follows the sa
37e0: 6d 65 0a 2a 2a 20 72 75 6c 65 73 20 66 6f 72 20  me.** rules for 
37f0: 63 6f 75 6e 74 69 6e 67 20 63 68 61 6e 67 65 73  counting changes
3800: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
3810: 20 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69   changes(.  sqli
3820: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
3830: 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55  text,.  int NotU
3840: 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  sed,.  sqlite3_v
3850: 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a  alue **NotUsed2.
3860: 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62  ){.  sqlite3 *db
3870: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65   = sqlite3_conte
3880: 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e  xt_db_handle(con
3890: 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f  text);.  UNUSED_
38a0: 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73  PARAMETER2(NotUs
38b0: 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20  ed, NotUsed2);. 
38c0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
38d0: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  int(context, sql
38e0: 69 74 65 33 5f 63 68 61 6e 67 65 73 28 64 62 29  ite3_changes(db)
38f0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  );.}../*.** Impl
3900: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
3910: 65 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28  e total_changes(
3920: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20  ) SQL function. 
3930: 20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75   The return valu
3940: 65 20 69 73 0a 2a 2a 20 74 68 65 20 73 61 6d 65  e is.** the same
3950: 20 61 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f   as the sqlite3_
3960: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20  total_changes() 
3970: 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f  API function..*/
3980: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74  .static void tot
3990: 61 6c 5f 63 68 61 6e 67 65 73 28 0a 20 20 73 71  al_changes(.  sq
39a0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
39b0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f  ontext,.  int No
39c0: 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33  tUsed,.  sqlite3
39d0: 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64  _value **NotUsed
39e0: 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a  2.){.  sqlite3 *
39f0: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
3a00: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
3a10: 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45  ontext);.  UNUSE
3a20: 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74  D_PARAMETER2(Not
3a30: 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b  Used, NotUsed2);
3a40: 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 35 32 37  .  /* IMP: R-527
3a50: 35 36 2d 34 31 39 39 33 20 54 68 69 73 20 66 75  56-41993 This fu
3a60: 6e 63 74 69 6f 6e 20 69 73 20 61 20 77 72 61 70  nction is a wrap
3a70: 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20  per around the. 
3a80: 20 2a 2a 20 73 71 6c 69 74 65 33 5f 74 6f 74 61   ** sqlite3_tota
3a90: 6c 5f 63 68 61 6e 67 65 73 28 29 20 43 2f 43 2b  l_changes() C/C+
3aa0: 2b 20 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a  + interface. */.
3ab0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
3ac0: 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  _int(context, sq
3ad0: 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e  lite3_total_chan
3ae0: 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a  ges(db));.}../*.
3af0: 2a 2a 20 41 20 73 74 72 75 63 74 75 72 65 20 64  ** A structure d
3b00: 65 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64  efining how to d
3b10: 6f 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d  o GLOB-style com
3b20: 70 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72  parisons..*/.str
3b30: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
3b40: 7b 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b  {.  u8 matchAll;
3b50: 0a 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a  .  u8 matchOne;.
3b60: 20 20 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20    u8 matchSet;. 
3b70: 20 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a   u8 noCase;.};..
3b80: 2f 2a 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45 20 61  /*.** For LIKE a
3b90: 6e 64 20 47 4c 4f 42 20 6d 61 74 63 68 69 6e 67  nd GLOB matching
3ba0: 20 6f 6e 20 45 42 43 44 49 43 20 6d 61 63 68 69   on EBCDIC machi
3bb0: 6e 65 73 2c 20 61 73 73 75 6d 65 20 74 68 61 74  nes, assume that
3bc0: 20 65 76 65 72 79 0a 2a 2a 20 63 68 61 72 61 63   every.** charac
3bd0: 74 65 72 20 69 73 20 65 78 61 63 74 6c 79 20 6f  ter is exactly o
3be0: 6e 65 20 62 79 74 65 20 69 6e 20 73 69 7a 65 2e  ne byte in size.
3bf0: 20 20 41 6c 73 6f 2c 20 61 6c 6c 20 63 68 61 72    Also, all char
3c00: 61 63 74 65 72 73 20 61 72 65 0a 2a 2a 20 61 62  acters are.** ab
3c10: 6c 65 20 74 6f 20 70 61 72 74 69 63 69 70 61 74  le to participat
3c20: 65 20 69 6e 20 75 70 70 65 72 2d 63 61 73 65 2d  e in upper-case-
3c30: 74 6f 2d 6c 6f 77 65 72 2d 63 61 73 65 20 6d 61  to-lower-case ma
3c40: 70 70 69 6e 67 73 20 69 6e 20 45 42 43 44 49 43  ppings in EBCDIC
3c50: 0a 2a 2a 20 77 68 65 72 65 61 73 20 6f 6e 6c 79  .** whereas only
3c60: 20 63 68 61 72 61 63 74 65 72 73 20 6c 65 73 73   characters less
3c70: 20 74 68 61 6e 20 30 78 38 30 20 64 6f 20 69 6e   than 0x80 do in
3c80: 20 41 53 43 49 49 2e 0a 2a 2f 0a 23 69 66 20 64   ASCII..*/.#if d
3c90: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 45 42  efined(SQLITE_EB
3ca0: 43 44 49 43 29 0a 23 20 64 65 66 69 6e 65 20 73  CDIC).# define s
3cb0: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 41  qlite3Utf8Read(A
3cc0: 29 20 20 20 20 20 20 20 20 28 2a 28 28 2a 41 29  )        (*((*A)
3cd0: 2b 2b 29 29 0a 23 20 64 65 66 69 6e 65 20 47 6c  ++)).# define Gl
3ce0: 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 41  obUpperToLower(A
3cf0: 29 20 20 20 20 20 20 20 41 20 3d 20 73 71 6c 69  )       A = sqli
3d00: 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b  te3UpperToLower[
3d10: 41 5d 0a 23 20 64 65 66 69 6e 65 20 47 6c 6f 62  A].# define Glob
3d20: 55 70 70 65 72 54 6f 4c 6f 77 65 72 41 73 63 69  UpperToLowerAsci
3d30: 69 28 41 29 20 20 41 20 3d 20 73 71 6c 69 74 65  i(A)  A = sqlite
3d40: 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 41 5d  3UpperToLower[A]
3d50: 0a 23 65 6c 73 65 0a 23 20 64 65 66 69 6e 65 20  .#else.# define 
3d60: 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72  GlobUpperToLower
3d70: 28 41 29 20 20 20 20 20 20 20 69 66 28 20 41 3c  (A)       if( A<
3d80: 3d 30 78 37 66 20 29 7b 20 41 20 3d 20 73 71 6c  =0x7f ){ A = sql
3d90: 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72  ite3UpperToLower
3da0: 5b 41 5d 3b 20 7d 0a 23 20 64 65 66 69 6e 65 20  [A]; }.# define 
3db0: 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72  GlobUpperToLower
3dc0: 41 73 63 69 69 28 41 29 20 20 41 20 3d 20 73 71  Ascii(A)  A = sq
3dd0: 6c 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65  lite3UpperToLowe
3de0: 72 5b 41 5d 0a 23 65 6e 64 69 66 0a 0a 73 74 61  r[A].#endif..sta
3df0: 74 69 63 20 63 6f 6e 73 74 20 73 74 72 75 63 74  tic const struct
3e00: 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 67 6c 6f   compareInfo glo
3e10: 62 49 6e 66 6f 20 3d 20 7b 20 27 2a 27 2c 20 27  bInfo = { '*', '
3e20: 3f 27 2c 20 27 5b 27 2c 20 30 20 7d 3b 0a 2f 2a  ?', '[', 0 };./*
3e30: 20 54 68 65 20 63 6f 72 72 65 63 74 20 53 51 4c   The correct SQL
3e40: 2d 39 32 20 62 65 68 61 76 69 6f 72 20 69 73 20  -92 behavior is 
3e50: 66 6f 72 20 74 68 65 20 4c 49 4b 45 20 6f 70 65  for the LIKE ope
3e60: 72 61 74 6f 72 20 74 6f 20 69 67 6e 6f 72 65 0a  rator to ignore.
3e70: 2a 2a 20 63 61 73 65 2e 20 20 54 68 75 73 20 20  ** case.  Thus  
3e80: 27 61 27 20 4c 49 4b 45 20 27 41 27 20 77 6f 75  'a' LIKE 'A' wou
3e90: 6c 64 20 62 65 20 74 72 75 65 2e 20 2a 2f 0a 73  ld be true. */.s
3ea0: 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74 72 75  tatic const stru
3eb0: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 6c  ct compareInfo l
3ec0: 69 6b 65 49 6e 66 6f 4e 6f 72 6d 20 3d 20 7b 20  ikeInfoNorm = { 
3ed0: 27 25 27 2c 20 27 5f 27 2c 20 20 20 30 2c 20 31  '%', '_',   0, 1
3ee0: 20 7d 3b 0a 2f 2a 20 49 66 20 53 51 4c 49 54 45   };./* If SQLITE
3ef0: 5f 43 41 53 45 5f 53 45 4e 53 49 54 49 56 45 5f  _CASE_SENSITIVE_
3f00: 4c 49 4b 45 20 69 73 20 64 65 66 69 6e 65 64 2c  LIKE is defined,
3f10: 20 74 68 65 6e 20 74 68 65 20 4c 49 4b 45 20 6f   then the LIKE o
3f20: 70 65 72 61 74 6f 72 0a 2a 2a 20 69 73 20 63 61  perator.** is ca
3f30: 73 65 20 73 65 6e 73 69 74 69 76 65 20 63 61 75  se sensitive cau
3f40: 73 69 6e 67 20 27 61 27 20 4c 49 4b 45 20 27 41  sing 'a' LIKE 'A
3f50: 27 20 74 6f 20 62 65 20 66 61 6c 73 65 20 2a 2f  ' to be false */
3f60: 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74  .static const st
3f70: 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  ruct compareInfo
3f80: 20 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d 20 7b   likeInfoAlt = {
3f90: 20 27 25 27 2c 20 27 5f 27 2c 20 20 20 30 2c 20   '%', '_',   0, 
3fa0: 30 20 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70  0 };../*.** Comp
3fb0: 61 72 65 20 74 77 6f 20 55 54 46 2d 38 20 73 74  are two UTF-8 st
3fc0: 72 69 6e 67 73 20 66 6f 72 20 65 71 75 61 6c 69  rings for equali
3fd0: 74 79 20 77 68 65 72 65 20 74 68 65 20 66 69 72  ty where the fir
3fe0: 73 74 20 73 74 72 69 6e 67 20 63 61 6e 0a 2a 2a  st string can.**
3ff0: 20 70 6f 74 65 6e 74 69 61 6c 6c 79 20 62 65 20   potentially be 
4000: 61 20 22 67 6c 6f 62 22 20 65 78 70 72 65 73 73  a "glob" express
4010: 69 6f 6e 2e 20 20 52 65 74 75 72 6e 20 74 72 75  ion.  Return tru
4020: 65 20 28 31 29 20 69 66 20 74 68 65 79 0a 2a 2a  e (1) if they.**
4030: 20 61 72 65 20 74 68 65 20 73 61 6d 65 20 61 6e   are the same an
4040: 64 20 66 61 6c 73 65 20 28 30 29 20 69 66 20 74  d false (0) if t
4050: 68 65 79 20 61 72 65 20 64 69 66 66 65 72 65 6e  hey are differen
4060: 74 2e 0a 2a 2a 0a 2a 2a 20 47 6c 6f 62 62 69 6e  t..**.** Globbin
4070: 67 20 72 75 6c 65 73 3a 0a 2a 2a 0a 2a 2a 20 20  g rules:.**.**  
4080: 20 20 20 20 27 2a 27 20 20 20 20 20 20 20 4d 61      '*'       Ma
4090: 74 63 68 65 73 20 61 6e 79 20 73 65 71 75 65 6e  tches any sequen
40a0: 63 65 20 6f 66 20 7a 65 72 6f 20 6f 72 20 6d 6f  ce of zero or mo
40b0: 72 65 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a  re characters..*
40c0: 2a 0a 2a 2a 20 20 20 20 20 20 27 3f 27 20 20 20  *.**      '?'   
40d0: 20 20 20 20 4d 61 74 63 68 65 73 20 65 78 61 63      Matches exac
40e0: 74 6c 79 20 6f 6e 65 20 63 68 61 72 61 63 74 65  tly one characte
40f0: 72 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 5b 2e 2e  r..**.**     [..
4100: 2e 5d 20 20 20 20 20 20 4d 61 74 63 68 65 73 20  .]      Matches 
4110: 6f 6e 65 20 63 68 61 72 61 63 74 65 72 20 66 72  one character fr
4120: 6f 6d 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20  om the enclosed 
4130: 6c 69 73 74 20 6f 66 0a 2a 2a 20 20 20 20 20 20  list of.**      
4140: 20 20 20 20 20 20 20 20 20 20 63 68 61 72 61 63            charac
4150: 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20  ters..**.**     
4160: 5b 5e 2e 2e 2e 5d 20 20 20 20 20 4d 61 74 63 68  [^...]     Match
4170: 65 73 20 6f 6e 65 20 63 68 61 72 61 63 74 65 72  es one character
4180: 20 6e 6f 74 20 69 6e 20 74 68 65 20 65 6e 63 6c   not in the encl
4190: 6f 73 65 64 20 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a  osed list..**.**
41a0: 20 57 69 74 68 20 74 68 65 20 5b 2e 2e 2e 5d 20   With the [...] 
41b0: 61 6e 64 20 5b 5e 2e 2e 2e 5d 20 6d 61 74 63 68  and [^...] match
41c0: 69 6e 67 2c 20 61 20 27 5d 27 20 63 68 61 72 61  ing, a ']' chara
41d0: 63 74 65 72 20 63 61 6e 20 62 65 20 69 6e 63 6c  cter can be incl
41e0: 75 64 65 64 0a 2a 2a 20 69 6e 20 74 68 65 20 6c  uded.** in the l
41f0: 69 73 74 20 62 79 20 6d 61 6b 69 6e 67 20 69 74  ist by making it
4200: 20 74 68 65 20 66 69 72 73 74 20 63 68 61 72 61   the first chara
4210: 63 74 65 72 20 61 66 74 65 72 20 27 5b 27 20 6f  cter after '[' o
4220: 72 20 27 5e 27 2e 20 20 41 0a 2a 2a 20 72 61 6e  r '^'.  A.** ran
4230: 67 65 20 6f 66 20 63 68 61 72 61 63 74 65 72 73  ge of characters
4240: 20 63 61 6e 20 62 65 20 73 70 65 63 69 66 69 65   can be specifie
4250: 64 20 75 73 69 6e 67 20 27 2d 27 2e 20 20 45 78  d using '-'.  Ex
4260: 61 6d 70 6c 65 3a 0a 2a 2a 20 22 5b 61 2d 7a 5d  ample:.** "[a-z]
4270: 22 20 6d 61 74 63 68 65 73 20 61 6e 79 20 73 69  " matches any si
4280: 6e 67 6c 65 20 6c 6f 77 65 72 2d 63 61 73 65 20  ngle lower-case 
4290: 6c 65 74 74 65 72 2e 20 20 54 6f 20 6d 61 74 63  letter.  To matc
42a0: 68 20 61 20 27 2d 27 2c 20 6d 61 6b 65 0a 2a 2a  h a '-', make.**
42b0: 20 69 74 20 74 68 65 20 6c 61 73 74 20 63 68 61   it the last cha
42c0: 72 61 63 74 65 72 20 69 6e 20 74 68 65 20 6c 69  racter in the li
42d0: 73 74 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72  st..**.** This r
42e0: 6f 75 74 69 6e 65 20 69 73 20 75 73 75 61 6c 6c  outine is usuall
42f0: 79 20 71 75 69 63 6b 2c 20 62 75 74 20 63 61 6e  y quick, but can
4300: 20 62 65 20 4e 2a 2a 32 20 69 6e 20 74 68 65 20   be N**2 in the 
4310: 77 6f 72 73 74 20 63 61 73 65 2e 0a 2a 2a 0a 2a  worst case..**.*
4320: 2a 20 48 69 6e 74 73 3a 20 74 6f 20 6d 61 74 63  * Hints: to matc
4330: 68 20 27 2a 27 20 6f 72 20 27 3f 27 2c 20 70 75  h '*' or '?', pu
4340: 74 20 74 68 65 6d 20 69 6e 20 22 5b 5d 22 2e 20  t them in "[]". 
4350: 20 4c 69 6b 65 20 74 68 69 73 3a 0a 2a 2a 0a 2a   Like this:.**.*
4360: 2a 20 20 20 20 20 20 20 20 20 61 62 63 5b 2a 5d  *         abc[*]
4370: 78 79 7a 20 20 20 20 20 20 20 20 4d 61 74 63 68  xyz        Match
4380: 65 73 20 22 61 62 63 2a 78 79 7a 22 20 6f 6e 6c  es "abc*xyz" onl
4390: 79 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  y.*/.static int 
43a0: 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 0a  patternCompare(.
43b0: 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 50 61 74    const u8 *zPat
43c0: 74 65 72 6e 2c 20 20 20 20 20 20 20 20 20 20 20  tern,           
43d0: 20 20 20 2f 2a 20 54 68 65 20 67 6c 6f 62 20 70     /* The glob p
43e0: 61 74 74 65 72 6e 20 2a 2f 0a 20 20 63 6f 6e 73  attern */.  cons
43f0: 74 20 75 38 20 2a 7a 53 74 72 69 6e 67 2c 20 20  t u8 *zString,  
4400: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
4410: 54 68 65 20 73 74 72 69 6e 67 20 74 6f 20 63 6f  The string to co
4420: 6d 70 61 72 65 20 61 67 61 69 6e 73 74 20 74 68  mpare against th
4430: 65 20 67 6c 6f 62 20 2a 2f 0a 20 20 63 6f 6e 73  e glob */.  cons
4440: 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65  t struct compare
4450: 49 6e 66 6f 20 2a 70 49 6e 66 6f 2c 20 2f 2a 20  Info *pInfo, /* 
4460: 49 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75  Information abou
4470: 74 20 68 6f 77 20 74 6f 20 64 6f 20 74 68 65 20  t how to do the 
4480: 63 6f 6d 70 61 72 65 20 2a 2f 0a 20 20 75 33 32  compare */.  u32
4490: 20 65 73 63 20 20 20 20 20 20 20 20 20 20 20 20   esc            
44a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
44b0: 20 54 68 65 20 65 73 63 61 70 65 20 63 68 61 72   The escape char
44c0: 61 63 74 65 72 20 2a 2f 0a 29 7b 0a 20 20 75 33  acter */.){.  u3
44d0: 32 20 63 2c 20 63 32 3b 0a 20 20 69 6e 74 20 69  2 c, c2;.  int i
44e0: 6e 76 65 72 74 3b 0a 20 20 69 6e 74 20 73 65 65  nvert;.  int see
44f0: 6e 3b 0a 20 20 75 33 32 20 6d 61 74 63 68 4f 6e  n;.  u32 matchOn
4500: 65 20 3d 20 70 49 6e 66 6f 2d 3e 6d 61 74 63 68  e = pInfo->match
4510: 4f 6e 65 3b 0a 20 20 75 33 32 20 6d 61 74 63 68  One;.  u32 match
4520: 41 6c 6c 20 3d 20 70 49 6e 66 6f 2d 3e 6d 61 74  All = pInfo->mat
4530: 63 68 41 6c 6c 3b 0a 20 20 75 33 32 20 6d 61 74  chAll;.  u32 mat
4540: 63 68 4f 74 68 65 72 3b 0a 20 20 75 38 20 6e 6f  chOther;.  u8 no
4550: 43 61 73 65 20 3d 20 70 49 6e 66 6f 2d 3e 6e 6f  Case = pInfo->no
4560: 43 61 73 65 3b 0a 20 20 0a 20 20 2f 2a 20 54 68  Case;.  .  /* Th
4570: 65 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f 72 20  e GLOB operator 
4580: 64 6f 65 73 20 6e 6f 74 20 68 61 76 65 20 61 6e  does not have an
4590: 20 45 53 43 41 50 45 20 63 6c 61 75 73 65 2e 20   ESCAPE clause. 
45a0: 20 41 6e 64 20 4c 49 4b 45 20 64 6f 65 73 20 6e   And LIKE does n
45b0: 6f 74 0a 20 20 2a 2a 20 68 61 76 65 20 74 68 65  ot.  ** have the
45c0: 20 6d 61 74 63 68 53 65 74 20 6f 70 65 72 61 74   matchSet operat
45d0: 6f 72 2e 20 20 53 6f 20 77 65 20 65 69 74 68 65  or.  So we eithe
45e0: 72 20 68 61 76 65 20 74 6f 20 6c 6f 6f 6b 20 66  r have to look f
45f0: 6f 72 20 6f 6e 65 20 6f 72 0a 20 20 2a 2a 20 74  or one or.  ** t
4600: 68 65 20 6f 74 68 65 72 2c 20 6e 65 76 65 72 20  he other, never 
4610: 62 6f 74 68 2e 20 20 48 65 6e 63 65 20 74 68 65  both.  Hence the
4620: 20 73 69 6e 67 6c 65 20 76 61 72 69 61 62 6c 65   single variable
4630: 20 6d 61 74 63 68 4f 74 68 65 72 20 69 73 20 75   matchOther is u
4640: 73 65 64 0a 20 20 2a 2a 20 74 6f 20 73 74 6f 72  sed.  ** to stor
4650: 65 20 74 68 65 20 6f 6e 65 20 77 65 20 68 61 76  e the one we hav
4660: 65 20 74 6f 20 6c 6f 6f 6b 20 66 6f 72 2e 0a 20  e to look for.. 
4670: 20 2a 2f 0a 20 20 6d 61 74 63 68 4f 74 68 65 72   */.  matchOther
4680: 20 3d 20 65 73 63 20 3f 20 65 73 63 20 3a 20 70   = esc ? esc : p
4690: 49 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74 3b 0a  Info->matchSet;.
46a0: 0a 20 20 77 68 69 6c 65 28 20 28 63 20 3d 20 73  .  while( (c = s
46b0: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26  qlite3Utf8Read(&
46c0: 7a 50 61 74 74 65 72 6e 29 29 21 3d 30 20 29 7b  zPattern))!=0 ){
46d0: 0a 20 20 20 20 69 66 28 20 63 3d 3d 6d 61 74 63  .    if( c==matc
46e0: 68 41 6c 6c 20 29 7b 0a 20 20 20 20 20 20 77 68  hAll ){.      wh
46f0: 69 6c 65 28 20 28 63 3d 73 71 6c 69 74 65 33 55  ile( (c=sqlite3U
4700: 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72  tf8Read(&zPatter
4710: 6e 29 29 20 3d 3d 20 6d 61 74 63 68 41 6c 6c 0a  n)) == matchAll.
4720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7c                 |
4730: 7c 20 63 20 3d 3d 20 6d 61 74 63 68 4f 6e 65 20  | c == matchOne 
4740: 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63  ){.        if( c
4750: 3d 3d 6d 61 74 63 68 4f 6e 65 20 26 26 20 73 71  ==matchOne && sq
4760: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
4770: 53 74 72 69 6e 67 29 3d 3d 30 20 29 7b 0a 20 20  String)==0 ){.  
4780: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 30          return 0
4790: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
47a0: 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20 63 3d    }.      if( c=
47b0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65  =0 ){.        re
47c0: 74 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 7d 65  turn 1;.      }e
47d0: 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61 74 63 68  lse if( c==match
47e0: 4f 74 68 65 72 20 29 7b 0a 20 20 20 20 20 20 20  Other ){.       
47f0: 20 69 66 28 20 65 73 63 20 29 7b 0a 20 20 20 20   if( esc ){.    
4800: 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74 65        c = sqlite
4810: 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74  3Utf8Read(&zPatt
4820: 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20  ern);.          
4830: 69 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72  if( c==0 ) retur
4840: 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c  n 0;.        }el
4850: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 61 73  se{.          as
4860: 73 65 72 74 28 20 6d 61 74 63 68 4f 74 68 65 72  sert( matchOther
4870: 3c 30 78 38 30 20 29 3b 20 20 2f 2a 20 27 5b 27  <0x80 );  /* '['
4880: 20 69 73 20 61 20 73 69 6e 67 6c 65 2d 62 79 74   is a single-byt
4890: 65 20 63 68 61 72 61 63 74 65 72 20 2a 2f 0a 20  e character */. 
48a0: 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20           while( 
48b0: 2a 7a 53 74 72 69 6e 67 0a 20 20 20 20 20 20 20  *zString.       
48c0: 20 20 20 20 20 20 20 20 20 20 26 26 20 70 61 74            && pat
48d0: 74 65 72 6e 43 6f 6d 70 61 72 65 28 26 7a 50 61  ternCompare(&zPa
48e0: 74 74 65 72 6e 5b 2d 31 5d 2c 7a 53 74 72 69 6e  ttern[-1],zStrin
48f0: 67 2c 70 49 6e 66 6f 2c 65 73 63 29 3d 3d 30 20  g,pInfo,esc)==0 
4900: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 53  ){.            S
4910: 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28  QLITE_SKIP_UTF8(
4920: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
4930: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 20 20      }.          
4940: 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 21  return *zString!
4950: 3d 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20  =0;.        }.  
4960: 20 20 20 20 7d 0a 20 20 20 20 20 20 77 68 69 6c      }.      whil
4970: 65 28 20 28 63 32 20 3d 20 73 71 6c 69 74 65 33  e( (c2 = sqlite3
4980: 55 74 66 38 52 65 61 64 28 26 7a 53 74 72 69 6e  Utf8Read(&zStrin
4990: 67 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20  g))!=0 ){.      
49a0: 20 20 69 66 28 20 6e 6f 43 61 73 65 20 26 26 20    if( noCase && 
49b0: 63 3c 30 78 38 30 20 29 7b 0a 20 20 20 20 20 20  c<0x80 ){.      
49c0: 20 20 20 20 47 6c 6f 62 55 70 70 65 72 54 6f 4c      GlobUpperToL
49d0: 6f 77 65 72 28 63 32 29 3b 0a 20 20 20 20 20 20  ower(c2);.      
49e0: 20 20 20 20 47 6c 6f 62 55 70 70 65 72 54 6f 4c      GlobUpperToL
49f0: 6f 77 65 72 41 73 63 69 69 28 63 29 3b 0a 20 20  owerAscii(c);.  
4a00: 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 63          while( c
4a10: 32 20 21 3d 20 30 20 26 26 20 63 32 20 21 3d 20  2 != 0 && c2 != 
4a20: 63 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20  c ){.           
4a30: 20 64 6f 7b 20 63 32 20 3d 20 2a 28 7a 53 74 72   do{ c2 = *(zStr
4a40: 69 6e 67 2b 2b 29 3b 20 7d 77 68 69 6c 65 28 20  ing++); }while( 
4a50: 63 32 3e 30 78 37 66 20 29 3b 0a 20 20 20 20 20  c2>0x7f );.     
4a60: 20 20 20 20 20 20 20 47 6c 6f 62 55 70 70 65 72         GlobUpper
4a70: 54 6f 4c 6f 77 65 72 41 73 63 69 69 28 63 32 29  ToLowerAscii(c2)
4a80: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20  ;.          }.  
4a90: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20        }else{.   
4aa0: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 63 32         while( c2
4ab0: 20 21 3d 20 30 20 26 26 20 63 32 20 21 3d 20 63   != 0 && c2 != c
4ac0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20   ){.            
4ad0: 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  c2 = sqlite3Utf8
4ae0: 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29 3b 0a  Read(&zString);.
4af0: 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20            }.    
4b00: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66      }.        if
4b10: 28 20 63 32 3d 3d 30 20 29 20 72 65 74 75 72 6e  ( c2==0 ) return
4b20: 20 30 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20   0;.        if( 
4b30: 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 7a  patternCompare(z
4b40: 50 61 74 74 65 72 6e 2c 7a 53 74 72 69 6e 67 2c  Pattern,zString,
4b50: 70 49 6e 66 6f 2c 65 73 63 29 20 29 20 72 65 74  pInfo,esc) ) ret
4b60: 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20  urn 1;.      }. 
4b70: 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20       return 0;. 
4b80: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 63 3d 3d     }.    if( c==
4b90: 6d 61 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20 20  matchOne ){.    
4ba0: 20 20 69 66 28 20 73 71 6c 69 74 65 33 55 74 66    if( sqlite3Utf
4bb0: 38 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29 3d  8Read(&zString)=
4bc0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65  =0 ){.        re
4bd0: 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 65  turn 0;.      }e
4be0: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 63 6f 6e  lse{.        con
4bf0: 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 7d 0a 20  tinue;.      }. 
4c00: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 63 3d 3d     }.    if( c==
4c10: 6d 61 74 63 68 4f 74 68 65 72 20 29 7b 0a 20 20  matchOther ){.  
4c20: 20 20 20 20 69 66 28 20 65 73 63 20 29 7b 0a 20      if( esc ){. 
4c30: 20 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74         c = sqlit
4c40: 65 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74  e3Utf8Read(&zPat
4c50: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 69  tern);.        i
4c60: 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( c==0 ) return
4c70: 20 30 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b   0;.      }else{
4c80: 0a 20 20 20 20 20 20 20 20 75 33 32 20 70 72 69  .        u32 pri
4c90: 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20  or_c = 0;.      
4ca0: 20 20 73 65 65 6e 20 3d 20 30 3b 0a 20 20 20 20    seen = 0;.    
4cb0: 20 20 20 20 69 6e 76 65 72 74 20 3d 20 30 3b 0a      invert = 0;.
4cc0: 20 20 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69          c = sqli
4cd0: 74 65 33 55 74 66 38 52 65 61 64 28 26 7a 53 74  te3Utf8Read(&zSt
4ce0: 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 20 20 69  ring);.        i
4cf0: 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( c==0 ) return
4d00: 20 30 3b 0a 20 20 20 20 20 20 20 20 63 32 20 3d   0;.        c2 =
4d10: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
4d20: 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20  (&zPattern);.   
4d30: 20 20 20 20 20 69 66 28 20 63 32 3d 3d 27 5e 27       if( c2=='^'
4d40: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 69 6e   ){.          in
4d50: 76 65 72 74 20 3d 20 31 3b 0a 20 20 20 20 20 20  vert = 1;.      
4d60: 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33      c2 = sqlite3
4d70: 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65  Utf8Read(&zPatte
4d80: 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  rn);.        }. 
4d90: 20 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 27         if( c2=='
4da0: 5d 27 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20  ]' ){.          
4db0: 69 66 28 20 63 3d 3d 27 5d 27 20 29 20 73 65 65  if( c==']' ) see
4dc0: 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20  n = 1;.         
4dd0: 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66   c2 = sqlite3Utf
4de0: 38 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e 29  8Read(&zPattern)
4df0: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
4e00: 20 20 20 20 77 68 69 6c 65 28 20 63 32 20 26 26      while( c2 &&
4e10: 20 63 32 21 3d 27 5d 27 20 29 7b 0a 20 20 20 20   c2!=']' ){.    
4e20: 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 27 2d        if( c2=='-
4e30: 27 20 26 26 20 7a 50 61 74 74 65 72 6e 5b 30 5d  ' && zPattern[0]
4e40: 21 3d 27 5d 27 20 26 26 20 7a 50 61 74 74 65 72  !=']' && zPatter
4e50: 6e 5b 30 5d 21 3d 30 20 26 26 20 70 72 69 6f 72  n[0]!=0 && prior
4e60: 5f 63 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20  _c>0 ){.        
4e70: 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33      c2 = sqlite3
4e80: 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65  Utf8Read(&zPatte
4e90: 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20  rn);.           
4ea0: 20 69 66 28 20 63 3e 3d 70 72 69 6f 72 5f 63 20   if( c>=prior_c 
4eb0: 26 26 20 63 3c 3d 63 32 20 29 20 73 65 65 6e 20  && c<=c2 ) seen 
4ec0: 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20 20  = 1;.           
4ed0: 20 70 72 69 6f 72 5f 63 20 3d 20 30 3b 0a 20 20   prior_c = 0;.  
4ee0: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20          }else{. 
4ef0: 20 20 20 20 20 20 20 20 20 20 20 69 66 28 20 63             if( c
4f00: 3d 3d 63 32 20 29 7b 0a 20 20 20 20 20 20 20 20  ==c2 ){.        
4f10: 20 20 20 20 20 20 73 65 65 6e 20 3d 20 31 3b 0a        seen = 1;.
4f20: 20 20 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20              }.  
4f30: 20 20 20 20 20 20 20 20 20 20 70 72 69 6f 72 5f            prior_
4f40: 63 20 3d 20 63 32 3b 0a 20 20 20 20 20 20 20 20  c = c2;.        
4f50: 20 20 7d 0a 20 20 20 20 20 20 20 20 20 20 63 32    }.          c2
4f60: 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65   = sqlite3Utf8Re
4f70: 61 64 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20  ad(&zPattern);. 
4f80: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
4f90: 20 69 66 28 20 63 32 3d 3d 30 20 7c 7c 20 28 73   if( c2==0 || (s
4fa0: 65 65 6e 20 5e 20 69 6e 76 65 72 74 29 3d 3d 30  een ^ invert)==0
4fb0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65   ){.          re
4fc0: 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 20 20  turn 0;.        
4fd0: 7d 0a 20 20 20 20 20 20 20 20 63 6f 6e 74 69 6e  }.        contin
4fe0: 75 65 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  ue;.      }.    
4ff0: 7d 0a 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74  }.    c2 = sqlit
5000: 65 33 55 74 66 38 52 65 61 64 28 26 7a 53 74 72  e3Utf8Read(&zStr
5010: 69 6e 67 29 3b 0a 20 20 20 20 69 66 28 20 63 3d  ing);.    if( c=
5020: 3d 63 32 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a  =c2 ) continue;.
5030: 20 20 20 20 69 66 28 20 21 6e 6f 43 61 73 65 20      if( !noCase 
5040: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
5050: 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72  GlobUpperToLower
5060: 28 63 29 3b 0a 20 20 20 20 47 6c 6f 62 55 70 70  (c);.    GlobUpp
5070: 65 72 54 6f 4c 6f 77 65 72 28 63 32 29 3b 0a 20  erToLower(c2);. 
5080: 20 20 20 69 66 28 20 63 21 3d 63 32 20 29 20 72     if( c!=c2 ) r
5090: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 72  eturn 0;.  }.  r
50a0: 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 3d 3d  eturn *zString==
50b0: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20  0;.}../*.** The 
50c0: 73 71 6c 69 74 65 33 5f 73 74 72 67 6c 6f 62 28  sqlite3_strglob(
50d0: 29 20 69 6e 74 65 72 66 61 63 65 2e 0a 2a 2f 0a  ) interface..*/.
50e0: 69 6e 74 20 73 71 6c 69 74 65 33 5f 73 74 72 67  int sqlite3_strg
50f0: 6c 6f 62 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  lob(const char *
5100: 7a 47 6c 6f 62 50 61 74 74 65 72 6e 2c 20 63 6f  zGlobPattern, co
5110: 6e 73 74 20 63 68 61 72 20 2a 7a 53 74 72 69 6e  nst char *zStrin
5120: 67 29 7b 0a 20 20 72 65 74 75 72 6e 20 70 61 74  g){.  return pat
5130: 74 65 72 6e 43 6f 6d 70 61 72 65 28 28 75 38 2a  ternCompare((u8*
5140: 29 7a 47 6c 6f 62 50 61 74 74 65 72 6e 2c 20 28  )zGlobPattern, (
5150: 75 38 2a 29 7a 53 74 72 69 6e 67 2c 20 26 67 6c  u8*)zString, &gl
5160: 6f 62 49 6e 66 6f 2c 20 30 29 3d 3d 30 3b 0a 7d  obInfo, 0)==0;.}
5170: 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74 68  ../*.** Count th
5180: 65 20 6e 75 6d 62 65 72 20 6f 66 20 74 69 6d 65  e number of time
5190: 73 20 74 68 61 74 20 74 68 65 20 4c 49 4b 45 20  s that the LIKE 
51a0: 6f 70 65 72 61 74 6f 72 20 28 6f 72 20 47 4c 4f  operator (or GLO
51b0: 42 20 77 68 69 63 68 20 69 73 0a 2a 2a 20 6a 75  B which is.** ju
51c0: 73 74 20 61 20 76 61 72 69 61 74 69 6f 6e 20 6f  st a variation o
51d0: 66 20 4c 49 4b 45 29 20 67 65 74 73 20 63 61 6c  f LIKE) gets cal
51e0: 6c 65 64 2e 20 20 54 68 69 73 20 69 73 20 75 73  led.  This is us
51f0: 65 64 20 66 6f 72 20 74 65 73 74 69 6e 67 0a 2a  ed for testing.*
5200: 2a 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23 69 66 64 65  * only..*/.#ifde
5210: 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e  f SQLITE_TEST.in
5220: 74 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63  t sqlite3_like_c
5230: 6f 75 6e 74 20 3d 20 30 3b 0a 23 65 6e 64 69 66  ount = 0;.#endif
5240: 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  .../*.** Impleme
5250: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c  ntation of the l
5260: 69 6b 65 28 29 20 53 51 4c 20 66 75 6e 63 74 69  ike() SQL functi
5270: 6f 6e 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69  on.  This functi
5280: 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a 2a  on implements.**
5290: 20 74 68 65 20 62 75 69 6c 64 2d 69 6e 20 4c 49   the build-in LI
52a0: 4b 45 20 6f 70 65 72 61 74 6f 72 2e 20 20 54 68  KE operator.  Th
52b0: 65 20 66 69 72 73 74 20 61 72 67 75 6d 65 6e 74  e first argument
52c0: 20 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e   to the function
52d0: 20 69 73 20 74 68 65 0a 2a 2a 20 70 61 74 74 65   is the.** patte
52e0: 72 6e 20 61 6e 64 20 74 68 65 20 73 65 63 6f 6e  rn and the secon
52f0: 64 20 61 72 67 75 6d 65 6e 74 20 69 73 20 74 68  d argument is th
5300: 65 20 73 74 72 69 6e 67 2e 20 20 53 6f 2c 20 74  e string.  So, t
5310: 68 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74  he SQL statement
5320: 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 41  s:.**.**       A
5330: 20 4c 49 4b 45 20 42 0a 2a 2a 0a 2a 2a 20 69 73   LIKE B.**.** is
5340: 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 61 73 20   implemented as 
5350: 6c 69 6b 65 28 42 2c 41 29 2e 0a 2a 2a 0a 2a 2a  like(B,A)..**.**
5360: 20 54 68 69 73 20 73 61 6d 65 20 66 75 6e 63 74   This same funct
5370: 69 6f 6e 20 28 77 69 74 68 20 61 20 64 69 66 66  ion (with a diff
5380: 65 72 65 6e 74 20 63 6f 6d 70 61 72 65 49 6e 66  erent compareInf
5390: 6f 20 73 74 72 75 63 74 75 72 65 29 20 63 6f 6d  o structure) com
53a0: 70 75 74 65 73 0a 2a 2a 20 74 68 65 20 47 4c 4f  putes.** the GLO
53b0: 42 20 6f 70 65 72 61 74 6f 72 2e 0a 2a 2f 0a 73  B operator..*/.s
53c0: 74 61 74 69 63 20 76 6f 69 64 20 6c 69 6b 65 46  tatic void likeF
53d0: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
53e0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
53f0: 20 0a 20 20 69 6e 74 20 61 72 67 63 2c 20 0a 20   .  int argc, . 
5400: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
5410: 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74  *argv.){.  const
5420: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
5430: 7a 41 2c 20 2a 7a 42 3b 0a 20 20 75 33 32 20 65  zA, *zB;.  u32 e
5440: 73 63 61 70 65 20 3d 20 30 3b 0a 20 20 69 6e 74  scape = 0;.  int
5450: 20 6e 50 61 74 3b 0a 20 20 73 71 6c 69 74 65 33   nPat;.  sqlite3
5460: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
5470: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
5480: 28 63 6f 6e 74 65 78 74 29 3b 0a 0a 20 20 7a 42  (context);..  zB
5490: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
54a0: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
54b0: 20 20 7a 41 20 3d 20 73 71 6c 69 74 65 33 5f 76    zA = sqlite3_v
54c0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31  alue_text(argv[1
54d0: 5d 29 3b 0a 0a 20 20 2f 2a 20 4c 69 6d 69 74 20  ]);..  /* Limit 
54e0: 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 74 68  the length of th
54f0: 65 20 4c 49 4b 45 20 6f 72 20 47 4c 4f 42 20 70  e LIKE or GLOB p
5500: 61 74 74 65 72 6e 20 74 6f 20 61 76 6f 69 64 20  attern to avoid 
5510: 70 72 6f 62 6c 65 6d 73 0a 20 20 2a 2a 20 6f 66  problems.  ** of
5520: 20 64 65 65 70 20 72 65 63 75 72 73 69 6f 6e 20   deep recursion 
5530: 61 6e 64 20 4e 2a 4e 20 62 65 68 61 76 69 6f 72  and N*N behavior
5540: 20 69 6e 20 70 61 74 74 65 72 6e 43 6f 6d 70 61   in patternCompa
5550: 72 65 28 29 2e 0a 20 20 2a 2f 0a 20 20 6e 50 61  re()..  */.  nPa
5560: 74 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  t = sqlite3_valu
5570: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29  e_bytes(argv[0])
5580: 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 50  ;.  testcase( nP
5590: 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53  at==db->aLimit[S
55a0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b 45  QLITE_LIMIT_LIKE
55b0: 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48 5d  _PATTERN_LENGTH]
55c0: 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20   );.  testcase( 
55d0: 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74  nPat==db->aLimit
55e0: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49  [SQLITE_LIMIT_LI
55f0: 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54  KE_PATTERN_LENGT
5600: 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e 50  H]+1 );.  if( nP
5610: 61 74 20 3e 20 64 62 2d 3e 61 4c 69 6d 69 74 5b  at > db->aLimit[
5620: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b  SQLITE_LIMIT_LIK
5630: 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48  E_PATTERN_LENGTH
5640: 5d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  ] ){.    sqlite3
5650: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
5660: 6e 74 65 78 74 2c 20 22 4c 49 4b 45 20 6f 72 20  ntext, "LIKE or 
5670: 47 4c 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 6f  GLOB pattern too
5680: 20 63 6f 6d 70 6c 65 78 22 2c 20 2d 31 29 3b 0a   complex", -1);.
5690: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
56a0: 20 20 61 73 73 65 72 74 28 20 7a 42 3d 3d 73 71    assert( zB==sq
56b0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
56c0: 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a  (argv[0]) );  /*
56d0: 20 45 6e 63 6f 64 69 6e 67 20 64 69 64 20 6e 6f   Encoding did no
56e0: 74 20 63 68 61 6e 67 65 20 2a 2f 0a 0a 20 20 69  t change */..  i
56f0: 66 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20  f( argc==3 ){.  
5700: 20 20 2f 2a 20 54 68 65 20 65 73 63 61 70 65 20    /* The escape 
5710: 63 68 61 72 61 63 74 65 72 20 73 74 72 69 6e 67  character string
5720: 20 6d 75 73 74 20 63 6f 6e 73 69 73 74 20 6f 66   must consist of
5730: 20 61 20 73 69 6e 67 6c 65 20 55 54 46 2d 38 20   a single UTF-8 
5740: 63 68 61 72 61 63 74 65 72 2e 0a 20 20 20 20 2a  character..    *
5750: 2a 20 4f 74 68 65 72 77 69 73 65 2c 20 72 65 74  * Otherwise, ret
5760: 75 72 6e 20 61 6e 20 65 72 72 6f 72 2e 0a 20 20  urn an error..  
5770: 20 20 2a 2f 0a 20 20 20 20 63 6f 6e 73 74 20 75    */.    const u
5780: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 45  nsigned char *zE
5790: 73 63 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  sc = sqlite3_val
57a0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d 29  ue_text(argv[2])
57b0: 3b 0a 20 20 20 20 69 66 28 20 7a 45 73 63 3d 3d  ;.    if( zEsc==
57c0: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  0 ) return;.    
57d0: 69 66 28 20 73 71 6c 69 74 65 33 55 74 66 38 43  if( sqlite3Utf8C
57e0: 68 61 72 4c 65 6e 28 28 63 68 61 72 2a 29 7a 45  harLen((char*)zE
57f0: 73 63 2c 20 2d 31 29 21 3d 31 20 29 7b 0a 20 20  sc, -1)!=1 ){.  
5800: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
5810: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
5820: 2c 20 0a 20 20 20 20 20 20 20 20 20 20 22 45 53  , .          "ES
5830: 43 41 50 45 20 65 78 70 72 65 73 73 69 6f 6e 20  CAPE expression 
5840: 6d 75 73 74 20 62 65 20 61 20 73 69 6e 67 6c 65  must be a single
5850: 20 63 68 61 72 61 63 74 65 72 22 2c 20 2d 31 29   character", -1)
5860: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a  ;.      return;.
5870: 20 20 20 20 7d 0a 20 20 20 20 65 73 63 61 70 65      }.    escape
5880: 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65   = sqlite3Utf8Re
5890: 61 64 28 26 7a 45 73 63 29 3b 0a 20 20 7d 0a 20  ad(&zEsc);.  }. 
58a0: 20 69 66 28 20 7a 41 20 26 26 20 7a 42 20 29 7b   if( zA && zB ){
58b0: 0a 20 20 20 20 73 74 72 75 63 74 20 63 6f 6d 70  .    struct comp
58c0: 61 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 20 3d  areInfo *pInfo =
58d0: 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61   sqlite3_user_da
58e0: 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a 23 69 66  ta(context);.#if
58f0: 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a  def SQLITE_TEST.
5900: 20 20 20 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65      sqlite3_like
5910: 5f 63 6f 75 6e 74 2b 2b 3b 0a 23 65 6e 64 69 66  _count++;.#endif
5920: 0a 20 20 20 20 0a 20 20 20 20 73 71 6c 69 74 65  .    .    sqlite
5930: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e  3_result_int(con
5940: 74 65 78 74 2c 20 70 61 74 74 65 72 6e 43 6f 6d  text, patternCom
5950: 70 61 72 65 28 7a 42 2c 20 7a 41 2c 20 70 49 6e  pare(zB, zA, pIn
5960: 66 6f 2c 20 65 73 63 61 70 65 29 29 3b 0a 20 20  fo, escape));.  
5970: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  }.}../*.** Imple
5980: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
5990: 20 4e 55 4c 4c 49 46 28 78 2c 79 29 20 66 75 6e   NULLIF(x,y) fun
59a0: 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73 75  ction.  The resu
59b0: 6c 74 20 69 73 20 74 68 65 20 66 69 72 73 74 0a  lt is the first.
59c0: 2a 2a 20 61 72 67 75 6d 65 6e 74 20 69 66 20 74  ** argument if t
59d0: 68 65 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65  he arguments are
59e0: 20 64 69 66 66 65 72 65 6e 74 2e 20 20 54 68 65   different.  The
59f0: 20 72 65 73 75 6c 74 20 69 73 20 4e 55 4c 4c 20   result is NULL 
5a00: 69 66 20 74 68 65 0a 2a 2a 20 61 72 67 75 6d 65  if the.** argume
5a10: 6e 74 73 20 61 72 65 20 65 71 75 61 6c 20 74 6f  nts are equal to
5a20: 20 65 61 63 68 20 6f 74 68 65 72 2e 0a 2a 2f 0a   each other..*/.
5a30: 73 74 61 74 69 63 20 76 6f 69 64 20 6e 75 6c 6c  static void null
5a40: 69 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  ifFunc(.  sqlite
5a50: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
5a60: 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  xt,.  int NotUse
5a70: 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  d,.  sqlite3_val
5a80: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 43  ue **argv.){.  C
5a90: 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20  ollSeq *pColl = 
5aa0: 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f  sqlite3GetFuncCo
5ab0: 6c 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a  llSeq(context);.
5ac0: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
5ad0: 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a 20 20 69  ER(NotUsed);.  i
5ae0: 66 28 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d  f( sqlite3MemCom
5af0: 70 61 72 65 28 61 72 67 76 5b 30 5d 2c 20 61 72  pare(argv[0], ar
5b00: 67 76 5b 31 5d 2c 20 70 43 6f 6c 6c 29 21 3d 30  gv[1], pColl)!=0
5b10: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   ){.    sqlite3_
5b20: 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e  result_value(con
5b30: 74 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a  text, argv[0]);.
5b40: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70    }.}../*.** Imp
5b50: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
5b60: 68 65 20 73 71 6c 69 74 65 5f 76 65 72 73 69 6f  he sqlite_versio
5b70: 6e 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54  n() function.  T
5b80: 68 65 20 72 65 73 75 6c 74 20 69 73 20 74 68 65  he result is the
5b90: 20 76 65 72 73 69 6f 6e 0a 2a 2a 20 6f 66 20 74   version.** of t
5ba0: 68 65 20 53 51 4c 69 74 65 20 6c 69 62 72 61 72  he SQLite librar
5bb0: 79 20 74 68 61 74 20 69 73 20 72 75 6e 6e 69 6e  y that is runnin
5bc0: 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  g..*/.static voi
5bd0: 64 20 76 65 72 73 69 6f 6e 46 75 6e 63 28 0a 20  d versionFunc(. 
5be0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
5bf0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
5c00: 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69   NotUsed,.  sqli
5c10: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55  te3_value **NotU
5c20: 73 65 64 32 0a 29 7b 0a 20 20 55 4e 55 53 45 44  sed2.){.  UNUSED
5c30: 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55  _PARAMETER2(NotU
5c40: 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a  sed, NotUsed2);.
5c50: 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 34 38 36 39    /* IMP: R-4869
5c60: 39 2d 34 38 36 31 37 20 54 68 69 73 20 66 75 6e  9-48617 This fun
5c70: 63 74 69 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20  ction is an SQL 
5c80: 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74  wrapper around t
5c90: 68 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f  he.  ** sqlite3_
5ca0: 6c 69 62 76 65 72 73 69 6f 6e 28 29 20 43 2d 69  libversion() C-i
5cb0: 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20 20 73  nterface. */.  s
5cc0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
5cd0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  xt(context, sqli
5ce0: 74 65 33 5f 6c 69 62 76 65 72 73 69 6f 6e 28 29  te3_libversion()
5cf0: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41  , -1, SQLITE_STA
5d00: 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  TIC);.}../*.** I
5d10: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
5d20: 20 74 68 65 20 73 71 6c 69 74 65 5f 73 6f 75 72   the sqlite_sour
5d30: 63 65 5f 69 64 28 29 20 66 75 6e 63 74 69 6f 6e  ce_id() function
5d40: 2e 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20  . The result is 
5d50: 61 20 73 74 72 69 6e 67 0a 2a 2a 20 74 68 61 74  a string.** that
5d60: 20 69 64 65 6e 74 69 66 69 65 73 20 74 68 65 20   identifies the 
5d70: 70 61 72 74 69 63 75 6c 61 72 20 76 65 72 73 69  particular versi
5d80: 6f 6e 20 6f 66 20 74 68 65 20 73 6f 75 72 63 65  on of the source
5d90: 20 63 6f 64 65 20 75 73 65 64 20 74 6f 20 62 75   code used to bu
5da0: 69 6c 64 0a 2a 2a 20 53 51 4c 69 74 65 2e 0a 2a  ild.** SQLite..*
5db0: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 6f  /.static void so
5dc0: 75 72 63 65 69 64 46 75 6e 63 28 0a 20 20 73 71  urceidFunc(.  sq
5dd0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
5de0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f  ontext,.  int No
5df0: 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33  tUsed,.  sqlite3
5e00: 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64  _value **NotUsed
5e10: 32 0a 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41  2.){.  UNUSED_PA
5e20: 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64  RAMETER2(NotUsed
5e30: 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f  , NotUsed2);.  /
5e40: 2a 20 49 4d 50 3a 20 52 2d 32 34 34 37 30 2d 33  * IMP: R-24470-3
5e50: 31 31 33 36 20 54 68 69 73 20 66 75 6e 63 74 69  1136 This functi
5e60: 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20 77 72 61  on is an SQL wra
5e70: 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a  pper around the.
5e80: 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 73 6f 75    ** sqlite3_sou
5e90: 72 63 65 69 64 28 29 20 43 20 69 6e 74 65 72 66  rceid() C interf
5ea0: 61 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65  ace. */.  sqlite
5eb0: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
5ec0: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 73  ntext, sqlite3_s
5ed0: 6f 75 72 63 65 69 64 28 29 2c 20 2d 31 2c 20 53  ourceid(), -1, S
5ee0: 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d  QLITE_STATIC);.}
5ef0: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
5f00: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 71  tation of the sq
5f10: 6c 69 74 65 5f 6c 6f 67 28 29 20 66 75 6e 63 74  lite_log() funct
5f20: 69 6f 6e 2e 20 20 54 68 69 73 20 69 73 20 61 20  ion.  This is a 
5f30: 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 0a 2a  wrapper around.*
5f40: 2a 20 73 71 6c 69 74 65 33 5f 6c 6f 67 28 29 2e  * sqlite3_log().
5f50: 20 20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c    The return val
5f60: 75 65 20 69 73 20 4e 55 4c 4c 2e 20 20 54 68 65  ue is NULL.  The
5f70: 20 66 75 6e 63 74 69 6f 6e 20 65 78 69 73 74 73   function exists
5f80: 20 70 75 72 65 6c 79 20 66 6f 72 0a 2a 2a 20 69   purely for.** i
5f90: 74 73 20 73 69 64 65 2d 65 66 66 65 63 74 73 2e  ts side-effects.
5fa0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
5fb0: 65 72 72 6c 6f 67 46 75 6e 63 28 0a 20 20 73 71  errlogFunc(.  sq
5fc0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
5fd0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
5fe0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
5ff0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
6000: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
6010: 28 61 72 67 63 29 3b 0a 20 20 55 4e 55 53 45 44  (argc);.  UNUSED
6020: 5f 50 41 52 41 4d 45 54 45 52 28 63 6f 6e 74 65  _PARAMETER(conte
6030: 78 74 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 6c  xt);.  sqlite3_l
6040: 6f 67 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  og(sqlite3_value
6050: 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 2c 20 22  _int(argv[0]), "
6060: 25 73 22 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  %s", sqlite3_val
6070: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29  ue_text(argv[1])
6080: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  );.}../*.** Impl
6090: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
60a0: 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65  e sqlite_compile
60b0: 6f 70 74 69 6f 6e 5f 75 73 65 64 28 29 20 66 75  option_used() fu
60c0: 6e 63 74 69 6f 6e 2e 0a 2a 2a 20 54 68 65 20 72  nction..** The r
60d0: 65 73 75 6c 74 20 69 73 20 61 6e 20 69 6e 74 65  esult is an inte
60e0: 67 65 72 20 74 68 61 74 20 69 64 65 6e 74 69 66  ger that identif
60f0: 69 65 73 20 69 66 20 74 68 65 20 63 6f 6d 70 69  ies if the compi
6100: 6c 65 72 20 6f 70 74 69 6f 6e 0a 2a 2a 20 77 61  ler option.** wa
6110: 73 20 75 73 65 64 20 74 6f 20 62 75 69 6c 64 20  s used to build 
6120: 53 51 4c 69 74 65 2e 0a 2a 2f 0a 23 69 66 6e 64  SQLite..*/.#ifnd
6130: 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43  ef SQLITE_OMIT_C
6140: 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41  OMPILEOPTION_DIA
6150: 47 53 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63  GS.static void c
6160: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73 65 64  ompileoptionused
6170: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
6180: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
6190: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
61a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
61b0: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
61c0: 63 68 61 72 20 2a 7a 4f 70 74 4e 61 6d 65 3b 0a  char *zOptName;.
61d0: 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d    assert( argc==
61e0: 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  1 );.  UNUSED_PA
61f0: 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20  RAMETER(argc);. 
6200: 20 2f 2a 20 49 4d 50 3a 20 52 2d 33 39 35 36 34   /* IMP: R-39564
6210: 2d 33 36 33 30 35 20 54 68 65 20 73 71 6c 69 74  -36305 The sqlit
6220: 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f  e_compileoption_
6230: 75 73 65 64 28 29 20 53 51 4c 0a 20 20 2a 2a 20  used() SQL.  ** 
6240: 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20 77 72  function is a wr
6250: 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65  apper around the
6260: 20 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65   sqlite3_compile
6270: 6f 70 74 69 6f 6e 5f 75 73 65 64 28 29 20 43 2f  option_used() C/
6280: 43 2b 2b 0a 20 20 2a 2a 20 66 75 6e 63 74 69 6f  C++.  ** functio
6290: 6e 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 28 7a  n..  */.  if( (z
62a0: 4f 70 74 4e 61 6d 65 20 3d 20 28 63 6f 6e 73 74  OptName = (const
62b0: 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76   char*)sqlite3_v
62c0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
62d0: 5d 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 73 71  ]))!=0 ){.    sq
62e0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
62f0: 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65  (context, sqlite
6300: 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f  3_compileoption_
6310: 75 73 65 64 28 7a 4f 70 74 4e 61 6d 65 29 29 3b  used(zOptName));
6320: 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a  .  }.}.#endif /*
6330: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d   SQLITE_OMIT_COM
6340: 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53  PILEOPTION_DIAGS
6350: 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65   */../*.** Imple
6360: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
6370: 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f   sqlite_compileo
6380: 70 74 69 6f 6e 5f 67 65 74 28 29 20 66 75 6e 63  ption_get() func
6390: 74 69 6f 6e 2e 20 0a 2a 2a 20 54 68 65 20 72 65  tion. .** The re
63a0: 73 75 6c 74 20 69 73 20 61 20 73 74 72 69 6e 67  sult is a string
63b0: 20 74 68 61 74 20 69 64 65 6e 74 69 66 69 65 73   that identifies
63c0: 20 74 68 65 20 63 6f 6d 70 69 6c 65 72 20 6f 70   the compiler op
63d0: 74 69 6f 6e 73 20 0a 2a 2a 20 75 73 65 64 20 74  tions .** used t
63e0: 6f 20 62 75 69 6c 64 20 53 51 4c 69 74 65 2e 0a  o build SQLite..
63f0: 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54  */.#ifndef SQLIT
6400: 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50  E_OMIT_COMPILEOP
6410: 54 49 4f 4e 5f 44 49 41 47 53 0a 73 74 61 74 69  TION_DIAGS.stati
6420: 63 20 76 6f 69 64 20 63 6f 6d 70 69 6c 65 6f 70  c void compileop
6430: 74 69 6f 6e 67 65 74 46 75 6e 63 28 0a 20 20 73  tiongetFunc(.  s
6440: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
6450: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
6460: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
6470: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
6480: 20 69 6e 74 20 6e 3b 0a 20 20 61 73 73 65 72 74   int n;.  assert
6490: 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55  ( argc==1 );.  U
64a0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
64b0: 61 72 67 63 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a  argc);.  /* IMP:
64c0: 20 52 2d 30 34 39 32 32 2d 32 34 30 37 36 20 54   R-04922-24076 T
64d0: 68 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c  he sqlite_compil
64e0: 65 6f 70 74 69 6f 6e 5f 67 65 74 28 29 20 53 51  eoption_get() SQ
64f0: 4c 20 66 75 6e 63 74 69 6f 6e 0a 20 20 2a 2a 20  L function.  ** 
6500: 69 73 20 61 20 77 72 61 70 70 65 72 20 61 72 6f  is a wrapper aro
6510: 75 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f  und the sqlite3_
6520: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65  compileoption_ge
6530: 74 28 29 20 43 2f 43 2b 2b 20 66 75 6e 63 74 69  t() C/C++ functi
6540: 6f 6e 2e 0a 20 20 2a 2f 0a 20 20 6e 20 3d 20 73  on..  */.  n = s
6550: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
6560: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 73 71 6c  (argv[0]);.  sql
6570: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
6580: 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65  (context, sqlite
6590: 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f  3_compileoption_
65a0: 67 65 74 28 6e 29 2c 20 2d 31 2c 20 53 51 4c 49  get(n), -1, SQLI
65b0: 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 23 65  TE_STATIC);.}.#e
65c0: 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f  ndif /* SQLITE_O
65d0: 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f  MIT_COMPILEOPTIO
65e0: 4e 5f 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a 20 41  N_DIAGS */../* A
65f0: 72 72 61 79 20 66 6f 72 20 63 6f 6e 76 65 72 74  rray for convert
6600: 69 6e 67 20 66 72 6f 6d 20 68 61 6c 66 2d 62 79  ing from half-by
6610: 74 65 73 20 28 6e 79 62 62 6c 65 73 29 20 69 6e  tes (nybbles) in
6620: 74 6f 20 41 53 43 49 49 20 68 65 78 0a 2a 2a 20  to ASCII hex.** 
6630: 64 69 67 69 74 73 2e 20 2a 2f 0a 73 74 61 74 69  digits. */.stati
6640: 63 20 63 6f 6e 73 74 20 63 68 61 72 20 68 65 78  c const char hex
6650: 64 69 67 69 74 73 5b 5d 20 3d 20 7b 0a 20 20 27  digits[] = {.  '
6660: 30 27 2c 20 27 31 27 2c 20 27 32 27 2c 20 27 33  0', '1', '2', '3
6670: 27 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36 27  ', '4', '5', '6'
6680: 2c 20 27 37 27 2c 0a 20 20 27 38 27 2c 20 27 39  , '7',.  '8', '9
6690: 27 2c 20 27 41 27 2c 20 27 42 27 2c 20 27 43 27  ', 'A', 'B', 'C'
66a0: 2c 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27 20  , 'D', 'E', 'F' 
66b0: 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  .};../*.** Imple
66c0: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
66d0: 20 51 55 4f 54 45 28 29 20 66 75 6e 63 74 69 6f   QUOTE() functio
66e0: 6e 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f  n.  This functio
66f0: 6e 20 74 61 6b 65 73 20 61 20 73 69 6e 67 6c 65  n takes a single
6700: 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 20 20 49  .** argument.  I
6710: 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69  f the argument i
6720: 73 20 6e 75 6d 65 72 69 63 2c 20 74 68 65 20 72  s numeric, the r
6730: 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74  eturn value is t
6740: 68 65 20 73 61 6d 65 20 61 73 0a 2a 2a 20 74 68  he same as.** th
6750: 65 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20  e argument.  If 
6760: 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20  the argument is 
6770: 4e 55 4c 4c 2c 20 74 68 65 20 72 65 74 75 72 6e  NULL, the return
6780: 20 76 61 6c 75 65 20 69 73 20 74 68 65 20 73 74   value is the st
6790: 72 69 6e 67 0a 2a 2a 20 22 4e 55 4c 4c 22 2e 20  ring.** "NULL". 
67a0: 20 4f 74 68 65 72 77 69 73 65 2c 20 74 68 65 20   Otherwise, the 
67b0: 61 72 67 75 6d 65 6e 74 20 69 73 20 65 6e 63 6c  argument is encl
67c0: 6f 73 65 64 20 69 6e 20 73 69 6e 67 6c 65 20 71  osed in single q
67d0: 75 6f 74 65 73 20 77 69 74 68 0a 2a 2a 20 73 69  uotes with.** si
67e0: 6e 67 6c 65 2d 71 75 6f 74 65 20 65 73 63 61 70  ngle-quote escap
67f0: 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  es..*/.static vo
6800: 69 64 20 71 75 6f 74 65 46 75 6e 63 28 73 71 6c  id quoteFunc(sql
6810: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
6820: 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c  ntext, int argc,
6830: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
6840: 2a 61 72 67 76 29 7b 0a 20 20 61 73 73 65 72 74  *argv){.  assert
6850: 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55  ( argc==1 );.  U
6860: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
6870: 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68 28  argc);.  switch(
6880: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
6890: 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a  ype(argv[0]) ){.
68a0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
68b0: 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 64  FLOAT: {.      d
68c0: 6f 75 62 6c 65 20 72 31 2c 20 72 32 3b 0a 20 20  ouble r1, r2;.  
68d0: 20 20 20 20 63 68 61 72 20 7a 42 75 66 5b 35 30      char zBuf[50
68e0: 5d 3b 0a 20 20 20 20 20 20 72 31 20 3d 20 73 71  ];.      r1 = sq
68f0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62  lite3_value_doub
6900: 6c 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20  le(argv[0]);.   
6910: 20 20 20 73 71 6c 69 74 65 33 5f 73 6e 70 72 69     sqlite3_snpri
6920: 6e 74 66 28 73 69 7a 65 6f 66 28 7a 42 75 66 29  ntf(sizeof(zBuf)
6930: 2c 20 7a 42 75 66 2c 20 22 25 21 2e 31 35 67 22  , zBuf, "%!.15g"
6940: 2c 20 72 31 29 3b 0a 20 20 20 20 20 20 73 71 6c  , r1);.      sql
6950: 69 74 65 33 41 74 6f 46 28 7a 42 75 66 2c 20 26  ite3AtoF(zBuf, &
6960: 72 32 2c 20 32 30 2c 20 53 51 4c 49 54 45 5f 55  r2, 20, SQLITE_U
6970: 54 46 38 29 3b 0a 20 20 20 20 20 20 69 66 28 20  TF8);.      if( 
6980: 72 31 21 3d 72 32 20 29 7b 0a 20 20 20 20 20 20  r1!=r2 ){.      
6990: 20 20 73 71 6c 69 74 65 33 5f 73 6e 70 72 69 6e    sqlite3_snprin
69a0: 74 66 28 73 69 7a 65 6f 66 28 7a 42 75 66 29 2c  tf(sizeof(zBuf),
69b0: 20 7a 42 75 66 2c 20 22 25 21 2e 32 30 65 22 2c   zBuf, "%!.20e",
69c0: 20 72 31 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20   r1);.      }.  
69d0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
69e0: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
69f0: 20 7a 42 75 66 2c 20 2d 31 2c 20 53 51 4c 49 54   zBuf, -1, SQLIT
6a00: 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20  E_TRANSIENT);.  
6a10: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
6a20: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
6a30: 5f 49 4e 54 45 47 45 52 3a 20 7b 0a 20 20 20 20  _INTEGER: {.    
6a40: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
6a50: 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20  _value(context, 
6a60: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20  argv[0]);.      
6a70: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
6a80: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f   case SQLITE_BLO
6a90: 42 3a 20 7b 0a 20 20 20 20 20 20 63 68 61 72 20  B: {.      char 
6aa0: 2a 7a 54 65 78 74 20 3d 20 30 3b 0a 20 20 20 20  *zText = 0;.    
6ab0: 20 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 7a 42    char const *zB
6ac0: 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  lob = sqlite3_va
6ad0: 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d  lue_blob(argv[0]
6ae0: 29 3b 0a 20 20 20 20 20 20 69 6e 74 20 6e 42 6c  );.      int nBl
6af0: 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ob = sqlite3_val
6b00: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
6b10: 29 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74 28  );.      assert(
6b20: 20 7a 42 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f   zBlob==sqlite3_
6b30: 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b  value_blob(argv[
6b40: 30 5d 29 20 29 3b 20 2f 2a 20 4e 6f 20 65 6e 63  0]) ); /* No enc
6b50: 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a  oding change */.
6b60: 20 20 20 20 20 20 7a 54 65 78 74 20 3d 20 28 63        zText = (c
6b70: 68 61 72 20 2a 29 63 6f 6e 74 65 78 74 4d 61 6c  har *)contextMal
6b80: 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 32 2a  loc(context, (2*
6b90: 28 69 36 34 29 6e 42 6c 6f 62 29 2b 34 29 3b 20  (i64)nBlob)+4); 
6ba0: 0a 20 20 20 20 20 20 69 66 28 20 7a 54 65 78 74  .      if( zText
6bb0: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20   ){.        int 
6bc0: 69 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69  i;.        for(i
6bd0: 3d 30 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b 2b  =0; i<nBlob; i++
6be0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 54 65  ){.          zTe
6bf0: 78 74 5b 28 69 2a 32 29 2b 32 5d 20 3d 20 68 65  xt[(i*2)+2] = he
6c00: 78 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69  xdigits[(zBlob[i
6c10: 5d 3e 3e 34 29 26 30 78 30 46 5d 3b 0a 20 20 20  ]>>4)&0x0F];.   
6c20: 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 69 2a         zText[(i*
6c30: 32 29 2b 33 5d 20 3d 20 68 65 78 64 69 67 69 74  2)+3] = hexdigit
6c40: 73 5b 28 7a 42 6c 6f 62 5b 69 5d 29 26 30 78 30  s[(zBlob[i])&0x0
6c50: 46 5d 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20  F];.        }.  
6c60: 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c        zText[(nBl
6c70: 6f 62 2a 32 29 2b 32 5d 20 3d 20 27 5c 27 27 3b  ob*2)+2] = '\'';
6c80: 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28  .        zText[(
6c90: 6e 42 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20 27 5c  nBlob*2)+3] = '\
6ca0: 30 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78  0';.        zTex
6cb0: 74 5b 30 5d 20 3d 20 27 58 27 3b 0a 20 20 20 20  t[0] = 'X';.    
6cc0: 20 20 20 20 7a 54 65 78 74 5b 31 5d 20 3d 20 27      zText[1] = '
6cd0: 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 73 71 6c  \'';.        sql
6ce0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
6cf0: 28 63 6f 6e 74 65 78 74 2c 20 7a 54 65 78 74 2c  (context, zText,
6d00: 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e   -1, SQLITE_TRAN
6d10: 53 49 45 4e 54 29 3b 0a 20 20 20 20 20 20 20 20  SIENT);.        
6d20: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 54 65  sqlite3_free(zTe
6d30: 78 74 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  xt);.      }.   
6d40: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
6d50: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
6d60: 54 45 58 54 3a 20 7b 0a 20 20 20 20 20 20 69 6e  TEXT: {.      in
6d70: 74 20 69 2c 6a 3b 0a 20 20 20 20 20 20 75 36 34  t i,j;.      u64
6d80: 20 6e 3b 0a 20 20 20 20 20 20 63 6f 6e 73 74 20   n;.      const 
6d90: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
6da0: 41 72 67 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  Arg = sqlite3_va
6db0: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
6dc0: 29 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a  );.      char *z
6dd0: 3b 0a 0a 20 20 20 20 20 20 69 66 28 20 7a 41 72  ;..      if( zAr
6de0: 67 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20  g==0 ) return;. 
6df0: 20 20 20 20 20 66 6f 72 28 69 3d 30 2c 20 6e 3d       for(i=0, n=
6e00: 30 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29  0; zArg[i]; i++)
6e10: 7b 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27  { if( zArg[i]=='
6e20: 5c 27 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20 20 20  \'' ) n++; }.   
6e30: 20 20 20 7a 20 3d 20 63 6f 6e 74 65 78 74 4d 61     z = contextMa
6e40: 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28  lloc(context, ((
6e50: 69 36 34 29 69 29 2b 28 28 69 36 34 29 6e 29 2b  i64)i)+((i64)n)+
6e60: 33 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 20  3);.      if( z 
6e70: 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 30 5d 20  ){.        z[0] 
6e80: 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20  = '\'';.        
6e90: 66 6f 72 28 69 3d 30 2c 20 6a 3d 31 3b 20 7a 41  for(i=0, j=1; zA
6ea0: 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20  rg[i]; i++){.   
6eb0: 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20         z[j++] = 
6ec0: 7a 41 72 67 5b 69 5d 3b 0a 20 20 20 20 20 20 20  zArg[i];.       
6ed0: 20 20 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d     if( zArg[i]==
6ee0: 27 5c 27 27 20 29 7b 0a 20 20 20 20 20 20 20 20  '\'' ){.        
6ef0: 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27      z[j++] = '\'
6f00: 27 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20  ';.          }. 
6f10: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
6f20: 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a   z[j++] = '\'';.
6f30: 20 20 20 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 30          z[j] = 0
6f40: 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65  ;.        sqlite
6f50: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
6f60: 6e 74 65 78 74 2c 20 7a 2c 20 6a 2c 20 73 71 6c  ntext, z, j, sql
6f70: 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20  ite3_free);.    
6f80: 20 20 7d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b    }.      break;
6f90: 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75  .    }.    defau
6fa0: 6c 74 3a 20 7b 0a 20 20 20 20 20 20 61 73 73 65  lt: {.      asse
6fb0: 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  rt( sqlite3_valu
6fc0: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d  e_type(argv[0])=
6fd0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b 0a  =SQLITE_NULL );.
6fe0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
6ff0: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
7000: 74 2c 20 22 4e 55 4c 4c 22 2c 20 34 2c 20 53 51  t, "NULL", 4, SQ
7010: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20  LITE_STATIC);.  
7020: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
7030: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  .  }.}../*.** Th
7040: 65 20 75 6e 69 63 6f 64 65 28 29 20 66 75 6e 63  e unicode() func
7050: 74 69 6f 6e 2e 20 20 52 65 74 75 72 6e 20 74 68  tion.  Return th
7060: 65 20 69 6e 74 65 67 65 72 20 75 6e 69 63 6f 64  e integer unicod
7070: 65 20 63 6f 64 65 2d 70 6f 69 6e 74 20 76 61 6c  e code-point val
7080: 75 65 0a 2a 2a 20 66 6f 72 20 74 68 65 20 66 69  ue.** for the fi
7090: 72 73 74 20 63 68 61 72 61 63 74 65 72 20 6f 66  rst character of
70a0: 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e   the input strin
70b0: 67 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  g. .*/.static vo
70c0: 69 64 20 75 6e 69 63 6f 64 65 46 75 6e 63 28 0a  id unicodeFunc(.
70d0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
70e0: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
70f0: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
7100: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
7110: 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  {.  const unsign
7120: 65 64 20 63 68 61 72 20 2a 7a 20 3d 20 73 71 6c  ed char *z = sql
7130: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
7140: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 28 76 6f 69  argv[0]);.  (voi
7150: 64 29 61 72 67 63 3b 0a 20 20 69 66 28 20 7a 20  d)argc;.  if( z 
7160: 26 26 20 7a 5b 30 5d 20 29 20 73 71 6c 69 74 65  && z[0] ) sqlite
7170: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e  3_result_int(con
7180: 74 65 78 74 2c 20 73 71 6c 69 74 65 33 55 74 66  text, sqlite3Utf
7190: 38 52 65 61 64 28 26 7a 29 29 3b 0a 7d 0a 0a 2f  8Read(&z));.}../
71a0: 2a 0a 2a 2a 20 54 68 65 20 63 68 61 72 28 29 20  *.** The char() 
71b0: 66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20 7a  function takes z
71c0: 65 72 6f 20 6f 72 20 6d 6f 72 65 20 61 72 67 75  ero or more argu
71d0: 6d 65 6e 74 73 2c 20 65 61 63 68 20 6f 66 20 77  ments, each of w
71e0: 68 69 63 68 20 69 73 0a 2a 2a 20 61 6e 20 69 6e  hich is.** an in
71f0: 74 65 67 65 72 2e 20 20 49 74 20 63 6f 6e 73 74  teger.  It const
7200: 72 75 63 74 73 20 61 20 73 74 72 69 6e 67 20 77  ructs a string w
7210: 68 65 72 65 20 65 61 63 68 20 63 68 61 72 61 63  here each charac
7220: 74 65 72 20 6f 66 20 74 68 65 20 73 74 72 69 6e  ter of the strin
7230: 67 0a 2a 2a 20 69 73 20 74 68 65 20 75 6e 69 63  g.** is the unic
7240: 6f 64 65 20 63 68 61 72 61 63 74 65 72 20 66 6f  ode character fo
7250: 72 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64  r the correspond
7260: 69 6e 67 20 69 6e 74 65 67 65 72 20 61 72 67 75  ing integer argu
7270: 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  ment..*/.static 
7280: 76 6f 69 64 20 63 68 61 72 46 75 6e 63 28 0a 20  void charFunc(. 
7290: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
72a0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
72b0: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
72c0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
72d0: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
72e0: 20 2a 7a 2c 20 2a 7a 4f 75 74 3b 0a 20 20 69 6e   *z, *zOut;.  in
72f0: 74 20 69 3b 0a 20 20 7a 4f 75 74 20 3d 20 7a 20  t i;.  zOut = z 
7300: 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63  = sqlite3_malloc
7310: 28 20 61 72 67 63 2a 34 2b 31 20 29 3b 0a 20 20  ( argc*4+1 );.  
7320: 69 66 28 20 7a 3d 3d 30 20 29 7b 0a 20 20 20 20  if( z==0 ){.    
7330: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
7340: 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65  rror_nomem(conte
7350: 78 74 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b  xt);.    return;
7360: 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30 3b 20  .  }.  for(i=0; 
7370: 69 3c 61 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20  i<argc; i++){.  
7380: 20 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20    sqlite3_int64 
7390: 78 3b 0a 20 20 20 20 75 6e 73 69 67 6e 65 64 20  x;.    unsigned 
73a0: 63 3b 0a 20 20 20 20 78 20 3d 20 73 71 6c 69 74  c;.    x = sqlit
73b0: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61  e3_value_int64(a
73c0: 72 67 76 5b 69 5d 29 3b 0a 20 20 20 20 69 66 28  rgv[i]);.    if(
73d0: 20 78 3c 30 20 7c 7c 20 78 3e 30 78 31 30 66 66   x<0 || x>0x10ff
73e0: 66 66 20 29 20 78 20 3d 20 30 78 66 66 66 64 3b  ff ) x = 0xfffd;
73f0: 0a 20 20 20 20 63 20 3d 20 28 75 6e 73 69 67 6e  .    c = (unsign
7400: 65 64 29 28 78 20 26 20 30 78 31 66 66 66 66 66  ed)(x & 0x1fffff
7410: 29 3b 0a 20 20 20 20 69 66 28 20 63 3c 30 78 30  );.    if( c<0x0
7420: 30 30 38 30 20 29 7b 0a 20 20 20 20 20 20 2a 7a  0080 ){.      *z
7430: 4f 75 74 2b 2b 20 3d 20 28 75 38 29 28 63 26 30  Out++ = (u8)(c&0
7440: 78 46 46 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20  xFF);.    }else 
7450: 69 66 28 20 63 3c 30 78 30 30 38 30 30 20 29 7b  if( c<0x00800 ){
7460: 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d  .      *zOut++ =
7470: 20 30 78 43 30 20 2b 20 28 75 38 29 28 28 63 3e   0xC0 + (u8)((c>
7480: 3e 36 29 26 30 78 31 46 29 3b 0a 20 20 20 20 20  >6)&0x1F);.     
7490: 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20   *zOut++ = 0x80 
74a0: 2b 20 28 75 38 29 28 63 20 26 20 30 78 33 46 29  + (u8)(c & 0x3F)
74b0: 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20  ;.    }else if( 
74c0: 63 3c 30 78 31 30 30 30 30 20 29 7b 0a 20 20 20  c<0x10000 ){.   
74d0: 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 45     *zOut++ = 0xE
74e0: 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 31 32 29  0 + (u8)((c>>12)
74f0: 26 30 78 30 46 29 3b 0a 20 20 20 20 20 20 2a 7a  &0x0F);.      *z
7500: 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28  Out++ = 0x80 + (
7510: 75 38 29 28 28 63 3e 3e 36 29 20 26 20 30 78 33  u8)((c>>6) & 0x3
7520: 46 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b  F);.      *zOut+
7530: 2b 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28  + = 0x80 + (u8)(
7540: 63 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20 7d  c & 0x3F);.    }
7550: 65 6c 73 65 7b 0a 20 20 20 20 20 20 2a 7a 4f 75  else{.      *zOu
7560: 74 2b 2b 20 3d 20 30 78 46 30 20 2b 20 28 75 38  t++ = 0xF0 + (u8
7570: 29 28 28 63 3e 3e 31 38 29 20 26 20 30 78 30 37  )((c>>18) & 0x07
7580: 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b  );.      *zOut++
7590: 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 28   = 0x80 + (u8)((
75a0: 63 3e 3e 31 32 29 20 26 20 30 78 33 46 29 3b 0a  c>>12) & 0x3F);.
75b0: 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20        *zOut++ = 
75c0: 30 78 38 30 20 2b 20 28 75 38 29 28 28 63 3e 3e  0x80 + (u8)((c>>
75d0: 36 29 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20  6) & 0x3F);.    
75e0: 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30    *zOut++ = 0x80
75f0: 20 2b 20 28 75 38 29 28 63 20 26 20 30 78 33 46   + (u8)(c & 0x3F
7600: 29 3b 0a 20 20 20 20 7d 20 20 20 20 20 20 20 20  );.    }        
7610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7630: 20 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20              \.  
7640: 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  }.  sqlite3_resu
7650: 6c 74 5f 74 65 78 74 36 34 28 63 6f 6e 74 65 78  lt_text64(contex
7660: 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 7a 4f 75  t, (char*)z, zOu
7670: 74 2d 7a 2c 20 73 71 6c 69 74 65 33 5f 66 72 65  t-z, sqlite3_fre
7680: 65 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 29 3b  e, SQLITE_UTF8);
7690: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 68 65  .}../*.** The he
76a0: 78 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 49  x() function.  I
76b0: 6e 74 65 72 70 72 65 74 20 74 68 65 20 61 72 67  nterpret the arg
76c0: 75 6d 65 6e 74 20 61 73 20 61 20 62 6c 6f 62 2e  ument as a blob.
76d0: 20 20 52 65 74 75 72 6e 0a 2a 2a 20 61 20 68 65    Return.** a he
76e0: 78 61 64 65 63 69 6d 61 6c 20 72 65 6e 64 65 72  xadecimal render
76f0: 69 6e 67 20 61 73 20 74 65 78 74 2e 0a 2a 2f 0a  ing as text..*/.
7700: 73 74 61 74 69 63 20 76 6f 69 64 20 68 65 78 46  static void hexF
7710: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
7720: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
7730: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
7740: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
7750: 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69 2c 20  rgv.){.  int i, 
7760: 6e 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  n;.  const unsig
7770: 6e 65 64 20 63 68 61 72 20 2a 70 42 6c 6f 62 3b  ned char *pBlob;
7780: 0a 20 20 63 68 61 72 20 2a 7a 48 65 78 2c 20 2a  .  char *zHex, *
7790: 7a 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  z;.  assert( arg
77a0: 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44  c==1 );.  UNUSED
77b0: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
77c0: 3b 0a 20 20 70 42 6c 6f 62 20 3d 20 73 71 6c 69  ;.  pBlob = sqli
77d0: 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61  te3_value_blob(a
77e0: 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20 73  rgv[0]);.  n = s
77f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
7800: 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61  es(argv[0]);.  a
7810: 73 73 65 72 74 28 20 70 42 6c 6f 62 3d 3d 73 71  ssert( pBlob==sq
7820: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62  lite3_value_blob
7830: 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a  (argv[0]) );  /*
7840: 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61   No encoding cha
7850: 6e 67 65 20 2a 2f 0a 20 20 7a 20 3d 20 7a 48 65  nge */.  z = zHe
7860: 78 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  x = contextMallo
7870: 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34  c(context, ((i64
7880: 29 6e 29 2a 32 20 2b 20 31 29 3b 0a 20 20 69 66  )n)*2 + 1);.  if
7890: 28 20 7a 48 65 78 20 29 7b 0a 20 20 20 20 66 6f  ( zHex ){.    fo
78a0: 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b 2c  r(i=0; i<n; i++,
78b0: 20 70 42 6c 6f 62 2b 2b 29 7b 0a 20 20 20 20 20   pBlob++){.     
78c0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 63   unsigned char c
78d0: 20 3d 20 2a 70 42 6c 6f 62 3b 0a 20 20 20 20 20   = *pBlob;.     
78e0: 20 2a 28 7a 2b 2b 29 20 3d 20 68 65 78 64 69 67   *(z++) = hexdig
78f0: 69 74 73 5b 28 63 3e 3e 34 29 26 30 78 66 5d 3b  its[(c>>4)&0xf];
7900: 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20 3d 20  .      *(z++) = 
7910: 68 65 78 64 69 67 69 74 73 5b 63 26 30 78 66 5d  hexdigits[c&0xf]
7920: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2a 7a 20 3d  ;.    }.    *z =
7930: 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   0;.    sqlite3_
7940: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
7950: 65 78 74 2c 20 7a 48 65 78 2c 20 6e 2a 32 2c 20  ext, zHex, n*2, 
7960: 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20  sqlite3_free);. 
7970: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20   }.}../*.** The 
7980: 7a 65 72 6f 62 6c 6f 62 28 4e 29 20 66 75 6e 63  zeroblob(N) func
7990: 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 61 20 7a  tion returns a z
79a0: 65 72 6f 2d 66 69 6c 6c 65 64 20 62 6c 6f 62 20  ero-filled blob 
79b0: 6f 66 20 73 69 7a 65 20 4e 20 62 79 74 65 73 2e  of size N bytes.
79c0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
79d0: 7a 65 72 6f 62 6c 6f 62 46 75 6e 63 28 0a 20 20  zeroblobFunc(.  
79e0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
79f0: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
7a00: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
7a10: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
7a20: 20 20 69 36 34 20 6e 3b 0a 20 20 73 71 6c 69 74    i64 n;.  sqlit
7a30: 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33  e3 *db = sqlite3
7a40: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
7a50: 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61  le(context);.  a
7a60: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
7a70: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
7a80: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 6e 20  ETER(argc);.  n 
7a90: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
7aa0: 69 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a  int64(argv[0]);.
7ab0: 20 20 74 65 73 74 63 61 73 65 28 20 6e 3d 3d 64    testcase( n==d
7ac0: 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45  b->aLimit[SQLITE
7ad0: 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29  _LIMIT_LENGTH] )
7ae0: 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 3d  ;.  testcase( n=
7af0: 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49  =db->aLimit[SQLI
7b00: 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d  TE_LIMIT_LENGTH]
7b10: 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e 3e 64 62  +1 );.  if( n>db
7b20: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
7b30: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 7b  LIMIT_LENGTH] ){
7b40: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
7b50: 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67  ult_error_toobig
7b60: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65 6c  (context);.  }el
7b70: 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f  se{.    sqlite3_
7b80: 72 65 73 75 6c 74 5f 7a 65 72 6f 62 6c 6f 62 28  result_zeroblob(
7b90: 63 6f 6e 74 65 78 74 2c 20 28 69 6e 74 29 6e 29  context, (int)n)
7ba0: 3b 20 2f 2a 20 49 4d 50 3a 20 52 2d 30 30 32 39  ; /* IMP: R-0029
7bb0: 33 2d 36 34 39 39 34 20 2a 2f 0a 20 20 7d 0a 7d  3-64994 */.  }.}
7bc0: 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 72 65 70 6c  ../*.** The repl
7bd0: 61 63 65 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20  ace() function. 
7be0: 20 54 68 72 65 65 20 61 72 67 75 6d 65 6e 74 73   Three arguments
7bf0: 20 61 72 65 20 61 6c 6c 20 73 74 72 69 6e 67 73   are all strings
7c00: 3a 20 63 61 6c 6c 0a 2a 2a 20 74 68 65 6d 20 41  : call.** them A
7c10: 2c 20 42 2c 20 61 6e 64 20 43 2e 20 54 68 65 20  , B, and C. The 
7c20: 72 65 73 75 6c 74 20 69 73 20 61 6c 73 6f 20 61  result is also a
7c30: 20 73 74 72 69 6e 67 20 77 68 69 63 68 20 69 73   string which is
7c40: 20 64 65 72 69 76 65 64 0a 2a 2a 20 66 72 6f 6d   derived.** from
7c50: 20 41 20 62 79 20 72 65 70 6c 61 63 69 6e 67 20   A by replacing 
7c60: 65 76 65 72 79 20 6f 63 63 75 72 72 65 6e 63 65  every occurrence
7c70: 20 6f 66 20 42 20 77 69 74 68 20 43 2e 20 20 54   of B with C.  T
7c80: 68 65 20 6d 61 74 63 68 0a 2a 2a 20 6d 75 73 74  he match.** must
7c90: 20 62 65 20 65 78 61 63 74 2e 20 20 43 6f 6c 6c   be exact.  Coll
7ca0: 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65 73 20  ating sequences 
7cb0: 61 72 65 20 6e 6f 74 20 75 73 65 64 2e 0a 2a 2f  are not used..*/
7cc0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 65 70  .static void rep
7cd0: 6c 61 63 65 46 75 6e 63 28 0a 20 20 73 71 6c 69  laceFunc(.  sqli
7ce0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
7cf0: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
7d00: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
7d10: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f  e **argv.){.  co
7d20: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
7d30: 72 20 2a 7a 53 74 72 3b 20 20 20 20 20 20 20 20  r *zStr;        
7d40: 2f 2a 20 54 68 65 20 69 6e 70 75 74 20 73 74 72  /* The input str
7d50: 69 6e 67 20 41 20 2a 2f 0a 20 20 63 6f 6e 73 74  ing A */.  const
7d60: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
7d70: 7a 50 61 74 74 65 72 6e 3b 20 20 20 20 2f 2a 20  zPattern;    /* 
7d80: 54 68 65 20 70 61 74 74 65 72 6e 20 73 74 72 69  The pattern stri
7d90: 6e 67 20 42 20 2a 2f 0a 20 20 63 6f 6e 73 74 20  ng B */.  const 
7da0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
7db0: 52 65 70 3b 20 20 20 20 20 20 20 20 2f 2a 20 54  Rep;        /* T
7dc0: 68 65 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 73  he replacement s
7dd0: 74 72 69 6e 67 20 43 20 2a 2f 0a 20 20 75 6e 73  tring C */.  uns
7de0: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 4f 75 74  igned char *zOut
7df0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f  ;              /
7e00: 2a 20 54 68 65 20 6f 75 74 70 75 74 20 2a 2f 0a  * The output */.
7e10: 20 20 69 6e 74 20 6e 53 74 72 3b 20 20 20 20 20    int nStr;     
7e20: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69             /* Si
7e30: 7a 65 20 6f 66 20 7a 53 74 72 20 2a 2f 0a 20 20  ze of zStr */.  
7e40: 69 6e 74 20 6e 50 61 74 74 65 72 6e 3b 20 20 20  int nPattern;   
7e50: 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69 7a 65           /* Size
7e60: 20 6f 66 20 7a 50 61 74 74 65 72 6e 20 2a 2f 0a   of zPattern */.
7e70: 20 20 69 6e 74 20 6e 52 65 70 3b 20 20 20 20 20    int nRep;     
7e80: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69             /* Si
7e90: 7a 65 20 6f 66 20 7a 52 65 70 20 2a 2f 0a 20 20  ze of zRep */.  
7ea0: 69 36 34 20 6e 4f 75 74 3b 20 20 20 20 20 20 20  i64 nOut;       
7eb0: 20 20 20 20 20 20 20 20 20 2f 2a 20 4d 61 78 69           /* Maxi
7ec0: 6d 75 6d 20 73 69 7a 65 20 6f 66 20 7a 4f 75 74  mum size of zOut
7ed0: 20 2a 2f 0a 20 20 69 6e 74 20 6c 6f 6f 70 4c 69   */.  int loopLi
7ee0: 6d 69 74 3b 20 20 20 20 20 20 20 20 20 20 20 2f  mit;           /
7ef0: 2a 20 4c 61 73 74 20 7a 53 74 72 5b 5d 20 74 68  * Last zStr[] th
7f00: 61 74 20 6d 69 67 68 74 20 6d 61 74 63 68 20 7a  at might match z
7f10: 50 61 74 74 65 72 6e 5b 5d 20 2a 2f 0a 20 20 69  Pattern[] */.  i
7f20: 6e 74 20 69 2c 20 6a 3b 20 20 20 20 20 20 20 20  nt i, j;        
7f30: 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f 70 20          /* Loop 
7f40: 63 6f 75 6e 74 65 72 73 20 2a 2f 0a 0a 20 20 61  counters */..  a
7f50: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 33 20 29  ssert( argc==3 )
7f60: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
7f70: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 7a 53  ETER(argc);.  zS
7f80: 74 72 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  tr = sqlite3_val
7f90: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
7fa0: 3b 0a 20 20 69 66 28 20 7a 53 74 72 3d 3d 30 20  ;.  if( zStr==0 
7fb0: 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 53 74 72  ) return;.  nStr
7fc0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
7fd0: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
7fe0: 0a 20 20 61 73 73 65 72 74 28 20 7a 53 74 72 3d  .  assert( zStr=
7ff0: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
8000: 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 20  ext(argv[0]) ); 
8010: 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20   /* No encoding 
8020: 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 50 61 74  change */.  zPat
8030: 74 65 72 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76  tern = sqlite3_v
8040: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31  alue_text(argv[1
8050: 5d 29 3b 0a 20 20 69 66 28 20 7a 50 61 74 74 65  ]);.  if( zPatte
8060: 72 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 61 73 73  rn==0 ){.    ass
8070: 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c  ert( sqlite3_val
8080: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d 29  ue_type(argv[1])
8090: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a 20 20  ==SQLITE_NULL.  
80a0: 20 20 20 20 20 20 20 20 20 20 7c 7c 20 73 71 6c            || sql
80b0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
80c0: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 2d  handle(context)-
80d0: 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 29 3b  >mallocFailed );
80e0: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
80f0: 0a 20 20 69 66 28 20 7a 50 61 74 74 65 72 6e 5b  .  if( zPattern[
8100: 30 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 61 73 73  0]==0 ){.    ass
8110: 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c  ert( sqlite3_val
8120: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d 29  ue_type(argv[1])
8130: 21 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b  !=SQLITE_NULL );
8140: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
8150: 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78  ult_value(contex
8160: 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20  t, argv[0]);.   
8170: 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 6e   return;.  }.  n
8180: 50 61 74 74 65 72 6e 20 3d 20 73 71 6c 69 74 65  Pattern = sqlite
8190: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
81a0: 67 76 5b 31 5d 29 3b 0a 20 20 61 73 73 65 72 74  gv[1]);.  assert
81b0: 28 20 7a 50 61 74 74 65 72 6e 3d 3d 73 71 6c 69  ( zPattern==sqli
81c0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
81d0: 72 67 76 5b 31 5d 29 20 29 3b 20 20 2f 2a 20 4e  rgv[1]) );  /* N
81e0: 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67  o encoding chang
81f0: 65 20 2a 2f 0a 20 20 7a 52 65 70 20 3d 20 73 71  e */.  zRep = sq
8200: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
8210: 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 69 66 28  (argv[2]);.  if(
8220: 20 7a 52 65 70 3d 3d 30 20 29 20 72 65 74 75 72   zRep==0 ) retur
8230: 6e 3b 0a 20 20 6e 52 65 70 20 3d 20 73 71 6c 69  n;.  nRep = sqli
8240: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
8250: 61 72 67 76 5b 32 5d 29 3b 0a 20 20 61 73 73 65  argv[2]);.  asse
8260: 72 74 28 20 7a 52 65 70 3d 3d 73 71 6c 69 74 65  rt( zRep==sqlite
8270: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
8280: 76 5b 32 5d 29 20 29 3b 0a 20 20 6e 4f 75 74 20  v[2]) );.  nOut 
8290: 3d 20 6e 53 74 72 20 2b 20 31 3b 0a 20 20 61 73  = nStr + 1;.  as
82a0: 73 65 72 74 28 20 6e 4f 75 74 3c 53 51 4c 49 54  sert( nOut<SQLIT
82b0: 45 5f 4d 41 58 5f 4c 45 4e 47 54 48 20 29 3b 0a  E_MAX_LENGTH );.
82c0: 20 20 7a 4f 75 74 20 3d 20 63 6f 6e 74 65 78 74    zOut = context
82d0: 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20  Malloc(context, 
82e0: 28 69 36 34 29 6e 4f 75 74 29 3b 0a 20 20 69 66  (i64)nOut);.  if
82f0: 28 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20 20 20  ( zOut==0 ){.   
8300: 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 6c   return;.  }.  l
8310: 6f 6f 70 4c 69 6d 69 74 20 3d 20 6e 53 74 72 20  oopLimit = nStr 
8320: 2d 20 6e 50 61 74 74 65 72 6e 3b 20 20 0a 20 20  - nPattern;  .  
8330: 66 6f 72 28 69 3d 6a 3d 30 3b 20 69 3c 3d 6c 6f  for(i=j=0; i<=lo
8340: 6f 70 4c 69 6d 69 74 3b 20 69 2b 2b 29 7b 0a 20  opLimit; i++){. 
8350: 20 20 20 69 66 28 20 7a 53 74 72 5b 69 5d 21 3d     if( zStr[i]!=
8360: 7a 50 61 74 74 65 72 6e 5b 30 5d 20 7c 7c 20 6d  zPattern[0] || m
8370: 65 6d 63 6d 70 28 26 7a 53 74 72 5b 69 5d 2c 20  emcmp(&zStr[i], 
8380: 7a 50 61 74 74 65 72 6e 2c 20 6e 50 61 74 74 65  zPattern, nPatte
8390: 72 6e 29 20 29 7b 0a 20 20 20 20 20 20 7a 4f 75  rn) ){.      zOu
83a0: 74 5b 6a 2b 2b 5d 20 3d 20 7a 53 74 72 5b 69 5d  t[j++] = zStr[i]
83b0: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ;.    }else{.   
83c0: 20 20 20 75 38 20 2a 7a 4f 6c 64 3b 0a 20 20 20     u8 *zOld;.   
83d0: 20 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d     sqlite3 *db =
83e0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
83f0: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
8400: 78 74 29 3b 0a 20 20 20 20 20 20 6e 4f 75 74 20  xt);.      nOut 
8410: 2b 3d 20 6e 52 65 70 20 2d 20 6e 50 61 74 74 65  += nRep - nPatte
8420: 72 6e 3b 0a 20 20 20 20 20 20 74 65 73 74 63 61  rn;.      testca
8430: 73 65 28 20 6e 4f 75 74 2d 31 3d 3d 64 62 2d 3e  se( nOut-1==db->
8440: 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49  aLimit[SQLITE_LI
8450: 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20  MIT_LENGTH] );. 
8460: 20 20 20 20 20 74 65 73 74 63 61 73 65 28 20 6e       testcase( n
8470: 4f 75 74 2d 32 3d 3d 64 62 2d 3e 61 4c 69 6d 69  Out-2==db->aLimi
8480: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
8490: 45 4e 47 54 48 5d 20 29 3b 0a 20 20 20 20 20 20  ENGTH] );.      
84a0: 69 66 28 20 6e 4f 75 74 2d 31 3e 64 62 2d 3e 61  if( nOut-1>db->a
84b0: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
84c0: 49 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20  IT_LENGTH] ){.  
84d0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
84e0: 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69  sult_error_toobi
84f0: 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  g(context);.    
8500: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
8510: 28 7a 4f 75 74 29 3b 0a 20 20 20 20 20 20 20 20  (zOut);.        
8520: 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a  return;.      }.
8530: 20 20 20 20 20 20 7a 4f 6c 64 20 3d 20 7a 4f 75        zOld = zOu
8540: 74 3b 0a 20 20 20 20 20 20 7a 4f 75 74 20 3d 20  t;.      zOut = 
8550: 73 71 6c 69 74 65 33 5f 72 65 61 6c 6c 6f 63 28  sqlite3_realloc(
8560: 7a 4f 75 74 2c 20 28 69 6e 74 29 6e 4f 75 74 29  zOut, (int)nOut)
8570: 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 4f 75 74  ;.      if( zOut
8580: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 73  ==0 ){.        s
8590: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
85a0: 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78  ror_nomem(contex
85b0: 74 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69  t);.        sqli
85c0: 74 65 33 5f 66 72 65 65 28 7a 4f 6c 64 29 3b 0a  te3_free(zOld);.
85d0: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a          return;.
85e0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 6d 65        }.      me
85f0: 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20 7a  mcpy(&zOut[j], z
8600: 52 65 70 2c 20 6e 52 65 70 29 3b 0a 20 20 20 20  Rep, nRep);.    
8610: 20 20 6a 20 2b 3d 20 6e 52 65 70 3b 0a 20 20 20    j += nRep;.   
8620: 20 20 20 69 20 2b 3d 20 6e 50 61 74 74 65 72 6e     i += nPattern
8630: 2d 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20  -1;.    }.  }.  
8640: 61 73 73 65 72 74 28 20 6a 2b 6e 53 74 72 2d 69  assert( j+nStr-i
8650: 2b 31 3d 3d 6e 4f 75 74 20 29 3b 0a 20 20 6d 65  +1==nOut );.  me
8660: 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20 26  mcpy(&zOut[j], &
8670: 7a 53 74 72 5b 69 5d 2c 20 6e 53 74 72 2d 69 29  zStr[i], nStr-i)
8680: 3b 0a 20 20 6a 20 2b 3d 20 6e 53 74 72 20 2d 20  ;.  j += nStr - 
8690: 69 3b 0a 20 20 61 73 73 65 72 74 28 20 6a 3c 3d  i;.  assert( j<=
86a0: 6e 4f 75 74 20 29 3b 0a 20 20 7a 4f 75 74 5b 6a  nOut );.  zOut[j
86b0: 5d 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 33  ] = 0;.  sqlite3
86c0: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
86d0: 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 4f 75  text, (char*)zOu
86e0: 74 2c 20 6a 2c 20 73 71 6c 69 74 65 33 5f 66 72  t, j, sqlite3_fr
86f0: 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  ee);.}../*.** Im
8700: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
8710: 74 68 65 20 54 52 49 4d 28 29 2c 20 4c 54 52 49  the TRIM(), LTRI
8720: 4d 28 29 2c 20 61 6e 64 20 52 54 52 49 4d 28 29  M(), and RTRIM()
8730: 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2a 20 54   functions..** T
8740: 68 65 20 75 73 65 72 64 61 74 61 20 69 73 20 30  he userdata is 0
8750: 78 31 20 66 6f 72 20 6c 65 66 74 20 74 72 69 6d  x1 for left trim
8760: 2c 20 30 78 32 20 66 6f 72 20 72 69 67 68 74 20  , 0x2 for right 
8770: 74 72 69 6d 2c 20 30 78 33 20 66 6f 72 20 62 6f  trim, 0x3 for bo
8780: 74 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  th..*/.static vo
8790: 69 64 20 74 72 69 6d 46 75 6e 63 28 0a 20 20 73  id trimFunc(.  s
87a0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
87b0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
87c0: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
87d0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
87e0: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
87f0: 63 68 61 72 20 2a 7a 49 6e 3b 20 20 20 20 20 20  char *zIn;      
8800: 20 20 20 2f 2a 20 49 6e 70 75 74 20 73 74 72 69     /* Input stri
8810: 6e 67 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 6e  ng */.  const un
8820: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 43 68  signed char *zCh
8830: 61 72 53 65 74 3b 20 20 20 20 2f 2a 20 53 65 74  arSet;    /* Set
8840: 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 74   of characters t
8850: 6f 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74 20  o trim */.  int 
8860: 6e 49 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20  nIn;            
8870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
8880: 20 4e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73   Number of bytes
8890: 20 69 6e 20 69 6e 70 75 74 20 2a 2f 0a 20 20 69   in input */.  i
88a0: 6e 74 20 66 6c 61 67 73 3b 20 20 20 20 20 20 20  nt flags;       
88b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
88c0: 20 2f 2a 20 31 3a 20 74 72 69 6d 6c 65 66 74 20   /* 1: trimleft 
88d0: 20 32 3a 20 74 72 69 6d 72 69 67 68 74 20 20 33   2: trimright  3
88e0: 3a 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74 20  : trim */.  int 
88f0: 69 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  i;              
8900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
8910: 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a 2f   Loop counter */
8920: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
8930: 20 2a 61 4c 65 6e 20 3d 20 30 3b 20 20 20 20 20   *aLen = 0;     
8940: 20 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20 6f       /* Length o
8950: 66 20 65 61 63 68 20 63 68 61 72 61 63 74 65 72  f each character
8960: 20 69 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a   in zCharSet */.
8970: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
8980: 2a 2a 61 7a 43 68 61 72 20 3d 20 30 3b 20 20 20  **azChar = 0;   
8990: 20 20 20 20 2f 2a 20 49 6e 64 69 76 69 64 75 61      /* Individua
89a0: 6c 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 20  l characters in 
89b0: 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20 20 69 6e  zCharSet */.  in
89c0: 74 20 6e 43 68 61 72 3b 20 20 20 20 20 20 20 20  t nChar;        
89d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
89e0: 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 63 68 61  /* Number of cha
89f0: 72 61 63 74 65 72 73 20 69 6e 20 7a 43 68 61 72  racters in zChar
8a00: 53 65 74 20 2a 2f 0a 0a 20 20 69 66 28 20 73 71  Set */..  if( sq
8a10: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
8a20: 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54  (argv[0])==SQLIT
8a30: 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 72 65  E_NULL ){.    re
8a40: 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 7a 49 6e 20  turn;.  }.  zIn 
8a50: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
8a60: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
8a70: 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20 72 65   if( zIn==0 ) re
8a80: 74 75 72 6e 3b 0a 20 20 6e 49 6e 20 3d 20 73 71  turn;.  nIn = sq
8a90: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
8aa0: 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61 73  s(argv[0]);.  as
8ab0: 73 65 72 74 28 20 7a 49 6e 3d 3d 73 71 6c 69 74  sert( zIn==sqlit
8ac0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
8ad0: 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28 20  gv[0]) );.  if( 
8ae0: 61 72 67 63 3d 3d 31 20 29 7b 0a 20 20 20 20 73  argc==1 ){.    s
8af0: 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e 73 69  tatic const unsi
8b00: 67 6e 65 64 20 63 68 61 72 20 6c 65 6e 4f 6e 65  gned char lenOne
8b10: 5b 5d 20 3d 20 7b 20 31 20 7d 3b 0a 20 20 20 20  [] = { 1 };.    
8b20: 73 74 61 74 69 63 20 75 6e 73 69 67 6e 65 64 20  static unsigned 
8b30: 63 68 61 72 20 2a 20 63 6f 6e 73 74 20 61 7a 4f  char * const azO
8b40: 6e 65 5b 5d 20 3d 20 7b 20 28 75 38 2a 29 22 20  ne[] = { (u8*)" 
8b50: 22 20 7d 3b 0a 20 20 20 20 6e 43 68 61 72 20 3d  " };.    nChar =
8b60: 20 31 3b 0a 20 20 20 20 61 4c 65 6e 20 3d 20 28   1;.    aLen = (
8b70: 75 38 2a 29 6c 65 6e 4f 6e 65 3b 0a 20 20 20 20  u8*)lenOne;.    
8b80: 61 7a 43 68 61 72 20 3d 20 28 75 6e 73 69 67 6e  azChar = (unsign
8b90: 65 64 20 63 68 61 72 20 2a 2a 29 61 7a 4f 6e 65  ed char **)azOne
8ba0: 3b 0a 20 20 20 20 7a 43 68 61 72 53 65 74 20 3d  ;.    zCharSet =
8bb0: 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20   0;.  }else if( 
8bc0: 28 7a 43 68 61 72 53 65 74 20 3d 20 73 71 6c 69  (zCharSet = sqli
8bd0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
8be0: 72 67 76 5b 31 5d 29 29 3d 3d 30 20 29 7b 0a 20  rgv[1]))==0 ){. 
8bf0: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 65 6c     return;.  }el
8c00: 73 65 7b 0a 20 20 20 20 63 6f 6e 73 74 20 75 6e  se{.    const un
8c10: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0a  signed char *z;.
8c20: 20 20 20 20 66 6f 72 28 7a 3d 7a 43 68 61 72 53      for(z=zCharS
8c30: 65 74 2c 20 6e 43 68 61 72 3d 30 3b 20 2a 7a 3b  et, nChar=0; *z;
8c40: 20 6e 43 68 61 72 2b 2b 29 7b 0a 20 20 20 20 20   nChar++){.     
8c50: 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46   SQLITE_SKIP_UTF
8c60: 38 28 7a 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20  8(z);.    }.    
8c70: 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b 0a 20  if( nChar>0 ){. 
8c80: 20 20 20 20 20 61 7a 43 68 61 72 20 3d 20 63 6f       azChar = co
8c90: 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74  ntextMalloc(cont
8ca0: 65 78 74 2c 20 28 28 69 36 34 29 6e 43 68 61 72  ext, ((i64)nChar
8cb0: 29 2a 28 73 69 7a 65 6f 66 28 63 68 61 72 2a 29  )*(sizeof(char*)
8cc0: 2b 31 29 29 3b 0a 20 20 20 20 20 20 69 66 28 20  +1));.      if( 
8cd0: 61 7a 43 68 61 72 3d 3d 30 20 29 7b 0a 20 20 20  azChar==0 ){.   
8ce0: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20       return;.   
8cf0: 20 20 20 7d 0a 20 20 20 20 20 20 61 4c 65 6e 20     }.      aLen 
8d00: 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72  = (unsigned char
8d10: 2a 29 26 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d  *)&azChar[nChar]
8d20: 3b 0a 20 20 20 20 20 20 66 6f 72 28 7a 3d 7a 43  ;.      for(z=zC
8d30: 68 61 72 53 65 74 2c 20 6e 43 68 61 72 3d 30 3b  harSet, nChar=0;
8d40: 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a 20   *z; nChar++){. 
8d50: 20 20 20 20 20 20 20 61 7a 43 68 61 72 5b 6e 43         azChar[nC
8d60: 68 61 72 5d 20 3d 20 28 75 6e 73 69 67 6e 65 64  har] = (unsigned
8d70: 20 63 68 61 72 20 2a 29 7a 3b 0a 20 20 20 20 20   char *)z;.     
8d80: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
8d90: 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 20 20  TF8(z);.        
8da0: 61 4c 65 6e 5b 6e 43 68 61 72 5d 20 3d 20 28 75  aLen[nChar] = (u
8db0: 38 29 28 7a 20 2d 20 61 7a 43 68 61 72 5b 6e 43  8)(z - azChar[nC
8dc0: 68 61 72 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20  har]);.      }. 
8dd0: 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 6e     }.  }.  if( n
8de0: 43 68 61 72 3e 30 20 29 7b 0a 20 20 20 20 66 6c  Char>0 ){.    fl
8df0: 61 67 73 20 3d 20 53 51 4c 49 54 45 5f 50 54 52  ags = SQLITE_PTR
8e00: 5f 54 4f 5f 49 4e 54 28 73 71 6c 69 74 65 33 5f  _TO_INT(sqlite3_
8e10: 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78  user_data(contex
8e20: 74 29 29 3b 0a 20 20 20 20 69 66 28 20 66 6c 61  t));.    if( fla
8e30: 67 73 20 26 20 31 20 29 7b 0a 20 20 20 20 20 20  gs & 1 ){.      
8e40: 77 68 69 6c 65 28 20 6e 49 6e 3e 30 20 29 7b 0a  while( nIn>0 ){.
8e50: 20 20 20 20 20 20 20 20 69 6e 74 20 6c 65 6e 20          int len 
8e60: 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 66 6f 72  = 0;.        for
8e70: 28 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20 69  (i=0; i<nChar; i
8e80: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6c  ++){.          l
8e90: 65 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20  en = aLen[i];.  
8ea0: 20 20 20 20 20 20 20 20 69 66 28 20 6c 65 6e 3c          if( len<
8eb0: 3d 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28 7a  =nIn && memcmp(z
8ec0: 49 6e 2c 20 61 7a 43 68 61 72 5b 69 5d 2c 20 6c  In, azChar[i], l
8ed0: 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a  en)==0 ) break;.
8ee0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
8ef0: 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72 20 29    if( i>=nChar )
8f00: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20   break;.        
8f10: 7a 49 6e 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20  zIn += len;.    
8f20: 20 20 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a      nIn -= len;.
8f30: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20        }.    }.  
8f40: 20 20 69 66 28 20 66 6c 61 67 73 20 26 20 32 20    if( flags & 2 
8f50: 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20  ){.      while( 
8f60: 6e 49 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20 20  nIn>0 ){.       
8f70: 20 69 6e 74 20 6c 65 6e 20 3d 20 30 3b 0a 20 20   int len = 0;.  
8f80: 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69        for(i=0; i
8f90: 3c 6e 43 68 61 72 3b 20 69 2b 2b 29 7b 0a 20 20  <nChar; i++){.  
8fa0: 20 20 20 20 20 20 20 20 6c 65 6e 20 3d 20 61 4c          len = aL
8fb0: 65 6e 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 20  en[i];.         
8fc0: 20 69 66 28 20 6c 65 6e 3c 3d 6e 49 6e 20 26 26   if( len<=nIn &&
8fd0: 20 6d 65 6d 63 6d 70 28 26 7a 49 6e 5b 6e 49 6e   memcmp(&zIn[nIn
8fe0: 2d 6c 65 6e 5d 2c 61 7a 43 68 61 72 5b 69 5d 2c  -len],azChar[i],
8ff0: 6c 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b 3b  len)==0 ) break;
9000: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
9010: 20 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72 20     if( i>=nChar 
9020: 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20  ) break;.       
9030: 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20   nIn -= len;.   
9040: 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69     }.    }.    i
9050: 66 28 20 7a 43 68 61 72 53 65 74 20 29 7b 0a 20  f( zCharSet ){. 
9060: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65       sqlite3_fre
9070: 65 28 61 7a 43 68 61 72 29 3b 0a 20 20 20 20 7d  e(azChar);.    }
9080: 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72  .  }.  sqlite3_r
9090: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
90a0: 78 74 2c 20 28 63 68 61 72 2a 29 7a 49 6e 2c 20  xt, (char*)zIn, 
90b0: 6e 49 6e 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e  nIn, SQLITE_TRAN
90c0: 53 49 45 4e 54 29 3b 0a 7d 0a 0a 0a 2f 2a 20 49  SIENT);.}.../* I
90d0: 4d 50 3a 20 52 2d 32 35 33 36 31 2d 31 36 31 35  MP: R-25361-1615
90e0: 30 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20  0 This function 
90f0: 69 73 20 6f 6d 69 74 74 65 64 20 66 72 6f 6d 20  is omitted from 
9100: 53 51 4c 69 74 65 20 62 79 20 64 65 66 61 75 6c  SQLite by defaul
9110: 74 2e 20 49 74 0a 2a 2a 20 69 73 20 6f 6e 6c 79  t. It.** is only
9120: 20 61 76 61 69 6c 61 62 6c 65 20 69 66 20 74 68   available if th
9130: 65 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58  e SQLITE_SOUNDEX
9140: 20 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 20 6f 70   compile-time op
9150: 74 69 6f 6e 20 69 73 20 75 73 65 64 0a 2a 2a 20  tion is used.** 
9160: 77 68 65 6e 20 53 51 4c 69 74 65 20 69 73 20 62  when SQLite is b
9170: 75 69 6c 74 2e 0a 2a 2f 0a 23 69 66 64 65 66 20  uilt..*/.#ifdef 
9180: 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58 0a 2f  SQLITE_SOUNDEX./
9190: 2a 0a 2a 2a 20 43 6f 6d 70 75 74 65 20 74 68 65  *.** Compute the
91a0: 20 73 6f 75 6e 64 65 78 20 65 6e 63 6f 64 69 6e   soundex encodin
91b0: 67 20 6f 66 20 61 20 77 6f 72 64 2e 0a 2a 2a 0a  g of a word..**.
91c0: 2a 2a 20 49 4d 50 3a 20 52 2d 35 39 37 38 32 2d  ** IMP: R-59782-
91d0: 30 30 30 37 32 20 54 68 65 20 73 6f 75 6e 64 65  00072 The sounde
91e0: 78 28 58 29 20 66 75 6e 63 74 69 6f 6e 20 72 65  x(X) function re
91f0: 74 75 72 6e 73 20 61 20 73 74 72 69 6e 67 20 74  turns a string t
9200: 68 61 74 20 69 73 20 74 68 65 0a 2a 2a 20 73 6f  hat is the.** so
9210: 75 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67 20 6f  undex encoding o
9220: 66 20 74 68 65 20 73 74 72 69 6e 67 20 58 2e 20  f the string X. 
9230: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
9240: 73 6f 75 6e 64 65 78 46 75 6e 63 28 0a 20 20 73  soundexFunc(.  s
9250: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
9260: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
9270: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
9280: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
9290: 20 63 68 61 72 20 7a 52 65 73 75 6c 74 5b 38 5d   char zResult[8]
92a0: 3b 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 49  ;.  const u8 *zI
92b0: 6e 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20  n;.  int i, j;. 
92c0: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e   static const un
92d0: 73 69 67 6e 65 64 20 63 68 61 72 20 69 43 6f 64  signed char iCod
92e0: 65 5b 5d 20 3d 20 7b 0a 20 20 20 20 30 2c 20 30  e[] = {.    0, 0
92f0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9300: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9310: 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20  0, 0, 0, 0,.    
9320: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9330: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9340: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a   0, 0, 0, 0, 0,.
9350: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20      0, 0, 0, 0, 
9360: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9370: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9380: 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c   0,.    0, 0, 0,
9390: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
93a0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
93b0: 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30  , 0, 0,.    0, 0
93c0: 2c 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c  , 1, 2, 3, 0, 1,
93d0: 20 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32 2c 20   2, 0, 0, 2, 2, 
93e0: 34 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20 20 20  4, 5, 5, 0,.    
93f0: 31 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c 20 30  1, 2, 6, 2, 3, 0
9400: 2c 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20 32 2c  , 1, 0, 2, 0, 2,
9410: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a   0, 0, 0, 0, 0,.
9420: 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 32 2c 20      0, 0, 1, 2, 
9430: 33 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c 20 30  3, 0, 1, 2, 0, 0
9440: 2c 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20 35 2c  , 2, 2, 4, 5, 5,
9450: 20 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20 36 2c   0,.    1, 2, 6,
9460: 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30 2c 20   2, 3, 0, 1, 0, 
9470: 32 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c 20 30  2, 0, 2, 0, 0, 0
9480: 2c 20 30 2c 20 30 2c 0a 20 20 7d 3b 0a 20 20 61  , 0, 0,.  };.  a
9490: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
94a0: 3b 0a 20 20 7a 49 6e 20 3d 20 28 75 38 2a 29 73  ;.  zIn = (u8*)s
94b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
94c0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66  t(argv[0]);.  if
94d0: 28 20 7a 49 6e 3d 3d 30 20 29 20 7a 49 6e 20 3d  ( zIn==0 ) zIn =
94e0: 20 28 75 38 2a 29 22 22 3b 0a 20 20 66 6f 72 28   (u8*)"";.  for(
94f0: 69 3d 30 3b 20 7a 49 6e 5b 69 5d 20 26 26 20 21  i=0; zIn[i] && !
9500: 73 71 6c 69 74 65 33 49 73 61 6c 70 68 61 28 7a  sqlite3Isalpha(z
9510: 49 6e 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d 0a 20  In[i]); i++){}. 
9520: 20 69 66 28 20 7a 49 6e 5b 69 5d 20 29 7b 0a 20   if( zIn[i] ){. 
9530: 20 20 20 75 38 20 70 72 65 76 63 6f 64 65 20 3d     u8 prevcode =
9540: 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30 78   iCode[zIn[i]&0x
9550: 37 66 5d 3b 0a 20 20 20 20 7a 52 65 73 75 6c 74  7f];.    zResult
9560: 5b 30 5d 20 3d 20 73 71 6c 69 74 65 33 54 6f 75  [0] = sqlite3Tou
9570: 70 70 65 72 28 7a 49 6e 5b 69 5d 29 3b 0a 20 20  pper(zIn[i]);.  
9580: 20 20 66 6f 72 28 6a 3d 31 3b 20 6a 3c 34 20 26    for(j=1; j<4 &
9590: 26 20 7a 49 6e 5b 69 5d 3b 20 69 2b 2b 29 7b 0a  & zIn[i]; i++){.
95a0: 20 20 20 20 20 20 69 6e 74 20 63 6f 64 65 20 3d        int code =
95b0: 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30 78   iCode[zIn[i]&0x
95c0: 37 66 5d 3b 0a 20 20 20 20 20 20 69 66 28 20 63  7f];.      if( c
95d0: 6f 64 65 3e 30 20 29 7b 0a 20 20 20 20 20 20 20  ode>0 ){.       
95e0: 20 69 66 28 20 63 6f 64 65 21 3d 70 72 65 76 63   if( code!=prevc
95f0: 6f 64 65 20 29 7b 0a 20 20 20 20 20 20 20 20 20  ode ){.         
9600: 20 70 72 65 76 63 6f 64 65 20 3d 20 63 6f 64 65   prevcode = code
9610: 3b 0a 20 20 20 20 20 20 20 20 20 20 7a 52 65 73  ;.          zRes
9620: 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 63 6f 64 65 20  ult[j++] = code 
9630: 2b 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7d  + '0';.        }
9640: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
9650: 20 20 20 20 20 20 70 72 65 76 63 6f 64 65 20 3d        prevcode =
9660: 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   0;.      }.    
9670: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 6a 3c 34  }.    while( j<4
9680: 20 29 7b 0a 20 20 20 20 20 20 7a 52 65 73 75 6c   ){.      zResul
9690: 74 5b 6a 2b 2b 5d 20 3d 20 27 30 27 3b 0a 20 20  t[j++] = '0';.  
96a0: 20 20 7d 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b    }.    zResult[
96b0: 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69  j] = 0;.    sqli
96c0: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
96d0: 63 6f 6e 74 65 78 74 2c 20 7a 52 65 73 75 6c 74  context, zResult
96e0: 2c 20 34 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e  , 4, SQLITE_TRAN
96f0: 53 49 45 4e 54 29 3b 0a 20 20 7d 65 6c 73 65 7b  SIENT);.  }else{
9700: 0a 20 20 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 36  .    /* IMP: R-6
9710: 34 38 39 34 2d 35 30 33 32 31 20 54 68 65 20 73  4894-50321 The s
9720: 74 72 69 6e 67 20 22 3f 30 30 30 22 20 69 73 20  tring "?000" is 
9730: 72 65 74 75 72 6e 65 64 20 69 66 20 74 68 65 20  returned if the 
9740: 61 72 67 75 6d 65 6e 74 0a 20 20 20 20 2a 2a 20  argument.    ** 
9750: 69 73 20 4e 55 4c 4c 20 6f 72 20 63 6f 6e 74 61  is NULL or conta
9760: 69 6e 73 20 6e 6f 20 41 53 43 49 49 20 61 6c 70  ins no ASCII alp
9770: 68 61 62 65 74 69 63 20 63 68 61 72 61 63 74 65  habetic characte
9780: 72 73 2e 20 2a 2f 0a 20 20 20 20 73 71 6c 69 74  rs. */.    sqlit
9790: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
97a0: 6f 6e 74 65 78 74 2c 20 22 3f 30 30 30 22 2c 20  ontext, "?000", 
97b0: 34 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43  4, SQLITE_STATIC
97c0: 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 20  );.  }.}.#endif 
97d0: 2f 2a 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45  /* SQLITE_SOUNDE
97e0: 58 20 2a 2f 0a 0a 23 69 66 6e 64 65 66 20 53 51  X */..#ifndef SQ
97f0: 4c 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45  LITE_OMIT_LOAD_E
9800: 58 54 45 4e 53 49 4f 4e 0a 2f 2a 0a 2a 2a 20 41  XTENSION./*.** A
9810: 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 6c   function that l
9820: 6f 61 64 73 20 61 20 73 68 61 72 65 64 2d 6c 69  oads a shared-li
9830: 62 72 61 72 79 20 65 78 74 65 6e 73 69 6f 6e 20  brary extension 
9840: 74 68 65 6e 20 72 65 74 75 72 6e 73 20 4e 55 4c  then returns NUL
9850: 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  L..*/.static voi
9860: 64 20 6c 6f 61 64 45 78 74 28 73 71 6c 69 74 65  d loadExt(sqlite
9870: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
9880: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
9890: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
98a0: 67 76 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61  gv){.  const cha
98b0: 72 20 2a 7a 46 69 6c 65 20 3d 20 28 63 6f 6e 73  r *zFile = (cons
98c0: 74 20 63 68 61 72 20 2a 29 73 71 6c 69 74 65 33  t char *)sqlite3
98d0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
98e0: 5b 30 5d 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68  [0]);.  const ch
98f0: 61 72 20 2a 7a 50 72 6f 63 3b 0a 20 20 73 71 6c  ar *zProc;.  sql
9900: 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74  ite3 *db = sqlit
9910: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
9920: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20  ndle(context);. 
9930: 20 63 68 61 72 20 2a 7a 45 72 72 4d 73 67 20 3d   char *zErrMsg =
9940: 20 30 3b 0a 0a 20 20 69 66 28 20 61 72 67 63 3d   0;..  if( argc=
9950: 3d 32 20 29 7b 0a 20 20 20 20 7a 50 72 6f 63 20  =2 ){.    zProc 
9960: 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 29  = (const char *)
9970: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
9980: 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 7d  xt(argv[1]);.  }
9990: 65 6c 73 65 7b 0a 20 20 20 20 7a 50 72 6f 63 20  else{.    zProc 
99a0: 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a  = 0;.  }.  if( z
99b0: 46 69 6c 65 20 26 26 20 73 71 6c 69 74 65 33 5f  File && sqlite3_
99c0: 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 28 64  load_extension(d
99d0: 62 2c 20 7a 46 69 6c 65 2c 20 7a 50 72 6f 63 2c  b, zFile, zProc,
99e0: 20 26 7a 45 72 72 4d 73 67 29 20 29 7b 0a 20 20   &zErrMsg) ){.  
99f0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
9a00: 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20  _error(context, 
9a10: 7a 45 72 72 4d 73 67 2c 20 2d 31 29 3b 0a 20 20  zErrMsg, -1);.  
9a20: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a    sqlite3_free(z
9a30: 45 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 7d 0a 23  ErrMsg);.  }.}.#
9a40: 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 41 6e  endif.../*.** An
9a50: 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65   instance of the
9a60: 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63   following struc
9a70: 74 75 72 65 20 68 6f 6c 64 73 20 74 68 65 20 63  ture holds the c
9a80: 6f 6e 74 65 78 74 20 6f 66 20 61 0a 2a 2a 20 73  ontext of a.** s
9a90: 75 6d 28 29 20 6f 72 20 61 76 67 28 29 20 61 67  um() or avg() ag
9aa0: 67 72 65 67 61 74 65 20 63 6f 6d 70 75 74 61 74  gregate computat
9ab0: 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20  ion..*/.typedef 
9ac0: 73 74 72 75 63 74 20 53 75 6d 43 74 78 20 53 75  struct SumCtx Su
9ad0: 6d 43 74 78 3b 0a 73 74 72 75 63 74 20 53 75 6d  mCtx;.struct Sum
9ae0: 43 74 78 20 7b 0a 20 20 64 6f 75 62 6c 65 20 72  Ctx {.  double r
9af0: 53 75 6d 3b 20 20 20 20 20 20 2f 2a 20 46 6c 6f  Sum;      /* Flo
9b00: 61 74 69 6e 67 20 70 6f 69 6e 74 20 73 75 6d 20  ating point sum 
9b10: 2a 2f 0a 20 20 69 36 34 20 69 53 75 6d 3b 20 20  */.  i64 iSum;  
9b20: 20 20 20 20 20 20 20 2f 2a 20 49 6e 74 65 67 65         /* Intege
9b30: 72 20 73 75 6d 20 2a 2f 20 20 20 0a 20 20 69 36  r sum */   .  i6
9b40: 34 20 63 6e 74 3b 20 20 20 20 20 20 20 20 20 20  4 cnt;          
9b50: 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 65 6c 65  /* Number of ele
9b60: 6d 65 6e 74 73 20 73 75 6d 6d 65 64 20 2a 2f 0a  ments summed */.
9b70: 20 20 75 38 20 6f 76 65 72 66 6c 6f 77 3b 20 20    u8 overflow;  
9b80: 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 69      /* True if i
9b90: 6e 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 20  nteger overflow 
9ba0: 73 65 65 6e 20 2a 2f 0a 20 20 75 38 20 61 70 70  seen */.  u8 app
9bb0: 72 6f 78 3b 20 20 20 20 20 20 20 20 2f 2a 20 54  rox;        /* T
9bc0: 72 75 65 20 69 66 20 6e 6f 6e 2d 69 6e 74 65 67  rue if non-integ
9bd0: 65 72 20 76 61 6c 75 65 20 77 61 73 20 69 6e 70  er value was inp
9be0: 75 74 20 74 6f 20 74 68 65 20 73 75 6d 20 2a 2f  ut to the sum */
9bf0: 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69  .};../*.** Routi
9c00: 6e 65 73 20 75 73 65 64 20 74 6f 20 63 6f 6d 70  nes used to comp
9c10: 75 74 65 20 74 68 65 20 73 75 6d 2c 20 61 76 65  ute the sum, ave
9c20: 72 61 67 65 2c 20 61 6e 64 20 74 6f 74 61 6c 2e  rage, and total.
9c30: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 53 55 4d 28 29  .**.** The SUM()
9c40: 20 66 75 6e 63 74 69 6f 6e 20 66 6f 6c 6c 6f 77   function follow
9c50: 73 20 74 68 65 20 28 62 72 6f 6b 65 6e 29 20 53  s the (broken) S
9c60: 51 4c 20 73 74 61 6e 64 61 72 64 20 77 68 69 63  QL standard whic
9c70: 68 20 6d 65 61 6e 73 0a 2a 2a 20 74 68 61 74 20  h means.** that 
9c80: 69 74 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 20  it returns NULL 
9c90: 69 66 20 69 74 20 73 75 6d 73 20 6f 76 65 72 20  if it sums over 
9ca0: 6e 6f 20 69 6e 70 75 74 73 2e 20 20 54 4f 54 41  no inputs.  TOTA
9cb0: 4c 20 72 65 74 75 72 6e 73 0a 2a 2a 20 30 2e 30  L returns.** 0.0
9cc0: 20 69 6e 20 74 68 61 74 20 63 61 73 65 2e 20 20   in that case.  
9cd0: 49 6e 20 61 64 64 69 74 69 6f 6e 2c 20 54 4f 54  In addition, TOT
9ce0: 41 4c 20 61 6c 77 61 79 73 20 72 65 74 75 72 6e  AL always return
9cf0: 73 20 61 20 66 6c 6f 61 74 20 77 68 65 72 65 0a  s a float where.
9d00: 2a 2a 20 53 55 4d 20 6d 69 67 68 74 20 72 65 74  ** SUM might ret
9d10: 75 72 6e 20 61 6e 20 69 6e 74 65 67 65 72 20 69  urn an integer i
9d20: 66 20 69 74 20 6e 65 76 65 72 20 65 6e 63 6f 75  f it never encou
9d30: 6e 74 65 72 73 20 61 20 66 6c 6f 61 74 69 6e 67  nters a floating
9d40: 20 70 6f 69 6e 74 0a 2a 2a 20 76 61 6c 75 65 2e   point.** value.
9d50: 20 20 54 4f 54 41 4c 20 6e 65 76 65 72 20 66 61    TOTAL never fa
9d60: 69 6c 73 2c 20 62 75 74 20 53 55 4d 20 6d 69 67  ils, but SUM mig
9d70: 68 74 20 74 68 72 6f 75 67 68 20 61 6e 20 65 78  ht through an ex
9d80: 63 65 70 74 69 6f 6e 20 69 66 0a 2a 2a 20 69 74  ception if.** it
9d90: 20 6f 76 65 72 66 6c 6f 77 73 20 61 6e 20 69 6e   overflows an in
9da0: 74 65 67 65 72 2e 0a 2a 2f 0a 73 74 61 74 69 63  teger..*/.static
9db0: 20 76 6f 69 64 20 73 75 6d 53 74 65 70 28 73 71   void sumStep(sq
9dc0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
9dd0: 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63  ontext, int argc
9de0: 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20  , sqlite3_value 
9df0: 2a 2a 61 72 67 76 29 7b 0a 20 20 53 75 6d 43 74  **argv){.  SumCt
9e00: 78 20 2a 70 3b 0a 20 20 69 6e 74 20 74 79 70 65  x *p;.  int type
9e10: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
9e20: 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f  ==1 );.  UNUSED_
9e30: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
9e40: 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61  .  p = sqlite3_a
9e50: 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74  ggregate_context
9e60: 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66  (context, sizeof
9e70: 28 2a 70 29 29 3b 0a 20 20 74 79 70 65 20 3d 20  (*p));.  type = 
9e80: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 6e 75  sqlite3_value_nu
9e90: 6d 65 72 69 63 5f 74 79 70 65 28 61 72 67 76 5b  meric_type(argv[
9ea0: 30 5d 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20  0]);.  if( p && 
9eb0: 74 79 70 65 21 3d 53 51 4c 49 54 45 5f 4e 55 4c  type!=SQLITE_NUL
9ec0: 4c 20 29 7b 0a 20 20 20 20 70 2d 3e 63 6e 74 2b  L ){.    p->cnt+
9ed0: 2b 3b 0a 20 20 20 20 69 66 28 20 74 79 70 65 3d  +;.    if( type=
9ee0: 3d 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 20  =SQLITE_INTEGER 
9ef0: 29 7b 0a 20 20 20 20 20 20 69 36 34 20 76 20 3d  ){.      i64 v =
9f00: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
9f10: 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20  nt64(argv[0]);. 
9f20: 20 20 20 20 20 70 2d 3e 72 53 75 6d 20 2b 3d 20       p->rSum += 
9f30: 76 3b 0a 20 20 20 20 20 20 69 66 28 20 28 70 2d  v;.      if( (p-
9f40: 3e 61 70 70 72 6f 78 7c 70 2d 3e 6f 76 65 72 66  >approx|p->overf
9f50: 6c 6f 77 29 3d 3d 30 20 26 26 20 73 71 6c 69 74  low)==0 && sqlit
9f60: 65 33 41 64 64 49 6e 74 36 34 28 26 70 2d 3e 69  e3AddInt64(&p->i
9f70: 53 75 6d 2c 20 76 29 20 29 7b 0a 20 20 20 20 20  Sum, v) ){.     
9f80: 20 20 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20 3d     p->overflow =
9f90: 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   1;.      }.    
9fa0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 70 2d 3e  }else{.      p->
9fb0: 72 53 75 6d 20 2b 3d 20 73 71 6c 69 74 65 33 5f  rSum += sqlite3_
9fc0: 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67  value_double(arg
9fd0: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e  v[0]);.      p->
9fe0: 61 70 70 72 6f 78 20 3d 20 31 3b 0a 20 20 20 20  approx = 1;.    
9ff0: 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76  }.  }.}.static v
a000: 6f 69 64 20 73 75 6d 46 69 6e 61 6c 69 7a 65 28  oid sumFinalize(
a010: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
a020: 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d  *context){.  Sum
a030: 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71  Ctx *p;.  p = sq
a040: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
a050: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
a060: 20 30 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20   0);.  if( p && 
a070: 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20 20  p->cnt>0 ){.    
a080: 69 66 28 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20  if( p->overflow 
a090: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
a0a0: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
a0b0: 6e 74 65 78 74 2c 22 69 6e 74 65 67 65 72 20 6f  ntext,"integer o
a0c0: 76 65 72 66 6c 6f 77 22 2c 2d 31 29 3b 0a 20 20  verflow",-1);.  
a0d0: 20 20 7d 65 6c 73 65 20 69 66 28 20 70 2d 3e 61    }else if( p->a
a0e0: 70 70 72 6f 78 20 29 7b 0a 20 20 20 20 20 20 73  pprox ){.      s
a0f0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f  qlite3_result_do
a100: 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 2d  uble(context, p-
a110: 3e 72 53 75 6d 29 3b 0a 20 20 20 20 7d 65 6c 73  >rSum);.    }els
a120: 65 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  e{.      sqlite3
a130: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f  _result_int64(co
a140: 6e 74 65 78 74 2c 20 70 2d 3e 69 53 75 6d 29 3b  ntext, p->iSum);
a150: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61  .    }.  }.}.sta
a160: 74 69 63 20 76 6f 69 64 20 61 76 67 46 69 6e 61  tic void avgFina
a170: 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e  lize(sqlite3_con
a180: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
a190: 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70    SumCtx *p;.  p
a1a0: 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65   = sqlite3_aggre
a1b0: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
a1c0: 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20  text, 0);.  if( 
a1d0: 70 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b  p && p->cnt>0 ){
a1e0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
a1f0: 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65  ult_double(conte
a200: 78 74 2c 20 70 2d 3e 72 53 75 6d 2f 28 64 6f 75  xt, p->rSum/(dou
a210: 62 6c 65 29 70 2d 3e 63 6e 74 29 3b 0a 20 20 7d  ble)p->cnt);.  }
a220: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74  .}.static void t
a230: 6f 74 61 6c 46 69 6e 61 6c 69 7a 65 28 73 71 6c  otalFinalize(sql
a240: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
a250: 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78  ntext){.  SumCtx
a260: 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74   *p;.  p = sqlit
a270: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
a280: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29  text(context, 0)
a290: 3b 0a 20 20 2f 2a 20 28 64 6f 75 62 6c 65 29 30  ;.  /* (double)0
a2a0: 20 49 6e 20 63 61 73 65 20 6f 66 20 53 51 4c 49   In case of SQLI
a2b0: 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47  TE_OMIT_FLOATING
a2c0: 5f 50 4f 49 4e 54 2e 2e 2e 20 2a 2f 0a 20 20 73  _POINT... */.  s
a2d0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f  qlite3_result_do
a2e0: 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 20  uble(context, p 
a2f0: 3f 20 70 2d 3e 72 53 75 6d 20 3a 20 28 64 6f 75  ? p->rSum : (dou
a300: 62 6c 65 29 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  ble)0);.}../*.**
a310: 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73   The following s
a320: 74 72 75 63 74 75 72 65 20 6b 65 65 70 73 20 74  tructure keeps t
a330: 72 61 63 6b 20 6f 66 20 73 74 61 74 65 20 69 6e  rack of state in
a340: 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68  formation for th
a350: 65 0a 2a 2a 20 63 6f 75 6e 74 28 29 20 61 67 67  e.** count() agg
a360: 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e  regate function.
a370: 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75  .*/.typedef stru
a380: 63 74 20 43 6f 75 6e 74 43 74 78 20 43 6f 75 6e  ct CountCtx Coun
a390: 74 43 74 78 3b 0a 73 74 72 75 63 74 20 43 6f 75  tCtx;.struct Cou
a3a0: 6e 74 43 74 78 20 7b 0a 20 20 69 36 34 20 6e 3b  ntCtx {.  i64 n;
a3b0: 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69  .};../*.** Routi
a3c0: 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74  nes to implement
a3d0: 20 74 68 65 20 63 6f 75 6e 74 28 29 20 61 67 67   the count() agg
a3e0: 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e  regate function.
a3f0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
a400: 63 6f 75 6e 74 53 74 65 70 28 73 71 6c 69 74 65  countStep(sqlite
a410: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
a420: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
a430: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
a440: 67 76 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20  gv){.  CountCtx 
a450: 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65  *p;.  p = sqlite
a460: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
a470: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a  ext(context, siz
a480: 65 6f 66 28 2a 70 29 29 3b 0a 20 20 69 66 28 20  eof(*p));.  if( 
a490: 28 61 72 67 63 3d 3d 30 20 7c 7c 20 53 51 4c 49  (argc==0 || SQLI
a4a0: 54 45 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33  TE_NULL!=sqlite3
a4b0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
a4c0: 5b 30 5d 29 29 20 26 26 20 70 20 29 7b 0a 20 20  [0])) && p ){.  
a4d0: 20 20 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a 0a 23    p->n++;.  }..#
a4e0: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
a4f0: 49 54 5f 44 45 50 52 45 43 41 54 45 44 0a 20 20  IT_DEPRECATED.  
a500: 2f 2a 20 54 68 65 20 73 71 6c 69 74 65 33 5f 61  /* The sqlite3_a
a510: 67 67 72 65 67 61 74 65 5f 63 6f 75 6e 74 28 29  ggregate_count()
a520: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 64 65 70   function is dep
a530: 72 65 63 61 74 65 64 2e 20 20 42 75 74 20 6a 75  recated.  But ju
a540: 73 74 20 74 6f 20 6d 61 6b 65 0a 20 20 2a 2a 20  st to make.  ** 
a550: 73 75 72 65 20 69 74 20 73 74 69 6c 6c 20 6f 70  sure it still op
a560: 65 72 61 74 65 73 20 63 6f 72 72 65 63 74 6c 79  erates correctly
a570: 2c 20 76 65 72 69 66 79 20 74 68 61 74 20 69 74  , verify that it
a580: 73 20 63 6f 75 6e 74 20 61 67 72 65 65 73 20 77  s count agrees w
a590: 69 74 68 20 6f 75 72 20 0a 20 20 2a 2a 20 69 6e  ith our .  ** in
a5a0: 74 65 72 6e 61 6c 20 63 6f 75 6e 74 20 77 68 65  ternal count whe
a5b0: 6e 20 75 73 69 6e 67 20 63 6f 75 6e 74 28 2a 29  n using count(*)
a5c0: 20 61 6e 64 20 77 68 65 6e 20 74 68 65 20 74 6f   and when the to
a5d0: 74 61 6c 20 63 6f 75 6e 74 20 63 61 6e 20 62 65  tal count can be
a5e0: 0a 20 20 2a 2a 20 65 78 70 72 65 73 73 65 64 20  .  ** expressed 
a5f0: 61 73 20 61 20 33 32 2d 62 69 74 20 69 6e 74 65  as a 32-bit inte
a600: 67 65 72 2e 20 2a 2f 0a 20 20 61 73 73 65 72 74  ger. */.  assert
a610: 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20 70 3d 3d  ( argc==1 || p==
a620: 30 20 7c 7c 20 70 2d 3e 6e 3e 30 78 37 66 66 66  0 || p->n>0x7fff
a630: 66 66 66 66 0a 20 20 20 20 20 20 20 20 20 20 7c  ffff.          |
a640: 7c 20 70 2d 3e 6e 3d 3d 73 71 6c 69 74 65 33 5f  | p->n==sqlite3_
a650: 61 67 67 72 65 67 61 74 65 5f 63 6f 75 6e 74 28  aggregate_count(
a660: 63 6f 6e 74 65 78 74 29 20 29 3b 0a 23 65 6e 64  context) );.#end
a670: 69 66 0a 7d 20 20 20 0a 73 74 61 74 69 63 20 76  if.}   .static v
a680: 6f 69 64 20 63 6f 75 6e 74 46 69 6e 61 6c 69 7a  oid countFinaliz
a690: 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  e(sqlite3_contex
a6a0: 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 43  t *context){.  C
a6b0: 6f 75 6e 74 43 74 78 20 2a 70 3b 0a 20 20 70 20  ountCtx *p;.  p 
a6c0: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
a6d0: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
a6e0: 65 78 74 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74  ext, 0);.  sqlit
a6f0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28  e3_result_int64(
a700: 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20 70 2d 3e  context, p ? p->
a710: 6e 20 3a 20 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  n : 0);.}../*.**
a720: 20 52 6f 75 74 69 6e 65 73 20 74 6f 20 69 6d 70   Routines to imp
a730: 6c 65 6d 65 6e 74 20 6d 69 6e 28 29 20 61 6e 64  lement min() and
a740: 20 6d 61 78 28 29 20 61 67 67 72 65 67 61 74 65   max() aggregate
a750: 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73   functions..*/.s
a760: 74 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 6d 61  tatic void minma
a770: 78 53 74 65 70 28 0a 20 20 73 71 6c 69 74 65 33  xStep(.  sqlite3
a780: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
a790: 74 2c 20 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  t, .  int NotUse
a7a0: 64 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  d, .  sqlite3_va
a7b0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
a7c0: 4d 65 6d 20 2a 70 41 72 67 20 20 3d 20 28 4d 65  Mem *pArg  = (Me
a7d0: 6d 20 2a 29 61 72 67 76 5b 30 5d 3b 0a 20 20 4d  m *)argv[0];.  M
a7e0: 65 6d 20 2a 70 42 65 73 74 3b 0a 20 20 55 4e 55  em *pBest;.  UNU
a7f0: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f  SED_PARAMETER(No
a800: 74 55 73 65 64 29 3b 0a 0a 20 20 70 42 65 73 74  tUsed);..  pBest
a810: 20 3d 20 28 4d 65 6d 20 2a 29 73 71 6c 69 74 65   = (Mem *)sqlite
a820: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
a830: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a  ext(context, siz
a840: 65 6f 66 28 2a 70 42 65 73 74 29 29 3b 0a 20 20  eof(*pBest));.  
a850: 69 66 28 20 21 70 42 65 73 74 20 29 20 72 65 74  if( !pBest ) ret
a860: 75 72 6e 3b 0a 0a 20 20 69 66 28 20 73 71 6c 69  urn;..  if( sqli
a870: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
a880: 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f  rgv[0])==SQLITE_
a890: 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 69 66 28 20  NULL ){.    if( 
a8a0: 70 42 65 73 74 2d 3e 66 6c 61 67 73 20 29 20 73  pBest->flags ) s
a8b0: 71 6c 69 74 65 33 53 6b 69 70 41 63 63 75 6d 75  qlite3SkipAccumu
a8c0: 6c 61 74 6f 72 4c 6f 61 64 28 63 6f 6e 74 65 78  latorLoad(contex
a8d0: 74 29 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20  t);.  }else if( 
a8e0: 70 42 65 73 74 2d 3e 66 6c 61 67 73 20 29 7b 0a  pBest->flags ){.
a8f0: 20 20 20 20 69 6e 74 20 6d 61 78 3b 0a 20 20 20      int max;.   
a900: 20 69 6e 74 20 63 6d 70 3b 0a 20 20 20 20 43 6f   int cmp;.    Co
a910: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73  llSeq *pColl = s
a920: 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c  qlite3GetFuncCol
a930: 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20  lSeq(context);. 
a940: 20 20 20 2f 2a 20 54 68 69 73 20 73 74 65 70 20     /* This step 
a950: 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64  function is used
a960: 20 66 6f 72 20 62 6f 74 68 20 74 68 65 20 6d 69   for both the mi
a970: 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67  n() and max() ag
a980: 67 72 65 67 61 74 65 73 2c 0a 20 20 20 20 2a 2a  gregates,.    **
a990: 20 74 68 65 20 6f 6e 6c 79 20 64 69 66 66 65 72   the only differ
a9a0: 65 6e 63 65 20 62 65 74 77 65 65 6e 20 74 68 65  ence between the
a9b0: 20 74 77 6f 20 62 65 69 6e 67 20 74 68 61 74 20   two being that 
a9c0: 74 68 65 20 73 65 6e 73 65 20 6f 66 20 74 68 65  the sense of the
a9d0: 0a 20 20 20 20 2a 2a 20 63 6f 6d 70 61 72 69 73  .    ** comparis
a9e0: 6f 6e 20 69 73 20 69 6e 76 65 72 74 65 64 2e 20  on is inverted. 
a9f0: 46 6f 72 20 74 68 65 20 6d 61 78 28 29 20 61 67  For the max() ag
aa00: 67 72 65 67 61 74 65 2c 20 74 68 65 0a 20 20 20  gregate, the.   
aa10: 20 2a 2a 20 73 71 6c 69 74 65 33 5f 75 73 65 72   ** sqlite3_user
aa20: 5f 64 61 74 61 28 29 20 66 75 6e 63 74 69 6f 6e  _data() function
aa30: 20 72 65 74 75 72 6e 73 20 28 76 6f 69 64 20 2a   returns (void *
aa40: 29 2d 31 2e 20 46 6f 72 20 6d 69 6e 28 29 20 69  )-1. For min() i
aa50: 74 0a 20 20 20 20 2a 2a 20 72 65 74 75 72 6e 73  t.    ** returns
aa60: 20 28 76 6f 69 64 20 2a 29 64 62 2c 20 77 68 65   (void *)db, whe
aa70: 72 65 20 64 62 20 69 73 20 74 68 65 20 73 71 6c  re db is the sql
aa80: 69 74 65 33 2a 20 64 61 74 61 62 61 73 65 20 70  ite3* database p
aa90: 6f 69 6e 74 65 72 2e 0a 20 20 20 20 2a 2a 20 54  ointer..    ** T
aaa0: 68 65 72 65 66 6f 72 65 20 74 68 65 20 6e 65 78  herefore the nex
aab0: 74 20 73 74 61 74 65 6d 65 6e 74 20 73 65 74 73  t statement sets
aac0: 20 76 61 72 69 61 62 6c 65 20 27 6d 61 78 27 20   variable 'max' 
aad0: 74 6f 20 31 20 66 6f 72 20 74 68 65 20 6d 61 78  to 1 for the max
aae0: 28 29 0a 20 20 20 20 2a 2a 20 61 67 67 72 65 67  ().    ** aggreg
aaf0: 61 74 65 2c 20 6f 72 20 30 20 66 6f 72 20 6d 69  ate, or 0 for mi
ab00: 6e 28 29 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20  n()..    */.    
ab10: 6d 61 78 20 3d 20 73 71 6c 69 74 65 33 5f 75 73  max = sqlite3_us
ab20: 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29  er_data(context)
ab30: 21 3d 30 3b 0a 20 20 20 20 63 6d 70 20 3d 20 73  !=0;.    cmp = s
ab40: 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65  qlite3MemCompare
ab50: 28 70 42 65 73 74 2c 20 70 41 72 67 2c 20 70 43  (pBest, pArg, pC
ab60: 6f 6c 6c 29 3b 0a 20 20 20 20 69 66 28 20 28 6d  oll);.    if( (m
ab70: 61 78 20 26 26 20 63 6d 70 3c 30 29 20 7c 7c 20  ax && cmp<0) || 
ab80: 28 21 6d 61 78 20 26 26 20 63 6d 70 3e 30 29 20  (!max && cmp>0) 
ab90: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
aba0: 56 64 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73  VdbeMemCopy(pBes
abb0: 74 2c 20 70 41 72 67 29 3b 0a 20 20 20 20 7d 65  t, pArg);.    }e
abc0: 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  lse{.      sqlit
abd0: 65 33 53 6b 69 70 41 63 63 75 6d 75 6c 61 74 6f  e3SkipAccumulato
abe0: 72 4c 6f 61 64 28 63 6f 6e 74 65 78 74 29 3b 0a  rLoad(context);.
abf0: 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20      }.  }else{. 
ac00: 20 20 20 70 42 65 73 74 2d 3e 64 62 20 3d 20 73     pBest->db = s
ac10: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
ac20: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
ac30: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 56 64  );.    sqlite3Vd
ac40: 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74 2c  beMemCopy(pBest,
ac50: 20 70 41 72 67 29 3b 0a 20 20 7d 0a 7d 0a 73 74   pArg);.  }.}.st
ac60: 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 4d 61 78  atic void minMax
ac70: 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33  Finalize(sqlite3
ac80: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
ac90: 74 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  t){.  sqlite3_va
aca0: 6c 75 65 20 2a 70 52 65 73 3b 0a 20 20 70 52 65  lue *pRes;.  pRe
acb0: 73 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 61 6c  s = (sqlite3_val
acc0: 75 65 20 2a 29 73 71 6c 69 74 65 33 5f 61 67 67  ue *)sqlite3_agg
acd0: 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63  regate_context(c
ace0: 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66  ontext, 0);.  if
acf0: 28 20 70 52 65 73 20 29 7b 0a 20 20 20 20 69 66  ( pRes ){.    if
ad00: 28 20 70 52 65 73 2d 3e 66 6c 61 67 73 20 29 7b  ( pRes->flags ){
ad10: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
ad20: 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74  esult_value(cont
ad30: 65 78 74 2c 20 70 52 65 73 29 3b 0a 20 20 20 20  ext, pRes);.    
ad40: 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 56 64 62  }.    sqlite3Vdb
ad50: 65 4d 65 6d 52 65 6c 65 61 73 65 28 70 52 65 73  eMemRelease(pRes
ad60: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
ad70: 67 72 6f 75 70 5f 63 6f 6e 63 61 74 28 45 58 50  group_concat(EXP
ad80: 52 2c 20 3f 53 45 50 41 52 41 54 4f 52 3f 29 0a  R, ?SEPARATOR?).
ad90: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 67  */.static void g
ada0: 72 6f 75 70 43 6f 6e 63 61 74 53 74 65 70 28 0a  roupConcatStep(.
adb0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
adc0: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
add0: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
ade0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
adf0: 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  {.  const char *
ae00: 7a 56 61 6c 3b 0a 20 20 53 74 72 41 63 63 75 6d  zVal;.  StrAccum
ae10: 20 2a 70 41 63 63 75 6d 3b 0a 20 20 63 6f 6e 73   *pAccum;.  cons
ae20: 74 20 63 68 61 72 20 2a 7a 53 65 70 3b 0a 20 20  t char *zSep;.  
ae30: 69 6e 74 20 6e 56 61 6c 2c 20 6e 53 65 70 3b 0a  int nVal, nSep;.
ae40: 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d    assert( argc==
ae50: 31 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a  1 || argc==2 );.
ae60: 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61    if( sqlite3_va
ae70: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
ae80: 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29  )==SQLITE_NULL )
ae90: 20 72 65 74 75 72 6e 3b 0a 20 20 70 41 63 63 75   return;.  pAccu
aea0: 6d 20 3d 20 28 53 74 72 41 63 63 75 6d 2a 29 73  m = (StrAccum*)s
aeb0: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
aec0: 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74  _context(context
aed0: 2c 20 73 69 7a 65 6f 66 28 2a 70 41 63 63 75 6d  , sizeof(*pAccum
aee0: 29 29 3b 0a 0a 20 20 69 66 28 20 70 41 63 63 75  ));..  if( pAccu
aef0: 6d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  m ){.    sqlite3
af00: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
af10: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
af20: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 69  (context);.    i
af30: 6e 74 20 66 69 72 73 74 54 65 72 6d 20 3d 20 70  nt firstTerm = p
af40: 41 63 63 75 6d 2d 3e 75 73 65 4d 61 6c 6c 6f 63  Accum->useMalloc
af50: 3d 3d 30 3b 0a 20 20 20 20 70 41 63 63 75 6d 2d  ==0;.    pAccum-
af60: 3e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 32 3b 0a  >useMalloc = 2;.
af70: 20 20 20 20 70 41 63 63 75 6d 2d 3e 6d 78 41 6c      pAccum->mxAl
af80: 6c 6f 63 20 3d 20 64 62 2d 3e 61 4c 69 6d 69 74  loc = db->aLimit
af90: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45  [SQLITE_LIMIT_LE
afa0: 4e 47 54 48 5d 3b 0a 20 20 20 20 69 66 28 20 21  NGTH];.    if( !
afb0: 66 69 72 73 74 54 65 72 6d 20 29 7b 0a 20 20 20  firstTerm ){.   
afc0: 20 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29     if( argc==2 )
afd0: 7b 0a 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d  {.        zSep =
afe0: 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f   (char*)sqlite3_
aff0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
b000: 31 5d 29 3b 0a 20 20 20 20 20 20 20 20 6e 53 65  1]);.        nSe
b010: 70 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  p = sqlite3_valu
b020: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 31 5d 29  e_bytes(argv[1])
b030: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20  ;.      }else{. 
b040: 20 20 20 20 20 20 20 7a 53 65 70 20 3d 20 22 2c         zSep = ",
b050: 22 3b 0a 20 20 20 20 20 20 20 20 6e 53 65 70 20  ";.        nSep 
b060: 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  = 1;.      }.   
b070: 20 20 20 69 66 28 20 6e 53 65 70 20 29 20 73 71     if( nSep ) sq
b080: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70  lite3StrAccumApp
b090: 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 53 65 70  end(pAccum, zSep
b0a0: 2c 20 6e 53 65 70 29 3b 0a 20 20 20 20 7d 0a 20  , nSep);.    }. 
b0b0: 20 20 20 7a 56 61 6c 20 3d 20 28 63 68 61 72 2a     zVal = (char*
b0c0: 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  )sqlite3_value_t
b0d0: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
b0e0: 20 20 6e 56 61 6c 20 3d 20 73 71 6c 69 74 65 33    nVal = sqlite3
b0f0: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
b100: 76 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a  v[0]);.    if( z
b110: 56 61 6c 20 29 20 73 71 6c 69 74 65 33 53 74 72  Val ) sqlite3Str
b120: 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63  AccumAppend(pAcc
b130: 75 6d 2c 20 7a 56 61 6c 2c 20 6e 56 61 6c 29 3b  um, zVal, nVal);
b140: 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f  .  }.}.static vo
b150: 69 64 20 67 72 6f 75 70 43 6f 6e 63 61 74 46 69  id groupConcatFi
b160: 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63  nalize(sqlite3_c
b170: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29  ontext *context)
b180: 7b 0a 20 20 53 74 72 41 63 63 75 6d 20 2a 70 41  {.  StrAccum *pA
b190: 63 63 75 6d 3b 0a 20 20 70 41 63 63 75 6d 20 3d  ccum;.  pAccum =
b1a0: 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61   sqlite3_aggrega
b1b0: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
b1c0: 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 41  xt, 0);.  if( pA
b1d0: 63 63 75 6d 20 29 7b 0a 20 20 20 20 69 66 28 20  ccum ){.    if( 
b1e0: 70 41 63 63 75 6d 2d 3e 61 63 63 45 72 72 6f 72  pAccum->accError
b1f0: 3d 3d 53 54 52 41 43 43 55 4d 5f 54 4f 4f 42 49  ==STRACCUM_TOOBI
b200: 47 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  G ){.      sqlit
b210: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
b220: 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29 3b  toobig(context);
b230: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 70  .    }else if( p
b240: 41 63 63 75 6d 2d 3e 61 63 63 45 72 72 6f 72 3d  Accum->accError=
b250: 3d 53 54 52 41 43 43 55 4d 5f 4e 4f 4d 45 4d 20  =STRACCUM_NOMEM 
b260: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
b270: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f  _result_error_no
b280: 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  mem(context);.  
b290: 20 20 7d 65 6c 73 65 7b 20 20 20 20 0a 20 20 20    }else{    .   
b2a0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
b2b0: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
b2c0: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46  sqlite3StrAccumF
b2d0: 69 6e 69 73 68 28 70 41 63 63 75 6d 29 2c 20 2d  inish(pAccum), -
b2e0: 31 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20  1, .            
b2f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 71                sq
b300: 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20  lite3_free);.   
b310: 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20   }.  }.}../*.** 
b320: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 64 6f 65  This routine doe
b330: 73 20 70 65 72 2d 63 6f 6e 6e 65 63 74 69 6f 6e  s per-connection
b340: 20 66 75 6e 63 74 69 6f 6e 20 72 65 67 69 73 74   function regist
b350: 72 61 74 69 6f 6e 2e 20 20 4d 6f 73 74 0a 2a 2a  ration.  Most.**
b360: 20 6f 66 20 74 68 65 20 62 75 69 6c 74 2d 69 6e   of the built-in
b370: 20 66 75 6e 63 74 69 6f 6e 73 20 61 62 6f 76 65   functions above
b380: 20 61 72 65 20 70 61 72 74 20 6f 66 20 74 68 65   are part of the
b390: 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f 6e   global function
b3a0: 20 73 65 74 2e 0a 2a 2a 20 54 68 69 73 20 72 6f   set..** This ro
b3b0: 75 74 69 6e 65 20 6f 6e 6c 79 20 64 65 61 6c 73  utine only deals
b3c0: 20 77 69 74 68 20 74 68 6f 73 65 20 74 68 61 74   with those that
b3d0: 20 61 72 65 20 6e 6f 74 20 67 6c 6f 62 61 6c 2e   are not global.
b3e0: 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33  .*/.void sqlite3
b3f0: 52 65 67 69 73 74 65 72 42 75 69 6c 74 69 6e 46  RegisterBuiltinF
b400: 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65 33  unctions(sqlite3
b410: 20 2a 64 62 29 7b 0a 20 20 69 6e 74 20 72 63 20   *db){.  int rc 
b420: 3d 20 73 71 6c 69 74 65 33 5f 6f 76 65 72 6c 6f  = sqlite3_overlo
b430: 61 64 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20  ad_function(db, 
b440: 22 4d 41 54 43 48 22 2c 20 32 29 3b 0a 20 20 61  "MATCH", 2);.  a
b450: 73 73 65 72 74 28 20 72 63 3d 3d 53 51 4c 49 54  ssert( rc==SQLIT
b460: 45 5f 4e 4f 4d 45 4d 20 7c 7c 20 72 63 3d 3d 53  E_NOMEM || rc==S
b470: 51 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20 20 69 66  QLITE_OK );.  if
b480: 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f 4d  ( rc==SQLITE_NOM
b490: 45 4d 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d 61  EM ){.    db->ma
b4a0: 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b 0a  llocFailed = 1;.
b4b0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74    }.}../*.** Set
b4c0: 20 74 68 65 20 4c 49 4b 45 4f 50 54 20 66 6c 61   the LIKEOPT fla
b4d0: 67 20 6f 6e 20 74 68 65 20 32 2d 61 72 67 75 6d  g on the 2-argum
b4e0: 65 6e 74 20 66 75 6e 63 74 69 6f 6e 20 77 69 74  ent function wit
b4f0: 68 20 74 68 65 20 67 69 76 65 6e 20 6e 61 6d 65  h the given name
b500: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
b510: 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28   setLikeOptFlag(
b520: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e  sqlite3 *db, con
b530: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20  st char *zName, 
b540: 75 38 20 66 6c 61 67 56 61 6c 29 7b 0a 20 20 46  u8 flagVal){.  F
b550: 75 6e 63 44 65 66 20 2a 70 44 65 66 3b 0a 20 20  uncDef *pDef;.  
b560: 70 44 65 66 20 3d 20 73 71 6c 69 74 65 33 46 69  pDef = sqlite3Fi
b570: 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20 7a  ndFunction(db, z
b580: 4e 61 6d 65 2c 20 73 71 6c 69 74 65 33 53 74 72  Name, sqlite3Str
b590: 6c 65 6e 33 30 28 7a 4e 61 6d 65 29 2c 0a 20 20  len30(zName),.  
b5a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b5b0: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 53 51             2, SQ
b5c0: 4c 49 54 45 5f 55 54 46 38 2c 20 30 29 3b 0a 20  LITE_UTF8, 0);. 
b5d0: 20 69 66 28 20 41 4c 57 41 59 53 28 70 44 65 66   if( ALWAYS(pDef
b5e0: 29 20 29 7b 0a 20 20 20 20 70 44 65 66 2d 3e 66  ) ){.    pDef->f
b5f0: 75 6e 63 46 6c 61 67 73 20 7c 3d 20 66 6c 61 67  uncFlags |= flag
b600: 56 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  Val;.  }.}../*.*
b610: 2a 20 52 65 67 69 73 74 65 72 20 74 68 65 20 62  * Register the b
b620: 75 69 6c 74 2d 69 6e 20 4c 49 4b 45 20 61 6e 64  uilt-in LIKE and
b630: 20 47 4c 4f 42 20 66 75 6e 63 74 69 6f 6e 73 2e   GLOB functions.
b640: 20 20 54 68 65 20 63 61 73 65 53 65 6e 73 69 74    The caseSensit
b650: 69 76 65 0a 2a 2a 20 70 61 72 61 6d 65 74 65 72  ive.** parameter
b660: 20 64 65 74 65 72 6d 69 6e 65 73 20 77 68 65 74   determines whet
b670: 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 65 20 4c  her or not the L
b680: 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 69 73 20  IKE operator is 
b690: 63 61 73 65 0a 2a 2a 20 73 65 6e 73 69 74 69 76  case.** sensitiv
b6a0: 65 2e 20 20 47 4c 4f 42 20 69 73 20 61 6c 77 61  e.  GLOB is alwa
b6b0: 79 73 20 63 61 73 65 20 73 65 6e 73 69 74 69 76  ys case sensitiv
b6c0: 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74  e..*/.void sqlit
b6d0: 65 33 52 65 67 69 73 74 65 72 4c 69 6b 65 46 75  e3RegisterLikeFu
b6e0: 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65 33 20  nctions(sqlite3 
b6f0: 2a 64 62 2c 20 69 6e 74 20 63 61 73 65 53 65 6e  *db, int caseSen
b700: 73 69 74 69 76 65 29 7b 0a 20 20 73 74 72 75 63  sitive){.  struc
b710: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70  t compareInfo *p
b720: 49 6e 66 6f 3b 0a 20 20 69 66 28 20 63 61 73 65  Info;.  if( case
b730: 53 65 6e 73 69 74 69 76 65 20 29 7b 0a 20 20 20  Sensitive ){.   
b740: 20 70 49 6e 66 6f 20 3d 20 28 73 74 72 75 63 74   pInfo = (struct
b750: 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26 6c   compareInfo*)&l
b760: 69 6b 65 49 6e 66 6f 41 6c 74 3b 0a 20 20 7d 65  ikeInfoAlt;.  }e
b770: 6c 73 65 7b 0a 20 20 20 20 70 49 6e 66 6f 20 3d  lse{.    pInfo =
b780: 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65   (struct compare
b790: 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66 6f 4e  Info*)&likeInfoN
b7a0: 6f 72 6d 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  orm;.  }.  sqlit
b7b0: 65 33 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c  e3CreateFunc(db,
b7c0: 20 22 6c 69 6b 65 22 2c 20 32 2c 20 53 51 4c 49   "like", 2, SQLI
b7d0: 54 45 5f 55 54 46 38 2c 20 70 49 6e 66 6f 2c 20  TE_UTF8, pInfo, 
b7e0: 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30 2c 20  likeFunc, 0, 0, 
b7f0: 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 43 72 65  0);.  sqlite3Cre
b800: 61 74 65 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b  ateFunc(db, "lik
b810: 65 22 2c 20 33 2c 20 53 51 4c 49 54 45 5f 55 54  e", 3, SQLITE_UT
b820: 46 38 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46  F8, pInfo, likeF
b830: 75 6e 63 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20  unc, 0, 0, 0);. 
b840: 20 73 71 6c 69 74 65 33 43 72 65 61 74 65 46 75   sqlite3CreateFu
b850: 6e 63 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20 32  nc(db, "glob", 2
b860: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 0a  , SQLITE_UTF8, .
b870: 20 20 20 20 20 20 28 73 74 72 75 63 74 20 63 6f        (struct co
b880: 6d 70 61 72 65 49 6e 66 6f 2a 29 26 67 6c 6f 62  mpareInfo*)&glob
b890: 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20  Info, likeFunc, 
b8a0: 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73 65 74 4c  0, 0, 0);.  setL
b8b0: 69 6b 65 4f 70 74 46 6c 61 67 28 64 62 2c 20 22  ikeOptFlag(db, "
b8c0: 67 6c 6f 62 22 2c 20 53 51 4c 49 54 45 5f 46 55  glob", SQLITE_FU
b8d0: 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49 54 45  NC_LIKE | SQLITE
b8e0: 5f 46 55 4e 43 5f 43 41 53 45 29 3b 0a 20 20 73  _FUNC_CASE);.  s
b8f0: 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 64 62  etLikeOptFlag(db
b900: 2c 20 22 6c 69 6b 65 22 2c 20 0a 20 20 20 20 20  , "like", .     
b910: 20 63 61 73 65 53 65 6e 73 69 74 69 76 65 20 3f   caseSensitive ?
b920: 20 28 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49   (SQLITE_FUNC_LI
b930: 4b 45 20 7c 20 53 51 4c 49 54 45 5f 46 55 4e 43  KE | SQLITE_FUNC
b940: 5f 43 41 53 45 29 20 3a 20 53 51 4c 49 54 45 5f  _CASE) : SQLITE_
b950: 46 55 4e 43 5f 4c 49 4b 45 29 3b 0a 7d 0a 0a 2f  FUNC_LIKE);.}../
b960: 2a 0a 2a 2a 20 70 45 78 70 72 20 70 6f 69 6e 74  *.** pExpr point
b970: 73 20 74 6f 20 61 6e 20 65 78 70 72 65 73 73 69  s to an expressi
b980: 6f 6e 20 77 68 69 63 68 20 69 6d 70 6c 65 6d 65  on which impleme
b990: 6e 74 73 20 61 20 66 75 6e 63 74 69 6f 6e 2e 20  nts a function. 
b9a0: 20 49 66 0a 2a 2a 20 69 74 20 69 73 20 61 70 70   If.** it is app
b9b0: 72 6f 70 72 69 61 74 65 20 74 6f 20 61 70 70 6c  ropriate to appl
b9c0: 79 20 74 68 65 20 4c 49 4b 45 20 6f 70 74 69 6d  y the LIKE optim
b9d0: 69 7a 61 74 69 6f 6e 20 74 6f 20 74 68 61 74 20  ization to that 
b9e0: 66 75 6e 63 74 69 6f 6e 0a 2a 2a 20 74 68 65 6e  function.** then
b9f0: 20 73 65 74 20 61 57 63 5b 30 5d 20 74 68 72 6f   set aWc[0] thro
ba00: 75 67 68 20 61 57 63 5b 32 5d 20 74 6f 20 74 68  ugh aWc[2] to th
ba10: 65 20 77 69 6c 64 63 61 72 64 20 63 68 61 72 61  e wildcard chara
ba20: 63 74 65 72 73 20 61 6e 64 0a 2a 2a 20 72 65 74  cters and.** ret
ba30: 75 72 6e 20 54 52 55 45 2e 20 20 49 66 20 74 68  urn TRUE.  If th
ba40: 65 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6e 6f  e function is no
ba50: 74 20 61 20 4c 49 4b 45 2d 73 74 79 6c 65 20 66  t a LIKE-style f
ba60: 75 6e 63 74 69 6f 6e 20 74 68 65 6e 0a 2a 2a 20  unction then.** 
ba70: 72 65 74 75 72 6e 20 46 41 4c 53 45 2e 0a 2a 2f  return FALSE..*/
ba80: 0a 69 6e 74 20 73 71 6c 69 74 65 33 49 73 4c 69  .int sqlite3IsLi
ba90: 6b 65 46 75 6e 63 74 69 6f 6e 28 73 71 6c 69 74  keFunction(sqlit
baa0: 65 33 20 2a 64 62 2c 20 45 78 70 72 20 2a 70 45  e3 *db, Expr *pE
bab0: 78 70 72 2c 20 69 6e 74 20 2a 70 49 73 4e 6f 63  xpr, int *pIsNoc
bac0: 61 73 65 2c 20 63 68 61 72 20 2a 61 57 63 29 7b  ase, char *aWc){
bad0: 0a 20 20 46 75 6e 63 44 65 66 20 2a 70 44 65 66  .  FuncDef *pDef
bae0: 3b 0a 20 20 69 66 28 20 70 45 78 70 72 2d 3e 6f  ;.  if( pExpr->o
baf0: 70 21 3d 54 4b 5f 46 55 4e 43 54 49 4f 4e 20 0a  p!=TK_FUNCTION .
bb00: 20 20 20 7c 7c 20 21 70 45 78 70 72 2d 3e 78 2e     || !pExpr->x.
bb10: 70 4c 69 73 74 20 0a 20 20 20 7c 7c 20 70 45 78  pList .   || pEx
bb20: 70 72 2d 3e 78 2e 70 4c 69 73 74 2d 3e 6e 45 78  pr->x.pList->nEx
bb30: 70 72 21 3d 32 0a 20 20 29 7b 0a 20 20 20 20 72  pr!=2.  ){.    r
bb40: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 61  eturn 0;.  }.  a
bb50: 73 73 65 72 74 28 20 21 45 78 70 72 48 61 73 50  ssert( !ExprHasP
bb60: 72 6f 70 65 72 74 79 28 70 45 78 70 72 2c 20 45  roperty(pExpr, E
bb70: 50 5f 78 49 73 53 65 6c 65 63 74 29 20 29 3b 0a  P_xIsSelect) );.
bb80: 20 20 70 44 65 66 20 3d 20 73 71 6c 69 74 65 33    pDef = sqlite3
bb90: 46 69 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c  FindFunction(db,
bba0: 20 70 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b 65 6e   pExpr->u.zToken
bbb0: 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  , .             
bbc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
bbd0: 73 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30 28  sqlite3Strlen30(
bbe0: 70 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b 65 6e 29  pExpr->u.zToken)
bbf0: 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,.              
bc00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32                 2
bc10: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30  , SQLITE_UTF8, 0
bc20: 29 3b 0a 20 20 69 66 28 20 4e 45 56 45 52 28 70  );.  if( NEVER(p
bc30: 44 65 66 3d 3d 30 29 20 7c 7c 20 28 70 44 65 66  Def==0) || (pDef
bc40: 2d 3e 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51  ->funcFlags & SQ
bc50: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 3d  LITE_FUNC_LIKE)=
bc60: 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  =0 ){.    return
bc70: 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54 68   0;.  }..  /* Th
bc80: 65 20 6d 65 6d 63 70 79 28 29 20 73 74 61 74 65  e memcpy() state
bc90: 6d 65 6e 74 20 61 73 73 75 6d 65 73 20 74 68 61  ment assumes tha
bca0: 74 20 74 68 65 20 77 69 6c 64 63 61 72 64 20 63  t the wildcard c
bcb0: 68 61 72 61 63 74 65 72 73 20 61 72 65 0a 20 20  haracters are.  
bcc0: 2a 2a 20 74 68 65 20 66 69 72 73 74 20 74 68 72  ** the first thr
bcd0: 65 65 20 73 74 61 74 65 6d 65 6e 74 73 20 69 6e  ee statements in
bce0: 20 74 68 65 20 63 6f 6d 70 61 72 65 49 6e 66 6f   the compareInfo
bcf0: 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68 65   structure.  The
bd00: 0a 20 20 2a 2a 20 61 73 73 65 72 74 73 28 29 20  .  ** asserts() 
bd10: 74 68 61 74 20 66 6f 6c 6c 6f 77 20 76 65 72 69  that follow veri
bd20: 66 79 20 74 68 61 74 20 61 73 73 75 6d 70 74 69  fy that assumpti
bd30: 6f 6e 0a 20 20 2a 2f 0a 20 20 6d 65 6d 63 70 79  on.  */.  memcpy
bd40: 28 61 57 63 2c 20 70 44 65 66 2d 3e 70 55 73 65  (aWc, pDef->pUse
bd50: 72 44 61 74 61 2c 20 33 29 3b 0a 20 20 61 73 73  rData, 3);.  ass
bd60: 65 72 74 28 20 28 63 68 61 72 2a 29 26 6c 69 6b  ert( (char*)&lik
bd70: 65 49 6e 66 6f 41 6c 74 20 3d 3d 20 28 63 68 61  eInfoAlt == (cha
bd80: 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e  r*)&likeInfoAlt.
bd90: 6d 61 74 63 68 41 6c 6c 20 29 3b 0a 20 20 61 73  matchAll );.  as
bda0: 73 65 72 74 28 20 26 28 28 63 68 61 72 2a 29 26  sert( &((char*)&
bdb0: 6c 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 31 5d 20  likeInfoAlt)[1] 
bdc0: 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65 49  == (char*)&likeI
bdd0: 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 4f 6e 65 20  nfoAlt.matchOne 
bde0: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28 28  );.  assert( &((
bdf0: 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41  char*)&likeInfoA
be00: 6c 74 29 5b 32 5d 20 3d 3d 20 28 63 68 61 72 2a  lt)[2] == (char*
be10: 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d 61  )&likeInfoAlt.ma
be20: 74 63 68 53 65 74 20 29 3b 0a 20 20 2a 70 49 73  tchSet );.  *pIs
be30: 4e 6f 63 61 73 65 20 3d 20 28 70 44 65 66 2d 3e  Nocase = (pDef->
be40: 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51 4c 49  funcFlags & SQLI
be50: 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d 3d 30  TE_FUNC_CASE)==0
be60: 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a  ;.  return 1;.}.
be70: 0a 2f 2a 0a 2a 2a 20 41 6c 6c 20 6f 66 20 74 68  ./*.** All of th
be80: 65 20 46 75 6e 63 44 65 66 20 73 74 72 75 63 74  e FuncDef struct
be90: 75 72 65 73 20 69 6e 20 74 68 65 20 61 42 75 69  ures in the aBui
bea0: 6c 74 69 6e 46 75 6e 63 5b 5d 20 61 72 72 61 79  ltinFunc[] array
beb0: 20 61 62 6f 76 65 0a 2a 2a 20 74 6f 20 74 68 65   above.** to the
bec0: 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f 6e   global function
bed0: 20 68 61 73 68 20 74 61 62 6c 65 2e 20 20 54 68   hash table.  Th
bee0: 69 73 20 6f 63 63 75 72 73 20 61 74 20 73 74 61  is occurs at sta
bef0: 72 74 2d 74 69 6d 65 20 28 61 73 0a 2a 2a 20 61  rt-time (as.** a
bf00: 20 63 6f 6e 73 65 71 75 65 6e 63 65 20 6f 66 20   consequence of 
bf10: 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f  calling sqlite3_
bf20: 69 6e 69 74 69 61 6c 69 7a 65 28 29 29 2e 0a 2a  initialize())..*
bf30: 2a 0a 2a 2a 20 41 66 74 65 72 20 74 68 69 73 20  *.** After this 
bf40: 72 6f 75 74 69 6e 65 20 72 75 6e 73 0a 2a 2f 0a  routine runs.*/.
bf50: 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67 69  void sqlite3Regi
bf60: 73 74 65 72 47 6c 6f 62 61 6c 46 75 6e 63 74 69  sterGlobalFuncti
bf70: 6f 6e 73 28 76 6f 69 64 29 7b 0a 20 20 2f 2a 0a  ons(void){.  /*.
bf80: 20 20 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69    ** The followi
bf90: 6e 67 20 61 72 72 61 79 20 68 6f 6c 64 73 20 46  ng array holds F
bfa0: 75 6e 63 44 65 66 20 73 74 72 75 63 74 75 72 65  uncDef structure
bfb0: 73 20 66 6f 72 20 61 6c 6c 20 6f 66 20 74 68 65  s for all of the
bfc0: 20 66 75 6e 63 74 69 6f 6e 73 0a 20 20 2a 2a 20   functions.  ** 
bfd0: 64 65 66 69 6e 65 64 20 69 6e 20 74 68 69 73 20  defined in this 
bfe0: 66 69 6c 65 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20  file..  **.  ** 
bff0: 54 68 65 20 61 72 72 61 79 20 63 61 6e 6e 6f 74  The array cannot
c000: 20 62 65 20 63 6f 6e 73 74 61 6e 74 20 73 69 6e   be constant sin
c010: 63 65 20 63 68 61 6e 67 65 73 20 61 72 65 20 6d  ce changes are m
c020: 61 64 65 20 74 6f 20 74 68 65 0a 20 20 2a 2a 20  ade to the.  ** 
c030: 46 75 6e 63 44 65 66 2e 70 48 61 73 68 20 65 6c  FuncDef.pHash el
c040: 65 6d 65 6e 74 73 20 61 74 20 73 74 61 72 74 2d  ements at start-
c050: 74 69 6d 65 2e 20 20 54 68 65 20 65 6c 65 6d 65  time.  The eleme
c060: 6e 74 73 20 6f 66 20 74 68 69 73 20 61 72 72 61  nts of this arra
c070: 79 0a 20 20 2a 2a 20 61 72 65 20 72 65 61 64 2d  y.  ** are read-
c080: 6f 6e 6c 79 20 61 66 74 65 72 20 69 6e 69 74 69  only after initi
c090: 61 6c 69 7a 61 74 69 6f 6e 20 69 73 20 63 6f 6d  alization is com
c0a0: 70 6c 65 74 65 2e 0a 20 20 2a 2f 0a 20 20 73 74  plete..  */.  st
c0b0: 61 74 69 63 20 53 51 4c 49 54 45 5f 57 53 44 20  atic SQLITE_WSD 
c0c0: 46 75 6e 63 44 65 66 20 61 42 75 69 6c 74 69 6e  FuncDef aBuiltin
c0d0: 46 75 6e 63 5b 5d 20 3d 20 7b 0a 20 20 20 20 46  Func[] = {.    F
c0e0: 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20 20  UNCTION(ltrim,  
c0f0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 31              1, 1
c100: 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20  , 0, trimFunc   
c110: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
c120: 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20 20 20 20  CTION(ltrim,    
c130: 20 20 20 20 20 20 20 20 20 20 32 2c 20 31 2c 20            2, 1, 
c140: 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20  0, trimFunc     
c150: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
c160: 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20 20  ION(rtrim,      
c170: 20 20 20 20 20 20 20 20 31 2c 20 32 2c 20 30 2c          1, 2, 0,
c180: 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20   trimFunc       
c190: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
c1a0: 4e 28 72 74 72 69 6d 2c 20 20 20 20 20 20 20 20  N(rtrim,        
c1b0: 20 20 20 20 20 20 32 2c 20 32 2c 20 30 2c 20 74        2, 2, 0, t
c1c0: 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20  rimFunc         
c1d0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
c1e0: 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20  trim,           
c1f0: 20 20 20 20 31 2c 20 33 2c 20 30 2c 20 74 72 69      1, 3, 0, tri
c200: 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c  mFunc         ),
c210: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74 72  .    FUNCTION(tr
c220: 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  im,             
c230: 20 20 32 2c 20 33 2c 20 30 2c 20 74 72 69 6d 46    2, 3, 0, trimF
c240: 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20  unc         ),. 
c250: 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c     FUNCTION(min,
c260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d                 -
c270: 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78 46  1, 0, 1, minmaxF
c280: 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20  unc       ),.   
c290: 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c 20 20   FUNCTION(min,  
c2a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 2c                0,
c2b0: 20 30 2c 20 31 2c 20 30 20 20 20 20 20 20 20 20   0, 1, 0        
c2c0: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 41          ),.    A
c2d0: 47 47 52 45 47 41 54 45 32 28 6d 69 6e 2c 20 20  GGREGATE2(min,  
c2e0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
c2f0: 2c 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70 2c  , 1, minmaxStep,
c300: 20 20 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61        minMaxFina
c310: 6c 69 7a 65 2c 0a 20 20 20 20 20 20 20 20 20 20  lize,.          
c320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c340: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4d 49 4e 4d  SQLITE_FUNC_MINM
c350: 41 58 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49  AX ),.    FUNCTI
c360: 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20  ON(max,         
c370: 20 20 20 20 20 20 2d 31 2c 20 31 2c 20 31 2c 20        -1, 1, 1, 
c380: 6d 69 6e 6d 61 78 46 75 6e 63 20 20 20 20 20 20  minmaxFunc      
c390: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c3a0: 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20 20 20  (max,           
c3b0: 20 20 20 20 20 30 2c 20 31 2c 20 31 2c 20 30 20       0, 1, 1, 0 
c3c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29                 )
c3d0: 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 32  ,.    AGGREGATE2
c3e0: 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20 20 20  (max,           
c3f0: 20 20 20 31 2c 20 31 2c 20 31 2c 20 6d 69 6e 6d     1, 1, 1, minm
c400: 61 78 53 74 65 70 2c 20 20 20 20 20 20 6d 69 6e  axStep,      min
c410: 4d 61 78 46 69 6e 61 6c 69 7a 65 2c 0a 20 20 20  MaxFinalize,.   
c420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c440: 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 46 55         SQLITE_FU
c450: 4e 43 5f 4d 49 4e 4d 41 58 20 29 2c 0a 20 20 20  NC_MINMAX ),.   
c460: 20 46 55 4e 43 54 49 4f 4e 32 28 74 79 70 65 6f   FUNCTION2(typeo
c470: 66 2c 20 20 20 20 20 20 20 20 20 20 20 20 31 2c  f,            1,
c480: 20 30 2c 20 30 2c 20 74 79 70 65 6f 66 46 75 6e   0, 0, typeofFun
c490: 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  c,  SQLITE_FUNC_
c4a0: 54 59 50 45 4f 46 29 2c 0a 20 20 20 20 46 55 4e  TYPEOF),.    FUN
c4b0: 43 54 49 4f 4e 32 28 6c 65 6e 67 74 68 2c 20 20  CTION2(length,  
c4c0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
c4d0: 30 2c 20 6c 65 6e 67 74 68 46 75 6e 63 2c 20 20  0, lengthFunc,  
c4e0: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 45 4e 47  SQLITE_FUNC_LENG
c4f0: 54 48 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f  TH),.    FUNCTIO
c500: 4e 28 69 6e 73 74 72 2c 20 20 20 20 20 20 20 20  N(instr,        
c510: 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 69        2, 0, 0, i
c520: 6e 73 74 72 46 75 6e 63 20 20 20 20 20 20 20 20  nstrFunc        
c530: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
c540: 73 75 62 73 74 72 2c 20 20 20 20 20 20 20 20 20  substr,         
c550: 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 73 75 62      2, 0, 0, sub
c560: 73 74 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c  strFunc       ),
c570: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 75  .    FUNCTION(su
c580: 62 73 74 72 2c 20 20 20 20 20 20 20 20 20 20 20  bstr,           
c590: 20 20 33 2c 20 30 2c 20 30 2c 20 73 75 62 73 74    3, 0, 0, subst
c5a0: 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20  rFunc       ),. 
c5b0: 20 20 20 46 55 4e 43 54 49 4f 4e 28 70 72 69 6e     FUNCTION(prin
c5c0: 74 66 2c 20 20 20 20 20 20 20 20 20 20 20 20 2d  tf,            -
c5d0: 31 2c 20 30 2c 20 30 2c 20 70 72 69 6e 74 66 46  1, 0, 0, printfF
c5e0: 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20  unc       ),.   
c5f0: 20 46 55 4e 43 54 49 4f 4e 28 75 6e 69 63 6f 64   FUNCTION(unicod
c600: 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 31 2c  e,            1,
c610: 20 30 2c 20 30 2c 20 75 6e 69 63 6f 64 65 46 75   0, 0, unicodeFu
c620: 6e 63 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46  nc      ),.    F
c630: 55 4e 43 54 49 4f 4e 28 63 68 61 72 2c 20 20 20  UNCTION(char,   
c640: 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 30             -1, 0
c650: 2c 20 30 2c 20 63 68 61 72 46 75 6e 63 20 20 20  , 0, charFunc   
c660: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
c670: 43 54 49 4f 4e 28 61 62 73 2c 20 20 20 20 20 20  CTION(abs,      
c680: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
c690: 30 2c 20 61 62 73 46 75 6e 63 20 20 20 20 20 20  0, absFunc      
c6a0: 20 20 20 20 29 2c 0a 23 69 66 6e 64 65 66 20 53      ),.#ifndef S
c6b0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54  QLITE_OMIT_FLOAT
c6c0: 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20 46 55  ING_POINT.    FU
c6d0: 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20  NCTION(round,   
c6e0: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
c6f0: 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20   0, roundFunc   
c700: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c710: 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20 20 20  TION(round,     
c720: 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30           2, 0, 0
c730: 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20 20 20  , roundFunc     
c740: 20 20 20 29 2c 0a 23 65 6e 64 69 66 0a 20 20 20     ),.#endif.   
c750: 20 46 55 4e 43 54 49 4f 4e 28 75 70 70 65 72 2c   FUNCTION(upper,
c760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
c770: 20 30 2c 20 30 2c 20 75 70 70 65 72 46 75 6e 63   0, 0, upperFunc
c780: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
c790: 55 4e 43 54 49 4f 4e 28 6c 6f 77 65 72 2c 20 20  UNCTION(lower,  
c7a0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
c7b0: 2c 20 30 2c 20 6c 6f 77 65 72 46 75 6e 63 20 20  , 0, lowerFunc  
c7c0: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
c7d0: 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20  CTION(coalesce, 
c7e0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
c7f0: 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20  0, 0            
c800: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
c810: 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20 20  ION(coalesce,   
c820: 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c          0, 0, 0,
c830: 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20   0              
c840: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
c850: 4e 32 28 63 6f 61 6c 65 73 63 65 2c 20 20 20 20  N2(coalesce,    
c860: 20 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c 20 6e       -1, 0, 0, n
c870: 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49 54 45  oopFunc,  SQLITE
c880: 5f 46 55 4e 43 5f 43 4f 41 4c 45 53 43 45 29 2c  _FUNC_COALESCE),
c890: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 68 65  .    FUNCTION(he
c8a0: 78 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  x,              
c8b0: 20 20 31 2c 20 30 2c 20 30 2c 20 68 65 78 46 75    1, 0, 0, hexFu
c8c0: 6e 63 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20  nc          ),. 
c8d0: 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 69 66 6e     FUNCTION2(ifn
c8e0: 75 6c 6c 2c 20 20 20 20 20 20 20 20 20 20 20 20  ull,            
c8f0: 32 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e  2, 0, 0, noopFun
c900: 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  c,  SQLITE_FUNC_
c910: 43 4f 41 4c 45 53 43 45 29 2c 0a 20 20 20 20 46  COALESCE),.    F
c920: 55 4e 43 54 49 4f 4e 32 28 75 6e 6c 69 6b 65 6c  UNCTION2(unlikel
c930: 79 2c 20 20 20 20 20 20 20 20 20 20 31 2c 20 30  y,          1, 0
c940: 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e 63 2c 20 20  , 0, noopFunc,  
c950: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 55 4e 4c 49  SQLITE_FUNC_UNLI
c960: 4b 45 4c 59 29 2c 0a 20 20 20 20 46 55 4e 43 54  KELY),.    FUNCT
c970: 49 4f 4e 32 28 6c 69 6b 65 6c 69 68 6f 6f 64 2c  ION2(likelihood,
c980: 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c          2, 0, 0,
c990: 20 6e 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49   noopFunc,  SQLI
c9a0: 54 45 5f 46 55 4e 43 5f 55 4e 4c 49 4b 45 4c 59  TE_FUNC_UNLIKELY
c9b0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 32  ),.    FUNCTION2
c9c0: 28 6c 69 6b 65 6c 79 2c 20 20 20 20 20 20 20 20  (likely,        
c9d0: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6e 6f 6f      1, 0, 0, noo
c9e0: 70 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46  pFunc,  SQLITE_F
c9f0: 55 4e 43 5f 55 4e 4c 49 4b 45 4c 59 29 2c 0a 20  UNC_UNLIKELY),. 
ca00: 20 20 20 56 46 55 4e 43 54 49 4f 4e 28 72 61 6e     VFUNCTION(ran
ca10: 64 6f 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  dom,            
ca20: 30 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 46  0, 0, 0, randomF
ca30: 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20  unc       ),.   
ca40: 20 56 46 55 4e 43 54 49 4f 4e 28 72 61 6e 64 6f   VFUNCTION(rando
ca50: 6d 62 6c 6f 62 2c 20 20 20 20 20 20 20 20 31 2c  mblob,        1,
ca60: 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 42 6c 6f   0, 0, randomBlo
ca70: 62 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46  b       ),.    F
ca80: 55 4e 43 54 49 4f 4e 28 6e 75 6c 6c 69 66 2c 20  UNCTION(nullif, 
ca90: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30              2, 0
caa0: 2c 20 31 2c 20 6e 75 6c 6c 69 66 46 75 6e 63 20  , 1, nullifFunc 
cab0: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
cac0: 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 76 65 72  CTION(sqlite_ver
cad0: 73 69 6f 6e 2c 20 20 20 20 20 30 2c 20 30 2c 20  sion,     0, 0, 
cae0: 30 2c 20 76 65 72 73 69 6f 6e 46 75 6e 63 20 20  0, versionFunc  
caf0: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
cb00: 49 4f 4e 28 73 71 6c 69 74 65 5f 73 6f 75 72 63  ION(sqlite_sourc
cb10: 65 5f 69 64 2c 20 20 20 30 2c 20 30 2c 20 30 2c  e_id,   0, 0, 0,
cb20: 20 73 6f 75 72 63 65 69 64 46 75 6e 63 20 20 20   sourceidFunc   
cb30: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
cb40: 4e 28 73 71 6c 69 74 65 5f 6c 6f 67 2c 20 20 20  N(sqlite_log,   
cb50: 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 65        2, 0, 0, e
cb60: 72 72 6c 6f 67 46 75 6e 63 20 20 20 20 20 20 20  rrlogFunc       
cb70: 29 2c 0a 23 69 66 20 53 51 4c 49 54 45 5f 55 53  ),.#if SQLITE_US
cb80: 45 52 5f 41 55 54 48 45 4e 54 49 43 41 54 49 4f  ER_AUTHENTICATIO
cb90: 4e 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73  N.    FUNCTION(s
cba0: 71 6c 69 74 65 5f 63 72 79 70 74 2c 20 20 20 20  qlite_crypt,    
cbb0: 20 20 20 32 2c 20 30 2c 20 30 2c 20 73 71 6c 69     2, 0, 0, sqli
cbc0: 74 65 33 43 72 79 70 74 46 75 6e 63 20 29 2c 0a  te3CryptFunc ),.
cbd0: 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 53  #endif.#ifndef S
cbe0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49  QLITE_OMIT_COMPI
cbf0: 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 0a 20  LEOPTION_DIAGS. 
cc00: 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 71 6c 69     FUNCTION(sqli
cc10: 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  te_compileoption
cc20: 5f 75 73 65 64 2c 31 2c 20 30 2c 20 30 2c 20 63  _used,1, 0, 0, c
cc30: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73 65 64  ompileoptionused
cc40: 46 75 6e 63 20 20 29 2c 0a 20 20 20 20 46 55 4e  Func  ),.    FUN
cc50: 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d  CTION(sqlite_com
cc60: 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 2c 20  pileoption_get, 
cc70: 31 2c 20 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65  1, 0, 0, compile
cc80: 6f 70 74 69 6f 6e 67 65 74 46 75 6e 63 20 20 29  optiongetFunc  )
cc90: 2c 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49  ,.#endif /* SQLI
cca0: 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f  TE_OMIT_COMPILEO
ccb0: 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 20  PTION_DIAGS */. 
ccc0: 20 20 20 46 55 4e 43 54 49 4f 4e 28 71 75 6f 74     FUNCTION(quot
ccd0: 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  e,              
cce0: 31 2c 20 30 2c 20 30 2c 20 71 75 6f 74 65 46 75  1, 0, 0, quoteFu
ccf0: 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20  nc        ),.   
cd00: 20 56 46 55 4e 43 54 49 4f 4e 28 6c 61 73 74 5f   VFUNCTION(last_
cd10: 69 6e 73 65 72 74 5f 72 6f 77 69 64 2c 20 30 2c  insert_rowid, 0,
cd20: 20 30 2c 20 30 2c 20 6c 61 73 74 5f 69 6e 73 65   0, 0, last_inse
cd30: 72 74 5f 72 6f 77 69 64 29 2c 0a 20 20 20 20 56  rt_rowid),.    V
cd40: 46 55 4e 43 54 49 4f 4e 28 63 68 61 6e 67 65 73  FUNCTION(changes
cd50: 2c 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 30  ,           0, 0
cd60: 2c 20 30 2c 20 63 68 61 6e 67 65 73 20 20 20 20  , 0, changes    
cd70: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 56 46 55        ),.    VFU
cd80: 4e 43 54 49 4f 4e 28 74 6f 74 61 6c 5f 63 68 61  NCTION(total_cha
cd90: 6e 67 65 73 2c 20 20 20 20 20 30 2c 20 30 2c 20  nges,     0, 0, 
cda0: 30 2c 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73  0, total_changes
cdb0: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
cdc0: 49 4f 4e 28 72 65 70 6c 61 63 65 2c 20 20 20 20  ION(replace,    
cdd0: 20 20 20 20 20 20 20 20 33 2c 20 30 2c 20 30 2c          3, 0, 0,
cde0: 20 72 65 70 6c 61 63 65 46 75 6e 63 20 20 20 20   replaceFunc    
cdf0: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
ce00: 4e 28 7a 65 72 6f 62 6c 6f 62 2c 20 20 20 20 20  N(zeroblob,     
ce10: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 7a        1, 0, 0, z
ce20: 65 72 6f 62 6c 6f 62 46 75 6e 63 20 20 20 20 20  eroblobFunc     
ce30: 29 2c 0a 20 20 23 69 66 64 65 66 20 53 51 4c 49  ),.  #ifdef SQLI
ce40: 54 45 5f 53 4f 55 4e 44 45 58 0a 20 20 20 20 46  TE_SOUNDEX.    F
ce50: 55 4e 43 54 49 4f 4e 28 73 6f 75 6e 64 65 78 2c  UNCTION(soundex,
ce60: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
ce70: 2c 20 30 2c 20 73 6f 75 6e 64 65 78 46 75 6e 63  , 0, soundexFunc
ce80: 20 20 20 20 20 20 29 2c 0a 20 20 23 65 6e 64 69        ),.  #endi
ce90: 66 0a 20 20 23 69 66 6e 64 65 66 20 53 51 4c 49  f.  #ifndef SQLI
cea0: 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54  TE_OMIT_LOAD_EXT
ceb0: 45 4e 53 49 4f 4e 0a 20 20 20 20 46 55 4e 43 54  ENSION.    FUNCT
cec0: 49 4f 4e 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69  ION(load_extensi
ced0: 6f 6e 2c 20 20 20 20 20 31 2c 20 30 2c 20 30 2c  on,     1, 0, 0,
cee0: 20 6c 6f 61 64 45 78 74 20 20 20 20 20 20 20 20   loadExt        
cef0: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
cf00: 4e 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e  N(load_extension
cf10: 2c 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 6c  ,     2, 0, 0, l
cf20: 6f 61 64 45 78 74 20 20 20 20 20 20 20 20 20 20  oadExt          
cf30: 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 20 20  ),.  #endif.    
cf40: 41 47 47 52 45 47 41 54 45 28 73 75 6d 2c 20 20  AGGREGATE(sum,  
cf50: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
cf60: 30 2c 20 30 2c 20 73 75 6d 53 74 65 70 2c 20 20  0, 0, sumStep,  
cf70: 20 20 20 20 20 20 20 73 75 6d 46 69 6e 61 6c 69         sumFinali
cf80: 7a 65 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47  ze    ),.    AGG
cf90: 52 45 47 41 54 45 28 74 6f 74 61 6c 2c 20 20 20  REGATE(total,   
cfa0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
cfb0: 30 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20  0, sumStep,     
cfc0: 20 20 20 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a      totalFinaliz
cfd0: 65 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52  e    ),.    AGGR
cfe0: 45 47 41 54 45 28 61 76 67 2c 20 20 20 20 20 20  EGATE(avg,      
cff0: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
d000: 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20  , sumStep,      
d010: 20 20 20 61 76 67 46 69 6e 61 6c 69 7a 65 20 20     avgFinalize  
d020: 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41    ),.    AGGREGA
d030: 54 45 32 28 63 6f 75 6e 74 2c 20 20 20 20 20 20  TE2(count,      
d040: 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 63        0, 0, 0, c
d050: 6f 75 6e 74 53 74 65 70 2c 20 20 20 20 20 20 20  ountStep,       
d060: 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 2c 0a 20  countFinalize,. 
d070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 51                SQ
d080: 4c 49 54 45 5f 46 55 4e 43 5f 43 4f 55 4e 54 20  LITE_FUNC_COUNT 
d090: 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54   ),.    AGGREGAT
d0a0: 45 28 63 6f 75 6e 74 2c 20 20 20 20 20 20 20 20  E(count,        
d0b0: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 63 6f       1, 0, 0, co
d0c0: 75 6e 74 53 74 65 70 2c 20 20 20 20 20 20 20 63  untStep,       c
d0d0: 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20 29 2c  ountFinalize  ),
d0e0: 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28 67  .    AGGREGATE(g
d0f0: 72 6f 75 70 5f 63 6f 6e 63 61 74 2c 20 20 20 20  roup_concat,    
d100: 20 20 31 2c 20 30 2c 20 30 2c 20 67 72 6f 75 70    1, 0, 0, group
d110: 43 6f 6e 63 61 74 53 74 65 70 2c 20 67 72 6f 75  ConcatStep, grou
d120: 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 29  pConcatFinalize)
d130: 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28  ,.    AGGREGATE(
d140: 67 72 6f 75 70 5f 63 6f 6e 63 61 74 2c 20 20 20  group_concat,   
d150: 20 20 20 32 2c 20 30 2c 20 30 2c 20 67 72 6f 75     2, 0, 0, grou
d160: 70 43 6f 6e 63 61 74 53 74 65 70 2c 20 67 72 6f  pConcatStep, gro
d170: 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65  upConcatFinalize
d180: 29 2c 0a 20 20 0a 20 20 20 20 4c 49 4b 45 46 55  ),.  .    LIKEFU
d190: 4e 43 28 67 6c 6f 62 2c 20 32 2c 20 26 67 6c 6f  NC(glob, 2, &glo
d1a0: 62 49 6e 66 6f 2c 20 53 51 4c 49 54 45 5f 46 55  bInfo, SQLITE_FU
d1b0: 4e 43 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46  NC_LIKE|SQLITE_F
d1c0: 55 4e 43 5f 43 41 53 45 29 2c 0a 20 20 23 69 66  UNC_CASE),.  #if
d1d0: 64 65 66 20 53 51 4c 49 54 45 5f 43 41 53 45 5f  def SQLITE_CASE_
d1e0: 53 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45 0a 20  SENSITIVE_LIKE. 
d1f0: 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b 65     LIKEFUNC(like
d200: 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f 41 6c  , 2, &likeInfoAl
d210: 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c  t, SQLITE_FUNC_L
d220: 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f  IKE|SQLITE_FUNC_
d230: 43 41 53 45 29 2c 0a 20 20 20 20 4c 49 4b 45 46  CASE),.    LIKEF
d240: 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26 6c 69  UNC(like, 3, &li
d250: 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c 49 54  keInfoAlt, SQLIT
d260: 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51 4c 49  E_FUNC_LIKE|SQLI
d270: 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c 0a 20  TE_FUNC_CASE),. 
d280: 20 23 65 6c 73 65 0a 20 20 20 20 4c 49 4b 45 46   #else.    LIKEF
d290: 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26 6c 69  UNC(like, 2, &li
d2a0: 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51 4c 49  keInfoNorm, SQLI
d2b0: 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c 0a 20  TE_FUNC_LIKE),. 
d2c0: 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b 65     LIKEFUNC(like
d2d0: 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f 4e 6f  , 3, &likeInfoNo
d2e0: 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  rm, SQLITE_FUNC_
d2f0: 4c 49 4b 45 29 2c 0a 20 20 23 65 6e 64 69 66 0a  LIKE),.  #endif.
d300: 20 20 7d 3b 0a 0a 20 20 69 6e 74 20 69 3b 0a 20    };..  int i;. 
d310: 20 46 75 6e 63 44 65 66 48 61 73 68 20 2a 70 48   FuncDefHash *pH
d320: 61 73 68 20 3d 20 26 47 4c 4f 42 41 4c 28 46 75  ash = &GLOBAL(Fu
d330: 6e 63 44 65 66 48 61 73 68 2c 20 73 71 6c 69 74  ncDefHash, sqlit
d340: 65 33 47 6c 6f 62 61 6c 46 75 6e 63 74 69 6f 6e  e3GlobalFunction
d350: 73 29 3b 0a 20 20 46 75 6e 63 44 65 66 20 2a 61  s);.  FuncDef *a
d360: 46 75 6e 63 20 3d 20 28 46 75 6e 63 44 65 66 2a  Func = (FuncDef*
d370: 29 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66  )&GLOBAL(FuncDef
d380: 2c 20 61 42 75 69 6c 74 69 6e 46 75 6e 63 29 3b  , aBuiltinFunc);
d390: 0a 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 41  ..  for(i=0; i<A
d3a0: 72 72 61 79 53 69 7a 65 28 61 42 75 69 6c 74 69  rraySize(aBuilti
d3b0: 6e 46 75 6e 63 29 3b 20 69 2b 2b 29 7b 0a 20 20  nFunc); i++){.  
d3c0: 20 20 73 71 6c 69 74 65 33 46 75 6e 63 44 65 66    sqlite3FuncDef
d3d0: 49 6e 73 65 72 74 28 70 48 61 73 68 2c 20 26 61  Insert(pHash, &a
d3e0: 46 75 6e 63 5b 69 5d 29 3b 0a 20 20 7d 0a 20 20  Func[i]);.  }.  
d3f0: 73 71 6c 69 74 65 33 52 65 67 69 73 74 65 72 44  sqlite3RegisterD
d400: 61 74 65 54 69 6d 65 46 75 6e 63 74 69 6f 6e 73  ateTimeFunctions
d410: 28 29 3b 0a 23 69 66 6e 64 65 66 20 53 51 4c 49  ();.#ifndef SQLI
d420: 54 45 5f 4f 4d 49 54 5f 41 4c 54 45 52 54 41 42  TE_OMIT_ALTERTAB
d430: 4c 45 0a 20 20 73 71 6c 69 74 65 33 41 6c 74 65  LE.  sqlite3Alte
d440: 72 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 23 65  rFunctions();.#e
d450: 6e 64 69 66 0a 23 69 66 20 64 65 66 69 6e 65 64  ndif.#if defined
d460: 28 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 53  (SQLITE_ENABLE_S
d470: 54 41 54 33 29 20 7c 7c 20 64 65 66 69 6e 65 64  TAT3) || defined
d480: 28 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 53  (SQLITE_ENABLE_S
d490: 54 41 54 34 29 0a 20 20 73 71 6c 69 74 65 33 41  TAT4).  sqlite3A
d4a0: 6e 61 6c 79 7a 65 46 75 6e 63 74 69 6f 6e 73 28  nalyzeFunctions(
d4b0: 29 3b 0a 23 65 6e 64 69 66 0a 7d 0a              );.#endif.}.