/ Hex Artifact Content
Login

Artifact f7f0f44b0a2cb568a9c42b1b07e613380ee0b9c6:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 2d 6c 61 6e 67 75 61 67 65 20 69 6d 70 6c 65  C-language imple
01a0: 6d 65 6e 74 61 74 69 6f 6e 73 20 66 6f 72 20 6d  mentations for m
01b0: 61 6e 79 20 6f 66 20 74 68 65 20 53 51 4c 0a 2a  any of the SQL.*
01c0: 2a 20 66 75 6e 63 74 69 6f 6e 73 20 6f 66 20 53  * functions of S
01d0: 51 4c 69 74 65 2e 20 20 28 53 6f 6d 65 20 66 75  QLite.  (Some fu
01e0: 6e 63 74 69 6f 6e 2c 20 61 6e 64 20 69 6e 20 70  nction, and in p
01f0: 61 72 74 69 63 75 6c 61 72 20 74 68 65 20 64 61  articular the da
0200: 74 65 20 61 6e 64 0a 2a 2a 20 74 69 6d 65 20 66  te and.** time f
0210: 75 6e 63 74 69 6f 6e 73 2c 20 61 72 65 20 69 6d  unctions, are im
0220: 70 6c 65 6d 65 6e 74 65 64 20 73 65 70 61 72 61  plemented separa
0230: 74 65 6c 79 2e 29 0a 2a 2f 0a 23 69 6e 63 6c 75  tely.).*/.#inclu
0240: 64 65 20 22 73 71 6c 69 74 65 49 6e 74 2e 68 22  de "sqliteInt.h"
0250: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64 6c 69  .#include <stdli
0260: 62 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 61  b.h>.#include <a
0270: 73 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c 75 64  ssert.h>.#includ
0280: 65 20 22 76 64 62 65 49 6e 74 2e 68 22 0a 0a 2f  e "vdbeInt.h"../
0290: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20  *.** Return the 
02a0: 63 6f 6c 6c 61 74 69 6e 67 20 66 75 6e 63 74 69  collating functi
02b0: 6f 6e 20 61 73 73 6f 63 69 61 74 65 64 20 77 69  on associated wi
02c0: 74 68 20 61 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  th a function..*
02d0: 2f 0a 73 74 61 74 69 63 20 43 6f 6c 6c 53 65 71  /.static CollSeq
02e0: 20 2a 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63   *sqlite3GetFunc
02f0: 43 6f 6c 6c 53 65 71 28 73 71 6c 69 74 65 33 5f  CollSeq(sqlite3_
0300: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
0310: 29 7b 0a 20 20 56 64 62 65 4f 70 20 2a 70 4f 70  ){.  VdbeOp *pOp
0320: 20 3d 20 26 63 6f 6e 74 65 78 74 2d 3e 70 56 64   = &context->pVd
0330: 62 65 2d 3e 61 4f 70 5b 63 6f 6e 74 65 78 74 2d  be->aOp[context-
0340: 3e 69 4f 70 2d 31 5d 3b 0a 20 20 61 73 73 65 72  >iOp-1];.  asser
0350: 74 28 20 70 4f 70 2d 3e 6f 70 63 6f 64 65 3d 3d  t( pOp->opcode==
0360: 4f 50 5f 43 6f 6c 6c 53 65 71 20 29 3b 0a 20 20  OP_CollSeq );.  
0370: 61 73 73 65 72 74 28 20 70 4f 70 2d 3e 70 34 74  assert( pOp->p4t
0380: 79 70 65 3d 3d 50 34 5f 43 4f 4c 4c 53 45 51 20  ype==P4_COLLSEQ 
0390: 29 3b 0a 20 20 72 65 74 75 72 6e 20 70 4f 70 2d  );.  return pOp-
03a0: 3e 70 34 2e 70 43 6f 6c 6c 3b 0a 7d 0a 0a 2f 2a  >p4.pColl;.}../*
03b0: 0a 2a 2a 20 49 6e 64 69 63 61 74 65 20 74 68 61  .** Indicate tha
03c0: 74 20 74 68 65 20 61 63 63 75 6d 75 6c 61 74 6f  t the accumulato
03d0: 72 20 6c 6f 61 64 20 73 68 6f 75 6c 64 20 62 65  r load should be
03e0: 20 73 6b 69 70 70 65 64 20 6f 6e 20 74 68 69 73   skipped on this
03f0: 0a 2a 2a 20 69 74 65 72 61 74 69 6f 6e 20 6f 66  .** iteration of
0400: 20 74 68 65 20 61 67 67 72 65 67 61 74 65 20 6c   the aggregate l
0410: 6f 6f 70 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  oop..*/.static v
0420: 6f 69 64 20 73 71 6c 69 74 65 33 53 6b 69 70 41  oid sqlite3SkipA
0430: 63 63 75 6d 75 6c 61 74 6f 72 4c 6f 61 64 28 73  ccumulatorLoad(s
0440: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
0450: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 63 6f 6e 74  context){.  cont
0460: 65 78 74 2d 3e 73 6b 69 70 46 6c 61 67 20 3d 20  ext->skipFlag = 
0470: 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  1;.}../*.** Impl
0480: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
0490: 65 20 6e 6f 6e 2d 61 67 67 72 65 67 61 74 65 20  e non-aggregate 
04a0: 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20  min() and max() 
04b0: 66 75 6e 63 74 69 6f 6e 73 0a 2a 2f 0a 73 74 61  functions.*/.sta
04c0: 74 69 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78 46  tic void minmaxF
04d0: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
04e0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
04f0: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
0500: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
0510: 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69 3b 0a  rgv.){.  int i;.
0520: 20 20 69 6e 74 20 6d 61 73 6b 3b 20 20 20 20 2f    int mask;    /
0530: 2a 20 30 20 66 6f 72 20 6d 69 6e 28 29 20 6f 72  * 0 for min() or
0540: 20 30 78 66 66 66 66 66 66 66 66 20 66 6f 72 20   0xffffffff for 
0550: 6d 61 78 28 29 20 2a 2f 0a 20 20 69 6e 74 20 69  max() */.  int i
0560: 42 65 73 74 3b 0a 20 20 43 6f 6c 6c 53 65 71 20  Best;.  CollSeq 
0570: 2a 70 43 6f 6c 6c 3b 0a 0a 20 20 61 73 73 65 72  *pColl;..  asser
0580: 74 28 20 61 72 67 63 3e 31 20 29 3b 0a 20 20 6d  t( argc>1 );.  m
0590: 61 73 6b 20 3d 20 73 71 6c 69 74 65 33 5f 75 73  ask = sqlite3_us
05a0: 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29  er_data(context)
05b0: 3d 3d 30 20 3f 20 30 20 3a 20 2d 31 3b 0a 20 20  ==0 ? 0 : -1;.  
05c0: 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47  pColl = sqlite3G
05d0: 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f  etFuncCollSeq(co
05e0: 6e 74 65 78 74 29 3b 0a 20 20 61 73 73 65 72 74  ntext);.  assert
05f0: 28 20 70 43 6f 6c 6c 20 29 3b 0a 20 20 61 73 73  ( pColl );.  ass
0600: 65 72 74 28 20 6d 61 73 6b 3d 3d 2d 31 20 7c 7c  ert( mask==-1 ||
0610: 20 6d 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 69 42   mask==0 );.  iB
0620: 65 73 74 20 3d 20 30 3b 0a 20 20 69 66 28 20 73  est = 0;.  if( s
0630: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
0640: 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49  e(argv[0])==SQLI
0650: 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e  TE_NULL ) return
0660: 3b 0a 20 20 66 6f 72 28 69 3d 31 3b 20 69 3c 61  ;.  for(i=1; i<a
0670: 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69  rgc; i++){.    i
0680: 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  f( sqlite3_value
0690: 5f 74 79 70 65 28 61 72 67 76 5b 69 5d 29 3d 3d  _type(argv[i])==
06a0: 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65  SQLITE_NULL ) re
06b0: 74 75 72 6e 3b 0a 20 20 20 20 69 66 28 20 28 73  turn;.    if( (s
06c0: 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65  qlite3MemCompare
06d0: 28 61 72 67 76 5b 69 42 65 73 74 5d 2c 20 61 72  (argv[iBest], ar
06e0: 67 76 5b 69 5d 2c 20 70 43 6f 6c 6c 29 5e 6d 61  gv[i], pColl)^ma
06f0: 73 6b 29 3e 3d 30 20 29 7b 0a 20 20 20 20 20 20  sk)>=0 ){.      
0700: 74 65 73 74 63 61 73 65 28 20 6d 61 73 6b 3d 3d  testcase( mask==
0710: 30 20 29 3b 0a 20 20 20 20 20 20 69 42 65 73 74  0 );.      iBest
0720: 20 3d 20 69 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a   = i;.    }.  }.
0730: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
0740: 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20  _value(context, 
0750: 61 72 67 76 5b 69 42 65 73 74 5d 29 3b 0a 7d 0a  argv[iBest]);.}.
0760: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68  ./*.** Return th
0770: 65 20 74 79 70 65 20 6f 66 20 74 68 65 20 61 72  e type of the ar
0780: 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69  gument..*/.stati
0790: 63 20 76 6f 69 64 20 74 79 70 65 6f 66 46 75 6e  c void typeofFun
07a0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
07b0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
07c0: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20   int NotUsed,.  
07d0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
07e0: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
07f0: 63 68 61 72 20 2a 7a 20 3d 20 30 3b 0a 20 20 55  char *z = 0;.  U
0800: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
0810: 4e 6f 74 55 73 65 64 29 3b 0a 20 20 73 77 69 74  NotUsed);.  swit
0820: 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ch( sqlite3_valu
0830: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20  e_type(argv[0]) 
0840: 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49  ){.    case SQLI
0850: 54 45 5f 49 4e 54 45 47 45 52 3a 20 7a 20 3d 20  TE_INTEGER: z = 
0860: 22 69 6e 74 65 67 65 72 22 3b 20 62 72 65 61 6b  "integer"; break
0870: 3b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  ;.    case SQLIT
0880: 45 5f 54 45 58 54 3a 20 20 20 20 7a 20 3d 20 22  E_TEXT:    z = "
0890: 74 65 78 74 22 3b 20 20 20 20 62 72 65 61 6b 3b  text";    break;
08a0: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
08b0: 5f 46 4c 4f 41 54 3a 20 20 20 7a 20 3d 20 22 72  _FLOAT:   z = "r
08c0: 65 61 6c 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a  eal";    break;.
08d0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
08e0: 42 4c 4f 42 3a 20 20 20 20 7a 20 3d 20 22 62 6c  BLOB:    z = "bl
08f0: 6f 62 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20  ob";    break;. 
0900: 20 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20 20     default:     
0910: 20 20 20 20 20 20 20 20 7a 20 3d 20 22 6e 75 6c          z = "nul
0920: 6c 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  l";    break;.  
0930: 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  }.  sqlite3_resu
0940: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
0950: 20 7a 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53   z, -1, SQLITE_S
0960: 54 41 54 49 43 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a  TATIC);.}.../*.*
0970: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
0980: 20 6f 66 20 74 68 65 20 6c 65 6e 67 74 68 28 29   of the length()
0990: 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74 61   function.*/.sta
09a0: 74 69 63 20 76 6f 69 64 20 6c 65 6e 67 74 68 46  tic void lengthF
09b0: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
09c0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
09d0: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
09e0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
09f0: 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6c 65 6e  rgv.){.  int len
0a00: 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  ;..  assert( arg
0a10: 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44  c==1 );.  UNUSED
0a20: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
0a30: 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71 6c 69  ;.  switch( sqli
0a40: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
0a50: 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63  rgv[0]) ){.    c
0a60: 61 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a  ase SQLITE_BLOB:
0a70: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0a80: 5f 49 4e 54 45 47 45 52 3a 0a 20 20 20 20 63 61  _INTEGER:.    ca
0a90: 73 65 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a  se SQLITE_FLOAT:
0aa0: 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33   {.      sqlite3
0ab0: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
0ac0: 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  ext, sqlite3_val
0ad0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
0ae0: 29 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  ));.      break;
0af0: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20  .    }.    case 
0b00: 53 51 4c 49 54 45 5f 54 45 58 54 3a 20 7b 0a 20  SQLITE_TEXT: {. 
0b10: 20 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67       const unsig
0b20: 6e 65 64 20 63 68 61 72 20 2a 7a 20 3d 20 73 71  ned char *z = sq
0b30: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
0b40: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20  (argv[0]);.     
0b50: 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75   if( z==0 ) retu
0b60: 72 6e 3b 0a 20 20 20 20 20 20 6c 65 6e 20 3d 20  rn;.      len = 
0b70: 30 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20  0;.      while( 
0b80: 2a 7a 20 29 7b 0a 20 20 20 20 20 20 20 20 6c 65  *z ){.        le
0b90: 6e 2b 2b 3b 0a 20 20 20 20 20 20 20 20 53 51 4c  n++;.        SQL
0ba0: 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29  ITE_SKIP_UTF8(z)
0bb0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
0bc0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
0bd0: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 6c 65 6e 29  nt(context, len)
0be0: 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20  ;.      break;. 
0bf0: 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75 6c 74     }.    default
0c00: 3a 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  : {.      sqlite
0c10: 33 5f 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f  3_result_null(co
0c20: 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 62 72  ntext);.      br
0c30: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  eak;.    }.  }.}
0c40: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
0c50: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 61 62  tation of the ab
0c60: 73 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a  s() function..**
0c70: 0a 2a 2a 20 49 4d 50 3a 20 52 2d 32 33 39 37 39  .** IMP: R-23979
0c80: 2d 32 36 38 35 35 20 54 68 65 20 61 62 73 28 58  -26855 The abs(X
0c90: 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72  ) function retur
0ca0: 6e 73 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20  ns the absolute 
0cb0: 76 61 6c 75 65 20 6f 66 0a 2a 2a 20 74 68 65 20  value of.** the 
0cc0: 6e 75 6d 65 72 69 63 20 61 72 67 75 6d 65 6e 74  numeric argument
0cd0: 20 58 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76   X. .*/.static v
0ce0: 6f 69 64 20 61 62 73 46 75 6e 63 28 73 71 6c 69  oid absFunc(sqli
0cf0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
0d00: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20  text, int argc, 
0d10: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
0d20: 61 72 67 76 29 7b 0a 20 20 61 73 73 65 72 74 28  argv){.  assert(
0d30: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e   argc==1 );.  UN
0d40: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
0d50: 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68 28 20  rgc);.  switch( 
0d60: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
0d70: 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20  pe(argv[0]) ){. 
0d80: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49     case SQLITE_I
0d90: 4e 54 45 47 45 52 3a 20 7b 0a 20 20 20 20 20 20  NTEGER: {.      
0da0: 69 36 34 20 69 56 61 6c 20 3d 20 73 71 6c 69 74  i64 iVal = sqlit
0db0: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61  e3_value_int64(a
0dc0: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69  rgv[0]);.      i
0dd0: 66 28 20 69 56 61 6c 3c 30 20 29 7b 0a 20 20 20  f( iVal<0 ){.   
0de0: 20 20 20 20 20 69 66 28 20 69 56 61 6c 3d 3d 53       if( iVal==S
0df0: 4d 41 4c 4c 45 53 54 5f 49 4e 54 36 34 20 29 7b  MALLEST_INT64 ){
0e00: 0a 20 20 20 20 20 20 20 20 20 20 2f 2a 20 49 4d  .          /* IM
0e10: 50 3a 20 52 2d 33 31 36 37 36 2d 34 35 35 30 39  P: R-31676-45509
0e20: 20 49 66 20 58 20 69 73 20 74 68 65 20 69 6e 74   If X is the int
0e30: 65 67 65 72 20 2d 39 32 32 33 33 37 32 30 33 36  eger -9223372036
0e40: 38 35 34 37 37 35 38 30 38 0a 20 20 20 20 20 20  854775808.      
0e50: 20 20 20 20 2a 2a 20 74 68 65 6e 20 61 62 73 28      ** then abs(
0e60: 58 29 20 74 68 72 6f 77 73 20 61 6e 20 69 6e 74  X) throws an int
0e70: 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 20 65 72  eger overflow er
0e80: 72 6f 72 20 73 69 6e 63 65 20 74 68 65 72 65 20  ror since there 
0e90: 69 73 20 6e 6f 0a 20 20 20 20 20 20 20 20 20 20  is no.          
0ea0: 2a 2a 20 65 71 75 69 76 61 6c 65 6e 74 20 70 6f  ** equivalent po
0eb0: 73 69 74 69 76 65 20 36 34 2d 62 69 74 20 74 77  sitive 64-bit tw
0ec0: 6f 20 63 6f 6d 70 6c 65 6d 65 6e 74 20 76 61 6c  o complement val
0ed0: 75 65 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20 20  ue. */.         
0ee0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0ef0: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22  error(context, "
0f00: 69 6e 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77  integer overflow
0f10: 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 20 20  ", -1);.        
0f20: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20    return;.      
0f30: 20 20 7d 0a 20 20 20 20 20 20 20 20 69 56 61 6c    }.        iVal
0f40: 20 3d 20 2d 69 56 61 6c 3b 0a 20 20 20 20 20 20   = -iVal;.      
0f50: 7d 20 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  } .      sqlite3
0f60: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f  _result_int64(co
0f70: 6e 74 65 78 74 2c 20 69 56 61 6c 29 3b 0a 20 20  ntext, iVal);.  
0f80: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
0f90: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0fa0: 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20 20 20 20 2f  _NULL: {.      /
0fb0: 2a 20 49 4d 50 3a 20 52 2d 33 37 34 33 34 2d 31  * IMP: R-37434-1
0fc0: 39 39 32 39 20 41 62 73 28 58 29 20 72 65 74 75  9929 Abs(X) retu
0fd0: 72 6e 73 20 4e 55 4c 4c 20 69 66 20 58 20 69 73  rns NULL if X is
0fe0: 20 4e 55 4c 4c 2e 20 2a 2f 0a 20 20 20 20 20 20   NULL. */.      
0ff0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e  sqlite3_result_n
1000: 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  ull(context);.  
1010: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
1020: 0a 20 20 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a  .    default: {.
1030: 20 20 20 20 20 20 2f 2a 20 42 65 63 61 75 73 65        /* Because
1040: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64   sqlite3_value_d
1050: 6f 75 62 6c 65 28 29 20 72 65 74 75 72 6e 73 20  ouble() returns 
1060: 30 2e 30 20 69 66 20 74 68 65 20 61 72 67 75 6d  0.0 if the argum
1070: 65 6e 74 20 69 73 20 6e 6f 74 0a 20 20 20 20 20  ent is not.     
1080: 20 2a 2a 20 73 6f 6d 65 74 68 69 6e 67 20 74 68   ** something th
1090: 61 74 20 63 61 6e 20 62 65 20 63 6f 6e 76 65 72  at can be conver
10a0: 74 65 64 20 69 6e 74 6f 20 61 20 6e 75 6d 62 65  ted into a numbe
10b0: 72 2c 20 77 65 20 68 61 76 65 3a 0a 20 20 20 20  r, we have:.    
10c0: 20 20 2a 2a 20 49 4d 50 3a 20 52 2d 30 31 39 39    ** IMP: R-0199
10d0: 32 2d 30 30 35 31 39 20 41 62 73 28 58 29 20 72  2-00519 Abs(X) r
10e0: 65 74 75 72 6e 73 20 30 2e 30 20 69 66 20 58 20  eturns 0.0 if X 
10f0: 69 73 20 61 20 73 74 72 69 6e 67 20 6f 72 20 62  is a string or b
1100: 6c 6f 62 0a 20 20 20 20 20 20 2a 2a 20 74 68 61  lob.      ** tha
1110: 74 20 63 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 76  t cannot be conv
1120: 65 72 74 65 64 20 74 6f 20 61 20 6e 75 6d 65 72  erted to a numer
1130: 69 63 20 76 61 6c 75 65 2e 0a 20 20 20 20 20 20  ic value..      
1140: 2a 2f 0a 20 20 20 20 20 20 64 6f 75 62 6c 65 20  */.      double 
1150: 72 56 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76  rVal = sqlite3_v
1160: 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67 76  alue_double(argv
1170: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 66 28 20  [0]);.      if( 
1180: 72 56 61 6c 3c 30 20 29 20 72 56 61 6c 20 3d 20  rVal<0 ) rVal = 
1190: 2d 72 56 61 6c 3b 0a 20 20 20 20 20 20 73 71 6c  -rVal;.      sql
11a0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62  ite3_result_doub
11b0: 6c 65 28 63 6f 6e 74 65 78 74 2c 20 72 56 61 6c  le(context, rVal
11c0: 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  );.      break;.
11d0: 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a      }.  }.}../*.
11e0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
11f0: 6e 20 6f 66 20 74 68 65 20 69 6e 73 74 72 28 29  n of the instr()
1200: 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a   function..**.**
1210: 20 69 6e 73 74 72 28 68 61 79 73 74 61 63 6b 2c   instr(haystack,
1220: 6e 65 65 64 6c 65 29 20 66 69 6e 64 73 20 74 68  needle) finds th
1230: 65 20 66 69 72 73 74 20 6f 63 63 75 72 72 65 6e  e first occurren
1240: 63 65 20 6f 66 20 6e 65 65 64 6c 65 0a 2a 2a 20  ce of needle.** 
1250: 69 6e 20 68 61 79 73 74 61 63 6b 20 61 6e 64 20  in haystack and 
1260: 72 65 74 75 72 6e 73 20 74 68 65 20 6e 75 6d 62  returns the numb
1270: 65 72 20 6f 66 20 70 72 65 76 69 6f 75 73 20 63  er of previous c
1280: 68 61 72 61 63 74 65 72 73 20 70 6c 75 73 20 31  haracters plus 1
1290: 2c 0a 2a 2a 20 6f 72 20 30 20 69 66 20 6e 65 65  ,.** or 0 if nee
12a0: 64 6c 65 20 64 6f 65 73 20 6e 6f 74 20 6f 63 63  dle does not occ
12b0: 75 72 20 77 69 74 68 69 6e 20 68 61 79 73 74 61  ur within haysta
12c0: 63 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 62 6f 74  ck..**.** If bot
12d0: 68 20 68 61 79 73 74 61 63 6b 20 61 6e 64 20 6e  h haystack and n
12e0: 65 65 64 6c 65 20 61 72 65 20 42 4c 4f 42 73 2c  eedle are BLOBs,
12f0: 20 74 68 65 6e 20 74 68 65 20 72 65 73 75 6c 74   then the result
1300: 20 69 73 20 6f 6e 65 20 6d 6f 72 65 20 74 68 61   is one more tha
1310: 6e 0a 2a 2a 20 74 68 65 20 6e 75 6d 62 65 72 20  n.** the number 
1320: 6f 66 20 62 79 74 65 73 20 69 6e 20 68 61 79 73  of bytes in hays
1330: 74 61 63 6b 20 70 72 69 6f 72 20 74 6f 20 74 68  tack prior to th
1340: 65 20 66 69 72 73 74 20 6f 63 63 75 72 72 65 6e  e first occurren
1350: 63 65 20 6f 66 20 6e 65 65 64 6c 65 2c 0a 2a 2a  ce of needle,.**
1360: 20 6f 72 20 30 20 69 66 20 6e 65 65 64 6c 65 20   or 0 if needle 
1370: 6e 65 76 65 72 20 6f 63 63 75 72 73 20 69 6e 20  never occurs in 
1380: 68 61 79 73 74 61 63 6b 2e 0a 2a 2f 0a 73 74 61  haystack..*/.sta
1390: 74 69 63 20 76 6f 69 64 20 69 6e 73 74 72 46 75  tic void instrFu
13a0: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
13b0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
13c0: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
13d0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
13e0: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  gv.){.  const un
13f0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 48 61  signed char *zHa
1400: 79 73 74 61 63 6b 3b 0a 20 20 63 6f 6e 73 74 20  ystack;.  const 
1410: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
1420: 4e 65 65 64 6c 65 3b 0a 20 20 69 6e 74 20 6e 48  Needle;.  int nH
1430: 61 79 73 74 61 63 6b 3b 0a 20 20 69 6e 74 20 6e  aystack;.  int n
1440: 4e 65 65 64 6c 65 3b 0a 20 20 69 6e 74 20 74 79  Needle;.  int ty
1450: 70 65 48 61 79 73 74 61 63 6b 2c 20 74 79 70 65  peHaystack, type
1460: 4e 65 65 64 6c 65 3b 0a 20 20 69 6e 74 20 4e 20  Needle;.  int N 
1470: 3d 20 31 3b 0a 20 20 69 6e 74 20 69 73 54 65 78  = 1;.  int isTex
1480: 74 3b 0a 0a 20 20 55 4e 55 53 45 44 5f 50 41 52  t;..  UNUSED_PAR
1490: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
14a0: 74 79 70 65 48 61 79 73 74 61 63 6b 20 3d 20 73  typeHaystack = s
14b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
14c0: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 74 79  e(argv[0]);.  ty
14d0: 70 65 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74  peNeedle = sqlit
14e0: 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72  e3_value_type(ar
14f0: 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 74 79  gv[1]);.  if( ty
1500: 70 65 48 61 79 73 74 61 63 6b 3d 3d 53 51 4c 49  peHaystack==SQLI
1510: 54 45 5f 4e 55 4c 4c 20 7c 7c 20 74 79 70 65 4e  TE_NULL || typeN
1520: 65 65 64 6c 65 3d 3d 53 51 4c 49 54 45 5f 4e 55  eedle==SQLITE_NU
1530: 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e  LL ) return;.  n
1540: 48 61 79 73 74 61 63 6b 20 3d 20 73 71 6c 69 74  Haystack = sqlit
1550: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
1560: 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 4e 65 65 64  rgv[0]);.  nNeed
1570: 6c 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  le = sqlite3_val
1580: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 31 5d  ue_bytes(argv[1]
1590: 29 3b 0a 20 20 69 66 28 20 74 79 70 65 48 61 79  );.  if( typeHay
15a0: 73 74 61 63 6b 3d 3d 53 51 4c 49 54 45 5f 42 4c  stack==SQLITE_BL
15b0: 4f 42 20 26 26 20 74 79 70 65 4e 65 65 64 6c 65  OB && typeNeedle
15c0: 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 20 29 7b  ==SQLITE_BLOB ){
15d0: 0a 20 20 20 20 7a 48 61 79 73 74 61 63 6b 20 3d  .    zHaystack =
15e0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
15f0: 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  lob(argv[0]);.  
1600: 20 20 7a 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69    zNeedle = sqli
1610: 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61  te3_value_blob(a
1620: 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 73 54  rgv[1]);.    isT
1630: 65 78 74 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65  ext = 0;.  }else
1640: 7b 0a 20 20 20 20 7a 48 61 79 73 74 61 63 6b 20  {.    zHaystack 
1650: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
1660: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
1670: 20 20 20 7a 4e 65 65 64 6c 65 20 3d 20 73 71 6c     zNeedle = sql
1680: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
1690: 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 73  argv[1]);.    is
16a0: 54 65 78 74 20 3d 20 31 3b 0a 20 20 7d 0a 20 20  Text = 1;.  }.  
16b0: 77 68 69 6c 65 28 20 6e 4e 65 65 64 6c 65 3c 3d  while( nNeedle<=
16c0: 6e 48 61 79 73 74 61 63 6b 20 26 26 20 6d 65 6d  nHaystack && mem
16d0: 63 6d 70 28 7a 48 61 79 73 74 61 63 6b 2c 20 7a  cmp(zHaystack, z
16e0: 4e 65 65 64 6c 65 2c 20 6e 4e 65 65 64 6c 65 29  Needle, nNeedle)
16f0: 21 3d 30 20 29 7b 0a 20 20 20 20 4e 2b 2b 3b 0a  !=0 ){.    N++;.
1700: 20 20 20 20 64 6f 7b 0a 20 20 20 20 20 20 6e 48      do{.      nH
1710: 61 79 73 74 61 63 6b 2d 2d 3b 0a 20 20 20 20 20  aystack--;.     
1720: 20 7a 48 61 79 73 74 61 63 6b 2b 2b 3b 0a 20 20   zHaystack++;.  
1730: 20 20 7d 77 68 69 6c 65 28 20 69 73 54 65 78 74    }while( isText
1740: 20 26 26 20 28 7a 48 61 79 73 74 61 63 6b 5b 30   && (zHaystack[0
1750: 5d 26 30 78 63 30 29 3d 3d 30 78 38 30 20 29 3b  ]&0xc0)==0x80 );
1760: 0a 20 20 7d 0a 20 20 69 66 28 20 6e 4e 65 65 64  .  }.  if( nNeed
1770: 6c 65 3e 6e 48 61 79 73 74 61 63 6b 20 29 20 4e  le>nHaystack ) N
1780: 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f   = 0;.  sqlite3_
1790: 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65  result_int(conte
17a0: 78 74 2c 20 4e 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  xt, N);.}../*.**
17b0: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
17c0: 6f 66 20 74 68 65 20 70 72 69 6e 74 66 28 29 20  of the printf() 
17d0: 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61  function..*/.sta
17e0: 74 69 63 20 76 6f 69 64 20 70 72 69 6e 74 66 46  tic void printfF
17f0: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
1800: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
1810: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
1820: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
1830: 72 67 76 0a 29 7b 0a 20 20 50 72 69 6e 74 66 41  rgv.){.  PrintfA
1840: 72 67 75 6d 65 6e 74 73 20 78 3b 0a 20 20 53 74  rguments x;.  St
1850: 72 41 63 63 75 6d 20 73 74 72 3b 0a 20 20 63 6f  rAccum str;.  co
1860: 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61  nst char *zForma
1870: 74 3b 0a 20 20 69 6e 74 20 6e 3b 0a 0a 20 20 69  t;.  int n;..  i
1880: 66 28 20 61 72 67 63 3e 3d 31 20 26 26 20 28 7a  f( argc>=1 && (z
1890: 46 6f 72 6d 61 74 20 3d 20 28 63 6f 6e 73 74 20  Format = (const 
18a0: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
18b0: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
18c0: 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 78 2e 6e  ))!=0 ){.    x.n
18d0: 41 72 67 20 3d 20 61 72 67 63 2d 31 3b 0a 20 20  Arg = argc-1;.  
18e0: 20 20 78 2e 6e 55 73 65 64 20 3d 20 30 3b 0a 20    x.nUsed = 0;. 
18f0: 20 20 20 78 2e 61 70 41 72 67 20 3d 20 61 72 67     x.apArg = arg
1900: 76 2b 31 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  v+1;.    sqlite3
1910: 53 74 72 41 63 63 75 6d 49 6e 69 74 28 26 73 74  StrAccumInit(&st
1920: 72 2c 20 30 2c 20 30 2c 20 53 51 4c 49 54 45 5f  r, 0, 0, SQLITE_
1930: 4d 41 58 5f 4c 45 4e 47 54 48 29 3b 0a 20 20 20  MAX_LENGTH);.   
1940: 20 73 74 72 2e 64 62 20 3d 20 73 71 6c 69 74 65   str.db = sqlite
1950: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
1960: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  dle(context);.  
1970: 20 20 73 71 6c 69 74 65 33 58 50 72 69 6e 74 66    sqlite3XPrintf
1980: 28 26 73 74 72 2c 20 53 51 4c 49 54 45 5f 50 52  (&str, SQLITE_PR
1990: 49 4e 54 46 5f 53 51 4c 46 55 4e 43 2c 20 7a 46  INTF_SQLFUNC, zF
19a0: 6f 72 6d 61 74 2c 20 26 78 29 3b 0a 20 20 20 20  ormat, &x);.    
19b0: 6e 20 3d 20 73 74 72 2e 6e 43 68 61 72 3b 0a 20  n = str.nChar;. 
19c0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
19d0: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
19e0: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46  sqlite3StrAccumF
19f0: 69 6e 69 73 68 28 26 73 74 72 29 2c 20 6e 2c 0a  inish(&str), n,.
1a00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1a10: 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 44          SQLITE_D
1a20: 59 4e 41 4d 49 43 29 3b 0a 20 20 7d 0a 7d 0a 0a  YNAMIC);.  }.}..
1a30: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
1a40: 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 75 62 73  tion of the subs
1a50: 74 72 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  tr() function..*
1a60: 2a 0a 2a 2a 20 73 75 62 73 74 72 28 78 2c 70 31  *.** substr(x,p1
1a70: 2c 70 32 29 20 20 72 65 74 75 72 6e 73 20 70 32  ,p2)  returns p2
1a80: 20 63 68 61 72 61 63 74 65 72 73 20 6f 66 20 78   characters of x
1a90: 5b 5d 20 62 65 67 69 6e 6e 69 6e 67 20 77 69 74  [] beginning wit
1aa0: 68 20 70 31 2e 0a 2a 2a 20 70 31 20 69 73 20 31  h p1..** p1 is 1
1ab0: 2d 69 6e 64 65 78 65 64 2e 20 20 53 6f 20 73 75  -indexed.  So su
1ac0: 62 73 74 72 28 78 2c 31 2c 31 29 20 72 65 74 75  bstr(x,1,1) retu
1ad0: 72 6e 73 20 74 68 65 20 66 69 72 73 74 20 63 68  rns the first ch
1ae0: 61 72 61 63 74 65 72 0a 2a 2a 20 6f 66 20 78 2e  aracter.** of x.
1af0: 20 20 49 66 20 78 20 69 73 20 74 65 78 74 2c 20    If x is text, 
1b00: 74 68 65 6e 20 77 65 20 61 63 74 75 61 6c 6c 79  then we actually
1b10: 20 63 6f 75 6e 74 20 55 54 46 2d 38 20 63 68 61   count UTF-8 cha
1b20: 72 61 63 74 65 72 73 2e 0a 2a 2a 20 49 66 20 78  racters..** If x
1b30: 20 69 73 20 61 20 62 6c 6f 62 2c 20 74 68 65 6e   is a blob, then
1b40: 20 77 65 20 63 6f 75 6e 74 20 62 79 74 65 73 2e   we count bytes.
1b50: 0a 2a 2a 0a 2a 2a 20 49 66 20 70 31 20 69 73 20  .**.** If p1 is 
1b60: 6e 65 67 61 74 69 76 65 2c 20 74 68 65 6e 20 77  negative, then w
1b70: 65 20 62 65 67 69 6e 20 61 62 73 28 70 31 29 20  e begin abs(p1) 
1b80: 66 72 6f 6d 20 74 68 65 20 65 6e 64 20 6f 66 20  from the end of 
1b90: 78 5b 5d 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 70 32  x[]..**.** If p2
1ba0: 20 69 73 20 6e 65 67 61 74 69 76 65 2c 20 72 65   is negative, re
1bb0: 74 75 72 6e 20 74 68 65 20 70 32 20 63 68 61 72  turn the p2 char
1bc0: 61 63 74 65 72 73 20 70 72 65 63 65 64 69 6e 67  acters preceding
1bd0: 20 70 31 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76   p1..*/.static v
1be0: 6f 69 64 20 73 75 62 73 74 72 46 75 6e 63 28 0a  oid substrFunc(.
1bf0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
1c00: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
1c10: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
1c20: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
1c30: 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  {.  const unsign
1c40: 65 64 20 63 68 61 72 20 2a 7a 3b 0a 20 20 63 6f  ed char *z;.  co
1c50: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
1c60: 72 20 2a 7a 32 3b 0a 20 20 69 6e 74 20 6c 65 6e  r *z2;.  int len
1c70: 3b 0a 20 20 69 6e 74 20 70 30 74 79 70 65 3b 0a  ;.  int p0type;.
1c80: 20 20 69 36 34 20 70 31 2c 20 70 32 3b 0a 20 20    i64 p1, p2;.  
1c90: 69 6e 74 20 6e 65 67 50 32 20 3d 20 30 3b 0a 0a  int negP2 = 0;..
1ca0: 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d    assert( argc==
1cb0: 33 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a  3 || argc==2 );.
1cc0: 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61    if( sqlite3_va
1cd0: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d  lue_type(argv[1]
1ce0: 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a 20  )==SQLITE_NULL. 
1cf0: 20 20 7c 7c 20 28 61 72 67 63 3d 3d 33 20 26 26    || (argc==3 &&
1d00: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
1d10: 79 70 65 28 61 72 67 76 5b 32 5d 29 3d 3d 53 51  ype(argv[2])==SQ
1d20: 4c 49 54 45 5f 4e 55 4c 4c 29 0a 20 20 29 7b 0a  LITE_NULL).  ){.
1d30: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
1d40: 20 20 70 30 74 79 70 65 20 3d 20 73 71 6c 69 74    p0type = sqlit
1d50: 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72  e3_value_type(ar
1d60: 67 76 5b 30 5d 29 3b 0a 20 20 70 31 20 3d 20 73  gv[0]);.  p1 = s
1d70: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
1d80: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28  (argv[1]);.  if(
1d90: 20 70 30 74 79 70 65 3d 3d 53 51 4c 49 54 45 5f   p0type==SQLITE_
1da0: 42 4c 4f 42 20 29 7b 0a 20 20 20 20 6c 65 6e 20  BLOB ){.    len 
1db0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
1dc0: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
1dd0: 20 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f      z = sqlite3_
1de0: 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b  value_blob(argv[
1df0: 30 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 3d 3d  0]);.    if( z==
1e00: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  0 ) return;.    
1e10: 61 73 73 65 72 74 28 20 6c 65 6e 3d 3d 73 71 6c  assert( len==sql
1e20: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
1e30: 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 7d  (argv[0]) );.  }
1e40: 65 6c 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73 71  else{.    z = sq
1e50: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
1e60: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69  (argv[0]);.    i
1e70: 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( z==0 ) return
1e80: 3b 0a 20 20 20 20 6c 65 6e 20 3d 20 30 3b 0a 20  ;.    len = 0;. 
1e90: 20 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20     if( p1<0 ){. 
1ea0: 20 20 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a       for(z2=z; *
1eb0: 7a 32 3b 20 6c 65 6e 2b 2b 29 7b 0a 20 20 20 20  z2; len++){.    
1ec0: 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f      SQLITE_SKIP_
1ed0: 55 54 46 38 28 7a 32 29 3b 0a 20 20 20 20 20 20  UTF8(z2);.      
1ee0: 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 23 69 66 64  }.    }.  }.#ifd
1ef0: 65 66 20 53 51 4c 49 54 45 5f 53 55 42 53 54 52  ef SQLITE_SUBSTR
1f00: 5f 43 4f 4d 50 41 54 49 42 49 4c 49 54 59 0a 20  _COMPATIBILITY. 
1f10: 20 2f 2a 20 49 66 20 53 55 42 53 54 52 5f 43 4f   /* If SUBSTR_CO
1f20: 4d 50 41 54 49 42 49 4c 49 54 59 20 69 73 20 64  MPATIBILITY is d
1f30: 65 66 69 6e 65 64 20 74 68 65 6e 20 73 75 62 73  efined then subs
1f40: 74 72 28 58 2c 30 2c 4e 29 20 77 6f 72 6b 20 74  tr(X,0,N) work t
1f50: 68 65 20 73 61 6d 65 20 61 73 0a 20 20 2a 2a 20  he same as.  ** 
1f60: 61 73 20 73 75 62 73 74 72 28 58 2c 31 2c 4e 29  as substr(X,1,N)
1f70: 20 2d 20 69 74 20 72 65 74 75 72 6e 73 20 74 68   - it returns th
1f80: 65 20 66 69 72 73 74 20 4e 20 63 68 61 72 61 63  e first N charac
1f90: 74 65 72 73 20 6f 66 20 58 2e 20 20 54 68 69 73  ters of X.  This
1fa0: 0a 20 20 2a 2a 20 69 73 20 65 73 73 65 6e 74 69  .  ** is essenti
1fb0: 61 6c 6c 79 20 61 20 62 61 63 6b 2d 6f 75 74 20  ally a back-out 
1fc0: 6f 66 20 74 68 65 20 62 75 67 2d 66 69 78 20 69  of the bug-fix i
1fd0: 6e 20 63 68 65 63 6b 2d 69 6e 20 5b 35 66 63 31  n check-in [5fc1
1fe0: 32 35 64 33 36 32 64 66 34 62 38 5d 0a 20 20 2a  25d362df4b8].  *
1ff0: 2a 20 66 72 6f 6d 20 32 30 30 39 2d 30 32 2d 30  * from 2009-02-0
2000: 32 20 66 6f 72 20 63 6f 6d 70 61 74 69 62 69 6c  2 for compatibil
2010: 69 74 79 20 6f 66 20 61 70 70 6c 69 63 61 74 69  ity of applicati
2020: 6f 6e 73 20 74 68 61 74 20 65 78 70 6c 6f 69 74  ons that exploit
2030: 65 64 20 74 68 65 0a 20 20 2a 2a 20 6f 6c 64 20  ed the.  ** old 
2040: 62 75 67 67 79 20 62 65 68 61 76 69 6f 72 2e 20  buggy behavior. 
2050: 2a 2f 0a 20 20 69 66 28 20 70 31 3d 3d 30 20 29  */.  if( p1==0 )
2060: 20 70 31 20 3d 20 31 3b 20 2f 2a 20 3c 72 64 61   p1 = 1; /* <rda
2070: 72 3a 2f 2f 70 72 6f 62 6c 65 6d 2f 36 37 37 38  r://problem/6778
2080: 33 33 39 3e 20 2a 2f 0a 23 65 6e 64 69 66 0a 20  339> */.#endif. 
2090: 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a   if( argc==3 ){.
20a0: 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74 65 33      p2 = sqlite3
20b0: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
20c0: 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 70 32 3c  2]);.    if( p2<
20d0: 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20 3d 20  0 ){.      p2 = 
20e0: 2d 70 32 3b 0a 20 20 20 20 20 20 6e 65 67 50 32  -p2;.      negP2
20f0: 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65   = 1;.    }.  }e
2100: 6c 73 65 7b 0a 20 20 20 20 70 32 20 3d 20 73 71  lse{.    p2 = sq
2110: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62  lite3_context_db
2120: 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29  _handle(context)
2130: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
2140: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a 20  LIMIT_LENGTH];. 
2150: 20 7d 0a 20 20 69 66 28 20 70 31 3c 30 20 29 7b   }.  if( p1<0 ){
2160: 0a 20 20 20 20 70 31 20 2b 3d 20 6c 65 6e 3b 0a  .    p1 += len;.
2170: 20 20 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a      if( p1<0 ){.
2180: 20 20 20 20 20 20 70 32 20 2b 3d 20 70 31 3b 0a        p2 += p1;.
2190: 20 20 20 20 20 20 69 66 28 20 70 32 3c 30 20 29        if( p2<0 )
21a0: 20 70 32 20 3d 20 30 3b 0a 20 20 20 20 20 20 70   p2 = 0;.      p
21b0: 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d  1 = 0;.    }.  }
21c0: 65 6c 73 65 20 69 66 28 20 70 31 3e 30 20 29 7b  else if( p1>0 ){
21d0: 0a 20 20 20 20 70 31 2d 2d 3b 0a 20 20 7d 65 6c  .    p1--;.  }el
21e0: 73 65 20 69 66 28 20 70 32 3e 30 20 29 7b 0a 20  se if( p2>0 ){. 
21f0: 20 20 20 70 32 2d 2d 3b 0a 20 20 7d 0a 20 20 69     p2--;.  }.  i
2200: 66 28 20 6e 65 67 50 32 20 29 7b 0a 20 20 20 20  f( negP2 ){.    
2210: 70 31 20 2d 3d 20 70 32 3b 0a 20 20 20 20 69 66  p1 -= p2;.    if
2220: 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 20 20  ( p1<0 ){.      
2230: 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20 20 20  p2 += p1;.      
2240: 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20  p1 = 0;.    }.  
2250: 7d 0a 20 20 61 73 73 65 72 74 28 20 70 31 3e 3d  }.  assert( p1>=
2260: 30 20 26 26 20 70 32 3e 3d 30 20 29 3b 0a 20 20  0 && p2>=0 );.  
2270: 69 66 28 20 70 30 74 79 70 65 21 3d 53 51 4c 49  if( p0type!=SQLI
2280: 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20 20 20 77  TE_BLOB ){.    w
2290: 68 69 6c 65 28 20 2a 7a 20 26 26 20 70 31 20 29  hile( *z && p1 )
22a0: 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53  {.      SQLITE_S
22b0: 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20  KIP_UTF8(z);.   
22c0: 20 20 20 70 31 2d 2d 3b 0a 20 20 20 20 7d 0a 20     p1--;.    }. 
22d0: 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32     for(z2=z; *z2
22e0: 20 26 26 20 70 32 3b 20 70 32 2d 2d 29 7b 0a 20   && p2; p2--){. 
22f0: 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50       SQLITE_SKIP
2300: 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20 20 20 7d  _UTF8(z2);.    }
2310: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
2320: 75 6c 74 5f 74 65 78 74 36 34 28 63 6f 6e 74 65  ult_text64(conte
2330: 78 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 7a 32  xt, (char*)z, z2
2340: 2d 7a 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53  -z, SQLITE_TRANS
2350: 49 45 4e 54 2c 0a 20 20 20 20 20 20 20 20 20 20  IENT,.          
2360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
2370: 53 51 4c 49 54 45 5f 55 54 46 38 29 3b 0a 20 20  SQLITE_UTF8);.  
2380: 7d 65 6c 73 65 7b 0a 20 20 20 20 69 66 28 20 70  }else{.    if( p
2390: 31 2b 70 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20  1+p2>len ){.    
23a0: 20 20 70 32 20 3d 20 6c 65 6e 2d 70 31 3b 0a 20    p2 = len-p1;. 
23b0: 20 20 20 20 20 69 66 28 20 70 32 3c 30 20 29 20       if( p2<0 ) 
23c0: 70 32 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20  p2 = 0;.    }.  
23d0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
23e0: 5f 62 6c 6f 62 36 34 28 63 6f 6e 74 65 78 74 2c  _blob64(context,
23f0: 20 28 63 68 61 72 2a 29 26 7a 5b 70 31 5d 2c 20   (char*)&z[p1], 
2400: 28 75 36 34 29 70 32 2c 20 53 51 4c 49 54 45 5f  (u64)p2, SQLITE_
2410: 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a  TRANSIENT);.  }.
2420: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
2430: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 72  ntation of the r
2440: 6f 75 6e 64 28 29 20 66 75 6e 63 74 69 6f 6e 0a  ound() function.
2450: 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54  */.#ifndef SQLIT
2460: 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f  E_OMIT_FLOATING_
2470: 50 4f 49 4e 54 0a 73 74 61 74 69 63 20 76 6f 69  POINT.static voi
2480: 64 20 72 6f 75 6e 64 46 75 6e 63 28 73 71 6c 69  d roundFunc(sqli
2490: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
24a0: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20  text, int argc, 
24b0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
24c0: 61 72 67 76 29 7b 0a 20 20 69 6e 74 20 6e 20 3d  argv){.  int n =
24d0: 20 30 3b 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a   0;.  double r;.
24e0: 20 20 63 68 61 72 20 2a 7a 42 75 66 3b 0a 20 20    char *zBuf;.  
24f0: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
2500: 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20  || argc==2 );.  
2510: 69 66 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20  if( argc==2 ){. 
2520: 20 20 20 69 66 28 20 53 51 4c 49 54 45 5f 4e 55     if( SQLITE_NU
2530: 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75  LL==sqlite3_valu
2540: 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d 29 20  e_type(argv[1]) 
2550: 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 6e 20  ) return;.    n 
2560: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
2570: 69 6e 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20  int(argv[1]);.  
2580: 20 20 69 66 28 20 6e 3e 33 30 20 29 20 6e 20 3d    if( n>30 ) n =
2590: 20 33 30 3b 0a 20 20 20 20 69 66 28 20 6e 3c 30   30;.    if( n<0
25a0: 20 29 20 6e 20 3d 20 30 3b 0a 20 20 7d 0a 20 20   ) n = 0;.  }.  
25b0: 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  if( sqlite3_valu
25c0: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d  e_type(argv[0])=
25d0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72  =SQLITE_NULL ) r
25e0: 65 74 75 72 6e 3b 0a 20 20 72 20 3d 20 73 71 6c  eturn;.  r = sql
25f0: 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c  ite3_value_doubl
2600: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a  e(argv[0]);.  /*
2610: 20 49 66 20 59 3d 3d 30 20 61 6e 64 20 58 20 77   If Y==0 and X w
2620: 69 6c 6c 20 66 69 74 20 69 6e 20 61 20 36 34 2d  ill fit in a 64-
2630: 62 69 74 20 69 6e 74 2c 0a 20 20 2a 2a 20 68 61  bit int,.  ** ha
2640: 6e 64 6c 65 20 74 68 65 20 72 6f 75 6e 64 69 6e  ndle the roundin
2650: 67 20 64 69 72 65 63 74 6c 79 2c 0a 20 20 2a 2a  g directly,.  **
2660: 20 6f 74 68 65 72 77 69 73 65 20 75 73 65 20 70   otherwise use p
2670: 72 69 6e 74 66 2e 0a 20 20 2a 2f 0a 20 20 69 66  rintf..  */.  if
2680: 28 20 6e 3d 3d 30 20 26 26 20 72 3e 3d 30 20 26  ( n==0 && r>=0 &
2690: 26 20 72 3c 4c 41 52 47 45 53 54 5f 49 4e 54 36  & r<LARGEST_INT6
26a0: 34 2d 31 20 29 7b 0a 20 20 20 20 72 20 3d 20 28  4-1 ){.    r = (
26b0: 64 6f 75 62 6c 65 29 28 28 73 71 6c 69 74 65 5f  double)((sqlite_
26c0: 69 6e 74 36 34 29 28 72 2b 30 2e 35 29 29 3b 0a  int64)(r+0.5));.
26d0: 20 20 7d 65 6c 73 65 20 69 66 28 20 6e 3d 3d 30    }else if( n==0
26e0: 20 26 26 20 72 3c 30 20 26 26 20 28 2d 72 29 3c   && r<0 && (-r)<
26f0: 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2d 31 20  LARGEST_INT64-1 
2700: 29 7b 0a 20 20 20 20 72 20 3d 20 2d 28 64 6f 75  ){.    r = -(dou
2710: 62 6c 65 29 28 28 73 71 6c 69 74 65 5f 69 6e 74  ble)((sqlite_int
2720: 36 34 29 28 28 2d 72 29 2b 30 2e 35 29 29 3b 0a  64)((-r)+0.5));.
2730: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 42 75    }else{.    zBu
2740: 66 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69  f = sqlite3_mpri
2750: 6e 74 66 28 22 25 2e 2a 66 22 2c 6e 2c 72 29 3b  ntf("%.*f",n,r);
2760: 0a 20 20 20 20 69 66 28 20 7a 42 75 66 3d 3d 30  .    if( zBuf==0
2770: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
2780: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e  3_result_error_n
2790: 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20  omem(context);. 
27a0: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20       return;.   
27b0: 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 41 74   }.    sqlite3At
27c0: 6f 46 28 7a 42 75 66 2c 20 26 72 2c 20 73 71 6c  oF(zBuf, &r, sql
27d0: 69 74 65 33 53 74 72 6c 65 6e 33 30 28 7a 42 75  ite3Strlen30(zBu
27e0: 66 29 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 29  f), SQLITE_UTF8)
27f0: 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72  ;.    sqlite3_fr
2800: 65 65 28 7a 42 75 66 29 3b 0a 20 20 7d 0a 20 20  ee(zBuf);.  }.  
2810: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64  sqlite3_result_d
2820: 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 72  ouble(context, r
2830: 29 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a  );.}.#endif../*.
2840: 2a 2a 20 41 6c 6c 6f 63 61 74 65 20 6e 42 79 74  ** Allocate nByt
2850: 65 20 62 79 74 65 73 20 6f 66 20 73 70 61 63 65  e bytes of space
2860: 20 75 73 69 6e 67 20 73 71 6c 69 74 65 33 5f 6d   using sqlite3_m
2870: 61 6c 6c 6f 63 28 29 2e 20 49 66 20 74 68 65 0a  alloc(). If the.
2880: 2a 2a 20 61 6c 6c 6f 63 61 74 69 6f 6e 20 66 61  ** allocation fa
2890: 69 6c 73 2c 20 63 61 6c 6c 20 73 71 6c 69 74 65  ils, call sqlite
28a0: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e  3_result_error_n
28b0: 6f 6d 65 6d 28 29 20 74 6f 20 6e 6f 74 69 66 79  omem() to notify
28c0: 0a 2a 2a 20 74 68 65 20 64 61 74 61 62 61 73 65  .** the database
28d0: 20 68 61 6e 64 6c 65 20 74 68 61 74 20 6d 61 6c   handle that mal
28e0: 6c 6f 63 28 29 20 68 61 73 20 66 61 69 6c 65 64  loc() has failed
28f0: 20 61 6e 64 20 72 65 74 75 72 6e 20 4e 55 4c 4c   and return NULL
2900: 2e 0a 2a 2a 20 49 66 20 6e 42 79 74 65 20 69 73  ..** If nByte is
2910: 20 6c 61 72 67 65 72 20 74 68 61 6e 20 74 68 65   larger than the
2920: 20 6d 61 78 69 6d 75 6d 20 73 74 72 69 6e 67 20   maximum string 
2930: 6f 72 20 62 6c 6f 62 20 6c 65 6e 67 74 68 2c 20  or blob length, 
2940: 74 68 65 6e 0a 2a 2a 20 72 61 69 73 65 20 61 6e  then.** raise an
2950: 20 53 51 4c 49 54 45 5f 54 4f 4f 42 49 47 20 65   SQLITE_TOOBIG e
2960: 78 63 65 70 74 69 6f 6e 20 61 6e 64 20 72 65 74  xception and ret
2970: 75 72 6e 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61  urn NULL..*/.sta
2980: 74 69 63 20 76 6f 69 64 20 2a 63 6f 6e 74 65 78  tic void *contex
2990: 74 4d 61 6c 6c 6f 63 28 73 71 6c 69 74 65 33 5f  tMalloc(sqlite3_
29a0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
29b0: 2c 20 69 36 34 20 6e 42 79 74 65 29 7b 0a 20 20  , i64 nByte){.  
29c0: 63 68 61 72 20 2a 7a 3b 0a 20 20 73 71 6c 69 74  char *z;.  sqlit
29d0: 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33  e3 *db = sqlite3
29e0: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
29f0: 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61  le(context);.  a
2a00: 73 73 65 72 74 28 20 6e 42 79 74 65 3e 30 20 29  ssert( nByte>0 )
2a10: 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 42  ;.  testcase( nB
2a20: 79 74 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b  yte==db->aLimit[
2a30: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e  SQLITE_LIMIT_LEN
2a40: 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61  GTH] );.  testca
2a50: 73 65 28 20 6e 42 79 74 65 3d 3d 64 62 2d 3e 61  se( nByte==db->a
2a60: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
2a70: 49 54 5f 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a  IT_LENGTH]+1 );.
2a80: 20 20 69 66 28 20 6e 42 79 74 65 3e 64 62 2d 3e    if( nByte>db->
2a90: 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49  aLimit[SQLITE_LI
2aa0: 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20  MIT_LENGTH] ){. 
2ab0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
2ac0: 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63  t_error_toobig(c
2ad0: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7a 20 3d  ontext);.    z =
2ae0: 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20   0;.  }else{.   
2af0: 20 7a 20 3d 20 73 71 6c 69 74 65 33 4d 61 6c 6c   z = sqlite3Mall
2b00: 6f 63 28 6e 42 79 74 65 29 3b 0a 20 20 20 20 69  oc(nByte);.    i
2b10: 66 28 20 21 7a 20 29 7b 0a 20 20 20 20 20 20 73  f( !z ){.      s
2b20: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
2b30: 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78  ror_nomem(contex
2b40: 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20  t);.    }.  }.  
2b50: 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a  return z;.}../*.
2b60: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
2b70: 6e 20 6f 66 20 74 68 65 20 75 70 70 65 72 28 29  n of the upper()
2b80: 20 61 6e 64 20 6c 6f 77 65 72 28 29 20 53 51 4c   and lower() SQL
2b90: 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73   functions..*/.s
2ba0: 74 61 74 69 63 20 76 6f 69 64 20 75 70 70 65 72  tatic void upper
2bb0: 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Func(sqlite3_con
2bc0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
2bd0: 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33  nt argc, sqlite3
2be0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a  _value **argv){.
2bf0: 20 20 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f    char *z1;.  co
2c00: 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20  nst char *z2;.  
2c10: 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53  int i, n;.  UNUS
2c20: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
2c30: 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63 68 61 72  c);.  z2 = (char
2c40: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  *)sqlite3_value_
2c50: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
2c60: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   n = sqlite3_val
2c70: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
2c80: 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66 79 20 74  );.  /* Verify t
2c90: 68 61 74 20 74 68 65 20 63 61 6c 6c 20 74 6f 20  hat the call to 
2ca0: 5f 62 79 74 65 73 28 29 20 64 6f 65 73 20 6e 6f  _bytes() does no
2cb0: 74 20 69 6e 76 61 6c 69 64 61 74 65 20 74 68 65  t invalidate the
2cc0: 20 5f 74 65 78 74 28 29 20 70 6f 69 6e 74 65 72   _text() pointer
2cd0: 20 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 7a 32   */.  assert( z2
2ce0: 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  ==(char*)sqlite3
2cf0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
2d00: 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28 20 7a 32  [0]) );.  if( z2
2d10: 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e   ){.    z1 = con
2d20: 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65  textMalloc(conte
2d30: 78 74 2c 20 28 28 69 36 34 29 6e 29 2b 31 29 3b  xt, ((i64)n)+1);
2d40: 0a 20 20 20 20 69 66 28 20 7a 31 20 29 7b 0a 20  .    if( z1 ){. 
2d50: 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c       for(i=0; i<
2d60: 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  n; i++){.       
2d70: 20 7a 31 5b 69 5d 20 3d 20 28 63 68 61 72 29 73   z1[i] = (char)s
2d80: 71 6c 69 74 65 33 54 6f 75 70 70 65 72 28 7a 32  qlite3Toupper(z2
2d90: 5b 69 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  [i]);.      }.  
2da0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
2db0: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
2dc0: 20 7a 31 2c 20 6e 2c 20 73 71 6c 69 74 65 33 5f   z1, n, sqlite3_
2dd0: 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  free);.    }.  }
2de0: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  .}.static void l
2df0: 6f 77 65 72 46 75 6e 63 28 73 71 6c 69 74 65 33  owerFunc(sqlite3
2e00: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
2e10: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
2e20: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
2e30: 76 29 7b 0a 20 20 63 68 61 72 20 2a 7a 31 3b 0a  v){.  char *z1;.
2e40: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32    const char *z2
2e50: 3b 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20  ;.  int i, n;.  
2e60: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
2e70: 28 61 72 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28  (argc);.  z2 = (
2e80: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
2e90: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
2ea0: 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  );.  n = sqlite3
2eb0: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
2ec0: 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69  v[0]);.  /* Veri
2ed0: 66 79 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c  fy that the call
2ee0: 20 74 6f 20 5f 62 79 74 65 73 28 29 20 64 6f 65   to _bytes() doe
2ef0: 73 20 6e 6f 74 20 69 6e 76 61 6c 69 64 61 74 65  s not invalidate
2f00: 20 74 68 65 20 5f 74 65 78 74 28 29 20 70 6f 69   the _text() poi
2f10: 6e 74 65 72 20 2a 2f 0a 20 20 61 73 73 65 72 74  nter */.  assert
2f20: 28 20 7a 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c  ( z2==(char*)sql
2f30: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
2f40: 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66  argv[0]) );.  if
2f50: 28 20 7a 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d  ( z2 ){.    z1 =
2f60: 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63   contextMalloc(c
2f70: 6f 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29  ontext, ((i64)n)
2f80: 2b 31 29 3b 0a 20 20 20 20 69 66 28 20 7a 31 20  +1);.    if( z1 
2f90: 29 7b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30  ){.      for(i=0
2fa0: 3b 20 69 3c 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20  ; i<n; i++){.   
2fb0: 20 20 20 20 20 7a 31 5b 69 5d 20 3d 20 73 71 6c       z1[i] = sql
2fc0: 69 74 65 33 54 6f 6c 6f 77 65 72 28 7a 32 5b 69  ite3Tolower(z2[i
2fd0: 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  ]);.      }.    
2fe0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2ff0: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a  _text(context, z
3000: 31 2c 20 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72  1, n, sqlite3_fr
3010: 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  ee);.    }.  }.}
3020: 0a 0a 2f 2a 0a 2a 2a 20 53 6f 6d 65 20 66 75 6e  ../*.** Some fun
3030: 63 74 69 6f 6e 73 20 6c 69 6b 65 20 43 4f 41 4c  ctions like COAL
3040: 45 53 43 45 28 29 20 61 6e 64 20 49 46 4e 55 4c  ESCE() and IFNUL
3050: 4c 28 29 20 61 6e 64 20 55 4e 4c 49 4b 45 4c 59  L() and UNLIKELY
3060: 28 29 20 61 72 65 20 69 6d 70 6c 65 6d 65 6e 74  () are implement
3070: 65 64 0a 2a 2a 20 61 73 20 56 44 42 45 20 63 6f  ed.** as VDBE co
3080: 64 65 20 73 6f 20 74 68 61 74 20 75 6e 75 73 65  de so that unuse
3090: 64 20 61 72 67 75 6d 65 6e 74 20 76 61 6c 75 65  d argument value
30a0: 73 20 64 6f 20 6e 6f 74 20 68 61 76 65 20 74 6f  s do not have to
30b0: 20 62 65 20 63 6f 6d 70 75 74 65 64 2e 0a 2a 2a   be computed..**
30c0: 20 48 6f 77 65 76 65 72 2c 20 77 65 20 73 74 69   However, we sti
30d0: 6c 6c 20 6e 65 65 64 20 73 6f 6d 65 20 6b 69 6e  ll need some kin
30e0: 64 20 6f 66 20 66 75 6e 63 74 69 6f 6e 20 69 6d  d of function im
30f0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 66 6f 72  plementation for
3100: 20 74 68 69 73 0a 2a 2a 20 72 6f 75 74 69 6e 65   this.** routine
3110: 73 20 69 6e 20 74 68 65 20 66 75 6e 63 74 69 6f  s in the functio
3120: 6e 20 74 61 62 6c 65 2e 20 20 54 68 65 20 6e 6f  n table.  The no
3130: 6f 70 46 75 6e 63 20 6d 61 63 72 6f 20 70 72 6f  opFunc macro pro
3140: 76 69 64 65 73 20 74 68 69 73 2e 0a 2a 2a 20 6e  vides this..** n
3150: 6f 6f 70 46 75 6e 63 20 77 69 6c 6c 20 6e 65 76  oopFunc will nev
3160: 65 72 20 62 65 20 63 61 6c 6c 65 64 20 73 6f 20  er be called so 
3170: 69 74 20 64 6f 65 73 6e 27 74 20 6d 61 74 74 65  it doesn't matte
3180: 72 20 77 68 61 74 20 74 68 65 20 69 6d 70 6c 65  r what the imple
3190: 6d 65 6e 74 61 74 69 6f 6e 0a 2a 2a 20 69 73 2e  mentation.** is.
31a0: 20 20 57 65 20 6d 69 67 68 74 20 61 73 20 77 65    We might as we
31b0: 6c 6c 20 75 73 65 20 74 68 65 20 22 76 65 72 73  ll use the "vers
31c0: 69 6f 6e 28 29 22 20 66 75 6e 63 74 69 6f 6e 20  ion()" function 
31d0: 61 73 20 61 20 73 75 62 73 74 69 74 75 74 65 2e  as a substitute.
31e0: 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 6e 6f 6f 70  .*/.#define noop
31f0: 46 75 6e 63 20 76 65 72 73 69 6f 6e 46 75 6e 63  Func versionFunc
3200: 20 20 20 2f 2a 20 53 75 62 73 74 69 74 75 74 65     /* Substitute
3210: 20 66 75 6e 63 74 69 6f 6e 20 2d 20 6e 65 76 65   function - neve
3220: 72 20 63 61 6c 6c 65 64 20 2a 2f 0a 0a 2f 2a 0a  r called */../*.
3230: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
3240: 6e 20 6f 66 20 72 61 6e 64 6f 6d 28 29 2e 20 20  n of random().  
3250: 52 65 74 75 72 6e 20 61 20 72 61 6e 64 6f 6d 20  Return a random 
3260: 69 6e 74 65 67 65 72 2e 20 20 0a 2a 2f 0a 73 74  integer.  .*/.st
3270: 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d  atic void random
3280: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
3290: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
32a0: 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c  ,.  int NotUsed,
32b0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
32c0: 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20   **NotUsed2.){. 
32d0: 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 72 3b   sqlite_int64 r;
32e0: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
32f0: 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f  TER2(NotUsed, No
3300: 74 55 73 65 64 32 29 3b 0a 20 20 73 71 6c 69 74  tUsed2);.  sqlit
3310: 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73 28 73 69  e3_randomness(si
3320: 7a 65 6f 66 28 72 29 2c 20 26 72 29 3b 0a 20 20  zeof(r), &r);.  
3330: 69 66 28 20 72 3c 30 20 29 7b 0a 20 20 20 20 2f  if( r<0 ){.    /
3340: 2a 20 57 65 20 6e 65 65 64 20 74 6f 20 70 72 65  * We need to pre
3350: 76 65 6e 74 20 61 20 72 61 6e 64 6f 6d 20 6e 75  vent a random nu
3360: 6d 62 65 72 20 6f 66 20 30 78 38 30 30 30 30 30  mber of 0x800000
3370: 30 30 30 30 30 30 30 30 30 30 20 0a 20 20 20 20  0000000000 .    
3380: 2a 2a 20 28 6f 72 20 2d 39 32 32 33 33 37 32 30  ** (or -92233720
3390: 33 36 38 35 34 37 37 35 38 30 38 29 20 73 69 6e  36854775808) sin
33a0: 63 65 20 77 68 65 6e 20 79 6f 75 20 64 6f 20 61  ce when you do a
33b0: 62 73 28 29 20 6f 66 20 74 68 61 74 0a 20 20 20  bs() of that.   
33c0: 20 2a 2a 20 6e 75 6d 62 65 72 20 6f 66 20 79 6f   ** number of yo
33d0: 75 20 67 65 74 20 74 68 65 20 73 61 6d 65 20 76  u get the same v
33e0: 61 6c 75 65 20 62 61 63 6b 20 61 67 61 69 6e 2e  alue back again.
33f0: 20 20 54 6f 20 64 6f 20 74 68 69 73 0a 20 20 20    To do this.   
3400: 20 2a 2a 20 69 6e 20 61 20 77 61 79 20 74 68 61   ** in a way tha
3410: 74 20 69 73 20 74 65 73 74 61 62 6c 65 2c 20 6d  t is testable, m
3420: 61 73 6b 20 74 68 65 20 73 69 67 6e 20 62 69 74  ask the sign bit
3430: 20 6f 66 66 20 6f 66 20 6e 65 67 61 74 69 76 65   off of negative
3440: 0a 20 20 20 20 2a 2a 20 76 61 6c 75 65 73 2c 20  .    ** values, 
3450: 72 65 73 75 6c 74 69 6e 67 20 69 6e 20 61 20 70  resulting in a p
3460: 6f 73 69 74 69 76 65 20 76 61 6c 75 65 2e 20 20  ositive value.  
3470: 54 68 65 6e 20 74 61 6b 65 20 74 68 65 20 0a 20  Then take the . 
3480: 20 20 20 2a 2a 20 32 73 20 63 6f 6d 70 6c 65 6d     ** 2s complem
3490: 65 6e 74 20 6f 66 20 74 68 61 74 20 70 6f 73 69  ent of that posi
34a0: 74 69 76 65 20 76 61 6c 75 65 2e 20 20 54 68 65  tive value.  The
34b0: 20 65 6e 64 20 72 65 73 75 6c 74 20 63 61 6e 0a   end result can.
34c0: 20 20 20 20 2a 2a 20 74 68 65 72 65 66 6f 72 65      ** therefore
34d0: 20 62 65 20 6e 6f 20 6c 65 73 73 20 74 68 61 6e   be no less than
34e0: 20 2d 39 32 32 33 33 37 32 30 33 36 38 35 34 37   -92233720368547
34f0: 37 35 38 30 37 2e 0a 20 20 20 20 2a 2f 0a 20 20  75807..    */.  
3500: 20 20 72 20 3d 20 2d 28 72 20 26 20 4c 41 52 47    r = -(r & LARG
3510: 45 53 54 5f 49 4e 54 36 34 29 3b 0a 20 20 7d 0a  EST_INT64);.  }.
3520: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
3530: 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20  _int64(context, 
3540: 72 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  r);.}../*.** Imp
3550: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72  lementation of r
3560: 61 6e 64 6f 6d 62 6c 6f 62 28 4e 29 2e 20 20 52  andomblob(N).  R
3570: 65 74 75 72 6e 20 61 20 72 61 6e 64 6f 6d 20 62  eturn a random b
3580: 6c 6f 62 0a 2a 2a 20 74 68 61 74 20 69 73 20 4e  lob.** that is N
3590: 20 62 79 74 65 73 20 6c 6f 6e 67 2e 0a 2a 2f 0a   bytes long..*/.
35a0: 73 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64  static void rand
35b0: 6f 6d 42 6c 6f 62 28 0a 20 20 73 71 6c 69 74 65  omBlob(.  sqlite
35c0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
35d0: 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a  xt,.  int argc,.
35e0: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
35f0: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20  **argv.){.  int 
3600: 6e 3b 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68  n;.  unsigned ch
3610: 61 72 20 2a 70 3b 0a 20 20 61 73 73 65 72 74 28  ar *p;.  assert(
3620: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e   argc==1 );.  UN
3630: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
3640: 72 67 63 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69  rgc);.  n = sqli
3650: 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72  te3_value_int(ar
3660: 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 6e 3c  gv[0]);.  if( n<
3670: 31 20 29 7b 0a 20 20 20 20 6e 20 3d 20 31 3b 0a  1 ){.    n = 1;.
3680: 20 20 7d 0a 20 20 70 20 3d 20 63 6f 6e 74 65 78    }.  p = contex
3690: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
36a0: 20 6e 29 3b 0a 20 20 69 66 28 20 70 20 29 7b 0a   n);.  if( p ){.
36b0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 61 6e 64      sqlite3_rand
36c0: 6f 6d 6e 65 73 73 28 6e 2c 20 70 29 3b 0a 20 20  omness(n, p);.  
36d0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
36e0: 5f 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28  _blob(context, (
36f0: 63 68 61 72 2a 29 70 2c 20 6e 2c 20 73 71 6c 69  char*)p, n, sqli
3700: 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 7d 0a 7d  te3_free);.  }.}
3710: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
3720: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 61  tation of the la
3730: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
3740: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20  ) SQL function. 
3750: 20 54 68 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76   The return.** v
3760: 61 6c 75 65 20 69 73 20 74 68 65 20 73 61 6d 65  alue is the same
3770: 20 61 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f   as the sqlite3_
3780: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69  last_insert_rowi
3790: 64 28 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e  d() API function
37a0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
37b0: 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77   last_insert_row
37c0: 69 64 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  id(.  sqlite3_co
37d0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
37e0: 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 20  .  int NotUsed, 
37f0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
3800: 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20   **NotUsed2.){. 
3810: 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73   sqlite3 *db = s
3820: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
3830: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
3840: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
3850: 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20  METER2(NotUsed, 
3860: 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20  NotUsed2);.  /* 
3870: 49 4d 50 3a 20 52 2d 35 31 35 31 33 2d 31 32 30  IMP: R-51513-120
3880: 32 36 20 54 68 65 20 6c 61 73 74 5f 69 6e 73 65  26 The last_inse
3890: 72 74 5f 72 6f 77 69 64 28 29 20 53 51 4c 20 66  rt_rowid() SQL f
38a0: 75 6e 63 74 69 6f 6e 20 69 73 20 61 0a 20 20 2a  unction is a.  *
38b0: 2a 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64  * wrapper around
38c0: 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 61 73   the sqlite3_las
38d0: 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29  t_insert_rowid()
38e0: 20 43 2f 43 2b 2b 20 69 6e 74 65 72 66 61 63 65   C/C++ interface
38f0: 0a 20 20 2a 2a 20 66 75 6e 63 74 69 6f 6e 2e 20  .  ** function. 
3900: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  */.  sqlite3_res
3910: 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78  ult_int64(contex
3920: 74 2c 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f  t, sqlite3_last_
3930: 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29  insert_rowid(db)
3940: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  );.}../*.** Impl
3950: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
3960: 65 20 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20  e changes() SQL 
3970: 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20  function..**.** 
3980: 49 4d 50 3a 20 52 2d 36 32 30 37 33 2d 31 31 32  IMP: R-62073-112
3990: 30 39 20 54 68 65 20 63 68 61 6e 67 65 73 28 29  09 The changes()
39a0: 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 69 73   SQL function is
39b0: 20 61 20 77 72 61 70 70 65 72 0a 2a 2a 20 61 72   a wrapper.** ar
39c0: 6f 75 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33  ound the sqlite3
39d0: 5f 63 68 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b  _changes() C/C++
39e0: 20 66 75 6e 63 74 69 6f 6e 20 61 6e 64 20 68 65   function and he
39f0: 6e 63 65 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20  nce follows the 
3a00: 73 61 6d 65 0a 2a 2a 20 72 75 6c 65 73 20 66 6f  same.** rules fo
3a10: 72 20 63 6f 75 6e 74 69 6e 67 20 63 68 61 6e 67  r counting chang
3a20: 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  es..*/.static vo
3a30: 69 64 20 63 68 61 6e 67 65 73 28 0a 20 20 73 71  id changes(.  sq
3a40: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
3a50: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f  ontext,.  int No
3a60: 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33  tUsed,.  sqlite3
3a70: 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64  _value **NotUsed
3a80: 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a  2.){.  sqlite3 *
3a90: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
3aa0: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
3ab0: 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45  ontext);.  UNUSE
3ac0: 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74  D_PARAMETER2(Not
3ad0: 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b  Used, NotUsed2);
3ae0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
3af0: 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73  t_int(context, s
3b00: 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28 64  qlite3_changes(d
3b10: 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  b));.}../*.** Im
3b20: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
3b30: 74 68 65 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65  the total_change
3b40: 73 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  s() SQL function
3b50: 2e 20 20 54 68 65 20 72 65 74 75 72 6e 20 76 61  .  The return va
3b60: 6c 75 65 20 69 73 0a 2a 2a 20 74 68 65 20 73 61  lue is.** the sa
3b70: 6d 65 20 61 73 20 74 68 65 20 73 71 6c 69 74 65  me as the sqlite
3b80: 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28  3_total_changes(
3b90: 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a  ) API function..
3ba0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74  */.static void t
3bb0: 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 0a 20 20  otal_changes(.  
3bc0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
3bd0: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
3be0: 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74  NotUsed,.  sqlit
3bf0: 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73  e3_value **NotUs
3c00: 65 64 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33  ed2.){.  sqlite3
3c10: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
3c20: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
3c30: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55  (context);.  UNU
3c40: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e  SED_PARAMETER2(N
3c50: 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32  otUsed, NotUsed2
3c60: 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 35  );.  /* IMP: R-5
3c70: 32 37 35 36 2d 34 31 39 39 33 20 54 68 69 73 20  2756-41993 This 
3c80: 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20 77 72  function is a wr
3c90: 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65  apper around the
3ca0: 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 74 6f  .  ** sqlite3_to
3cb0: 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20 43 2f  tal_changes() C/
3cc0: 43 2b 2b 20 69 6e 74 65 72 66 61 63 65 2e 20 2a  C++ interface. *
3cd0: 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  /.  sqlite3_resu
3ce0: 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20  lt_int(context, 
3cf0: 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68  sqlite3_total_ch
3d00: 61 6e 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f  anges(db));.}../
3d10: 2a 0a 2a 2a 20 41 20 73 74 72 75 63 74 75 72 65  *.** A structure
3d20: 20 64 65 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f   defining how to
3d30: 20 64 6f 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63   do GLOB-style c
3d40: 6f 6d 70 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73  omparisons..*/.s
3d50: 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66  truct compareInf
3d60: 6f 20 7b 0a 20 20 75 38 20 6d 61 74 63 68 41 6c  o {.  u8 matchAl
3d70: 6c 3b 0a 20 20 75 38 20 6d 61 74 63 68 4f 6e 65  l;.  u8 matchOne
3d80: 3b 0a 20 20 75 38 20 6d 61 74 63 68 53 65 74 3b  ;.  u8 matchSet;
3d90: 0a 20 20 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b  .  u8 noCase;.};
3da0: 0a 0a 2f 2a 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45  ../*.** For LIKE
3db0: 20 61 6e 64 20 47 4c 4f 42 20 6d 61 74 63 68 69   and GLOB matchi
3dc0: 6e 67 20 6f 6e 20 45 42 43 44 49 43 20 6d 61 63  ng on EBCDIC mac
3dd0: 68 69 6e 65 73 2c 20 61 73 73 75 6d 65 20 74 68  hines, assume th
3de0: 61 74 20 65 76 65 72 79 0a 2a 2a 20 63 68 61 72  at every.** char
3df0: 61 63 74 65 72 20 69 73 20 65 78 61 63 74 6c 79  acter is exactly
3e00: 20 6f 6e 65 20 62 79 74 65 20 69 6e 20 73 69 7a   one byte in siz
3e10: 65 2e 20 20 41 6c 73 6f 2c 20 61 6c 6c 20 63 68  e.  Also, all ch
3e20: 61 72 61 63 74 65 72 73 20 61 72 65 0a 2a 2a 20  aracters are.** 
3e30: 61 62 6c 65 20 74 6f 20 70 61 72 74 69 63 69 70  able to particip
3e40: 61 74 65 20 69 6e 20 75 70 70 65 72 2d 63 61 73  ate in upper-cas
3e50: 65 2d 74 6f 2d 6c 6f 77 65 72 2d 63 61 73 65 20  e-to-lower-case 
3e60: 6d 61 70 70 69 6e 67 73 20 69 6e 20 45 42 43 44  mappings in EBCD
3e70: 49 43 0a 2a 2a 20 77 68 65 72 65 61 73 20 6f 6e  IC.** whereas on
3e80: 6c 79 20 63 68 61 72 61 63 74 65 72 73 20 6c 65  ly characters le
3e90: 73 73 20 74 68 61 6e 20 30 78 38 30 20 64 6f 20  ss than 0x80 do 
3ea0: 69 6e 20 41 53 43 49 49 2e 0a 2a 2f 0a 23 69 66  in ASCII..*/.#if
3eb0: 20 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f   defined(SQLITE_
3ec0: 45 42 43 44 49 43 29 0a 23 20 64 65 66 69 6e 65  EBCDIC).# define
3ed0: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
3ee0: 28 41 29 20 20 20 20 20 20 20 20 28 2a 28 28 2a  (A)        (*((*
3ef0: 41 29 2b 2b 29 29 0a 23 20 64 65 66 69 6e 65 20  A)++)).# define 
3f00: 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72  GlobUpperToLower
3f10: 28 41 29 20 20 20 20 20 20 20 41 20 3d 20 73 71  (A)       A = sq
3f20: 6c 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65  lite3UpperToLowe
3f30: 72 5b 41 5d 0a 23 20 64 65 66 69 6e 65 20 47 6c  r[A].# define Gl
3f40: 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 41 73  obUpperToLowerAs
3f50: 63 69 69 28 41 29 20 20 41 20 3d 20 73 71 6c 69  cii(A)  A = sqli
3f60: 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b  te3UpperToLower[
3f70: 41 5d 0a 23 65 6c 73 65 0a 23 20 64 65 66 69 6e  A].#else.# defin
3f80: 65 20 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77  e GlobUpperToLow
3f90: 65 72 28 41 29 20 20 20 20 20 20 20 69 66 28 20  er(A)       if( 
3fa0: 41 3c 3d 30 78 37 66 20 29 7b 20 41 20 3d 20 73  A<=0x7f ){ A = s
3fb0: 71 6c 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77  qlite3UpperToLow
3fc0: 65 72 5b 41 5d 3b 20 7d 0a 23 20 64 65 66 69 6e  er[A]; }.# defin
3fd0: 65 20 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77  e GlobUpperToLow
3fe0: 65 72 41 73 63 69 69 28 41 29 20 20 41 20 3d 20  erAscii(A)  A = 
3ff0: 73 71 6c 69 74 65 33 55 70 70 65 72 54 6f 4c 6f  sqlite3UpperToLo
4000: 77 65 72 5b 41 5d 0a 23 65 6e 64 69 66 0a 0a 73  wer[A].#endif..s
4010: 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74 72 75  tatic const stru
4020: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 67  ct compareInfo g
4030: 6c 6f 62 49 6e 66 6f 20 3d 20 7b 20 27 2a 27 2c  lobInfo = { '*',
4040: 20 27 3f 27 2c 20 27 5b 27 2c 20 30 20 7d 3b 0a   '?', '[', 0 };.
4050: 2f 2a 20 54 68 65 20 63 6f 72 72 65 63 74 20 53  /* The correct S
4060: 51 4c 2d 39 32 20 62 65 68 61 76 69 6f 72 20 69  QL-92 behavior i
4070: 73 20 66 6f 72 20 74 68 65 20 4c 49 4b 45 20 6f  s for the LIKE o
4080: 70 65 72 61 74 6f 72 20 74 6f 20 69 67 6e 6f 72  perator to ignor
4090: 65 0a 2a 2a 20 63 61 73 65 2e 20 20 54 68 75 73  e.** case.  Thus
40a0: 20 20 27 61 27 20 4c 49 4b 45 20 27 41 27 20 77    'a' LIKE 'A' w
40b0: 6f 75 6c 64 20 62 65 20 74 72 75 65 2e 20 2a 2f  ould be true. */
40c0: 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74  .static const st
40d0: 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  ruct compareInfo
40e0: 20 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 20 3d 20   likeInfoNorm = 
40f0: 7b 20 27 25 27 2c 20 27 5f 27 2c 20 20 20 30 2c  { '%', '_',   0,
4100: 20 31 20 7d 3b 0a 2f 2a 20 49 66 20 53 51 4c 49   1 };./* If SQLI
4110: 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54 49 56  TE_CASE_SENSITIV
4120: 45 5f 4c 49 4b 45 20 69 73 20 64 65 66 69 6e 65  E_LIKE is define
4130: 64 2c 20 74 68 65 6e 20 74 68 65 20 4c 49 4b 45  d, then the LIKE
4140: 20 6f 70 65 72 61 74 6f 72 0a 2a 2a 20 69 73 20   operator.** is 
4150: 63 61 73 65 20 73 65 6e 73 69 74 69 76 65 20 63  case sensitive c
4160: 61 75 73 69 6e 67 20 27 61 27 20 4c 49 4b 45 20  ausing 'a' LIKE 
4170: 27 41 27 20 74 6f 20 62 65 20 66 61 6c 73 65 20  'A' to be false 
4180: 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20  */.static const 
4190: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
41a0: 66 6f 20 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d  fo likeInfoAlt =
41b0: 20 7b 20 27 25 27 2c 20 27 5f 27 2c 20 20 20 30   { '%', '_',   0
41c0: 2c 20 30 20 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 43 6f  , 0 };../*.** Co
41d0: 6d 70 61 72 65 20 74 77 6f 20 55 54 46 2d 38 20  mpare two UTF-8 
41e0: 73 74 72 69 6e 67 73 20 66 6f 72 20 65 71 75 61  strings for equa
41f0: 6c 69 74 79 20 77 68 65 72 65 20 74 68 65 20 66  lity where the f
4200: 69 72 73 74 20 73 74 72 69 6e 67 20 63 61 6e 0a  irst string can.
4210: 2a 2a 20 70 6f 74 65 6e 74 69 61 6c 6c 79 20 62  ** potentially b
4220: 65 20 61 20 22 67 6c 6f 62 22 20 6f 72 20 22 6c  e a "glob" or "l
4230: 69 6b 65 22 20 65 78 70 72 65 73 73 69 6f 6e 2e  ike" expression.
4240: 20 20 52 65 74 75 72 6e 20 74 72 75 65 20 28 31    Return true (1
4250: 29 20 69 66 20 74 68 65 79 0a 2a 2a 20 61 72 65  ) if they.** are
4260: 20 74 68 65 20 73 61 6d 65 20 61 6e 64 20 66 61   the same and fa
4270: 6c 73 65 20 28 30 29 20 69 66 20 74 68 65 79 20  lse (0) if they 
4280: 61 72 65 20 64 69 66 66 65 72 65 6e 74 2e 0a 2a  are different..*
4290: 2a 0a 2a 2a 20 47 6c 6f 62 62 69 6e 67 20 72 75  *.** Globbing ru
42a0: 6c 65 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  les:.**.**      
42b0: 27 2a 27 20 20 20 20 20 20 20 4d 61 74 63 68 65  '*'       Matche
42c0: 73 20 61 6e 79 20 73 65 71 75 65 6e 63 65 20 6f  s any sequence o
42d0: 66 20 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 63  f zero or more c
42e0: 68 61 72 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a  haracters..**.**
42f0: 20 20 20 20 20 20 27 3f 27 20 20 20 20 20 20 20        '?'       
4300: 4d 61 74 63 68 65 73 20 65 78 61 63 74 6c 79 20  Matches exactly 
4310: 6f 6e 65 20 63 68 61 72 61 63 74 65 72 2e 0a 2a  one character..*
4320: 2a 0a 2a 2a 20 20 20 20 20 5b 2e 2e 2e 5d 20 20  *.**     [...]  
4330: 20 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20      Matches one 
4340: 63 68 61 72 61 63 74 65 72 20 66 72 6f 6d 20 74  character from t
4350: 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74  he enclosed list
4360: 20 6f 66 0a 2a 2a 20 20 20 20 20 20 20 20 20 20   of.**          
4370: 20 20 20 20 20 20 63 68 61 72 61 63 74 65 72 73        characters
4380: 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e  ..**.**     [^..
4390: 2e 5d 20 20 20 20 20 4d 61 74 63 68 65 73 20 6f  .]     Matches o
43a0: 6e 65 20 63 68 61 72 61 63 74 65 72 20 6e 6f 74  ne character not
43b0: 20 69 6e 20 74 68 65 20 65 6e 63 6c 6f 73 65 64   in the enclosed
43c0: 20 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 57 69 74   list..**.** Wit
43d0: 68 20 74 68 65 20 5b 2e 2e 2e 5d 20 61 6e 64 20  h the [...] and 
43e0: 5b 5e 2e 2e 2e 5d 20 6d 61 74 63 68 69 6e 67 2c  [^...] matching,
43f0: 20 61 20 27 5d 27 20 63 68 61 72 61 63 74 65 72   a ']' character
4400: 20 63 61 6e 20 62 65 20 69 6e 63 6c 75 64 65 64   can be included
4410: 0a 2a 2a 20 69 6e 20 74 68 65 20 6c 69 73 74 20  .** in the list 
4420: 62 79 20 6d 61 6b 69 6e 67 20 69 74 20 74 68 65  by making it the
4430: 20 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72   first character
4440: 20 61 66 74 65 72 20 27 5b 27 20 6f 72 20 27 5e   after '[' or '^
4450: 27 2e 20 20 41 0a 2a 2a 20 72 61 6e 67 65 20 6f  '.  A.** range o
4460: 66 20 63 68 61 72 61 63 74 65 72 73 20 63 61 6e  f characters can
4470: 20 62 65 20 73 70 65 63 69 66 69 65 64 20 75 73   be specified us
4480: 69 6e 67 20 27 2d 27 2e 20 20 45 78 61 6d 70 6c  ing '-'.  Exampl
4490: 65 3a 0a 2a 2a 20 22 5b 61 2d 7a 5d 22 20 6d 61  e:.** "[a-z]" ma
44a0: 74 63 68 65 73 20 61 6e 79 20 73 69 6e 67 6c 65  tches any single
44b0: 20 6c 6f 77 65 72 2d 63 61 73 65 20 6c 65 74 74   lower-case lett
44c0: 65 72 2e 20 20 54 6f 20 6d 61 74 63 68 20 61 20  er.  To match a 
44d0: 27 2d 27 2c 20 6d 61 6b 65 0a 2a 2a 20 69 74 20  '-', make.** it 
44e0: 74 68 65 20 6c 61 73 74 20 63 68 61 72 61 63 74  the last charact
44f0: 65 72 20 69 6e 20 74 68 65 20 6c 69 73 74 2e 0a  er in the list..
4500: 2a 2a 0a 2a 2a 20 4c 69 6b 65 20 6d 61 74 63 68  **.** Like match
4510: 69 6e 67 20 72 75 6c 65 73 3a 0a 2a 2a 20 0a 2a  ing rules:.** .*
4520: 2a 20 20 20 20 20 20 27 25 27 20 20 20 20 20 20  *      '%'      
4530: 20 4d 61 74 63 68 65 73 20 61 6e 79 20 73 65 71   Matches any seq
4540: 75 65 6e 63 65 20 6f 66 20 7a 65 72 6f 20 6f 72  uence of zero or
4550: 20 6d 6f 72 65 20 63 68 61 72 61 63 74 65 72 73   more characters
4560: 0a 2a 2a 0a 2a 2a 2a 20 20 20 20 20 27 5f 27 20  .**.***     '_' 
4570: 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 61 6e        Matches an
4580: 79 20 6f 6e 65 20 63 68 61 72 61 63 74 65 72 0a  y one character.
4590: 2a 2a 0a 2a 2a 20 20 20 20 20 20 45 63 20 20 20  **.**      Ec   
45a0: 20 20 20 20 20 57 68 65 72 65 20 45 20 69 73 20       Where E is 
45b0: 74 68 65 20 22 65 73 63 22 20 63 68 61 72 61 63  the "esc" charac
45c0: 74 65 72 20 61 6e 64 20 63 20 69 73 20 61 6e 79  ter and c is any
45d0: 20 6f 74 68 65 72 0a 2a 2a 20 20 20 20 20 20 20   other.**       
45e0: 20 20 20 20 20 20 20 20 20 63 68 61 72 61 63 74           charact
45f0: 65 72 2c 20 69 6e 63 6c 75 64 69 6e 67 20 27 25  er, including '%
4600: 27 2c 20 27 5f 27 2c 20 61 6e 64 20 65 73 63 2c  ', '_', and esc,
4610: 20 6d 61 74 63 68 20 65 78 61 63 74 6c 79 20 63   match exactly c
4620: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 63 6f 6d 6d  ..**.** The comm
4630: 65 6e 74 73 20 74 68 72 6f 75 67 68 20 74 68 69  ents through thi
4640: 73 20 72 6f 75 74 69 6e 65 20 75 73 75 61 6c 6c  s routine usuall
4650: 79 20 61 73 73 75 6d 65 20 67 6c 6f 62 20 6d 61  y assume glob ma
4660: 74 63 68 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 54 68  tching..**.** Th
4670: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 75 73  is routine is us
4680: 75 61 6c 6c 79 20 71 75 69 63 6b 2c 20 62 75 74  ually quick, but
4690: 20 63 61 6e 20 62 65 20 4e 2a 2a 32 20 69 6e 20   can be N**2 in 
46a0: 74 68 65 20 77 6f 72 73 74 20 63 61 73 65 2e 0a  the worst case..
46b0: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 70 61  */.static int pa
46c0: 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 0a 20 20  tternCompare(.  
46d0: 63 6f 6e 73 74 20 75 38 20 2a 7a 50 61 74 74 65  const u8 *zPatte
46e0: 72 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  rn,             
46f0: 20 2f 2a 20 54 68 65 20 67 6c 6f 62 20 70 61 74   /* The glob pat
4700: 74 65 72 6e 20 2a 2f 0a 20 20 63 6f 6e 73 74 20  tern */.  const 
4710: 75 38 20 2a 7a 53 74 72 69 6e 67 2c 20 20 20 20  u8 *zString,    
4720: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68             /* Th
4730: 65 20 73 74 72 69 6e 67 20 74 6f 20 63 6f 6d 70  e string to comp
4740: 61 72 65 20 61 67 61 69 6e 73 74 20 74 68 65 20  are against the 
4750: 67 6c 6f 62 20 2a 2f 0a 20 20 63 6f 6e 73 74 20  glob */.  const 
4760: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
4770: 66 6f 20 2a 70 49 6e 66 6f 2c 20 2f 2a 20 49 6e  fo *pInfo, /* In
4780: 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20  formation about 
4790: 68 6f 77 20 74 6f 20 64 6f 20 74 68 65 20 63 6f  how to do the co
47a0: 6d 70 61 72 65 20 2a 2f 0a 20 20 75 33 32 20 65  mpare */.  u32 e
47b0: 73 63 20 20 20 20 20 20 20 20 20 20 20 20 20 20  sc              
47c0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54              /* T
47d0: 68 65 20 65 73 63 61 70 65 20 63 68 61 72 61 63  he escape charac
47e0: 74 65 72 20 2a 2f 0a 29 7b 0a 20 20 75 33 32 20  ter */.){.  u32 
47f0: 63 2c 20 63 32 3b 20 20 20 20 20 20 20 20 20 20  c, c2;          
4800: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
4810: 4e 65 78 74 20 70 61 74 74 65 72 6e 20 61 6e 64  Next pattern and
4820: 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 63 68   input string ch
4830: 61 72 73 20 2a 2f 0a 20 20 75 33 32 20 6d 61 74  ars */.  u32 mat
4840: 63 68 4f 6e 65 20 3d 20 70 49 6e 66 6f 2d 3e 6d  chOne = pInfo->m
4850: 61 74 63 68 4f 6e 65 3b 20 20 2f 2a 20 22 3f 22  atchOne;  /* "?"
4860: 20 6f 72 20 22 5f 22 20 2a 2f 0a 20 20 75 33 32   or "_" */.  u32
4870: 20 6d 61 74 63 68 41 6c 6c 20 3d 20 70 49 6e 66   matchAll = pInf
4880: 6f 2d 3e 6d 61 74 63 68 41 6c 6c 3b 20 20 2f 2a  o->matchAll;  /*
4890: 20 22 2a 22 20 6f 72 20 22 25 22 20 2a 2f 0a 20   "*" or "%" */. 
48a0: 20 75 33 32 20 6d 61 74 63 68 4f 74 68 65 72 3b   u32 matchOther;
48b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
48c0: 20 20 2f 2a 20 22 5b 22 20 6f 72 20 74 68 65 20    /* "[" or the 
48d0: 65 73 63 61 70 65 20 63 68 61 72 61 63 74 65 72  escape character
48e0: 20 2a 2f 0a 20 20 75 38 20 6e 6f 43 61 73 65 20   */.  u8 noCase 
48f0: 3d 20 70 49 6e 66 6f 2d 3e 6e 6f 43 61 73 65 3b  = pInfo->noCase;
4900: 20 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69         /* True i
4910: 66 20 75 70 70 65 72 63 61 73 65 3d 3d 6c 6f 77  f uppercase==low
4920: 65 72 63 61 73 65 20 2a 2f 0a 20 20 63 6f 6e 73  ercase */.  cons
4930: 74 20 75 38 20 2a 7a 45 73 63 61 70 65 64 20 3d  t u8 *zEscaped =
4940: 20 30 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20   0;          /* 
4950: 4f 6e 65 20 70 61 73 74 20 74 68 65 20 6c 61 73  One past the las
4960: 74 20 65 73 63 61 70 65 64 20 69 6e 70 75 74 20  t escaped input 
4970: 63 68 61 72 20 2a 2f 0a 20 20 0a 20 20 2f 2a 20  char */.  .  /* 
4980: 54 68 65 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f  The GLOB operato
4990: 72 20 64 6f 65 73 20 6e 6f 74 20 68 61 76 65 20  r does not have 
49a0: 61 6e 20 45 53 43 41 50 45 20 63 6c 61 75 73 65  an ESCAPE clause
49b0: 2e 20 20 41 6e 64 20 4c 49 4b 45 20 64 6f 65 73  .  And LIKE does
49c0: 20 6e 6f 74 0a 20 20 2a 2a 20 68 61 76 65 20 74   not.  ** have t
49d0: 68 65 20 6d 61 74 63 68 53 65 74 20 6f 70 65 72  he matchSet oper
49e0: 61 74 6f 72 2e 20 20 53 6f 20 77 65 20 65 69 74  ator.  So we eit
49f0: 68 65 72 20 68 61 76 65 20 74 6f 20 6c 6f 6f 6b  her have to look
4a00: 20 66 6f 72 20 6f 6e 65 20 6f 72 0a 20 20 2a 2a   for one or.  **
4a10: 20 74 68 65 20 6f 74 68 65 72 2c 20 6e 65 76 65   the other, neve
4a20: 72 20 62 6f 74 68 2e 20 20 48 65 6e 63 65 20 74  r both.  Hence t
4a30: 68 65 20 73 69 6e 67 6c 65 20 76 61 72 69 61 62  he single variab
4a40: 6c 65 20 6d 61 74 63 68 4f 74 68 65 72 20 69 73  le matchOther is
4a50: 20 75 73 65 64 0a 20 20 2a 2a 20 74 6f 20 73 74   used.  ** to st
4a60: 6f 72 65 20 74 68 65 20 6f 6e 65 20 77 65 20 68  ore the one we h
4a70: 61 76 65 20 74 6f 20 6c 6f 6f 6b 20 66 6f 72 2e  ave to look for.
4a80: 0a 20 20 2a 2f 0a 20 20 6d 61 74 63 68 4f 74 68  .  */.  matchOth
4a90: 65 72 20 3d 20 65 73 63 20 3f 20 65 73 63 20 3a  er = esc ? esc :
4aa0: 20 70 49 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74   pInfo->matchSet
4ab0: 3b 0a 0a 20 20 77 68 69 6c 65 28 20 28 63 20 3d  ;..  while( (c =
4ac0: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
4ad0: 28 26 7a 50 61 74 74 65 72 6e 29 29 21 3d 30 20  (&zPattern))!=0 
4ae0: 29 7b 0a 20 20 20 20 69 66 28 20 63 3d 3d 6d 61  ){.    if( c==ma
4af0: 74 63 68 41 6c 6c 20 29 7b 20 20 2f 2a 20 4d 61  tchAll ){  /* Ma
4b00: 74 63 68 20 22 2a 22 20 2a 2f 0a 20 20 20 20 20  tch "*" */.     
4b10: 20 2f 2a 20 53 6b 69 70 20 6f 76 65 72 20 6d 75   /* Skip over mu
4b20: 6c 74 69 70 6c 65 20 22 2a 22 20 63 68 61 72 61  ltiple "*" chara
4b30: 63 74 65 72 73 20 69 6e 20 74 68 65 20 70 61 74  cters in the pat
4b40: 74 65 72 6e 2e 20 20 49 66 20 74 68 65 72 65 0a  tern.  If there.
4b50: 20 20 20 20 20 20 2a 2a 20 61 72 65 20 61 6c 73        ** are als
4b60: 6f 20 22 3f 22 20 63 68 61 72 61 63 74 65 72 73  o "?" characters
4b70: 2c 20 73 6b 69 70 20 74 68 6f 73 65 20 61 73 20  , skip those as 
4b80: 77 65 6c 6c 2c 20 62 75 74 20 63 6f 6e 73 75 6d  well, but consum
4b90: 65 20 61 0a 20 20 20 20 20 20 2a 2a 20 73 69 6e  e a.      ** sin
4ba0: 67 6c 65 20 63 68 61 72 61 63 74 65 72 20 6f 66  gle character of
4bb0: 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e   the input strin
4bc0: 67 20 66 6f 72 20 65 61 63 68 20 22 3f 22 20 73  g for each "?" s
4bd0: 6b 69 70 70 65 64 20 2a 2f 0a 20 20 20 20 20 20  kipped */.      
4be0: 77 68 69 6c 65 28 20 28 63 3d 73 71 6c 69 74 65  while( (c=sqlite
4bf0: 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74  3Utf8Read(&zPatt
4c00: 65 72 6e 29 29 20 3d 3d 20 6d 61 74 63 68 41 6c  ern)) == matchAl
4c10: 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  l.              
4c20: 20 7c 7c 20 63 20 3d 3d 20 6d 61 74 63 68 4f 6e   || c == matchOn
4c30: 65 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28  e ){.        if(
4c40: 20 63 3d 3d 6d 61 74 63 68 4f 6e 65 20 26 26 20   c==matchOne && 
4c50: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
4c60: 26 7a 53 74 72 69 6e 67 29 3d 3d 30 20 29 7b 0a  &zString)==0 ){.
4c70: 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e            return
4c80: 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20   0;.        }.  
4c90: 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20      }.      if( 
4ca0: 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  c==0 ){.        
4cb0: 72 65 74 75 72 6e 20 31 3b 20 20 20 2f 2a 20 22  return 1;   /* "
4cc0: 2a 22 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66  *" at the end of
4cd0: 20 74 68 65 20 70 61 74 74 65 72 6e 20 6d 61 74   the pattern mat
4ce0: 63 68 65 73 20 2a 2f 0a 20 20 20 20 20 20 7d 65  ches */.      }e
4cf0: 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61 74 63 68  lse if( c==match
4d00: 4f 74 68 65 72 20 29 7b 0a 20 20 20 20 20 20 20  Other ){.       
4d10: 20 69 66 28 20 65 73 63 20 29 7b 0a 20 20 20 20   if( esc ){.    
4d20: 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74 65        c = sqlite
4d30: 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74  3Utf8Read(&zPatt
4d40: 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20  ern);.          
4d50: 69 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72  if( c==0 ) retur
4d60: 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c  n 0;.        }el
4d70: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 2f 2a  se{.          /*
4d80: 20 22 5b 2e 2e 2e 5d 22 20 69 6d 6d 65 64 69 61   "[...]" immedia
4d90: 74 65 6c 79 20 66 6f 6c 6c 6f 77 73 20 74 68 65  tely follows the
4da0: 20 22 2a 22 2e 20 20 57 65 20 68 61 76 65 20 74   "*".  We have t
4db0: 6f 20 64 6f 20 61 20 73 6c 6f 77 0a 20 20 20 20  o do a slow.    
4dc0: 20 20 20 20 20 20 2a 2a 20 72 65 63 75 72 73 69        ** recursi
4dd0: 76 65 20 73 65 61 72 63 68 20 69 6e 20 74 68 69  ve search in thi
4de0: 73 20 63 61 73 65 2c 20 62 75 74 20 69 74 20 69  s case, but it i
4df0: 73 20 61 6e 20 75 6e 75 73 75 61 6c 20 63 61 73  s an unusual cas
4e00: 65 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20  e. */.          
4e10: 61 73 73 65 72 74 28 20 6d 61 74 63 68 4f 74 68  assert( matchOth
4e20: 65 72 3c 30 78 38 30 20 29 3b 20 20 2f 2a 20 27  er<0x80 );  /* '
4e30: 5b 27 20 69 73 20 61 20 73 69 6e 67 6c 65 2d 62  [' is a single-b
4e40: 79 74 65 20 63 68 61 72 61 63 74 65 72 20 2a 2f  yte character */
4e50: 0a 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65  .          while
4e60: 28 20 2a 7a 53 74 72 69 6e 67 0a 20 20 20 20 20  ( *zString.     
4e70: 20 20 20 20 20 20 20 20 20 20 20 20 26 26 20 70              && p
4e80: 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 26 7a  atternCompare(&z
4e90: 50 61 74 74 65 72 6e 5b 2d 31 5d 2c 7a 53 74 72  Pattern[-1],zStr
4ea0: 69 6e 67 2c 70 49 6e 66 6f 2c 65 73 63 29 3d 3d  ing,pInfo,esc)==
4eb0: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20  0 ){.           
4ec0: 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46   SQLITE_SKIP_UTF
4ed0: 38 28 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20  8(zString);.    
4ee0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20        }.        
4ef0: 20 20 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e    return *zStrin
4f00: 67 21 3d 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a  g!=0;.        }.
4f10: 20 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20 2f        }..      /
4f20: 2a 20 41 74 20 74 68 69 73 20 70 6f 69 6e 74 20  * At this point 
4f30: 76 61 72 69 61 62 6c 65 20 63 20 63 6f 6e 74 61  variable c conta
4f40: 69 6e 73 20 74 68 65 20 66 69 72 73 74 20 63 68  ins the first ch
4f50: 61 72 61 63 74 65 72 20 6f 66 20 74 68 65 0a 20  aracter of the. 
4f60: 20 20 20 20 20 2a 2a 20 70 61 74 74 65 72 6e 20       ** pattern 
4f70: 73 74 72 69 6e 67 20 70 61 73 74 20 74 68 65 20  string past the 
4f80: 22 2a 22 2e 20 20 53 65 61 72 63 68 20 69 6e 20  "*".  Search in 
4f90: 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67  the input string
4fa0: 20 66 6f 72 20 74 68 65 0a 20 20 20 20 20 20 2a   for the.      *
4fb0: 2a 20 66 69 72 73 74 20 6d 61 74 63 68 69 6e 67  * first matching
4fc0: 20 63 68 61 72 61 63 74 65 72 20 61 6e 64 20 72   character and r
4fd0: 65 63 75 72 73 69 76 65 6c 79 20 63 6f 6e 74 69  ecursively conti
4fe0: 6e 65 20 74 68 65 20 6d 61 74 63 68 20 66 72 6f  ne the match fro
4ff0: 6d 0a 20 20 20 20 20 20 2a 2a 20 74 68 61 74 20  m.      ** that 
5000: 70 6f 69 6e 74 2e 0a 20 20 20 20 20 20 2a 2a 0a  point..      **.
5010: 20 20 20 20 20 20 2a 2a 20 46 6f 72 20 61 20 63        ** For a c
5020: 61 73 65 2d 69 6e 73 65 6e 73 69 74 69 76 65 20  ase-insensitive 
5030: 73 65 61 72 63 68 2c 20 73 65 74 20 76 61 72 69  search, set vari
5040: 61 62 6c 65 20 63 78 20 74 6f 20 62 65 20 74 68  able cx to be th
5050: 65 20 73 61 6d 65 20 61 73 0a 20 20 20 20 20 20  e same as.      
5060: 2a 2a 20 63 20 62 75 74 20 69 6e 20 74 68 65 20  ** c but in the 
5070: 6f 74 68 65 72 20 63 61 73 65 20 61 6e 64 20 73  other case and s
5080: 65 61 72 63 68 20 74 68 65 20 69 6e 70 75 74 20  earch the input 
5090: 73 74 72 69 6e 67 20 66 6f 72 20 65 69 74 68 65  string for eithe
50a0: 72 0a 20 20 20 20 20 20 2a 2a 20 63 20 6f 72 20  r.      ** c or 
50b0: 63 78 2e 0a 20 20 20 20 20 20 2a 2f 0a 20 20 20  cx..      */.   
50c0: 20 20 20 69 66 28 20 63 3c 3d 30 78 38 30 20 29     if( c<=0x80 )
50d0: 7b 0a 20 20 20 20 20 20 20 20 75 33 32 20 63 78  {.        u32 cx
50e0: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 6e 6f  ;.        if( no
50f0: 43 61 73 65 20 29 7b 0a 20 20 20 20 20 20 20 20  Case ){.        
5100: 20 20 63 78 20 3d 20 73 71 6c 69 74 65 33 54 6f    cx = sqlite3To
5110: 75 70 70 65 72 28 63 29 3b 0a 20 20 20 20 20 20  upper(c);.      
5120: 20 20 20 20 63 20 3d 20 73 71 6c 69 74 65 33 54      c = sqlite3T
5130: 6f 6c 6f 77 65 72 28 63 29 3b 0a 20 20 20 20 20  olower(c);.     
5140: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
5150: 20 20 20 20 63 78 20 3d 20 63 3b 0a 20 20 20 20      cx = c;.    
5160: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 77 68      }.        wh
5170: 69 6c 65 28 20 28 63 32 20 3d 20 2a 28 7a 53 74  ile( (c2 = *(zSt
5180: 72 69 6e 67 2b 2b 29 29 21 3d 30 20 29 7b 0a 20  ring++))!=0 ){. 
5190: 20 20 20 20 20 20 20 20 20 69 66 28 20 63 32 21           if( c2!
51a0: 3d 63 20 26 26 20 63 32 21 3d 63 78 20 29 20 63  =c && c2!=cx ) c
51b0: 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 20  ontinue;.       
51c0: 20 20 20 69 66 28 20 70 61 74 74 65 72 6e 43 6f     if( patternCo
51d0: 6d 70 61 72 65 28 7a 50 61 74 74 65 72 6e 2c 7a  mpare(zPattern,z
51e0: 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65 73 63  String,pInfo,esc
51f0: 29 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20  ) ) return 1;.  
5200: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 65        }.      }e
5210: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 77 68 69  lse{.        whi
5220: 6c 65 28 20 28 63 32 20 3d 20 73 71 6c 69 74 65  le( (c2 = sqlite
5230: 33 55 74 66 38 52 65 61 64 28 26 7a 53 74 72 69  3Utf8Read(&zStri
5240: 6e 67 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 20  ng))!=0 ){.     
5250: 20 20 20 20 20 69 66 28 20 63 32 21 3d 63 20 29       if( c2!=c )
5260: 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20   continue;.     
5270: 20 20 20 20 20 69 66 28 20 70 61 74 74 65 72 6e       if( pattern
5280: 43 6f 6d 70 61 72 65 28 7a 50 61 74 74 65 72 6e  Compare(zPattern
5290: 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65  ,zString,pInfo,e
52a0: 73 63 29 20 29 20 72 65 74 75 72 6e 20 31 3b 0a  sc) ) return 1;.
52b0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
52c0: 7d 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 30  }.      return 0
52d0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20  ;.    }.    if( 
52e0: 63 3d 3d 6d 61 74 63 68 4f 74 68 65 72 20 29 7b  c==matchOther ){
52f0: 0a 20 20 20 20 20 20 69 66 28 20 65 73 63 20 29  .      if( esc )
5300: 7b 0a 20 20 20 20 20 20 20 20 63 20 3d 20 73 71  {.        c = sq
5310: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
5320: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
5330: 20 20 69 66 28 20 63 3d 3d 30 20 29 20 72 65 74    if( c==0 ) ret
5340: 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7a  urn 0;.        z
5350: 45 73 63 61 70 65 64 20 3d 20 7a 50 61 74 74 65  Escaped = zPatte
5360: 72 6e 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b  rn;.      }else{
5370: 0a 20 20 20 20 20 20 20 20 75 33 32 20 70 72 69  .        u32 pri
5380: 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20  or_c = 0;.      
5390: 20 20 69 6e 74 20 73 65 65 6e 20 3d 20 30 3b 0a    int seen = 0;.
53a0: 20 20 20 20 20 20 20 20 69 6e 74 20 69 6e 76 65          int inve
53b0: 72 74 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20  rt = 0;.        
53c0: 63 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52  c = sqlite3Utf8R
53d0: 65 61 64 28 26 7a 53 74 72 69 6e 67 29 3b 0a 20  ead(&zString);. 
53e0: 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20         if( c==0 
53f0: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
5400: 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33      c2 = sqlite3
5410: 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65  Utf8Read(&zPatte
5420: 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28  rn);.        if(
5430: 20 63 32 3d 3d 27 5e 27 20 29 7b 0a 20 20 20 20   c2=='^' ){.    
5440: 20 20 20 20 20 20 69 6e 76 65 72 74 20 3d 20 31        invert = 1
5450: 3b 0a 20 20 20 20 20 20 20 20 20 20 63 32 20 3d  ;.          c2 =
5460: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
5470: 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20  (&zPattern);.   
5480: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69       }.        i
5490: 66 28 20 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20  f( c2==']' ){.  
54a0: 20 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d 27          if( c=='
54b0: 5d 27 20 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20  ]' ) seen = 1;. 
54c0: 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71           c2 = sq
54d0: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
54e0: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
54f0: 20 20 7d 0a 20 20 20 20 20 20 20 20 77 68 69 6c    }.        whil
5500: 65 28 20 63 32 20 26 26 20 63 32 21 3d 27 5d 27  e( c2 && c2!=']'
5510: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66   ){.          if
5520: 28 20 63 32 3d 3d 27 2d 27 20 26 26 20 7a 50 61  ( c2=='-' && zPa
5530: 74 74 65 72 6e 5b 30 5d 21 3d 27 5d 27 20 26 26  ttern[0]!=']' &&
5540: 20 7a 50 61 74 74 65 72 6e 5b 30 5d 21 3d 30 20   zPattern[0]!=0 
5550: 26 26 20 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a  && prior_c>0 ){.
5560: 20 20 20 20 20 20 20 20 20 20 20 20 63 32 20 3d              c2 =
5570: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
5580: 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20  (&zPattern);.   
5590: 20 20 20 20 20 20 20 20 20 69 66 28 20 63 3e 3d           if( c>=
55a0: 70 72 69 6f 72 5f 63 20 26 26 20 63 3c 3d 63 32  prior_c && c<=c2
55b0: 20 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20   ) seen = 1;.   
55c0: 20 20 20 20 20 20 20 20 20 70 72 69 6f 72 5f 63           prior_c
55d0: 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 20 20   = 0;.          
55e0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20  }else{.         
55f0: 20 20 20 69 66 28 20 63 3d 3d 63 32 20 29 7b 0a     if( c==c2 ){.
5600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 65                se
5610: 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20  en = 1;.        
5620: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 20 20      }.          
5630: 20 20 70 72 69 6f 72 5f 63 20 3d 20 63 32 3b 0a    prior_c = c2;.
5640: 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20            }.    
5650: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
5660: 65 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74  e3Utf8Read(&zPat
5670: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d  tern);.        }
5680: 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 32 3d  .        if( c2=
5690: 3d 30 20 7c 7c 20 28 73 65 65 6e 20 5e 20 69 6e  =0 || (seen ^ in
56a0: 76 65 72 74 29 3d 3d 30 20 29 7b 0a 20 20 20 20  vert)==0 ){.    
56b0: 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a        return 0;.
56c0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
56d0: 20 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20    continue;.    
56e0: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 63 32    }.    }.    c2
56f0: 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65   = sqlite3Utf8Re
5700: 61 64 28 26 7a 53 74 72 69 6e 67 29 3b 0a 20 20  ad(&zString);.  
5710: 20 20 69 66 28 20 63 3d 3d 63 32 20 29 20 63 6f    if( c==c2 ) co
5720: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 69 66 28 20  ntinue;.    if( 
5730: 6e 6f 43 61 73 65 20 26 26 20 63 3c 30 78 38 30  noCase && c<0x80
5740: 20 26 26 20 63 32 3c 30 78 38 30 20 26 26 20 73   && c2<0x80 && s
5750: 71 6c 69 74 65 33 54 6f 6c 6f 77 65 72 28 63 29  qlite3Tolower(c)
5760: 3d 3d 73 71 6c 69 74 65 33 54 6f 6c 6f 77 65 72  ==sqlite3Tolower
5770: 28 63 32 29 20 29 7b 0a 20 20 20 20 20 20 63 6f  (c2) ){.      co
5780: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 7d 0a 20 20  ntinue;.    }.  
5790: 20 20 69 66 28 20 63 3d 3d 6d 61 74 63 68 4f 6e    if( c==matchOn
57a0: 65 20 26 26 20 7a 50 61 74 74 65 72 6e 21 3d 7a  e && zPattern!=z
57b0: 45 73 63 61 70 65 64 20 26 26 20 63 32 21 3d 30  Escaped && c2!=0
57c0: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20   ) continue;.   
57d0: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20   return 0;.  }. 
57e0: 20 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67   return *zString
57f0: 3d 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  ==0;.}../*.** Th
5800: 65 20 73 71 6c 69 74 65 33 5f 73 74 72 67 6c 6f  e sqlite3_strglo
5810: 62 28 29 20 69 6e 74 65 72 66 61 63 65 2e 0a 2a  b() interface..*
5820: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 73 74  /.int sqlite3_st
5830: 72 67 6c 6f 62 28 63 6f 6e 73 74 20 63 68 61 72  rglob(const char
5840: 20 2a 7a 47 6c 6f 62 50 61 74 74 65 72 6e 2c 20   *zGlobPattern, 
5850: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 74 72  const char *zStr
5860: 69 6e 67 29 7b 0a 20 20 72 65 74 75 72 6e 20 70  ing){.  return p
5870: 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 28 75  atternCompare((u
5880: 38 2a 29 7a 47 6c 6f 62 50 61 74 74 65 72 6e 2c  8*)zGlobPattern,
5890: 20 28 75 38 2a 29 7a 53 74 72 69 6e 67 2c 20 26   (u8*)zString, &
58a0: 67 6c 6f 62 49 6e 66 6f 2c 20 30 29 3d 3d 30 3b  globInfo, 0)==0;
58b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e 74 20  .}../*.** Count 
58c0: 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 74 69  the number of ti
58d0: 6d 65 73 20 74 68 61 74 20 74 68 65 20 4c 49 4b  mes that the LIK
58e0: 45 20 6f 70 65 72 61 74 6f 72 20 28 6f 72 20 47  E operator (or G
58f0: 4c 4f 42 20 77 68 69 63 68 20 69 73 0a 2a 2a 20  LOB which is.** 
5900: 6a 75 73 74 20 61 20 76 61 72 69 61 74 69 6f 6e  just a variation
5910: 20 6f 66 20 4c 49 4b 45 29 20 67 65 74 73 20 63   of LIKE) gets c
5920: 61 6c 6c 65 64 2e 20 20 54 68 69 73 20 69 73 20  alled.  This is 
5930: 75 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e 67  used for testing
5940: 0a 2a 2a 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23 69 66  .** only..*/.#if
5950: 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a  def SQLITE_TEST.
5960: 69 6e 74 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65  int sqlite3_like
5970: 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a 23 65 6e 64  _count = 0;.#end
5980: 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  if.../*.** Imple
5990: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
59a0: 20 6c 69 6b 65 28 29 20 53 51 4c 20 66 75 6e 63   like() SQL func
59b0: 74 69 6f 6e 2e 20 20 54 68 69 73 20 66 75 6e 63  tion.  This func
59c0: 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74 73 0a  tion implements.
59d0: 2a 2a 20 74 68 65 20 62 75 69 6c 64 2d 69 6e 20  ** the build-in 
59e0: 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 2e 20 20  LIKE operator.  
59f0: 54 68 65 20 66 69 72 73 74 20 61 72 67 75 6d 65  The first argume
5a00: 6e 74 20 74 6f 20 74 68 65 20 66 75 6e 63 74 69  nt to the functi
5a10: 6f 6e 20 69 73 20 74 68 65 0a 2a 2a 20 70 61 74  on is the.** pat
5a20: 74 65 72 6e 20 61 6e 64 20 74 68 65 20 73 65 63  tern and the sec
5a30: 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 69 73 20  ond argument is 
5a40: 74 68 65 20 73 74 72 69 6e 67 2e 20 20 53 6f 2c  the string.  So,
5a50: 20 74 68 65 20 53 51 4c 20 73 74 61 74 65 6d 65   the SQL stateme
5a60: 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  nts:.**.**      
5a70: 20 41 20 4c 49 4b 45 20 42 0a 2a 2a 0a 2a 2a 20   A LIKE B.**.** 
5a80: 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 61  is implemented a
5a90: 73 20 6c 69 6b 65 28 42 2c 41 29 2e 0a 2a 2a 0a  s like(B,A)..**.
5aa0: 2a 2a 20 54 68 69 73 20 73 61 6d 65 20 66 75 6e  ** This same fun
5ab0: 63 74 69 6f 6e 20 28 77 69 74 68 20 61 20 64 69  ction (with a di
5ac0: 66 66 65 72 65 6e 74 20 63 6f 6d 70 61 72 65 49  fferent compareI
5ad0: 6e 66 6f 20 73 74 72 75 63 74 75 72 65 29 20 63  nfo structure) c
5ae0: 6f 6d 70 75 74 65 73 0a 2a 2a 20 74 68 65 20 47  omputes.** the G
5af0: 4c 4f 42 20 6f 70 65 72 61 74 6f 72 2e 0a 2a 2f  LOB operator..*/
5b00: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 69 6b  .static void lik
5b10: 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  eFunc(.  sqlite3
5b20: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
5b30: 74 2c 20 0a 20 20 69 6e 74 20 61 72 67 63 2c 20  t, .  int argc, 
5b40: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
5b50: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e   **argv.){.  con
5b60: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
5b70: 20 2a 7a 41 2c 20 2a 7a 42 3b 0a 20 20 75 33 32   *zA, *zB;.  u32
5b80: 20 65 73 63 61 70 65 20 3d 20 30 3b 0a 20 20 69   escape = 0;.  i
5b90: 6e 74 20 6e 50 61 74 3b 0a 20 20 73 71 6c 69 74  nt nPat;.  sqlit
5ba0: 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33  e3 *db = sqlite3
5bb0: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
5bc0: 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 0a 20 20  le(context);..  
5bd0: 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  zB = sqlite3_val
5be0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
5bf0: 3b 0a 20 20 7a 41 20 3d 20 73 71 6c 69 74 65 33  ;.  zA = sqlite3
5c00: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
5c10: 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c 69 6d 69  [1]);..  /* Limi
5c20: 74 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20  t the length of 
5c30: 74 68 65 20 4c 49 4b 45 20 6f 72 20 47 4c 4f 42  the LIKE or GLOB
5c40: 20 70 61 74 74 65 72 6e 20 74 6f 20 61 76 6f 69   pattern to avoi
5c50: 64 20 70 72 6f 62 6c 65 6d 73 0a 20 20 2a 2a 20  d problems.  ** 
5c60: 6f 66 20 64 65 65 70 20 72 65 63 75 72 73 69 6f  of deep recursio
5c70: 6e 20 61 6e 64 20 4e 2a 4e 20 62 65 68 61 76 69  n and N*N behavi
5c80: 6f 72 20 69 6e 20 70 61 74 74 65 72 6e 43 6f 6d  or in patternCom
5c90: 70 61 72 65 28 29 2e 0a 20 20 2a 2f 0a 20 20 6e  pare()..  */.  n
5ca0: 50 61 74 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  Pat = sqlite3_va
5cb0: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
5cc0: 5d 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20  ]);.  testcase( 
5cd0: 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74  nPat==db->aLimit
5ce0: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49  [SQLITE_LIMIT_LI
5cf0: 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54  KE_PATTERN_LENGT
5d00: 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65  H] );.  testcase
5d10: 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d  ( nPat==db->aLim
5d20: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
5d30: 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e  LIKE_PATTERN_LEN
5d40: 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20  GTH]+1 );.  if( 
5d50: 6e 50 61 74 20 3e 20 64 62 2d 3e 61 4c 69 6d 69  nPat > db->aLimi
5d60: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
5d70: 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47  IKE_PATTERN_LENG
5d80: 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  TH] ){.    sqlit
5d90: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28  e3_result_error(
5da0: 63 6f 6e 74 65 78 74 2c 20 22 4c 49 4b 45 20 6f  context, "LIKE o
5db0: 72 20 47 4c 4f 42 20 70 61 74 74 65 72 6e 20 74  r GLOB pattern t
5dc0: 6f 6f 20 63 6f 6d 70 6c 65 78 22 2c 20 2d 31 29  oo complex", -1)
5dd0: 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20  ;.    return;.  
5de0: 7d 0a 20 20 61 73 73 65 72 74 28 20 7a 42 3d 3d  }.  assert( zB==
5df0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
5e00: 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 20  xt(argv[0]) );  
5e10: 2f 2a 20 45 6e 63 6f 64 69 6e 67 20 64 69 64 20  /* Encoding did 
5e20: 6e 6f 74 20 63 68 61 6e 67 65 20 2a 2f 0a 0a 20  not change */.. 
5e30: 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a   if( argc==3 ){.
5e40: 20 20 20 20 2f 2a 20 54 68 65 20 65 73 63 61 70      /* The escap
5e50: 65 20 63 68 61 72 61 63 74 65 72 20 73 74 72 69  e character stri
5e60: 6e 67 20 6d 75 73 74 20 63 6f 6e 73 69 73 74 20  ng must consist 
5e70: 6f 66 20 61 20 73 69 6e 67 6c 65 20 55 54 46 2d  of a single UTF-
5e80: 38 20 63 68 61 72 61 63 74 65 72 2e 0a 20 20 20  8 character..   
5e90: 20 2a 2a 20 4f 74 68 65 72 77 69 73 65 2c 20 72   ** Otherwise, r
5ea0: 65 74 75 72 6e 20 61 6e 20 65 72 72 6f 72 2e 0a  eturn an error..
5eb0: 20 20 20 20 2a 2f 0a 20 20 20 20 63 6f 6e 73 74      */.    const
5ec0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
5ed0: 7a 45 73 63 20 3d 20 73 71 6c 69 74 65 33 5f 76  zEsc = sqlite3_v
5ee0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 32  alue_text(argv[2
5ef0: 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 45 73 63  ]);.    if( zEsc
5f00: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
5f10: 20 20 69 66 28 20 73 71 6c 69 74 65 33 55 74 66    if( sqlite3Utf
5f20: 38 43 68 61 72 4c 65 6e 28 28 63 68 61 72 2a 29  8CharLen((char*)
5f30: 7a 45 73 63 2c 20 2d 31 29 21 3d 31 20 29 7b 0a  zEsc, -1)!=1 ){.
5f40: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
5f50: 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65  sult_error(conte
5f60: 78 74 2c 20 0a 20 20 20 20 20 20 20 20 20 20 22  xt, .          "
5f70: 45 53 43 41 50 45 20 65 78 70 72 65 73 73 69 6f  ESCAPE expressio
5f80: 6e 20 6d 75 73 74 20 62 65 20 61 20 73 69 6e 67  n must be a sing
5f90: 6c 65 20 63 68 61 72 61 63 74 65 72 22 2c 20 2d  le character", -
5fa0: 31 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e  1);.      return
5fb0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65 73 63 61  ;.    }.    esca
5fc0: 70 65 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  pe = sqlite3Utf8
5fd0: 52 65 61 64 28 26 7a 45 73 63 29 3b 0a 20 20 7d  Read(&zEsc);.  }
5fe0: 0a 20 20 69 66 28 20 7a 41 20 26 26 20 7a 42 20  .  if( zA && zB 
5ff0: 29 7b 0a 20 20 20 20 73 74 72 75 63 74 20 63 6f  ){.    struct co
6000: 6d 70 61 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f  mpareInfo *pInfo
6010: 20 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f   = sqlite3_user_
6020: 64 61 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a 23  data(context);.#
6030: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53  ifdef SQLITE_TES
6040: 54 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6c 69  T.    sqlite3_li
6050: 6b 65 5f 63 6f 75 6e 74 2b 2b 3b 0a 23 65 6e 64  ke_count++;.#end
6060: 69 66 0a 20 20 20 20 0a 20 20 20 20 73 71 6c 69  if.    .    sqli
6070: 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63  te3_result_int(c
6080: 6f 6e 74 65 78 74 2c 20 70 61 74 74 65 72 6e 43  ontext, patternC
6090: 6f 6d 70 61 72 65 28 7a 42 2c 20 7a 41 2c 20 70  ompare(zB, zA, p
60a0: 49 6e 66 6f 2c 20 65 73 63 61 70 65 29 29 3b 0a  Info, escape));.
60b0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70    }.}../*.** Imp
60c0: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
60d0: 68 65 20 4e 55 4c 4c 49 46 28 78 2c 79 29 20 66  he NULLIF(x,y) f
60e0: 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65  unction.  The re
60f0: 73 75 6c 74 20 69 73 20 74 68 65 20 66 69 72 73  sult is the firs
6100: 74 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 20 69 66  t.** argument if
6110: 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 20 61   the arguments a
6120: 72 65 20 64 69 66 66 65 72 65 6e 74 2e 20 20 54  re different.  T
6130: 68 65 20 72 65 73 75 6c 74 20 69 73 20 4e 55 4c  he result is NUL
6140: 4c 20 69 66 20 74 68 65 0a 2a 2a 20 61 72 67 75  L if the.** argu
6150: 6d 65 6e 74 73 20 61 72 65 20 65 71 75 61 6c 20  ments are equal 
6160: 74 6f 20 65 61 63 68 20 6f 74 68 65 72 2e 0a 2a  to each other..*
6170: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6e 75  /.static void nu
6180: 6c 6c 69 66 46 75 6e 63 28 0a 20 20 73 71 6c 69  llifFunc(.  sqli
6190: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
61a0: 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55  text,.  int NotU
61b0: 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  sed,.  sqlite3_v
61c0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
61d0: 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20   CollSeq *pColl 
61e0: 3d 20 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63  = sqlite3GetFunc
61f0: 43 6f 6c 6c 53 65 71 28 63 6f 6e 74 65 78 74 29  CollSeq(context)
6200: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
6210: 45 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a 20  ETER(NotUsed);. 
6220: 20 69 66 28 20 73 71 6c 69 74 65 33 4d 65 6d 43   if( sqlite3MemC
6230: 6f 6d 70 61 72 65 28 61 72 67 76 5b 30 5d 2c 20  ompare(argv[0], 
6240: 61 72 67 76 5b 31 5d 2c 20 70 43 6f 6c 6c 29 21  argv[1], pColl)!
6250: 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  =0 ){.    sqlite
6260: 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63  3_result_value(c
6270: 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 30 5d 29  ontext, argv[0])
6280: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  ;.  }.}../*.** I
6290: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
62a0: 20 74 68 65 20 73 71 6c 69 74 65 5f 76 65 72 73   the sqlite_vers
62b0: 69 6f 6e 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20  ion() function. 
62c0: 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 74   The result is t
62d0: 68 65 20 76 65 72 73 69 6f 6e 0a 2a 2a 20 6f 66  he version.** of
62e0: 20 74 68 65 20 53 51 4c 69 74 65 20 6c 69 62 72   the SQLite libr
62f0: 61 72 79 20 74 68 61 74 20 69 73 20 72 75 6e 6e  ary that is runn
6300: 69 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ing..*/.static v
6310: 6f 69 64 20 76 65 72 73 69 6f 6e 46 75 6e 63 28  oid versionFunc(
6320: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
6330: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
6340: 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71  nt NotUsed,.  sq
6350: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f  lite3_value **No
6360: 74 55 73 65 64 32 0a 29 7b 0a 20 20 55 4e 55 53  tUsed2.){.  UNUS
6370: 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f  ED_PARAMETER2(No
6380: 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29  tUsed, NotUsed2)
6390: 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 34 38  ;.  /* IMP: R-48
63a0: 36 39 39 2d 34 38 36 31 37 20 54 68 69 73 20 66  699-48617 This f
63b0: 75 6e 63 74 69 6f 6e 20 69 73 20 61 6e 20 53 51  unction is an SQ
63c0: 4c 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64  L wrapper around
63d0: 20 74 68 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65   the.  ** sqlite
63e0: 33 5f 6c 69 62 76 65 72 73 69 6f 6e 28 29 20 43  3_libversion() C
63f0: 2d 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20  -interface. */. 
6400: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
6410: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  text(context, sq
6420: 6c 69 74 65 33 5f 6c 69 62 76 65 72 73 69 6f 6e  lite3_libversion
6430: 28 29 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53  (), -1, SQLITE_S
6440: 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  TATIC);.}../*.**
6450: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
6460: 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f 73 6f  of the sqlite_so
6470: 75 72 63 65 5f 69 64 28 29 20 66 75 6e 63 74 69  urce_id() functi
6480: 6f 6e 2e 20 54 68 65 20 72 65 73 75 6c 74 20 69  on. The result i
6490: 73 20 61 20 73 74 72 69 6e 67 0a 2a 2a 20 74 68  s a string.** th
64a0: 61 74 20 69 64 65 6e 74 69 66 69 65 73 20 74 68  at identifies th
64b0: 65 20 70 61 72 74 69 63 75 6c 61 72 20 76 65 72  e particular ver
64c0: 73 69 6f 6e 20 6f 66 20 74 68 65 20 73 6f 75 72  sion of the sour
64d0: 63 65 20 63 6f 64 65 20 75 73 65 64 20 74 6f 20  ce code used to 
64e0: 62 75 69 6c 64 0a 2a 2a 20 53 51 4c 69 74 65 2e  build.** SQLite.
64f0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
6500: 73 6f 75 72 63 65 69 64 46 75 6e 63 28 0a 20 20  sourceidFunc(.  
6510: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
6520: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
6530: 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74  NotUsed,.  sqlit
6540: 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73  e3_value **NotUs
6550: 65 64 32 0a 29 7b 0a 20 20 55 4e 55 53 45 44 5f  ed2.){.  UNUSED_
6560: 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73  PARAMETER2(NotUs
6570: 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20  ed, NotUsed2);. 
6580: 20 2f 2a 20 49 4d 50 3a 20 52 2d 32 34 34 37 30   /* IMP: R-24470
6590: 2d 33 31 31 33 36 20 54 68 69 73 20 66 75 6e 63  -31136 This func
65a0: 74 69 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20 77  tion is an SQL w
65b0: 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68  rapper around th
65c0: 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 73  e.  ** sqlite3_s
65d0: 6f 75 72 63 65 69 64 28 29 20 43 20 69 6e 74 65  ourceid() C inte
65e0: 72 66 61 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69  rface. */.  sqli
65f0: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
6600: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
6610: 5f 73 6f 75 72 63 65 69 64 28 29 2c 20 2d 31 2c  _sourceid(), -1,
6620: 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b   SQLITE_STATIC);
6630: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
6640: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
6650: 73 71 6c 69 74 65 5f 6c 6f 67 28 29 20 66 75 6e  sqlite_log() fun
6660: 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 69 73 20  ction.  This is 
6670: 61 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64  a wrapper around
6680: 0a 2a 2a 20 73 71 6c 69 74 65 33 5f 6c 6f 67 28  .** sqlite3_log(
6690: 29 2e 20 20 54 68 65 20 72 65 74 75 72 6e 20 76  ).  The return v
66a0: 61 6c 75 65 20 69 73 20 4e 55 4c 4c 2e 20 20 54  alue is NULL.  T
66b0: 68 65 20 66 75 6e 63 74 69 6f 6e 20 65 78 69 73  he function exis
66c0: 74 73 20 70 75 72 65 6c 79 20 66 6f 72 0a 2a 2a  ts purely for.**
66d0: 20 69 74 73 20 73 69 64 65 2d 65 66 66 65 63 74   its side-effect
66e0: 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  s..*/.static voi
66f0: 64 20 65 72 72 6c 6f 67 46 75 6e 63 28 0a 20 20  d errlogFunc(.  
6700: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
6710: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
6720: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
6730: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
6740: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
6750: 45 52 28 61 72 67 63 29 3b 0a 20 20 55 4e 55 53  ER(argc);.  UNUS
6760: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 63 6f 6e  ED_PARAMETER(con
6770: 74 65 78 74 29 3b 0a 20 20 73 71 6c 69 74 65 33  text);.  sqlite3
6780: 5f 6c 6f 67 28 73 71 6c 69 74 65 33 5f 76 61 6c  _log(sqlite3_val
6790: 75 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 2c  ue_int(argv[0]),
67a0: 20 22 25 73 22 2c 20 73 71 6c 69 74 65 33 5f 76   "%s", sqlite3_v
67b0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31  alue_text(argv[1
67c0: 5d 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  ]));.}../*.** Im
67d0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
67e0: 74 68 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69  the sqlite_compi
67f0: 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64 28 29 20  leoption_used() 
6800: 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 20 54 68 65  function..** The
6810: 20 72 65 73 75 6c 74 20 69 73 20 61 6e 20 69 6e   result is an in
6820: 74 65 67 65 72 20 74 68 61 74 20 69 64 65 6e 74  teger that ident
6830: 69 66 69 65 73 20 69 66 20 74 68 65 20 63 6f 6d  ifies if the com
6840: 70 69 6c 65 72 20 6f 70 74 69 6f 6e 0a 2a 2a 20  piler option.** 
6850: 77 61 73 20 75 73 65 64 20 74 6f 20 62 75 69 6c  was used to buil
6860: 64 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a 23 69 66  d SQLite..*/.#if
6870: 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54  ndef SQLITE_OMIT
6880: 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44  _COMPILEOPTION_D
6890: 49 41 47 53 0a 73 74 61 74 69 63 20 76 6f 69 64  IAGS.static void
68a0: 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73   compileoptionus
68b0: 65 64 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  edFunc(.  sqlite
68c0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
68d0: 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a  xt,.  int argc,.
68e0: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
68f0: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73  **argv.){.  cons
6900: 74 20 63 68 61 72 20 2a 7a 4f 70 74 4e 61 6d 65  t char *zOptName
6910: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
6920: 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f  ==1 );.  UNUSED_
6930: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
6940: 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 33 39 35  .  /* IMP: R-395
6950: 36 34 2d 33 36 33 30 35 20 54 68 65 20 73 71 6c  64-36305 The sql
6960: 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f  ite_compileoptio
6970: 6e 5f 75 73 65 64 28 29 20 53 51 4c 0a 20 20 2a  n_used() SQL.  *
6980: 2a 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20  * function is a 
6990: 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74  wrapper around t
69a0: 68 65 20 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69  he sqlite3_compi
69b0: 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64 28 29 20  leoption_used() 
69c0: 43 2f 43 2b 2b 0a 20 20 2a 2a 20 66 75 6e 63 74  C/C++.  ** funct
69d0: 69 6f 6e 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20  ion..  */.  if( 
69e0: 28 7a 4f 70 74 4e 61 6d 65 20 3d 20 28 63 6f 6e  (zOptName = (con
69f0: 73 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33  st char*)sqlite3
6a00: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
6a10: 5b 30 5d 29 29 21 3d 30 20 29 7b 0a 20 20 20 20  [0]))!=0 ){.    
6a20: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
6a30: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  nt(context, sqli
6a40: 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f  te3_compileoptio
6a50: 6e 5f 75 73 65 64 28 7a 4f 70 74 4e 61 6d 65 29  n_used(zOptName)
6a60: 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 20  );.  }.}.#endif 
6a70: 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43  /* SQLITE_OMIT_C
6a80: 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41  OMPILEOPTION_DIA
6a90: 47 53 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  GS */../*.** Imp
6aa0: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
6ab0: 68 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c  he sqlite_compil
6ac0: 65 6f 70 74 69 6f 6e 5f 67 65 74 28 29 20 66 75  eoption_get() fu
6ad0: 6e 63 74 69 6f 6e 2e 20 0a 2a 2a 20 54 68 65 20  nction. .** The 
6ae0: 72 65 73 75 6c 74 20 69 73 20 61 20 73 74 72 69  result is a stri
6af0: 6e 67 20 74 68 61 74 20 69 64 65 6e 74 69 66 69  ng that identifi
6b00: 65 73 20 74 68 65 20 63 6f 6d 70 69 6c 65 72 20  es the compiler 
6b10: 6f 70 74 69 6f 6e 73 20 0a 2a 2a 20 75 73 65 64  options .** used
6b20: 20 74 6f 20 62 75 69 6c 64 20 53 51 4c 69 74 65   to build SQLite
6b30: 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c  ..*/.#ifndef SQL
6b40: 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45  ITE_OMIT_COMPILE
6b50: 4f 50 54 49 4f 4e 5f 44 49 41 47 53 0a 73 74 61  OPTION_DIAGS.sta
6b60: 74 69 63 20 76 6f 69 64 20 63 6f 6d 70 69 6c 65  tic void compile
6b70: 6f 70 74 69 6f 6e 67 65 74 46 75 6e 63 28 0a 20  optiongetFunc(. 
6b80: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
6b90: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
6ba0: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
6bb0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
6bc0: 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 61 73 73 65  .  int n;.  asse
6bd0: 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20  rt( argc==1 );. 
6be0: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
6bf0: 52 28 61 72 67 63 29 3b 0a 20 20 2f 2a 20 49 4d  R(argc);.  /* IM
6c00: 50 3a 20 52 2d 30 34 39 32 32 2d 32 34 30 37 36  P: R-04922-24076
6c10: 20 54 68 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70   The sqlite_comp
6c20: 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28 29 20  ileoption_get() 
6c30: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 0a 20 20 2a  SQL function.  *
6c40: 2a 20 69 73 20 61 20 77 72 61 70 70 65 72 20 61  * is a wrapper a
6c50: 72 6f 75 6e 64 20 74 68 65 20 73 71 6c 69 74 65  round the sqlite
6c60: 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f  3_compileoption_
6c70: 67 65 74 28 29 20 43 2f 43 2b 2b 20 66 75 6e 63  get() C/C++ func
6c80: 74 69 6f 6e 2e 0a 20 20 2a 2f 0a 20 20 6e 20 3d  tion..  */.  n =
6c90: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
6ca0: 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 73  nt(argv[0]);.  s
6cb0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
6cc0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  xt(context, sqli
6cd0: 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f  te3_compileoptio
6ce0: 6e 5f 67 65 74 28 6e 29 2c 20 2d 31 2c 20 53 51  n_get(n), -1, SQ
6cf0: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a  LITE_STATIC);.}.
6d00: 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45  #endif /* SQLITE
6d10: 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54  _OMIT_COMPILEOPT
6d20: 49 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a  ION_DIAGS */../*
6d30: 20 41 72 72 61 79 20 66 6f 72 20 63 6f 6e 76 65   Array for conve
6d40: 72 74 69 6e 67 20 66 72 6f 6d 20 68 61 6c 66 2d  rting from half-
6d50: 62 79 74 65 73 20 28 6e 79 62 62 6c 65 73 29 20  bytes (nybbles) 
6d60: 69 6e 74 6f 20 41 53 43 49 49 20 68 65 78 0a 2a  into ASCII hex.*
6d70: 2a 20 64 69 67 69 74 73 2e 20 2a 2f 0a 73 74 61  * digits. */.sta
6d80: 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 68  tic const char h
6d90: 65 78 64 69 67 69 74 73 5b 5d 20 3d 20 7b 0a 20  exdigits[] = {. 
6da0: 20 27 30 27 2c 20 27 31 27 2c 20 27 32 27 2c 20   '0', '1', '2', 
6db0: 27 33 27 2c 20 27 34 27 2c 20 27 35 27 2c 20 27  '3', '4', '5', '
6dc0: 36 27 2c 20 27 37 27 2c 0a 20 20 27 38 27 2c 20  6', '7',.  '8', 
6dd0: 27 39 27 2c 20 27 41 27 2c 20 27 42 27 2c 20 27  '9', 'A', 'B', '
6de0: 43 27 2c 20 27 44 27 2c 20 27 45 27 2c 20 27 46  C', 'D', 'E', 'F
6df0: 27 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  ' .};../*.** Imp
6e00: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
6e10: 68 65 20 51 55 4f 54 45 28 29 20 66 75 6e 63 74  he QUOTE() funct
6e20: 69 6f 6e 2e 20 20 54 68 69 73 20 66 75 6e 63 74  ion.  This funct
6e30: 69 6f 6e 20 74 61 6b 65 73 20 61 20 73 69 6e 67  ion takes a sing
6e40: 6c 65 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 20  le.** argument. 
6e50: 20 49 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74   If the argument
6e60: 20 69 73 20 6e 75 6d 65 72 69 63 2c 20 74 68 65   is numeric, the
6e70: 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73   return value is
6e80: 20 74 68 65 20 73 61 6d 65 20 61 73 0a 2a 2a 20   the same as.** 
6e90: 74 68 65 20 61 72 67 75 6d 65 6e 74 2e 20 20 49  the argument.  I
6ea0: 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69  f the argument i
6eb0: 73 20 4e 55 4c 4c 2c 20 74 68 65 20 72 65 74 75  s NULL, the retu
6ec0: 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65 20  rn value is the 
6ed0: 73 74 72 69 6e 67 0a 2a 2a 20 22 4e 55 4c 4c 22  string.** "NULL"
6ee0: 2e 20 20 4f 74 68 65 72 77 69 73 65 2c 20 74 68  .  Otherwise, th
6ef0: 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 65 6e  e argument is en
6f00: 63 6c 6f 73 65 64 20 69 6e 20 73 69 6e 67 6c 65  closed in single
6f10: 20 71 75 6f 74 65 73 20 77 69 74 68 0a 2a 2a 20   quotes with.** 
6f20: 73 69 6e 67 6c 65 2d 71 75 6f 74 65 20 65 73 63  single-quote esc
6f30: 61 70 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  apes..*/.static 
6f40: 76 6f 69 64 20 71 75 6f 74 65 46 75 6e 63 28 73  void quoteFunc(s
6f50: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
6f60: 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67  context, int arg
6f70: 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  c, sqlite3_value
6f80: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 61 73 73 65   **argv){.  asse
6f90: 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20  rt( argc==1 );. 
6fa0: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
6fb0: 52 28 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63  R(argc);.  switc
6fc0: 68 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  h( sqlite3_value
6fd0: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29  _type(argv[0]) )
6fe0: 7b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  {.    case SQLIT
6ff0: 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20  E_FLOAT: {.     
7000: 20 64 6f 75 62 6c 65 20 72 31 2c 20 72 32 3b 0a   double r1, r2;.
7010: 20 20 20 20 20 20 63 68 61 72 20 7a 42 75 66 5b        char zBuf[
7020: 35 30 5d 3b 0a 20 20 20 20 20 20 72 31 20 3d 20  50];.      r1 = 
7030: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f  sqlite3_value_do
7040: 75 62 6c 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20  uble(argv[0]);. 
7050: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 73 6e 70       sqlite3_snp
7060: 72 69 6e 74 66 28 73 69 7a 65 6f 66 28 7a 42 75  rintf(sizeof(zBu
7070: 66 29 2c 20 7a 42 75 66 2c 20 22 25 21 2e 31 35  f), zBuf, "%!.15
7080: 67 22 2c 20 72 31 29 3b 0a 20 20 20 20 20 20 73  g", r1);.      s
7090: 71 6c 69 74 65 33 41 74 6f 46 28 7a 42 75 66 2c  qlite3AtoF(zBuf,
70a0: 20 26 72 32 2c 20 32 30 2c 20 53 51 4c 49 54 45   &r2, 20, SQLITE
70b0: 5f 55 54 46 38 29 3b 0a 20 20 20 20 20 20 69 66  _UTF8);.      if
70c0: 28 20 72 31 21 3d 72 32 20 29 7b 0a 20 20 20 20  ( r1!=r2 ){.    
70d0: 20 20 20 20 73 71 6c 69 74 65 33 5f 73 6e 70 72      sqlite3_snpr
70e0: 69 6e 74 66 28 73 69 7a 65 6f 66 28 7a 42 75 66  intf(sizeof(zBuf
70f0: 29 2c 20 7a 42 75 66 2c 20 22 25 21 2e 32 30 65  ), zBuf, "%!.20e
7100: 22 2c 20 72 31 29 3b 0a 20 20 20 20 20 20 7d 0a  ", r1);.      }.
7110: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
7120: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
7130: 74 2c 20 7a 42 75 66 2c 20 2d 31 2c 20 53 51 4c  t, zBuf, -1, SQL
7140: 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a  ITE_TRANSIENT);.
7150: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
7160: 20 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49   }.    case SQLI
7170: 54 45 5f 49 4e 54 45 47 45 52 3a 20 7b 0a 20 20  TE_INTEGER: {.  
7180: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
7190: 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74  lt_value(context
71a0: 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  , argv[0]);.    
71b0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
71c0: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42     case SQLITE_B
71d0: 4c 4f 42 3a 20 7b 0a 20 20 20 20 20 20 63 68 61  LOB: {.      cha
71e0: 72 20 2a 7a 54 65 78 74 20 3d 20 30 3b 0a 20 20  r *zText = 0;.  
71f0: 20 20 20 20 63 68 61 72 20 63 6f 6e 73 74 20 2a      char const *
7200: 7a 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f  zBlob = sqlite3_
7210: 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b  value_blob(argv[
7220: 30 5d 29 3b 0a 20 20 20 20 20 20 69 6e 74 20 6e  0]);.      int n
7230: 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76  Blob = sqlite3_v
7240: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
7250: 30 5d 29 3b 0a 20 20 20 20 20 20 61 73 73 65 72  0]);.      asser
7260: 74 28 20 7a 42 6c 6f 62 3d 3d 73 71 6c 69 74 65  t( zBlob==sqlite
7270: 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67  3_value_blob(arg
7280: 76 5b 30 5d 29 20 29 3b 20 2f 2a 20 4e 6f 20 65  v[0]) ); /* No e
7290: 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a  ncoding change *
72a0: 2f 0a 20 20 20 20 20 20 7a 54 65 78 74 20 3d 20  /.      zText = 
72b0: 28 63 68 61 72 20 2a 29 63 6f 6e 74 65 78 74 4d  (char *)contextM
72c0: 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28  alloc(context, (
72d0: 32 2a 28 69 36 34 29 6e 42 6c 6f 62 29 2b 34 29  2*(i64)nBlob)+4)
72e0: 3b 20 0a 20 20 20 20 20 20 69 66 28 20 7a 54 65  ; .      if( zTe
72f0: 78 74 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e  xt ){.        in
7300: 74 20 69 3b 0a 20 20 20 20 20 20 20 20 66 6f 72  t i;.        for
7310: 28 69 3d 30 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69  (i=0; i<nBlob; i
7320: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 7a  ++){.          z
7330: 54 65 78 74 5b 28 69 2a 32 29 2b 32 5d 20 3d 20  Text[(i*2)+2] = 
7340: 68 65 78 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62  hexdigits[(zBlob
7350: 5b 69 5d 3e 3e 34 29 26 30 78 30 46 5d 3b 0a 20  [i]>>4)&0x0F];. 
7360: 20 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28           zText[(
7370: 69 2a 32 29 2b 33 5d 20 3d 20 68 65 78 64 69 67  i*2)+3] = hexdig
7380: 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 29 26 30  its[(zBlob[i])&0
7390: 78 30 46 5d 3b 0a 20 20 20 20 20 20 20 20 7d 0a  x0F];.        }.
73a0: 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e          zText[(n
73b0: 42 6c 6f 62 2a 32 29 2b 32 5d 20 3d 20 27 5c 27  Blob*2)+2] = '\'
73c0: 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74  ';.        zText
73d0: 5b 28 6e 42 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20  [(nBlob*2)+3] = 
73e0: 27 5c 30 27 3b 0a 20 20 20 20 20 20 20 20 7a 54  '\0';.        zT
73f0: 65 78 74 5b 30 5d 20 3d 20 27 58 27 3b 0a 20 20  ext[0] = 'X';.  
7400: 20 20 20 20 20 20 7a 54 65 78 74 5b 31 5d 20 3d        zText[1] =
7410: 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 73   '\'';.        s
7420: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
7430: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 54 65 78  xt(context, zTex
7440: 74 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52  t, -1, SQLITE_TR
7450: 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20 20 20  ANSIENT);.      
7460: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a    sqlite3_free(z
7470: 54 65 78 74 29 3b 0a 20 20 20 20 20 20 7d 0a 20  Text);.      }. 
7480: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
7490: 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  }.    case SQLIT
74a0: 45 5f 54 45 58 54 3a 20 7b 0a 20 20 20 20 20 20  E_TEXT: {.      
74b0: 69 6e 74 20 69 2c 6a 3b 0a 20 20 20 20 20 20 75  int i,j;.      u
74c0: 36 34 20 6e 3b 0a 20 20 20 20 20 20 63 6f 6e 73  64 n;.      cons
74d0: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
74e0: 2a 7a 41 72 67 20 3d 20 73 71 6c 69 74 65 33 5f  *zArg = sqlite3_
74f0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
7500: 30 5d 29 3b 0a 20 20 20 20 20 20 63 68 61 72 20  0]);.      char 
7510: 2a 7a 3b 0a 0a 20 20 20 20 20 20 69 66 28 20 7a  *z;..      if( z
7520: 41 72 67 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b  Arg==0 ) return;
7530: 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 2c 20  .      for(i=0, 
7540: 6e 3d 30 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b  n=0; zArg[i]; i+
7550: 2b 29 7b 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d  +){ if( zArg[i]=
7560: 3d 27 5c 27 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20  ='\'' ) n++; }. 
7570: 20 20 20 20 20 7a 20 3d 20 63 6f 6e 74 65 78 74       z = context
7580: 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20  Malloc(context, 
7590: 28 28 69 36 34 29 69 29 2b 28 28 69 36 34 29 6e  ((i64)i)+((i64)n
75a0: 29 2b 33 29 3b 0a 20 20 20 20 20 20 69 66 28 20  )+3);.      if( 
75b0: 7a 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 30  z ){.        z[0
75c0: 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20  ] = '\'';.      
75d0: 20 20 66 6f 72 28 69 3d 30 2c 20 6a 3d 31 3b 20    for(i=0, j=1; 
75e0: 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20  zArg[i]; i++){. 
75f0: 20 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20           z[j++] 
7600: 3d 20 7a 41 72 67 5b 69 5d 3b 0a 20 20 20 20 20  = zArg[i];.     
7610: 20 20 20 20 20 69 66 28 20 7a 41 72 67 5b 69 5d       if( zArg[i]
7620: 3d 3d 27 5c 27 27 20 29 7b 0a 20 20 20 20 20 20  =='\'' ){.      
7630: 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27        z[j++] = '
7640: 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 20 20 7d  \'';.          }
7650: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
7660: 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27     z[j++] = '\''
7670: 3b 0a 20 20 20 20 20 20 20 20 7a 5b 6a 5d 20 3d  ;.        z[j] =
7680: 20 30 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69   0;.        sqli
7690: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
76a0: 63 6f 6e 74 65 78 74 2c 20 7a 2c 20 6a 2c 20 73  context, z, j, s
76b0: 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20  qlite3_free);.  
76c0: 20 20 20 20 7d 0a 20 20 20 20 20 20 62 72 65 61      }.      brea
76d0: 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66  k;.    }.    def
76e0: 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20 61 73  ault: {.      as
76f0: 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61  sert( sqlite3_va
7700: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
7710: 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29  )==SQLITE_NULL )
7720: 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  ;.      sqlite3_
7730: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
7740: 65 78 74 2c 20 22 4e 55 4c 4c 22 2c 20 34 2c 20  ext, "NULL", 4, 
7750: 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a  SQLITE_STATIC);.
7760: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
7770: 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20   }.  }.}../*.** 
7780: 54 68 65 20 75 6e 69 63 6f 64 65 28 29 20 66 75  The unicode() fu
7790: 6e 63 74 69 6f 6e 2e 20 20 52 65 74 75 72 6e 20  nction.  Return 
77a0: 74 68 65 20 69 6e 74 65 67 65 72 20 75 6e 69 63  the integer unic
77b0: 6f 64 65 20 63 6f 64 65 2d 70 6f 69 6e 74 20 76  ode code-point v
77c0: 61 6c 75 65 0a 2a 2a 20 66 6f 72 20 74 68 65 20  alue.** for the 
77d0: 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72 20  first character 
77e0: 6f 66 20 74 68 65 20 69 6e 70 75 74 20 73 74 72  of the input str
77f0: 69 6e 67 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20  ing. .*/.static 
7800: 76 6f 69 64 20 75 6e 69 63 6f 64 65 46 75 6e 63  void unicodeFunc
7810: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
7820: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
7830: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
7840: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
7850: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69  .){.  const unsi
7860: 67 6e 65 64 20 63 68 61 72 20 2a 7a 20 3d 20 73  gned char *z = s
7870: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
7880: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 28 76  t(argv[0]);.  (v
7890: 6f 69 64 29 61 72 67 63 3b 0a 20 20 69 66 28 20  oid)argc;.  if( 
78a0: 7a 20 26 26 20 7a 5b 30 5d 20 29 20 73 71 6c 69  z && z[0] ) sqli
78b0: 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63  te3_result_int(c
78c0: 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 55  ontext, sqlite3U
78d0: 74 66 38 52 65 61 64 28 26 7a 29 29 3b 0a 7d 0a  tf8Read(&z));.}.
78e0: 0a 2f 2a 0a 2a 2a 20 54 68 65 20 63 68 61 72 28  ./*.** The char(
78f0: 29 20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73  ) function takes
7900: 20 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 61 72   zero or more ar
7910: 67 75 6d 65 6e 74 73 2c 20 65 61 63 68 20 6f 66  guments, each of
7920: 20 77 68 69 63 68 20 69 73 0a 2a 2a 20 61 6e 20   which is.** an 
7930: 69 6e 74 65 67 65 72 2e 20 20 49 74 20 63 6f 6e  integer.  It con
7940: 73 74 72 75 63 74 73 20 61 20 73 74 72 69 6e 67  structs a string
7950: 20 77 68 65 72 65 20 65 61 63 68 20 63 68 61 72   where each char
7960: 61 63 74 65 72 20 6f 66 20 74 68 65 20 73 74 72  acter of the str
7970: 69 6e 67 0a 2a 2a 20 69 73 20 74 68 65 20 75 6e  ing.** is the un
7980: 69 63 6f 64 65 20 63 68 61 72 61 63 74 65 72 20  icode character 
7990: 66 6f 72 20 74 68 65 20 63 6f 72 72 65 73 70 6f  for the correspo
79a0: 6e 64 69 6e 67 20 69 6e 74 65 67 65 72 20 61 72  nding integer ar
79b0: 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69  gument..*/.stati
79c0: 63 20 76 6f 69 64 20 63 68 61 72 46 75 6e 63 28  c void charFunc(
79d0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
79e0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
79f0: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
7a00: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
7a10: 29 7b 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68  ){.  unsigned ch
7a20: 61 72 20 2a 7a 2c 20 2a 7a 4f 75 74 3b 0a 20 20  ar *z, *zOut;.  
7a30: 69 6e 74 20 69 3b 0a 20 20 7a 4f 75 74 20 3d 20  int i;.  zOut = 
7a40: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c  z = sqlite3_mall
7a50: 6f 63 28 20 61 72 67 63 2a 34 2b 31 20 29 3b 0a  oc( argc*4+1 );.
7a60: 20 20 69 66 28 20 7a 3d 3d 30 20 29 7b 0a 20 20    if( z==0 ){.  
7a70: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
7a80: 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e  _error_nomem(con
7a90: 74 65 78 74 29 3b 0a 20 20 20 20 72 65 74 75 72  text);.    retur
7aa0: 6e 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30  n;.  }.  for(i=0
7ab0: 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29 7b 0a  ; i<argc; i++){.
7ac0: 20 20 20 20 73 71 6c 69 74 65 33 5f 69 6e 74 36      sqlite3_int6
7ad0: 34 20 78 3b 0a 20 20 20 20 75 6e 73 69 67 6e 65  4 x;.    unsigne
7ae0: 64 20 63 3b 0a 20 20 20 20 78 20 3d 20 73 71 6c  d c;.    x = sql
7af0: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34  ite3_value_int64
7b00: 28 61 72 67 76 5b 69 5d 29 3b 0a 20 20 20 20 69  (argv[i]);.    i
7b10: 66 28 20 78 3c 30 20 7c 7c 20 78 3e 30 78 31 30  f( x<0 || x>0x10
7b20: 66 66 66 66 20 29 20 78 20 3d 20 30 78 66 66 66  ffff ) x = 0xfff
7b30: 64 3b 0a 20 20 20 20 63 20 3d 20 28 75 6e 73 69  d;.    c = (unsi
7b40: 67 6e 65 64 29 28 78 20 26 20 30 78 31 66 66 66  gned)(x & 0x1fff
7b50: 66 66 29 3b 0a 20 20 20 20 69 66 28 20 63 3c 30  ff);.    if( c<0
7b60: 78 30 30 30 38 30 20 29 7b 0a 20 20 20 20 20 20  x00080 ){.      
7b70: 2a 7a 4f 75 74 2b 2b 20 3d 20 28 75 38 29 28 63  *zOut++ = (u8)(c
7b80: 26 30 78 46 46 29 3b 0a 20 20 20 20 7d 65 6c 73  &0xFF);.    }els
7b90: 65 20 69 66 28 20 63 3c 30 78 30 30 38 30 30 20  e if( c<0x00800 
7ba0: 29 7b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b  ){.      *zOut++
7bb0: 20 3d 20 30 78 43 30 20 2b 20 28 75 38 29 28 28   = 0xC0 + (u8)((
7bc0: 63 3e 3e 36 29 26 30 78 31 46 29 3b 0a 20 20 20  c>>6)&0x1F);.   
7bd0: 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38     *zOut++ = 0x8
7be0: 30 20 2b 20 28 75 38 29 28 63 20 26 20 30 78 33  0 + (u8)(c & 0x3
7bf0: 46 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66  F);.    }else if
7c00: 28 20 63 3c 30 78 31 30 30 30 30 20 29 7b 0a 20  ( c<0x10000 ){. 
7c10: 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30       *zOut++ = 0
7c20: 78 45 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 31  xE0 + (u8)((c>>1
7c30: 32 29 26 30 78 30 46 29 3b 0a 20 20 20 20 20 20  2)&0x0F);.      
7c40: 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b  *zOut++ = 0x80 +
7c50: 20 28 75 38 29 28 28 63 3e 3e 36 29 20 26 20 30   (u8)((c>>6) & 0
7c60: 78 33 46 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75  x3F);.      *zOu
7c70: 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28 75 38  t++ = 0x80 + (u8
7c80: 29 28 63 20 26 20 30 78 33 46 29 3b 0a 20 20 20  )(c & 0x3F);.   
7c90: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 2a 7a   }else{.      *z
7ca0: 4f 75 74 2b 2b 20 3d 20 30 78 46 30 20 2b 20 28  Out++ = 0xF0 + (
7cb0: 75 38 29 28 28 63 3e 3e 31 38 29 20 26 20 30 78  u8)((c>>18) & 0x
7cc0: 30 37 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74  07);.      *zOut
7cd0: 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29  ++ = 0x80 + (u8)
7ce0: 28 28 63 3e 3e 31 32 29 20 26 20 30 78 33 46 29  ((c>>12) & 0x3F)
7cf0: 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20  ;.      *zOut++ 
7d00: 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 28 63  = 0x80 + (u8)((c
7d10: 3e 3e 36 29 20 26 20 30 78 33 46 29 3b 0a 20 20  >>6) & 0x3F);.  
7d20: 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78      *zOut++ = 0x
7d30: 38 30 20 2b 20 28 75 38 29 28 63 20 26 20 30 78  80 + (u8)(c & 0x
7d40: 33 46 29 3b 0a 20 20 20 20 7d 20 20 20 20 20 20  3F);.    }      
7d50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7d60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7d70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5c 0a                \.
7d80: 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65    }.  sqlite3_re
7d90: 73 75 6c 74 5f 74 65 78 74 36 34 28 63 6f 6e 74  sult_text64(cont
7da0: 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 7a  ext, (char*)z, z
7db0: 4f 75 74 2d 7a 2c 20 73 71 6c 69 74 65 33 5f 66  Out-z, sqlite3_f
7dc0: 72 65 65 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  ree, SQLITE_UTF8
7dd0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20  );.}../*.** The 
7de0: 68 65 78 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20  hex() function. 
7df0: 20 49 6e 74 65 72 70 72 65 74 20 74 68 65 20 61   Interpret the a
7e00: 72 67 75 6d 65 6e 74 20 61 73 20 61 20 62 6c 6f  rgument as a blo
7e10: 62 2e 20 20 52 65 74 75 72 6e 0a 2a 2a 20 61 20  b.  Return.** a 
7e20: 68 65 78 61 64 65 63 69 6d 61 6c 20 72 65 6e 64  hexadecimal rend
7e30: 65 72 69 6e 67 20 61 73 20 74 65 78 74 2e 0a 2a  ering as text..*
7e40: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 68 65  /.static void he
7e50: 78 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  xFunc(.  sqlite3
7e60: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
7e70: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
7e80: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
7e90: 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69  *argv.){.  int i
7ea0: 2c 20 6e 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73  , n;.  const uns
7eb0: 69 67 6e 65 64 20 63 68 61 72 20 2a 70 42 6c 6f  igned char *pBlo
7ec0: 62 3b 0a 20 20 63 68 61 72 20 2a 7a 48 65 78 2c  b;.  char *zHex,
7ed0: 20 2a 7a 3b 0a 20 20 61 73 73 65 72 74 28 20 61   *z;.  assert( a
7ee0: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
7ef0: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
7f00: 63 29 3b 0a 20 20 70 42 6c 6f 62 20 3d 20 73 71  c);.  pBlob = sq
7f10: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62  lite3_value_blob
7f20: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d  (argv[0]);.  n =
7f30: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
7f40: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
7f50: 20 61 73 73 65 72 74 28 20 70 42 6c 6f 62 3d 3d   assert( pBlob==
7f60: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c  sqlite3_value_bl
7f70: 6f 62 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 20  ob(argv[0]) );  
7f80: 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63  /* No encoding c
7f90: 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 20 3d 20 7a  hange */.  z = z
7fa0: 48 65 78 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c  Hex = contextMal
7fb0: 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69  loc(context, ((i
7fc0: 36 34 29 6e 29 2a 32 20 2b 20 31 29 3b 0a 20 20  64)n)*2 + 1);.  
7fd0: 69 66 28 20 7a 48 65 78 20 29 7b 0a 20 20 20 20  if( zHex ){.    
7fe0: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b  for(i=0; i<n; i+
7ff0: 2b 2c 20 70 42 6c 6f 62 2b 2b 29 7b 0a 20 20 20  +, pBlob++){.   
8000: 20 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72     unsigned char
8010: 20 63 20 3d 20 2a 70 42 6c 6f 62 3b 0a 20 20 20   c = *pBlob;.   
8020: 20 20 20 2a 28 7a 2b 2b 29 20 3d 20 68 65 78 64     *(z++) = hexd
8030: 69 67 69 74 73 5b 28 63 3e 3e 34 29 26 30 78 66  igits[(c>>4)&0xf
8040: 5d 3b 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20  ];.      *(z++) 
8050: 3d 20 68 65 78 64 69 67 69 74 73 5b 63 26 30 78  = hexdigits[c&0x
8060: 66 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2a 7a  f];.    }.    *z
8070: 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65   = 0;.    sqlite
8080: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
8090: 6e 74 65 78 74 2c 20 7a 48 65 78 2c 20 6e 2a 32  ntext, zHex, n*2
80a0: 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b  , sqlite3_free);
80b0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  .  }.}../*.** Th
80c0: 65 20 7a 65 72 6f 62 6c 6f 62 28 4e 29 20 66 75  e zeroblob(N) fu
80d0: 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 61  nction returns a
80e0: 20 7a 65 72 6f 2d 66 69 6c 6c 65 64 20 62 6c 6f   zero-filled blo
80f0: 62 20 6f 66 20 73 69 7a 65 20 4e 20 62 79 74 65  b of size N byte
8100: 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  s..*/.static voi
8110: 64 20 7a 65 72 6f 62 6c 6f 62 46 75 6e 63 28 0a  d zeroblobFunc(.
8120: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
8130: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
8140: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
8150: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
8160: 7b 0a 20 20 69 36 34 20 6e 3b 0a 20 20 73 71 6c  {.  i64 n;.  sql
8170: 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74  ite3 *db = sqlit
8180: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
8190: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20  ndle(context);. 
81a0: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
81b0: 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   );.  UNUSED_PAR
81c0: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
81d0: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
81e0: 65 5f 69 6e 74 36 34 28 61 72 67 76 5b 30 5d 29  e_int64(argv[0])
81f0: 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 3d  ;.  testcase( n=
8200: 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49  =db->aLimit[SQLI
8210: 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d  TE_LIMIT_LENGTH]
8220: 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20   );.  testcase( 
8230: 6e 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  n==db->aLimit[SQ
8240: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
8250: 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e 3e  H]+1 );.  if( n>
8260: 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  db->aLimit[SQLIT
8270: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20  E_LIMIT_LENGTH] 
8280: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
8290: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62  esult_error_toob
82a0: 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7d  ig(context);.  }
82b0: 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65  else{.    sqlite
82c0: 33 5f 72 65 73 75 6c 74 5f 7a 65 72 6f 62 6c 6f  3_result_zeroblo
82d0: 62 28 63 6f 6e 74 65 78 74 2c 20 28 69 6e 74 29  b(context, (int)
82e0: 6e 29 3b 20 2f 2a 20 49 4d 50 3a 20 52 2d 30 30  n); /* IMP: R-00
82f0: 32 39 33 2d 36 34 39 39 34 20 2a 2f 0a 20 20 7d  293-64994 */.  }
8300: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 72 65  .}../*.** The re
8310: 70 6c 61 63 65 28 29 20 66 75 6e 63 74 69 6f 6e  place() function
8320: 2e 20 20 54 68 72 65 65 20 61 72 67 75 6d 65 6e  .  Three argumen
8330: 74 73 20 61 72 65 20 61 6c 6c 20 73 74 72 69 6e  ts are all strin
8340: 67 73 3a 20 63 61 6c 6c 0a 2a 2a 20 74 68 65 6d  gs: call.** them
8350: 20 41 2c 20 42 2c 20 61 6e 64 20 43 2e 20 54 68   A, B, and C. Th
8360: 65 20 72 65 73 75 6c 74 20 69 73 20 61 6c 73 6f  e result is also
8370: 20 61 20 73 74 72 69 6e 67 20 77 68 69 63 68 20   a string which 
8380: 69 73 20 64 65 72 69 76 65 64 0a 2a 2a 20 66 72  is derived.** fr
8390: 6f 6d 20 41 20 62 79 20 72 65 70 6c 61 63 69 6e  om A by replacin
83a0: 67 20 65 76 65 72 79 20 6f 63 63 75 72 72 65 6e  g every occurren
83b0: 63 65 20 6f 66 20 42 20 77 69 74 68 20 43 2e 20  ce of B with C. 
83c0: 20 54 68 65 20 6d 61 74 63 68 0a 2a 2a 20 6d 75   The match.** mu
83d0: 73 74 20 62 65 20 65 78 61 63 74 2e 20 20 43 6f  st be exact.  Co
83e0: 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65  llating sequence
83f0: 73 20 61 72 65 20 6e 6f 74 20 75 73 65 64 2e 0a  s are not used..
8400: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72  */.static void r
8410: 65 70 6c 61 63 65 46 75 6e 63 28 0a 20 20 73 71  eplaceFunc(.  sq
8420: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
8430: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
8440: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
8450: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
8460: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
8470: 68 61 72 20 2a 7a 53 74 72 3b 20 20 20 20 20 20  har *zStr;      
8480: 20 20 2f 2a 20 54 68 65 20 69 6e 70 75 74 20 73    /* The input s
8490: 74 72 69 6e 67 20 41 20 2a 2f 0a 20 20 63 6f 6e  tring A */.  con
84a0: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
84b0: 20 2a 7a 50 61 74 74 65 72 6e 3b 20 20 20 20 2f   *zPattern;    /
84c0: 2a 20 54 68 65 20 70 61 74 74 65 72 6e 20 73 74  * The pattern st
84d0: 72 69 6e 67 20 42 20 2a 2f 0a 20 20 63 6f 6e 73  ring B */.  cons
84e0: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
84f0: 2a 7a 52 65 70 3b 20 20 20 20 20 20 20 20 2f 2a  *zRep;        /*
8500: 20 54 68 65 20 72 65 70 6c 61 63 65 6d 65 6e 74   The replacement
8510: 20 73 74 72 69 6e 67 20 43 20 2a 2f 0a 20 20 75   string C */.  u
8520: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 4f  nsigned char *zO
8530: 75 74 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  ut;             
8540: 20 2f 2a 20 54 68 65 20 6f 75 74 70 75 74 20 2a   /* The output *
8550: 2f 0a 20 20 69 6e 74 20 6e 53 74 72 3b 20 20 20  /.  int nStr;   
8560: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
8570: 53 69 7a 65 20 6f 66 20 7a 53 74 72 20 2a 2f 0a  Size of zStr */.
8580: 20 20 69 6e 74 20 6e 50 61 74 74 65 72 6e 3b 20    int nPattern; 
8590: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69             /* Si
85a0: 7a 65 20 6f 66 20 7a 50 61 74 74 65 72 6e 20 2a  ze of zPattern *
85b0: 2f 0a 20 20 69 6e 74 20 6e 52 65 70 3b 20 20 20  /.  int nRep;   
85c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
85d0: 53 69 7a 65 20 6f 66 20 7a 52 65 70 20 2a 2f 0a  Size of zRep */.
85e0: 20 20 69 36 34 20 6e 4f 75 74 3b 20 20 20 20 20    i64 nOut;     
85f0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4d 61             /* Ma
8600: 78 69 6d 75 6d 20 73 69 7a 65 20 6f 66 20 7a 4f  ximum size of zO
8610: 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6c 6f 6f 70  ut */.  int loop
8620: 4c 69 6d 69 74 3b 20 20 20 20 20 20 20 20 20 20  Limit;          
8630: 20 2f 2a 20 4c 61 73 74 20 7a 53 74 72 5b 5d 20   /* Last zStr[] 
8640: 74 68 61 74 20 6d 69 67 68 74 20 6d 61 74 63 68  that might match
8650: 20 7a 50 61 74 74 65 72 6e 5b 5d 20 2a 2f 0a 20   zPattern[] */. 
8660: 20 69 6e 74 20 69 2c 20 6a 3b 20 20 20 20 20 20   int i, j;      
8670: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f            /* Loo
8680: 70 20 63 6f 75 6e 74 65 72 73 20 2a 2f 0a 0a 20  p counters */.. 
8690: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 33   assert( argc==3
86a0: 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   );.  UNUSED_PAR
86b0: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
86c0: 7a 53 74 72 20 3d 20 73 71 6c 69 74 65 33 5f 76  zStr = sqlite3_v
86d0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
86e0: 5d 29 3b 0a 20 20 69 66 28 20 7a 53 74 72 3d 3d  ]);.  if( zStr==
86f0: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 53  0 ) return;.  nS
8700: 74 72 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  tr = sqlite3_val
8710: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
8720: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 7a 53 74  );.  assert( zSt
8730: 72 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  r==sqlite3_value
8740: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29  _text(argv[0]) )
8750: 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e  ;  /* No encodin
8760: 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 50  g change */.  zP
8770: 61 74 74 65 72 6e 20 3d 20 73 71 6c 69 74 65 33  attern = sqlite3
8780: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
8790: 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a 50 61 74  [1]);.  if( zPat
87a0: 74 65 72 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 61  tern==0 ){.    a
87b0: 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76  ssert( sqlite3_v
87c0: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31  alue_type(argv[1
87d0: 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a  ])==SQLITE_NULL.
87e0: 20 20 20 20 20 20 20 20 20 20 20 20 7c 7c 20 73              || s
87f0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
8800: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
8810: 29 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20  )->mallocFailed 
8820: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  );.    return;. 
8830: 20 7d 0a 20 20 69 66 28 20 7a 50 61 74 74 65 72   }.  if( zPatter
8840: 6e 5b 30 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 61  n[0]==0 ){.    a
8850: 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76  ssert( sqlite3_v
8860: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31  alue_type(argv[1
8870: 5d 29 21 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20  ])!=SQLITE_NULL 
8880: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  );.    sqlite3_r
8890: 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74  esult_value(cont
88a0: 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20  ext, argv[0]);. 
88b0: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20     return;.  }. 
88c0: 20 6e 50 61 74 74 65 72 6e 20 3d 20 73 71 6c 69   nPattern = sqli
88d0: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
88e0: 61 72 67 76 5b 31 5d 29 3b 0a 20 20 61 73 73 65  argv[1]);.  asse
88f0: 72 74 28 20 7a 50 61 74 74 65 72 6e 3d 3d 73 71  rt( zPattern==sq
8900: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
8910: 28 61 72 67 76 5b 31 5d 29 20 29 3b 20 20 2f 2a  (argv[1]) );  /*
8920: 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61   No encoding cha
8930: 6e 67 65 20 2a 2f 0a 20 20 7a 52 65 70 20 3d 20  nge */.  zRep = 
8940: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
8950: 78 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 69  xt(argv[2]);.  i
8960: 66 28 20 7a 52 65 70 3d 3d 30 20 29 20 72 65 74  f( zRep==0 ) ret
8970: 75 72 6e 3b 0a 20 20 6e 52 65 70 20 3d 20 73 71  urn;.  nRep = sq
8980: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
8990: 73 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 61 73  s(argv[2]);.  as
89a0: 73 65 72 74 28 20 7a 52 65 70 3d 3d 73 71 6c 69  sert( zRep==sqli
89b0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
89c0: 72 67 76 5b 32 5d 29 20 29 3b 0a 20 20 6e 4f 75  rgv[2]) );.  nOu
89d0: 74 20 3d 20 6e 53 74 72 20 2b 20 31 3b 0a 20 20  t = nStr + 1;.  
89e0: 61 73 73 65 72 74 28 20 6e 4f 75 74 3c 53 51 4c  assert( nOut<SQL
89f0: 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48 20 29  ITE_MAX_LENGTH )
8a00: 3b 0a 20 20 7a 4f 75 74 20 3d 20 63 6f 6e 74 65  ;.  zOut = conte
8a10: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
8a20: 2c 20 28 69 36 34 29 6e 4f 75 74 29 3b 0a 20 20  , (i64)nOut);.  
8a30: 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20  if( zOut==0 ){. 
8a40: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20     return;.  }. 
8a50: 20 6c 6f 6f 70 4c 69 6d 69 74 20 3d 20 6e 53 74   loopLimit = nSt
8a60: 72 20 2d 20 6e 50 61 74 74 65 72 6e 3b 20 20 0a  r - nPattern;  .
8a70: 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 69 3c 3d    for(i=j=0; i<=
8a80: 6c 6f 6f 70 4c 69 6d 69 74 3b 20 69 2b 2b 29 7b  loopLimit; i++){
8a90: 0a 20 20 20 20 69 66 28 20 7a 53 74 72 5b 69 5d  .    if( zStr[i]
8aa0: 21 3d 7a 50 61 74 74 65 72 6e 5b 30 5d 20 7c 7c  !=zPattern[0] ||
8ab0: 20 6d 65 6d 63 6d 70 28 26 7a 53 74 72 5b 69 5d   memcmp(&zStr[i]
8ac0: 2c 20 7a 50 61 74 74 65 72 6e 2c 20 6e 50 61 74  , zPattern, nPat
8ad0: 74 65 72 6e 29 20 29 7b 0a 20 20 20 20 20 20 7a  tern) ){.      z
8ae0: 4f 75 74 5b 6a 2b 2b 5d 20 3d 20 7a 53 74 72 5b  Out[j++] = zStr[
8af0: 69 5d 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20  i];.    }else{. 
8b00: 20 20 20 20 20 75 38 20 2a 7a 4f 6c 64 3b 0a 20       u8 *zOld;. 
8b10: 20 20 20 20 20 73 71 6c 69 74 65 33 20 2a 64 62       sqlite3 *db
8b20: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65   = sqlite3_conte
8b30: 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e  xt_db_handle(con
8b40: 74 65 78 74 29 3b 0a 20 20 20 20 20 20 6e 4f 75  text);.      nOu
8b50: 74 20 2b 3d 20 6e 52 65 70 20 2d 20 6e 50 61 74  t += nRep - nPat
8b60: 74 65 72 6e 3b 0a 20 20 20 20 20 20 74 65 73 74  tern;.      test
8b70: 63 61 73 65 28 20 6e 4f 75 74 2d 31 3d 3d 64 62  case( nOut-1==db
8b80: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
8b90: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b  LIMIT_LENGTH] );
8ba0: 0a 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28  .      testcase(
8bb0: 20 6e 4f 75 74 2d 32 3d 3d 64 62 2d 3e 61 4c 69   nOut-2==db->aLi
8bc0: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
8bd0: 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20 20 20 20  _LENGTH] );.    
8be0: 20 20 69 66 28 20 6e 4f 75 74 2d 31 3e 64 62 2d    if( nOut-1>db-
8bf0: 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c  >aLimit[SQLITE_L
8c00: 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a  IMIT_LENGTH] ){.
8c10: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
8c20: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f  result_error_too
8c30: 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  big(context);.  
8c40: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72        sqlite3_fr
8c50: 65 65 28 7a 4f 75 74 29 3b 0a 20 20 20 20 20 20  ee(zOut);.      
8c60: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20    return;.      
8c70: 7d 0a 20 20 20 20 20 20 7a 4f 6c 64 20 3d 20 7a  }.      zOld = z
8c80: 4f 75 74 3b 0a 20 20 20 20 20 20 7a 4f 75 74 20  Out;.      zOut 
8c90: 3d 20 73 71 6c 69 74 65 33 5f 72 65 61 6c 6c 6f  = sqlite3_reallo
8ca0: 63 28 7a 4f 75 74 2c 20 28 69 6e 74 29 6e 4f 75  c(zOut, (int)nOu
8cb0: 74 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 4f  t);.      if( zO
8cc0: 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  ut==0 ){.       
8cd0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
8ce0: 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74  error_nomem(cont
8cf0: 65 78 74 29 3b 0a 20 20 20 20 20 20 20 20 73 71  ext);.        sq
8d00: 6c 69 74 65 33 5f 66 72 65 65 28 7a 4f 6c 64 29  lite3_free(zOld)
8d10: 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e  ;.        return
8d20: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
8d30: 6d 65 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c  memcpy(&zOut[j],
8d40: 20 7a 52 65 70 2c 20 6e 52 65 70 29 3b 0a 20 20   zRep, nRep);.  
8d50: 20 20 20 20 6a 20 2b 3d 20 6e 52 65 70 3b 0a 20      j += nRep;. 
8d60: 20 20 20 20 20 69 20 2b 3d 20 6e 50 61 74 74 65       i += nPatte
8d70: 72 6e 2d 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  rn-1;.    }.  }.
8d80: 20 20 61 73 73 65 72 74 28 20 6a 2b 6e 53 74 72    assert( j+nStr
8d90: 2d 69 2b 31 3d 3d 6e 4f 75 74 20 29 3b 0a 20 20  -i+1==nOut );.  
8da0: 6d 65 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c  memcpy(&zOut[j],
8db0: 20 26 7a 53 74 72 5b 69 5d 2c 20 6e 53 74 72 2d   &zStr[i], nStr-
8dc0: 69 29 3b 0a 20 20 6a 20 2b 3d 20 6e 53 74 72 20  i);.  j += nStr 
8dd0: 2d 20 69 3b 0a 20 20 61 73 73 65 72 74 28 20 6a  - i;.  assert( j
8de0: 3c 3d 6e 4f 75 74 20 29 3b 0a 20 20 7a 4f 75 74  <=nOut );.  zOut
8df0: 5b 6a 5d 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74  [j] = 0;.  sqlit
8e00: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
8e10: 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a  ontext, (char*)z
8e20: 4f 75 74 2c 20 6a 2c 20 73 71 6c 69 74 65 33 5f  Out, j, sqlite3_
8e30: 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  free);.}../*.** 
8e40: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
8e50: 66 20 74 68 65 20 54 52 49 4d 28 29 2c 20 4c 54  f the TRIM(), LT
8e60: 52 49 4d 28 29 2c 20 61 6e 64 20 52 54 52 49 4d  RIM(), and RTRIM
8e70: 28 29 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2a  () functions..**
8e80: 20 54 68 65 20 75 73 65 72 64 61 74 61 20 69 73   The userdata is
8e90: 20 30 78 31 20 66 6f 72 20 6c 65 66 74 20 74 72   0x1 for left tr
8ea0: 69 6d 2c 20 30 78 32 20 66 6f 72 20 72 69 67 68  im, 0x2 for righ
8eb0: 74 20 74 72 69 6d 2c 20 30 78 33 20 66 6f 72 20  t trim, 0x3 for 
8ec0: 62 6f 74 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  both..*/.static 
8ed0: 76 6f 69 64 20 74 72 69 6d 46 75 6e 63 28 0a 20  void trimFunc(. 
8ee0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
8ef0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
8f00: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
8f10: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
8f20: 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65  .  const unsigne
8f30: 64 20 63 68 61 72 20 2a 7a 49 6e 3b 20 20 20 20  d char *zIn;    
8f40: 20 20 20 20 20 2f 2a 20 49 6e 70 75 74 20 73 74       /* Input st
8f50: 72 69 6e 67 20 2a 2f 0a 20 20 63 6f 6e 73 74 20  ring */.  const 
8f60: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
8f70: 43 68 61 72 53 65 74 3b 20 20 20 20 2f 2a 20 53  CharSet;    /* S
8f80: 65 74 20 6f 66 20 63 68 61 72 61 63 74 65 72 73  et of characters
8f90: 20 74 6f 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e   to trim */.  in
8fa0: 74 20 6e 49 6e 3b 20 20 20 20 20 20 20 20 20 20  t nIn;          
8fb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8fc0: 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 62 79 74  /* Number of byt
8fd0: 65 73 20 69 6e 20 69 6e 70 75 74 20 2a 2f 0a 20  es in input */. 
8fe0: 20 69 6e 74 20 66 6c 61 67 73 3b 20 20 20 20 20   int flags;     
8ff0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
9000: 20 20 20 2f 2a 20 31 3a 20 74 72 69 6d 6c 65 66     /* 1: trimlef
9010: 74 20 20 32 3a 20 74 72 69 6d 72 69 67 68 74 20  t  2: trimright 
9020: 20 33 3a 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e   3: trim */.  in
9030: 74 20 69 3b 20 20 20 20 20 20 20 20 20 20 20 20  t i;            
9040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
9050: 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20  /* Loop counter 
9060: 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68  */.  unsigned ch
9070: 61 72 20 2a 61 4c 65 6e 20 3d 20 30 3b 20 20 20  ar *aLen = 0;   
9080: 20 20 20 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68         /* Length
9090: 20 6f 66 20 65 61 63 68 20 63 68 61 72 61 63 74   of each charact
90a0: 65 72 20 69 6e 20 7a 43 68 61 72 53 65 74 20 2a  er in zCharSet *
90b0: 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61  /.  unsigned cha
90c0: 72 20 2a 2a 61 7a 43 68 61 72 20 3d 20 30 3b 20  r **azChar = 0; 
90d0: 20 20 20 20 20 20 2f 2a 20 49 6e 64 69 76 69 64        /* Individ
90e0: 75 61 6c 20 63 68 61 72 61 63 74 65 72 73 20 69  ual characters i
90f0: 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20 20  n zCharSet */.  
9100: 69 6e 74 20 6e 43 68 61 72 3b 20 20 20 20 20 20  int nChar;      
9110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
9120: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 63    /* Number of c
9130: 68 61 72 61 63 74 65 72 73 20 69 6e 20 7a 43 68  haracters in zCh
9140: 61 72 53 65 74 20 2a 2f 0a 0a 20 20 69 66 28 20  arSet */..  if( 
9150: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
9160: 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c  pe(argv[0])==SQL
9170: 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20  ITE_NULL ){.    
9180: 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 7a 49  return;.  }.  zI
9190: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
91a0: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
91b0: 0a 20 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20  .  if( zIn==0 ) 
91c0: 72 65 74 75 72 6e 3b 0a 20 20 6e 49 6e 20 3d 20  return;.  nIn = 
91d0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
91e0: 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  tes(argv[0]);.  
91f0: 61 73 73 65 72 74 28 20 7a 49 6e 3d 3d 73 71 6c  assert( zIn==sql
9200: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
9210: 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66  argv[0]) );.  if
9220: 28 20 61 72 67 63 3d 3d 31 20 29 7b 0a 20 20 20  ( argc==1 ){.   
9230: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e   static const un
9240: 73 69 67 6e 65 64 20 63 68 61 72 20 6c 65 6e 4f  signed char lenO
9250: 6e 65 5b 5d 20 3d 20 7b 20 31 20 7d 3b 0a 20 20  ne[] = { 1 };.  
9260: 20 20 73 74 61 74 69 63 20 75 6e 73 69 67 6e 65    static unsigne
9270: 64 20 63 68 61 72 20 2a 20 63 6f 6e 73 74 20 61  d char * const a
9280: 7a 4f 6e 65 5b 5d 20 3d 20 7b 20 28 75 38 2a 29  zOne[] = { (u8*)
9290: 22 20 22 20 7d 3b 0a 20 20 20 20 6e 43 68 61 72  " " };.    nChar
92a0: 20 3d 20 31 3b 0a 20 20 20 20 61 4c 65 6e 20 3d   = 1;.    aLen =
92b0: 20 28 75 38 2a 29 6c 65 6e 4f 6e 65 3b 0a 20 20   (u8*)lenOne;.  
92c0: 20 20 61 7a 43 68 61 72 20 3d 20 28 75 6e 73 69    azChar = (unsi
92d0: 67 6e 65 64 20 63 68 61 72 20 2a 2a 29 61 7a 4f  gned char **)azO
92e0: 6e 65 3b 0a 20 20 20 20 7a 43 68 61 72 53 65 74  ne;.    zCharSet
92f0: 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 66   = 0;.  }else if
9300: 28 20 28 7a 43 68 61 72 53 65 74 20 3d 20 73 71  ( (zCharSet = sq
9310: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
9320: 28 61 72 67 76 5b 31 5d 29 29 3d 3d 30 20 29 7b  (argv[1]))==0 ){
9330: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
9340: 65 6c 73 65 7b 0a 20 20 20 20 63 6f 6e 73 74 20  else{.    const 
9350: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
9360: 3b 0a 20 20 20 20 66 6f 72 28 7a 3d 7a 43 68 61  ;.    for(z=zCha
9370: 72 53 65 74 2c 20 6e 43 68 61 72 3d 30 3b 20 2a  rSet, nChar=0; *
9380: 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a 20 20 20  z; nChar++){.   
9390: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
93a0: 54 46 38 28 7a 29 3b 0a 20 20 20 20 7d 0a 20 20  TF8(z);.    }.  
93b0: 20 20 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b    if( nChar>0 ){
93c0: 0a 20 20 20 20 20 20 61 7a 43 68 61 72 20 3d 20  .      azChar = 
93d0: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
93e0: 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 43 68  ntext, ((i64)nCh
93f0: 61 72 29 2a 28 73 69 7a 65 6f 66 28 63 68 61 72  ar)*(sizeof(char
9400: 2a 29 2b 31 29 29 3b 0a 20 20 20 20 20 20 69 66  *)+1));.      if
9410: 28 20 61 7a 43 68 61 72 3d 3d 30 20 29 7b 0a 20  ( azChar==0 ){. 
9420: 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20         return;. 
9430: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 61 4c 65       }.      aLe
9440: 6e 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68  n = (unsigned ch
9450: 61 72 2a 29 26 61 7a 43 68 61 72 5b 6e 43 68 61  ar*)&azChar[nCha
9460: 72 5d 3b 0a 20 20 20 20 20 20 66 6f 72 28 7a 3d  r];.      for(z=
9470: 7a 43 68 61 72 53 65 74 2c 20 6e 43 68 61 72 3d  zCharSet, nChar=
9480: 30 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b  0; *z; nChar++){
9490: 0a 20 20 20 20 20 20 20 20 61 7a 43 68 61 72 5b  .        azChar[
94a0: 6e 43 68 61 72 5d 20 3d 20 28 75 6e 73 69 67 6e  nChar] = (unsign
94b0: 65 64 20 63 68 61 72 20 2a 29 7a 3b 0a 20 20 20  ed char *)z;.   
94c0: 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50       SQLITE_SKIP
94d0: 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20  _UTF8(z);.      
94e0: 20 20 61 4c 65 6e 5b 6e 43 68 61 72 5d 20 3d 20    aLen[nChar] = 
94f0: 28 75 38 29 28 7a 20 2d 20 61 7a 43 68 61 72 5b  (u8)(z - azChar[
9500: 6e 43 68 61 72 5d 29 3b 0a 20 20 20 20 20 20 7d  nChar]);.      }
9510: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28  .    }.  }.  if(
9520: 20 6e 43 68 61 72 3e 30 20 29 7b 0a 20 20 20 20   nChar>0 ){.    
9530: 66 6c 61 67 73 20 3d 20 53 51 4c 49 54 45 5f 50  flags = SQLITE_P
9540: 54 52 5f 54 4f 5f 49 4e 54 28 73 71 6c 69 74 65  TR_TO_INT(sqlite
9550: 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74  3_user_data(cont
9560: 65 78 74 29 29 3b 0a 20 20 20 20 69 66 28 20 66  ext));.    if( f
9570: 6c 61 67 73 20 26 20 31 20 29 7b 0a 20 20 20 20  lags & 1 ){.    
9580: 20 20 77 68 69 6c 65 28 20 6e 49 6e 3e 30 20 29    while( nIn>0 )
9590: 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 6c 65  {.        int le
95a0: 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 66  n = 0;.        f
95b0: 6f 72 28 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b  or(i=0; i<nChar;
95c0: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20   i++){.         
95d0: 20 6c 65 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a   len = aLen[i];.
95e0: 20 20 20 20 20 20 20 20 20 20 69 66 28 20 6c 65            if( le
95f0: 6e 3c 3d 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70  n<=nIn && memcmp
9600: 28 7a 49 6e 2c 20 61 7a 43 68 61 72 5b 69 5d 2c  (zIn, azChar[i],
9610: 20 6c 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b   len)==0 ) break
9620: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
9630: 20 20 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72      if( i>=nChar
9640: 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20   ) break;.      
9650: 20 20 7a 49 6e 20 2b 3d 20 6c 65 6e 3b 0a 20 20    zIn += len;.  
9660: 20 20 20 20 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e        nIn -= len
9670: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a  ;.      }.    }.
9680: 20 20 20 20 69 66 28 20 66 6c 61 67 73 20 26 20      if( flags & 
9690: 32 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65  2 ){.      while
96a0: 28 20 6e 49 6e 3e 30 20 29 7b 0a 20 20 20 20 20  ( nIn>0 ){.     
96b0: 20 20 20 69 6e 74 20 6c 65 6e 20 3d 20 30 3b 0a     int len = 0;.
96c0: 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b          for(i=0;
96d0: 20 69 3c 6e 43 68 61 72 3b 20 69 2b 2b 29 7b 0a   i<nChar; i++){.
96e0: 20 20 20 20 20 20 20 20 20 20 6c 65 6e 20 3d 20            len = 
96f0: 61 4c 65 6e 5b 69 5d 3b 0a 20 20 20 20 20 20 20  aLen[i];.       
9700: 20 20 20 69 66 28 20 6c 65 6e 3c 3d 6e 49 6e 20     if( len<=nIn 
9710: 26 26 20 6d 65 6d 63 6d 70 28 26 7a 49 6e 5b 6e  && memcmp(&zIn[n
9720: 49 6e 2d 6c 65 6e 5d 2c 61 7a 43 68 61 72 5b 69  In-len],azChar[i
9730: 5d 2c 6c 65 6e 29 3d 3d 30 20 29 20 62 72 65 61  ],len)==0 ) brea
9740: 6b 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  k;.        }.   
9750: 20 20 20 20 20 69 66 28 20 69 3e 3d 6e 43 68 61       if( i>=nCha
9760: 72 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20  r ) break;.     
9770: 20 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20     nIn -= len;. 
9780: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20       }.    }.   
9790: 20 69 66 28 20 7a 43 68 61 72 53 65 74 20 29 7b   if( zCharSet ){
97a0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66  .      sqlite3_f
97b0: 72 65 65 28 61 7a 43 68 61 72 29 3b 0a 20 20 20  ree(azChar);.   
97c0: 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33   }.  }.  sqlite3
97d0: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
97e0: 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 49 6e  text, (char*)zIn
97f0: 2c 20 6e 49 6e 2c 20 53 51 4c 49 54 45 5f 54 52  , nIn, SQLITE_TR
9800: 41 4e 53 49 45 4e 54 29 3b 0a 7d 0a 0a 0a 2f 2a  ANSIENT);.}.../*
9810: 20 49 4d 50 3a 20 52 2d 32 35 33 36 31 2d 31 36   IMP: R-25361-16
9820: 31 35 30 20 54 68 69 73 20 66 75 6e 63 74 69 6f  150 This functio
9830: 6e 20 69 73 20 6f 6d 69 74 74 65 64 20 66 72 6f  n is omitted fro
9840: 6d 20 53 51 4c 69 74 65 20 62 79 20 64 65 66 61  m SQLite by defa
9850: 75 6c 74 2e 20 49 74 0a 2a 2a 20 69 73 20 6f 6e  ult. It.** is on
9860: 6c 79 20 61 76 61 69 6c 61 62 6c 65 20 69 66 20  ly available if 
9870: 74 68 65 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44  the SQLITE_SOUND
9880: 45 58 20 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 20  EX compile-time 
9890: 6f 70 74 69 6f 6e 20 69 73 20 75 73 65 64 0a 2a  option is used.*
98a0: 2a 20 77 68 65 6e 20 53 51 4c 69 74 65 20 69 73  * when SQLite is
98b0: 20 62 75 69 6c 74 2e 0a 2a 2f 0a 23 69 66 64 65   built..*/.#ifde
98c0: 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58  f SQLITE_SOUNDEX
98d0: 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 75 74 65 20 74  ./*.** Compute t
98e0: 68 65 20 73 6f 75 6e 64 65 78 20 65 6e 63 6f 64  he soundex encod
98f0: 69 6e 67 20 6f 66 20 61 20 77 6f 72 64 2e 0a 2a  ing of a word..*
9900: 2a 0a 2a 2a 20 49 4d 50 3a 20 52 2d 35 39 37 38  *.** IMP: R-5978
9910: 32 2d 30 30 30 37 32 20 54 68 65 20 73 6f 75 6e  2-00072 The soun
9920: 64 65 78 28 58 29 20 66 75 6e 63 74 69 6f 6e 20  dex(X) function 
9930: 72 65 74 75 72 6e 73 20 61 20 73 74 72 69 6e 67  returns a string
9940: 20 74 68 61 74 20 69 73 20 74 68 65 0a 2a 2a 20   that is the.** 
9950: 73 6f 75 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67  soundex encoding
9960: 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67 20 58   of the string X
9970: 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  . .*/.static voi
9980: 64 20 73 6f 75 6e 64 65 78 46 75 6e 63 28 0a 20  d soundexFunc(. 
9990: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
99a0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
99b0: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
99c0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
99d0: 0a 20 20 63 68 61 72 20 7a 52 65 73 75 6c 74 5b  .  char zResult[
99e0: 38 5d 3b 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a  8];.  const u8 *
99f0: 7a 49 6e 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b  zIn;.  int i, j;
9a00: 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20  .  static const 
9a10: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 69 43  unsigned char iC
9a20: 6f 64 65 5b 5d 20 3d 20 7b 0a 20 20 20 20 30 2c  ode[] = {.    0,
9a30: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9a40: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9a50: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20  , 0, 0, 0, 0,.  
9a60: 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c    0, 0, 0, 0, 0,
9a70: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9a80: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9a90: 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30  ,.    0, 0, 0, 0
9aa0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9ab0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9ac0: 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20  0, 0,.    0, 0, 
9ad0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9ae0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9af0: 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c   0, 0, 0,.    0,
9b00: 20 30 2c 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20   0, 1, 2, 3, 0, 
9b10: 31 2c 20 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32  1, 2, 0, 0, 2, 2
9b20: 2c 20 34 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20  , 4, 5, 5, 0,.  
9b30: 20 20 31 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c    1, 2, 6, 2, 3,
9b40: 20 30 2c 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20   0, 1, 0, 2, 0, 
9b50: 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  2, 0, 0, 0, 0, 0
9b60: 2c 0a 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 32  ,.    0, 0, 1, 2
9b70: 2c 20 33 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c  , 3, 0, 1, 2, 0,
9b80: 20 30 2c 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20   0, 2, 2, 4, 5, 
9b90: 35 2c 20 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20  5, 0,.    1, 2, 
9ba0: 36 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30  6, 2, 3, 0, 1, 0
9bb0: 2c 20 32 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c  , 2, 0, 2, 0, 0,
9bc0: 20 30 2c 20 30 2c 20 30 2c 0a 20 20 7d 3b 0a 20   0, 0, 0,.  };. 
9bd0: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
9be0: 20 29 3b 0a 20 20 7a 49 6e 20 3d 20 28 75 38 2a   );.  zIn = (u8*
9bf0: 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  )sqlite3_value_t
9c00: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
9c10: 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20 7a 49 6e  if( zIn==0 ) zIn
9c20: 20 3d 20 28 75 38 2a 29 22 22 3b 0a 20 20 66 6f   = (u8*)"";.  fo
9c30: 72 28 69 3d 30 3b 20 7a 49 6e 5b 69 5d 20 26 26  r(i=0; zIn[i] &&
9c40: 20 21 73 71 6c 69 74 65 33 49 73 61 6c 70 68 61   !sqlite3Isalpha
9c50: 28 7a 49 6e 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d  (zIn[i]); i++){}
9c60: 0a 20 20 69 66 28 20 7a 49 6e 5b 69 5d 20 29 7b  .  if( zIn[i] ){
9c70: 0a 20 20 20 20 75 38 20 70 72 65 76 63 6f 64 65  .    u8 prevcode
9c80: 20 3d 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26   = iCode[zIn[i]&
9c90: 30 78 37 66 5d 3b 0a 20 20 20 20 7a 52 65 73 75  0x7f];.    zResu
9ca0: 6c 74 5b 30 5d 20 3d 20 73 71 6c 69 74 65 33 54  lt[0] = sqlite3T
9cb0: 6f 75 70 70 65 72 28 7a 49 6e 5b 69 5d 29 3b 0a  oupper(zIn[i]);.
9cc0: 20 20 20 20 66 6f 72 28 6a 3d 31 3b 20 6a 3c 34      for(j=1; j<4
9cd0: 20 26 26 20 7a 49 6e 5b 69 5d 3b 20 69 2b 2b 29   && zIn[i]; i++)
9ce0: 7b 0a 20 20 20 20 20 20 69 6e 74 20 63 6f 64 65  {.      int code
9cf0: 20 3d 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26   = iCode[zIn[i]&
9d00: 30 78 37 66 5d 3b 0a 20 20 20 20 20 20 69 66 28  0x7f];.      if(
9d10: 20 63 6f 64 65 3e 30 20 29 7b 0a 20 20 20 20 20   code>0 ){.     
9d20: 20 20 20 69 66 28 20 63 6f 64 65 21 3d 70 72 65     if( code!=pre
9d30: 76 63 6f 64 65 20 29 7b 0a 20 20 20 20 20 20 20  vcode ){.       
9d40: 20 20 20 70 72 65 76 63 6f 64 65 20 3d 20 63 6f     prevcode = co
9d50: 64 65 3b 0a 20 20 20 20 20 20 20 20 20 20 7a 52  de;.          zR
9d60: 65 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 63 6f 64  esult[j++] = cod
9d70: 65 20 2b 20 27 30 27 3b 0a 20 20 20 20 20 20 20  e + '0';.       
9d80: 20 7d 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a   }.      }else{.
9d90: 20 20 20 20 20 20 20 20 70 72 65 76 63 6f 64 65          prevcode
9da0: 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20   = 0;.      }.  
9db0: 20 20 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 6a    }.    while( j
9dc0: 3c 34 20 29 7b 0a 20 20 20 20 20 20 7a 52 65 73  <4 ){.      zRes
9dd0: 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 27 30 27 3b 0a  ult[j++] = '0';.
9de0: 20 20 20 20 7d 0a 20 20 20 20 7a 52 65 73 75 6c      }.    zResul
9df0: 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 73 71  t[j] = 0;.    sq
9e00: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
9e10: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 52 65 73 75  t(context, zResu
9e20: 6c 74 2c 20 34 2c 20 53 51 4c 49 54 45 5f 54 52  lt, 4, SQLITE_TR
9e30: 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 65 6c 73  ANSIENT);.  }els
9e40: 65 7b 0a 20 20 20 20 2f 2a 20 49 4d 50 3a 20 52  e{.    /* IMP: R
9e50: 2d 36 34 38 39 34 2d 35 30 33 32 31 20 54 68 65  -64894-50321 The
9e60: 20 73 74 72 69 6e 67 20 22 3f 30 30 30 22 20 69   string "?000" i
9e70: 73 20 72 65 74 75 72 6e 65 64 20 69 66 20 74 68  s returned if th
9e80: 65 20 61 72 67 75 6d 65 6e 74 0a 20 20 20 20 2a  e argument.    *
9e90: 2a 20 69 73 20 4e 55 4c 4c 20 6f 72 20 63 6f 6e  * is NULL or con
9ea0: 74 61 69 6e 73 20 6e 6f 20 41 53 43 49 49 20 61  tains no ASCII a
9eb0: 6c 70 68 61 62 65 74 69 63 20 63 68 61 72 61 63  lphabetic charac
9ec0: 74 65 72 73 2e 20 2a 2f 0a 20 20 20 20 73 71 6c  ters. */.    sql
9ed0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
9ee0: 28 63 6f 6e 74 65 78 74 2c 20 22 3f 30 30 30 22  (context, "?000"
9ef0: 2c 20 34 2c 20 53 51 4c 49 54 45 5f 53 54 41 54  , 4, SQLITE_STAT
9f00: 49 43 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69  IC);.  }.}.#endi
9f10: 66 20 2f 2a 20 53 51 4c 49 54 45 5f 53 4f 55 4e  f /* SQLITE_SOUN
9f20: 44 45 58 20 2a 2f 0a 0a 23 69 66 6e 64 65 66 20  DEX */..#ifndef 
9f30: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44  SQLITE_OMIT_LOAD
9f40: 5f 45 58 54 45 4e 53 49 4f 4e 0a 2f 2a 0a 2a 2a  _EXTENSION./*.**
9f50: 20 41 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74   A function that
9f60: 20 6c 6f 61 64 73 20 61 20 73 68 61 72 65 64 2d   loads a shared-
9f70: 6c 69 62 72 61 72 79 20 65 78 74 65 6e 73 69 6f  library extensio
9f80: 6e 20 74 68 65 6e 20 72 65 74 75 72 6e 73 20 4e  n then returns N
9f90: 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ULL..*/.static v
9fa0: 6f 69 64 20 6c 6f 61 64 45 78 74 28 73 71 6c 69  oid loadExt(sqli
9fb0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
9fc0: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20  text, int argc, 
9fd0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
9fe0: 61 72 67 76 29 7b 0a 20 20 63 6f 6e 73 74 20 63  argv){.  const c
9ff0: 68 61 72 20 2a 7a 46 69 6c 65 20 3d 20 28 63 6f  har *zFile = (co
a000: 6e 73 74 20 63 68 61 72 20 2a 29 73 71 6c 69 74  nst char *)sqlit
a010: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
a020: 67 76 5b 30 5d 29 3b 0a 20 20 63 6f 6e 73 74 20  gv[0]);.  const 
a030: 63 68 61 72 20 2a 7a 50 72 6f 63 3b 0a 20 20 73  char *zProc;.  s
a040: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c  qlite3 *db = sql
a050: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
a060: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b  handle(context);
a070: 0a 20 20 63 68 61 72 20 2a 7a 45 72 72 4d 73 67  .  char *zErrMsg
a080: 20 3d 20 30 3b 0a 0a 20 20 69 66 28 20 61 72 67   = 0;..  if( arg
a090: 63 3d 3d 32 20 29 7b 0a 20 20 20 20 7a 50 72 6f  c==2 ){.    zPro
a0a0: 63 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 20  c = (const char 
a0b0: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  *)sqlite3_value_
a0c0: 74 65 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20  text(argv[1]);. 
a0d0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 50 72 6f   }else{.    zPro
a0e0: 63 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28  c = 0;.  }.  if(
a0f0: 20 7a 46 69 6c 65 20 26 26 20 73 71 6c 69 74 65   zFile && sqlite
a100: 33 5f 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e  3_load_extension
a110: 28 64 62 2c 20 7a 46 69 6c 65 2c 20 7a 50 72 6f  (db, zFile, zPro
a120: 63 2c 20 26 7a 45 72 72 4d 73 67 29 20 29 7b 0a  c, &zErrMsg) ){.
a130: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
a140: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
a150: 2c 20 7a 45 72 72 4d 73 67 2c 20 2d 31 29 3b 0a  , zErrMsg, -1);.
a160: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
a170: 28 7a 45 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 7d  (zErrMsg);.  }.}
a180: 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20  .#endif.../*.** 
a190: 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74  An instance of t
a1a0: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72  he following str
a1b0: 75 63 74 75 72 65 20 68 6f 6c 64 73 20 74 68 65  ucture holds the
a1c0: 20 63 6f 6e 74 65 78 74 20 6f 66 20 61 0a 2a 2a   context of a.**
a1d0: 20 73 75 6d 28 29 20 6f 72 20 61 76 67 28 29 20   sum() or avg() 
a1e0: 61 67 67 72 65 67 61 74 65 20 63 6f 6d 70 75 74  aggregate comput
a1f0: 61 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65  ation..*/.typede
a200: 66 20 73 74 72 75 63 74 20 53 75 6d 43 74 78 20  f struct SumCtx 
a210: 53 75 6d 43 74 78 3b 0a 73 74 72 75 63 74 20 53  SumCtx;.struct S
a220: 75 6d 43 74 78 20 7b 0a 20 20 64 6f 75 62 6c 65  umCtx {.  double
a230: 20 72 53 75 6d 3b 20 20 20 20 20 20 2f 2a 20 46   rSum;      /* F
a240: 6c 6f 61 74 69 6e 67 20 70 6f 69 6e 74 20 73 75  loating point su
a250: 6d 20 2a 2f 0a 20 20 69 36 34 20 69 53 75 6d 3b  m */.  i64 iSum;
a260: 20 20 20 20 20 20 20 20 20 2f 2a 20 49 6e 74 65           /* Inte
a270: 67 65 72 20 73 75 6d 20 2a 2f 20 20 20 0a 20 20  ger sum */   .  
a280: 69 36 34 20 63 6e 74 3b 20 20 20 20 20 20 20 20  i64 cnt;        
a290: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 65    /* Number of e
a2a0: 6c 65 6d 65 6e 74 73 20 73 75 6d 6d 65 64 20 2a  lements summed *
a2b0: 2f 0a 20 20 75 38 20 6f 76 65 72 66 6c 6f 77 3b  /.  u8 overflow;
a2c0: 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66        /* True if
a2d0: 20 69 6e 74 65 67 65 72 20 6f 76 65 72 66 6c 6f   integer overflo
a2e0: 77 20 73 65 65 6e 20 2a 2f 0a 20 20 75 38 20 61  w seen */.  u8 a
a2f0: 70 70 72 6f 78 3b 20 20 20 20 20 20 20 20 2f 2a  pprox;        /*
a300: 20 54 72 75 65 20 69 66 20 6e 6f 6e 2d 69 6e 74   True if non-int
a310: 65 67 65 72 20 76 61 6c 75 65 20 77 61 73 20 69  eger value was i
a320: 6e 70 75 74 20 74 6f 20 74 68 65 20 73 75 6d 20  nput to the sum 
a330: 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75  */.};../*.** Rou
a340: 74 69 6e 65 73 20 75 73 65 64 20 74 6f 20 63 6f  tines used to co
a350: 6d 70 75 74 65 20 74 68 65 20 73 75 6d 2c 20 61  mpute the sum, a
a360: 76 65 72 61 67 65 2c 20 61 6e 64 20 74 6f 74 61  verage, and tota
a370: 6c 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 53 55 4d  l..**.** The SUM
a380: 28 29 20 66 75 6e 63 74 69 6f 6e 20 66 6f 6c 6c  () function foll
a390: 6f 77 73 20 74 68 65 20 28 62 72 6f 6b 65 6e 29  ows the (broken)
a3a0: 20 53 51 4c 20 73 74 61 6e 64 61 72 64 20 77 68   SQL standard wh
a3b0: 69 63 68 20 6d 65 61 6e 73 0a 2a 2a 20 74 68 61  ich means.** tha
a3c0: 74 20 69 74 20 72 65 74 75 72 6e 73 20 4e 55 4c  t it returns NUL
a3d0: 4c 20 69 66 20 69 74 20 73 75 6d 73 20 6f 76 65  L if it sums ove
a3e0: 72 20 6e 6f 20 69 6e 70 75 74 73 2e 20 20 54 4f  r no inputs.  TO
a3f0: 54 41 4c 20 72 65 74 75 72 6e 73 0a 2a 2a 20 30  TAL returns.** 0
a400: 2e 30 20 69 6e 20 74 68 61 74 20 63 61 73 65 2e  .0 in that case.
a410: 20 20 49 6e 20 61 64 64 69 74 69 6f 6e 2c 20 54    In addition, T
a420: 4f 54 41 4c 20 61 6c 77 61 79 73 20 72 65 74 75  OTAL always retu
a430: 72 6e 73 20 61 20 66 6c 6f 61 74 20 77 68 65 72  rns a float wher
a440: 65 0a 2a 2a 20 53 55 4d 20 6d 69 67 68 74 20 72  e.** SUM might r
a450: 65 74 75 72 6e 20 61 6e 20 69 6e 74 65 67 65 72  eturn an integer
a460: 20 69 66 20 69 74 20 6e 65 76 65 72 20 65 6e 63   if it never enc
a470: 6f 75 6e 74 65 72 73 20 61 20 66 6c 6f 61 74 69  ounters a floati
a480: 6e 67 20 70 6f 69 6e 74 0a 2a 2a 20 76 61 6c 75  ng point.** valu
a490: 65 2e 20 20 54 4f 54 41 4c 20 6e 65 76 65 72 20  e.  TOTAL never 
a4a0: 66 61 69 6c 73 2c 20 62 75 74 20 53 55 4d 20 6d  fails, but SUM m
a4b0: 69 67 68 74 20 74 68 72 6f 75 67 68 20 61 6e 20  ight through an 
a4c0: 65 78 63 65 70 74 69 6f 6e 20 69 66 0a 2a 2a 20  exception if.** 
a4d0: 69 74 20 6f 76 65 72 66 6c 6f 77 73 20 61 6e 20  it overflows an 
a4e0: 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a 73 74 61 74  integer..*/.stat
a4f0: 69 63 20 76 6f 69 64 20 73 75 6d 53 74 65 70 28  ic void sumStep(
a500: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
a510: 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72  *context, int ar
a520: 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  gc, sqlite3_valu
a530: 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 53 75 6d  e **argv){.  Sum
a540: 43 74 78 20 2a 70 3b 0a 20 20 69 6e 74 20 74 79  Ctx *p;.  int ty
a550: 70 65 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72  pe;.  assert( ar
a560: 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45  gc==1 );.  UNUSE
a570: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
a580: 29 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  );.  p = sqlite3
a590: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
a5a0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65  xt(context, size
a5b0: 6f 66 28 2a 70 29 29 3b 0a 20 20 74 79 70 65 20  of(*p));.  type 
a5c0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
a5d0: 6e 75 6d 65 72 69 63 5f 74 79 70 65 28 61 72 67  numeric_type(arg
a5e0: 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 70 20 26  v[0]);.  if( p &
a5f0: 26 20 74 79 70 65 21 3d 53 51 4c 49 54 45 5f 4e  & type!=SQLITE_N
a600: 55 4c 4c 20 29 7b 0a 20 20 20 20 70 2d 3e 63 6e  ULL ){.    p->cn
a610: 74 2b 2b 3b 0a 20 20 20 20 69 66 28 20 74 79 70  t++;.    if( typ
a620: 65 3d 3d 53 51 4c 49 54 45 5f 49 4e 54 45 47 45  e==SQLITE_INTEGE
a630: 52 20 29 7b 0a 20 20 20 20 20 20 69 36 34 20 76  R ){.      i64 v
a640: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
a650: 5f 69 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b  _int64(argv[0]);
a660: 0a 20 20 20 20 20 20 70 2d 3e 72 53 75 6d 20 2b  .      p->rSum +
a670: 3d 20 76 3b 0a 20 20 20 20 20 20 69 66 28 20 28  = v;.      if( (
a680: 70 2d 3e 61 70 70 72 6f 78 7c 70 2d 3e 6f 76 65  p->approx|p->ove
a690: 72 66 6c 6f 77 29 3d 3d 30 20 26 26 20 73 71 6c  rflow)==0 && sql
a6a0: 69 74 65 33 41 64 64 49 6e 74 36 34 28 26 70 2d  ite3AddInt64(&p-
a6b0: 3e 69 53 75 6d 2c 20 76 29 20 29 7b 0a 20 20 20  >iSum, v) ){.   
a6c0: 20 20 20 20 20 70 2d 3e 6f 76 65 72 66 6c 6f 77       p->overflow
a6d0: 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20   = 1;.      }.  
a6e0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 70    }else{.      p
a6f0: 2d 3e 72 53 75 6d 20 2b 3d 20 73 71 6c 69 74 65  ->rSum += sqlite
a700: 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61  3_value_double(a
a710: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 70  rgv[0]);.      p
a720: 2d 3e 61 70 70 72 6f 78 20 3d 20 31 3b 0a 20 20  ->approx = 1;.  
a730: 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63    }.  }.}.static
a740: 20 76 6f 69 64 20 73 75 6d 46 69 6e 61 6c 69 7a   void sumFinaliz
a750: 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  e(sqlite3_contex
a760: 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53  t *context){.  S
a770: 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20  umCtx *p;.  p = 
a780: 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74  sqlite3_aggregat
a790: 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78  e_context(contex
a7a0: 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 20 26  t, 0);.  if( p &
a7b0: 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20 20  & p->cnt>0 ){.  
a7c0: 20 20 69 66 28 20 70 2d 3e 6f 76 65 72 66 6c 6f    if( p->overflo
a7d0: 77 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  w ){.      sqlit
a7e0: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28  e3_result_error(
a7f0: 63 6f 6e 74 65 78 74 2c 22 69 6e 74 65 67 65 72  context,"integer
a800: 20 6f 76 65 72 66 6c 6f 77 22 2c 2d 31 29 3b 0a   overflow",-1);.
a810: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 70 2d      }else if( p-
a820: 3e 61 70 70 72 6f 78 20 29 7b 0a 20 20 20 20 20  >approx ){.     
a830: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
a840: 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20  double(context, 
a850: 70 2d 3e 72 53 75 6d 29 3b 0a 20 20 20 20 7d 65  p->rSum);.    }e
a860: 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  lse{.      sqlit
a870: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28  e3_result_int64(
a880: 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 69 53 75 6d  context, p->iSum
a890: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73  );.    }.  }.}.s
a8a0: 74 61 74 69 63 20 76 6f 69 64 20 61 76 67 46 69  tatic void avgFi
a8b0: 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63  nalize(sqlite3_c
a8c0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29  ontext *context)
a8d0: 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20  {.  SumCtx *p;. 
a8e0: 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67   p = sqlite3_agg
a8f0: 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63  regate_context(c
a900: 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66  ontext, 0);.  if
a910: 28 20 70 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20  ( p && p->cnt>0 
a920: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
a930: 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e  esult_double(con
a940: 74 65 78 74 2c 20 70 2d 3e 72 53 75 6d 2f 28 64  text, p->rSum/(d
a950: 6f 75 62 6c 65 29 70 2d 3e 63 6e 74 29 3b 0a 20  ouble)p->cnt);. 
a960: 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64   }.}.static void
a970: 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a 65 28 73   totalFinalize(s
a980: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
a990: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d 43  context){.  SumC
a9a0: 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c  tx *p;.  p = sql
a9b0: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
a9c0: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
a9d0: 30 29 3b 0a 20 20 2f 2a 20 28 64 6f 75 62 6c 65  0);.  /* (double
a9e0: 29 30 20 49 6e 20 63 61 73 65 20 6f 66 20 53 51  )0 In case of SQ
a9f0: 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49  LITE_OMIT_FLOATI
aa00: 4e 47 5f 50 4f 49 4e 54 2e 2e 2e 20 2a 2f 0a 20  NG_POINT... */. 
aa10: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
aa20: 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20  double(context, 
aa30: 70 20 3f 20 70 2d 3e 72 53 75 6d 20 3a 20 28 64  p ? p->rSum : (d
aa40: 6f 75 62 6c 65 29 30 29 3b 0a 7d 0a 0a 2f 2a 0a  ouble)0);.}../*.
aa50: 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67  ** The following
aa60: 20 73 74 72 75 63 74 75 72 65 20 6b 65 65 70 73   structure keeps
aa70: 20 74 72 61 63 6b 20 6f 66 20 73 74 61 74 65 20   track of state 
aa80: 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20  information for 
aa90: 74 68 65 0a 2a 2a 20 63 6f 75 6e 74 28 29 20 61  the.** count() a
aaa0: 67 67 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f  ggregate functio
aab0: 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74  n..*/.typedef st
aac0: 72 75 63 74 20 43 6f 75 6e 74 43 74 78 20 43 6f  ruct CountCtx Co
aad0: 75 6e 74 43 74 78 3b 0a 73 74 72 75 63 74 20 43  untCtx;.struct C
aae0: 6f 75 6e 74 43 74 78 20 7b 0a 20 20 69 36 34 20  ountCtx {.  i64 
aaf0: 6e 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75  n;.};../*.** Rou
ab00: 74 69 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65  tines to impleme
ab10: 6e 74 20 74 68 65 20 63 6f 75 6e 74 28 29 20 61  nt the count() a
ab20: 67 67 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f  ggregate functio
ab30: 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  n..*/.static voi
ab40: 64 20 63 6f 75 6e 74 53 74 65 70 28 73 71 6c 69  d countStep(sqli
ab50: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
ab60: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20  text, int argc, 
ab70: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
ab80: 61 72 67 76 29 7b 0a 20 20 43 6f 75 6e 74 43 74  argv){.  CountCt
ab90: 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69  x *p;.  p = sqli
aba0: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
abb0: 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  ntext(context, s
abc0: 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 69 66  izeof(*p));.  if
abd0: 28 20 28 61 72 67 63 3d 3d 30 20 7c 7c 20 53 51  ( (argc==0 || SQ
abe0: 4c 49 54 45 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74  LITE_NULL!=sqlit
abf0: 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72  e3_value_type(ar
ac00: 67 76 5b 30 5d 29 29 20 26 26 20 70 20 29 7b 0a  gv[0])) && p ){.
ac10: 20 20 20 20 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a      p->n++;.  }.
ac20: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f  .#ifndef SQLITE_
ac30: 4f 4d 49 54 5f 44 45 50 52 45 43 41 54 45 44 0a  OMIT_DEPRECATED.
ac40: 20 20 2f 2a 20 54 68 65 20 73 71 6c 69 74 65 33    /* The sqlite3
ac50: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 75 6e 74  _aggregate_count
ac60: 28 29 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 64  () function is d
ac70: 65 70 72 65 63 61 74 65 64 2e 20 20 42 75 74 20  eprecated.  But 
ac80: 6a 75 73 74 20 74 6f 20 6d 61 6b 65 0a 20 20 2a  just to make.  *
ac90: 2a 20 73 75 72 65 20 69 74 20 73 74 69 6c 6c 20  * sure it still 
aca0: 6f 70 65 72 61 74 65 73 20 63 6f 72 72 65 63 74  operates correct
acb0: 6c 79 2c 20 76 65 72 69 66 79 20 74 68 61 74 20  ly, verify that 
acc0: 69 74 73 20 63 6f 75 6e 74 20 61 67 72 65 65 73  its count agrees
acd0: 20 77 69 74 68 20 6f 75 72 20 0a 20 20 2a 2a 20   with our .  ** 
ace0: 69 6e 74 65 72 6e 61 6c 20 63 6f 75 6e 74 20 77  internal count w
acf0: 68 65 6e 20 75 73 69 6e 67 20 63 6f 75 6e 74 28  hen using count(
ad00: 2a 29 20 61 6e 64 20 77 68 65 6e 20 74 68 65 20  *) and when the 
ad10: 74 6f 74 61 6c 20 63 6f 75 6e 74 20 63 61 6e 20  total count can 
ad20: 62 65 0a 20 20 2a 2a 20 65 78 70 72 65 73 73 65  be.  ** expresse
ad30: 64 20 61 73 20 61 20 33 32 2d 62 69 74 20 69 6e  d as a 32-bit in
ad40: 74 65 67 65 72 2e 20 2a 2f 0a 20 20 61 73 73 65  teger. */.  asse
ad50: 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20 70  rt( argc==1 || p
ad60: 3d 3d 30 20 7c 7c 20 70 2d 3e 6e 3e 30 78 37 66  ==0 || p->n>0x7f
ad70: 66 66 66 66 66 66 0a 20 20 20 20 20 20 20 20 20  ffffff.         
ad80: 20 7c 7c 20 70 2d 3e 6e 3d 3d 73 71 6c 69 74 65   || p->n==sqlite
ad90: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 75 6e  3_aggregate_coun
ada0: 74 28 63 6f 6e 74 65 78 74 29 20 29 3b 0a 23 65  t(context) );.#e
adb0: 6e 64 69 66 0a 7d 20 20 20 0a 73 74 61 74 69 63  ndif.}   .static
adc0: 20 76 6f 69 64 20 63 6f 75 6e 74 46 69 6e 61 6c   void countFinal
add0: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
ade0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
adf0: 20 43 6f 75 6e 74 43 74 78 20 2a 70 3b 0a 20 20   CountCtx *p;.  
ae00: 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72  p = sqlite3_aggr
ae10: 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f  egate_context(co
ae20: 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 73 71 6c  ntext, 0);.  sql
ae30: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36  ite3_result_int6
ae40: 34 28 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20 70  4(context, p ? p
ae50: 2d 3e 6e 20 3a 20 30 29 3b 0a 7d 0a 0a 2f 2a 0a  ->n : 0);.}../*.
ae60: 2a 2a 20 52 6f 75 74 69 6e 65 73 20 74 6f 20 69  ** Routines to i
ae70: 6d 70 6c 65 6d 65 6e 74 20 6d 69 6e 28 29 20 61  mplement min() a
ae80: 6e 64 20 6d 61 78 28 29 20 61 67 67 72 65 67 61  nd max() aggrega
ae90: 74 65 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f  te functions..*/
aea0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d 69 6e  .static void min
aeb0: 6d 61 78 53 74 65 70 28 0a 20 20 73 71 6c 69 74  maxStep(.  sqlit
aec0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
aed0: 65 78 74 2c 20 0a 20 20 69 6e 74 20 4e 6f 74 55  ext, .  int NotU
aee0: 73 65 64 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f  sed, .  sqlite3_
aef0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
af00: 20 20 4d 65 6d 20 2a 70 41 72 67 20 20 3d 20 28    Mem *pArg  = (
af10: 4d 65 6d 20 2a 29 61 72 67 76 5b 30 5d 3b 0a 20  Mem *)argv[0];. 
af20: 20 4d 65 6d 20 2a 70 42 65 73 74 3b 0a 20 20 55   Mem *pBest;.  U
af30: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
af40: 4e 6f 74 55 73 65 64 29 3b 0a 0a 20 20 70 42 65  NotUsed);..  pBe
af50: 73 74 20 3d 20 28 4d 65 6d 20 2a 29 73 71 6c 69  st = (Mem *)sqli
af60: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
af70: 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  ntext(context, s
af80: 69 7a 65 6f 66 28 2a 70 42 65 73 74 29 29 3b 0a  izeof(*pBest));.
af90: 20 20 69 66 28 20 21 70 42 65 73 74 20 29 20 72    if( !pBest ) r
afa0: 65 74 75 72 6e 3b 0a 0a 20 20 69 66 28 20 73 71  eturn;..  if( sq
afb0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
afc0: 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54  (argv[0])==SQLIT
afd0: 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 69 66  E_NULL ){.    if
afe0: 28 20 70 42 65 73 74 2d 3e 66 6c 61 67 73 20 29  ( pBest->flags )
aff0: 20 73 71 6c 69 74 65 33 53 6b 69 70 41 63 63 75   sqlite3SkipAccu
b000: 6d 75 6c 61 74 6f 72 4c 6f 61 64 28 63 6f 6e 74  mulatorLoad(cont
b010: 65 78 74 29 3b 0a 20 20 7d 65 6c 73 65 20 69 66  ext);.  }else if
b020: 28 20 70 42 65 73 74 2d 3e 66 6c 61 67 73 20 29  ( pBest->flags )
b030: 7b 0a 20 20 20 20 69 6e 74 20 6d 61 78 3b 0a 20  {.    int max;. 
b040: 20 20 20 69 6e 74 20 63 6d 70 3b 0a 20 20 20 20     int cmp;.    
b050: 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d  CollSeq *pColl =
b060: 20 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43   sqlite3GetFuncC
b070: 6f 6c 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b  ollSeq(context);
b080: 0a 20 20 20 20 2f 2a 20 54 68 69 73 20 73 74 65  .    /* This ste
b090: 70 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73  p function is us
b0a0: 65 64 20 66 6f 72 20 62 6f 74 68 20 74 68 65 20  ed for both the 
b0b0: 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20  min() and max() 
b0c0: 61 67 67 72 65 67 61 74 65 73 2c 0a 20 20 20 20  aggregates,.    
b0d0: 2a 2a 20 74 68 65 20 6f 6e 6c 79 20 64 69 66 66  ** the only diff
b0e0: 65 72 65 6e 63 65 20 62 65 74 77 65 65 6e 20 74  erence between t
b0f0: 68 65 20 74 77 6f 20 62 65 69 6e 67 20 74 68 61  he two being tha
b100: 74 20 74 68 65 20 73 65 6e 73 65 20 6f 66 20 74  t the sense of t
b110: 68 65 0a 20 20 20 20 2a 2a 20 63 6f 6d 70 61 72  he.    ** compar
b120: 69 73 6f 6e 20 69 73 20 69 6e 76 65 72 74 65 64  ison is inverted
b130: 2e 20 46 6f 72 20 74 68 65 20 6d 61 78 28 29 20  . For the max() 
b140: 61 67 67 72 65 67 61 74 65 2c 20 74 68 65 0a 20  aggregate, the. 
b150: 20 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 75 73     ** sqlite3_us
b160: 65 72 5f 64 61 74 61 28 29 20 66 75 6e 63 74 69  er_data() functi
b170: 6f 6e 20 72 65 74 75 72 6e 73 20 28 76 6f 69 64  on returns (void
b180: 20 2a 29 2d 31 2e 20 46 6f 72 20 6d 69 6e 28 29   *)-1. For min()
b190: 20 69 74 0a 20 20 20 20 2a 2a 20 72 65 74 75 72   it.    ** retur
b1a0: 6e 73 20 28 76 6f 69 64 20 2a 29 64 62 2c 20 77  ns (void *)db, w
b1b0: 68 65 72 65 20 64 62 20 69 73 20 74 68 65 20 73  here db is the s
b1c0: 71 6c 69 74 65 33 2a 20 64 61 74 61 62 61 73 65  qlite3* database
b1d0: 20 70 6f 69 6e 74 65 72 2e 0a 20 20 20 20 2a 2a   pointer..    **
b1e0: 20 54 68 65 72 65 66 6f 72 65 20 74 68 65 20 6e   Therefore the n
b1f0: 65 78 74 20 73 74 61 74 65 6d 65 6e 74 20 73 65  ext statement se
b200: 74 73 20 76 61 72 69 61 62 6c 65 20 27 6d 61 78  ts variable 'max
b210: 27 20 74 6f 20 31 20 66 6f 72 20 74 68 65 20 6d  ' to 1 for the m
b220: 61 78 28 29 0a 20 20 20 20 2a 2a 20 61 67 67 72  ax().    ** aggr
b230: 65 67 61 74 65 2c 20 6f 72 20 30 20 66 6f 72 20  egate, or 0 for 
b240: 6d 69 6e 28 29 2e 0a 20 20 20 20 2a 2f 0a 20 20  min()..    */.  
b250: 20 20 6d 61 78 20 3d 20 73 71 6c 69 74 65 33 5f    max = sqlite3_
b260: 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78  user_data(contex
b270: 74 29 21 3d 30 3b 0a 20 20 20 20 63 6d 70 20 3d  t)!=0;.    cmp =
b280: 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61   sqlite3MemCompa
b290: 72 65 28 70 42 65 73 74 2c 20 70 41 72 67 2c 20  re(pBest, pArg, 
b2a0: 70 43 6f 6c 6c 29 3b 0a 20 20 20 20 69 66 28 20  pColl);.    if( 
b2b0: 28 6d 61 78 20 26 26 20 63 6d 70 3c 30 29 20 7c  (max && cmp<0) |
b2c0: 7c 20 28 21 6d 61 78 20 26 26 20 63 6d 70 3e 30  | (!max && cmp>0
b2d0: 29 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  ) ){.      sqlit
b2e0: 65 33 56 64 62 65 4d 65 6d 43 6f 70 79 28 70 42  e3VdbeMemCopy(pB
b2f0: 65 73 74 2c 20 70 41 72 67 29 3b 0a 20 20 20 20  est, pArg);.    
b300: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c  }else{.      sql
b310: 69 74 65 33 53 6b 69 70 41 63 63 75 6d 75 6c 61  ite3SkipAccumula
b320: 74 6f 72 4c 6f 61 64 28 63 6f 6e 74 65 78 74 29  torLoad(context)
b330: 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b  ;.    }.  }else{
b340: 0a 20 20 20 20 70 42 65 73 74 2d 3e 64 62 20 3d  .    pBest->db =
b350: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
b360: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
b370: 78 74 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  xt);.    sqlite3
b380: 56 64 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73  VdbeMemCopy(pBes
b390: 74 2c 20 70 41 72 67 29 3b 0a 20 20 7d 0a 7d 0a  t, pArg);.  }.}.
b3a0: 73 74 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 4d  static void minM
b3b0: 61 78 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  axFinalize(sqlit
b3c0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
b3d0: 65 78 74 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f  ext){.  sqlite3_
b3e0: 76 61 6c 75 65 20 2a 70 52 65 73 3b 0a 20 20 70  value *pRes;.  p
b3f0: 52 65 73 20 3d 20 28 73 71 6c 69 74 65 33 5f 76  Res = (sqlite3_v
b400: 61 6c 75 65 20 2a 29 73 71 6c 69 74 65 33 5f 61  alue *)sqlite3_a
b410: 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74  ggregate_context
b420: 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20  (context, 0);.  
b430: 69 66 28 20 70 52 65 73 20 29 7b 0a 20 20 20 20  if( pRes ){.    
b440: 69 66 28 20 70 52 65 73 2d 3e 66 6c 61 67 73 20  if( pRes->flags 
b450: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
b460: 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f  _result_value(co
b470: 6e 74 65 78 74 2c 20 70 52 65 73 29 3b 0a 20 20  ntext, pRes);.  
b480: 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 56    }.    sqlite3V
b490: 64 62 65 4d 65 6d 52 65 6c 65 61 73 65 28 70 52  dbeMemRelease(pR
b4a0: 65 73 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  es);.  }.}../*.*
b4b0: 2a 20 67 72 6f 75 70 5f 63 6f 6e 63 61 74 28 45  * group_concat(E
b4c0: 58 50 52 2c 20 3f 53 45 50 41 52 41 54 4f 52 3f  XPR, ?SEPARATOR?
b4d0: 29 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ).*/.static void
b4e0: 20 67 72 6f 75 70 43 6f 6e 63 61 74 53 74 65 70   groupConcatStep
b4f0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
b500: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
b510: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
b520: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
b530: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  .){.  const char
b540: 20 2a 7a 56 61 6c 3b 0a 20 20 53 74 72 41 63 63   *zVal;.  StrAcc
b550: 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20 63 6f  um *pAccum;.  co
b560: 6e 73 74 20 63 68 61 72 20 2a 7a 53 65 70 3b 0a  nst char *zSep;.
b570: 20 20 69 6e 74 20 6e 56 61 6c 2c 20 6e 53 65 70    int nVal, nSep
b580: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
b590: 3d 3d 31 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29  ==1 || argc==2 )
b5a0: 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f  ;.  if( sqlite3_
b5b0: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
b5c0: 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  0])==SQLITE_NULL
b5d0: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 70 41 63   ) return;.  pAc
b5e0: 63 75 6d 20 3d 20 28 53 74 72 41 63 63 75 6d 2a  cum = (StrAccum*
b5f0: 29 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61  )sqlite3_aggrega
b600: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
b610: 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 41 63 63  xt, sizeof(*pAcc
b620: 75 6d 29 29 3b 0a 0a 20 20 69 66 28 20 70 41 63  um));..  if( pAc
b630: 63 75 6d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  cum ){.    sqlit
b640: 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33  e3 *db = sqlite3
b650: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
b660: 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  le(context);.   
b670: 20 69 6e 74 20 66 69 72 73 74 54 65 72 6d 20 3d   int firstTerm =
b680: 20 70 41 63 63 75 6d 2d 3e 75 73 65 4d 61 6c 6c   pAccum->useMall
b690: 6f 63 3d 3d 30 3b 0a 20 20 20 20 70 41 63 63 75  oc==0;.    pAccu
b6a0: 6d 2d 3e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 32  m->useMalloc = 2
b6b0: 3b 0a 20 20 20 20 70 41 63 63 75 6d 2d 3e 6d 78  ;.    pAccum->mx
b6c0: 41 6c 6c 6f 63 20 3d 20 64 62 2d 3e 61 4c 69 6d  Alloc = db->aLim
b6d0: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
b6e0: 4c 45 4e 47 54 48 5d 3b 0a 20 20 20 20 69 66 28  LENGTH];.    if(
b6f0: 20 21 66 69 72 73 74 54 65 72 6d 20 29 7b 0a 20   !firstTerm ){. 
b700: 20 20 20 20 20 69 66 28 20 61 72 67 63 3d 3d 32       if( argc==2
b710: 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 53 65 70   ){.        zSep
b720: 20 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65   = (char*)sqlite
b730: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
b740: 76 5b 31 5d 29 3b 0a 20 20 20 20 20 20 20 20 6e  v[1]);.        n
b750: 53 65 70 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  Sep = sqlite3_va
b760: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 31  lue_bytes(argv[1
b770: 5d 29 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b  ]);.      }else{
b780: 0a 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d 20  .        zSep = 
b790: 22 2c 22 3b 0a 20 20 20 20 20 20 20 20 6e 53 65  ",";.        nSe
b7a0: 70 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20  p = 1;.      }. 
b7b0: 20 20 20 20 20 69 66 28 20 6e 53 65 70 20 29 20       if( nSep ) 
b7c0: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41  sqlite3StrAccumA
b7d0: 70 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 53  ppend(pAccum, zS
b7e0: 65 70 2c 20 6e 53 65 70 29 3b 0a 20 20 20 20 7d  ep, nSep);.    }
b7f0: 0a 20 20 20 20 7a 56 61 6c 20 3d 20 28 63 68 61  .    zVal = (cha
b800: 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  r*)sqlite3_value
b810: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
b820: 20 20 20 20 6e 56 61 6c 20 3d 20 73 71 6c 69 74      nVal = sqlit
b830: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
b840: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28  rgv[0]);.    if(
b850: 20 7a 56 61 6c 20 29 20 73 71 6c 69 74 65 33 53   zVal ) sqlite3S
b860: 74 72 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41  trAccumAppend(pA
b870: 63 63 75 6d 2c 20 7a 56 61 6c 2c 20 6e 56 61 6c  ccum, zVal, nVal
b880: 29 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20  );.  }.}.static 
b890: 76 6f 69 64 20 67 72 6f 75 70 43 6f 6e 63 61 74  void groupConcat
b8a0: 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33  Finalize(sqlite3
b8b0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
b8c0: 74 29 7b 0a 20 20 53 74 72 41 63 63 75 6d 20 2a  t){.  StrAccum *
b8d0: 70 41 63 63 75 6d 3b 0a 20 20 70 41 63 63 75 6d  pAccum;.  pAccum
b8e0: 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65   = sqlite3_aggre
b8f0: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
b900: 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20  text, 0);.  if( 
b910: 70 41 63 63 75 6d 20 29 7b 0a 20 20 20 20 69 66  pAccum ){.    if
b920: 28 20 70 41 63 63 75 6d 2d 3e 61 63 63 45 72 72  ( pAccum->accErr
b930: 6f 72 3d 3d 53 54 52 41 43 43 55 4d 5f 54 4f 4f  or==STRACCUM_TOO
b940: 42 49 47 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  BIG ){.      sql
b950: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
b960: 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74  r_toobig(context
b970: 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28  );.    }else if(
b980: 20 70 41 63 63 75 6d 2d 3e 61 63 63 45 72 72 6f   pAccum->accErro
b990: 72 3d 3d 53 54 52 41 43 43 55 4d 5f 4e 4f 4d 45  r==STRACCUM_NOME
b9a0: 4d 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  M ){.      sqlit
b9b0: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
b9c0: 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a  nomem(context);.
b9d0: 20 20 20 20 7d 65 6c 73 65 7b 20 20 20 20 0a 20      }else{    . 
b9e0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
b9f0: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
ba00: 2c 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75  , sqlite3StrAccu
ba10: 6d 46 69 6e 69 73 68 28 70 41 63 63 75 6d 29 2c  mFinish(pAccum),
ba20: 20 2d 31 2c 20 0a 20 20 20 20 20 20 20 20 20 20   -1, .          
ba30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ba40: 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20  sqlite3_free);. 
ba50: 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a     }.  }.}../*.*
ba60: 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 64  * This routine d
ba70: 6f 65 73 20 70 65 72 2d 63 6f 6e 6e 65 63 74 69  oes per-connecti
ba80: 6f 6e 20 66 75 6e 63 74 69 6f 6e 20 72 65 67 69  on function regi
ba90: 73 74 72 61 74 69 6f 6e 2e 20 20 4d 6f 73 74 0a  stration.  Most.
baa0: 2a 2a 20 6f 66 20 74 68 65 20 62 75 69 6c 74 2d  ** of the built-
bab0: 69 6e 20 66 75 6e 63 74 69 6f 6e 73 20 61 62 6f  in functions abo
bac0: 76 65 20 61 72 65 20 70 61 72 74 20 6f 66 20 74  ve are part of t
bad0: 68 65 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69  he global functi
bae0: 6f 6e 20 73 65 74 2e 0a 2a 2a 20 54 68 69 73 20  on set..** This 
baf0: 72 6f 75 74 69 6e 65 20 6f 6e 6c 79 20 64 65 61  routine only dea
bb00: 6c 73 20 77 69 74 68 20 74 68 6f 73 65 20 74 68  ls with those th
bb10: 61 74 20 61 72 65 20 6e 6f 74 20 67 6c 6f 62 61  at are not globa
bb20: 6c 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74  l..*/.void sqlit
bb30: 65 33 52 65 67 69 73 74 65 72 42 75 69 6c 74 69  e3RegisterBuilti
bb40: 6e 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74  nFunctions(sqlit
bb50: 65 33 20 2a 64 62 29 7b 0a 20 20 69 6e 74 20 72  e3 *db){.  int r
bb60: 63 20 3d 20 73 71 6c 69 74 65 33 5f 6f 76 65 72  c = sqlite3_over
bb70: 6c 6f 61 64 5f 66 75 6e 63 74 69 6f 6e 28 64 62  load_function(db
bb80: 2c 20 22 4d 41 54 43 48 22 2c 20 32 29 3b 0a 20  , "MATCH", 2);. 
bb90: 20 61 73 73 65 72 74 28 20 72 63 3d 3d 53 51 4c   assert( rc==SQL
bba0: 49 54 45 5f 4e 4f 4d 45 4d 20 7c 7c 20 72 63 3d  ITE_NOMEM || rc=
bbb0: 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20 20  =SQLITE_OK );.  
bbc0: 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e  if( rc==SQLITE_N
bbd0: 4f 4d 45 4d 20 29 7b 0a 20 20 20 20 64 62 2d 3e  OMEM ){.    db->
bbe0: 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31  mallocFailed = 1
bbf0: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53  ;.  }.}../*.** S
bc00: 65 74 20 74 68 65 20 4c 49 4b 45 4f 50 54 20 66  et the LIKEOPT f
bc10: 6c 61 67 20 6f 6e 20 74 68 65 20 32 2d 61 72 67  lag on the 2-arg
bc20: 75 6d 65 6e 74 20 66 75 6e 63 74 69 6f 6e 20 77  ument function w
bc30: 69 74 68 20 74 68 65 20 67 69 76 65 6e 20 6e 61  ith the given na
bc40: 6d 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  me..*/.static vo
bc50: 69 64 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61  id setLikeOptFla
bc60: 67 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63  g(sqlite3 *db, c
bc70: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65  onst char *zName
bc80: 2c 20 75 38 20 66 6c 61 67 56 61 6c 29 7b 0a 20  , u8 flagVal){. 
bc90: 20 46 75 6e 63 44 65 66 20 2a 70 44 65 66 3b 0a   FuncDef *pDef;.
bca0: 20 20 70 44 65 66 20 3d 20 73 71 6c 69 74 65 33    pDef = sqlite3
bcb0: 46 69 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c  FindFunction(db,
bcc0: 20 7a 4e 61 6d 65 2c 20 73 71 6c 69 74 65 33 53   zName, sqlite3S
bcd0: 74 72 6c 65 6e 33 30 28 7a 4e 61 6d 65 29 2c 0a  trlen30(zName),.
bce0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
bcf0: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20               2, 
bd00: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 29 3b  SQLITE_UTF8, 0);
bd10: 0a 20 20 69 66 28 20 41 4c 57 41 59 53 28 70 44  .  if( ALWAYS(pD
bd20: 65 66 29 20 29 7b 0a 20 20 20 20 70 44 65 66 2d  ef) ){.    pDef-
bd30: 3e 66 75 6e 63 46 6c 61 67 73 20 7c 3d 20 66 6c  >funcFlags |= fl
bd40: 61 67 56 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a  agVal;.  }.}../*
bd50: 0a 2a 2a 20 52 65 67 69 73 74 65 72 20 74 68 65  .** Register the
bd60: 20 62 75 69 6c 74 2d 69 6e 20 4c 49 4b 45 20 61   built-in LIKE a
bd70: 6e 64 20 47 4c 4f 42 20 66 75 6e 63 74 69 6f 6e  nd GLOB function
bd80: 73 2e 20 20 54 68 65 20 63 61 73 65 53 65 6e 73  s.  The caseSens
bd90: 69 74 69 76 65 0a 2a 2a 20 70 61 72 61 6d 65 74  itive.** paramet
bda0: 65 72 20 64 65 74 65 72 6d 69 6e 65 73 20 77 68  er determines wh
bdb0: 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 65  ether or not the
bdc0: 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 69   LIKE operator i
bdd0: 73 20 63 61 73 65 0a 2a 2a 20 73 65 6e 73 69 74  s case.** sensit
bde0: 69 76 65 2e 20 20 47 4c 4f 42 20 69 73 20 61 6c  ive.  GLOB is al
bdf0: 77 61 79 73 20 63 61 73 65 20 73 65 6e 73 69 74  ways case sensit
be00: 69 76 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c  ive..*/.void sql
be10: 69 74 65 33 52 65 67 69 73 74 65 72 4c 69 6b 65  ite3RegisterLike
be20: 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65  Functions(sqlite
be30: 33 20 2a 64 62 2c 20 69 6e 74 20 63 61 73 65 53  3 *db, int caseS
be40: 65 6e 73 69 74 69 76 65 29 7b 0a 20 20 73 74 72  ensitive){.  str
be50: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
be60: 2a 70 49 6e 66 6f 3b 0a 20 20 69 66 28 20 63 61  *pInfo;.  if( ca
be70: 73 65 53 65 6e 73 69 74 69 76 65 20 29 7b 0a 20  seSensitive ){. 
be80: 20 20 20 70 49 6e 66 6f 20 3d 20 28 73 74 72 75     pInfo = (stru
be90: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29  ct compareInfo*)
bea0: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 3b 0a 20 20  &likeInfoAlt;.  
beb0: 7d 65 6c 73 65 7b 0a 20 20 20 20 70 49 6e 66 6f  }else{.    pInfo
bec0: 20 3d 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61   = (struct compa
bed0: 72 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66  reInfo*)&likeInf
bee0: 6f 4e 6f 72 6d 3b 0a 20 20 7d 0a 20 20 73 71 6c  oNorm;.  }.  sql
bef0: 69 74 65 33 43 72 65 61 74 65 46 75 6e 63 28 64  ite3CreateFunc(d
bf00: 62 2c 20 22 6c 69 6b 65 22 2c 20 32 2c 20 53 51  b, "like", 2, SQ
bf10: 4c 49 54 45 5f 55 54 46 38 2c 20 70 49 6e 66 6f  LITE_UTF8, pInfo
bf20: 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30  , likeFunc, 0, 0
bf30: 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 43  , 0);.  sqlite3C
bf40: 72 65 61 74 65 46 75 6e 63 28 64 62 2c 20 22 6c  reateFunc(db, "l
bf50: 69 6b 65 22 2c 20 33 2c 20 53 51 4c 49 54 45 5f  ike", 3, SQLITE_
bf60: 55 54 46 38 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b  UTF8, pInfo, lik
bf70: 65 46 75 6e 63 2c 20 30 2c 20 30 2c 20 30 29 3b  eFunc, 0, 0, 0);
bf80: 0a 20 20 73 71 6c 69 74 65 33 43 72 65 61 74 65  .  sqlite3Create
bf90: 46 75 6e 63 28 64 62 2c 20 22 67 6c 6f 62 22 2c  Func(db, "glob",
bfa0: 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c   2, SQLITE_UTF8,
bfb0: 20 0a 20 20 20 20 20 20 28 73 74 72 75 63 74 20   .      (struct 
bfc0: 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26 67 6c  compareInfo*)&gl
bfd0: 6f 62 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e 63  obInfo, likeFunc
bfe0: 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73 65  , 0, 0, 0);.  se
bff0: 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 64 62 2c  tLikeOptFlag(db,
c000: 20 22 67 6c 6f 62 22 2c 20 53 51 4c 49 54 45 5f   "glob", SQLITE_
c010: 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49  FUNC_LIKE | SQLI
c020: 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3b 0a 20  TE_FUNC_CASE);. 
c030: 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28   setLikeOptFlag(
c040: 64 62 2c 20 22 6c 69 6b 65 22 2c 20 0a 20 20 20  db, "like", .   
c050: 20 20 20 63 61 73 65 53 65 6e 73 69 74 69 76 65     caseSensitive
c060: 20 3f 20 28 53 51 4c 49 54 45 5f 46 55 4e 43 5f   ? (SQLITE_FUNC_
c070: 4c 49 4b 45 20 7c 20 53 51 4c 49 54 45 5f 46 55  LIKE | SQLITE_FU
c080: 4e 43 5f 43 41 53 45 29 20 3a 20 53 51 4c 49 54  NC_CASE) : SQLIT
c090: 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 3b 0a 7d 0a  E_FUNC_LIKE);.}.
c0a0: 0a 2f 2a 0a 2a 2a 20 70 45 78 70 72 20 70 6f 69  ./*.** pExpr poi
c0b0: 6e 74 73 20 74 6f 20 61 6e 20 65 78 70 72 65 73  nts to an expres
c0c0: 73 69 6f 6e 20 77 68 69 63 68 20 69 6d 70 6c 65  sion which imple
c0d0: 6d 65 6e 74 73 20 61 20 66 75 6e 63 74 69 6f 6e  ments a function
c0e0: 2e 20 20 49 66 0a 2a 2a 20 69 74 20 69 73 20 61  .  If.** it is a
c0f0: 70 70 72 6f 70 72 69 61 74 65 20 74 6f 20 61 70  ppropriate to ap
c100: 70 6c 79 20 74 68 65 20 4c 49 4b 45 20 6f 70 74  ply the LIKE opt
c110: 69 6d 69 7a 61 74 69 6f 6e 20 74 6f 20 74 68 61  imization to tha
c120: 74 20 66 75 6e 63 74 69 6f 6e 0a 2a 2a 20 74 68  t function.** th
c130: 65 6e 20 73 65 74 20 61 57 63 5b 30 5d 20 74 68  en set aWc[0] th
c140: 72 6f 75 67 68 20 61 57 63 5b 32 5d 20 74 6f 20  rough aWc[2] to 
c150: 74 68 65 20 77 69 6c 64 63 61 72 64 20 63 68 61  the wildcard cha
c160: 72 61 63 74 65 72 73 20 61 6e 64 0a 2a 2a 20 72  racters and.** r
c170: 65 74 75 72 6e 20 54 52 55 45 2e 20 20 49 66 20  eturn TRUE.  If 
c180: 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 69 73 20  the function is 
c190: 6e 6f 74 20 61 20 4c 49 4b 45 2d 73 74 79 6c 65  not a LIKE-style
c1a0: 20 66 75 6e 63 74 69 6f 6e 20 74 68 65 6e 0a 2a   function then.*
c1b0: 2a 20 72 65 74 75 72 6e 20 46 41 4c 53 45 2e 0a  * return FALSE..
c1c0: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 49 73  */.int sqlite3Is
c1d0: 4c 69 6b 65 46 75 6e 63 74 69 6f 6e 28 73 71 6c  LikeFunction(sql
c1e0: 69 74 65 33 20 2a 64 62 2c 20 45 78 70 72 20 2a  ite3 *db, Expr *
c1f0: 70 45 78 70 72 2c 20 69 6e 74 20 2a 70 49 73 4e  pExpr, int *pIsN
c200: 6f 63 61 73 65 2c 20 63 68 61 72 20 2a 61 57 63  ocase, char *aWc
c210: 29 7b 0a 20 20 46 75 6e 63 44 65 66 20 2a 70 44  ){.  FuncDef *pD
c220: 65 66 3b 0a 20 20 69 66 28 20 70 45 78 70 72 2d  ef;.  if( pExpr-
c230: 3e 6f 70 21 3d 54 4b 5f 46 55 4e 43 54 49 4f 4e  >op!=TK_FUNCTION
c240: 20 0a 20 20 20 7c 7c 20 21 70 45 78 70 72 2d 3e   .   || !pExpr->
c250: 78 2e 70 4c 69 73 74 20 0a 20 20 20 7c 7c 20 70  x.pList .   || p
c260: 45 78 70 72 2d 3e 78 2e 70 4c 69 73 74 2d 3e 6e  Expr->x.pList->n
c270: 45 78 70 72 21 3d 32 0a 20 20 29 7b 0a 20 20 20  Expr!=2.  ){.   
c280: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20   return 0;.  }. 
c290: 20 61 73 73 65 72 74 28 20 21 45 78 70 72 48 61   assert( !ExprHa
c2a0: 73 50 72 6f 70 65 72 74 79 28 70 45 78 70 72 2c  sProperty(pExpr,
c2b0: 20 45 50 5f 78 49 73 53 65 6c 65 63 74 29 20 29   EP_xIsSelect) )
c2c0: 3b 0a 20 20 70 44 65 66 20 3d 20 73 71 6c 69 74  ;.  pDef = sqlit
c2d0: 65 33 46 69 6e 64 46 75 6e 63 74 69 6f 6e 28 64  e3FindFunction(d
c2e0: 62 2c 20 70 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b  b, pExpr->u.zTok
c2f0: 65 6e 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20  en, .           
c300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c310: 20 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e 33    sqlite3Strlen3
c320: 30 28 70 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b 65  0(pExpr->u.zToke
c330: 6e 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  n),.            
c340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c350: 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c   2, SQLITE_UTF8,
c360: 20 30 29 3b 0a 20 20 69 66 28 20 4e 45 56 45 52   0);.  if( NEVER
c370: 28 70 44 65 66 3d 3d 30 29 20 7c 7c 20 28 70 44  (pDef==0) || (pD
c380: 65 66 2d 3e 66 75 6e 63 46 6c 61 67 73 20 26 20  ef->funcFlags & 
c390: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45  SQLITE_FUNC_LIKE
c3a0: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75  )==0 ){.    retu
c3b0: 72 6e 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20  rn 0;.  }..  /* 
c3c0: 54 68 65 20 6d 65 6d 63 70 79 28 29 20 73 74 61  The memcpy() sta
c3d0: 74 65 6d 65 6e 74 20 61 73 73 75 6d 65 73 20 74  tement assumes t
c3e0: 68 61 74 20 74 68 65 20 77 69 6c 64 63 61 72 64  hat the wildcard
c3f0: 20 63 68 61 72 61 63 74 65 72 73 20 61 72 65 0a   characters are.
c400: 20 20 2a 2a 20 74 68 65 20 66 69 72 73 74 20 74    ** the first t
c410: 68 72 65 65 20 73 74 61 74 65 6d 65 6e 74 73 20  hree statements 
c420: 69 6e 20 74 68 65 20 63 6f 6d 70 61 72 65 49 6e  in the compareIn
c430: 66 6f 20 73 74 72 75 63 74 75 72 65 2e 20 20 54  fo structure.  T
c440: 68 65 0a 20 20 2a 2a 20 61 73 73 65 72 74 73 28  he.  ** asserts(
c450: 29 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 76 65  ) that follow ve
c460: 72 69 66 79 20 74 68 61 74 20 61 73 73 75 6d 70  rify that assump
c470: 74 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6d 65 6d 63  tion.  */.  memc
c480: 70 79 28 61 57 63 2c 20 70 44 65 66 2d 3e 70 55  py(aWc, pDef->pU
c490: 73 65 72 44 61 74 61 2c 20 33 29 3b 0a 20 20 61  serData, 3);.  a
c4a0: 73 73 65 72 74 28 20 28 63 68 61 72 2a 29 26 6c  ssert( (char*)&l
c4b0: 69 6b 65 49 6e 66 6f 41 6c 74 20 3d 3d 20 28 63  ikeInfoAlt == (c
c4c0: 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c  har*)&likeInfoAl
c4d0: 74 2e 6d 61 74 63 68 41 6c 6c 20 29 3b 0a 20 20  t.matchAll );.  
c4e0: 61 73 73 65 72 74 28 20 26 28 28 63 68 61 72 2a  assert( &((char*
c4f0: 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 31  )&likeInfoAlt)[1
c500: 5d 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b  ] == (char*)&lik
c510: 65 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 4f 6e  eInfoAlt.matchOn
c520: 65 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 26  e );.  assert( &
c530: 28 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66  ((char*)&likeInf
c540: 6f 41 6c 74 29 5b 32 5d 20 3d 3d 20 28 63 68 61  oAlt)[2] == (cha
c550: 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e  r*)&likeInfoAlt.
c560: 6d 61 74 63 68 53 65 74 20 29 3b 0a 20 20 2a 70  matchSet );.  *p
c570: 49 73 4e 6f 63 61 73 65 20 3d 20 28 70 44 65 66  IsNocase = (pDef
c580: 2d 3e 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51  ->funcFlags & SQ
c590: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d  LITE_FUNC_CASE)=
c5a0: 3d 30 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a  =0;.  return 1;.
c5b0: 7d 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 20 6f 66 20  }../*.** All of 
c5c0: 74 68 65 20 46 75 6e 63 44 65 66 20 73 74 72 75  the FuncDef stru
c5d0: 63 74 75 72 65 73 20 69 6e 20 74 68 65 20 61 42  ctures in the aB
c5e0: 75 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 61 72 72  uiltinFunc[] arr
c5f0: 61 79 20 61 62 6f 76 65 0a 2a 2a 20 74 6f 20 74  ay above.** to t
c600: 68 65 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69  he global functi
c610: 6f 6e 20 68 61 73 68 20 74 61 62 6c 65 2e 20 20  on hash table.  
c620: 54 68 69 73 20 6f 63 63 75 72 73 20 61 74 20 73  This occurs at s
c630: 74 61 72 74 2d 74 69 6d 65 20 28 61 73 0a 2a 2a  tart-time (as.**
c640: 20 61 20 63 6f 6e 73 65 71 75 65 6e 63 65 20 6f   a consequence o
c650: 66 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65  f calling sqlite
c660: 33 5f 69 6e 69 74 69 61 6c 69 7a 65 28 29 29 2e  3_initialize()).
c670: 0a 2a 2a 0a 2a 2a 20 41 66 74 65 72 20 74 68 69  .**.** After thi
c680: 73 20 72 6f 75 74 69 6e 65 20 72 75 6e 73 0a 2a  s routine runs.*
c690: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65  /.void sqlite3Re
c6a0: 67 69 73 74 65 72 47 6c 6f 62 61 6c 46 75 6e 63  gisterGlobalFunc
c6b0: 74 69 6f 6e 73 28 76 6f 69 64 29 7b 0a 20 20 2f  tions(void){.  /
c6c0: 2a 0a 20 20 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f  *.  ** The follo
c6d0: 77 69 6e 67 20 61 72 72 61 79 20 68 6f 6c 64 73  wing array holds
c6e0: 20 46 75 6e 63 44 65 66 20 73 74 72 75 63 74 75   FuncDef structu
c6f0: 72 65 73 20 66 6f 72 20 61 6c 6c 20 6f 66 20 74  res for all of t
c700: 68 65 20 66 75 6e 63 74 69 6f 6e 73 0a 20 20 2a  he functions.  *
c710: 2a 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68 69  * defined in thi
c720: 73 20 66 69 6c 65 2e 0a 20 20 2a 2a 0a 20 20 2a  s file..  **.  *
c730: 2a 20 54 68 65 20 61 72 72 61 79 20 63 61 6e 6e  * The array cann
c740: 6f 74 20 62 65 20 63 6f 6e 73 74 61 6e 74 20 73  ot be constant s
c750: 69 6e 63 65 20 63 68 61 6e 67 65 73 20 61 72 65  ince changes are
c760: 20 6d 61 64 65 20 74 6f 20 74 68 65 0a 20 20 2a   made to the.  *
c770: 2a 20 46 75 6e 63 44 65 66 2e 70 48 61 73 68 20  * FuncDef.pHash 
c780: 65 6c 65 6d 65 6e 74 73 20 61 74 20 73 74 61 72  elements at star
c790: 74 2d 74 69 6d 65 2e 20 20 54 68 65 20 65 6c 65  t-time.  The ele
c7a0: 6d 65 6e 74 73 20 6f 66 20 74 68 69 73 20 61 72  ments of this ar
c7b0: 72 61 79 0a 20 20 2a 2a 20 61 72 65 20 72 65 61  ray.  ** are rea
c7c0: 64 2d 6f 6e 6c 79 20 61 66 74 65 72 20 69 6e 69  d-only after ini
c7d0: 74 69 61 6c 69 7a 61 74 69 6f 6e 20 69 73 20 63  tialization is c
c7e0: 6f 6d 70 6c 65 74 65 2e 0a 20 20 2a 2f 0a 20 20  omplete..  */.  
c7f0: 73 74 61 74 69 63 20 53 51 4c 49 54 45 5f 57 53  static SQLITE_WS
c800: 44 20 46 75 6e 63 44 65 66 20 61 42 75 69 6c 74  D FuncDef aBuilt
c810: 69 6e 46 75 6e 63 5b 5d 20 3d 20 7b 0a 20 20 20  inFunc[] = {.   
c820: 20 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c   FUNCTION(ltrim,
c830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
c840: 20 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20   1, 0, trimFunc 
c850: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
c860: 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20 20  UNCTION(ltrim,  
c870: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 31              2, 1
c880: 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20  , 0, trimFunc   
c890: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
c8a0: 43 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20  CTION(rtrim,    
c8b0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 32 2c 20            1, 2, 
c8c0: 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20  0, trimFunc     
c8d0: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
c8e0: 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20 20  ION(rtrim,      
c8f0: 20 20 20 20 20 20 20 20 32 2c 20 32 2c 20 30 2c          2, 2, 0,
c900: 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20   trimFunc       
c910: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
c920: 4e 28 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20  N(trim,         
c930: 20 20 20 20 20 20 31 2c 20 33 2c 20 30 2c 20 74        1, 3, 0, t
c940: 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20  rimFunc         
c950: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
c960: 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20  trim,           
c970: 20 20 20 20 32 2c 20 33 2c 20 30 2c 20 74 72 69      2, 3, 0, tri
c980: 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c  mFunc         ),
c990: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69  .    FUNCTION(mi
c9a0: 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  n,              
c9b0: 20 2d 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61   -1, 0, 1, minma
c9c0: 78 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20  xFunc       ),. 
c9d0: 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c     FUNCTION(min,
c9e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c9f0: 30 2c 20 30 2c 20 31 2c 20 30 20 20 20 20 20 20  0, 0, 1, 0      
ca00: 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20            ),.   
ca10: 20 41 47 47 52 45 47 41 54 45 32 28 6d 69 6e 2c   AGGREGATE2(min,
ca20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
ca30: 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65   0, 1, minmaxSte
ca40: 70 2c 20 20 20 20 20 20 6d 69 6e 4d 61 78 46 69  p,      minMaxFi
ca50: 6e 61 6c 69 7a 65 2c 0a 20 20 20 20 20 20 20 20  nalize,.        
ca60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ca70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ca80: 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4d 49    SQLITE_FUNC_MI
ca90: 4e 4d 41 58 20 29 2c 0a 20 20 20 20 46 55 4e 43  NMAX ),.    FUNC
caa0: 54 49 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20 20  TION(max,       
cab0: 20 20 20 20 20 20 20 20 2d 31 2c 20 31 2c 20 31          -1, 1, 1
cac0: 2c 20 6d 69 6e 6d 61 78 46 75 6e 63 20 20 20 20  , minmaxFunc    
cad0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
cae0: 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20  ON(max,         
caf0: 20 20 20 20 20 20 20 30 2c 20 31 2c 20 31 2c 20         0, 1, 1, 
cb00: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  0               
cb10: 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54   ),.    AGGREGAT
cb20: 45 32 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20  E2(max,         
cb30: 20 20 20 20 20 31 2c 20 31 2c 20 31 2c 20 6d 69       1, 1, 1, mi
cb40: 6e 6d 61 78 53 74 65 70 2c 20 20 20 20 20 20 6d  nmaxStep,      m
cb50: 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 2c 0a 20  inMaxFinalize,. 
cb60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
cb70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
cb80: 20 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f           SQLITE_
cb90: 46 55 4e 43 5f 4d 49 4e 4d 41 58 20 29 2c 0a 20  FUNC_MINMAX ),. 
cba0: 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 74 79 70     FUNCTION2(typ
cbb0: 65 6f 66 2c 20 20 20 20 20 20 20 20 20 20 20 20  eof,            
cbc0: 31 2c 20 30 2c 20 30 2c 20 74 79 70 65 6f 66 46  1, 0, 0, typeofF
cbd0: 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e  unc,  SQLITE_FUN
cbe0: 43 5f 54 59 50 45 4f 46 29 2c 0a 20 20 20 20 46  C_TYPEOF),.    F
cbf0: 55 4e 43 54 49 4f 4e 32 28 6c 65 6e 67 74 68 2c  UNCTION2(length,
cc00: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
cc10: 2c 20 30 2c 20 6c 65 6e 67 74 68 46 75 6e 63 2c  , 0, lengthFunc,
cc20: 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 45    SQLITE_FUNC_LE
cc30: 4e 47 54 48 29 2c 0a 20 20 20 20 46 55 4e 43 54  NGTH),.    FUNCT
cc40: 49 4f 4e 28 69 6e 73 74 72 2c 20 20 20 20 20 20  ION(instr,      
cc50: 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c          2, 0, 0,
cc60: 20 69 6e 73 74 72 46 75 6e 63 20 20 20 20 20 20   instrFunc      
cc70: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
cc80: 4e 28 73 75 62 73 74 72 2c 20 20 20 20 20 20 20  N(substr,       
cc90: 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 73        2, 0, 0, s
cca0: 75 62 73 74 72 46 75 6e 63 20 20 20 20 20 20 20  ubstrFunc       
ccb0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
ccc0: 73 75 62 73 74 72 2c 20 20 20 20 20 20 20 20 20  substr,         
ccd0: 20 20 20 20 33 2c 20 30 2c 20 30 2c 20 73 75 62      3, 0, 0, sub
cce0: 73 74 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c  strFunc       ),
ccf0: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 70 72  .    FUNCTION(pr
cd00: 69 6e 74 66 2c 20 20 20 20 20 20 20 20 20 20 20  intf,           
cd10: 20 2d 31 2c 20 30 2c 20 30 2c 20 70 72 69 6e 74   -1, 0, 0, print
cd20: 66 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20  fFunc       ),. 
cd30: 20 20 20 46 55 4e 43 54 49 4f 4e 28 75 6e 69 63     FUNCTION(unic
cd40: 6f 64 65 2c 20 20 20 20 20 20 20 20 20 20 20 20  ode,            
cd50: 31 2c 20 30 2c 20 30 2c 20 75 6e 69 63 6f 64 65  1, 0, 0, unicode
cd60: 46 75 6e 63 20 20 20 20 20 20 29 2c 0a 20 20 20  Func      ),.   
cd70: 20 46 55 4e 43 54 49 4f 4e 28 63 68 61 72 2c 20   FUNCTION(char, 
cd80: 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c               -1,
cd90: 20 30 2c 20 30 2c 20 63 68 61 72 46 75 6e 63 20   0, 0, charFunc 
cda0: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
cdb0: 55 4e 43 54 49 4f 4e 28 61 62 73 2c 20 20 20 20  UNCTION(abs,    
cdc0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
cdd0: 2c 20 30 2c 20 61 62 73 46 75 6e 63 20 20 20 20  , 0, absFunc    
cde0: 20 20 20 20 20 20 29 2c 0a 23 69 66 6e 64 65 66        ),.#ifndef
cdf0: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f   SQLITE_OMIT_FLO
ce00: 41 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20  ATING_POINT.    
ce10: 46 55 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20  FUNCTION(round, 
ce20: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
ce30: 30 2c 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20  0, 0, roundFunc 
ce40: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
ce50: 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20  NCTION(round,   
ce60: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c             2, 0,
ce70: 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20   0, roundFunc   
ce80: 20 20 20 20 20 29 2c 0a 23 65 6e 64 69 66 0a 20       ),.#endif. 
ce90: 20 20 20 46 55 4e 43 54 49 4f 4e 28 75 70 70 65     FUNCTION(uppe
cea0: 72 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  r,              
ceb0: 31 2c 20 30 2c 20 30 2c 20 75 70 70 65 72 46 75  1, 0, 0, upperFu
cec0: 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20  nc        ),.   
ced0: 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 77 65 72 2c   FUNCTION(lower,
cee0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
cef0: 20 30 2c 20 30 2c 20 6c 6f 77 65 72 46 75 6e 63   0, 0, lowerFunc
cf00: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
cf10: 55 4e 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65  UNCTION(coalesce
cf20: 2c 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30  ,           1, 0
cf30: 2c 20 30 2c 20 30 20 20 20 20 20 20 20 20 20 20  , 0, 0          
cf40: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
cf50: 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20  CTION(coalesce, 
cf60: 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20            0, 0, 
cf70: 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20  0, 0            
cf80: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
cf90: 49 4f 4e 32 28 63 6f 61 6c 65 73 63 65 2c 20 20  ION2(coalesce,  
cfa0: 20 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c         -1, 0, 0,
cfb0: 20 6e 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49   noopFunc,  SQLI
cfc0: 54 45 5f 46 55 4e 43 5f 43 4f 41 4c 45 53 43 45  TE_FUNC_COALESCE
cfd0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
cfe0: 68 65 78 2c 20 20 20 20 20 20 20 20 20 20 20 20  hex,            
cff0: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 68 65 78      1, 0, 0, hex
d000: 46 75 6e 63 20 20 20 20 20 20 20 20 20 20 29 2c  Func          ),
d010: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 69  .    FUNCTION2(i
d020: 66 6e 75 6c 6c 2c 20 20 20 20 20 20 20 20 20 20  fnull,          
d030: 20 20 32 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70 46    2, 0, 0, noopF
d040: 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e  unc,  SQLITE_FUN
d050: 43 5f 43 4f 41 4c 45 53 43 45 29 2c 0a 20 20 20  C_COALESCE),.   
d060: 20 46 55 4e 43 54 49 4f 4e 32 28 75 6e 6c 69 6b   FUNCTION2(unlik
d070: 65 6c 79 2c 20 20 20 20 20 20 20 20 20 20 31 2c  ely,          1,
d080: 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e 63 2c   0, 0, noopFunc,
d090: 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 55 4e    SQLITE_FUNC_UN
d0a0: 4c 49 4b 45 4c 59 29 2c 0a 20 20 20 20 46 55 4e  LIKELY),.    FUN
d0b0: 43 54 49 4f 4e 32 28 6c 69 6b 65 6c 69 68 6f 6f  CTION2(likelihoo
d0c0: 64 2c 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20  d,        2, 0, 
d0d0: 30 2c 20 6e 6f 6f 70 46 75 6e 63 2c 20 20 53 51  0, noopFunc,  SQ
d0e0: 4c 49 54 45 5f 46 55 4e 43 5f 55 4e 4c 49 4b 45  LITE_FUNC_UNLIKE
d0f0: 4c 59 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f  LY),.    FUNCTIO
d100: 4e 32 28 6c 69 6b 65 6c 79 2c 20 20 20 20 20 20  N2(likely,      
d110: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6e        1, 0, 0, n
d120: 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49 54 45  oopFunc,  SQLITE
d130: 5f 46 55 4e 43 5f 55 4e 4c 49 4b 45 4c 59 29 2c  _FUNC_UNLIKELY),
d140: 0a 20 20 20 20 56 46 55 4e 43 54 49 4f 4e 28 72  .    VFUNCTION(r
d150: 61 6e 64 6f 6d 2c 20 20 20 20 20 20 20 20 20 20  andom,          
d160: 20 20 30 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f    0, 0, 0, rando
d170: 6d 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20  mFunc       ),. 
d180: 20 20 20 56 46 55 4e 43 54 49 4f 4e 28 72 61 6e     VFUNCTION(ran
d190: 64 6f 6d 62 6c 6f 62 2c 20 20 20 20 20 20 20 20  domblob,        
d1a0: 31 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 42  1, 0, 0, randomB
d1b0: 6c 6f 62 20 20 20 20 20 20 20 29 2c 0a 20 20 20  lob       ),.   
d1c0: 20 46 55 4e 43 54 49 4f 4e 28 6e 75 6c 6c 69 66   FUNCTION(nullif
d1d0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c  ,             2,
d1e0: 20 30 2c 20 31 2c 20 6e 75 6c 6c 69 66 46 75 6e   0, 1, nullifFun
d1f0: 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46  c       ),.    F
d200: 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 76  UNCTION(sqlite_v
d210: 65 72 73 69 6f 6e 2c 20 20 20 20 20 30 2c 20 30  ersion,     0, 0
d220: 2c 20 30 2c 20 76 65 72 73 69 6f 6e 46 75 6e 63  , 0, versionFunc
d230: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
d240: 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 73 6f 75  CTION(sqlite_sou
d250: 72 63 65 5f 69 64 2c 20 20 20 30 2c 20 30 2c 20  rce_id,   0, 0, 
d260: 30 2c 20 73 6f 75 72 63 65 69 64 46 75 6e 63 20  0, sourceidFunc 
d270: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
d280: 49 4f 4e 28 73 71 6c 69 74 65 5f 6c 6f 67 2c 20  ION(sqlite_log, 
d290: 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c          2, 0, 0,
d2a0: 20 65 72 72 6c 6f 67 46 75 6e 63 20 20 20 20 20   errlogFunc     
d2b0: 20 20 29 2c 0a 23 69 66 20 53 51 4c 49 54 45 5f    ),.#if SQLITE_
d2c0: 55 53 45 52 5f 41 55 54 48 45 4e 54 49 43 41 54  USER_AUTHENTICAT
d2d0: 49 4f 4e 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e  ION.    FUNCTION
d2e0: 28 73 71 6c 69 74 65 5f 63 72 79 70 74 2c 20 20  (sqlite_crypt,  
d2f0: 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 73 71       2, 0, 0, sq
d300: 6c 69 74 65 33 43 72 79 70 74 46 75 6e 63 20 29  lite3CryptFunc )
d310: 2c 0a 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66  ,.#endif.#ifndef
d320: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d   SQLITE_OMIT_COM
d330: 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53  PILEOPTION_DIAGS
d340: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 71  .    FUNCTION(sq
d350: 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69  lite_compileopti
d360: 6f 6e 5f 75 73 65 64 2c 31 2c 20 30 2c 20 30 2c  on_used,1, 0, 0,
d370: 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73   compileoptionus
d380: 65 64 46 75 6e 63 20 20 29 2c 0a 20 20 20 20 46  edFunc  ),.    F
d390: 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 63  UNCTION(sqlite_c
d3a0: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74  ompileoption_get
d3b0: 2c 20 31 2c 20 30 2c 20 30 2c 20 63 6f 6d 70 69  , 1, 0, 0, compi
d3c0: 6c 65 6f 70 74 69 6f 6e 67 65 74 46 75 6e 63 20  leoptiongetFunc 
d3d0: 20 29 2c 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51   ),.#endif /* SQ
d3e0: 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c  LITE_OMIT_COMPIL
d3f0: 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f  EOPTION_DIAGS */
d400: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 71 75  .    FUNCTION(qu
d410: 6f 74 65 2c 20 20 20 20 20 20 20 20 20 20 20 20  ote,            
d420: 20 20 31 2c 20 30 2c 20 30 2c 20 71 75 6f 74 65    1, 0, 0, quote
d430: 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 20  Func        ),. 
d440: 20 20 20 56 46 55 4e 43 54 49 4f 4e 28 6c 61 73     VFUNCTION(las
d450: 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 2c 20  t_insert_rowid, 
d460: 30 2c 20 30 2c 20 30 2c 20 6c 61 73 74 5f 69 6e  0, 0, 0, last_in
d470: 73 65 72 74 5f 72 6f 77 69 64 29 2c 0a 20 20 20  sert_rowid),.   
d480: 20 56 46 55 4e 43 54 49 4f 4e 28 63 68 61 6e 67   VFUNCTION(chang
d490: 65 73 2c 20 20 20 20 20 20 20 20 20 20 20 30 2c  es,           0,
d4a0: 20 30 2c 20 30 2c 20 63 68 61 6e 67 65 73 20 20   0, 0, changes  
d4b0: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 56          ),.    V
d4c0: 46 55 4e 43 54 49 4f 4e 28 74 6f 74 61 6c 5f 63  FUNCTION(total_c
d4d0: 68 61 6e 67 65 73 2c 20 20 20 20 20 30 2c 20 30  hanges,     0, 0
d4e0: 2c 20 30 2c 20 74 6f 74 61 6c 5f 63 68 61 6e 67  , 0, total_chang
d4f0: 65 73 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e  es    ),.    FUN
d500: 43 54 49 4f 4e 28 72 65 70 6c 61 63 65 2c 20 20  CTION(replace,  
d510: 20 20 20 20 20 20 20 20 20 20 33 2c 20 30 2c 20            3, 0, 
d520: 30 2c 20 72 65 70 6c 61 63 65 46 75 6e 63 20 20  0, replaceFunc  
d530: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
d540: 49 4f 4e 28 7a 65 72 6f 62 6c 6f 62 2c 20 20 20  ION(zeroblob,   
d550: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c          1, 0, 0,
d560: 20 7a 65 72 6f 62 6c 6f 62 46 75 6e 63 20 20 20   zeroblobFunc   
d570: 20 20 29 2c 0a 20 20 23 69 66 64 65 66 20 53 51    ),.  #ifdef SQ
d580: 4c 49 54 45 5f 53 4f 55 4e 44 45 58 0a 20 20 20  LITE_SOUNDEX.   
d590: 20 46 55 4e 43 54 49 4f 4e 28 73 6f 75 6e 64 65   FUNCTION(sounde
d5a0: 78 2c 20 20 20 20 20 20 20 20 20 20 20 20 31 2c  x,            1,
d5b0: 20 30 2c 20 30 2c 20 73 6f 75 6e 64 65 78 46 75   0, 0, soundexFu
d5c0: 6e 63 20 20 20 20 20 20 29 2c 0a 20 20 23 65 6e  nc      ),.  #en
d5d0: 64 69 66 0a 20 20 23 69 66 6e 64 65 66 20 53 51  dif.  #ifndef SQ
d5e0: 4c 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45  LITE_OMIT_LOAD_E
d5f0: 58 54 45 4e 53 49 4f 4e 0a 20 20 20 20 46 55 4e  XTENSION.    FUN
d600: 43 54 49 4f 4e 28 6c 6f 61 64 5f 65 78 74 65 6e  CTION(load_exten
d610: 73 69 6f 6e 2c 20 20 20 20 20 31 2c 20 30 2c 20  sion,     1, 0, 
d620: 30 2c 20 6c 6f 61 64 45 78 74 20 20 20 20 20 20  0, loadExt      
d630: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
d640: 49 4f 4e 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69  ION(load_extensi
d650: 6f 6e 2c 20 20 20 20 20 32 2c 20 30 2c 20 30 2c  on,     2, 0, 0,
d660: 20 6c 6f 61 64 45 78 74 20 20 20 20 20 20 20 20   loadExt        
d670: 20 20 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20    ),.  #endif.  
d680: 20 20 41 47 47 52 45 47 41 54 45 28 73 75 6d 2c    AGGREGATE(sum,
d690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                 1
d6a0: 2c 20 30 2c 20 30 2c 20 73 75 6d 53 74 65 70 2c  , 0, 0, sumStep,
d6b0: 20 20 20 20 20 20 20 20 20 73 75 6d 46 69 6e 61           sumFina
d6c0: 6c 69 7a 65 20 20 20 20 29 2c 0a 20 20 20 20 41  lize    ),.    A
d6d0: 47 47 52 45 47 41 54 45 28 74 6f 74 61 6c 2c 20  GGREGATE(total, 
d6e0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
d6f0: 2c 20 30 2c 20 73 75 6d 53 74 65 70 2c 20 20 20  , 0, sumStep,   
d700: 20 20 20 20 20 20 74 6f 74 61 6c 46 69 6e 61 6c        totalFinal
d710: 69 7a 65 20 20 20 20 29 2c 0a 20 20 20 20 41 47  ize    ),.    AG
d720: 47 52 45 47 41 54 45 28 61 76 67 2c 20 20 20 20  GREGATE(avg,    
d730: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
d740: 20 30 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20   0, sumStep,    
d750: 20 20 20 20 20 61 76 67 46 69 6e 61 6c 69 7a 65       avgFinalize
d760: 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45      ),.    AGGRE
d770: 47 41 54 45 32 28 63 6f 75 6e 74 2c 20 20 20 20  GATE2(count,    
d780: 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c          0, 0, 0,
d790: 20 63 6f 75 6e 74 53 74 65 70 2c 20 20 20 20 20   countStep,     
d7a0: 20 20 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 2c    countFinalize,
d7b0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
d7c0: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 4f 55 4e  SQLITE_FUNC_COUN
d7d0: 54 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47  T  ),.    AGGREG
d7e0: 41 54 45 28 63 6f 75 6e 74 2c 20 20 20 20 20 20  ATE(count,      
d7f0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
d800: 63 6f 75 6e 74 53 74 65 70 2c 20 20 20 20 20 20  countStep,      
d810: 20 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20   countFinalize  
d820: 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  ),.    AGGREGATE
d830: 28 67 72 6f 75 70 5f 63 6f 6e 63 61 74 2c 20 20  (group_concat,  
d840: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 67 72 6f      1, 0, 0, gro
d850: 75 70 43 6f 6e 63 61 74 53 74 65 70 2c 20 67 72  upConcatStep, gr
d860: 6f 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a  oupConcatFinaliz
d870: 65 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54  e),.    AGGREGAT
d880: 45 28 67 72 6f 75 70 5f 63 6f 6e 63 61 74 2c 20  E(group_concat, 
d890: 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 67 72       2, 0, 0, gr
d8a0: 6f 75 70 43 6f 6e 63 61 74 53 74 65 70 2c 20 67  oupConcatStep, g
d8b0: 72 6f 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69  roupConcatFinali
d8c0: 7a 65 29 2c 0a 20 20 0a 20 20 20 20 4c 49 4b 45  ze),.  .    LIKE
d8d0: 46 55 4e 43 28 67 6c 6f 62 2c 20 32 2c 20 26 67  FUNC(glob, 2, &g
d8e0: 6c 6f 62 49 6e 66 6f 2c 20 53 51 4c 49 54 45 5f  lobInfo, SQLITE_
d8f0: 46 55 4e 43 5f 4c 49 4b 45 7c 53 51 4c 49 54 45  FUNC_LIKE|SQLITE
d900: 5f 46 55 4e 43 5f 43 41 53 45 29 2c 0a 20 20 23  _FUNC_CASE),.  #
d910: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 43 41 53  ifdef SQLITE_CAS
d920: 45 5f 53 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45  E_SENSITIVE_LIKE
d930: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
d940: 6b 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 2, &likeInfo
d950: 41 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43  Alt, SQLITE_FUNC
d960: 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e  _LIKE|SQLITE_FUN
d970: 43 5f 43 41 53 45 29 2c 0a 20 20 20 20 4c 49 4b  C_CASE),.    LIK
d980: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26  EFUNC(like, 3, &
d990: 6c 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c  likeInfoAlt, SQL
d9a0: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51  ITE_FUNC_LIKE|SQ
d9b0: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c  LITE_FUNC_CASE),
d9c0: 0a 20 20 23 65 6c 73 65 0a 20 20 20 20 4c 49 4b  .  #else.    LIK
d9d0: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26  EFUNC(like, 2, &
d9e0: 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51  likeInfoNorm, SQ
d9f0: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c  LITE_FUNC_LIKE),
da00: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
da10: 6b 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 3, &likeInfo
da20: 4e 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e  Norm, SQLITE_FUN
da30: 43 5f 4c 49 4b 45 29 2c 0a 20 20 23 65 6e 64 69  C_LIKE),.  #endi
da40: 66 0a 20 20 7d 3b 0a 0a 20 20 69 6e 74 20 69 3b  f.  };..  int i;
da50: 0a 20 20 46 75 6e 63 44 65 66 48 61 73 68 20 2a  .  FuncDefHash *
da60: 70 48 61 73 68 20 3d 20 26 47 4c 4f 42 41 4c 28  pHash = &GLOBAL(
da70: 46 75 6e 63 44 65 66 48 61 73 68 2c 20 73 71 6c  FuncDefHash, sql
da80: 69 74 65 33 47 6c 6f 62 61 6c 46 75 6e 63 74 69  ite3GlobalFuncti
da90: 6f 6e 73 29 3b 0a 20 20 46 75 6e 63 44 65 66 20  ons);.  FuncDef 
daa0: 2a 61 46 75 6e 63 20 3d 20 28 46 75 6e 63 44 65  *aFunc = (FuncDe
dab0: 66 2a 29 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44  f*)&GLOBAL(FuncD
dac0: 65 66 2c 20 61 42 75 69 6c 74 69 6e 46 75 6e 63  ef, aBuiltinFunc
dad0: 29 3b 0a 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69  );..  for(i=0; i
dae0: 3c 41 72 72 61 79 53 69 7a 65 28 61 42 75 69 6c  <ArraySize(aBuil
daf0: 74 69 6e 46 75 6e 63 29 3b 20 69 2b 2b 29 7b 0a  tinFunc); i++){.
db00: 20 20 20 20 73 71 6c 69 74 65 33 46 75 6e 63 44      sqlite3FuncD
db10: 65 66 49 6e 73 65 72 74 28 70 48 61 73 68 2c 20  efInsert(pHash, 
db20: 26 61 46 75 6e 63 5b 69 5d 29 3b 0a 20 20 7d 0a  &aFunc[i]);.  }.
db30: 20 20 73 71 6c 69 74 65 33 52 65 67 69 73 74 65    sqlite3Registe
db40: 72 44 61 74 65 54 69 6d 65 46 75 6e 63 74 69 6f  rDateTimeFunctio
db50: 6e 73 28 29 3b 0a 23 69 66 6e 64 65 66 20 53 51  ns();.#ifndef SQ
db60: 4c 49 54 45 5f 4f 4d 49 54 5f 41 4c 54 45 52 54  LITE_OMIT_ALTERT
db70: 41 42 4c 45 0a 20 20 73 71 6c 69 74 65 33 41 6c  ABLE.  sqlite3Al
db80: 74 65 72 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a  terFunctions();.
db90: 23 65 6e 64 69 66 0a 23 69 66 20 64 65 66 69 6e  #endif.#if defin
dba0: 65 64 28 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45  ed(SQLITE_ENABLE
dbb0: 5f 53 54 41 54 33 29 20 7c 7c 20 64 65 66 69 6e  _STAT3) || defin
dbc0: 65 64 28 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45  ed(SQLITE_ENABLE
dbd0: 5f 53 54 41 54 34 29 0a 20 20 73 71 6c 69 74 65  _STAT4).  sqlite
dbe0: 33 41 6e 61 6c 79 7a 65 46 75 6e 63 74 69 6f 6e  3AnalyzeFunction
dbf0: 73 28 29 3b 0a 23 65 6e 64 69 66 0a 7d 0a        s();.#endif.}.