/ Hex Artifact Content
Login

Artifact ba47c1671ab3cfdafa6e9d6ee490939ea578adee:


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 35 37 33 32    ** IMP: R-5732
10d0: 36 2d 33 31 35 34 31 20 41 62 73 28 58 29 20 72  6-31541 Abs(X) r
10e0: 65 74 75 72 6e 20 30 2e 30 20 69 66 20 58 20 69  eturn 0.0 if X i
10f0: 73 20 61 20 73 74 72 69 6e 67 20 6f 72 20 62 6c  s a string or bl
1100: 6f 62 20 74 68 61 74 0a 20 20 20 20 20 20 2a 2a  ob that.      **
1110: 20 63 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 76 65   cannot be conve
1120: 72 74 65 64 20 74 6f 20 61 20 6e 75 6d 65 72 69  rted to a numeri
1130: 63 20 76 61 6c 75 65 2e 20 0a 20 20 20 20 20 20  c 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 20 20 69 66  }.    }.  }.  if
1ef0: 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20 20  ( argc==3 ){.   
1f00: 20 70 32 20 3d 20 73 71 6c 69 74 65 33 5f 76 61   p2 = sqlite3_va
1f10: 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 32 5d 29  lue_int(argv[2])
1f20: 3b 0a 20 20 20 20 69 66 28 20 70 32 3c 30 20 29  ;.    if( p2<0 )
1f30: 7b 0a 20 20 20 20 20 20 70 32 20 3d 20 2d 70 32  {.      p2 = -p2
1f40: 3b 0a 20 20 20 20 20 20 6e 65 67 50 32 20 3d 20  ;.      negP2 = 
1f50: 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65  1;.    }.  }else
1f60: 7b 0a 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74  {.    p2 = sqlit
1f70: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
1f80: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 2d 3e 61  ndle(context)->a
1f90: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
1fa0: 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a 20 20 7d 0a  IT_LENGTH];.  }.
1fb0: 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20    if( p1<0 ){.  
1fc0: 20 20 70 31 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20    p1 += len;.   
1fd0: 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20   if( p1<0 ){.   
1fe0: 20 20 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20     p2 += p1;.   
1ff0: 20 20 20 69 66 28 20 70 32 3c 30 20 29 20 70 32     if( p2<0 ) p2
2000: 20 3d 20 30 3b 0a 20 20 20 20 20 20 70 31 20 3d   = 0;.      p1 =
2010: 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73   0;.    }.  }els
2020: 65 20 69 66 28 20 70 31 3e 30 20 29 7b 0a 20 20  e if( p1>0 ){.  
2030: 20 20 70 31 2d 2d 3b 0a 20 20 7d 65 6c 73 65 20    p1--;.  }else 
2040: 69 66 28 20 70 32 3e 30 20 29 7b 0a 20 20 20 20  if( p2>0 ){.    
2050: 70 32 2d 2d 3b 0a 20 20 7d 0a 20 20 69 66 28 20  p2--;.  }.  if( 
2060: 6e 65 67 50 32 20 29 7b 0a 20 20 20 20 70 31 20  negP2 ){.    p1 
2070: 2d 3d 20 70 32 3b 0a 20 20 20 20 69 66 28 20 70  -= p2;.    if( p
2080: 31 3c 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20  1<0 ){.      p2 
2090: 2b 3d 20 70 31 3b 0a 20 20 20 20 20 20 70 31 20  += p1;.      p1 
20a0: 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  = 0;.    }.  }. 
20b0: 20 61 73 73 65 72 74 28 20 70 31 3e 3d 30 20 26   assert( p1>=0 &
20c0: 26 20 70 32 3e 3d 30 20 29 3b 0a 20 20 69 66 28  & p2>=0 );.  if(
20d0: 20 70 30 74 79 70 65 21 3d 53 51 4c 49 54 45 5f   p0type!=SQLITE_
20e0: 42 4c 4f 42 20 29 7b 0a 20 20 20 20 77 68 69 6c  BLOB ){.    whil
20f0: 65 28 20 2a 7a 20 26 26 20 70 31 20 29 7b 0a 20  e( *z && p1 ){. 
2100: 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50       SQLITE_SKIP
2110: 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20  _UTF8(z);.      
2120: 70 31 2d 2d 3b 0a 20 20 20 20 7d 0a 20 20 20 20  p1--;.    }.    
2130: 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32 20 26 26  for(z2=z; *z2 &&
2140: 20 70 32 3b 20 70 32 2d 2d 29 7b 0a 20 20 20 20   p2; p2--){.    
2150: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
2160: 46 38 28 7a 32 29 3b 0a 20 20 20 20 7d 0a 20 20  F8(z2);.    }.  
2170: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2180: 5f 74 65 78 74 36 34 28 63 6f 6e 74 65 78 74 2c  _text64(context,
2190: 20 28 63 68 61 72 2a 29 7a 2c 20 7a 32 2d 7a 2c   (char*)z, z2-z,
21a0: 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e   SQLITE_TRANSIEN
21b0: 54 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  T,.             
21c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 53 51 4c               SQL
21d0: 49 54 45 5f 55 54 46 38 29 3b 0a 20 20 7d 65 6c  ITE_UTF8);.  }el
21e0: 73 65 7b 0a 20 20 20 20 69 66 28 20 70 31 2b 70  se{.    if( p1+p
21f0: 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20 20 20 70  2>len ){.      p
2200: 32 20 3d 20 6c 65 6e 2d 70 31 3b 0a 20 20 20 20  2 = len-p1;.    
2210: 20 20 69 66 28 20 70 32 3c 30 20 29 20 70 32 20    if( p2<0 ) p2 
2220: 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73  = 0;.    }.    s
2230: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62 6c  qlite3_result_bl
2240: 6f 62 36 34 28 63 6f 6e 74 65 78 74 2c 20 28 63  ob64(context, (c
2250: 68 61 72 2a 29 26 7a 5b 70 31 5d 2c 20 28 75 36  har*)&z[p1], (u6
2260: 34 29 70 32 2c 20 53 51 4c 49 54 45 5f 54 52 41  4)p2, SQLITE_TRA
2270: 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a 0a  NSIENT);.  }.}..
2280: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
2290: 74 69 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75 6e  tion of the roun
22a0: 64 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a  d() function.*/.
22b0: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f  #ifndef SQLITE_O
22c0: 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49  MIT_FLOATING_POI
22d0: 4e 54 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72  NT.static void r
22e0: 6f 75 6e 64 46 75 6e 63 28 73 71 6c 69 74 65 33  oundFunc(sqlite3
22f0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
2300: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
2310: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
2320: 76 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30 3b  v){.  int n = 0;
2330: 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20 63  .  double r;.  c
2340: 68 61 72 20 2a 7a 42 75 66 3b 0a 20 20 61 73 73  har *zBuf;.  ass
2350: 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20  ert( argc==1 || 
2360: 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28  argc==2 );.  if(
2370: 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20   argc==2 ){.    
2380: 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 3d  if( SQLITE_NULL=
2390: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
23a0: 79 70 65 28 61 72 67 76 5b 31 5d 29 20 29 20 72  ype(argv[1]) ) r
23b0: 65 74 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20 73  eturn;.    n = s
23c0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
23d0: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69  (argv[1]);.    i
23e0: 66 28 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33 30  f( n>30 ) n = 30
23f0: 3b 0a 20 20 20 20 69 66 28 20 6e 3c 30 20 29 20  ;.    if( n<0 ) 
2400: 6e 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28  n = 0;.  }.  if(
2410: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
2420: 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51  ype(argv[0])==SQ
2430: 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75  LITE_NULL ) retu
2440: 72 6e 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74 65  rn;.  r = sqlite
2450: 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61  3_value_double(a
2460: 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 49 66  rgv[0]);.  /* If
2470: 20 59 3d 3d 30 20 61 6e 64 20 58 20 77 69 6c 6c   Y==0 and X will
2480: 20 66 69 74 20 69 6e 20 61 20 36 34 2d 62 69 74   fit in a 64-bit
2490: 20 69 6e 74 2c 0a 20 20 2a 2a 20 68 61 6e 64 6c   int,.  ** handl
24a0: 65 20 74 68 65 20 72 6f 75 6e 64 69 6e 67 20 64  e the rounding d
24b0: 69 72 65 63 74 6c 79 2c 0a 20 20 2a 2a 20 6f 74  irectly,.  ** ot
24c0: 68 65 72 77 69 73 65 20 75 73 65 20 70 72 69 6e  herwise use prin
24d0: 74 66 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6e  tf..  */.  if( n
24e0: 3d 3d 30 20 26 26 20 72 3e 3d 30 20 26 26 20 72  ==0 && r>=0 && r
24f0: 3c 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2d 31  <LARGEST_INT64-1
2500: 20 29 7b 0a 20 20 20 20 72 20 3d 20 28 64 6f 75   ){.    r = (dou
2510: 62 6c 65 29 28 28 73 71 6c 69 74 65 5f 69 6e 74  ble)((sqlite_int
2520: 36 34 29 28 72 2b 30 2e 35 29 29 3b 0a 20 20 7d  64)(r+0.5));.  }
2530: 65 6c 73 65 20 69 66 28 20 6e 3d 3d 30 20 26 26  else if( n==0 &&
2540: 20 72 3c 30 20 26 26 20 28 2d 72 29 3c 4c 41 52   r<0 && (-r)<LAR
2550: 47 45 53 54 5f 49 4e 54 36 34 2d 31 20 29 7b 0a  GEST_INT64-1 ){.
2560: 20 20 20 20 72 20 3d 20 2d 28 64 6f 75 62 6c 65      r = -(double
2570: 29 28 28 73 71 6c 69 74 65 5f 69 6e 74 36 34 29  )((sqlite_int64)
2580: 28 28 2d 72 29 2b 30 2e 35 29 29 3b 0a 20 20 7d  ((-r)+0.5));.  }
2590: 65 6c 73 65 7b 0a 20 20 20 20 7a 42 75 66 20 3d  else{.    zBuf =
25a0: 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66   sqlite3_mprintf
25b0: 28 22 25 2e 2a 66 22 2c 6e 2c 72 29 3b 0a 20 20  ("%.*f",n,r);.  
25c0: 20 20 69 66 28 20 7a 42 75 66 3d 3d 30 20 29 7b    if( zBuf==0 ){
25d0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
25e0: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65  esult_error_nome
25f0: 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  m(context);.    
2600: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a    return;.    }.
2610: 20 20 20 20 73 71 6c 69 74 65 33 41 74 6f 46 28      sqlite3AtoF(
2620: 7a 42 75 66 2c 20 26 72 2c 20 73 71 6c 69 74 65  zBuf, &r, sqlite
2630: 33 53 74 72 6c 65 6e 33 30 28 7a 42 75 66 29 2c  3Strlen30(zBuf),
2640: 20 53 51 4c 49 54 45 5f 55 54 46 38 29 3b 0a 20   SQLITE_UTF8);. 
2650: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28     sqlite3_free(
2660: 7a 42 75 66 29 3b 0a 20 20 7d 0a 20 20 73 71 6c  zBuf);.  }.  sql
2670: 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62  ite3_result_doub
2680: 6c 65 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b 0a  le(context, r);.
2690: 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20  }.#endif../*.** 
26a0: 41 6c 6c 6f 63 61 74 65 20 6e 42 79 74 65 20 62  Allocate nByte b
26b0: 79 74 65 73 20 6f 66 20 73 70 61 63 65 20 75 73  ytes of space us
26c0: 69 6e 67 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c  ing sqlite3_mall
26d0: 6f 63 28 29 2e 20 49 66 20 74 68 65 0a 2a 2a 20  oc(). If the.** 
26e0: 61 6c 6c 6f 63 61 74 69 6f 6e 20 66 61 69 6c 73  allocation fails
26f0: 2c 20 63 61 6c 6c 20 73 71 6c 69 74 65 33 5f 72  , call sqlite3_r
2700: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65  esult_error_nome
2710: 6d 28 29 20 74 6f 20 6e 6f 74 69 66 79 0a 2a 2a  m() to notify.**
2720: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 68 61   the database ha
2730: 6e 64 6c 65 20 74 68 61 74 20 6d 61 6c 6c 6f 63  ndle that malloc
2740: 28 29 20 68 61 73 20 66 61 69 6c 65 64 20 61 6e  () has failed an
2750: 64 20 72 65 74 75 72 6e 20 4e 55 4c 4c 2e 0a 2a  d return NULL..*
2760: 2a 20 49 66 20 6e 42 79 74 65 20 69 73 20 6c 61  * If nByte is la
2770: 72 67 65 72 20 74 68 61 6e 20 74 68 65 20 6d 61  rger than the ma
2780: 78 69 6d 75 6d 20 73 74 72 69 6e 67 20 6f 72 20  ximum string or 
2790: 62 6c 6f 62 20 6c 65 6e 67 74 68 2c 20 74 68 65  blob length, the
27a0: 6e 0a 2a 2a 20 72 61 69 73 65 20 61 6e 20 53 51  n.** raise an SQ
27b0: 4c 49 54 45 5f 54 4f 4f 42 49 47 20 65 78 63 65  LITE_TOOBIG exce
27c0: 70 74 69 6f 6e 20 61 6e 64 20 72 65 74 75 72 6e  ption and return
27d0: 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63   NULL..*/.static
27e0: 20 76 6f 69 64 20 2a 63 6f 6e 74 65 78 74 4d 61   void *contextMa
27f0: 6c 6c 6f 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e  lloc(sqlite3_con
2800: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
2810: 36 34 20 6e 42 79 74 65 29 7b 0a 20 20 63 68 61  64 nByte){.  cha
2820: 72 20 2a 7a 3b 0a 20 20 73 71 6c 69 74 65 33 20  r *z;.  sqlite3 
2830: 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  *db = sqlite3_co
2840: 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28  ntext_db_handle(
2850: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61 73 73 65  context);.  asse
2860: 72 74 28 20 6e 42 79 74 65 3e 30 20 29 3b 0a 20  rt( nByte>0 );. 
2870: 20 74 65 73 74 63 61 73 65 28 20 6e 42 79 74 65   testcase( nByte
2880: 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  ==db->aLimit[SQL
2890: 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48  ITE_LIMIT_LENGTH
28a0: 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28  ] );.  testcase(
28b0: 20 6e 42 79 74 65 3d 3d 64 62 2d 3e 61 4c 69 6d   nByte==db->aLim
28c0: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
28d0: 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69  LENGTH]+1 );.  i
28e0: 66 28 20 6e 42 79 74 65 3e 64 62 2d 3e 61 4c 69  f( nByte>db->aLi
28f0: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
2900: 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20  _LENGTH] ){.    
2910: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
2920: 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74  rror_toobig(cont
2930: 65 78 74 29 3b 0a 20 20 20 20 7a 20 3d 20 30 3b  ext);.    z = 0;
2940: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 20  .  }else{.    z 
2950: 3d 20 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 28  = sqlite3Malloc(
2960: 6e 42 79 74 65 29 3b 0a 20 20 20 20 69 66 28 20  nByte);.    if( 
2970: 21 7a 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  !z ){.      sqli
2980: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
2990: 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b  _nomem(context);
29a0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74  .    }.  }.  ret
29b0: 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  urn z;.}../*.** 
29c0: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
29d0: 66 20 74 68 65 20 75 70 70 65 72 28 29 20 61 6e  f the upper() an
29e0: 64 20 6c 6f 77 65 72 28 29 20 53 51 4c 20 66 75  d lower() SQL fu
29f0: 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74  nctions..*/.stat
2a00: 69 63 20 76 6f 69 64 20 75 70 70 65 72 46 75 6e  ic void upperFun
2a10: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
2a20: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
2a30: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
2a40: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63  lue **argv){.  c
2a50: 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73 74  har *z1;.  const
2a60: 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74   char *z2;.  int
2a70: 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44 5f   i, n;.  UNUSED_
2a80: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
2a90: 0a 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29 73  .  z2 = (char*)s
2aa0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
2ab0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20  t(argv[0]);.  n 
2ac0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
2ad0: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
2ae0: 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61 74    /* Verify that
2af0: 20 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62 79   the call to _by
2b00: 74 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20 69  tes() does not i
2b10: 6e 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f 74  nvalidate the _t
2b20: 65 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a 2f  ext() pointer */
2b30: 0a 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d 28  .  assert( z2==(
2b40: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
2b50: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
2b60: 29 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29 7b  ) );.  if( z2 ){
2b70: 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65 78  .    z1 = contex
2b80: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
2b90: 20 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20 20   ((i64)n)+1);.  
2ba0: 20 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20 20    if( z1 ){.    
2bb0: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20    for(i=0; i<n; 
2bc0: 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a 31  i++){.        z1
2bd0: 5b 69 5d 20 3d 20 28 63 68 61 72 29 73 71 6c 69  [i] = (char)sqli
2be0: 74 65 33 54 6f 75 70 70 65 72 28 7a 32 5b 69 5d  te3Toupper(z2[i]
2bf0: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
2c00: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
2c10: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 31  text(context, z1
2c20: 2c 20 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72 65  , n, sqlite3_fre
2c30: 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a  e);.    }.  }.}.
2c40: 73 74 61 74 69 63 20 76 6f 69 64 20 6c 6f 77 65  static void lowe
2c50: 72 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  rFunc(sqlite3_co
2c60: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
2c70: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
2c80: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
2c90: 0a 20 20 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63  .  char *z1;.  c
2ca0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20  onst char *z2;. 
2cb0: 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55 4e 55   int i, n;.  UNU
2cc0: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72  SED_PARAMETER(ar
2cd0: 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63 68 61  gc);.  z2 = (cha
2ce0: 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  r*)sqlite3_value
2cf0: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
2d00: 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61    n = sqlite3_va
2d10: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
2d20: 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66 79 20  ]);.  /* Verify 
2d30: 74 68 61 74 20 74 68 65 20 63 61 6c 6c 20 74 6f  that the call to
2d40: 20 5f 62 79 74 65 73 28 29 20 64 6f 65 73 20 6e   _bytes() does n
2d50: 6f 74 20 69 6e 76 61 6c 69 64 61 74 65 20 74 68  ot invalidate th
2d60: 65 20 5f 74 65 78 74 28 29 20 70 6f 69 6e 74 65  e _text() pointe
2d70: 72 20 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 7a  r */.  assert( z
2d80: 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69 74 65  2==(char*)sqlite
2d90: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
2da0: 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28 20 7a  v[0]) );.  if( z
2db0: 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20 63 6f  2 ){.    z1 = co
2dc0: 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74  ntextMalloc(cont
2dd0: 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2b 31 29  ext, ((i64)n)+1)
2de0: 3b 0a 20 20 20 20 69 66 28 20 7a 31 20 29 7b 0a  ;.    if( z1 ){.
2df0: 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69        for(i=0; i
2e00: 3c 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  <n; i++){.      
2e10: 20 20 7a 31 5b 69 5d 20 3d 20 73 71 6c 69 74 65    z1[i] = sqlite
2e20: 33 54 6f 6c 6f 77 65 72 28 7a 32 5b 69 5d 29 3b  3Tolower(z2[i]);
2e30: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73  .      }.      s
2e40: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
2e50: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 31 2c 20  xt(context, z1, 
2e60: 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29  n, sqlite3_free)
2e70: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f  ;.    }.  }.}../
2e80: 2a 0a 2a 2a 20 53 6f 6d 65 20 66 75 6e 63 74 69  *.** Some functi
2e90: 6f 6e 73 20 6c 69 6b 65 20 43 4f 41 4c 45 53 43  ons like COALESC
2ea0: 45 28 29 20 61 6e 64 20 49 46 4e 55 4c 4c 28 29  E() and IFNULL()
2eb0: 20 61 6e 64 20 55 4e 4c 49 4b 45 4c 59 28 29 20   and UNLIKELY() 
2ec0: 61 72 65 20 69 6d 70 6c 65 6d 65 6e 74 65 64 0a  are implemented.
2ed0: 2a 2a 20 61 73 20 56 44 42 45 20 63 6f 64 65 20  ** as VDBE code 
2ee0: 73 6f 20 74 68 61 74 20 75 6e 75 73 65 64 20 61  so that unused a
2ef0: 72 67 75 6d 65 6e 74 20 76 61 6c 75 65 73 20 64  rgument values d
2f00: 6f 20 6e 6f 74 20 68 61 76 65 20 74 6f 20 62 65  o not have to be
2f10: 20 63 6f 6d 70 75 74 65 64 2e 0a 2a 2a 20 48 6f   computed..** Ho
2f20: 77 65 76 65 72 2c 20 77 65 20 73 74 69 6c 6c 20  wever, we still 
2f30: 6e 65 65 64 20 73 6f 6d 65 20 6b 69 6e 64 20 6f  need some kind o
2f40: 66 20 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65  f function imple
2f50: 6d 65 6e 74 61 74 69 6f 6e 20 66 6f 72 20 74 68  mentation for th
2f60: 69 73 0a 2a 2a 20 72 6f 75 74 69 6e 65 73 20 69  is.** routines i
2f70: 6e 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 74  n the function t
2f80: 61 62 6c 65 2e 20 20 54 68 65 20 6e 6f 6f 70 46  able.  The noopF
2f90: 75 6e 63 20 6d 61 63 72 6f 20 70 72 6f 76 69 64  unc macro provid
2fa0: 65 73 20 74 68 69 73 2e 0a 2a 2a 20 6e 6f 6f 70  es this..** noop
2fb0: 46 75 6e 63 20 77 69 6c 6c 20 6e 65 76 65 72 20  Func will never 
2fc0: 62 65 20 63 61 6c 6c 65 64 20 73 6f 20 69 74 20  be called so it 
2fd0: 64 6f 65 73 6e 27 74 20 6d 61 74 74 65 72 20 77  doesn't matter w
2fe0: 68 61 74 20 74 68 65 20 69 6d 70 6c 65 6d 65 6e  hat the implemen
2ff0: 74 61 74 69 6f 6e 0a 2a 2a 20 69 73 2e 20 20 57  tation.** is.  W
3000: 65 20 6d 69 67 68 74 20 61 73 20 77 65 6c 6c 20  e might as well 
3010: 75 73 65 20 74 68 65 20 22 76 65 72 73 69 6f 6e  use the "version
3020: 28 29 22 20 66 75 6e 63 74 69 6f 6e 20 61 73 20  ()" function as 
3030: 61 20 73 75 62 73 74 69 74 75 74 65 2e 0a 2a 2f  a substitute..*/
3040: 0a 23 64 65 66 69 6e 65 20 6e 6f 6f 70 46 75 6e  .#define noopFun
3050: 63 20 76 65 72 73 69 6f 6e 46 75 6e 63 20 20 20  c versionFunc   
3060: 2f 2a 20 53 75 62 73 74 69 74 75 74 65 20 66 75  /* Substitute fu
3070: 6e 63 74 69 6f 6e 20 2d 20 6e 65 76 65 72 20 63  nction - never c
3080: 61 6c 6c 65 64 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20  alled */../*.** 
3090: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
30a0: 66 20 72 61 6e 64 6f 6d 28 29 2e 20 20 52 65 74  f random().  Ret
30b0: 75 72 6e 20 61 20 72 61 6e 64 6f 6d 20 69 6e 74  urn a random int
30c0: 65 67 65 72 2e 20 20 0a 2a 2f 0a 73 74 61 74 69  eger.  .*/.stati
30d0: 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d 46 75 6e  c void randomFun
30e0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
30f0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
3100: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20   int NotUsed,.  
3110: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
3120: 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71  NotUsed2.){.  sq
3130: 6c 69 74 65 5f 69 6e 74 36 34 20 72 3b 0a 20 20  lite_int64 r;.  
3140: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
3150: 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73  2(NotUsed, NotUs
3160: 65 64 32 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f  ed2);.  sqlite3_
3170: 72 61 6e 64 6f 6d 6e 65 73 73 28 73 69 7a 65 6f  randomness(sizeo
3180: 66 28 72 29 2c 20 26 72 29 3b 0a 20 20 69 66 28  f(r), &r);.  if(
3190: 20 72 3c 30 20 29 7b 0a 20 20 20 20 2f 2a 20 57   r<0 ){.    /* W
31a0: 65 20 6e 65 65 64 20 74 6f 20 70 72 65 76 65 6e  e need to preven
31b0: 74 20 61 20 72 61 6e 64 6f 6d 20 6e 75 6d 62 65  t a random numbe
31c0: 72 20 6f 66 20 30 78 38 30 30 30 30 30 30 30 30  r of 0x800000000
31d0: 30 30 30 30 30 30 30 20 0a 20 20 20 20 2a 2a 20  0000000 .    ** 
31e0: 28 6f 72 20 2d 39 32 32 33 33 37 32 30 33 36 38  (or -92233720368
31f0: 35 34 37 37 35 38 30 38 29 20 73 69 6e 63 65 20  54775808) since 
3200: 77 68 65 6e 20 79 6f 75 20 64 6f 20 61 62 73 28  when you do abs(
3210: 29 20 6f 66 20 74 68 61 74 0a 20 20 20 20 2a 2a  ) of that.    **
3220: 20 6e 75 6d 62 65 72 20 6f 66 20 79 6f 75 20 67   number of you g
3230: 65 74 20 74 68 65 20 73 61 6d 65 20 76 61 6c 75  et the same valu
3240: 65 20 62 61 63 6b 20 61 67 61 69 6e 2e 20 20 54  e back again.  T
3250: 6f 20 64 6f 20 74 68 69 73 0a 20 20 20 20 2a 2a  o do this.    **
3260: 20 69 6e 20 61 20 77 61 79 20 74 68 61 74 20 69   in a way that i
3270: 73 20 74 65 73 74 61 62 6c 65 2c 20 6d 61 73 6b  s testable, mask
3280: 20 74 68 65 20 73 69 67 6e 20 62 69 74 20 6f 66   the sign bit of
3290: 66 20 6f 66 20 6e 65 67 61 74 69 76 65 0a 20 20  f of negative.  
32a0: 20 20 2a 2a 20 76 61 6c 75 65 73 2c 20 72 65 73    ** values, res
32b0: 75 6c 74 69 6e 67 20 69 6e 20 61 20 70 6f 73 69  ulting in a posi
32c0: 74 69 76 65 20 76 61 6c 75 65 2e 20 20 54 68 65  tive value.  The
32d0: 6e 20 74 61 6b 65 20 74 68 65 20 0a 20 20 20 20  n take the .    
32e0: 2a 2a 20 32 73 20 63 6f 6d 70 6c 65 6d 65 6e 74  ** 2s complement
32f0: 20 6f 66 20 74 68 61 74 20 70 6f 73 69 74 69 76   of that positiv
3300: 65 20 76 61 6c 75 65 2e 20 20 54 68 65 20 65 6e  e value.  The en
3310: 64 20 72 65 73 75 6c 74 20 63 61 6e 0a 20 20 20  d result can.   
3320: 20 2a 2a 20 74 68 65 72 65 66 6f 72 65 20 62 65   ** therefore be
3330: 20 6e 6f 20 6c 65 73 73 20 74 68 61 6e 20 2d 39   no less than -9
3340: 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38  2233720368547758
3350: 30 37 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 72  07..    */.    r
3360: 20 3d 20 2d 28 72 20 26 20 4c 41 52 47 45 53 54   = -(r & LARGEST
3370: 5f 49 4e 54 36 34 29 3b 0a 20 20 7d 0a 20 20 73  _INT64);.  }.  s
3380: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
3390: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b  t64(context, r);
33a0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
33b0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72 61 6e 64  entation of rand
33c0: 6f 6d 62 6c 6f 62 28 4e 29 2e 20 20 52 65 74 75  omblob(N).  Retu
33d0: 72 6e 20 61 20 72 61 6e 64 6f 6d 20 62 6c 6f 62  rn a random blob
33e0: 0a 2a 2a 20 74 68 61 74 20 69 73 20 4e 20 62 79  .** that is N by
33f0: 74 65 73 20 6c 6f 6e 67 2e 0a 2a 2f 0a 73 74 61  tes long..*/.sta
3400: 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d 42  tic void randomB
3410: 6c 6f 62 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  lob(.  sqlite3_c
3420: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
3430: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
3440: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
3450: 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a  rgv.){.  int n;.
3460: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
3470: 2a 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72  *p;.  assert( ar
3480: 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45  gc==1 );.  UNUSE
3490: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
34a0: 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  );.  n = sqlite3
34b0: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
34c0: 30 5d 29 3b 0a 20 20 69 66 28 20 6e 3c 31 20 29  0]);.  if( n<1 )
34d0: 7b 0a 20 20 20 20 6e 20 3d 20 31 3b 0a 20 20 7d  {.    n = 1;.  }
34e0: 0a 20 20 70 20 3d 20 63 6f 6e 74 65 78 74 4d 61  .  p = contextMa
34f0: 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 6e 29  lloc(context, n)
3500: 3b 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 20 20  ;.  if( p ){.   
3510: 20 73 71 6c 69 74 65 33 5f 72 61 6e 64 6f 6d 6e   sqlite3_randomn
3520: 65 73 73 28 6e 2c 20 70 29 3b 0a 20 20 20 20 73  ess(n, p);.    s
3530: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62 6c  qlite3_result_bl
3540: 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61  ob(context, (cha
3550: 72 2a 29 70 2c 20 6e 2c 20 73 71 6c 69 74 65 33  r*)p, n, sqlite3
3560: 5f 66 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f  _free);.  }.}../
3570: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
3580: 69 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73 74 5f  ion of the last_
3590: 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 53  insert_rowid() S
35a0: 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68  QL function.  Th
35b0: 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c 75  e return.** valu
35c0: 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73  e is the same as
35d0: 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 61 73   the sqlite3_las
35e0: 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29  t_insert_rowid()
35f0: 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a   API function..*
3600: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 61  /.static void la
3610: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
3620: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
3630: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20 20  xt *context, .  
3640: 69 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a 20 20  int NotUsed, .  
3650: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
3660: 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71  NotUsed2.){.  sq
3670: 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69  lite3 *db = sqli
3680: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
3690: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a  andle(context);.
36a0: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
36b0: 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74  ER2(NotUsed, Not
36c0: 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50  Used2);.  /* IMP
36d0: 3a 20 52 2d 35 31 35 31 33 2d 31 32 30 32 36 20  : R-51513-12026 
36e0: 54 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f  The last_insert_
36f0: 72 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e 63  rowid() SQL func
3700: 74 69 6f 6e 20 69 73 20 61 0a 20 20 2a 2a 20 77  tion is a.  ** w
3710: 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68  rapper around th
3720: 65 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69  e sqlite3_last_i
3730: 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 43 2f  nsert_rowid() C/
3740: 43 2b 2b 20 69 6e 74 65 72 66 61 63 65 0a 20 20  C++ interface.  
3750: 2a 2a 20 66 75 6e 63 74 69 6f 6e 2e 20 2a 2f 0a  ** function. */.
3760: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
3770: 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20  _int64(context, 
3780: 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73  sqlite3_last_ins
3790: 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29 3b 0a  ert_rowid(db));.
37a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
37b0: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 63  ntation of the c
37c0: 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75 6e  hanges() SQL fun
37d0: 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50  ction..**.** IMP
37e0: 3a 20 52 2d 36 32 30 37 33 2d 31 31 32 30 39 20  : R-62073-11209 
37f0: 54 68 65 20 63 68 61 6e 67 65 73 28 29 20 53 51  The changes() SQ
3800: 4c 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20  L function is a 
3810: 77 72 61 70 70 65 72 0a 2a 2a 20 61 72 6f 75 6e  wrapper.** aroun
3820: 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63 68  d the sqlite3_ch
3830: 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b 20 66 75  anges() C/C++ fu
3840: 6e 63 74 69 6f 6e 20 61 6e 64 20 68 65 6e 63 65  nction and hence
3850: 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 73 61 6d   follows the sam
3860: 65 0a 2a 2a 20 72 75 6c 65 73 20 66 6f 72 20 63  e.** rules for c
3870: 6f 75 6e 74 69 6e 67 20 63 68 61 6e 67 65 73 2e  ounting changes.
3880: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
3890: 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69 74  changes(.  sqlit
38a0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
38b0: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
38c0: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
38d0: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
38e0: 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  {.  sqlite3 *db 
38f0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
3900: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
3910: 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  ext);.  UNUSED_P
3920: 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65  ARAMETER2(NotUse
3930: 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20  d, NotUsed2);.  
3940: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
3950: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  nt(context, sqli
3960: 74 65 33 5f 63 68 61 6e 67 65 73 28 64 62 29 29  te3_changes(db))
3970: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
3980: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
3990: 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29   total_changes()
39a0: 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20   SQL function.  
39b0: 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65  The return value
39c0: 20 69 73 0a 2a 2a 20 74 68 65 20 73 61 6d 65 20   is.** the same 
39d0: 61 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 74  as the sqlite3_t
39e0: 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20 41  otal_changes() A
39f0: 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a  PI function..*/.
3a00: 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74 61  static void tota
3a10: 6c 5f 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c  l_changes(.  sql
3a20: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
3a30: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74  ntext,.  int Not
3a40: 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f  Used,.  sqlite3_
3a50: 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32  value **NotUsed2
3a60: 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  .){.  sqlite3 *d
3a70: 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  b = sqlite3_cont
3a80: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
3a90: 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44  ntext);.  UNUSED
3aa0: 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55  _PARAMETER2(NotU
3ab0: 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a  sed, NotUsed2);.
3ac0: 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 35 32 37 35    /* IMP: R-5275
3ad0: 36 2d 34 31 39 39 33 20 54 68 69 73 20 66 75 6e  6-41993 This fun
3ae0: 63 74 69 6f 6e 20 69 73 20 61 20 77 72 61 70 70  ction is a wrapp
3af0: 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20 20  er around the.  
3b00: 2a 2a 20 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c  ** sqlite3_total
3b10: 5f 63 68 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b  _changes() C/C++
3b20: 20 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20   interface. */. 
3b30: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
3b40: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  int(context, sql
3b50: 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67  ite3_total_chang
3b60: 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  es(db));.}../*.*
3b70: 2a 20 41 20 73 74 72 75 63 74 75 72 65 20 64 65  * A structure de
3b80: 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64 6f  fining how to do
3b90: 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d 70   GLOB-style comp
3ba0: 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72 75  arisons..*/.stru
3bb0: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 7b  ct compareInfo {
3bc0: 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b 0a  .  u8 matchAll;.
3bd0: 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a 20    u8 matchOne;. 
3be0: 20 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20 20   u8 matchSet;.  
3bf0: 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a 2f  u8 noCase;.};../
3c00: 2a 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45 20 61 6e  *.** For LIKE an
3c10: 64 20 47 4c 4f 42 20 6d 61 74 63 68 69 6e 67 20  d GLOB matching 
3c20: 6f 6e 20 45 42 43 44 49 43 20 6d 61 63 68 69 6e  on EBCDIC machin
3c30: 65 73 2c 20 61 73 73 75 6d 65 20 74 68 61 74 20  es, assume that 
3c40: 65 76 65 72 79 0a 2a 2a 20 63 68 61 72 61 63 74  every.** charact
3c50: 65 72 20 69 73 20 65 78 61 63 74 6c 79 20 6f 6e  er is exactly on
3c60: 65 20 62 79 74 65 20 69 6e 20 73 69 7a 65 2e 20  e byte in size. 
3c70: 20 41 6c 73 6f 2c 20 61 6c 6c 20 63 68 61 72 61   Also, all chara
3c80: 63 74 65 72 73 20 61 72 65 0a 2a 2a 20 61 62 6c  cters are.** abl
3c90: 65 20 74 6f 20 70 61 72 74 69 63 69 70 61 74 65  e to participate
3ca0: 20 69 6e 20 75 70 70 65 72 2d 63 61 73 65 2d 74   in upper-case-t
3cb0: 6f 2d 6c 6f 77 65 72 2d 63 61 73 65 20 6d 61 70  o-lower-case map
3cc0: 70 69 6e 67 73 20 69 6e 20 45 42 43 44 49 43 0a  pings in EBCDIC.
3cd0: 2a 2a 20 77 68 65 72 65 61 73 20 6f 6e 6c 79 20  ** whereas only 
3ce0: 63 68 61 72 61 63 74 65 72 73 20 6c 65 73 73 20  characters less 
3cf0: 74 68 61 6e 20 30 78 38 30 20 64 6f 20 69 6e 20  than 0x80 do in 
3d00: 41 53 43 49 49 2e 0a 2a 2f 0a 23 69 66 20 64 65  ASCII..*/.#if de
3d10: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 45 42 43  fined(SQLITE_EBC
3d20: 44 49 43 29 0a 23 20 64 65 66 69 6e 65 20 73 71  DIC).# define sq
3d30: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 41 29  lite3Utf8Read(A)
3d40: 20 20 20 20 20 20 20 20 28 2a 28 28 2a 41 29 2b          (*((*A)+
3d50: 2b 29 29 0a 23 20 64 65 66 69 6e 65 20 47 6c 6f  +)).# define Glo
3d60: 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 41 29  bUpperToLower(A)
3d70: 20 20 20 20 20 20 20 41 20 3d 20 73 71 6c 69 74         A = sqlit
3d80: 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 41  e3UpperToLower[A
3d90: 5d 0a 23 20 64 65 66 69 6e 65 20 47 6c 6f 62 55  ].# define GlobU
3da0: 70 70 65 72 54 6f 4c 6f 77 65 72 41 73 63 69 69  pperToLowerAscii
3db0: 28 41 29 20 20 41 20 3d 20 73 71 6c 69 74 65 33  (A)  A = sqlite3
3dc0: 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 41 5d 0a  UpperToLower[A].
3dd0: 23 65 6c 73 65 0a 23 20 64 65 66 69 6e 65 20 47  #else.# define G
3de0: 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 28  lobUpperToLower(
3df0: 41 29 20 20 20 20 20 20 20 69 66 28 20 41 3c 3d  A)       if( A<=
3e00: 30 78 37 66 20 29 7b 20 41 20 3d 20 73 71 6c 69  0x7f ){ A = sqli
3e10: 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b  te3UpperToLower[
3e20: 41 5d 3b 20 7d 0a 23 20 64 65 66 69 6e 65 20 47  A]; }.# define G
3e30: 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 41  lobUpperToLowerA
3e40: 73 63 69 69 28 41 29 20 20 41 20 3d 20 73 71 6c  scii(A)  A = sql
3e50: 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72  ite3UpperToLower
3e60: 5b 41 5d 0a 23 65 6e 64 69 66 0a 0a 73 74 61 74  [A].#endif..stat
3e70: 69 63 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20  ic const struct 
3e80: 63 6f 6d 70 61 72 65 49 6e 66 6f 20 67 6c 6f 62  compareInfo glob
3e90: 49 6e 66 6f 20 3d 20 7b 20 27 2a 27 2c 20 27 3f  Info = { '*', '?
3ea0: 27 2c 20 27 5b 27 2c 20 30 20 7d 3b 0a 2f 2a 20  ', '[', 0 };./* 
3eb0: 54 68 65 20 63 6f 72 72 65 63 74 20 53 51 4c 2d  The correct SQL-
3ec0: 39 32 20 62 65 68 61 76 69 6f 72 20 69 73 20 66  92 behavior is f
3ed0: 6f 72 20 74 68 65 20 4c 49 4b 45 20 6f 70 65 72  or the LIKE oper
3ee0: 61 74 6f 72 20 74 6f 20 69 67 6e 6f 72 65 0a 2a  ator to ignore.*
3ef0: 2a 20 63 61 73 65 2e 20 20 54 68 75 73 20 20 27  * case.  Thus  '
3f00: 61 27 20 4c 49 4b 45 20 27 41 27 20 77 6f 75 6c  a' LIKE 'A' woul
3f10: 64 20 62 65 20 74 72 75 65 2e 20 2a 2f 0a 73 74  d be true. */.st
3f20: 61 74 69 63 20 63 6f 6e 73 74 20 73 74 72 75 63  atic const struc
3f30: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 6c 69  t compareInfo li
3f40: 6b 65 49 6e 66 6f 4e 6f 72 6d 20 3d 20 7b 20 27  keInfoNorm = { '
3f50: 25 27 2c 20 27 5f 27 2c 20 20 20 30 2c 20 31 20  %', '_',   0, 1 
3f60: 7d 3b 0a 2f 2a 20 49 66 20 53 51 4c 49 54 45 5f  };./* If SQLITE_
3f70: 43 41 53 45 5f 53 45 4e 53 49 54 49 56 45 5f 4c  CASE_SENSITIVE_L
3f80: 49 4b 45 20 69 73 20 64 65 66 69 6e 65 64 2c 20  IKE is defined, 
3f90: 74 68 65 6e 20 74 68 65 20 4c 49 4b 45 20 6f 70  then the LIKE op
3fa0: 65 72 61 74 6f 72 0a 2a 2a 20 69 73 20 63 61 73  erator.** is cas
3fb0: 65 20 73 65 6e 73 69 74 69 76 65 20 63 61 75 73  e sensitive caus
3fc0: 69 6e 67 20 27 61 27 20 4c 49 4b 45 20 27 41 27  ing 'a' LIKE 'A'
3fd0: 20 74 6f 20 62 65 20 66 61 6c 73 65 20 2a 2f 0a   to be false */.
3fe0: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74 72  static const str
3ff0: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
4000: 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d 20 7b 20  likeInfoAlt = { 
4010: 27 25 27 2c 20 27 5f 27 2c 20 20 20 30 2c 20 30  '%', '_',   0, 0
4020: 20 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 61   };../*.** Compa
4030: 72 65 20 74 77 6f 20 55 54 46 2d 38 20 73 74 72  re two UTF-8 str
4040: 69 6e 67 73 20 66 6f 72 20 65 71 75 61 6c 69 74  ings for equalit
4050: 79 20 77 68 65 72 65 20 74 68 65 20 66 69 72 73  y where the firs
4060: 74 20 73 74 72 69 6e 67 20 63 61 6e 0a 2a 2a 20  t string can.** 
4070: 70 6f 74 65 6e 74 69 61 6c 6c 79 20 62 65 20 61  potentially be a
4080: 20 22 67 6c 6f 62 22 20 6f 72 20 22 6c 69 6b 65   "glob" or "like
4090: 22 20 65 78 70 72 65 73 73 69 6f 6e 2e 20 20 52  " expression.  R
40a0: 65 74 75 72 6e 20 74 72 75 65 20 28 31 29 20 69  eturn true (1) i
40b0: 66 20 74 68 65 79 0a 2a 2a 20 61 72 65 20 74 68  f they.** are th
40c0: 65 20 73 61 6d 65 20 61 6e 64 20 66 61 6c 73 65  e same and false
40d0: 20 28 30 29 20 69 66 20 74 68 65 79 20 61 72 65   (0) if they are
40e0: 20 64 69 66 66 65 72 65 6e 74 2e 0a 2a 2a 0a 2a   different..**.*
40f0: 2a 20 47 6c 6f 62 62 69 6e 67 20 72 75 6c 65 73  * Globbing rules
4100: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 2a 27  :.**.**      '*'
4110: 20 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 61         Matches a
4120: 6e 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20 7a  ny sequence of z
4130: 65 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61 72  ero or more char
4140: 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20  acters..**.**   
4150: 20 20 20 27 3f 27 20 20 20 20 20 20 20 4d 61 74     '?'       Mat
4160: 63 68 65 73 20 65 78 61 63 74 6c 79 20 6f 6e 65  ches exactly one
4170: 20 63 68 61 72 61 63 74 65 72 2e 0a 2a 2a 0a 2a   character..**.*
4180: 2a 20 20 20 20 20 5b 2e 2e 2e 5d 20 20 20 20 20  *     [...]     
4190: 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68 61   Matches one cha
41a0: 72 61 63 74 65 72 20 66 72 6f 6d 20 74 68 65 20  racter from the 
41b0: 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74 20 6f 66  enclosed list of
41c0: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20  .**             
41d0: 20 20 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a     characters..*
41e0: 2a 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d 20  *.**     [^...] 
41f0: 20 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20      Matches one 
4200: 63 68 61 72 61 63 74 65 72 20 6e 6f 74 20 69 6e  character not in
4210: 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69   the enclosed li
4220: 73 74 2e 0a 2a 2a 0a 2a 2a 20 57 69 74 68 20 74  st..**.** With t
4230: 68 65 20 5b 2e 2e 2e 5d 20 61 6e 64 20 5b 5e 2e  he [...] and [^.
4240: 2e 2e 5d 20 6d 61 74 63 68 69 6e 67 2c 20 61 20  ..] matching, a 
4250: 27 5d 27 20 63 68 61 72 61 63 74 65 72 20 63 61  ']' character ca
4260: 6e 20 62 65 20 69 6e 63 6c 75 64 65 64 0a 2a 2a  n be included.**
4270: 20 69 6e 20 74 68 65 20 6c 69 73 74 20 62 79 20   in the list by 
4280: 6d 61 6b 69 6e 67 20 69 74 20 74 68 65 20 66 69  making it the fi
4290: 72 73 74 20 63 68 61 72 61 63 74 65 72 20 61 66  rst character af
42a0: 74 65 72 20 27 5b 27 20 6f 72 20 27 5e 27 2e 20  ter '[' or '^'. 
42b0: 20 41 0a 2a 2a 20 72 61 6e 67 65 20 6f 66 20 63   A.** range of c
42c0: 68 61 72 61 63 74 65 72 73 20 63 61 6e 20 62 65  haracters can be
42d0: 20 73 70 65 63 69 66 69 65 64 20 75 73 69 6e 67   specified using
42e0: 20 27 2d 27 2e 20 20 45 78 61 6d 70 6c 65 3a 0a   '-'.  Example:.
42f0: 2a 2a 20 22 5b 61 2d 7a 5d 22 20 6d 61 74 63 68  ** "[a-z]" match
4300: 65 73 20 61 6e 79 20 73 69 6e 67 6c 65 20 6c 6f  es any single lo
4310: 77 65 72 2d 63 61 73 65 20 6c 65 74 74 65 72 2e  wer-case letter.
4320: 20 20 54 6f 20 6d 61 74 63 68 20 61 20 27 2d 27    To match a '-'
4330: 2c 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 74 68 65  , make.** it the
4340: 20 6c 61 73 74 20 63 68 61 72 61 63 74 65 72 20   last character 
4350: 69 6e 20 74 68 65 20 6c 69 73 74 2e 0a 2a 2a 0a  in the list..**.
4360: 2a 2a 20 4c 69 6b 65 20 6d 61 74 63 68 69 6e 67  ** Like matching
4370: 20 72 75 6c 65 73 3a 0a 2a 2a 20 0a 2a 2a 20 20   rules:.** .**  
4380: 20 20 20 20 27 25 27 20 20 20 20 20 20 20 4d 61      '%'       Ma
4390: 74 63 68 65 73 20 61 6e 79 20 73 65 71 75 65 6e  tches any sequen
43a0: 63 65 20 6f 66 20 7a 65 72 6f 20 6f 72 20 6d 6f  ce of zero or mo
43b0: 72 65 20 63 68 61 72 61 63 74 65 72 73 0a 2a 2a  re characters.**
43c0: 0a 2a 2a 2a 20 20 20 20 20 27 5f 27 20 20 20 20  .***     '_'    
43d0: 20 20 20 4d 61 74 63 68 65 73 20 61 6e 79 20 6f     Matches any o
43e0: 6e 65 20 63 68 61 72 61 63 74 65 72 0a 2a 2a 0a  ne character.**.
43f0: 2a 2a 20 20 20 20 20 20 45 63 20 20 20 20 20 20  **      Ec      
4400: 20 20 57 68 65 72 65 20 45 20 69 73 20 74 68 65    Where E is the
4410: 20 22 65 73 63 22 20 63 68 61 72 61 63 74 65 72   "esc" character
4420: 20 61 6e 64 20 63 20 69 73 20 61 6e 79 20 6f 74   and c is any ot
4430: 68 65 72 0a 2a 2a 20 20 20 20 20 20 20 20 20 20  her.**          
4440: 20 20 20 20 20 20 63 68 61 72 61 63 74 65 72 2c        character,
4450: 20 69 6e 63 6c 75 64 69 6e 67 20 27 25 27 2c 20   including '%', 
4460: 27 5f 27 2c 20 61 6e 64 20 65 73 63 2c 20 6d 61  '_', and esc, ma
4470: 74 63 68 20 65 78 61 63 74 6c 79 20 63 2e 0a 2a  tch exactly c..*
4480: 2a 0a 2a 2a 20 54 68 65 20 63 6f 6d 6d 65 6e 74  *.** The comment
4490: 73 20 74 68 72 6f 75 67 68 20 74 68 69 73 20 72  s through this r
44a0: 6f 75 74 69 6e 65 20 75 73 75 61 6c 6c 79 20 61  outine usually a
44b0: 73 73 75 6d 65 20 67 6c 6f 62 20 6d 61 74 63 68  ssume glob match
44c0: 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20  ing..**.** This 
44d0: 72 6f 75 74 69 6e 65 20 69 73 20 75 73 75 61 6c  routine is usual
44e0: 6c 79 20 71 75 69 63 6b 2c 20 62 75 74 20 63 61  ly quick, but ca
44f0: 6e 20 62 65 20 4e 2a 2a 32 20 69 6e 20 74 68 65  n be N**2 in the
4500: 20 77 6f 72 73 74 20 63 61 73 65 2e 0a 2a 2f 0a   worst case..*/.
4510: 73 74 61 74 69 63 20 69 6e 74 20 70 61 74 74 65  static int patte
4520: 72 6e 43 6f 6d 70 61 72 65 28 0a 20 20 63 6f 6e  rnCompare(.  con
4530: 73 74 20 75 38 20 2a 7a 50 61 74 74 65 72 6e 2c  st u8 *zPattern,
4540: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
4550: 20 54 68 65 20 67 6c 6f 62 20 70 61 74 74 65 72   The glob patter
4560: 6e 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 38 20  n */.  const u8 
4570: 2a 7a 53 74 72 69 6e 67 2c 20 20 20 20 20 20 20  *zString,       
4580: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 73          /* The s
4590: 74 72 69 6e 67 20 74 6f 20 63 6f 6d 70 61 72 65  tring to compare
45a0: 20 61 67 61 69 6e 73 74 20 74 68 65 20 67 6c 6f   against the glo
45b0: 62 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 73 74 72  b */.  const str
45c0: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
45d0: 2a 70 49 6e 66 6f 2c 20 2f 2a 20 49 6e 66 6f 72  *pInfo, /* Infor
45e0: 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 68 6f 77  mation about how
45f0: 20 74 6f 20 64 6f 20 74 68 65 20 63 6f 6d 70 61   to do the compa
4600: 72 65 20 2a 2f 0a 20 20 75 33 32 20 65 73 63 20  re */.  u32 esc 
4610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4620: 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20           /* The 
4630: 65 73 63 61 70 65 20 63 68 61 72 61 63 74 65 72  escape character
4640: 20 2a 2f 0a 29 7b 0a 20 20 75 33 32 20 63 2c 20   */.){.  u32 c, 
4650: 63 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  c2;             
4660: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 65 78            /* Nex
4670: 74 20 70 61 74 74 65 72 6e 20 61 6e 64 20 69 6e  t pattern and in
4680: 70 75 74 20 73 74 72 69 6e 67 20 63 68 61 72 73  put string chars
4690: 20 2a 2f 0a 20 20 75 33 32 20 6d 61 74 63 68 4f   */.  u32 matchO
46a0: 6e 65 20 3d 20 70 49 6e 66 6f 2d 3e 6d 61 74 63  ne = pInfo->matc
46b0: 68 4f 6e 65 3b 20 20 2f 2a 20 22 3f 22 20 6f 72  hOne;  /* "?" or
46c0: 20 22 5f 22 20 2a 2f 0a 20 20 75 33 32 20 6d 61   "_" */.  u32 ma
46d0: 74 63 68 41 6c 6c 20 3d 20 70 49 6e 66 6f 2d 3e  tchAll = pInfo->
46e0: 6d 61 74 63 68 41 6c 6c 3b 20 20 2f 2a 20 22 2a  matchAll;  /* "*
46f0: 22 20 6f 72 20 22 25 22 20 2a 2f 0a 20 20 75 33  " or "%" */.  u3
4700: 32 20 6d 61 74 63 68 4f 74 68 65 72 3b 20 20 20  2 matchOther;   
4710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
4720: 2a 20 22 5b 22 20 6f 72 20 74 68 65 20 65 73 63  * "[" or the esc
4730: 61 70 65 20 63 68 61 72 61 63 74 65 72 20 2a 2f  ape character */
4740: 0a 20 20 75 38 20 6e 6f 43 61 73 65 20 3d 20 70  .  u8 noCase = p
4750: 49 6e 66 6f 2d 3e 6e 6f 43 61 73 65 3b 20 20 20  Info->noCase;   
4760: 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 75      /* True if u
4770: 70 70 65 72 63 61 73 65 3d 3d 6c 6f 77 65 72 63  ppercase==lowerc
4780: 61 73 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75  ase */.  const u
4790: 38 20 2a 7a 45 73 63 61 70 65 64 20 3d 20 30 3b  8 *zEscaped = 0;
47a0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4f 6e 65            /* One
47b0: 20 70 61 73 74 20 74 68 65 20 6c 61 73 74 20 65   past the last e
47c0: 73 63 61 70 65 64 20 69 6e 70 75 74 20 63 68 61  scaped input cha
47d0: 72 20 2a 2f 0a 20 20 0a 20 20 2f 2a 20 54 68 65  r */.  .  /* The
47e0: 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f 72 20 64   GLOB operator d
47f0: 6f 65 73 20 6e 6f 74 20 68 61 76 65 20 61 6e 20  oes not have an 
4800: 45 53 43 41 50 45 20 63 6c 61 75 73 65 2e 20 20  ESCAPE clause.  
4810: 41 6e 64 20 4c 49 4b 45 20 64 6f 65 73 20 6e 6f  And LIKE does no
4820: 74 0a 20 20 2a 2a 20 68 61 76 65 20 74 68 65 20  t.  ** have the 
4830: 6d 61 74 63 68 53 65 74 20 6f 70 65 72 61 74 6f  matchSet operato
4840: 72 2e 20 20 53 6f 20 77 65 20 65 69 74 68 65 72  r.  So we either
4850: 20 68 61 76 65 20 74 6f 20 6c 6f 6f 6b 20 66 6f   have to look fo
4860: 72 20 6f 6e 65 20 6f 72 0a 20 20 2a 2a 20 74 68  r one or.  ** th
4870: 65 20 6f 74 68 65 72 2c 20 6e 65 76 65 72 20 62  e other, never b
4880: 6f 74 68 2e 20 20 48 65 6e 63 65 20 74 68 65 20  oth.  Hence the 
4890: 73 69 6e 67 6c 65 20 76 61 72 69 61 62 6c 65 20  single variable 
48a0: 6d 61 74 63 68 4f 74 68 65 72 20 69 73 20 75 73  matchOther is us
48b0: 65 64 0a 20 20 2a 2a 20 74 6f 20 73 74 6f 72 65  ed.  ** to store
48c0: 20 74 68 65 20 6f 6e 65 20 77 65 20 68 61 76 65   the one we have
48d0: 20 74 6f 20 6c 6f 6f 6b 20 66 6f 72 2e 0a 20 20   to look for..  
48e0: 2a 2f 0a 20 20 6d 61 74 63 68 4f 74 68 65 72 20  */.  matchOther 
48f0: 3d 20 65 73 63 20 3f 20 65 73 63 20 3a 20 70 49  = esc ? esc : pI
4900: 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74 3b 0a 0a  nfo->matchSet;..
4910: 20 20 77 68 69 6c 65 28 20 28 63 20 3d 20 73 71    while( (c = sq
4920: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
4930: 50 61 74 74 65 72 6e 29 29 21 3d 30 20 29 7b 0a  Pattern))!=0 ){.
4940: 20 20 20 20 69 66 28 20 63 3d 3d 6d 61 74 63 68      if( c==match
4950: 41 6c 6c 20 29 7b 20 20 2f 2a 20 4d 61 74 63 68  All ){  /* Match
4960: 20 22 2a 22 20 2a 2f 0a 20 20 20 20 20 20 2f 2a   "*" */.      /*
4970: 20 53 6b 69 70 20 6f 76 65 72 20 6d 75 6c 74 69   Skip over multi
4980: 70 6c 65 20 22 2a 22 20 63 68 61 72 61 63 74 65  ple "*" characte
4990: 72 73 20 69 6e 20 74 68 65 20 70 61 74 74 65 72  rs in the patter
49a0: 6e 2e 20 20 49 66 20 74 68 65 72 65 0a 20 20 20  n.  If there.   
49b0: 20 20 20 2a 2a 20 61 72 65 20 61 6c 73 6f 20 22     ** are also "
49c0: 3f 22 20 63 68 61 72 61 63 74 65 72 73 2c 20 73  ?" characters, s
49d0: 6b 69 70 20 74 68 6f 73 65 20 61 73 20 77 65 6c  kip those as wel
49e0: 6c 2c 20 62 75 74 20 63 6f 6e 73 75 6d 65 20 61  l, but consume a
49f0: 0a 20 20 20 20 20 20 2a 2a 20 73 69 6e 67 6c 65  .      ** single
4a00: 20 63 68 61 72 61 63 74 65 72 20 6f 66 20 74 68   character of th
4a10: 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 66  e input string f
4a20: 6f 72 20 65 61 63 68 20 22 3f 22 20 73 6b 69 70  or each "?" skip
4a30: 70 65 64 20 2a 2f 0a 20 20 20 20 20 20 77 68 69  ped */.      whi
4a40: 6c 65 28 20 28 63 3d 73 71 6c 69 74 65 33 55 74  le( (c=sqlite3Ut
4a50: 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e  f8Read(&zPattern
4a60: 29 29 20 3d 3d 20 6d 61 74 63 68 41 6c 6c 0a 20  )) == matchAll. 
4a70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7c 7c                ||
4a80: 20 63 20 3d 3d 20 6d 61 74 63 68 4f 6e 65 20 29   c == matchOne )
4a90: 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 3d  {.        if( c=
4aa0: 3d 6d 61 74 63 68 4f 6e 65 20 26 26 20 73 71 6c  =matchOne && sql
4ab0: 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a 53  ite3Utf8Read(&zS
4ac0: 74 72 69 6e 67 29 3d 3d 30 20 29 7b 0a 20 20 20  tring)==0 ){.   
4ad0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b         return 0;
4ae0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
4af0: 20 7d 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d   }.      if( c==
4b00: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74  0 ){.        ret
4b10: 75 72 6e 20 31 3b 20 20 20 2f 2a 20 22 2a 22 20  urn 1;   /* "*" 
4b20: 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68  at the end of th
4b30: 65 20 70 61 74 74 65 72 6e 20 6d 61 74 63 68 65  e pattern matche
4b40: 73 20 2a 2f 0a 20 20 20 20 20 20 7d 65 6c 73 65  s */.      }else
4b50: 20 69 66 28 20 63 3d 3d 6d 61 74 63 68 4f 74 68   if( c==matchOth
4b60: 65 72 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66  er ){.        if
4b70: 28 20 65 73 63 20 29 7b 0a 20 20 20 20 20 20 20  ( esc ){.       
4b80: 20 20 20 63 20 3d 20 73 71 6c 69 74 65 33 55 74     c = sqlite3Ut
4b90: 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e  f8Read(&zPattern
4ba0: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28  );.          if(
4bb0: 20 63 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30   c==0 ) return 0
4bc0: 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b  ;.        }else{
4bd0: 0a 20 20 20 20 20 20 20 20 20 20 2f 2a 20 22 5b  .          /* "[
4be0: 2e 2e 2e 5d 22 20 69 6d 6d 65 64 69 61 74 65 6c  ...]" immediatel
4bf0: 79 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 22 2a  y follows the "*
4c00: 22 2e 20 20 57 65 20 68 61 76 65 20 74 6f 20 64  ".  We have to d
4c10: 6f 20 61 20 73 6c 6f 77 0a 20 20 20 20 20 20 20  o a slow.       
4c20: 20 20 20 2a 2a 20 72 65 63 75 72 73 69 76 65 20     ** recursive 
4c30: 73 65 61 72 63 68 20 69 6e 20 74 68 69 73 20 63  search in this c
4c40: 61 73 65 2c 20 62 75 74 20 69 74 20 69 73 20 61  ase, but it is a
4c50: 6e 20 75 6e 75 73 75 61 6c 20 63 61 73 65 2e 20  n unusual case. 
4c60: 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 61 73 73  */.          ass
4c70: 65 72 74 28 20 6d 61 74 63 68 4f 74 68 65 72 3c  ert( matchOther<
4c80: 30 78 38 30 20 29 3b 20 20 2f 2a 20 27 5b 27 20  0x80 );  /* '[' 
4c90: 69 73 20 61 20 73 69 6e 67 6c 65 2d 62 79 74 65  is a single-byte
4ca0: 20 63 68 61 72 61 63 74 65 72 20 2a 2f 0a 20 20   character */.  
4cb0: 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a          while( *
4cc0: 7a 53 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20  zString.        
4cd0: 20 20 20 20 20 20 20 20 20 26 26 20 70 61 74 74           && patt
4ce0: 65 72 6e 43 6f 6d 70 61 72 65 28 26 7a 50 61 74  ernCompare(&zPat
4cf0: 74 65 72 6e 5b 2d 31 5d 2c 7a 53 74 72 69 6e 67  tern[-1],zString
4d00: 2c 70 49 6e 66 6f 2c 65 73 63 29 3d 3d 30 20 29  ,pInfo,esc)==0 )
4d10: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 53 51  {.            SQ
4d20: 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a  LITE_SKIP_UTF8(z
4d30: 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 20  String);.       
4d40: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 20 20 72     }.          r
4d50: 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 21 3d  eturn *zString!=
4d60: 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  0;.        }.   
4d70: 20 20 20 7d 0a 0a 20 20 20 20 20 20 2f 2a 20 41     }..      /* A
4d80: 74 20 74 68 69 73 20 70 6f 69 6e 74 20 76 61 72  t this point var
4d90: 69 61 62 6c 65 20 63 20 63 6f 6e 74 61 69 6e 73  iable c contains
4da0: 20 74 68 65 20 66 69 72 73 74 20 63 68 61 72 61   the first chara
4db0: 63 74 65 72 20 6f 66 20 74 68 65 0a 20 20 20 20  cter of the.    
4dc0: 20 20 2a 2a 20 70 61 74 74 65 72 6e 20 73 74 72    ** pattern str
4dd0: 69 6e 67 20 70 61 73 74 20 74 68 65 20 22 2a 22  ing past the "*"
4de0: 2e 20 20 53 65 61 72 63 68 20 69 6e 20 74 68 65  .  Search in the
4df0: 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 66 6f   input string fo
4e00: 72 20 74 68 65 0a 20 20 20 20 20 20 2a 2a 20 66  r the.      ** f
4e10: 69 72 73 74 20 6d 61 74 63 68 69 6e 67 20 63 68  irst matching ch
4e20: 61 72 61 63 74 65 72 20 61 6e 64 20 72 65 63 75  aracter and recu
4e30: 72 73 69 76 65 6c 79 20 63 6f 6e 74 69 6e 65 20  rsively contine 
4e40: 74 68 65 20 6d 61 74 63 68 20 66 72 6f 6d 0a 20  the match from. 
4e50: 20 20 20 20 20 2a 2a 20 74 68 61 74 20 70 6f 69       ** that poi
4e60: 6e 74 2e 0a 20 20 20 20 20 20 2a 2a 0a 20 20 20  nt..      **.   
4e70: 20 20 20 2a 2a 20 46 6f 72 20 61 20 63 61 73 65     ** For a case
4e80: 2d 69 6e 73 65 6e 73 69 74 69 76 65 20 73 65 61  -insensitive sea
4e90: 72 63 68 2c 20 73 65 74 20 76 61 72 69 61 62 6c  rch, set variabl
4ea0: 65 20 63 78 20 74 6f 20 62 65 20 74 68 65 20 73  e cx to be the s
4eb0: 61 6d 65 20 61 73 0a 20 20 20 20 20 20 2a 2a 20  ame as.      ** 
4ec0: 63 20 62 75 74 20 69 6e 20 74 68 65 20 6f 74 68  c but in the oth
4ed0: 65 72 20 63 61 73 65 20 61 6e 64 20 73 65 61 72  er case and sear
4ee0: 63 68 20 74 68 65 20 69 6e 70 75 74 20 73 74 72  ch the input str
4ef0: 69 6e 67 20 66 6f 72 20 65 69 74 68 65 72 0a 20  ing for either. 
4f00: 20 20 20 20 20 2a 2a 20 63 20 6f 72 20 63 78 2e       ** c or cx.
4f10: 0a 20 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20  .      */.      
4f20: 69 66 28 20 63 3c 3d 30 78 38 30 20 29 7b 0a 20  if( c<=0x80 ){. 
4f30: 20 20 20 20 20 20 20 75 33 32 20 63 78 3b 0a 20         u32 cx;. 
4f40: 20 20 20 20 20 20 20 69 66 28 20 6e 6f 43 61 73         if( noCas
4f50: 65 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 63  e ){.          c
4f60: 78 20 3d 20 73 71 6c 69 74 65 33 54 6f 75 70 70  x = sqlite3Toupp
4f70: 65 72 28 63 29 3b 0a 20 20 20 20 20 20 20 20 20  er(c);.         
4f80: 20 63 20 3d 20 73 71 6c 69 74 65 33 54 6f 6c 6f   c = sqlite3Tolo
4f90: 77 65 72 28 63 29 3b 0a 20 20 20 20 20 20 20 20  wer(c);.        
4fa0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20  }else{.         
4fb0: 20 63 78 20 3d 20 63 3b 0a 20 20 20 20 20 20 20   cx = c;.       
4fc0: 20 7d 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65   }.        while
4fd0: 28 20 28 63 32 20 3d 20 2a 28 7a 53 74 72 69 6e  ( (c2 = *(zStrin
4fe0: 67 2b 2b 29 29 21 3d 30 20 29 7b 0a 20 20 20 20  g++))!=0 ){.    
4ff0: 20 20 20 20 20 20 69 66 28 20 63 32 21 3d 63 20        if( c2!=c 
5000: 26 26 20 63 32 21 3d 63 78 20 29 20 63 6f 6e 74  && c2!=cx ) cont
5010: 69 6e 75 65 3b 0a 20 20 20 20 20 20 20 20 20 20  inue;.          
5020: 69 66 28 20 70 61 74 74 65 72 6e 43 6f 6d 70 61  if( patternCompa
5030: 72 65 28 7a 50 61 74 74 65 72 6e 2c 7a 53 74 72  re(zPattern,zStr
5040: 69 6e 67 2c 70 49 6e 66 6f 2c 65 73 63 29 20 29  ing,pInfo,esc) )
5050: 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 20   return 1;.     
5060: 20 20 20 7d 0a 20 20 20 20 20 20 7d 65 6c 73 65     }.      }else
5070: 7b 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 28  {.        while(
5080: 20 28 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74   (c2 = sqlite3Ut
5090: 66 38 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29  f8Read(&zString)
50a0: 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )!=0 ){.        
50b0: 20 20 69 66 28 20 63 32 21 3d 63 20 29 20 63 6f    if( c2!=c ) co
50c0: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 20 20  ntinue;.        
50d0: 20 20 69 66 28 20 70 61 74 74 65 72 6e 43 6f 6d    if( patternCom
50e0: 70 61 72 65 28 7a 50 61 74 74 65 72 6e 2c 7a 53  pare(zPattern,zS
50f0: 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65 73 63 29  tring,pInfo,esc)
5100: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20   ) return 1;.   
5110: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20       }.      }. 
5120: 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20       return 0;. 
5130: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 63 3d 3d     }.    if( c==
5140: 6d 61 74 63 68 4f 74 68 65 72 20 29 7b 0a 20 20  matchOther ){.  
5150: 20 20 20 20 69 66 28 20 65 73 63 20 29 7b 0a 20      if( esc ){. 
5160: 20 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74         c = sqlit
5170: 65 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74  e3Utf8Read(&zPat
5180: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 69  tern);.        i
5190: 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( c==0 ) return
51a0: 20 30 3b 0a 20 20 20 20 20 20 20 20 7a 45 73 63   0;.        zEsc
51b0: 61 70 65 64 20 3d 20 7a 50 61 74 74 65 72 6e 3b  aped = zPattern;
51c0: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
51d0: 20 20 20 20 20 20 75 33 32 20 70 72 69 6f 72 5f        u32 prior_
51e0: 63 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 69  c = 0;.        i
51f0: 6e 74 20 73 65 65 6e 20 3d 20 30 3b 0a 20 20 20  nt seen = 0;.   
5200: 20 20 20 20 20 69 6e 74 20 69 6e 76 65 72 74 20       int invert 
5210: 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 63 20 3d  = 0;.        c =
5220: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
5230: 28 26 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20  (&zString);.    
5240: 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29 20 72      if( c==0 ) r
5250: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 20  eturn 0;.       
5260: 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66   c2 = sqlite3Utf
5270: 38 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e 29  8Read(&zPattern)
5280: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 32  ;.        if( c2
5290: 3d 3d 27 5e 27 20 29 7b 0a 20 20 20 20 20 20 20  =='^' ){.       
52a0: 20 20 20 69 6e 76 65 72 74 20 3d 20 31 3b 0a 20     invert = 1;. 
52b0: 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71           c2 = sq
52c0: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
52d0: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
52e0: 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20    }.        if( 
52f0: 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20 20 20 20  c2==']' ){.     
5300: 20 20 20 20 20 69 66 28 20 63 3d 3d 27 5d 27 20       if( c==']' 
5310: 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20  ) seen = 1;.    
5320: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
5330: 65 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74  e3Utf8Read(&zPat
5340: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d  tern);.        }
5350: 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20  .        while( 
5360: 63 32 20 26 26 20 63 32 21 3d 27 5d 27 20 29 7b  c2 && c2!=']' ){
5370: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 63  .          if( c
5380: 32 3d 3d 27 2d 27 20 26 26 20 7a 50 61 74 74 65  2=='-' && zPatte
5390: 72 6e 5b 30 5d 21 3d 27 5d 27 20 26 26 20 7a 50  rn[0]!=']' && zP
53a0: 61 74 74 65 72 6e 5b 30 5d 21 3d 30 20 26 26 20  attern[0]!=0 && 
53b0: 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a 20 20 20  prior_c>0 ){.   
53c0: 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71           c2 = sq
53d0: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
53e0: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
53f0: 20 20 20 20 20 20 69 66 28 20 63 3e 3d 70 72 69        if( c>=pri
5400: 6f 72 5f 63 20 26 26 20 63 3c 3d 63 32 20 29 20  or_c && c<=c2 ) 
5410: 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20  seen = 1;.      
5420: 20 20 20 20 20 20 70 72 69 6f 72 5f 63 20 3d 20        prior_c = 
5430: 30 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 65 6c  0;.          }el
5440: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20  se{.            
5450: 69 66 28 20 63 3d 3d 63 32 20 29 7b 0a 20 20 20  if( c==c2 ){.   
5460: 20 20 20 20 20 20 20 20 20 20 20 73 65 65 6e 20             seen 
5470: 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20 20  = 1;.           
5480: 20 7d 0a 20 20 20 20 20 20 20 20 20 20 20 20 70   }.            p
5490: 72 69 6f 72 5f 63 20 3d 20 63 32 3b 0a 20 20 20  rior_c = c2;.   
54a0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
54b0: 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55     c2 = sqlite3U
54c0: 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72  tf8Read(&zPatter
54d0: 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20  n);.        }.  
54e0: 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20        if( c2==0 
54f0: 7c 7c 20 28 73 65 65 6e 20 5e 20 69 6e 76 65 72  || (seen ^ inver
5500: 74 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  t)==0 ){.       
5510: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20     return 0;.   
5520: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 63       }.        c
5530: 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 7d  ontinue;.      }
5540: 0a 20 20 20 20 7d 0a 20 20 20 20 63 32 20 3d 20  .    }.    c2 = 
5550: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
5560: 26 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 69  &zString);.    i
5570: 66 28 20 63 3d 3d 63 32 20 29 20 63 6f 6e 74 69  f( c==c2 ) conti
5580: 6e 75 65 3b 0a 20 20 20 20 69 66 28 20 6e 6f 43  nue;.    if( noC
5590: 61 73 65 20 26 26 20 63 3c 30 78 38 30 20 26 26  ase && c<0x80 &&
55a0: 20 63 32 3c 30 78 38 30 20 26 26 20 73 71 6c 69   c2<0x80 && sqli
55b0: 74 65 33 54 6f 6c 6f 77 65 72 28 63 29 3d 3d 73  te3Tolower(c)==s
55c0: 71 6c 69 74 65 33 54 6f 6c 6f 77 65 72 28 63 32  qlite3Tolower(c2
55d0: 29 20 29 7b 0a 20 20 20 20 20 20 63 6f 6e 74 69  ) ){.      conti
55e0: 6e 75 65 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69  nue;.    }.    i
55f0: 66 28 20 63 3d 3d 6d 61 74 63 68 4f 6e 65 20 26  f( c==matchOne &
5600: 26 20 7a 50 61 74 74 65 72 6e 21 3d 7a 45 73 63  & zPattern!=zEsc
5610: 61 70 65 64 20 26 26 20 63 32 21 3d 30 20 29 20  aped && c2!=0 ) 
5620: 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 72 65  continue;.    re
5630: 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 72 65  turn 0;.  }.  re
5640: 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 3d 3d 30  turn *zString==0
5650: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 73  ;.}../*.** The s
5660: 71 6c 69 74 65 33 5f 73 74 72 67 6c 6f 62 28 29  qlite3_strglob()
5670: 20 69 6e 74 65 72 66 61 63 65 2e 0a 2a 2f 0a 69   interface..*/.i
5680: 6e 74 20 73 71 6c 69 74 65 33 5f 73 74 72 67 6c  nt sqlite3_strgl
5690: 6f 62 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  ob(const char *z
56a0: 47 6c 6f 62 50 61 74 74 65 72 6e 2c 20 63 6f 6e  GlobPattern, con
56b0: 73 74 20 63 68 61 72 20 2a 7a 53 74 72 69 6e 67  st char *zString
56c0: 29 7b 0a 20 20 72 65 74 75 72 6e 20 70 61 74 74  ){.  return patt
56d0: 65 72 6e 43 6f 6d 70 61 72 65 28 28 75 38 2a 29  ernCompare((u8*)
56e0: 7a 47 6c 6f 62 50 61 74 74 65 72 6e 2c 20 28 75  zGlobPattern, (u
56f0: 38 2a 29 7a 53 74 72 69 6e 67 2c 20 26 67 6c 6f  8*)zString, &glo
5700: 62 49 6e 66 6f 2c 20 30 29 3d 3d 30 3b 0a 7d 0a  bInfo, 0)==0;.}.
5710: 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74 68 65  ./*.** Count the
5720: 20 6e 75 6d 62 65 72 20 6f 66 20 74 69 6d 65 73   number of times
5730: 20 74 68 61 74 20 74 68 65 20 4c 49 4b 45 20 6f   that the LIKE o
5740: 70 65 72 61 74 6f 72 20 28 6f 72 20 47 4c 4f 42  perator (or GLOB
5750: 20 77 68 69 63 68 20 69 73 0a 2a 2a 20 6a 75 73   which is.** jus
5760: 74 20 61 20 76 61 72 69 61 74 69 6f 6e 20 6f 66  t a variation of
5770: 20 4c 49 4b 45 29 20 67 65 74 73 20 63 61 6c 6c   LIKE) gets call
5780: 65 64 2e 20 20 54 68 69 73 20 69 73 20 75 73 65  ed.  This is use
5790: 64 20 66 6f 72 20 74 65 73 74 69 6e 67 0a 2a 2a  d for testing.**
57a0: 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23 69 66 64 65 66   only..*/.#ifdef
57b0: 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e 74   SQLITE_TEST.int
57c0: 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f   sqlite3_like_co
57d0: 75 6e 74 20 3d 20 30 3b 0a 23 65 6e 64 69 66 0a  unt = 0;.#endif.
57e0: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
57f0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 69  tation of the li
5800: 6b 65 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f  ke() SQL functio
5810: 6e 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f  n.  This functio
5820: 6e 20 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a 2a 20  n implements.** 
5830: 74 68 65 20 62 75 69 6c 64 2d 69 6e 20 4c 49 4b  the build-in LIK
5840: 45 20 6f 70 65 72 61 74 6f 72 2e 20 20 54 68 65  E operator.  The
5850: 20 66 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20   first argument 
5860: 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20  to the function 
5870: 69 73 20 74 68 65 0a 2a 2a 20 70 61 74 74 65 72  is the.** patter
5880: 6e 20 61 6e 64 20 74 68 65 20 73 65 63 6f 6e 64  n and the second
5890: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 74 68 65   argument is the
58a0: 20 73 74 72 69 6e 67 2e 20 20 53 6f 2c 20 74 68   string.  So, th
58b0: 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 73  e SQL statements
58c0: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 41 20  :.**.**       A 
58d0: 4c 49 4b 45 20 42 0a 2a 2a 0a 2a 2a 20 69 73 20  LIKE B.**.** is 
58e0: 69 6d 70 6c 65 6d 65 6e 74 65 64 20 61 73 20 6c  implemented as l
58f0: 69 6b 65 28 42 2c 41 29 2e 0a 2a 2a 0a 2a 2a 20  ike(B,A)..**.** 
5900: 54 68 69 73 20 73 61 6d 65 20 66 75 6e 63 74 69  This same functi
5910: 6f 6e 20 28 77 69 74 68 20 61 20 64 69 66 66 65  on (with a diffe
5920: 72 65 6e 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  rent compareInfo
5930: 20 73 74 72 75 63 74 75 72 65 29 20 63 6f 6d 70   structure) comp
5940: 75 74 65 73 0a 2a 2a 20 74 68 65 20 47 4c 4f 42  utes.** the GLOB
5950: 20 6f 70 65 72 61 74 6f 72 2e 0a 2a 2f 0a 73 74   operator..*/.st
5960: 61 74 69 63 20 76 6f 69 64 20 6c 69 6b 65 46 75  atic void likeFu
5970: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
5980: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
5990: 0a 20 20 69 6e 74 20 61 72 67 63 2c 20 0a 20 20  .  int argc, .  
59a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
59b0: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
59c0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
59d0: 41 2c 20 2a 7a 42 3b 0a 20 20 75 33 32 20 65 73  A, *zB;.  u32 es
59e0: 63 61 70 65 20 3d 20 30 3b 0a 20 20 69 6e 74 20  cape = 0;.  int 
59f0: 6e 50 61 74 3b 0a 20 20 73 71 6c 69 74 65 33 20  nPat;.  sqlite3 
5a00: 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  *db = sqlite3_co
5a10: 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28  ntext_db_handle(
5a20: 63 6f 6e 74 65 78 74 29 3b 0a 0a 20 20 7a 42 20  context);..  zB 
5a30: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
5a40: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
5a50: 20 7a 41 20 3d 20 73 71 6c 69 74 65 33 5f 76 61   zA = sqlite3_va
5a60: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d  lue_text(argv[1]
5a70: 29 3b 0a 0a 20 20 2f 2a 20 4c 69 6d 69 74 20 74  );..  /* Limit t
5a80: 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 74 68 65  he length of the
5a90: 20 4c 49 4b 45 20 6f 72 20 47 4c 4f 42 20 70 61   LIKE or GLOB pa
5aa0: 74 74 65 72 6e 20 74 6f 20 61 76 6f 69 64 20 70  ttern to avoid p
5ab0: 72 6f 62 6c 65 6d 73 0a 20 20 2a 2a 20 6f 66 20  roblems.  ** of 
5ac0: 64 65 65 70 20 72 65 63 75 72 73 69 6f 6e 20 61  deep recursion a
5ad0: 6e 64 20 4e 2a 4e 20 62 65 68 61 76 69 6f 72 20  nd N*N behavior 
5ae0: 69 6e 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72  in patternCompar
5af0: 65 28 29 2e 0a 20 20 2a 2f 0a 20 20 6e 50 61 74  e()..  */.  nPat
5b00: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
5b10: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
5b20: 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 50 61  .  testcase( nPa
5b30: 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  t==db->aLimit[SQ
5b40: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b 45 5f  LITE_LIMIT_LIKE_
5b50: 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48 5d 20  PATTERN_LENGTH] 
5b60: 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e  );.  testcase( n
5b70: 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b  Pat==db->aLimit[
5b80: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b  SQLITE_LIMIT_LIK
5b90: 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48  E_PATTERN_LENGTH
5ba0: 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e 50 61  ]+1 );.  if( nPa
5bb0: 74 20 3e 20 64 62 2d 3e 61 4c 69 6d 69 74 5b 53  t > db->aLimit[S
5bc0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b 45  QLITE_LIMIT_LIKE
5bd0: 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48 5d  _PATTERN_LENGTH]
5be0: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   ){.    sqlite3_
5bf0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
5c00: 74 65 78 74 2c 20 22 4c 49 4b 45 20 6f 72 20 47  text, "LIKE or G
5c10: 4c 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 6f 20  LOB pattern too 
5c20: 63 6f 6d 70 6c 65 78 22 2c 20 2d 31 29 3b 0a 20  complex", -1);. 
5c30: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20     return;.  }. 
5c40: 20 61 73 73 65 72 74 28 20 7a 42 3d 3d 73 71 6c   assert( zB==sql
5c50: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
5c60: 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a 20  argv[0]) );  /* 
5c70: 45 6e 63 6f 64 69 6e 67 20 64 69 64 20 6e 6f 74  Encoding did not
5c80: 20 63 68 61 6e 67 65 20 2a 2f 0a 0a 20 20 69 66   change */..  if
5c90: 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20 20  ( argc==3 ){.   
5ca0: 20 2f 2a 20 54 68 65 20 65 73 63 61 70 65 20 63   /* The escape c
5cb0: 68 61 72 61 63 74 65 72 20 73 74 72 69 6e 67 20  haracter string 
5cc0: 6d 75 73 74 20 63 6f 6e 73 69 73 74 20 6f 66 20  must consist of 
5cd0: 61 20 73 69 6e 67 6c 65 20 55 54 46 2d 38 20 63  a single UTF-8 c
5ce0: 68 61 72 61 63 74 65 72 2e 0a 20 20 20 20 2a 2a  haracter..    **
5cf0: 20 4f 74 68 65 72 77 69 73 65 2c 20 72 65 74 75   Otherwise, retu
5d00: 72 6e 20 61 6e 20 65 72 72 6f 72 2e 0a 20 20 20  rn an error..   
5d10: 20 2a 2f 0a 20 20 20 20 63 6f 6e 73 74 20 75 6e   */.    const un
5d20: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 45 73  signed char *zEs
5d30: 63 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  c = sqlite3_valu
5d40: 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d 29 3b  e_text(argv[2]);
5d50: 0a 20 20 20 20 69 66 28 20 7a 45 73 63 3d 3d 30  .    if( zEsc==0
5d60: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 69   ) return;.    i
5d70: 66 28 20 73 71 6c 69 74 65 33 55 74 66 38 43 68  f( sqlite3Utf8Ch
5d80: 61 72 4c 65 6e 28 28 63 68 61 72 2a 29 7a 45 73  arLen((char*)zEs
5d90: 63 2c 20 2d 31 29 21 3d 31 20 29 7b 0a 20 20 20  c, -1)!=1 ){.   
5da0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
5db0: 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c  t_error(context,
5dc0: 20 0a 20 20 20 20 20 20 20 20 20 20 22 45 53 43   .          "ESC
5dd0: 41 50 45 20 65 78 70 72 65 73 73 69 6f 6e 20 6d  APE expression m
5de0: 75 73 74 20 62 65 20 61 20 73 69 6e 67 6c 65 20  ust be a single 
5df0: 63 68 61 72 61 63 74 65 72 22 2c 20 2d 31 29 3b  character", -1);
5e00: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  .      return;. 
5e10: 20 20 20 7d 0a 20 20 20 20 65 73 63 61 70 65 20     }.    escape 
5e20: 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  = sqlite3Utf8Rea
5e30: 64 28 26 7a 45 73 63 29 3b 0a 20 20 7d 0a 20 20  d(&zEsc);.  }.  
5e40: 69 66 28 20 7a 41 20 26 26 20 7a 42 20 29 7b 0a  if( zA && zB ){.
5e50: 20 20 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61      struct compa
5e60: 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 20 3d 20  reInfo *pInfo = 
5e70: 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74  sqlite3_user_dat
5e80: 61 28 63 6f 6e 74 65 78 74 29 3b 0a 23 69 66 64  a(context);.#ifd
5e90: 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 20  ef SQLITE_TEST. 
5ea0: 20 20 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f     sqlite3_like_
5eb0: 63 6f 75 6e 74 2b 2b 3b 0a 23 65 6e 64 69 66 0a  count++;.#endif.
5ec0: 20 20 20 20 0a 20 20 20 20 73 71 6c 69 74 65 33      .    sqlite3
5ed0: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
5ee0: 65 78 74 2c 20 70 61 74 74 65 72 6e 43 6f 6d 70  ext, patternComp
5ef0: 61 72 65 28 7a 42 2c 20 7a 41 2c 20 70 49 6e 66  are(zB, zA, pInf
5f00: 6f 2c 20 65 73 63 61 70 65 29 29 3b 0a 20 20 7d  o, escape));.  }
5f10: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
5f20: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
5f30: 4e 55 4c 4c 49 46 28 78 2c 79 29 20 66 75 6e 63  NULLIF(x,y) func
5f40: 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c  tion.  The resul
5f50: 74 20 69 73 20 74 68 65 20 66 69 72 73 74 0a 2a  t is the first.*
5f60: 2a 20 61 72 67 75 6d 65 6e 74 20 69 66 20 74 68  * argument if th
5f70: 65 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20  e arguments are 
5f80: 64 69 66 66 65 72 65 6e 74 2e 20 20 54 68 65 20  different.  The 
5f90: 72 65 73 75 6c 74 20 69 73 20 4e 55 4c 4c 20 69  result is NULL i
5fa0: 66 20 74 68 65 0a 2a 2a 20 61 72 67 75 6d 65 6e  f the.** argumen
5fb0: 74 73 20 61 72 65 20 65 71 75 61 6c 20 74 6f 20  ts are equal to 
5fc0: 65 61 63 68 20 6f 74 68 65 72 2e 0a 2a 2f 0a 73  each other..*/.s
5fd0: 74 61 74 69 63 20 76 6f 69 64 20 6e 75 6c 6c 69  tatic void nulli
5fe0: 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  fFunc(.  sqlite3
5ff0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
6000: 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64  t,.  int NotUsed
6010: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
6020: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 43 6f  e **argv.){.  Co
6030: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73  llSeq *pColl = s
6040: 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c  qlite3GetFuncCol
6050: 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20  lSeq(context);. 
6060: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
6070: 52 28 4e 6f 74 55 73 65 64 29 3b 0a 20 20 69 66  R(NotUsed);.  if
6080: 28 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70  ( sqlite3MemComp
6090: 61 72 65 28 61 72 67 76 5b 30 5d 2c 20 61 72 67  are(argv[0], arg
60a0: 76 5b 31 5d 2c 20 70 43 6f 6c 6c 29 21 3d 30 20  v[1], pColl)!=0 
60b0: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
60c0: 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74  esult_value(cont
60d0: 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20  ext, argv[0]);. 
60e0: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c   }.}../*.** Impl
60f0: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
6100: 65 20 73 71 6c 69 74 65 5f 76 65 72 73 69 6f 6e  e sqlite_version
6110: 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68  () function.  Th
6120: 65 20 72 65 73 75 6c 74 20 69 73 20 74 68 65 20  e result is the 
6130: 76 65 72 73 69 6f 6e 0a 2a 2a 20 6f 66 20 74 68  version.** of th
6140: 65 20 53 51 4c 69 74 65 20 6c 69 62 72 61 72 79  e SQLite library
6150: 20 74 68 61 74 20 69 73 20 72 75 6e 6e 69 6e 67   that is running
6160: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
6170: 20 76 65 72 73 69 6f 6e 46 75 6e 63 28 0a 20 20   versionFunc(.  
6180: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
6190: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
61a0: 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74  NotUsed,.  sqlit
61b0: 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73  e3_value **NotUs
61c0: 65 64 32 0a 29 7b 0a 20 20 55 4e 55 53 45 44 5f  ed2.){.  UNUSED_
61d0: 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73  PARAMETER2(NotUs
61e0: 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20  ed, NotUsed2);. 
61f0: 20 2f 2a 20 49 4d 50 3a 20 52 2d 34 38 36 39 39   /* IMP: R-48699
6200: 2d 34 38 36 31 37 20 54 68 69 73 20 66 75 6e 63  -48617 This func
6210: 74 69 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20 77  tion is an SQL w
6220: 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68  rapper around th
6230: 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 6c  e.  ** sqlite3_l
6240: 69 62 76 65 72 73 69 6f 6e 28 29 20 43 2d 69 6e  ibversion() C-in
6250: 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20 20 73 71  terface. */.  sq
6260: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
6270: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
6280: 65 33 5f 6c 69 62 76 65 72 73 69 6f 6e 28 29 2c  e3_libversion(),
6290: 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54   -1, SQLITE_STAT
62a0: 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  IC);.}../*.** Im
62b0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
62c0: 74 68 65 20 73 71 6c 69 74 65 5f 73 6f 75 72 63  the sqlite_sourc
62d0: 65 5f 69 64 28 29 20 66 75 6e 63 74 69 6f 6e 2e  e_id() function.
62e0: 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61   The result is a
62f0: 20 73 74 72 69 6e 67 0a 2a 2a 20 74 68 61 74 20   string.** that 
6300: 69 64 65 6e 74 69 66 69 65 73 20 74 68 65 20 70  identifies the p
6310: 61 72 74 69 63 75 6c 61 72 20 76 65 72 73 69 6f  articular versio
6320: 6e 20 6f 66 20 74 68 65 20 73 6f 75 72 63 65 20  n of the source 
6330: 63 6f 64 65 20 75 73 65 64 20 74 6f 20 62 75 69  code used to bui
6340: 6c 64 0a 2a 2a 20 53 51 4c 69 74 65 2e 0a 2a 2f  ld.** SQLite..*/
6350: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 6f 75  .static void sou
6360: 72 63 65 69 64 46 75 6e 63 28 0a 20 20 73 71 6c  rceidFunc(.  sql
6370: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
6380: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74  ntext,.  int Not
6390: 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f  Used,.  sqlite3_
63a0: 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32  value **NotUsed2
63b0: 0a 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52  .){.  UNUSED_PAR
63c0: 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c  AMETER2(NotUsed,
63d0: 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a   NotUsed2);.  /*
63e0: 20 49 4d 50 3a 20 52 2d 32 34 34 37 30 2d 33 31   IMP: R-24470-31
63f0: 31 33 36 20 54 68 69 73 20 66 75 6e 63 74 69 6f  136 This functio
6400: 6e 20 69 73 20 61 6e 20 53 51 4c 20 77 72 61 70  n is an SQL wrap
6410: 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20  per around the. 
6420: 20 2a 2a 20 73 71 6c 69 74 65 33 5f 73 6f 75 72   ** sqlite3_sour
6430: 63 65 69 64 28 29 20 43 20 69 6e 74 65 72 66 61  ceid() C interfa
6440: 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33  ce. */.  sqlite3
6450: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
6460: 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 73 6f  text, sqlite3_so
6470: 75 72 63 65 69 64 28 29 2c 20 2d 31 2c 20 53 51  urceid(), -1, SQ
6480: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a  LITE_STATIC);.}.
6490: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
64a0: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 71 6c  ation of the sql
64b0: 69 74 65 5f 6c 6f 67 28 29 20 66 75 6e 63 74 69  ite_log() functi
64c0: 6f 6e 2e 20 20 54 68 69 73 20 69 73 20 61 20 77  on.  This is a w
64d0: 72 61 70 70 65 72 20 61 72 6f 75 6e 64 0a 2a 2a  rapper around.**
64e0: 20 73 71 6c 69 74 65 33 5f 6c 6f 67 28 29 2e 20   sqlite3_log(). 
64f0: 20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75   The return valu
6500: 65 20 69 73 20 4e 55 4c 4c 2e 20 20 54 68 65 20  e is NULL.  The 
6510: 66 75 6e 63 74 69 6f 6e 20 65 78 69 73 74 73 20  function exists 
6520: 70 75 72 65 6c 79 20 66 6f 72 0a 2a 2a 20 69 74  purely for.** it
6530: 73 20 73 69 64 65 2d 65 66 66 65 63 74 73 2e 0a  s side-effects..
6540: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 65  */.static void e
6550: 72 72 6c 6f 67 46 75 6e 63 28 0a 20 20 73 71 6c  rrlogFunc(.  sql
6560: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
6570: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
6580: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
6590: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 55  ue **argv.){.  U
65a0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
65b0: 61 72 67 63 29 3b 0a 20 20 55 4e 55 53 45 44 5f  argc);.  UNUSED_
65c0: 50 41 52 41 4d 45 54 45 52 28 63 6f 6e 74 65 78  PARAMETER(contex
65d0: 74 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 6c 6f  t);.  sqlite3_lo
65e0: 67 28 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  g(sqlite3_value_
65f0: 69 6e 74 28 61 72 67 76 5b 30 5d 29 2c 20 22 25  int(argv[0]), "%
6600: 73 22 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  s", sqlite3_valu
6610: 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 29  e_text(argv[1]))
6620: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
6630: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
6640: 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f   sqlite_compileo
6650: 70 74 69 6f 6e 5f 75 73 65 64 28 29 20 66 75 6e  ption_used() fun
6660: 63 74 69 6f 6e 2e 0a 2a 2a 20 54 68 65 20 72 65  ction..** The re
6670: 73 75 6c 74 20 69 73 20 61 6e 20 69 6e 74 65 67  sult is an integ
6680: 65 72 20 74 68 61 74 20 69 64 65 6e 74 69 66 69  er that identifi
6690: 65 73 20 69 66 20 74 68 65 20 63 6f 6d 70 69 6c  es if the compil
66a0: 65 72 20 6f 70 74 69 6f 6e 0a 2a 2a 20 77 61 73  er option.** was
66b0: 20 75 73 65 64 20 74 6f 20 62 75 69 6c 64 20 53   used to build S
66c0: 51 4c 69 74 65 2e 0a 2a 2f 0a 23 69 66 6e 64 65  QLite..*/.#ifnde
66d0: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f  f SQLITE_OMIT_CO
66e0: 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47  MPILEOPTION_DIAG
66f0: 53 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f  S.static void co
6700: 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73 65 64 46  mpileoptionusedF
6710: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
6720: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
6730: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
6740: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
6750: 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63  rgv.){.  const c
6760: 68 61 72 20 2a 7a 4f 70 74 4e 61 6d 65 3b 0a 20  har *zOptName;. 
6770: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
6780: 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   );.  UNUSED_PAR
6790: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
67a0: 2f 2a 20 49 4d 50 3a 20 52 2d 33 39 35 36 34 2d  /* IMP: R-39564-
67b0: 33 36 33 30 35 20 54 68 65 20 73 71 6c 69 74 65  36305 The sqlite
67c0: 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75  _compileoption_u
67d0: 73 65 64 28 29 20 53 51 4c 0a 20 20 2a 2a 20 66  sed() SQL.  ** f
67e0: 75 6e 63 74 69 6f 6e 20 69 73 20 61 20 77 72 61  unction is a wra
67f0: 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 20  pper around the 
6800: 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f  sqlite3_compileo
6810: 70 74 69 6f 6e 5f 75 73 65 64 28 29 20 43 2f 43  ption_used() C/C
6820: 2b 2b 0a 20 20 2a 2a 20 66 75 6e 63 74 69 6f 6e  ++.  ** function
6830: 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 28 7a 4f  ..  */.  if( (zO
6840: 70 74 4e 61 6d 65 20 3d 20 28 63 6f 6e 73 74 20  ptName = (const 
6850: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
6860: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
6870: 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c  ))!=0 ){.    sql
6880: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28  ite3_result_int(
6890: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
68a0: 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75  _compileoption_u
68b0: 73 65 64 28 7a 4f 70 74 4e 61 6d 65 29 29 3b 0a  sed(zOptName));.
68c0: 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20    }.}.#endif /* 
68d0: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50  SQLITE_OMIT_COMP
68e0: 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 20  ILEOPTION_DIAGS 
68f0: 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  */../*.** Implem
6900: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
6910: 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70  sqlite_compileop
6920: 74 69 6f 6e 5f 67 65 74 28 29 20 66 75 6e 63 74  tion_get() funct
6930: 69 6f 6e 2e 20 0a 2a 2a 20 54 68 65 20 72 65 73  ion. .** The res
6940: 75 6c 74 20 69 73 20 61 20 73 74 72 69 6e 67 20  ult is a string 
6950: 74 68 61 74 20 69 64 65 6e 74 69 66 69 65 73 20  that identifies 
6960: 74 68 65 20 63 6f 6d 70 69 6c 65 72 20 6f 70 74  the compiler opt
6970: 69 6f 6e 73 20 0a 2a 2a 20 75 73 65 64 20 74 6f  ions .** used to
6980: 20 62 75 69 6c 64 20 53 51 4c 69 74 65 2e 0a 2a   build SQLite..*
6990: 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  /.#ifndef SQLITE
69a0: 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54  _OMIT_COMPILEOPT
69b0: 49 4f 4e 5f 44 49 41 47 53 0a 73 74 61 74 69 63  ION_DIAGS.static
69c0: 20 76 6f 69 64 20 63 6f 6d 70 69 6c 65 6f 70 74   void compileopt
69d0: 69 6f 6e 67 65 74 46 75 6e 63 28 0a 20 20 73 71  iongetFunc(.  sq
69e0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
69f0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
6a00: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
6a10: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
6a20: 69 6e 74 20 6e 3b 0a 20 20 61 73 73 65 72 74 28  int n;.  assert(
6a30: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e   argc==1 );.  UN
6a40: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
6a50: 72 67 63 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20  rgc);.  /* IMP: 
6a60: 52 2d 30 34 39 32 32 2d 32 34 30 37 36 20 54 68  R-04922-24076 Th
6a70: 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65  e sqlite_compile
6a80: 6f 70 74 69 6f 6e 5f 67 65 74 28 29 20 53 51 4c  option_get() SQL
6a90: 20 66 75 6e 63 74 69 6f 6e 0a 20 20 2a 2a 20 69   function.  ** i
6aa0: 73 20 61 20 77 72 61 70 70 65 72 20 61 72 6f 75  s a wrapper arou
6ab0: 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63  nd the sqlite3_c
6ac0: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74  ompileoption_get
6ad0: 28 29 20 43 2f 43 2b 2b 20 66 75 6e 63 74 69 6f  () C/C++ functio
6ae0: 6e 2e 0a 20 20 2a 2f 0a 20 20 6e 20 3d 20 73 71  n..  */.  n = sq
6af0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28  lite3_value_int(
6b00: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 73 71 6c 69  argv[0]);.  sqli
6b10: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
6b20: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
6b30: 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67  _compileoption_g
6b40: 65 74 28 6e 29 2c 20 2d 31 2c 20 53 51 4c 49 54  et(n), -1, SQLIT
6b50: 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 23 65 6e  E_STATIC);.}.#en
6b60: 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d  dif /* SQLITE_OM
6b70: 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e  IT_COMPILEOPTION
6b80: 5f 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a 20 41 72  _DIAGS */../* Ar
6b90: 72 61 79 20 66 6f 72 20 63 6f 6e 76 65 72 74 69  ray for converti
6ba0: 6e 67 20 66 72 6f 6d 20 68 61 6c 66 2d 62 79 74  ng from half-byt
6bb0: 65 73 20 28 6e 79 62 62 6c 65 73 29 20 69 6e 74  es (nybbles) int
6bc0: 6f 20 41 53 43 49 49 20 68 65 78 0a 2a 2a 20 64  o ASCII hex.** d
6bd0: 69 67 69 74 73 2e 20 2a 2f 0a 73 74 61 74 69 63  igits. */.static
6be0: 20 63 6f 6e 73 74 20 63 68 61 72 20 68 65 78 64   const char hexd
6bf0: 69 67 69 74 73 5b 5d 20 3d 20 7b 0a 20 20 27 30  igits[] = {.  '0
6c00: 27 2c 20 27 31 27 2c 20 27 32 27 2c 20 27 33 27  ', '1', '2', '3'
6c10: 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36 27 2c  , '4', '5', '6',
6c20: 20 27 37 27 2c 0a 20 20 27 38 27 2c 20 27 39 27   '7',.  '8', '9'
6c30: 2c 20 27 41 27 2c 20 27 42 27 2c 20 27 43 27 2c  , 'A', 'B', 'C',
6c40: 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27 20 0a   'D', 'E', 'F' .
6c50: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  };../*.** Implem
6c60: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
6c70: 51 55 4f 54 45 28 29 20 66 75 6e 63 74 69 6f 6e  QUOTE() function
6c80: 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e  .  This function
6c90: 20 74 61 6b 65 73 20 61 20 73 69 6e 67 6c 65 0a   takes a single.
6ca0: 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66  ** argument.  If
6cb0: 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73   the argument is
6cc0: 20 6e 75 6d 65 72 69 63 2c 20 74 68 65 20 72 65   numeric, the re
6cd0: 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68  turn value is th
6ce0: 65 20 73 61 6d 65 20 61 73 0a 2a 2a 20 74 68 65  e same as.** the
6cf0: 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74   argument.  If t
6d00: 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 4e  he argument is N
6d10: 55 4c 4c 2c 20 74 68 65 20 72 65 74 75 72 6e 20  ULL, the return 
6d20: 76 61 6c 75 65 20 69 73 20 74 68 65 20 73 74 72  value is the str
6d30: 69 6e 67 0a 2a 2a 20 22 4e 55 4c 4c 22 2e 20 20  ing.** "NULL".  
6d40: 4f 74 68 65 72 77 69 73 65 2c 20 74 68 65 20 61  Otherwise, the a
6d50: 72 67 75 6d 65 6e 74 20 69 73 20 65 6e 63 6c 6f  rgument is enclo
6d60: 73 65 64 20 69 6e 20 73 69 6e 67 6c 65 20 71 75  sed in single qu
6d70: 6f 74 65 73 20 77 69 74 68 0a 2a 2a 20 73 69 6e  otes with.** sin
6d80: 67 6c 65 2d 71 75 6f 74 65 20 65 73 63 61 70 65  gle-quote escape
6d90: 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  s..*/.static voi
6da0: 64 20 71 75 6f 74 65 46 75 6e 63 28 73 71 6c 69  d quoteFunc(sqli
6db0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
6dc0: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20  text, int argc, 
6dd0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
6de0: 61 72 67 76 29 7b 0a 20 20 61 73 73 65 72 74 28  argv){.  assert(
6df0: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e   argc==1 );.  UN
6e00: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
6e10: 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68 28 20  rgc);.  switch( 
6e20: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
6e30: 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20  pe(argv[0]) ){. 
6e40: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 46     case SQLITE_F
6e50: 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 64 6f  LOAT: {.      do
6e60: 75 62 6c 65 20 72 31 2c 20 72 32 3b 0a 20 20 20  uble r1, r2;.   
6e70: 20 20 20 63 68 61 72 20 7a 42 75 66 5b 35 30 5d     char zBuf[50]
6e80: 3b 0a 20 20 20 20 20 20 72 31 20 3d 20 73 71 6c  ;.      r1 = sql
6e90: 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c  ite3_value_doubl
6ea0: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  e(argv[0]);.    
6eb0: 20 20 73 71 6c 69 74 65 33 5f 73 6e 70 72 69 6e    sqlite3_snprin
6ec0: 74 66 28 73 69 7a 65 6f 66 28 7a 42 75 66 29 2c  tf(sizeof(zBuf),
6ed0: 20 7a 42 75 66 2c 20 22 25 21 2e 31 35 67 22 2c   zBuf, "%!.15g",
6ee0: 20 72 31 29 3b 0a 20 20 20 20 20 20 73 71 6c 69   r1);.      sqli
6ef0: 74 65 33 41 74 6f 46 28 7a 42 75 66 2c 20 26 72  te3AtoF(zBuf, &r
6f00: 32 2c 20 32 30 2c 20 53 51 4c 49 54 45 5f 55 54  2, 20, SQLITE_UT
6f10: 46 38 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72  F8);.      if( r
6f20: 31 21 3d 72 32 20 29 7b 0a 20 20 20 20 20 20 20  1!=r2 ){.       
6f30: 20 73 71 6c 69 74 65 33 5f 73 6e 70 72 69 6e 74   sqlite3_snprint
6f40: 66 28 73 69 7a 65 6f 66 28 7a 42 75 66 29 2c 20  f(sizeof(zBuf), 
6f50: 7a 42 75 66 2c 20 22 25 21 2e 32 30 65 22 2c 20  zBuf, "%!.20e", 
6f60: 72 31 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  r1);.      }.   
6f70: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
6f80: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
6f90: 7a 42 75 66 2c 20 2d 31 2c 20 53 51 4c 49 54 45  zBuf, -1, SQLITE
6fa0: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20  _TRANSIENT);.   
6fb0: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
6fc0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
6fd0: 49 4e 54 45 47 45 52 3a 20 7b 0a 20 20 20 20 20  INTEGER: {.     
6fe0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
6ff0: 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61  value(context, a
7000: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 62  rgv[0]);.      b
7010: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20  reak;.    }.    
7020: 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42  case SQLITE_BLOB
7030: 3a 20 7b 0a 20 20 20 20 20 20 63 68 61 72 20 2a  : {.      char *
7040: 7a 54 65 78 74 20 3d 20 30 3b 0a 20 20 20 20 20  zText = 0;.     
7050: 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 7a 42 6c   char const *zBl
7060: 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ob = sqlite3_val
7070: 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29  ue_blob(argv[0])
7080: 3b 0a 20 20 20 20 20 20 69 6e 74 20 6e 42 6c 6f  ;.      int nBlo
7090: 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  b = sqlite3_valu
70a0: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29  e_bytes(argv[0])
70b0: 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74 28 20  ;.      assert( 
70c0: 7a 42 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76  zBlob==sqlite3_v
70d0: 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30  alue_blob(argv[0
70e0: 5d 29 20 29 3b 20 2f 2a 20 4e 6f 20 65 6e 63 6f  ]) ); /* No enco
70f0: 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20  ding change */. 
7100: 20 20 20 20 20 7a 54 65 78 74 20 3d 20 28 63 68       zText = (ch
7110: 61 72 20 2a 29 63 6f 6e 74 65 78 74 4d 61 6c 6c  ar *)contextMall
7120: 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 32 2a 28  oc(context, (2*(
7130: 69 36 34 29 6e 42 6c 6f 62 29 2b 34 29 3b 20 0a  i64)nBlob)+4); .
7140: 20 20 20 20 20 20 69 66 28 20 7a 54 65 78 74 20        if( zText 
7150: 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 69  ){.        int i
7160: 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d  ;.        for(i=
7170: 30 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b 2b 29  0; i<nBlob; i++)
7180: 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 54 65 78  {.          zTex
7190: 74 5b 28 69 2a 32 29 2b 32 5d 20 3d 20 68 65 78  t[(i*2)+2] = hex
71a0: 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d  digits[(zBlob[i]
71b0: 3e 3e 34 29 26 30 78 30 46 5d 3b 0a 20 20 20 20  >>4)&0x0F];.    
71c0: 20 20 20 20 20 20 7a 54 65 78 74 5b 28 69 2a 32        zText[(i*2
71d0: 29 2b 33 5d 20 3d 20 68 65 78 64 69 67 69 74 73  )+3] = hexdigits
71e0: 5b 28 7a 42 6c 6f 62 5b 69 5d 29 26 30 78 30 46  [(zBlob[i])&0x0F
71f0: 5d 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  ];.        }.   
7200: 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c 6f       zText[(nBlo
7210: 62 2a 32 29 2b 32 5d 20 3d 20 27 5c 27 27 3b 0a  b*2)+2] = '\'';.
7220: 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e          zText[(n
7230: 42 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20 27 5c 30  Blob*2)+3] = '\0
7240: 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74  ';.        zText
7250: 5b 30 5d 20 3d 20 27 58 27 3b 0a 20 20 20 20 20  [0] = 'X';.     
7260: 20 20 20 7a 54 65 78 74 5b 31 5d 20 3d 20 27 5c     zText[1] = '\
7270: 27 27 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69  '';.        sqli
7280: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
7290: 63 6f 6e 74 65 78 74 2c 20 7a 54 65 78 74 2c 20  context, zText, 
72a0: 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53  -1, SQLITE_TRANS
72b0: 49 45 4e 54 29 3b 0a 20 20 20 20 20 20 20 20 73  IENT);.        s
72c0: 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 54 65 78  qlite3_free(zTex
72d0: 74 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  t);.      }.    
72e0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
72f0: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54     case SQLITE_T
7300: 45 58 54 3a 20 7b 0a 20 20 20 20 20 20 69 6e 74  EXT: {.      int
7310: 20 69 2c 6a 3b 0a 20 20 20 20 20 20 75 36 34 20   i,j;.      u64 
7320: 6e 3b 0a 20 20 20 20 20 20 63 6f 6e 73 74 20 75  n;.      const u
7330: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41  nsigned char *zA
7340: 72 67 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  rg = sqlite3_val
7350: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
7360: 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a 3b  ;.      char *z;
7370: 0a 0a 20 20 20 20 20 20 69 66 28 20 7a 41 72 67  ..      if( zArg
7380: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
7390: 20 20 20 20 66 6f 72 28 69 3d 30 2c 20 6e 3d 30      for(i=0, n=0
73a0: 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b  ; zArg[i]; i++){
73b0: 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c   if( zArg[i]=='\
73c0: 27 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20 20 20 20  '' ) n++; }.    
73d0: 20 20 7a 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c    z = contextMal
73e0: 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69  loc(context, ((i
73f0: 36 34 29 69 29 2b 28 28 69 36 34 29 6e 29 2b 33  64)i)+((i64)n)+3
7400: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 20 29  );.      if( z )
7410: 7b 0a 20 20 20 20 20 20 20 20 7a 5b 30 5d 20 3d  {.        z[0] =
7420: 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 66   '\'';.        f
7430: 6f 72 28 69 3d 30 2c 20 6a 3d 31 3b 20 7a 41 72  or(i=0, j=1; zAr
7440: 67 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  g[i]; i++){.    
7450: 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a        z[j++] = z
7460: 41 72 67 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20  Arg[i];.        
7470: 20 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27    if( zArg[i]=='
7480: 5c 27 27 20 29 7b 0a 20 20 20 20 20 20 20 20 20  \'' ){.         
7490: 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27     z[j++] = '\''
74a0: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20  ;.          }.  
74b0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20        }.        
74c0: 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a 20  z[j++] = '\'';. 
74d0: 20 20 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 30 3b         z[j] = 0;
74e0: 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33  .        sqlite3
74f0: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
7500: 74 65 78 74 2c 20 7a 2c 20 6a 2c 20 73 71 6c 69  text, z, j, sqli
7510: 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 20  te3_free);.     
7520: 20 7d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a   }.      break;.
7530: 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75 6c      }.    defaul
7540: 74 3a 20 7b 0a 20 20 20 20 20 20 61 73 73 65 72  t: {.      asser
7550: 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  t( sqlite3_value
7560: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d  _type(argv[0])==
7570: 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b 0a 20  SQLITE_NULL );. 
7580: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
7590: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
75a0: 2c 20 22 4e 55 4c 4c 22 2c 20 34 2c 20 53 51 4c  , "NULL", 4, SQL
75b0: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 20  ITE_STATIC);.   
75c0: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
75d0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65    }.}../*.** The
75e0: 20 75 6e 69 63 6f 64 65 28 29 20 66 75 6e 63 74   unicode() funct
75f0: 69 6f 6e 2e 20 20 52 65 74 75 72 6e 20 74 68 65  ion.  Return the
7600: 20 69 6e 74 65 67 65 72 20 75 6e 69 63 6f 64 65   integer unicode
7610: 20 63 6f 64 65 2d 70 6f 69 6e 74 20 76 61 6c 75   code-point valu
7620: 65 0a 2a 2a 20 66 6f 72 20 74 68 65 20 66 69 72  e.** for the fir
7630: 73 74 20 63 68 61 72 61 63 74 65 72 20 6f 66 20  st character of 
7640: 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67  the input string
7650: 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  . .*/.static voi
7660: 64 20 75 6e 69 63 6f 64 65 46 75 6e 63 28 0a 20  d unicodeFunc(. 
7670: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
7680: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
7690: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
76a0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
76b0: 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65  .  const unsigne
76c0: 64 20 63 68 61 72 20 2a 7a 20 3d 20 73 71 6c 69  d char *z = sqli
76d0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
76e0: 72 67 76 5b 30 5d 29 3b 0a 20 20 28 76 6f 69 64  rgv[0]);.  (void
76f0: 29 61 72 67 63 3b 0a 20 20 69 66 28 20 7a 20 26  )argc;.  if( z &
7700: 26 20 7a 5b 30 5d 20 29 20 73 71 6c 69 74 65 33  & z[0] ) sqlite3
7710: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
7720: 65 78 74 2c 20 73 71 6c 69 74 65 33 55 74 66 38  ext, sqlite3Utf8
7730: 52 65 61 64 28 26 7a 29 29 3b 0a 7d 0a 0a 2f 2a  Read(&z));.}../*
7740: 0a 2a 2a 20 54 68 65 20 63 68 61 72 28 29 20 66  .** The char() f
7750: 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20 7a 65  unction takes ze
7760: 72 6f 20 6f 72 20 6d 6f 72 65 20 61 72 67 75 6d  ro or more argum
7770: 65 6e 74 73 2c 20 65 61 63 68 20 6f 66 20 77 68  ents, each of wh
7780: 69 63 68 20 69 73 0a 2a 2a 20 61 6e 20 69 6e 74  ich is.** an int
7790: 65 67 65 72 2e 20 20 49 74 20 63 6f 6e 73 74 72  eger.  It constr
77a0: 75 63 74 73 20 61 20 73 74 72 69 6e 67 20 77 68  ucts a string wh
77b0: 65 72 65 20 65 61 63 68 20 63 68 61 72 61 63 74  ere each charact
77c0: 65 72 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67  er of the string
77d0: 0a 2a 2a 20 69 73 20 74 68 65 20 75 6e 69 63 6f  .** is the unico
77e0: 64 65 20 63 68 61 72 61 63 74 65 72 20 66 6f 72  de character for
77f0: 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69   the correspondi
7800: 6e 67 20 69 6e 74 65 67 65 72 20 61 72 67 75 6d  ng integer argum
7810: 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ent..*/.static v
7820: 6f 69 64 20 63 68 61 72 46 75 6e 63 28 0a 20 20  oid charFunc(.  
7830: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
7840: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
7850: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
7860: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
7870: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
7880: 2a 7a 2c 20 2a 7a 4f 75 74 3b 0a 20 20 69 6e 74  *z, *zOut;.  int
7890: 20 69 3b 0a 20 20 7a 4f 75 74 20 3d 20 7a 20 3d   i;.  zOut = z =
78a0: 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28   sqlite3_malloc(
78b0: 20 61 72 67 63 2a 34 2b 31 20 29 3b 0a 20 20 69   argc*4+1 );.  i
78c0: 66 28 20 7a 3d 3d 30 20 29 7b 0a 20 20 20 20 73  f( z==0 ){.    s
78d0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
78e0: 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78  ror_nomem(contex
78f0: 74 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  t);.    return;.
7900: 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69    }.  for(i=0; i
7910: 3c 61 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20  <argc; i++){.   
7920: 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 78   sqlite3_int64 x
7930: 3b 0a 20 20 20 20 75 6e 73 69 67 6e 65 64 20 63  ;.    unsigned c
7940: 3b 0a 20 20 20 20 78 20 3d 20 73 71 6c 69 74 65  ;.    x = sqlite
7950: 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72  3_value_int64(ar
7960: 67 76 5b 69 5d 29 3b 0a 20 20 20 20 69 66 28 20  gv[i]);.    if( 
7970: 78 3c 30 20 7c 7c 20 78 3e 30 78 31 30 66 66 66  x<0 || x>0x10fff
7980: 66 20 29 20 78 20 3d 20 30 78 66 66 66 64 3b 0a  f ) x = 0xfffd;.
7990: 20 20 20 20 63 20 3d 20 28 75 6e 73 69 67 6e 65      c = (unsigne
79a0: 64 29 28 78 20 26 20 30 78 31 66 66 66 66 66 29  d)(x & 0x1fffff)
79b0: 3b 0a 20 20 20 20 69 66 28 20 63 3c 30 78 30 30  ;.    if( c<0x00
79c0: 30 38 30 20 29 7b 0a 20 20 20 20 20 20 2a 7a 4f  080 ){.      *zO
79d0: 75 74 2b 2b 20 3d 20 28 75 38 29 28 63 26 30 78  ut++ = (u8)(c&0x
79e0: 46 46 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69  FF);.    }else i
79f0: 66 28 20 63 3c 30 78 30 30 38 30 30 20 29 7b 0a  f( c<0x00800 ){.
7a00: 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20        *zOut++ = 
7a10: 30 78 43 30 20 2b 20 28 75 38 29 28 28 63 3e 3e  0xC0 + (u8)((c>>
7a20: 36 29 26 30 78 31 46 29 3b 0a 20 20 20 20 20 20  6)&0x1F);.      
7a30: 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b  *zOut++ = 0x80 +
7a40: 20 28 75 38 29 28 63 20 26 20 30 78 33 46 29 3b   (u8)(c & 0x3F);
7a50: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63  .    }else if( c
7a60: 3c 30 78 31 30 30 30 30 20 29 7b 0a 20 20 20 20  <0x10000 ){.    
7a70: 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 45 30    *zOut++ = 0xE0
7a80: 20 2b 20 28 75 38 29 28 28 63 3e 3e 31 32 29 26   + (u8)((c>>12)&
7a90: 30 78 30 46 29 3b 0a 20 20 20 20 20 20 2a 7a 4f  0x0F);.      *zO
7aa0: 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28 75  ut++ = 0x80 + (u
7ab0: 38 29 28 28 63 3e 3e 36 29 20 26 20 30 78 33 46  8)((c>>6) & 0x3F
7ac0: 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b  );.      *zOut++
7ad0: 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 63   = 0x80 + (u8)(c
7ae0: 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20 7d 65   & 0x3F);.    }e
7af0: 6c 73 65 7b 0a 20 20 20 20 20 20 2a 7a 4f 75 74  lse{.      *zOut
7b00: 2b 2b 20 3d 20 30 78 46 30 20 2b 20 28 75 38 29  ++ = 0xF0 + (u8)
7b10: 28 28 63 3e 3e 31 38 29 20 26 20 30 78 30 37 29  ((c>>18) & 0x07)
7b20: 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20  ;.      *zOut++ 
7b30: 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 28 63  = 0x80 + (u8)((c
7b40: 3e 3e 31 32 29 20 26 20 30 78 33 46 29 3b 0a 20  >>12) & 0x3F);. 
7b50: 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30       *zOut++ = 0
7b60: 78 38 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 36  x80 + (u8)((c>>6
7b70: 29 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20 20  ) & 0x3F);.     
7b80: 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20   *zOut++ = 0x80 
7b90: 2b 20 28 75 38 29 28 63 20 26 20 30 78 33 46 29  + (u8)(c & 0x3F)
7ba0: 3b 0a 20 20 20 20 7d 20 20 20 20 20 20 20 20 20  ;.    }         
7bb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7bc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7bd0: 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 7d             \.  }
7be0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
7bf0: 74 5f 74 65 78 74 36 34 28 63 6f 6e 74 65 78 74  t_text64(context
7c00: 2c 20 28 63 68 61 72 2a 29 7a 2c 20 7a 4f 75 74  , (char*)z, zOut
7c10: 2d 7a 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65  -z, sqlite3_free
7c20: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 29 3b 0a  , SQLITE_UTF8);.
7c30: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 68 65 78  }../*.** The hex
7c40: 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 49 6e  () function.  In
7c50: 74 65 72 70 72 65 74 20 74 68 65 20 61 72 67 75  terpret the argu
7c60: 6d 65 6e 74 20 61 73 20 61 20 62 6c 6f 62 2e 20  ment as a blob. 
7c70: 20 52 65 74 75 72 6e 0a 2a 2a 20 61 20 68 65 78   Return.** a hex
7c80: 61 64 65 63 69 6d 61 6c 20 72 65 6e 64 65 72 69  adecimal renderi
7c90: 6e 67 20 61 73 20 74 65 78 74 2e 0a 2a 2f 0a 73  ng as text..*/.s
7ca0: 74 61 74 69 63 20 76 6f 69 64 20 68 65 78 46 75  tatic void hexFu
7cb0: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
7cc0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
7cd0: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
7ce0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
7cf0: 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6e  gv.){.  int i, n
7d00: 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  ;.  const unsign
7d10: 65 64 20 63 68 61 72 20 2a 70 42 6c 6f 62 3b 0a  ed char *pBlob;.
7d20: 20 20 63 68 61 72 20 2a 7a 48 65 78 2c 20 2a 7a    char *zHex, *z
7d30: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
7d40: 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f  ==1 );.  UNUSED_
7d50: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
7d60: 0a 20 20 70 42 6c 6f 62 20 3d 20 73 71 6c 69 74  .  pBlob = sqlit
7d70: 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72  e3_value_blob(ar
7d80: 67 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20 73 71  gv[0]);.  n = sq
7d90: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
7da0: 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61 73  s(argv[0]);.  as
7db0: 73 65 72 74 28 20 70 42 6c 6f 62 3d 3d 73 71 6c  sert( pBlob==sql
7dc0: 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28  ite3_value_blob(
7dd0: 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a 20  argv[0]) );  /* 
7de0: 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e  No encoding chan
7df0: 67 65 20 2a 2f 0a 20 20 7a 20 3d 20 7a 48 65 78  ge */.  z = zHex
7e00: 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63   = contextMalloc
7e10: 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34 29  (context, ((i64)
7e20: 6e 29 2a 32 20 2b 20 31 29 3b 0a 20 20 69 66 28  n)*2 + 1);.  if(
7e30: 20 7a 48 65 78 20 29 7b 0a 20 20 20 20 66 6f 72   zHex ){.    for
7e40: 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b 2c 20  (i=0; i<n; i++, 
7e50: 70 42 6c 6f 62 2b 2b 29 7b 0a 20 20 20 20 20 20  pBlob++){.      
7e60: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 63 20  unsigned char c 
7e70: 3d 20 2a 70 42 6c 6f 62 3b 0a 20 20 20 20 20 20  = *pBlob;.      
7e80: 2a 28 7a 2b 2b 29 20 3d 20 68 65 78 64 69 67 69  *(z++) = hexdigi
7e90: 74 73 5b 28 63 3e 3e 34 29 26 30 78 66 5d 3b 0a  ts[(c>>4)&0xf];.
7ea0: 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20 3d 20 68        *(z++) = h
7eb0: 65 78 64 69 67 69 74 73 5b 63 26 30 78 66 5d 3b  exdigits[c&0xf];
7ec0: 0a 20 20 20 20 7d 0a 20 20 20 20 2a 7a 20 3d 20  .    }.    *z = 
7ed0: 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  0;.    sqlite3_r
7ee0: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
7ef0: 78 74 2c 20 7a 48 65 78 2c 20 6e 2a 32 2c 20 73  xt, zHex, n*2, s
7f00: 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20  qlite3_free);.  
7f10: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 7a  }.}../*.** The z
7f20: 65 72 6f 62 6c 6f 62 28 4e 29 20 66 75 6e 63 74  eroblob(N) funct
7f30: 69 6f 6e 20 72 65 74 75 72 6e 73 20 61 20 7a 65  ion returns a ze
7f40: 72 6f 2d 66 69 6c 6c 65 64 20 62 6c 6f 62 20 6f  ro-filled blob o
7f50: 66 20 73 69 7a 65 20 4e 20 62 79 74 65 73 2e 0a  f size N bytes..
7f60: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 7a  */.static void z
7f70: 65 72 6f 62 6c 6f 62 46 75 6e 63 28 0a 20 20 73  eroblobFunc(.  s
7f80: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
7f90: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
7fa0: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
7fb0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
7fc0: 20 69 36 34 20 6e 3b 0a 20 20 73 71 6c 69 74 65   i64 n;.  sqlite
7fd0: 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  3 *db = sqlite3_
7fe0: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
7ff0: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61 73  e(context);.  as
8000: 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b  sert( argc==1 );
8010: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
8020: 54 45 52 28 61 72 67 63 29 3b 0a 20 20 6e 20 3d  TER(argc);.  n =
8030: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
8040: 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20  nt64(argv[0]);. 
8050: 20 74 65 73 74 63 61 73 65 28 20 6e 3d 3d 64 62   testcase( n==db
8060: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
8070: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b  LIMIT_LENGTH] );
8080: 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 3d 3d  .  testcase( n==
8090: 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  db->aLimit[SQLIT
80a0: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 2b  E_LIMIT_LENGTH]+
80b0: 31 20 29 3b 0a 20 20 69 66 28 20 6e 3e 64 62 2d  1 );.  if( n>db-
80c0: 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c  >aLimit[SQLITE_L
80d0: 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a  IMIT_LENGTH] ){.
80e0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
80f0: 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28  lt_error_toobig(
8100: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65 6c 73  context);.  }els
8110: 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  e{.    sqlite3_r
8120: 65 73 75 6c 74 5f 7a 65 72 6f 62 6c 6f 62 28 63  esult_zeroblob(c
8130: 6f 6e 74 65 78 74 2c 20 28 69 6e 74 29 6e 29 3b  ontext, (int)n);
8140: 20 2f 2a 20 49 4d 50 3a 20 52 2d 30 30 32 39 33   /* IMP: R-00293
8150: 2d 36 34 39 39 34 20 2a 2f 0a 20 20 7d 0a 7d 0a  -64994 */.  }.}.
8160: 0a 2f 2a 0a 2a 2a 20 54 68 65 20 72 65 70 6c 61  ./*.** The repla
8170: 63 65 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20  ce() function.  
8180: 54 68 72 65 65 20 61 72 67 75 6d 65 6e 74 73 20  Three arguments 
8190: 61 72 65 20 61 6c 6c 20 73 74 72 69 6e 67 73 3a  are all strings:
81a0: 20 63 61 6c 6c 0a 2a 2a 20 74 68 65 6d 20 41 2c   call.** them A,
81b0: 20 42 2c 20 61 6e 64 20 43 2e 20 54 68 65 20 72   B, and C. The r
81c0: 65 73 75 6c 74 20 69 73 20 61 6c 73 6f 20 61 20  esult is also a 
81d0: 73 74 72 69 6e 67 20 77 68 69 63 68 20 69 73 20  string which is 
81e0: 64 65 72 69 76 65 64 0a 2a 2a 20 66 72 6f 6d 20  derived.** from 
81f0: 41 20 62 79 20 72 65 70 6c 61 63 69 6e 67 20 65  A by replacing e
8200: 76 65 72 79 20 6f 63 63 75 72 72 65 6e 63 65 20  very occurrence 
8210: 6f 66 20 42 20 77 69 74 68 20 43 2e 20 20 54 68  of B with C.  Th
8220: 65 20 6d 61 74 63 68 0a 2a 2a 20 6d 75 73 74 20  e match.** must 
8230: 62 65 20 65 78 61 63 74 2e 20 20 43 6f 6c 6c 61  be exact.  Colla
8240: 74 69 6e 67 20 73 65 71 75 65 6e 63 65 73 20 61  ting sequences a
8250: 72 65 20 6e 6f 74 20 75 73 65 64 2e 0a 2a 2f 0a  re not used..*/.
8260: 73 74 61 74 69 63 20 76 6f 69 64 20 72 65 70 6c  static void repl
8270: 61 63 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  aceFunc(.  sqlit
8280: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
8290: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
82a0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
82b0: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e   **argv.){.  con
82c0: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
82d0: 20 2a 7a 53 74 72 3b 20 20 20 20 20 20 20 20 2f   *zStr;        /
82e0: 2a 20 54 68 65 20 69 6e 70 75 74 20 73 74 72 69  * The input stri
82f0: 6e 67 20 41 20 2a 2f 0a 20 20 63 6f 6e 73 74 20  ng A */.  const 
8300: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
8310: 50 61 74 74 65 72 6e 3b 20 20 20 20 2f 2a 20 54  Pattern;    /* T
8320: 68 65 20 70 61 74 74 65 72 6e 20 73 74 72 69 6e  he pattern strin
8330: 67 20 42 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75  g B */.  const u
8340: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 52  nsigned char *zR
8350: 65 70 3b 20 20 20 20 20 20 20 20 2f 2a 20 54 68  ep;        /* Th
8360: 65 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 73 74  e replacement st
8370: 72 69 6e 67 20 43 20 2a 2f 0a 20 20 75 6e 73 69  ring C */.  unsi
8380: 67 6e 65 64 20 63 68 61 72 20 2a 7a 4f 75 74 3b  gned char *zOut;
8390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
83a0: 20 54 68 65 20 6f 75 74 70 75 74 20 2a 2f 0a 20   The output */. 
83b0: 20 69 6e 74 20 6e 53 74 72 3b 20 20 20 20 20 20   int nStr;      
83c0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69 7a            /* Siz
83d0: 65 20 6f 66 20 7a 53 74 72 20 2a 2f 0a 20 20 69  e of zStr */.  i
83e0: 6e 74 20 6e 50 61 74 74 65 72 6e 3b 20 20 20 20  nt nPattern;    
83f0: 20 20 20 20 20 20 20 20 2f 2a 20 53 69 7a 65 20          /* Size 
8400: 6f 66 20 7a 50 61 74 74 65 72 6e 20 2a 2f 0a 20  of zPattern */. 
8410: 20 69 6e 74 20 6e 52 65 70 3b 20 20 20 20 20 20   int nRep;      
8420: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69 7a            /* Siz
8430: 65 20 6f 66 20 7a 52 65 70 20 2a 2f 0a 20 20 69  e of zRep */.  i
8440: 36 34 20 6e 4f 75 74 3b 20 20 20 20 20 20 20 20  64 nOut;        
8450: 20 20 20 20 20 20 20 20 2f 2a 20 4d 61 78 69 6d          /* Maxim
8460: 75 6d 20 73 69 7a 65 20 6f 66 20 7a 4f 75 74 20  um size of zOut 
8470: 2a 2f 0a 20 20 69 6e 74 20 6c 6f 6f 70 4c 69 6d  */.  int loopLim
8480: 69 74 3b 20 20 20 20 20 20 20 20 20 20 20 2f 2a  it;           /*
8490: 20 4c 61 73 74 20 7a 53 74 72 5b 5d 20 74 68 61   Last zStr[] tha
84a0: 74 20 6d 69 67 68 74 20 6d 61 74 63 68 20 7a 50  t might match zP
84b0: 61 74 74 65 72 6e 5b 5d 20 2a 2f 0a 20 20 69 6e  attern[] */.  in
84c0: 74 20 69 2c 20 6a 3b 20 20 20 20 20 20 20 20 20  t i, j;         
84d0: 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f 70 20 63         /* Loop c
84e0: 6f 75 6e 74 65 72 73 20 2a 2f 0a 0a 20 20 61 73  ounters */..  as
84f0: 73 65 72 74 28 20 61 72 67 63 3d 3d 33 20 29 3b  sert( argc==3 );
8500: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
8510: 54 45 52 28 61 72 67 63 29 3b 0a 20 20 7a 53 74  TER(argc);.  zSt
8520: 72 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  r = sqlite3_valu
8530: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
8540: 0a 20 20 69 66 28 20 7a 53 74 72 3d 3d 30 20 29  .  if( zStr==0 )
8550: 20 72 65 74 75 72 6e 3b 0a 20 20 6e 53 74 72 20   return;.  nStr 
8560: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
8570: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
8580: 20 20 61 73 73 65 72 74 28 20 7a 53 74 72 3d 3d    assert( zStr==
8590: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
85a0: 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 20  xt(argv[0]) );  
85b0: 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63  /* No encoding c
85c0: 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 50 61 74 74  hange */.  zPatt
85d0: 65 72 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  ern = sqlite3_va
85e0: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d  lue_text(argv[1]
85f0: 29 3b 0a 20 20 69 66 28 20 7a 50 61 74 74 65 72  );.  if( zPatter
8600: 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 61 73 73 65  n==0 ){.    asse
8610: 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  rt( sqlite3_valu
8620: 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d 29 3d  e_type(argv[1])=
8630: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a 20 20 20  =SQLITE_NULL.   
8640: 20 20 20 20 20 20 20 20 20 7c 7c 20 73 71 6c 69           || sqli
8650: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
8660: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 2d 3e  andle(context)->
8670: 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 29 3b 0a  mallocFailed );.
8680: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
8690: 20 20 69 66 28 20 7a 50 61 74 74 65 72 6e 5b 30    if( zPattern[0
86a0: 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 61 73 73 65  ]==0 ){.    asse
86b0: 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  rt( sqlite3_valu
86c0: 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d 29 21  e_type(argv[1])!
86d0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b 0a  =SQLITE_NULL );.
86e0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
86f0: 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74  lt_value(context
8700: 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  , argv[0]);.    
8710: 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 6e 50  return;.  }.  nP
8720: 61 74 74 65 72 6e 20 3d 20 73 71 6c 69 74 65 33  attern = sqlite3
8730: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
8740: 76 5b 31 5d 29 3b 0a 20 20 61 73 73 65 72 74 28  v[1]);.  assert(
8750: 20 7a 50 61 74 74 65 72 6e 3d 3d 73 71 6c 69 74   zPattern==sqlit
8760: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
8770: 67 76 5b 31 5d 29 20 29 3b 20 20 2f 2a 20 4e 6f  gv[1]) );  /* No
8780: 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67 65   encoding change
8790: 20 2a 2f 0a 20 20 7a 52 65 70 20 3d 20 73 71 6c   */.  zRep = sql
87a0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
87b0: 61 72 67 76 5b 32 5d 29 3b 0a 20 20 69 66 28 20  argv[2]);.  if( 
87c0: 7a 52 65 70 3d 3d 30 20 29 20 72 65 74 75 72 6e  zRep==0 ) return
87d0: 3b 0a 20 20 6e 52 65 70 20 3d 20 73 71 6c 69 74  ;.  nRep = sqlit
87e0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
87f0: 72 67 76 5b 32 5d 29 3b 0a 20 20 61 73 73 65 72  rgv[2]);.  asser
8800: 74 28 20 7a 52 65 70 3d 3d 73 71 6c 69 74 65 33  t( zRep==sqlite3
8810: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
8820: 5b 32 5d 29 20 29 3b 0a 20 20 6e 4f 75 74 20 3d  [2]) );.  nOut =
8830: 20 6e 53 74 72 20 2b 20 31 3b 0a 20 20 61 73 73   nStr + 1;.  ass
8840: 65 72 74 28 20 6e 4f 75 74 3c 53 51 4c 49 54 45  ert( nOut<SQLITE
8850: 5f 4d 41 58 5f 4c 45 4e 47 54 48 20 29 3b 0a 20  _MAX_LENGTH );. 
8860: 20 7a 4f 75 74 20 3d 20 63 6f 6e 74 65 78 74 4d   zOut = contextM
8870: 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28  alloc(context, (
8880: 69 36 34 29 6e 4f 75 74 29 3b 0a 20 20 69 66 28  i64)nOut);.  if(
8890: 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20   zOut==0 ){.    
88a0: 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 6c 6f  return;.  }.  lo
88b0: 6f 70 4c 69 6d 69 74 20 3d 20 6e 53 74 72 20 2d  opLimit = nStr -
88c0: 20 6e 50 61 74 74 65 72 6e 3b 20 20 0a 20 20 66   nPattern;  .  f
88d0: 6f 72 28 69 3d 6a 3d 30 3b 20 69 3c 3d 6c 6f 6f  or(i=j=0; i<=loo
88e0: 70 4c 69 6d 69 74 3b 20 69 2b 2b 29 7b 0a 20 20  pLimit; i++){.  
88f0: 20 20 69 66 28 20 7a 53 74 72 5b 69 5d 21 3d 7a    if( zStr[i]!=z
8900: 50 61 74 74 65 72 6e 5b 30 5d 20 7c 7c 20 6d 65  Pattern[0] || me
8910: 6d 63 6d 70 28 26 7a 53 74 72 5b 69 5d 2c 20 7a  mcmp(&zStr[i], z
8920: 50 61 74 74 65 72 6e 2c 20 6e 50 61 74 74 65 72  Pattern, nPatter
8930: 6e 29 20 29 7b 0a 20 20 20 20 20 20 7a 4f 75 74  n) ){.      zOut
8940: 5b 6a 2b 2b 5d 20 3d 20 7a 53 74 72 5b 69 5d 3b  [j++] = zStr[i];
8950: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
8960: 20 20 75 38 20 2a 7a 4f 6c 64 3b 0a 20 20 20 20    u8 *zOld;.    
8970: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20    sqlite3 *db = 
8980: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
8990: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
89a0: 74 29 3b 0a 20 20 20 20 20 20 6e 4f 75 74 20 2b  t);.      nOut +
89b0: 3d 20 6e 52 65 70 20 2d 20 6e 50 61 74 74 65 72  = nRep - nPatter
89c0: 6e 3b 0a 20 20 20 20 20 20 74 65 73 74 63 61 73  n;.      testcas
89d0: 65 28 20 6e 4f 75 74 2d 31 3d 3d 64 62 2d 3e 61  e( nOut-1==db->a
89e0: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
89f0: 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20 20  IT_LENGTH] );.  
8a00: 20 20 20 20 74 65 73 74 63 61 73 65 28 20 6e 4f      testcase( nO
8a10: 75 74 2d 32 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74  ut-2==db->aLimit
8a20: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45  [SQLITE_LIMIT_LE
8a30: 4e 47 54 48 5d 20 29 3b 0a 20 20 20 20 20 20 69  NGTH] );.      i
8a40: 66 28 20 6e 4f 75 74 2d 31 3e 64 62 2d 3e 61 4c  f( nOut-1>db->aL
8a50: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
8a60: 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20  T_LENGTH] ){.   
8a70: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
8a80: 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67  ult_error_toobig
8a90: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20  (context);.     
8aa0: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28     sqlite3_free(
8ab0: 7a 4f 75 74 29 3b 0a 20 20 20 20 20 20 20 20 72  zOut);.        r
8ac0: 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20  eturn;.      }. 
8ad0: 20 20 20 20 20 7a 4f 6c 64 20 3d 20 7a 4f 75 74       zOld = zOut
8ae0: 3b 0a 20 20 20 20 20 20 7a 4f 75 74 20 3d 20 73  ;.      zOut = s
8af0: 71 6c 69 74 65 33 5f 72 65 61 6c 6c 6f 63 28 7a  qlite3_realloc(z
8b00: 4f 75 74 2c 20 28 69 6e 74 29 6e 4f 75 74 29 3b  Out, (int)nOut);
8b10: 0a 20 20 20 20 20 20 69 66 28 20 7a 4f 75 74 3d  .      if( zOut=
8b20: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 73 71  =0 ){.        sq
8b30: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
8b40: 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74  or_nomem(context
8b50: 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  );.        sqlit
8b60: 65 33 5f 66 72 65 65 28 7a 4f 6c 64 29 3b 0a 20  e3_free(zOld);. 
8b70: 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20         return;. 
8b80: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 6d 65 6d       }.      mem
8b90: 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20 7a 52  cpy(&zOut[j], zR
8ba0: 65 70 2c 20 6e 52 65 70 29 3b 0a 20 20 20 20 20  ep, nRep);.     
8bb0: 20 6a 20 2b 3d 20 6e 52 65 70 3b 0a 20 20 20 20   j += nRep;.    
8bc0: 20 20 69 20 2b 3d 20 6e 50 61 74 74 65 72 6e 2d    i += nPattern-
8bd0: 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61  1;.    }.  }.  a
8be0: 73 73 65 72 74 28 20 6a 2b 6e 53 74 72 2d 69 2b  ssert( j+nStr-i+
8bf0: 31 3d 3d 6e 4f 75 74 20 29 3b 0a 20 20 6d 65 6d  1==nOut );.  mem
8c00: 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20 26 7a  cpy(&zOut[j], &z
8c10: 53 74 72 5b 69 5d 2c 20 6e 53 74 72 2d 69 29 3b  Str[i], nStr-i);
8c20: 0a 20 20 6a 20 2b 3d 20 6e 53 74 72 20 2d 20 69  .  j += nStr - i
8c30: 3b 0a 20 20 61 73 73 65 72 74 28 20 6a 3c 3d 6e  ;.  assert( j<=n
8c40: 4f 75 74 20 29 3b 0a 20 20 7a 4f 75 74 5b 6a 5d  Out );.  zOut[j]
8c50: 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f   = 0;.  sqlite3_
8c60: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
8c70: 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 4f 75 74  ext, (char*)zOut
8c80: 2c 20 6a 2c 20 73 71 6c 69 74 65 33 5f 66 72 65  , j, sqlite3_fre
8c90: 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  e);.}../*.** Imp
8ca0: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
8cb0: 68 65 20 54 52 49 4d 28 29 2c 20 4c 54 52 49 4d  he TRIM(), LTRIM
8cc0: 28 29 2c 20 61 6e 64 20 52 54 52 49 4d 28 29 20  (), and RTRIM() 
8cd0: 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2a 20 54 68  functions..** Th
8ce0: 65 20 75 73 65 72 64 61 74 61 20 69 73 20 30 78  e userdata is 0x
8cf0: 31 20 66 6f 72 20 6c 65 66 74 20 74 72 69 6d 2c  1 for left trim,
8d00: 20 30 78 32 20 66 6f 72 20 72 69 67 68 74 20 74   0x2 for right t
8d10: 72 69 6d 2c 20 30 78 33 20 66 6f 72 20 62 6f 74  rim, 0x3 for bot
8d20: 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  h..*/.static voi
8d30: 64 20 74 72 69 6d 46 75 6e 63 28 0a 20 20 73 71  d trimFunc(.  sq
8d40: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
8d50: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
8d60: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
8d70: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
8d80: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
8d90: 68 61 72 20 2a 7a 49 6e 3b 20 20 20 20 20 20 20  har *zIn;       
8da0: 20 20 2f 2a 20 49 6e 70 75 74 20 73 74 72 69 6e    /* Input strin
8db0: 67 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 6e 73  g */.  const uns
8dc0: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 43 68 61  igned char *zCha
8dd0: 72 53 65 74 3b 20 20 20 20 2f 2a 20 53 65 74 20  rSet;    /* Set 
8de0: 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 74 6f  of characters to
8df0: 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74 20 6e   trim */.  int n
8e00: 49 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  In;             
8e10: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
8e20: 4e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20  Number of bytes 
8e30: 69 6e 20 69 6e 70 75 74 20 2a 2f 0a 20 20 69 6e  in input */.  in
8e40: 74 20 66 6c 61 67 73 3b 20 20 20 20 20 20 20 20  t flags;        
8e50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8e60: 2f 2a 20 31 3a 20 74 72 69 6d 6c 65 66 74 20 20  /* 1: trimleft  
8e70: 32 3a 20 74 72 69 6d 72 69 67 68 74 20 20 33 3a  2: trimright  3:
8e80: 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74 20 69   trim */.  int i
8e90: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ;               
8ea0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
8eb0: 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a 2f 0a  Loop counter */.
8ec0: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
8ed0: 2a 61 4c 65 6e 20 3d 20 30 3b 20 20 20 20 20 20  *aLen = 0;      
8ee0: 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20 6f 66      /* Length of
8ef0: 20 65 61 63 68 20 63 68 61 72 61 63 74 65 72 20   each character 
8f00: 69 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20  in zCharSet */. 
8f10: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
8f20: 2a 61 7a 43 68 61 72 20 3d 20 30 3b 20 20 20 20  *azChar = 0;    
8f30: 20 20 20 2f 2a 20 49 6e 64 69 76 69 64 75 61 6c     /* Individual
8f40: 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 20 7a   characters in z
8f50: 43 68 61 72 53 65 74 20 2a 2f 0a 20 20 69 6e 74  CharSet */.  int
8f60: 20 6e 43 68 61 72 3b 20 20 20 20 20 20 20 20 20   nChar;         
8f70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
8f80: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 63 68 61 72  * Number of char
8f90: 61 63 74 65 72 73 20 69 6e 20 7a 43 68 61 72 53  acters in zCharS
8fa0: 65 74 20 2a 2f 0a 0a 20 20 69 66 28 20 73 71 6c  et */..  if( sql
8fb0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
8fc0: 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45  argv[0])==SQLITE
8fd0: 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 72 65 74  _NULL ){.    ret
8fe0: 75 72 6e 3b 0a 20 20 7d 0a 20 20 7a 49 6e 20 3d  urn;.  }.  zIn =
8ff0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
9000: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
9010: 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20 72 65 74  if( zIn==0 ) ret
9020: 75 72 6e 3b 0a 20 20 6e 49 6e 20 3d 20 73 71 6c  urn;.  nIn = sql
9030: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
9040: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61 73 73  (argv[0]);.  ass
9050: 65 72 74 28 20 7a 49 6e 3d 3d 73 71 6c 69 74 65  ert( zIn==sqlite
9060: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
9070: 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28 20 61  v[0]) );.  if( a
9080: 72 67 63 3d 3d 31 20 29 7b 0a 20 20 20 20 73 74  rgc==1 ){.    st
9090: 61 74 69 63 20 63 6f 6e 73 74 20 75 6e 73 69 67  atic const unsig
90a0: 6e 65 64 20 63 68 61 72 20 6c 65 6e 4f 6e 65 5b  ned char lenOne[
90b0: 5d 20 3d 20 7b 20 31 20 7d 3b 0a 20 20 20 20 73  ] = { 1 };.    s
90c0: 74 61 74 69 63 20 75 6e 73 69 67 6e 65 64 20 63  tatic unsigned c
90d0: 68 61 72 20 2a 20 63 6f 6e 73 74 20 61 7a 4f 6e  har * const azOn
90e0: 65 5b 5d 20 3d 20 7b 20 28 75 38 2a 29 22 20 22  e[] = { (u8*)" "
90f0: 20 7d 3b 0a 20 20 20 20 6e 43 68 61 72 20 3d 20   };.    nChar = 
9100: 31 3b 0a 20 20 20 20 61 4c 65 6e 20 3d 20 28 75  1;.    aLen = (u
9110: 38 2a 29 6c 65 6e 4f 6e 65 3b 0a 20 20 20 20 61  8*)lenOne;.    a
9120: 7a 43 68 61 72 20 3d 20 28 75 6e 73 69 67 6e 65  zChar = (unsigne
9130: 64 20 63 68 61 72 20 2a 2a 29 61 7a 4f 6e 65 3b  d char **)azOne;
9140: 0a 20 20 20 20 7a 43 68 61 72 53 65 74 20 3d 20  .    zCharSet = 
9150: 30 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 28  0;.  }else if( (
9160: 7a 43 68 61 72 53 65 74 20 3d 20 73 71 6c 69 74  zCharSet = sqlit
9170: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
9180: 67 76 5b 31 5d 29 29 3d 3d 30 20 29 7b 0a 20 20  gv[1]))==0 ){.  
9190: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 65 6c 73    return;.  }els
91a0: 65 7b 0a 20 20 20 20 63 6f 6e 73 74 20 75 6e 73  e{.    const uns
91b0: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0a 20  igned char *z;. 
91c0: 20 20 20 66 6f 72 28 7a 3d 7a 43 68 61 72 53 65     for(z=zCharSe
91d0: 74 2c 20 6e 43 68 61 72 3d 30 3b 20 2a 7a 3b 20  t, nChar=0; *z; 
91e0: 6e 43 68 61 72 2b 2b 29 7b 0a 20 20 20 20 20 20  nChar++){.      
91f0: 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38  SQLITE_SKIP_UTF8
9200: 28 7a 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69  (z);.    }.    i
9210: 66 28 20 6e 43 68 61 72 3e 30 20 29 7b 0a 20 20  f( nChar>0 ){.  
9220: 20 20 20 20 61 7a 43 68 61 72 20 3d 20 63 6f 6e      azChar = con
9230: 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65  textMalloc(conte
9240: 78 74 2c 20 28 28 69 36 34 29 6e 43 68 61 72 29  xt, ((i64)nChar)
9250: 2a 28 73 69 7a 65 6f 66 28 63 68 61 72 2a 29 2b  *(sizeof(char*)+
9260: 31 29 29 3b 0a 20 20 20 20 20 20 69 66 28 20 61  1));.      if( a
9270: 7a 43 68 61 72 3d 3d 30 20 29 7b 0a 20 20 20 20  zChar==0 ){.    
9280: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20      return;.    
9290: 20 20 7d 0a 20 20 20 20 20 20 61 4c 65 6e 20 3d    }.      aLen =
92a0: 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 2a   (unsigned char*
92b0: 29 26 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d 3b  )&azChar[nChar];
92c0: 0a 20 20 20 20 20 20 66 6f 72 28 7a 3d 7a 43 68  .      for(z=zCh
92d0: 61 72 53 65 74 2c 20 6e 43 68 61 72 3d 30 3b 20  arSet, nChar=0; 
92e0: 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a 20 20  *z; nChar++){.  
92f0: 20 20 20 20 20 20 61 7a 43 68 61 72 5b 6e 43 68        azChar[nCh
9300: 61 72 5d 20 3d 20 28 75 6e 73 69 67 6e 65 64 20  ar] = (unsigned 
9310: 63 68 61 72 20 2a 29 7a 3b 0a 20 20 20 20 20 20  char *)z;.      
9320: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
9330: 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 20 20 61  F8(z);.        a
9340: 4c 65 6e 5b 6e 43 68 61 72 5d 20 3d 20 28 75 38  Len[nChar] = (u8
9350: 29 28 7a 20 2d 20 61 7a 43 68 61 72 5b 6e 43 68  )(z - azChar[nCh
9360: 61 72 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  ar]);.      }.  
9370: 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 6e 43    }.  }.  if( nC
9380: 68 61 72 3e 30 20 29 7b 0a 20 20 20 20 66 6c 61  har>0 ){.    fla
9390: 67 73 20 3d 20 53 51 4c 49 54 45 5f 50 54 52 5f  gs = SQLITE_PTR_
93a0: 54 4f 5f 49 4e 54 28 73 71 6c 69 74 65 33 5f 75  TO_INT(sqlite3_u
93b0: 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74  ser_data(context
93c0: 29 29 3b 0a 20 20 20 20 69 66 28 20 66 6c 61 67  ));.    if( flag
93d0: 73 20 26 20 31 20 29 7b 0a 20 20 20 20 20 20 77  s & 1 ){.      w
93e0: 68 69 6c 65 28 20 6e 49 6e 3e 30 20 29 7b 0a 20  hile( nIn>0 ){. 
93f0: 20 20 20 20 20 20 20 69 6e 74 20 6c 65 6e 20 3d         int len =
9400: 20 30 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28   0;.        for(
9410: 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20 69 2b  i=0; i<nChar; i+
9420: 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6c 65  +){.          le
9430: 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20 20  n = aLen[i];.   
9440: 20 20 20 20 20 20 20 69 66 28 20 6c 65 6e 3c 3d         if( len<=
9450: 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28 7a 49  nIn && memcmp(zI
9460: 6e 2c 20 61 7a 43 68 61 72 5b 69 5d 2c 20 6c 65  n, azChar[i], le
9470: 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20  n)==0 ) break;. 
9480: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
9490: 20 69 66 28 20 69 3e 3d 6e 43 68 61 72 20 29 20   if( i>=nChar ) 
94a0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 7a  break;.        z
94b0: 49 6e 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20 20  In += len;.     
94c0: 20 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20     nIn -= len;. 
94d0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20       }.    }.   
94e0: 20 69 66 28 20 66 6c 61 67 73 20 26 20 32 20 29   if( flags & 2 )
94f0: 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 6e  {.      while( n
9500: 49 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20  In>0 ){.        
9510: 69 6e 74 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20  int len = 0;.   
9520: 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c       for(i=0; i<
9530: 6e 43 68 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20  nChar; i++){.   
9540: 20 20 20 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65         len = aLe
9550: 6e 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 20 20  n[i];.          
9560: 69 66 28 20 6c 65 6e 3c 3d 6e 49 6e 20 26 26 20  if( len<=nIn && 
9570: 6d 65 6d 63 6d 70 28 26 7a 49 6e 5b 6e 49 6e 2d  memcmp(&zIn[nIn-
9580: 6c 65 6e 5d 2c 61 7a 43 68 61 72 5b 69 5d 2c 6c  len],azChar[i],l
9590: 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a  en)==0 ) break;.
95a0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
95b0: 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72 20 29    if( i>=nChar )
95c0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20   break;.        
95d0: 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20  nIn -= len;.    
95e0: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 66    }.    }.    if
95f0: 28 20 7a 43 68 61 72 53 65 74 20 29 7b 0a 20 20  ( zCharSet ){.  
9600: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
9610: 28 61 7a 43 68 61 72 29 3b 0a 20 20 20 20 7d 0a  (azChar);.    }.
9620: 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65    }.  sqlite3_re
9630: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
9640: 74 2c 20 28 63 68 61 72 2a 29 7a 49 6e 2c 20 6e  t, (char*)zIn, n
9650: 49 6e 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53  In, SQLITE_TRANS
9660: 49 45 4e 54 29 3b 0a 7d 0a 0a 0a 2f 2a 20 49 4d  IENT);.}.../* IM
9670: 50 3a 20 52 2d 32 35 33 36 31 2d 31 36 31 35 30  P: R-25361-16150
9680: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69   This function i
9690: 73 20 6f 6d 69 74 74 65 64 20 66 72 6f 6d 20 53  s omitted from S
96a0: 51 4c 69 74 65 20 62 79 20 64 65 66 61 75 6c 74  QLite by default
96b0: 2e 20 49 74 0a 2a 2a 20 69 73 20 6f 6e 6c 79 20  . It.** is only 
96c0: 61 76 61 69 6c 61 62 6c 65 20 69 66 20 74 68 65  available if the
96d0: 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58 20   SQLITE_SOUNDEX 
96e0: 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 20 6f 70 74  compile-time opt
96f0: 69 6f 6e 20 69 73 20 75 73 65 64 0a 2a 2a 20 77  ion is used.** w
9700: 68 65 6e 20 53 51 4c 69 74 65 20 69 73 20 62 75  hen SQLite is bu
9710: 69 6c 74 2e 0a 2a 2f 0a 23 69 66 64 65 66 20 53  ilt..*/.#ifdef S
9720: 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58 0a 2f 2a  QLITE_SOUNDEX./*
9730: 0a 2a 2a 20 43 6f 6d 70 75 74 65 20 74 68 65 20  .** Compute the 
9740: 73 6f 75 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67  soundex encoding
9750: 20 6f 66 20 61 20 77 6f 72 64 2e 0a 2a 2a 0a 2a   of a word..**.*
9760: 2a 20 49 4d 50 3a 20 52 2d 35 39 37 38 32 2d 30  * IMP: R-59782-0
9770: 30 30 37 32 20 54 68 65 20 73 6f 75 6e 64 65 78  0072 The soundex
9780: 28 58 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74  (X) function ret
9790: 75 72 6e 73 20 61 20 73 74 72 69 6e 67 20 74 68  urns a string th
97a0: 61 74 20 69 73 20 74 68 65 0a 2a 2a 20 73 6f 75  at is the.** sou
97b0: 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67 20 6f 66  ndex encoding of
97c0: 20 74 68 65 20 73 74 72 69 6e 67 20 58 2e 20 0a   the string X. .
97d0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73  */.static void s
97e0: 6f 75 6e 64 65 78 46 75 6e 63 28 0a 20 20 73 71  oundexFunc(.  sq
97f0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
9800: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
9810: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
9820: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
9830: 63 68 61 72 20 7a 52 65 73 75 6c 74 5b 38 5d 3b  char zResult[8];
9840: 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 49 6e  .  const u8 *zIn
9850: 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20  ;.  int i, j;.  
9860: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e 73  static const uns
9870: 69 67 6e 65 64 20 63 68 61 72 20 69 43 6f 64 65  igned char iCode
9880: 5b 5d 20 3d 20 7b 0a 20 20 20 20 30 2c 20 30 2c  [] = {.    0, 0,
9890: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
98a0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
98b0: 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30  , 0, 0, 0,.    0
98c0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
98d0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
98e0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20  0, 0, 0, 0, 0,. 
98f0: 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30     0, 0, 0, 0, 0
9900: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9910: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9920: 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20  0,.    0, 0, 0, 
9930: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9940: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9950: 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c   0, 0,.    0, 0,
9960: 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20   1, 2, 3, 0, 1, 
9970: 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32 2c 20 34  2, 0, 0, 2, 2, 4
9980: 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20 20 20 31  , 5, 5, 0,.    1
9990: 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c 20 30 2c  , 2, 6, 2, 3, 0,
99a0: 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20 32 2c 20   1, 0, 2, 0, 2, 
99b0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20  0, 0, 0, 0, 0,. 
99c0: 20 20 20 30 2c 20 30 2c 20 31 2c 20 32 2c 20 33     0, 0, 1, 2, 3
99d0: 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c 20 30 2c  , 0, 1, 2, 0, 0,
99e0: 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20 35 2c 20   2, 2, 4, 5, 5, 
99f0: 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20 36 2c 20  0,.    1, 2, 6, 
9a00: 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30 2c 20 32  2, 3, 0, 1, 0, 2
9a10: 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 2, 0, 0, 0,
9a20: 20 30 2c 20 30 2c 0a 20 20 7d 3b 0a 20 20 61 73   0, 0,.  };.  as
9a30: 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b  sert( argc==1 );
9a40: 0a 20 20 7a 49 6e 20 3d 20 28 75 38 2a 29 73 71  .  zIn = (u8*)sq
9a50: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
9a60: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28  (argv[0]);.  if(
9a70: 20 7a 49 6e 3d 3d 30 20 29 20 7a 49 6e 20 3d 20   zIn==0 ) zIn = 
9a80: 28 75 38 2a 29 22 22 3b 0a 20 20 66 6f 72 28 69  (u8*)"";.  for(i
9a90: 3d 30 3b 20 7a 49 6e 5b 69 5d 20 26 26 20 21 73  =0; zIn[i] && !s
9aa0: 71 6c 69 74 65 33 49 73 61 6c 70 68 61 28 7a 49  qlite3Isalpha(zI
9ab0: 6e 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d 0a 20 20  n[i]); i++){}.  
9ac0: 69 66 28 20 7a 49 6e 5b 69 5d 20 29 7b 0a 20 20  if( zIn[i] ){.  
9ad0: 20 20 75 38 20 70 72 65 76 63 6f 64 65 20 3d 20    u8 prevcode = 
9ae0: 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30 78 37  iCode[zIn[i]&0x7
9af0: 66 5d 3b 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b  f];.    zResult[
9b00: 30 5d 20 3d 20 73 71 6c 69 74 65 33 54 6f 75 70  0] = sqlite3Toup
9b10: 70 65 72 28 7a 49 6e 5b 69 5d 29 3b 0a 20 20 20  per(zIn[i]);.   
9b20: 20 66 6f 72 28 6a 3d 31 3b 20 6a 3c 34 20 26 26   for(j=1; j<4 &&
9b30: 20 7a 49 6e 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20   zIn[i]; i++){. 
9b40: 20 20 20 20 20 69 6e 74 20 63 6f 64 65 20 3d 20       int code = 
9b50: 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30 78 37  iCode[zIn[i]&0x7
9b60: 66 5d 3b 0a 20 20 20 20 20 20 69 66 28 20 63 6f  f];.      if( co
9b70: 64 65 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20  de>0 ){.        
9b80: 69 66 28 20 63 6f 64 65 21 3d 70 72 65 76 63 6f  if( code!=prevco
9b90: 64 65 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20  de ){.          
9ba0: 70 72 65 76 63 6f 64 65 20 3d 20 63 6f 64 65 3b  prevcode = code;
9bb0: 0a 20 20 20 20 20 20 20 20 20 20 7a 52 65 73 75  .          zResu
9bc0: 6c 74 5b 6a 2b 2b 5d 20 3d 20 63 6f 64 65 20 2b  lt[j++] = code +
9bd0: 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7d 0a   '0';.        }.
9be0: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20        }else{.   
9bf0: 20 20 20 20 20 70 72 65 76 63 6f 64 65 20 3d 20       prevcode = 
9c00: 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  0;.      }.    }
9c10: 0a 20 20 20 20 77 68 69 6c 65 28 20 6a 3c 34 20  .    while( j<4 
9c20: 29 7b 0a 20 20 20 20 20 20 7a 52 65 73 75 6c 74  ){.      zResult
9c30: 5b 6a 2b 2b 5d 20 3d 20 27 30 27 3b 0a 20 20 20  [j++] = '0';.   
9c40: 20 7d 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a   }.    zResult[j
9c50: 5d 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 74  ] = 0;.    sqlit
9c60: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
9c70: 6f 6e 74 65 78 74 2c 20 7a 52 65 73 75 6c 74 2c  ontext, zResult,
9c80: 20 34 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53   4, SQLITE_TRANS
9c90: 49 45 4e 54 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  IENT);.  }else{.
9ca0: 20 20 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 36 34      /* IMP: R-64
9cb0: 38 39 34 2d 35 30 33 32 31 20 54 68 65 20 73 74  894-50321 The st
9cc0: 72 69 6e 67 20 22 3f 30 30 30 22 20 69 73 20 72  ring "?000" is r
9cd0: 65 74 75 72 6e 65 64 20 69 66 20 74 68 65 20 61  eturned if the a
9ce0: 72 67 75 6d 65 6e 74 0a 20 20 20 20 2a 2a 20 69  rgument.    ** i
9cf0: 73 20 4e 55 4c 4c 20 6f 72 20 63 6f 6e 74 61 69  s NULL or contai
9d00: 6e 73 20 6e 6f 20 41 53 43 49 49 20 61 6c 70 68  ns no ASCII alph
9d10: 61 62 65 74 69 63 20 63 68 61 72 61 63 74 65 72  abetic character
9d20: 73 2e 20 2a 2f 0a 20 20 20 20 73 71 6c 69 74 65  s. */.    sqlite
9d30: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
9d40: 6e 74 65 78 74 2c 20 22 3f 30 30 30 22 2c 20 34  ntext, "?000", 4
9d50: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29  , SQLITE_STATIC)
9d60: 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 20 2f  ;.  }.}.#endif /
9d70: 2a 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58  * SQLITE_SOUNDEX
9d80: 20 2a 2f 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c   */..#ifndef SQL
9d90: 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58  ITE_OMIT_LOAD_EX
9da0: 54 45 4e 53 49 4f 4e 0a 2f 2a 0a 2a 2a 20 41 20  TENSION./*.** A 
9db0: 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 6c 6f  function that lo
9dc0: 61 64 73 20 61 20 73 68 61 72 65 64 2d 6c 69 62  ads a shared-lib
9dd0: 72 61 72 79 20 65 78 74 65 6e 73 69 6f 6e 20 74  rary extension t
9de0: 68 65 6e 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c  hen returns NULL
9df0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
9e00: 20 6c 6f 61 64 45 78 74 28 73 71 6c 69 74 65 33   loadExt(sqlite3
9e10: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
9e20: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
9e30: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
9e40: 76 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  v){.  const char
9e50: 20 2a 7a 46 69 6c 65 20 3d 20 28 63 6f 6e 73 74   *zFile = (const
9e60: 20 63 68 61 72 20 2a 29 73 71 6c 69 74 65 33 5f   char *)sqlite3_
9e70: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
9e80: 30 5d 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61  0]);.  const cha
9e90: 72 20 2a 7a 50 72 6f 63 3b 0a 20 20 73 71 6c 69  r *zProc;.  sqli
9ea0: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
9eb0: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
9ec0: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  dle(context);.  
9ed0: 63 68 61 72 20 2a 7a 45 72 72 4d 73 67 20 3d 20  char *zErrMsg = 
9ee0: 30 3b 0a 0a 20 20 69 66 28 20 61 72 67 63 3d 3d  0;..  if( argc==
9ef0: 32 20 29 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d  2 ){.    zProc =
9f00: 20 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 73   (const char *)s
9f10: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
9f20: 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 7d 65  t(argv[1]);.  }e
9f30: 6c 73 65 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d  lse{.    zProc =
9f40: 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 46   0;.  }.  if( zF
9f50: 69 6c 65 20 26 26 20 73 71 6c 69 74 65 33 5f 6c  ile && sqlite3_l
9f60: 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 28 64 62  oad_extension(db
9f70: 2c 20 7a 46 69 6c 65 2c 20 7a 50 72 6f 63 2c 20  , zFile, zProc, 
9f80: 26 7a 45 72 72 4d 73 67 29 20 29 7b 0a 20 20 20  &zErrMsg) ){.   
9f90: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
9fa0: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 7a  error(context, z
9fb0: 45 72 72 4d 73 67 2c 20 2d 31 29 3b 0a 20 20 20  ErrMsg, -1);.   
9fc0: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 45   sqlite3_free(zE
9fd0: 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 7d 0a 23 65  rrMsg);.  }.}.#e
9fe0: 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20  ndif.../*.** An 
9ff0: 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65 20  instance of the 
a000: 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 74  following struct
a010: 75 72 65 20 68 6f 6c 64 73 20 74 68 65 20 63 6f  ure holds the co
a020: 6e 74 65 78 74 20 6f 66 20 61 0a 2a 2a 20 73 75  ntext of a.** su
a030: 6d 28 29 20 6f 72 20 61 76 67 28 29 20 61 67 67  m() or avg() agg
a040: 72 65 67 61 74 65 20 63 6f 6d 70 75 74 61 74 69  regate computati
a050: 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73  on..*/.typedef s
a060: 74 72 75 63 74 20 53 75 6d 43 74 78 20 53 75 6d  truct SumCtx Sum
a070: 43 74 78 3b 0a 73 74 72 75 63 74 20 53 75 6d 43  Ctx;.struct SumC
a080: 74 78 20 7b 0a 20 20 64 6f 75 62 6c 65 20 72 53  tx {.  double rS
a090: 75 6d 3b 20 20 20 20 20 20 2f 2a 20 46 6c 6f 61  um;      /* Floa
a0a0: 74 69 6e 67 20 70 6f 69 6e 74 20 73 75 6d 20 2a  ting point sum *
a0b0: 2f 0a 20 20 69 36 34 20 69 53 75 6d 3b 20 20 20  /.  i64 iSum;   
a0c0: 20 20 20 20 20 20 2f 2a 20 49 6e 74 65 67 65 72        /* Integer
a0d0: 20 73 75 6d 20 2a 2f 20 20 20 0a 20 20 69 36 34   sum */   .  i64
a0e0: 20 63 6e 74 3b 20 20 20 20 20 20 20 20 20 20 2f   cnt;          /
a0f0: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 65 6c 65 6d  * Number of elem
a100: 65 6e 74 73 20 73 75 6d 6d 65 64 20 2a 2f 0a 20  ents summed */. 
a110: 20 75 38 20 6f 76 65 72 66 6c 6f 77 3b 20 20 20   u8 overflow;   
a120: 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 69 6e     /* True if in
a130: 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 20 73  teger overflow s
a140: 65 65 6e 20 2a 2f 0a 20 20 75 38 20 61 70 70 72  een */.  u8 appr
a150: 6f 78 3b 20 20 20 20 20 20 20 20 2f 2a 20 54 72  ox;        /* Tr
a160: 75 65 20 69 66 20 6e 6f 6e 2d 69 6e 74 65 67 65  ue if non-intege
a170: 72 20 76 61 6c 75 65 20 77 61 73 20 69 6e 70 75  r value was inpu
a180: 74 20 74 6f 20 74 68 65 20 73 75 6d 20 2a 2f 0a  t to the sum */.
a190: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e  };../*.** Routin
a1a0: 65 73 20 75 73 65 64 20 74 6f 20 63 6f 6d 70 75  es used to compu
a1b0: 74 65 20 74 68 65 20 73 75 6d 2c 20 61 76 65 72  te the sum, aver
a1c0: 61 67 65 2c 20 61 6e 64 20 74 6f 74 61 6c 2e 0a  age, and total..
a1d0: 2a 2a 0a 2a 2a 20 54 68 65 20 53 55 4d 28 29 20  **.** The SUM() 
a1e0: 66 75 6e 63 74 69 6f 6e 20 66 6f 6c 6c 6f 77 73  function follows
a1f0: 20 74 68 65 20 28 62 72 6f 6b 65 6e 29 20 53 51   the (broken) SQ
a200: 4c 20 73 74 61 6e 64 61 72 64 20 77 68 69 63 68  L standard which
a210: 20 6d 65 61 6e 73 0a 2a 2a 20 74 68 61 74 20 69   means.** that i
a220: 74 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 20 69  t returns NULL i
a230: 66 20 69 74 20 73 75 6d 73 20 6f 76 65 72 20 6e  f it sums over n
a240: 6f 20 69 6e 70 75 74 73 2e 20 20 54 4f 54 41 4c  o inputs.  TOTAL
a250: 20 72 65 74 75 72 6e 73 0a 2a 2a 20 30 2e 30 20   returns.** 0.0 
a260: 69 6e 20 74 68 61 74 20 63 61 73 65 2e 20 20 49  in that case.  I
a270: 6e 20 61 64 64 69 74 69 6f 6e 2c 20 54 4f 54 41  n addition, TOTA
a280: 4c 20 61 6c 77 61 79 73 20 72 65 74 75 72 6e 73  L always returns
a290: 20 61 20 66 6c 6f 61 74 20 77 68 65 72 65 0a 2a   a float where.*
a2a0: 2a 20 53 55 4d 20 6d 69 67 68 74 20 72 65 74 75  * SUM might retu
a2b0: 72 6e 20 61 6e 20 69 6e 74 65 67 65 72 20 69 66  rn an integer if
a2c0: 20 69 74 20 6e 65 76 65 72 20 65 6e 63 6f 75 6e   it never encoun
a2d0: 74 65 72 73 20 61 20 66 6c 6f 61 74 69 6e 67 20  ters a floating 
a2e0: 70 6f 69 6e 74 0a 2a 2a 20 76 61 6c 75 65 2e 20  point.** value. 
a2f0: 20 54 4f 54 41 4c 20 6e 65 76 65 72 20 66 61 69   TOTAL never fai
a300: 6c 73 2c 20 62 75 74 20 53 55 4d 20 6d 69 67 68  ls, but SUM migh
a310: 74 20 74 68 72 6f 75 67 68 20 61 6e 20 65 78 63  t through an exc
a320: 65 70 74 69 6f 6e 20 69 66 0a 2a 2a 20 69 74 20  eption if.** it 
a330: 6f 76 65 72 66 6c 6f 77 73 20 61 6e 20 69 6e 74  overflows an int
a340: 65 67 65 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  eger..*/.static 
a350: 76 6f 69 64 20 73 75 6d 53 74 65 70 28 73 71 6c  void sumStep(sql
a360: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
a370: 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c  ntext, int argc,
a380: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
a390: 2a 61 72 67 76 29 7b 0a 20 20 53 75 6d 43 74 78  *argv){.  SumCtx
a3a0: 20 2a 70 3b 0a 20 20 69 6e 74 20 74 79 70 65 3b   *p;.  int type;
a3b0: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
a3c0: 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =1 );.  UNUSED_P
a3d0: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
a3e0: 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67    p = sqlite3_ag
a3f0: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
a400: 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28  context, sizeof(
a410: 2a 70 29 29 3b 0a 20 20 74 79 70 65 20 3d 20 73  *p));.  type = s
a420: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 6e 75 6d  qlite3_value_num
a430: 65 72 69 63 5f 74 79 70 65 28 61 72 67 76 5b 30  eric_type(argv[0
a440: 5d 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20 74  ]);.  if( p && t
a450: 79 70 65 21 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  ype!=SQLITE_NULL
a460: 20 29 7b 0a 20 20 20 20 70 2d 3e 63 6e 74 2b 2b   ){.    p->cnt++
a470: 3b 0a 20 20 20 20 69 66 28 20 74 79 70 65 3d 3d  ;.    if( type==
a480: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 20 29  SQLITE_INTEGER )
a490: 7b 0a 20 20 20 20 20 20 69 36 34 20 76 20 3d 20  {.      i64 v = 
a4a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
a4b0: 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  t64(argv[0]);.  
a4c0: 20 20 20 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 76      p->rSum += v
a4d0: 3b 0a 20 20 20 20 20 20 69 66 28 20 28 70 2d 3e  ;.      if( (p->
a4e0: 61 70 70 72 6f 78 7c 70 2d 3e 6f 76 65 72 66 6c  approx|p->overfl
a4f0: 6f 77 29 3d 3d 30 20 26 26 20 73 71 6c 69 74 65  ow)==0 && sqlite
a500: 33 41 64 64 49 6e 74 36 34 28 26 70 2d 3e 69 53  3AddInt64(&p->iS
a510: 75 6d 2c 20 76 29 20 29 7b 0a 20 20 20 20 20 20  um, v) ){.      
a520: 20 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20 3d 20    p->overflow = 
a530: 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  1;.      }.    }
a540: 65 6c 73 65 7b 0a 20 20 20 20 20 20 70 2d 3e 72  else{.      p->r
a550: 53 75 6d 20 2b 3d 20 73 71 6c 69 74 65 33 5f 76  Sum += sqlite3_v
a560: 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67 76  alue_double(argv
a570: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e 61  [0]);.      p->a
a580: 70 70 72 6f 78 20 3d 20 31 3b 0a 20 20 20 20 7d  pprox = 1;.    }
a590: 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f  .  }.}.static vo
a5a0: 69 64 20 73 75 6d 46 69 6e 61 6c 69 7a 65 28 73  id sumFinalize(s
a5b0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
a5c0: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d 43  context){.  SumC
a5d0: 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c  tx *p;.  p = sql
a5e0: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
a5f0: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
a600: 30 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20 70  0);.  if( p && p
a610: 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20 20 69  ->cnt>0 ){.    i
a620: 66 28 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20 29  f( p->overflow )
a630: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
a640: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
a650: 74 65 78 74 2c 22 69 6e 74 65 67 65 72 20 6f 76  text,"integer ov
a660: 65 72 66 6c 6f 77 22 2c 2d 31 29 3b 0a 20 20 20  erflow",-1);.   
a670: 20 7d 65 6c 73 65 20 69 66 28 20 70 2d 3e 61 70   }else if( p->ap
a680: 70 72 6f 78 20 29 7b 0a 20 20 20 20 20 20 73 71  prox ){.      sq
a690: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75  lite3_result_dou
a6a0: 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e  ble(context, p->
a6b0: 72 53 75 6d 29 3b 0a 20 20 20 20 7d 65 6c 73 65  rSum);.    }else
a6c0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
a6d0: 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e  result_int64(con
a6e0: 74 65 78 74 2c 20 70 2d 3e 69 53 75 6d 29 3b 0a  text, p->iSum);.
a6f0: 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74      }.  }.}.stat
a700: 69 63 20 76 6f 69 64 20 61 76 67 46 69 6e 61 6c  ic void avgFinal
a710: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
a720: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
a730: 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20   SumCtx *p;.  p 
a740: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
a750: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
a760: 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70  ext, 0);.  if( p
a770: 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a   && p->cnt>0 ){.
a780: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
a790: 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78  lt_double(contex
a7a0: 74 2c 20 70 2d 3e 72 53 75 6d 2f 28 64 6f 75 62  t, p->rSum/(doub
a7b0: 6c 65 29 70 2d 3e 63 6e 74 29 3b 0a 20 20 7d 0a  le)p->cnt);.  }.
a7c0: 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f  }.static void to
a7d0: 74 61 6c 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69  talFinalize(sqli
a7e0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
a7f0: 74 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20  text){.  SumCtx 
a800: 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65  *p;.  p = sqlite
a810: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
a820: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b  ext(context, 0);
a830: 0a 20 20 2f 2a 20 28 64 6f 75 62 6c 65 29 30 20  .  /* (double)0 
a840: 49 6e 20 63 61 73 65 20 6f 66 20 53 51 4c 49 54  In case of SQLIT
a850: 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f  E_OMIT_FLOATING_
a860: 50 4f 49 4e 54 2e 2e 2e 20 2a 2f 0a 20 20 73 71  POINT... */.  sq
a870: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75  lite3_result_dou
a880: 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 20 3f  ble(context, p ?
a890: 20 70 2d 3e 72 53 75 6d 20 3a 20 28 64 6f 75 62   p->rSum : (doub
a8a0: 6c 65 29 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  le)0);.}../*.** 
a8b0: 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74  The following st
a8c0: 72 75 63 74 75 72 65 20 6b 65 65 70 73 20 74 72  ructure keeps tr
a8d0: 61 63 6b 20 6f 66 20 73 74 61 74 65 20 69 6e 66  ack of state inf
a8e0: 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68 65  ormation for the
a8f0: 0a 2a 2a 20 63 6f 75 6e 74 28 29 20 61 67 67 72  .** count() aggr
a900: 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a  egate function..
a910: 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75 63  */.typedef struc
a920: 74 20 43 6f 75 6e 74 43 74 78 20 43 6f 75 6e 74  t CountCtx Count
a930: 43 74 78 3b 0a 73 74 72 75 63 74 20 43 6f 75 6e  Ctx;.struct Coun
a940: 74 43 74 78 20 7b 0a 20 20 69 36 34 20 6e 3b 0a  tCtx {.  i64 n;.
a950: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e  };../*.** Routin
a960: 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20  es to implement 
a970: 74 68 65 20 63 6f 75 6e 74 28 29 20 61 67 67 72  the count() aggr
a980: 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a  egate function..
a990: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63  */.static void c
a9a0: 6f 75 6e 74 53 74 65 70 28 73 71 6c 69 74 65 33  ountStep(sqlite3
a9b0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
a9c0: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
a9d0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
a9e0: 76 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a  v){.  CountCtx *
a9f0: 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  p;.  p = sqlite3
aa00: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
aa10: 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65  xt(context, size
aa20: 6f 66 28 2a 70 29 29 3b 0a 20 20 69 66 28 20 28  of(*p));.  if( (
aa30: 61 72 67 63 3d 3d 30 20 7c 7c 20 53 51 4c 49 54  argc==0 || SQLIT
aa40: 45 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f  E_NULL!=sqlite3_
aa50: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
aa60: 30 5d 29 29 20 26 26 20 70 20 29 7b 0a 20 20 20  0])) && p ){.   
aa70: 20 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a 0a 23 69   p->n++;.  }..#i
aa80: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
aa90: 54 5f 44 45 50 52 45 43 41 54 45 44 0a 20 20 2f  T_DEPRECATED.  /
aaa0: 2a 20 54 68 65 20 73 71 6c 69 74 65 33 5f 61 67  * The sqlite3_ag
aab0: 67 72 65 67 61 74 65 5f 63 6f 75 6e 74 28 29 20  gregate_count() 
aac0: 66 75 6e 63 74 69 6f 6e 20 69 73 20 64 65 70 72  function is depr
aad0: 65 63 61 74 65 64 2e 20 20 42 75 74 20 6a 75 73  ecated.  But jus
aae0: 74 20 74 6f 20 6d 61 6b 65 0a 20 20 2a 2a 20 73  t to make.  ** s
aaf0: 75 72 65 20 69 74 20 73 74 69 6c 6c 20 6f 70 65  ure it still ope
ab00: 72 61 74 65 73 20 63 6f 72 72 65 63 74 6c 79 2c  rates correctly,
ab10: 20 76 65 72 69 66 79 20 74 68 61 74 20 69 74 73   verify that its
ab20: 20 63 6f 75 6e 74 20 61 67 72 65 65 73 20 77 69   count agrees wi
ab30: 74 68 20 6f 75 72 20 0a 20 20 2a 2a 20 69 6e 74  th our .  ** int
ab40: 65 72 6e 61 6c 20 63 6f 75 6e 74 20 77 68 65 6e  ernal count when
ab50: 20 75 73 69 6e 67 20 63 6f 75 6e 74 28 2a 29 20   using count(*) 
ab60: 61 6e 64 20 77 68 65 6e 20 74 68 65 20 74 6f 74  and when the tot
ab70: 61 6c 20 63 6f 75 6e 74 20 63 61 6e 20 62 65 0a  al count can be.
ab80: 20 20 2a 2a 20 65 78 70 72 65 73 73 65 64 20 61    ** expressed a
ab90: 73 20 61 20 33 32 2d 62 69 74 20 69 6e 74 65 67  s a 32-bit integ
aba0: 65 72 2e 20 2a 2f 0a 20 20 61 73 73 65 72 74 28  er. */.  assert(
abb0: 20 61 72 67 63 3d 3d 31 20 7c 7c 20 70 3d 3d 30   argc==1 || p==0
abc0: 20 7c 7c 20 70 2d 3e 6e 3e 30 78 37 66 66 66 66   || p->n>0x7ffff
abd0: 66 66 66 0a 20 20 20 20 20 20 20 20 20 20 7c 7c  fff.          ||
abe0: 20 70 2d 3e 6e 3d 3d 73 71 6c 69 74 65 33 5f 61   p->n==sqlite3_a
abf0: 67 67 72 65 67 61 74 65 5f 63 6f 75 6e 74 28 63  ggregate_count(c
ac00: 6f 6e 74 65 78 74 29 20 29 3b 0a 23 65 6e 64 69  ontext) );.#endi
ac10: 66 0a 7d 20 20 20 0a 73 74 61 74 69 63 20 76 6f  f.}   .static vo
ac20: 69 64 20 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65  id countFinalize
ac30: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
ac40: 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 43 6f   *context){.  Co
ac50: 75 6e 74 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d  untCtx *p;.  p =
ac60: 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61   sqlite3_aggrega
ac70: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
ac80: 78 74 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65  xt, 0);.  sqlite
ac90: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63  3_result_int64(c
aca0: 6f 6e 74 65 78 74 2c 20 70 20 3f 20 70 2d 3e 6e  ontext, p ? p->n
acb0: 20 3a 20 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20   : 0);.}../*.** 
acc0: 52 6f 75 74 69 6e 65 73 20 74 6f 20 69 6d 70 6c  Routines to impl
acd0: 65 6d 65 6e 74 20 6d 69 6e 28 29 20 61 6e 64 20  ement min() and 
ace0: 6d 61 78 28 29 20 61 67 67 72 65 67 61 74 65 20  max() aggregate 
acf0: 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74  functions..*/.st
ad00: 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78  atic void minmax
ad10: 53 74 65 70 28 0a 20 20 73 71 6c 69 74 65 33 5f  Step(.  sqlite3_
ad20: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
ad30: 2c 20 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64  , .  int NotUsed
ad40: 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  , .  sqlite3_val
ad50: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 4d  ue **argv.){.  M
ad60: 65 6d 20 2a 70 41 72 67 20 20 3d 20 28 4d 65 6d  em *pArg  = (Mem
ad70: 20 2a 29 61 72 67 76 5b 30 5d 3b 0a 20 20 4d 65   *)argv[0];.  Me
ad80: 6d 20 2a 70 42 65 73 74 3b 0a 20 20 55 4e 55 53  m *pBest;.  UNUS
ad90: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f 74  ED_PARAMETER(Not
ada0: 55 73 65 64 29 3b 0a 0a 20 20 70 42 65 73 74 20  Used);..  pBest 
adb0: 3d 20 28 4d 65 6d 20 2a 29 73 71 6c 69 74 65 33  = (Mem *)sqlite3
adc0: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
add0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65  xt(context, size
ade0: 6f 66 28 2a 70 42 65 73 74 29 29 3b 0a 20 20 69  of(*pBest));.  i
adf0: 66 28 20 21 70 42 65 73 74 20 29 20 72 65 74 75  f( !pBest ) retu
ae00: 72 6e 3b 0a 0a 20 20 69 66 28 20 73 71 6c 69 74  rn;..  if( sqlit
ae10: 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72  e3_value_type(ar
ae20: 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e  gv[0])==SQLITE_N
ae30: 55 4c 4c 20 29 7b 0a 20 20 20 20 69 66 28 20 70  ULL ){.    if( p
ae40: 42 65 73 74 2d 3e 66 6c 61 67 73 20 29 20 73 71  Best->flags ) sq
ae50: 6c 69 74 65 33 53 6b 69 70 41 63 63 75 6d 75 6c  lite3SkipAccumul
ae60: 61 74 6f 72 4c 6f 61 64 28 63 6f 6e 74 65 78 74  atorLoad(context
ae70: 29 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 70  );.  }else if( p
ae80: 42 65 73 74 2d 3e 66 6c 61 67 73 20 29 7b 0a 20  Best->flags ){. 
ae90: 20 20 20 69 6e 74 20 6d 61 78 3b 0a 20 20 20 20     int max;.    
aea0: 69 6e 74 20 63 6d 70 3b 0a 20 20 20 20 43 6f 6c  int cmp;.    Col
aeb0: 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73 71  lSeq *pColl = sq
aec0: 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c  lite3GetFuncColl
aed0: 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  Seq(context);.  
aee0: 20 20 2f 2a 20 54 68 69 73 20 73 74 65 70 20 66    /* This step f
aef0: 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64 20  unction is used 
af00: 66 6f 72 20 62 6f 74 68 20 74 68 65 20 6d 69 6e  for both the min
af10: 28 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67 67  () and max() agg
af20: 72 65 67 61 74 65 73 2c 0a 20 20 20 20 2a 2a 20  regates,.    ** 
af30: 74 68 65 20 6f 6e 6c 79 20 64 69 66 66 65 72 65  the only differe
af40: 6e 63 65 20 62 65 74 77 65 65 6e 20 74 68 65 20  nce between the 
af50: 74 77 6f 20 62 65 69 6e 67 20 74 68 61 74 20 74  two being that t
af60: 68 65 20 73 65 6e 73 65 20 6f 66 20 74 68 65 0a  he sense of the.
af70: 20 20 20 20 2a 2a 20 63 6f 6d 70 61 72 69 73 6f      ** compariso
af80: 6e 20 69 73 20 69 6e 76 65 72 74 65 64 2e 20 46  n is inverted. F
af90: 6f 72 20 74 68 65 20 6d 61 78 28 29 20 61 67 67  or the max() agg
afa0: 72 65 67 61 74 65 2c 20 74 68 65 0a 20 20 20 20  regate, the.    
afb0: 2a 2a 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f  ** sqlite3_user_
afc0: 64 61 74 61 28 29 20 66 75 6e 63 74 69 6f 6e 20  data() function 
afd0: 72 65 74 75 72 6e 73 20 28 76 6f 69 64 20 2a 29  returns (void *)
afe0: 2d 31 2e 20 46 6f 72 20 6d 69 6e 28 29 20 69 74  -1. For min() it
aff0: 0a 20 20 20 20 2a 2a 20 72 65 74 75 72 6e 73 20  .    ** returns 
b000: 28 76 6f 69 64 20 2a 29 64 62 2c 20 77 68 65 72  (void *)db, wher
b010: 65 20 64 62 20 69 73 20 74 68 65 20 73 71 6c 69  e db is the sqli
b020: 74 65 33 2a 20 64 61 74 61 62 61 73 65 20 70 6f  te3* database po
b030: 69 6e 74 65 72 2e 0a 20 20 20 20 2a 2a 20 54 68  inter..    ** Th
b040: 65 72 65 66 6f 72 65 20 74 68 65 20 6e 65 78 74  erefore the next
b050: 20 73 74 61 74 65 6d 65 6e 74 20 73 65 74 73 20   statement sets 
b060: 76 61 72 69 61 62 6c 65 20 27 6d 61 78 27 20 74  variable 'max' t
b070: 6f 20 31 20 66 6f 72 20 74 68 65 20 6d 61 78 28  o 1 for the max(
b080: 29 0a 20 20 20 20 2a 2a 20 61 67 67 72 65 67 61  ).    ** aggrega
b090: 74 65 2c 20 6f 72 20 30 20 66 6f 72 20 6d 69 6e  te, or 0 for min
b0a0: 28 29 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 6d  ()..    */.    m
b0b0: 61 78 20 3d 20 73 71 6c 69 74 65 33 5f 75 73 65  ax = sqlite3_use
b0c0: 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 21  r_data(context)!
b0d0: 3d 30 3b 0a 20 20 20 20 63 6d 70 20 3d 20 73 71  =0;.    cmp = sq
b0e0: 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28  lite3MemCompare(
b0f0: 70 42 65 73 74 2c 20 70 41 72 67 2c 20 70 43 6f  pBest, pArg, pCo
b100: 6c 6c 29 3b 0a 20 20 20 20 69 66 28 20 28 6d 61  ll);.    if( (ma
b110: 78 20 26 26 20 63 6d 70 3c 30 29 20 7c 7c 20 28  x && cmp<0) || (
b120: 21 6d 61 78 20 26 26 20 63 6d 70 3e 30 29 20 29  !max && cmp>0) )
b130: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 56  {.      sqlite3V
b140: 64 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74  dbeMemCopy(pBest
b150: 2c 20 70 41 72 67 29 3b 0a 20 20 20 20 7d 65 6c  , pArg);.    }el
b160: 73 65 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  se{.      sqlite
b170: 33 53 6b 69 70 41 63 63 75 6d 75 6c 61 74 6f 72  3SkipAccumulator
b180: 4c 6f 61 64 28 63 6f 6e 74 65 78 74 29 3b 0a 20  Load(context);. 
b190: 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20     }.  }else{.  
b1a0: 20 20 70 42 65 73 74 2d 3e 64 62 20 3d 20 73 71    pBest->db = sq
b1b0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62  lite3_context_db
b1c0: 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29  _handle(context)
b1d0: 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 56 64 62  ;.    sqlite3Vdb
b1e0: 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74 2c 20  eMemCopy(pBest, 
b1f0: 70 41 72 67 29 3b 0a 20 20 7d 0a 7d 0a 73 74 61  pArg);.  }.}.sta
b200: 74 69 63 20 76 6f 69 64 20 6d 69 6e 4d 61 78 46  tic void minMaxF
b210: 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f  inalize(sqlite3_
b220: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
b230: 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  ){.  sqlite3_val
b240: 75 65 20 2a 70 52 65 73 3b 0a 20 20 70 52 65 73  ue *pRes;.  pRes
b250: 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 61 6c 75   = (sqlite3_valu
b260: 65 20 2a 29 73 71 6c 69 74 65 33 5f 61 67 67 72  e *)sqlite3_aggr
b270: 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f  egate_context(co
b280: 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28  ntext, 0);.  if(
b290: 20 70 52 65 73 20 29 7b 0a 20 20 20 20 69 66 28   pRes ){.    if(
b2a0: 20 70 52 65 73 2d 3e 66 6c 61 67 73 20 29 7b 0a   pRes->flags ){.
b2b0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
b2c0: 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65  sult_value(conte
b2d0: 78 74 2c 20 70 52 65 73 29 3b 0a 20 20 20 20 7d  xt, pRes);.    }
b2e0: 0a 20 20 20 20 73 71 6c 69 74 65 33 56 64 62 65  .    sqlite3Vdbe
b2f0: 4d 65 6d 52 65 6c 65 61 73 65 28 70 52 65 73 29  MemRelease(pRes)
b300: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 67  ;.  }.}../*.** g
b310: 72 6f 75 70 5f 63 6f 6e 63 61 74 28 45 58 50 52  roup_concat(EXPR
b320: 2c 20 3f 53 45 50 41 52 41 54 4f 52 3f 29 0a 2a  , ?SEPARATOR?).*
b330: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 67 72  /.static void gr
b340: 6f 75 70 43 6f 6e 63 61 74 53 74 65 70 28 0a 20  oupConcatStep(. 
b350: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
b360: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
b370: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
b380: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
b390: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
b3a0: 56 61 6c 3b 0a 20 20 53 74 72 41 63 63 75 6d 20  Val;.  StrAccum 
b3b0: 2a 70 41 63 63 75 6d 3b 0a 20 20 63 6f 6e 73 74  *pAccum;.  const
b3c0: 20 63 68 61 72 20 2a 7a 53 65 70 3b 0a 20 20 69   char *zSep;.  i
b3d0: 6e 74 20 6e 56 61 6c 2c 20 6e 53 65 70 3b 0a 20  nt nVal, nSep;. 
b3e0: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
b3f0: 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a 20   || argc==2 );. 
b400: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
b410: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
b420: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20  ==SQLITE_NULL ) 
b430: 72 65 74 75 72 6e 3b 0a 20 20 70 41 63 63 75 6d  return;.  pAccum
b440: 20 3d 20 28 53 74 72 41 63 63 75 6d 2a 29 73 71   = (StrAccum*)sq
b450: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
b460: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
b470: 20 73 69 7a 65 6f 66 28 2a 70 41 63 63 75 6d 29   sizeof(*pAccum)
b480: 29 3b 0a 0a 20 20 69 66 28 20 70 41 63 63 75 6d  );..  if( pAccum
b490: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 20   ){.    sqlite3 
b4a0: 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  *db = sqlite3_co
b4b0: 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28  ntext_db_handle(
b4c0: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 69 6e  context);.    in
b4d0: 74 20 66 69 72 73 74 54 65 72 6d 20 3d 20 70 41  t firstTerm = pA
b4e0: 63 63 75 6d 2d 3e 75 73 65 4d 61 6c 6c 6f 63 3d  ccum->useMalloc=
b4f0: 3d 30 3b 0a 20 20 20 20 70 41 63 63 75 6d 2d 3e  =0;.    pAccum->
b500: 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 32 3b 0a 20  useMalloc = 2;. 
b510: 20 20 20 70 41 63 63 75 6d 2d 3e 6d 78 41 6c 6c     pAccum->mxAll
b520: 6f 63 20 3d 20 64 62 2d 3e 61 4c 69 6d 69 74 5b  oc = db->aLimit[
b530: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e  SQLITE_LIMIT_LEN
b540: 47 54 48 5d 3b 0a 20 20 20 20 69 66 28 20 21 66  GTH];.    if( !f
b550: 69 72 73 74 54 65 72 6d 20 29 7b 0a 20 20 20 20  irstTerm ){.    
b560: 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29 7b    if( argc==2 ){
b570: 0a 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d 20  .        zSep = 
b580: 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76  (char*)sqlite3_v
b590: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31  alue_text(argv[1
b5a0: 5d 29 3b 0a 20 20 20 20 20 20 20 20 6e 53 65 70  ]);.        nSep
b5b0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
b5c0: 5f 62 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b  _bytes(argv[1]);
b5d0: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
b5e0: 20 20 20 20 20 20 7a 53 65 70 20 3d 20 22 2c 22        zSep = ","
b5f0: 3b 0a 20 20 20 20 20 20 20 20 6e 53 65 70 20 3d  ;.        nSep =
b600: 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   1;.      }.    
b610: 20 20 69 66 28 20 6e 53 65 70 20 29 20 73 71 6c    if( nSep ) sql
b620: 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 65  ite3StrAccumAppe
b630: 6e 64 28 70 41 63 63 75 6d 2c 20 7a 53 65 70 2c  nd(pAccum, zSep,
b640: 20 6e 53 65 70 29 3b 0a 20 20 20 20 7d 0a 20 20   nSep);.    }.  
b650: 20 20 7a 56 61 6c 20 3d 20 28 63 68 61 72 2a 29    zVal = (char*)
b660: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
b670: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20  xt(argv[0]);.   
b680: 20 6e 56 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f   nVal = sqlite3_
b690: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
b6a0: 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 56  [0]);.    if( zV
b6b0: 61 6c 20 29 20 73 71 6c 69 74 65 33 53 74 72 41  al ) sqlite3StrA
b6c0: 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75  ccumAppend(pAccu
b6d0: 6d 2c 20 7a 56 61 6c 2c 20 6e 56 61 6c 29 3b 0a  m, zVal, nVal);.
b6e0: 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69    }.}.static voi
b6f0: 64 20 67 72 6f 75 70 43 6f 6e 63 61 74 46 69 6e  d groupConcatFin
b700: 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f  alize(sqlite3_co
b710: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b  ntext *context){
b720: 0a 20 20 53 74 72 41 63 63 75 6d 20 2a 70 41 63  .  StrAccum *pAc
b730: 63 75 6d 3b 0a 20 20 70 41 63 63 75 6d 20 3d 20  cum;.  pAccum = 
b740: 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74  sqlite3_aggregat
b750: 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78  e_context(contex
b760: 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 41 63  t, 0);.  if( pAc
b770: 63 75 6d 20 29 7b 0a 20 20 20 20 69 66 28 20 70  cum ){.    if( p
b780: 41 63 63 75 6d 2d 3e 61 63 63 45 72 72 6f 72 3d  Accum->accError=
b790: 3d 53 54 52 41 43 43 55 4d 5f 54 4f 4f 42 49 47  =STRACCUM_TOOBIG
b7a0: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
b7b0: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74  3_result_error_t
b7c0: 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a  oobig(context);.
b7d0: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 70 41      }else if( pA
b7e0: 63 63 75 6d 2d 3e 61 63 63 45 72 72 6f 72 3d 3d  ccum->accError==
b7f0: 53 54 52 41 43 43 55 4d 5f 4e 4f 4d 45 4d 20 29  STRACCUM_NOMEM )
b800: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
b810: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d  result_error_nom
b820: 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  em(context);.   
b830: 20 7d 65 6c 73 65 7b 20 20 20 20 0a 20 20 20 20   }else{    .    
b840: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
b850: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  _text(context, s
b860: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69  qlite3StrAccumFi
b870: 6e 69 73 68 28 70 41 63 63 75 6d 29 2c 20 2d 31  nish(pAccum), -1
b880: 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  , .             
b890: 20 20 20 20 20 20 20 20 20 20 20 20 20 73 71 6c               sql
b8a0: 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20  ite3_free);.    
b8b0: 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  }.  }.}../*.** T
b8c0: 68 69 73 20 72 6f 75 74 69 6e 65 20 64 6f 65 73  his routine does
b8d0: 20 70 65 72 2d 63 6f 6e 6e 65 63 74 69 6f 6e 20   per-connection 
b8e0: 66 75 6e 63 74 69 6f 6e 20 72 65 67 69 73 74 72  function registr
b8f0: 61 74 69 6f 6e 2e 20 20 4d 6f 73 74 0a 2a 2a 20  ation.  Most.** 
b900: 6f 66 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20  of the built-in 
b910: 66 75 6e 63 74 69 6f 6e 73 20 61 62 6f 76 65 20  functions above 
b920: 61 72 65 20 70 61 72 74 20 6f 66 20 74 68 65 20  are part of the 
b930: 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f 6e 20  global function 
b940: 73 65 74 2e 0a 2a 2a 20 54 68 69 73 20 72 6f 75  set..** This rou
b950: 74 69 6e 65 20 6f 6e 6c 79 20 64 65 61 6c 73 20  tine only deals 
b960: 77 69 74 68 20 74 68 6f 73 65 20 74 68 61 74 20  with those that 
b970: 61 72 65 20 6e 6f 74 20 67 6c 6f 62 61 6c 2e 0a  are not global..
b980: 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52  */.void sqlite3R
b990: 65 67 69 73 74 65 72 42 75 69 6c 74 69 6e 46 75  egisterBuiltinFu
b9a0: 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65 33 20  nctions(sqlite3 
b9b0: 2a 64 62 29 7b 0a 20 20 69 6e 74 20 72 63 20 3d  *db){.  int rc =
b9c0: 20 73 71 6c 69 74 65 33 5f 6f 76 65 72 6c 6f 61   sqlite3_overloa
b9d0: 64 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22  d_function(db, "
b9e0: 4d 41 54 43 48 22 2c 20 32 29 3b 0a 20 20 61 73  MATCH", 2);.  as
b9f0: 73 65 72 74 28 20 72 63 3d 3d 53 51 4c 49 54 45  sert( rc==SQLITE
ba00: 5f 4e 4f 4d 45 4d 20 7c 7c 20 72 63 3d 3d 53 51  _NOMEM || rc==SQ
ba10: 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20 20 69 66 28  LITE_OK );.  if(
ba20: 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f 4d 45   rc==SQLITE_NOME
ba30: 4d 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d 61 6c  M ){.    db->mal
ba40: 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b 0a 20  locFailed = 1;. 
ba50: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20   }.}../*.** Set 
ba60: 74 68 65 20 4c 49 4b 45 4f 50 54 20 66 6c 61 67  the LIKEOPT flag
ba70: 20 6f 6e 20 74 68 65 20 32 2d 61 72 67 75 6d 65   on the 2-argume
ba80: 6e 74 20 66 75 6e 63 74 69 6f 6e 20 77 69 74 68  nt function with
ba90: 20 74 68 65 20 67 69 76 65 6e 20 6e 61 6d 65 2e   the given name.
baa0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
bab0: 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 73  setLikeOptFlag(s
bac0: 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73  qlite3 *db, cons
bad0: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 75  t char *zName, u
bae0: 38 20 66 6c 61 67 56 61 6c 29 7b 0a 20 20 46 75  8 flagVal){.  Fu
baf0: 6e 63 44 65 66 20 2a 70 44 65 66 3b 0a 20 20 70  ncDef *pDef;.  p
bb00: 44 65 66 20 3d 20 73 71 6c 69 74 65 33 46 69 6e  Def = sqlite3Fin
bb10: 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20 7a 4e  dFunction(db, zN
bb20: 61 6d 65 2c 20 73 71 6c 69 74 65 33 53 74 72 6c  ame, sqlite3Strl
bb30: 65 6e 33 30 28 7a 4e 61 6d 65 29 2c 0a 20 20 20  en30(zName),.   
bb40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
bb50: 20 20 20 20 20 20 20 20 20 20 32 2c 20 53 51 4c            2, SQL
bb60: 49 54 45 5f 55 54 46 38 2c 20 30 29 3b 0a 20 20  ITE_UTF8, 0);.  
bb70: 69 66 28 20 41 4c 57 41 59 53 28 70 44 65 66 29  if( ALWAYS(pDef)
bb80: 20 29 7b 0a 20 20 20 20 70 44 65 66 2d 3e 66 75   ){.    pDef->fu
bb90: 6e 63 46 6c 61 67 73 20 7c 3d 20 66 6c 61 67 56  ncFlags |= flagV
bba0: 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  al;.  }.}../*.**
bbb0: 20 52 65 67 69 73 74 65 72 20 74 68 65 20 62 75   Register the bu
bbc0: 69 6c 74 2d 69 6e 20 4c 49 4b 45 20 61 6e 64 20  ilt-in LIKE and 
bbd0: 47 4c 4f 42 20 66 75 6e 63 74 69 6f 6e 73 2e 20  GLOB functions. 
bbe0: 20 54 68 65 20 63 61 73 65 53 65 6e 73 69 74 69   The caseSensiti
bbf0: 76 65 0a 2a 2a 20 70 61 72 61 6d 65 74 65 72 20  ve.** parameter 
bc00: 64 65 74 65 72 6d 69 6e 65 73 20 77 68 65 74 68  determines wheth
bc10: 65 72 20 6f 72 20 6e 6f 74 20 74 68 65 20 4c 49  er or not the LI
bc20: 4b 45 20 6f 70 65 72 61 74 6f 72 20 69 73 20 63  KE operator is c
bc30: 61 73 65 0a 2a 2a 20 73 65 6e 73 69 74 69 76 65  ase.** sensitive
bc40: 2e 20 20 47 4c 4f 42 20 69 73 20 61 6c 77 61 79  .  GLOB is alway
bc50: 73 20 63 61 73 65 20 73 65 6e 73 69 74 69 76 65  s case sensitive
bc60: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65  ..*/.void sqlite
bc70: 33 52 65 67 69 73 74 65 72 4c 69 6b 65 46 75 6e  3RegisterLikeFun
bc80: 63 74 69 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a  ctions(sqlite3 *
bc90: 64 62 2c 20 69 6e 74 20 63 61 73 65 53 65 6e 73  db, int caseSens
bca0: 69 74 69 76 65 29 7b 0a 20 20 73 74 72 75 63 74  itive){.  struct
bcb0: 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70 49   compareInfo *pI
bcc0: 6e 66 6f 3b 0a 20 20 69 66 28 20 63 61 73 65 53  nfo;.  if( caseS
bcd0: 65 6e 73 69 74 69 76 65 20 29 7b 0a 20 20 20 20  ensitive ){.    
bce0: 70 49 6e 66 6f 20 3d 20 28 73 74 72 75 63 74 20  pInfo = (struct 
bcf0: 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26 6c 69  compareInfo*)&li
bd00: 6b 65 49 6e 66 6f 41 6c 74 3b 0a 20 20 7d 65 6c  keInfoAlt;.  }el
bd10: 73 65 7b 0a 20 20 20 20 70 49 6e 66 6f 20 3d 20  se{.    pInfo = 
bd20: 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49  (struct compareI
bd30: 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66 6f 4e 6f  nfo*)&likeInfoNo
bd40: 72 6d 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  rm;.  }.  sqlite
bd50: 33 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c 20  3CreateFunc(db, 
bd60: 22 6c 69 6b 65 22 2c 20 32 2c 20 53 51 4c 49 54  "like", 2, SQLIT
bd70: 45 5f 55 54 46 38 2c 20 70 49 6e 66 6f 2c 20 6c  E_UTF8, pInfo, l
bd80: 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30 2c 20 30  ikeFunc, 0, 0, 0
bd90: 29 3b 0a 20 20 73 71 6c 69 74 65 33 43 72 65 61  );.  sqlite3Crea
bda0: 74 65 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b 65  teFunc(db, "like
bdb0: 22 2c 20 33 2c 20 53 51 4c 49 54 45 5f 55 54 46  ", 3, SQLITE_UTF
bdc0: 38 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46 75  8, pInfo, likeFu
bdd0: 6e 63 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20  nc, 0, 0, 0);.  
bde0: 73 71 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e  sqlite3CreateFun
bdf0: 63 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20 32 2c  c(db, "glob", 2,
be00: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 0a 20   SQLITE_UTF8, . 
be10: 20 20 20 20 20 28 73 74 72 75 63 74 20 63 6f 6d       (struct com
be20: 70 61 72 65 49 6e 66 6f 2a 29 26 67 6c 6f 62 49  pareInfo*)&globI
be30: 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30  nfo, likeFunc, 0
be40: 2c 20 30 2c 20 30 29 3b 0a 20 20 73 65 74 4c 69  , 0, 0);.  setLi
be50: 6b 65 4f 70 74 46 6c 61 67 28 64 62 2c 20 22 67  keOptFlag(db, "g
be60: 6c 6f 62 22 2c 20 53 51 4c 49 54 45 5f 46 55 4e  lob", SQLITE_FUN
be70: 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49 54 45 5f  C_LIKE | SQLITE_
be80: 46 55 4e 43 5f 43 41 53 45 29 3b 0a 20 20 73 65  FUNC_CASE);.  se
be90: 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 64 62 2c  tLikeOptFlag(db,
bea0: 20 22 6c 69 6b 65 22 2c 20 0a 20 20 20 20 20 20   "like", .      
beb0: 63 61 73 65 53 65 6e 73 69 74 69 76 65 20 3f 20  caseSensitive ? 
bec0: 28 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b  (SQLITE_FUNC_LIK
bed0: 45 20 7c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  E | SQLITE_FUNC_
bee0: 43 41 53 45 29 20 3a 20 53 51 4c 49 54 45 5f 46  CASE) : SQLITE_F
bef0: 55 4e 43 5f 4c 49 4b 45 29 3b 0a 7d 0a 0a 2f 2a  UNC_LIKE);.}../*
bf00: 0a 2a 2a 20 70 45 78 70 72 20 70 6f 69 6e 74 73  .** pExpr points
bf10: 20 74 6f 20 61 6e 20 65 78 70 72 65 73 73 69 6f   to an expressio
bf20: 6e 20 77 68 69 63 68 20 69 6d 70 6c 65 6d 65 6e  n which implemen
bf30: 74 73 20 61 20 66 75 6e 63 74 69 6f 6e 2e 20 20  ts a function.  
bf40: 49 66 0a 2a 2a 20 69 74 20 69 73 20 61 70 70 72  If.** it is appr
bf50: 6f 70 72 69 61 74 65 20 74 6f 20 61 70 70 6c 79  opriate to apply
bf60: 20 74 68 65 20 4c 49 4b 45 20 6f 70 74 69 6d 69   the LIKE optimi
bf70: 7a 61 74 69 6f 6e 20 74 6f 20 74 68 61 74 20 66  zation to that f
bf80: 75 6e 63 74 69 6f 6e 0a 2a 2a 20 74 68 65 6e 20  unction.** then 
bf90: 73 65 74 20 61 57 63 5b 30 5d 20 74 68 72 6f 75  set aWc[0] throu
bfa0: 67 68 20 61 57 63 5b 32 5d 20 74 6f 20 74 68 65  gh aWc[2] to the
bfb0: 20 77 69 6c 64 63 61 72 64 20 63 68 61 72 61 63   wildcard charac
bfc0: 74 65 72 73 20 61 6e 64 0a 2a 2a 20 72 65 74 75  ters and.** retu
bfd0: 72 6e 20 54 52 55 45 2e 20 20 49 66 20 74 68 65  rn TRUE.  If the
bfe0: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6e 6f 74   function is not
bff0: 20 61 20 4c 49 4b 45 2d 73 74 79 6c 65 20 66 75   a LIKE-style fu
c000: 6e 63 74 69 6f 6e 20 74 68 65 6e 0a 2a 2a 20 72  nction then.** r
c010: 65 74 75 72 6e 20 46 41 4c 53 45 2e 0a 2a 2f 0a  eturn FALSE..*/.
c020: 69 6e 74 20 73 71 6c 69 74 65 33 49 73 4c 69 6b  int sqlite3IsLik
c030: 65 46 75 6e 63 74 69 6f 6e 28 73 71 6c 69 74 65  eFunction(sqlite
c040: 33 20 2a 64 62 2c 20 45 78 70 72 20 2a 70 45 78  3 *db, Expr *pEx
c050: 70 72 2c 20 69 6e 74 20 2a 70 49 73 4e 6f 63 61  pr, int *pIsNoca
c060: 73 65 2c 20 63 68 61 72 20 2a 61 57 63 29 7b 0a  se, char *aWc){.
c070: 20 20 46 75 6e 63 44 65 66 20 2a 70 44 65 66 3b    FuncDef *pDef;
c080: 0a 20 20 69 66 28 20 70 45 78 70 72 2d 3e 6f 70  .  if( pExpr->op
c090: 21 3d 54 4b 5f 46 55 4e 43 54 49 4f 4e 20 0a 20  !=TK_FUNCTION . 
c0a0: 20 20 7c 7c 20 21 70 45 78 70 72 2d 3e 78 2e 70    || !pExpr->x.p
c0b0: 4c 69 73 74 20 0a 20 20 20 7c 7c 20 70 45 78 70  List .   || pExp
c0c0: 72 2d 3e 78 2e 70 4c 69 73 74 2d 3e 6e 45 78 70  r->x.pList->nExp
c0d0: 72 21 3d 32 0a 20 20 29 7b 0a 20 20 20 20 72 65  r!=2.  ){.    re
c0e0: 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 61 73  turn 0;.  }.  as
c0f0: 73 65 72 74 28 20 21 45 78 70 72 48 61 73 50 72  sert( !ExprHasPr
c100: 6f 70 65 72 74 79 28 70 45 78 70 72 2c 20 45 50  operty(pExpr, EP
c110: 5f 78 49 73 53 65 6c 65 63 74 29 20 29 3b 0a 20  _xIsSelect) );. 
c120: 20 70 44 65 66 20 3d 20 73 71 6c 69 74 65 33 46   pDef = sqlite3F
c130: 69 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20  indFunction(db, 
c140: 70 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b 65 6e 2c  pExpr->u.zToken,
c150: 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   .              
c160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                 s
c170: 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30 28 70  qlite3Strlen30(p
c180: 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b 65 6e 29 2c  Expr->u.zToken),
c190: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
c1a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c                2,
c1b0: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 29   SQLITE_UTF8, 0)
c1c0: 3b 0a 20 20 69 66 28 20 4e 45 56 45 52 28 70 44  ;.  if( NEVER(pD
c1d0: 65 66 3d 3d 30 29 20 7c 7c 20 28 70 44 65 66 2d  ef==0) || (pDef-
c1e0: 3e 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51 4c  >funcFlags & SQL
c1f0: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 3d 3d  ITE_FUNC_LIKE)==
c200: 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  0 ){.    return 
c210: 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54 68 65  0;.  }..  /* The
c220: 20 6d 65 6d 63 70 79 28 29 20 73 74 61 74 65 6d   memcpy() statem
c230: 65 6e 74 20 61 73 73 75 6d 65 73 20 74 68 61 74  ent assumes that
c240: 20 74 68 65 20 77 69 6c 64 63 61 72 64 20 63 68   the wildcard ch
c250: 61 72 61 63 74 65 72 73 20 61 72 65 0a 20 20 2a  aracters are.  *
c260: 2a 20 74 68 65 20 66 69 72 73 74 20 74 68 72 65  * the first thre
c270: 65 20 73 74 61 74 65 6d 65 6e 74 73 20 69 6e 20  e statements in 
c280: 74 68 65 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  the compareInfo 
c290: 73 74 72 75 63 74 75 72 65 2e 20 20 54 68 65 0a  structure.  The.
c2a0: 20 20 2a 2a 20 61 73 73 65 72 74 73 28 29 20 74    ** asserts() t
c2b0: 68 61 74 20 66 6f 6c 6c 6f 77 20 76 65 72 69 66  hat follow verif
c2c0: 79 20 74 68 61 74 20 61 73 73 75 6d 70 74 69 6f  y that assumptio
c2d0: 6e 0a 20 20 2a 2f 0a 20 20 6d 65 6d 63 70 79 28  n.  */.  memcpy(
c2e0: 61 57 63 2c 20 70 44 65 66 2d 3e 70 55 73 65 72  aWc, pDef->pUser
c2f0: 44 61 74 61 2c 20 33 29 3b 0a 20 20 61 73 73 65  Data, 3);.  asse
c300: 72 74 28 20 28 63 68 61 72 2a 29 26 6c 69 6b 65  rt( (char*)&like
c310: 49 6e 66 6f 41 6c 74 20 3d 3d 20 28 63 68 61 72  InfoAlt == (char
c320: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d  *)&likeInfoAlt.m
c330: 61 74 63 68 41 6c 6c 20 29 3b 0a 20 20 61 73 73  atchAll );.  ass
c340: 65 72 74 28 20 26 28 28 63 68 61 72 2a 29 26 6c  ert( &((char*)&l
c350: 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 31 5d 20 3d  ikeInfoAlt)[1] =
c360: 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e  = (char*)&likeIn
c370: 66 6f 41 6c 74 2e 6d 61 74 63 68 4f 6e 65 20 29  foAlt.matchOne )
c380: 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28 28 63  ;.  assert( &((c
c390: 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c  har*)&likeInfoAl
c3a0: 74 29 5b 32 5d 20 3d 3d 20 28 63 68 61 72 2a 29  t)[2] == (char*)
c3b0: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d 61 74  &likeInfoAlt.mat
c3c0: 63 68 53 65 74 20 29 3b 0a 20 20 2a 70 49 73 4e  chSet );.  *pIsN
c3d0: 6f 63 61 73 65 20 3d 20 28 70 44 65 66 2d 3e 66  ocase = (pDef->f
c3e0: 75 6e 63 46 6c 61 67 73 20 26 20 53 51 4c 49 54  uncFlags & SQLIT
c3f0: 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d 3d 30 3b  E_FUNC_CASE)==0;
c400: 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a 0a  .  return 1;.}..
c410: 2f 2a 0a 2a 2a 20 41 6c 6c 20 6f 66 20 74 68 65  /*.** All of the
c420: 20 46 75 6e 63 44 65 66 20 73 74 72 75 63 74 75   FuncDef structu
c430: 72 65 73 20 69 6e 20 74 68 65 20 61 42 75 69 6c  res in the aBuil
c440: 74 69 6e 46 75 6e 63 5b 5d 20 61 72 72 61 79 20  tinFunc[] array 
c450: 61 62 6f 76 65 0a 2a 2a 20 74 6f 20 74 68 65 20  above.** to the 
c460: 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f 6e 20  global function 
c470: 68 61 73 68 20 74 61 62 6c 65 2e 20 20 54 68 69  hash table.  Thi
c480: 73 20 6f 63 63 75 72 73 20 61 74 20 73 74 61 72  s occurs at star
c490: 74 2d 74 69 6d 65 20 28 61 73 0a 2a 2a 20 61 20  t-time (as.** a 
c4a0: 63 6f 6e 73 65 71 75 65 6e 63 65 20 6f 66 20 63  consequence of c
c4b0: 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 69  alling sqlite3_i
c4c0: 6e 69 74 69 61 6c 69 7a 65 28 29 29 2e 0a 2a 2a  nitialize())..**
c4d0: 0a 2a 2a 20 41 66 74 65 72 20 74 68 69 73 20 72  .** After this r
c4e0: 6f 75 74 69 6e 65 20 72 75 6e 73 0a 2a 2f 0a 76  outine runs.*/.v
c4f0: 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67 69 73  oid sqlite3Regis
c500: 74 65 72 47 6c 6f 62 61 6c 46 75 6e 63 74 69 6f  terGlobalFunctio
c510: 6e 73 28 76 6f 69 64 29 7b 0a 20 20 2f 2a 0a 20  ns(void){.  /*. 
c520: 20 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e   ** The followin
c530: 67 20 61 72 72 61 79 20 68 6f 6c 64 73 20 46 75  g array holds Fu
c540: 6e 63 44 65 66 20 73 74 72 75 63 74 75 72 65 73  ncDef structures
c550: 20 66 6f 72 20 61 6c 6c 20 6f 66 20 74 68 65 20   for all of the 
c560: 66 75 6e 63 74 69 6f 6e 73 0a 20 20 2a 2a 20 64  functions.  ** d
c570: 65 66 69 6e 65 64 20 69 6e 20 74 68 69 73 20 66  efined in this f
c580: 69 6c 65 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54  ile..  **.  ** T
c590: 68 65 20 61 72 72 61 79 20 63 61 6e 6e 6f 74 20  he array cannot 
c5a0: 62 65 20 63 6f 6e 73 74 61 6e 74 20 73 69 6e 63  be constant sinc
c5b0: 65 20 63 68 61 6e 67 65 73 20 61 72 65 20 6d 61  e changes are ma
c5c0: 64 65 20 74 6f 20 74 68 65 0a 20 20 2a 2a 20 46  de to the.  ** F
c5d0: 75 6e 63 44 65 66 2e 70 48 61 73 68 20 65 6c 65  uncDef.pHash ele
c5e0: 6d 65 6e 74 73 20 61 74 20 73 74 61 72 74 2d 74  ments at start-t
c5f0: 69 6d 65 2e 20 20 54 68 65 20 65 6c 65 6d 65 6e  ime.  The elemen
c600: 74 73 20 6f 66 20 74 68 69 73 20 61 72 72 61 79  ts of this array
c610: 0a 20 20 2a 2a 20 61 72 65 20 72 65 61 64 2d 6f  .  ** are read-o
c620: 6e 6c 79 20 61 66 74 65 72 20 69 6e 69 74 69 61  nly after initia
c630: 6c 69 7a 61 74 69 6f 6e 20 69 73 20 63 6f 6d 70  lization is comp
c640: 6c 65 74 65 2e 0a 20 20 2a 2f 0a 20 20 73 74 61  lete..  */.  sta
c650: 74 69 63 20 53 51 4c 49 54 45 5f 57 53 44 20 46  tic SQLITE_WSD F
c660: 75 6e 63 44 65 66 20 61 42 75 69 6c 74 69 6e 46  uncDef aBuiltinF
c670: 75 6e 63 5b 5d 20 3d 20 7b 0a 20 20 20 20 46 55  unc[] = {.    FU
c680: 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20 20 20  NCTION(ltrim,   
c690: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 31 2c             1, 1,
c6a0: 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20   0, trimFunc    
c6b0: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c6c0: 54 49 4f 4e 28 6c 74 72 69 6d 2c 20 20 20 20 20  TION(ltrim,     
c6d0: 20 20 20 20 20 20 20 20 20 32 2c 20 31 2c 20 30           2, 1, 0
c6e0: 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20  , trimFunc      
c6f0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
c700: 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20 20 20  ON(rtrim,       
c710: 20 20 20 20 20 20 20 31 2c 20 32 2c 20 30 2c 20         1, 2, 0, 
c720: 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20  trimFunc        
c730: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c740: 28 72 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20  (rtrim,         
c750: 20 20 20 20 20 32 2c 20 32 2c 20 30 2c 20 74 72       2, 2, 0, tr
c760: 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29  imFunc         )
c770: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74  ,.    FUNCTION(t
c780: 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  rim,            
c790: 20 20 20 31 2c 20 33 2c 20 30 2c 20 74 72 69 6d     1, 3, 0, trim
c7a0: 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a  Func         ),.
c7b0: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74 72 69      FUNCTION(tri
c7c0: 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  m,              
c7d0: 20 32 2c 20 33 2c 20 30 2c 20 74 72 69 6d 46 75   2, 3, 0, trimFu
c7e0: 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20  nc         ),.  
c7f0: 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c 20    FUNCTION(min, 
c800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 31                -1
c810: 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78 46 75  , 0, 1, minmaxFu
c820: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
c830: 46 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c 20 20 20  FUNCTION(min,   
c840: 20 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20               0, 
c850: 30 2c 20 31 2c 20 30 20 20 20 20 20 20 20 20 20  0, 1, 0         
c860: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 41 47         ),.    AG
c870: 47 52 45 47 41 54 45 32 28 6d 69 6e 2c 20 20 20  GREGATE2(min,   
c880: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
c890: 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20   1, minmaxStep, 
c8a0: 20 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c       minMaxFinal
c8b0: 69 7a 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20  ize,.           
c8c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c8d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53                 S
c8e0: 51 4c 49 54 45 5f 46 55 4e 43 5f 4d 49 4e 4d 41  QLITE_FUNC_MINMA
c8f0: 58 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f  X ),.    FUNCTIO
c900: 4e 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20 20  N(max,          
c910: 20 20 20 20 20 2d 31 2c 20 31 2c 20 31 2c 20 6d       -1, 1, 1, m
c920: 69 6e 6d 61 78 46 75 6e 63 20 20 20 20 20 20 20  inmaxFunc       
c930: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
c940: 6d 61 78 2c 20 20 20 20 20 20 20 20 20 20 20 20  max,            
c950: 20 20 20 20 30 2c 20 31 2c 20 31 2c 20 30 20 20      0, 1, 1, 0  
c960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c                ),
c970: 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 32 28  .    AGGREGATE2(
c980: 6d 61 78 2c 20 20 20 20 20 20 20 20 20 20 20 20  max,            
c990: 20 20 31 2c 20 31 2c 20 31 2c 20 6d 69 6e 6d 61    1, 1, 1, minma
c9a0: 78 53 74 65 70 2c 20 20 20 20 20 20 6d 69 6e 4d  xStep,      minM
c9b0: 61 78 46 69 6e 61 6c 69 7a 65 2c 0a 20 20 20 20  axFinalize,.    
c9c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c9d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c9e0: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 46 55 4e        SQLITE_FUN
c9f0: 43 5f 4d 49 4e 4d 41 58 20 29 2c 0a 20 20 20 20  C_MINMAX ),.    
ca00: 46 55 4e 43 54 49 4f 4e 32 28 74 79 70 65 6f 66  FUNCTION2(typeof
ca10: 2c 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20  ,            1, 
ca20: 30 2c 20 30 2c 20 74 79 70 65 6f 66 46 75 6e 63  0, 0, typeofFunc
ca30: 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 54  ,  SQLITE_FUNC_T
ca40: 59 50 45 4f 46 29 2c 0a 20 20 20 20 46 55 4e 43  YPEOF),.    FUNC
ca50: 54 49 4f 4e 32 28 6c 65 6e 67 74 68 2c 20 20 20  TION2(length,   
ca60: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
ca70: 2c 20 6c 65 6e 67 74 68 46 75 6e 63 2c 20 20 53  , lengthFunc,  S
ca80: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 45 4e 47 54  QLITE_FUNC_LENGT
ca90: 48 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e  H),.    FUNCTION
caa0: 28 69 6e 73 74 72 2c 20 20 20 20 20 20 20 20 20  (instr,         
cab0: 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 69 6e       2, 0, 0, in
cac0: 73 74 72 46 75 6e 63 20 20 20 20 20 20 20 20 29  strFunc        )
cad0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73  ,.    FUNCTION(s
cae0: 75 62 73 74 72 2c 20 20 20 20 20 20 20 20 20 20  ubstr,          
caf0: 20 20 20 32 2c 20 30 2c 20 30 2c 20 73 75 62 73     2, 0, 0, subs
cb00: 74 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  trFunc       ),.
cb10: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 75 62      FUNCTION(sub
cb20: 73 74 72 2c 20 20 20 20 20 20 20 20 20 20 20 20  str,            
cb30: 20 33 2c 20 30 2c 20 30 2c 20 73 75 62 73 74 72   3, 0, 0, substr
cb40: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20  Func       ),.  
cb50: 20 20 46 55 4e 43 54 49 4f 4e 28 70 72 69 6e 74    FUNCTION(print
cb60: 66 2c 20 20 20 20 20 20 20 20 20 20 20 20 2d 31  f,            -1
cb70: 2c 20 30 2c 20 30 2c 20 70 72 69 6e 74 66 46 75  , 0, 0, printfFu
cb80: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
cb90: 46 55 4e 43 54 49 4f 4e 28 75 6e 69 63 6f 64 65  FUNCTION(unicode
cba0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20  ,            1, 
cbb0: 30 2c 20 30 2c 20 75 6e 69 63 6f 64 65 46 75 6e  0, 0, unicodeFun
cbc0: 63 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55  c      ),.    FU
cbd0: 4e 43 54 49 4f 4e 28 63 68 61 72 2c 20 20 20 20  NCTION(char,    
cbe0: 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 30 2c            -1, 0,
cbf0: 20 30 2c 20 63 68 61 72 46 75 6e 63 20 20 20 20   0, charFunc    
cc00: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
cc10: 54 49 4f 4e 28 61 62 73 2c 20 20 20 20 20 20 20  TION(abs,       
cc20: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
cc30: 2c 20 61 62 73 46 75 6e 63 20 20 20 20 20 20 20  , absFunc       
cc40: 20 20 20 29 2c 0a 23 69 66 6e 64 65 66 20 53 51     ),.#ifndef SQ
cc50: 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49  LITE_OMIT_FLOATI
cc60: 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20 46 55 4e  NG_POINT.    FUN
cc70: 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20 20  CTION(round,    
cc80: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
cc90: 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20 20  0, roundFunc    
cca0: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
ccb0: 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20 20 20 20  ION(round,      
ccc0: 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c          2, 0, 0,
ccd0: 20 72 6f 75 6e 64 46 75 6e 63 20 20 20 20 20 20   roundFunc      
cce0: 20 20 29 2c 0a 23 65 6e 64 69 66 0a 20 20 20 20    ),.#endif.    
ccf0: 46 55 4e 43 54 49 4f 4e 28 75 70 70 65 72 2c 20  FUNCTION(upper, 
cd00: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
cd10: 30 2c 20 30 2c 20 75 70 70 65 72 46 75 6e 63 20  0, 0, upperFunc 
cd20: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
cd30: 4e 43 54 49 4f 4e 28 6c 6f 77 65 72 2c 20 20 20  NCTION(lower,   
cd40: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
cd50: 20 30 2c 20 6c 6f 77 65 72 46 75 6e 63 20 20 20   0, lowerFunc   
cd60: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
cd70: 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20  TION(coalesce,  
cd80: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
cd90: 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20  , 0             
cda0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
cdb0: 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20 20 20  ON(coalesce,    
cdc0: 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20         0, 0, 0, 
cdd0: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  0               
cde0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
cdf0: 32 28 63 6f 61 6c 65 73 63 65 2c 20 20 20 20 20  2(coalesce,     
ce00: 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c 20 6e 6f      -1, 0, 0, no
ce10: 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f  opFunc,  SQLITE_
ce20: 46 55 4e 43 5f 43 4f 41 4c 45 53 43 45 29 2c 0a  FUNC_COALESCE),.
ce30: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 68 65 78      FUNCTION(hex
ce40: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
ce50: 20 31 2c 20 30 2c 20 30 2c 20 68 65 78 46 75 6e   1, 0, 0, hexFun
ce60: 63 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20  c          ),.  
ce70: 20 20 46 55 4e 43 54 49 4f 4e 32 28 69 66 6e 75    FUNCTION2(ifnu
ce80: 6c 6c 2c 20 20 20 20 20 20 20 20 20 20 20 20 32  ll,            2
ce90: 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e 63  , 0, 0, noopFunc
cea0: 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43  ,  SQLITE_FUNC_C
ceb0: 4f 41 4c 45 53 43 45 29 2c 0a 20 20 20 20 46 55  OALESCE),.    FU
cec0: 4e 43 54 49 4f 4e 32 28 75 6e 6c 69 6b 65 6c 79  NCTION2(unlikely
ced0: 2c 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c  ,          1, 0,
cee0: 20 30 2c 20 6e 6f 6f 70 46 75 6e 63 2c 20 20 53   0, noopFunc,  S
cef0: 51 4c 49 54 45 5f 46 55 4e 43 5f 55 4e 4c 49 4b  QLITE_FUNC_UNLIK
cf00: 45 4c 59 29 2c 0a 20 20 20 20 46 55 4e 43 54 49  ELY),.    FUNCTI
cf10: 4f 4e 32 28 6c 69 6b 65 6c 69 68 6f 6f 64 2c 20  ON2(likelihood, 
cf20: 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20         2, 0, 0, 
cf30: 6e 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49 54  noopFunc,  SQLIT
cf40: 45 5f 46 55 4e 43 5f 55 4e 4c 49 4b 45 4c 59 29  E_FUNC_UNLIKELY)
cf50: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 32 28  ,.    FUNCTION2(
cf60: 6c 69 6b 65 6c 79 2c 20 20 20 20 20 20 20 20 20  likely,         
cf70: 20 20 20 31 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70     1, 0, 0, noop
cf80: 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46 55  Func,  SQLITE_FU
cf90: 4e 43 5f 55 4e 4c 49 4b 45 4c 59 29 2c 0a 20 20  NC_UNLIKELY),.  
cfa0: 20 20 56 46 55 4e 43 54 49 4f 4e 28 72 61 6e 64    VFUNCTION(rand
cfb0: 6f 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 30  om,            0
cfc0: 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 46 75  , 0, 0, randomFu
cfd0: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
cfe0: 56 46 55 4e 43 54 49 4f 4e 28 72 61 6e 64 6f 6d  VFUNCTION(random
cff0: 62 6c 6f 62 2c 20 20 20 20 20 20 20 20 31 2c 20  blob,        1, 
d000: 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 42 6c 6f 62  0, 0, randomBlob
d010: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
d020: 4e 43 54 49 4f 4e 28 6e 75 6c 6c 69 66 2c 20 20  NCTION(nullif,  
d030: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c             2, 0,
d040: 20 31 2c 20 6e 75 6c 6c 69 66 46 75 6e 63 20 20   1, nullifFunc  
d050: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
d060: 54 49 4f 4e 28 73 71 6c 69 74 65 5f 76 65 72 73  TION(sqlite_vers
d070: 69 6f 6e 2c 20 20 20 20 20 30 2c 20 30 2c 20 30  ion,     0, 0, 0
d080: 2c 20 76 65 72 73 69 6f 6e 46 75 6e 63 20 20 20  , versionFunc   
d090: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
d0a0: 4f 4e 28 73 71 6c 69 74 65 5f 73 6f 75 72 63 65  ON(sqlite_source
d0b0: 5f 69 64 2c 20 20 20 30 2c 20 30 2c 20 30 2c 20  _id,   0, 0, 0, 
d0c0: 73 6f 75 72 63 65 69 64 46 75 6e 63 20 20 20 20  sourceidFunc    
d0d0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
d0e0: 28 73 71 6c 69 74 65 5f 6c 6f 67 2c 20 20 20 20  (sqlite_log,    
d0f0: 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 65 72       2, 0, 0, er
d100: 72 6c 6f 67 46 75 6e 63 20 20 20 20 20 20 20 29  rlogFunc       )
d110: 2c 0a 23 69 66 20 53 51 4c 49 54 45 5f 55 53 45  ,.#if SQLITE_USE
d120: 52 5f 41 55 54 48 45 4e 54 49 43 41 54 49 4f 4e  R_AUTHENTICATION
d130: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 71  .    FUNCTION(sq
d140: 6c 69 74 65 5f 63 72 79 70 74 2c 20 20 20 20 20  lite_crypt,     
d150: 20 20 32 2c 20 30 2c 20 30 2c 20 73 71 6c 69 74    2, 0, 0, sqlit
d160: 65 33 43 72 79 70 74 46 75 6e 63 20 29 2c 0a 23  e3CryptFunc ),.#
d170: 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 53 51  endif.#ifndef SQ
d180: 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c  LITE_OMIT_COMPIL
d190: 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 0a 20 20  EOPTION_DIAGS.  
d1a0: 20 20 46 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74    FUNCTION(sqlit
d1b0: 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f  e_compileoption_
d1c0: 75 73 65 64 2c 31 2c 20 30 2c 20 30 2c 20 63 6f  used,1, 0, 0, co
d1d0: 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73 65 64 46  mpileoptionusedF
d1e0: 75 6e 63 20 20 29 2c 0a 20 20 20 20 46 55 4e 43  unc  ),.    FUNC
d1f0: 54 49 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d 70  TION(sqlite_comp
d200: 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 2c 20 31  ileoption_get, 1
d210: 2c 20 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65 6f  , 0, 0, compileo
d220: 70 74 69 6f 6e 67 65 74 46 75 6e 63 20 20 29 2c  ptiongetFunc  ),
d230: 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54  .#endif /* SQLIT
d240: 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50  E_OMIT_COMPILEOP
d250: 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 20 20  TION_DIAGS */.  
d260: 20 20 46 55 4e 43 54 49 4f 4e 28 71 75 6f 74 65    FUNCTION(quote
d270: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  ,              1
d280: 2c 20 30 2c 20 30 2c 20 71 75 6f 74 65 46 75 6e  , 0, 0, quoteFun
d290: 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  c        ),.    
d2a0: 56 46 55 4e 43 54 49 4f 4e 28 6c 61 73 74 5f 69  VFUNCTION(last_i
d2b0: 6e 73 65 72 74 5f 72 6f 77 69 64 2c 20 30 2c 20  nsert_rowid, 0, 
d2c0: 30 2c 20 30 2c 20 6c 61 73 74 5f 69 6e 73 65 72  0, 0, last_inser
d2d0: 74 5f 72 6f 77 69 64 29 2c 0a 20 20 20 20 56 46  t_rowid),.    VF
d2e0: 55 4e 43 54 49 4f 4e 28 63 68 61 6e 67 65 73 2c  UNCTION(changes,
d2f0: 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c             0, 0,
d300: 20 30 2c 20 63 68 61 6e 67 65 73 20 20 20 20 20   0, changes     
d310: 20 20 20 20 20 29 2c 0a 20 20 20 20 56 46 55 4e       ),.    VFUN
d320: 43 54 49 4f 4e 28 74 6f 74 61 6c 5f 63 68 61 6e  CTION(total_chan
d330: 67 65 73 2c 20 20 20 20 20 30 2c 20 30 2c 20 30  ges,     0, 0, 0
d340: 2c 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 20  , total_changes 
d350: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
d360: 4f 4e 28 72 65 70 6c 61 63 65 2c 20 20 20 20 20  ON(replace,     
d370: 20 20 20 20 20 20 20 33 2c 20 30 2c 20 30 2c 20         3, 0, 0, 
d380: 72 65 70 6c 61 63 65 46 75 6e 63 20 20 20 20 20  replaceFunc     
d390: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
d3a0: 28 7a 65 72 6f 62 6c 6f 62 2c 20 20 20 20 20 20  (zeroblob,      
d3b0: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 7a 65       1, 0, 0, ze
d3c0: 72 6f 62 6c 6f 62 46 75 6e 63 20 20 20 20 20 29  roblobFunc     )
d3d0: 2c 0a 20 20 23 69 66 64 65 66 20 53 51 4c 49 54  ,.  #ifdef SQLIT
d3e0: 45 5f 53 4f 55 4e 44 45 58 0a 20 20 20 20 46 55  E_SOUNDEX.    FU
d3f0: 4e 43 54 49 4f 4e 28 73 6f 75 6e 64 65 78 2c 20  NCTION(soundex, 
d400: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
d410: 20 30 2c 20 73 6f 75 6e 64 65 78 46 75 6e 63 20   0, soundexFunc 
d420: 20 20 20 20 20 29 2c 0a 20 20 23 65 6e 64 69 66       ),.  #endif
d430: 0a 20 20 23 69 66 6e 64 65 66 20 53 51 4c 49 54  .  #ifndef SQLIT
d440: 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54 45  E_OMIT_LOAD_EXTE
d450: 4e 53 49 4f 4e 0a 20 20 20 20 46 55 4e 43 54 49  NSION.    FUNCTI
d460: 4f 4e 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f  ON(load_extensio
d470: 6e 2c 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20  n,     1, 0, 0, 
d480: 6c 6f 61 64 45 78 74 20 20 20 20 20 20 20 20 20  loadExt         
d490: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
d4a0: 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 2c  (load_extension,
d4b0: 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 6c 6f       2, 0, 0, lo
d4c0: 61 64 45 78 74 20 20 20 20 20 20 20 20 20 20 29  adExt          )
d4d0: 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 20 20 41  ,.  #endif.    A
d4e0: 47 47 52 45 47 41 54 45 28 73 75 6d 2c 20 20 20  GGREGATE(sum,   
d4f0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
d500: 2c 20 30 2c 20 73 75 6d 53 74 65 70 2c 20 20 20  , 0, sumStep,   
d510: 20 20 20 20 20 20 73 75 6d 46 69 6e 61 6c 69 7a        sumFinaliz
d520: 65 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52  e    ),.    AGGR
d530: 45 47 41 54 45 28 74 6f 74 61 6c 2c 20 20 20 20  EGATE(total,    
d540: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
d550: 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20  , sumStep,      
d560: 20 20 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a 65     totalFinalize
d570: 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45      ),.    AGGRE
d580: 47 41 54 45 28 61 76 67 2c 20 20 20 20 20 20 20  GATE(avg,       
d590: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c          1, 0, 0,
d5a0: 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20   sumStep,       
d5b0: 20 20 61 76 67 46 69 6e 61 6c 69 7a 65 20 20 20    avgFinalize   
d5c0: 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54   ),.    AGGREGAT
d5d0: 45 32 28 63 6f 75 6e 74 2c 20 20 20 20 20 20 20  E2(count,       
d5e0: 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 63 6f       0, 0, 0, co
d5f0: 75 6e 74 53 74 65 70 2c 20 20 20 20 20 20 20 63  untStep,       c
d600: 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 2c 0a 20 20  ountFinalize,.  
d610: 20 20 20 20 20 20 20 20 20 20 20 20 20 53 51 4c               SQL
d620: 49 54 45 5f 46 55 4e 43 5f 43 4f 55 4e 54 20 20  ITE_FUNC_COUNT  
d630: 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  ),.    AGGREGATE
d640: 28 63 6f 75 6e 74 2c 20 20 20 20 20 20 20 20 20  (count,         
d650: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 63 6f 75      1, 0, 0, cou
d660: 6e 74 53 74 65 70 2c 20 20 20 20 20 20 20 63 6f  ntStep,       co
d670: 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20 29 2c 0a  untFinalize  ),.
d680: 20 20 20 20 41 47 47 52 45 47 41 54 45 28 67 72      AGGREGATE(gr
d690: 6f 75 70 5f 63 6f 6e 63 61 74 2c 20 20 20 20 20  oup_concat,     
d6a0: 20 31 2c 20 30 2c 20 30 2c 20 67 72 6f 75 70 43   1, 0, 0, groupC
d6b0: 6f 6e 63 61 74 53 74 65 70 2c 20 67 72 6f 75 70  oncatStep, group
d6c0: 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 29 2c  ConcatFinalize),
d6d0: 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28 67  .    AGGREGATE(g
d6e0: 72 6f 75 70 5f 63 6f 6e 63 61 74 2c 20 20 20 20  roup_concat,    
d6f0: 20 20 32 2c 20 30 2c 20 30 2c 20 67 72 6f 75 70    2, 0, 0, group
d700: 43 6f 6e 63 61 74 53 74 65 70 2c 20 67 72 6f 75  ConcatStep, grou
d710: 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 29  pConcatFinalize)
d720: 2c 0a 20 20 0a 20 20 20 20 4c 49 4b 45 46 55 4e  ,.  .    LIKEFUN
d730: 43 28 67 6c 6f 62 2c 20 32 2c 20 26 67 6c 6f 62  C(glob, 2, &glob
d740: 49 6e 66 6f 2c 20 53 51 4c 49 54 45 5f 46 55 4e  Info, SQLITE_FUN
d750: 43 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55  C_LIKE|SQLITE_FU
d760: 4e 43 5f 43 41 53 45 29 2c 0a 20 20 23 69 66 64  NC_CASE),.  #ifd
d770: 65 66 20 53 51 4c 49 54 45 5f 43 41 53 45 5f 53  ef SQLITE_CASE_S
d780: 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45 0a 20 20  ENSITIVE_LIKE.  
d790: 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b 65 2c    LIKEFUNC(like,
d7a0: 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f 41 6c 74   2, &likeInfoAlt
d7b0: 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49  , SQLITE_FUNC_LI
d7c0: 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43  KE|SQLITE_FUNC_C
d7d0: 41 53 45 29 2c 0a 20 20 20 20 4c 49 4b 45 46 55  ASE),.    LIKEFU
d7e0: 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26 6c 69 6b  NC(like, 3, &lik
d7f0: 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c 49 54 45  eInfoAlt, SQLITE
d800: 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51 4c 49 54  _FUNC_LIKE|SQLIT
d810: 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c 0a 20 20  E_FUNC_CASE),.  
d820: 23 65 6c 73 65 0a 20 20 20 20 4c 49 4b 45 46 55  #else.    LIKEFU
d830: 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26 6c 69 6b  NC(like, 2, &lik
d840: 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51 4c 49 54  eInfoNorm, SQLIT
d850: 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c 0a 20 20  E_FUNC_LIKE),.  
d860: 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b 65 2c    LIKEFUNC(like,
d870: 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f 4e 6f 72   3, &likeInfoNor
d880: 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c  m, SQLITE_FUNC_L
d890: 49 4b 45 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20  IKE),.  #endif. 
d8a0: 20 7d 3b 0a 0a 20 20 69 6e 74 20 69 3b 0a 20 20   };..  int i;.  
d8b0: 46 75 6e 63 44 65 66 48 61 73 68 20 2a 70 48 61  FuncDefHash *pHa
d8c0: 73 68 20 3d 20 26 47 4c 4f 42 41 4c 28 46 75 6e  sh = &GLOBAL(Fun
d8d0: 63 44 65 66 48 61 73 68 2c 20 73 71 6c 69 74 65  cDefHash, sqlite
d8e0: 33 47 6c 6f 62 61 6c 46 75 6e 63 74 69 6f 6e 73  3GlobalFunctions
d8f0: 29 3b 0a 20 20 46 75 6e 63 44 65 66 20 2a 61 46  );.  FuncDef *aF
d900: 75 6e 63 20 3d 20 28 46 75 6e 63 44 65 66 2a 29  unc = (FuncDef*)
d910: 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66 2c  &GLOBAL(FuncDef,
d920: 20 61 42 75 69 6c 74 69 6e 46 75 6e 63 29 3b 0a   aBuiltinFunc);.
d930: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 41 72  .  for(i=0; i<Ar
d940: 72 61 79 53 69 7a 65 28 61 42 75 69 6c 74 69 6e  raySize(aBuiltin
d950: 46 75 6e 63 29 3b 20 69 2b 2b 29 7b 0a 20 20 20  Func); i++){.   
d960: 20 73 71 6c 69 74 65 33 46 75 6e 63 44 65 66 49   sqlite3FuncDefI
d970: 6e 73 65 72 74 28 70 48 61 73 68 2c 20 26 61 46  nsert(pHash, &aF
d980: 75 6e 63 5b 69 5d 29 3b 0a 20 20 7d 0a 20 20 73  unc[i]);.  }.  s
d990: 71 6c 69 74 65 33 52 65 67 69 73 74 65 72 44 61  qlite3RegisterDa
d9a0: 74 65 54 69 6d 65 46 75 6e 63 74 69 6f 6e 73 28  teTimeFunctions(
d9b0: 29 3b 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54  );.#ifndef SQLIT
d9c0: 45 5f 4f 4d 49 54 5f 41 4c 54 45 52 54 41 42 4c  E_OMIT_ALTERTABL
d9d0: 45 0a 20 20 73 71 6c 69 74 65 33 41 6c 74 65 72  E.  sqlite3Alter
d9e0: 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 23 65 6e  Functions();.#en
d9f0: 64 69 66 0a 23 69 66 20 64 65 66 69 6e 65 64 28  dif.#if defined(
da00: 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 53 54  SQLITE_ENABLE_ST
da10: 41 54 33 29 20 7c 7c 20 64 65 66 69 6e 65 64 28  AT3) || defined(
da20: 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 53 54  SQLITE_ENABLE_ST
da30: 41 54 34 29 0a 20 20 73 71 6c 69 74 65 33 41 6e  AT4).  sqlite3An
da40: 61 6c 79 7a 65 46 75 6e 63 74 69 6f 6e 73 28 29  alyzeFunctions()
da50: 3b 0a 23 65 6e 64 69 66 0a 7d 0a                 ;.#endif.}.