/ Hex Artifact Content
Login

Artifact 248e2e88e5b9ff38bbd18ab4e2899adf8dc7df15:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61 74  C functions that
01a0: 20 69 6d 70 6c 65 6d 65 6e 74 20 76 61 72 69 6f   implement vario
01b0: 75 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69  us SQL.** functi
01c0: 6f 6e 73 20 6f 66 20 53 51 4c 69 74 65 2e 20 20  ons of SQLite.  
01d0: 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 69 73 20  .**.** There is 
01e0: 6f 6e 6c 79 20 6f 6e 65 20 65 78 70 6f 72 74 65  only one exporte
01f0: 64 20 73 79 6d 62 6f 6c 20 69 6e 20 74 68 69 73  d symbol in this
0200: 20 66 69 6c 65 20 2d 20 74 68 65 20 66 75 6e 63   file - the func
0210: 74 69 6f 6e 0a 2a 2a 20 73 71 6c 69 74 65 52 65  tion.** sqliteRe
0220: 67 69 73 74 65 72 42 75 69 6c 64 69 6e 46 75 6e  gisterBuildinFun
0230: 63 74 69 6f 6e 73 28 29 20 66 6f 75 6e 64 20 61  ctions() found a
0240: 74 20 74 68 65 20 62 6f 74 74 6f 6d 20 6f 66 20  t the bottom of 
0250: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 20 41 6c 6c  the file..** All
0260: 20 6f 74 68 65 72 20 63 6f 64 65 20 68 61 73 20   other code has 
0270: 66 69 6c 65 20 73 63 6f 70 65 2e 0a 2a 2f 0a 23  file scope..*/.#
0280: 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49  include "sqliteI
0290: 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c  nt.h".#include <
02a0: 73 74 64 6c 69 62 2e 68 3e 0a 23 69 6e 63 6c 75  stdlib.h>.#inclu
02b0: 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69  de <assert.h>.#i
02c0: 6e 63 6c 75 64 65 20 22 76 64 62 65 49 6e 74 2e  nclude "vdbeInt.
02d0: 68 22 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e  h"../*.** Return
02e0: 20 74 68 65 20 63 6f 6c 6c 61 74 69 6e 67 20 66   the collating f
02f0: 75 6e 63 74 69 6f 6e 20 61 73 73 6f 63 69 61 74  unction associat
0300: 65 64 20 77 69 74 68 20 61 20 66 75 6e 63 74 69  ed with a functi
0310: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 43 6f  on..*/.static Co
0320: 6c 6c 53 65 71 20 2a 73 71 6c 69 74 65 33 47 65  llSeq *sqlite3Ge
0330: 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 73 71 6c  tFuncCollSeq(sql
0340: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0350: 6e 74 65 78 74 29 7b 0a 20 20 72 65 74 75 72 6e  ntext){.  return
0360: 20 63 6f 6e 74 65 78 74 2d 3e 70 43 6f 6c 6c 3b   context->pColl;
0370: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
0380: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
0390: 6e 6f 6e 2d 61 67 67 72 65 67 61 74 65 20 6d 69  non-aggregate mi
03a0: 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20 66 75  n() and max() fu
03b0: 6e 63 74 69 6f 6e 73 0a 2a 2f 0a 73 74 61 74 69  nctions.*/.stati
03c0: 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78 46 75 6e  c void minmaxFun
03d0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
03e0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
03f0: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
0400: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
0410: 76 0a 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20  v.){.  int i;.  
0420: 69 6e 74 20 6d 61 73 6b 3b 20 20 20 20 2f 2a 20  int mask;    /* 
0430: 30 20 66 6f 72 20 6d 69 6e 28 29 20 6f 72 20 30  0 for min() or 0
0440: 78 66 66 66 66 66 66 66 66 20 66 6f 72 20 6d 61  xffffffff for ma
0450: 78 28 29 20 2a 2f 0a 20 20 69 6e 74 20 69 42 65  x() */.  int iBe
0460: 73 74 3b 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70  st;.  CollSeq *p
0470: 43 6f 6c 6c 3b 0a 0a 20 20 61 73 73 65 72 74 28  Coll;..  assert(
0480: 20 61 72 67 63 3e 31 20 29 3b 0a 20 20 6d 61 73   argc>1 );.  mas
0490: 6b 20 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72  k = sqlite3_user
04a0: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 3d 3d  _data(context)==
04b0: 30 20 3f 20 30 20 3a 20 2d 31 3b 0a 20 20 70 43  0 ? 0 : -1;.  pC
04c0: 6f 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74  oll = sqlite3Get
04d0: 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74  FuncCollSeq(cont
04e0: 65 78 74 29 3b 0a 20 20 61 73 73 65 72 74 28 20  ext);.  assert( 
04f0: 70 43 6f 6c 6c 20 29 3b 0a 20 20 61 73 73 65 72  pColl );.  asser
0500: 74 28 20 6d 61 73 6b 3d 3d 2d 31 20 7c 7c 20 6d  t( mask==-1 || m
0510: 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 69 42 65 73  ask==0 );.  iBes
0520: 74 20 3d 20 30 3b 0a 20 20 69 66 28 20 73 71 6c  t = 0;.  if( sql
0530: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
0540: 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45  argv[0])==SQLITE
0550: 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a  _NULL ) return;.
0560: 20 20 66 6f 72 28 69 3d 31 3b 20 69 3c 61 72 67    for(i=1; i<arg
0570: 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28  c; i++){.    if(
0580: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
0590: 79 70 65 28 61 72 67 76 5b 69 5d 29 3d 3d 53 51  ype(argv[i])==SQ
05a0: 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75  LITE_NULL ) retu
05b0: 72 6e 3b 0a 20 20 20 20 69 66 28 20 28 73 71 6c  rn;.    if( (sql
05c0: 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28 61  ite3MemCompare(a
05d0: 72 67 76 5b 69 42 65 73 74 5d 2c 20 61 72 67 76  rgv[iBest], argv
05e0: 5b 69 5d 2c 20 70 43 6f 6c 6c 29 5e 6d 61 73 6b  [i], pColl)^mask
05f0: 29 3e 3d 30 20 29 7b 0a 20 20 20 20 20 20 74 65  )>=0 ){.      te
0600: 73 74 63 61 73 65 28 20 6d 61 73 6b 3d 3d 30 20  stcase( mask==0 
0610: 29 3b 0a 20 20 20 20 20 20 69 42 65 73 74 20 3d  );.      iBest =
0620: 20 69 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20   i;.    }.  }.  
0630: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76  sqlite3_result_v
0640: 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72  alue(context, ar
0650: 67 76 5b 69 42 65 73 74 5d 29 3b 0a 7d 0a 0a 2f  gv[iBest]);.}../
0660: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20  *.** Return the 
0670: 74 79 70 65 20 6f 66 20 74 68 65 20 61 72 67 75  type of the argu
0680: 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  ment..*/.static 
0690: 76 6f 69 64 20 74 79 70 65 6f 66 46 75 6e 63 28  void typeofFunc(
06a0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
06b0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
06c0: 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71  nt NotUsed,.  sq
06d0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
06e0: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68  gv.){.  const ch
06f0: 61 72 20 2a 7a 20 3d 20 30 3b 0a 20 20 55 4e 55  ar *z = 0;.  UNU
0700: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f  SED_PARAMETER(No
0710: 74 55 73 65 64 29 3b 0a 20 20 73 77 69 74 63 68  tUsed);.  switch
0720: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
0730: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
0740: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0750: 5f 49 4e 54 45 47 45 52 3a 20 7a 20 3d 20 22 69  _INTEGER: z = "i
0760: 6e 74 65 67 65 72 22 3b 20 62 72 65 61 6b 3b 0a  nteger"; break;.
0770: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
0780: 54 45 58 54 3a 20 20 20 20 7a 20 3d 20 22 74 65  TEXT:    z = "te
0790: 78 74 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20  xt";    break;. 
07a0: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 46     case SQLITE_F
07b0: 4c 4f 41 54 3a 20 20 20 7a 20 3d 20 22 72 65 61  LOAT:   z = "rea
07c0: 6c 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  l";    break;.  
07d0: 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c    case SQLITE_BL
07e0: 4f 42 3a 20 20 20 20 7a 20 3d 20 22 62 6c 6f 62  OB:    z = "blob
07f0: 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20  ";    break;.   
0800: 20 64 65 66 61 75 6c 74 3a 20 20 20 20 20 20 20   default:       
0810: 20 20 20 20 20 20 7a 20 3d 20 22 6e 75 6c 6c 22        z = "null"
0820: 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 7d 0a  ;    break;.  }.
0830: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
0840: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a  _text(context, z
0850: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41  , -1, SQLITE_STA
0860: 54 49 43 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20  TIC);.}.../*.** 
0870: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
0880: 66 20 74 68 65 20 6c 65 6e 67 74 68 28 29 20 66  f the length() f
0890: 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69  unction.*/.stati
08a0: 63 20 76 6f 69 64 20 6c 65 6e 67 74 68 46 75 6e  c void lengthFun
08b0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
08c0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
08d0: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
08e0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
08f0: 76 0a 29 7b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a  v.){.  int len;.
0900: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
0910: 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =1 );.  UNUSED_P
0920: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
0930: 20 20 73 77 69 74 63 68 28 20 73 71 6c 69 74 65    switch( sqlite
0940: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
0950: 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73  v[0]) ){.    cas
0960: 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a 0a 20  e SQLITE_BLOB:. 
0970: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49     case SQLITE_I
0980: 4e 54 45 47 45 52 3a 0a 20 20 20 20 63 61 73 65  NTEGER:.    case
0990: 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b   SQLITE_FLOAT: {
09a0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
09b0: 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78  esult_int(contex
09c0: 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  t, sqlite3_value
09d0: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 29  _bytes(argv[0]))
09e0: 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20  ;.      break;. 
09f0: 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 53 51     }.    case SQ
0a00: 4c 49 54 45 5f 54 45 58 54 3a 20 7b 0a 20 20 20  LITE_TEXT: {.   
0a10: 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65     const unsigne
0a20: 64 20 63 68 61 72 20 2a 7a 20 3d 20 73 71 6c 69  d char *z = sqli
0a30: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
0a40: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69  rgv[0]);.      i
0a50: 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( z==0 ) return
0a60: 3b 0a 20 20 20 20 20 20 6c 65 6e 20 3d 20 30 3b  ;.      len = 0;
0a70: 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a 7a  .      while( *z
0a80: 20 29 7b 0a 20 20 20 20 20 20 20 20 6c 65 6e 2b   ){.        len+
0a90: 2b 3b 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54  +;.        SQLIT
0aa0: 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a  E_SKIP_UTF8(z);.
0ab0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71        }.      sq
0ac0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
0ad0: 28 63 6f 6e 74 65 78 74 2c 20 6c 65 6e 29 3b 0a  (context, len);.
0ae0: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
0af0: 20 7d 0a 20 20 20 20 64 65 66 61 75 6c 74 3a 20   }.    default: 
0b00: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
0b10: 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74  result_null(cont
0b20: 65 78 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61  ext);.      brea
0b30: 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a  k;.    }.  }.}..
0b40: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
0b50: 74 69 6f 6e 20 6f 66 20 74 68 65 20 61 62 73 28  tion of the abs(
0b60: 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a  ) function..**.*
0b70: 2a 20 49 4d 50 3a 20 52 2d 32 33 39 37 39 2d 32  * IMP: R-23979-2
0b80: 36 38 35 35 20 54 68 65 20 61 62 73 28 58 29 20  6855 The abs(X) 
0b90: 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73  function returns
0ba0: 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 76 61   the absolute va
0bb0: 6c 75 65 20 6f 66 0a 2a 2a 20 74 68 65 20 6e 75  lue of.** the nu
0bc0: 6d 65 72 69 63 20 61 72 67 75 6d 65 6e 74 20 58  meric argument X
0bd0: 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  . .*/.static voi
0be0: 64 20 61 62 73 46 75 6e 63 28 73 71 6c 69 74 65  d absFunc(sqlite
0bf0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
0c00: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
0c10: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
0c20: 67 76 29 7b 0a 20 20 61 73 73 65 72 74 28 20 61  gv){.  assert( a
0c30: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
0c40: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
0c50: 63 29 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71  c);.  switch( sq
0c60: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
0c70: 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20  (argv[0]) ){.   
0c80: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54   case SQLITE_INT
0c90: 45 47 45 52 3a 20 7b 0a 20 20 20 20 20 20 69 36  EGER: {.      i6
0ca0: 34 20 69 56 61 6c 20 3d 20 73 71 6c 69 74 65 33  4 iVal = sqlite3
0cb0: 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67  _value_int64(arg
0cc0: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 66 28  v[0]);.      if(
0cd0: 20 69 56 61 6c 3c 30 20 29 7b 0a 20 20 20 20 20   iVal<0 ){.     
0ce0: 20 20 20 69 66 28 20 28 69 56 61 6c 3c 3c 31 29     if( (iVal<<1)
0cf0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20  ==0 ){.         
0d00: 20 2f 2a 20 49 4d 50 3a 20 52 2d 33 35 34 36 30   /* IMP: R-35460
0d10: 2d 31 35 30 38 34 20 49 66 20 58 20 69 73 20 74  -15084 If X is t
0d20: 68 65 20 69 6e 74 65 67 65 72 20 2d 39 32 32 33  he integer -9223
0d30: 33 37 32 30 33 36 38 35 34 37 37 35 38 30 37 20  372036854775807 
0d40: 74 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 2a  then.          *
0d50: 2a 20 61 62 73 28 58 29 20 74 68 72 6f 77 73 20  * abs(X) throws 
0d60: 61 6e 20 69 6e 74 65 67 65 72 20 6f 76 65 72 66  an integer overf
0d70: 6c 6f 77 20 65 72 72 6f 72 20 73 69 6e 63 65 20  low error since 
0d80: 74 68 65 72 65 20 69 73 20 6e 6f 0a 20 20 20 20  there is no.    
0d90: 20 20 20 20 20 20 2a 2a 20 65 71 75 69 76 61 6c        ** equival
0da0: 65 6e 74 20 70 6f 73 69 74 69 76 65 20 36 34 2d  ent positive 64-
0db0: 62 69 74 20 74 77 6f 20 63 6f 6d 70 6c 65 6d 65  bit two compleme
0dc0: 6e 74 20 76 61 6c 75 65 2e 20 2a 2f 0a 20 20 20  nt value. */.   
0dd0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72         sqlite3_r
0de0: 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74  esult_error(cont
0df0: 65 78 74 2c 20 22 69 6e 74 65 67 65 72 20 6f 76  ext, "integer ov
0e00: 65 72 66 6c 6f 77 22 2c 20 2d 31 29 3b 0a 20 20  erflow", -1);.  
0e10: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a          return;.
0e20: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
0e30: 20 20 69 56 61 6c 20 3d 20 2d 69 56 61 6c 3b 0a    iVal = -iVal;.
0e40: 20 20 20 20 20 20 7d 20 0a 20 20 20 20 20 20 73        } .      s
0e50: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
0e60: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 69 56 61  t64(context, iVa
0e70: 6c 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  l);.      break;
0e80: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20  .    }.    case 
0e90: 53 51 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a 20  SQLITE_NULL: {. 
0ea0: 20 20 20 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 33       /* IMP: R-3
0eb0: 37 34 33 34 2d 31 39 39 32 39 20 41 62 73 28 58  7434-19929 Abs(X
0ec0: 29 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 20 69  ) returns NULL i
0ed0: 66 20 58 20 69 73 20 4e 55 4c 4c 2e 20 2a 2f 0a  f X is NULL. */.
0ee0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
0ef0: 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78  sult_null(contex
0f00: 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  t);.      break;
0f10: 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75  .    }.    defau
0f20: 6c 74 3a 20 7b 0a 20 20 20 20 20 20 2f 2a 20 42  lt: {.      /* B
0f30: 65 63 61 75 73 65 20 73 71 6c 69 74 65 33 5f 76  ecause sqlite3_v
0f40: 61 6c 75 65 5f 64 6f 75 62 6c 65 28 29 20 72 65  alue_double() re
0f50: 74 75 72 6e 73 20 30 2e 30 20 69 66 20 74 68 65  turns 0.0 if the
0f60: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e 6f 74   argument is not
0f70: 0a 20 20 20 20 20 20 2a 2a 20 73 6f 6d 65 74 68  .      ** someth
0f80: 69 6e 67 20 74 68 61 74 20 63 61 6e 20 62 65 20  ing that can be 
0f90: 63 6f 6e 76 65 72 74 65 64 20 69 6e 74 6f 20 61  converted into a
0fa0: 20 6e 75 6d 62 65 72 2c 20 77 65 20 68 61 76 65   number, we have
0fb0: 3a 0a 20 20 20 20 20 20 2a 2a 20 49 4d 50 3a 20  :.      ** IMP: 
0fc0: 52 2d 35 37 33 32 36 2d 33 31 35 34 31 20 41 62  R-57326-31541 Ab
0fd0: 73 28 58 29 20 72 65 74 75 72 6e 20 30 2e 30 20  s(X) return 0.0 
0fe0: 69 66 20 58 20 69 73 20 61 20 73 74 72 69 6e 67  if X is a string
0ff0: 20 6f 72 20 62 6c 6f 62 20 74 68 61 74 0a 20 20   or blob that.  
1000: 20 20 20 20 2a 2a 20 63 61 6e 6e 6f 74 20 62 65      ** cannot be
1010: 20 63 6f 6e 76 65 72 74 65 64 20 74 6f 20 61 20   converted to a 
1020: 6e 75 6d 65 72 69 63 20 76 61 6c 75 65 2e 20 0a  numeric value. .
1030: 20 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 64        */.      d
1040: 6f 75 62 6c 65 20 72 56 61 6c 20 3d 20 73 71 6c  ouble rVal = sql
1050: 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c  ite3_value_doubl
1060: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  e(argv[0]);.    
1070: 20 20 69 66 28 20 72 56 61 6c 3c 30 20 29 20 72    if( rVal<0 ) r
1080: 56 61 6c 20 3d 20 2d 72 56 61 6c 3b 0a 20 20 20  Val = -rVal;.   
1090: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
10a0: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
10b0: 2c 20 72 56 61 6c 29 3b 0a 20 20 20 20 20 20 62  , rVal);.      b
10c0: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  reak;.    }.  }.
10d0: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
10e0: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73  ntation of the s
10f0: 75 62 73 74 72 28 29 20 66 75 6e 63 74 69 6f 6e  ubstr() function
1100: 2e 0a 2a 2a 0a 2a 2a 20 73 75 62 73 74 72 28 78  ..**.** substr(x
1110: 2c 70 31 2c 70 32 29 20 20 72 65 74 75 72 6e 73  ,p1,p2)  returns
1120: 20 70 32 20 63 68 61 72 61 63 74 65 72 73 20 6f   p2 characters o
1130: 66 20 78 5b 5d 20 62 65 67 69 6e 6e 69 6e 67 20  f x[] beginning 
1140: 77 69 74 68 20 70 31 2e 0a 2a 2a 20 70 31 20 69  with p1..** p1 i
1150: 73 20 31 2d 69 6e 64 65 78 65 64 2e 20 20 53 6f  s 1-indexed.  So
1160: 20 73 75 62 73 74 72 28 78 2c 31 2c 31 29 20 72   substr(x,1,1) r
1170: 65 74 75 72 6e 73 20 74 68 65 20 66 69 72 73 74  eturns the first
1180: 20 63 68 61 72 61 63 74 65 72 0a 2a 2a 20 6f 66   character.** of
1190: 20 78 2e 20 20 49 66 20 78 20 69 73 20 74 65 78   x.  If x is tex
11a0: 74 2c 20 74 68 65 6e 20 77 65 20 61 63 74 75 61  t, then we actua
11b0: 6c 6c 79 20 63 6f 75 6e 74 20 55 54 46 2d 38 20  lly count UTF-8 
11c0: 63 68 61 72 61 63 74 65 72 73 2e 0a 2a 2a 20 49  characters..** I
11d0: 66 20 78 20 69 73 20 61 20 62 6c 6f 62 2c 20 74  f x is a blob, t
11e0: 68 65 6e 20 77 65 20 63 6f 75 6e 74 20 62 79 74  hen we count byt
11f0: 65 73 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 70 31 20  es..**.** If p1 
1200: 69 73 20 6e 65 67 61 74 69 76 65 2c 20 74 68 65  is negative, the
1210: 6e 20 77 65 20 62 65 67 69 6e 20 61 62 73 28 70  n we begin abs(p
1220: 31 29 20 66 72 6f 6d 20 74 68 65 20 65 6e 64 20  1) from the end 
1230: 6f 66 20 78 5b 5d 2e 0a 2a 2a 0a 2a 2a 20 49 66  of x[]..**.** If
1240: 20 70 32 20 69 73 20 6e 65 67 61 74 69 76 65 2c   p2 is negative,
1250: 20 72 65 74 75 72 6e 20 74 68 65 20 70 32 20 63   return the p2 c
1260: 68 61 72 61 63 74 65 72 73 20 70 72 65 63 65 65  haracters precee
1270: 64 69 6e 67 20 70 31 2e 0a 2a 2f 0a 73 74 61 74  ding p1..*/.stat
1280: 69 63 20 76 6f 69 64 20 73 75 62 73 74 72 46 75  ic void substrFu
1290: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
12a0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
12b0: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
12c0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
12d0: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  gv.){.  const un
12e0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0a  signed char *z;.
12f0: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
1300: 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74   char *z2;.  int
1310: 20 6c 65 6e 3b 0a 20 20 69 6e 74 20 70 30 74 79   len;.  int p0ty
1320: 70 65 3b 0a 20 20 69 36 34 20 70 31 2c 20 70 32  pe;.  i64 p1, p2
1330: 3b 0a 20 20 69 6e 74 20 6e 65 67 50 32 20 3d 20  ;.  int negP2 = 
1340: 30 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72  0;..  assert( ar
1350: 67 63 3d 3d 33 20 7c 7c 20 61 72 67 63 3d 3d 32  gc==3 || argc==2
1360: 20 29 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65   );.  if( sqlite
1370: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
1380: 76 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[1])==SQLITE_NU
1390: 4c 4c 0a 20 20 20 7c 7c 20 28 61 72 67 63 3d 3d  LL.   || (argc==
13a0: 33 20 26 26 20 73 71 6c 69 74 65 33 5f 76 61 6c  3 && sqlite3_val
13b0: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 32 5d 29  ue_type(argv[2])
13c0: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 29 0a 20  ==SQLITE_NULL). 
13d0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a   ){.    return;.
13e0: 20 20 7d 0a 20 20 70 30 74 79 70 65 20 3d 20 73    }.  p0type = s
13f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
1400: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 70 31  e(argv[0]);.  p1
1410: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1420: 5f 69 6e 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20  _int(argv[1]);. 
1430: 20 69 66 28 20 70 30 74 79 70 65 3d 3d 53 51 4c   if( p0type==SQL
1440: 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20 20 20  ITE_BLOB ){.    
1450: 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  len = sqlite3_va
1460: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
1470: 5d 29 3b 0a 20 20 20 20 7a 20 3d 20 73 71 6c 69  ]);.    z = sqli
1480: 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61  te3_value_blob(a
1490: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28  rgv[0]);.    if(
14a0: 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a   z==0 ) return;.
14b0: 20 20 20 20 61 73 73 65 72 74 28 20 6c 65 6e 3d      assert( len=
14c0: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62  =sqlite3_value_b
14d0: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 20 29 3b  ytes(argv[0]) );
14e0: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 20  .  }else{.    z 
14f0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
1500: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
1510: 20 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65     if( z==0 ) re
1520: 74 75 72 6e 3b 0a 20 20 20 20 6c 65 6e 20 3d 20  turn;.    len = 
1530: 30 3b 0a 20 20 20 20 69 66 28 20 70 31 3c 30 20  0;.    if( p1<0 
1540: 29 7b 0a 20 20 20 20 20 20 66 6f 72 28 7a 32 3d  ){.      for(z2=
1550: 7a 3b 20 2a 7a 32 3b 20 6c 65 6e 2b 2b 29 7b 0a  z; *z2; len++){.
1560: 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53          SQLITE_S
1570: 4b 49 50 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20  KIP_UTF8(z2);.  
1580: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a      }.    }.  }.
1590: 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29 7b    if( argc==3 ){
15a0: 0a 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74 65  .    p2 = sqlite
15b0: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76  3_value_int(argv
15c0: 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 70 32  [2]);.    if( p2
15d0: 3c 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20 3d  <0 ){.      p2 =
15e0: 20 2d 70 32 3b 0a 20 20 20 20 20 20 6e 65 67 50   -p2;.      negP
15f0: 32 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d  2 = 1;.    }.  }
1600: 65 6c 73 65 7b 0a 20 20 20 20 70 32 20 3d 20 73  else{.    p2 = s
1610: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
1620: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
1630: 29 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45  )->aLimit[SQLITE
1640: 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a  _LIMIT_LENGTH];.
1650: 20 20 7d 0a 20 20 69 66 28 20 70 31 3c 30 20 29    }.  if( p1<0 )
1660: 7b 0a 20 20 20 20 70 31 20 2b 3d 20 6c 65 6e 3b  {.    p1 += len;
1670: 0a 20 20 20 20 69 66 28 20 70 31 3c 30 20 29 7b  .    if( p1<0 ){
1680: 0a 20 20 20 20 20 20 70 32 20 2b 3d 20 70 31 3b  .      p2 += p1;
1690: 0a 20 20 20 20 20 20 69 66 28 20 70 32 3c 30 20  .      if( p2<0 
16a0: 29 20 70 32 20 3d 20 30 3b 0a 20 20 20 20 20 20  ) p2 = 0;.      
16b0: 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20  p1 = 0;.    }.  
16c0: 7d 65 6c 73 65 20 69 66 28 20 70 31 3e 30 20 29  }else if( p1>0 )
16d0: 7b 0a 20 20 20 20 70 31 2d 2d 3b 0a 20 20 7d 65  {.    p1--;.  }e
16e0: 6c 73 65 20 69 66 28 20 70 32 3e 30 20 29 7b 0a  lse if( p2>0 ){.
16f0: 20 20 20 20 70 32 2d 2d 3b 0a 20 20 7d 0a 20 20      p2--;.  }.  
1700: 69 66 28 20 6e 65 67 50 32 20 29 7b 0a 20 20 20  if( negP2 ){.   
1710: 20 70 31 20 2d 3d 20 70 32 3b 0a 20 20 20 20 69   p1 -= p2;.    i
1720: 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 20  f( p1<0 ){.     
1730: 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20 20   p2 += p1;.     
1740: 20 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20   p1 = 0;.    }. 
1750: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 31 3e   }.  assert( p1>
1760: 3d 30 20 26 26 20 70 32 3e 3d 30 20 29 3b 0a 20  =0 && p2>=0 );. 
1770: 20 69 66 28 20 70 30 74 79 70 65 21 3d 53 51 4c   if( p0type!=SQL
1780: 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20 20 20  ITE_BLOB ){.    
1790: 77 68 69 6c 65 28 20 2a 7a 20 26 26 20 70 31 20  while( *z && p1 
17a0: 29 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f  ){.      SQLITE_
17b0: 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20  SKIP_UTF8(z);.  
17c0: 20 20 20 20 70 31 2d 2d 3b 0a 20 20 20 20 7d 0a      p1--;.    }.
17d0: 20 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a      for(z2=z; *z
17e0: 32 20 26 26 20 70 32 3b 20 70 32 2d 2d 29 7b 0a  2 && p2; p2--){.
17f0: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
1800: 50 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20 20 20  P_UTF8(z2);.    
1810: 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  }.    sqlite3_re
1820: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
1830: 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 28 69 6e  t, (char*)z, (in
1840: 74 29 28 7a 32 2d 7a 29 2c 20 53 51 4c 49 54 45  t)(z2-z), SQLITE
1850: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d  _TRANSIENT);.  }
1860: 65 6c 73 65 7b 0a 20 20 20 20 69 66 28 20 70 31  else{.    if( p1
1870: 2b 70 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20 20  +p2>len ){.     
1880: 20 70 32 20 3d 20 6c 65 6e 2d 70 31 3b 0a 20 20   p2 = len-p1;.  
1890: 20 20 20 20 69 66 28 20 70 32 3c 30 20 29 20 70      if( p2<0 ) p
18a0: 32 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 20  2 = 0;.    }.   
18b0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
18c0: 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 63  blob(context, (c
18d0: 68 61 72 2a 29 26 7a 5b 70 31 5d 2c 20 28 69 6e  har*)&z[p1], (in
18e0: 74 29 70 32 2c 20 53 51 4c 49 54 45 5f 54 52 41  t)p2, SQLITE_TRA
18f0: 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a 0a  NSIENT);.  }.}..
1900: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
1910: 74 69 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75 6e  tion of the roun
1920: 64 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a  d() function.*/.
1930: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f  #ifndef SQLITE_O
1940: 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49  MIT_FLOATING_POI
1950: 4e 54 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72  NT.static void r
1960: 6f 75 6e 64 46 75 6e 63 28 73 71 6c 69 74 65 33  oundFunc(sqlite3
1970: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
1980: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
1990: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
19a0: 76 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30 3b  v){.  int n = 0;
19b0: 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20 63  .  double r;.  c
19c0: 68 61 72 20 2a 7a 42 75 66 3b 0a 20 20 61 73 73  har *zBuf;.  ass
19d0: 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20  ert( argc==1 || 
19e0: 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28  argc==2 );.  if(
19f0: 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20   argc==2 ){.    
1a00: 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 3d  if( SQLITE_NULL=
1a10: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
1a20: 79 70 65 28 61 72 67 76 5b 31 5d 29 20 29 20 72  ype(argv[1]) ) r
1a30: 65 74 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20 73  eturn;.    n = s
1a40: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
1a50: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69  (argv[1]);.    i
1a60: 66 28 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33 30  f( n>30 ) n = 30
1a70: 3b 0a 20 20 20 20 69 66 28 20 6e 3c 30 20 29 20  ;.    if( n<0 ) 
1a80: 6e 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28  n = 0;.  }.  if(
1a90: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
1aa0: 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51  ype(argv[0])==SQ
1ab0: 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75  LITE_NULL ) retu
1ac0: 72 6e 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74 65  rn;.  r = sqlite
1ad0: 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61  3_value_double(a
1ae0: 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 49 66  rgv[0]);.  /* If
1af0: 20 59 3d 3d 30 20 61 6e 64 20 58 20 77 69 6c 6c   Y==0 and X will
1b00: 20 66 69 74 20 69 6e 20 61 20 36 34 2d 62 69 74   fit in a 64-bit
1b10: 20 69 6e 74 2c 0a 20 20 2a 2a 20 68 61 6e 64 6c   int,.  ** handl
1b20: 65 20 74 68 65 20 72 6f 75 6e 64 69 6e 67 20 64  e the rounding d
1b30: 69 72 65 63 74 6c 79 2c 0a 20 20 2a 2a 20 6f 74  irectly,.  ** ot
1b40: 68 65 72 77 69 73 65 20 75 73 65 20 70 72 69 6e  herwise use prin
1b50: 74 66 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6e  tf..  */.  if( n
1b60: 3d 3d 30 20 26 26 20 72 3e 3d 30 20 26 26 20 72  ==0 && r>=0 && r
1b70: 3c 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2d 31  <LARGEST_INT64-1
1b80: 20 29 7b 0a 20 20 20 20 72 20 3d 20 28 64 6f 75   ){.    r = (dou
1b90: 62 6c 65 29 28 28 73 71 6c 69 74 65 5f 69 6e 74  ble)((sqlite_int
1ba0: 36 34 29 28 72 2b 30 2e 35 29 29 3b 0a 20 20 7d  64)(r+0.5));.  }
1bb0: 65 6c 73 65 20 69 66 28 20 6e 3d 3d 30 20 26 26  else if( n==0 &&
1bc0: 20 72 3c 30 20 26 26 20 28 2d 72 29 3c 4c 41 52   r<0 && (-r)<LAR
1bd0: 47 45 53 54 5f 49 4e 54 36 34 2d 31 20 29 7b 0a  GEST_INT64-1 ){.
1be0: 20 20 20 20 72 20 3d 20 2d 28 64 6f 75 62 6c 65      r = -(double
1bf0: 29 28 28 73 71 6c 69 74 65 5f 69 6e 74 36 34 29  )((sqlite_int64)
1c00: 28 28 2d 72 29 2b 30 2e 35 29 29 3b 0a 20 20 7d  ((-r)+0.5));.  }
1c10: 65 6c 73 65 7b 0a 20 20 20 20 7a 42 75 66 20 3d  else{.    zBuf =
1c20: 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66   sqlite3_mprintf
1c30: 28 22 25 2e 2a 66 22 2c 6e 2c 72 29 3b 0a 20 20  ("%.*f",n,r);.  
1c40: 20 20 69 66 28 20 7a 42 75 66 3d 3d 30 20 29 7b    if( zBuf==0 ){
1c50: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
1c60: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65  esult_error_nome
1c70: 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  m(context);.    
1c80: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a    return;.    }.
1c90: 20 20 20 20 73 71 6c 69 74 65 33 41 74 6f 46 28      sqlite3AtoF(
1ca0: 7a 42 75 66 2c 20 26 72 29 3b 0a 20 20 20 20 73  zBuf, &r);.    s
1cb0: 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 42 75 66  qlite3_free(zBuf
1cc0: 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  );.  }.  sqlite3
1cd0: 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63  _result_double(c
1ce0: 6f 6e 74 65 78 74 2c 20 72 29 3b 0a 7d 0a 23 65  ontext, r);.}.#e
1cf0: 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 6f  ndif../*.** Allo
1d00: 63 61 74 65 20 6e 42 79 74 65 20 62 79 74 65 73  cate nByte bytes
1d10: 20 6f 66 20 73 70 61 63 65 20 75 73 69 6e 67 20   of space using 
1d20: 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 29  sqlite3_malloc()
1d30: 2e 20 49 66 20 74 68 65 0a 2a 2a 20 61 6c 6c 6f  . If the.** allo
1d40: 63 61 74 69 6f 6e 20 66 61 69 6c 73 2c 20 63 61  cation fails, ca
1d50: 6c 6c 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  ll sqlite3_resul
1d60: 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 29 20  t_error_nomem() 
1d70: 74 6f 20 6e 6f 74 69 66 79 0a 2a 2a 20 74 68 65  to notify.** the
1d80: 20 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65   database handle
1d90: 20 74 68 61 74 20 6d 61 6c 6c 6f 63 28 29 20 68   that malloc() h
1da0: 61 73 20 66 61 69 6c 65 64 20 61 6e 64 20 72 65  as failed and re
1db0: 74 75 72 6e 20 4e 55 4c 4c 2e 0a 2a 2a 20 49 66  turn NULL..** If
1dc0: 20 6e 42 79 74 65 20 69 73 20 6c 61 72 67 65 72   nByte is larger
1dd0: 20 74 68 61 6e 20 74 68 65 20 6d 61 78 69 6d 75   than the maximu
1de0: 6d 20 73 74 72 69 6e 67 20 6f 72 20 62 6c 6f 62  m string or blob
1df0: 20 6c 65 6e 67 74 68 2c 20 74 68 65 6e 0a 2a 2a   length, then.**
1e00: 20 72 61 69 73 65 20 61 6e 20 53 51 4c 49 54 45   raise an SQLITE
1e10: 5f 54 4f 4f 42 49 47 20 65 78 63 65 70 74 69 6f  _TOOBIG exceptio
1e20: 6e 20 61 6e 64 20 72 65 74 75 72 6e 20 4e 55 4c  n and return NUL
1e30: 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  L..*/.static voi
1e40: 64 20 2a 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63  d *contextMalloc
1e50: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
1e60: 20 2a 63 6f 6e 74 65 78 74 2c 20 69 36 34 20 6e   *context, i64 n
1e70: 42 79 74 65 29 7b 0a 20 20 63 68 61 72 20 2a 7a  Byte){.  char *z
1e80: 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  ;.  sqlite3 *db 
1e90: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
1ea0: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
1eb0: 65 78 74 29 3b 0a 20 20 61 73 73 65 72 74 28 20  ext);.  assert( 
1ec0: 6e 42 79 74 65 3e 30 20 29 3b 0a 20 20 74 65 73  nByte>0 );.  tes
1ed0: 74 63 61 73 65 28 20 6e 42 79 74 65 3d 3d 64 62  tcase( nByte==db
1ee0: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
1ef0: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b  LIMIT_LENGTH] );
1f00: 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 42 79  .  testcase( nBy
1f10: 74 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53  te==db->aLimit[S
1f20: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47  QLITE_LIMIT_LENG
1f30: 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e  TH]+1 );.  if( n
1f40: 42 79 74 65 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b  Byte>db->aLimit[
1f50: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e  SQLITE_LIMIT_LEN
1f60: 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c 69  GTH] ){.    sqli
1f70: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
1f80: 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29  _toobig(context)
1f90: 3b 0a 20 20 20 20 7a 20 3d 20 30 3b 0a 20 20 7d  ;.    z = 0;.  }
1fa0: 65 6c 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73 71  else{.    z = sq
1fb0: 6c 69 74 65 33 4d 61 6c 6c 6f 63 28 28 69 6e 74  lite3Malloc((int
1fc0: 29 6e 42 79 74 65 29 3b 0a 20 20 20 20 69 66 28  )nByte);.    if(
1fd0: 20 21 7a 20 29 7b 0a 20 20 20 20 20 20 73 71 6c   !z ){.      sql
1fe0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
1ff0: 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29  r_nomem(context)
2000: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65  ;.    }.  }.  re
2010: 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  turn z;.}../*.**
2020: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
2030: 6f 66 20 74 68 65 20 75 70 70 65 72 28 29 20 61  of the upper() a
2040: 6e 64 20 6c 6f 77 65 72 28 29 20 53 51 4c 20 66  nd lower() SQL f
2050: 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61  unctions..*/.sta
2060: 74 69 63 20 76 6f 69 64 20 75 70 70 65 72 46 75  tic void upperFu
2070: 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  nc(sqlite3_conte
2080: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
2090: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
20a0: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
20b0: 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73  char *z1;.  cons
20c0: 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e  t char *z2;.  in
20d0: 74 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44  t i, n;.  UNUSED
20e0: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
20f0: 3b 0a 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29  ;.  z2 = (char*)
2100: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
2110: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e  xt(argv[0]);.  n
2120: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
2130: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
2140: 0a 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61  .  /* Verify tha
2150: 74 20 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62  t the call to _b
2160: 79 74 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20  ytes() does not 
2170: 69 6e 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f  invalidate the _
2180: 74 65 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a  text() pointer *
2190: 2f 0a 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d  /.  assert( z2==
21a0: 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76  (char*)sqlite3_v
21b0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
21c0: 5d 29 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29  ]) );.  if( z2 )
21d0: 7b 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65  {.    z1 = conte
21e0: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
21f0: 2c 20 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20  , ((i64)n)+1);. 
2200: 20 20 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20     if( z1 ){.   
2210: 20 20 20 6d 65 6d 63 70 79 28 7a 31 2c 20 7a 32     memcpy(z1, z2
2220: 2c 20 6e 2b 31 29 3b 0a 20 20 20 20 20 20 66 6f  , n+1);.      fo
2230: 72 28 69 3d 30 3b 20 7a 31 5b 69 5d 3b 20 69 2b  r(i=0; z1[i]; i+
2240: 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a 31 5b 69  +){.        z1[i
2250: 5d 20 3d 20 28 63 68 61 72 29 73 71 6c 69 74 65  ] = (char)sqlite
2260: 33 54 6f 75 70 70 65 72 28 7a 31 5b 69 5d 29 3b  3Toupper(z1[i]);
2270: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73  .      }.      s
2280: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
2290: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 31 2c 20  xt(context, z1, 
22a0: 2d 31 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65  -1, sqlite3_free
22b0: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73  );.    }.  }.}.s
22c0: 74 61 74 69 63 20 76 6f 69 64 20 6c 6f 77 65 72  tatic void lower
22d0: 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Func(sqlite3_con
22e0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
22f0: 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33  nt argc, sqlite3
2300: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a  _value **argv){.
2310: 20 20 75 38 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73    u8 *z1;.  cons
2320: 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e  t char *z2;.  in
2330: 74 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44  t i, n;.  UNUSED
2340: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
2350: 3b 0a 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29  ;.  z2 = (char*)
2360: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
2370: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e  xt(argv[0]);.  n
2380: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
2390: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
23a0: 0a 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61  .  /* Verify tha
23b0: 74 20 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62  t the call to _b
23c0: 79 74 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20  ytes() does not 
23d0: 69 6e 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f  invalidate the _
23e0: 74 65 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a  text() pointer *
23f0: 2f 0a 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d  /.  assert( z2==
2400: 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76  (char*)sqlite3_v
2410: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
2420: 5d 29 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29  ]) );.  if( z2 )
2430: 7b 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65  {.    z1 = conte
2440: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
2450: 2c 20 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20  , ((i64)n)+1);. 
2460: 20 20 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20     if( z1 ){.   
2470: 20 20 20 6d 65 6d 63 70 79 28 7a 31 2c 20 7a 32     memcpy(z1, z2
2480: 2c 20 6e 2b 31 29 3b 0a 20 20 20 20 20 20 66 6f  , n+1);.      fo
2490: 72 28 69 3d 30 3b 20 7a 31 5b 69 5d 3b 20 69 2b  r(i=0; z1[i]; i+
24a0: 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a 31 5b 69  +){.        z1[i
24b0: 5d 20 3d 20 73 71 6c 69 74 65 33 54 6f 6c 6f 77  ] = sqlite3Tolow
24c0: 65 72 28 7a 31 5b 69 5d 29 3b 0a 20 20 20 20 20  er(z1[i]);.     
24d0: 20 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33   }.      sqlite3
24e0: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
24f0: 74 65 78 74 2c 20 28 63 68 61 72 20 2a 29 7a 31  text, (char *)z1
2500: 2c 20 2d 31 2c 20 73 71 6c 69 74 65 33 5f 66 72  , -1, sqlite3_fr
2510: 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  ee);.    }.  }.}
2520: 0a 0a 0a 23 69 66 20 30 20 20 2f 2a 20 54 68 69  ...#if 0  /* Thi
2530: 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6e 65  s function is ne
2540: 76 65 72 20 75 73 65 64 2e 20 2a 2f 0a 2f 2a 0a  ver used. */./*.
2550: 2a 2a 20 54 68 65 20 43 4f 41 4c 45 53 43 45 28  ** The COALESCE(
2560: 29 20 61 6e 64 20 49 46 4e 55 4c 4c 28 29 20 66  ) and IFNULL() f
2570: 75 6e 63 74 69 6f 6e 73 20 75 73 65 64 20 74 6f  unctions used to
2580: 20 62 65 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20   be implemented 
2590: 61 73 20 73 68 6f 77 6e 0a 2a 2a 20 68 65 72 65  as shown.** here
25a0: 2e 20 20 42 75 74 20 6e 6f 77 20 74 68 65 79 20  .  But now they 
25b0: 61 72 65 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20  are implemented 
25c0: 61 73 20 56 44 42 45 20 63 6f 64 65 20 73 6f 20  as VDBE code so 
25d0: 74 68 61 74 20 75 6e 75 73 65 64 20 61 72 67 75  that unused argu
25e0: 6d 65 6e 74 73 0a 2a 2a 20 64 6f 20 6e 6f 74 20  ments.** do not 
25f0: 68 61 76 65 20 74 6f 20 62 65 20 63 6f 6d 70 75  have to be compu
2600: 74 65 64 2e 20 20 54 68 69 73 20 6c 65 67 61 63  ted.  This legac
2610: 79 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  y implementation
2620: 20 69 73 20 72 65 74 61 69 6e 65 64 20 61 73 0a   is retained as.
2630: 2a 2a 20 63 6f 6d 6d 65 6e 74 2e 0a 2a 2f 0a 2f  ** comment..*/./
2640: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
2650: 69 6f 6e 20 6f 66 20 74 68 65 20 49 46 4e 55 4c  ion of the IFNUL
2660: 4c 28 29 2c 20 4e 56 4c 28 29 2c 20 61 6e 64 20  L(), NVL(), and 
2670: 43 4f 41 4c 45 53 43 45 28 29 20 66 75 6e 63 74  COALESCE() funct
2680: 69 6f 6e 73 2e 20 20 0a 2a 2a 20 41 6c 6c 20 74  ions.  .** All t
2690: 68 72 65 65 20 64 6f 20 74 68 65 20 73 61 6d 65  hree do the same
26a0: 20 74 68 69 6e 67 2e 20 20 54 68 65 79 20 72 65   thing.  They re
26b0: 74 75 72 6e 20 74 68 65 20 66 69 72 73 74 20 6e  turn the first n
26c0: 6f 6e 2d 4e 55 4c 4c 0a 2a 2a 20 61 72 67 75 6d  on-NULL.** argum
26d0: 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ent..*/.static v
26e0: 6f 69 64 20 69 66 6e 75 6c 6c 46 75 6e 63 28 0a  oid ifnullFunc(.
26f0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
2700: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
2710: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
2720: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
2730: 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72  {.  int i;.  for
2740: 28 69 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b  (i=0; i<argc; i+
2750: 2b 29 7b 0a 20 20 20 20 69 66 28 20 53 51 4c 49  +){.    if( SQLI
2760: 54 45 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33  TE_NULL!=sqlite3
2770: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
2780: 5b 69 5d 29 20 29 7b 0a 20 20 20 20 20 20 73 71  [i]) ){.      sq
2790: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c  lite3_result_val
27a0: 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76  ue(context, argv
27b0: 5b 69 5d 29 3b 0a 20 20 20 20 20 20 62 72 65 61  [i]);.      brea
27c0: 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 23  k;.    }.  }.}.#
27d0: 65 6e 64 69 66 20 2f 2a 20 4e 4f 54 20 55 53 45  endif /* NOT USE
27e0: 44 20 2a 2f 0a 23 64 65 66 69 6e 65 20 69 66 6e  D */.#define ifn
27f0: 75 6c 6c 46 75 6e 63 20 76 65 72 73 69 6f 6e 46  ullFunc versionF
2800: 75 6e 63 20 20 20 2f 2a 20 53 75 62 73 74 69 74  unc   /* Substit
2810: 75 74 65 20 66 75 6e 63 74 69 6f 6e 20 2d 20 6e  ute function - n
2820: 65 76 65 72 20 63 61 6c 6c 65 64 20 2a 2f 0a 0a  ever called */..
2830: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
2840: 74 69 6f 6e 20 6f 66 20 72 61 6e 64 6f 6d 28 29  tion of random()
2850: 2e 20 20 52 65 74 75 72 6e 20 61 20 72 61 6e 64  .  Return a rand
2860: 6f 6d 20 69 6e 74 65 67 65 72 2e 20 20 0a 2a 2f  om integer.  .*/
2870: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e  .static void ran
2880: 64 6f 6d 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  domFunc(.  sqlit
2890: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
28a0: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
28b0: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
28c0: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
28d0: 7b 0a 20 20 73 71 6c 69 74 65 5f 69 6e 74 36 34  {.  sqlite_int64
28e0: 20 72 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   r;.  UNUSED_PAR
28f0: 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c  AMETER2(NotUsed,
2900: 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 73 71   NotUsed2);.  sq
2910: 6c 69 74 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73  lite3_randomness
2920: 28 73 69 7a 65 6f 66 28 72 29 2c 20 26 72 29 3b  (sizeof(r), &r);
2930: 0a 20 20 69 66 28 20 72 3c 30 20 29 7b 0a 20 20  .  if( r<0 ){.  
2940: 20 20 2f 2a 20 57 65 20 6e 65 65 64 20 74 6f 20    /* We need to 
2950: 70 72 65 76 65 6e 74 20 61 20 72 61 6e 64 6f 6d  prevent a random
2960: 20 6e 75 6d 62 65 72 20 6f 66 20 30 78 38 30 30   number of 0x800
2970: 30 30 30 30 30 30 30 30 30 30 30 30 30 20 0a 20  0000000000000 . 
2980: 20 20 20 2a 2a 20 28 6f 72 20 2d 39 32 32 33 33     ** (or -92233
2990: 37 32 30 33 36 38 35 34 37 37 35 38 30 38 29 20  72036854775808) 
29a0: 73 69 6e 63 65 20 77 68 65 6e 20 79 6f 75 20 64  since when you d
29b0: 6f 20 61 62 73 28 29 20 6f 66 20 74 68 61 74 0a  o abs() of that.
29c0: 20 20 20 20 2a 2a 20 6e 75 6d 62 65 72 20 6f 66      ** number of
29d0: 20 79 6f 75 20 67 65 74 20 74 68 65 20 73 61 6d   you get the sam
29e0: 65 20 76 61 6c 75 65 20 62 61 63 6b 20 61 67 61  e value back aga
29f0: 69 6e 2e 20 20 54 6f 20 64 6f 20 74 68 69 73 0a  in.  To do this.
2a00: 20 20 20 20 2a 2a 20 69 6e 20 61 20 77 61 79 20      ** in a way 
2a10: 74 68 61 74 20 69 73 20 74 65 73 74 61 62 6c 65  that is testable
2a20: 2c 20 6d 61 73 6b 20 74 68 65 20 73 69 67 6e 20  , mask the sign 
2a30: 62 69 74 20 6f 66 66 20 6f 66 20 6e 65 67 61 74  bit off of negat
2a40: 69 76 65 0a 20 20 20 20 2a 2a 20 76 61 6c 75 65  ive.    ** value
2a50: 73 2c 20 72 65 73 75 6c 74 69 6e 67 20 69 6e 20  s, resulting in 
2a60: 61 20 70 6f 73 69 74 69 76 65 20 76 61 6c 75 65  a positive value
2a70: 2e 20 20 54 68 65 6e 20 74 61 6b 65 20 74 68 65  .  Then take the
2a80: 20 0a 20 20 20 20 2a 2a 20 32 73 20 63 6f 6d 70   .    ** 2s comp
2a90: 6c 65 6d 65 6e 74 20 6f 66 20 74 68 61 74 20 70  lement of that p
2aa0: 6f 73 69 74 69 76 65 20 76 61 6c 75 65 2e 20 20  ositive value.  
2ab0: 54 68 65 20 65 6e 64 20 72 65 73 75 6c 74 20 63  The end result c
2ac0: 61 6e 0a 20 20 20 20 2a 2a 20 74 68 65 72 65 66  an.    ** theref
2ad0: 6f 72 65 20 62 65 20 6e 6f 20 6c 65 73 73 20 74  ore be no less t
2ae0: 68 61 6e 20 2d 39 32 32 33 33 37 32 30 33 36 38  han -92233720368
2af0: 35 34 37 37 35 38 30 37 2e 0a 20 20 20 20 2a 2f  54775807..    */
2b00: 0a 20 20 20 20 72 20 3d 20 2d 28 72 20 5e 20 28  .    r = -(r ^ (
2b10: 28 28 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 29  ((sqlite3_int64)
2b20: 31 29 3c 3c 36 33 29 29 3b 0a 20 20 7d 0a 20 20  1)<<63));.  }.  
2b30: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
2b40: 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 72 29  nt64(context, r)
2b50: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
2b60: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72 61 6e  mentation of ran
2b70: 64 6f 6d 62 6c 6f 62 28 4e 29 2e 20 20 52 65 74  domblob(N).  Ret
2b80: 75 72 6e 20 61 20 72 61 6e 64 6f 6d 20 62 6c 6f  urn a random blo
2b90: 62 0a 2a 2a 20 74 68 61 74 20 69 73 20 4e 20 62  b.** that is N b
2ba0: 79 74 65 73 20 6c 6f 6e 67 2e 0a 2a 2f 0a 73 74  ytes long..*/.st
2bb0: 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d  atic void random
2bc0: 42 6c 6f 62 28 0a 20 20 73 71 6c 69 74 65 33 5f  Blob(.  sqlite3_
2bd0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
2be0: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
2bf0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
2c00: 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b  argv.){.  int n;
2c10: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
2c20: 20 2a 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61   *p;.  assert( a
2c30: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
2c40: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
2c50: 63 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65  c);.  n = sqlite
2c60: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76  3_value_int(argv
2c70: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 6e 3c 31 20  [0]);.  if( n<1 
2c80: 29 7b 0a 20 20 20 20 6e 20 3d 20 31 3b 0a 20 20  ){.    n = 1;.  
2c90: 7d 0a 20 20 70 20 3d 20 63 6f 6e 74 65 78 74 4d  }.  p = contextM
2ca0: 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 6e  alloc(context, n
2cb0: 29 3b 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 20  );.  if( p ){.  
2cc0: 20 20 73 71 6c 69 74 65 33 5f 72 61 6e 64 6f 6d    sqlite3_random
2cd0: 6e 65 73 73 28 6e 2c 20 70 29 3b 0a 20 20 20 20  ness(n, p);.    
2ce0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62  sqlite3_result_b
2cf0: 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 63 68  lob(context, (ch
2d00: 61 72 2a 29 70 2c 20 6e 2c 20 73 71 6c 69 74 65  ar*)p, n, sqlite
2d10: 33 5f 66 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a  3_free);.  }.}..
2d20: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
2d30: 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73 74  tion of the last
2d40: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20  _insert_rowid() 
2d50: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54  SQL function.  T
2d60: 68 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c  he return.** val
2d70: 75 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61  ue is the same a
2d80: 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 61  s the sqlite3_la
2d90: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
2da0: 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a  ) API function..
2db0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
2dc0: 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64  ast_insert_rowid
2dd0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
2de0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20  ext *context, . 
2df0: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a 20   int NotUsed, . 
2e00: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
2e10: 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73  *NotUsed2.){.  s
2e20: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c  qlite3 *db = sql
2e30: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
2e40: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b  handle(context);
2e50: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
2e60: 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f  TER2(NotUsed, No
2e70: 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d  tUsed2);.  /* IM
2e80: 50 3a 20 52 2d 35 31 35 31 33 2d 31 32 30 32 36  P: R-51513-12026
2e90: 20 54 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74   The last_insert
2ea0: 5f 72 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e  _rowid() SQL fun
2eb0: 63 74 69 6f 6e 20 69 73 20 61 0a 20 20 2a 2a 20  ction is a.  ** 
2ec0: 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74  wrapper around t
2ed0: 68 65 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f  he sqlite3_last_
2ee0: 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 43  insert_rowid() C
2ef0: 2f 43 2b 2b 20 69 6e 74 65 72 66 61 63 65 0a 20  /C++ interface. 
2f00: 20 2a 2a 20 66 75 6e 63 74 69 6f 6e 2e 20 2a 2f   ** function. */
2f10: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
2f20: 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c  t_int64(context,
2f30: 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e   sqlite3_last_in
2f40: 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29 3b  sert_rowid(db));
2f50: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
2f60: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
2f70: 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75  changes() SQL fu
2f80: 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d  nction..**.** IM
2f90: 50 3a 20 52 2d 36 32 30 37 33 2d 31 31 32 30 39  P: R-62073-11209
2fa0: 20 54 68 65 20 63 68 61 6e 67 65 73 28 29 20 53   The changes() S
2fb0: 51 4c 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61  QL function is a
2fc0: 20 77 72 61 70 70 65 72 0a 2a 2a 20 61 72 6f 75   wrapper.** arou
2fd0: 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63  nd the sqlite3_c
2fe0: 68 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b 20 66  hanges() C/C++ f
2ff0: 75 6e 63 74 69 6f 6e 20 61 6e 64 20 68 65 6e 63  unction and henc
3000: 65 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 73 61  e follows the sa
3010: 6d 65 0a 2a 2a 20 72 75 6c 65 73 20 66 6f 72 20  me.** rules for 
3020: 63 6f 75 6e 74 69 6e 67 20 63 68 61 6e 67 65 73  counting changes
3030: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
3040: 20 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69   changes(.  sqli
3050: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
3060: 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55  text,.  int NotU
3070: 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  sed,.  sqlite3_v
3080: 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a  alue **NotUsed2.
3090: 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62  ){.  sqlite3 *db
30a0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65   = sqlite3_conte
30b0: 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e  xt_db_handle(con
30c0: 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f  text);.  UNUSED_
30d0: 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73  PARAMETER2(NotUs
30e0: 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20  ed, NotUsed2);. 
30f0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
3100: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  int(context, sql
3110: 69 74 65 33 5f 63 68 61 6e 67 65 73 28 64 62 29  ite3_changes(db)
3120: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  );.}../*.** Impl
3130: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
3140: 65 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28  e total_changes(
3150: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20  ) SQL function. 
3160: 20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75   The return valu
3170: 65 20 69 73 0a 2a 2a 20 74 68 65 20 73 61 6d 65  e is.** the same
3180: 20 61 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f   as the sqlite3_
3190: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20  total_changes() 
31a0: 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f  API function..*/
31b0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74  .static void tot
31c0: 61 6c 5f 63 68 61 6e 67 65 73 28 0a 20 20 73 71  al_changes(.  sq
31d0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
31e0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f  ontext,.  int No
31f0: 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33  tUsed,.  sqlite3
3200: 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64  _value **NotUsed
3210: 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a  2.){.  sqlite3 *
3220: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
3230: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
3240: 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45  ontext);.  UNUSE
3250: 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74  D_PARAMETER2(Not
3260: 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b  Used, NotUsed2);
3270: 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 35 32 37  .  /* IMP: R-527
3280: 35 36 2d 34 31 39 39 33 20 54 68 69 73 20 66 75  56-41993 This fu
3290: 6e 63 74 69 6f 6e 20 69 73 20 61 20 77 72 61 70  nction is a wrap
32a0: 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20  per around the. 
32b0: 20 2a 2a 20 73 71 6c 69 74 65 33 5f 74 6f 74 61   ** sqlite3_tota
32c0: 6c 5f 63 68 61 6e 67 65 73 28 29 20 43 2f 43 2b  l_changes() C/C+
32d0: 2b 20 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a  + interface. */.
32e0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
32f0: 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  _int(context, sq
3300: 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e  lite3_total_chan
3310: 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a  ges(db));.}../*.
3320: 2a 2a 20 41 20 73 74 72 75 63 74 75 72 65 20 64  ** A structure d
3330: 65 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64  efining how to d
3340: 6f 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d  o GLOB-style com
3350: 70 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72  parisons..*/.str
3360: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
3370: 7b 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b  {.  u8 matchAll;
3380: 0a 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a  .  u8 matchOne;.
3390: 20 20 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20    u8 matchSet;. 
33a0: 20 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a   u8 noCase;.};..
33b0: 2f 2a 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45 20 61  /*.** For LIKE a
33c0: 6e 64 20 47 4c 4f 42 20 6d 61 74 63 68 69 6e 67  nd GLOB matching
33d0: 20 6f 6e 20 45 42 43 44 49 43 20 6d 61 63 68 69   on EBCDIC machi
33e0: 6e 65 73 2c 20 61 73 73 75 6d 65 20 74 68 61 74  nes, assume that
33f0: 20 65 76 65 72 79 0a 2a 2a 20 63 68 61 72 61 63   every.** charac
3400: 74 65 72 20 69 73 20 65 78 61 63 74 6c 79 20 6f  ter is exactly o
3410: 6e 65 20 62 79 74 65 20 69 6e 20 73 69 7a 65 2e  ne byte in size.
3420: 20 20 41 6c 73 6f 2c 20 61 6c 6c 20 63 68 61 72    Also, all char
3430: 61 63 74 65 72 73 20 61 72 65 0a 2a 2a 20 61 62  acters are.** ab
3440: 6c 65 20 74 6f 20 70 61 72 74 69 63 69 70 61 74  le to participat
3450: 65 20 69 6e 20 75 70 70 65 72 2d 63 61 73 65 2d  e in upper-case-
3460: 74 6f 2d 6c 6f 77 65 72 2d 63 61 73 65 20 6d 61  to-lower-case ma
3470: 70 70 69 6e 67 73 20 69 6e 20 45 42 43 44 49 43  ppings in EBCDIC
3480: 0a 2a 2a 20 77 68 65 72 65 61 73 20 6f 6e 6c 79  .** whereas only
3490: 20 63 68 61 72 61 63 74 65 72 73 20 6c 65 73 73   characters less
34a0: 20 74 68 61 6e 20 30 78 38 30 20 64 6f 20 69 6e   than 0x80 do in
34b0: 20 41 53 43 49 49 2e 0a 2a 2f 0a 23 69 66 20 64   ASCII..*/.#if d
34c0: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 45 42  efined(SQLITE_EB
34d0: 43 44 49 43 29 0a 23 20 64 65 66 69 6e 65 20 73  CDIC).# define s
34e0: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 41  qlite3Utf8Read(A
34f0: 2c 43 29 20 20 20 20 28 2a 28 41 2b 2b 29 29 0a  ,C)    (*(A++)).
3500: 23 20 64 65 66 69 6e 65 20 47 6c 6f 67 55 70 70  # define GlogUpp
3510: 65 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20 20  erToLower(A)    
3520: 20 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65   A = sqlite3Uppe
3530: 72 54 6f 4c 6f 77 65 72 5b 41 5d 0a 23 65 6c 73  rToLower[A].#els
3540: 65 0a 23 20 64 65 66 69 6e 65 20 47 6c 6f 67 55  e.# define GlogU
3550: 70 70 65 72 54 6f 4c 6f 77 65 72 28 41 29 20 20  pperToLower(A)  
3560: 20 20 20 69 66 28 20 41 3c 30 78 38 30 20 29 7b     if( A<0x80 ){
3570: 20 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65   A = sqlite3Uppe
3580: 72 54 6f 4c 6f 77 65 72 5b 41 5d 3b 20 7d 0a 23  rToLower[A]; }.#
3590: 65 6e 64 69 66 0a 0a 73 74 61 74 69 63 20 63 6f  endif..static co
35a0: 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61  nst struct compa
35b0: 72 65 49 6e 66 6f 20 67 6c 6f 62 49 6e 66 6f 20  reInfo globInfo 
35c0: 3d 20 7b 20 27 2a 27 2c 20 27 3f 27 2c 20 27 5b  = { '*', '?', '[
35d0: 27 2c 20 30 20 7d 3b 0a 2f 2a 20 54 68 65 20 63  ', 0 };./* The c
35e0: 6f 72 72 65 63 74 20 53 51 4c 2d 39 32 20 62 65  orrect SQL-92 be
35f0: 68 61 76 69 6f 72 20 69 73 20 66 6f 72 20 74 68  havior is for th
3600: 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20  e LIKE operator 
3610: 74 6f 20 69 67 6e 6f 72 65 0a 2a 2a 20 63 61 73  to ignore.** cas
3620: 65 2e 20 20 54 68 75 73 20 20 27 61 27 20 4c 49  e.  Thus  'a' LI
3630: 4b 45 20 27 41 27 20 77 6f 75 6c 64 20 62 65 20  KE 'A' would be 
3640: 74 72 75 65 2e 20 2a 2f 0a 73 74 61 74 69 63 20  true. */.static 
3650: 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d  const struct com
3660: 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e 66  pareInfo likeInf
3670: 6f 4e 6f 72 6d 20 3d 20 7b 20 27 25 27 2c 20 27  oNorm = { '%', '
3680: 5f 27 2c 20 20 20 30 2c 20 31 20 7d 3b 0a 2f 2a  _',   0, 1 };./*
3690: 20 49 66 20 53 51 4c 49 54 45 5f 43 41 53 45 5f   If SQLITE_CASE_
36a0: 53 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45 20 69  SENSITIVE_LIKE i
36b0: 73 20 64 65 66 69 6e 65 64 2c 20 74 68 65 6e 20  s defined, then 
36c0: 74 68 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f  the LIKE operato
36d0: 72 0a 2a 2a 20 69 73 20 63 61 73 65 20 73 65 6e  r.** is case sen
36e0: 73 69 74 69 76 65 20 63 61 75 73 69 6e 67 20 27  sitive causing '
36f0: 61 27 20 4c 49 4b 45 20 27 41 27 20 74 6f 20 62  a' LIKE 'A' to b
3700: 65 20 66 61 6c 73 65 20 2a 2f 0a 73 74 61 74 69  e false */.stati
3710: 63 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63  c const struct c
3720: 6f 6d 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49  ompareInfo likeI
3730: 6e 66 6f 41 6c 74 20 3d 20 7b 20 27 25 27 2c 20  nfoAlt = { '%', 
3740: 27 5f 27 2c 20 20 20 30 2c 20 30 20 7d 3b 0a 0a  '_',   0, 0 };..
3750: 2f 2a 0a 2a 2a 20 43 6f 6d 70 61 72 65 20 74 77  /*.** Compare tw
3760: 6f 20 55 54 46 2d 38 20 73 74 72 69 6e 67 73 20  o UTF-8 strings 
3770: 66 6f 72 20 65 71 75 61 6c 69 74 79 20 77 68 65  for equality whe
3780: 72 65 20 74 68 65 20 66 69 72 73 74 20 73 74 72  re the first str
3790: 69 6e 67 20 63 61 6e 0a 2a 2a 20 70 6f 74 65 6e  ing can.** poten
37a0: 74 69 61 6c 6c 79 20 62 65 20 61 20 22 67 6c 6f  tially be a "glo
37b0: 62 22 20 65 78 70 72 65 73 73 69 6f 6e 2e 20 20  b" expression.  
37c0: 52 65 74 75 72 6e 20 74 72 75 65 20 28 31 29 20  Return true (1) 
37d0: 69 66 20 74 68 65 79 0a 2a 2a 20 61 72 65 20 74  if they.** are t
37e0: 68 65 20 73 61 6d 65 20 61 6e 64 20 66 61 6c 73  he same and fals
37f0: 65 20 28 30 29 20 69 66 20 74 68 65 79 20 61 72  e (0) if they ar
3800: 65 20 64 69 66 66 65 72 65 6e 74 2e 0a 2a 2a 0a  e different..**.
3810: 2a 2a 20 47 6c 6f 62 62 69 6e 67 20 72 75 6c 65  ** Globbing rule
3820: 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 2a  s:.**.**      '*
3830: 27 20 20 20 20 20 20 20 4d 61 74 63 68 65 73 20  '       Matches 
3840: 61 6e 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20  any sequence of 
3850: 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61  zero or more cha
3860: 72 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20  racters..**.**  
3870: 20 20 20 20 27 3f 27 20 20 20 20 20 20 20 4d 61      '?'       Ma
3880: 74 63 68 65 73 20 65 78 61 63 74 6c 79 20 6f 6e  tches exactly on
3890: 65 20 63 68 61 72 61 63 74 65 72 2e 0a 2a 2a 0a  e character..**.
38a0: 2a 2a 20 20 20 20 20 5b 2e 2e 2e 5d 20 20 20 20  **     [...]    
38b0: 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68    Matches one ch
38c0: 61 72 61 63 74 65 72 20 66 72 6f 6d 20 74 68 65  aracter from the
38d0: 20 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74 20 6f   enclosed list o
38e0: 66 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20  f.**            
38f0: 20 20 20 20 63 68 61 72 61 63 74 65 72 73 2e 0a      characters..
3900: 2a 2a 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d  **.**     [^...]
3910: 20 20 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65       Matches one
3920: 20 63 68 61 72 61 63 74 65 72 20 6e 6f 74 20 69   character not i
3930: 6e 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c  n the enclosed l
3940: 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 57 69 74 68 20  ist..**.** With 
3950: 74 68 65 20 5b 2e 2e 2e 5d 20 61 6e 64 20 5b 5e  the [...] and [^
3960: 2e 2e 2e 5d 20 6d 61 74 63 68 69 6e 67 2c 20 61  ...] matching, a
3970: 20 27 5d 27 20 63 68 61 72 61 63 74 65 72 20 63   ']' character c
3980: 61 6e 20 62 65 20 69 6e 63 6c 75 64 65 64 0a 2a  an be included.*
3990: 2a 20 69 6e 20 74 68 65 20 6c 69 73 74 20 62 79  * in the list by
39a0: 20 6d 61 6b 69 6e 67 20 69 74 20 74 68 65 20 66   making it the f
39b0: 69 72 73 74 20 63 68 61 72 61 63 74 65 72 20 61  irst character a
39c0: 66 74 65 72 20 27 5b 27 20 6f 72 20 27 5e 27 2e  fter '[' or '^'.
39d0: 20 20 41 0a 2a 2a 20 72 61 6e 67 65 20 6f 66 20    A.** range of 
39e0: 63 68 61 72 61 63 74 65 72 73 20 63 61 6e 20 62  characters can b
39f0: 65 20 73 70 65 63 69 66 69 65 64 20 75 73 69 6e  e specified usin
3a00: 67 20 27 2d 27 2e 20 20 45 78 61 6d 70 6c 65 3a  g '-'.  Example:
3a10: 0a 2a 2a 20 22 5b 61 2d 7a 5d 22 20 6d 61 74 63  .** "[a-z]" matc
3a20: 68 65 73 20 61 6e 79 20 73 69 6e 67 6c 65 20 6c  hes any single l
3a30: 6f 77 65 72 2d 63 61 73 65 20 6c 65 74 74 65 72  ower-case letter
3a40: 2e 20 20 54 6f 20 6d 61 74 63 68 20 61 20 27 2d  .  To match a '-
3a50: 27 2c 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 74 68  ', make.** it th
3a60: 65 20 6c 61 73 74 20 63 68 61 72 61 63 74 65 72  e last character
3a70: 20 69 6e 20 74 68 65 20 6c 69 73 74 2e 0a 2a 2a   in the list..**
3a80: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65  .** This routine
3a90: 20 69 73 20 75 73 75 61 6c 6c 79 20 71 75 69 63   is usually quic
3aa0: 6b 2c 20 62 75 74 20 63 61 6e 20 62 65 20 4e 2a  k, but can be N*
3ab0: 2a 32 20 69 6e 20 74 68 65 20 77 6f 72 73 74 20  *2 in the worst 
3ac0: 63 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 48 69 6e 74  case..**.** Hint
3ad0: 73 3a 20 74 6f 20 6d 61 74 63 68 20 27 2a 27 20  s: to match '*' 
3ae0: 6f 72 20 27 3f 27 2c 20 70 75 74 20 74 68 65 6d  or '?', put them
3af0: 20 69 6e 20 22 5b 5d 22 2e 20 20 4c 69 6b 65 20   in "[]".  Like 
3b00: 74 68 69 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20  this:.**.**     
3b10: 20 20 20 20 61 62 63 5b 2a 5d 78 79 7a 20 20 20      abc[*]xyz   
3b20: 20 20 20 20 20 4d 61 74 63 68 65 73 20 22 61 62       Matches "ab
3b30: 63 2a 78 79 7a 22 20 6f 6e 6c 79 0a 2a 2f 0a 73  c*xyz" only.*/.s
3b40: 74 61 74 69 63 20 69 6e 74 20 70 61 74 74 65 72  tatic int patter
3b50: 6e 43 6f 6d 70 61 72 65 28 0a 20 20 63 6f 6e 73  nCompare(.  cons
3b60: 74 20 75 38 20 2a 7a 50 61 74 74 65 72 6e 2c 20  t u8 *zPattern, 
3b70: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
3b80: 54 68 65 20 67 6c 6f 62 20 70 61 74 74 65 72 6e  The glob pattern
3b90: 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a   */.  const u8 *
3ba0: 7a 53 74 72 69 6e 67 2c 20 20 20 20 20 20 20 20  zString,        
3bb0: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 73 74         /* The st
3bc0: 72 69 6e 67 20 74 6f 20 63 6f 6d 70 61 72 65 20  ring to compare 
3bd0: 61 67 61 69 6e 73 74 20 74 68 65 20 67 6c 6f 62  against the glob
3be0: 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 73 74 72 75   */.  const stru
3bf0: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a  ct compareInfo *
3c00: 70 49 6e 66 6f 2c 20 2f 2a 20 49 6e 66 6f 72 6d  pInfo, /* Inform
3c10: 61 74 69 6f 6e 20 61 62 6f 75 74 20 68 6f 77 20  ation about how 
3c20: 74 6f 20 64 6f 20 74 68 65 20 63 6f 6d 70 61 72  to do the compar
3c30: 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 69 6e 74  e */.  const int
3c40: 20 65 73 63 20 20 20 20 20 20 20 20 20 20 20 20   esc            
3c50: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 65          /* The e
3c60: 73 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20  scape character 
3c70: 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20 63 2c 20 63  */.){.  int c, c
3c80: 32 3b 0a 20 20 69 6e 74 20 69 6e 76 65 72 74 3b  2;.  int invert;
3c90: 0a 20 20 69 6e 74 20 73 65 65 6e 3b 0a 20 20 75  .  int seen;.  u
3ca0: 38 20 6d 61 74 63 68 4f 6e 65 20 3d 20 70 49 6e  8 matchOne = pIn
3cb0: 66 6f 2d 3e 6d 61 74 63 68 4f 6e 65 3b 0a 20 20  fo->matchOne;.  
3cc0: 75 38 20 6d 61 74 63 68 41 6c 6c 20 3d 20 70 49  u8 matchAll = pI
3cd0: 6e 66 6f 2d 3e 6d 61 74 63 68 41 6c 6c 3b 0a 20  nfo->matchAll;. 
3ce0: 20 75 38 20 6d 61 74 63 68 53 65 74 20 3d 20 70   u8 matchSet = p
3cf0: 49 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74 3b 0a  Info->matchSet;.
3d00: 20 20 75 38 20 6e 6f 43 61 73 65 20 3d 20 70 49    u8 noCase = pI
3d10: 6e 66 6f 2d 3e 6e 6f 43 61 73 65 3b 20 0a 20 20  nfo->noCase; .  
3d20: 69 6e 74 20 70 72 65 76 45 73 63 61 70 65 20 3d  int prevEscape =
3d30: 20 30 3b 20 20 20 20 20 2f 2a 20 54 72 75 65 20   0;     /* True 
3d40: 69 66 20 74 68 65 20 70 72 65 76 69 6f 75 73 20  if the previous 
3d50: 63 68 61 72 61 63 74 65 72 20 77 61 73 20 27 65  character was 'e
3d60: 73 63 61 70 65 27 20 2a 2f 0a 0a 20 20 77 68 69  scape' */..  whi
3d70: 6c 65 28 20 28 63 20 3d 20 73 71 6c 69 74 65 33  le( (c = sqlite3
3d80: 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72  Utf8Read(zPatter
3d90: 6e 2c 26 7a 50 61 74 74 65 72 6e 29 29 21 3d 30  n,&zPattern))!=0
3da0: 20 29 7b 0a 20 20 20 20 69 66 28 20 21 70 72 65   ){.    if( !pre
3db0: 76 45 73 63 61 70 65 20 26 26 20 63 3d 3d 6d 61  vEscape && c==ma
3dc0: 74 63 68 41 6c 6c 20 29 7b 0a 20 20 20 20 20 20  tchAll ){.      
3dd0: 77 68 69 6c 65 28 20 28 63 3d 73 71 6c 69 74 65  while( (c=sqlite
3de0: 33 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65  3Utf8Read(zPatte
3df0: 72 6e 2c 26 7a 50 61 74 74 65 72 6e 29 29 20 3d  rn,&zPattern)) =
3e00: 3d 20 6d 61 74 63 68 41 6c 6c 0a 20 20 20 20 20  = matchAll.     
3e10: 20 20 20 20 20 20 20 20 20 20 7c 7c 20 63 20 3d            || c =
3e20: 3d 20 6d 61 74 63 68 4f 6e 65 20 29 7b 0a 20 20  = matchOne ){.  
3e30: 20 20 20 20 20 20 69 66 28 20 63 3d 3d 6d 61 74        if( c==mat
3e40: 63 68 4f 6e 65 20 26 26 20 73 71 6c 69 74 65 33  chOne && sqlite3
3e50: 55 74 66 38 52 65 61 64 28 7a 53 74 72 69 6e 67  Utf8Read(zString
3e60: 2c 20 26 7a 53 74 72 69 6e 67 29 3d 3d 30 20 29  , &zString)==0 )
3e70: 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65 74 75  {.          retu
3e80: 72 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a  rn 0;.        }.
3e90: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66        }.      if
3ea0: 28 20 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  ( c==0 ){.      
3eb0: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20    return 1;.    
3ec0: 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d 65    }else if( c==e
3ed0: 73 63 20 29 7b 0a 20 20 20 20 20 20 20 20 63 20  sc ){.        c 
3ee0: 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  = sqlite3Utf8Rea
3ef0: 64 28 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61  d(zPattern, &zPa
3f00: 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20  ttern);.        
3f10: 69 66 28 20 63 3d 3d 30 20 29 7b 0a 20 20 20 20  if( c==0 ){.    
3f20: 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a        return 0;.
3f30: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
3f40: 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61 74  }else if( c==mat
3f50: 63 68 53 65 74 20 29 7b 0a 20 20 20 20 20 20 20  chSet ){.       
3f60: 20 61 73 73 65 72 74 28 20 65 73 63 3d 3d 30 20   assert( esc==0 
3f70: 29 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68  );         /* Th
3f80: 69 73 20 69 73 20 47 4c 4f 42 2c 20 6e 6f 74 20  is is GLOB, not 
3f90: 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20 20 20  LIKE */.        
3fa0: 61 73 73 65 72 74 28 20 6d 61 74 63 68 53 65 74  assert( matchSet
3fb0: 3c 30 78 38 30 20 29 3b 20 20 2f 2a 20 27 5b 27  <0x80 );  /* '['
3fc0: 20 69 73 20 61 20 73 69 6e 67 6c 65 2d 62 79 74   is a single-byt
3fd0: 65 20 63 68 61 72 61 63 74 65 72 20 2a 2f 0a 20  e character */. 
3fe0: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a 7a         while( *z
3ff0: 53 74 72 69 6e 67 20 26 26 20 70 61 74 74 65 72  String && patter
4000: 6e 43 6f 6d 70 61 72 65 28 26 7a 50 61 74 74 65  nCompare(&zPatte
4010: 72 6e 5b 2d 31 5d 2c 7a 53 74 72 69 6e 67 2c 70  rn[-1],zString,p
4020: 49 6e 66 6f 2c 65 73 63 29 3d 3d 30 20 29 7b 0a  Info,esc)==0 ){.
4030: 20 20 20 20 20 20 20 20 20 20 53 51 4c 49 54 45            SQLITE
4040: 5f 53 4b 49 50 5f 55 54 46 38 28 7a 53 74 72 69  _SKIP_UTF8(zStri
4050: 6e 67 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  ng);.        }. 
4060: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 2a 7a         return *z
4070: 53 74 72 69 6e 67 21 3d 30 3b 0a 20 20 20 20 20  String!=0;.     
4080: 20 7d 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20   }.      while( 
4090: 28 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66  (c2 = sqlite3Utf
40a0: 38 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 26 7a  8Read(zString,&z
40b0: 53 74 72 69 6e 67 29 29 21 3d 30 20 29 7b 0a 20  String))!=0 ){. 
40c0: 20 20 20 20 20 20 20 69 66 28 20 6e 6f 43 61 73         if( noCas
40d0: 65 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 47  e ){.          G
40e0: 6c 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28  logUpperToLower(
40f0: 63 32 29 3b 0a 20 20 20 20 20 20 20 20 20 20 47  c2);.          G
4100: 6c 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28  logUpperToLower(
4110: 63 29 3b 0a 20 20 20 20 20 20 20 20 20 20 77 68  c);.          wh
4120: 69 6c 65 28 20 63 32 20 21 3d 20 30 20 26 26 20  ile( c2 != 0 && 
4130: 63 32 20 21 3d 20 63 20 29 7b 0a 20 20 20 20 20  c2 != c ){.     
4140: 20 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69         c2 = sqli
4150: 74 65 33 55 74 66 38 52 65 61 64 28 7a 53 74 72  te3Utf8Read(zStr
4160: 69 6e 67 2c 20 26 7a 53 74 72 69 6e 67 29 3b 0a  ing, &zString);.
4170: 20 20 20 20 20 20 20 20 20 20 20 20 47 6c 6f 67              Glog
4180: 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 32 29  UpperToLower(c2)
4190: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20  ;.          }.  
41a0: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20        }else{.   
41b0: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 63 32         while( c2
41c0: 20 21 3d 20 30 20 26 26 20 63 32 20 21 3d 20 63   != 0 && c2 != c
41d0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20   ){.            
41e0: 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  c2 = sqlite3Utf8
41f0: 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26 7a  Read(zString, &z
4200: 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 20  String);.       
4210: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20     }.        }. 
4220: 20 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30         if( c2==0
4230: 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20   ) return 0;.   
4240: 20 20 20 20 20 69 66 28 20 70 61 74 74 65 72 6e       if( pattern
4250: 43 6f 6d 70 61 72 65 28 7a 50 61 74 74 65 72 6e  Compare(zPattern
4260: 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65  ,zString,pInfo,e
4270: 73 63 29 20 29 20 72 65 74 75 72 6e 20 31 3b 0a  sc) ) return 1;.
4280: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 72 65        }.      re
4290: 74 75 72 6e 20 30 3b 0a 20 20 20 20 7d 65 6c 73  turn 0;.    }els
42a0: 65 20 69 66 28 20 21 70 72 65 76 45 73 63 61 70  e if( !prevEscap
42b0: 65 20 26 26 20 63 3d 3d 6d 61 74 63 68 4f 6e 65  e && c==matchOne
42c0: 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20 73 71   ){.      if( sq
42d0: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 7a 53  lite3Utf8Read(zS
42e0: 74 72 69 6e 67 2c 20 26 7a 53 74 72 69 6e 67 29  tring, &zString)
42f0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72  ==0 ){.        r
4300: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d  eturn 0;.      }
4310: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63  .    }else if( c
4320: 3d 3d 6d 61 74 63 68 53 65 74 20 29 7b 0a 20 20  ==matchSet ){.  
4330: 20 20 20 20 69 6e 74 20 70 72 69 6f 72 5f 63 20      int prior_c 
4340: 3d 20 30 3b 0a 20 20 20 20 20 20 61 73 73 65 72  = 0;.      asser
4350: 74 28 20 65 73 63 3d 3d 30 20 29 3b 20 20 20 20  t( esc==0 );    
4360: 2f 2a 20 54 68 69 73 20 6f 6e 6c 79 20 6f 63 63  /* This only occ
4370: 75 72 73 20 66 6f 72 20 47 4c 4f 42 2c 20 6e 6f  urs for GLOB, no
4380: 74 20 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20  t LIKE */.      
4390: 73 65 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20  seen = 0;.      
43a0: 69 6e 76 65 72 74 20 3d 20 30 3b 0a 20 20 20 20  invert = 0;.    
43b0: 20 20 63 20 3d 20 73 71 6c 69 74 65 33 55 74 66    c = sqlite3Utf
43c0: 38 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26  8Read(zString, &
43d0: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
43e0: 69 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72  if( c==0 ) retur
43f0: 6e 20 30 3b 0a 20 20 20 20 20 20 63 32 20 3d 20  n 0;.      c2 = 
4400: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
4410: 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74 74  zPattern, &zPatt
4420: 65 72 6e 29 3b 0a 20 20 20 20 20 20 69 66 28 20  ern);.      if( 
4430: 63 32 3d 3d 27 5e 27 20 29 7b 0a 20 20 20 20 20  c2=='^' ){.     
4440: 20 20 20 69 6e 76 65 72 74 20 3d 20 31 3b 0a 20     invert = 1;. 
4450: 20 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69         c2 = sqli
4460: 74 65 33 55 74 66 38 52 65 61 64 28 7a 50 61 74  te3Utf8Read(zPat
4470: 74 65 72 6e 2c 20 26 7a 50 61 74 74 65 72 6e 29  tern, &zPattern)
4480: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
4490: 69 66 28 20 63 32 3d 3d 27 5d 27 20 29 7b 0a 20  if( c2==']' ){. 
44a0: 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d 27 5d         if( c==']
44b0: 27 20 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20  ' ) seen = 1;.  
44c0: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
44d0: 65 33 55 74 66 38 52 65 61 64 28 7a 50 61 74 74  e3Utf8Read(zPatt
44e0: 65 72 6e 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b  ern, &zPattern);
44f0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 77  .      }.      w
4500: 68 69 6c 65 28 20 63 32 20 26 26 20 63 32 21 3d  hile( c2 && c2!=
4510: 27 5d 27 20 29 7b 0a 20 20 20 20 20 20 20 20 69  ']' ){.        i
4520: 66 28 20 63 32 3d 3d 27 2d 27 20 26 26 20 7a 50  f( c2=='-' && zP
4530: 61 74 74 65 72 6e 5b 30 5d 21 3d 27 5d 27 20 26  attern[0]!=']' &
4540: 26 20 7a 50 61 74 74 65 72 6e 5b 30 5d 21 3d 30  & zPattern[0]!=0
4550: 20 26 26 20 70 72 69 6f 72 5f 63 3e 30 20 29 7b   && prior_c>0 ){
4560: 0a 20 20 20 20 20 20 20 20 20 20 63 32 20 3d 20  .          c2 = 
4570: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
4580: 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74 74  zPattern, &zPatt
4590: 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20  ern);.          
45a0: 69 66 28 20 63 3e 3d 70 72 69 6f 72 5f 63 20 26  if( c>=prior_c &
45b0: 26 20 63 3c 3d 63 32 20 29 20 73 65 65 6e 20 3d  & c<=c2 ) seen =
45c0: 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20 70 72   1;.          pr
45d0: 69 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20  ior_c = 0;.     
45e0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
45f0: 20 20 20 20 69 66 28 20 63 3d 3d 63 32 20 29 7b      if( c==c2 ){
4600: 0a 20 20 20 20 20 20 20 20 20 20 20 20 73 65 65  .            see
4610: 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20  n = 1;.         
4620: 20 7d 0a 20 20 20 20 20 20 20 20 20 20 70 72 69   }.          pri
4630: 6f 72 5f 63 20 3d 20 63 32 3b 0a 20 20 20 20 20  or_c = c2;.     
4640: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 63 32 20     }.        c2 
4650: 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  = sqlite3Utf8Rea
4660: 64 28 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61  d(zPattern, &zPa
4670: 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 7d 0a  ttern);.      }.
4680: 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20        if( c2==0 
4690: 7c 7c 20 28 73 65 65 6e 20 5e 20 69 6e 76 65 72  || (seen ^ inver
46a0: 74 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  t)==0 ){.       
46b0: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20   return 0;.     
46c0: 20 7d 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28   }.    }else if(
46d0: 20 65 73 63 3d 3d 63 20 26 26 20 21 70 72 65 76   esc==c && !prev
46e0: 45 73 63 61 70 65 20 29 7b 0a 20 20 20 20 20 20  Escape ){.      
46f0: 70 72 65 76 45 73 63 61 70 65 20 3d 20 31 3b 0a  prevEscape = 1;.
4700: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
4710: 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66   c2 = sqlite3Utf
4720: 38 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26  8Read(zString, &
4730: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
4740: 69 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a 20 20  if( noCase ){.  
4750: 20 20 20 20 20 20 47 6c 6f 67 55 70 70 65 72 54        GlogUpperT
4760: 6f 4c 6f 77 65 72 28 63 29 3b 0a 20 20 20 20 20  oLower(c);.     
4770: 20 20 20 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f     GlogUpperToLo
4780: 77 65 72 28 63 32 29 3b 0a 20 20 20 20 20 20 7d  wer(c2);.      }
4790: 0a 20 20 20 20 20 20 69 66 28 20 63 21 3d 63 32  .      if( c!=c2
47a0: 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75   ){.        retu
47b0: 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20  rn 0;.      }.  
47c0: 20 20 20 20 70 72 65 76 45 73 63 61 70 65 20 3d      prevEscape =
47d0: 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20   0;.    }.  }.  
47e0: 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 3d  return *zString=
47f0: 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75  =0;.}../*.** Cou
4800: 6e 74 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66  nt the number of
4810: 20 74 69 6d 65 73 20 74 68 61 74 20 74 68 65 20   times that the 
4820: 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 28 6f  LIKE operator (o
4830: 72 20 47 4c 4f 42 20 77 68 69 63 68 20 69 73 0a  r GLOB which is.
4840: 2a 2a 20 6a 75 73 74 20 61 20 76 61 72 69 61 74  ** just a variat
4850: 69 6f 6e 20 6f 66 20 4c 49 4b 45 29 20 67 65 74  ion of LIKE) get
4860: 73 20 63 61 6c 6c 65 64 2e 20 20 54 68 69 73 20  s called.  This 
4870: 69 73 20 75 73 65 64 20 66 6f 72 20 74 65 73 74  is used for test
4880: 69 6e 67 0a 2a 2a 20 6f 6e 6c 79 2e 0a 2a 2f 0a  ing.** only..*/.
4890: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45  #ifdef SQLITE_TE
48a0: 53 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 6c  ST.int sqlite3_l
48b0: 69 6b 65 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a 23  ike_count = 0;.#
48c0: 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d  endif.../*.** Im
48d0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
48e0: 74 68 65 20 6c 69 6b 65 28 29 20 53 51 4c 20 66  the like() SQL f
48f0: 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 66  unction.  This f
4900: 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e  unction implemen
4910: 74 73 0a 2a 2a 20 74 68 65 20 62 75 69 6c 64 2d  ts.** the build-
4920: 69 6e 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72  in LIKE operator
4930: 2e 20 20 54 68 65 20 66 69 72 73 74 20 61 72 67  .  The first arg
4940: 75 6d 65 6e 74 20 74 6f 20 74 68 65 20 66 75 6e  ument to the fun
4950: 63 74 69 6f 6e 20 69 73 20 74 68 65 0a 2a 2a 20  ction is the.** 
4960: 70 61 74 74 65 72 6e 20 61 6e 64 20 74 68 65 20  pattern and the 
4970: 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20  second argument 
4980: 69 73 20 74 68 65 20 73 74 72 69 6e 67 2e 20 20  is the string.  
4990: 53 6f 2c 20 74 68 65 20 53 51 4c 20 73 74 61 74  So, the SQL stat
49a0: 65 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20 20 20  ements:.**.**   
49b0: 20 20 20 20 41 20 4c 49 4b 45 20 42 0a 2a 2a 0a      A LIKE B.**.
49c0: 2a 2a 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65  ** is implemente
49d0: 64 20 61 73 20 6c 69 6b 65 28 42 2c 41 29 2e 0a  d as like(B,A)..
49e0: 2a 2a 0a 2a 2a 20 54 68 69 73 20 73 61 6d 65 20  **.** This same 
49f0: 66 75 6e 63 74 69 6f 6e 20 28 77 69 74 68 20 61  function (with a
4a00: 20 64 69 66 66 65 72 65 6e 74 20 63 6f 6d 70 61   different compa
4a10: 72 65 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65  reInfo structure
4a20: 29 20 63 6f 6d 70 75 74 65 73 0a 2a 2a 20 74 68  ) computes.** th
4a30: 65 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f 72 2e  e GLOB operator.
4a40: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
4a50: 6c 69 6b 65 46 75 6e 63 28 0a 20 20 73 71 6c 69  likeFunc(.  sqli
4a60: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
4a70: 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 61 72 67  text, .  int arg
4a80: 63 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  c, .  sqlite3_va
4a90: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
4aa0: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
4ab0: 68 61 72 20 2a 7a 41 2c 20 2a 7a 42 3b 0a 20 20  har *zA, *zB;.  
4ac0: 69 6e 74 20 65 73 63 61 70 65 20 3d 20 30 3b 0a  int escape = 0;.
4ad0: 20 20 69 6e 74 20 6e 50 61 74 3b 0a 20 20 73 71    int nPat;.  sq
4ae0: 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69  lite3 *db = sqli
4af0: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
4b00: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a  andle(context);.
4b10: 0a 20 20 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f  .  zB = sqlite3_
4b20: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
4b30: 30 5d 29 3b 0a 20 20 7a 41 20 3d 20 73 71 6c 69  0]);.  zA = sqli
4b40: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
4b50: 72 67 76 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c  rgv[1]);..  /* L
4b60: 69 6d 69 74 20 74 68 65 20 6c 65 6e 67 74 68 20  imit the length 
4b70: 6f 66 20 74 68 65 20 4c 49 4b 45 20 6f 72 20 47  of the LIKE or G
4b80: 4c 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 20 61  LOB pattern to a
4b90: 76 6f 69 64 20 70 72 6f 62 6c 65 6d 73 0a 20 20  void problems.  
4ba0: 2a 2a 20 6f 66 20 64 65 65 70 20 72 65 63 75 72  ** of deep recur
4bb0: 73 69 6f 6e 20 61 6e 64 20 4e 2a 4e 20 62 65 68  sion and N*N beh
4bc0: 61 76 69 6f 72 20 69 6e 20 70 61 74 74 65 72 6e  avior in pattern
4bd0: 43 6f 6d 70 61 72 65 28 29 2e 0a 20 20 2a 2f 0a  Compare()..  */.
4be0: 20 20 6e 50 61 74 20 3d 20 73 71 6c 69 74 65 33    nPat = sqlite3
4bf0: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
4c00: 76 5b 30 5d 29 3b 0a 20 20 74 65 73 74 63 61 73  v[0]);.  testcas
4c10: 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69  e( nPat==db->aLi
4c20: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
4c30: 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45  _LIKE_PATTERN_LE
4c40: 4e 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74 63  NGTH] );.  testc
4c50: 61 73 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61  ase( nPat==db->a
4c60: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
4c70: 49 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f  IT_LIKE_PATTERN_
4c80: 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69  LENGTH]+1 );.  i
4c90: 66 28 20 6e 50 61 74 20 3e 20 64 62 2d 3e 61 4c  f( nPat > db->aL
4ca0: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
4cb0: 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c  T_LIKE_PATTERN_L
4cc0: 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71  ENGTH] ){.    sq
4cd0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
4ce0: 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 4c 49 4b  or(context, "LIK
4cf0: 45 20 6f 72 20 47 4c 4f 42 20 70 61 74 74 65 72  E or GLOB patter
4d00: 6e 20 74 6f 6f 20 63 6f 6d 70 6c 65 78 22 2c 20  n too complex", 
4d10: 2d 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b  -1);.    return;
4d20: 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 7a  .  }.  assert( z
4d30: 42 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  B==sqlite3_value
4d40: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29  _text(argv[0]) )
4d50: 3b 20 20 2f 2a 20 45 6e 63 6f 64 69 6e 67 20 64  ;  /* Encoding d
4d60: 69 64 20 6e 6f 74 20 63 68 61 6e 67 65 20 2a 2f  id not change */
4d70: 0a 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20  ..  if( argc==3 
4d80: 29 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 65 73  ){.    /* The es
4d90: 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20 73  cape character s
4da0: 74 72 69 6e 67 20 6d 75 73 74 20 63 6f 6e 73 69  tring must consi
4db0: 73 74 20 6f 66 20 61 20 73 69 6e 67 6c 65 20 55  st of a single U
4dc0: 54 46 2d 38 20 63 68 61 72 61 63 74 65 72 2e 0a  TF-8 character..
4dd0: 20 20 20 20 2a 2a 20 4f 74 68 65 72 77 69 73 65      ** Otherwise
4de0: 2c 20 72 65 74 75 72 6e 20 61 6e 20 65 72 72 6f  , return an erro
4df0: 72 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 63 6f  r..    */.    co
4e00: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
4e10: 72 20 2a 7a 45 73 63 20 3d 20 73 71 6c 69 74 65  r *zEsc = sqlite
4e20: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
4e30: 76 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a  v[2]);.    if( z
4e40: 45 73 63 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b  Esc==0 ) return;
4e50: 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33  .    if( sqlite3
4e60: 55 74 66 38 43 68 61 72 4c 65 6e 28 28 63 68 61  Utf8CharLen((cha
4e70: 72 2a 29 7a 45 73 63 2c 20 2d 31 29 21 3d 31 20  r*)zEsc, -1)!=1 
4e80: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
4e90: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
4ea0: 6e 74 65 78 74 2c 20 0a 20 20 20 20 20 20 20 20  ntext, .        
4eb0: 20 20 22 45 53 43 41 50 45 20 65 78 70 72 65 73    "ESCAPE expres
4ec0: 73 69 6f 6e 20 6d 75 73 74 20 62 65 20 61 20 73  sion must be a s
4ed0: 69 6e 67 6c 65 20 63 68 61 72 61 63 74 65 72 22  ingle character"
4ee0: 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 72 65 74  , -1);.      ret
4ef0: 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65  urn;.    }.    e
4f00: 73 63 61 70 65 20 3d 20 73 71 6c 69 74 65 33 55  scape = sqlite3U
4f10: 74 66 38 52 65 61 64 28 7a 45 73 63 2c 20 26 7a  tf8Read(zEsc, &z
4f20: 45 73 63 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20  Esc);.  }.  if( 
4f30: 7a 41 20 26 26 20 7a 42 20 29 7b 0a 20 20 20 20  zA && zB ){.    
4f40: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
4f50: 66 6f 20 2a 70 49 6e 66 6f 20 3d 20 73 71 6c 69  fo *pInfo = sqli
4f60: 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f  te3_user_data(co
4f70: 6e 74 65 78 74 29 3b 0a 23 69 66 64 65 66 20 53  ntext);.#ifdef S
4f80: 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 20 20 73  QLITE_TEST.    s
4f90: 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f 75 6e  qlite3_like_coun
4fa0: 74 2b 2b 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20  t++;.#endif.    
4fb0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
4fc0: 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c  ult_int(context,
4fd0: 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28   patternCompare(
4fe0: 7a 42 2c 20 7a 41 2c 20 70 49 6e 66 6f 2c 20 65  zB, zA, pInfo, e
4ff0: 73 63 61 70 65 29 29 3b 0a 20 20 7d 0a 7d 0a 0a  scape));.  }.}..
5000: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
5010: 74 69 6f 6e 20 6f 66 20 74 68 65 20 4e 55 4c 4c  tion of the NULL
5020: 49 46 28 78 2c 79 29 20 66 75 6e 63 74 69 6f 6e  IF(x,y) function
5030: 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20 69 73  .  The result is
5040: 20 74 68 65 20 66 69 72 73 74 0a 2a 2a 20 61 72   the first.** ar
5050: 67 75 6d 65 6e 74 20 69 66 20 74 68 65 20 61 72  gument if the ar
5060: 67 75 6d 65 6e 74 73 20 61 72 65 20 64 69 66 66  guments are diff
5070: 65 72 65 6e 74 2e 20 20 54 68 65 20 72 65 73 75  erent.  The resu
5080: 6c 74 20 69 73 20 4e 55 4c 4c 20 69 66 20 74 68  lt is NULL if th
5090: 65 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 73 20 61  e.** arguments a
50a0: 72 65 20 65 71 75 61 6c 20 74 6f 20 65 61 63 68  re equal to each
50b0: 20 6f 74 68 65 72 2e 0a 2a 2f 0a 73 74 61 74 69   other..*/.stati
50c0: 63 20 76 6f 69 64 20 6e 75 6c 6c 69 66 46 75 6e  c void nullifFun
50d0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
50e0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
50f0: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20   int NotUsed,.  
5100: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
5110: 61 72 67 76 0a 29 7b 0a 20 20 43 6f 6c 6c 53 65  argv.){.  CollSe
5120: 71 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74  q *pColl = sqlit
5130: 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71  e3GetFuncCollSeq
5140: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55  (context);.  UNU
5150: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f  SED_PARAMETER(No
5160: 74 55 73 65 64 29 3b 0a 20 20 69 66 28 20 73 71  tUsed);.  if( sq
5170: 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28  lite3MemCompare(
5180: 61 72 67 76 5b 30 5d 2c 20 61 72 67 76 5b 31 5d  argv[0], argv[1]
5190: 2c 20 70 43 6f 6c 6c 29 21 3d 30 20 29 7b 0a 20  , pColl)!=0 ){. 
51a0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
51b0: 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c  t_value(context,
51c0: 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7d 0a 7d   argv[0]);.  }.}
51d0: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
51e0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 71  tation of the sq
51f0: 6c 69 74 65 5f 76 65 72 73 69 6f 6e 28 29 20 66  lite_version() f
5200: 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65  unction.  The re
5210: 73 75 6c 74 20 69 73 20 74 68 65 20 76 65 72 73  sult is the vers
5220: 69 6f 6e 0a 2a 2a 20 6f 66 20 74 68 65 20 53 51  ion.** of the SQ
5230: 4c 69 74 65 20 6c 69 62 72 61 72 79 20 74 68 61  Lite library tha
5240: 74 20 69 73 20 72 75 6e 6e 69 6e 67 2e 0a 2a 2f  t is running..*/
5250: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 76 65 72  .static void ver
5260: 73 69 6f 6e 46 75 6e 63 28 0a 20 20 73 71 6c 69  sionFunc(.  sqli
5270: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
5280: 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55  text,.  int NotU
5290: 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  sed,.  sqlite3_v
52a0: 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a  alue **NotUsed2.
52b0: 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  ){.  UNUSED_PARA
52c0: 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20  METER2(NotUsed, 
52d0: 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20  NotUsed2);.  /* 
52e0: 49 4d 50 3a 20 52 2d 34 38 36 39 39 2d 34 38 36  IMP: R-48699-486
52f0: 31 37 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e  17 This function
5300: 20 69 73 20 61 6e 20 53 51 4c 20 77 72 61 70 70   is an SQL wrapp
5310: 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20 20  er around the.  
5320: 2a 2a 20 73 71 6c 69 74 65 33 5f 6c 69 62 76 65  ** sqlite3_libve
5330: 72 73 69 6f 6e 28 29 20 43 2d 69 6e 74 65 72 66  rsion() C-interf
5340: 61 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65  ace. */.  sqlite
5350: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
5360: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 6c  ntext, sqlite3_l
5370: 69 62 76 65 72 73 69 6f 6e 28 29 2c 20 2d 31 2c  ibversion(), -1,
5380: 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b   SQLITE_STATIC);
5390: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
53a0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
53b0: 73 71 6c 69 74 65 5f 73 6f 75 72 63 65 5f 69 64  sqlite_source_id
53c0: 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 54 68 65  () function. The
53d0: 20 72 65 73 75 6c 74 20 69 73 20 61 20 73 74 72   result is a str
53e0: 69 6e 67 0a 2a 2a 20 74 68 61 74 20 69 64 65 6e  ing.** that iden
53f0: 74 69 66 69 65 73 20 74 68 65 20 70 61 72 74 69  tifies the parti
5400: 63 75 6c 61 72 20 76 65 72 73 69 6f 6e 20 6f 66  cular version of
5410: 20 74 68 65 20 73 6f 75 72 63 65 20 63 6f 64 65   the source code
5420: 20 75 73 65 64 20 74 6f 20 62 75 69 6c 64 0a 2a   used to build.*
5430: 2a 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a 73 74 61  * SQLite..*/.sta
5440: 74 69 63 20 76 6f 69 64 20 73 6f 75 72 63 65 69  tic void sourcei
5450: 64 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  dFunc(.  sqlite3
5460: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
5470: 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64  t,.  int NotUsed
5480: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
5490: 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a  e **NotUsed2.){.
54a0: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
54b0: 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74  ER2(NotUsed, Not
54c0: 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50  Used2);.  /* IMP
54d0: 3a 20 52 2d 32 34 34 37 30 2d 33 31 31 33 36 20  : R-24470-31136 
54e0: 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73  This function is
54f0: 20 61 6e 20 53 51 4c 20 77 72 61 70 70 65 72 20   an SQL wrapper 
5500: 61 72 6f 75 6e 64 20 74 68 65 0a 20 20 2a 2a 20  around the.  ** 
5510: 73 71 6c 69 74 65 33 5f 73 6f 75 72 63 65 69 64  sqlite3_sourceid
5520: 28 29 20 43 20 69 6e 74 65 72 66 61 63 65 2e 20  () C interface. 
5530: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  */.  sqlite3_res
5540: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
5550: 2c 20 73 71 6c 69 74 65 33 5f 73 6f 75 72 63 65  , sqlite3_source
5560: 69 64 28 29 2c 20 2d 31 2c 20 53 51 4c 49 54 45  id(), -1, SQLITE
5570: 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a  _STATIC);.}../*.
5580: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
5590: 6e 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f  n of the sqlite_
55a0: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73  compileoption_us
55b0: 65 64 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  ed() function..*
55c0: 2a 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20  * The result is 
55d0: 61 6e 20 69 6e 74 65 67 65 72 20 74 68 61 74 20  an integer that 
55e0: 69 64 65 6e 74 69 66 69 65 73 20 69 66 20 74 68  identifies if th
55f0: 65 20 63 6f 6d 70 69 6c 65 72 20 6f 70 74 69 6f  e compiler optio
5600: 6e 0a 2a 2a 20 77 61 73 20 75 73 65 64 20 74 6f  n.** was used to
5610: 20 62 75 69 6c 64 20 53 51 4c 69 74 65 2e 0a 2a   build SQLite..*
5620: 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  /.#ifndef SQLITE
5630: 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54  _OMIT_COMPILEOPT
5640: 49 4f 4e 5f 44 49 41 47 53 0a 73 74 61 74 69 63  ION_DIAGS.static
5650: 20 76 6f 69 64 20 63 6f 6d 70 69 6c 65 6f 70 74   void compileopt
5660: 69 6f 6e 75 73 65 64 46 75 6e 63 28 0a 20 20 73  ionusedFunc(.  s
5670: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
5680: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
5690: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
56a0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
56b0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4f 70   const char *zOp
56c0: 74 4e 61 6d 65 3b 0a 20 20 61 73 73 65 72 74 28  tName;.  assert(
56d0: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e   argc==1 );.  UN
56e0: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
56f0: 72 67 63 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20  rgc);.  /* IMP: 
5700: 52 2d 78 78 78 78 20 54 68 69 73 20 66 75 6e 63  R-xxxx This func
5710: 74 69 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20 77  tion is an SQL w
5720: 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68  rapper around th
5730: 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 63  e.  ** sqlite3_c
5740: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65  ompileoption_use
5750: 64 28 29 20 43 20 69 6e 74 65 72 66 61 63 65 2e  d() C interface.
5760: 20 2a 2f 0a 20 20 69 66 20 28 20 20 20 28 20 73   */.  if (   ( s
5770: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
5780: 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49  e(argv[0])==SQLI
5790: 54 45 5f 54 45 58 54 20 29 0a 20 20 20 20 20 20  TE_TEXT ).      
57a0: 26 26 20 28 20 28 7a 4f 70 74 4e 61 6d 65 20 3d  && ( (zOptName =
57b0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
57c0: 65 78 74 28 61 72 67 76 5b 30 5d 29 29 21 3d 30  ext(argv[0]))!=0
57d0: 20 29 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33   )){.    sqlite3
57e0: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
57f0: 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 63 6f 6d  ext, sqlite3_com
5800: 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64 28  pileoption_used(
5810: 7a 4f 70 74 4e 61 6d 65 29 29 3b 0a 20 20 7d 65  zOptName));.  }e
5820: 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  lse{.    sqlite3
5830: 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e  _result_null(con
5840: 74 65 78 74 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e  text);.  }.}.#en
5850: 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d  dif /* SQLITE_OM
5860: 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e  IT_COMPILEOPTION
5870: 5f 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a 0a 2a 2a  _DIAGS */../*.**
5880: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
5890: 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f 63 6f  of the sqlite_co
58a0: 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28  mpileoption_get(
58b0: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 0a 2a 2a 20  ) function. .** 
58c0: 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61 20  The result is a 
58d0: 73 74 72 69 6e 67 20 74 68 61 74 20 69 64 65 6e  string that iden
58e0: 74 69 66 69 65 73 20 74 68 65 20 63 6f 6d 70 69  tifies the compi
58f0: 6c 65 72 20 6f 70 74 69 6f 6e 73 20 0a 2a 2a 20  ler options .** 
5900: 75 73 65 64 20 74 6f 20 62 75 69 6c 64 20 53 51  used to build SQ
5910: 4c 69 74 65 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66  Lite..*/.#ifndef
5920: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d   SQLITE_OMIT_COM
5930: 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53  PILEOPTION_DIAGS
5940: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 6d  .static void com
5950: 70 69 6c 65 6f 70 74 69 6f 6e 67 65 74 46 75 6e  pileoptiongetFun
5960: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
5970: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
5980: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
5990: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
59a0: 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20  v.){.  int n;.  
59b0: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
59c0: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
59d0: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 2f  METER(argc);.  /
59e0: 2a 20 49 4d 50 3a 20 52 2d 78 78 78 78 20 54 68  * IMP: R-xxxx Th
59f0: 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61  is function is a
5a00: 6e 20 53 51 4c 20 77 72 61 70 70 65 72 20 61 72  n SQL wrapper ar
5a10: 6f 75 6e 64 20 74 68 65 0a 20 20 2a 2a 20 73 71  ound the.  ** sq
5a20: 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74  lite3_compileopt
5a30: 69 6f 6e 5f 67 65 74 28 29 20 43 20 69 6e 74 65  ion_get() C inte
5a40: 72 66 61 63 65 2e 20 2a 2f 0a 20 20 6e 20 3d 20  rface. */.  n = 
5a50: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
5a60: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 73 71  t(argv[0]);.  sq
5a70: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
5a80: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
5a90: 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  e3_compileoption
5aa0: 5f 67 65 74 28 6e 29 2c 20 2d 31 2c 20 53 51 4c  _get(n), -1, SQL
5ab0: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 23  ITE_STATIC);.}.#
5ac0: 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f  endif /* SQLITE_
5ad0: 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49  OMIT_COMPILEOPTI
5ae0: 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a 20  ON_DIAGS */../* 
5af0: 41 72 72 61 79 20 66 6f 72 20 63 6f 6e 76 65 72  Array for conver
5b00: 74 69 6e 67 20 66 72 6f 6d 20 68 61 6c 66 2d 62  ting from half-b
5b10: 79 74 65 73 20 28 6e 79 62 62 6c 65 73 29 20 69  ytes (nybbles) i
5b20: 6e 74 6f 20 41 53 43 49 49 20 68 65 78 0a 2a 2a  nto ASCII hex.**
5b30: 20 64 69 67 69 74 73 2e 20 2a 2f 0a 73 74 61 74   digits. */.stat
5b40: 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 68 65  ic const char he
5b50: 78 64 69 67 69 74 73 5b 5d 20 3d 20 7b 0a 20 20  xdigits[] = {.  
5b60: 27 30 27 2c 20 27 31 27 2c 20 27 32 27 2c 20 27  '0', '1', '2', '
5b70: 33 27 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36  3', '4', '5', '6
5b80: 27 2c 20 27 37 27 2c 0a 20 20 27 38 27 2c 20 27  ', '7',.  '8', '
5b90: 39 27 2c 20 27 41 27 2c 20 27 42 27 2c 20 27 43  9', 'A', 'B', 'C
5ba0: 27 2c 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27  ', 'D', 'E', 'F'
5bb0: 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 45 58 50 45   .};../*.** EXPE
5bc0: 52 49 4d 45 4e 54 41 4c 20 2d 20 54 68 69 73 20  RIMENTAL - This 
5bd0: 69 73 20 6e 6f 74 20 61 6e 20 6f 66 66 69 63 69  is not an offici
5be0: 61 6c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68  al function.  Th
5bf0: 65 20 69 6e 74 65 72 66 61 63 65 20 6d 61 79 0a  e interface may.
5c00: 2a 2a 20 63 68 61 6e 67 65 2e 20 20 54 68 69 73  ** change.  This
5c10: 20 66 75 6e 63 74 69 6f 6e 20 6d 61 79 20 64 69   function may di
5c20: 73 61 70 70 65 61 72 2e 20 20 44 6f 20 6e 6f 74  sappear.  Do not
5c30: 20 77 72 69 74 65 20 63 6f 64 65 20 74 68 61 74   write code that
5c40: 20 64 65 70 65 6e 64 73 0a 2a 2a 20 6f 6e 20 74   depends.** on t
5c50: 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a  his function..**
5c60: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
5c70: 6f 6e 20 6f 66 20 74 68 65 20 51 55 4f 54 45 28  on of the QUOTE(
5c80: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69  ) function.  Thi
5c90: 73 20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73  s function takes
5ca0: 20 61 20 73 69 6e 67 6c 65 0a 2a 2a 20 61 72 67   a single.** arg
5cb0: 75 6d 65 6e 74 2e 20 20 49 66 20 74 68 65 20 61  ument.  If the a
5cc0: 72 67 75 6d 65 6e 74 20 69 73 20 6e 75 6d 65 72  rgument is numer
5cd0: 69 63 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76  ic, the return v
5ce0: 61 6c 75 65 20 69 73 20 74 68 65 20 73 61 6d 65  alue is the same
5cf0: 20 61 73 0a 2a 2a 20 74 68 65 20 61 72 67 75 6d   as.** the argum
5d00: 65 6e 74 2e 20 20 49 66 20 74 68 65 20 61 72 67  ent.  If the arg
5d10: 75 6d 65 6e 74 20 69 73 20 4e 55 4c 4c 2c 20 74  ument is NULL, t
5d20: 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20  he return value 
5d30: 69 73 20 74 68 65 20 73 74 72 69 6e 67 0a 2a 2a  is the string.**
5d40: 20 22 4e 55 4c 4c 22 2e 20 20 4f 74 68 65 72 77   "NULL".  Otherw
5d50: 69 73 65 2c 20 74 68 65 20 61 72 67 75 6d 65 6e  ise, the argumen
5d60: 74 20 69 73 20 65 6e 63 6c 6f 73 65 64 20 69 6e  t is enclosed in
5d70: 20 73 69 6e 67 6c 65 20 71 75 6f 74 65 73 20 77   single quotes w
5d80: 69 74 68 0a 2a 2a 20 73 69 6e 67 6c 65 2d 71 75  ith.** single-qu
5d90: 6f 74 65 20 65 73 63 61 70 65 73 2e 0a 2a 2f 0a  ote escapes..*/.
5da0: 73 74 61 74 69 63 20 76 6f 69 64 20 71 75 6f 74  static void quot
5db0: 65 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  eFunc(sqlite3_co
5dc0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
5dd0: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
5de0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
5df0: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
5e00: 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =1 );.  UNUSED_P
5e10: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
5e20: 20 20 73 77 69 74 63 68 28 20 73 71 6c 69 74 65    switch( sqlite
5e30: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
5e40: 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73  v[0]) ){.    cas
5e50: 65 20 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52  e SQLITE_INTEGER
5e60: 3a 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  :.    case SQLIT
5e70: 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20  E_FLOAT: {.     
5e80: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
5e90: 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61  value(context, a
5ea0: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 62  rgv[0]);.      b
5eb0: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20  reak;.    }.    
5ec0: 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42  case SQLITE_BLOB
5ed0: 3a 20 7b 0a 20 20 20 20 20 20 63 68 61 72 20 2a  : {.      char *
5ee0: 7a 54 65 78 74 20 3d 20 30 3b 0a 20 20 20 20 20  zText = 0;.     
5ef0: 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 7a 42 6c   char const *zBl
5f00: 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ob = sqlite3_val
5f10: 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29  ue_blob(argv[0])
5f20: 3b 0a 20 20 20 20 20 20 69 6e 74 20 6e 42 6c 6f  ;.      int nBlo
5f30: 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  b = sqlite3_valu
5f40: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29  e_bytes(argv[0])
5f50: 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74 28 20  ;.      assert( 
5f60: 7a 42 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76  zBlob==sqlite3_v
5f70: 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30  alue_blob(argv[0
5f80: 5d 29 20 29 3b 20 2f 2a 20 4e 6f 20 65 6e 63 6f  ]) ); /* No enco
5f90: 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20  ding change */. 
5fa0: 20 20 20 20 20 7a 54 65 78 74 20 3d 20 28 63 68       zText = (ch
5fb0: 61 72 20 2a 29 63 6f 6e 74 65 78 74 4d 61 6c 6c  ar *)contextMall
5fc0: 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 32 2a 28  oc(context, (2*(
5fd0: 69 36 34 29 6e 42 6c 6f 62 29 2b 34 29 3b 20 0a  i64)nBlob)+4); .
5fe0: 20 20 20 20 20 20 69 66 28 20 7a 54 65 78 74 20        if( zText 
5ff0: 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 69  ){.        int i
6000: 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d  ;.        for(i=
6010: 30 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b 2b 29  0; i<nBlob; i++)
6020: 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 54 65 78  {.          zTex
6030: 74 5b 28 69 2a 32 29 2b 32 5d 20 3d 20 68 65 78  t[(i*2)+2] = hex
6040: 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d  digits[(zBlob[i]
6050: 3e 3e 34 29 26 30 78 30 46 5d 3b 0a 20 20 20 20  >>4)&0x0F];.    
6060: 20 20 20 20 20 20 7a 54 65 78 74 5b 28 69 2a 32        zText[(i*2
6070: 29 2b 33 5d 20 3d 20 68 65 78 64 69 67 69 74 73  )+3] = hexdigits
6080: 5b 28 7a 42 6c 6f 62 5b 69 5d 29 26 30 78 30 46  [(zBlob[i])&0x0F
6090: 5d 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  ];.        }.   
60a0: 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c 6f       zText[(nBlo
60b0: 62 2a 32 29 2b 32 5d 20 3d 20 27 5c 27 27 3b 0a  b*2)+2] = '\'';.
60c0: 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e          zText[(n
60d0: 42 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20 27 5c 30  Blob*2)+3] = '\0
60e0: 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74  ';.        zText
60f0: 5b 30 5d 20 3d 20 27 58 27 3b 0a 20 20 20 20 20  [0] = 'X';.     
6100: 20 20 20 7a 54 65 78 74 5b 31 5d 20 3d 20 27 5c     zText[1] = '\
6110: 27 27 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69  '';.        sqli
6120: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
6130: 63 6f 6e 74 65 78 74 2c 20 7a 54 65 78 74 2c 20  context, zText, 
6140: 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53  -1, SQLITE_TRANS
6150: 49 45 4e 54 29 3b 0a 20 20 20 20 20 20 20 20 73  IENT);.        s
6160: 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 54 65 78  qlite3_free(zTex
6170: 74 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  t);.      }.    
6180: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
6190: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54     case SQLITE_T
61a0: 45 58 54 3a 20 7b 0a 20 20 20 20 20 20 69 6e 74  EXT: {.      int
61b0: 20 69 2c 6a 3b 0a 20 20 20 20 20 20 75 36 34 20   i,j;.      u64 
61c0: 6e 3b 0a 20 20 20 20 20 20 63 6f 6e 73 74 20 75  n;.      const u
61d0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41  nsigned char *zA
61e0: 72 67 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  rg = sqlite3_val
61f0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
6200: 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a 3b  ;.      char *z;
6210: 0a 0a 20 20 20 20 20 20 69 66 28 20 7a 41 72 67  ..      if( zArg
6220: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
6230: 20 20 20 20 66 6f 72 28 69 3d 30 2c 20 6e 3d 30      for(i=0, n=0
6240: 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b  ; zArg[i]; i++){
6250: 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c   if( zArg[i]=='\
6260: 27 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20 20 20 20  '' ) n++; }.    
6270: 20 20 7a 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c    z = contextMal
6280: 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69  loc(context, ((i
6290: 36 34 29 69 29 2b 28 28 69 36 34 29 6e 29 2b 33  64)i)+((i64)n)+3
62a0: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 20 29  );.      if( z )
62b0: 7b 0a 20 20 20 20 20 20 20 20 7a 5b 30 5d 20 3d  {.        z[0] =
62c0: 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 66   '\'';.        f
62d0: 6f 72 28 69 3d 30 2c 20 6a 3d 31 3b 20 7a 41 72  or(i=0, j=1; zAr
62e0: 67 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  g[i]; i++){.    
62f0: 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a        z[j++] = z
6300: 41 72 67 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20  Arg[i];.        
6310: 20 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27    if( zArg[i]=='
6320: 5c 27 27 20 29 7b 0a 20 20 20 20 20 20 20 20 20  \'' ){.         
6330: 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27     z[j++] = '\''
6340: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20  ;.          }.  
6350: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20        }.        
6360: 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a 20  z[j++] = '\'';. 
6370: 20 20 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 30 3b         z[j] = 0;
6380: 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33  .        sqlite3
6390: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
63a0: 74 65 78 74 2c 20 7a 2c 20 6a 2c 20 73 71 6c 69  text, z, j, sqli
63b0: 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 20  te3_free);.     
63c0: 20 7d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a   }.      break;.
63d0: 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75 6c      }.    defaul
63e0: 74 3a 20 7b 0a 20 20 20 20 20 20 61 73 73 65 72  t: {.      asser
63f0: 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  t( sqlite3_value
6400: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d  _type(argv[0])==
6410: 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b 0a 20  SQLITE_NULL );. 
6420: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
6430: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
6440: 2c 20 22 4e 55 4c 4c 22 2c 20 34 2c 20 53 51 4c  , "NULL", 4, SQL
6450: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 20  ITE_STATIC);.   
6460: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
6470: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65    }.}../*.** The
6480: 20 68 65 78 28 29 20 66 75 6e 63 74 69 6f 6e 2e   hex() function.
6490: 20 20 49 6e 74 65 72 70 72 65 74 20 74 68 65 20    Interpret the 
64a0: 61 72 67 75 6d 65 6e 74 20 61 73 20 61 20 62 6c  argument as a bl
64b0: 6f 62 2e 20 20 52 65 74 75 72 6e 0a 2a 2a 20 61  ob.  Return.** a
64c0: 20 68 65 78 61 64 65 63 69 6d 61 6c 20 72 65 6e   hexadecimal ren
64d0: 64 65 72 69 6e 67 20 61 73 20 74 65 78 74 2e 0a  dering as text..
64e0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 68  */.static void h
64f0: 65 78 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  exFunc(.  sqlite
6500: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
6510: 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a  xt,.  int argc,.
6520: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
6530: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20  **argv.){.  int 
6540: 69 2c 20 6e 3b 0a 20 20 63 6f 6e 73 74 20 75 6e  i, n;.  const un
6550: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70 42 6c  signed char *pBl
6560: 6f 62 3b 0a 20 20 63 68 61 72 20 2a 7a 48 65 78  ob;.  char *zHex
6570: 2c 20 2a 7a 3b 0a 20 20 61 73 73 65 72 74 28 20  , *z;.  assert( 
6580: 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55  argc==1 );.  UNU
6590: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72  SED_PARAMETER(ar
65a0: 67 63 29 3b 0a 20 20 70 42 6c 6f 62 20 3d 20 73  gc);.  pBlob = s
65b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f  qlite3_value_blo
65c0: 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20  b(argv[0]);.  n 
65d0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
65e0: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
65f0: 20 20 61 73 73 65 72 74 28 20 70 42 6c 6f 62 3d    assert( pBlob=
6600: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62  =sqlite3_value_b
6610: 6c 6f 62 28 61 72 67 76 5b 30 5d 29 20 29 3b 20  lob(argv[0]) ); 
6620: 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20   /* No encoding 
6630: 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 20 3d 20  change */.  z = 
6640: 7a 48 65 78 20 3d 20 63 6f 6e 74 65 78 74 4d 61  zHex = contextMa
6650: 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28  lloc(context, ((
6660: 69 36 34 29 6e 29 2a 32 20 2b 20 31 29 3b 0a 20  i64)n)*2 + 1);. 
6670: 20 69 66 28 20 7a 48 65 78 20 29 7b 0a 20 20 20   if( zHex ){.   
6680: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69   for(i=0; i<n; i
6690: 2b 2b 2c 20 70 42 6c 6f 62 2b 2b 29 7b 0a 20 20  ++, pBlob++){.  
66a0: 20 20 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61      unsigned cha
66b0: 72 20 63 20 3d 20 2a 70 42 6c 6f 62 3b 0a 20 20  r c = *pBlob;.  
66c0: 20 20 20 20 2a 28 7a 2b 2b 29 20 3d 20 68 65 78      *(z++) = hex
66d0: 64 69 67 69 74 73 5b 28 63 3e 3e 34 29 26 30 78  digits[(c>>4)&0x
66e0: 66 5d 3b 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29  f];.      *(z++)
66f0: 20 3d 20 68 65 78 64 69 67 69 74 73 5b 63 26 30   = hexdigits[c&0
6700: 78 66 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2a  xf];.    }.    *
6710: 7a 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 74  z = 0;.    sqlit
6720: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
6730: 6f 6e 74 65 78 74 2c 20 7a 48 65 78 2c 20 6e 2a  ontext, zHex, n*
6740: 32 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29  2, sqlite3_free)
6750: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  ;.  }.}../*.** T
6760: 68 65 20 7a 65 72 6f 62 6c 6f 62 28 4e 29 20 66  he zeroblob(N) f
6770: 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20  unction returns 
6780: 61 20 7a 65 72 6f 2d 66 69 6c 6c 65 64 20 62 6c  a zero-filled bl
6790: 6f 62 20 6f 66 20 73 69 7a 65 20 4e 20 62 79 74  ob of size N byt
67a0: 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  es..*/.static vo
67b0: 69 64 20 7a 65 72 6f 62 6c 6f 62 46 75 6e 63 28  id zeroblobFunc(
67c0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
67d0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
67e0: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
67f0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
6800: 29 7b 0a 20 20 69 36 34 20 6e 3b 0a 20 20 73 71  ){.  i64 n;.  sq
6810: 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69  lite3 *db = sqli
6820: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
6830: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a  andle(context);.
6840: 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d    assert( argc==
6850: 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  1 );.  UNUSED_PA
6860: 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20  RAMETER(argc);. 
6870: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   n = sqlite3_val
6880: 75 65 5f 69 6e 74 36 34 28 61 72 67 76 5b 30 5d  ue_int64(argv[0]
6890: 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e  );.  testcase( n
68a0: 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  ==db->aLimit[SQL
68b0: 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48  ITE_LIMIT_LENGTH
68c0: 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28  ] );.  testcase(
68d0: 20 6e 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53   n==db->aLimit[S
68e0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47  QLITE_LIMIT_LENG
68f0: 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e  TH]+1 );.  if( n
6900: 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49  >db->aLimit[SQLI
6910: 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d  TE_LIMIT_LENGTH]
6920: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   ){.    sqlite3_
6930: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f  result_error_too
6940: 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  big(context);.  
6950: 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74  }else{.    sqlit
6960: 65 33 5f 72 65 73 75 6c 74 5f 7a 65 72 6f 62 6c  e3_result_zerobl
6970: 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 69 6e 74  ob(context, (int
6980: 29 6e 29 3b 20 2f 2a 20 49 4d 50 3a 20 52 2d 30  )n); /* IMP: R-0
6990: 30 32 39 33 2d 36 34 39 39 34 20 2a 2f 0a 20 20  0293-64994 */.  
69a0: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 72  }.}../*.** The r
69b0: 65 70 6c 61 63 65 28 29 20 66 75 6e 63 74 69 6f  eplace() functio
69c0: 6e 2e 20 20 54 68 72 65 65 20 61 72 67 75 6d 65  n.  Three argume
69d0: 6e 74 73 20 61 72 65 20 61 6c 6c 20 73 74 72 69  nts are all stri
69e0: 6e 67 73 3a 20 63 61 6c 6c 0a 2a 2a 20 74 68 65  ngs: call.** the
69f0: 6d 20 41 2c 20 42 2c 20 61 6e 64 20 43 2e 20 54  m A, B, and C. T
6a00: 68 65 20 72 65 73 75 6c 74 20 69 73 20 61 6c 73  he result is als
6a10: 6f 20 61 20 73 74 72 69 6e 67 20 77 68 69 63 68  o a string which
6a20: 20 69 73 20 64 65 72 69 76 65 64 0a 2a 2a 20 66   is derived.** f
6a30: 72 6f 6d 20 41 20 62 79 20 72 65 70 6c 61 63 69  rom A by replaci
6a40: 6e 67 20 65 76 65 72 79 20 6f 63 63 75 72 61 6e  ng every occuran
6a50: 63 65 20 6f 66 20 42 20 77 69 74 68 20 43 2e 20  ce of B with C. 
6a60: 20 54 68 65 20 6d 61 74 63 68 0a 2a 2a 20 6d 75   The match.** mu
6a70: 73 74 20 62 65 20 65 78 61 63 74 2e 20 20 43 6f  st be exact.  Co
6a80: 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65  llating sequence
6a90: 73 20 61 72 65 20 6e 6f 74 20 75 73 65 64 2e 0a  s are not used..
6aa0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72  */.static void r
6ab0: 65 70 6c 61 63 65 46 75 6e 63 28 0a 20 20 73 71  eplaceFunc(.  sq
6ac0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
6ad0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
6ae0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
6af0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
6b00: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
6b10: 68 61 72 20 2a 7a 53 74 72 3b 20 20 20 20 20 20  har *zStr;      
6b20: 20 20 2f 2a 20 54 68 65 20 69 6e 70 75 74 20 73    /* The input s
6b30: 74 72 69 6e 67 20 41 20 2a 2f 0a 20 20 63 6f 6e  tring A */.  con
6b40: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
6b50: 20 2a 7a 50 61 74 74 65 72 6e 3b 20 20 20 20 2f   *zPattern;    /
6b60: 2a 20 54 68 65 20 70 61 74 74 65 72 6e 20 73 74  * The pattern st
6b70: 72 69 6e 67 20 42 20 2a 2f 0a 20 20 63 6f 6e 73  ring B */.  cons
6b80: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
6b90: 2a 7a 52 65 70 3b 20 20 20 20 20 20 20 20 2f 2a  *zRep;        /*
6ba0: 20 54 68 65 20 72 65 70 6c 61 63 65 6d 65 6e 74   The replacement
6bb0: 20 73 74 72 69 6e 67 20 43 20 2a 2f 0a 20 20 75   string C */.  u
6bc0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 4f  nsigned char *zO
6bd0: 75 74 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  ut;             
6be0: 20 2f 2a 20 54 68 65 20 6f 75 74 70 75 74 20 2a   /* The output *
6bf0: 2f 0a 20 20 69 6e 74 20 6e 53 74 72 3b 20 20 20  /.  int nStr;   
6c00: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
6c10: 53 69 7a 65 20 6f 66 20 7a 53 74 72 20 2a 2f 0a  Size of zStr */.
6c20: 20 20 69 6e 74 20 6e 50 61 74 74 65 72 6e 3b 20    int nPattern; 
6c30: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69             /* Si
6c40: 7a 65 20 6f 66 20 7a 50 61 74 74 65 72 6e 20 2a  ze of zPattern *
6c50: 2f 0a 20 20 69 6e 74 20 6e 52 65 70 3b 20 20 20  /.  int nRep;   
6c60: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
6c70: 53 69 7a 65 20 6f 66 20 7a 52 65 70 20 2a 2f 0a  Size of zRep */.
6c80: 20 20 69 36 34 20 6e 4f 75 74 3b 20 20 20 20 20    i64 nOut;     
6c90: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4d 61             /* Ma
6ca0: 78 69 6d 75 6d 20 73 69 7a 65 20 6f 66 20 7a 4f  ximum size of zO
6cb0: 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6c 6f 6f 70  ut */.  int loop
6cc0: 4c 69 6d 69 74 3b 20 20 20 20 20 20 20 20 20 20  Limit;          
6cd0: 20 2f 2a 20 4c 61 73 74 20 7a 53 74 72 5b 5d 20   /* Last zStr[] 
6ce0: 74 68 61 74 20 6d 69 67 68 74 20 6d 61 74 63 68  that might match
6cf0: 20 7a 50 61 74 74 65 72 6e 5b 5d 20 2a 2f 0a 20   zPattern[] */. 
6d00: 20 69 6e 74 20 69 2c 20 6a 3b 20 20 20 20 20 20   int i, j;      
6d10: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f            /* Loo
6d20: 70 20 63 6f 75 6e 74 65 72 73 20 2a 2f 0a 0a 20  p counters */.. 
6d30: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 33   assert( argc==3
6d40: 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   );.  UNUSED_PAR
6d50: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
6d60: 7a 53 74 72 20 3d 20 73 71 6c 69 74 65 33 5f 76  zStr = sqlite3_v
6d70: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
6d80: 5d 29 3b 0a 20 20 69 66 28 20 7a 53 74 72 3d 3d  ]);.  if( zStr==
6d90: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 53  0 ) return;.  nS
6da0: 74 72 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  tr = sqlite3_val
6db0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
6dc0: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 7a 53 74  );.  assert( zSt
6dd0: 72 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  r==sqlite3_value
6de0: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29  _text(argv[0]) )
6df0: 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e  ;  /* No encodin
6e00: 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 50  g change */.  zP
6e10: 61 74 74 65 72 6e 20 3d 20 73 71 6c 69 74 65 33  attern = sqlite3
6e20: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
6e30: 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a 50 61 74  [1]);.  if( zPat
6e40: 74 65 72 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 61  tern==0 ){.    a
6e50: 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76  ssert( sqlite3_v
6e60: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31  alue_type(argv[1
6e70: 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a  ])==SQLITE_NULL.
6e80: 20 20 20 20 20 20 20 20 20 20 20 20 7c 7c 20 73              || s
6e90: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
6ea0: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
6eb0: 29 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20  )->mallocFailed 
6ec0: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  );.    return;. 
6ed0: 20 7d 0a 20 20 69 66 28 20 7a 50 61 74 74 65 72   }.  if( zPatter
6ee0: 6e 5b 30 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 61  n[0]==0 ){.    a
6ef0: 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76  ssert( sqlite3_v
6f00: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31  alue_type(argv[1
6f10: 5d 29 21 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20  ])!=SQLITE_NULL 
6f20: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  );.    sqlite3_r
6f30: 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74  esult_value(cont
6f40: 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20  ext, argv[0]);. 
6f50: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20     return;.  }. 
6f60: 20 6e 50 61 74 74 65 72 6e 20 3d 20 73 71 6c 69   nPattern = sqli
6f70: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
6f80: 61 72 67 76 5b 31 5d 29 3b 0a 20 20 61 73 73 65  argv[1]);.  asse
6f90: 72 74 28 20 7a 50 61 74 74 65 72 6e 3d 3d 73 71  rt( zPattern==sq
6fa0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
6fb0: 28 61 72 67 76 5b 31 5d 29 20 29 3b 20 20 2f 2a  (argv[1]) );  /*
6fc0: 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61   No encoding cha
6fd0: 6e 67 65 20 2a 2f 0a 20 20 7a 52 65 70 20 3d 20  nge */.  zRep = 
6fe0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
6ff0: 78 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 69  xt(argv[2]);.  i
7000: 66 28 20 7a 52 65 70 3d 3d 30 20 29 20 72 65 74  f( zRep==0 ) ret
7010: 75 72 6e 3b 0a 20 20 6e 52 65 70 20 3d 20 73 71  urn;.  nRep = sq
7020: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
7030: 73 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 61 73  s(argv[2]);.  as
7040: 73 65 72 74 28 20 7a 52 65 70 3d 3d 73 71 6c 69  sert( zRep==sqli
7050: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
7060: 72 67 76 5b 32 5d 29 20 29 3b 0a 20 20 6e 4f 75  rgv[2]) );.  nOu
7070: 74 20 3d 20 6e 53 74 72 20 2b 20 31 3b 0a 20 20  t = nStr + 1;.  
7080: 61 73 73 65 72 74 28 20 6e 4f 75 74 3c 53 51 4c  assert( nOut<SQL
7090: 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48 20 29  ITE_MAX_LENGTH )
70a0: 3b 0a 20 20 7a 4f 75 74 20 3d 20 63 6f 6e 74 65  ;.  zOut = conte
70b0: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
70c0: 2c 20 28 69 36 34 29 6e 4f 75 74 29 3b 0a 20 20  , (i64)nOut);.  
70d0: 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20  if( zOut==0 ){. 
70e0: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20     return;.  }. 
70f0: 20 6c 6f 6f 70 4c 69 6d 69 74 20 3d 20 6e 53 74   loopLimit = nSt
7100: 72 20 2d 20 6e 50 61 74 74 65 72 6e 3b 20 20 0a  r - nPattern;  .
7110: 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 69 3c 3d    for(i=j=0; i<=
7120: 6c 6f 6f 70 4c 69 6d 69 74 3b 20 69 2b 2b 29 7b  loopLimit; i++){
7130: 0a 20 20 20 20 69 66 28 20 7a 53 74 72 5b 69 5d  .    if( zStr[i]
7140: 21 3d 7a 50 61 74 74 65 72 6e 5b 30 5d 20 7c 7c  !=zPattern[0] ||
7150: 20 6d 65 6d 63 6d 70 28 26 7a 53 74 72 5b 69 5d   memcmp(&zStr[i]
7160: 2c 20 7a 50 61 74 74 65 72 6e 2c 20 6e 50 61 74  , zPattern, nPat
7170: 74 65 72 6e 29 20 29 7b 0a 20 20 20 20 20 20 7a  tern) ){.      z
7180: 4f 75 74 5b 6a 2b 2b 5d 20 3d 20 7a 53 74 72 5b  Out[j++] = zStr[
7190: 69 5d 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20  i];.    }else{. 
71a0: 20 20 20 20 20 75 38 20 2a 7a 4f 6c 64 3b 0a 20       u8 *zOld;. 
71b0: 20 20 20 20 20 73 71 6c 69 74 65 33 20 2a 64 62       sqlite3 *db
71c0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65   = sqlite3_conte
71d0: 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e  xt_db_handle(con
71e0: 74 65 78 74 29 3b 0a 20 20 20 20 20 20 6e 4f 75  text);.      nOu
71f0: 74 20 2b 3d 20 6e 52 65 70 20 2d 20 6e 50 61 74  t += nRep - nPat
7200: 74 65 72 6e 3b 0a 20 20 20 20 20 20 74 65 73 74  tern;.      test
7210: 63 61 73 65 28 20 6e 4f 75 74 2d 31 3d 3d 64 62  case( nOut-1==db
7220: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
7230: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b  LIMIT_LENGTH] );
7240: 0a 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28  .      testcase(
7250: 20 6e 4f 75 74 2d 32 3d 3d 64 62 2d 3e 61 4c 69   nOut-2==db->aLi
7260: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
7270: 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20 20 20 20  _LENGTH] );.    
7280: 20 20 69 66 28 20 6e 4f 75 74 2d 31 3e 64 62 2d    if( nOut-1>db-
7290: 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c  >aLimit[SQLITE_L
72a0: 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a  IMIT_LENGTH] ){.
72b0: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
72c0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f  result_error_too
72d0: 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  big(context);.  
72e0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 44 62 46        sqlite3DbF
72f0: 72 65 65 28 64 62 2c 20 7a 4f 75 74 29 3b 0a 20  ree(db, zOut);. 
7300: 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20         return;. 
7310: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7a 4f 6c       }.      zOl
7320: 64 20 3d 20 7a 4f 75 74 3b 0a 20 20 20 20 20 20  d = zOut;.      
7330: 7a 4f 75 74 20 3d 20 73 71 6c 69 74 65 33 5f 72  zOut = sqlite3_r
7340: 65 61 6c 6c 6f 63 28 7a 4f 75 74 2c 20 28 69 6e  ealloc(zOut, (in
7350: 74 29 6e 4f 75 74 29 3b 0a 20 20 20 20 20 20 69  t)nOut);.      i
7360: 66 28 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20 20  f( zOut==0 ){.  
7370: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
7380: 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d  sult_error_nomem
7390: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20  (context);.     
73a0: 20 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65     sqlite3DbFree
73b0: 28 64 62 2c 20 7a 4f 6c 64 29 3b 0a 20 20 20 20  (db, zOld);.    
73c0: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20      return;.    
73d0: 20 20 7d 0a 20 20 20 20 20 20 6d 65 6d 63 70 79    }.      memcpy
73e0: 28 26 7a 4f 75 74 5b 6a 5d 2c 20 7a 52 65 70 2c  (&zOut[j], zRep,
73f0: 20 6e 52 65 70 29 3b 0a 20 20 20 20 20 20 6a 20   nRep);.      j 
7400: 2b 3d 20 6e 52 65 70 3b 0a 20 20 20 20 20 20 69  += nRep;.      i
7410: 20 2b 3d 20 6e 50 61 74 74 65 72 6e 2d 31 3b 0a   += nPattern-1;.
7420: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61 73 73 65      }.  }.  asse
7430: 72 74 28 20 6a 2b 6e 53 74 72 2d 69 2b 31 3d 3d  rt( j+nStr-i+1==
7440: 6e 4f 75 74 20 29 3b 0a 20 20 6d 65 6d 63 70 79  nOut );.  memcpy
7450: 28 26 7a 4f 75 74 5b 6a 5d 2c 20 26 7a 53 74 72  (&zOut[j], &zStr
7460: 5b 69 5d 2c 20 6e 53 74 72 2d 69 29 3b 0a 20 20  [i], nStr-i);.  
7470: 6a 20 2b 3d 20 6e 53 74 72 20 2d 20 69 3b 0a 20  j += nStr - i;. 
7480: 20 61 73 73 65 72 74 28 20 6a 3c 3d 6e 4f 75 74   assert( j<=nOut
7490: 20 29 3b 0a 20 20 7a 4f 75 74 5b 6a 5d 20 3d 20   );.  zOut[j] = 
74a0: 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  0;.  sqlite3_res
74b0: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
74c0: 2c 20 28 63 68 61 72 2a 29 7a 4f 75 74 2c 20 6a  , (char*)zOut, j
74d0: 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b  , sqlite3_free);
74e0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
74f0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
7500: 54 52 49 4d 28 29 2c 20 4c 54 52 49 4d 28 29 2c  TRIM(), LTRIM(),
7510: 20 61 6e 64 20 52 54 52 49 4d 28 29 20 66 75 6e   and RTRIM() fun
7520: 63 74 69 6f 6e 73 2e 0a 2a 2a 20 54 68 65 20 75  ctions..** The u
7530: 73 65 72 64 61 74 61 20 69 73 20 30 78 31 20 66  serdata is 0x1 f
7540: 6f 72 20 6c 65 66 74 20 74 72 69 6d 2c 20 30 78  or left trim, 0x
7550: 32 20 66 6f 72 20 72 69 67 68 74 20 74 72 69 6d  2 for right trim
7560: 2c 20 30 78 33 20 66 6f 72 20 62 6f 74 68 2e 0a  , 0x3 for both..
7570: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74  */.static void t
7580: 72 69 6d 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  rimFunc(.  sqlit
7590: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
75a0: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
75b0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
75c0: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e   **argv.){.  con
75d0: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
75e0: 20 2a 7a 49 6e 3b 20 20 20 20 20 20 20 20 20 2f   *zIn;         /
75f0: 2a 20 49 6e 70 75 74 20 73 74 72 69 6e 67 20 2a  * Input string *
7600: 2f 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  /.  const unsign
7610: 65 64 20 63 68 61 72 20 2a 7a 43 68 61 72 53 65  ed char *zCharSe
7620: 74 3b 20 20 20 20 2f 2a 20 53 65 74 20 6f 66 20  t;    /* Set of 
7630: 63 68 61 72 61 63 74 65 72 73 20 74 6f 20 74 72  characters to tr
7640: 69 6d 20 2a 2f 0a 20 20 69 6e 74 20 6e 49 6e 3b  im */.  int nIn;
7650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7660: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d            /* Num
7670: 62 65 72 20 6f 66 20 62 79 74 65 73 20 69 6e 20  ber of bytes in 
7680: 69 6e 70 75 74 20 2a 2f 0a 20 20 69 6e 74 20 66  input */.  int f
7690: 6c 61 67 73 3b 20 20 20 20 20 20 20 20 20 20 20  lags;           
76a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
76b0: 31 3a 20 74 72 69 6d 6c 65 66 74 20 20 32 3a 20  1: trimleft  2: 
76c0: 74 72 69 6d 72 69 67 68 74 20 20 33 3a 20 74 72  trimright  3: tr
76d0: 69 6d 20 2a 2f 0a 20 20 69 6e 74 20 69 3b 20 20  im */.  int i;  
76e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
76f0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f            /* Loo
7700: 70 20 63 6f 75 6e 74 65 72 20 2a 2f 0a 20 20 75  p counter */.  u
7710: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 61 4c  nsigned char *aL
7720: 65 6e 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20  en = 0;         
7730: 20 2f 2a 20 4c 65 6e 67 74 68 20 6f 66 20 65 61   /* Length of ea
7740: 63 68 20 63 68 61 72 61 63 74 65 72 20 69 6e 20  ch character in 
7750: 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20 20 75 6e  zCharSet */.  un
7760: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 2a 61 7a  signed char **az
7770: 43 68 61 72 20 3d 20 30 3b 20 20 20 20 20 20 20  Char = 0;       
7780: 2f 2a 20 49 6e 64 69 76 69 64 75 61 6c 20 63 68  /* Individual ch
7790: 61 72 61 63 74 65 72 73 20 69 6e 20 7a 43 68 61  aracters in zCha
77a0: 72 53 65 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 43  rSet */.  int nC
77b0: 68 61 72 3b 20 20 20 20 20 20 20 20 20 20 20 20  har;            
77c0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e              /* N
77d0: 75 6d 62 65 72 20 6f 66 20 63 68 61 72 61 63 74  umber of charact
77e0: 65 72 73 20 69 6e 20 7a 43 68 61 72 53 65 74 20  ers in zCharSet 
77f0: 2a 2f 0a 0a 20 20 69 66 28 20 73 71 6c 69 74 65  */..  if( sqlite
7800: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
7810: 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[0])==SQLITE_NU
7820: 4c 4c 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  LL ){.    return
7830: 3b 0a 20 20 7d 0a 20 20 7a 49 6e 20 3d 20 73 71  ;.  }.  zIn = sq
7840: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
7850: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28  (argv[0]);.  if(
7860: 20 7a 49 6e 3d 3d 30 20 29 20 72 65 74 75 72 6e   zIn==0 ) return
7870: 3b 0a 20 20 6e 49 6e 20 3d 20 73 71 6c 69 74 65  ;.  nIn = sqlite
7880: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
7890: 67 76 5b 30 5d 29 3b 0a 20 20 61 73 73 65 72 74  gv[0]);.  assert
78a0: 28 20 7a 49 6e 3d 3d 73 71 6c 69 74 65 33 5f 76  ( zIn==sqlite3_v
78b0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
78c0: 5d 29 20 29 3b 0a 20 20 69 66 28 20 61 72 67 63  ]) );.  if( argc
78d0: 3d 3d 31 20 29 7b 0a 20 20 20 20 73 74 61 74 69  ==1 ){.    stati
78e0: 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64  c const unsigned
78f0: 20 63 68 61 72 20 6c 65 6e 4f 6e 65 5b 5d 20 3d   char lenOne[] =
7900: 20 7b 20 31 20 7d 3b 0a 20 20 20 20 73 74 61 74   { 1 };.    stat
7910: 69 63 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  ic unsigned char
7920: 20 2a 20 63 6f 6e 73 74 20 61 7a 4f 6e 65 5b 5d   * const azOne[]
7930: 20 3d 20 7b 20 28 75 38 2a 29 22 20 22 20 7d 3b   = { (u8*)" " };
7940: 0a 20 20 20 20 6e 43 68 61 72 20 3d 20 31 3b 0a  .    nChar = 1;.
7950: 20 20 20 20 61 4c 65 6e 20 3d 20 28 75 38 2a 29      aLen = (u8*)
7960: 6c 65 6e 4f 6e 65 3b 0a 20 20 20 20 61 7a 43 68  lenOne;.    azCh
7970: 61 72 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63  ar = (unsigned c
7980: 68 61 72 20 2a 2a 29 61 7a 4f 6e 65 3b 0a 20 20  har **)azOne;.  
7990: 20 20 7a 43 68 61 72 53 65 74 20 3d 20 30 3b 0a    zCharSet = 0;.
79a0: 20 20 7d 65 6c 73 65 20 69 66 28 20 28 7a 43 68    }else if( (zCh
79b0: 61 72 53 65 74 20 3d 20 73 71 6c 69 74 65 33 5f  arSet = sqlite3_
79c0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
79d0: 31 5d 29 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72  1]))==0 ){.    r
79e0: 65 74 75 72 6e 3b 0a 20 20 7d 65 6c 73 65 7b 0a  eturn;.  }else{.
79f0: 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e      const unsign
7a00: 65 64 20 63 68 61 72 20 2a 7a 3b 0a 20 20 20 20  ed char *z;.    
7a10: 66 6f 72 28 7a 3d 7a 43 68 61 72 53 65 74 2c 20  for(z=zCharSet, 
7a20: 6e 43 68 61 72 3d 30 3b 20 2a 7a 3b 20 6e 43 68  nChar=0; *z; nCh
7a30: 61 72 2b 2b 29 7b 0a 20 20 20 20 20 20 53 51 4c  ar++){.      SQL
7a40: 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29  ITE_SKIP_UTF8(z)
7a50: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20  ;.    }.    if( 
7a60: 6e 43 68 61 72 3e 30 20 29 7b 0a 20 20 20 20 20  nChar>0 ){.     
7a70: 20 61 7a 43 68 61 72 20 3d 20 63 6f 6e 74 65 78   azChar = contex
7a80: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
7a90: 20 28 28 69 36 34 29 6e 43 68 61 72 29 2a 28 73   ((i64)nChar)*(s
7aa0: 69 7a 65 6f 66 28 63 68 61 72 2a 29 2b 31 29 29  izeof(char*)+1))
7ab0: 3b 0a 20 20 20 20 20 20 69 66 28 20 61 7a 43 68  ;.      if( azCh
7ac0: 61 72 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  ar==0 ){.       
7ad0: 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d   return;.      }
7ae0: 0a 20 20 20 20 20 20 61 4c 65 6e 20 3d 20 28 75  .      aLen = (u
7af0: 6e 73 69 67 6e 65 64 20 63 68 61 72 2a 29 26 61  nsigned char*)&a
7b00: 7a 43 68 61 72 5b 6e 43 68 61 72 5d 3b 0a 20 20  zChar[nChar];.  
7b10: 20 20 20 20 66 6f 72 28 7a 3d 7a 43 68 61 72 53      for(z=zCharS
7b20: 65 74 2c 20 6e 43 68 61 72 3d 30 3b 20 2a 7a 3b  et, nChar=0; *z;
7b30: 20 6e 43 68 61 72 2b 2b 29 7b 0a 20 20 20 20 20   nChar++){.     
7b40: 20 20 20 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d     azChar[nChar]
7b50: 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61   = (unsigned cha
7b60: 72 20 2a 29 7a 3b 0a 20 20 20 20 20 20 20 20 53  r *)z;.        S
7b70: 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28  QLITE_SKIP_UTF8(
7b80: 7a 29 3b 0a 20 20 20 20 20 20 20 20 61 4c 65 6e  z);.        aLen
7b90: 5b 6e 43 68 61 72 5d 20 3d 20 28 75 38 29 28 7a  [nChar] = (u8)(z
7ba0: 20 2d 20 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d   - azChar[nChar]
7bb0: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  );.      }.    }
7bc0: 0a 20 20 7d 0a 20 20 69 66 28 20 6e 43 68 61 72  .  }.  if( nChar
7bd0: 3e 30 20 29 7b 0a 20 20 20 20 66 6c 61 67 73 20  >0 ){.    flags 
7be0: 3d 20 53 51 4c 49 54 45 5f 50 54 52 5f 54 4f 5f  = SQLITE_PTR_TO_
7bf0: 49 4e 54 28 73 71 6c 69 74 65 33 5f 75 73 65 72  INT(sqlite3_user
7c00: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 29 3b  _data(context));
7c10: 0a 20 20 20 20 69 66 28 20 66 6c 61 67 73 20 26  .    if( flags &
7c20: 20 31 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c   1 ){.      whil
7c30: 65 28 20 6e 49 6e 3e 30 20 29 7b 0a 20 20 20 20  e( nIn>0 ){.    
7c40: 20 20 20 20 69 6e 74 20 6c 65 6e 20 3d 20 30 3b      int len = 0;
7c50: 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30  .        for(i=0
7c60: 3b 20 69 3c 6e 43 68 61 72 3b 20 69 2b 2b 29 7b  ; i<nChar; i++){
7c70: 0a 20 20 20 20 20 20 20 20 20 20 6c 65 6e 20 3d  .          len =
7c80: 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20 20 20 20 20   aLen[i];.      
7c90: 20 20 20 20 69 66 28 20 6c 65 6e 3c 3d 6e 49 6e      if( len<=nIn
7ca0: 20 26 26 20 6d 65 6d 63 6d 70 28 7a 49 6e 2c 20   && memcmp(zIn, 
7cb0: 61 7a 43 68 61 72 5b 69 5d 2c 20 6c 65 6e 29 3d  azChar[i], len)=
7cc0: 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20  =0 ) break;.    
7cd0: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66      }.        if
7ce0: 28 20 69 3e 3d 6e 43 68 61 72 20 29 20 62 72 65  ( i>=nChar ) bre
7cf0: 61 6b 3b 0a 20 20 20 20 20 20 20 20 7a 49 6e 20  ak;.        zIn 
7d00: 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 20 20  += len;.        
7d10: 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20  nIn -= len;.    
7d20: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 66    }.    }.    if
7d30: 28 20 66 6c 61 67 73 20 26 20 32 20 29 7b 0a 20  ( flags & 2 ){. 
7d40: 20 20 20 20 20 77 68 69 6c 65 28 20 6e 49 6e 3e       while( nIn>
7d50: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74  0 ){.        int
7d60: 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20   len = 0;.      
7d70: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 43 68    for(i=0; i<nCh
7d80: 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  ar; i++){.      
7d90: 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e 5b 69      len = aLen[i
7da0: 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28  ];.          if(
7db0: 20 6c 65 6e 3c 3d 6e 49 6e 20 26 26 20 6d 65 6d   len<=nIn && mem
7dc0: 63 6d 70 28 26 7a 49 6e 5b 6e 49 6e 2d 6c 65 6e  cmp(&zIn[nIn-len
7dd0: 5d 2c 61 7a 43 68 61 72 5b 69 5d 2c 6c 65 6e 29  ],azChar[i],len)
7de0: 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20  ==0 ) break;.   
7df0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69       }.        i
7e00: 66 28 20 69 3e 3d 6e 43 68 61 72 20 29 20 62 72  f( i>=nChar ) br
7e10: 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 6e 49 6e  eak;.        nIn
7e20: 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 7d   -= len;.      }
7e30: 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 7a  .    }.    if( z
7e40: 43 68 61 72 53 65 74 20 29 7b 0a 20 20 20 20 20  CharSet ){.     
7e50: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 61 7a   sqlite3_free(az
7e60: 43 68 61 72 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  Char);.    }.  }
7e70: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
7e80: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
7e90: 28 63 68 61 72 2a 29 7a 49 6e 2c 20 6e 49 6e 2c  (char*)zIn, nIn,
7ea0: 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e   SQLITE_TRANSIEN
7eb0: 54 29 3b 0a 7d 0a 0a 0a 2f 2a 20 49 4d 50 3a 20  T);.}.../* IMP: 
7ec0: 52 2d 32 35 33 36 31 2d 31 36 31 35 30 20 54 68  R-25361-16150 Th
7ed0: 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6f  is function is o
7ee0: 6d 69 74 74 65 64 20 66 72 6f 6d 20 53 51 4c 69  mitted from SQLi
7ef0: 74 65 20 62 79 20 64 65 66 61 75 6c 74 2e 20 49  te by default. I
7f00: 74 0a 2a 2a 20 69 73 20 6f 6e 6c 79 20 61 76 61  t.** is only ava
7f10: 69 6c 61 62 6c 65 20 69 66 20 74 68 65 20 53 51  ilable if the SQ
7f20: 4c 49 54 45 5f 53 4f 55 4e 44 45 58 20 63 6f 6d  LITE_SOUNDEX com
7f30: 70 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e  pile-time option
7f40: 20 69 73 20 75 73 65 64 0a 2a 2a 20 77 68 65 6e   is used.** when
7f50: 20 53 51 4c 69 74 65 20 69 73 20 62 75 69 6c 74   SQLite is built
7f60: 2e 0a 2a 2f 0a 23 69 66 64 65 66 20 53 51 4c 49  ..*/.#ifdef SQLI
7f70: 54 45 5f 53 4f 55 4e 44 45 58 0a 2f 2a 0a 2a 2a  TE_SOUNDEX./*.**
7f80: 20 43 6f 6d 70 75 74 65 20 74 68 65 20 73 6f 75   Compute the sou
7f90: 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67 20 6f 66  ndex encoding of
7fa0: 20 61 20 77 6f 72 64 2e 0a 2a 2a 0a 2a 2a 20 49   a word..**.** I
7fb0: 4d 50 3a 20 52 2d 35 39 37 38 32 2d 30 30 30 37  MP: R-59782-0007
7fc0: 32 20 54 68 65 20 73 6f 75 6e 64 65 78 28 58 29  2 The soundex(X)
7fd0: 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e   function return
7fe0: 73 20 61 20 73 74 72 69 6e 67 20 74 68 61 74 20  s a string that 
7ff0: 69 73 20 74 68 65 0a 2a 2a 20 73 6f 75 6e 64 65  is the.** sounde
8000: 78 20 65 6e 63 6f 64 69 6e 67 20 6f 66 20 74 68  x encoding of th
8010: 65 20 73 74 72 69 6e 67 20 58 2e 20 0a 2a 2f 0a  e string X. .*/.
8020: 73 74 61 74 69 63 20 76 6f 69 64 20 73 6f 75 6e  static void soun
8030: 64 65 78 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  dexFunc(.  sqlit
8040: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
8050: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
8060: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
8070: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 68 61   **argv.){.  cha
8080: 72 20 7a 52 65 73 75 6c 74 5b 38 5d 3b 0a 20 20  r zResult[8];.  
8090: 63 6f 6e 73 74 20 75 38 20 2a 7a 49 6e 3b 0a 20  const u8 *zIn;. 
80a0: 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20 73 74 61   int i, j;.  sta
80b0: 74 69 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  tic const unsign
80c0: 65 64 20 63 68 61 72 20 69 43 6f 64 65 5b 5d 20  ed char iCode[] 
80d0: 3d 20 7b 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c  = {.    0, 0, 0,
80e0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
80f0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
8100: 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30  , 0, 0,.    0, 0
8110: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8120: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
8130: 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20  0, 0, 0, 0,.    
8140: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
8150: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8160: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a   0, 0, 0, 0, 0,.
8170: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20      0, 0, 0, 0, 
8180: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
8190: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
81a0: 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 31 2c   0,.    0, 0, 1,
81b0: 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 32 2c 20   2, 3, 0, 1, 2, 
81c0: 30 2c 20 30 2c 20 32 2c 20 32 2c 20 34 2c 20 35  0, 0, 2, 2, 4, 5
81d0: 2c 20 35 2c 20 30 2c 0a 20 20 20 20 31 2c 20 32  , 5, 0,.    1, 2
81e0: 2c 20 36 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c  , 6, 2, 3, 0, 1,
81f0: 20 30 2c 20 32 2c 20 30 2c 20 32 2c 20 30 2c 20   0, 2, 0, 2, 0, 
8200: 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20  0, 0, 0, 0,.    
8210: 30 2c 20 30 2c 20 31 2c 20 32 2c 20 33 2c 20 30  0, 0, 1, 2, 3, 0
8220: 2c 20 31 2c 20 32 2c 20 30 2c 20 30 2c 20 32 2c  , 1, 2, 0, 0, 2,
8230: 20 32 2c 20 34 2c 20 35 2c 20 35 2c 20 30 2c 0a   2, 4, 5, 5, 0,.
8240: 20 20 20 20 31 2c 20 32 2c 20 36 2c 20 32 2c 20      1, 2, 6, 2, 
8250: 33 2c 20 30 2c 20 31 2c 20 30 2c 20 32 2c 20 30  3, 0, 1, 0, 2, 0
8260: 2c 20 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 2, 0, 0, 0, 0,
8270: 20 30 2c 0a 20 20 7d 3b 0a 20 20 61 73 73 65 72   0,.  };.  asser
8280: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
8290: 7a 49 6e 20 3d 20 28 75 38 2a 29 73 71 6c 69 74  zIn = (u8*)sqlit
82a0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
82b0: 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 49  gv[0]);.  if( zI
82c0: 6e 3d 3d 30 20 29 20 7a 49 6e 20 3d 20 28 75 38  n==0 ) zIn = (u8
82d0: 2a 29 22 22 3b 0a 20 20 66 6f 72 28 69 3d 30 3b  *)"";.  for(i=0;
82e0: 20 7a 49 6e 5b 69 5d 20 26 26 20 21 73 71 6c 69   zIn[i] && !sqli
82f0: 74 65 33 49 73 61 6c 70 68 61 28 7a 49 6e 5b 69  te3Isalpha(zIn[i
8300: 5d 29 3b 20 69 2b 2b 29 7b 7d 0a 20 20 69 66 28  ]); i++){}.  if(
8310: 20 7a 49 6e 5b 69 5d 20 29 7b 0a 20 20 20 20 75   zIn[i] ){.    u
8320: 38 20 70 72 65 76 63 6f 64 65 20 3d 20 69 43 6f  8 prevcode = iCo
8330: 64 65 5b 7a 49 6e 5b 69 5d 26 30 78 37 66 5d 3b  de[zIn[i]&0x7f];
8340: 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b 30 5d 20  .    zResult[0] 
8350: 3d 20 73 71 6c 69 74 65 33 54 6f 75 70 70 65 72  = sqlite3Toupper
8360: 28 7a 49 6e 5b 69 5d 29 3b 0a 20 20 20 20 66 6f  (zIn[i]);.    fo
8370: 72 28 6a 3d 31 3b 20 6a 3c 34 20 26 26 20 7a 49  r(j=1; j<4 && zI
8380: 6e 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  n[i]; i++){.    
8390: 20 20 69 6e 74 20 63 6f 64 65 20 3d 20 69 43 6f    int code = iCo
83a0: 64 65 5b 7a 49 6e 5b 69 5d 26 30 78 37 66 5d 3b  de[zIn[i]&0x7f];
83b0: 0a 20 20 20 20 20 20 69 66 28 20 63 6f 64 65 3e  .      if( code>
83c0: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28  0 ){.        if(
83d0: 20 63 6f 64 65 21 3d 70 72 65 76 63 6f 64 65 20   code!=prevcode 
83e0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 70 72 65  ){.          pre
83f0: 76 63 6f 64 65 20 3d 20 63 6f 64 65 3b 0a 20 20  vcode = code;.  
8400: 20 20 20 20 20 20 20 20 7a 52 65 73 75 6c 74 5b          zResult[
8410: 6a 2b 2b 5d 20 3d 20 63 6f 64 65 20 2b 20 27 30  j++] = code + '0
8420: 27 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  ';.        }.   
8430: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
8440: 20 20 70 72 65 76 63 6f 64 65 20 3d 20 30 3b 0a    prevcode = 0;.
8450: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20        }.    }.  
8460: 20 20 77 68 69 6c 65 28 20 6a 3c 34 20 29 7b 0a    while( j<4 ){.
8470: 20 20 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a 2b        zResult[j+
8480: 2b 5d 20 3d 20 27 30 27 3b 0a 20 20 20 20 7d 0a  +] = '0';.    }.
8490: 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a 5d 20 3d      zResult[j] =
84a0: 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   0;.    sqlite3_
84b0: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
84c0: 65 78 74 2c 20 7a 52 65 73 75 6c 74 2c 20 34 2c  ext, zResult, 4,
84d0: 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e   SQLITE_TRANSIEN
84e0: 54 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  T);.  }else{.   
84f0: 20 2f 2a 20 49 4d 50 3a 20 52 2d 36 34 38 39 34   /* IMP: R-64894
8500: 2d 35 30 33 32 31 20 54 68 65 20 73 74 72 69 6e  -50321 The strin
8510: 67 20 22 3f 30 30 30 22 20 69 73 20 72 65 74 75  g "?000" is retu
8520: 72 6e 65 64 20 69 66 20 74 68 65 20 61 72 67 75  rned if the argu
8530: 6d 65 6e 74 0a 20 20 20 20 2a 2a 20 69 73 20 4e  ment.    ** is N
8540: 55 4c 4c 20 6f 72 20 63 6f 6e 74 61 69 6e 73 20  ULL or contains 
8550: 6e 6f 20 41 53 43 49 49 20 61 6c 70 68 61 62 65  no ASCII alphabe
8560: 74 69 63 20 63 68 61 72 61 63 74 65 72 73 2e 20  tic characters. 
8570: 2a 2f 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  */.    sqlite3_r
8580: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
8590: 78 74 2c 20 22 3f 30 30 30 22 2c 20 34 2c 20 53  xt, "?000", 4, S
85a0: 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20  QLITE_STATIC);. 
85b0: 20 7d 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53   }.}.#endif /* S
85c0: 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58 20 2a 2f  QLITE_SOUNDEX */
85d0: 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  ..#ifndef SQLITE
85e0: 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54 45 4e  _OMIT_LOAD_EXTEN
85f0: 53 49 4f 4e 0a 2f 2a 0a 2a 2a 20 41 20 66 75 6e  SION./*.** A fun
8600: 63 74 69 6f 6e 20 74 68 61 74 20 6c 6f 61 64 73  ction that loads
8610: 20 61 20 73 68 61 72 65 64 2d 6c 69 62 72 61 72   a shared-librar
8620: 79 20 65 78 74 65 6e 73 69 6f 6e 20 74 68 65 6e  y extension then
8630: 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 2e 0a 2a   returns NULL..*
8640: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 6f  /.static void lo
8650: 61 64 45 78 74 28 73 71 6c 69 74 65 33 5f 63 6f  adExt(sqlite3_co
8660: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
8670: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
8680: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
8690: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
86a0: 46 69 6c 65 20 3d 20 28 63 6f 6e 73 74 20 63 68  File = (const ch
86b0: 61 72 20 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  ar *)sqlite3_val
86c0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
86d0: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
86e0: 7a 50 72 6f 63 3b 0a 20 20 73 71 6c 69 74 65 33  zProc;.  sqlite3
86f0: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
8700: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
8710: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 63 68 61  (context);.  cha
8720: 72 20 2a 7a 45 72 72 4d 73 67 20 3d 20 30 3b 0a  r *zErrMsg = 0;.
8730: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29  .  if( argc==2 )
8740: 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d 20 28 63  {.    zProc = (c
8750: 6f 6e 73 74 20 63 68 61 72 20 2a 29 73 71 6c 69  onst char *)sqli
8760: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
8770: 72 67 76 5b 31 5d 29 3b 0a 20 20 7d 65 6c 73 65  rgv[1]);.  }else
8780: 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d 20 30 3b  {.    zProc = 0;
8790: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 46 69 6c 65  .  }.  if( zFile
87a0: 20 26 26 20 73 71 6c 69 74 65 33 5f 6c 6f 61 64   && sqlite3_load
87b0: 5f 65 78 74 65 6e 73 69 6f 6e 28 64 62 2c 20 7a  _extension(db, z
87c0: 46 69 6c 65 2c 20 7a 50 72 6f 63 2c 20 26 7a 45  File, zProc, &zE
87d0: 72 72 4d 73 67 29 20 29 7b 0a 20 20 20 20 73 71  rrMsg) ){.    sq
87e0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
87f0: 6f 72 28 63 6f 6e 74 65 78 74 2c 20 7a 45 72 72  or(context, zErr
8800: 4d 73 67 2c 20 2d 31 29 3b 0a 20 20 20 20 73 71  Msg, -1);.    sq
8810: 6c 69 74 65 33 5f 66 72 65 65 28 7a 45 72 72 4d  lite3_free(zErrM
8820: 73 67 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69  sg);.  }.}.#endi
8830: 66 0a 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73  f.../*.** An ins
8840: 74 61 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c  tance of the fol
8850: 6c 6f 77 69 6e 67 20 73 74 72 75 63 74 75 72 65  lowing structure
8860: 20 68 6f 6c 64 73 20 74 68 65 20 63 6f 6e 74 65   holds the conte
8870: 78 74 20 6f 66 20 61 0a 2a 2a 20 73 75 6d 28 29  xt of a.** sum()
8880: 20 6f 72 20 61 76 67 28 29 20 61 67 67 72 65 67   or avg() aggreg
8890: 61 74 65 20 63 6f 6d 70 75 74 61 74 69 6f 6e 2e  ate computation.
88a0: 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75  .*/.typedef stru
88b0: 63 74 20 53 75 6d 43 74 78 20 53 75 6d 43 74 78  ct SumCtx SumCtx
88c0: 3b 0a 73 74 72 75 63 74 20 53 75 6d 43 74 78 20  ;.struct SumCtx 
88d0: 7b 0a 20 20 64 6f 75 62 6c 65 20 72 53 75 6d 3b  {.  double rSum;
88e0: 20 20 20 20 20 20 2f 2a 20 46 6c 6f 61 74 69 6e        /* Floatin
88f0: 67 20 70 6f 69 6e 74 20 73 75 6d 20 2a 2f 0a 20  g point sum */. 
8900: 20 69 36 34 20 69 53 75 6d 3b 20 20 20 20 20 20   i64 iSum;      
8910: 20 20 20 2f 2a 20 49 6e 74 65 67 65 72 20 73 75     /* Integer su
8920: 6d 20 2a 2f 20 20 20 0a 20 20 69 36 34 20 63 6e  m */   .  i64 cn
8930: 74 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e  t;          /* N
8940: 75 6d 62 65 72 20 6f 66 20 65 6c 65 6d 65 6e 74  umber of element
8950: 73 20 73 75 6d 6d 65 64 20 2a 2f 0a 20 20 75 38  s summed */.  u8
8960: 20 6f 76 65 72 66 6c 6f 77 3b 20 20 20 20 20 20   overflow;      
8970: 2f 2a 20 54 72 75 65 20 69 66 20 69 6e 74 65 67  /* True if integ
8980: 65 72 20 6f 76 65 72 66 6c 6f 77 20 73 65 65 6e  er overflow seen
8990: 20 2a 2f 0a 20 20 75 38 20 61 70 70 72 6f 78 3b   */.  u8 approx;
89a0: 20 20 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20          /* True 
89b0: 69 66 20 6e 6f 6e 2d 69 6e 74 65 67 65 72 20 76  if non-integer v
89c0: 61 6c 75 65 20 77 61 73 20 69 6e 70 75 74 20 74  alue was input t
89d0: 6f 20 74 68 65 20 73 75 6d 20 2a 2f 0a 7d 3b 0a  o the sum */.};.
89e0: 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20  ./*.** Routines 
89f0: 75 73 65 64 20 74 6f 20 63 6f 6d 70 75 74 65 20  used to compute 
8a00: 74 68 65 20 73 75 6d 2c 20 61 76 65 72 61 67 65  the sum, average
8a10: 2c 20 61 6e 64 20 74 6f 74 61 6c 2e 0a 2a 2a 0a  , and total..**.
8a20: 2a 2a 20 54 68 65 20 53 55 4d 28 29 20 66 75 6e  ** The SUM() fun
8a30: 63 74 69 6f 6e 20 66 6f 6c 6c 6f 77 73 20 74 68  ction follows th
8a40: 65 20 28 62 72 6f 6b 65 6e 29 20 53 51 4c 20 73  e (broken) SQL s
8a50: 74 61 6e 64 61 72 64 20 77 68 69 63 68 20 6d 65  tandard which me
8a60: 61 6e 73 0a 2a 2a 20 74 68 61 74 20 69 74 20 72  ans.** that it r
8a70: 65 74 75 72 6e 73 20 4e 55 4c 4c 20 69 66 20 69  eturns NULL if i
8a80: 74 20 73 75 6d 73 20 6f 76 65 72 20 6e 6f 20 69  t sums over no i
8a90: 6e 70 75 74 73 2e 20 20 54 4f 54 41 4c 20 72 65  nputs.  TOTAL re
8aa0: 74 75 72 6e 73 0a 2a 2a 20 30 2e 30 20 69 6e 20  turns.** 0.0 in 
8ab0: 74 68 61 74 20 63 61 73 65 2e 20 20 49 6e 20 61  that case.  In a
8ac0: 64 64 69 74 69 6f 6e 2c 20 54 4f 54 41 4c 20 61  ddition, TOTAL a
8ad0: 6c 77 61 79 73 20 72 65 74 75 72 6e 73 20 61 20  lways returns a 
8ae0: 66 6c 6f 61 74 20 77 68 65 72 65 0a 2a 2a 20 53  float where.** S
8af0: 55 4d 20 6d 69 67 68 74 20 72 65 74 75 72 6e 20  UM might return 
8b00: 61 6e 20 69 6e 74 65 67 65 72 20 69 66 20 69 74  an integer if it
8b10: 20 6e 65 76 65 72 20 65 6e 63 6f 75 6e 74 65 72   never encounter
8b20: 73 20 61 20 66 6c 6f 61 74 69 6e 67 20 70 6f 69  s a floating poi
8b30: 6e 74 0a 2a 2a 20 76 61 6c 75 65 2e 20 20 54 4f  nt.** value.  TO
8b40: 54 41 4c 20 6e 65 76 65 72 20 66 61 69 6c 73 2c  TAL never fails,
8b50: 20 62 75 74 20 53 55 4d 20 6d 69 67 68 74 20 74   but SUM might t
8b60: 68 72 6f 75 67 68 20 61 6e 20 65 78 63 65 70 74  hrough an except
8b70: 69 6f 6e 20 69 66 0a 2a 2a 20 69 74 20 6f 76 65  ion if.** it ove
8b80: 72 66 6c 6f 77 73 20 61 6e 20 69 6e 74 65 67 65  rflows an intege
8b90: 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  r..*/.static voi
8ba0: 64 20 73 75 6d 53 74 65 70 28 73 71 6c 69 74 65  d sumStep(sqlite
8bb0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
8bc0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
8bd0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
8be0: 67 76 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70  gv){.  SumCtx *p
8bf0: 3b 0a 20 20 69 6e 74 20 74 79 70 65 3b 0a 20 20  ;.  int type;.  
8c00: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
8c10: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
8c20: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 70  METER(argc);.  p
8c30: 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65   = sqlite3_aggre
8c40: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
8c50: 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29  text, sizeof(*p)
8c60: 29 3b 0a 20 20 74 79 70 65 20 3d 20 73 71 6c 69  );.  type = sqli
8c70: 74 65 33 5f 76 61 6c 75 65 5f 6e 75 6d 65 72 69  te3_value_numeri
8c80: 63 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3b  c_type(argv[0]);
8c90: 0a 20 20 69 66 28 20 70 20 26 26 20 74 79 70 65  .  if( p && type
8ca0: 21 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b  !=SQLITE_NULL ){
8cb0: 0a 20 20 20 20 70 2d 3e 63 6e 74 2b 2b 3b 0a 20  .    p->cnt++;. 
8cc0: 20 20 20 69 66 28 20 74 79 70 65 3d 3d 53 51 4c     if( type==SQL
8cd0: 49 54 45 5f 49 4e 54 45 47 45 52 20 29 7b 0a 20  ITE_INTEGER ){. 
8ce0: 20 20 20 20 20 69 36 34 20 76 20 3d 20 73 71 6c       i64 v = sql
8cf0: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34  ite3_value_int64
8d00: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20  (argv[0]);.     
8d10: 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 76 3b 0a 20   p->rSum += v;. 
8d20: 20 20 20 20 20 69 66 28 20 28 70 2d 3e 61 70 70       if( (p->app
8d30: 72 6f 78 7c 70 2d 3e 6f 76 65 72 66 6c 6f 77 29  rox|p->overflow)
8d40: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69  ==0 ){.        i
8d50: 36 34 20 69 4e 65 77 53 75 6d 20 3d 20 70 2d 3e  64 iNewSum = p->
8d60: 69 53 75 6d 20 2b 20 76 3b 0a 20 20 20 20 20 20  iSum + v;.      
8d70: 20 20 69 6e 74 20 73 31 20 3d 20 28 69 6e 74 29    int s1 = (int)
8d80: 28 70 2d 3e 69 53 75 6d 20 3e 3e 20 28 73 69 7a  (p->iSum >> (siz
8d90: 65 6f 66 28 69 36 34 29 2a 38 2d 31 29 29 3b 0a  eof(i64)*8-1));.
8da0: 20 20 20 20 20 20 20 20 69 6e 74 20 73 32 20 3d          int s2 =
8db0: 20 28 69 6e 74 29 28 76 20 20 20 20 20 20 20 3e   (int)(v       >
8dc0: 3e 20 28 73 69 7a 65 6f 66 28 69 36 34 29 2a 38  > (sizeof(i64)*8
8dd0: 2d 31 29 29 3b 0a 20 20 20 20 20 20 20 20 69 6e  -1));.        in
8de0: 74 20 73 33 20 3d 20 28 69 6e 74 29 28 69 4e 65  t s3 = (int)(iNe
8df0: 77 53 75 6d 20 3e 3e 20 28 73 69 7a 65 6f 66 28  wSum >> (sizeof(
8e00: 69 36 34 29 2a 38 2d 31 29 29 3b 0a 20 20 20 20  i64)*8-1));.    
8e10: 20 20 20 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20      p->overflow 
8e20: 3d 20 28 28 73 31 26 73 32 26 7e 73 33 29 20 7c  = ((s1&s2&~s3) |
8e30: 20 28 7e 73 31 26 7e 73 32 26 73 33 29 29 3f 31   (~s1&~s2&s3))?1
8e40: 3a 30 3b 0a 20 20 20 20 20 20 20 20 70 2d 3e 69  :0;.        p->i
8e50: 53 75 6d 20 3d 20 69 4e 65 77 53 75 6d 3b 0a 20  Sum = iNewSum;. 
8e60: 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65       }.    }else
8e70: 7b 0a 20 20 20 20 20 20 70 2d 3e 72 53 75 6d 20  {.      p->rSum 
8e80: 2b 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  += sqlite3_value
8e90: 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d 29  _double(argv[0])
8ea0: 3b 0a 20 20 20 20 20 20 70 2d 3e 61 70 70 72 6f  ;.      p->appro
8eb0: 78 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d  x = 1;.    }.  }
8ec0: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73  .}.static void s
8ed0: 75 6d 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  umFinalize(sqlit
8ee0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
8ef0: 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a  ext){.  SumCtx *
8f00: 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  p;.  p = sqlite3
8f10: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
8f20: 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a  xt(context, 0);.
8f30: 20 20 69 66 28 20 70 20 26 26 20 70 2d 3e 63 6e    if( p && p->cn
8f40: 74 3e 30 20 29 7b 0a 20 20 20 20 69 66 28 20 70  t>0 ){.    if( p
8f50: 2d 3e 6f 76 65 72 66 6c 6f 77 20 29 7b 0a 20 20  ->overflow ){.  
8f60: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
8f70: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
8f80: 2c 22 69 6e 74 65 67 65 72 20 6f 76 65 72 66 6c  ,"integer overfl
8f90: 6f 77 22 2c 2d 31 29 3b 0a 20 20 20 20 7d 65 6c  ow",-1);.    }el
8fa0: 73 65 20 69 66 28 20 70 2d 3e 61 70 70 72 6f 78  se if( p->approx
8fb0: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
8fc0: 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28  3_result_double(
8fd0: 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 72 53 75 6d  context, p->rSum
8fe0: 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  );.    }else{.  
8ff0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
9000: 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74  lt_int64(context
9010: 2c 20 70 2d 3e 69 53 75 6d 29 3b 0a 20 20 20 20  , p->iSum);.    
9020: 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76  }.  }.}.static v
9030: 6f 69 64 20 61 76 67 46 69 6e 61 6c 69 7a 65 28  oid avgFinalize(
9040: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
9050: 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d  *context){.  Sum
9060: 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71  Ctx *p;.  p = sq
9070: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
9080: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
9090: 20 30 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20   0);.  if( p && 
90a0: 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20 20  p->cnt>0 ){.    
90b0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64  sqlite3_result_d
90c0: 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70  ouble(context, p
90d0: 2d 3e 72 53 75 6d 2f 28 64 6f 75 62 6c 65 29 70  ->rSum/(double)p
90e0: 2d 3e 63 6e 74 29 3b 0a 20 20 7d 0a 7d 0a 73 74  ->cnt);.  }.}.st
90f0: 61 74 69 63 20 76 6f 69 64 20 74 6f 74 61 6c 46  atic void totalF
9100: 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f  inalize(sqlite3_
9110: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
9120: 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a  ){.  SumCtx *p;.
9130: 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67    p = sqlite3_ag
9140: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
9150: 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 2f  context, 0);.  /
9160: 2a 20 28 64 6f 75 62 6c 65 29 30 20 49 6e 20 63  * (double)0 In c
9170: 61 73 65 20 6f 66 20 53 51 4c 49 54 45 5f 4f 4d  ase of SQLITE_OM
9180: 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e  IT_FLOATING_POIN
9190: 54 2e 2e 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65  T... */.  sqlite
91a0: 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28  3_result_double(
91b0: 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20 70 2d 3e  context, p ? p->
91c0: 72 53 75 6d 20 3a 20 28 64 6f 75 62 6c 65 29 30  rSum : (double)0
91d0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20  );.}../*.** The 
91e0: 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 74  following struct
91f0: 75 72 65 20 6b 65 65 70 73 20 74 72 61 63 6b 20  ure keeps track 
9200: 6f 66 20 73 74 61 74 65 20 69 6e 66 6f 72 6d 61  of state informa
9210: 74 69 6f 6e 20 66 6f 72 20 74 68 65 0a 2a 2a 20  tion for the.** 
9220: 63 6f 75 6e 74 28 29 20 61 67 67 72 65 67 61 74  count() aggregat
9230: 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 74  e function..*/.t
9240: 79 70 65 64 65 66 20 73 74 72 75 63 74 20 43 6f  ypedef struct Co
9250: 75 6e 74 43 74 78 20 43 6f 75 6e 74 43 74 78 3b  untCtx CountCtx;
9260: 0a 73 74 72 75 63 74 20 43 6f 75 6e 74 43 74 78  .struct CountCtx
9270: 20 7b 0a 20 20 69 36 34 20 6e 3b 0a 7d 3b 0a 0a   {.  i64 n;.};..
9280: 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20 74  /*.** Routines t
9290: 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 74 68 65 20  o implement the 
92a0: 63 6f 75 6e 74 28 29 20 61 67 67 72 65 67 61 74  count() aggregat
92b0: 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73  e function..*/.s
92c0: 74 61 74 69 63 20 76 6f 69 64 20 63 6f 75 6e 74  tatic void count
92d0: 53 74 65 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Step(sqlite3_con
92e0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
92f0: 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33  nt argc, sqlite3
9300: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a  _value **argv){.
9310: 20 20 43 6f 75 6e 74 43 74 78 20 2a 70 3b 0a 20    CountCtx *p;. 
9320: 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67   p = sqlite3_agg
9330: 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63  regate_context(c
9340: 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a  ontext, sizeof(*
9350: 70 29 29 3b 0a 20 20 69 66 28 20 28 61 72 67 63  p));.  if( (argc
9360: 3d 3d 30 20 7c 7c 20 53 51 4c 49 54 45 5f 4e 55  ==0 || SQLITE_NU
9370: 4c 4c 21 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75  LL!=sqlite3_valu
9380: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 29  e_type(argv[0]))
9390: 20 26 26 20 70 20 29 7b 0a 20 20 20 20 70 2d 3e   && p ){.    p->
93a0: 6e 2b 2b 3b 0a 20 20 7d 0a 0a 23 69 66 6e 64 65  n++;.  }..#ifnde
93b0: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 44 45  f SQLITE_OMIT_DE
93c0: 50 52 45 43 41 54 45 44 0a 20 20 2f 2a 20 54 68  PRECATED.  /* Th
93d0: 65 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  e sqlite3_aggreg
93e0: 61 74 65 5f 63 6f 75 6e 74 28 29 20 66 75 6e 63  ate_count() func
93f0: 74 69 6f 6e 20 69 73 20 64 65 70 72 65 63 61 74  tion is deprecat
9400: 65 64 2e 20 20 42 75 74 20 6a 75 73 74 20 74 6f  ed.  But just to
9410: 20 6d 61 6b 65 0a 20 20 2a 2a 20 73 75 72 65 20   make.  ** sure 
9420: 69 74 20 73 74 69 6c 6c 20 6f 70 65 72 61 74 65  it still operate
9430: 73 20 63 6f 72 72 65 63 74 6c 79 2c 20 76 65 72  s correctly, ver
9440: 69 66 79 20 74 68 61 74 20 69 74 73 20 63 6f 75  ify that its cou
9450: 6e 74 20 61 67 72 65 65 73 20 77 69 74 68 20 6f  nt agrees with o
9460: 75 72 20 0a 20 20 2a 2a 20 69 6e 74 65 72 6e 61  ur .  ** interna
9470: 6c 20 63 6f 75 6e 74 20 77 68 65 6e 20 75 73 69  l count when usi
9480: 6e 67 20 63 6f 75 6e 74 28 2a 29 20 61 6e 64 20  ng count(*) and 
9490: 77 68 65 6e 20 74 68 65 20 74 6f 74 61 6c 20 63  when the total c
94a0: 6f 75 6e 74 20 63 61 6e 20 62 65 0a 20 20 2a 2a  ount can be.  **
94b0: 20 65 78 70 72 65 73 73 65 64 20 61 73 20 61 20   expressed as a 
94c0: 33 32 2d 62 69 74 20 69 6e 74 65 67 65 72 2e 20  32-bit integer. 
94d0: 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  */.  assert( arg
94e0: 63 3d 3d 31 20 7c 7c 20 70 3d 3d 30 20 7c 7c 20  c==1 || p==0 || 
94f0: 70 2d 3e 6e 3e 30 78 37 66 66 66 66 66 66 66 0a  p->n>0x7fffffff.
9500: 20 20 20 20 20 20 20 20 20 20 7c 7c 20 70 2d 3e            || p->
9510: 6e 3d 3d 73 71 6c 69 74 65 33 5f 61 67 67 72 65  n==sqlite3_aggre
9520: 67 61 74 65 5f 63 6f 75 6e 74 28 63 6f 6e 74 65  gate_count(conte
9530: 78 74 29 20 29 3b 0a 23 65 6e 64 69 66 0a 7d 20  xt) );.#endif.} 
9540: 20 20 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63    .static void c
9550: 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 28 73 71 6c  ountFinalize(sql
9560: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
9570: 6e 74 65 78 74 29 7b 0a 20 20 43 6f 75 6e 74 43  ntext){.  CountC
9580: 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c  tx *p;.  p = sql
9590: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
95a0: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
95b0: 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65  0);.  sqlite3_re
95c0: 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65  sult_int64(conte
95d0: 78 74 2c 20 70 20 3f 20 70 2d 3e 6e 20 3a 20 30  xt, p ? p->n : 0
95e0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74  );.}../*.** Rout
95f0: 69 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e  ines to implemen
9600: 74 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28  t min() and max(
9610: 29 20 61 67 67 72 65 67 61 74 65 20 66 75 6e 63  ) aggregate func
9620: 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69 63  tions..*/.static
9630: 20 76 6f 69 64 20 6d 69 6e 6d 61 78 53 74 65 70   void minmaxStep
9640: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
9650: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20  ext *context, . 
9660: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a 20   int NotUsed, . 
9670: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
9680: 2a 61 72 67 76 0a 29 7b 0a 20 20 4d 65 6d 20 2a  *argv.){.  Mem *
9690: 70 41 72 67 20 20 3d 20 28 4d 65 6d 20 2a 29 61  pArg  = (Mem *)a
96a0: 72 67 76 5b 30 5d 3b 0a 20 20 4d 65 6d 20 2a 70  rgv[0];.  Mem *p
96b0: 42 65 73 74 3b 0a 20 20 55 4e 55 53 45 44 5f 50  Best;.  UNUSED_P
96c0: 41 52 41 4d 45 54 45 52 28 4e 6f 74 55 73 65 64  ARAMETER(NotUsed
96d0: 29 3b 0a 0a 20 20 69 66 28 20 73 71 6c 69 74 65  );..  if( sqlite
96e0: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
96f0: 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[0])==SQLITE_NU
9700: 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 70  LL ) return;.  p
9710: 42 65 73 74 20 3d 20 28 4d 65 6d 20 2a 29 73 71  Best = (Mem *)sq
9720: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
9730: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
9740: 20 73 69 7a 65 6f 66 28 2a 70 42 65 73 74 29 29   sizeof(*pBest))
9750: 3b 0a 20 20 69 66 28 20 21 70 42 65 73 74 20 29  ;.  if( !pBest )
9760: 20 72 65 74 75 72 6e 3b 0a 0a 20 20 69 66 28 20   return;..  if( 
9770: 70 42 65 73 74 2d 3e 66 6c 61 67 73 20 29 7b 0a  pBest->flags ){.
9780: 20 20 20 20 69 6e 74 20 6d 61 78 3b 0a 20 20 20      int max;.   
9790: 20 69 6e 74 20 63 6d 70 3b 0a 20 20 20 20 43 6f   int cmp;.    Co
97a0: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73  llSeq *pColl = s
97b0: 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c  qlite3GetFuncCol
97c0: 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20  lSeq(context);. 
97d0: 20 20 20 2f 2a 20 54 68 69 73 20 73 74 65 70 20     /* This step 
97e0: 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64  function is used
97f0: 20 66 6f 72 20 62 6f 74 68 20 74 68 65 20 6d 69   for both the mi
9800: 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67  n() and max() ag
9810: 67 72 65 67 61 74 65 73 2c 0a 20 20 20 20 2a 2a  gregates,.    **
9820: 20 74 68 65 20 6f 6e 6c 79 20 64 69 66 66 65 72   the only differ
9830: 65 6e 63 65 20 62 65 74 77 65 65 6e 20 74 68 65  ence between the
9840: 20 74 77 6f 20 62 65 69 6e 67 20 74 68 61 74 20   two being that 
9850: 74 68 65 20 73 65 6e 73 65 20 6f 66 20 74 68 65  the sense of the
9860: 0a 20 20 20 20 2a 2a 20 63 6f 6d 70 61 72 69 73  .    ** comparis
9870: 6f 6e 20 69 73 20 69 6e 76 65 72 74 65 64 2e 20  on is inverted. 
9880: 46 6f 72 20 74 68 65 20 6d 61 78 28 29 20 61 67  For the max() ag
9890: 67 72 65 67 61 74 65 2c 20 74 68 65 0a 20 20 20  gregate, the.   
98a0: 20 2a 2a 20 73 71 6c 69 74 65 33 5f 75 73 65 72   ** sqlite3_user
98b0: 5f 64 61 74 61 28 29 20 66 75 6e 63 74 69 6f 6e  _data() function
98c0: 20 72 65 74 75 72 6e 73 20 28 76 6f 69 64 20 2a   returns (void *
98d0: 29 2d 31 2e 20 46 6f 72 20 6d 69 6e 28 29 20 69  )-1. For min() i
98e0: 74 0a 20 20 20 20 2a 2a 20 72 65 74 75 72 6e 73  t.    ** returns
98f0: 20 28 76 6f 69 64 20 2a 29 64 62 2c 20 77 68 65   (void *)db, whe
9900: 72 65 20 64 62 20 69 73 20 74 68 65 20 73 71 6c  re db is the sql
9910: 69 74 65 33 2a 20 64 61 74 61 62 61 73 65 20 70  ite3* database p
9920: 6f 69 6e 74 65 72 2e 0a 20 20 20 20 2a 2a 20 54  ointer..    ** T
9930: 68 65 72 65 66 6f 72 65 20 74 68 65 20 6e 65 78  herefore the nex
9940: 74 20 73 74 61 74 65 6d 65 6e 74 20 73 65 74 73  t statement sets
9950: 20 76 61 72 69 61 62 6c 65 20 27 6d 61 78 27 20   variable 'max' 
9960: 74 6f 20 31 20 66 6f 72 20 74 68 65 20 6d 61 78  to 1 for the max
9970: 28 29 0a 20 20 20 20 2a 2a 20 61 67 67 72 65 67  ().    ** aggreg
9980: 61 74 65 2c 20 6f 72 20 30 20 66 6f 72 20 6d 69  ate, or 0 for mi
9990: 6e 28 29 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20  n()..    */.    
99a0: 6d 61 78 20 3d 20 73 71 6c 69 74 65 33 5f 75 73  max = sqlite3_us
99b0: 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29  er_data(context)
99c0: 21 3d 30 3b 0a 20 20 20 20 63 6d 70 20 3d 20 73  !=0;.    cmp = s
99d0: 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65  qlite3MemCompare
99e0: 28 70 42 65 73 74 2c 20 70 41 72 67 2c 20 70 43  (pBest, pArg, pC
99f0: 6f 6c 6c 29 3b 0a 20 20 20 20 69 66 28 20 28 6d  oll);.    if( (m
9a00: 61 78 20 26 26 20 63 6d 70 3c 30 29 20 7c 7c 20  ax && cmp<0) || 
9a10: 28 21 6d 61 78 20 26 26 20 63 6d 70 3e 30 29 20  (!max && cmp>0) 
9a20: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
9a30: 56 64 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73  VdbeMemCopy(pBes
9a40: 74 2c 20 70 41 72 67 29 3b 0a 20 20 20 20 7d 0a  t, pArg);.    }.
9a50: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c    }else{.    sql
9a60: 69 74 65 33 56 64 62 65 4d 65 6d 43 6f 70 79 28  ite3VdbeMemCopy(
9a70: 70 42 65 73 74 2c 20 70 41 72 67 29 3b 0a 20 20  pBest, pArg);.  
9a80: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
9a90: 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 28 73  minMaxFinalize(s
9aa0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
9ab0: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 73 71 6c 69  context){.  sqli
9ac0: 74 65 33 5f 76 61 6c 75 65 20 2a 70 52 65 73 3b  te3_value *pRes;
9ad0: 0a 20 20 70 52 65 73 20 3d 20 28 73 71 6c 69 74  .  pRes = (sqlit
9ae0: 65 33 5f 76 61 6c 75 65 20 2a 29 73 71 6c 69 74  e3_value *)sqlit
9af0: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
9b00: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29  text(context, 0)
9b10: 3b 0a 20 20 69 66 28 20 70 52 65 73 20 29 7b 0a  ;.  if( pRes ){.
9b20: 20 20 20 20 69 66 28 20 41 4c 57 41 59 53 28 70      if( ALWAYS(p
9b30: 52 65 73 2d 3e 66 6c 61 67 73 29 20 29 7b 0a 20  Res->flags) ){. 
9b40: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
9b50: 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78  ult_value(contex
9b60: 74 2c 20 70 52 65 73 29 3b 0a 20 20 20 20 7d 0a  t, pRes);.    }.
9b70: 20 20 20 20 73 71 6c 69 74 65 33 56 64 62 65 4d      sqlite3VdbeM
9b80: 65 6d 52 65 6c 65 61 73 65 28 70 52 65 73 29 3b  emRelease(pRes);
9b90: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 67 72  .  }.}../*.** gr
9ba0: 6f 75 70 5f 63 6f 6e 63 61 74 28 45 58 50 52 2c  oup_concat(EXPR,
9bb0: 20 3f 53 45 50 41 52 41 54 4f 52 3f 29 0a 2a 2f   ?SEPARATOR?).*/
9bc0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 67 72 6f  .static void gro
9bd0: 75 70 43 6f 6e 63 61 74 53 74 65 70 28 0a 20 20  upConcatStep(.  
9be0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
9bf0: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
9c00: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
9c10: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
9c20: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56    const char *zV
9c30: 61 6c 3b 0a 20 20 53 74 72 41 63 63 75 6d 20 2a  al;.  StrAccum *
9c40: 70 41 63 63 75 6d 3b 0a 20 20 63 6f 6e 73 74 20  pAccum;.  const 
9c50: 63 68 61 72 20 2a 7a 53 65 70 3b 0a 20 20 69 6e  char *zSep;.  in
9c60: 74 20 6e 56 61 6c 2c 20 6e 53 65 70 3b 0a 20 20  t nVal, nSep;.  
9c70: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
9c80: 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20  || argc==2 );.  
9c90: 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  if( sqlite3_valu
9ca0: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d  e_type(argv[0])=
9cb0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72  =SQLITE_NULL ) r
9cc0: 65 74 75 72 6e 3b 0a 20 20 70 41 63 63 75 6d 20  eturn;.  pAccum 
9cd0: 3d 20 28 53 74 72 41 63 63 75 6d 2a 29 73 71 6c  = (StrAccum*)sql
9ce0: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
9cf0: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
9d00: 73 69 7a 65 6f 66 28 2a 70 41 63 63 75 6d 29 29  sizeof(*pAccum))
9d10: 3b 0a 0a 20 20 69 66 28 20 70 41 63 63 75 6d 20  ;..  if( pAccum 
9d20: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 20 2a  ){.    sqlite3 *
9d30: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
9d40: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
9d50: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 69 6e 74  ontext);.    int
9d60: 20 66 69 72 73 74 54 65 72 6d 20 3d 20 70 41 63   firstTerm = pAc
9d70: 63 75 6d 2d 3e 75 73 65 4d 61 6c 6c 6f 63 3d 3d  cum->useMalloc==
9d80: 30 3b 0a 20 20 20 20 70 41 63 63 75 6d 2d 3e 75  0;.    pAccum->u
9d90: 73 65 4d 61 6c 6c 6f 63 20 3d 20 31 3b 0a 20 20  seMalloc = 1;.  
9da0: 20 20 70 41 63 63 75 6d 2d 3e 6d 78 41 6c 6c 6f    pAccum->mxAllo
9db0: 63 20 3d 20 64 62 2d 3e 61 4c 69 6d 69 74 5b 53  c = db->aLimit[S
9dc0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47  QLITE_LIMIT_LENG
9dd0: 54 48 5d 3b 0a 20 20 20 20 69 66 28 20 21 66 69  TH];.    if( !fi
9de0: 72 73 74 54 65 72 6d 20 29 7b 0a 20 20 20 20 20  rstTerm ){.     
9df0: 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a   if( argc==2 ){.
9e00: 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d 20 28          zSep = (
9e10: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
9e20: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d  lue_text(argv[1]
9e30: 29 3b 0a 20 20 20 20 20 20 20 20 6e 53 65 70 20  );.        nSep 
9e40: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
9e50: 62 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b 0a  bytes(argv[1]);.
9e60: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20        }else{.   
9e70: 20 20 20 20 20 7a 53 65 70 20 3d 20 22 2c 22 3b       zSep = ",";
9e80: 0a 20 20 20 20 20 20 20 20 6e 53 65 70 20 3d 20  .        nSep = 
9e90: 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  1;.      }.     
9ea0: 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d   sqlite3StrAccum
9eb0: 41 70 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a  Append(pAccum, z
9ec0: 53 65 70 2c 20 6e 53 65 70 29 3b 0a 20 20 20 20  Sep, nSep);.    
9ed0: 7d 0a 20 20 20 20 7a 56 61 6c 20 3d 20 28 63 68  }.    zVal = (ch
9ee0: 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  ar*)sqlite3_valu
9ef0: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
9f00: 0a 20 20 20 20 6e 56 61 6c 20 3d 20 73 71 6c 69  .    nVal = sqli
9f10: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
9f20: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 73 71  argv[0]);.    sq
9f30: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70  lite3StrAccumApp
9f40: 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 56 61 6c  end(pAccum, zVal
9f50: 2c 20 6e 56 61 6c 29 3b 0a 20 20 7d 0a 7d 0a 73  , nVal);.  }.}.s
9f60: 74 61 74 69 63 20 76 6f 69 64 20 67 72 6f 75 70  tatic void group
9f70: 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 28 73  ConcatFinalize(s
9f80: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
9f90: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 74 72 41  context){.  StrA
9fa0: 63 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20  ccum *pAccum;.  
9fb0: 70 41 63 63 75 6d 20 3d 20 73 71 6c 69 74 65 33  pAccum = sqlite3
9fc0: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
9fd0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a  xt(context, 0);.
9fe0: 20 20 69 66 28 20 70 41 63 63 75 6d 20 29 7b 0a    if( pAccum ){.
9ff0: 20 20 20 20 69 66 28 20 70 41 63 63 75 6d 2d 3e      if( pAccum->
a000: 74 6f 6f 42 69 67 20 29 7b 0a 20 20 20 20 20 20  tooBig ){.      
a010: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
a020: 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74  rror_toobig(cont
a030: 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20  ext);.    }else 
a040: 69 66 28 20 70 41 63 63 75 6d 2d 3e 6d 61 6c 6c  if( pAccum->mall
a050: 6f 63 46 61 69 6c 65 64 20 29 7b 0a 20 20 20 20  ocFailed ){.    
a060: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
a070: 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e  _error_nomem(con
a080: 74 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c 73 65  text);.    }else
a090: 7b 20 20 20 20 0a 20 20 20 20 20 20 73 71 6c 69  {    .      sqli
a0a0: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
a0b0: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
a0c0: 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 70  StrAccumFinish(p
a0d0: 41 63 63 75 6d 29 2c 20 2d 31 2c 20 0a 20 20 20  Accum), -1, .   
a0e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a0f0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66         sqlite3_f
a100: 72 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  ree);.    }.  }.
a110: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 66 75  }../*.** This fu
a120: 6e 63 74 69 6f 6e 20 72 65 67 69 73 74 65 72 65  nction registere
a130: 64 20 61 6c 6c 20 6f 66 20 74 68 65 20 61 62 6f  d all of the abo
a140: 76 65 20 43 20 66 75 6e 63 74 69 6f 6e 73 20 61  ve C functions a
a150: 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69 6f  s SQL.** functio
a160: 6e 73 2e 20 20 54 68 69 73 20 73 68 6f 75 6c 64  ns.  This should
a170: 20 62 65 20 74 68 65 20 6f 6e 6c 79 20 72 6f 75   be the only rou
a180: 74 69 6e 65 20 69 6e 20 74 68 69 73 20 66 69 6c  tine in this fil
a190: 65 20 77 69 74 68 0a 2a 2a 20 65 78 74 65 72 6e  e with.** extern
a1a0: 61 6c 20 6c 69 6e 6b 61 67 65 2e 0a 2a 2f 0a 76  al linkage..*/.v
a1b0: 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67 69 73  oid sqlite3Regis
a1c0: 74 65 72 42 75 69 6c 74 69 6e 46 75 6e 63 74 69  terBuiltinFuncti
a1d0: 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a 64 62 29  ons(sqlite3 *db)
a1e0: 7b 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  {.#ifndef SQLITE
a1f0: 5f 4f 4d 49 54 5f 41 4c 54 45 52 54 41 42 4c 45  _OMIT_ALTERTABLE
a200: 0a 20 20 73 71 6c 69 74 65 33 41 6c 74 65 72 46  .  sqlite3AlterF
a210: 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a 23 65  unctions(db);.#e
a220: 6e 64 69 66 0a 20 20 69 66 28 20 21 64 62 2d 3e  ndif.  if( !db->
a230: 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 29 7b 0a  mallocFailed ){.
a240: 20 20 20 20 69 6e 74 20 72 63 20 3d 20 73 71 6c      int rc = sql
a250: 69 74 65 33 5f 6f 76 65 72 6c 6f 61 64 5f 66 75  ite3_overload_fu
a260: 6e 63 74 69 6f 6e 28 64 62 2c 20 22 4d 41 54 43  nction(db, "MATC
a270: 48 22 2c 20 32 29 3b 0a 20 20 20 20 61 73 73 65  H", 2);.    asse
a280: 72 74 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e  rt( rc==SQLITE_N
a290: 4f 4d 45 4d 20 7c 7c 20 72 63 3d 3d 53 51 4c 49  OMEM || rc==SQLI
a2a0: 54 45 5f 4f 4b 20 29 3b 0a 20 20 20 20 69 66 28  TE_OK );.    if(
a2b0: 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f 4d 45   rc==SQLITE_NOME
a2c0: 4d 20 29 7b 0a 20 20 20 20 20 20 64 62 2d 3e 6d  M ){.      db->m
a2d0: 61 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b  allocFailed = 1;
a2e0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
a2f0: 0a 2a 2a 20 53 65 74 20 74 68 65 20 4c 49 4b 45  .** Set the LIKE
a300: 4f 50 54 20 66 6c 61 67 20 6f 6e 20 74 68 65 20  OPT flag on the 
a310: 32 2d 61 72 67 75 6d 65 6e 74 20 66 75 6e 63 74  2-argument funct
a320: 69 6f 6e 20 77 69 74 68 20 74 68 65 20 67 69 76  ion with the giv
a330: 65 6e 20 6e 61 6d 65 2e 0a 2a 2f 0a 73 74 61 74  en name..*/.stat
a340: 69 63 20 76 6f 69 64 20 73 65 74 4c 69 6b 65 4f  ic void setLikeO
a350: 70 74 46 6c 61 67 28 73 71 6c 69 74 65 33 20 2a  ptFlag(sqlite3 *
a360: 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  db, const char *
a370: 7a 4e 61 6d 65 2c 20 75 38 20 66 6c 61 67 56 61  zName, u8 flagVa
a380: 6c 29 7b 0a 20 20 46 75 6e 63 44 65 66 20 2a 70  l){.  FuncDef *p
a390: 44 65 66 3b 0a 20 20 70 44 65 66 20 3d 20 73 71  Def;.  pDef = sq
a3a0: 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69 6f  lite3FindFunctio
a3b0: 6e 28 64 62 2c 20 7a 4e 61 6d 65 2c 20 73 71 6c  n(db, zName, sql
a3c0: 69 74 65 33 53 74 72 6c 65 6e 33 30 28 7a 4e 61  ite3Strlen30(zNa
a3d0: 6d 65 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20  me),.           
a3e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a3f0: 20 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38    2, SQLITE_UTF8
a400: 2c 20 30 29 3b 0a 20 20 69 66 28 20 41 4c 57 41  , 0);.  if( ALWA
a410: 59 53 28 70 44 65 66 29 20 29 7b 0a 20 20 20 20  YS(pDef) ){.    
a420: 70 44 65 66 2d 3e 66 6c 61 67 73 20 3d 20 66 6c  pDef->flags = fl
a430: 61 67 56 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a  agVal;.  }.}../*
a440: 0a 2a 2a 20 52 65 67 69 73 74 65 72 20 74 68 65  .** Register the
a450: 20 62 75 69 6c 74 2d 69 6e 20 4c 49 4b 45 20 61   built-in LIKE a
a460: 6e 64 20 47 4c 4f 42 20 66 75 6e 63 74 69 6f 6e  nd GLOB function
a470: 73 2e 20 20 54 68 65 20 63 61 73 65 53 65 6e 73  s.  The caseSens
a480: 69 74 69 76 65 0a 2a 2a 20 70 61 72 61 6d 65 74  itive.** paramet
a490: 65 72 20 64 65 74 65 72 6d 69 6e 65 73 20 77 68  er determines wh
a4a0: 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 65  ether or not the
a4b0: 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 69   LIKE operator i
a4c0: 73 20 63 61 73 65 0a 2a 2a 20 73 65 6e 73 69 74  s case.** sensit
a4d0: 69 76 65 2e 20 20 47 4c 4f 42 20 69 73 20 61 6c  ive.  GLOB is al
a4e0: 77 61 79 73 20 63 61 73 65 20 73 65 6e 73 69 74  ways case sensit
a4f0: 69 76 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c  ive..*/.void sql
a500: 69 74 65 33 52 65 67 69 73 74 65 72 4c 69 6b 65  ite3RegisterLike
a510: 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65  Functions(sqlite
a520: 33 20 2a 64 62 2c 20 69 6e 74 20 63 61 73 65 53  3 *db, int caseS
a530: 65 6e 73 69 74 69 76 65 29 7b 0a 20 20 73 74 72  ensitive){.  str
a540: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
a550: 2a 70 49 6e 66 6f 3b 0a 20 20 69 66 28 20 63 61  *pInfo;.  if( ca
a560: 73 65 53 65 6e 73 69 74 69 76 65 20 29 7b 0a 20  seSensitive ){. 
a570: 20 20 20 70 49 6e 66 6f 20 3d 20 28 73 74 72 75     pInfo = (stru
a580: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29  ct compareInfo*)
a590: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 3b 0a 20 20  &likeInfoAlt;.  
a5a0: 7d 65 6c 73 65 7b 0a 20 20 20 20 70 49 6e 66 6f  }else{.    pInfo
a5b0: 20 3d 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61   = (struct compa
a5c0: 72 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66  reInfo*)&likeInf
a5d0: 6f 4e 6f 72 6d 3b 0a 20 20 7d 0a 20 20 73 71 6c  oNorm;.  }.  sql
a5e0: 69 74 65 33 43 72 65 61 74 65 46 75 6e 63 28 64  ite3CreateFunc(d
a5f0: 62 2c 20 22 6c 69 6b 65 22 2c 20 32 2c 20 53 51  b, "like", 2, SQ
a600: 4c 49 54 45 5f 41 4e 59 2c 20 70 49 6e 66 6f 2c  LITE_ANY, pInfo,
a610: 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30 29   likeFunc, 0, 0)
a620: 3b 0a 20 20 73 71 6c 69 74 65 33 43 72 65 61 74  ;.  sqlite3Creat
a630: 65 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b 65 22  eFunc(db, "like"
a640: 2c 20 33 2c 20 53 51 4c 49 54 45 5f 41 4e 59 2c  , 3, SQLITE_ANY,
a650: 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e 63   pInfo, likeFunc
a660: 2c 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74  , 0, 0);.  sqlit
a670: 65 33 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c  e3CreateFunc(db,
a680: 20 22 67 6c 6f 62 22 2c 20 32 2c 20 53 51 4c 49   "glob", 2, SQLI
a690: 54 45 5f 41 4e 59 2c 20 0a 20 20 20 20 20 20 28  TE_ANY, .      (
a6a0: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
a6b0: 66 6f 2a 29 26 67 6c 6f 62 49 6e 66 6f 2c 20 6c  fo*)&globInfo, l
a6c0: 69 6b 65 46 75 6e 63 2c 20 30 2c 30 29 3b 0a 20  ikeFunc, 0,0);. 
a6d0: 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28   setLikeOptFlag(
a6e0: 64 62 2c 20 22 67 6c 6f 62 22 2c 20 53 51 4c 49  db, "glob", SQLI
a6f0: 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53  TE_FUNC_LIKE | S
a700: 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29  QLITE_FUNC_CASE)
a710: 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c  ;.  setLikeOptFl
a720: 61 67 28 64 62 2c 20 22 6c 69 6b 65 22 2c 20 0a  ag(db, "like", .
a730: 20 20 20 20 20 20 63 61 73 65 53 65 6e 73 69 74        caseSensit
a740: 69 76 65 20 3f 20 28 53 51 4c 49 54 45 5f 46 55  ive ? (SQLITE_FU
a750: 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49 54 45  NC_LIKE | SQLITE
a760: 5f 46 55 4e 43 5f 43 41 53 45 29 20 3a 20 53 51  _FUNC_CASE) : SQ
a770: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 3b  LITE_FUNC_LIKE);
a780: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 70 45 78 70 72 20  .}../*.** pExpr 
a790: 70 6f 69 6e 74 73 20 74 6f 20 61 6e 20 65 78 70  points to an exp
a7a0: 72 65 73 73 69 6f 6e 20 77 68 69 63 68 20 69 6d  ression which im
a7b0: 70 6c 65 6d 65 6e 74 73 20 61 20 66 75 6e 63 74  plements a funct
a7c0: 69 6f 6e 2e 20 20 49 66 0a 2a 2a 20 69 74 20 69  ion.  If.** it i
a7d0: 73 20 61 70 70 72 6f 70 72 69 61 74 65 20 74 6f  s appropriate to
a7e0: 20 61 70 70 6c 79 20 74 68 65 20 4c 49 4b 45 20   apply the LIKE 
a7f0: 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 20 74 6f 20  optimization to 
a800: 74 68 61 74 20 66 75 6e 63 74 69 6f 6e 0a 2a 2a  that function.**
a810: 20 74 68 65 6e 20 73 65 74 20 61 57 63 5b 30 5d   then set aWc[0]
a820: 20 74 68 72 6f 75 67 68 20 61 57 63 5b 32 5d 20   through aWc[2] 
a830: 74 6f 20 74 68 65 20 77 69 6c 64 63 61 72 64 20  to the wildcard 
a840: 63 68 61 72 61 63 74 65 72 73 20 61 6e 64 0a 2a  characters and.*
a850: 2a 20 72 65 74 75 72 6e 20 54 52 55 45 2e 20 20  * return TRUE.  
a860: 49 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20  If the function 
a870: 69 73 20 6e 6f 74 20 61 20 4c 49 4b 45 2d 73 74  is not a LIKE-st
a880: 79 6c 65 20 66 75 6e 63 74 69 6f 6e 20 74 68 65  yle function the
a890: 6e 0a 2a 2a 20 72 65 74 75 72 6e 20 46 41 4c 53  n.** return FALS
a8a0: 45 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  E..*/.int sqlite
a8b0: 33 49 73 4c 69 6b 65 46 75 6e 63 74 69 6f 6e 28  3IsLikeFunction(
a8c0: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 45 78 70  sqlite3 *db, Exp
a8d0: 72 20 2a 70 45 78 70 72 2c 20 69 6e 74 20 2a 70  r *pExpr, int *p
a8e0: 49 73 4e 6f 63 61 73 65 2c 20 63 68 61 72 20 2a  IsNocase, char *
a8f0: 61 57 63 29 7b 0a 20 20 46 75 6e 63 44 65 66 20  aWc){.  FuncDef 
a900: 2a 70 44 65 66 3b 0a 20 20 69 66 28 20 70 45 78  *pDef;.  if( pEx
a910: 70 72 2d 3e 6f 70 21 3d 54 4b 5f 46 55 4e 43 54  pr->op!=TK_FUNCT
a920: 49 4f 4e 20 0a 20 20 20 7c 7c 20 21 70 45 78 70  ION .   || !pExp
a930: 72 2d 3e 78 2e 70 4c 69 73 74 20 0a 20 20 20 7c  r->x.pList .   |
a940: 7c 20 70 45 78 70 72 2d 3e 78 2e 70 4c 69 73 74  | pExpr->x.pList
a950: 2d 3e 6e 45 78 70 72 21 3d 32 0a 20 20 29 7b 0a  ->nExpr!=2.  ){.
a960: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20      return 0;.  
a970: 7d 0a 20 20 61 73 73 65 72 74 28 20 21 45 78 70  }.  assert( !Exp
a980: 72 48 61 73 50 72 6f 70 65 72 74 79 28 70 45 78  rHasProperty(pEx
a990: 70 72 2c 20 45 50 5f 78 49 73 53 65 6c 65 63 74  pr, EP_xIsSelect
a9a0: 29 20 29 3b 0a 20 20 70 44 65 66 20 3d 20 73 71  ) );.  pDef = sq
a9b0: 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69 6f  lite3FindFunctio
a9c0: 6e 28 64 62 2c 20 70 45 78 70 72 2d 3e 75 2e 7a  n(db, pExpr->u.z
a9d0: 54 6f 6b 65 6e 2c 20 0a 20 20 20 20 20 20 20 20  Token, .        
a9e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a9f0: 20 20 20 20 20 73 71 6c 69 74 65 33 53 74 72 6c       sqlite3Strl
aa00: 65 6e 33 30 28 70 45 78 70 72 2d 3e 75 2e 7a 54  en30(pExpr->u.zT
aa10: 6f 6b 65 6e 29 2c 0a 20 20 20 20 20 20 20 20 20  oken),.         
aa20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
aa30: 20 20 20 20 32 2c 20 53 51 4c 49 54 45 5f 55 54      2, SQLITE_UT
aa40: 46 38 2c 20 30 29 3b 0a 20 20 69 66 28 20 4e 45  F8, 0);.  if( NE
aa50: 56 45 52 28 70 44 65 66 3d 3d 30 29 20 7c 7c 20  VER(pDef==0) || 
aa60: 28 70 44 65 66 2d 3e 66 6c 61 67 73 20 26 20 53  (pDef->flags & S
aa70: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29  QLITE_FUNC_LIKE)
aa80: 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  ==0 ){.    retur
aa90: 6e 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54  n 0;.  }..  /* T
aaa0: 68 65 20 6d 65 6d 63 70 79 28 29 20 73 74 61 74  he memcpy() stat
aab0: 65 6d 65 6e 74 20 61 73 73 75 6d 65 73 20 74 68  ement assumes th
aac0: 61 74 20 74 68 65 20 77 69 6c 64 63 61 72 64 20  at the wildcard 
aad0: 63 68 61 72 61 63 74 65 72 73 20 61 72 65 0a 20  characters are. 
aae0: 20 2a 2a 20 74 68 65 20 66 69 72 73 74 20 74 68   ** the first th
aaf0: 72 65 65 20 73 74 61 74 65 6d 65 6e 74 73 20 69  ree statements i
ab00: 6e 20 74 68 65 20 63 6f 6d 70 61 72 65 49 6e 66  n the compareInf
ab10: 6f 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68  o structure.  Th
ab20: 65 0a 20 20 2a 2a 20 61 73 73 65 72 74 73 28 29  e.  ** asserts()
ab30: 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 76 65 72   that follow ver
ab40: 69 66 79 20 74 68 61 74 20 61 73 73 75 6d 70 74  ify that assumpt
ab50: 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6d 65 6d 63 70  ion.  */.  memcp
ab60: 79 28 61 57 63 2c 20 70 44 65 66 2d 3e 70 55 73  y(aWc, pDef->pUs
ab70: 65 72 44 61 74 61 2c 20 33 29 3b 0a 20 20 61 73  erData, 3);.  as
ab80: 73 65 72 74 28 20 28 63 68 61 72 2a 29 26 6c 69  sert( (char*)&li
ab90: 6b 65 49 6e 66 6f 41 6c 74 20 3d 3d 20 28 63 68  keInfoAlt == (ch
aba0: 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74  ar*)&likeInfoAlt
abb0: 2e 6d 61 74 63 68 41 6c 6c 20 29 3b 0a 20 20 61  .matchAll );.  a
abc0: 73 73 65 72 74 28 20 26 28 28 63 68 61 72 2a 29  ssert( &((char*)
abd0: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 31 5d  &likeInfoAlt)[1]
abe0: 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65   == (char*)&like
abf0: 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 4f 6e 65  InfoAlt.matchOne
ac00: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28   );.  assert( &(
ac10: 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f  (char*)&likeInfo
ac20: 41 6c 74 29 5b 32 5d 20 3d 3d 20 28 63 68 61 72  Alt)[2] == (char
ac30: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d  *)&likeInfoAlt.m
ac40: 61 74 63 68 53 65 74 20 29 3b 0a 20 20 2a 70 49  atchSet );.  *pI
ac50: 73 4e 6f 63 61 73 65 20 3d 20 28 70 44 65 66 2d  sNocase = (pDef-
ac60: 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f  >flags & SQLITE_
ac70: 46 55 4e 43 5f 43 41 53 45 29 3d 3d 30 3b 0a 20  FUNC_CASE)==0;. 
ac80: 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a   return 1;.}../*
ac90: 0a 2a 2a 20 41 6c 6c 20 61 6c 6c 20 6f 66 20 74  .** All all of t
aca0: 68 65 20 46 75 6e 63 44 65 66 20 73 74 72 75 63  he FuncDef struc
acb0: 74 75 72 65 73 20 69 6e 20 74 68 65 20 61 42 75  tures in the aBu
acc0: 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 61 72 72 61  iltinFunc[] arra
acd0: 79 20 61 62 6f 76 65 0a 2a 2a 20 74 6f 20 74 68  y above.** to th
ace0: 65 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f  e global functio
acf0: 6e 20 68 61 73 68 20 74 61 62 6c 65 2e 20 20 54  n hash table.  T
ad00: 68 69 73 20 6f 63 63 75 72 73 20 61 74 20 73 74  his occurs at st
ad10: 61 72 74 2d 74 69 6d 65 20 28 61 73 0a 2a 2a 20  art-time (as.** 
ad20: 61 20 63 6f 6e 73 65 71 75 65 6e 63 65 20 6f 66  a consequence of
ad30: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33   calling sqlite3
ad40: 5f 69 6e 69 74 69 61 6c 69 7a 65 28 29 29 2e 0a  _initialize())..
ad50: 2a 2a 0a 2a 2a 20 41 66 74 65 72 20 74 68 69 73  **.** After this
ad60: 20 72 6f 75 74 69 6e 65 20 72 75 6e 73 0a 2a 2f   routine runs.*/
ad70: 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67  .void sqlite3Reg
ad80: 69 73 74 65 72 47 6c 6f 62 61 6c 46 75 6e 63 74  isterGlobalFunct
ad90: 69 6f 6e 73 28 76 6f 69 64 29 7b 0a 20 20 2f 2a  ions(void){.  /*
ada0: 0a 20 20 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77  .  ** The follow
adb0: 69 6e 67 20 61 72 72 61 79 20 68 6f 6c 64 73 20  ing array holds 
adc0: 46 75 6e 63 44 65 66 20 73 74 72 75 63 74 75 72  FuncDef structur
add0: 65 73 20 66 6f 72 20 61 6c 6c 20 6f 66 20 74 68  es for all of th
ade0: 65 20 66 75 6e 63 74 69 6f 6e 73 0a 20 20 2a 2a  e functions.  **
adf0: 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68 69 73   defined in this
ae00: 20 66 69 6c 65 2e 0a 20 20 2a 2a 0a 20 20 2a 2a   file..  **.  **
ae10: 20 54 68 65 20 61 72 72 61 79 20 63 61 6e 6e 6f   The array canno
ae20: 74 20 62 65 20 63 6f 6e 73 74 61 6e 74 20 73 69  t be constant si
ae30: 6e 63 65 20 63 68 61 6e 67 65 73 20 61 72 65 20  nce changes are 
ae40: 6d 61 64 65 20 74 6f 20 74 68 65 0a 20 20 2a 2a  made to the.  **
ae50: 20 46 75 6e 63 44 65 66 2e 70 48 61 73 68 20 65   FuncDef.pHash e
ae60: 6c 65 6d 65 6e 74 73 20 61 74 20 73 74 61 72 74  lements at start
ae70: 2d 74 69 6d 65 2e 20 20 54 68 65 20 65 6c 65 6d  -time.  The elem
ae80: 65 6e 74 73 20 6f 66 20 74 68 69 73 20 61 72 72  ents of this arr
ae90: 61 79 0a 20 20 2a 2a 20 61 72 65 20 72 65 61 64  ay.  ** are read
aea0: 2d 6f 6e 6c 79 20 61 66 74 65 72 20 69 6e 69 74  -only after init
aeb0: 69 61 6c 69 7a 61 74 69 6f 6e 20 69 73 20 63 6f  ialization is co
aec0: 6d 70 6c 65 74 65 2e 0a 20 20 2a 2f 0a 20 20 73  mplete..  */.  s
aed0: 74 61 74 69 63 20 53 51 4c 49 54 45 5f 57 53 44  tatic SQLITE_WSD
aee0: 20 46 75 6e 63 44 65 66 20 61 42 75 69 6c 74 69   FuncDef aBuilti
aef0: 6e 46 75 6e 63 5b 5d 20 3d 20 7b 0a 20 20 20 20  nFunc[] = {.    
af00: 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20  FUNCTION(ltrim, 
af10: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
af20: 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20  1, 0, trimFunc  
af30: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
af40: 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20 20 20  NCTION(ltrim,   
af50: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 31 2c             2, 1,
af60: 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20   0, trimFunc    
af70: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
af80: 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20  TION(rtrim,     
af90: 20 20 20 20 20 20 20 20 20 31 2c 20 32 2c 20 30           1, 2, 0
afa0: 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20  , trimFunc      
afb0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
afc0: 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20 20 20  ON(rtrim,       
afd0: 20 20 20 20 20 20 20 32 2c 20 32 2c 20 30 2c 20         2, 2, 0, 
afe0: 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20  trimFunc        
aff0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
b000: 28 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20  (trim,          
b010: 20 20 20 20 20 31 2c 20 33 2c 20 30 2c 20 74 72       1, 3, 0, tr
b020: 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29  imFunc         )
b030: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74  ,.    FUNCTION(t
b040: 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  rim,            
b050: 20 20 20 32 2c 20 33 2c 20 30 2c 20 74 72 69 6d     2, 3, 0, trim
b060: 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a  Func         ),.
b070: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e      FUNCTION(min
b080: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
b090: 2d 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78  -1, 0, 1, minmax
b0a0: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20  Func       ),.  
b0b0: 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c 20    FUNCTION(min, 
b0c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30                 0
b0d0: 2c 20 30 2c 20 31 2c 20 30 20 20 20 20 20 20 20  , 0, 1, 0       
b0e0: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20           ),.    
b0f0: 41 47 47 52 45 47 41 54 45 28 6d 69 6e 2c 20 20  AGGREGATE(min,  
b100: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
b110: 30 2c 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70  0, 1, minmaxStep
b120: 2c 20 20 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e  ,      minMaxFin
b130: 61 6c 69 7a 65 20 29 2c 0a 20 20 20 20 46 55 4e  alize ),.    FUN
b140: 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20  CTION(max,      
b150: 20 20 20 20 20 20 20 20 20 2d 31 2c 20 31 2c 20           -1, 1, 
b160: 31 2c 20 6d 69 6e 6d 61 78 46 75 6e 63 20 20 20  1, minmaxFunc   
b170: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
b180: 49 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20 20 20  ION(max,        
b190: 20 20 20 20 20 20 20 20 30 2c 20 31 2c 20 31 2c          0, 1, 1,
b1a0: 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20   0              
b1b0: 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41    ),.    AGGREGA
b1c0: 54 45 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20  TE(max,         
b1d0: 20 20 20 20 20 20 31 2c 20 31 2c 20 31 2c 20 6d        1, 1, 1, m
b1e0: 69 6e 6d 61 78 53 74 65 70 2c 20 20 20 20 20 20  inmaxStep,      
b1f0: 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 20 29  minMaxFinalize )
b200: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74  ,.    FUNCTION(t
b210: 79 70 65 6f 66 2c 20 20 20 20 20 20 20 20 20 20  ypeof,          
b220: 20 20 20 31 2c 20 30 2c 20 30 2c 20 74 79 70 65     1, 0, 0, type
b230: 6f 66 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  ofFunc       ),.
b240: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 65 6e      FUNCTION(len
b250: 67 74 68 2c 20 20 20 20 20 20 20 20 20 20 20 20  gth,            
b260: 20 31 2c 20 30 2c 20 30 2c 20 6c 65 6e 67 74 68   1, 0, 0, length
b270: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20  Func       ),.  
b280: 20 20 46 55 4e 43 54 49 4f 4e 28 73 75 62 73 74    FUNCTION(subst
b290: 72 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 32  r,             2
b2a0: 2c 20 30 2c 20 30 2c 20 73 75 62 73 74 72 46 75  , 0, 0, substrFu
b2b0: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
b2c0: 46 55 4e 43 54 49 4f 4e 28 73 75 62 73 74 72 2c  FUNCTION(substr,
b2d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 33 2c 20               3, 
b2e0: 30 2c 20 30 2c 20 73 75 62 73 74 72 46 75 6e 63  0, 0, substrFunc
b2f0: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
b300: 4e 43 54 49 4f 4e 28 61 62 73 2c 20 20 20 20 20  NCTION(abs,     
b310: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
b320: 20 30 2c 20 61 62 73 46 75 6e 63 20 20 20 20 20   0, absFunc     
b330: 20 20 20 20 20 29 2c 0a 23 69 66 6e 64 65 66 20       ),.#ifndef 
b340: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41  SQLITE_OMIT_FLOA
b350: 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20 46  TING_POINT.    F
b360: 55 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20  UNCTION(round,  
b370: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
b380: 2c 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20  , 0, roundFunc  
b390: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
b3a0: 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20 20  CTION(round,    
b3b0: 20 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20            2, 0, 
b3c0: 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20 20  0, roundFunc    
b3d0: 20 20 20 20 29 2c 0a 23 65 6e 64 69 66 0a 20 20      ),.#endif.  
b3e0: 20 20 46 55 4e 43 54 49 4f 4e 28 75 70 70 65 72    FUNCTION(upper
b3f0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  ,              1
b400: 2c 20 30 2c 20 30 2c 20 75 70 70 65 72 46 75 6e  , 0, 0, upperFun
b410: 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  c        ),.    
b420: 46 55 4e 43 54 49 4f 4e 28 6c 6f 77 65 72 2c 20  FUNCTION(lower, 
b430: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
b440: 30 2c 20 30 2c 20 6c 6f 77 65 72 46 75 6e 63 20  0, 0, lowerFunc 
b450: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
b460: 4e 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c  NCTION(coalesce,
b470: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
b480: 20 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 20   0, 0           
b490: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
b4a0: 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20  TION(coalesce,  
b4b0: 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30           0, 0, 0
b4c0: 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20  , 0             
b4d0: 20 20 20 29 2c 0a 2f 2a 20 20 46 55 4e 43 54 49     ),./*  FUNCTI
b4e0: 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20 20 20  ON(coalesce,    
b4f0: 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c 20        -1, 0, 0, 
b500: 69 66 6e 75 6c 6c 46 75 6e 63 20 20 20 20 20 20  ifnullFunc      
b510: 20 29 2c 20 2a 2f 0a 20 20 20 20 7b 2d 31 2c 53   ), */.    {-1,S
b520: 51 4c 49 54 45 5f 55 54 46 38 2c 53 51 4c 49 54  QLITE_UTF8,SQLIT
b530: 45 5f 46 55 4e 43 5f 43 4f 41 4c 45 53 43 45 2c  E_FUNC_COALESCE,
b540: 30 2c 30 2c 69 66 6e 75 6c 6c 46 75 6e 63 2c 30  0,0,ifnullFunc,0
b550: 2c 30 2c 22 63 6f 61 6c 65 73 63 65 22 2c 30 7d  ,0,"coalesce",0}
b560: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 68  ,.    FUNCTION(h
b570: 65 78 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  ex,             
b580: 20 20 20 31 2c 20 30 2c 20 30 2c 20 68 65 78 46     1, 0, 0, hexF
b590: 75 6e 63 20 20 20 20 20 20 20 20 20 20 29 2c 0a  unc          ),.
b5a0: 2f 2a 20 20 46 55 4e 43 54 49 4f 4e 28 69 66 6e  /*  FUNCTION(ifn
b5b0: 75 6c 6c 2c 20 20 20 20 20 20 20 20 20 20 20 20  ull,            
b5c0: 20 32 2c 20 30 2c 20 30 2c 20 69 66 6e 75 6c 6c   2, 0, 0, ifnull
b5d0: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 20 2a 2f  Func       ), */
b5e0: 0a 20 20 20 20 7b 32 2c 53 51 4c 49 54 45 5f 55  .    {2,SQLITE_U
b5f0: 54 46 38 2c 53 51 4c 49 54 45 5f 46 55 4e 43 5f  TF8,SQLITE_FUNC_
b600: 43 4f 41 4c 45 53 43 45 2c 30 2c 30 2c 69 66 6e  COALESCE,0,0,ifn
b610: 75 6c 6c 46 75 6e 63 2c 30 2c 30 2c 22 69 66 6e  ullFunc,0,0,"ifn
b620: 75 6c 6c 22 2c 30 7d 2c 0a 20 20 20 20 46 55 4e  ull",0},.    FUN
b630: 43 54 49 4f 4e 28 72 61 6e 64 6f 6d 2c 20 20 20  CTION(random,   
b640: 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20            0, 0, 
b650: 30 2c 20 72 61 6e 64 6f 6d 46 75 6e 63 20 20 20  0, randomFunc   
b660: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
b670: 49 4f 4e 28 72 61 6e 64 6f 6d 62 6c 6f 62 2c 20  ION(randomblob, 
b680: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c          1, 0, 0,
b690: 20 72 61 6e 64 6f 6d 42 6c 6f 62 20 20 20 20 20   randomBlob     
b6a0: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
b6b0: 4e 28 6e 75 6c 6c 69 66 2c 20 20 20 20 20 20 20  N(nullif,       
b6c0: 20 20 20 20 20 20 32 2c 20 30 2c 20 31 2c 20 6e        2, 0, 1, n
b6d0: 75 6c 6c 69 66 46 75 6e 63 20 20 20 20 20 20 20  ullifFunc       
b6e0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
b6f0: 73 71 6c 69 74 65 5f 76 65 72 73 69 6f 6e 2c 20  sqlite_version, 
b700: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 76 65 72      0, 0, 0, ver
b710: 73 69 6f 6e 46 75 6e 63 20 20 20 20 20 20 29 2c  sionFunc      ),
b720: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 71  .    FUNCTION(sq
b730: 6c 69 74 65 5f 73 6f 75 72 63 65 5f 69 64 2c 20  lite_source_id, 
b740: 20 20 30 2c 20 30 2c 20 30 2c 20 73 6f 75 72 63    0, 0, 0, sourc
b750: 65 69 64 46 75 6e 63 20 20 20 20 20 29 2c 0a 23  eidFunc     ),.#
b760: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
b770: 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e  IT_COMPILEOPTION
b780: 5f 44 49 41 47 53 0a 20 20 20 20 46 55 4e 43 54  _DIAGS.    FUNCT
b790: 49 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d 70 69  ION(sqlite_compi
b7a0: 6c 65 5f 6f 70 74 69 6f 6e 5f 75 73 65 64 2c 31  le_option_used,1
b7b0: 2c 20 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65 6f  , 0, 0, compileo
b7c0: 70 74 69 6f 6e 75 73 65 64 46 75 6e 63 20 20 29  ptionusedFunc  )
b7d0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73  ,.    FUNCTION(s
b7e0: 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 5f 6f 70  qlite_compile_op
b7f0: 74 69 6f 6e 5f 67 65 74 2c 20 31 2c 20 30 2c 20  tion_get, 1, 0, 
b800: 30 2c 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  0, compileoption
b810: 67 65 74 46 75 6e 63 20 20 29 2c 0a 23 65 6e 64  getFunc  ),.#end
b820: 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49  if /* SQLITE_OMI
b830: 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f  T_COMPILEOPTION_
b840: 44 49 41 47 53 20 2a 2f 0a 20 20 20 20 46 55 4e  DIAGS */.    FUN
b850: 43 54 49 4f 4e 28 71 75 6f 74 65 2c 20 20 20 20  CTION(quote,    
b860: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
b870: 30 2c 20 71 75 6f 74 65 46 75 6e 63 20 20 20 20  0, quoteFunc    
b880: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
b890: 49 4f 4e 28 6c 61 73 74 5f 69 6e 73 65 72 74 5f  ION(last_insert_
b8a0: 72 6f 77 69 64 2c 20 20 30 2c 20 30 2c 20 30 2c  rowid,  0, 0, 0,
b8b0: 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77   last_insert_row
b8c0: 69 64 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f  id),.    FUNCTIO
b8d0: 4e 28 63 68 61 6e 67 65 73 2c 20 20 20 20 20 20  N(changes,      
b8e0: 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 63        0, 0, 0, c
b8f0: 68 61 6e 67 65 73 20 20 20 20 20 20 20 20 20 20  hanges          
b900: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
b910: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 2c 20 20  total_changes,  
b920: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 74 6f 74      0, 0, 0, tot
b930: 61 6c 5f 63 68 61 6e 67 65 73 20 20 20 20 29 2c  al_changes    ),
b940: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 65  .    FUNCTION(re
b950: 70 6c 61 63 65 2c 20 20 20 20 20 20 20 20 20 20  place,          
b960: 20 20 33 2c 20 30 2c 20 30 2c 20 72 65 70 6c 61    3, 0, 0, repla
b970: 63 65 46 75 6e 63 20 20 20 20 20 20 29 2c 0a 20  ceFunc      ),. 
b980: 20 20 20 46 55 4e 43 54 49 4f 4e 28 7a 65 72 6f     FUNCTION(zero
b990: 62 6c 6f 62 2c 20 20 20 20 20 20 20 20 20 20 20  blob,           
b9a0: 31 2c 20 30 2c 20 30 2c 20 7a 65 72 6f 62 6c 6f  1, 0, 0, zeroblo
b9b0: 62 46 75 6e 63 20 20 20 20 20 29 2c 0a 20 20 23  bFunc     ),.  #
b9c0: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55  ifdef SQLITE_SOU
b9d0: 4e 44 45 58 0a 20 20 20 20 46 55 4e 43 54 49 4f  NDEX.    FUNCTIO
b9e0: 4e 28 73 6f 75 6e 64 65 78 2c 20 20 20 20 20 20  N(soundex,      
b9f0: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73        1, 0, 0, s
ba00: 6f 75 6e 64 65 78 46 75 6e 63 20 20 20 20 20 20  oundexFunc      
ba10: 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 23 69  ),.  #endif.  #i
ba20: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
ba30: 54 5f 4c 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e  T_LOAD_EXTENSION
ba40: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f  .    FUNCTION(lo
ba50: 61 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20  ad_extension,   
ba60: 20 20 31 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45    1, 0, 0, loadE
ba70: 78 74 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20  xt          ),. 
ba80: 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 61 64     FUNCTION(load
ba90: 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20 20  _extension,     
baa0: 32 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78 74  2, 0, 0, loadExt
bab0: 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 23            ),.  #
bac0: 65 6e 64 69 66 0a 20 20 20 20 41 47 47 52 45 47  endif.    AGGREG
bad0: 41 54 45 28 73 75 6d 2c 20 20 20 20 20 20 20 20  ATE(sum,        
bae0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
baf0: 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20 20  sumStep,        
bb00: 20 73 75 6d 46 69 6e 61 6c 69 7a 65 20 20 20 20   sumFinalize    
bb10: 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  ),.    AGGREGATE
bb20: 28 74 6f 74 61 6c 2c 20 20 20 20 20 20 20 20 20  (total,         
bb30: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d      1, 0, 0, sum
bb40: 53 74 65 70 2c 20 20 20 20 20 20 20 20 20 74 6f  Step,         to
bb50: 74 61 6c 46 69 6e 61 6c 69 7a 65 20 20 20 20 29  talFinalize    )
bb60: 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28  ,.    AGGREGATE(
bb70: 61 76 67 2c 20 20 20 20 20 20 20 20 20 20 20 20  avg,            
bb80: 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53     1, 0, 0, sumS
bb90: 74 65 70 2c 20 20 20 20 20 20 20 20 20 61 76 67  tep,         avg
bba0: 46 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c 0a 20  Finalize    ),. 
bbb0: 2f 2a 20 41 47 47 52 45 47 41 54 45 28 63 6f 75  /* AGGREGATE(cou
bbc0: 6e 74 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  nt,             
bbd0: 30 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74  0, 0, 0, countSt
bbe0: 65 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46  ep,       countF
bbf0: 69 6e 61 6c 69 7a 65 20 20 29 2c 20 2a 2f 0a 20  inalize  ), */. 
bc00: 20 20 20 7b 30 2c 53 51 4c 49 54 45 5f 55 54 46     {0,SQLITE_UTF
bc10: 38 2c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 4f  8,SQLITE_FUNC_CO
bc20: 55 4e 54 2c 30 2c 30 2c 30 2c 63 6f 75 6e 74 53  UNT,0,0,0,countS
bc30: 74 65 70 2c 63 6f 75 6e 74 46 69 6e 61 6c 69 7a  tep,countFinaliz
bc40: 65 2c 22 63 6f 75 6e 74 22 2c 30 7d 2c 0a 20 20  e,"count",0},.  
bc50: 20 20 41 47 47 52 45 47 41 54 45 28 63 6f 75 6e    AGGREGATE(coun
bc60: 74 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 31  t,             1
bc70: 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65  , 0, 0, countSte
bc80: 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46 69  p,       countFi
bc90: 6e 61 6c 69 7a 65 20 20 29 2c 0a 20 20 20 20 41  nalize  ),.    A
bca0: 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f 63  GGREGATE(group_c
bcb0: 6f 6e 63 61 74 2c 20 20 20 20 20 20 31 2c 20 30  oncat,      1, 0
bcc0: 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74  , 0, groupConcat
bcd0: 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63 61  Step, groupConca
bce0: 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 20 20  tFinalize),.    
bcf0: 41 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f  AGGREGATE(group_
bd00: 63 6f 6e 63 61 74 2c 20 20 20 20 20 20 32 2c 20  concat,      2, 
bd10: 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61  0, 0, groupConca
bd20: 74 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63  tStep, groupConc
bd30: 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 0a  atFinalize),.  .
bd40: 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 67 6c 6f      LIKEFUNC(glo
bd50: 62 2c 20 32 2c 20 26 67 6c 6f 62 49 6e 66 6f 2c  b, 2, &globInfo,
bd60: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b   SQLITE_FUNC_LIK
bd70: 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41  E|SQLITE_FUNC_CA
bd80: 53 45 29 2c 0a 20 20 23 69 66 64 65 66 20 53 51  SE),.  #ifdef SQ
bd90: 4c 49 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54  LITE_CASE_SENSIT
bda0: 49 56 45 5f 4c 49 4b 45 0a 20 20 20 20 4c 49 4b  IVE_LIKE.    LIK
bdb0: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26  EFUNC(like, 2, &
bdc0: 6c 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c  likeInfoAlt, SQL
bdd0: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51  ITE_FUNC_LIKE|SQ
bde0: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c  LITE_FUNC_CASE),
bdf0: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
be00: 6b 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 3, &likeInfo
be10: 41 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43  Alt, SQLITE_FUNC
be20: 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e  _LIKE|SQLITE_FUN
be30: 43 5f 43 41 53 45 29 2c 0a 20 20 23 65 6c 73 65  C_CASE),.  #else
be40: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
be50: 6b 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 2, &likeInfo
be60: 4e 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e  Norm, SQLITE_FUN
be70: 43 5f 4c 49 4b 45 29 2c 0a 20 20 20 20 4c 49 4b  C_LIKE),.    LIK
be80: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26  EFUNC(like, 3, &
be90: 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51  likeInfoNorm, SQ
bea0: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c  LITE_FUNC_LIKE),
beb0: 0a 20 20 23 65 6e 64 69 66 0a 20 20 7d 3b 0a 0a  .  #endif.  };..
bec0: 20 20 69 6e 74 20 69 3b 0a 20 20 46 75 6e 63 44    int i;.  FuncD
bed0: 65 66 48 61 73 68 20 2a 70 48 61 73 68 20 3d 20  efHash *pHash = 
bee0: 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66 48  &GLOBAL(FuncDefH
bef0: 61 73 68 2c 20 73 71 6c 69 74 65 33 47 6c 6f 62  ash, sqlite3Glob
bf00: 61 6c 46 75 6e 63 74 69 6f 6e 73 29 3b 0a 20 20  alFunctions);.  
bf10: 46 75 6e 63 44 65 66 20 2a 61 46 75 6e 63 20 3d  FuncDef *aFunc =
bf20: 20 28 46 75 6e 63 44 65 66 2a 29 26 47 4c 4f 42   (FuncDef*)&GLOB
bf30: 41 4c 28 46 75 6e 63 44 65 66 2c 20 61 42 75 69  AL(FuncDef, aBui
bf40: 6c 74 69 6e 46 75 6e 63 29 3b 0a 0a 20 20 66 6f  ltinFunc);..  fo
bf50: 72 28 69 3d 30 3b 20 69 3c 41 72 72 61 79 53 69  r(i=0; i<ArraySi
bf60: 7a 65 28 61 42 75 69 6c 74 69 6e 46 75 6e 63 29  ze(aBuiltinFunc)
bf70: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 73 71 6c 69  ; i++){.    sqli
bf80: 74 65 33 46 75 6e 63 44 65 66 49 6e 73 65 72 74  te3FuncDefInsert
bf90: 28 70 48 61 73 68 2c 20 26 61 46 75 6e 63 5b 69  (pHash, &aFunc[i
bfa0: 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  ]);.  }.  sqlite
bfb0: 33 52 65 67 69 73 74 65 72 44 61 74 65 54 69 6d  3RegisterDateTim
bfc0: 65 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 7d 0a  eFunctions();.}.