/ Hex Artifact Content
Login

Artifact cc68e721c25b9ad0d5c2d9e173298cfc1818fe4c:


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: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 53 55  #ifdef SQLITE_SU
15a0: 42 53 54 52 5f 43 4f 4d 50 41 54 49 42 49 4c 49  BSTR_COMPATIBILI
15b0: 54 59 0a 20 20 69 66 28 20 70 31 3d 3d 30 20 29  TY.  if( p1==0 )
15c0: 20 70 31 20 3d 20 31 3b 20 2f 2a 20 3c 72 64 61   p1 = 1; /* <rda
15d0: 72 3a 2f 2f 70 72 6f 62 6c 65 6d 2f 36 37 37 38  r://problem/6778
15e0: 33 33 39 3e 20 2a 2f 0a 23 65 6e 64 69 66 0a 20  339> */.#endif. 
15f0: 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a   if( argc==3 ){.
1600: 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74 65 33      p2 = sqlite3
1610: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
1620: 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 70 32 3c  2]);.    if( p2<
1630: 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20 3d 20  0 ){.      p2 = 
1640: 2d 70 32 3b 0a 20 20 20 20 20 20 6e 65 67 50 32  -p2;.      negP2
1650: 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65   = 1;.    }.  }e
1660: 6c 73 65 7b 0a 20 20 20 20 70 32 20 3d 20 73 71  lse{.    p2 = sq
1670: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62  lite3_context_db
1680: 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29  _handle(context)
1690: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
16a0: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a 20  LIMIT_LENGTH];. 
16b0: 20 7d 0a 20 20 69 66 28 20 70 31 3c 30 20 29 7b   }.  if( p1<0 ){
16c0: 0a 20 20 20 20 70 31 20 2b 3d 20 6c 65 6e 3b 0a  .    p1 += len;.
16d0: 20 20 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a      if( p1<0 ){.
16e0: 20 20 20 20 20 20 70 32 20 2b 3d 20 70 31 3b 0a        p2 += p1;.
16f0: 20 20 20 20 20 20 69 66 28 20 70 32 3c 30 20 29        if( p2<0 )
1700: 20 70 32 20 3d 20 30 3b 0a 20 20 20 20 20 20 70   p2 = 0;.      p
1710: 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d  1 = 0;.    }.  }
1720: 65 6c 73 65 20 69 66 28 20 70 31 3e 30 20 29 7b  else if( p1>0 ){
1730: 0a 20 20 20 20 70 31 2d 2d 3b 0a 20 20 7d 65 6c  .    p1--;.  }el
1740: 73 65 20 69 66 28 20 70 32 3e 30 20 29 7b 0a 20  se if( p2>0 ){. 
1750: 20 20 20 70 32 2d 2d 3b 0a 20 20 7d 0a 20 20 69     p2--;.  }.  i
1760: 66 28 20 6e 65 67 50 32 20 29 7b 0a 20 20 20 20  f( negP2 ){.    
1770: 70 31 20 2d 3d 20 70 32 3b 0a 20 20 20 20 69 66  p1 -= p2;.    if
1780: 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 20 20  ( p1<0 ){.      
1790: 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20 20 20  p2 += p1;.      
17a0: 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20  p1 = 0;.    }.  
17b0: 7d 0a 20 20 61 73 73 65 72 74 28 20 70 31 3e 3d  }.  assert( p1>=
17c0: 30 20 26 26 20 70 32 3e 3d 30 20 29 3b 0a 20 20  0 && p2>=0 );.  
17d0: 69 66 28 20 70 30 74 79 70 65 21 3d 53 51 4c 49  if( p0type!=SQLI
17e0: 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20 20 20 77  TE_BLOB ){.    w
17f0: 68 69 6c 65 28 20 2a 7a 20 26 26 20 70 31 20 29  hile( *z && p1 )
1800: 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53  {.      SQLITE_S
1810: 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20  KIP_UTF8(z);.   
1820: 20 20 20 70 31 2d 2d 3b 0a 20 20 20 20 7d 0a 20     p1--;.    }. 
1830: 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32     for(z2=z; *z2
1840: 20 26 26 20 70 32 3b 20 70 32 2d 2d 29 7b 0a 20   && p2; p2--){. 
1850: 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50       SQLITE_SKIP
1860: 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20 20 20 7d  _UTF8(z2);.    }
1870: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
1880: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
1890: 2c 20 28 63 68 61 72 2a 29 7a 2c 20 28 69 6e 74  , (char*)z, (int
18a0: 29 28 7a 32 2d 7a 29 2c 20 53 51 4c 49 54 45 5f  )(z2-z), SQLITE_
18b0: 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 65  TRANSIENT);.  }e
18c0: 6c 73 65 7b 0a 20 20 20 20 69 66 28 20 70 31 2b  lse{.    if( p1+
18d0: 70 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20 20 20  p2>len ){.      
18e0: 70 32 20 3d 20 6c 65 6e 2d 70 31 3b 0a 20 20 20  p2 = len-p1;.   
18f0: 20 20 20 69 66 28 20 70 32 3c 30 20 29 20 70 32     if( p2<0 ) p2
1900: 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 20 20   = 0;.    }.    
1910: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62  sqlite3_result_b
1920: 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 63 68  lob(context, (ch
1930: 61 72 2a 29 26 7a 5b 70 31 5d 2c 20 28 69 6e 74  ar*)&z[p1], (int
1940: 29 70 32 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e  )p2, SQLITE_TRAN
1950: 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f  SIENT);.  }.}../
1960: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
1970: 69 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75 6e 64  ion of the round
1980: 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 23  () function.*/.#
1990: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
19a0: 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e  IT_FLOATING_POIN
19b0: 54 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 6f  T.static void ro
19c0: 75 6e 64 46 75 6e 63 28 73 71 6c 69 74 65 33 5f  undFunc(sqlite3_
19d0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
19e0: 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69  , int argc, sqli
19f0: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
1a00: 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30 3b 0a  ){.  int n = 0;.
1a10: 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20 63 68    double r;.  ch
1a20: 61 72 20 2a 7a 42 75 66 3b 0a 20 20 61 73 73 65  ar *zBuf;.  asse
1a30: 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20 61  rt( argc==1 || a
1a40: 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20  rgc==2 );.  if( 
1a50: 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 69  argc==2 ){.    i
1a60: 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 3d 3d  f( SQLITE_NULL==
1a70: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
1a80: 70 65 28 61 72 67 76 5b 31 5d 29 20 29 20 72 65  pe(argv[1]) ) re
1a90: 74 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20 73 71  turn;.    n = sq
1aa0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28  lite3_value_int(
1ab0: 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 66  argv[1]);.    if
1ac0: 28 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33 30 3b  ( n>30 ) n = 30;
1ad0: 0a 20 20 20 20 69 66 28 20 6e 3c 30 20 29 20 6e  .    if( n<0 ) n
1ae0: 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20   = 0;.  }.  if( 
1af0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
1b00: 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c  pe(argv[0])==SQL
1b10: 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72  ITE_NULL ) retur
1b20: 6e 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74 65 33  n;.  r = sqlite3
1b30: 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72  _value_double(ar
1b40: 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 49 66 20  gv[0]);.  /* If 
1b50: 59 3d 3d 30 20 61 6e 64 20 58 20 77 69 6c 6c 20  Y==0 and X will 
1b60: 66 69 74 20 69 6e 20 61 20 36 34 2d 62 69 74 20  fit in a 64-bit 
1b70: 69 6e 74 2c 0a 20 20 2a 2a 20 68 61 6e 64 6c 65  int,.  ** handle
1b80: 20 74 68 65 20 72 6f 75 6e 64 69 6e 67 20 64 69   the rounding di
1b90: 72 65 63 74 6c 79 2c 0a 20 20 2a 2a 20 6f 74 68  rectly,.  ** oth
1ba0: 65 72 77 69 73 65 20 75 73 65 20 70 72 69 6e 74  erwise use print
1bb0: 66 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6e 3d  f..  */.  if( n=
1bc0: 3d 30 20 26 26 20 72 3e 3d 30 20 26 26 20 72 3c  =0 && r>=0 && r<
1bd0: 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2d 31 20  LARGEST_INT64-1 
1be0: 29 7b 0a 20 20 20 20 72 20 3d 20 28 64 6f 75 62  ){.    r = (doub
1bf0: 6c 65 29 28 28 73 71 6c 69 74 65 5f 69 6e 74 36  le)((sqlite_int6
1c00: 34 29 28 72 2b 30 2e 35 29 29 3b 0a 20 20 7d 65  4)(r+0.5));.  }e
1c10: 6c 73 65 20 69 66 28 20 6e 3d 3d 30 20 26 26 20  lse if( n==0 && 
1c20: 72 3c 30 20 26 26 20 28 2d 72 29 3c 4c 41 52 47  r<0 && (-r)<LARG
1c30: 45 53 54 5f 49 4e 54 36 34 2d 31 20 29 7b 0a 20  EST_INT64-1 ){. 
1c40: 20 20 20 72 20 3d 20 2d 28 64 6f 75 62 6c 65 29     r = -(double)
1c50: 28 28 73 71 6c 69 74 65 5f 69 6e 74 36 34 29 28  ((sqlite_int64)(
1c60: 28 2d 72 29 2b 30 2e 35 29 29 3b 0a 20 20 7d 65  (-r)+0.5));.  }e
1c70: 6c 73 65 7b 0a 20 20 20 20 7a 42 75 66 20 3d 20  lse{.    zBuf = 
1c80: 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28  sqlite3_mprintf(
1c90: 22 25 2e 2a 66 22 2c 6e 2c 72 29 3b 0a 20 20 20  "%.*f",n,r);.   
1ca0: 20 69 66 28 20 7a 42 75 66 3d 3d 30 20 29 7b 0a   if( zBuf==0 ){.
1cb0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
1cc0: 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d  sult_error_nomem
1cd0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20  (context);.     
1ce0: 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20   return;.    }. 
1cf0: 20 20 20 73 71 6c 69 74 65 33 41 74 6f 46 28 7a     sqlite3AtoF(z
1d00: 42 75 66 2c 20 26 72 29 3b 0a 20 20 20 20 73 71  Buf, &r);.    sq
1d10: 6c 69 74 65 33 5f 66 72 65 65 28 7a 42 75 66 29  lite3_free(zBuf)
1d20: 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  ;.  }.  sqlite3_
1d30: 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f  result_double(co
1d40: 6e 74 65 78 74 2c 20 72 29 3b 0a 7d 0a 23 65 6e  ntext, r);.}.#en
1d50: 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 6f 63  dif../*.** Alloc
1d60: 61 74 65 20 6e 42 79 74 65 20 62 79 74 65 73 20  ate nByte bytes 
1d70: 6f 66 20 73 70 61 63 65 20 75 73 69 6e 67 20 73  of space using s
1d80: 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 29 2e  qlite3_malloc().
1d90: 20 49 66 20 74 68 65 0a 2a 2a 20 61 6c 6c 6f 63   If the.** alloc
1da0: 61 74 69 6f 6e 20 66 61 69 6c 73 2c 20 63 61 6c  ation fails, cal
1db0: 6c 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74  l sqlite3_result
1dc0: 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 29 20 74  _error_nomem() t
1dd0: 6f 20 6e 6f 74 69 66 79 0a 2a 2a 20 74 68 65 20  o notify.** the 
1de0: 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65 20  database handle 
1df0: 74 68 61 74 20 6d 61 6c 6c 6f 63 28 29 20 68 61  that malloc() ha
1e00: 73 20 66 61 69 6c 65 64 20 61 6e 64 20 72 65 74  s failed and ret
1e10: 75 72 6e 20 4e 55 4c 4c 2e 0a 2a 2a 20 49 66 20  urn NULL..** If 
1e20: 6e 42 79 74 65 20 69 73 20 6c 61 72 67 65 72 20  nByte is larger 
1e30: 74 68 61 6e 20 74 68 65 20 6d 61 78 69 6d 75 6d  than the maximum
1e40: 20 73 74 72 69 6e 67 20 6f 72 20 62 6c 6f 62 20   string or blob 
1e50: 6c 65 6e 67 74 68 2c 20 74 68 65 6e 0a 2a 2a 20  length, then.** 
1e60: 72 61 69 73 65 20 61 6e 20 53 51 4c 49 54 45 5f  raise an SQLITE_
1e70: 54 4f 4f 42 49 47 20 65 78 63 65 70 74 69 6f 6e  TOOBIG exception
1e80: 20 61 6e 64 20 72 65 74 75 72 6e 20 4e 55 4c 4c   and return NULL
1e90: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
1ea0: 20 2a 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28   *contextMalloc(
1eb0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
1ec0: 2a 63 6f 6e 74 65 78 74 2c 20 69 36 34 20 6e 42  *context, i64 nB
1ed0: 79 74 65 29 7b 0a 20 20 63 68 61 72 20 2a 7a 3b  yte){.  char *z;
1ee0: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d  .  sqlite3 *db =
1ef0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
1f00: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
1f10: 78 74 29 3b 0a 20 20 61 73 73 65 72 74 28 20 6e  xt);.  assert( n
1f20: 42 79 74 65 3e 30 20 29 3b 0a 20 20 74 65 73 74  Byte>0 );.  test
1f30: 63 61 73 65 28 20 6e 42 79 74 65 3d 3d 64 62 2d  case( nByte==db-
1f40: 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c  >aLimit[SQLITE_L
1f50: 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a  IMIT_LENGTH] );.
1f60: 20 20 74 65 73 74 63 61 73 65 28 20 6e 42 79 74    testcase( nByt
1f70: 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  e==db->aLimit[SQ
1f80: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
1f90: 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e 42  H]+1 );.  if( nB
1fa0: 79 74 65 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b 53  yte>db->aLimit[S
1fb0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47  QLITE_LIMIT_LENG
1fc0: 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  TH] ){.    sqlit
1fd0: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
1fe0: 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29 3b  toobig(context);
1ff0: 0a 20 20 20 20 7a 20 3d 20 30 3b 0a 20 20 7d 65  .    z = 0;.  }e
2000: 6c 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73 71 6c  lse{.    z = sql
2010: 69 74 65 33 4d 61 6c 6c 6f 63 28 28 69 6e 74 29  ite3Malloc((int)
2020: 6e 42 79 74 65 29 3b 0a 20 20 20 20 69 66 28 20  nByte);.    if( 
2030: 21 7a 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  !z ){.      sqli
2040: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
2050: 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b  _nomem(context);
2060: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74  .    }.  }.  ret
2070: 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  urn z;.}../*.** 
2080: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
2090: 66 20 74 68 65 20 75 70 70 65 72 28 29 20 61 6e  f the upper() an
20a0: 64 20 6c 6f 77 65 72 28 29 20 53 51 4c 20 66 75  d lower() SQL fu
20b0: 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74  nctions..*/.stat
20c0: 69 63 20 76 6f 69 64 20 75 70 70 65 72 46 75 6e  ic void upperFun
20d0: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
20e0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
20f0: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
2100: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63  lue **argv){.  c
2110: 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73 74  har *z1;.  const
2120: 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74   char *z2;.  int
2130: 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44 5f   i, n;.  UNUSED_
2140: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
2150: 0a 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29 73  .  z2 = (char*)s
2160: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
2170: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20  t(argv[0]);.  n 
2180: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
2190: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
21a0: 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61 74    /* Verify that
21b0: 20 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62 79   the call to _by
21c0: 74 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20 69  tes() does not i
21d0: 6e 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f 74  nvalidate the _t
21e0: 65 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a 2f  ext() pointer */
21f0: 0a 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d 28  .  assert( z2==(
2200: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
2210: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
2220: 29 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29 7b  ) );.  if( z2 ){
2230: 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65 78  .    z1 = contex
2240: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
2250: 20 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20 20   ((i64)n)+1);.  
2260: 20 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20 20    if( z1 ){.    
2270: 20 20 6d 65 6d 63 70 79 28 7a 31 2c 20 7a 32 2c    memcpy(z1, z2,
2280: 20 6e 2b 31 29 3b 0a 20 20 20 20 20 20 66 6f 72   n+1);.      for
2290: 28 69 3d 30 3b 20 7a 31 5b 69 5d 3b 20 69 2b 2b  (i=0; z1[i]; i++
22a0: 29 7b 0a 20 20 20 20 20 20 20 20 7a 31 5b 69 5d  ){.        z1[i]
22b0: 20 3d 20 28 63 68 61 72 29 73 71 6c 69 74 65 33   = (char)sqlite3
22c0: 54 6f 75 70 70 65 72 28 7a 31 5b 69 5d 29 3b 0a  Toupper(z1[i]);.
22d0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71        }.      sq
22e0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
22f0: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 31 2c 20 2d  t(context, z1, -
2300: 31 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29  1, sqlite3_free)
2310: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74  ;.    }.  }.}.st
2320: 61 74 69 63 20 76 6f 69 64 20 6c 6f 77 65 72 46  atic void lowerF
2330: 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  unc(sqlite3_cont
2340: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
2350: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
2360: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
2370: 20 75 38 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73 74   u8 *z1;.  const
2380: 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74   char *z2;.  int
2390: 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44 5f   i, n;.  UNUSED_
23a0: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
23b0: 0a 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29 73  .  z2 = (char*)s
23c0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
23d0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20  t(argv[0]);.  n 
23e0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
23f0: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
2400: 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61 74    /* Verify that
2410: 20 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62 79   the call to _by
2420: 74 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20 69  tes() does not i
2430: 6e 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f 74  nvalidate the _t
2440: 65 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a 2f  ext() pointer */
2450: 0a 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d 28  .  assert( z2==(
2460: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
2470: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
2480: 29 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29 7b  ) );.  if( z2 ){
2490: 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65 78  .    z1 = contex
24a0: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
24b0: 20 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20 20   ((i64)n)+1);.  
24c0: 20 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20 20    if( z1 ){.    
24d0: 20 20 6d 65 6d 63 70 79 28 7a 31 2c 20 7a 32 2c    memcpy(z1, z2,
24e0: 20 6e 2b 31 29 3b 0a 20 20 20 20 20 20 66 6f 72   n+1);.      for
24f0: 28 69 3d 30 3b 20 7a 31 5b 69 5d 3b 20 69 2b 2b  (i=0; z1[i]; i++
2500: 29 7b 0a 20 20 20 20 20 20 20 20 7a 31 5b 69 5d  ){.        z1[i]
2510: 20 3d 20 73 71 6c 69 74 65 33 54 6f 6c 6f 77 65   = sqlite3Tolowe
2520: 72 28 7a 31 5b 69 5d 29 3b 0a 20 20 20 20 20 20  r(z1[i]);.      
2530: 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  }.      sqlite3_
2540: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
2550: 65 78 74 2c 20 28 63 68 61 72 20 2a 29 7a 31 2c  ext, (char *)z1,
2560: 20 2d 31 2c 20 73 71 6c 69 74 65 33 5f 66 72 65   -1, sqlite3_fre
2570: 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a  e);.    }.  }.}.
2580: 0a 0a 23 69 66 20 30 20 20 2f 2a 20 54 68 69 73  ..#if 0  /* This
2590: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6e 65 76   function is nev
25a0: 65 72 20 75 73 65 64 2e 20 2a 2f 0a 2f 2a 0a 2a  er used. */./*.*
25b0: 2a 20 54 68 65 20 43 4f 41 4c 45 53 43 45 28 29  * The COALESCE()
25c0: 20 61 6e 64 20 49 46 4e 55 4c 4c 28 29 20 66 75   and IFNULL() fu
25d0: 6e 63 74 69 6f 6e 73 20 75 73 65 64 20 74 6f 20  nctions used to 
25e0: 62 65 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 61  be implemented a
25f0: 73 20 73 68 6f 77 6e 0a 2a 2a 20 68 65 72 65 2e  s shown.** here.
2600: 20 20 42 75 74 20 6e 6f 77 20 74 68 65 79 20 61    But now they a
2610: 72 65 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 61  re implemented a
2620: 73 20 56 44 42 45 20 63 6f 64 65 20 73 6f 20 74  s VDBE code so t
2630: 68 61 74 20 75 6e 75 73 65 64 20 61 72 67 75 6d  hat unused argum
2640: 65 6e 74 73 0a 2a 2a 20 64 6f 20 6e 6f 74 20 68  ents.** do not h
2650: 61 76 65 20 74 6f 20 62 65 20 63 6f 6d 70 75 74  ave to be comput
2660: 65 64 2e 20 20 54 68 69 73 20 6c 65 67 61 63 79  ed.  This legacy
2670: 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   implementation 
2680: 69 73 20 72 65 74 61 69 6e 65 64 20 61 73 0a 2a  is retained as.*
2690: 2a 20 63 6f 6d 6d 65 6e 74 2e 0a 2a 2f 0a 2f 2a  * comment..*/./*
26a0: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
26b0: 6f 6e 20 6f 66 20 74 68 65 20 49 46 4e 55 4c 4c  on of the IFNULL
26c0: 28 29 2c 20 4e 56 4c 28 29 2c 20 61 6e 64 20 43  (), NVL(), and C
26d0: 4f 41 4c 45 53 43 45 28 29 20 66 75 6e 63 74 69  OALESCE() functi
26e0: 6f 6e 73 2e 20 20 0a 2a 2a 20 41 6c 6c 20 74 68  ons.  .** All th
26f0: 72 65 65 20 64 6f 20 74 68 65 20 73 61 6d 65 20  ree do the same 
2700: 74 68 69 6e 67 2e 20 20 54 68 65 79 20 72 65 74  thing.  They ret
2710: 75 72 6e 20 74 68 65 20 66 69 72 73 74 20 6e 6f  urn the first no
2720: 6e 2d 4e 55 4c 4c 0a 2a 2a 20 61 72 67 75 6d 65  n-NULL.** argume
2730: 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  nt..*/.static vo
2740: 69 64 20 69 66 6e 75 6c 6c 46 75 6e 63 28 0a 20  id ifnullFunc(. 
2750: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
2760: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
2770: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
2780: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
2790: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72 28  .  int i;.  for(
27a0: 69 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b  i=0; i<argc; i++
27b0: 29 7b 0a 20 20 20 20 69 66 28 20 53 51 4c 49 54  ){.    if( SQLIT
27c0: 45 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f  E_NULL!=sqlite3_
27d0: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
27e0: 69 5d 29 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  i]) ){.      sql
27f0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75  ite3_result_valu
2800: 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b  e(context, argv[
2810: 69 5d 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b  i]);.      break
2820: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 23 65  ;.    }.  }.}.#e
2830: 6e 64 69 66 20 2f 2a 20 4e 4f 54 20 55 53 45 44  ndif /* NOT USED
2840: 20 2a 2f 0a 23 64 65 66 69 6e 65 20 69 66 6e 75   */.#define ifnu
2850: 6c 6c 46 75 6e 63 20 76 65 72 73 69 6f 6e 46 75  llFunc versionFu
2860: 6e 63 20 20 20 2f 2a 20 53 75 62 73 74 69 74 75  nc   /* Substitu
2870: 74 65 20 66 75 6e 63 74 69 6f 6e 20 2d 20 6e 65  te function - ne
2880: 76 65 72 20 63 61 6c 6c 65 64 20 2a 2f 0a 0a 2f  ver called */../
2890: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
28a0: 69 6f 6e 20 6f 66 20 72 61 6e 64 6f 6d 28 29 2e  ion of random().
28b0: 20 20 52 65 74 75 72 6e 20 61 20 72 61 6e 64 6f    Return a rando
28c0: 6d 20 69 6e 74 65 67 65 72 2e 20 20 0a 2a 2f 0a  m integer.  .*/.
28d0: 73 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64  static void rand
28e0: 6f 6d 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  omFunc(.  sqlite
28f0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
2900: 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  xt,.  int NotUse
2910: 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  d,.  sqlite3_val
2920: 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b  ue **NotUsed2.){
2930: 0a 20 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20  .  sqlite_int64 
2940: 72 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  r;.  UNUSED_PARA
2950: 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20  METER2(NotUsed, 
2960: 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 73 71 6c  NotUsed2);.  sql
2970: 69 74 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73 28  ite3_randomness(
2980: 73 69 7a 65 6f 66 28 72 29 2c 20 26 72 29 3b 0a  sizeof(r), &r);.
2990: 20 20 69 66 28 20 72 3c 30 20 29 7b 0a 20 20 20    if( r<0 ){.   
29a0: 20 2f 2a 20 57 65 20 6e 65 65 64 20 74 6f 20 70   /* We need to p
29b0: 72 65 76 65 6e 74 20 61 20 72 61 6e 64 6f 6d 20  revent a random 
29c0: 6e 75 6d 62 65 72 20 6f 66 20 30 78 38 30 30 30  number of 0x8000
29d0: 30 30 30 30 30 30 30 30 30 30 30 30 20 0a 20 20  000000000000 .  
29e0: 20 20 2a 2a 20 28 6f 72 20 2d 39 32 32 33 33 37    ** (or -922337
29f0: 32 30 33 36 38 35 34 37 37 35 38 30 38 29 20 73  2036854775808) s
2a00: 69 6e 63 65 20 77 68 65 6e 20 79 6f 75 20 64 6f  ince when you do
2a10: 20 61 62 73 28 29 20 6f 66 20 74 68 61 74 0a 20   abs() of that. 
2a20: 20 20 20 2a 2a 20 6e 75 6d 62 65 72 20 6f 66 20     ** number of 
2a30: 79 6f 75 20 67 65 74 20 74 68 65 20 73 61 6d 65  you get the same
2a40: 20 76 61 6c 75 65 20 62 61 63 6b 20 61 67 61 69   value back agai
2a50: 6e 2e 20 20 54 6f 20 64 6f 20 74 68 69 73 0a 20  n.  To do this. 
2a60: 20 20 20 2a 2a 20 69 6e 20 61 20 77 61 79 20 74     ** in a way t
2a70: 68 61 74 20 69 73 20 74 65 73 74 61 62 6c 65 2c  hat is testable,
2a80: 20 6d 61 73 6b 20 74 68 65 20 73 69 67 6e 20 62   mask the sign b
2a90: 69 74 20 6f 66 66 20 6f 66 20 6e 65 67 61 74 69  it off of negati
2aa0: 76 65 0a 20 20 20 20 2a 2a 20 76 61 6c 75 65 73  ve.    ** values
2ab0: 2c 20 72 65 73 75 6c 74 69 6e 67 20 69 6e 20 61  , resulting in a
2ac0: 20 70 6f 73 69 74 69 76 65 20 76 61 6c 75 65 2e   positive value.
2ad0: 20 20 54 68 65 6e 20 74 61 6b 65 20 74 68 65 20    Then take the 
2ae0: 0a 20 20 20 20 2a 2a 20 32 73 20 63 6f 6d 70 6c  .    ** 2s compl
2af0: 65 6d 65 6e 74 20 6f 66 20 74 68 61 74 20 70 6f  ement of that po
2b00: 73 69 74 69 76 65 20 76 61 6c 75 65 2e 20 20 54  sitive value.  T
2b10: 68 65 20 65 6e 64 20 72 65 73 75 6c 74 20 63 61  he end result ca
2b20: 6e 0a 20 20 20 20 2a 2a 20 74 68 65 72 65 66 6f  n.    ** therefo
2b30: 72 65 20 62 65 20 6e 6f 20 6c 65 73 73 20 74 68  re be no less th
2b40: 61 6e 20 2d 39 32 32 33 33 37 32 30 33 36 38 35  an -922337203685
2b50: 34 37 37 35 38 30 37 2e 0a 20 20 20 20 2a 2f 0a  4775807..    */.
2b60: 20 20 20 20 72 20 3d 20 2d 28 72 20 5e 20 28 28      r = -(r ^ ((
2b70: 28 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 29 31  (sqlite3_int64)1
2b80: 29 3c 3c 36 33 29 29 3b 0a 20 20 7d 0a 20 20 73  )<<63));.  }.  s
2b90: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
2ba0: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b  t64(context, r);
2bb0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
2bc0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72 61 6e 64  entation of rand
2bd0: 6f 6d 62 6c 6f 62 28 4e 29 2e 20 20 52 65 74 75  omblob(N).  Retu
2be0: 72 6e 20 61 20 72 61 6e 64 6f 6d 20 62 6c 6f 62  rn a random blob
2bf0: 0a 2a 2a 20 74 68 61 74 20 69 73 20 4e 20 62 79  .** that is N by
2c00: 74 65 73 20 6c 6f 6e 67 2e 0a 2a 2f 0a 73 74 61  tes long..*/.sta
2c10: 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d 42  tic void randomB
2c20: 6c 6f 62 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  lob(.  sqlite3_c
2c30: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
2c40: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
2c50: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
2c60: 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a  rgv.){.  int n;.
2c70: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
2c80: 2a 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72  *p;.  assert( ar
2c90: 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45  gc==1 );.  UNUSE
2ca0: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
2cb0: 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  );.  n = sqlite3
2cc0: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
2cd0: 30 5d 29 3b 0a 20 20 69 66 28 20 6e 3c 31 20 29  0]);.  if( n<1 )
2ce0: 7b 0a 20 20 20 20 6e 20 3d 20 31 3b 0a 20 20 7d  {.    n = 1;.  }
2cf0: 0a 20 20 70 20 3d 20 63 6f 6e 74 65 78 74 4d 61  .  p = contextMa
2d00: 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 6e 29  lloc(context, n)
2d10: 3b 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 20 20  ;.  if( p ){.   
2d20: 20 73 71 6c 69 74 65 33 5f 72 61 6e 64 6f 6d 6e   sqlite3_randomn
2d30: 65 73 73 28 6e 2c 20 70 29 3b 0a 20 20 20 20 73  ess(n, p);.    s
2d40: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62 6c  qlite3_result_bl
2d50: 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61  ob(context, (cha
2d60: 72 2a 29 70 2c 20 6e 2c 20 73 71 6c 69 74 65 33  r*)p, n, sqlite3
2d70: 5f 66 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f  _free);.  }.}../
2d80: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
2d90: 69 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73 74 5f  ion of the last_
2da0: 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 53  insert_rowid() S
2db0: 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68  QL function.  Th
2dc0: 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c 75  e return.** valu
2dd0: 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73  e is the same as
2de0: 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 61 73   the sqlite3_las
2df0: 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29  t_insert_rowid()
2e00: 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a   API function..*
2e10: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 61  /.static void la
2e20: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
2e30: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
2e40: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20 20  xt *context, .  
2e50: 69 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a 20 20  int NotUsed, .  
2e60: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
2e70: 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71  NotUsed2.){.  sq
2e80: 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69  lite3 *db = sqli
2e90: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
2ea0: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a  andle(context);.
2eb0: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
2ec0: 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74  ER2(NotUsed, Not
2ed0: 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50  Used2);.  /* IMP
2ee0: 3a 20 52 2d 35 31 35 31 33 2d 31 32 30 32 36 20  : R-51513-12026 
2ef0: 54 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f  The last_insert_
2f00: 72 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e 63  rowid() SQL func
2f10: 74 69 6f 6e 20 69 73 20 61 0a 20 20 2a 2a 20 77  tion is a.  ** w
2f20: 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68  rapper around th
2f30: 65 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69  e sqlite3_last_i
2f40: 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 43 2f  nsert_rowid() C/
2f50: 43 2b 2b 20 69 6e 74 65 72 66 61 63 65 0a 20 20  C++ interface.  
2f60: 2a 2a 20 66 75 6e 63 74 69 6f 6e 2e 20 2a 2f 0a  ** function. */.
2f70: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2f80: 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20  _int64(context, 
2f90: 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73  sqlite3_last_ins
2fa0: 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29 3b 0a  ert_rowid(db));.
2fb0: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
2fc0: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 63  ntation of the c
2fd0: 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75 6e  hanges() SQL fun
2fe0: 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50  ction..**.** IMP
2ff0: 3a 20 52 2d 36 32 30 37 33 2d 31 31 32 30 39 20  : R-62073-11209 
3000: 54 68 65 20 63 68 61 6e 67 65 73 28 29 20 53 51  The changes() SQ
3010: 4c 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20  L function is a 
3020: 77 72 61 70 70 65 72 0a 2a 2a 20 61 72 6f 75 6e  wrapper.** aroun
3030: 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63 68  d the sqlite3_ch
3040: 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b 20 66 75  anges() C/C++ fu
3050: 6e 63 74 69 6f 6e 20 61 6e 64 20 68 65 6e 63 65  nction and hence
3060: 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 73 61 6d   follows the sam
3070: 65 0a 2a 2a 20 72 75 6c 65 73 20 66 6f 72 20 63  e.** rules for c
3080: 6f 75 6e 74 69 6e 67 20 63 68 61 6e 67 65 73 2e  ounting changes.
3090: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
30a0: 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69 74  changes(.  sqlit
30b0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
30c0: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
30d0: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
30e0: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
30f0: 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  {.  sqlite3 *db 
3100: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
3110: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
3120: 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  ext);.  UNUSED_P
3130: 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65  ARAMETER2(NotUse
3140: 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20  d, NotUsed2);.  
3150: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
3160: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  nt(context, sqli
3170: 74 65 33 5f 63 68 61 6e 67 65 73 28 64 62 29 29  te3_changes(db))
3180: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
3190: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
31a0: 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29   total_changes()
31b0: 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20   SQL function.  
31c0: 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65  The return value
31d0: 20 69 73 0a 2a 2a 20 74 68 65 20 73 61 6d 65 20   is.** the same 
31e0: 61 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 74  as the sqlite3_t
31f0: 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20 41  otal_changes() A
3200: 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a  PI function..*/.
3210: 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74 61  static void tota
3220: 6c 5f 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c  l_changes(.  sql
3230: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
3240: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74  ntext,.  int Not
3250: 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f  Used,.  sqlite3_
3260: 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32  value **NotUsed2
3270: 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  .){.  sqlite3 *d
3280: 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  b = sqlite3_cont
3290: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
32a0: 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44  ntext);.  UNUSED
32b0: 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55  _PARAMETER2(NotU
32c0: 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a  sed, NotUsed2);.
32d0: 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 35 32 37 35    /* IMP: R-5275
32e0: 36 2d 34 31 39 39 33 20 54 68 69 73 20 66 75 6e  6-41993 This fun
32f0: 63 74 69 6f 6e 20 69 73 20 61 20 77 72 61 70 70  ction is a wrapp
3300: 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20 20  er around the.  
3310: 2a 2a 20 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c  ** sqlite3_total
3320: 5f 63 68 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b  _changes() C/C++
3330: 20 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20   interface. */. 
3340: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
3350: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  int(context, sql
3360: 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67  ite3_total_chang
3370: 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  es(db));.}../*.*
3380: 2a 20 41 20 73 74 72 75 63 74 75 72 65 20 64 65  * A structure de
3390: 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64 6f  fining how to do
33a0: 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d 70   GLOB-style comp
33b0: 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72 75  arisons..*/.stru
33c0: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 7b  ct compareInfo {
33d0: 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b 0a  .  u8 matchAll;.
33e0: 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a 20    u8 matchOne;. 
33f0: 20 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20 20   u8 matchSet;.  
3400: 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a 2f  u8 noCase;.};../
3410: 2a 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45 20 61 6e  *.** For LIKE an
3420: 64 20 47 4c 4f 42 20 6d 61 74 63 68 69 6e 67 20  d GLOB matching 
3430: 6f 6e 20 45 42 43 44 49 43 20 6d 61 63 68 69 6e  on EBCDIC machin
3440: 65 73 2c 20 61 73 73 75 6d 65 20 74 68 61 74 20  es, assume that 
3450: 65 76 65 72 79 0a 2a 2a 20 63 68 61 72 61 63 74  every.** charact
3460: 65 72 20 69 73 20 65 78 61 63 74 6c 79 20 6f 6e  er is exactly on
3470: 65 20 62 79 74 65 20 69 6e 20 73 69 7a 65 2e 20  e byte in size. 
3480: 20 41 6c 73 6f 2c 20 61 6c 6c 20 63 68 61 72 61   Also, all chara
3490: 63 74 65 72 73 20 61 72 65 0a 2a 2a 20 61 62 6c  cters are.** abl
34a0: 65 20 74 6f 20 70 61 72 74 69 63 69 70 61 74 65  e to participate
34b0: 20 69 6e 20 75 70 70 65 72 2d 63 61 73 65 2d 74   in upper-case-t
34c0: 6f 2d 6c 6f 77 65 72 2d 63 61 73 65 20 6d 61 70  o-lower-case map
34d0: 70 69 6e 67 73 20 69 6e 20 45 42 43 44 49 43 0a  pings in EBCDIC.
34e0: 2a 2a 20 77 68 65 72 65 61 73 20 6f 6e 6c 79 20  ** whereas only 
34f0: 63 68 61 72 61 63 74 65 72 73 20 6c 65 73 73 20  characters less 
3500: 74 68 61 6e 20 30 78 38 30 20 64 6f 20 69 6e 20  than 0x80 do in 
3510: 41 53 43 49 49 2e 0a 2a 2f 0a 23 69 66 20 64 65  ASCII..*/.#if de
3520: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 45 42 43  fined(SQLITE_EBC
3530: 44 49 43 29 0a 23 20 64 65 66 69 6e 65 20 73 71  DIC).# define sq
3540: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 41 2c  lite3Utf8Read(A,
3550: 43 29 20 20 20 20 28 2a 28 41 2b 2b 29 29 0a 23  C)    (*(A++)).#
3560: 20 64 65 66 69 6e 65 20 47 6c 6f 67 55 70 70 65   define GlogUppe
3570: 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20 20 20  rToLower(A)     
3580: 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65 72  A = sqlite3Upper
3590: 54 6f 4c 6f 77 65 72 5b 41 5d 0a 23 65 6c 73 65  ToLower[A].#else
35a0: 0a 23 20 64 65 66 69 6e 65 20 47 6c 6f 67 55 70  .# define GlogUp
35b0: 70 65 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20  perToLower(A)   
35c0: 20 20 69 66 28 20 41 3c 30 78 38 30 20 29 7b 20    if( A<0x80 ){ 
35d0: 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65 72  A = sqlite3Upper
35e0: 54 6f 4c 6f 77 65 72 5b 41 5d 3b 20 7d 0a 23 65  ToLower[A]; }.#e
35f0: 6e 64 69 66 0a 0a 73 74 61 74 69 63 20 63 6f 6e  ndif..static con
3600: 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72  st struct compar
3610: 65 49 6e 66 6f 20 67 6c 6f 62 49 6e 66 6f 20 3d  eInfo globInfo =
3620: 20 7b 20 27 2a 27 2c 20 27 3f 27 2c 20 27 5b 27   { '*', '?', '['
3630: 2c 20 30 20 7d 3b 0a 2f 2a 20 54 68 65 20 63 6f  , 0 };./* The co
3640: 72 72 65 63 74 20 53 51 4c 2d 39 32 20 62 65 68  rrect SQL-92 beh
3650: 61 76 69 6f 72 20 69 73 20 66 6f 72 20 74 68 65  avior is for the
3660: 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 74   LIKE operator t
3670: 6f 20 69 67 6e 6f 72 65 0a 2a 2a 20 63 61 73 65  o ignore.** case
3680: 2e 20 20 54 68 75 73 20 20 27 61 27 20 4c 49 4b  .  Thus  'a' LIK
3690: 45 20 27 41 27 20 77 6f 75 6c 64 20 62 65 20 74  E 'A' would be t
36a0: 72 75 65 2e 20 2a 2f 0a 73 74 61 74 69 63 20 63  rue. */.static c
36b0: 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70  onst struct comp
36c0: 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e 66 6f  areInfo likeInfo
36d0: 4e 6f 72 6d 20 3d 20 7b 20 27 25 27 2c 20 27 5f  Norm = { '%', '_
36e0: 27 2c 20 20 20 30 2c 20 31 20 7d 3b 0a 2f 2a 20  ',   0, 1 };./* 
36f0: 49 66 20 53 51 4c 49 54 45 5f 43 41 53 45 5f 53  If SQLITE_CASE_S
3700: 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45 20 69 73  ENSITIVE_LIKE is
3710: 20 64 65 66 69 6e 65 64 2c 20 74 68 65 6e 20 74   defined, then t
3720: 68 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72  he LIKE operator
3730: 0a 2a 2a 20 69 73 20 63 61 73 65 20 73 65 6e 73  .** is case sens
3740: 69 74 69 76 65 20 63 61 75 73 69 6e 67 20 27 61  itive causing 'a
3750: 27 20 4c 49 4b 45 20 27 41 27 20 74 6f 20 62 65  ' LIKE 'A' to be
3760: 20 66 61 6c 73 65 20 2a 2f 0a 73 74 61 74 69 63   false */.static
3770: 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f   const struct co
3780: 6d 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e  mpareInfo likeIn
3790: 66 6f 41 6c 74 20 3d 20 7b 20 27 25 27 2c 20 27  foAlt = { '%', '
37a0: 5f 27 2c 20 20 20 30 2c 20 30 20 7d 3b 0a 0a 2f  _',   0, 0 };../
37b0: 2a 0a 2a 2a 20 43 6f 6d 70 61 72 65 20 74 77 6f  *.** Compare two
37c0: 20 55 54 46 2d 38 20 73 74 72 69 6e 67 73 20 66   UTF-8 strings f
37d0: 6f 72 20 65 71 75 61 6c 69 74 79 20 77 68 65 72  or equality wher
37e0: 65 20 74 68 65 20 66 69 72 73 74 20 73 74 72 69  e the first stri
37f0: 6e 67 20 63 61 6e 0a 2a 2a 20 70 6f 74 65 6e 74  ng can.** potent
3800: 69 61 6c 6c 79 20 62 65 20 61 20 22 67 6c 6f 62  ially be a "glob
3810: 22 20 65 78 70 72 65 73 73 69 6f 6e 2e 20 20 52  " expression.  R
3820: 65 74 75 72 6e 20 74 72 75 65 20 28 31 29 20 69  eturn true (1) i
3830: 66 20 74 68 65 79 0a 2a 2a 20 61 72 65 20 74 68  f they.** are th
3840: 65 20 73 61 6d 65 20 61 6e 64 20 66 61 6c 73 65  e same and false
3850: 20 28 30 29 20 69 66 20 74 68 65 79 20 61 72 65   (0) if they are
3860: 20 64 69 66 66 65 72 65 6e 74 2e 0a 2a 2a 0a 2a   different..**.*
3870: 2a 20 47 6c 6f 62 62 69 6e 67 20 72 75 6c 65 73  * Globbing rules
3880: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 2a 27  :.**.**      '*'
3890: 20 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 61         Matches a
38a0: 6e 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20 7a  ny sequence of z
38b0: 65 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61 72  ero or more char
38c0: 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20  acters..**.**   
38d0: 20 20 20 27 3f 27 20 20 20 20 20 20 20 4d 61 74     '?'       Mat
38e0: 63 68 65 73 20 65 78 61 63 74 6c 79 20 6f 6e 65  ches exactly one
38f0: 20 63 68 61 72 61 63 74 65 72 2e 0a 2a 2a 0a 2a   character..**.*
3900: 2a 20 20 20 20 20 5b 2e 2e 2e 5d 20 20 20 20 20  *     [...]     
3910: 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68 61   Matches one cha
3920: 72 61 63 74 65 72 20 66 72 6f 6d 20 74 68 65 20  racter from the 
3930: 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74 20 6f 66  enclosed list of
3940: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20  .**             
3950: 20 20 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a     characters..*
3960: 2a 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d 20  *.**     [^...] 
3970: 20 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20      Matches one 
3980: 63 68 61 72 61 63 74 65 72 20 6e 6f 74 20 69 6e  character not in
3990: 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69   the enclosed li
39a0: 73 74 2e 0a 2a 2a 0a 2a 2a 20 57 69 74 68 20 74  st..**.** With t
39b0: 68 65 20 5b 2e 2e 2e 5d 20 61 6e 64 20 5b 5e 2e  he [...] and [^.
39c0: 2e 2e 5d 20 6d 61 74 63 68 69 6e 67 2c 20 61 20  ..] matching, a 
39d0: 27 5d 27 20 63 68 61 72 61 63 74 65 72 20 63 61  ']' character ca
39e0: 6e 20 62 65 20 69 6e 63 6c 75 64 65 64 0a 2a 2a  n be included.**
39f0: 20 69 6e 20 74 68 65 20 6c 69 73 74 20 62 79 20   in the list by 
3a00: 6d 61 6b 69 6e 67 20 69 74 20 74 68 65 20 66 69  making it the fi
3a10: 72 73 74 20 63 68 61 72 61 63 74 65 72 20 61 66  rst character af
3a20: 74 65 72 20 27 5b 27 20 6f 72 20 27 5e 27 2e 20  ter '[' or '^'. 
3a30: 20 41 0a 2a 2a 20 72 61 6e 67 65 20 6f 66 20 63   A.** range of c
3a40: 68 61 72 61 63 74 65 72 73 20 63 61 6e 20 62 65  haracters can be
3a50: 20 73 70 65 63 69 66 69 65 64 20 75 73 69 6e 67   specified using
3a60: 20 27 2d 27 2e 20 20 45 78 61 6d 70 6c 65 3a 0a   '-'.  Example:.
3a70: 2a 2a 20 22 5b 61 2d 7a 5d 22 20 6d 61 74 63 68  ** "[a-z]" match
3a80: 65 73 20 61 6e 79 20 73 69 6e 67 6c 65 20 6c 6f  es any single lo
3a90: 77 65 72 2d 63 61 73 65 20 6c 65 74 74 65 72 2e  wer-case letter.
3aa0: 20 20 54 6f 20 6d 61 74 63 68 20 61 20 27 2d 27    To match a '-'
3ab0: 2c 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 74 68 65  , make.** it the
3ac0: 20 6c 61 73 74 20 63 68 61 72 61 63 74 65 72 20   last character 
3ad0: 69 6e 20 74 68 65 20 6c 69 73 74 2e 0a 2a 2a 0a  in the list..**.
3ae0: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20  ** This routine 
3af0: 69 73 20 75 73 75 61 6c 6c 79 20 71 75 69 63 6b  is usually quick
3b00: 2c 20 62 75 74 20 63 61 6e 20 62 65 20 4e 2a 2a  , but can be N**
3b10: 32 20 69 6e 20 74 68 65 20 77 6f 72 73 74 20 63  2 in the worst c
3b20: 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 48 69 6e 74 73  ase..**.** Hints
3b30: 3a 20 74 6f 20 6d 61 74 63 68 20 27 2a 27 20 6f  : to match '*' o
3b40: 72 20 27 3f 27 2c 20 70 75 74 20 74 68 65 6d 20  r '?', put them 
3b50: 69 6e 20 22 5b 5d 22 2e 20 20 4c 69 6b 65 20 74  in "[]".  Like t
3b60: 68 69 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  his:.**.**      
3b70: 20 20 20 61 62 63 5b 2a 5d 78 79 7a 20 20 20 20     abc[*]xyz    
3b80: 20 20 20 20 4d 61 74 63 68 65 73 20 22 61 62 63      Matches "abc
3b90: 2a 78 79 7a 22 20 6f 6e 6c 79 0a 2a 2f 0a 73 74  *xyz" only.*/.st
3ba0: 61 74 69 63 20 69 6e 74 20 70 61 74 74 65 72 6e  atic int pattern
3bb0: 43 6f 6d 70 61 72 65 28 0a 20 20 63 6f 6e 73 74  Compare(.  const
3bc0: 20 75 38 20 2a 7a 50 61 74 74 65 72 6e 2c 20 20   u8 *zPattern,  
3bd0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54              /* T
3be0: 68 65 20 67 6c 6f 62 20 70 61 74 74 65 72 6e 20  he glob pattern 
3bf0: 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a  */.  const u8 *z
3c00: 53 74 72 69 6e 67 2c 20 20 20 20 20 20 20 20 20  String,         
3c10: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 73 74 72        /* The str
3c20: 69 6e 67 20 74 6f 20 63 6f 6d 70 61 72 65 20 61  ing to compare a
3c30: 67 61 69 6e 73 74 20 74 68 65 20 67 6c 6f 62 20  gainst the glob 
3c40: 2a 2f 0a 20 20 63 6f 6e 73 74 20 73 74 72 75 63  */.  const struc
3c50: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70  t compareInfo *p
3c60: 49 6e 66 6f 2c 20 2f 2a 20 49 6e 66 6f 72 6d 61  Info, /* Informa
3c70: 74 69 6f 6e 20 61 62 6f 75 74 20 68 6f 77 20 74  tion about how t
3c80: 6f 20 64 6f 20 74 68 65 20 63 6f 6d 70 61 72 65  o do the compare
3c90: 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 69 6e 74 20   */.  const int 
3ca0: 65 73 63 20 20 20 20 20 20 20 20 20 20 20 20 20  esc             
3cb0: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 65 73         /* The es
3cc0: 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20 2a  cape character *
3cd0: 2f 0a 29 7b 0a 20 20 69 6e 74 20 63 2c 20 63 32  /.){.  int c, c2
3ce0: 3b 0a 20 20 69 6e 74 20 69 6e 76 65 72 74 3b 0a  ;.  int invert;.
3cf0: 20 20 69 6e 74 20 73 65 65 6e 3b 0a 20 20 75 38    int seen;.  u8
3d00: 20 6d 61 74 63 68 4f 6e 65 20 3d 20 70 49 6e 66   matchOne = pInf
3d10: 6f 2d 3e 6d 61 74 63 68 4f 6e 65 3b 0a 20 20 75  o->matchOne;.  u
3d20: 38 20 6d 61 74 63 68 41 6c 6c 20 3d 20 70 49 6e  8 matchAll = pIn
3d30: 66 6f 2d 3e 6d 61 74 63 68 41 6c 6c 3b 0a 20 20  fo->matchAll;.  
3d40: 75 38 20 6d 61 74 63 68 53 65 74 20 3d 20 70 49  u8 matchSet = pI
3d50: 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74 3b 0a 20  nfo->matchSet;. 
3d60: 20 75 38 20 6e 6f 43 61 73 65 20 3d 20 70 49 6e   u8 noCase = pIn
3d70: 66 6f 2d 3e 6e 6f 43 61 73 65 3b 20 0a 20 20 69  fo->noCase; .  i
3d80: 6e 74 20 70 72 65 76 45 73 63 61 70 65 20 3d 20  nt prevEscape = 
3d90: 30 3b 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69  0;     /* True i
3da0: 66 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 63  f the previous c
3db0: 68 61 72 61 63 74 65 72 20 77 61 73 20 27 65 73  haracter was 'es
3dc0: 63 61 70 65 27 20 2a 2f 0a 0a 20 20 77 68 69 6c  cape' */..  whil
3dd0: 65 28 20 28 63 20 3d 20 73 71 6c 69 74 65 33 55  e( (c = sqlite3U
3de0: 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72 6e  tf8Read(zPattern
3df0: 2c 26 7a 50 61 74 74 65 72 6e 29 29 21 3d 30 20  ,&zPattern))!=0 
3e00: 29 7b 0a 20 20 20 20 69 66 28 20 21 70 72 65 76  ){.    if( !prev
3e10: 45 73 63 61 70 65 20 26 26 20 63 3d 3d 6d 61 74  Escape && c==mat
3e20: 63 68 41 6c 6c 20 29 7b 0a 20 20 20 20 20 20 77  chAll ){.      w
3e30: 68 69 6c 65 28 20 28 63 3d 73 71 6c 69 74 65 33  hile( (c=sqlite3
3e40: 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72  Utf8Read(zPatter
3e50: 6e 2c 26 7a 50 61 74 74 65 72 6e 29 29 20 3d 3d  n,&zPattern)) ==
3e60: 20 6d 61 74 63 68 41 6c 6c 0a 20 20 20 20 20 20   matchAll.      
3e70: 20 20 20 20 20 20 20 20 20 7c 7c 20 63 20 3d 3d           || c ==
3e80: 20 6d 61 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20   matchOne ){.   
3e90: 20 20 20 20 20 69 66 28 20 63 3d 3d 6d 61 74 63       if( c==matc
3ea0: 68 4f 6e 65 20 26 26 20 73 71 6c 69 74 65 33 55  hOne && sqlite3U
3eb0: 74 66 38 52 65 61 64 28 7a 53 74 72 69 6e 67 2c  tf8Read(zString,
3ec0: 20 26 7a 53 74 72 69 6e 67 29 3d 3d 30 20 29 7b   &zString)==0 ){
3ed0: 0a 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72  .          retur
3ee0: 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  n 0;.        }. 
3ef0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28       }.      if(
3f00: 20 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20   c==0 ){.       
3f10: 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 20   return 1;.     
3f20: 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d 65 73   }else if( c==es
3f30: 63 20 29 7b 0a 20 20 20 20 20 20 20 20 63 20 3d  c ){.        c =
3f40: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
3f50: 28 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74  (zPattern, &zPat
3f60: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 69  tern);.        i
3f70: 66 28 20 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20  f( c==0 ){.     
3f80: 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20       return 0;. 
3f90: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d         }.      }
3fa0: 65 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61 74 63  else if( c==matc
3fb0: 68 53 65 74 20 29 7b 0a 20 20 20 20 20 20 20 20  hSet ){.        
3fc0: 61 73 73 65 72 74 28 20 65 73 63 3d 3d 30 20 29  assert( esc==0 )
3fd0: 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 69  ;         /* Thi
3fe0: 73 20 69 73 20 47 4c 4f 42 2c 20 6e 6f 74 20 4c  s is GLOB, not L
3ff0: 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20 20 20 61  IKE */.        a
4000: 73 73 65 72 74 28 20 6d 61 74 63 68 53 65 74 3c  ssert( matchSet<
4010: 30 78 38 30 20 29 3b 20 20 2f 2a 20 27 5b 27 20  0x80 );  /* '[' 
4020: 69 73 20 61 20 73 69 6e 67 6c 65 2d 62 79 74 65  is a single-byte
4030: 20 63 68 61 72 61 63 74 65 72 20 2a 2f 0a 20 20   character */.  
4040: 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a 7a 53        while( *zS
4050: 74 72 69 6e 67 20 26 26 20 70 61 74 74 65 72 6e  tring && pattern
4060: 43 6f 6d 70 61 72 65 28 26 7a 50 61 74 74 65 72  Compare(&zPatter
4070: 6e 5b 2d 31 5d 2c 7a 53 74 72 69 6e 67 2c 70 49  n[-1],zString,pI
4080: 6e 66 6f 2c 65 73 63 29 3d 3d 30 20 29 7b 0a 20  nfo,esc)==0 ){. 
4090: 20 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f           SQLITE_
40a0: 53 4b 49 50 5f 55 54 46 38 28 7a 53 74 72 69 6e  SKIP_UTF8(zStrin
40b0: 67 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20  g);.        }.  
40c0: 20 20 20 20 20 20 72 65 74 75 72 6e 20 2a 7a 53        return *zS
40d0: 74 72 69 6e 67 21 3d 30 3b 0a 20 20 20 20 20 20  tring!=0;.      
40e0: 7d 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 28  }.      while( (
40f0: 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  c2 = sqlite3Utf8
4100: 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 26 7a 53  Read(zString,&zS
4110: 74 72 69 6e 67 29 29 21 3d 30 20 29 7b 0a 20 20  tring))!=0 ){.  
4120: 20 20 20 20 20 20 69 66 28 20 6e 6f 43 61 73 65        if( noCase
4130: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 47 6c   ){.          Gl
4140: 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63  ogUpperToLower(c
4150: 32 29 3b 0a 20 20 20 20 20 20 20 20 20 20 47 6c  2);.          Gl
4160: 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63  ogUpperToLower(c
4170: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 77 68 69  );.          whi
4180: 6c 65 28 20 63 32 20 21 3d 20 30 20 26 26 20 63  le( c2 != 0 && c
4190: 32 20 21 3d 20 63 20 29 7b 0a 20 20 20 20 20 20  2 != c ){.      
41a0: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
41b0: 65 33 55 74 66 38 52 65 61 64 28 7a 53 74 72 69  e3Utf8Read(zStri
41c0: 6e 67 2c 20 26 7a 53 74 72 69 6e 67 29 3b 0a 20  ng, &zString);. 
41d0: 20 20 20 20 20 20 20 20 20 20 20 47 6c 6f 67 55             GlogU
41e0: 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 32 29 3b  pperToLower(c2);
41f0: 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20  .          }.   
4200: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20       }else{.    
4210: 20 20 20 20 20 20 77 68 69 6c 65 28 20 63 32 20        while( c2 
4220: 21 3d 20 30 20 26 26 20 63 32 20 21 3d 20 63 20  != 0 && c2 != c 
4230: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 63  ){.            c
4240: 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52  2 = sqlite3Utf8R
4250: 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26 7a 53  ead(zString, &zS
4260: 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 20 20  tring);.        
4270: 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20    }.        }.  
4280: 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20        if( c2==0 
4290: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
42a0: 20 20 20 20 69 66 28 20 70 61 74 74 65 72 6e 43      if( patternC
42b0: 6f 6d 70 61 72 65 28 7a 50 61 74 74 65 72 6e 2c  ompare(zPattern,
42c0: 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65 73  zString,pInfo,es
42d0: 63 29 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20  c) ) return 1;. 
42e0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 72 65 74       }.      ret
42f0: 75 72 6e 20 30 3b 0a 20 20 20 20 7d 65 6c 73 65  urn 0;.    }else
4300: 20 69 66 28 20 21 70 72 65 76 45 73 63 61 70 65   if( !prevEscape
4310: 20 26 26 20 63 3d 3d 6d 61 74 63 68 4f 6e 65 20   && c==matchOne 
4320: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 73 71 6c  ){.      if( sql
4330: 69 74 65 33 55 74 66 38 52 65 61 64 28 7a 53 74  ite3Utf8Read(zSt
4340: 72 69 6e 67 2c 20 26 7a 53 74 72 69 6e 67 29 3d  ring, &zString)=
4350: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65  =0 ){.        re
4360: 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a  turn 0;.      }.
4370: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d      }else if( c=
4380: 3d 6d 61 74 63 68 53 65 74 20 29 7b 0a 20 20 20  =matchSet ){.   
4390: 20 20 20 69 6e 74 20 70 72 69 6f 72 5f 63 20 3d     int prior_c =
43a0: 20 30 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74   0;.      assert
43b0: 28 20 65 73 63 3d 3d 30 20 29 3b 20 20 20 20 2f  ( esc==0 );    /
43c0: 2a 20 54 68 69 73 20 6f 6e 6c 79 20 6f 63 63 75  * This only occu
43d0: 72 73 20 66 6f 72 20 47 4c 4f 42 2c 20 6e 6f 74  rs for GLOB, not
43e0: 20 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20 73   LIKE */.      s
43f0: 65 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 69  een = 0;.      i
4400: 6e 76 65 72 74 20 3d 20 30 3b 0a 20 20 20 20 20  nvert = 0;.     
4410: 20 63 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38   c = sqlite3Utf8
4420: 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26 7a  Read(zString, &z
4430: 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 69  String);.      i
4440: 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( c==0 ) return
4450: 20 30 3b 0a 20 20 20 20 20 20 63 32 20 3d 20 73   0;.      c2 = s
4460: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 7a  qlite3Utf8Read(z
4470: 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74 74 65  Pattern, &zPatte
4480: 72 6e 29 3b 0a 20 20 20 20 20 20 69 66 28 20 63  rn);.      if( c
4490: 32 3d 3d 27 5e 27 20 29 7b 0a 20 20 20 20 20 20  2=='^' ){.      
44a0: 20 20 69 6e 76 65 72 74 20 3d 20 31 3b 0a 20 20    invert = 1;.  
44b0: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
44c0: 65 33 55 74 66 38 52 65 61 64 28 7a 50 61 74 74  e3Utf8Read(zPatt
44d0: 65 72 6e 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b  ern, &zPattern);
44e0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
44f0: 66 28 20 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20  f( c2==']' ){.  
4500: 20 20 20 20 20 20 69 66 28 20 63 3d 3d 27 5d 27        if( c==']'
4510: 20 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20   ) seen = 1;.   
4520: 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65       c2 = sqlite
4530: 33 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65  3Utf8Read(zPatte
4540: 72 6e 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b 0a  rn, &zPattern);.
4550: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 77 68        }.      wh
4560: 69 6c 65 28 20 63 32 20 26 26 20 63 32 21 3d 27  ile( c2 && c2!='
4570: 5d 27 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66  ]' ){.        if
4580: 28 20 63 32 3d 3d 27 2d 27 20 26 26 20 7a 50 61  ( c2=='-' && zPa
4590: 74 74 65 72 6e 5b 30 5d 21 3d 27 5d 27 20 26 26  ttern[0]!=']' &&
45a0: 20 7a 50 61 74 74 65 72 6e 5b 30 5d 21 3d 30 20   zPattern[0]!=0 
45b0: 26 26 20 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a  && prior_c>0 ){.
45c0: 20 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 73            c2 = s
45d0: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 7a  qlite3Utf8Read(z
45e0: 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74 74 65  Pattern, &zPatte
45f0: 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 69  rn);.          i
4600: 66 28 20 63 3e 3d 70 72 69 6f 72 5f 63 20 26 26  f( c>=prior_c &&
4610: 20 63 3c 3d 63 32 20 29 20 73 65 65 6e 20 3d 20   c<=c2 ) seen = 
4620: 31 3b 0a 20 20 20 20 20 20 20 20 20 20 70 72 69  1;.          pri
4630: 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20  or_c = 0;.      
4640: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20    }else{.       
4650: 20 20 20 69 66 28 20 63 3d 3d 63 32 20 29 7b 0a     if( c==c2 ){.
4660: 20 20 20 20 20 20 20 20 20 20 20 20 73 65 65 6e              seen
4670: 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20   = 1;.          
4680: 7d 0a 20 20 20 20 20 20 20 20 20 20 70 72 69 6f  }.          prio
4690: 72 5f 63 20 3d 20 63 32 3b 0a 20 20 20 20 20 20  r_c = c2;.      
46a0: 20 20 7d 0a 20 20 20 20 20 20 20 20 63 32 20 3d    }.        c2 =
46b0: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
46c0: 28 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74  (zPattern, &zPat
46d0: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 7d 0a 20  tern);.      }. 
46e0: 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20 7c       if( c2==0 |
46f0: 7c 20 28 73 65 65 6e 20 5e 20 69 6e 76 65 72 74  | (seen ^ invert
4700: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )==0 ){.        
4710: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20  return 0;.      
4720: 7d 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20  }.    }else if( 
4730: 65 73 63 3d 3d 63 20 26 26 20 21 70 72 65 76 45  esc==c && !prevE
4740: 73 63 61 70 65 20 29 7b 0a 20 20 20 20 20 20 70  scape ){.      p
4750: 72 65 76 45 73 63 61 70 65 20 3d 20 31 3b 0a 20  revEscape = 1;. 
4760: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
4770: 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  c2 = sqlite3Utf8
4780: 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26 7a  Read(zString, &z
4790: 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 69  String);.      i
47a0: 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a 20 20 20  f( noCase ){.   
47b0: 20 20 20 20 20 47 6c 6f 67 55 70 70 65 72 54 6f       GlogUpperTo
47c0: 4c 6f 77 65 72 28 63 29 3b 0a 20 20 20 20 20 20  Lower(c);.      
47d0: 20 20 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f 77    GlogUpperToLow
47e0: 65 72 28 63 32 29 3b 0a 20 20 20 20 20 20 7d 0a  er(c2);.      }.
47f0: 20 20 20 20 20 20 69 66 28 20 63 21 3d 63 32 20        if( c!=c2 
4800: 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72  ){.        retur
4810: 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  n 0;.      }.   
4820: 20 20 20 70 72 65 76 45 73 63 61 70 65 20 3d 20     prevEscape = 
4830: 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72  0;.    }.  }.  r
4840: 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 3d 3d  eturn *zString==
4850: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e  0;.}../*.** Coun
4860: 74 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20  t the number of 
4870: 74 69 6d 65 73 20 74 68 61 74 20 74 68 65 20 4c  times that the L
4880: 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 28 6f 72  IKE operator (or
4890: 20 47 4c 4f 42 20 77 68 69 63 68 20 69 73 0a 2a   GLOB which is.*
48a0: 2a 20 6a 75 73 74 20 61 20 76 61 72 69 61 74 69  * just a variati
48b0: 6f 6e 20 6f 66 20 4c 49 4b 45 29 20 67 65 74 73  on of LIKE) gets
48c0: 20 63 61 6c 6c 65 64 2e 20 20 54 68 69 73 20 69   called.  This i
48d0: 73 20 75 73 65 64 20 66 6f 72 20 74 65 73 74 69  s used for testi
48e0: 6e 67 0a 2a 2a 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23  ng.** only..*/.#
48f0: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53  ifdef SQLITE_TES
4900: 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 6c 69  T.int sqlite3_li
4910: 6b 65 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a 23 65  ke_count = 0;.#e
4920: 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  ndif.../*.** Imp
4930: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
4940: 68 65 20 6c 69 6b 65 28 29 20 53 51 4c 20 66 75  he like() SQL fu
4950: 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 66 75  nction.  This fu
4960: 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74  nction implement
4970: 73 0a 2a 2a 20 74 68 65 20 62 75 69 6c 64 2d 69  s.** the build-i
4980: 6e 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 2e  n LIKE operator.
4990: 20 20 54 68 65 20 66 69 72 73 74 20 61 72 67 75    The first argu
49a0: 6d 65 6e 74 20 74 6f 20 74 68 65 20 66 75 6e 63  ment to the func
49b0: 74 69 6f 6e 20 69 73 20 74 68 65 0a 2a 2a 20 70  tion is the.** p
49c0: 61 74 74 65 72 6e 20 61 6e 64 20 74 68 65 20 73  attern and the s
49d0: 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 69  econd argument i
49e0: 73 20 74 68 65 20 73 74 72 69 6e 67 2e 20 20 53  s the string.  S
49f0: 6f 2c 20 74 68 65 20 53 51 4c 20 73 74 61 74 65  o, the SQL state
4a00: 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20  ments:.**.**    
4a10: 20 20 20 41 20 4c 49 4b 45 20 42 0a 2a 2a 0a 2a     A LIKE B.**.*
4a20: 2a 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64  * is implemented
4a30: 20 61 73 20 6c 69 6b 65 28 42 2c 41 29 2e 0a 2a   as like(B,A)..*
4a40: 2a 0a 2a 2a 20 54 68 69 73 20 73 61 6d 65 20 66  *.** This same f
4a50: 75 6e 63 74 69 6f 6e 20 28 77 69 74 68 20 61 20  unction (with a 
4a60: 64 69 66 66 65 72 65 6e 74 20 63 6f 6d 70 61 72  different compar
4a70: 65 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65 29  eInfo structure)
4a80: 20 63 6f 6d 70 75 74 65 73 0a 2a 2a 20 74 68 65   computes.** the
4a90: 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f 72 2e 0a   GLOB operator..
4aa0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
4ab0: 69 6b 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  ikeFunc(.  sqlit
4ac0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
4ad0: 65 78 74 2c 20 0a 20 20 69 6e 74 20 61 72 67 63  ext, .  int argc
4ae0: 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  , .  sqlite3_val
4af0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63  ue **argv.){.  c
4b00: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
4b10: 61 72 20 2a 7a 41 2c 20 2a 7a 42 3b 0a 20 20 69  ar *zA, *zB;.  i
4b20: 6e 74 20 65 73 63 61 70 65 20 3d 20 30 3b 0a 20  nt escape = 0;. 
4b30: 20 69 6e 74 20 6e 50 61 74 3b 0a 20 20 73 71 6c   int nPat;.  sql
4b40: 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74  ite3 *db = sqlit
4b50: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
4b60: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 0a  ndle(context);..
4b70: 20 20 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f 76    zB = sqlite3_v
4b80: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
4b90: 5d 29 3b 0a 20 20 7a 41 20 3d 20 73 71 6c 69 74  ]);.  zA = sqlit
4ba0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
4bb0: 67 76 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c 69  gv[1]);..  /* Li
4bc0: 6d 69 74 20 74 68 65 20 6c 65 6e 67 74 68 20 6f  mit the length o
4bd0: 66 20 74 68 65 20 4c 49 4b 45 20 6f 72 20 47 4c  f the LIKE or GL
4be0: 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 20 61 76  OB pattern to av
4bf0: 6f 69 64 20 70 72 6f 62 6c 65 6d 73 0a 20 20 2a  oid problems.  *
4c00: 2a 20 6f 66 20 64 65 65 70 20 72 65 63 75 72 73  * of deep recurs
4c10: 69 6f 6e 20 61 6e 64 20 4e 2a 4e 20 62 65 68 61  ion and N*N beha
4c20: 76 69 6f 72 20 69 6e 20 70 61 74 74 65 72 6e 43  vior in patternC
4c30: 6f 6d 70 61 72 65 28 29 2e 0a 20 20 2a 2f 0a 20  ompare()..  */. 
4c40: 20 6e 50 61 74 20 3d 20 73 71 6c 69 74 65 33 5f   nPat = sqlite3_
4c50: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
4c60: 5b 30 5d 29 3b 0a 20 20 74 65 73 74 63 61 73 65  [0]);.  testcase
4c70: 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d  ( nPat==db->aLim
4c80: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
4c90: 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e  LIKE_PATTERN_LEN
4ca0: 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61  GTH] );.  testca
4cb0: 73 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c  se( nPat==db->aL
4cc0: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
4cd0: 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c  T_LIKE_PATTERN_L
4ce0: 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66  ENGTH]+1 );.  if
4cf0: 28 20 6e 50 61 74 20 3e 20 64 62 2d 3e 61 4c 69  ( nPat > db->aLi
4d00: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
4d10: 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45  _LIKE_PATTERN_LE
4d20: 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c  NGTH] ){.    sql
4d30: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
4d40: 72 28 63 6f 6e 74 65 78 74 2c 20 22 4c 49 4b 45  r(context, "LIKE
4d50: 20 6f 72 20 47 4c 4f 42 20 70 61 74 74 65 72 6e   or GLOB pattern
4d60: 20 74 6f 6f 20 63 6f 6d 70 6c 65 78 22 2c 20 2d   too complex", -
4d70: 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  1);.    return;.
4d80: 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 7a 42    }.  assert( zB
4d90: 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ==sqlite3_value_
4da0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b  text(argv[0]) );
4db0: 20 20 2f 2a 20 45 6e 63 6f 64 69 6e 67 20 64 69    /* Encoding di
4dc0: 64 20 6e 6f 74 20 63 68 61 6e 67 65 20 2a 2f 0a  d not change */.
4dd0: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29  .  if( argc==3 )
4de0: 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 65 73 63  {.    /* The esc
4df0: 61 70 65 20 63 68 61 72 61 63 74 65 72 20 73 74  ape character st
4e00: 72 69 6e 67 20 6d 75 73 74 20 63 6f 6e 73 69 73  ring must consis
4e10: 74 20 6f 66 20 61 20 73 69 6e 67 6c 65 20 55 54  t of a single UT
4e20: 46 2d 38 20 63 68 61 72 61 63 74 65 72 2e 0a 20  F-8 character.. 
4e30: 20 20 20 2a 2a 20 4f 74 68 65 72 77 69 73 65 2c     ** Otherwise,
4e40: 20 72 65 74 75 72 6e 20 61 6e 20 65 72 72 6f 72   return an error
4e50: 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 63 6f 6e  ..    */.    con
4e60: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
4e70: 20 2a 7a 45 73 63 20 3d 20 73 71 6c 69 74 65 33   *zEsc = sqlite3
4e80: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
4e90: 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 45  [2]);.    if( zE
4ea0: 73 63 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a  sc==0 ) return;.
4eb0: 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 55      if( sqlite3U
4ec0: 74 66 38 43 68 61 72 4c 65 6e 28 28 63 68 61 72  tf8CharLen((char
4ed0: 2a 29 7a 45 73 63 2c 20 2d 31 29 21 3d 31 20 29  *)zEsc, -1)!=1 )
4ee0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
4ef0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
4f00: 74 65 78 74 2c 20 0a 20 20 20 20 20 20 20 20 20  text, .         
4f10: 20 22 45 53 43 41 50 45 20 65 78 70 72 65 73 73   "ESCAPE express
4f20: 69 6f 6e 20 6d 75 73 74 20 62 65 20 61 20 73 69  ion must be a si
4f30: 6e 67 6c 65 20 63 68 61 72 61 63 74 65 72 22 2c  ngle character",
4f40: 20 2d 31 29 3b 0a 20 20 20 20 20 20 72 65 74 75   -1);.      retu
4f50: 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65 73  rn;.    }.    es
4f60: 63 61 70 65 20 3d 20 73 71 6c 69 74 65 33 55 74  cape = sqlite3Ut
4f70: 66 38 52 65 61 64 28 7a 45 73 63 2c 20 26 7a 45  f8Read(zEsc, &zE
4f80: 73 63 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a  sc);.  }.  if( z
4f90: 41 20 26 26 20 7a 42 20 29 7b 0a 20 20 20 20 73  A && zB ){.    s
4fa0: 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66  truct compareInf
4fb0: 6f 20 2a 70 49 6e 66 6f 20 3d 20 73 71 6c 69 74  o *pInfo = sqlit
4fc0: 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e  e3_user_data(con
4fd0: 74 65 78 74 29 3b 0a 23 69 66 64 65 66 20 53 51  text);.#ifdef SQ
4fe0: 4c 49 54 45 5f 54 45 53 54 0a 20 20 20 20 73 71  LITE_TEST.    sq
4ff0: 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f 75 6e 74  lite3_like_count
5000: 2b 2b 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20 0a  ++;.#endif.    .
5010: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
5020: 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20  lt_int(context, 
5030: 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 7a  patternCompare(z
5040: 42 2c 20 7a 41 2c 20 70 49 6e 66 6f 2c 20 65 73  B, zA, pInfo, es
5050: 63 61 70 65 29 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f  cape));.  }.}../
5060: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
5070: 69 6f 6e 20 6f 66 20 74 68 65 20 4e 55 4c 4c 49  ion of the NULLI
5080: 46 28 78 2c 79 29 20 66 75 6e 63 74 69 6f 6e 2e  F(x,y) function.
5090: 20 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20    The result is 
50a0: 74 68 65 20 66 69 72 73 74 0a 2a 2a 20 61 72 67  the first.** arg
50b0: 75 6d 65 6e 74 20 69 66 20 74 68 65 20 61 72 67  ument if the arg
50c0: 75 6d 65 6e 74 73 20 61 72 65 20 64 69 66 66 65  uments are diffe
50d0: 72 65 6e 74 2e 20 20 54 68 65 20 72 65 73 75 6c  rent.  The resul
50e0: 74 20 69 73 20 4e 55 4c 4c 20 69 66 20 74 68 65  t is NULL if the
50f0: 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 73 20 61 72  .** arguments ar
5100: 65 20 65 71 75 61 6c 20 74 6f 20 65 61 63 68 20  e equal to each 
5110: 6f 74 68 65 72 2e 0a 2a 2f 0a 73 74 61 74 69 63  other..*/.static
5120: 20 76 6f 69 64 20 6e 75 6c 6c 69 66 46 75 6e 63   void nullifFunc
5130: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
5140: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
5150: 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73  int NotUsed,.  s
5160: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
5170: 72 67 76 0a 29 7b 0a 20 20 43 6f 6c 6c 53 65 71  rgv.){.  CollSeq
5180: 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74 65   *pColl = sqlite
5190: 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28  3GetFuncCollSeq(
51a0: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53  context);.  UNUS
51b0: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f 74  ED_PARAMETER(Not
51c0: 55 73 65 64 29 3b 0a 20 20 69 66 28 20 73 71 6c  Used);.  if( sql
51d0: 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28 61  ite3MemCompare(a
51e0: 72 67 76 5b 30 5d 2c 20 61 72 67 76 5b 31 5d 2c  rgv[0], argv[1],
51f0: 20 70 43 6f 6c 6c 29 21 3d 30 20 29 7b 0a 20 20   pColl)!=0 ){.  
5200: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
5210: 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20  _value(context, 
5220: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7d 0a 7d 0a  argv[0]);.  }.}.
5230: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
5240: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 71 6c  ation of the sql
5250: 69 74 65 5f 76 65 72 73 69 6f 6e 28 29 20 66 75  ite_version() fu
5260: 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73  nction.  The res
5270: 75 6c 74 20 69 73 20 74 68 65 20 76 65 72 73 69  ult is the versi
5280: 6f 6e 0a 2a 2a 20 6f 66 20 74 68 65 20 53 51 4c  on.** of the SQL
5290: 69 74 65 20 6c 69 62 72 61 72 79 20 74 68 61 74  ite library that
52a0: 20 69 73 20 72 75 6e 6e 69 6e 67 2e 0a 2a 2f 0a   is running..*/.
52b0: 73 74 61 74 69 63 20 76 6f 69 64 20 76 65 72 73  static void vers
52c0: 69 6f 6e 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  ionFunc(.  sqlit
52d0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
52e0: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
52f0: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
5300: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
5310: 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  {.  UNUSED_PARAM
5320: 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e  ETER2(NotUsed, N
5330: 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49  otUsed2);.  /* I
5340: 4d 50 3a 20 52 2d 34 38 36 39 39 2d 34 38 36 31  MP: R-48699-4861
5350: 37 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20  7 This function 
5360: 69 73 20 61 6e 20 53 51 4c 20 77 72 61 70 70 65  is an SQL wrappe
5370: 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20 20 2a  r around the.  *
5380: 2a 20 73 71 6c 69 74 65 33 5f 6c 69 62 76 65 72  * sqlite3_libver
5390: 73 69 6f 6e 28 29 20 43 2d 69 6e 74 65 72 66 61  sion() C-interfa
53a0: 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33  ce. */.  sqlite3
53b0: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
53c0: 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 6c 69  text, sqlite3_li
53d0: 62 76 65 72 73 69 6f 6e 28 29 2c 20 2d 31 2c 20  bversion(), -1, 
53e0: 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a  SQLITE_STATIC);.
53f0: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
5400: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73  ntation of the s
5410: 71 6c 69 74 65 5f 73 6f 75 72 63 65 5f 69 64 28  qlite_source_id(
5420: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 54 68 65 20  ) function. The 
5430: 72 65 73 75 6c 74 20 69 73 20 61 20 73 74 72 69  result is a stri
5440: 6e 67 0a 2a 2a 20 74 68 61 74 20 69 64 65 6e 74  ng.** that ident
5450: 69 66 69 65 73 20 74 68 65 20 70 61 72 74 69 63  ifies the partic
5460: 75 6c 61 72 20 76 65 72 73 69 6f 6e 20 6f 66 20  ular version of 
5470: 74 68 65 20 73 6f 75 72 63 65 20 63 6f 64 65 20  the source code 
5480: 75 73 65 64 20 74 6f 20 62 75 69 6c 64 0a 2a 2a  used to build.**
5490: 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a 73 74 61 74   SQLite..*/.stat
54a0: 69 63 20 76 6f 69 64 20 73 6f 75 72 63 65 69 64  ic void sourceid
54b0: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
54c0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
54d0: 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c  ,.  int NotUsed,
54e0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
54f0: 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20   **NotUsed2.){. 
5500: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
5510: 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55  R2(NotUsed, NotU
5520: 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a  sed2);.  /* IMP:
5530: 20 52 2d 32 34 34 37 30 2d 33 31 31 33 36 20 54   R-24470-31136 T
5540: 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20  his function is 
5550: 61 6e 20 53 51 4c 20 77 72 61 70 70 65 72 20 61  an SQL wrapper a
5560: 72 6f 75 6e 64 20 74 68 65 0a 20 20 2a 2a 20 73  round the.  ** s
5570: 71 6c 69 74 65 33 5f 73 6f 75 72 63 65 69 64 28  qlite3_sourceid(
5580: 29 20 43 20 69 6e 74 65 72 66 61 63 65 2e 20 2a  ) C interface. *
5590: 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  /.  sqlite3_resu
55a0: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
55b0: 20 73 71 6c 69 74 65 33 5f 73 6f 75 72 63 65 69   sqlite3_sourcei
55c0: 64 28 29 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f  d(), -1, SQLITE_
55d0: 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  STATIC);.}../*.*
55e0: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
55f0: 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f 63   of the sqlite_c
5600: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65  ompileoption_use
5610: 64 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a  d() function..**
5620: 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61   The result is a
5630: 6e 20 69 6e 74 65 67 65 72 20 74 68 61 74 20 69  n integer that i
5640: 64 65 6e 74 69 66 69 65 73 20 69 66 20 74 68 65  dentifies if the
5650: 20 63 6f 6d 70 69 6c 65 72 20 6f 70 74 69 6f 6e   compiler option
5660: 0a 2a 2a 20 77 61 73 20 75 73 65 64 20 74 6f 20  .** was used to 
5670: 62 75 69 6c 64 20 53 51 4c 69 74 65 2e 0a 2a 2f  build SQLite..*/
5680: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f  .#ifndef SQLITE_
5690: 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49  OMIT_COMPILEOPTI
56a0: 4f 4e 5f 44 49 41 47 53 0a 73 74 61 74 69 63 20  ON_DIAGS.static 
56b0: 76 6f 69 64 20 63 6f 6d 70 69 6c 65 6f 70 74 69  void compileopti
56c0: 6f 6e 75 73 65 64 46 75 6e 63 28 0a 20 20 73 71  onusedFunc(.  sq
56d0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
56e0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
56f0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
5700: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
5710: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4f 70 74  const char *zOpt
5720: 4e 61 6d 65 3b 0a 20 20 61 73 73 65 72 74 28 20  Name;.  assert( 
5730: 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55  argc==1 );.  UNU
5740: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72  SED_PARAMETER(ar
5750: 67 63 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52  gc);.  /* IMP: R
5760: 2d 78 78 78 78 20 54 68 69 73 20 66 75 6e 63 74  -xxxx This funct
5770: 69 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20 77 72  ion is an SQL wr
5780: 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65  apper around the
5790: 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 63 6f  .  ** sqlite3_co
57a0: 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64  mpileoption_used
57b0: 28 29 20 43 20 69 6e 74 65 72 66 61 63 65 2e 20  () C interface. 
57c0: 2a 2f 0a 20 20 69 66 28 20 28 7a 4f 70 74 4e 61  */.  if( (zOptNa
57d0: 6d 65 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72  me = (const char
57e0: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  *)sqlite3_value_
57f0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 29 21 3d  text(argv[0]))!=
5800: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  0 ){.    sqlite3
5810: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
5820: 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 63 6f 6d  ext, sqlite3_com
5830: 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64 28  pileoption_used(
5840: 7a 4f 70 74 4e 61 6d 65 29 29 3b 0a 20 20 7d 0a  zOptName));.  }.
5850: 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49  }.#endif /* SQLI
5860: 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f  TE_OMIT_COMPILEO
5870: 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 0a  PTION_DIAGS */..
5880: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
5890: 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 71 6c 69  tion of the sqli
58a0: 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  te_compileoption
58b0: 5f 67 65 74 28 29 20 66 75 6e 63 74 69 6f 6e 2e  _get() function.
58c0: 20 0a 2a 2a 20 54 68 65 20 72 65 73 75 6c 74 20   .** The result 
58d0: 69 73 20 61 20 73 74 72 69 6e 67 20 74 68 61 74  is a string that
58e0: 20 69 64 65 6e 74 69 66 69 65 73 20 74 68 65 20   identifies the 
58f0: 63 6f 6d 70 69 6c 65 72 20 6f 70 74 69 6f 6e 73  compiler options
5900: 20 0a 2a 2a 20 75 73 65 64 20 74 6f 20 62 75 69   .** used to bui
5910: 6c 64 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a 23 69  ld SQLite..*/.#i
5920: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
5930: 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f  T_COMPILEOPTION_
5940: 44 49 41 47 53 0a 73 74 61 74 69 63 20 76 6f 69  DIAGS.static voi
5950: 64 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 67  d compileoptiong
5960: 65 74 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  etFunc(.  sqlite
5970: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
5980: 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a  xt,.  int argc,.
5990: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
59a0: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20  **argv.){.  int 
59b0: 6e 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  n;.  assert( arg
59c0: 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44  c==1 );.  UNUSED
59d0: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
59e0: 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 78 78  ;.  /* IMP: R-xx
59f0: 78 78 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e  xx This function
5a00: 20 69 73 20 61 6e 20 53 51 4c 20 77 72 61 70 70   is an SQL wrapp
5a10: 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20 20  er around the.  
5a20: 2a 2a 20 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69  ** sqlite3_compi
5a30: 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28 29 20 43  leoption_get() C
5a40: 20 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20   interface. */. 
5a50: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   n = sqlite3_val
5a60: 75 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b  ue_int(argv[0]);
5a70: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
5a80: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
5a90: 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f  sqlite3_compileo
5aa0: 70 74 69 6f 6e 5f 67 65 74 28 6e 29 2c 20 2d 31  ption_get(n), -1
5ab0: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29  , SQLITE_STATIC)
5ac0: 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51  ;.}.#endif /* SQ
5ad0: 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c  LITE_OMIT_COMPIL
5ae0: 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f  EOPTION_DIAGS */
5af0: 0a 0a 2f 2a 20 41 72 72 61 79 20 66 6f 72 20 63  ../* Array for c
5b00: 6f 6e 76 65 72 74 69 6e 67 20 66 72 6f 6d 20 68  onverting from h
5b10: 61 6c 66 2d 62 79 74 65 73 20 28 6e 79 62 62 6c  alf-bytes (nybbl
5b20: 65 73 29 20 69 6e 74 6f 20 41 53 43 49 49 20 68  es) into ASCII h
5b30: 65 78 0a 2a 2a 20 64 69 67 69 74 73 2e 20 2a 2f  ex.** digits. */
5b40: 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68  .static const ch
5b50: 61 72 20 68 65 78 64 69 67 69 74 73 5b 5d 20 3d  ar hexdigits[] =
5b60: 20 7b 0a 20 20 27 30 27 2c 20 27 31 27 2c 20 27   {.  '0', '1', '
5b70: 32 27 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35  2', '3', '4', '5
5b80: 27 2c 20 27 36 27 2c 20 27 37 27 2c 0a 20 20 27  ', '6', '7',.  '
5b90: 38 27 2c 20 27 39 27 2c 20 27 41 27 2c 20 27 42  8', '9', 'A', 'B
5ba0: 27 2c 20 27 43 27 2c 20 27 44 27 2c 20 27 45 27  ', 'C', 'D', 'E'
5bb0: 2c 20 27 46 27 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a  , 'F' .};../*.**
5bc0: 20 45 58 50 45 52 49 4d 45 4e 54 41 4c 20 2d 20   EXPERIMENTAL - 
5bd0: 54 68 69 73 20 69 73 20 6e 6f 74 20 61 6e 20 6f  This is not an o
5be0: 66 66 69 63 69 61 6c 20 66 75 6e 63 74 69 6f 6e  fficial function
5bf0: 2e 20 20 54 68 65 20 69 6e 74 65 72 66 61 63 65  .  The interface
5c00: 20 6d 61 79 0a 2a 2a 20 63 68 61 6e 67 65 2e 20   may.** change. 
5c10: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 6d   This function m
5c20: 61 79 20 64 69 73 61 70 70 65 61 72 2e 20 20 44  ay disappear.  D
5c30: 6f 20 6e 6f 74 20 77 72 69 74 65 20 63 6f 64 65  o not write code
5c40: 20 74 68 61 74 20 64 65 70 65 6e 64 73 0a 2a 2a   that depends.**
5c50: 20 6f 6e 20 74 68 69 73 20 66 75 6e 63 74 69 6f   on this functio
5c60: 6e 2e 0a 2a 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  n..**.** Impleme
5c70: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 51  ntation of the Q
5c80: 55 4f 54 45 28 29 20 66 75 6e 63 74 69 6f 6e 2e  UOTE() function.
5c90: 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20    This function 
5ca0: 74 61 6b 65 73 20 61 20 73 69 6e 67 6c 65 0a 2a  takes a single.*
5cb0: 2a 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20  * argument.  If 
5cc0: 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20  the argument is 
5cd0: 6e 75 6d 65 72 69 63 2c 20 74 68 65 20 72 65 74  numeric, the ret
5ce0: 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65  urn value is the
5cf0: 20 73 61 6d 65 20 61 73 0a 2a 2a 20 74 68 65 20   same as.** the 
5d00: 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74 68  argument.  If th
5d10: 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 4e 55  e argument is NU
5d20: 4c 4c 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76  LL, the return v
5d30: 61 6c 75 65 20 69 73 20 74 68 65 20 73 74 72 69  alue is the stri
5d40: 6e 67 0a 2a 2a 20 22 4e 55 4c 4c 22 2e 20 20 4f  ng.** "NULL".  O
5d50: 74 68 65 72 77 69 73 65 2c 20 74 68 65 20 61 72  therwise, the ar
5d60: 67 75 6d 65 6e 74 20 69 73 20 65 6e 63 6c 6f 73  gument is enclos
5d70: 65 64 20 69 6e 20 73 69 6e 67 6c 65 20 71 75 6f  ed in single quo
5d80: 74 65 73 20 77 69 74 68 0a 2a 2a 20 73 69 6e 67  tes with.** sing
5d90: 6c 65 2d 71 75 6f 74 65 20 65 73 63 61 70 65 73  le-quote escapes
5da0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
5db0: 20 71 75 6f 74 65 46 75 6e 63 28 73 71 6c 69 74   quoteFunc(sqlit
5dc0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
5dd0: 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73  ext, int argc, s
5de0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
5df0: 72 67 76 29 7b 0a 20 20 61 73 73 65 72 74 28 20  rgv){.  assert( 
5e00: 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55  argc==1 );.  UNU
5e10: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72  SED_PARAMETER(ar
5e20: 67 63 29 3b 0a 20 20 73 77 69 74 63 68 28 20 73  gc);.  switch( s
5e30: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
5e40: 65 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20  e(argv[0]) ){.  
5e50: 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e    case SQLITE_IN
5e60: 54 45 47 45 52 3a 0a 20 20 20 20 63 61 73 65 20  TEGER:.    case 
5e70: 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b 0a  SQLITE_FLOAT: {.
5e80: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
5e90: 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65  sult_value(conte
5ea0: 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20  xt, argv[0]);.  
5eb0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
5ec0: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
5ed0: 5f 42 4c 4f 42 3a 20 7b 0a 20 20 20 20 20 20 63  _BLOB: {.      c
5ee0: 68 61 72 20 2a 7a 54 65 78 74 20 3d 20 30 3b 0a  har *zText = 0;.
5ef0: 20 20 20 20 20 20 63 68 61 72 20 63 6f 6e 73 74        char const
5f00: 20 2a 7a 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65   *zBlob = sqlite
5f10: 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67  3_value_blob(arg
5f20: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 6e 74  v[0]);.      int
5f30: 20 6e 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33   nBlob = sqlite3
5f40: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
5f50: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 61 73 73  v[0]);.      ass
5f60: 65 72 74 28 20 7a 42 6c 6f 62 3d 3d 73 71 6c 69  ert( zBlob==sqli
5f70: 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61  te3_value_blob(a
5f80: 72 67 76 5b 30 5d 29 20 29 3b 20 2f 2a 20 4e 6f  rgv[0]) ); /* No
5f90: 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67 65   encoding change
5fa0: 20 2a 2f 0a 20 20 20 20 20 20 7a 54 65 78 74 20   */.      zText 
5fb0: 3d 20 28 63 68 61 72 20 2a 29 63 6f 6e 74 65 78  = (char *)contex
5fc0: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
5fd0: 20 28 32 2a 28 69 36 34 29 6e 42 6c 6f 62 29 2b   (2*(i64)nBlob)+
5fe0: 34 29 3b 20 0a 20 20 20 20 20 20 69 66 28 20 7a  4); .      if( z
5ff0: 54 65 78 74 20 29 7b 0a 20 20 20 20 20 20 20 20  Text ){.        
6000: 69 6e 74 20 69 3b 0a 20 20 20 20 20 20 20 20 66  int i;.        f
6010: 6f 72 28 69 3d 30 3b 20 69 3c 6e 42 6c 6f 62 3b  or(i=0; i<nBlob;
6020: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20   i++){.         
6030: 20 7a 54 65 78 74 5b 28 69 2a 32 29 2b 32 5d 20   zText[(i*2)+2] 
6040: 3d 20 68 65 78 64 69 67 69 74 73 5b 28 7a 42 6c  = hexdigits[(zBl
6050: 6f 62 5b 69 5d 3e 3e 34 29 26 30 78 30 46 5d 3b  ob[i]>>4)&0x0F];
6060: 0a 20 20 20 20 20 20 20 20 20 20 7a 54 65 78 74  .          zText
6070: 5b 28 69 2a 32 29 2b 33 5d 20 3d 20 68 65 78 64  [(i*2)+3] = hexd
6080: 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 29  igits[(zBlob[i])
6090: 26 30 78 30 46 5d 3b 0a 20 20 20 20 20 20 20 20  &0x0F];.        
60a0: 7d 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b  }.        zText[
60b0: 28 6e 42 6c 6f 62 2a 32 29 2b 32 5d 20 3d 20 27  (nBlob*2)+2] = '
60c0: 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65  \'';.        zTe
60d0: 78 74 5b 28 6e 42 6c 6f 62 2a 32 29 2b 33 5d 20  xt[(nBlob*2)+3] 
60e0: 3d 20 27 5c 30 27 3b 0a 20 20 20 20 20 20 20 20  = '\0';.        
60f0: 7a 54 65 78 74 5b 30 5d 20 3d 20 27 58 27 3b 0a  zText[0] = 'X';.
6100: 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 31 5d          zText[1]
6110: 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20   = '\'';.       
6120: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
6130: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 54  text(context, zT
6140: 65 78 74 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f  ext, -1, SQLITE_
6150: 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20  TRANSIENT);.    
6160: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
6170: 28 7a 54 65 78 74 29 3b 0a 20 20 20 20 20 20 7d  (zText);.      }
6180: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  .      break;.  
6190: 20 20 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c    }.    case SQL
61a0: 49 54 45 5f 54 45 58 54 3a 20 7b 0a 20 20 20 20  ITE_TEXT: {.    
61b0: 20 20 69 6e 74 20 69 2c 6a 3b 0a 20 20 20 20 20    int i,j;.     
61c0: 20 75 36 34 20 6e 3b 0a 20 20 20 20 20 20 63 6f   u64 n;.      co
61d0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
61e0: 72 20 2a 7a 41 72 67 20 3d 20 73 71 6c 69 74 65  r *zArg = sqlite
61f0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
6200: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 63 68 61  v[0]);.      cha
6210: 72 20 2a 7a 3b 0a 0a 20 20 20 20 20 20 69 66 28  r *z;..      if(
6220: 20 7a 41 72 67 3d 3d 30 20 29 20 72 65 74 75 72   zArg==0 ) retur
6230: 6e 3b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30  n;.      for(i=0
6240: 2c 20 6e 3d 30 3b 20 7a 41 72 67 5b 69 5d 3b 20  , n=0; zArg[i]; 
6250: 69 2b 2b 29 7b 20 69 66 28 20 7a 41 72 67 5b 69  i++){ if( zArg[i
6260: 5d 3d 3d 27 5c 27 27 20 29 20 6e 2b 2b 3b 20 7d  ]=='\'' ) n++; }
6270: 0a 20 20 20 20 20 20 7a 20 3d 20 63 6f 6e 74 65  .      z = conte
6280: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
6290: 2c 20 28 28 69 36 34 29 69 29 2b 28 28 69 36 34  , ((i64)i)+((i64
62a0: 29 6e 29 2b 33 29 3b 0a 20 20 20 20 20 20 69 66  )n)+3);.      if
62b0: 28 20 7a 20 29 7b 0a 20 20 20 20 20 20 20 20 7a  ( z ){.        z
62c0: 5b 30 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20  [0] = '\'';.    
62d0: 20 20 20 20 66 6f 72 28 69 3d 30 2c 20 6a 3d 31      for(i=0, j=1
62e0: 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b  ; zArg[i]; i++){
62f0: 0a 20 20 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b  .          z[j++
6300: 5d 20 3d 20 7a 41 72 67 5b 69 5d 3b 0a 20 20 20  ] = zArg[i];.   
6310: 20 20 20 20 20 20 20 69 66 28 20 7a 41 72 67 5b         if( zArg[
6320: 69 5d 3d 3d 27 5c 27 27 20 29 7b 0a 20 20 20 20  i]=='\'' ){.    
6330: 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d          z[j++] =
6340: 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 20   '\'';.         
6350: 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20   }.        }.   
6360: 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c       z[j++] = '\
6370: 27 27 3b 0a 20 20 20 20 20 20 20 20 7a 5b 6a 5d  '';.        z[j]
6380: 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 73 71   = 0;.        sq
6390: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
63a0: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 2c 20 6a 2c  t(context, z, j,
63b0: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a   sqlite3_free);.
63c0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 62 72        }.      br
63d0: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64  eak;.    }.    d
63e0: 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20  efault: {.      
63f0: 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f  assert( sqlite3_
6400: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
6410: 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  0])==SQLITE_NULL
6420: 20 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   );.      sqlite
6430: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
6440: 6e 74 65 78 74 2c 20 22 4e 55 4c 4c 22 2c 20 34  ntext, "NULL", 4
6450: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29  , SQLITE_STATIC)
6460: 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20  ;.      break;. 
6470: 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a     }.  }.}../*.*
6480: 2a 20 54 68 65 20 68 65 78 28 29 20 66 75 6e 63  * The hex() func
6490: 74 69 6f 6e 2e 20 20 49 6e 74 65 72 70 72 65 74  tion.  Interpret
64a0: 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 61 73   the argument as
64b0: 20 61 20 62 6c 6f 62 2e 20 20 52 65 74 75 72 6e   a blob.  Return
64c0: 0a 2a 2a 20 61 20 68 65 78 61 64 65 63 69 6d 61  .** a hexadecima
64d0: 6c 20 72 65 6e 64 65 72 69 6e 67 20 61 73 20 74  l rendering as t
64e0: 65 78 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ext..*/.static v
64f0: 6f 69 64 20 68 65 78 46 75 6e 63 28 0a 20 20 73  oid hexFunc(.  s
6500: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
6510: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
6520: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
6530: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
6540: 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 63 6f 6e   int i, n;.  con
6550: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
6560: 20 2a 70 42 6c 6f 62 3b 0a 20 20 63 68 61 72 20   *pBlob;.  char 
6570: 2a 7a 48 65 78 2c 20 2a 7a 3b 0a 20 20 61 73 73  *zHex, *z;.  ass
6580: 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a  ert( argc==1 );.
6590: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
65a0: 45 52 28 61 72 67 63 29 3b 0a 20 20 70 42 6c 6f  ER(argc);.  pBlo
65b0: 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  b = sqlite3_valu
65c0: 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b  e_blob(argv[0]);
65d0: 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76  .  n = sqlite3_v
65e0: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
65f0: 30 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70  0]);.  assert( p
6600: 42 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61  Blob==sqlite3_va
6610: 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d  lue_blob(argv[0]
6620: 29 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f  ) );  /* No enco
6630: 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20  ding change */. 
6640: 20 7a 20 3d 20 7a 48 65 78 20 3d 20 63 6f 6e 74   z = zHex = cont
6650: 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78  extMalloc(contex
6660: 74 2c 20 28 28 69 36 34 29 6e 29 2a 32 20 2b 20  t, ((i64)n)*2 + 
6670: 31 29 3b 0a 20 20 69 66 28 20 7a 48 65 78 20 29  1);.  if( zHex )
6680: 7b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69  {.    for(i=0; i
6690: 3c 6e 3b 20 69 2b 2b 2c 20 70 42 6c 6f 62 2b 2b  <n; i++, pBlob++
66a0: 29 7b 0a 20 20 20 20 20 20 75 6e 73 69 67 6e 65  ){.      unsigne
66b0: 64 20 63 68 61 72 20 63 20 3d 20 2a 70 42 6c 6f  d char c = *pBlo
66c0: 62 3b 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20  b;.      *(z++) 
66d0: 3d 20 68 65 78 64 69 67 69 74 73 5b 28 63 3e 3e  = hexdigits[(c>>
66e0: 34 29 26 30 78 66 5d 3b 0a 20 20 20 20 20 20 2a  4)&0xf];.      *
66f0: 28 7a 2b 2b 29 20 3d 20 68 65 78 64 69 67 69 74  (z++) = hexdigit
6700: 73 5b 63 26 30 78 66 5d 3b 0a 20 20 20 20 7d 0a  s[c&0xf];.    }.
6710: 20 20 20 20 2a 7a 20 3d 20 30 3b 0a 20 20 20 20      *z = 0;.    
6720: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
6730: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 48 65  ext(context, zHe
6740: 78 2c 20 6e 2a 32 2c 20 73 71 6c 69 74 65 33 5f  x, n*2, sqlite3_
6750: 66 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a  free);.  }.}../*
6760: 0a 2a 2a 20 54 68 65 20 7a 65 72 6f 62 6c 6f 62  .** The zeroblob
6770: 28 4e 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74  (N) function ret
6780: 75 72 6e 73 20 61 20 7a 65 72 6f 2d 66 69 6c 6c  urns a zero-fill
6790: 65 64 20 62 6c 6f 62 20 6f 66 20 73 69 7a 65 20  ed blob of size 
67a0: 4e 20 62 79 74 65 73 2e 0a 2a 2f 0a 73 74 61 74  N bytes..*/.stat
67b0: 69 63 20 76 6f 69 64 20 7a 65 72 6f 62 6c 6f 62  ic void zeroblob
67c0: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
67d0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
67e0: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
67f0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
6800: 61 72 67 76 0a 29 7b 0a 20 20 69 36 34 20 6e 3b  argv.){.  i64 n;
6810: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d  .  sqlite3 *db =
6820: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
6830: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
6840: 78 74 29 3b 0a 20 20 61 73 73 65 72 74 28 20 61  xt);.  assert( a
6850: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
6860: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
6870: 63 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65  c);.  n = sqlite
6880: 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72  3_value_int64(ar
6890: 67 76 5b 30 5d 29 3b 0a 20 20 74 65 73 74 63 61  gv[0]);.  testca
68a0: 73 65 28 20 6e 3d 3d 64 62 2d 3e 61 4c 69 6d 69  se( n==db->aLimi
68b0: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
68c0: 45 4e 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74  ENGTH] );.  test
68d0: 63 61 73 65 28 20 6e 3d 3d 64 62 2d 3e 61 4c 69  case( n==db->aLi
68e0: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
68f0: 5f 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20  _LENGTH]+1 );.  
6900: 69 66 28 20 6e 3e 64 62 2d 3e 61 4c 69 6d 69 74  if( n>db->aLimit
6910: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45  [SQLITE_LIMIT_LE
6920: 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c  NGTH] ){.    sql
6930: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
6940: 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74  r_toobig(context
6950: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
6960: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 7a  sqlite3_result_z
6970: 65 72 6f 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c  eroblob(context,
6980: 20 28 69 6e 74 29 6e 29 3b 20 2f 2a 20 49 4d 50   (int)n); /* IMP
6990: 3a 20 52 2d 30 30 32 39 33 2d 36 34 39 39 34 20  : R-00293-64994 
69a0: 2a 2f 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  */.  }.}../*.** 
69b0: 54 68 65 20 72 65 70 6c 61 63 65 28 29 20 66 75  The replace() fu
69c0: 6e 63 74 69 6f 6e 2e 20 20 54 68 72 65 65 20 61  nction.  Three a
69d0: 72 67 75 6d 65 6e 74 73 20 61 72 65 20 61 6c 6c  rguments are all
69e0: 20 73 74 72 69 6e 67 73 3a 20 63 61 6c 6c 0a 2a   strings: call.*
69f0: 2a 20 74 68 65 6d 20 41 2c 20 42 2c 20 61 6e 64  * them A, B, and
6a00: 20 43 2e 20 54 68 65 20 72 65 73 75 6c 74 20 69   C. The result i
6a10: 73 20 61 6c 73 6f 20 61 20 73 74 72 69 6e 67 20  s also a string 
6a20: 77 68 69 63 68 20 69 73 20 64 65 72 69 76 65 64  which is derived
6a30: 0a 2a 2a 20 66 72 6f 6d 20 41 20 62 79 20 72 65  .** from A by re
6a40: 70 6c 61 63 69 6e 67 20 65 76 65 72 79 20 6f 63  placing every oc
6a50: 63 75 72 61 6e 63 65 20 6f 66 20 42 20 77 69 74  curance of B wit
6a60: 68 20 43 2e 20 20 54 68 65 20 6d 61 74 63 68 0a  h C.  The match.
6a70: 2a 2a 20 6d 75 73 74 20 62 65 20 65 78 61 63 74  ** must be exact
6a80: 2e 20 20 43 6f 6c 6c 61 74 69 6e 67 20 73 65 71  .  Collating seq
6a90: 75 65 6e 63 65 73 20 61 72 65 20 6e 6f 74 20 75  uences are not u
6aa0: 73 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  sed..*/.static v
6ab0: 6f 69 64 20 72 65 70 6c 61 63 65 46 75 6e 63 28  oid replaceFunc(
6ac0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
6ad0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
6ae0: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
6af0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
6b00: 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  ){.  const unsig
6b10: 6e 65 64 20 63 68 61 72 20 2a 7a 53 74 72 3b 20  ned char *zStr; 
6b20: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 69 6e         /* The in
6b30: 70 75 74 20 73 74 72 69 6e 67 20 41 20 2a 2f 0a  put string A */.
6b40: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
6b50: 20 63 68 61 72 20 2a 7a 50 61 74 74 65 72 6e 3b   char *zPattern;
6b60: 20 20 20 20 2f 2a 20 54 68 65 20 70 61 74 74 65      /* The patte
6b70: 72 6e 20 73 74 72 69 6e 67 20 42 20 2a 2f 0a 20  rn string B */. 
6b80: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
6b90: 63 68 61 72 20 2a 7a 52 65 70 3b 20 20 20 20 20  char *zRep;     
6ba0: 20 20 20 2f 2a 20 54 68 65 20 72 65 70 6c 61 63     /* The replac
6bb0: 65 6d 65 6e 74 20 73 74 72 69 6e 67 20 43 20 2a  ement string C *
6bc0: 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61  /.  unsigned cha
6bd0: 72 20 2a 7a 4f 75 74 3b 20 20 20 20 20 20 20 20  r *zOut;        
6be0: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 6f 75 74        /* The out
6bf0: 70 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 53 74  put */.  int nSt
6c00: 72 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  r;              
6c10: 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 53 74    /* Size of zSt
6c20: 72 20 2a 2f 0a 20 20 69 6e 74 20 6e 50 61 74 74  r */.  int nPatt
6c30: 65 72 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20  ern;            
6c40: 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 50 61 74 74  /* Size of zPatt
6c50: 65 72 6e 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65  ern */.  int nRe
6c60: 70 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  p;              
6c70: 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 52 65    /* Size of zRe
6c80: 70 20 2a 2f 0a 20 20 69 36 34 20 6e 4f 75 74 3b  p */.  i64 nOut;
6c90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6ca0: 2f 2a 20 4d 61 78 69 6d 75 6d 20 73 69 7a 65 20  /* Maximum size 
6cb0: 6f 66 20 7a 4f 75 74 20 2a 2f 0a 20 20 69 6e 74  of zOut */.  int
6cc0: 20 6c 6f 6f 70 4c 69 6d 69 74 3b 20 20 20 20 20   loopLimit;     
6cd0: 20 20 20 20 20 20 2f 2a 20 4c 61 73 74 20 7a 53        /* Last zS
6ce0: 74 72 5b 5d 20 74 68 61 74 20 6d 69 67 68 74 20  tr[] that might 
6cf0: 6d 61 74 63 68 20 7a 50 61 74 74 65 72 6e 5b 5d  match zPattern[]
6d00: 20 2a 2f 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 20   */.  int i, j; 
6d10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
6d20: 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 73 20  * Loop counters 
6d30: 2a 2f 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72  */..  assert( ar
6d40: 67 63 3d 3d 33 20 29 3b 0a 20 20 55 4e 55 53 45  gc==3 );.  UNUSE
6d50: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
6d60: 29 3b 0a 20 20 7a 53 74 72 20 3d 20 73 71 6c 69  );.  zStr = sqli
6d70: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
6d80: 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a  rgv[0]);.  if( z
6d90: 53 74 72 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b  Str==0 ) return;
6da0: 0a 20 20 6e 53 74 72 20 3d 20 73 71 6c 69 74 65  .  nStr = sqlite
6db0: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
6dc0: 67 76 5b 30 5d 29 3b 0a 20 20 61 73 73 65 72 74  gv[0]);.  assert
6dd0: 28 20 7a 53 74 72 3d 3d 73 71 6c 69 74 65 33 5f  ( zStr==sqlite3_
6de0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
6df0: 30 5d 29 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e  0]) );  /* No en
6e00: 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f  coding change */
6e10: 0a 20 20 7a 50 61 74 74 65 72 6e 20 3d 20 73 71  .  zPattern = sq
6e20: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
6e30: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28  (argv[1]);.  if(
6e40: 20 7a 50 61 74 74 65 72 6e 3d 3d 30 20 29 7b 0a   zPattern==0 ){.
6e50: 20 20 20 20 61 73 73 65 72 74 28 20 73 71 6c 69      assert( sqli
6e60: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
6e70: 72 67 76 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f  rgv[1])==SQLITE_
6e80: 4e 55 4c 4c 0a 20 20 20 20 20 20 20 20 20 20 20  NULL.           
6e90: 20 7c 7c 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74   || sqlite3_cont
6ea0: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
6eb0: 6e 74 65 78 74 29 2d 3e 6d 61 6c 6c 6f 63 46 61  ntext)->mallocFa
6ec0: 69 6c 65 64 20 29 3b 0a 20 20 20 20 72 65 74 75  iled );.    retu
6ed0: 72 6e 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 50  rn;.  }.  if( zP
6ee0: 61 74 74 65 72 6e 5b 30 5d 3d 3d 30 20 29 7b 0a  attern[0]==0 ){.
6ef0: 20 20 20 20 61 73 73 65 72 74 28 20 73 71 6c 69      assert( sqli
6f00: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
6f10: 72 67 76 5b 31 5d 29 21 3d 53 51 4c 49 54 45 5f  rgv[1])!=SQLITE_
6f20: 4e 55 4c 4c 20 29 3b 0a 20 20 20 20 73 71 6c 69  NULL );.    sqli
6f30: 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65  te3_result_value
6f40: 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 30  (context, argv[0
6f50: 5d 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  ]);.    return;.
6f60: 20 20 7d 0a 20 20 6e 50 61 74 74 65 72 6e 20 3d    }.  nPattern =
6f70: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
6f80: 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b 0a 20  ytes(argv[1]);. 
6f90: 20 61 73 73 65 72 74 28 20 7a 50 61 74 74 65 72   assert( zPatter
6fa0: 6e 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  n==sqlite3_value
6fb0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 20 29  _text(argv[1]) )
6fc0: 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e  ;  /* No encodin
6fd0: 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 52  g change */.  zR
6fe0: 65 70 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ep = sqlite3_val
6ff0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d 29  ue_text(argv[2])
7000: 3b 0a 20 20 69 66 28 20 7a 52 65 70 3d 3d 30 20  ;.  if( zRep==0 
7010: 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 52 65 70  ) return;.  nRep
7020: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
7030: 5f 62 79 74 65 73 28 61 72 67 76 5b 32 5d 29 3b  _bytes(argv[2]);
7040: 0a 20 20 61 73 73 65 72 74 28 20 7a 52 65 70 3d  .  assert( zRep=
7050: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
7060: 65 78 74 28 61 72 67 76 5b 32 5d 29 20 29 3b 0a  ext(argv[2]) );.
7070: 20 20 6e 4f 75 74 20 3d 20 6e 53 74 72 20 2b 20    nOut = nStr + 
7080: 31 3b 0a 20 20 61 73 73 65 72 74 28 20 6e 4f 75  1;.  assert( nOu
7090: 74 3c 53 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e  t<SQLITE_MAX_LEN
70a0: 47 54 48 20 29 3b 0a 20 20 7a 4f 75 74 20 3d 20  GTH );.  zOut = 
70b0: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
70c0: 6e 74 65 78 74 2c 20 28 69 36 34 29 6e 4f 75 74  ntext, (i64)nOut
70d0: 29 3b 0a 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30  );.  if( zOut==0
70e0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a   ){.    return;.
70f0: 20 20 7d 0a 20 20 6c 6f 6f 70 4c 69 6d 69 74 20    }.  loopLimit 
7100: 3d 20 6e 53 74 72 20 2d 20 6e 50 61 74 74 65 72  = nStr - nPatter
7110: 6e 3b 20 20 0a 20 20 66 6f 72 28 69 3d 6a 3d 30  n;  .  for(i=j=0
7120: 3b 20 69 3c 3d 6c 6f 6f 70 4c 69 6d 69 74 3b 20  ; i<=loopLimit; 
7130: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 53  i++){.    if( zS
7140: 74 72 5b 69 5d 21 3d 7a 50 61 74 74 65 72 6e 5b  tr[i]!=zPattern[
7150: 30 5d 20 7c 7c 20 6d 65 6d 63 6d 70 28 26 7a 53  0] || memcmp(&zS
7160: 74 72 5b 69 5d 2c 20 7a 50 61 74 74 65 72 6e 2c  tr[i], zPattern,
7170: 20 6e 50 61 74 74 65 72 6e 29 20 29 7b 0a 20 20   nPattern) ){.  
7180: 20 20 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20      zOut[j++] = 
7190: 7a 53 74 72 5b 69 5d 3b 0a 20 20 20 20 7d 65 6c  zStr[i];.    }el
71a0: 73 65 7b 0a 20 20 20 20 20 20 75 38 20 2a 7a 4f  se{.      u8 *zO
71b0: 6c 64 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  ld;.      sqlite
71c0: 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  3 *db = sqlite3_
71d0: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
71e0: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  e(context);.    
71f0: 20 20 6e 4f 75 74 20 2b 3d 20 6e 52 65 70 20 2d    nOut += nRep -
7200: 20 6e 50 61 74 74 65 72 6e 3b 0a 20 20 20 20 20   nPattern;.     
7210: 20 74 65 73 74 63 61 73 65 28 20 6e 4f 75 74 2d   testcase( nOut-
7220: 31 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  1==db->aLimit[SQ
7230: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
7240: 48 5d 20 29 3b 0a 20 20 20 20 20 20 74 65 73 74  H] );.      test
7250: 63 61 73 65 28 20 6e 4f 75 74 2d 32 3d 3d 64 62  case( nOut-2==db
7260: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
7270: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b  LIMIT_LENGTH] );
7280: 0a 20 20 20 20 20 20 69 66 28 20 6e 4f 75 74 2d  .      if( nOut-
7290: 31 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  1>db->aLimit[SQL
72a0: 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48  ITE_LIMIT_LENGTH
72b0: 5d 20 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c  ] ){.        sql
72c0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
72d0: 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74  r_toobig(context
72e0: 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  );.        sqlit
72f0: 65 33 44 62 46 72 65 65 28 64 62 2c 20 7a 4f 75  e3DbFree(db, zOu
7300: 74 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75  t);.        retu
7310: 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  rn;.      }.    
7320: 20 20 7a 4f 6c 64 20 3d 20 7a 4f 75 74 3b 0a 20    zOld = zOut;. 
7330: 20 20 20 20 20 7a 4f 75 74 20 3d 20 73 71 6c 69       zOut = sqli
7340: 74 65 33 5f 72 65 61 6c 6c 6f 63 28 7a 4f 75 74  te3_realloc(zOut
7350: 2c 20 28 69 6e 74 29 6e 4f 75 74 29 3b 0a 20 20  , (int)nOut);.  
7360: 20 20 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20      if( zOut==0 
7370: 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  ){.        sqlit
7380: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
7390: 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a  nomem(context);.
73a0: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 44          sqlite3D
73b0: 62 46 72 65 65 28 64 62 2c 20 7a 4f 6c 64 29 3b  bFree(db, zOld);
73c0: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b  .        return;
73d0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 6d  .      }.      m
73e0: 65 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20  emcpy(&zOut[j], 
73f0: 7a 52 65 70 2c 20 6e 52 65 70 29 3b 0a 20 20 20  zRep, nRep);.   
7400: 20 20 20 6a 20 2b 3d 20 6e 52 65 70 3b 0a 20 20     j += nRep;.  
7410: 20 20 20 20 69 20 2b 3d 20 6e 50 61 74 74 65 72      i += nPatter
7420: 6e 2d 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  n-1;.    }.  }. 
7430: 20 61 73 73 65 72 74 28 20 6a 2b 6e 53 74 72 2d   assert( j+nStr-
7440: 69 2b 31 3d 3d 6e 4f 75 74 20 29 3b 0a 20 20 6d  i+1==nOut );.  m
7450: 65 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20  emcpy(&zOut[j], 
7460: 26 7a 53 74 72 5b 69 5d 2c 20 6e 53 74 72 2d 69  &zStr[i], nStr-i
7470: 29 3b 0a 20 20 6a 20 2b 3d 20 6e 53 74 72 20 2d  );.  j += nStr -
7480: 20 69 3b 0a 20 20 61 73 73 65 72 74 28 20 6a 3c   i;.  assert( j<
7490: 3d 6e 4f 75 74 20 29 3b 0a 20 20 7a 4f 75 74 5b  =nOut );.  zOut[
74a0: 6a 5d 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65  j] = 0;.  sqlite
74b0: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
74c0: 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 4f  ntext, (char*)zO
74d0: 75 74 2c 20 6a 2c 20 73 71 6c 69 74 65 33 5f 66  ut, j, sqlite3_f
74e0: 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  ree);.}../*.** I
74f0: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
7500: 20 74 68 65 20 54 52 49 4d 28 29 2c 20 4c 54 52   the TRIM(), LTR
7510: 49 4d 28 29 2c 20 61 6e 64 20 52 54 52 49 4d 28  IM(), and RTRIM(
7520: 29 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2a 20  ) functions..** 
7530: 54 68 65 20 75 73 65 72 64 61 74 61 20 69 73 20  The userdata is 
7540: 30 78 31 20 66 6f 72 20 6c 65 66 74 20 74 72 69  0x1 for left tri
7550: 6d 2c 20 30 78 32 20 66 6f 72 20 72 69 67 68 74  m, 0x2 for right
7560: 20 74 72 69 6d 2c 20 30 78 33 20 66 6f 72 20 62   trim, 0x3 for b
7570: 6f 74 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  oth..*/.static v
7580: 6f 69 64 20 74 72 69 6d 46 75 6e 63 28 0a 20 20  oid trimFunc(.  
7590: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
75a0: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
75b0: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
75c0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
75d0: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
75e0: 20 63 68 61 72 20 2a 7a 49 6e 3b 20 20 20 20 20   char *zIn;     
75f0: 20 20 20 20 2f 2a 20 49 6e 70 75 74 20 73 74 72      /* Input str
7600: 69 6e 67 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75  ing */.  const u
7610: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 43  nsigned char *zC
7620: 68 61 72 53 65 74 3b 20 20 20 20 2f 2a 20 53 65  harSet;    /* Se
7630: 74 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20  t of characters 
7640: 74 6f 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74  to trim */.  int
7650: 20 6e 49 6e 3b 20 20 20 20 20 20 20 20 20 20 20   nIn;           
7660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
7670: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 62 79 74 65  * Number of byte
7680: 73 20 69 6e 20 69 6e 70 75 74 20 2a 2f 0a 20 20  s in input */.  
7690: 69 6e 74 20 66 6c 61 67 73 3b 20 20 20 20 20 20  int flags;      
76a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
76b0: 20 20 2f 2a 20 31 3a 20 74 72 69 6d 6c 65 66 74    /* 1: trimleft
76c0: 20 20 32 3a 20 74 72 69 6d 72 69 67 68 74 20 20    2: trimright  
76d0: 33 3a 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74  3: trim */.  int
76e0: 20 69 3b 20 20 20 20 20 20 20 20 20 20 20 20 20   i;             
76f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
7700: 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a  * Loop counter *
7710: 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61  /.  unsigned cha
7720: 72 20 2a 61 4c 65 6e 20 3d 20 30 3b 20 20 20 20  r *aLen = 0;    
7730: 20 20 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20        /* Length 
7740: 6f 66 20 65 61 63 68 20 63 68 61 72 61 63 74 65  of each characte
7750: 72 20 69 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f  r in zCharSet */
7760: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
7770: 20 2a 2a 61 7a 43 68 61 72 20 3d 20 30 3b 20 20   **azChar = 0;  
7780: 20 20 20 20 20 2f 2a 20 49 6e 64 69 76 69 64 75       /* Individu
7790: 61 6c 20 63 68 61 72 61 63 74 65 72 73 20 69 6e  al characters in
77a0: 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20 20 69   zCharSet */.  i
77b0: 6e 74 20 6e 43 68 61 72 3b 20 20 20 20 20 20 20  nt nChar;       
77c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
77d0: 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 63 68   /* Number of ch
77e0: 61 72 61 63 74 65 72 73 20 69 6e 20 7a 43 68 61  aracters in zCha
77f0: 72 53 65 74 20 2a 2f 0a 0a 20 20 69 66 28 20 73  rSet */..  if( s
7800: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
7810: 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49  e(argv[0])==SQLI
7820: 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 72  TE_NULL ){.    r
7830: 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 7a 49 6e  eturn;.  }.  zIn
7840: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
7850: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
7860: 20 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20 72    if( zIn==0 ) r
7870: 65 74 75 72 6e 3b 0a 20 20 6e 49 6e 20 3d 20 73  eturn;.  nIn = s
7880: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
7890: 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61  es(argv[0]);.  a
78a0: 73 73 65 72 74 28 20 7a 49 6e 3d 3d 73 71 6c 69  ssert( zIn==sqli
78b0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
78c0: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28  rgv[0]) );.  if(
78d0: 20 61 72 67 63 3d 3d 31 20 29 7b 0a 20 20 20 20   argc==1 ){.    
78e0: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e 73  static const uns
78f0: 69 67 6e 65 64 20 63 68 61 72 20 6c 65 6e 4f 6e  igned char lenOn
7900: 65 5b 5d 20 3d 20 7b 20 31 20 7d 3b 0a 20 20 20  e[] = { 1 };.   
7910: 20 73 74 61 74 69 63 20 75 6e 73 69 67 6e 65 64   static unsigned
7920: 20 63 68 61 72 20 2a 20 63 6f 6e 73 74 20 61 7a   char * const az
7930: 4f 6e 65 5b 5d 20 3d 20 7b 20 28 75 38 2a 29 22  One[] = { (u8*)"
7940: 20 22 20 7d 3b 0a 20 20 20 20 6e 43 68 61 72 20   " };.    nChar 
7950: 3d 20 31 3b 0a 20 20 20 20 61 4c 65 6e 20 3d 20  = 1;.    aLen = 
7960: 28 75 38 2a 29 6c 65 6e 4f 6e 65 3b 0a 20 20 20  (u8*)lenOne;.   
7970: 20 61 7a 43 68 61 72 20 3d 20 28 75 6e 73 69 67   azChar = (unsig
7980: 6e 65 64 20 63 68 61 72 20 2a 2a 29 61 7a 4f 6e  ned char **)azOn
7990: 65 3b 0a 20 20 20 20 7a 43 68 61 72 53 65 74 20  e;.    zCharSet 
79a0: 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28  = 0;.  }else if(
79b0: 20 28 7a 43 68 61 72 53 65 74 20 3d 20 73 71 6c   (zCharSet = sql
79c0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
79d0: 61 72 67 76 5b 31 5d 29 29 3d 3d 30 20 29 7b 0a  argv[1]))==0 ){.
79e0: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 65      return;.  }e
79f0: 6c 73 65 7b 0a 20 20 20 20 63 6f 6e 73 74 20 75  lse{.    const u
7a00: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b  nsigned char *z;
7a10: 0a 20 20 20 20 66 6f 72 28 7a 3d 7a 43 68 61 72  .    for(z=zChar
7a20: 53 65 74 2c 20 6e 43 68 61 72 3d 30 3b 20 2a 7a  Set, nChar=0; *z
7a30: 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a 20 20 20 20  ; nChar++){.    
7a40: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
7a50: 46 38 28 7a 29 3b 0a 20 20 20 20 7d 0a 20 20 20  F8(z);.    }.   
7a60: 20 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b 0a   if( nChar>0 ){.
7a70: 20 20 20 20 20 20 61 7a 43 68 61 72 20 3d 20 63        azChar = c
7a80: 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e  ontextMalloc(con
7a90: 74 65 78 74 2c 20 28 28 69 36 34 29 6e 43 68 61  text, ((i64)nCha
7aa0: 72 29 2a 28 73 69 7a 65 6f 66 28 63 68 61 72 2a  r)*(sizeof(char*
7ab0: 29 2b 31 29 29 3b 0a 20 20 20 20 20 20 69 66 28  )+1));.      if(
7ac0: 20 61 7a 43 68 61 72 3d 3d 30 20 29 7b 0a 20 20   azChar==0 ){.  
7ad0: 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20        return;.  
7ae0: 20 20 20 20 7d 0a 20 20 20 20 20 20 61 4c 65 6e      }.      aLen
7af0: 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61   = (unsigned cha
7b00: 72 2a 29 26 61 7a 43 68 61 72 5b 6e 43 68 61 72  r*)&azChar[nChar
7b10: 5d 3b 0a 20 20 20 20 20 20 66 6f 72 28 7a 3d 7a  ];.      for(z=z
7b20: 43 68 61 72 53 65 74 2c 20 6e 43 68 61 72 3d 30  CharSet, nChar=0
7b30: 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a  ; *z; nChar++){.
7b40: 20 20 20 20 20 20 20 20 61 7a 43 68 61 72 5b 6e          azChar[n
7b50: 43 68 61 72 5d 20 3d 20 28 75 6e 73 69 67 6e 65  Char] = (unsigne
7b60: 64 20 63 68 61 72 20 2a 29 7a 3b 0a 20 20 20 20  d char *)z;.    
7b70: 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f      SQLITE_SKIP_
7b80: 55 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 20  UTF8(z);.       
7b90: 20 61 4c 65 6e 5b 6e 43 68 61 72 5d 20 3d 20 28   aLen[nChar] = (
7ba0: 75 38 29 28 7a 20 2d 20 61 7a 43 68 61 72 5b 6e  u8)(z - azChar[n
7bb0: 43 68 61 72 5d 29 3b 0a 20 20 20 20 20 20 7d 0a  Char]);.      }.
7bc0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20      }.  }.  if( 
7bd0: 6e 43 68 61 72 3e 30 20 29 7b 0a 20 20 20 20 66  nChar>0 ){.    f
7be0: 6c 61 67 73 20 3d 20 53 51 4c 49 54 45 5f 50 54  lags = SQLITE_PT
7bf0: 52 5f 54 4f 5f 49 4e 54 28 73 71 6c 69 74 65 33  R_TO_INT(sqlite3
7c00: 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65  _user_data(conte
7c10: 78 74 29 29 3b 0a 20 20 20 20 69 66 28 20 66 6c  xt));.    if( fl
7c20: 61 67 73 20 26 20 31 20 29 7b 0a 20 20 20 20 20  ags & 1 ){.     
7c30: 20 77 68 69 6c 65 28 20 6e 49 6e 3e 30 20 29 7b   while( nIn>0 ){
7c40: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 6c 65 6e  .        int len
7c50: 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 66 6f   = 0;.        fo
7c60: 72 28 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20  r(i=0; i<nChar; 
7c70: 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20  i++){.          
7c80: 6c 65 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20  len = aLen[i];. 
7c90: 20 20 20 20 20 20 20 20 20 69 66 28 20 6c 65 6e           if( len
7ca0: 3c 3d 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28  <=nIn && memcmp(
7cb0: 7a 49 6e 2c 20 61 7a 43 68 61 72 5b 69 5d 2c 20  zIn, azChar[i], 
7cc0: 6c 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b 3b  len)==0 ) break;
7cd0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
7ce0: 20 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72 20     if( i>=nChar 
7cf0: 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20  ) break;.       
7d00: 20 7a 49 6e 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20   zIn += len;.   
7d10: 20 20 20 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b       nIn -= len;
7d20: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20  .      }.    }. 
7d30: 20 20 20 69 66 28 20 66 6c 61 67 73 20 26 20 32     if( flags & 2
7d40: 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28   ){.      while(
7d50: 20 6e 49 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20   nIn>0 ){.      
7d60: 20 20 69 6e 74 20 6c 65 6e 20 3d 20 30 3b 0a 20    int len = 0;. 
7d70: 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20         for(i=0; 
7d80: 69 3c 6e 43 68 61 72 3b 20 69 2b 2b 29 7b 0a 20  i<nChar; i++){. 
7d90: 20 20 20 20 20 20 20 20 20 6c 65 6e 20 3d 20 61           len = a
7da0: 4c 65 6e 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20  Len[i];.        
7db0: 20 20 69 66 28 20 6c 65 6e 3c 3d 6e 49 6e 20 26    if( len<=nIn &
7dc0: 26 20 6d 65 6d 63 6d 70 28 26 7a 49 6e 5b 6e 49  & memcmp(&zIn[nI
7dd0: 6e 2d 6c 65 6e 5d 2c 61 7a 43 68 61 72 5b 69 5d  n-len],azChar[i]
7de0: 2c 6c 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b  ,len)==0 ) break
7df0: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
7e00: 20 20 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72      if( i>=nChar
7e10: 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20   ) break;.      
7e20: 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20    nIn -= len;.  
7e30: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20      }.    }.    
7e40: 69 66 28 20 7a 43 68 61 72 53 65 74 20 29 7b 0a  if( zCharSet ){.
7e50: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72        sqlite3_fr
7e60: 65 65 28 61 7a 43 68 61 72 29 3b 0a 20 20 20 20  ee(azChar);.    
7e70: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  }.  }.  sqlite3_
7e80: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
7e90: 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 49 6e 2c  ext, (char*)zIn,
7ea0: 20 6e 49 6e 2c 20 53 51 4c 49 54 45 5f 54 52 41   nIn, SQLITE_TRA
7eb0: 4e 53 49 45 4e 54 29 3b 0a 7d 0a 0a 0a 2f 2a 20  NSIENT);.}.../* 
7ec0: 49 4d 50 3a 20 52 2d 32 35 33 36 31 2d 31 36 31  IMP: R-25361-161
7ed0: 35 30 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e  50 This function
7ee0: 20 69 73 20 6f 6d 69 74 74 65 64 20 66 72 6f 6d   is omitted from
7ef0: 20 53 51 4c 69 74 65 20 62 79 20 64 65 66 61 75   SQLite by defau
7f00: 6c 74 2e 20 49 74 0a 2a 2a 20 69 73 20 6f 6e 6c  lt. It.** is onl
7f10: 79 20 61 76 61 69 6c 61 62 6c 65 20 69 66 20 74  y available if t
7f20: 68 65 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45  he SQLITE_SOUNDE
7f30: 58 20 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 20 6f  X compile-time o
7f40: 70 74 69 6f 6e 20 69 73 20 75 73 65 64 0a 2a 2a  ption is used.**
7f50: 20 77 68 65 6e 20 53 51 4c 69 74 65 20 69 73 20   when SQLite is 
7f60: 62 75 69 6c 74 2e 0a 2a 2f 0a 23 69 66 64 65 66  built..*/.#ifdef
7f70: 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58 0a   SQLITE_SOUNDEX.
7f80: 2f 2a 0a 2a 2a 20 43 6f 6d 70 75 74 65 20 74 68  /*.** Compute th
7f90: 65 20 73 6f 75 6e 64 65 78 20 65 6e 63 6f 64 69  e soundex encodi
7fa0: 6e 67 20 6f 66 20 61 20 77 6f 72 64 2e 0a 2a 2a  ng of a word..**
7fb0: 0a 2a 2a 20 49 4d 50 3a 20 52 2d 35 39 37 38 32  .** IMP: R-59782
7fc0: 2d 30 30 30 37 32 20 54 68 65 20 73 6f 75 6e 64  -00072 The sound
7fd0: 65 78 28 58 29 20 66 75 6e 63 74 69 6f 6e 20 72  ex(X) function r
7fe0: 65 74 75 72 6e 73 20 61 20 73 74 72 69 6e 67 20  eturns a string 
7ff0: 74 68 61 74 20 69 73 20 74 68 65 0a 2a 2a 20 73  that is the.** s
8000: 6f 75 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67 20  oundex encoding 
8010: 6f 66 20 74 68 65 20 73 74 72 69 6e 67 20 58 2e  of the string X.
8020: 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64   .*/.static void
8030: 20 73 6f 75 6e 64 65 78 46 75 6e 63 28 0a 20 20   soundexFunc(.  
8040: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
8050: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
8060: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
8070: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
8080: 20 20 63 68 61 72 20 7a 52 65 73 75 6c 74 5b 38    char zResult[8
8090: 5d 3b 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a  ];.  const u8 *z
80a0: 49 6e 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a  In;.  int i, j;.
80b0: 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75    static const u
80c0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 69 43 6f  nsigned char iCo
80d0: 64 65 5b 5d 20 3d 20 7b 0a 20 20 20 20 30 2c 20  de[] = {.    0, 
80e0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
80f0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8100: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20   0, 0, 0, 0,.   
8110: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
8120: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
8130: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8140: 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c  .    0, 0, 0, 0,
8150: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
8160: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
8170: 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30  , 0,.    0, 0, 0
8180: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8190: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
81a0: 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20  0, 0, 0,.    0, 
81b0: 30 2c 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20 31  0, 1, 2, 3, 0, 1
81c0: 2c 20 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32 2c  , 2, 0, 0, 2, 2,
81d0: 20 34 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20 20   4, 5, 5, 0,.   
81e0: 20 31 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c 20   1, 2, 6, 2, 3, 
81f0: 30 2c 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20 32  0, 1, 0, 2, 0, 2
8200: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8210: 0a 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 32 2c  .    0, 0, 1, 2,
8220: 20 33 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c 20   3, 0, 1, 2, 0, 
8230: 30 2c 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20 35  0, 2, 2, 4, 5, 5
8240: 2c 20 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20 36  , 0,.    1, 2, 6
8250: 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30 2c  , 2, 3, 0, 1, 0,
8260: 20 32 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c 20   2, 0, 2, 0, 0, 
8270: 30 2c 20 30 2c 20 30 2c 0a 20 20 7d 3b 0a 20 20  0, 0, 0,.  };.  
8280: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
8290: 29 3b 0a 20 20 7a 49 6e 20 3d 20 28 75 38 2a 29  );.  zIn = (u8*)
82a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
82b0: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69  xt(argv[0]);.  i
82c0: 66 28 20 7a 49 6e 3d 3d 30 20 29 20 7a 49 6e 20  f( zIn==0 ) zIn 
82d0: 3d 20 28 75 38 2a 29 22 22 3b 0a 20 20 66 6f 72  = (u8*)"";.  for
82e0: 28 69 3d 30 3b 20 7a 49 6e 5b 69 5d 20 26 26 20  (i=0; zIn[i] && 
82f0: 21 73 71 6c 69 74 65 33 49 73 61 6c 70 68 61 28  !sqlite3Isalpha(
8300: 7a 49 6e 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d 0a  zIn[i]); i++){}.
8310: 20 20 69 66 28 20 7a 49 6e 5b 69 5d 20 29 7b 0a    if( zIn[i] ){.
8320: 20 20 20 20 75 38 20 70 72 65 76 63 6f 64 65 20      u8 prevcode 
8330: 3d 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30  = iCode[zIn[i]&0
8340: 78 37 66 5d 3b 0a 20 20 20 20 7a 52 65 73 75 6c  x7f];.    zResul
8350: 74 5b 30 5d 20 3d 20 73 71 6c 69 74 65 33 54 6f  t[0] = sqlite3To
8360: 75 70 70 65 72 28 7a 49 6e 5b 69 5d 29 3b 0a 20  upper(zIn[i]);. 
8370: 20 20 20 66 6f 72 28 6a 3d 31 3b 20 6a 3c 34 20     for(j=1; j<4 
8380: 26 26 20 7a 49 6e 5b 69 5d 3b 20 69 2b 2b 29 7b  && zIn[i]; i++){
8390: 0a 20 20 20 20 20 20 69 6e 74 20 63 6f 64 65 20  .      int code 
83a0: 3d 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30  = iCode[zIn[i]&0
83b0: 78 37 66 5d 3b 0a 20 20 20 20 20 20 69 66 28 20  x7f];.      if( 
83c0: 63 6f 64 65 3e 30 20 29 7b 0a 20 20 20 20 20 20  code>0 ){.      
83d0: 20 20 69 66 28 20 63 6f 64 65 21 3d 70 72 65 76    if( code!=prev
83e0: 63 6f 64 65 20 29 7b 0a 20 20 20 20 20 20 20 20  code ){.        
83f0: 20 20 70 72 65 76 63 6f 64 65 20 3d 20 63 6f 64    prevcode = cod
8400: 65 3b 0a 20 20 20 20 20 20 20 20 20 20 7a 52 65  e;.          zRe
8410: 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 63 6f 64 65  sult[j++] = code
8420: 20 2b 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20   + '0';.        
8430: 7d 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20  }.      }else{. 
8440: 20 20 20 20 20 20 20 70 72 65 76 63 6f 64 65 20         prevcode 
8450: 3d 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  = 0;.      }.   
8460: 20 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 6a 3c   }.    while( j<
8470: 34 20 29 7b 0a 20 20 20 20 20 20 7a 52 65 73 75  4 ){.      zResu
8480: 6c 74 5b 6a 2b 2b 5d 20 3d 20 27 30 27 3b 0a 20  lt[j++] = '0';. 
8490: 20 20 20 7d 0a 20 20 20 20 7a 52 65 73 75 6c 74     }.    zResult
84a0: 5b 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c  [j] = 0;.    sql
84b0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
84c0: 28 63 6f 6e 74 65 78 74 2c 20 7a 52 65 73 75 6c  (context, zResul
84d0: 74 2c 20 34 2c 20 53 51 4c 49 54 45 5f 54 52 41  t, 4, SQLITE_TRA
84e0: 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 65 6c 73 65  NSIENT);.  }else
84f0: 7b 0a 20 20 20 20 2f 2a 20 49 4d 50 3a 20 52 2d  {.    /* IMP: R-
8500: 36 34 38 39 34 2d 35 30 33 32 31 20 54 68 65 20  64894-50321 The 
8510: 73 74 72 69 6e 67 20 22 3f 30 30 30 22 20 69 73  string "?000" is
8520: 20 72 65 74 75 72 6e 65 64 20 69 66 20 74 68 65   returned if the
8530: 20 61 72 67 75 6d 65 6e 74 0a 20 20 20 20 2a 2a   argument.    **
8540: 20 69 73 20 4e 55 4c 4c 20 6f 72 20 63 6f 6e 74   is NULL or cont
8550: 61 69 6e 73 20 6e 6f 20 41 53 43 49 49 20 61 6c  ains no ASCII al
8560: 70 68 61 62 65 74 69 63 20 63 68 61 72 61 63 74  phabetic charact
8570: 65 72 73 2e 20 2a 2f 0a 20 20 20 20 73 71 6c 69  ers. */.    sqli
8580: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
8590: 63 6f 6e 74 65 78 74 2c 20 22 3f 30 30 30 22 2c  context, "?000",
85a0: 20 34 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49   4, SQLITE_STATI
85b0: 43 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66  C);.  }.}.#endif
85c0: 20 2f 2a 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44   /* SQLITE_SOUND
85d0: 45 58 20 2a 2f 0a 0a 23 69 66 6e 64 65 66 20 53  EX */..#ifndef S
85e0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f  QLITE_OMIT_LOAD_
85f0: 45 58 54 45 4e 53 49 4f 4e 0a 2f 2a 0a 2a 2a 20  EXTENSION./*.** 
8600: 41 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20  A function that 
8610: 6c 6f 61 64 73 20 61 20 73 68 61 72 65 64 2d 6c  loads a shared-l
8620: 69 62 72 61 72 79 20 65 78 74 65 6e 73 69 6f 6e  ibrary extension
8630: 20 74 68 65 6e 20 72 65 74 75 72 6e 73 20 4e 55   then returns NU
8640: 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  LL..*/.static vo
8650: 69 64 20 6c 6f 61 64 45 78 74 28 73 71 6c 69 74  id loadExt(sqlit
8660: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
8670: 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73  ext, int argc, s
8680: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
8690: 72 67 76 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68  rgv){.  const ch
86a0: 61 72 20 2a 7a 46 69 6c 65 20 3d 20 28 63 6f 6e  ar *zFile = (con
86b0: 73 74 20 63 68 61 72 20 2a 29 73 71 6c 69 74 65  st char *)sqlite
86c0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
86d0: 76 5b 30 5d 29 3b 0a 20 20 63 6f 6e 73 74 20 63  v[0]);.  const c
86e0: 68 61 72 20 2a 7a 50 72 6f 63 3b 0a 20 20 73 71  har *zProc;.  sq
86f0: 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69  lite3 *db = sqli
8700: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
8710: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a  andle(context);.
8720: 20 20 63 68 61 72 20 2a 7a 45 72 72 4d 73 67 20    char *zErrMsg 
8730: 3d 20 30 3b 0a 0a 20 20 69 66 28 20 61 72 67 63  = 0;..  if( argc
8740: 3d 3d 32 20 29 7b 0a 20 20 20 20 7a 50 72 6f 63  ==2 ){.    zProc
8750: 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 20 2a   = (const char *
8760: 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  )sqlite3_value_t
8770: 65 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20  ext(argv[1]);.  
8780: 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 50 72 6f 63  }else{.    zProc
8790: 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20   = 0;.  }.  if( 
87a0: 7a 46 69 6c 65 20 26 26 20 73 71 6c 69 74 65 33  zFile && sqlite3
87b0: 5f 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 28  _load_extension(
87c0: 64 62 2c 20 7a 46 69 6c 65 2c 20 7a 50 72 6f 63  db, zFile, zProc
87d0: 2c 20 26 7a 45 72 72 4d 73 67 29 20 29 7b 0a 20  , &zErrMsg) ){. 
87e0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
87f0: 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c  t_error(context,
8800: 20 7a 45 72 72 4d 73 67 2c 20 2d 31 29 3b 0a 20   zErrMsg, -1);. 
8810: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28     sqlite3_free(
8820: 7a 45 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 7d 0a  zErrMsg);.  }.}.
8830: 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 41  #endif.../*.** A
8840: 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68  n instance of th
8850: 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75  e following stru
8860: 63 74 75 72 65 20 68 6f 6c 64 73 20 74 68 65 20  cture holds the 
8870: 63 6f 6e 74 65 78 74 20 6f 66 20 61 0a 2a 2a 20  context of a.** 
8880: 73 75 6d 28 29 20 6f 72 20 61 76 67 28 29 20 61  sum() or avg() a
8890: 67 67 72 65 67 61 74 65 20 63 6f 6d 70 75 74 61  ggregate computa
88a0: 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66  tion..*/.typedef
88b0: 20 73 74 72 75 63 74 20 53 75 6d 43 74 78 20 53   struct SumCtx S
88c0: 75 6d 43 74 78 3b 0a 73 74 72 75 63 74 20 53 75  umCtx;.struct Su
88d0: 6d 43 74 78 20 7b 0a 20 20 64 6f 75 62 6c 65 20  mCtx {.  double 
88e0: 72 53 75 6d 3b 20 20 20 20 20 20 2f 2a 20 46 6c  rSum;      /* Fl
88f0: 6f 61 74 69 6e 67 20 70 6f 69 6e 74 20 73 75 6d  oating point sum
8900: 20 2a 2f 0a 20 20 69 36 34 20 69 53 75 6d 3b 20   */.  i64 iSum; 
8910: 20 20 20 20 20 20 20 20 2f 2a 20 49 6e 74 65 67          /* Integ
8920: 65 72 20 73 75 6d 20 2a 2f 20 20 20 0a 20 20 69  er sum */   .  i
8930: 36 34 20 63 6e 74 3b 20 20 20 20 20 20 20 20 20  64 cnt;         
8940: 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 65 6c   /* Number of el
8950: 65 6d 65 6e 74 73 20 73 75 6d 6d 65 64 20 2a 2f  ements summed */
8960: 0a 20 20 75 38 20 6f 76 65 72 66 6c 6f 77 3b 20  .  u8 overflow; 
8970: 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20       /* True if 
8980: 69 6e 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77  integer overflow
8990: 20 73 65 65 6e 20 2a 2f 0a 20 20 75 38 20 61 70   seen */.  u8 ap
89a0: 70 72 6f 78 3b 20 20 20 20 20 20 20 20 2f 2a 20  prox;        /* 
89b0: 54 72 75 65 20 69 66 20 6e 6f 6e 2d 69 6e 74 65  True if non-inte
89c0: 67 65 72 20 76 61 6c 75 65 20 77 61 73 20 69 6e  ger value was in
89d0: 70 75 74 20 74 6f 20 74 68 65 20 73 75 6d 20 2a  put to the sum *
89e0: 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74  /.};../*.** Rout
89f0: 69 6e 65 73 20 75 73 65 64 20 74 6f 20 63 6f 6d  ines used to com
8a00: 70 75 74 65 20 74 68 65 20 73 75 6d 2c 20 61 76  pute the sum, av
8a10: 65 72 61 67 65 2c 20 61 6e 64 20 74 6f 74 61 6c  erage, and total
8a20: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 53 55 4d 28  ..**.** The SUM(
8a30: 29 20 66 75 6e 63 74 69 6f 6e 20 66 6f 6c 6c 6f  ) function follo
8a40: 77 73 20 74 68 65 20 28 62 72 6f 6b 65 6e 29 20  ws the (broken) 
8a50: 53 51 4c 20 73 74 61 6e 64 61 72 64 20 77 68 69  SQL standard whi
8a60: 63 68 20 6d 65 61 6e 73 0a 2a 2a 20 74 68 61 74  ch means.** that
8a70: 20 69 74 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c   it returns NULL
8a80: 20 69 66 20 69 74 20 73 75 6d 73 20 6f 76 65 72   if it sums over
8a90: 20 6e 6f 20 69 6e 70 75 74 73 2e 20 20 54 4f 54   no inputs.  TOT
8aa0: 41 4c 20 72 65 74 75 72 6e 73 0a 2a 2a 20 30 2e  AL returns.** 0.
8ab0: 30 20 69 6e 20 74 68 61 74 20 63 61 73 65 2e 20  0 in that case. 
8ac0: 20 49 6e 20 61 64 64 69 74 69 6f 6e 2c 20 54 4f   In addition, TO
8ad0: 54 41 4c 20 61 6c 77 61 79 73 20 72 65 74 75 72  TAL always retur
8ae0: 6e 73 20 61 20 66 6c 6f 61 74 20 77 68 65 72 65  ns a float where
8af0: 0a 2a 2a 20 53 55 4d 20 6d 69 67 68 74 20 72 65  .** SUM might re
8b00: 74 75 72 6e 20 61 6e 20 69 6e 74 65 67 65 72 20  turn an integer 
8b10: 69 66 20 69 74 20 6e 65 76 65 72 20 65 6e 63 6f  if it never enco
8b20: 75 6e 74 65 72 73 20 61 20 66 6c 6f 61 74 69 6e  unters a floatin
8b30: 67 20 70 6f 69 6e 74 0a 2a 2a 20 76 61 6c 75 65  g point.** value
8b40: 2e 20 20 54 4f 54 41 4c 20 6e 65 76 65 72 20 66  .  TOTAL never f
8b50: 61 69 6c 73 2c 20 62 75 74 20 53 55 4d 20 6d 69  ails, but SUM mi
8b60: 67 68 74 20 74 68 72 6f 75 67 68 20 61 6e 20 65  ght through an e
8b70: 78 63 65 70 74 69 6f 6e 20 69 66 0a 2a 2a 20 69  xception if.** i
8b80: 74 20 6f 76 65 72 66 6c 6f 77 73 20 61 6e 20 69  t overflows an i
8b90: 6e 74 65 67 65 72 2e 0a 2a 2f 0a 73 74 61 74 69  nteger..*/.stati
8ba0: 63 20 76 6f 69 64 20 73 75 6d 53 74 65 70 28 73  c void sumStep(s
8bb0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
8bc0: 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67  context, int arg
8bd0: 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  c, sqlite3_value
8be0: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 53 75 6d 43   **argv){.  SumC
8bf0: 74 78 20 2a 70 3b 0a 20 20 69 6e 74 20 74 79 70  tx *p;.  int typ
8c00: 65 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  e;.  assert( arg
8c10: 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44  c==1 );.  UNUSED
8c20: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
8c30: 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  p = sqlite3_
8c40: 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78  aggregate_contex
8c50: 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f  t(context, sizeo
8c60: 66 28 2a 70 29 29 3b 0a 20 20 74 79 70 65 20 3d  f(*p));.  type =
8c70: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 6e   sqlite3_value_n
8c80: 75 6d 65 72 69 63 5f 74 79 70 65 28 61 72 67 76  umeric_type(argv
8c90: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 70 20 26 26  [0]);.  if( p &&
8ca0: 20 74 79 70 65 21 3d 53 51 4c 49 54 45 5f 4e 55   type!=SQLITE_NU
8cb0: 4c 4c 20 29 7b 0a 20 20 20 20 70 2d 3e 63 6e 74  LL ){.    p->cnt
8cc0: 2b 2b 3b 0a 20 20 20 20 69 66 28 20 74 79 70 65  ++;.    if( type
8cd0: 3d 3d 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52  ==SQLITE_INTEGER
8ce0: 20 29 7b 0a 20 20 20 20 20 20 69 36 34 20 76 20   ){.      i64 v 
8cf0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
8d00: 69 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a  int64(argv[0]);.
8d10: 20 20 20 20 20 20 70 2d 3e 72 53 75 6d 20 2b 3d        p->rSum +=
8d20: 20 76 3b 0a 20 20 20 20 20 20 69 66 28 20 28 70   v;.      if( (p
8d30: 2d 3e 61 70 70 72 6f 78 7c 70 2d 3e 6f 76 65 72  ->approx|p->over
8d40: 66 6c 6f 77 29 3d 3d 30 20 29 7b 0a 20 20 20 20  flow)==0 ){.    
8d50: 20 20 20 20 69 36 34 20 69 4e 65 77 53 75 6d 20      i64 iNewSum 
8d60: 3d 20 70 2d 3e 69 53 75 6d 20 2b 20 76 3b 0a 20  = p->iSum + v;. 
8d70: 20 20 20 20 20 20 20 69 6e 74 20 73 31 20 3d 20         int s1 = 
8d80: 28 69 6e 74 29 28 70 2d 3e 69 53 75 6d 20 3e 3e  (int)(p->iSum >>
8d90: 20 28 73 69 7a 65 6f 66 28 69 36 34 29 2a 38 2d   (sizeof(i64)*8-
8da0: 31 29 29 3b 0a 20 20 20 20 20 20 20 20 69 6e 74  1));.        int
8db0: 20 73 32 20 3d 20 28 69 6e 74 29 28 76 20 20 20   s2 = (int)(v   
8dc0: 20 20 20 20 3e 3e 20 28 73 69 7a 65 6f 66 28 69      >> (sizeof(i
8dd0: 36 34 29 2a 38 2d 31 29 29 3b 0a 20 20 20 20 20  64)*8-1));.     
8de0: 20 20 20 69 6e 74 20 73 33 20 3d 20 28 69 6e 74     int s3 = (int
8df0: 29 28 69 4e 65 77 53 75 6d 20 3e 3e 20 28 73 69  )(iNewSum >> (si
8e00: 7a 65 6f 66 28 69 36 34 29 2a 38 2d 31 29 29 3b  zeof(i64)*8-1));
8e10: 0a 20 20 20 20 20 20 20 20 70 2d 3e 6f 76 65 72  .        p->over
8e20: 66 6c 6f 77 20 3d 20 28 28 73 31 26 73 32 26 7e  flow = ((s1&s2&~
8e30: 73 33 29 20 7c 20 28 7e 73 31 26 7e 73 32 26 73  s3) | (~s1&~s2&s
8e40: 33 29 29 3f 31 3a 30 3b 0a 20 20 20 20 20 20 20  3))?1:0;.       
8e50: 20 70 2d 3e 69 53 75 6d 20 3d 20 69 4e 65 77 53   p->iSum = iNewS
8e60: 75 6d 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  um;.      }.    
8e70: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 70 2d 3e  }else{.      p->
8e80: 72 53 75 6d 20 2b 3d 20 73 71 6c 69 74 65 33 5f  rSum += sqlite3_
8e90: 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67  value_double(arg
8ea0: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e  v[0]);.      p->
8eb0: 61 70 70 72 6f 78 20 3d 20 31 3b 0a 20 20 20 20  approx = 1;.    
8ec0: 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76  }.  }.}.static v
8ed0: 6f 69 64 20 73 75 6d 46 69 6e 61 6c 69 7a 65 28  oid sumFinalize(
8ee0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
8ef0: 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d  *context){.  Sum
8f00: 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71  Ctx *p;.  p = sq
8f10: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
8f20: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
8f30: 20 30 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20   0);.  if( p && 
8f40: 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20 20  p->cnt>0 ){.    
8f50: 69 66 28 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20  if( p->overflow 
8f60: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
8f70: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
8f80: 6e 74 65 78 74 2c 22 69 6e 74 65 67 65 72 20 6f  ntext,"integer o
8f90: 76 65 72 66 6c 6f 77 22 2c 2d 31 29 3b 0a 20 20  verflow",-1);.  
8fa0: 20 20 7d 65 6c 73 65 20 69 66 28 20 70 2d 3e 61    }else if( p->a
8fb0: 70 70 72 6f 78 20 29 7b 0a 20 20 20 20 20 20 73  pprox ){.      s
8fc0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f  qlite3_result_do
8fd0: 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 2d  uble(context, p-
8fe0: 3e 72 53 75 6d 29 3b 0a 20 20 20 20 7d 65 6c 73  >rSum);.    }els
8ff0: 65 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  e{.      sqlite3
9000: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f  _result_int64(co
9010: 6e 74 65 78 74 2c 20 70 2d 3e 69 53 75 6d 29 3b  ntext, p->iSum);
9020: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61  .    }.  }.}.sta
9030: 74 69 63 20 76 6f 69 64 20 61 76 67 46 69 6e 61  tic void avgFina
9040: 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e  lize(sqlite3_con
9050: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
9060: 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70    SumCtx *p;.  p
9070: 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65   = sqlite3_aggre
9080: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
9090: 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20  text, 0);.  if( 
90a0: 70 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b  p && p->cnt>0 ){
90b0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
90c0: 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65  ult_double(conte
90d0: 78 74 2c 20 70 2d 3e 72 53 75 6d 2f 28 64 6f 75  xt, p->rSum/(dou
90e0: 62 6c 65 29 70 2d 3e 63 6e 74 29 3b 0a 20 20 7d  ble)p->cnt);.  }
90f0: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74  .}.static void t
9100: 6f 74 61 6c 46 69 6e 61 6c 69 7a 65 28 73 71 6c  otalFinalize(sql
9110: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
9120: 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78  ntext){.  SumCtx
9130: 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74   *p;.  p = sqlit
9140: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
9150: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29  text(context, 0)
9160: 3b 0a 20 20 2f 2a 20 28 64 6f 75 62 6c 65 29 30  ;.  /* (double)0
9170: 20 49 6e 20 63 61 73 65 20 6f 66 20 53 51 4c 49   In case of SQLI
9180: 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47  TE_OMIT_FLOATING
9190: 5f 50 4f 49 4e 54 2e 2e 2e 20 2a 2f 0a 20 20 73  _POINT... */.  s
91a0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f  qlite3_result_do
91b0: 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 20  uble(context, p 
91c0: 3f 20 70 2d 3e 72 53 75 6d 20 3a 20 28 64 6f 75  ? p->rSum : (dou
91d0: 62 6c 65 29 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  ble)0);.}../*.**
91e0: 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73   The following s
91f0: 74 72 75 63 74 75 72 65 20 6b 65 65 70 73 20 74  tructure keeps t
9200: 72 61 63 6b 20 6f 66 20 73 74 61 74 65 20 69 6e  rack of state in
9210: 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68  formation for th
9220: 65 0a 2a 2a 20 63 6f 75 6e 74 28 29 20 61 67 67  e.** count() agg
9230: 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e  regate function.
9240: 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75  .*/.typedef stru
9250: 63 74 20 43 6f 75 6e 74 43 74 78 20 43 6f 75 6e  ct CountCtx Coun
9260: 74 43 74 78 3b 0a 73 74 72 75 63 74 20 43 6f 75  tCtx;.struct Cou
9270: 6e 74 43 74 78 20 7b 0a 20 20 69 36 34 20 6e 3b  ntCtx {.  i64 n;
9280: 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69  .};../*.** Routi
9290: 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74  nes to implement
92a0: 20 74 68 65 20 63 6f 75 6e 74 28 29 20 61 67 67   the count() agg
92b0: 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e  regate function.
92c0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
92d0: 63 6f 75 6e 74 53 74 65 70 28 73 71 6c 69 74 65  countStep(sqlite
92e0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
92f0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
9300: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
9310: 67 76 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20  gv){.  CountCtx 
9320: 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65  *p;.  p = sqlite
9330: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
9340: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a  ext(context, siz
9350: 65 6f 66 28 2a 70 29 29 3b 0a 20 20 69 66 28 20  eof(*p));.  if( 
9360: 28 61 72 67 63 3d 3d 30 20 7c 7c 20 53 51 4c 49  (argc==0 || SQLI
9370: 54 45 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33  TE_NULL!=sqlite3
9380: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
9390: 5b 30 5d 29 29 20 26 26 20 70 20 29 7b 0a 20 20  [0])) && p ){.  
93a0: 20 20 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a 0a 23    p->n++;.  }..#
93b0: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
93c0: 49 54 5f 44 45 50 52 45 43 41 54 45 44 0a 20 20  IT_DEPRECATED.  
93d0: 2f 2a 20 54 68 65 20 73 71 6c 69 74 65 33 5f 61  /* The sqlite3_a
93e0: 67 67 72 65 67 61 74 65 5f 63 6f 75 6e 74 28 29  ggregate_count()
93f0: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 64 65 70   function is dep
9400: 72 65 63 61 74 65 64 2e 20 20 42 75 74 20 6a 75  recated.  But ju
9410: 73 74 20 74 6f 20 6d 61 6b 65 0a 20 20 2a 2a 20  st to make.  ** 
9420: 73 75 72 65 20 69 74 20 73 74 69 6c 6c 20 6f 70  sure it still op
9430: 65 72 61 74 65 73 20 63 6f 72 72 65 63 74 6c 79  erates correctly
9440: 2c 20 76 65 72 69 66 79 20 74 68 61 74 20 69 74  , verify that it
9450: 73 20 63 6f 75 6e 74 20 61 67 72 65 65 73 20 77  s count agrees w
9460: 69 74 68 20 6f 75 72 20 0a 20 20 2a 2a 20 69 6e  ith our .  ** in
9470: 74 65 72 6e 61 6c 20 63 6f 75 6e 74 20 77 68 65  ternal count whe
9480: 6e 20 75 73 69 6e 67 20 63 6f 75 6e 74 28 2a 29  n using count(*)
9490: 20 61 6e 64 20 77 68 65 6e 20 74 68 65 20 74 6f   and when the to
94a0: 74 61 6c 20 63 6f 75 6e 74 20 63 61 6e 20 62 65  tal count can be
94b0: 0a 20 20 2a 2a 20 65 78 70 72 65 73 73 65 64 20  .  ** expressed 
94c0: 61 73 20 61 20 33 32 2d 62 69 74 20 69 6e 74 65  as a 32-bit inte
94d0: 67 65 72 2e 20 2a 2f 0a 20 20 61 73 73 65 72 74  ger. */.  assert
94e0: 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20 70 3d 3d  ( argc==1 || p==
94f0: 30 20 7c 7c 20 70 2d 3e 6e 3e 30 78 37 66 66 66  0 || p->n>0x7fff
9500: 66 66 66 66 0a 20 20 20 20 20 20 20 20 20 20 7c  ffff.          |
9510: 7c 20 70 2d 3e 6e 3d 3d 73 71 6c 69 74 65 33 5f  | p->n==sqlite3_
9520: 61 67 67 72 65 67 61 74 65 5f 63 6f 75 6e 74 28  aggregate_count(
9530: 63 6f 6e 74 65 78 74 29 20 29 3b 0a 23 65 6e 64  context) );.#end
9540: 69 66 0a 7d 20 20 20 0a 73 74 61 74 69 63 20 76  if.}   .static v
9550: 6f 69 64 20 63 6f 75 6e 74 46 69 6e 61 6c 69 7a  oid countFinaliz
9560: 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  e(sqlite3_contex
9570: 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 43  t *context){.  C
9580: 6f 75 6e 74 43 74 78 20 2a 70 3b 0a 20 20 70 20  ountCtx *p;.  p 
9590: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
95a0: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
95b0: 65 78 74 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74  ext, 0);.  sqlit
95c0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28  e3_result_int64(
95d0: 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20 70 2d 3e  context, p ? p->
95e0: 6e 20 3a 20 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  n : 0);.}../*.**
95f0: 20 52 6f 75 74 69 6e 65 73 20 74 6f 20 69 6d 70   Routines to imp
9600: 6c 65 6d 65 6e 74 20 6d 69 6e 28 29 20 61 6e 64  lement min() and
9610: 20 6d 61 78 28 29 20 61 67 67 72 65 67 61 74 65   max() aggregate
9620: 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73   functions..*/.s
9630: 74 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 6d 61  tatic void minma
9640: 78 53 74 65 70 28 0a 20 20 73 71 6c 69 74 65 33  xStep(.  sqlite3
9650: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
9660: 74 2c 20 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  t, .  int NotUse
9670: 64 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  d, .  sqlite3_va
9680: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
9690: 4d 65 6d 20 2a 70 41 72 67 20 20 3d 20 28 4d 65  Mem *pArg  = (Me
96a0: 6d 20 2a 29 61 72 67 76 5b 30 5d 3b 0a 20 20 4d  m *)argv[0];.  M
96b0: 65 6d 20 2a 70 42 65 73 74 3b 0a 20 20 55 4e 55  em *pBest;.  UNU
96c0: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f  SED_PARAMETER(No
96d0: 74 55 73 65 64 29 3b 0a 0a 20 20 69 66 28 20 73  tUsed);..  if( s
96e0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
96f0: 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49  e(argv[0])==SQLI
9700: 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e  TE_NULL ) return
9710: 3b 0a 20 20 70 42 65 73 74 20 3d 20 28 4d 65 6d  ;.  pBest = (Mem
9720: 20 2a 29 73 71 6c 69 74 65 33 5f 61 67 67 72 65   *)sqlite3_aggre
9730: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
9740: 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 42  text, sizeof(*pB
9750: 65 73 74 29 29 3b 0a 20 20 69 66 28 20 21 70 42  est));.  if( !pB
9760: 65 73 74 20 29 20 72 65 74 75 72 6e 3b 0a 0a 20  est ) return;.. 
9770: 20 69 66 28 20 70 42 65 73 74 2d 3e 66 6c 61 67   if( pBest->flag
9780: 73 20 29 7b 0a 20 20 20 20 69 6e 74 20 6d 61 78  s ){.    int max
9790: 3b 0a 20 20 20 20 69 6e 74 20 63 6d 70 3b 0a 20  ;.    int cmp;. 
97a0: 20 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c     CollSeq *pCol
97b0: 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74 46 75  l = sqlite3GetFu
97c0: 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74 65 78  ncCollSeq(contex
97d0: 74 29 3b 0a 20 20 20 20 2f 2a 20 54 68 69 73 20  t);.    /* This 
97e0: 73 74 65 70 20 66 75 6e 63 74 69 6f 6e 20 69 73  step function is
97f0: 20 75 73 65 64 20 66 6f 72 20 62 6f 74 68 20 74   used for both t
9800: 68 65 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78  he min() and max
9810: 28 29 20 61 67 67 72 65 67 61 74 65 73 2c 0a 20  () aggregates,. 
9820: 20 20 20 2a 2a 20 74 68 65 20 6f 6e 6c 79 20 64     ** the only d
9830: 69 66 66 65 72 65 6e 63 65 20 62 65 74 77 65 65  ifference betwee
9840: 6e 20 74 68 65 20 74 77 6f 20 62 65 69 6e 67 20  n the two being 
9850: 74 68 61 74 20 74 68 65 20 73 65 6e 73 65 20 6f  that the sense o
9860: 66 20 74 68 65 0a 20 20 20 20 2a 2a 20 63 6f 6d  f the.    ** com
9870: 70 61 72 69 73 6f 6e 20 69 73 20 69 6e 76 65 72  parison is inver
9880: 74 65 64 2e 20 46 6f 72 20 74 68 65 20 6d 61 78  ted. For the max
9890: 28 29 20 61 67 67 72 65 67 61 74 65 2c 20 74 68  () aggregate, th
98a0: 65 0a 20 20 20 20 2a 2a 20 73 71 6c 69 74 65 33  e.    ** sqlite3
98b0: 5f 75 73 65 72 5f 64 61 74 61 28 29 20 66 75 6e  _user_data() fun
98c0: 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 28 76  ction returns (v
98d0: 6f 69 64 20 2a 29 2d 31 2e 20 46 6f 72 20 6d 69  oid *)-1. For mi
98e0: 6e 28 29 20 69 74 0a 20 20 20 20 2a 2a 20 72 65  n() it.    ** re
98f0: 74 75 72 6e 73 20 28 76 6f 69 64 20 2a 29 64 62  turns (void *)db
9900: 2c 20 77 68 65 72 65 20 64 62 20 69 73 20 74 68  , where db is th
9910: 65 20 73 71 6c 69 74 65 33 2a 20 64 61 74 61 62  e sqlite3* datab
9920: 61 73 65 20 70 6f 69 6e 74 65 72 2e 0a 20 20 20  ase pointer..   
9930: 20 2a 2a 20 54 68 65 72 65 66 6f 72 65 20 74 68   ** Therefore th
9940: 65 20 6e 65 78 74 20 73 74 61 74 65 6d 65 6e 74  e next statement
9950: 20 73 65 74 73 20 76 61 72 69 61 62 6c 65 20 27   sets variable '
9960: 6d 61 78 27 20 74 6f 20 31 20 66 6f 72 20 74 68  max' to 1 for th
9970: 65 20 6d 61 78 28 29 0a 20 20 20 20 2a 2a 20 61  e max().    ** a
9980: 67 67 72 65 67 61 74 65 2c 20 6f 72 20 30 20 66  ggregate, or 0 f
9990: 6f 72 20 6d 69 6e 28 29 2e 0a 20 20 20 20 2a 2f  or min()..    */
99a0: 0a 20 20 20 20 6d 61 78 20 3d 20 73 71 6c 69 74  .    max = sqlit
99b0: 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e  e3_user_data(con
99c0: 74 65 78 74 29 21 3d 30 3b 0a 20 20 20 20 63 6d  text)!=0;.    cm
99d0: 70 20 3d 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f  p = sqlite3MemCo
99e0: 6d 70 61 72 65 28 70 42 65 73 74 2c 20 70 41 72  mpare(pBest, pAr
99f0: 67 2c 20 70 43 6f 6c 6c 29 3b 0a 20 20 20 20 69  g, pColl);.    i
9a00: 66 28 20 28 6d 61 78 20 26 26 20 63 6d 70 3c 30  f( (max && cmp<0
9a10: 29 20 7c 7c 20 28 21 6d 61 78 20 26 26 20 63 6d  ) || (!max && cm
9a20: 70 3e 30 29 20 29 7b 0a 20 20 20 20 20 20 73 71  p>0) ){.      sq
9a30: 6c 69 74 65 33 56 64 62 65 4d 65 6d 43 6f 70 79  lite3VdbeMemCopy
9a40: 28 70 42 65 73 74 2c 20 70 41 72 67 29 3b 0a 20  (pBest, pArg);. 
9a50: 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20     }.  }else{.  
9a60: 20 20 73 71 6c 69 74 65 33 56 64 62 65 4d 65 6d    sqlite3VdbeMem
9a70: 43 6f 70 79 28 70 42 65 73 74 2c 20 70 41 72 67  Copy(pBest, pArg
9a80: 29 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20  );.  }.}.static 
9a90: 76 6f 69 64 20 6d 69 6e 4d 61 78 46 69 6e 61 6c  void minMaxFinal
9aa0: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
9ab0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
9ac0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
9ad0: 70 52 65 73 3b 0a 20 20 70 52 65 73 20 3d 20 28  pRes;.  pRes = (
9ae0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 29  sqlite3_value *)
9af0: 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74  sqlite3_aggregat
9b00: 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78  e_context(contex
9b10: 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 52 65  t, 0);.  if( pRe
9b20: 73 20 29 7b 0a 20 20 20 20 69 66 28 20 41 4c 57  s ){.    if( ALW
9b30: 41 59 53 28 70 52 65 73 2d 3e 66 6c 61 67 73 29  AYS(pRes->flags)
9b40: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
9b50: 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63  3_result_value(c
9b60: 6f 6e 74 65 78 74 2c 20 70 52 65 73 29 3b 0a 20  ontext, pRes);. 
9b70: 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33     }.    sqlite3
9b80: 56 64 62 65 4d 65 6d 52 65 6c 65 61 73 65 28 70  VdbeMemRelease(p
9b90: 52 65 73 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  Res);.  }.}../*.
9ba0: 2a 2a 20 67 72 6f 75 70 5f 63 6f 6e 63 61 74 28  ** group_concat(
9bb0: 45 58 50 52 2c 20 3f 53 45 50 41 52 41 54 4f 52  EXPR, ?SEPARATOR
9bc0: 3f 29 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  ?).*/.static voi
9bd0: 64 20 67 72 6f 75 70 43 6f 6e 63 61 74 53 74 65  d groupConcatSte
9be0: 70 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  p(.  sqlite3_con
9bf0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
9c00: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
9c10: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
9c20: 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61  v.){.  const cha
9c30: 72 20 2a 7a 56 61 6c 3b 0a 20 20 53 74 72 41 63  r *zVal;.  StrAc
9c40: 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20 63  cum *pAccum;.  c
9c50: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 65 70 3b  onst char *zSep;
9c60: 0a 20 20 69 6e 74 20 6e 56 61 6c 2c 20 6e 53 65  .  int nVal, nSe
9c70: 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  p;.  assert( arg
9c80: 63 3d 3d 31 20 7c 7c 20 61 72 67 63 3d 3d 32 20  c==1 || argc==2 
9c90: 29 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33  );.  if( sqlite3
9ca0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
9cb0: 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [0])==SQLITE_NUL
9cc0: 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 70 41  L ) return;.  pA
9cd0: 63 63 75 6d 20 3d 20 28 53 74 72 41 63 63 75 6d  ccum = (StrAccum
9ce0: 2a 29 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  *)sqlite3_aggreg
9cf0: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
9d00: 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 41 63  ext, sizeof(*pAc
9d10: 63 75 6d 29 29 3b 0a 0a 20 20 69 66 28 20 70 41  cum));..  if( pA
9d20: 63 63 75 6d 20 29 7b 0a 20 20 20 20 73 71 6c 69  ccum ){.    sqli
9d30: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
9d40: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
9d50: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  dle(context);.  
9d60: 20 20 69 6e 74 20 66 69 72 73 74 54 65 72 6d 20    int firstTerm 
9d70: 3d 20 70 41 63 63 75 6d 2d 3e 75 73 65 4d 61 6c  = pAccum->useMal
9d80: 6c 6f 63 3d 3d 30 3b 0a 20 20 20 20 70 41 63 63  loc==0;.    pAcc
9d90: 75 6d 2d 3e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20  um->useMalloc = 
9da0: 31 3b 0a 20 20 20 20 70 41 63 63 75 6d 2d 3e 6d  1;.    pAccum->m
9db0: 78 41 6c 6c 6f 63 20 3d 20 64 62 2d 3e 61 4c 69  xAlloc = db->aLi
9dc0: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
9dd0: 5f 4c 45 4e 47 54 48 5d 3b 0a 20 20 20 20 69 66  _LENGTH];.    if
9de0: 28 20 21 66 69 72 73 74 54 65 72 6d 20 29 7b 0a  ( !firstTerm ){.
9df0: 20 20 20 20 20 20 69 66 28 20 61 72 67 63 3d 3d        if( argc==
9e00: 32 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 53 65  2 ){.        zSe
9e10: 70 20 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74  p = (char*)sqlit
9e20: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
9e30: 67 76 5b 31 5d 29 3b 0a 20 20 20 20 20 20 20 20  gv[1]);.        
9e40: 6e 53 65 70 20 3d 20 73 71 6c 69 74 65 33 5f 76  nSep = sqlite3_v
9e50: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
9e60: 31 5d 29 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  1]);.      }else
9e70: 7b 0a 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d  {.        zSep =
9e80: 20 22 2c 22 3b 0a 20 20 20 20 20 20 20 20 6e 53   ",";.        nS
9e90: 65 70 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a  ep = 1;.      }.
9ea0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 53 74 72        sqlite3Str
9eb0: 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63  AccumAppend(pAcc
9ec0: 75 6d 2c 20 7a 53 65 70 2c 20 6e 53 65 70 29 3b  um, zSep, nSep);
9ed0: 0a 20 20 20 20 7d 0a 20 20 20 20 7a 56 61 6c 20  .    }.    zVal 
9ee0: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
9ef0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
9f00: 5b 30 5d 29 3b 0a 20 20 20 20 6e 56 61 6c 20 3d  [0]);.    nVal =
9f10: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
9f20: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
9f30: 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63     sqlite3StrAcc
9f40: 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 6d 2c  umAppend(pAccum,
9f50: 20 7a 56 61 6c 2c 20 6e 56 61 6c 29 3b 0a 20 20   zVal, nVal);.  
9f60: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
9f70: 67 72 6f 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c  groupConcatFinal
9f80: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
9f90: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
9fa0: 20 53 74 72 41 63 63 75 6d 20 2a 70 41 63 63 75   StrAccum *pAccu
9fb0: 6d 3b 0a 20 20 70 41 63 63 75 6d 20 3d 20 73 71  m;.  pAccum = sq
9fc0: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
9fd0: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
9fe0: 20 30 29 3b 0a 20 20 69 66 28 20 70 41 63 63 75   0);.  if( pAccu
9ff0: 6d 20 29 7b 0a 20 20 20 20 69 66 28 20 70 41 63  m ){.    if( pAc
a000: 63 75 6d 2d 3e 74 6f 6f 42 69 67 20 29 7b 0a 20  cum->tooBig ){. 
a010: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
a020: 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67  ult_error_toobig
a030: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7d  (context);.    }
a040: 65 6c 73 65 20 69 66 28 20 70 41 63 63 75 6d 2d  else if( pAccum-
a050: 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 29 7b  >mallocFailed ){
a060: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
a070: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65  esult_error_nome
a080: 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  m(context);.    
a090: 7d 65 6c 73 65 7b 20 20 20 20 0a 20 20 20 20 20  }else{    .     
a0a0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
a0b0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  text(context, sq
a0c0: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e  lite3StrAccumFin
a0d0: 69 73 68 28 70 41 63 63 75 6d 29 2c 20 2d 31 2c  ish(pAccum), -1,
a0e0: 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   .              
a0f0: 20 20 20 20 20 20 20 20 20 20 20 20 73 71 6c 69              sqli
a100: 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d  te3_free);.    }
a110: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  .  }.}../*.** Th
a120: 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 67 69  is function regi
a130: 73 74 65 72 65 64 20 61 6c 6c 20 6f 66 20 74 68  stered all of th
a140: 65 20 61 62 6f 76 65 20 43 20 66 75 6e 63 74 69  e above C functi
a150: 6f 6e 73 20 61 73 20 53 51 4c 0a 2a 2a 20 66 75  ons as SQL.** fu
a160: 6e 63 74 69 6f 6e 73 2e 20 20 54 68 69 73 20 73  nctions.  This s
a170: 68 6f 75 6c 64 20 62 65 20 74 68 65 20 6f 6e 6c  hould be the onl
a180: 79 20 72 6f 75 74 69 6e 65 20 69 6e 20 74 68 69  y routine in thi
a190: 73 20 66 69 6c 65 20 77 69 74 68 0a 2a 2a 20 65  s file with.** e
a1a0: 78 74 65 72 6e 61 6c 20 6c 69 6e 6b 61 67 65 2e  xternal linkage.
a1b0: 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33  .*/.void sqlite3
a1c0: 52 65 67 69 73 74 65 72 42 75 69 6c 74 69 6e 46  RegisterBuiltinF
a1d0: 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65 33  unctions(sqlite3
a1e0: 20 2a 64 62 29 7b 0a 23 69 66 6e 64 65 66 20 53   *db){.#ifndef S
a1f0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 4c 54 45 52  QLITE_OMIT_ALTER
a200: 54 41 42 4c 45 0a 20 20 73 71 6c 69 74 65 33 41  TABLE.  sqlite3A
a210: 6c 74 65 72 46 75 6e 63 74 69 6f 6e 73 28 64 62  lterFunctions(db
a220: 29 3b 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20  );.#endif.  if( 
a230: 21 64 62 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65  !db->mallocFaile
a240: 64 20 29 7b 0a 20 20 20 20 69 6e 74 20 72 63 20  d ){.    int rc 
a250: 3d 20 73 71 6c 69 74 65 33 5f 6f 76 65 72 6c 6f  = sqlite3_overlo
a260: 61 64 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20  ad_function(db, 
a270: 22 4d 41 54 43 48 22 2c 20 32 29 3b 0a 20 20 20  "MATCH", 2);.   
a280: 20 61 73 73 65 72 74 28 20 72 63 3d 3d 53 51 4c   assert( rc==SQL
a290: 49 54 45 5f 4e 4f 4d 45 4d 20 7c 7c 20 72 63 3d  ITE_NOMEM || rc=
a2a0: 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20 20  =SQLITE_OK );.  
a2b0: 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45    if( rc==SQLITE
a2c0: 5f 4e 4f 4d 45 4d 20 29 7b 0a 20 20 20 20 20 20  _NOMEM ){.      
a2d0: 64 62 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64  db->mallocFailed
a2e0: 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a   = 1;.    }.  }.
a2f0: 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65  }../*.** Set the
a300: 20 4c 49 4b 45 4f 50 54 20 66 6c 61 67 20 6f 6e   LIKEOPT flag on
a310: 20 74 68 65 20 32 2d 61 72 67 75 6d 65 6e 74 20   the 2-argument 
a320: 66 75 6e 63 74 69 6f 6e 20 77 69 74 68 20 74 68  function with th
a330: 65 20 67 69 76 65 6e 20 6e 61 6d 65 2e 0a 2a 2f  e given name..*/
a340: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 65 74  .static void set
a350: 4c 69 6b 65 4f 70 74 46 6c 61 67 28 73 71 6c 69  LikeOptFlag(sqli
a360: 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63  te3 *db, const c
a370: 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 75 38 20 66  har *zName, u8 f
a380: 6c 61 67 56 61 6c 29 7b 0a 20 20 46 75 6e 63 44  lagVal){.  FuncD
a390: 65 66 20 2a 70 44 65 66 3b 0a 20 20 70 44 65 66  ef *pDef;.  pDef
a3a0: 20 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 46 75   = sqlite3FindFu
a3b0: 6e 63 74 69 6f 6e 28 64 62 2c 20 7a 4e 61 6d 65  nction(db, zName
a3c0: 2c 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e 33  , sqlite3Strlen3
a3d0: 30 28 7a 4e 61 6d 65 29 2c 0a 20 20 20 20 20 20  0(zName),.      
a3e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a3f0: 20 20 20 20 20 20 20 32 2c 20 53 51 4c 49 54 45         2, SQLITE
a400: 5f 55 54 46 38 2c 20 30 29 3b 0a 20 20 69 66 28  _UTF8, 0);.  if(
a410: 20 41 4c 57 41 59 53 28 70 44 65 66 29 20 29 7b   ALWAYS(pDef) ){
a420: 0a 20 20 20 20 70 44 65 66 2d 3e 66 6c 61 67 73  .    pDef->flags
a430: 20 3d 20 66 6c 61 67 56 61 6c 3b 0a 20 20 7d 0a   = flagVal;.  }.
a440: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 67 69 73 74 65  }../*.** Registe
a450: 72 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20 4c  r the built-in L
a460: 49 4b 45 20 61 6e 64 20 47 4c 4f 42 20 66 75 6e  IKE and GLOB fun
a470: 63 74 69 6f 6e 73 2e 20 20 54 68 65 20 63 61 73  ctions.  The cas
a480: 65 53 65 6e 73 69 74 69 76 65 0a 2a 2a 20 70 61  eSensitive.** pa
a490: 72 61 6d 65 74 65 72 20 64 65 74 65 72 6d 69 6e  rameter determin
a4a0: 65 73 20 77 68 65 74 68 65 72 20 6f 72 20 6e 6f  es whether or no
a4b0: 74 20 74 68 65 20 4c 49 4b 45 20 6f 70 65 72 61  t the LIKE opera
a4c0: 74 6f 72 20 69 73 20 63 61 73 65 0a 2a 2a 20 73  tor is case.** s
a4d0: 65 6e 73 69 74 69 76 65 2e 20 20 47 4c 4f 42 20  ensitive.  GLOB 
a4e0: 69 73 20 61 6c 77 61 79 73 20 63 61 73 65 20 73  is always case s
a4f0: 65 6e 73 69 74 69 76 65 2e 0a 2a 2f 0a 76 6f 69  ensitive..*/.voi
a500: 64 20 73 71 6c 69 74 65 33 52 65 67 69 73 74 65  d sqlite3Registe
a510: 72 4c 69 6b 65 46 75 6e 63 74 69 6f 6e 73 28 73  rLikeFunctions(s
a520: 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e 74 20  qlite3 *db, int 
a530: 63 61 73 65 53 65 6e 73 69 74 69 76 65 29 7b 0a  caseSensitive){.
a540: 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65    struct compare
a550: 49 6e 66 6f 20 2a 70 49 6e 66 6f 3b 0a 20 20 69  Info *pInfo;.  i
a560: 66 28 20 63 61 73 65 53 65 6e 73 69 74 69 76 65  f( caseSensitive
a570: 20 29 7b 0a 20 20 20 20 70 49 6e 66 6f 20 3d 20   ){.    pInfo = 
a580: 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49  (struct compareI
a590: 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c  nfo*)&likeInfoAl
a5a0: 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  t;.  }else{.    
a5b0: 70 49 6e 66 6f 20 3d 20 28 73 74 72 75 63 74 20  pInfo = (struct 
a5c0: 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26 6c 69  compareInfo*)&li
a5d0: 6b 65 49 6e 66 6f 4e 6f 72 6d 3b 0a 20 20 7d 0a  keInfoNorm;.  }.
a5e0: 20 20 73 71 6c 69 74 65 33 43 72 65 61 74 65 46    sqlite3CreateF
a5f0: 75 6e 63 28 64 62 2c 20 22 6c 69 6b 65 22 2c 20  unc(db, "like", 
a600: 32 2c 20 53 51 4c 49 54 45 5f 41 4e 59 2c 20 70  2, SQLITE_ANY, p
a610: 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20  Info, likeFunc, 
a620: 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33  0, 0);.  sqlite3
a630: 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c 20 22  CreateFunc(db, "
a640: 6c 69 6b 65 22 2c 20 33 2c 20 53 51 4c 49 54 45  like", 3, SQLITE
a650: 5f 41 4e 59 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b  _ANY, pInfo, lik
a660: 65 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20  eFunc, 0, 0);.  
a670: 73 71 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e  sqlite3CreateFun
a680: 63 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20 32 2c  c(db, "glob", 2,
a690: 20 53 51 4c 49 54 45 5f 41 4e 59 2c 20 0a 20 20   SQLITE_ANY, .  
a6a0: 20 20 20 20 28 73 74 72 75 63 74 20 63 6f 6d 70      (struct comp
a6b0: 61 72 65 49 6e 66 6f 2a 29 26 67 6c 6f 62 49 6e  areInfo*)&globIn
a6c0: 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c  fo, likeFunc, 0,
a6d0: 30 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74  0);.  setLikeOpt
a6e0: 46 6c 61 67 28 64 62 2c 20 22 67 6c 6f 62 22 2c  Flag(db, "glob",
a6f0: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b   SQLITE_FUNC_LIK
a700: 45 20 7c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  E | SQLITE_FUNC_
a710: 43 41 53 45 29 3b 0a 20 20 73 65 74 4c 69 6b 65  CASE);.  setLike
a720: 4f 70 74 46 6c 61 67 28 64 62 2c 20 22 6c 69 6b  OptFlag(db, "lik
a730: 65 22 2c 20 0a 20 20 20 20 20 20 63 61 73 65 53  e", .      caseS
a740: 65 6e 73 69 74 69 76 65 20 3f 20 28 53 51 4c 49  ensitive ? (SQLI
a750: 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53  TE_FUNC_LIKE | S
a760: 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29  QLITE_FUNC_CASE)
a770: 20 3a 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c   : SQLITE_FUNC_L
a780: 49 4b 45 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 70  IKE);.}../*.** p
a790: 45 78 70 72 20 70 6f 69 6e 74 73 20 74 6f 20 61  Expr points to a
a7a0: 6e 20 65 78 70 72 65 73 73 69 6f 6e 20 77 68 69  n expression whi
a7b0: 63 68 20 69 6d 70 6c 65 6d 65 6e 74 73 20 61 20  ch implements a 
a7c0: 66 75 6e 63 74 69 6f 6e 2e 20 20 49 66 0a 2a 2a  function.  If.**
a7d0: 20 69 74 20 69 73 20 61 70 70 72 6f 70 72 69 61   it is appropria
a7e0: 74 65 20 74 6f 20 61 70 70 6c 79 20 74 68 65 20  te to apply the 
a7f0: 4c 49 4b 45 20 6f 70 74 69 6d 69 7a 61 74 69 6f  LIKE optimizatio
a800: 6e 20 74 6f 20 74 68 61 74 20 66 75 6e 63 74 69  n to that functi
a810: 6f 6e 0a 2a 2a 20 74 68 65 6e 20 73 65 74 20 61  on.** then set a
a820: 57 63 5b 30 5d 20 74 68 72 6f 75 67 68 20 61 57  Wc[0] through aW
a830: 63 5b 32 5d 20 74 6f 20 74 68 65 20 77 69 6c 64  c[2] to the wild
a840: 63 61 72 64 20 63 68 61 72 61 63 74 65 72 73 20  card characters 
a850: 61 6e 64 0a 2a 2a 20 72 65 74 75 72 6e 20 54 52  and.** return TR
a860: 55 45 2e 20 20 49 66 20 74 68 65 20 66 75 6e 63  UE.  If the func
a870: 74 69 6f 6e 20 69 73 20 6e 6f 74 20 61 20 4c 49  tion is not a LI
a880: 4b 45 2d 73 74 79 6c 65 20 66 75 6e 63 74 69 6f  KE-style functio
a890: 6e 20 74 68 65 6e 0a 2a 2a 20 72 65 74 75 72 6e  n then.** return
a8a0: 20 46 41 4c 53 45 2e 0a 2a 2f 0a 69 6e 74 20 73   FALSE..*/.int s
a8b0: 71 6c 69 74 65 33 49 73 4c 69 6b 65 46 75 6e 63  qlite3IsLikeFunc
a8c0: 74 69 6f 6e 28 73 71 6c 69 74 65 33 20 2a 64 62  tion(sqlite3 *db
a8d0: 2c 20 45 78 70 72 20 2a 70 45 78 70 72 2c 20 69  , Expr *pExpr, i
a8e0: 6e 74 20 2a 70 49 73 4e 6f 63 61 73 65 2c 20 63  nt *pIsNocase, c
a8f0: 68 61 72 20 2a 61 57 63 29 7b 0a 20 20 46 75 6e  har *aWc){.  Fun
a900: 63 44 65 66 20 2a 70 44 65 66 3b 0a 20 20 69 66  cDef *pDef;.  if
a910: 28 20 70 45 78 70 72 2d 3e 6f 70 21 3d 54 4b 5f  ( pExpr->op!=TK_
a920: 46 55 4e 43 54 49 4f 4e 20 0a 20 20 20 7c 7c 20  FUNCTION .   || 
a930: 21 70 45 78 70 72 2d 3e 78 2e 70 4c 69 73 74 20  !pExpr->x.pList 
a940: 0a 20 20 20 7c 7c 20 70 45 78 70 72 2d 3e 78 2e  .   || pExpr->x.
a950: 70 4c 69 73 74 2d 3e 6e 45 78 70 72 21 3d 32 0a  pList->nExpr!=2.
a960: 20 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20    ){.    return 
a970: 30 3b 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28  0;.  }.  assert(
a980: 20 21 45 78 70 72 48 61 73 50 72 6f 70 65 72 74   !ExprHasPropert
a990: 79 28 70 45 78 70 72 2c 20 45 50 5f 78 49 73 53  y(pExpr, EP_xIsS
a9a0: 65 6c 65 63 74 29 20 29 3b 0a 20 20 70 44 65 66  elect) );.  pDef
a9b0: 20 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 46 75   = sqlite3FindFu
a9c0: 6e 63 74 69 6f 6e 28 64 62 2c 20 70 45 78 70 72  nction(db, pExpr
a9d0: 2d 3e 75 2e 7a 54 6f 6b 65 6e 2c 20 0a 20 20 20  ->u.zToken, .   
a9e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
a9f0: 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65            sqlite
aa00: 33 53 74 72 6c 65 6e 33 30 28 70 45 78 70 72 2d  3Strlen30(pExpr-
aa10: 3e 75 2e 7a 54 6f 6b 65 6e 29 2c 0a 20 20 20 20  >u.zToken),.    
aa20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
aa30: 20 20 20 20 20 20 20 20 20 32 2c 20 53 51 4c 49           2, SQLI
aa40: 54 45 5f 55 54 46 38 2c 20 30 29 3b 0a 20 20 69  TE_UTF8, 0);.  i
aa50: 66 28 20 4e 45 56 45 52 28 70 44 65 66 3d 3d 30  f( NEVER(pDef==0
aa60: 29 20 7c 7c 20 28 70 44 65 66 2d 3e 66 6c 61 67  ) || (pDef->flag
aa70: 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  s & SQLITE_FUNC_
aa80: 4c 49 4b 45 29 3d 3d 30 20 29 7b 0a 20 20 20 20  LIKE)==0 ){.    
aa90: 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 0a 20  return 0;.  }.. 
aaa0: 20 2f 2a 20 54 68 65 20 6d 65 6d 63 70 79 28 29   /* The memcpy()
aab0: 20 73 74 61 74 65 6d 65 6e 74 20 61 73 73 75 6d   statement assum
aac0: 65 73 20 74 68 61 74 20 74 68 65 20 77 69 6c 64  es that the wild
aad0: 63 61 72 64 20 63 68 61 72 61 63 74 65 72 73 20  card characters 
aae0: 61 72 65 0a 20 20 2a 2a 20 74 68 65 20 66 69 72  are.  ** the fir
aaf0: 73 74 20 74 68 72 65 65 20 73 74 61 74 65 6d 65  st three stateme
ab00: 6e 74 73 20 69 6e 20 74 68 65 20 63 6f 6d 70 61  nts in the compa
ab10: 72 65 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65  reInfo structure
ab20: 2e 20 20 54 68 65 0a 20 20 2a 2a 20 61 73 73 65  .  The.  ** asse
ab30: 72 74 73 28 29 20 74 68 61 74 20 66 6f 6c 6c 6f  rts() that follo
ab40: 77 20 76 65 72 69 66 79 20 74 68 61 74 20 61 73  w verify that as
ab50: 73 75 6d 70 74 69 6f 6e 0a 20 20 2a 2f 0a 20 20  sumption.  */.  
ab60: 6d 65 6d 63 70 79 28 61 57 63 2c 20 70 44 65 66  memcpy(aWc, pDef
ab70: 2d 3e 70 55 73 65 72 44 61 74 61 2c 20 33 29 3b  ->pUserData, 3);
ab80: 0a 20 20 61 73 73 65 72 74 28 20 28 63 68 61 72  .  assert( (char
ab90: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d  *)&likeInfoAlt =
aba0: 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e  = (char*)&likeIn
abb0: 66 6f 41 6c 74 2e 6d 61 74 63 68 41 6c 6c 20 29  foAlt.matchAll )
abc0: 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28 28 63  ;.  assert( &((c
abd0: 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c  har*)&likeInfoAl
abe0: 74 29 5b 31 5d 20 3d 3d 20 28 63 68 61 72 2a 29  t)[1] == (char*)
abf0: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d 61 74  &likeInfoAlt.mat
ac00: 63 68 4f 6e 65 20 29 3b 0a 20 20 61 73 73 65 72  chOne );.  asser
ac10: 74 28 20 26 28 28 63 68 61 72 2a 29 26 6c 69 6b  t( &((char*)&lik
ac20: 65 49 6e 66 6f 41 6c 74 29 5b 32 5d 20 3d 3d 20  eInfoAlt)[2] == 
ac30: 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f  (char*)&likeInfo
ac40: 41 6c 74 2e 6d 61 74 63 68 53 65 74 20 29 3b 0a  Alt.matchSet );.
ac50: 20 20 2a 70 49 73 4e 6f 63 61 73 65 20 3d 20 28    *pIsNocase = (
ac60: 70 44 65 66 2d 3e 66 6c 61 67 73 20 26 20 53 51  pDef->flags & SQ
ac70: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d  LITE_FUNC_CASE)=
ac80: 3d 30 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a  =0;.  return 1;.
ac90: 7d 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 20 61 6c 6c  }../*.** All all
aca0: 20 6f 66 20 74 68 65 20 46 75 6e 63 44 65 66 20   of the FuncDef 
acb0: 73 74 72 75 63 74 75 72 65 73 20 69 6e 20 74 68  structures in th
acc0: 65 20 61 42 75 69 6c 74 69 6e 46 75 6e 63 5b 5d  e aBuiltinFunc[]
acd0: 20 61 72 72 61 79 20 61 62 6f 76 65 0a 2a 2a 20   array above.** 
ace0: 74 6f 20 74 68 65 20 67 6c 6f 62 61 6c 20 66 75  to the global fu
acf0: 6e 63 74 69 6f 6e 20 68 61 73 68 20 74 61 62 6c  nction hash tabl
ad00: 65 2e 20 20 54 68 69 73 20 6f 63 63 75 72 73 20  e.  This occurs 
ad10: 61 74 20 73 74 61 72 74 2d 74 69 6d 65 20 28 61  at start-time (a
ad20: 73 0a 2a 2a 20 61 20 63 6f 6e 73 65 71 75 65 6e  s.** a consequen
ad30: 63 65 20 6f 66 20 63 61 6c 6c 69 6e 67 20 73 71  ce of calling sq
ad40: 6c 69 74 65 33 5f 69 6e 69 74 69 61 6c 69 7a 65  lite3_initialize
ad50: 28 29 29 2e 0a 2a 2a 0a 2a 2a 20 41 66 74 65 72  ())..**.** After
ad60: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 75   this routine ru
ad70: 6e 73 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74  ns.*/.void sqlit
ad80: 65 33 52 65 67 69 73 74 65 72 47 6c 6f 62 61 6c  e3RegisterGlobal
ad90: 46 75 6e 63 74 69 6f 6e 73 28 76 6f 69 64 29 7b  Functions(void){
ada0: 0a 20 20 2f 2a 0a 20 20 2a 2a 20 54 68 65 20 66  .  /*.  ** The f
adb0: 6f 6c 6c 6f 77 69 6e 67 20 61 72 72 61 79 20 68  ollowing array h
adc0: 6f 6c 64 73 20 46 75 6e 63 44 65 66 20 73 74 72  olds FuncDef str
add0: 75 63 74 75 72 65 73 20 66 6f 72 20 61 6c 6c 20  uctures for all 
ade0: 6f 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 73  of the functions
adf0: 0a 20 20 2a 2a 20 64 65 66 69 6e 65 64 20 69 6e  .  ** defined in
ae00: 20 74 68 69 73 20 66 69 6c 65 2e 0a 20 20 2a 2a   this file..  **
ae10: 0a 20 20 2a 2a 20 54 68 65 20 61 72 72 61 79 20  .  ** The array 
ae20: 63 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 73 74 61  cannot be consta
ae30: 6e 74 20 73 69 6e 63 65 20 63 68 61 6e 67 65 73  nt since changes
ae40: 20 61 72 65 20 6d 61 64 65 20 74 6f 20 74 68 65   are made to the
ae50: 0a 20 20 2a 2a 20 46 75 6e 63 44 65 66 2e 70 48  .  ** FuncDef.pH
ae60: 61 73 68 20 65 6c 65 6d 65 6e 74 73 20 61 74 20  ash elements at 
ae70: 73 74 61 72 74 2d 74 69 6d 65 2e 20 20 54 68 65  start-time.  The
ae80: 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 74 68 69   elements of thi
ae90: 73 20 61 72 72 61 79 0a 20 20 2a 2a 20 61 72 65  s array.  ** are
aea0: 20 72 65 61 64 2d 6f 6e 6c 79 20 61 66 74 65 72   read-only after
aeb0: 20 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 20   initialization 
aec0: 69 73 20 63 6f 6d 70 6c 65 74 65 2e 0a 20 20 2a  is complete..  *
aed0: 2f 0a 20 20 73 74 61 74 69 63 20 53 51 4c 49 54  /.  static SQLIT
aee0: 45 5f 57 53 44 20 46 75 6e 63 44 65 66 20 61 42  E_WSD FuncDef aB
aef0: 75 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 3d 20 7b  uiltinFunc[] = {
af00: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74  .    FUNCTION(lt
af10: 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  rim,            
af20: 20 20 31 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46    1, 1, 0, trimF
af30: 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20  unc         ),. 
af40: 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69     FUNCTION(ltri
af50: 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  m,              
af60: 32 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e  2, 1, 0, trimFun
af70: 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20  c         ),.   
af80: 20 46 55 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c   FUNCTION(rtrim,
af90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
afa0: 20 32 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20   2, 0, trimFunc 
afb0: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
afc0: 55 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20  UNCTION(rtrim,  
afd0: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 32              2, 2
afe0: 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20  , 0, trimFunc   
aff0: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
b000: 43 54 49 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20  CTION(trim,     
b010: 20 20 20 20 20 20 20 20 20 20 31 2c 20 33 2c 20            1, 3, 
b020: 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20  0, trimFunc     
b030: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
b040: 49 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20 20 20  ION(trim,       
b050: 20 20 20 20 20 20 20 20 32 2c 20 33 2c 20 30 2c          2, 3, 0,
b060: 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20   trimFunc       
b070: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
b080: 4e 28 6d 69 6e 2c 20 20 20 20 20 20 20 20 20 20  N(min,          
b090: 20 20 20 20 20 2d 31 2c 20 30 2c 20 31 2c 20 6d       -1, 0, 1, m
b0a0: 69 6e 6d 61 78 46 75 6e 63 20 20 20 20 20 20 20  inmaxFunc       
b0b0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
b0c0: 6d 69 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20  min,            
b0d0: 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 30 20 20      0, 0, 1, 0  
b0e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c                ),
b0f0: 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28 6d  .    AGGREGATE(m
b100: 69 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  in,             
b110: 20 20 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61    1, 0, 1, minma
b120: 78 53 74 65 70 2c 20 20 20 20 20 20 6d 69 6e 4d  xStep,      minM
b130: 61 78 46 69 6e 61 6c 69 7a 65 20 29 2c 0a 20 20  axFinalize ),.  
b140: 20 20 46 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20    FUNCTION(max, 
b150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 31                -1
b160: 2c 20 31 2c 20 31 2c 20 6d 69 6e 6d 61 78 46 75  , 1, 1, minmaxFu
b170: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
b180: 46 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20  FUNCTION(max,   
b190: 20 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20               0, 
b1a0: 31 2c 20 31 2c 20 30 20 20 20 20 20 20 20 20 20  1, 1, 0         
b1b0: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 41 47         ),.    AG
b1c0: 47 52 45 47 41 54 45 28 6d 61 78 2c 20 20 20 20  GREGATE(max,    
b1d0: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 31 2c             1, 1,
b1e0: 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20   1, minmaxStep, 
b1f0: 20 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c       minMaxFinal
b200: 69 7a 65 20 29 2c 0a 20 20 20 20 46 55 4e 43 54  ize ),.    FUNCT
b210: 49 4f 4e 28 74 79 70 65 6f 66 2c 20 20 20 20 20  ION(typeof,     
b220: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c          1, 0, 0,
b230: 20 74 79 70 65 6f 66 46 75 6e 63 20 20 20 20 20   typeofFunc     
b240: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
b250: 4e 28 6c 65 6e 67 74 68 2c 20 20 20 20 20 20 20  N(length,       
b260: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c        1, 0, 0, l
b270: 65 6e 67 74 68 46 75 6e 63 20 20 20 20 20 20 20  engthFunc       
b280: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
b290: 73 75 62 73 74 72 2c 20 20 20 20 20 20 20 20 20  substr,         
b2a0: 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 73 75 62      2, 0, 0, sub
b2b0: 73 74 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c  strFunc       ),
b2c0: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 75  .    FUNCTION(su
b2d0: 62 73 74 72 2c 20 20 20 20 20 20 20 20 20 20 20  bstr,           
b2e0: 20 20 33 2c 20 30 2c 20 30 2c 20 73 75 62 73 74    3, 0, 0, subst
b2f0: 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20  rFunc       ),. 
b300: 20 20 20 46 55 4e 43 54 49 4f 4e 28 61 62 73 2c     FUNCTION(abs,
b310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b320: 31 2c 20 30 2c 20 30 2c 20 61 62 73 46 75 6e 63  1, 0, 0, absFunc
b330: 20 20 20 20 20 20 20 20 20 20 29 2c 0a 23 69 66            ),.#if
b340: 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54  ndef SQLITE_OMIT
b350: 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 0a  _FLOATING_POINT.
b360: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 6f 75      FUNCTION(rou
b370: 6e 64 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  nd,             
b380: 20 31 2c 20 30 2c 20 30 2c 20 72 6f 75 6e 64 46   1, 0, 0, roundF
b390: 75 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20  unc        ),.  
b3a0: 20 20 46 55 4e 43 54 49 4f 4e 28 72 6f 75 6e 64    FUNCTION(round
b3b0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32  ,              2
b3c0: 2c 20 30 2c 20 30 2c 20 72 6f 75 6e 64 46 75 6e  , 0, 0, roundFun
b3d0: 63 20 20 20 20 20 20 20 20 29 2c 0a 23 65 6e 64  c        ),.#end
b3e0: 69 66 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  if.    FUNCTION(
b3f0: 75 70 70 65 72 2c 20 20 20 20 20 20 20 20 20 20  upper,          
b400: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 75 70 70      1, 0, 0, upp
b410: 65 72 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c  erFunc        ),
b420: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f  .    FUNCTION(lo
b430: 77 65 72 2c 20 20 20 20 20 20 20 20 20 20 20 20  wer,            
b440: 20 20 31 2c 20 30 2c 20 30 2c 20 6c 6f 77 65 72    1, 0, 0, lower
b450: 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 20  Func        ),. 
b460: 20 20 20 46 55 4e 43 54 49 4f 4e 28 63 6f 61 6c     FUNCTION(coal
b470: 65 73 63 65 2c 20 20 20 20 20 20 20 20 20 20 20  esce,           
b480: 31 2c 20 30 2c 20 30 2c 20 30 20 20 20 20 20 20  1, 0, 0, 0      
b490: 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20            ),.   
b4a0: 20 46 55 4e 43 54 49 4f 4e 28 63 6f 61 6c 65 73   FUNCTION(coales
b4b0: 63 65 2c 20 20 20 20 20 20 20 20 20 20 20 30 2c  ce,           0,
b4c0: 20 30 2c 20 30 2c 20 30 20 20 20 20 20 20 20 20   0, 0, 0        
b4d0: 20 20 20 20 20 20 20 20 29 2c 0a 2f 2a 20 20 46          ),./*  F
b4e0: 55 4e 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65  UNCTION(coalesce
b4f0: 2c 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 30  ,          -1, 0
b500: 2c 20 30 2c 20 69 66 6e 75 6c 6c 46 75 6e 63 20  , 0, ifnullFunc 
b510: 20 20 20 20 20 20 29 2c 20 2a 2f 0a 20 20 20 20        ), */.    
b520: 7b 2d 31 2c 53 51 4c 49 54 45 5f 55 54 46 38 2c  {-1,SQLITE_UTF8,
b530: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 4f 41 4c  SQLITE_FUNC_COAL
b540: 45 53 43 45 2c 30 2c 30 2c 69 66 6e 75 6c 6c 46  ESCE,0,0,ifnullF
b550: 75 6e 63 2c 30 2c 30 2c 22 63 6f 61 6c 65 73 63  unc,0,0,"coalesc
b560: 65 22 2c 30 7d 2c 0a 20 20 20 20 46 55 4e 43 54  e",0},.    FUNCT
b570: 49 4f 4e 28 68 65 78 2c 20 20 20 20 20 20 20 20  ION(hex,        
b580: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c          1, 0, 0,
b590: 20 68 65 78 46 75 6e 63 20 20 20 20 20 20 20 20   hexFunc        
b5a0: 20 20 29 2c 0a 2f 2a 20 20 46 55 4e 43 54 49 4f    ),./*  FUNCTIO
b5b0: 4e 28 69 66 6e 75 6c 6c 2c 20 20 20 20 20 20 20  N(ifnull,       
b5c0: 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 69        2, 0, 0, i
b5d0: 66 6e 75 6c 6c 46 75 6e 63 20 20 20 20 20 20 20  fnullFunc       
b5e0: 29 2c 20 2a 2f 0a 20 20 20 20 7b 32 2c 53 51 4c  ), */.    {2,SQL
b5f0: 49 54 45 5f 55 54 46 38 2c 53 51 4c 49 54 45 5f  ITE_UTF8,SQLITE_
b600: 46 55 4e 43 5f 43 4f 41 4c 45 53 43 45 2c 30 2c  FUNC_COALESCE,0,
b610: 30 2c 69 66 6e 75 6c 6c 46 75 6e 63 2c 30 2c 30  0,ifnullFunc,0,0
b620: 2c 22 69 66 6e 75 6c 6c 22 2c 30 7d 2c 0a 20 20  ,"ifnull",0},.  
b630: 20 20 46 55 4e 43 54 49 4f 4e 28 72 61 6e 64 6f    FUNCTION(rando
b640: 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 30  m,             0
b650: 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 46 75  , 0, 0, randomFu
b660: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
b670: 46 55 4e 43 54 49 4f 4e 28 72 61 6e 64 6f 6d 62  FUNCTION(randomb
b680: 6c 6f 62 2c 20 20 20 20 20 20 20 20 20 31 2c 20  lob,         1, 
b690: 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 42 6c 6f 62  0, 0, randomBlob
b6a0: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
b6b0: 4e 43 54 49 4f 4e 28 6e 75 6c 6c 69 66 2c 20 20  NCTION(nullif,  
b6c0: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c             2, 0,
b6d0: 20 31 2c 20 6e 75 6c 6c 69 66 46 75 6e 63 20 20   1, nullifFunc  
b6e0: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
b6f0: 54 49 4f 4e 28 73 71 6c 69 74 65 5f 76 65 72 73  TION(sqlite_vers
b700: 69 6f 6e 2c 20 20 20 20 20 30 2c 20 30 2c 20 30  ion,     0, 0, 0
b710: 2c 20 76 65 72 73 69 6f 6e 46 75 6e 63 20 20 20  , versionFunc   
b720: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
b730: 4f 4e 28 73 71 6c 69 74 65 5f 73 6f 75 72 63 65  ON(sqlite_source
b740: 5f 69 64 2c 20 20 20 30 2c 20 30 2c 20 30 2c 20  _id,   0, 0, 0, 
b750: 73 6f 75 72 63 65 69 64 46 75 6e 63 20 20 20 20  sourceidFunc    
b760: 20 29 2c 0a 23 69 66 6e 64 65 66 20 53 51 4c 49   ),.#ifndef SQLI
b770: 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f  TE_OMIT_COMPILEO
b780: 50 54 49 4f 4e 5f 44 49 41 47 53 0a 20 20 20 20  PTION_DIAGS.    
b790: 46 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f  FUNCTION(sqlite_
b7a0: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73  compileoption_us
b7b0: 65 64 2c 31 2c 20 30 2c 20 30 2c 20 63 6f 6d 70  ed,1, 0, 0, comp
b7c0: 69 6c 65 6f 70 74 69 6f 6e 75 73 65 64 46 75 6e  ileoptionusedFun
b7d0: 63 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49  c  ),.    FUNCTI
b7e0: 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c  ON(sqlite_compil
b7f0: 65 6f 70 74 69 6f 6e 5f 67 65 74 2c 20 31 2c 20  eoption_get, 1, 
b800: 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65 6f 70 74  0, 0, compileopt
b810: 69 6f 6e 67 65 74 46 75 6e 63 20 20 29 2c 0a 23  iongetFunc  ),.#
b820: 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f  endif /* SQLITE_
b830: 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49  OMIT_COMPILEOPTI
b840: 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 20 20 20 20  ON_DIAGS */.    
b850: 46 55 4e 43 54 49 4f 4e 28 71 75 6f 74 65 2c 20  FUNCTION(quote, 
b860: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
b870: 30 2c 20 30 2c 20 71 75 6f 74 65 46 75 6e 63 20  0, 0, quoteFunc 
b880: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
b890: 4e 43 54 49 4f 4e 28 6c 61 73 74 5f 69 6e 73 65  NCTION(last_inse
b8a0: 72 74 5f 72 6f 77 69 64 2c 20 20 30 2c 20 30 2c  rt_rowid,  0, 0,
b8b0: 20 30 2c 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f   0, last_insert_
b8c0: 72 6f 77 69 64 29 2c 0a 20 20 20 20 46 55 4e 43  rowid),.    FUNC
b8d0: 54 49 4f 4e 28 63 68 61 6e 67 65 73 2c 20 20 20  TION(changes,   
b8e0: 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30           0, 0, 0
b8f0: 2c 20 63 68 61 6e 67 65 73 20 20 20 20 20 20 20  , changes       
b900: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
b910: 4f 4e 28 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73  ON(total_changes
b920: 2c 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20  ,      0, 0, 0, 
b930: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 20 20 20  total_changes   
b940: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
b950: 28 72 65 70 6c 61 63 65 2c 20 20 20 20 20 20 20  (replace,       
b960: 20 20 20 20 20 33 2c 20 30 2c 20 30 2c 20 72 65       3, 0, 0, re
b970: 70 6c 61 63 65 46 75 6e 63 20 20 20 20 20 20 29  placeFunc      )
b980: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 7a  ,.    FUNCTION(z
b990: 65 72 6f 62 6c 6f 62 2c 20 20 20 20 20 20 20 20  eroblob,        
b9a0: 20 20 20 31 2c 20 30 2c 20 30 2c 20 7a 65 72 6f     1, 0, 0, zero
b9b0: 62 6c 6f 62 46 75 6e 63 20 20 20 20 20 29 2c 0a  blobFunc     ),.
b9c0: 20 20 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f    #ifdef SQLITE_
b9d0: 53 4f 55 4e 44 45 58 0a 20 20 20 20 46 55 4e 43  SOUNDEX.    FUNC
b9e0: 54 49 4f 4e 28 73 6f 75 6e 64 65 78 2c 20 20 20  TION(soundex,   
b9f0: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
ba00: 2c 20 73 6f 75 6e 64 65 78 46 75 6e 63 20 20 20  , soundexFunc   
ba10: 20 20 20 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20     ),.  #endif. 
ba20: 20 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f   #ifndef SQLITE_
ba30: 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54 45 4e 53  OMIT_LOAD_EXTENS
ba40: 49 4f 4e 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e  ION.    FUNCTION
ba50: 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 2c  (load_extension,
ba60: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c 6f       1, 0, 0, lo
ba70: 61 64 45 78 74 20 20 20 20 20 20 20 20 20 20 29  adExt          )
ba80: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c  ,.    FUNCTION(l
ba90: 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20  oad_extension,  
baa0: 20 20 20 32 2c 20 30 2c 20 30 2c 20 6c 6f 61 64     2, 0, 0, load
bab0: 45 78 74 20 20 20 20 20 20 20 20 20 20 29 2c 0a  Ext          ),.
bac0: 20 20 23 65 6e 64 69 66 0a 20 20 20 20 41 47 47    #endif.    AGG
bad0: 52 45 47 41 54 45 28 73 75 6d 2c 20 20 20 20 20  REGATE(sum,     
bae0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
baf0: 30 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20  0, sumStep,     
bb00: 20 20 20 20 73 75 6d 46 69 6e 61 6c 69 7a 65 20      sumFinalize 
bb10: 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47     ),.    AGGREG
bb20: 41 54 45 28 74 6f 74 61 6c 2c 20 20 20 20 20 20  ATE(total,      
bb30: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
bb40: 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20 20  sumStep,        
bb50: 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a 65 20 20   totalFinalize  
bb60: 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41    ),.    AGGREGA
bb70: 54 45 28 61 76 67 2c 20 20 20 20 20 20 20 20 20  TE(avg,         
bb80: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73        1, 0, 0, s
bb90: 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20 20 20  umStep,         
bba0: 61 76 67 46 69 6e 61 6c 69 7a 65 20 20 20 20 29  avgFinalize    )
bbb0: 2c 0a 20 2f 2a 20 41 47 47 52 45 47 41 54 45 28  ,. /* AGGREGATE(
bbc0: 63 6f 75 6e 74 2c 20 20 20 20 20 20 20 20 20 20  count,          
bbd0: 20 20 20 30 2c 20 30 2c 20 30 2c 20 63 6f 75 6e     0, 0, 0, coun
bbe0: 74 53 74 65 70 2c 20 20 20 20 20 20 20 63 6f 75  tStep,       cou
bbf0: 6e 74 46 69 6e 61 6c 69 7a 65 20 20 29 2c 20 2a  ntFinalize  ), *
bc00: 2f 0a 20 20 20 20 7b 30 2c 53 51 4c 49 54 45 5f  /.    {0,SQLITE_
bc10: 55 54 46 38 2c 53 51 4c 49 54 45 5f 46 55 4e 43  UTF8,SQLITE_FUNC
bc20: 5f 43 4f 55 4e 54 2c 30 2c 30 2c 30 2c 63 6f 75  _COUNT,0,0,0,cou
bc30: 6e 74 53 74 65 70 2c 63 6f 75 6e 74 46 69 6e 61  ntStep,countFina
bc40: 6c 69 7a 65 2c 22 63 6f 75 6e 74 22 2c 30 7d 2c  lize,"count",0},
bc50: 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28 63  .    AGGREGATE(c
bc60: 6f 75 6e 74 2c 20 20 20 20 20 20 20 20 20 20 20  ount,           
bc70: 20 20 31 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74    1, 0, 0, count
bc80: 53 74 65 70 2c 20 20 20 20 20 20 20 63 6f 75 6e  Step,       coun
bc90: 74 46 69 6e 61 6c 69 7a 65 20 20 29 2c 0a 20 20  tFinalize  ),.  
bca0: 20 20 41 47 47 52 45 47 41 54 45 28 67 72 6f 75    AGGREGATE(grou
bcb0: 70 5f 63 6f 6e 63 61 74 2c 20 20 20 20 20 20 31  p_concat,      1
bcc0: 2c 20 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e  , 0, 0, groupCon
bcd0: 63 61 74 53 74 65 70 2c 20 67 72 6f 75 70 43 6f  catStep, groupCo
bce0: 6e 63 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20  ncatFinalize),. 
bcf0: 20 20 20 41 47 47 52 45 47 41 54 45 28 67 72 6f     AGGREGATE(gro
bd00: 75 70 5f 63 6f 6e 63 61 74 2c 20 20 20 20 20 20  up_concat,      
bd10: 32 2c 20 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f  2, 0, 0, groupCo
bd20: 6e 63 61 74 53 74 65 70 2c 20 67 72 6f 75 70 43  ncatStep, groupC
bd30: 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a  oncatFinalize),.
bd40: 20 20 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28    .    LIKEFUNC(
bd50: 67 6c 6f 62 2c 20 32 2c 20 26 67 6c 6f 62 49 6e  glob, 2, &globIn
bd60: 66 6f 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  fo, SQLITE_FUNC_
bd70: 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43  LIKE|SQLITE_FUNC
bd80: 5f 43 41 53 45 29 2c 0a 20 20 23 69 66 64 65 66  _CASE),.  #ifdef
bd90: 20 53 51 4c 49 54 45 5f 43 41 53 45 5f 53 45 4e   SQLITE_CASE_SEN
bda0: 53 49 54 49 56 45 5f 4c 49 4b 45 0a 20 20 20 20  SITIVE_LIKE.    
bdb0: 4c 49 4b 45 46 55 4e 43 28 6c 69 6b 65 2c 20 32  LIKEFUNC(like, 2
bdc0: 2c 20 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2c 20  , &likeInfoAlt, 
bdd0: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45  SQLITE_FUNC_LIKE
bde0: 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53  |SQLITE_FUNC_CAS
bdf0: 45 29 2c 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43  E),.    LIKEFUNC
be00: 28 6c 69 6b 65 2c 20 33 2c 20 26 6c 69 6b 65 49  (like, 3, &likeI
be10: 6e 66 6f 41 6c 74 2c 20 53 51 4c 49 54 45 5f 46  nfoAlt, SQLITE_F
be20: 55 4e 43 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f  UNC_LIKE|SQLITE_
be30: 46 55 4e 43 5f 43 41 53 45 29 2c 0a 20 20 23 65  FUNC_CASE),.  #e
be40: 6c 73 65 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43  lse.    LIKEFUNC
be50: 28 6c 69 6b 65 2c 20 32 2c 20 26 6c 69 6b 65 49  (like, 2, &likeI
be60: 6e 66 6f 4e 6f 72 6d 2c 20 53 51 4c 49 54 45 5f  nfoNorm, SQLITE_
be70: 46 55 4e 43 5f 4c 49 4b 45 29 2c 0a 20 20 20 20  FUNC_LIKE),.    
be80: 4c 49 4b 45 46 55 4e 43 28 6c 69 6b 65 2c 20 33  LIKEFUNC(like, 3
be90: 2c 20 26 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c  , &likeInfoNorm,
bea0: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b   SQLITE_FUNC_LIK
beb0: 45 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 7d  E),.  #endif.  }
bec0: 3b 0a 0a 20 20 69 6e 74 20 69 3b 0a 20 20 46 75  ;..  int i;.  Fu
bed0: 6e 63 44 65 66 48 61 73 68 20 2a 70 48 61 73 68  ncDefHash *pHash
bee0: 20 3d 20 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44   = &GLOBAL(FuncD
bef0: 65 66 48 61 73 68 2c 20 73 71 6c 69 74 65 33 47  efHash, sqlite3G
bf00: 6c 6f 62 61 6c 46 75 6e 63 74 69 6f 6e 73 29 3b  lobalFunctions);
bf10: 0a 20 20 46 75 6e 63 44 65 66 20 2a 61 46 75 6e  .  FuncDef *aFun
bf20: 63 20 3d 20 28 46 75 6e 63 44 65 66 2a 29 26 47  c = (FuncDef*)&G
bf30: 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66 2c 20 61  LOBAL(FuncDef, a
bf40: 42 75 69 6c 74 69 6e 46 75 6e 63 29 3b 0a 0a 20  BuiltinFunc);.. 
bf50: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 41 72 72 61   for(i=0; i<Arra
bf60: 79 53 69 7a 65 28 61 42 75 69 6c 74 69 6e 46 75  ySize(aBuiltinFu
bf70: 6e 63 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 73  nc); i++){.    s
bf80: 71 6c 69 74 65 33 46 75 6e 63 44 65 66 49 6e 73  qlite3FuncDefIns
bf90: 65 72 74 28 70 48 61 73 68 2c 20 26 61 46 75 6e  ert(pHash, &aFun
bfa0: 63 5b 69 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c  c[i]);.  }.  sql
bfb0: 69 74 65 33 52 65 67 69 73 74 65 72 44 61 74 65  ite3RegisterDate
bfc0: 54 69 6d 65 46 75 6e 63 74 69 6f 6e 73 28 29 3b  TimeFunctions();
bfd0: 0a 7d 0a                                         .}.