/ Hex Artifact Content
Login

Artifact 42d12d31d350defcabb8f3f476cdaeedfc9e9615:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61 74  C functions that
01a0: 20 69 6d 70 6c 65 6d 65 6e 74 20 76 61 72 69 6f   implement vario
01b0: 75 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69  us SQL.** functi
01c0: 6f 6e 73 20 6f 66 20 53 51 4c 69 74 65 2e 20 20  ons of SQLite.  
01d0: 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 69 73 20  .**.** There is 
01e0: 6f 6e 6c 79 20 6f 6e 65 20 65 78 70 6f 72 74 65  only one exporte
01f0: 64 20 73 79 6d 62 6f 6c 20 69 6e 20 74 68 69 73  d symbol in this
0200: 20 66 69 6c 65 20 2d 20 74 68 65 20 66 75 6e 63   file - the func
0210: 74 69 6f 6e 0a 2a 2a 20 73 71 6c 69 74 65 52 65  tion.** sqliteRe
0220: 67 69 73 74 65 72 42 75 69 6c 64 69 6e 46 75 6e  gisterBuildinFun
0230: 63 74 69 6f 6e 73 28 29 20 66 6f 75 6e 64 20 61  ctions() found a
0240: 74 20 74 68 65 20 62 6f 74 74 6f 6d 20 6f 66 20  t the bottom of 
0250: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 20 41 6c 6c  the file..** All
0260: 20 6f 74 68 65 72 20 63 6f 64 65 20 68 61 73 20   other code has 
0270: 66 69 6c 65 20 73 63 6f 70 65 2e 0a 2a 2a 0a 2a  file scope..**.*
0280: 2a 20 24 49 64 3a 20 66 75 6e 63 2e 63 2c 76 20  * $Id: func.c,v 
0290: 31 2e 32 32 35 20 32 30 30 39 2f 30 33 2f 32 37  1.225 2009/03/27
02a0: 20 31 35 3a 32 36 3a 30 33 20 64 61 6e 69 65 6c   15:26:03 daniel
02b0: 6b 31 39 37 37 20 45 78 70 20 24 0a 2a 2f 0a 23  k1977 Exp $.*/.#
02c0: 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49  include "sqliteI
02d0: 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c  nt.h".#include <
02e0: 73 74 64 6c 69 62 2e 68 3e 0a 23 69 6e 63 6c 75  stdlib.h>.#inclu
02f0: 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69  de <assert.h>.#i
0300: 6e 63 6c 75 64 65 20 22 76 64 62 65 49 6e 74 2e  nclude "vdbeInt.
0310: 68 22 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e  h"../*.** Return
0320: 20 74 68 65 20 63 6f 6c 6c 61 74 69 6e 67 20 66   the collating f
0330: 75 6e 63 74 69 6f 6e 20 61 73 73 6f 63 69 61 74  unction associat
0340: 65 64 20 77 69 74 68 20 61 20 66 75 6e 63 74 69  ed with a functi
0350: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 43 6f  on..*/.static Co
0360: 6c 6c 53 65 71 20 2a 73 71 6c 69 74 65 33 47 65  llSeq *sqlite3Ge
0370: 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 73 71 6c  tFuncCollSeq(sql
0380: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0390: 6e 74 65 78 74 29 7b 0a 20 20 72 65 74 75 72 6e  ntext){.  return
03a0: 20 63 6f 6e 74 65 78 74 2d 3e 70 43 6f 6c 6c 3b   context->pColl;
03b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
03c0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
03d0: 6e 6f 6e 2d 61 67 67 72 65 67 61 74 65 20 6d 69  non-aggregate mi
03e0: 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20 66 75  n() and max() fu
03f0: 6e 63 74 69 6f 6e 73 0a 2a 2f 0a 73 74 61 74 69  nctions.*/.stati
0400: 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78 46 75 6e  c void minmaxFun
0410: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
0420: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
0430: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
0440: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
0450: 76 0a 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20  v.){.  int i;.  
0460: 69 6e 74 20 6d 61 73 6b 3b 20 20 20 20 2f 2a 20  int mask;    /* 
0470: 30 20 66 6f 72 20 6d 69 6e 28 29 20 6f 72 20 30  0 for min() or 0
0480: 78 66 66 66 66 66 66 66 66 20 66 6f 72 20 6d 61  xffffffff for ma
0490: 78 28 29 20 2a 2f 0a 20 20 69 6e 74 20 69 42 65  x() */.  int iBe
04a0: 73 74 3b 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70  st;.  CollSeq *p
04b0: 43 6f 6c 6c 3b 0a 0a 20 20 61 73 73 65 72 74 28  Coll;..  assert(
04c0: 20 61 72 67 63 3e 31 20 29 3b 0a 20 20 6d 61 73   argc>1 );.  mas
04d0: 6b 20 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72  k = sqlite3_user
04e0: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 3d 3d  _data(context)==
04f0: 30 20 3f 20 30 20 3a 20 2d 31 3b 0a 20 20 70 43  0 ? 0 : -1;.  pC
0500: 6f 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74  oll = sqlite3Get
0510: 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74  FuncCollSeq(cont
0520: 65 78 74 29 3b 0a 20 20 61 73 73 65 72 74 28 20  ext);.  assert( 
0530: 70 43 6f 6c 6c 20 29 3b 0a 20 20 61 73 73 65 72  pColl );.  asser
0540: 74 28 20 6d 61 73 6b 3d 3d 2d 31 20 7c 7c 20 6d  t( mask==-1 || m
0550: 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 69 42 65 73  ask==0 );.  iBes
0560: 74 20 3d 20 30 3b 0a 20 20 69 66 28 20 73 71 6c  t = 0;.  if( sql
0570: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
0580: 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45  argv[0])==SQLITE
0590: 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a  _NULL ) return;.
05a0: 20 20 66 6f 72 28 69 3d 31 3b 20 69 3c 61 72 67    for(i=1; i<arg
05b0: 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28  c; i++){.    if(
05c0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
05d0: 79 70 65 28 61 72 67 76 5b 69 5d 29 3d 3d 53 51  ype(argv[i])==SQ
05e0: 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75  LITE_NULL ) retu
05f0: 72 6e 3b 0a 20 20 20 20 69 66 28 20 28 73 71 6c  rn;.    if( (sql
0600: 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28 61  ite3MemCompare(a
0610: 72 67 76 5b 69 42 65 73 74 5d 2c 20 61 72 67 76  rgv[iBest], argv
0620: 5b 69 5d 2c 20 70 43 6f 6c 6c 29 5e 6d 61 73 6b  [i], pColl)^mask
0630: 29 3e 3d 30 20 29 7b 0a 20 20 20 20 20 20 74 65  )>=0 ){.      te
0640: 73 74 63 61 73 65 28 20 6d 61 73 6b 3d 3d 30 20  stcase( mask==0 
0650: 29 3b 0a 20 20 20 20 20 20 69 42 65 73 74 20 3d  );.      iBest =
0660: 20 69 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20   i;.    }.  }.  
0670: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76  sqlite3_result_v
0680: 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72  alue(context, ar
0690: 67 76 5b 69 42 65 73 74 5d 29 3b 0a 7d 0a 0a 2f  gv[iBest]);.}../
06a0: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20  *.** Return the 
06b0: 74 79 70 65 20 6f 66 20 74 68 65 20 61 72 67 75  type of the argu
06c0: 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  ment..*/.static 
06d0: 76 6f 69 64 20 74 79 70 65 6f 66 46 75 6e 63 28  void typeofFunc(
06e0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
06f0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
0700: 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71  nt NotUsed,.  sq
0710: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
0720: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68  gv.){.  const ch
0730: 61 72 20 2a 7a 20 3d 20 30 3b 0a 20 20 55 4e 55  ar *z = 0;.  UNU
0740: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f  SED_PARAMETER(No
0750: 74 55 73 65 64 29 3b 0a 20 20 73 77 69 74 63 68  tUsed);.  switch
0760: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
0770: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
0780: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0790: 5f 49 4e 54 45 47 45 52 3a 20 7a 20 3d 20 22 69  _INTEGER: z = "i
07a0: 6e 74 65 67 65 72 22 3b 20 62 72 65 61 6b 3b 0a  nteger"; break;.
07b0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
07c0: 54 45 58 54 3a 20 20 20 20 7a 20 3d 20 22 74 65  TEXT:    z = "te
07d0: 78 74 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20  xt";    break;. 
07e0: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 46     case SQLITE_F
07f0: 4c 4f 41 54 3a 20 20 20 7a 20 3d 20 22 72 65 61  LOAT:   z = "rea
0800: 6c 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  l";    break;.  
0810: 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c    case SQLITE_BL
0820: 4f 42 3a 20 20 20 20 7a 20 3d 20 22 62 6c 6f 62  OB:    z = "blob
0830: 22 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20  ";    break;.   
0840: 20 64 65 66 61 75 6c 74 3a 20 20 20 20 20 20 20   default:       
0850: 20 20 20 20 20 20 7a 20 3d 20 22 6e 75 6c 6c 22        z = "null"
0860: 3b 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 7d 0a  ;    break;.  }.
0870: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
0880: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a  _text(context, z
0890: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41  , -1, SQLITE_STA
08a0: 54 49 43 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20  TIC);.}.../*.** 
08b0: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
08c0: 66 20 74 68 65 20 6c 65 6e 67 74 68 28 29 20 66  f the length() f
08d0: 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69  unction.*/.stati
08e0: 63 20 76 6f 69 64 20 6c 65 6e 67 74 68 46 75 6e  c void lengthFun
08f0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
0900: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
0910: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
0920: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
0930: 76 0a 29 7b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a  v.){.  int len;.
0940: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
0950: 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =1 );.  UNUSED_P
0960: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
0970: 20 20 73 77 69 74 63 68 28 20 73 71 6c 69 74 65    switch( sqlite
0980: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
0990: 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73  v[0]) ){.    cas
09a0: 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a 0a 20  e SQLITE_BLOB:. 
09b0: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49     case SQLITE_I
09c0: 4e 54 45 47 45 52 3a 0a 20 20 20 20 63 61 73 65  NTEGER:.    case
09d0: 20 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b   SQLITE_FLOAT: {
09e0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
09f0: 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78  esult_int(contex
0a00: 74 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  t, sqlite3_value
0a10: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 29  _bytes(argv[0]))
0a20: 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20  ;.      break;. 
0a30: 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 53 51     }.    case SQ
0a40: 4c 49 54 45 5f 54 45 58 54 3a 20 7b 0a 20 20 20  LITE_TEXT: {.   
0a50: 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65     const unsigne
0a60: 64 20 63 68 61 72 20 2a 7a 20 3d 20 73 71 6c 69  d char *z = sqli
0a70: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
0a80: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69  rgv[0]);.      i
0a90: 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( z==0 ) return
0aa0: 3b 0a 20 20 20 20 20 20 6c 65 6e 20 3d 20 30 3b  ;.      len = 0;
0ab0: 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a 7a  .      while( *z
0ac0: 20 29 7b 0a 20 20 20 20 20 20 20 20 6c 65 6e 2b   ){.        len+
0ad0: 2b 3b 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54  +;.        SQLIT
0ae0: 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a  E_SKIP_UTF8(z);.
0af0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71        }.      sq
0b00: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
0b10: 28 63 6f 6e 74 65 78 74 2c 20 6c 65 6e 29 3b 0a  (context, len);.
0b20: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
0b30: 20 7d 0a 20 20 20 20 64 65 66 61 75 6c 74 3a 20   }.    default: 
0b40: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
0b50: 72 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74  result_null(cont
0b60: 65 78 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61  ext);.      brea
0b70: 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a  k;.    }.  }.}..
0b80: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
0b90: 74 69 6f 6e 20 6f 66 20 74 68 65 20 61 62 73 28  tion of the abs(
0ba0: 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74  ) function.*/.st
0bb0: 61 74 69 63 20 76 6f 69 64 20 61 62 73 46 75 6e  atic void absFun
0bc0: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
0bd0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
0be0: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
0bf0: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 61  lue **argv){.  a
0c00: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
0c10: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
0c20: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 73 77  ETER(argc);.  sw
0c30: 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61  itch( sqlite3_va
0c40: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
0c50: 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51  ) ){.    case SQ
0c60: 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 20 7b 0a  LITE_INTEGER: {.
0c70: 20 20 20 20 20 20 69 36 34 20 69 56 61 6c 20 3d        i64 iVal =
0c80: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
0c90: 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20  nt64(argv[0]);. 
0ca0: 20 20 20 20 20 69 66 28 20 69 56 61 6c 3c 30 20       if( iVal<0 
0cb0: 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 28  ){.        if( (
0cc0: 69 56 61 6c 3c 3c 31 29 3d 3d 30 20 29 7b 0a 20  iVal<<1)==0 ){. 
0cd0: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33           sqlite3
0ce0: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
0cf0: 6e 74 65 78 74 2c 20 22 69 6e 74 65 67 65 72 20  ntext, "integer 
0d00: 6f 76 65 72 66 6c 6f 77 22 2c 20 2d 31 29 3b 0a  overflow", -1);.
0d10: 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e            return
0d20: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
0d30: 20 20 20 20 69 56 61 6c 20 3d 20 2d 69 56 61 6c      iVal = -iVal
0d40: 3b 0a 20 20 20 20 20 20 7d 20 0a 20 20 20 20 20  ;.      } .     
0d50: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0d60: 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 69  int64(context, i
0d70: 56 61 6c 29 3b 0a 20 20 20 20 20 20 62 72 65 61  Val);.      brea
0d80: 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73  k;.    }.    cas
0d90: 65 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b  e SQLITE_NULL: {
0da0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
0db0: 65 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65  esult_null(conte
0dc0: 78 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b  xt);.      break
0dd0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61  ;.    }.    defa
0de0: 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20 64 6f 75  ult: {.      dou
0df0: 62 6c 65 20 72 56 61 6c 20 3d 20 73 71 6c 69 74  ble rVal = sqlit
0e00: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28  e3_value_double(
0e10: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20  argv[0]);.      
0e20: 69 66 28 20 72 56 61 6c 3c 30 20 29 20 72 56 61  if( rVal<0 ) rVa
0e30: 6c 20 3d 20 2d 72 56 61 6c 3b 0a 20 20 20 20 20  l = -rVal;.     
0e40: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0e50: 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20  double(context, 
0e60: 72 56 61 6c 29 3b 0a 20 20 20 20 20 20 62 72 65  rVal);.      bre
0e70: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a  ak;.    }.  }.}.
0e80: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
0e90: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 75 62  ation of the sub
0ea0: 73 74 72 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a  str() function..
0eb0: 2a 2a 0a 2a 2a 20 73 75 62 73 74 72 28 78 2c 70  **.** substr(x,p
0ec0: 31 2c 70 32 29 20 20 72 65 74 75 72 6e 73 20 70  1,p2)  returns p
0ed0: 32 20 63 68 61 72 61 63 74 65 72 73 20 6f 66 20  2 characters of 
0ee0: 78 5b 5d 20 62 65 67 69 6e 6e 69 6e 67 20 77 69  x[] beginning wi
0ef0: 74 68 20 70 31 2e 0a 2a 2a 20 70 31 20 69 73 20  th p1..** p1 is 
0f00: 31 2d 69 6e 64 65 78 65 64 2e 20 20 53 6f 20 73  1-indexed.  So s
0f10: 75 62 73 74 72 28 78 2c 31 2c 31 29 20 72 65 74  ubstr(x,1,1) ret
0f20: 75 72 6e 73 20 74 68 65 20 66 69 72 73 74 20 63  urns the first c
0f30: 68 61 72 61 63 74 65 72 0a 2a 2a 20 6f 66 20 78  haracter.** of x
0f40: 2e 20 20 49 66 20 78 20 69 73 20 74 65 78 74 2c  .  If x is text,
0f50: 20 74 68 65 6e 20 77 65 20 61 63 74 75 61 6c 6c   then we actuall
0f60: 79 20 63 6f 75 6e 74 20 55 54 46 2d 38 20 63 68  y count UTF-8 ch
0f70: 61 72 61 63 74 65 72 73 2e 0a 2a 2a 20 49 66 20  aracters..** If 
0f80: 78 20 69 73 20 61 20 62 6c 6f 62 2c 20 74 68 65  x is a blob, the
0f90: 6e 20 77 65 20 63 6f 75 6e 74 20 62 79 74 65 73  n we count bytes
0fa0: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 70 31 20 69 73  ..**.** If p1 is
0fb0: 20 6e 65 67 61 74 69 76 65 2c 20 74 68 65 6e 20   negative, then 
0fc0: 77 65 20 62 65 67 69 6e 20 61 62 73 28 70 31 29  we begin abs(p1)
0fd0: 20 66 72 6f 6d 20 74 68 65 20 65 6e 64 20 6f 66   from the end of
0fe0: 20 78 5b 5d 2e 0a 2a 2f 0a 73 74 61 74 69 63 20   x[]..*/.static 
0ff0: 76 6f 69 64 20 73 75 62 73 74 72 46 75 6e 63 28  void substrFunc(
1000: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
1010: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
1020: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
1030: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
1040: 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  ){.  const unsig
1050: 6e 65 64 20 63 68 61 72 20 2a 7a 3b 0a 20 20 63  ned char *z;.  c
1060: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
1070: 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74 20 6c 65  ar *z2;.  int le
1080: 6e 3b 0a 20 20 69 6e 74 20 70 30 74 79 70 65 3b  n;.  int p0type;
1090: 0a 20 20 69 36 34 20 70 31 2c 20 70 32 3b 0a 20  .  i64 p1, p2;. 
10a0: 20 69 6e 74 20 6e 65 67 50 32 20 3d 20 30 3b 0a   int negP2 = 0;.
10b0: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
10c0: 3d 33 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b  =3 || argc==2 );
10d0: 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76  .  if( sqlite3_v
10e0: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31  alue_type(argv[1
10f0: 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a  ])==SQLITE_NULL.
1100: 20 20 20 7c 7c 20 28 61 72 67 63 3d 3d 33 20 26     || (argc==3 &
1110: 26 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  & sqlite3_value_
1120: 74 79 70 65 28 61 72 67 76 5b 32 5d 29 3d 3d 53  type(argv[2])==S
1130: 51 4c 49 54 45 5f 4e 55 4c 4c 29 0a 20 20 29 7b  QLITE_NULL).  ){
1140: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
1150: 0a 20 20 70 30 74 79 70 65 20 3d 20 73 71 6c 69  .  p0type = sqli
1160: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
1170: 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 70  rgv[0]);.  if( p
1180: 30 74 79 70 65 3d 3d 53 51 4c 49 54 45 5f 42 4c  0type==SQLITE_BL
1190: 4f 42 20 29 7b 0a 20 20 20 20 6c 65 6e 20 3d 20  OB ){.    len = 
11a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
11b0: 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  tes(argv[0]);.  
11c0: 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61    z = sqlite3_va
11d0: 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d  lue_blob(argv[0]
11e0: 29 3b 0a 20 20 20 20 69 66 28 20 7a 3d 3d 30 20  );.    if( z==0 
11f0: 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 61 73  ) return;.    as
1200: 73 65 72 74 28 20 6c 65 6e 3d 3d 73 71 6c 69 74  sert( len==sqlit
1210: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
1220: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 7d 65 6c  rgv[0]) );.  }el
1230: 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73 71 6c 69  se{.    z = sqli
1240: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
1250: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28  rgv[0]);.    if(
1260: 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a   z==0 ) return;.
1270: 20 20 20 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20      len = 0;.   
1280: 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32 3b 20   for(z2=z; *z2; 
1290: 6c 65 6e 2b 2b 29 7b 0a 20 20 20 20 20 20 53 51  len++){.      SQ
12a0: 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a  LITE_SKIP_UTF8(z
12b0: 32 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20  2);.    }.  }.  
12c0: 70 31 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  p1 = sqlite3_val
12d0: 75 65 5f 69 6e 74 28 61 72 67 76 5b 31 5d 29 3b  ue_int(argv[1]);
12e0: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29  .  if( argc==3 )
12f0: 7b 0a 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74  {.    p2 = sqlit
1300: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67  e3_value_int(arg
1310: 76 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 70  v[2]);.    if( p
1320: 32 3c 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20  2<0 ){.      p2 
1330: 3d 20 2d 70 32 3b 0a 20 20 20 20 20 20 6e 65 67  = -p2;.      neg
1340: 50 32 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20  P2 = 1;.    }.  
1350: 7d 65 6c 73 65 7b 0a 20 20 20 20 70 32 20 3d 20  }else{.    p2 = 
1360: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
1370: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
1380: 74 29 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  t)->aLimit[SQLIT
1390: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b  E_LIMIT_LENGTH];
13a0: 0a 20 20 7d 0a 20 20 69 66 28 20 70 31 3c 30 20  .  }.  if( p1<0 
13b0: 29 7b 0a 20 20 20 20 70 31 20 2b 3d 20 6c 65 6e  ){.    p1 += len
13c0: 3b 0a 20 20 20 20 69 66 28 20 70 31 3c 30 20 29  ;.    if( p1<0 )
13d0: 7b 0a 20 20 20 20 20 20 70 32 20 2b 3d 20 70 31  {.      p2 += p1
13e0: 3b 0a 20 20 20 20 20 20 69 66 28 20 70 32 3c 30  ;.      if( p2<0
13f0: 20 29 20 70 32 20 3d 20 30 3b 0a 20 20 20 20 20   ) p2 = 0;.     
1400: 20 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20   p1 = 0;.    }. 
1410: 20 7d 65 6c 73 65 20 69 66 28 20 70 31 3e 30 20   }else if( p1>0 
1420: 29 7b 0a 20 20 20 20 70 31 2d 2d 3b 0a 20 20 7d  ){.    p1--;.  }
1430: 65 6c 73 65 20 69 66 28 20 70 32 3e 30 20 29 7b  else if( p2>0 ){
1440: 0a 20 20 20 20 70 32 2d 2d 3b 0a 20 20 7d 0a 20  .    p2--;.  }. 
1450: 20 69 66 28 20 6e 65 67 50 32 20 29 7b 0a 20 20   if( negP2 ){.  
1460: 20 20 70 31 20 2d 3d 20 70 32 3b 0a 20 20 20 20    p1 -= p2;.    
1470: 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20  if( p1<0 ){.    
1480: 20 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20    p2 += p1;.    
1490: 20 20 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a    p1 = 0;.    }.
14a0: 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 31    }.  assert( p1
14b0: 3e 3d 30 20 26 26 20 70 32 3e 3d 30 20 29 3b 0a  >=0 && p2>=0 );.
14c0: 20 20 69 66 28 20 70 31 2b 70 32 3e 6c 65 6e 20    if( p1+p2>len 
14d0: 29 7b 0a 20 20 20 20 70 32 20 3d 20 6c 65 6e 2d  ){.    p2 = len-
14e0: 70 31 3b 0a 20 20 20 20 69 66 28 20 70 32 3c 30  p1;.    if( p2<0
14f0: 20 29 20 70 32 20 3d 20 30 3b 0a 20 20 7d 0a 20   ) p2 = 0;.  }. 
1500: 20 69 66 28 20 70 30 74 79 70 65 21 3d 53 51 4c   if( p0type!=SQL
1510: 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20 20 20  ITE_BLOB ){.    
1520: 77 68 69 6c 65 28 20 2a 7a 20 26 26 20 70 31 20  while( *z && p1 
1530: 29 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f  ){.      SQLITE_
1540: 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20  SKIP_UTF8(z);.  
1550: 20 20 20 20 70 31 2d 2d 3b 0a 20 20 20 20 7d 0a      p1--;.    }.
1560: 20 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a      for(z2=z; *z
1570: 32 20 26 26 20 70 32 3b 20 70 32 2d 2d 29 7b 0a  2 && p2; p2--){.
1580: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
1590: 50 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20 20 20  P_UTF8(z2);.    
15a0: 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  }.    sqlite3_re
15b0: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
15c0: 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 28 69 6e  t, (char*)z, (in
15d0: 74 29 28 7a 32 2d 7a 29 2c 20 53 51 4c 49 54 45  t)(z2-z), SQLITE
15e0: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d  _TRANSIENT);.  }
15f0: 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65  else{.    sqlite
1600: 33 5f 72 65 73 75 6c 74 5f 62 6c 6f 62 28 63 6f  3_result_blob(co
1610: 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 26 7a  ntext, (char*)&z
1620: 5b 70 31 5d 2c 20 28 69 6e 74 29 70 32 2c 20 53  [p1], (int)p2, S
1630: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29  QLITE_TRANSIENT)
1640: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  ;.  }.}../*.** I
1650: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
1660: 20 74 68 65 20 72 6f 75 6e 64 28 29 20 66 75 6e   the round() fun
1670: 63 74 69 6f 6e 0a 2a 2f 0a 23 69 66 6e 64 65 66  ction.*/.#ifndef
1680: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f   SQLITE_OMIT_FLO
1690: 41 54 49 4e 47 5f 50 4f 49 4e 54 0a 73 74 61 74  ATING_POINT.stat
16a0: 69 63 20 76 6f 69 64 20 72 6f 75 6e 64 46 75 6e  ic void roundFun
16b0: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
16c0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
16d0: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
16e0: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 69  lue **argv){.  i
16f0: 6e 74 20 6e 20 3d 20 30 3b 0a 20 20 64 6f 75 62  nt n = 0;.  doub
1700: 6c 65 20 72 3b 0a 20 20 63 68 61 72 20 7a 42 75  le r;.  char zBu
1710: 66 5b 35 30 30 5d 3b 20 20 2f 2a 20 6c 61 72 67  f[500];  /* larg
1720: 65 72 20 74 68 61 6e 20 74 68 65 20 25 66 20 72  er than the %f r
1730: 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f 66  epresentation of
1740: 20 74 68 65 20 6c 61 72 67 65 73 74 20 64 6f 75   the largest dou
1750: 62 6c 65 20 2a 2f 0a 20 20 61 73 73 65 72 74 28  ble */.  assert(
1760: 20 61 72 67 63 3d 3d 31 20 7c 7c 20 61 72 67 63   argc==1 || argc
1770: 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20 61 72 67  ==2 );.  if( arg
1780: 63 3d 3d 32 20 29 7b 0a 20 20 20 20 69 66 28 20  c==2 ){.    if( 
1790: 53 51 4c 49 54 45 5f 4e 55 4c 4c 3d 3d 73 71 6c  SQLITE_NULL==sql
17a0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
17b0: 61 72 67 76 5b 31 5d 29 20 29 20 72 65 74 75 72  argv[1]) ) retur
17c0: 6e 3b 0a 20 20 20 20 6e 20 3d 20 73 71 6c 69 74  n;.    n = sqlit
17d0: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67  e3_value_int(arg
17e0: 76 5b 31 5d 29 3b 0a 20 20 20 20 69 66 28 20 6e  v[1]);.    if( n
17f0: 3e 33 30 20 29 20 6e 20 3d 20 33 30 3b 0a 20 20  >30 ) n = 30;.  
1800: 20 20 69 66 28 20 6e 3c 30 20 29 20 6e 20 3d 20    if( n<0 ) n = 
1810: 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 73 71 6c  0;.  }.  if( sql
1820: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
1830: 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45  argv[0])==SQLITE
1840: 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a  _NULL ) return;.
1850: 20 20 72 20 3d 20 73 71 6c 69 74 65 33 5f 76 61    r = sqlite3_va
1860: 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b  lue_double(argv[
1870: 30 5d 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 73  0]);.  sqlite3_s
1880: 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66 28 7a  nprintf(sizeof(z
1890: 42 75 66 29 2c 7a 42 75 66 2c 22 25 2e 2a 66 22  Buf),zBuf,"%.*f"
18a0: 2c 6e 2c 72 29 3b 0a 20 20 73 71 6c 69 74 65 33  ,n,r);.  sqlite3
18b0: 41 74 6f 46 28 7a 42 75 66 2c 20 26 72 29 3b 0a  AtoF(zBuf, &r);.
18c0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
18d0: 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c  _double(context,
18e0: 20 72 29 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f   r);.}.#endif../
18f0: 2a 0a 2a 2a 20 41 6c 6c 6f 63 61 74 65 20 6e 42  *.** Allocate nB
1900: 79 74 65 20 62 79 74 65 73 20 6f 66 20 73 70 61  yte bytes of spa
1910: 63 65 20 75 73 69 6e 67 20 73 71 6c 69 74 65 33  ce using sqlite3
1920: 5f 6d 61 6c 6c 6f 63 28 29 2e 20 49 66 20 74 68  _malloc(). If th
1930: 65 0a 2a 2a 20 61 6c 6c 6f 63 61 74 69 6f 6e 20  e.** allocation 
1940: 66 61 69 6c 73 2c 20 63 61 6c 6c 20 73 71 6c 69  fails, call sqli
1950: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
1960: 5f 6e 6f 6d 65 6d 28 29 20 74 6f 20 6e 6f 74 69  _nomem() to noti
1970: 66 79 0a 2a 2a 20 74 68 65 20 64 61 74 61 62 61  fy.** the databa
1980: 73 65 20 68 61 6e 64 6c 65 20 74 68 61 74 20 6d  se handle that m
1990: 61 6c 6c 6f 63 28 29 20 68 61 73 20 66 61 69 6c  alloc() has fail
19a0: 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  ed..*/.static vo
19b0: 69 64 20 2a 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  id *contextMallo
19c0: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
19d0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 36 34 20  t *context, i64 
19e0: 6e 42 79 74 65 29 7b 0a 20 20 63 68 61 72 20 2a  nByte){.  char *
19f0: 7a 3b 0a 20 20 69 66 28 20 6e 42 79 74 65 3e 73  z;.  if( nByte>s
1a00: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
1a10: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
1a20: 29 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45  )->aLimit[SQLITE
1a30: 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29  _LIMIT_LENGTH] )
1a40: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  {.    sqlite3_re
1a50: 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69  sult_error_toobi
1a60: 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  g(context);.    
1a70: 7a 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a  z = 0;.  }else{.
1a80: 20 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 4d      z = sqlite3M
1a90: 61 6c 6c 6f 63 28 28 69 6e 74 29 6e 42 79 74 65  alloc((int)nByte
1aa0: 29 3b 0a 20 20 20 20 69 66 28 20 21 7a 20 26 26  );.    if( !z &&
1ab0: 20 6e 42 79 74 65 3e 30 20 29 7b 0a 20 20 20 20   nByte>0 ){.    
1ac0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
1ad0: 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e  _error_nomem(con
1ae0: 74 65 78 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  text);.    }.  }
1af0: 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a  .  return z;.}..
1b00: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
1b10: 74 69 6f 6e 20 6f 66 20 74 68 65 20 75 70 70 65  tion of the uppe
1b20: 72 28 29 20 61 6e 64 20 6c 6f 77 65 72 28 29 20  r() and lower() 
1b30: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a  SQL functions..*
1b40: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 75 70  /.static void up
1b50: 70 65 72 46 75 6e 63 28 73 71 6c 69 74 65 33 5f  perFunc(sqlite3_
1b60: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
1b70: 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69  , int argc, sqli
1b80: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
1b90: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 31 3b 0a 20  ){.  char *z1;. 
1ba0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b   const char *z2;
1bb0: 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55  .  int i, n;.  U
1bc0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
1bd0: 61 72 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63  argc);.  z2 = (c
1be0: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
1bf0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
1c00: 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  n = sqlite3_
1c10: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
1c20: 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66  [0]);.  /* Verif
1c30: 79 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c 20  y that the call 
1c40: 74 6f 20 5f 62 79 74 65 73 28 29 20 64 6f 65 73  to _bytes() does
1c50: 20 6e 6f 74 20 69 6e 76 61 6c 69 64 61 74 65 20   not invalidate 
1c60: 74 68 65 20 5f 74 65 78 74 28 29 20 70 6f 69 6e  the _text() poin
1c70: 74 65 72 20 2a 2f 0a 20 20 61 73 73 65 72 74 28  ter */.  assert(
1c80: 20 7a 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69   z2==(char*)sqli
1c90: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
1ca0: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28  rgv[0]) );.  if(
1cb0: 20 7a 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20   z2 ){.    z1 = 
1cc0: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
1cd0: 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2b  ntext, ((i64)n)+
1ce0: 31 29 3b 0a 20 20 20 20 69 66 28 20 7a 31 20 29  1);.    if( z1 )
1cf0: 7b 0a 20 20 20 20 20 20 6d 65 6d 63 70 79 28 7a  {.      memcpy(z
1d00: 31 2c 20 7a 32 2c 20 6e 2b 31 29 3b 0a 20 20 20  1, z2, n+1);.   
1d10: 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 31 5b 69     for(i=0; z1[i
1d20: 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  ]; i++){.       
1d30: 20 7a 31 5b 69 5d 20 3d 20 28 63 68 61 72 29 73   z1[i] = (char)s
1d40: 71 6c 69 74 65 33 54 6f 75 70 70 65 72 28 7a 31  qlite3Toupper(z1
1d50: 5b 69 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  [i]);.      }.  
1d60: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
1d70: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
1d80: 20 7a 31 2c 20 2d 31 2c 20 73 71 6c 69 74 65 33   z1, -1, sqlite3
1d90: 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20  _free);.    }.  
1da0: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
1db0: 6c 6f 77 65 72 46 75 6e 63 28 73 71 6c 69 74 65  lowerFunc(sqlite
1dc0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
1dd0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
1de0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
1df0: 67 76 29 7b 0a 20 20 75 38 20 2a 7a 31 3b 0a 20  gv){.  u8 *z1;. 
1e00: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b   const char *z2;
1e10: 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55  .  int i, n;.  U
1e20: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
1e30: 61 72 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63  argc);.  z2 = (c
1e40: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
1e50: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
1e60: 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  n = sqlite3_
1e70: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
1e80: 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66  [0]);.  /* Verif
1e90: 79 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c 20  y that the call 
1ea0: 74 6f 20 5f 62 79 74 65 73 28 29 20 64 6f 65 73  to _bytes() does
1eb0: 20 6e 6f 74 20 69 6e 76 61 6c 69 64 61 74 65 20   not invalidate 
1ec0: 74 68 65 20 5f 74 65 78 74 28 29 20 70 6f 69 6e  the _text() poin
1ed0: 74 65 72 20 2a 2f 0a 20 20 61 73 73 65 72 74 28  ter */.  assert(
1ee0: 20 7a 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69   z2==(char*)sqli
1ef0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
1f00: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28  rgv[0]) );.  if(
1f10: 20 7a 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20   z2 ){.    z1 = 
1f20: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
1f30: 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2b  ntext, ((i64)n)+
1f40: 31 29 3b 0a 20 20 20 20 69 66 28 20 7a 31 20 29  1);.    if( z1 )
1f50: 7b 0a 20 20 20 20 20 20 6d 65 6d 63 70 79 28 7a  {.      memcpy(z
1f60: 31 2c 20 7a 32 2c 20 6e 2b 31 29 3b 0a 20 20 20  1, z2, n+1);.   
1f70: 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 31 5b 69     for(i=0; z1[i
1f80: 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  ]; i++){.       
1f90: 20 7a 31 5b 69 5d 20 3d 20 73 71 6c 69 74 65 33   z1[i] = sqlite3
1fa0: 54 6f 6c 6f 77 65 72 28 7a 31 5b 69 5d 29 3b 0a  Tolower(z1[i]);.
1fb0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71        }.      sq
1fc0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
1fd0: 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72  t(context, (char
1fe0: 20 2a 29 7a 31 2c 20 2d 31 2c 20 73 71 6c 69 74   *)z1, -1, sqlit
1ff0: 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a  e3_free);.    }.
2000: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70    }.}../*.** Imp
2010: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
2020: 68 65 20 49 46 4e 55 4c 4c 28 29 2c 20 4e 56 4c  he IFNULL(), NVL
2030: 28 29 2c 20 61 6e 64 20 43 4f 41 4c 45 53 43 45  (), and COALESCE
2040: 28 29 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 0a  () functions.  .
2050: 2a 2a 20 41 6c 6c 20 74 68 72 65 65 20 64 6f 20  ** All three do 
2060: 74 68 65 20 73 61 6d 65 20 74 68 69 6e 67 2e 20  the same thing. 
2070: 20 54 68 65 79 20 72 65 74 75 72 6e 20 74 68 65   They return the
2080: 20 66 69 72 73 74 20 6e 6f 6e 2d 4e 55 4c 4c 0a   first non-NULL.
2090: 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a  ** argument..*/.
20a0: 73 74 61 74 69 63 20 76 6f 69 64 20 69 66 6e 75  static void ifnu
20b0: 6c 6c 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  llFunc(.  sqlite
20c0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
20d0: 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a  xt,.  int argc,.
20e0: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
20f0: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20  **argv.){.  int 
2100: 69 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c  i;.  for(i=0; i<
2110: 61 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  argc; i++){.    
2120: 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 21  if( SQLITE_NULL!
2130: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
2140: 79 70 65 28 61 72 67 76 5b 69 5d 29 20 29 7b 0a  ype(argv[i]) ){.
2150: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
2160: 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65  sult_value(conte
2170: 78 74 2c 20 61 72 67 76 5b 69 5d 29 3b 0a 20 20  xt, argv[i]);.  
2180: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
2190: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
21a0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
21b0: 72 61 6e 64 6f 6d 28 29 2e 20 20 52 65 74 75 72  random().  Retur
21c0: 6e 20 61 20 72 61 6e 64 6f 6d 20 69 6e 74 65 67  n a random integ
21d0: 65 72 2e 20 20 0a 2a 2f 0a 73 74 61 74 69 63 20  er.  .*/.static 
21e0: 76 6f 69 64 20 72 61 6e 64 6f 6d 46 75 6e 63 28  void randomFunc(
21f0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
2200: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
2210: 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71  nt NotUsed,.  sq
2220: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f  lite3_value **No
2230: 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c 69  tUsed2.){.  sqli
2240: 74 65 5f 69 6e 74 36 34 20 72 3b 0a 20 20 55 4e  te_int64 r;.  UN
2250: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28  USED_PARAMETER2(
2260: 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64  NotUsed, NotUsed
2270: 32 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 61  2);.  sqlite3_ra
2280: 6e 64 6f 6d 6e 65 73 73 28 73 69 7a 65 6f 66 28  ndomness(sizeof(
2290: 72 29 2c 20 26 72 29 3b 0a 20 20 69 66 28 20 28  r), &r);.  if( (
22a0: 72 3c 3c 31 29 3d 3d 30 20 29 20 72 20 3d 20 30  r<<1)==0 ) r = 0
22b0: 3b 20 20 2f 2a 20 50 72 65 76 65 6e 74 20 30 78  ;  /* Prevent 0x
22c0: 38 30 30 30 2e 2e 2e 2e 20 61 73 20 74 68 65 20  8000.... as the 
22d0: 72 65 73 75 6c 74 20 73 6f 20 74 68 61 74 20 77  result so that w
22e0: 65 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 20  e */.           
22f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
2300: 2a 20 63 61 6e 20 61 6c 77 61 79 73 20 64 6f 20  * can always do 
2310: 61 62 73 28 29 20 6f 66 20 74 68 65 20 72 65 73  abs() of the res
2320: 75 6c 74 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33  ult */.  sqlite3
2330: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f  _result_int64(co
2340: 6e 74 65 78 74 2c 20 72 29 3b 0a 7d 0a 0a 2f 2a  ntext, r);.}../*
2350: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
2360: 6f 6e 20 6f 66 20 72 61 6e 64 6f 6d 62 6c 6f 62  on of randomblob
2370: 28 4e 29 2e 20 20 52 65 74 75 72 6e 20 61 20 72  (N).  Return a r
2380: 61 6e 64 6f 6d 20 62 6c 6f 62 0a 2a 2a 20 74 68  andom blob.** th
2390: 61 74 20 69 73 20 4e 20 62 79 74 65 73 20 6c 6f  at is N bytes lo
23a0: 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  ng..*/.static vo
23b0: 69 64 20 72 61 6e 64 6f 6d 42 6c 6f 62 28 0a 20  id randomBlob(. 
23c0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
23d0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
23e0: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
23f0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
2400: 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 75 6e 73 69  .  int n;.  unsi
2410: 67 6e 65 64 20 63 68 61 72 20 2a 70 3b 0a 20 20  gned char *p;.  
2420: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
2430: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
2440: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 6e  METER(argc);.  n
2450: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
2460: 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  _int(argv[0]);. 
2470: 20 69 66 28 20 6e 3c 31 20 29 7b 0a 20 20 20 20   if( n<1 ){.    
2480: 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 70 20 3d  n = 1;.  }.  p =
2490: 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63   contextMalloc(c
24a0: 6f 6e 74 65 78 74 2c 20 6e 29 3b 0a 20 20 69 66  ontext, n);.  if
24b0: 28 20 70 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  ( p ){.    sqlit
24c0: 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73 28 6e 2c  e3_randomness(n,
24d0: 20 70 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33   p);.    sqlite3
24e0: 5f 72 65 73 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e  _result_blob(con
24f0: 74 65 78 74 2c 20 28 63 68 61 72 2a 29 70 2c 20  text, (char*)p, 
2500: 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29  n, sqlite3_free)
2510: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  ;.  }.}../*.** I
2520: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
2530: 20 74 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74   the last_insert
2540: 5f 72 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e  _rowid() SQL fun
2550: 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 74 75  ction.  The retu
2560: 72 6e 0a 2a 2a 20 76 61 6c 75 65 20 69 73 20 74  rn.** value is t
2570: 68 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 73  he same as the s
2580: 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65  qlite3_last_inse
2590: 72 74 5f 72 6f 77 69 64 28 29 20 41 50 49 20 66  rt_rowid() API f
25a0: 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74  unction..*/.stat
25b0: 69 63 20 76 6f 69 64 20 6c 61 73 74 5f 69 6e 73  ic void last_ins
25c0: 65 72 74 5f 72 6f 77 69 64 28 0a 20 20 73 71 6c  ert_rowid(.  sql
25d0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
25e0: 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 4e 6f  ntext, .  int No
25f0: 74 55 73 65 64 2c 20 0a 20 20 73 71 6c 69 74 65  tUsed, .  sqlite
2600: 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65  3_value **NotUse
2610: 64 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20  d2.){.  sqlite3 
2620: 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  *db = sqlite3_co
2630: 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28  ntext_db_handle(
2640: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53  context);.  UNUS
2650: 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f  ED_PARAMETER2(No
2660: 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29  tUsed, NotUsed2)
2670: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  ;.  sqlite3_resu
2680: 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74  lt_int64(context
2690: 2c 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69  , sqlite3_last_i
26a0: 6e 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29  nsert_rowid(db))
26b0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
26c0: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
26d0: 20 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66   changes() SQL f
26e0: 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65  unction.  The re
26f0: 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68  turn value is th
2700: 65 0a 2a 2a 20 73 61 6d 65 20 61 73 20 74 68 65  e.** same as the
2710: 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73   sqlite3_changes
2720: 28 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e  () API function.
2730: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
2740: 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69 74  changes(.  sqlit
2750: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
2760: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
2770: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
2780: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
2790: 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  {.  sqlite3 *db 
27a0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
27b0: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
27c0: 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  ext);.  UNUSED_P
27d0: 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65  ARAMETER2(NotUse
27e0: 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20  d, NotUsed2);.  
27f0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
2800: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  nt(context, sqli
2810: 74 65 33 5f 63 68 61 6e 67 65 73 28 64 62 29 29  te3_changes(db))
2820: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
2830: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
2840: 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29   total_changes()
2850: 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20   SQL function.  
2860: 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65  The return value
2870: 20 69 73 0a 2a 2a 20 74 68 65 20 73 61 6d 65 20   is.** the same 
2880: 61 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 74  as the sqlite3_t
2890: 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20 41  otal_changes() A
28a0: 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a  PI function..*/.
28b0: 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74 61  static void tota
28c0: 6c 5f 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c  l_changes(.  sql
28d0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
28e0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74  ntext,.  int Not
28f0: 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f  Used,.  sqlite3_
2900: 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32  value **NotUsed2
2910: 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  .){.  sqlite3 *d
2920: 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  b = sqlite3_cont
2930: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
2940: 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44  ntext);.  UNUSED
2950: 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55  _PARAMETER2(NotU
2960: 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a  sed, NotUsed2);.
2970: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2980: 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  _int(context, sq
2990: 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e  lite3_total_chan
29a0: 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a  ges(db));.}../*.
29b0: 2a 2a 20 41 20 73 74 72 75 63 74 75 72 65 20 64  ** A structure d
29c0: 65 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64  efining how to d
29d0: 6f 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d  o GLOB-style com
29e0: 70 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72  parisons..*/.str
29f0: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
2a00: 7b 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b  {.  u8 matchAll;
2a10: 0a 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a  .  u8 matchOne;.
2a20: 20 20 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20    u8 matchSet;. 
2a30: 20 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a   u8 noCase;.};..
2a40: 2f 2a 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45 20 61  /*.** For LIKE a
2a50: 6e 64 20 47 4c 4f 42 20 6d 61 74 63 68 69 6e 67  nd GLOB matching
2a60: 20 6f 6e 20 45 42 43 44 49 43 20 6d 61 63 68 69   on EBCDIC machi
2a70: 6e 65 73 2c 20 61 73 73 75 6d 65 20 74 68 61 74  nes, assume that
2a80: 20 65 76 65 72 79 0a 2a 2a 20 63 68 61 72 61 63   every.** charac
2a90: 74 65 72 20 69 73 20 65 78 61 63 74 6c 79 20 6f  ter is exactly o
2aa0: 6e 65 20 62 79 74 65 20 69 6e 20 73 69 7a 65 2e  ne byte in size.
2ab0: 20 20 41 6c 73 6f 2c 20 61 6c 6c 20 63 68 61 72    Also, all char
2ac0: 61 63 74 65 72 73 20 61 72 65 0a 2a 2a 20 61 62  acters are.** ab
2ad0: 6c 65 20 74 6f 20 70 61 72 74 69 63 69 70 61 74  le to participat
2ae0: 65 20 69 6e 20 75 70 70 65 72 2d 63 61 73 65 2d  e in upper-case-
2af0: 74 6f 2d 6c 6f 77 65 72 2d 63 61 73 65 20 6d 61  to-lower-case ma
2b00: 70 70 69 6e 67 73 20 69 6e 20 45 42 43 44 49 43  ppings in EBCDIC
2b10: 0a 2a 2a 20 77 68 65 72 65 61 73 20 6f 6e 6c 79  .** whereas only
2b20: 20 63 68 61 72 61 63 74 65 72 73 20 6c 65 73 73   characters less
2b30: 20 74 68 61 6e 20 30 78 38 30 20 64 6f 20 69 6e   than 0x80 do in
2b40: 20 41 53 43 49 49 2e 0a 2a 2f 0a 23 69 66 20 64   ASCII..*/.#if d
2b50: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 45 42  efined(SQLITE_EB
2b60: 43 44 49 43 29 0a 23 20 64 65 66 69 6e 65 20 73  CDIC).# define s
2b70: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 41  qlite3Utf8Read(A
2b80: 2c 42 2c 43 29 20 20 28 2a 28 41 2b 2b 29 29 0a  ,B,C)  (*(A++)).
2b90: 23 20 64 65 66 69 6e 65 20 47 6c 6f 67 55 70 70  # define GlogUpp
2ba0: 65 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20 20  erToLower(A)    
2bb0: 20 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65   A = sqlite3Uppe
2bc0: 72 54 6f 4c 6f 77 65 72 5b 41 5d 0a 23 65 6c 73  rToLower[A].#els
2bd0: 65 0a 23 20 64 65 66 69 6e 65 20 47 6c 6f 67 55  e.# define GlogU
2be0: 70 70 65 72 54 6f 4c 6f 77 65 72 28 41 29 20 20  pperToLower(A)  
2bf0: 20 20 20 69 66 28 20 41 3c 30 78 38 30 20 29 7b     if( A<0x80 ){
2c00: 20 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65   A = sqlite3Uppe
2c10: 72 54 6f 4c 6f 77 65 72 5b 41 5d 3b 20 7d 0a 23  rToLower[A]; }.#
2c20: 65 6e 64 69 66 0a 0a 73 74 61 74 69 63 20 63 6f  endif..static co
2c30: 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61  nst struct compa
2c40: 72 65 49 6e 66 6f 20 67 6c 6f 62 49 6e 66 6f 20  reInfo globInfo 
2c50: 3d 20 7b 20 27 2a 27 2c 20 27 3f 27 2c 20 27 5b  = { '*', '?', '[
2c60: 27 2c 20 30 20 7d 3b 0a 2f 2a 20 54 68 65 20 63  ', 0 };./* The c
2c70: 6f 72 72 65 63 74 20 53 51 4c 2d 39 32 20 62 65  orrect SQL-92 be
2c80: 68 61 76 69 6f 72 20 69 73 20 66 6f 72 20 74 68  havior is for th
2c90: 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20  e LIKE operator 
2ca0: 74 6f 20 69 67 6e 6f 72 65 0a 2a 2a 20 63 61 73  to ignore.** cas
2cb0: 65 2e 20 20 54 68 75 73 20 20 27 61 27 20 4c 49  e.  Thus  'a' LI
2cc0: 4b 45 20 27 41 27 20 77 6f 75 6c 64 20 62 65 20  KE 'A' would be 
2cd0: 74 72 75 65 2e 20 2a 2f 0a 73 74 61 74 69 63 20  true. */.static 
2ce0: 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d  const struct com
2cf0: 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e 66  pareInfo likeInf
2d00: 6f 4e 6f 72 6d 20 3d 20 7b 20 27 25 27 2c 20 27  oNorm = { '%', '
2d10: 5f 27 2c 20 20 20 30 2c 20 31 20 7d 3b 0a 2f 2a  _',   0, 1 };./*
2d20: 20 49 66 20 53 51 4c 49 54 45 5f 43 41 53 45 5f   If SQLITE_CASE_
2d30: 53 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45 20 69  SENSITIVE_LIKE i
2d40: 73 20 64 65 66 69 6e 65 64 2c 20 74 68 65 6e 20  s defined, then 
2d50: 74 68 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f  the LIKE operato
2d60: 72 0a 2a 2a 20 69 73 20 63 61 73 65 20 73 65 6e  r.** is case sen
2d70: 73 69 74 69 76 65 20 63 61 75 73 69 6e 67 20 27  sitive causing '
2d80: 61 27 20 4c 49 4b 45 20 27 41 27 20 74 6f 20 62  a' LIKE 'A' to b
2d90: 65 20 66 61 6c 73 65 20 2a 2f 0a 73 74 61 74 69  e false */.stati
2da0: 63 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63  c const struct c
2db0: 6f 6d 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49  ompareInfo likeI
2dc0: 6e 66 6f 41 6c 74 20 3d 20 7b 20 27 25 27 2c 20  nfoAlt = { '%', 
2dd0: 27 5f 27 2c 20 20 20 30 2c 20 30 20 7d 3b 0a 0a  '_',   0, 0 };..
2de0: 2f 2a 0a 2a 2a 20 43 6f 6d 70 61 72 65 20 74 77  /*.** Compare tw
2df0: 6f 20 55 54 46 2d 38 20 73 74 72 69 6e 67 73 20  o UTF-8 strings 
2e00: 66 6f 72 20 65 71 75 61 6c 69 74 79 20 77 68 65  for equality whe
2e10: 72 65 20 74 68 65 20 66 69 72 73 74 20 73 74 72  re the first str
2e20: 69 6e 67 20 63 61 6e 0a 2a 2a 20 70 6f 74 65 6e  ing can.** poten
2e30: 74 69 61 6c 6c 79 20 62 65 20 61 20 22 67 6c 6f  tially be a "glo
2e40: 62 22 20 65 78 70 72 65 73 73 69 6f 6e 2e 20 20  b" expression.  
2e50: 52 65 74 75 72 6e 20 74 72 75 65 20 28 31 29 20  Return true (1) 
2e60: 69 66 20 74 68 65 79 0a 2a 2a 20 61 72 65 20 74  if they.** are t
2e70: 68 65 20 73 61 6d 65 20 61 6e 64 20 66 61 6c 73  he same and fals
2e80: 65 20 28 30 29 20 69 66 20 74 68 65 79 20 61 72  e (0) if they ar
2e90: 65 20 64 69 66 66 65 72 65 6e 74 2e 0a 2a 2a 0a  e different..**.
2ea0: 2a 2a 20 47 6c 6f 62 62 69 6e 67 20 72 75 6c 65  ** Globbing rule
2eb0: 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 2a  s:.**.**      '*
2ec0: 27 20 20 20 20 20 20 20 4d 61 74 63 68 65 73 20  '       Matches 
2ed0: 61 6e 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20  any sequence of 
2ee0: 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61  zero or more cha
2ef0: 72 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20  racters..**.**  
2f00: 20 20 20 20 27 3f 27 20 20 20 20 20 20 20 4d 61      '?'       Ma
2f10: 74 63 68 65 73 20 65 78 61 63 74 6c 79 20 6f 6e  tches exactly on
2f20: 65 20 63 68 61 72 61 63 74 65 72 2e 0a 2a 2a 0a  e character..**.
2f30: 2a 2a 20 20 20 20 20 5b 2e 2e 2e 5d 20 20 20 20  **     [...]    
2f40: 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68    Matches one ch
2f50: 61 72 61 63 74 65 72 20 66 72 6f 6d 20 74 68 65  aracter from the
2f60: 20 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74 20 6f   enclosed list o
2f70: 66 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20  f.**            
2f80: 20 20 20 20 63 68 61 72 61 63 74 65 72 73 2e 0a      characters..
2f90: 2a 2a 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d  **.**     [^...]
2fa0: 20 20 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65       Matches one
2fb0: 20 63 68 61 72 61 63 74 65 72 20 6e 6f 74 20 69   character not i
2fc0: 6e 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c  n the enclosed l
2fd0: 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 57 69 74 68 20  ist..**.** With 
2fe0: 74 68 65 20 5b 2e 2e 2e 5d 20 61 6e 64 20 5b 5e  the [...] and [^
2ff0: 2e 2e 2e 5d 20 6d 61 74 63 68 69 6e 67 2c 20 61  ...] matching, a
3000: 20 27 5d 27 20 63 68 61 72 61 63 74 65 72 20 63   ']' character c
3010: 61 6e 20 62 65 20 69 6e 63 6c 75 64 65 64 0a 2a  an be included.*
3020: 2a 20 69 6e 20 74 68 65 20 6c 69 73 74 20 62 79  * in the list by
3030: 20 6d 61 6b 69 6e 67 20 69 74 20 74 68 65 20 66   making it the f
3040: 69 72 73 74 20 63 68 61 72 61 63 74 65 72 20 61  irst character a
3050: 66 74 65 72 20 27 5b 27 20 6f 72 20 27 5e 27 2e  fter '[' or '^'.
3060: 20 20 41 0a 2a 2a 20 72 61 6e 67 65 20 6f 66 20    A.** range of 
3070: 63 68 61 72 61 63 74 65 72 73 20 63 61 6e 20 62  characters can b
3080: 65 20 73 70 65 63 69 66 69 65 64 20 75 73 69 6e  e specified usin
3090: 67 20 27 2d 27 2e 20 20 45 78 61 6d 70 6c 65 3a  g '-'.  Example:
30a0: 0a 2a 2a 20 22 5b 61 2d 7a 5d 22 20 6d 61 74 63  .** "[a-z]" matc
30b0: 68 65 73 20 61 6e 79 20 73 69 6e 67 6c 65 20 6c  hes any single l
30c0: 6f 77 65 72 2d 63 61 73 65 20 6c 65 74 74 65 72  ower-case letter
30d0: 2e 20 20 54 6f 20 6d 61 74 63 68 20 61 20 27 2d  .  To match a '-
30e0: 27 2c 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 74 68  ', make.** it th
30f0: 65 20 6c 61 73 74 20 63 68 61 72 61 63 74 65 72  e last character
3100: 20 69 6e 20 74 68 65 20 6c 69 73 74 2e 0a 2a 2a   in the list..**
3110: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65  .** This routine
3120: 20 69 73 20 75 73 75 61 6c 6c 79 20 71 75 69 63   is usually quic
3130: 6b 2c 20 62 75 74 20 63 61 6e 20 62 65 20 4e 2a  k, but can be N*
3140: 2a 32 20 69 6e 20 74 68 65 20 77 6f 72 73 74 20  *2 in the worst 
3150: 63 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 48 69 6e 74  case..**.** Hint
3160: 73 3a 20 74 6f 20 6d 61 74 63 68 20 27 2a 27 20  s: to match '*' 
3170: 6f 72 20 27 3f 27 2c 20 70 75 74 20 74 68 65 6d  or '?', put them
3180: 20 69 6e 20 22 5b 5d 22 2e 20 20 4c 69 6b 65 20   in "[]".  Like 
3190: 74 68 69 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20  this:.**.**     
31a0: 20 20 20 20 61 62 63 5b 2a 5d 78 79 7a 20 20 20      abc[*]xyz   
31b0: 20 20 20 20 20 4d 61 74 63 68 65 73 20 22 61 62       Matches "ab
31c0: 63 2a 78 79 7a 22 20 6f 6e 6c 79 0a 2a 2f 0a 73  c*xyz" only.*/.s
31d0: 74 61 74 69 63 20 69 6e 74 20 70 61 74 74 65 72  tatic int patter
31e0: 6e 43 6f 6d 70 61 72 65 28 0a 20 20 63 6f 6e 73  nCompare(.  cons
31f0: 74 20 75 38 20 2a 7a 50 61 74 74 65 72 6e 2c 20  t u8 *zPattern, 
3200: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
3210: 54 68 65 20 67 6c 6f 62 20 70 61 74 74 65 72 6e  The glob pattern
3220: 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a   */.  const u8 *
3230: 7a 53 74 72 69 6e 67 2c 20 20 20 20 20 20 20 20  zString,        
3240: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 73 74         /* The st
3250: 72 69 6e 67 20 74 6f 20 63 6f 6d 70 61 72 65 20  ring to compare 
3260: 61 67 61 69 6e 73 74 20 74 68 65 20 67 6c 6f 62  against the glob
3270: 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 73 74 72 75   */.  const stru
3280: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a  ct compareInfo *
3290: 70 49 6e 66 6f 2c 20 2f 2a 20 49 6e 66 6f 72 6d  pInfo, /* Inform
32a0: 61 74 69 6f 6e 20 61 62 6f 75 74 20 68 6f 77 20  ation about how 
32b0: 74 6f 20 64 6f 20 74 68 65 20 63 6f 6d 70 61 72  to do the compar
32c0: 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 69 6e 74  e */.  const int
32d0: 20 65 73 63 20 20 20 20 20 20 20 20 20 20 20 20   esc            
32e0: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 65          /* The e
32f0: 73 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20  scape character 
3300: 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20 63 2c 20 63  */.){.  int c, c
3310: 32 3b 0a 20 20 69 6e 74 20 69 6e 76 65 72 74 3b  2;.  int invert;
3320: 0a 20 20 69 6e 74 20 73 65 65 6e 3b 0a 20 20 75  .  int seen;.  u
3330: 38 20 6d 61 74 63 68 4f 6e 65 20 3d 20 70 49 6e  8 matchOne = pIn
3340: 66 6f 2d 3e 6d 61 74 63 68 4f 6e 65 3b 0a 20 20  fo->matchOne;.  
3350: 75 38 20 6d 61 74 63 68 41 6c 6c 20 3d 20 70 49  u8 matchAll = pI
3360: 6e 66 6f 2d 3e 6d 61 74 63 68 41 6c 6c 3b 0a 20  nfo->matchAll;. 
3370: 20 75 38 20 6d 61 74 63 68 53 65 74 20 3d 20 70   u8 matchSet = p
3380: 49 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74 3b 0a  Info->matchSet;.
3390: 20 20 75 38 20 6e 6f 43 61 73 65 20 3d 20 70 49    u8 noCase = pI
33a0: 6e 66 6f 2d 3e 6e 6f 43 61 73 65 3b 20 0a 20 20  nfo->noCase; .  
33b0: 69 6e 74 20 70 72 65 76 45 73 63 61 70 65 20 3d  int prevEscape =
33c0: 20 30 3b 20 20 20 20 20 2f 2a 20 54 72 75 65 20   0;     /* True 
33d0: 69 66 20 74 68 65 20 70 72 65 76 69 6f 75 73 20  if the previous 
33e0: 63 68 61 72 61 63 74 65 72 20 77 61 73 20 27 65  character was 'e
33f0: 73 63 61 70 65 27 20 2a 2f 0a 0a 20 20 77 68 69  scape' */..  whi
3400: 6c 65 28 20 28 63 20 3d 20 73 71 6c 69 74 65 33  le( (c = sqlite3
3410: 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72  Utf8Read(zPatter
3420: 6e 2c 30 2c 26 7a 50 61 74 74 65 72 6e 29 29 21  n,0,&zPattern))!
3430: 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 21 70  =0 ){.    if( !p
3440: 72 65 76 45 73 63 61 70 65 20 26 26 20 63 3d 3d  revEscape && c==
3450: 6d 61 74 63 68 41 6c 6c 20 29 7b 0a 20 20 20 20  matchAll ){.    
3460: 20 20 77 68 69 6c 65 28 20 28 63 3d 73 71 6c 69    while( (c=sqli
3470: 74 65 33 55 74 66 38 52 65 61 64 28 7a 50 61 74  te3Utf8Read(zPat
3480: 74 65 72 6e 2c 30 2c 26 7a 50 61 74 74 65 72 6e  tern,0,&zPattern
3490: 29 29 20 3d 3d 20 6d 61 74 63 68 41 6c 6c 0a 20  )) == matchAll. 
34a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7c 7c                ||
34b0: 20 63 20 3d 3d 20 6d 61 74 63 68 4f 6e 65 20 29   c == matchOne )
34c0: 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 3d  {.        if( c=
34d0: 3d 6d 61 74 63 68 4f 6e 65 20 26 26 20 73 71 6c  =matchOne && sql
34e0: 69 74 65 33 55 74 66 38 52 65 61 64 28 7a 53 74  ite3Utf8Read(zSt
34f0: 72 69 6e 67 2c 20 30 2c 20 26 7a 53 74 72 69 6e  ring, 0, &zStrin
3500: 67 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  g)==0 ){.       
3510: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20     return 0;.   
3520: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20       }.      }. 
3530: 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29 7b       if( c==0 ){
3540: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20  .        return 
3550: 31 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 20 69  1;.      }else i
3560: 66 28 20 63 3d 3d 65 73 63 20 29 7b 0a 20 20 20  f( c==esc ){.   
3570: 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74 65 33       c = sqlite3
3580: 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72  Utf8Read(zPatter
3590: 6e 2c 20 30 2c 20 26 7a 50 61 74 74 65 72 6e 29  n, 0, &zPattern)
35a0: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 3d  ;.        if( c=
35b0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20  =0 ){.          
35c0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20  return 0;.      
35d0: 20 20 7d 0a 20 20 20 20 20 20 7d 65 6c 73 65 20    }.      }else 
35e0: 69 66 28 20 63 3d 3d 6d 61 74 63 68 53 65 74 20  if( c==matchSet 
35f0: 29 7b 0a 20 20 20 20 20 20 20 20 61 73 73 65 72  ){.        asser
3600: 74 28 20 65 73 63 3d 3d 30 20 29 3b 20 20 20 20  t( esc==0 );    
3610: 20 20 20 20 20 2f 2a 20 54 68 69 73 20 69 73 20       /* This is 
3620: 47 4c 4f 42 2c 20 6e 6f 74 20 4c 49 4b 45 20 2a  GLOB, not LIKE *
3630: 2f 0a 20 20 20 20 20 20 20 20 61 73 73 65 72 74  /.        assert
3640: 28 20 6d 61 74 63 68 53 65 74 3c 30 78 38 30 20  ( matchSet<0x80 
3650: 29 3b 20 20 2f 2a 20 27 5b 27 20 69 73 20 61 20  );  /* '[' is a 
3660: 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 68 61 72  single-byte char
3670: 61 63 74 65 72 20 2a 2f 0a 20 20 20 20 20 20 20  acter */.       
3680: 20 77 68 69 6c 65 28 20 2a 7a 53 74 72 69 6e 67   while( *zString
3690: 20 26 26 20 70 61 74 74 65 72 6e 43 6f 6d 70 61   && patternCompa
36a0: 72 65 28 26 7a 50 61 74 74 65 72 6e 5b 2d 31 5d  re(&zPattern[-1]
36b0: 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65  ,zString,pInfo,e
36c0: 73 63 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  sc)==0 ){.      
36d0: 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f      SQLITE_SKIP_
36e0: 55 54 46 38 28 7a 53 74 72 69 6e 67 29 3b 0a 20  UTF8(zString);. 
36f0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
3700: 20 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67   return *zString
3710: 21 3d 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  !=0;.      }.   
3720: 20 20 20 77 68 69 6c 65 28 20 28 63 32 20 3d 20     while( (c2 = 
3730: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
3740: 7a 53 74 72 69 6e 67 2c 30 2c 26 7a 53 74 72 69  zString,0,&zStri
3750: 6e 67 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 20  ng))!=0 ){.     
3760: 20 20 20 69 66 28 20 6e 6f 43 61 73 65 20 29 7b     if( noCase ){
3770: 0a 20 20 20 20 20 20 20 20 20 20 47 6c 6f 67 55  .          GlogU
3780: 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 32 29 3b  pperToLower(c2);
3790: 0a 20 20 20 20 20 20 20 20 20 20 47 6c 6f 67 55  .          GlogU
37a0: 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 29 3b 0a  pperToLower(c);.
37b0: 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28            while(
37c0: 20 63 32 20 21 3d 20 30 20 26 26 20 63 32 20 21   c2 != 0 && c2 !
37d0: 3d 20 63 20 29 7b 0a 20 20 20 20 20 20 20 20 20  = c ){.         
37e0: 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55     c2 = sqlite3U
37f0: 74 66 38 52 65 61 64 28 7a 53 74 72 69 6e 67 2c  tf8Read(zString,
3800: 20 30 2c 20 26 7a 53 74 72 69 6e 67 29 3b 0a 20   0, &zString);. 
3810: 20 20 20 20 20 20 20 20 20 20 20 47 6c 6f 67 55             GlogU
3820: 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 32 29 3b  pperToLower(c2);
3830: 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20  .          }.   
3840: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20       }else{.    
3850: 20 20 20 20 20 20 77 68 69 6c 65 28 20 63 32 20        while( c2 
3860: 21 3d 20 30 20 26 26 20 63 32 20 21 3d 20 63 20  != 0 && c2 != c 
3870: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 63  ){.            c
3880: 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52  2 = sqlite3Utf8R
3890: 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 30 2c 20  ead(zString, 0, 
38a0: 26 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20  &zString);.     
38b0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d       }.        }
38c0: 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 32 3d  .        if( c2=
38d0: 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20  =0 ) return 0;. 
38e0: 20 20 20 20 20 20 20 69 66 28 20 70 61 74 74 65         if( patte
38f0: 72 6e 43 6f 6d 70 61 72 65 28 7a 50 61 74 74 65  rnCompare(zPatte
3900: 72 6e 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f  rn,zString,pInfo
3910: 2c 65 73 63 29 20 29 20 72 65 74 75 72 6e 20 31  ,esc) ) return 1
3920: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
3930: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 7d 65  return 0;.    }e
3940: 6c 73 65 20 69 66 28 20 21 70 72 65 76 45 73 63  lse if( !prevEsc
3950: 61 70 65 20 26 26 20 63 3d 3d 6d 61 74 63 68 4f  ape && c==matchO
3960: 6e 65 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20  ne ){.      if( 
3970: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
3980: 7a 53 74 72 69 6e 67 2c 20 30 2c 20 26 7a 53 74  zString, 0, &zSt
3990: 72 69 6e 67 29 3d 3d 30 20 29 7b 0a 20 20 20 20  ring)==0 ){.    
39a0: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20      return 0;.  
39b0: 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 20      }.    }else 
39c0: 69 66 28 20 63 3d 3d 6d 61 74 63 68 53 65 74 20  if( c==matchSet 
39d0: 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 70 72 69  ){.      int pri
39e0: 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20  or_c = 0;.      
39f0: 61 73 73 65 72 74 28 20 65 73 63 3d 3d 30 20 29  assert( esc==0 )
3a00: 3b 20 20 20 20 2f 2a 20 54 68 69 73 20 6f 6e 6c  ;    /* This onl
3a10: 79 20 6f 63 63 75 72 73 20 66 6f 72 20 47 4c 4f  y occurs for GLO
3a20: 42 2c 20 6e 6f 74 20 4c 49 4b 45 20 2a 2f 0a 20  B, not LIKE */. 
3a30: 20 20 20 20 20 73 65 65 6e 20 3d 20 30 3b 0a 20       seen = 0;. 
3a40: 20 20 20 20 20 69 6e 76 65 72 74 20 3d 20 30 3b       invert = 0;
3a50: 0a 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74  .      c = sqlit
3a60: 65 33 55 74 66 38 52 65 61 64 28 7a 53 74 72 69  e3Utf8Read(zStri
3a70: 6e 67 2c 20 30 2c 20 26 7a 53 74 72 69 6e 67 29  ng, 0, &zString)
3a80: 3b 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30  ;.      if( c==0
3a90: 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20   ) return 0;.   
3aa0: 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55     c2 = sqlite3U
3ab0: 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72 6e  tf8Read(zPattern
3ac0: 2c 20 30 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b  , 0, &zPattern);
3ad0: 0a 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 27  .      if( c2=='
3ae0: 5e 27 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e  ^' ){.        in
3af0: 76 65 72 74 20 3d 20 31 3b 0a 20 20 20 20 20 20  vert = 1;.      
3b00: 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74    c2 = sqlite3Ut
3b10: 66 38 52 65 61 64 28 7a 50 61 74 74 65 72 6e 2c  f8Read(zPattern,
3b20: 20 30 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b 0a   0, &zPattern);.
3b30: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66        }.      if
3b40: 28 20 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20 20  ( c2==']' ){.   
3b50: 20 20 20 20 20 69 66 28 20 63 3d 3d 27 5d 27 20       if( c==']' 
3b60: 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20  ) seen = 1;.    
3b70: 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33      c2 = sqlite3
3b80: 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72  Utf8Read(zPatter
3b90: 6e 2c 20 30 2c 20 26 7a 50 61 74 74 65 72 6e 29  n, 0, &zPattern)
3ba0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
3bb0: 77 68 69 6c 65 28 20 63 32 20 26 26 20 63 32 21  while( c2 && c2!
3bc0: 3d 27 5d 27 20 29 7b 0a 20 20 20 20 20 20 20 20  =']' ){.        
3bd0: 69 66 28 20 63 32 3d 3d 27 2d 27 20 26 26 20 7a  if( c2=='-' && z
3be0: 50 61 74 74 65 72 6e 5b 30 5d 21 3d 27 5d 27 20  Pattern[0]!=']' 
3bf0: 26 26 20 7a 50 61 74 74 65 72 6e 5b 30 5d 21 3d  && zPattern[0]!=
3c00: 30 20 26 26 20 70 72 69 6f 72 5f 63 3e 30 20 29  0 && prior_c>0 )
3c10: 7b 0a 20 20 20 20 20 20 20 20 20 20 63 32 20 3d  {.          c2 =
3c20: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
3c30: 28 7a 50 61 74 74 65 72 6e 2c 20 30 2c 20 26 7a  (zPattern, 0, &z
3c40: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
3c50: 20 20 20 20 69 66 28 20 63 3e 3d 70 72 69 6f 72      if( c>=prior
3c60: 5f 63 20 26 26 20 63 3c 3d 63 32 20 29 20 73 65  _c && c<=c2 ) se
3c70: 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20  en = 1;.        
3c80: 20 20 70 72 69 6f 72 5f 63 20 3d 20 30 3b 0a 20    prior_c = 0;. 
3c90: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20         }else{.  
3ca0: 20 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d 63          if( c==c
3cb0: 32 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20  2 ){.           
3cc0: 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20   seen = 1;.     
3cd0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 20       }.         
3ce0: 20 70 72 69 6f 72 5f 63 20 3d 20 63 32 3b 0a 20   prior_c = c2;. 
3cf0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
3d00: 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66   c2 = sqlite3Utf
3d10: 38 52 65 61 64 28 7a 50 61 74 74 65 72 6e 2c 20  8Read(zPattern, 
3d20: 30 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20  0, &zPattern);. 
3d30: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28       }.      if(
3d40: 20 63 32 3d 3d 30 20 7c 7c 20 28 73 65 65 6e 20   c2==0 || (seen 
3d50: 5e 20 69 6e 76 65 72 74 29 3d 3d 30 20 29 7b 0a  ^ invert)==0 ){.
3d60: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 30          return 0
3d70: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65  ;.      }.    }e
3d80: 6c 73 65 20 69 66 28 20 65 73 63 3d 3d 63 20 26  lse if( esc==c &
3d90: 26 20 21 70 72 65 76 45 73 63 61 70 65 20 29 7b  & !prevEscape ){
3da0: 0a 20 20 20 20 20 20 70 72 65 76 45 73 63 61 70  .      prevEscap
3db0: 65 20 3d 20 31 3b 0a 20 20 20 20 7d 65 6c 73 65  e = 1;.    }else
3dc0: 7b 0a 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c  {.      c2 = sql
3dd0: 69 74 65 33 55 74 66 38 52 65 61 64 28 7a 53 74  ite3Utf8Read(zSt
3de0: 72 69 6e 67 2c 20 30 2c 20 26 7a 53 74 72 69 6e  ring, 0, &zStrin
3df0: 67 29 3b 0a 20 20 20 20 20 20 69 66 28 20 6e 6f  g);.      if( no
3e00: 43 61 73 65 20 29 7b 0a 20 20 20 20 20 20 20 20  Case ){.        
3e10: 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72  GlogUpperToLower
3e20: 28 63 29 3b 0a 20 20 20 20 20 20 20 20 47 6c 6f  (c);.        Glo
3e30: 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 32  gUpperToLower(c2
3e40: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
3e50: 20 69 66 28 20 63 21 3d 63 32 20 29 7b 0a 20 20   if( c!=c2 ){.  
3e60: 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a        return 0;.
3e70: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 70 72        }.      pr
3e80: 65 76 45 73 63 61 70 65 20 3d 20 30 3b 0a 20 20  evEscape = 0;.  
3e90: 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e    }.  }.  return
3ea0: 20 2a 7a 53 74 72 69 6e 67 3d 3d 30 3b 0a 7d 0a   *zString==0;.}.
3eb0: 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74 68 65  ./*.** Count the
3ec0: 20 6e 75 6d 62 65 72 20 6f 66 20 74 69 6d 65 73   number of times
3ed0: 20 74 68 61 74 20 74 68 65 20 4c 49 4b 45 20 6f   that the LIKE o
3ee0: 70 65 72 61 74 6f 72 20 28 6f 72 20 47 4c 4f 42  perator (or GLOB
3ef0: 20 77 68 69 63 68 20 69 73 0a 2a 2a 20 6a 75 73   which is.** jus
3f00: 74 20 61 20 76 61 72 69 61 74 69 6f 6e 20 6f 66  t a variation of
3f10: 20 4c 49 4b 45 29 20 67 65 74 73 20 63 61 6c 6c   LIKE) gets call
3f20: 65 64 2e 20 20 54 68 69 73 20 69 73 20 75 73 65  ed.  This is use
3f30: 64 20 66 6f 72 20 74 65 73 74 69 6e 67 0a 2a 2a  d for testing.**
3f40: 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23 69 66 64 65 66   only..*/.#ifdef
3f50: 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e 74   SQLITE_TEST.int
3f60: 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f   sqlite3_like_co
3f70: 75 6e 74 20 3d 20 30 3b 0a 23 65 6e 64 69 66 0a  unt = 0;.#endif.
3f80: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
3f90: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 69  tation of the li
3fa0: 6b 65 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f  ke() SQL functio
3fb0: 6e 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f  n.  This functio
3fc0: 6e 20 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a 2a 20  n implements.** 
3fd0: 74 68 65 20 62 75 69 6c 64 2d 69 6e 20 4c 49 4b  the build-in LIK
3fe0: 45 20 6f 70 65 72 61 74 6f 72 2e 20 20 54 68 65  E operator.  The
3ff0: 20 66 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20   first argument 
4000: 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20  to the function 
4010: 69 73 20 74 68 65 0a 2a 2a 20 70 61 74 74 65 72  is the.** patter
4020: 6e 20 61 6e 64 20 74 68 65 20 73 65 63 6f 6e 64  n and the second
4030: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 74 68 65   argument is the
4040: 20 73 74 72 69 6e 67 2e 20 20 53 6f 2c 20 74 68   string.  So, th
4050: 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 73  e SQL statements
4060: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 41 20  :.**.**       A 
4070: 4c 49 4b 45 20 42 0a 2a 2a 0a 2a 2a 20 69 73 20  LIKE B.**.** is 
4080: 69 6d 70 6c 65 6d 65 6e 74 65 64 20 61 73 20 6c  implemented as l
4090: 69 6b 65 28 42 2c 41 29 2e 0a 2a 2a 0a 2a 2a 20  ike(B,A)..**.** 
40a0: 54 68 69 73 20 73 61 6d 65 20 66 75 6e 63 74 69  This same functi
40b0: 6f 6e 20 28 77 69 74 68 20 61 20 64 69 66 66 65  on (with a diffe
40c0: 72 65 6e 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  rent compareInfo
40d0: 20 73 74 72 75 63 74 75 72 65 29 20 63 6f 6d 70   structure) comp
40e0: 75 74 65 73 0a 2a 2a 20 74 68 65 20 47 4c 4f 42  utes.** the GLOB
40f0: 20 6f 70 65 72 61 74 6f 72 2e 0a 2a 2f 0a 73 74   operator..*/.st
4100: 61 74 69 63 20 76 6f 69 64 20 6c 69 6b 65 46 75  atic void likeFu
4110: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
4120: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
4130: 0a 20 20 69 6e 74 20 61 72 67 63 2c 20 0a 20 20  .  int argc, .  
4140: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
4150: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
4160: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
4170: 41 2c 20 2a 7a 42 3b 0a 20 20 69 6e 74 20 65 73  A, *zB;.  int es
4180: 63 61 70 65 20 3d 20 30 3b 0a 20 20 73 71 6c 69  cape = 0;.  sqli
4190: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
41a0: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
41b0: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 0a 20  dle(context);.. 
41c0: 20 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f 76 61   zB = sqlite3_va
41d0: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
41e0: 29 3b 0a 20 20 7a 41 20 3d 20 73 71 6c 69 74 65  );.  zA = sqlite
41f0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
4200: 76 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c 69 6d  v[1]);..  /* Lim
4210: 69 74 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66  it the length of
4220: 20 74 68 65 20 4c 49 4b 45 20 6f 72 20 47 4c 4f   the LIKE or GLO
4230: 42 20 70 61 74 74 65 72 6e 20 74 6f 20 61 76 6f  B pattern to avo
4240: 69 64 20 70 72 6f 62 6c 65 6d 73 0a 20 20 2a 2a  id problems.  **
4250: 20 6f 66 20 64 65 65 70 20 72 65 63 75 72 73 69   of deep recursi
4260: 6f 6e 20 61 6e 64 20 4e 2a 4e 20 62 65 68 61 76  on and N*N behav
4270: 69 6f 72 20 69 6e 20 70 61 74 74 65 72 6e 43 6f  ior in patternCo
4280: 6d 70 61 72 65 28 29 2e 0a 20 20 2a 2f 0a 20 20  mpare()..  */.  
4290: 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  if( sqlite3_valu
42a0: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29  e_bytes(argv[0])
42b0: 20 3e 0a 20 20 20 20 20 20 20 20 64 62 2d 3e 61   >.        db->a
42c0: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
42d0: 49 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f  IT_LIKE_PATTERN_
42e0: 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73  LENGTH] ){.    s
42f0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
4300: 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 4c 49  ror(context, "LI
4310: 4b 45 20 6f 72 20 47 4c 4f 42 20 70 61 74 74 65  KE or GLOB patte
4320: 72 6e 20 74 6f 6f 20 63 6f 6d 70 6c 65 78 22 2c  rn too complex",
4330: 20 2d 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e   -1);.    return
4340: 3b 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20  ;.  }.  assert( 
4350: 7a 42 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75  zB==sqlite3_valu
4360: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20  e_text(argv[0]) 
4370: 29 3b 20 20 2f 2a 20 45 6e 63 6f 64 69 6e 67 20  );  /* Encoding 
4380: 64 69 64 20 6e 6f 74 20 63 68 61 6e 67 65 20 2a  did not change *
4390: 2f 0a 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33  /..  if( argc==3
43a0: 20 29 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 65   ){.    /* The e
43b0: 73 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20  scape character 
43c0: 73 74 72 69 6e 67 20 6d 75 73 74 20 63 6f 6e 73  string must cons
43d0: 69 73 74 20 6f 66 20 61 20 73 69 6e 67 6c 65 20  ist of a single 
43e0: 55 54 46 2d 38 20 63 68 61 72 61 63 74 65 72 2e  UTF-8 character.
43f0: 0a 20 20 20 20 2a 2a 20 4f 74 68 65 72 77 69 73  .    ** Otherwis
4400: 65 2c 20 72 65 74 75 72 6e 20 61 6e 20 65 72 72  e, return an err
4410: 6f 72 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 63  or..    */.    c
4420: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
4430: 61 72 20 2a 7a 45 73 63 20 3d 20 73 71 6c 69 74  ar *zEsc = sqlit
4440: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
4450: 67 76 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20  gv[2]);.    if( 
4460: 7a 45 73 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  zEsc==0 ) return
4470: 3b 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65  ;.    if( sqlite
4480: 33 55 74 66 38 43 68 61 72 4c 65 6e 28 28 63 68  3Utf8CharLen((ch
4490: 61 72 2a 29 7a 45 73 63 2c 20 2d 31 29 21 3d 31  ar*)zEsc, -1)!=1
44a0: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
44b0: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63  3_result_error(c
44c0: 6f 6e 74 65 78 74 2c 20 0a 20 20 20 20 20 20 20  ontext, .       
44d0: 20 20 20 22 45 53 43 41 50 45 20 65 78 70 72 65     "ESCAPE expre
44e0: 73 73 69 6f 6e 20 6d 75 73 74 20 62 65 20 61 20  ssion must be a 
44f0: 73 69 6e 67 6c 65 20 63 68 61 72 61 63 74 65 72  single character
4500: 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 72 65  ", -1);.      re
4510: 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20  turn;.    }.    
4520: 65 73 63 61 70 65 20 3d 20 73 71 6c 69 74 65 33  escape = sqlite3
4530: 55 74 66 38 52 65 61 64 28 7a 45 73 63 2c 20 30  Utf8Read(zEsc, 0
4540: 2c 20 26 7a 45 73 63 29 3b 0a 20 20 7d 0a 20 20  , &zEsc);.  }.  
4550: 69 66 28 20 7a 41 20 26 26 20 7a 42 20 29 7b 0a  if( zA && zB ){.
4560: 20 20 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61      struct compa
4570: 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 20 3d 20  reInfo *pInfo = 
4580: 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74  sqlite3_user_dat
4590: 61 28 63 6f 6e 74 65 78 74 29 3b 0a 23 69 66 64  a(context);.#ifd
45a0: 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 20  ef SQLITE_TEST. 
45b0: 20 20 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f     sqlite3_like_
45c0: 63 6f 75 6e 74 2b 2b 3b 0a 23 65 6e 64 69 66 0a  count++;.#endif.
45d0: 20 20 20 20 0a 20 20 20 20 73 71 6c 69 74 65 33      .    sqlite3
45e0: 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74  _result_int(cont
45f0: 65 78 74 2c 20 70 61 74 74 65 72 6e 43 6f 6d 70  ext, patternComp
4600: 61 72 65 28 7a 42 2c 20 7a 41 2c 20 70 49 6e 66  are(zB, zA, pInf
4610: 6f 2c 20 65 73 63 61 70 65 29 29 3b 0a 20 20 7d  o, escape));.  }
4620: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
4630: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
4640: 4e 55 4c 4c 49 46 28 78 2c 79 29 20 66 75 6e 63  NULLIF(x,y) func
4650: 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c  tion.  The resul
4660: 74 20 69 73 20 74 68 65 20 66 69 72 73 74 0a 2a  t is the first.*
4670: 2a 20 61 72 67 75 6d 65 6e 74 20 69 66 20 74 68  * argument if th
4680: 65 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20  e arguments are 
4690: 64 69 66 66 65 72 65 6e 74 2e 20 20 54 68 65 20  different.  The 
46a0: 72 65 73 75 6c 74 20 69 73 20 4e 55 4c 4c 20 69  result is NULL i
46b0: 66 20 74 68 65 0a 2a 2a 20 61 72 67 75 6d 65 6e  f the.** argumen
46c0: 74 73 20 61 72 65 20 65 71 75 61 6c 20 74 6f 20  ts are equal to 
46d0: 65 61 63 68 20 6f 74 68 65 72 2e 0a 2a 2f 0a 73  each other..*/.s
46e0: 74 61 74 69 63 20 76 6f 69 64 20 6e 75 6c 6c 69  tatic void nulli
46f0: 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  fFunc(.  sqlite3
4700: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
4710: 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64  t,.  int NotUsed
4720: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
4730: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 43 6f  e **argv.){.  Co
4740: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73  llSeq *pColl = s
4750: 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c  qlite3GetFuncCol
4760: 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20  lSeq(context);. 
4770: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
4780: 52 28 4e 6f 74 55 73 65 64 29 3b 0a 20 20 69 66  R(NotUsed);.  if
4790: 28 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70  ( sqlite3MemComp
47a0: 61 72 65 28 61 72 67 76 5b 30 5d 2c 20 61 72 67  are(argv[0], arg
47b0: 76 5b 31 5d 2c 20 70 43 6f 6c 6c 29 21 3d 30 20  v[1], pColl)!=0 
47c0: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
47d0: 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74  esult_value(cont
47e0: 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20  ext, argv[0]);. 
47f0: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c   }.}../*.** Impl
4800: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
4810: 65 20 56 45 52 53 49 4f 4e 28 2a 29 20 66 75 6e  e VERSION(*) fun
4820: 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73 75  ction.  The resu
4830: 6c 74 20 69 73 20 74 68 65 20 76 65 72 73 69 6f  lt is the versio
4840: 6e 0a 2a 2a 20 6f 66 20 74 68 65 20 53 51 4c 69  n.** of the SQLi
4850: 74 65 20 6c 69 62 72 61 72 79 20 74 68 61 74 20  te library that 
4860: 69 73 20 72 75 6e 6e 69 6e 67 2e 0a 2a 2f 0a 73  is running..*/.s
4870: 74 61 74 69 63 20 76 6f 69 64 20 76 65 72 73 69  tatic void versi
4880: 6f 6e 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  onFunc(.  sqlite
4890: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
48a0: 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  xt,.  int NotUse
48b0: 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  d,.  sqlite3_val
48c0: 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b  ue **NotUsed2.){
48d0: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
48e0: 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f  TER2(NotUsed, No
48f0: 74 55 73 65 64 32 29 3b 0a 20 20 73 71 6c 69 74  tUsed2);.  sqlit
4900: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
4910: 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f  ontext, sqlite3_
4920: 76 65 72 73 69 6f 6e 2c 20 2d 31 2c 20 53 51 4c  version, -1, SQL
4930: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a  ITE_STATIC);.}..
4940: 2f 2a 20 41 72 72 61 79 20 66 6f 72 20 63 6f 6e  /* Array for con
4950: 76 65 72 74 69 6e 67 20 66 72 6f 6d 20 68 61 6c  verting from hal
4960: 66 2d 62 79 74 65 73 20 28 6e 79 62 62 6c 65 73  f-bytes (nybbles
4970: 29 20 69 6e 74 6f 20 41 53 43 49 49 20 68 65 78  ) into ASCII hex
4980: 0a 2a 2a 20 64 69 67 69 74 73 2e 20 2a 2f 0a 73  .** digits. */.s
4990: 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72  tatic const char
49a0: 20 68 65 78 64 69 67 69 74 73 5b 5d 20 3d 20 7b   hexdigits[] = {
49b0: 0a 20 20 27 30 27 2c 20 27 31 27 2c 20 27 32 27  .  '0', '1', '2'
49c0: 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35 27 2c  , '3', '4', '5',
49d0: 20 27 36 27 2c 20 27 37 27 2c 0a 20 20 27 38 27   '6', '7',.  '8'
49e0: 2c 20 27 39 27 2c 20 27 41 27 2c 20 27 42 27 2c  , '9', 'A', 'B',
49f0: 20 27 43 27 2c 20 27 44 27 2c 20 27 45 27 2c 20   'C', 'D', 'E', 
4a00: 27 46 27 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 45  'F' .};../*.** E
4a10: 58 50 45 52 49 4d 45 4e 54 41 4c 20 2d 20 54 68  XPERIMENTAL - Th
4a20: 69 73 20 69 73 20 6e 6f 74 20 61 6e 20 6f 66 66  is is not an off
4a30: 69 63 69 61 6c 20 66 75 6e 63 74 69 6f 6e 2e 20  icial function. 
4a40: 20 54 68 65 20 69 6e 74 65 72 66 61 63 65 20 6d   The interface m
4a50: 61 79 0a 2a 2a 20 63 68 61 6e 67 65 2e 20 20 54  ay.** change.  T
4a60: 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 6d 61 79  his function may
4a70: 20 64 69 73 61 70 70 65 61 72 2e 20 20 44 6f 20   disappear.  Do 
4a80: 6e 6f 74 20 77 72 69 74 65 20 63 6f 64 65 20 74  not write code t
4a90: 68 61 74 20 64 65 70 65 6e 64 73 0a 2a 2a 20 6f  hat depends.** o
4aa0: 6e 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e  n this function.
4ab0: 0a 2a 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  .**.** Implement
4ac0: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 51 55 4f  ation of the QUO
4ad0: 54 45 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20  TE() function.  
4ae0: 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 74 61  This function ta
4af0: 6b 65 73 20 61 20 73 69 6e 67 6c 65 0a 2a 2a 20  kes a single.** 
4b00: 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74 68  argument.  If th
4b10: 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e 75  e argument is nu
4b20: 6d 65 72 69 63 2c 20 74 68 65 20 72 65 74 75 72  meric, the retur
4b30: 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65 20 73  n value is the s
4b40: 61 6d 65 20 61 73 0a 2a 2a 20 74 68 65 20 61 72  ame as.** the ar
4b50: 67 75 6d 65 6e 74 2e 20 20 49 66 20 74 68 65 20  gument.  If the 
4b60: 61 72 67 75 6d 65 6e 74 20 69 73 20 4e 55 4c 4c  argument is NULL
4b70: 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c  , the return val
4b80: 75 65 20 69 73 20 74 68 65 20 73 74 72 69 6e 67  ue is the string
4b90: 0a 2a 2a 20 22 4e 55 4c 4c 22 2e 20 20 4f 74 68  .** "NULL".  Oth
4ba0: 65 72 77 69 73 65 2c 20 74 68 65 20 61 72 67 75  erwise, the argu
4bb0: 6d 65 6e 74 20 69 73 20 65 6e 63 6c 6f 73 65 64  ment is enclosed
4bc0: 20 69 6e 20 73 69 6e 67 6c 65 20 71 75 6f 74 65   in single quote
4bd0: 73 20 77 69 74 68 0a 2a 2a 20 73 69 6e 67 6c 65  s with.** single
4be0: 2d 71 75 6f 74 65 20 65 73 63 61 70 65 73 2e 0a  -quote escapes..
4bf0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 71  */.static void q
4c00: 75 6f 74 65 46 75 6e 63 28 73 71 6c 69 74 65 33  uoteFunc(sqlite3
4c10: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
4c20: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
4c30: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
4c40: 76 29 7b 0a 20 20 61 73 73 65 72 74 28 20 61 72  v){.  assert( ar
4c50: 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45  gc==1 );.  UNUSE
4c60: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
4c70: 29 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71 6c  );.  switch( sql
4c80: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
4c90: 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20  argv[0]) ){.    
4ca0: 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54 45  case SQLITE_INTE
4cb0: 47 45 52 3a 0a 20 20 20 20 63 61 73 65 20 53 51  GER:.    case SQ
4cc0: 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20 20  LITE_FLOAT: {.  
4cd0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
4ce0: 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74  lt_value(context
4cf0: 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  , argv[0]);.    
4d00: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
4d10: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42     case SQLITE_B
4d20: 4c 4f 42 3a 20 7b 0a 20 20 20 20 20 20 63 68 61  LOB: {.      cha
4d30: 72 20 2a 7a 54 65 78 74 20 3d 20 30 3b 0a 20 20  r *zText = 0;.  
4d40: 20 20 20 20 63 68 61 72 20 63 6f 6e 73 74 20 2a      char const *
4d50: 7a 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f  zBlob = sqlite3_
4d60: 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b  value_blob(argv[
4d70: 30 5d 29 3b 0a 20 20 20 20 20 20 69 6e 74 20 6e  0]);.      int n
4d80: 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76  Blob = sqlite3_v
4d90: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
4da0: 30 5d 29 3b 0a 20 20 20 20 20 20 61 73 73 65 72  0]);.      asser
4db0: 74 28 20 7a 42 6c 6f 62 3d 3d 73 71 6c 69 74 65  t( zBlob==sqlite
4dc0: 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67  3_value_blob(arg
4dd0: 76 5b 30 5d 29 20 29 3b 20 2f 2a 20 4e 6f 20 65  v[0]) ); /* No e
4de0: 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a  ncoding change *
4df0: 2f 0a 20 20 20 20 20 20 7a 54 65 78 74 20 3d 20  /.      zText = 
4e00: 28 63 68 61 72 20 2a 29 63 6f 6e 74 65 78 74 4d  (char *)contextM
4e10: 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28  alloc(context, (
4e20: 32 2a 28 69 36 34 29 6e 42 6c 6f 62 29 2b 34 29  2*(i64)nBlob)+4)
4e30: 3b 20 0a 20 20 20 20 20 20 69 66 28 20 7a 54 65  ; .      if( zTe
4e40: 78 74 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e  xt ){.        in
4e50: 74 20 69 3b 0a 20 20 20 20 20 20 20 20 66 6f 72  t i;.        for
4e60: 28 69 3d 30 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69  (i=0; i<nBlob; i
4e70: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 7a  ++){.          z
4e80: 54 65 78 74 5b 28 69 2a 32 29 2b 32 5d 20 3d 20  Text[(i*2)+2] = 
4e90: 68 65 78 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62  hexdigits[(zBlob
4ea0: 5b 69 5d 3e 3e 34 29 26 30 78 30 46 5d 3b 0a 20  [i]>>4)&0x0F];. 
4eb0: 20 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28           zText[(
4ec0: 69 2a 32 29 2b 33 5d 20 3d 20 68 65 78 64 69 67  i*2)+3] = hexdig
4ed0: 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 29 26 30  its[(zBlob[i])&0
4ee0: 78 30 46 5d 3b 0a 20 20 20 20 20 20 20 20 7d 0a  x0F];.        }.
4ef0: 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e          zText[(n
4f00: 42 6c 6f 62 2a 32 29 2b 32 5d 20 3d 20 27 5c 27  Blob*2)+2] = '\'
4f10: 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74  ';.        zText
4f20: 5b 28 6e 42 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20  [(nBlob*2)+3] = 
4f30: 27 5c 30 27 3b 0a 20 20 20 20 20 20 20 20 7a 54  '\0';.        zT
4f40: 65 78 74 5b 30 5d 20 3d 20 27 58 27 3b 0a 20 20  ext[0] = 'X';.  
4f50: 20 20 20 20 20 20 7a 54 65 78 74 5b 31 5d 20 3d        zText[1] =
4f60: 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 73   '\'';.        s
4f70: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
4f80: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 54 65 78  xt(context, zTex
4f90: 74 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52  t, -1, SQLITE_TR
4fa0: 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20 20 20  ANSIENT);.      
4fb0: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a    sqlite3_free(z
4fc0: 54 65 78 74 29 3b 0a 20 20 20 20 20 20 7d 0a 20  Text);.      }. 
4fd0: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
4fe0: 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  }.    case SQLIT
4ff0: 45 5f 54 45 58 54 3a 20 7b 0a 20 20 20 20 20 20  E_TEXT: {.      
5000: 69 6e 74 20 69 2c 6a 3b 0a 20 20 20 20 20 20 75  int i,j;.      u
5010: 36 34 20 6e 3b 0a 20 20 20 20 20 20 63 6f 6e 73  64 n;.      cons
5020: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
5030: 2a 7a 41 72 67 20 3d 20 73 71 6c 69 74 65 33 5f  *zArg = sqlite3_
5040: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
5050: 30 5d 29 3b 0a 20 20 20 20 20 20 63 68 61 72 20  0]);.      char 
5060: 2a 7a 3b 0a 0a 20 20 20 20 20 20 69 66 28 20 7a  *z;..      if( z
5070: 41 72 67 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b  Arg==0 ) return;
5080: 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 2c 20  .      for(i=0, 
5090: 6e 3d 30 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b  n=0; zArg[i]; i+
50a0: 2b 29 7b 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d  +){ if( zArg[i]=
50b0: 3d 27 5c 27 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20  ='\'' ) n++; }. 
50c0: 20 20 20 20 20 7a 20 3d 20 63 6f 6e 74 65 78 74       z = context
50d0: 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20  Malloc(context, 
50e0: 28 28 69 36 34 29 69 29 2b 28 28 69 36 34 29 6e  ((i64)i)+((i64)n
50f0: 29 2b 33 29 3b 0a 20 20 20 20 20 20 69 66 28 20  )+3);.      if( 
5100: 7a 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 30  z ){.        z[0
5110: 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20  ] = '\'';.      
5120: 20 20 66 6f 72 28 69 3d 30 2c 20 6a 3d 31 3b 20    for(i=0, j=1; 
5130: 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20  zArg[i]; i++){. 
5140: 20 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20           z[j++] 
5150: 3d 20 7a 41 72 67 5b 69 5d 3b 0a 20 20 20 20 20  = zArg[i];.     
5160: 20 20 20 20 20 69 66 28 20 7a 41 72 67 5b 69 5d       if( zArg[i]
5170: 3d 3d 27 5c 27 27 20 29 7b 0a 20 20 20 20 20 20  =='\'' ){.      
5180: 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27        z[j++] = '
5190: 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 20 20 7d  \'';.          }
51a0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
51b0: 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27     z[j++] = '\''
51c0: 3b 0a 20 20 20 20 20 20 20 20 7a 5b 6a 5d 20 3d  ;.        z[j] =
51d0: 20 30 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69   0;.        sqli
51e0: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
51f0: 63 6f 6e 74 65 78 74 2c 20 7a 2c 20 6a 2c 20 73  context, z, j, s
5200: 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20  qlite3_free);.  
5210: 20 20 20 20 7d 0a 20 20 20 20 20 20 62 72 65 61      }.      brea
5220: 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66  k;.    }.    def
5230: 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20 61 73  ault: {.      as
5240: 73 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61  sert( sqlite3_va
5250: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
5260: 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29  )==SQLITE_NULL )
5270: 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  ;.      sqlite3_
5280: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
5290: 65 78 74 2c 20 22 4e 55 4c 4c 22 2c 20 34 2c 20  ext, "NULL", 4, 
52a0: 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a  SQLITE_STATIC);.
52b0: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
52c0: 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20   }.  }.}../*.** 
52d0: 54 68 65 20 68 65 78 28 29 20 66 75 6e 63 74 69  The hex() functi
52e0: 6f 6e 2e 20 20 49 6e 74 65 72 70 72 65 74 20 74  on.  Interpret t
52f0: 68 65 20 61 72 67 75 6d 65 6e 74 20 61 73 20 61  he argument as a
5300: 20 62 6c 6f 62 2e 20 20 52 65 74 75 72 6e 0a 2a   blob.  Return.*
5310: 2a 20 61 20 68 65 78 61 64 65 63 69 6d 61 6c 20  * a hexadecimal 
5320: 72 65 6e 64 65 72 69 6e 67 20 61 73 20 74 65 78  rendering as tex
5330: 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  t..*/.static voi
5340: 64 20 68 65 78 46 75 6e 63 28 0a 20 20 73 71 6c  d hexFunc(.  sql
5350: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
5360: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
5370: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
5380: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
5390: 6e 74 20 69 2c 20 6e 3b 0a 20 20 63 6f 6e 73 74  nt i, n;.  const
53a0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
53b0: 70 42 6c 6f 62 3b 0a 20 20 63 68 61 72 20 2a 7a  pBlob;.  char *z
53c0: 48 65 78 2c 20 2a 7a 3b 0a 20 20 61 73 73 65 72  Hex, *z;.  asser
53d0: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
53e0: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
53f0: 28 61 72 67 63 29 3b 0a 20 20 70 42 6c 6f 62 20  (argc);.  pBlob 
5400: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
5410: 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20  blob(argv[0]);. 
5420: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   n = sqlite3_val
5430: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
5440: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 42 6c  );.  assert( pBl
5450: 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75  ob==sqlite3_valu
5460: 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 20  e_blob(argv[0]) 
5470: 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69  );  /* No encodi
5480: 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a  ng change */.  z
5490: 20 3d 20 7a 48 65 78 20 3d 20 63 6f 6e 74 65 78   = zHex = contex
54a0: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
54b0: 20 28 28 69 36 34 29 6e 29 2a 32 20 2b 20 31 29   ((i64)n)*2 + 1)
54c0: 3b 0a 20 20 69 66 28 20 7a 48 65 78 20 29 7b 0a  ;.  if( zHex ){.
54d0: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e      for(i=0; i<n
54e0: 3b 20 69 2b 2b 2c 20 70 42 6c 6f 62 2b 2b 29 7b  ; i++, pBlob++){
54f0: 0a 20 20 20 20 20 20 75 6e 73 69 67 6e 65 64 20  .      unsigned 
5500: 63 68 61 72 20 63 20 3d 20 2a 70 42 6c 6f 62 3b  char c = *pBlob;
5510: 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20 3d 20  .      *(z++) = 
5520: 68 65 78 64 69 67 69 74 73 5b 28 63 3e 3e 34 29  hexdigits[(c>>4)
5530: 26 30 78 66 5d 3b 0a 20 20 20 20 20 20 2a 28 7a  &0xf];.      *(z
5540: 2b 2b 29 20 3d 20 68 65 78 64 69 67 69 74 73 5b  ++) = hexdigits[
5550: 63 26 30 78 66 5d 3b 0a 20 20 20 20 7d 0a 20 20  c&0xf];.    }.  
5560: 20 20 2a 7a 20 3d 20 30 3b 0a 20 20 20 20 73 71    *z = 0;.    sq
5570: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
5580: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 48 65 78 2c  t(context, zHex,
5590: 20 6e 2a 32 2c 20 73 71 6c 69 74 65 33 5f 66 72   n*2, sqlite3_fr
55a0: 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  ee);.  }.}../*.*
55b0: 2a 20 54 68 65 20 7a 65 72 6f 62 6c 6f 62 28 4e  * The zeroblob(N
55c0: 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72  ) function retur
55d0: 6e 73 20 61 20 7a 65 72 6f 2d 66 69 6c 6c 65 64  ns a zero-filled
55e0: 20 62 6c 6f 62 20 6f 66 20 73 69 7a 65 20 4e 20   blob of size N 
55f0: 62 79 74 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63  bytes..*/.static
5600: 20 76 6f 69 64 20 7a 65 72 6f 62 6c 6f 62 46 75   void zeroblobFu
5610: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
5620: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
5630: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
5640: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
5650: 67 76 0a 29 7b 0a 20 20 69 36 34 20 6e 3b 0a 20  gv.){.  i64 n;. 
5660: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
5670: 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   );.  UNUSED_PAR
5680: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
5690: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
56a0: 65 5f 69 6e 74 36 34 28 61 72 67 76 5b 30 5d 29  e_int64(argv[0])
56b0: 3b 0a 20 20 69 66 28 20 6e 3e 53 51 4c 49 54 45  ;.  if( n>SQLITE
56c0: 5f 4d 41 58 5f 4c 45 4e 47 54 48 20 29 7b 0a 20  _MAX_LENGTH ){. 
56d0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
56e0: 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63  t_error_toobig(c
56f0: 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65 6c 73 65  ontext);.  }else
5700: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  {.    sqlite3_re
5710: 73 75 6c 74 5f 7a 65 72 6f 62 6c 6f 62 28 63 6f  sult_zeroblob(co
5720: 6e 74 65 78 74 2c 20 28 69 6e 74 29 6e 29 3b 0a  ntext, (int)n);.
5730: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65    }.}../*.** The
5740: 20 72 65 70 6c 61 63 65 28 29 20 66 75 6e 63 74   replace() funct
5750: 69 6f 6e 2e 20 20 54 68 72 65 65 20 61 72 67 75  ion.  Three argu
5760: 6d 65 6e 74 73 20 61 72 65 20 61 6c 6c 20 73 74  ments are all st
5770: 72 69 6e 67 73 3a 20 63 61 6c 6c 0a 2a 2a 20 74  rings: call.** t
5780: 68 65 6d 20 41 2c 20 42 2c 20 61 6e 64 20 43 2e  hem A, B, and C.
5790: 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61   The result is a
57a0: 6c 73 6f 20 61 20 73 74 72 69 6e 67 20 77 68 69  lso a string whi
57b0: 63 68 20 69 73 20 64 65 72 69 76 65 64 0a 2a 2a  ch is derived.**
57c0: 20 66 72 6f 6d 20 41 20 62 79 20 72 65 70 6c 61   from A by repla
57d0: 63 69 6e 67 20 65 76 65 72 79 20 6f 63 63 75 72  cing every occur
57e0: 61 6e 63 65 20 6f 66 20 42 20 77 69 74 68 20 43  ance of B with C
57f0: 2e 20 20 54 68 65 20 6d 61 74 63 68 0a 2a 2a 20  .  The match.** 
5800: 6d 75 73 74 20 62 65 20 65 78 61 63 74 2e 20 20  must be exact.  
5810: 43 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e  Collating sequen
5820: 63 65 73 20 61 72 65 20 6e 6f 74 20 75 73 65 64  ces are not used
5830: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
5840: 20 72 65 70 6c 61 63 65 46 75 6e 63 28 0a 20 20   replaceFunc(.  
5850: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
5860: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
5870: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
5880: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
5890: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
58a0: 20 63 68 61 72 20 2a 7a 53 74 72 3b 20 20 20 20   char *zStr;    
58b0: 20 20 20 20 2f 2a 20 54 68 65 20 69 6e 70 75 74      /* The input
58c0: 20 73 74 72 69 6e 67 20 41 20 2a 2f 0a 20 20 63   string A */.  c
58d0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
58e0: 61 72 20 2a 7a 50 61 74 74 65 72 6e 3b 20 20 20  ar *zPattern;   
58f0: 20 2f 2a 20 54 68 65 20 70 61 74 74 65 72 6e 20   /* The pattern 
5900: 73 74 72 69 6e 67 20 42 20 2a 2f 0a 20 20 63 6f  string B */.  co
5910: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
5920: 72 20 2a 7a 52 65 70 3b 20 20 20 20 20 20 20 20  r *zRep;        
5930: 2f 2a 20 54 68 65 20 72 65 70 6c 61 63 65 6d 65  /* The replaceme
5940: 6e 74 20 73 74 72 69 6e 67 20 43 20 2a 2f 0a 20  nt string C */. 
5950: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
5960: 7a 4f 75 74 3b 20 20 20 20 20 20 20 20 20 20 20  zOut;           
5970: 20 20 20 2f 2a 20 54 68 65 20 6f 75 74 70 75 74     /* The output
5980: 20 2a 2f 0a 20 20 69 6e 74 20 6e 53 74 72 3b 20   */.  int nStr; 
5990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
59a0: 2a 20 53 69 7a 65 20 6f 66 20 7a 53 74 72 20 2a  * Size of zStr *
59b0: 2f 0a 20 20 69 6e 74 20 6e 50 61 74 74 65 72 6e  /.  int nPattern
59c0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ;            /* 
59d0: 53 69 7a 65 20 6f 66 20 7a 50 61 74 74 65 72 6e  Size of zPattern
59e0: 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 70 3b 20   */.  int nRep; 
59f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
5a00: 2a 20 53 69 7a 65 20 6f 66 20 7a 52 65 70 20 2a  * Size of zRep *
5a10: 2f 0a 20 20 69 36 34 20 6e 4f 75 74 3b 20 20 20  /.  i64 nOut;   
5a20: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
5a30: 4d 61 78 69 6d 75 6d 20 73 69 7a 65 20 6f 66 20  Maximum size of 
5a40: 7a 4f 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6c 6f  zOut */.  int lo
5a50: 6f 70 4c 69 6d 69 74 3b 20 20 20 20 20 20 20 20  opLimit;        
5a60: 20 20 20 2f 2a 20 4c 61 73 74 20 7a 53 74 72 5b     /* Last zStr[
5a70: 5d 20 74 68 61 74 20 6d 69 67 68 74 20 6d 61 74  ] that might mat
5a80: 63 68 20 7a 50 61 74 74 65 72 6e 5b 5d 20 2a 2f  ch zPattern[] */
5a90: 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 20 20 20 20  .  int i, j;    
5aa0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c              /* L
5ab0: 6f 6f 70 20 63 6f 75 6e 74 65 72 73 20 2a 2f 0a  oop counters */.
5ac0: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
5ad0: 3d 33 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =3 );.  UNUSED_P
5ae0: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
5af0: 20 20 7a 53 74 72 20 3d 20 73 71 6c 69 74 65 33    zStr = sqlite3
5b00: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
5b10: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 53 74 72  [0]);.  if( zStr
5b20: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
5b30: 6e 53 74 72 20 3d 20 73 71 6c 69 74 65 33 5f 76  nStr = sqlite3_v
5b40: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
5b50: 30 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20 7a  0]);.  assert( z
5b60: 53 74 72 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c  Str==sqlite3_val
5b70: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
5b80: 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64   );  /* No encod
5b90: 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20  ing change */.  
5ba0: 7a 50 61 74 74 65 72 6e 20 3d 20 73 71 6c 69 74  zPattern = sqlit
5bb0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
5bc0: 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a 50  gv[1]);.  if( zP
5bd0: 61 74 74 65 72 6e 3d 3d 30 20 29 7b 0a 20 20 20  attern==0 ){.   
5be0: 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 33   assert( sqlite3
5bf0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
5c00: 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [1])==SQLITE_NUL
5c10: 4c 0a 20 20 20 20 20 20 20 20 20 20 20 20 7c 7c  L.            ||
5c20: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
5c30: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
5c40: 78 74 29 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65  xt)->mallocFaile
5c50: 64 20 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b  d );.    return;
5c60: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 50 61 74 74  .  }.  if( zPatt
5c70: 65 72 6e 5b 30 5d 3d 3d 30 20 29 7b 0a 20 20 20  ern[0]==0 ){.   
5c80: 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 33   assert( sqlite3
5c90: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
5ca0: 5b 31 5d 29 21 3d 53 51 4c 49 54 45 5f 4e 55 4c  [1])!=SQLITE_NUL
5cb0: 4c 20 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  L );.    sqlite3
5cc0: 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f  _result_value(co
5cd0: 6e 74 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b  ntext, argv[0]);
5ce0: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
5cf0: 0a 20 20 6e 50 61 74 74 65 72 6e 20 3d 20 73 71  .  nPattern = sq
5d00: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
5d10: 73 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 61 73  s(argv[1]);.  as
5d20: 73 65 72 74 28 20 7a 50 61 74 74 65 72 6e 3d 3d  sert( zPattern==
5d30: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
5d40: 78 74 28 61 72 67 76 5b 31 5d 29 20 29 3b 20 20  xt(argv[1]) );  
5d50: 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63  /* No encoding c
5d60: 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 52 65 70 20  hange */.  zRep 
5d70: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
5d80: 74 65 78 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20  text(argv[2]);. 
5d90: 20 69 66 28 20 7a 52 65 70 3d 3d 30 20 29 20 72   if( zRep==0 ) r
5da0: 65 74 75 72 6e 3b 0a 20 20 6e 52 65 70 20 3d 20  eturn;.  nRep = 
5db0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
5dc0: 74 65 73 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20  tes(argv[2]);.  
5dd0: 61 73 73 65 72 74 28 20 7a 52 65 70 3d 3d 73 71  assert( zRep==sq
5de0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
5df0: 28 61 72 67 76 5b 32 5d 29 20 29 3b 0a 20 20 6e  (argv[2]) );.  n
5e00: 4f 75 74 20 3d 20 6e 53 74 72 20 2b 20 31 3b 0a  Out = nStr + 1;.
5e10: 20 20 61 73 73 65 72 74 28 20 6e 4f 75 74 3c 53    assert( nOut<S
5e20: 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48  QLITE_MAX_LENGTH
5e30: 20 29 3b 0a 20 20 7a 4f 75 74 20 3d 20 63 6f 6e   );.  zOut = con
5e40: 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65  textMalloc(conte
5e50: 78 74 2c 20 28 69 36 34 29 6e 4f 75 74 29 3b 0a  xt, (i64)nOut);.
5e60: 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29 7b    if( zOut==0 ){
5e70: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
5e80: 0a 20 20 6c 6f 6f 70 4c 69 6d 69 74 20 3d 20 6e  .  loopLimit = n
5e90: 53 74 72 20 2d 20 6e 50 61 74 74 65 72 6e 3b 20  Str - nPattern; 
5ea0: 20 0a 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 69   .  for(i=j=0; i
5eb0: 3c 3d 6c 6f 6f 70 4c 69 6d 69 74 3b 20 69 2b 2b  <=loopLimit; i++
5ec0: 29 7b 0a 20 20 20 20 69 66 28 20 7a 53 74 72 5b  ){.    if( zStr[
5ed0: 69 5d 21 3d 7a 50 61 74 74 65 72 6e 5b 30 5d 20  i]!=zPattern[0] 
5ee0: 7c 7c 20 6d 65 6d 63 6d 70 28 26 7a 53 74 72 5b  || memcmp(&zStr[
5ef0: 69 5d 2c 20 7a 50 61 74 74 65 72 6e 2c 20 6e 50  i], zPattern, nP
5f00: 61 74 74 65 72 6e 29 20 29 7b 0a 20 20 20 20 20  attern) ){.     
5f10: 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20 7a 53 74   zOut[j++] = zSt
5f20: 72 5b 69 5d 3b 0a 20 20 20 20 7d 65 6c 73 65 7b  r[i];.    }else{
5f30: 0a 20 20 20 20 20 20 75 38 20 2a 7a 4f 6c 64 3b  .      u8 *zOld;
5f40: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 20 2a  .      sqlite3 *
5f50: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
5f60: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
5f70: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 6e  ontext);.      n
5f80: 4f 75 74 20 2b 3d 20 6e 52 65 70 20 2d 20 6e 50  Out += nRep - nP
5f90: 61 74 74 65 72 6e 3b 0a 20 20 20 20 20 20 69 66  attern;.      if
5fa0: 28 20 6e 4f 75 74 3e 3d 64 62 2d 3e 61 4c 69 6d  ( nOut>=db->aLim
5fb0: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
5fc0: 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 20  LENGTH] ){.     
5fd0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
5fe0: 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63  t_error_toobig(c
5ff0: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 20  ontext);.       
6000: 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 28 64   sqlite3DbFree(d
6010: 62 2c 20 7a 4f 75 74 29 3b 0a 20 20 20 20 20 20  b, zOut);.      
6020: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20    return;.      
6030: 7d 0a 20 20 20 20 20 20 7a 4f 6c 64 20 3d 20 7a  }.      zOld = z
6040: 4f 75 74 3b 0a 20 20 20 20 20 20 7a 4f 75 74 20  Out;.      zOut 
6050: 3d 20 73 71 6c 69 74 65 33 5f 72 65 61 6c 6c 6f  = sqlite3_reallo
6060: 63 28 7a 4f 75 74 2c 20 28 69 6e 74 29 6e 4f 75  c(zOut, (int)nOu
6070: 74 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a 4f  t);.      if( zO
6080: 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  ut==0 ){.       
6090: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
60a0: 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74  error_nomem(cont
60b0: 65 78 74 29 3b 0a 20 20 20 20 20 20 20 20 73 71  ext);.        sq
60c0: 6c 69 74 65 33 44 62 46 72 65 65 28 64 62 2c 20  lite3DbFree(db, 
60d0: 7a 4f 6c 64 29 3b 0a 20 20 20 20 20 20 20 20 72  zOld);.        r
60e0: 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20  eturn;.      }. 
60f0: 20 20 20 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75       memcpy(&zOu
6100: 74 5b 6a 5d 2c 20 7a 52 65 70 2c 20 6e 52 65 70  t[j], zRep, nRep
6110: 29 3b 0a 20 20 20 20 20 20 6a 20 2b 3d 20 6e 52  );.      j += nR
6120: 65 70 3b 0a 20 20 20 20 20 20 69 20 2b 3d 20 6e  ep;.      i += n
6130: 50 61 74 74 65 72 6e 2d 31 3b 0a 20 20 20 20 7d  Pattern-1;.    }
6140: 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 6a  .  }.  assert( j
6150: 2b 6e 53 74 72 2d 69 2b 31 3d 3d 6e 4f 75 74 20  +nStr-i+1==nOut 
6160: 29 3b 0a 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75  );.  memcpy(&zOu
6170: 74 5b 6a 5d 2c 20 26 7a 53 74 72 5b 69 5d 2c 20  t[j], &zStr[i], 
6180: 6e 53 74 72 2d 69 29 3b 0a 20 20 6a 20 2b 3d 20  nStr-i);.  j += 
6190: 6e 53 74 72 20 2d 20 69 3b 0a 20 20 61 73 73 65  nStr - i;.  asse
61a0: 72 74 28 20 6a 3c 3d 6e 4f 75 74 20 29 3b 0a 20  rt( j<=nOut );. 
61b0: 20 7a 4f 75 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20   zOut[j] = 0;.  
61c0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
61d0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68  ext(context, (ch
61e0: 61 72 2a 29 7a 4f 75 74 2c 20 6a 2c 20 73 71 6c  ar*)zOut, j, sql
61f0: 69 74 65 33 5f 66 72 65 65 29 3b 0a 7d 0a 0a 2f  ite3_free);.}../
6200: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
6210: 69 6f 6e 20 6f 66 20 74 68 65 20 54 52 49 4d 28  ion of the TRIM(
6220: 29 2c 20 4c 54 52 49 4d 28 29 2c 20 61 6e 64 20  ), LTRIM(), and 
6230: 52 54 52 49 4d 28 29 20 66 75 6e 63 74 69 6f 6e  RTRIM() function
6240: 73 2e 0a 2a 2a 20 54 68 65 20 75 73 65 72 64 61  s..** The userda
6250: 74 61 20 69 73 20 30 78 31 20 66 6f 72 20 6c 65  ta is 0x1 for le
6260: 66 74 20 74 72 69 6d 2c 20 30 78 32 20 66 6f 72  ft trim, 0x2 for
6270: 20 72 69 67 68 74 20 74 72 69 6d 2c 20 30 78 33   right trim, 0x3
6280: 20 66 6f 72 20 62 6f 74 68 2e 0a 2a 2f 0a 73 74   for both..*/.st
6290: 61 74 69 63 20 76 6f 69 64 20 74 72 69 6d 46 75  atic void trimFu
62a0: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
62b0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
62c0: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
62d0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
62e0: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  gv.){.  const un
62f0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 49 6e  signed char *zIn
6300: 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 49 6e 70  ;         /* Inp
6310: 75 74 20 73 74 72 69 6e 67 20 2a 2f 0a 20 20 63  ut string */.  c
6320: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
6330: 61 72 20 2a 7a 43 68 61 72 53 65 74 3b 20 20 20  ar *zCharSet;   
6340: 20 2f 2a 20 53 65 74 20 6f 66 20 63 68 61 72 61   /* Set of chara
6350: 63 74 65 72 73 20 74 6f 20 74 72 69 6d 20 2a 2f  cters to trim */
6360: 0a 20 20 69 6e 74 20 6e 49 6e 3b 20 20 20 20 20  .  int nIn;     
6370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6380: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
6390: 66 20 62 79 74 65 73 20 69 6e 20 69 6e 70 75 74  f bytes in input
63a0: 20 2a 2f 0a 20 20 69 6e 74 20 66 6c 61 67 73 3b   */.  int flags;
63b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
63c0: 20 20 20 20 20 20 20 20 2f 2a 20 31 3a 20 74 72          /* 1: tr
63d0: 69 6d 6c 65 66 74 20 20 32 3a 20 74 72 69 6d 72  imleft  2: trimr
63e0: 69 67 68 74 20 20 33 3a 20 74 72 69 6d 20 2a 2f  ight  3: trim */
63f0: 0a 20 20 69 6e 74 20 69 3b 20 20 20 20 20 20 20  .  int i;       
6400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6410: 20 20 20 20 20 2f 2a 20 4c 6f 6f 70 20 63 6f 75       /* Loop cou
6420: 6e 74 65 72 20 2a 2f 0a 20 20 75 6e 73 69 67 6e  nter */.  unsign
6430: 65 64 20 63 68 61 72 20 2a 61 4c 65 6e 20 3d 20  ed char *aLen = 
6440: 30 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c  0;          /* L
6450: 65 6e 67 74 68 20 6f 66 20 65 61 63 68 20 63 68  ength of each ch
6460: 61 72 61 63 74 65 72 20 69 6e 20 7a 43 68 61 72  aracter in zChar
6470: 53 65 74 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65  Set */.  unsigne
6480: 64 20 63 68 61 72 20 2a 2a 61 7a 43 68 61 72 20  d char **azChar 
6490: 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a 20 49 6e  = 0;       /* In
64a0: 64 69 76 69 64 75 61 6c 20 63 68 61 72 61 63 74  dividual charact
64b0: 65 72 73 20 69 6e 20 7a 43 68 61 72 53 65 74 20  ers in zCharSet 
64c0: 2a 2f 0a 20 20 69 6e 74 20 6e 43 68 61 72 3b 20  */.  int nChar; 
64d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
64e0: 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72         /* Number
64f0: 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 69   of characters i
6500: 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a 0a 20  n zCharSet */.. 
6510: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
6520: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
6530: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b  ==SQLITE_NULL ){
6540: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
6550: 0a 20 20 7a 49 6e 20 3d 20 73 71 6c 69 74 65 33  .  zIn = sqlite3
6560: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
6570: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 49 6e 3d  [0]);.  if( zIn=
6580: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e  =0 ) return;.  n
6590: 49 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  In = sqlite3_val
65a0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
65b0: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 7a 49 6e  );.  assert( zIn
65c0: 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ==sqlite3_value_
65d0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b  text(argv[0]) );
65e0: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 31 20 29  .  if( argc==1 )
65f0: 7b 0a 20 20 20 20 73 74 61 74 69 63 20 63 6f 6e  {.    static con
6600: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
6610: 20 6c 65 6e 4f 6e 65 5b 5d 20 3d 20 7b 20 31 20   lenOne[] = { 1 
6620: 7d 3b 0a 20 20 20 20 73 74 61 74 69 63 20 75 6e  };.    static un
6630: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 20 63 6f  signed char * co
6640: 6e 73 74 20 61 7a 4f 6e 65 5b 5d 20 3d 20 7b 20  nst azOne[] = { 
6650: 28 75 38 2a 29 22 20 22 20 7d 3b 0a 20 20 20 20  (u8*)" " };.    
6660: 6e 43 68 61 72 20 3d 20 31 3b 0a 20 20 20 20 61  nChar = 1;.    a
6670: 4c 65 6e 20 3d 20 28 75 38 2a 29 6c 65 6e 4f 6e  Len = (u8*)lenOn
6680: 65 3b 0a 20 20 20 20 61 7a 43 68 61 72 20 3d 20  e;.    azChar = 
6690: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a  (unsigned char *
66a0: 2a 29 61 7a 4f 6e 65 3b 0a 20 20 20 20 7a 43 68  *)azOne;.    zCh
66b0: 61 72 53 65 74 20 3d 20 30 3b 0a 20 20 7d 65 6c  arSet = 0;.  }el
66c0: 73 65 20 69 66 28 20 28 7a 43 68 61 72 53 65 74  se if( (zCharSet
66d0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
66e0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 29 3d  _text(argv[1]))=
66f0: 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  =0 ){.    return
6700: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 63  ;.  }else{.    c
6710: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
6720: 61 72 20 2a 7a 3b 0a 20 20 20 20 66 6f 72 28 7a  ar *z;.    for(z
6730: 3d 7a 43 68 61 72 53 65 74 2c 20 6e 43 68 61 72  =zCharSet, nChar
6740: 3d 30 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29  =0; *z; nChar++)
6750: 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53  {.      SQLITE_S
6760: 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20  KIP_UTF8(z);.   
6770: 20 7d 0a 20 20 20 20 69 66 28 20 6e 43 68 61 72   }.    if( nChar
6780: 3e 30 20 29 7b 0a 20 20 20 20 20 20 61 7a 43 68  >0 ){.      azCh
6790: 61 72 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c  ar = contextMall
67a0: 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36  oc(context, ((i6
67b0: 34 29 6e 43 68 61 72 29 2a 28 73 69 7a 65 6f 66  4)nChar)*(sizeof
67c0: 28 63 68 61 72 2a 29 2b 31 29 29 3b 0a 20 20 20  (char*)+1));.   
67d0: 20 20 20 69 66 28 20 61 7a 43 68 61 72 3d 3d 30     if( azChar==0
67e0: 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75   ){.        retu
67f0: 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  rn;.      }.    
6800: 20 20 61 4c 65 6e 20 3d 20 28 75 6e 73 69 67 6e    aLen = (unsign
6810: 65 64 20 63 68 61 72 2a 29 26 61 7a 43 68 61 72  ed char*)&azChar
6820: 5b 6e 43 68 61 72 5d 3b 0a 20 20 20 20 20 20 66  [nChar];.      f
6830: 6f 72 28 7a 3d 7a 43 68 61 72 53 65 74 2c 20 6e  or(z=zCharSet, n
6840: 43 68 61 72 3d 30 3b 20 2a 7a 3b 20 6e 43 68 61  Char=0; *z; nCha
6850: 72 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 61 7a  r++){.        az
6860: 43 68 61 72 5b 6e 43 68 61 72 5d 20 3d 20 28 75  Char[nChar] = (u
6870: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a  nsigned char *)z
6880: 3b 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54 45  ;.        SQLITE
6890: 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20  _SKIP_UTF8(z);. 
68a0: 20 20 20 20 20 20 20 61 4c 65 6e 5b 6e 43 68 61         aLen[nCha
68b0: 72 5d 20 3d 20 28 75 38 29 28 7a 20 2d 20 61 7a  r] = (u8)(z - az
68c0: 43 68 61 72 5b 6e 43 68 61 72 5d 29 3b 0a 20 20  Char[nChar]);.  
68d0: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a      }.    }.  }.
68e0: 20 20 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b    if( nChar>0 ){
68f0: 0a 20 20 20 20 66 6c 61 67 73 20 3d 20 53 51 4c  .    flags = SQL
6900: 49 54 45 5f 50 54 52 5f 54 4f 5f 49 4e 54 28 73  ITE_PTR_TO_INT(s
6910: 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61  qlite3_user_data
6920: 28 63 6f 6e 74 65 78 74 29 29 3b 0a 20 20 20 20  (context));.    
6930: 69 66 28 20 66 6c 61 67 73 20 26 20 31 20 29 7b  if( flags & 1 ){
6940: 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 6e 49  .      while( nI
6950: 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69  n>0 ){.        i
6960: 6e 74 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20  nt len = 0;.    
6970: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e      for(i=0; i<n
6980: 43 68 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  Char; i++){.    
6990: 20 20 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e        len = aLen
69a0: 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69  [i];.          i
69b0: 66 28 20 6d 65 6d 63 6d 70 28 7a 49 6e 2c 20 61  f( memcmp(zIn, a
69c0: 7a 43 68 61 72 5b 69 5d 2c 20 6c 65 6e 29 3d 3d  zChar[i], len)==
69d0: 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20  0 ) break;.     
69e0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28     }.        if(
69f0: 20 69 3e 3d 6e 43 68 61 72 20 29 20 62 72 65 61   i>=nChar ) brea
6a00: 6b 3b 0a 20 20 20 20 20 20 20 20 7a 49 6e 20 2b  k;.        zIn +
6a10: 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 20 20 6e  = len;.        n
6a20: 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20 20  In -= len;.     
6a30: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28   }.    }.    if(
6a40: 20 66 6c 61 67 73 20 26 20 32 20 29 7b 0a 20 20   flags & 2 ){.  
6a50: 20 20 20 20 77 68 69 6c 65 28 20 6e 49 6e 3e 30      while( nIn>0
6a60: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20   ){.        int 
6a70: 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 20  len = 0;.       
6a80: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 43 68 61   for(i=0; i<nCha
6a90: 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  r; i++){.       
6aa0: 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e 5b 69 5d     len = aLen[i]
6ab0: 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20  ;.          if( 
6ac0: 6c 65 6e 3c 3d 6e 49 6e 20 26 26 20 6d 65 6d 63  len<=nIn && memc
6ad0: 6d 70 28 26 7a 49 6e 5b 6e 49 6e 2d 6c 65 6e 5d  mp(&zIn[nIn-len]
6ae0: 2c 61 7a 43 68 61 72 5b 69 5d 2c 6c 65 6e 29 3d  ,azChar[i],len)=
6af0: 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20  =0 ) break;.    
6b00: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66      }.        if
6b10: 28 20 69 3e 3d 6e 43 68 61 72 20 29 20 62 72 65  ( i>=nChar ) bre
6b20: 61 6b 3b 0a 20 20 20 20 20 20 20 20 6e 49 6e 20  ak;.        nIn 
6b30: 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 7d 0a  -= len;.      }.
6b40: 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 7a 43      }.    if( zC
6b50: 68 61 72 53 65 74 20 29 7b 0a 20 20 20 20 20 20  harSet ){.      
6b60: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 61 7a 43  sqlite3_free(azC
6b70: 68 61 72 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  har);.    }.  }.
6b80: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
6b90: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28  _text(context, (
6ba0: 63 68 61 72 2a 29 7a 49 6e 2c 20 6e 49 6e 2c 20  char*)zIn, nIn, 
6bb0: 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54  SQLITE_TRANSIENT
6bc0: 29 3b 0a 7d 0a 0a 0a 23 69 66 64 65 66 20 53 51  );.}...#ifdef SQ
6bd0: 4c 49 54 45 5f 53 4f 55 4e 44 45 58 0a 2f 2a 0a  LITE_SOUNDEX./*.
6be0: 2a 2a 20 43 6f 6d 70 75 74 65 20 74 68 65 20 73  ** Compute the s
6bf0: 6f 75 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67 20  oundex encoding 
6c00: 6f 66 20 61 20 77 6f 72 64 2e 0a 2a 2f 0a 73 74  of a word..*/.st
6c10: 61 74 69 63 20 76 6f 69 64 20 73 6f 75 6e 64 65  atic void sounde
6c20: 78 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  xFunc(.  sqlite3
6c30: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
6c40: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
6c50: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
6c60: 2a 61 72 67 76 0a 29 7b 0a 20 20 63 68 61 72 20  *argv.){.  char 
6c70: 7a 52 65 73 75 6c 74 5b 38 5d 3b 0a 20 20 63 6f  zResult[8];.  co
6c80: 6e 73 74 20 75 38 20 2a 7a 49 6e 3b 0a 20 20 69  nst u8 *zIn;.  i
6c90: 6e 74 20 69 2c 20 6a 3b 0a 20 20 73 74 61 74 69  nt i, j;.  stati
6ca0: 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64  c const unsigned
6cb0: 20 63 68 61 72 20 69 43 6f 64 65 5b 5d 20 3d 20   char iCode[] = 
6cc0: 7b 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30  {.    0, 0, 0, 0
6cd0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
6ce0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
6cf0: 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20  0, 0,.    0, 0, 
6d00: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
6d10: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
6d20: 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c   0, 0, 0,.    0,
6d30: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
6d40: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
6d50: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20  , 0, 0, 0, 0,.  
6d60: 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c    0, 0, 0, 0, 0,
6d70: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
6d80: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
6d90: 2c 0a 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 32  ,.    0, 0, 1, 2
6da0: 2c 20 33 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c  , 3, 0, 1, 2, 0,
6db0: 20 30 2c 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20   0, 2, 2, 4, 5, 
6dc0: 35 2c 20 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20  5, 0,.    1, 2, 
6dd0: 36 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30  6, 2, 3, 0, 1, 0
6de0: 2c 20 32 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c  , 2, 0, 2, 0, 0,
6df0: 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c   0, 0, 0,.    0,
6e00: 20 30 2c 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20   0, 1, 2, 3, 0, 
6e10: 31 2c 20 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32  1, 2, 0, 0, 2, 2
6e20: 2c 20 34 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20  , 4, 5, 5, 0,.  
6e30: 20 20 31 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c    1, 2, 6, 2, 3,
6e40: 20 30 2c 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20   0, 1, 0, 2, 0, 
6e50: 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  2, 0, 0, 0, 0, 0
6e60: 2c 0a 20 20 7d 3b 0a 20 20 61 73 73 65 72 74 28  ,.  };.  assert(
6e70: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 7a 49   argc==1 );.  zI
6e80: 6e 20 3d 20 28 75 38 2a 29 73 71 6c 69 74 65 33  n = (u8*)sqlite3
6e90: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
6ea0: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 49 6e 3d  [0]);.  if( zIn=
6eb0: 3d 30 20 29 20 7a 49 6e 20 3d 20 28 75 38 2a 29  =0 ) zIn = (u8*)
6ec0: 22 22 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 7a  "";.  for(i=0; z
6ed0: 49 6e 5b 69 5d 20 26 26 20 21 73 71 6c 69 74 65  In[i] && !sqlite
6ee0: 33 49 73 61 6c 70 68 61 28 7a 49 6e 5b 69 5d 29  3Isalpha(zIn[i])
6ef0: 3b 20 69 2b 2b 29 7b 7d 0a 20 20 69 66 28 20 7a  ; i++){}.  if( z
6f00: 49 6e 5b 69 5d 20 29 7b 0a 20 20 20 20 75 38 20  In[i] ){.    u8 
6f10: 70 72 65 76 63 6f 64 65 20 3d 20 69 43 6f 64 65  prevcode = iCode
6f20: 5b 7a 49 6e 5b 69 5d 26 30 78 37 66 5d 3b 0a 20  [zIn[i]&0x7f];. 
6f30: 20 20 20 7a 52 65 73 75 6c 74 5b 30 5d 20 3d 20     zResult[0] = 
6f40: 73 71 6c 69 74 65 33 54 6f 75 70 70 65 72 28 7a  sqlite3Toupper(z
6f50: 49 6e 5b 69 5d 29 3b 0a 20 20 20 20 66 6f 72 28  In[i]);.    for(
6f60: 6a 3d 31 3b 20 6a 3c 34 20 26 26 20 7a 49 6e 5b  j=1; j<4 && zIn[
6f70: 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  i]; i++){.      
6f80: 69 6e 74 20 63 6f 64 65 20 3d 20 69 43 6f 64 65  int code = iCode
6f90: 5b 7a 49 6e 5b 69 5d 26 30 78 37 66 5d 3b 0a 20  [zIn[i]&0x7f];. 
6fa0: 20 20 20 20 20 69 66 28 20 63 6f 64 65 3e 30 20       if( code>0 
6fb0: 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63  ){.        if( c
6fc0: 6f 64 65 21 3d 70 72 65 76 63 6f 64 65 20 29 7b  ode!=prevcode ){
6fd0: 0a 20 20 20 20 20 20 20 20 20 20 70 72 65 76 63  .          prevc
6fe0: 6f 64 65 20 3d 20 63 6f 64 65 3b 0a 20 20 20 20  ode = code;.    
6ff0: 20 20 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a 2b        zResult[j+
7000: 2b 5d 20 3d 20 63 6f 64 65 20 2b 20 27 30 27 3b  +] = code + '0';
7010: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
7020: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
7030: 70 72 65 76 63 6f 64 65 20 3d 20 30 3b 0a 20 20  prevcode = 0;.  
7040: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20      }.    }.    
7050: 77 68 69 6c 65 28 20 6a 3c 34 20 29 7b 0a 20 20  while( j<4 ){.  
7060: 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d      zResult[j++]
7070: 20 3d 20 27 30 27 3b 0a 20 20 20 20 7d 0a 20 20   = '0';.    }.  
7080: 20 20 7a 52 65 73 75 6c 74 5b 6a 5d 20 3d 20 30    zResult[j] = 0
7090: 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  ;.    sqlite3_re
70a0: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
70b0: 74 2c 20 7a 52 65 73 75 6c 74 2c 20 34 2c 20 53  t, zResult, 4, S
70c0: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29  QLITE_TRANSIENT)
70d0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73  ;.  }else{.    s
70e0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
70f0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 22 3f 30 30  xt(context, "?00
7100: 30 22 2c 20 34 2c 20 53 51 4c 49 54 45 5f 53 54  0", 4, SQLITE_ST
7110: 41 54 49 43 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e  ATIC);.  }.}.#en
7120: 64 69 66 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c  dif..#ifndef SQL
7130: 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58  ITE_OMIT_LOAD_EX
7140: 54 45 4e 53 49 4f 4e 0a 2f 2a 0a 2a 2a 20 41 20  TENSION./*.** A 
7150: 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 6c 6f  function that lo
7160: 61 64 73 20 61 20 73 68 61 72 65 64 2d 6c 69 62  ads a shared-lib
7170: 72 61 72 79 20 65 78 74 65 6e 73 69 6f 6e 20 74  rary extension t
7180: 68 65 6e 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c  hen returns NULL
7190: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
71a0: 20 6c 6f 61 64 45 78 74 28 73 71 6c 69 74 65 33   loadExt(sqlite3
71b0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
71c0: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c  t, int argc, sql
71d0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
71e0: 76 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  v){.  const char
71f0: 20 2a 7a 46 69 6c 65 20 3d 20 28 63 6f 6e 73 74   *zFile = (const
7200: 20 63 68 61 72 20 2a 29 73 71 6c 69 74 65 33 5f   char *)sqlite3_
7210: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
7220: 30 5d 29 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61  0]);.  const cha
7230: 72 20 2a 7a 50 72 6f 63 3b 0a 20 20 73 71 6c 69  r *zProc;.  sqli
7240: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
7250: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
7260: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  dle(context);.  
7270: 63 68 61 72 20 2a 7a 45 72 72 4d 73 67 20 3d 20  char *zErrMsg = 
7280: 30 3b 0a 0a 20 20 69 66 28 20 61 72 67 63 3d 3d  0;..  if( argc==
7290: 32 20 29 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d  2 ){.    zProc =
72a0: 20 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 73   (const char *)s
72b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
72c0: 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 7d 65  t(argv[1]);.  }e
72d0: 6c 73 65 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d  lse{.    zProc =
72e0: 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 46   0;.  }.  if( zF
72f0: 69 6c 65 20 26 26 20 73 71 6c 69 74 65 33 5f 6c  ile && sqlite3_l
7300: 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 28 64 62  oad_extension(db
7310: 2c 20 7a 46 69 6c 65 2c 20 7a 50 72 6f 63 2c 20  , zFile, zProc, 
7320: 26 7a 45 72 72 4d 73 67 29 20 29 7b 0a 20 20 20  &zErrMsg) ){.   
7330: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
7340: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 7a  error(context, z
7350: 45 72 72 4d 73 67 2c 20 2d 31 29 3b 0a 20 20 20  ErrMsg, -1);.   
7360: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 45   sqlite3_free(zE
7370: 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 7d 0a 23 65  rrMsg);.  }.}.#e
7380: 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20  ndif.../*.** An 
7390: 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65 20  instance of the 
73a0: 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 74  following struct
73b0: 75 72 65 20 68 6f 6c 64 73 20 74 68 65 20 63 6f  ure holds the co
73c0: 6e 74 65 78 74 20 6f 66 20 61 0a 2a 2a 20 73 75  ntext of a.** su
73d0: 6d 28 29 20 6f 72 20 61 76 67 28 29 20 61 67 67  m() or avg() agg
73e0: 72 65 67 61 74 65 20 63 6f 6d 70 75 74 61 74 69  regate computati
73f0: 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73  on..*/.typedef s
7400: 74 72 75 63 74 20 53 75 6d 43 74 78 20 53 75 6d  truct SumCtx Sum
7410: 43 74 78 3b 0a 73 74 72 75 63 74 20 53 75 6d 43  Ctx;.struct SumC
7420: 74 78 20 7b 0a 20 20 64 6f 75 62 6c 65 20 72 53  tx {.  double rS
7430: 75 6d 3b 20 20 20 20 20 20 2f 2a 20 46 6c 6f 61  um;      /* Floa
7440: 74 69 6e 67 20 70 6f 69 6e 74 20 73 75 6d 20 2a  ting point sum *
7450: 2f 0a 20 20 69 36 34 20 69 53 75 6d 3b 20 20 20  /.  i64 iSum;   
7460: 20 20 20 20 20 20 2f 2a 20 49 6e 74 65 67 65 72        /* Integer
7470: 20 73 75 6d 20 2a 2f 20 20 20 0a 20 20 69 36 34   sum */   .  i64
7480: 20 63 6e 74 3b 20 20 20 20 20 20 20 20 20 20 2f   cnt;          /
7490: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 65 6c 65 6d  * Number of elem
74a0: 65 6e 74 73 20 73 75 6d 6d 65 64 20 2a 2f 0a 20  ents summed */. 
74b0: 20 75 38 20 6f 76 65 72 66 6c 6f 77 3b 20 20 20   u8 overflow;   
74c0: 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 69 6e     /* True if in
74d0: 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 20 73  teger overflow s
74e0: 65 65 6e 20 2a 2f 0a 20 20 75 38 20 61 70 70 72  een */.  u8 appr
74f0: 6f 78 3b 20 20 20 20 20 20 20 20 2f 2a 20 54 72  ox;        /* Tr
7500: 75 65 20 69 66 20 6e 6f 6e 2d 69 6e 74 65 67 65  ue if non-intege
7510: 72 20 76 61 6c 75 65 20 77 61 73 20 69 6e 70 75  r value was inpu
7520: 74 20 74 6f 20 74 68 65 20 73 75 6d 20 2a 2f 0a  t to the sum */.
7530: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e  };../*.** Routin
7540: 65 73 20 75 73 65 64 20 74 6f 20 63 6f 6d 70 75  es used to compu
7550: 74 65 20 74 68 65 20 73 75 6d 2c 20 61 76 65 72  te the sum, aver
7560: 61 67 65 2c 20 61 6e 64 20 74 6f 74 61 6c 2e 0a  age, and total..
7570: 2a 2a 0a 2a 2a 20 54 68 65 20 53 55 4d 28 29 20  **.** The SUM() 
7580: 66 75 6e 63 74 69 6f 6e 20 66 6f 6c 6c 6f 77 73  function follows
7590: 20 74 68 65 20 28 62 72 6f 6b 65 6e 29 20 53 51   the (broken) SQ
75a0: 4c 20 73 74 61 6e 64 61 72 64 20 77 68 69 63 68  L standard which
75b0: 20 6d 65 61 6e 73 0a 2a 2a 20 74 68 61 74 20 69   means.** that i
75c0: 74 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 20 69  t returns NULL i
75d0: 66 20 69 74 20 73 75 6d 73 20 6f 76 65 72 20 6e  f it sums over n
75e0: 6f 20 69 6e 70 75 74 73 2e 20 20 54 4f 54 41 4c  o inputs.  TOTAL
75f0: 20 72 65 74 75 72 6e 73 0a 2a 2a 20 30 2e 30 20   returns.** 0.0 
7600: 69 6e 20 74 68 61 74 20 63 61 73 65 2e 20 20 49  in that case.  I
7610: 6e 20 61 64 64 69 74 69 6f 6e 2c 20 54 4f 54 41  n addition, TOTA
7620: 4c 20 61 6c 77 61 79 73 20 72 65 74 75 72 6e 73  L always returns
7630: 20 61 20 66 6c 6f 61 74 20 77 68 65 72 65 0a 2a   a float where.*
7640: 2a 20 53 55 4d 20 6d 69 67 68 74 20 72 65 74 75  * SUM might retu
7650: 72 6e 20 61 6e 20 69 6e 74 65 67 65 72 20 69 66  rn an integer if
7660: 20 69 74 20 6e 65 76 65 72 20 65 6e 63 6f 75 6e   it never encoun
7670: 74 65 72 73 20 61 20 66 6c 6f 61 74 69 6e 67 20  ters a floating 
7680: 70 6f 69 6e 74 0a 2a 2a 20 76 61 6c 75 65 2e 20  point.** value. 
7690: 20 54 4f 54 41 4c 20 6e 65 76 65 72 20 66 61 69   TOTAL never fai
76a0: 6c 73 2c 20 62 75 74 20 53 55 4d 20 6d 69 67 68  ls, but SUM migh
76b0: 74 20 74 68 72 6f 75 67 68 20 61 6e 20 65 78 63  t through an exc
76c0: 65 70 74 69 6f 6e 20 69 66 0a 2a 2a 20 69 74 20  eption if.** it 
76d0: 6f 76 65 72 66 6c 6f 77 73 20 61 6e 20 69 6e 74  overflows an int
76e0: 65 67 65 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  eger..*/.static 
76f0: 76 6f 69 64 20 73 75 6d 53 74 65 70 28 73 71 6c  void sumStep(sql
7700: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
7710: 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c  ntext, int argc,
7720: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
7730: 2a 61 72 67 76 29 7b 0a 20 20 53 75 6d 43 74 78  *argv){.  SumCtx
7740: 20 2a 70 3b 0a 20 20 69 6e 74 20 74 79 70 65 3b   *p;.  int type;
7750: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
7760: 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =1 );.  UNUSED_P
7770: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
7780: 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67    p = sqlite3_ag
7790: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
77a0: 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28  context, sizeof(
77b0: 2a 70 29 29 3b 0a 20 20 74 79 70 65 20 3d 20 73  *p));.  type = s
77c0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 6e 75 6d  qlite3_value_num
77d0: 65 72 69 63 5f 74 79 70 65 28 61 72 67 76 5b 30  eric_type(argv[0
77e0: 5d 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20 74  ]);.  if( p && t
77f0: 79 70 65 21 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  ype!=SQLITE_NULL
7800: 20 29 7b 0a 20 20 20 20 70 2d 3e 63 6e 74 2b 2b   ){.    p->cnt++
7810: 3b 0a 20 20 20 20 69 66 28 20 74 79 70 65 3d 3d  ;.    if( type==
7820: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 20 29  SQLITE_INTEGER )
7830: 7b 0a 20 20 20 20 20 20 69 36 34 20 76 20 3d 20  {.      i64 v = 
7840: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
7850: 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  t64(argv[0]);.  
7860: 20 20 20 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 76      p->rSum += v
7870: 3b 0a 20 20 20 20 20 20 69 66 28 20 28 70 2d 3e  ;.      if( (p->
7880: 61 70 70 72 6f 78 7c 70 2d 3e 6f 76 65 72 66 6c  approx|p->overfl
7890: 6f 77 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  ow)==0 ){.      
78a0: 20 20 69 36 34 20 69 4e 65 77 53 75 6d 20 3d 20    i64 iNewSum = 
78b0: 70 2d 3e 69 53 75 6d 20 2b 20 76 3b 0a 20 20 20  p->iSum + v;.   
78c0: 20 20 20 20 20 69 6e 74 20 73 31 20 3d 20 28 69       int s1 = (i
78d0: 6e 74 29 28 70 2d 3e 69 53 75 6d 20 3e 3e 20 28  nt)(p->iSum >> (
78e0: 73 69 7a 65 6f 66 28 69 36 34 29 2a 38 2d 31 29  sizeof(i64)*8-1)
78f0: 29 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 73  );.        int s
7900: 32 20 3d 20 28 69 6e 74 29 28 76 20 20 20 20 20  2 = (int)(v     
7910: 20 20 3e 3e 20 28 73 69 7a 65 6f 66 28 69 36 34    >> (sizeof(i64
7920: 29 2a 38 2d 31 29 29 3b 0a 20 20 20 20 20 20 20  )*8-1));.       
7930: 20 69 6e 74 20 73 33 20 3d 20 28 69 6e 74 29 28   int s3 = (int)(
7940: 69 4e 65 77 53 75 6d 20 3e 3e 20 28 73 69 7a 65  iNewSum >> (size
7950: 6f 66 28 69 36 34 29 2a 38 2d 31 29 29 3b 0a 20  of(i64)*8-1));. 
7960: 20 20 20 20 20 20 20 70 2d 3e 6f 76 65 72 66 6c         p->overfl
7970: 6f 77 20 3d 20 28 28 73 31 26 73 32 26 7e 73 33  ow = ((s1&s2&~s3
7980: 29 20 7c 20 28 7e 73 31 26 7e 73 32 26 73 33 29  ) | (~s1&~s2&s3)
7990: 29 3f 31 3a 30 3b 0a 20 20 20 20 20 20 20 20 70  )?1:0;.        p
79a0: 2d 3e 69 53 75 6d 20 3d 20 69 4e 65 77 53 75 6d  ->iSum = iNewSum
79b0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65  ;.      }.    }e
79c0: 6c 73 65 7b 0a 20 20 20 20 20 20 70 2d 3e 72 53  lse{.      p->rS
79d0: 75 6d 20 2b 3d 20 73 71 6c 69 74 65 33 5f 76 61  um += sqlite3_va
79e0: 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b  lue_double(argv[
79f0: 30 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e 61 70  0]);.      p->ap
7a00: 70 72 6f 78 20 3d 20 31 3b 0a 20 20 20 20 7d 0a  prox = 1;.    }.
7a10: 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69    }.}.static voi
7a20: 64 20 73 75 6d 46 69 6e 61 6c 69 7a 65 28 73 71  d sumFinalize(sq
7a30: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
7a40: 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75 6d 43 74  ontext){.  SumCt
7a50: 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69  x *p;.  p = sqli
7a60: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
7a70: 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30  ntext(context, 0
7a80: 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20 70 2d  );.  if( p && p-
7a90: 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20 20 69 66  >cnt>0 ){.    if
7aa0: 28 20 70 2d 3e 6f 76 65 72 66 6c 6f 77 20 29 7b  ( p->overflow ){
7ab0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
7ac0: 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74  esult_error(cont
7ad0: 65 78 74 2c 22 69 6e 74 65 67 65 72 20 6f 76 65  ext,"integer ove
7ae0: 72 66 6c 6f 77 22 2c 2d 31 29 3b 0a 20 20 20 20  rflow",-1);.    
7af0: 7d 65 6c 73 65 20 69 66 28 20 70 2d 3e 61 70 70  }else if( p->app
7b00: 72 6f 78 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  rox ){.      sql
7b10: 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62  ite3_result_doub
7b20: 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 72  le(context, p->r
7b30: 53 75 6d 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b  Sum);.    }else{
7b40: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
7b50: 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74  esult_int64(cont
7b60: 65 78 74 2c 20 70 2d 3e 69 53 75 6d 29 3b 0a 20  ext, p->iSum);. 
7b70: 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74 69     }.  }.}.stati
7b80: 63 20 76 6f 69 64 20 61 76 67 46 69 6e 61 6c 69  c void avgFinali
7b90: 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  ze(sqlite3_conte
7ba0: 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20  xt *context){.  
7bb0: 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d  SumCtx *p;.  p =
7bc0: 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61   sqlite3_aggrega
7bd0: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
7be0: 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 20  xt, 0);.  if( p 
7bf0: 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20  && p->cnt>0 ){. 
7c00: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
7c10: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
7c20: 2c 20 70 2d 3e 72 53 75 6d 2f 28 64 6f 75 62 6c  , p->rSum/(doubl
7c30: 65 29 70 2d 3e 63 6e 74 29 3b 0a 20 20 7d 0a 7d  e)p->cnt);.  }.}
7c40: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74  .static void tot
7c50: 61 6c 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  alFinalize(sqlit
7c60: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
7c70: 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a  ext){.  SumCtx *
7c80: 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  p;.  p = sqlite3
7c90: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
7ca0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a  xt(context, 0);.
7cb0: 20 20 2f 2a 20 28 64 6f 75 62 6c 65 29 30 20 49    /* (double)0 I
7cc0: 6e 20 63 61 73 65 20 6f 66 20 53 51 4c 49 54 45  n case of SQLITE
7cd0: 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50  _OMIT_FLOATING_P
7ce0: 4f 49 4e 54 2e 2e 2e 20 2a 2f 0a 20 20 73 71 6c  OINT... */.  sql
7cf0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62  ite3_result_doub
7d00: 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20  le(context, p ? 
7d10: 70 2d 3e 72 53 75 6d 20 3a 20 28 64 6f 75 62 6c  p->rSum : (doubl
7d20: 65 29 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  e)0);.}../*.** T
7d30: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72  he following str
7d40: 75 63 74 75 72 65 20 6b 65 65 70 73 20 74 72 61  ucture keeps tra
7d50: 63 6b 20 6f 66 20 73 74 61 74 65 20 69 6e 66 6f  ck of state info
7d60: 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68 65 0a  rmation for the.
7d70: 2a 2a 20 63 6f 75 6e 74 28 29 20 61 67 67 72 65  ** count() aggre
7d80: 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  gate function..*
7d90: 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75 63 74  /.typedef struct
7da0: 20 43 6f 75 6e 74 43 74 78 20 43 6f 75 6e 74 43   CountCtx CountC
7db0: 74 78 3b 0a 73 74 72 75 63 74 20 43 6f 75 6e 74  tx;.struct Count
7dc0: 43 74 78 20 7b 0a 20 20 69 36 34 20 6e 3b 0a 7d  Ctx {.  i64 n;.}
7dd0: 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65  ;../*.** Routine
7de0: 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 74  s to implement t
7df0: 68 65 20 63 6f 75 6e 74 28 29 20 61 67 67 72 65  he count() aggre
7e00: 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  gate function..*
7e10: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f  /.static void co
7e20: 75 6e 74 53 74 65 70 28 73 71 6c 69 74 65 33 5f  untStep(sqlite3_
7e30: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
7e40: 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69  , int argc, sqli
7e50: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
7e60: 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a 70  ){.  CountCtx *p
7e70: 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  p = sqlite3_
7e80: 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78  aggregate_contex
7e90: 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f  t(context, sizeo
7ea0: 66 28 2a 70 29 29 3b 0a 20 20 69 66 28 20 28 61  f(*p));.  if( (a
7eb0: 72 67 63 3d 3d 30 20 7c 7c 20 53 51 4c 49 54 45  rgc==0 || SQLITE
7ec0: 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f 76  _NULL!=sqlite3_v
7ed0: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
7ee0: 5d 29 29 20 26 26 20 70 20 29 7b 0a 20 20 20 20  ])) && p ){.    
7ef0: 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a 7d 20 20 20  p->n++;.  }.}   
7f00: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 75  .static void cou
7f10: 6e 74 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  ntFinalize(sqlit
7f20: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
7f30: 65 78 74 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78  ext){.  CountCtx
7f40: 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74   *p;.  p = sqlit
7f50: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
7f60: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29  text(context, 0)
7f70: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  ;.  sqlite3_resu
7f80: 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74  lt_int64(context
7f90: 2c 20 70 20 3f 20 70 2d 3e 6e 20 3a 20 30 29 3b  , p ? p->n : 0);
7fa0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e  .}../*.** Routin
7fb0: 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20  es to implement 
7fc0: 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20  min() and max() 
7fd0: 61 67 67 72 65 67 61 74 65 20 66 75 6e 63 74 69  aggregate functi
7fe0: 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ons..*/.static v
7ff0: 6f 69 64 20 6d 69 6e 6d 61 78 53 74 65 70 28 0a  oid minmaxStep(.
8000: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
8010: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20 20 69  t *context, .  i
8020: 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a 20 20 73  nt NotUsed, .  s
8030: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
8040: 72 67 76 0a 29 7b 0a 20 20 4d 65 6d 20 2a 70 41  rgv.){.  Mem *pA
8050: 72 67 20 20 3d 20 28 4d 65 6d 20 2a 29 61 72 67  rg  = (Mem *)arg
8060: 76 5b 30 5d 3b 0a 20 20 4d 65 6d 20 2a 70 42 65  v[0];.  Mem *pBe
8070: 73 74 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52  st;.  UNUSED_PAR
8080: 41 4d 45 54 45 52 28 4e 6f 74 55 73 65 64 29 3b  AMETER(NotUsed);
8090: 0a 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f  ..  if( sqlite3_
80a0: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
80b0: 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  0])==SQLITE_NULL
80c0: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 70 42 65   ) return;.  pBe
80d0: 73 74 20 3d 20 28 4d 65 6d 20 2a 29 73 71 6c 69  st = (Mem *)sqli
80e0: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
80f0: 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  ntext(context, s
8100: 69 7a 65 6f 66 28 2a 70 42 65 73 74 29 29 3b 0a  izeof(*pBest));.
8110: 20 20 69 66 28 20 21 70 42 65 73 74 20 29 20 72    if( !pBest ) r
8120: 65 74 75 72 6e 3b 0a 0a 20 20 69 66 28 20 70 42  eturn;..  if( pB
8130: 65 73 74 2d 3e 66 6c 61 67 73 20 29 7b 0a 20 20  est->flags ){.  
8140: 20 20 69 6e 74 20 6d 61 78 3b 0a 20 20 20 20 69    int max;.    i
8150: 6e 74 20 63 6d 70 3b 0a 20 20 20 20 43 6f 6c 6c  nt cmp;.    Coll
8160: 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c  Seq *pColl = sql
8170: 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53  ite3GetFuncCollS
8180: 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  eq(context);.   
8190: 20 2f 2a 20 54 68 69 73 20 73 74 65 70 20 66 75   /* This step fu
81a0: 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64 20 66  nction is used f
81b0: 6f 72 20 62 6f 74 68 20 74 68 65 20 6d 69 6e 28  or both the min(
81c0: 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67 67 72  ) and max() aggr
81d0: 65 67 61 74 65 73 2c 0a 20 20 20 20 2a 2a 20 74  egates,.    ** t
81e0: 68 65 20 6f 6e 6c 79 20 64 69 66 66 65 72 65 6e  he only differen
81f0: 63 65 20 62 65 74 77 65 65 6e 20 74 68 65 20 74  ce between the t
8200: 77 6f 20 62 65 69 6e 67 20 74 68 61 74 20 74 68  wo being that th
8210: 65 20 73 65 6e 73 65 20 6f 66 20 74 68 65 0a 20  e sense of the. 
8220: 20 20 20 2a 2a 20 63 6f 6d 70 61 72 69 73 6f 6e     ** comparison
8230: 20 69 73 20 69 6e 76 65 72 74 65 64 2e 20 46 6f   is inverted. Fo
8240: 72 20 74 68 65 20 6d 61 78 28 29 20 61 67 67 72  r the max() aggr
8250: 65 67 61 74 65 2c 20 74 68 65 0a 20 20 20 20 2a  egate, the.    *
8260: 2a 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64  * sqlite3_user_d
8270: 61 74 61 28 29 20 66 75 6e 63 74 69 6f 6e 20 72  ata() function r
8280: 65 74 75 72 6e 73 20 28 76 6f 69 64 20 2a 29 2d  eturns (void *)-
8290: 31 2e 20 46 6f 72 20 6d 69 6e 28 29 20 69 74 0a  1. For min() it.
82a0: 20 20 20 20 2a 2a 20 72 65 74 75 72 6e 73 20 28      ** returns (
82b0: 76 6f 69 64 20 2a 29 64 62 2c 20 77 68 65 72 65  void *)db, where
82c0: 20 64 62 20 69 73 20 74 68 65 20 73 71 6c 69 74   db is the sqlit
82d0: 65 33 2a 20 64 61 74 61 62 61 73 65 20 70 6f 69  e3* database poi
82e0: 6e 74 65 72 2e 0a 20 20 20 20 2a 2a 20 54 68 65  nter..    ** The
82f0: 72 65 66 6f 72 65 20 74 68 65 20 6e 65 78 74 20  refore the next 
8300: 73 74 61 74 65 6d 65 6e 74 20 73 65 74 73 20 76  statement sets v
8310: 61 72 69 61 62 6c 65 20 27 6d 61 78 27 20 74 6f  ariable 'max' to
8320: 20 31 20 66 6f 72 20 74 68 65 20 6d 61 78 28 29   1 for the max()
8330: 0a 20 20 20 20 2a 2a 20 61 67 67 72 65 67 61 74  .    ** aggregat
8340: 65 2c 20 6f 72 20 30 20 66 6f 72 20 6d 69 6e 28  e, or 0 for min(
8350: 29 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 6d 61  )..    */.    ma
8360: 78 20 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72  x = sqlite3_user
8370: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 21 3d  _data(context)!=
8380: 30 3b 0a 20 20 20 20 63 6d 70 20 3d 20 73 71 6c  0;.    cmp = sql
8390: 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28 70  ite3MemCompare(p
83a0: 42 65 73 74 2c 20 70 41 72 67 2c 20 70 43 6f 6c  Best, pArg, pCol
83b0: 6c 29 3b 0a 20 20 20 20 69 66 28 20 28 6d 61 78  l);.    if( (max
83c0: 20 26 26 20 63 6d 70 3c 30 29 20 7c 7c 20 28 21   && cmp<0) || (!
83d0: 6d 61 78 20 26 26 20 63 6d 70 3e 30 29 20 29 7b  max && cmp>0) ){
83e0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 56 64  .      sqlite3Vd
83f0: 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74 2c  beMemCopy(pBest,
8400: 20 70 41 72 67 29 3b 0a 20 20 20 20 7d 0a 20 20   pArg);.    }.  
8410: 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74  }else{.    sqlit
8420: 65 33 56 64 62 65 4d 65 6d 43 6f 70 79 28 70 42  e3VdbeMemCopy(pB
8430: 65 73 74 2c 20 70 41 72 67 29 3b 0a 20 20 7d 0a  est, pArg);.  }.
8440: 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d 69  }.static void mi
8450: 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 28 73 71 6c  nMaxFinalize(sql
8460: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
8470: 6e 74 65 78 74 29 7b 0a 20 20 73 71 6c 69 74 65  ntext){.  sqlite
8480: 33 5f 76 61 6c 75 65 20 2a 70 52 65 73 3b 0a 20  3_value *pRes;. 
8490: 20 70 52 65 73 20 3d 20 28 73 71 6c 69 74 65 33   pRes = (sqlite3
84a0: 5f 76 61 6c 75 65 20 2a 29 73 71 6c 69 74 65 33  _value *)sqlite3
84b0: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
84c0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a  xt(context, 0);.
84d0: 20 20 69 66 28 20 70 52 65 73 20 29 7b 0a 20 20    if( pRes ){.  
84e0: 20 20 69 66 28 20 70 52 65 73 2d 3e 66 6c 61 67    if( pRes->flag
84f0: 73 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  s ){.      sqlit
8500: 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28  e3_result_value(
8510: 63 6f 6e 74 65 78 74 2c 20 70 52 65 73 29 3b 0a  context, pRes);.
8520: 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65      }.    sqlite
8530: 33 56 64 62 65 4d 65 6d 52 65 6c 65 61 73 65 28  3VdbeMemRelease(
8540: 70 52 65 73 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a  pRes);.  }.}../*
8550: 0a 2a 2a 20 67 72 6f 75 70 5f 63 6f 6e 63 61 74  .** group_concat
8560: 28 45 58 50 52 2c 20 3f 53 45 50 41 52 41 54 4f  (EXPR, ?SEPARATO
8570: 52 3f 29 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  R?).*/.static vo
8580: 69 64 20 67 72 6f 75 70 43 6f 6e 63 61 74 53 74  id groupConcatSt
8590: 65 70 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  ep(.  sqlite3_co
85a0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
85b0: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
85c0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
85d0: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68  gv.){.  const ch
85e0: 61 72 20 2a 7a 56 61 6c 3b 0a 20 20 53 74 72 41  ar *zVal;.  StrA
85f0: 63 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20  ccum *pAccum;.  
8600: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 65 70  const char *zSep
8610: 3b 0a 20 20 69 6e 74 20 6e 56 61 6c 2c 20 6e 53  ;.  int nVal, nS
8620: 65 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72  ep;.  assert( ar
8630: 67 63 3d 3d 31 20 7c 7c 20 61 72 67 63 3d 3d 32  gc==1 || argc==2
8640: 20 29 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65   );.  if( sqlite
8650: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
8660: 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[0])==SQLITE_NU
8670: 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 70  LL ) return;.  p
8680: 41 63 63 75 6d 20 3d 20 28 53 74 72 41 63 63 75  Accum = (StrAccu
8690: 6d 2a 29 73 71 6c 69 74 65 33 5f 61 67 67 72 65  m*)sqlite3_aggre
86a0: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
86b0: 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 41  text, sizeof(*pA
86c0: 63 63 75 6d 29 29 3b 0a 0a 20 20 69 66 28 20 70  ccum));..  if( p
86d0: 41 63 63 75 6d 20 29 7b 0a 20 20 20 20 73 71 6c  Accum ){.    sql
86e0: 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74  ite3 *db = sqlit
86f0: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
8700: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20  ndle(context);. 
8710: 20 20 20 70 41 63 63 75 6d 2d 3e 75 73 65 4d 61     pAccum->useMa
8720: 6c 6c 6f 63 20 3d 20 31 3b 0a 20 20 20 20 70 41  lloc = 1;.    pA
8730: 63 63 75 6d 2d 3e 6d 78 41 6c 6c 6f 63 20 3d 20  ccum->mxAlloc = 
8740: 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  db->aLimit[SQLIT
8750: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b  E_LIMIT_LENGTH];
8760: 0a 20 20 20 20 69 66 28 20 70 41 63 63 75 6d 2d  .    if( pAccum-
8770: 3e 6e 43 68 61 72 20 29 7b 0a 20 20 20 20 20 20  >nChar ){.      
8780: 69 66 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20  if( argc==2 ){. 
8790: 20 20 20 20 20 20 20 7a 53 65 70 20 3d 20 28 63         zSep = (c
87a0: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
87b0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29  ue_text(argv[1])
87c0: 3b 0a 20 20 20 20 20 20 20 20 6e 53 65 70 20 3d  ;.        nSep =
87d0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
87e0: 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b 0a 20  ytes(argv[1]);. 
87f0: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20       }else{.    
8800: 20 20 20 20 7a 53 65 70 20 3d 20 22 2c 22 3b 0a      zSep = ",";.
8810: 20 20 20 20 20 20 20 20 6e 53 65 70 20 3d 20 31          nSep = 1
8820: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
8830: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41  sqlite3StrAccumA
8840: 70 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 53  ppend(pAccum, zS
8850: 65 70 2c 20 6e 53 65 70 29 3b 0a 20 20 20 20 7d  ep, nSep);.    }
8860: 0a 20 20 20 20 7a 56 61 6c 20 3d 20 28 63 68 61  .    zVal = (cha
8870: 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  r*)sqlite3_value
8880: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
8890: 20 20 20 20 6e 56 61 6c 20 3d 20 73 71 6c 69 74      nVal = sqlit
88a0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
88b0: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 73 71 6c  rgv[0]);.    sql
88c0: 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 65  ite3StrAccumAppe
88d0: 6e 64 28 70 41 63 63 75 6d 2c 20 7a 56 61 6c 2c  nd(pAccum, zVal,
88e0: 20 6e 56 61 6c 29 3b 0a 20 20 7d 0a 7d 0a 73 74   nVal);.  }.}.st
88f0: 61 74 69 63 20 76 6f 69 64 20 67 72 6f 75 70 43  atic void groupC
8900: 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 28 73 71  oncatFinalize(sq
8910: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
8920: 6f 6e 74 65 78 74 29 7b 0a 20 20 53 74 72 41 63  ontext){.  StrAc
8930: 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20 70  cum *pAccum;.  p
8940: 41 63 63 75 6d 20 3d 20 73 71 6c 69 74 65 33 5f  Accum = sqlite3_
8950: 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78  aggregate_contex
8960: 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20  t(context, 0);. 
8970: 20 69 66 28 20 70 41 63 63 75 6d 20 29 7b 0a 20   if( pAccum ){. 
8980: 20 20 20 69 66 28 20 70 41 63 63 75 6d 2d 3e 74     if( pAccum->t
8990: 6f 6f 42 69 67 20 29 7b 0a 20 20 20 20 20 20 73  ooBig ){.      s
89a0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
89b0: 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65  ror_toobig(conte
89c0: 78 74 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69  xt);.    }else i
89d0: 66 28 20 70 41 63 63 75 6d 2d 3e 6d 61 6c 6c 6f  f( pAccum->mallo
89e0: 63 46 61 69 6c 65 64 20 29 7b 0a 20 20 20 20 20  cFailed ){.     
89f0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
8a00: 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74  error_nomem(cont
8a10: 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b  ext);.    }else{
8a20: 20 20 20 20 0a 20 20 20 20 20 20 73 71 6c 69 74      .      sqlit
8a30: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
8a40: 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 53  ontext, sqlite3S
8a50: 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 70 41  trAccumFinish(pA
8a60: 63 63 75 6d 29 2c 20 2d 31 2c 20 0a 20 20 20 20  ccum), -1, .    
8a70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8a80: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72        sqlite3_fr
8a90: 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  ee);.    }.  }.}
8aa0: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 66 75 6e  ../*.** This fun
8ab0: 63 74 69 6f 6e 20 72 65 67 69 73 74 65 72 65 64  ction registered
8ac0: 20 61 6c 6c 20 6f 66 20 74 68 65 20 61 62 6f 76   all of the abov
8ad0: 65 20 43 20 66 75 6e 63 74 69 6f 6e 73 20 61 73  e C functions as
8ae0: 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69 6f 6e   SQL.** function
8af0: 73 2e 20 20 54 68 69 73 20 73 68 6f 75 6c 64 20  s.  This should 
8b00: 62 65 20 74 68 65 20 6f 6e 6c 79 20 72 6f 75 74  be the only rout
8b10: 69 6e 65 20 69 6e 20 74 68 69 73 20 66 69 6c 65  ine in this file
8b20: 20 77 69 74 68 0a 2a 2a 20 65 78 74 65 72 6e 61   with.** externa
8b30: 6c 20 6c 69 6e 6b 61 67 65 2e 0a 2a 2f 0a 76 6f  l linkage..*/.vo
8b40: 69 64 20 73 71 6c 69 74 65 33 52 65 67 69 73 74  id sqlite3Regist
8b50: 65 72 42 75 69 6c 74 69 6e 46 75 6e 63 74 69 6f  erBuiltinFunctio
8b60: 6e 73 28 73 71 6c 69 74 65 33 20 2a 64 62 29 7b  ns(sqlite3 *db){
8b70: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f  .#ifndef SQLITE_
8b80: 4f 4d 49 54 5f 41 4c 54 45 52 54 41 42 4c 45 0a  OMIT_ALTERTABLE.
8b90: 20 20 73 71 6c 69 74 65 33 41 6c 74 65 72 46 75    sqlite3AlterFu
8ba0: 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a 23 65 6e  nctions(db);.#en
8bb0: 64 69 66 0a 20 20 69 66 28 20 21 64 62 2d 3e 6d  dif.  if( !db->m
8bc0: 61 6c 6c 6f 63 46 61 69 6c 65 64 20 29 7b 0a 20  allocFailed ){. 
8bd0: 20 20 20 69 6e 74 20 72 63 20 3d 20 73 71 6c 69     int rc = sqli
8be0: 74 65 33 5f 6f 76 65 72 6c 6f 61 64 5f 66 75 6e  te3_overload_fun
8bf0: 63 74 69 6f 6e 28 64 62 2c 20 22 4d 41 54 43 48  ction(db, "MATCH
8c00: 22 2c 20 32 29 3b 0a 20 20 20 20 61 73 73 65 72  ", 2);.    asser
8c10: 74 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f  t( rc==SQLITE_NO
8c20: 4d 45 4d 20 7c 7c 20 72 63 3d 3d 53 51 4c 49 54  MEM || rc==SQLIT
8c30: 45 5f 4f 4b 20 29 3b 0a 20 20 20 20 69 66 28 20  E_OK );.    if( 
8c40: 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d  rc==SQLITE_NOMEM
8c50: 20 29 7b 0a 20 20 20 20 20 20 64 62 2d 3e 6d 61   ){.      db->ma
8c60: 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b 0a  llocFailed = 1;.
8c70: 20 20 20 20 7d 0a 20 20 7d 0a 23 69 66 64 65 66      }.  }.#ifdef
8c80: 20 53 51 4c 49 54 45 5f 53 53 45 0a 20 20 28 76   SQLITE_SSE.  (v
8c90: 6f 69 64 29 73 71 6c 69 74 65 33 53 73 65 46 75  oid)sqlite3SseFu
8ca0: 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a 23 65 6e  nctions(db);.#en
8cb0: 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74  dif.}../*.** Set
8cc0: 20 74 68 65 20 4c 49 4b 45 4f 50 54 20 66 6c 61   the LIKEOPT fla
8cd0: 67 20 6f 6e 20 74 68 65 20 32 2d 61 72 67 75 6d  g on the 2-argum
8ce0: 65 6e 74 20 66 75 6e 63 74 69 6f 6e 20 77 69 74  ent function wit
8cf0: 68 20 74 68 65 20 67 69 76 65 6e 20 6e 61 6d 65  h the given name
8d00: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
8d10: 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28   setLikeOptFlag(
8d20: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e  sqlite3 *db, con
8d30: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20  st char *zName, 
8d40: 75 38 20 66 6c 61 67 56 61 6c 29 7b 0a 20 20 46  u8 flagVal){.  F
8d50: 75 6e 63 44 65 66 20 2a 70 44 65 66 3b 0a 20 20  uncDef *pDef;.  
8d60: 70 44 65 66 20 3d 20 73 71 6c 69 74 65 33 46 69  pDef = sqlite3Fi
8d70: 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20 7a  ndFunction(db, z
8d80: 4e 61 6d 65 2c 20 73 71 6c 69 74 65 33 53 74 72  Name, sqlite3Str
8d90: 6c 65 6e 33 30 28 7a 4e 61 6d 65 29 2c 0a 20 20  len30(zName),.  
8da0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8db0: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 53 51             2, SQ
8dc0: 4c 49 54 45 5f 55 54 46 38 2c 20 30 29 3b 0a 20  LITE_UTF8, 0);. 
8dd0: 20 69 66 28 20 70 44 65 66 20 29 7b 0a 20 20 20   if( pDef ){.   
8de0: 20 70 44 65 66 2d 3e 66 6c 61 67 73 20 3d 20 66   pDef->flags = f
8df0: 6c 61 67 56 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a 2f  lagVal;.  }.}../
8e00: 2a 0a 2a 2a 20 52 65 67 69 73 74 65 72 20 74 68  *.** Register th
8e10: 65 20 62 75 69 6c 74 2d 69 6e 20 4c 49 4b 45 20  e built-in LIKE 
8e20: 61 6e 64 20 47 4c 4f 42 20 66 75 6e 63 74 69 6f  and GLOB functio
8e30: 6e 73 2e 20 20 54 68 65 20 63 61 73 65 53 65 6e  ns.  The caseSen
8e40: 73 69 74 69 76 65 0a 2a 2a 20 70 61 72 61 6d 65  sitive.** parame
8e50: 74 65 72 20 64 65 74 65 72 6d 69 6e 65 73 20 77  ter determines w
8e60: 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 68  hether or not th
8e70: 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20  e LIKE operator 
8e80: 69 73 20 63 61 73 65 0a 2a 2a 20 73 65 6e 73 69  is case.** sensi
8e90: 74 69 76 65 2e 20 20 47 4c 4f 42 20 69 73 20 61  tive.  GLOB is a
8ea0: 6c 77 61 79 73 20 63 61 73 65 20 73 65 6e 73 69  lways case sensi
8eb0: 74 69 76 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71  tive..*/.void sq
8ec0: 6c 69 74 65 33 52 65 67 69 73 74 65 72 4c 69 6b  lite3RegisterLik
8ed0: 65 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74  eFunctions(sqlit
8ee0: 65 33 20 2a 64 62 2c 20 69 6e 74 20 63 61 73 65  e3 *db, int case
8ef0: 53 65 6e 73 69 74 69 76 65 29 7b 0a 20 20 73 74  Sensitive){.  st
8f00: 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  ruct compareInfo
8f10: 20 2a 70 49 6e 66 6f 3b 0a 20 20 69 66 28 20 63   *pInfo;.  if( c
8f20: 61 73 65 53 65 6e 73 69 74 69 76 65 20 29 7b 0a  aseSensitive ){.
8f30: 20 20 20 20 70 49 6e 66 6f 20 3d 20 28 73 74 72      pInfo = (str
8f40: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a  uct compareInfo*
8f50: 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 3b 0a 20  )&likeInfoAlt;. 
8f60: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70 49 6e 66   }else{.    pInf
8f70: 6f 20 3d 20 28 73 74 72 75 63 74 20 63 6f 6d 70  o = (struct comp
8f80: 61 72 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e  areInfo*)&likeIn
8f90: 66 6f 4e 6f 72 6d 3b 0a 20 20 7d 0a 20 20 73 71  foNorm;.  }.  sq
8fa0: 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e 63 28  lite3CreateFunc(
8fb0: 64 62 2c 20 22 6c 69 6b 65 22 2c 20 32 2c 20 53  db, "like", 2, S
8fc0: 51 4c 49 54 45 5f 41 4e 59 2c 20 70 49 6e 66 6f  QLITE_ANY, pInfo
8fd0: 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30  , likeFunc, 0, 0
8fe0: 29 3b 0a 20 20 73 71 6c 69 74 65 33 43 72 65 61  );.  sqlite3Crea
8ff0: 74 65 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b 65  teFunc(db, "like
9000: 22 2c 20 33 2c 20 53 51 4c 49 54 45 5f 41 4e 59  ", 3, SQLITE_ANY
9010: 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e  , pInfo, likeFun
9020: 63 2c 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69  c, 0, 0);.  sqli
9030: 74 65 33 43 72 65 61 74 65 46 75 6e 63 28 64 62  te3CreateFunc(db
9040: 2c 20 22 67 6c 6f 62 22 2c 20 32 2c 20 53 51 4c  , "glob", 2, SQL
9050: 49 54 45 5f 41 4e 59 2c 20 0a 20 20 20 20 20 20  ITE_ANY, .      
9060: 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49  (struct compareI
9070: 6e 66 6f 2a 29 26 67 6c 6f 62 49 6e 66 6f 2c 20  nfo*)&globInfo, 
9080: 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 30 29 3b 0a  likeFunc, 0,0);.
9090: 20 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67    setLikeOptFlag
90a0: 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20 53 51 4c  (db, "glob", SQL
90b0: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 20 7c 20  ITE_FUNC_LIKE | 
90c0: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45  SQLITE_FUNC_CASE
90d0: 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74 46  );.  setLikeOptF
90e0: 6c 61 67 28 64 62 2c 20 22 6c 69 6b 65 22 2c 20  lag(db, "like", 
90f0: 0a 20 20 20 20 20 20 63 61 73 65 53 65 6e 73 69  .      caseSensi
9100: 74 69 76 65 20 3f 20 28 53 51 4c 49 54 45 5f 46  tive ? (SQLITE_F
9110: 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49 54  UNC_LIKE | SQLIT
9120: 45 5f 46 55 4e 43 5f 43 41 53 45 29 20 3a 20 53  E_FUNC_CASE) : S
9130: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29  QLITE_FUNC_LIKE)
9140: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 70 45 78 70 72  ;.}../*.** pExpr
9150: 20 70 6f 69 6e 74 73 20 74 6f 20 61 6e 20 65 78   points to an ex
9160: 70 72 65 73 73 69 6f 6e 20 77 68 69 63 68 20 69  pression which i
9170: 6d 70 6c 65 6d 65 6e 74 73 20 61 20 66 75 6e 63  mplements a func
9180: 74 69 6f 6e 2e 20 20 49 66 0a 2a 2a 20 69 74 20  tion.  If.** it 
9190: 69 73 20 61 70 70 72 6f 70 72 69 61 74 65 20 74  is appropriate t
91a0: 6f 20 61 70 70 6c 79 20 74 68 65 20 4c 49 4b 45  o apply the LIKE
91b0: 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 20 74 6f   optimization to
91c0: 20 74 68 61 74 20 66 75 6e 63 74 69 6f 6e 0a 2a   that function.*
91d0: 2a 20 74 68 65 6e 20 73 65 74 20 61 57 63 5b 30  * then set aWc[0
91e0: 5d 20 74 68 72 6f 75 67 68 20 61 57 63 5b 32 5d  ] through aWc[2]
91f0: 20 74 6f 20 74 68 65 20 77 69 6c 64 63 61 72 64   to the wildcard
9200: 20 63 68 61 72 61 63 74 65 72 73 20 61 6e 64 0a   characters and.
9210: 2a 2a 20 72 65 74 75 72 6e 20 54 52 55 45 2e 20  ** return TRUE. 
9220: 20 49 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e   If the function
9230: 20 69 73 20 6e 6f 74 20 61 20 4c 49 4b 45 2d 73   is not a LIKE-s
9240: 74 79 6c 65 20 66 75 6e 63 74 69 6f 6e 20 74 68  tyle function th
9250: 65 6e 0a 2a 2a 20 72 65 74 75 72 6e 20 46 41 4c  en.** return FAL
9260: 53 45 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  SE..*/.int sqlit
9270: 65 33 49 73 4c 69 6b 65 46 75 6e 63 74 69 6f 6e  e3IsLikeFunction
9280: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 45 78  (sqlite3 *db, Ex
9290: 70 72 20 2a 70 45 78 70 72 2c 20 69 6e 74 20 2a  pr *pExpr, int *
92a0: 70 49 73 4e 6f 63 61 73 65 2c 20 63 68 61 72 20  pIsNocase, char 
92b0: 2a 61 57 63 29 7b 0a 20 20 46 75 6e 63 44 65 66  *aWc){.  FuncDef
92c0: 20 2a 70 44 65 66 3b 0a 20 20 69 66 28 20 70 45   *pDef;.  if( pE
92d0: 78 70 72 2d 3e 6f 70 21 3d 54 4b 5f 46 55 4e 43  xpr->op!=TK_FUNC
92e0: 54 49 4f 4e 20 0a 20 20 20 7c 7c 20 21 70 45 78  TION .   || !pEx
92f0: 70 72 2d 3e 78 2e 70 4c 69 73 74 20 0a 20 20 20  pr->x.pList .   
9300: 7c 7c 20 70 45 78 70 72 2d 3e 78 2e 70 4c 69 73  || pExpr->x.pLis
9310: 74 2d 3e 6e 45 78 70 72 21 3d 32 0a 20 20 29 7b  t->nExpr!=2.  ){
9320: 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20  .    return 0;. 
9330: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 21 45 78   }.  assert( !Ex
9340: 70 72 48 61 73 50 72 6f 70 65 72 74 79 28 70 45  prHasProperty(pE
9350: 78 70 72 2c 20 45 50 5f 78 49 73 53 65 6c 65 63  xpr, EP_xIsSelec
9360: 74 29 20 29 3b 0a 20 20 70 44 65 66 20 3d 20 73  t) );.  pDef = s
9370: 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69  qlite3FindFuncti
9380: 6f 6e 28 64 62 2c 20 28 63 68 61 72 2a 29 70 45  on(db, (char*)pE
9390: 78 70 72 2d 3e 74 6f 6b 65 6e 2e 7a 2c 20 70 45  xpr->token.z, pE
93a0: 78 70 72 2d 3e 74 6f 6b 65 6e 2e 6e 2c 20 32 2c  xpr->token.n, 2,
93b0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
93c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 51                SQ
93d0: 4c 49 54 45 5f 55 54 46 38 2c 20 30 29 3b 0a 20  LITE_UTF8, 0);. 
93e0: 20 69 66 28 20 70 44 65 66 3d 3d 30 20 7c 7c 20   if( pDef==0 || 
93f0: 28 70 44 65 66 2d 3e 66 6c 61 67 73 20 26 20 53  (pDef->flags & S
9400: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29  QLITE_FUNC_LIKE)
9410: 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  ==0 ){.    retur
9420: 6e 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54  n 0;.  }..  /* T
9430: 68 65 20 6d 65 6d 63 70 79 28 29 20 73 74 61 74  he memcpy() stat
9440: 65 6d 65 6e 74 20 61 73 73 75 6d 65 73 20 74 68  ement assumes th
9450: 61 74 20 74 68 65 20 77 69 6c 64 63 61 72 64 20  at the wildcard 
9460: 63 68 61 72 61 63 74 65 72 73 20 61 72 65 0a 20  characters are. 
9470: 20 2a 2a 20 74 68 65 20 66 69 72 73 74 20 74 68   ** the first th
9480: 72 65 65 20 73 74 61 74 65 6d 65 6e 74 73 20 69  ree statements i
9490: 6e 20 74 68 65 20 63 6f 6d 70 61 72 65 49 6e 66  n the compareInf
94a0: 6f 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68  o structure.  Th
94b0: 65 0a 20 20 2a 2a 20 61 73 73 65 72 74 73 28 29  e.  ** asserts()
94c0: 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 76 65 72   that follow ver
94d0: 69 66 79 20 74 68 61 74 20 61 73 73 75 6d 70 74  ify that assumpt
94e0: 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6d 65 6d 63 70  ion.  */.  memcp
94f0: 79 28 61 57 63 2c 20 70 44 65 66 2d 3e 70 55 73  y(aWc, pDef->pUs
9500: 65 72 44 61 74 61 2c 20 33 29 3b 0a 20 20 61 73  erData, 3);.  as
9510: 73 65 72 74 28 20 28 63 68 61 72 2a 29 26 6c 69  sert( (char*)&li
9520: 6b 65 49 6e 66 6f 41 6c 74 20 3d 3d 20 28 63 68  keInfoAlt == (ch
9530: 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74  ar*)&likeInfoAlt
9540: 2e 6d 61 74 63 68 41 6c 6c 20 29 3b 0a 20 20 61  .matchAll );.  a
9550: 73 73 65 72 74 28 20 26 28 28 63 68 61 72 2a 29  ssert( &((char*)
9560: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 31 5d  &likeInfoAlt)[1]
9570: 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65   == (char*)&like
9580: 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 4f 6e 65  InfoAlt.matchOne
9590: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28   );.  assert( &(
95a0: 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f  (char*)&likeInfo
95b0: 41 6c 74 29 5b 32 5d 20 3d 3d 20 28 63 68 61 72  Alt)[2] == (char
95c0: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d  *)&likeInfoAlt.m
95d0: 61 74 63 68 53 65 74 20 29 3b 0a 20 20 2a 70 49  atchSet );.  *pI
95e0: 73 4e 6f 63 61 73 65 20 3d 20 28 70 44 65 66 2d  sNocase = (pDef-
95f0: 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f  >flags & SQLITE_
9600: 46 55 4e 43 5f 43 41 53 45 29 3d 3d 30 3b 0a 20  FUNC_CASE)==0;. 
9610: 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a   return 1;.}../*
9620: 0a 2a 2a 20 41 6c 6c 20 61 6c 6c 20 6f 66 20 74  .** All all of t
9630: 68 65 20 46 75 6e 63 44 65 66 20 73 74 72 75 63  he FuncDef struc
9640: 74 75 72 65 73 20 69 6e 20 74 68 65 20 61 42 75  tures in the aBu
9650: 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 61 72 72 61  iltinFunc[] arra
9660: 79 20 61 62 6f 76 65 0a 2a 2a 20 74 6f 20 74 68  y above.** to th
9670: 65 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f  e global functio
9680: 6e 20 68 61 73 68 20 74 61 62 6c 65 2e 20 20 54  n hash table.  T
9690: 68 69 73 20 6f 63 63 75 72 73 20 61 74 20 73 74  his occurs at st
96a0: 61 72 74 2d 74 69 6d 65 20 28 61 73 0a 2a 2a 20  art-time (as.** 
96b0: 61 20 63 6f 6e 73 65 71 75 65 6e 63 65 20 6f 66  a consequence of
96c0: 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33   calling sqlite3
96d0: 5f 69 6e 69 74 69 61 6c 69 7a 65 28 29 29 2e 0a  _initialize())..
96e0: 2a 2a 0a 2a 2a 20 41 66 74 65 72 20 74 68 69 73  **.** After this
96f0: 20 72 6f 75 74 69 6e 65 20 72 75 6e 73 0a 2a 2f   routine runs.*/
9700: 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67  .void sqlite3Reg
9710: 69 73 74 65 72 47 6c 6f 62 61 6c 46 75 6e 63 74  isterGlobalFunct
9720: 69 6f 6e 73 28 76 6f 69 64 29 7b 0a 20 20 2f 2a  ions(void){.  /*
9730: 0a 20 20 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77  .  ** The follow
9740: 69 6e 67 20 61 72 72 61 79 20 68 6f 6c 64 73 20  ing array holds 
9750: 46 75 6e 63 44 65 66 20 73 74 72 75 63 74 75 72  FuncDef structur
9760: 65 73 20 66 6f 72 20 61 6c 6c 20 6f 66 20 74 68  es for all of th
9770: 65 20 66 75 6e 63 74 69 6f 6e 73 0a 20 20 2a 2a  e functions.  **
9780: 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68 69 73   defined in this
9790: 20 66 69 6c 65 2e 0a 20 20 2a 2a 0a 20 20 2a 2a   file..  **.  **
97a0: 20 54 68 65 20 61 72 72 61 79 20 63 61 6e 6e 6f   The array canno
97b0: 74 20 62 65 20 63 6f 6e 73 74 61 6e 74 20 73 69  t be constant si
97c0: 6e 63 65 20 63 68 61 6e 67 65 73 20 61 72 65 20  nce changes are 
97d0: 6d 61 64 65 20 74 6f 20 74 68 65 0a 20 20 2a 2a  made to the.  **
97e0: 20 46 75 6e 63 44 65 66 2e 70 48 61 73 68 20 65   FuncDef.pHash e
97f0: 6c 65 6d 65 6e 74 73 20 61 74 20 73 74 61 72 74  lements at start
9800: 2d 74 69 6d 65 2e 20 20 54 68 65 20 65 6c 65 6d  -time.  The elem
9810: 65 6e 74 73 20 6f 66 20 74 68 69 73 20 61 72 72  ents of this arr
9820: 61 79 0a 20 20 2a 2a 20 61 72 65 20 72 65 61 64  ay.  ** are read
9830: 2d 6f 6e 6c 79 20 61 66 74 65 72 20 69 6e 69 74  -only after init
9840: 69 61 6c 69 7a 61 74 69 6f 6e 20 69 73 20 63 6f  ialization is co
9850: 6d 70 6c 65 74 65 2e 0a 20 20 2a 2f 0a 20 20 73  mplete..  */.  s
9860: 74 61 74 69 63 20 53 51 4c 49 54 45 5f 57 53 44  tatic SQLITE_WSD
9870: 20 46 75 6e 63 44 65 66 20 61 42 75 69 6c 74 69   FuncDef aBuilti
9880: 6e 46 75 6e 63 5b 5d 20 3d 20 7b 0a 20 20 20 20  nFunc[] = {.    
9890: 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20  FUNCTION(ltrim, 
98a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
98b0: 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20  1, 0, trimFunc  
98c0: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
98d0: 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20 20 20  NCTION(ltrim,   
98e0: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 31 2c             2, 1,
98f0: 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20   0, trimFunc    
9900: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
9910: 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20  TION(rtrim,     
9920: 20 20 20 20 20 20 20 20 20 31 2c 20 32 2c 20 30           1, 2, 0
9930: 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20  , trimFunc      
9940: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
9950: 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20 20 20  ON(rtrim,       
9960: 20 20 20 20 20 20 20 32 2c 20 32 2c 20 30 2c 20         2, 2, 0, 
9970: 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20  trimFunc        
9980: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
9990: 28 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20  (trim,          
99a0: 20 20 20 20 20 31 2c 20 33 2c 20 30 2c 20 74 72       1, 3, 0, tr
99b0: 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29  imFunc         )
99c0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74  ,.    FUNCTION(t
99d0: 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  rim,            
99e0: 20 20 20 32 2c 20 33 2c 20 30 2c 20 74 72 69 6d     2, 3, 0, trim
99f0: 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a  Func         ),.
9a00: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e      FUNCTION(min
9a10: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
9a20: 2d 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78  -1, 0, 1, minmax
9a30: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20  Func       ),.  
9a40: 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c 20    FUNCTION(min, 
9a50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30                 0
9a60: 2c 20 30 2c 20 31 2c 20 30 20 20 20 20 20 20 20  , 0, 1, 0       
9a70: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20           ),.    
9a80: 41 47 47 52 45 47 41 54 45 28 6d 69 6e 2c 20 20  AGGREGATE(min,  
9a90: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
9aa0: 30 2c 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70  0, 1, minmaxStep
9ab0: 2c 20 20 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e  ,      minMaxFin
9ac0: 61 6c 69 7a 65 20 29 2c 0a 20 20 20 20 46 55 4e  alize ),.    FUN
9ad0: 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20  CTION(max,      
9ae0: 20 20 20 20 20 20 20 20 20 2d 31 2c 20 31 2c 20           -1, 1, 
9af0: 31 2c 20 6d 69 6e 6d 61 78 46 75 6e 63 20 20 20  1, minmaxFunc   
9b00: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
9b10: 49 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20 20 20  ION(max,        
9b20: 20 20 20 20 20 20 20 20 30 2c 20 31 2c 20 31 2c          0, 1, 1,
9b30: 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20   0              
9b40: 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41    ),.    AGGREGA
9b50: 54 45 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20  TE(max,         
9b60: 20 20 20 20 20 20 31 2c 20 31 2c 20 31 2c 20 6d        1, 1, 1, m
9b70: 69 6e 6d 61 78 53 74 65 70 2c 20 20 20 20 20 20  inmaxStep,      
9b80: 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 20 29  minMaxFinalize )
9b90: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74  ,.    FUNCTION(t
9ba0: 79 70 65 6f 66 2c 20 20 20 20 20 20 20 20 20 20  ypeof,          
9bb0: 20 20 20 31 2c 20 30 2c 20 30 2c 20 74 79 70 65     1, 0, 0, type
9bc0: 6f 66 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  ofFunc       ),.
9bd0: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 65 6e      FUNCTION(len
9be0: 67 74 68 2c 20 20 20 20 20 20 20 20 20 20 20 20  gth,            
9bf0: 20 31 2c 20 30 2c 20 30 2c 20 6c 65 6e 67 74 68   1, 0, 0, length
9c00: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20  Func       ),.  
9c10: 20 20 46 55 4e 43 54 49 4f 4e 28 73 75 62 73 74    FUNCTION(subst
9c20: 72 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 32  r,             2
9c30: 2c 20 30 2c 20 30 2c 20 73 75 62 73 74 72 46 75  , 0, 0, substrFu
9c40: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
9c50: 46 55 4e 43 54 49 4f 4e 28 73 75 62 73 74 72 2c  FUNCTION(substr,
9c60: 20 20 20 20 20 20 20 20 20 20 20 20 20 33 2c 20               3, 
9c70: 30 2c 20 30 2c 20 73 75 62 73 74 72 46 75 6e 63  0, 0, substrFunc
9c80: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
9c90: 4e 43 54 49 4f 4e 28 61 62 73 2c 20 20 20 20 20  NCTION(abs,     
9ca0: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
9cb0: 20 30 2c 20 61 62 73 46 75 6e 63 20 20 20 20 20   0, absFunc     
9cc0: 20 20 20 20 20 29 2c 0a 23 69 66 6e 64 65 66 20       ),.#ifndef 
9cd0: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41  SQLITE_OMIT_FLOA
9ce0: 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20 46  TING_POINT.    F
9cf0: 55 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20  UNCTION(round,  
9d00: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
9d10: 2c 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20  , 0, roundFunc  
9d20: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
9d30: 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20 20  CTION(round,    
9d40: 20 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20            2, 0, 
9d50: 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20 20  0, roundFunc    
9d60: 20 20 20 20 29 2c 0a 23 65 6e 64 69 66 0a 20 20      ),.#endif.  
9d70: 20 20 46 55 4e 43 54 49 4f 4e 28 75 70 70 65 72    FUNCTION(upper
9d80: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  ,              1
9d90: 2c 20 30 2c 20 30 2c 20 75 70 70 65 72 46 75 6e  , 0, 0, upperFun
9da0: 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  c        ),.    
9db0: 46 55 4e 43 54 49 4f 4e 28 6c 6f 77 65 72 2c 20  FUNCTION(lower, 
9dc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
9dd0: 30 2c 20 30 2c 20 6c 6f 77 65 72 46 75 6e 63 20  0, 0, lowerFunc 
9de0: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
9df0: 4e 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c  NCTION(coalesce,
9e00: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
9e10: 20 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 20   0, 0           
9e20: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
9e30: 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20  TION(coalesce,  
9e40: 20 20 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 30          -1, 0, 0
9e50: 2c 20 69 66 6e 75 6c 6c 46 75 6e 63 20 20 20 20  , ifnullFunc    
9e60: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
9e70: 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20 20 20  ON(coalesce,    
9e80: 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20         0, 0, 0, 
9e90: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  0               
9ea0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
9eb0: 28 68 65 78 2c 20 20 20 20 20 20 20 20 20 20 20  (hex,           
9ec0: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 68 65       1, 0, 0, he
9ed0: 78 46 75 6e 63 20 20 20 20 20 20 20 20 20 20 29  xFunc          )
9ee0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 69  ,.    FUNCTION(i
9ef0: 66 6e 75 6c 6c 2c 20 20 20 20 20 20 20 20 20 20  fnull,          
9f00: 20 20 20 32 2c 20 30 2c 20 31 2c 20 69 66 6e 75     2, 0, 1, ifnu
9f10: 6c 6c 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  llFunc       ),.
9f20: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 61 6e      FUNCTION(ran
9f30: 64 6f 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  dom,            
9f40: 20 30 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d   0, 0, 0, random
9f50: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20  Func       ),.  
9f60: 20 20 46 55 4e 43 54 49 4f 4e 28 72 61 6e 64 6f    FUNCTION(rando
9f70: 6d 62 6c 6f 62 2c 20 20 20 20 20 20 20 20 20 31  mblob,         1
9f80: 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 42 6c  , 0, 0, randomBl
9f90: 6f 62 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  ob       ),.    
9fa0: 46 55 4e 43 54 49 4f 4e 28 6e 75 6c 6c 69 66 2c  FUNCTION(nullif,
9fb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20               2, 
9fc0: 30 2c 20 31 2c 20 6e 75 6c 6c 69 66 46 75 6e 63  0, 1, nullifFunc
9fd0: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
9fe0: 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 76 65  NCTION(sqlite_ve
9ff0: 72 73 69 6f 6e 2c 20 20 20 20 20 30 2c 20 30 2c  rsion,     0, 0,
a000: 20 30 2c 20 76 65 72 73 69 6f 6e 46 75 6e 63 20   0, versionFunc 
a010: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
a020: 54 49 4f 4e 28 71 75 6f 74 65 2c 20 20 20 20 20  TION(quote,     
a030: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
a040: 2c 20 71 75 6f 74 65 46 75 6e 63 20 20 20 20 20  , quoteFunc     
a050: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
a060: 4f 4e 28 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72  ON(last_insert_r
a070: 6f 77 69 64 2c 20 20 30 2c 20 30 2c 20 30 2c 20  owid,  0, 0, 0, 
a080: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69  last_insert_rowi
a090: 64 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e  d),.    FUNCTION
a0a0: 28 63 68 61 6e 67 65 73 2c 20 20 20 20 20 20 20  (changes,       
a0b0: 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 63 68       0, 0, 0, ch
a0c0: 61 6e 67 65 73 20 20 20 20 20 20 20 20 20 20 29  anges          )
a0d0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74  ,.    FUNCTION(t
a0e0: 6f 74 61 6c 5f 63 68 61 6e 67 65 73 2c 20 20 20  otal_changes,   
a0f0: 20 20 20 30 2c 20 30 2c 20 30 2c 20 74 6f 74 61     0, 0, 0, tota
a100: 6c 5f 63 68 61 6e 67 65 73 20 20 20 20 29 2c 0a  l_changes    ),.
a110: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 65 70      FUNCTION(rep
a120: 6c 61 63 65 2c 20 20 20 20 20 20 20 20 20 20 20  lace,           
a130: 20 33 2c 20 30 2c 20 30 2c 20 72 65 70 6c 61 63   3, 0, 0, replac
a140: 65 46 75 6e 63 20 20 20 20 20 20 29 2c 0a 20 20  eFunc      ),.  
a150: 20 20 46 55 4e 43 54 49 4f 4e 28 7a 65 72 6f 62    FUNCTION(zerob
a160: 6c 6f 62 2c 20 20 20 20 20 20 20 20 20 20 20 31  lob,           1
a170: 2c 20 30 2c 20 30 2c 20 7a 65 72 6f 62 6c 6f 62  , 0, 0, zeroblob
a180: 46 75 6e 63 20 20 20 20 20 29 2c 0a 20 20 23 69  Func     ),.  #i
a190: 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e  fdef SQLITE_SOUN
a1a0: 44 45 58 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e  DEX.    FUNCTION
a1b0: 28 73 6f 75 6e 64 65 78 2c 20 20 20 20 20 20 20  (soundex,       
a1c0: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 6f       1, 0, 0, so
a1d0: 75 6e 64 65 78 46 75 6e 63 20 20 20 20 20 20 29  undexFunc      )
a1e0: 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 23 69 66  ,.  #endif.  #if
a1f0: 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54  ndef SQLITE_OMIT
a200: 5f 4c 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e 0a  _LOAD_EXTENSION.
a210: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 61      FUNCTION(loa
a220: 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20  d_extension,    
a230: 20 31 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78   1, 0, 0, loadEx
a240: 74 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20  t          ),.  
a250: 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 61 64 5f    FUNCTION(load_
a260: 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20 20 32  extension,     2
a270: 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78 74 20  , 0, 0, loadExt 
a280: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 23 65           ),.  #e
a290: 6e 64 69 66 0a 20 20 20 20 41 47 47 52 45 47 41  ndif.    AGGREGA
a2a0: 54 45 28 73 75 6d 2c 20 20 20 20 20 20 20 20 20  TE(sum,         
a2b0: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73        1, 0, 0, s
a2c0: 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20 20 20  umStep,         
a2d0: 73 75 6d 46 69 6e 61 6c 69 7a 65 20 20 20 20 29  sumFinalize    )
a2e0: 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28  ,.    AGGREGATE(
a2f0: 74 6f 74 61 6c 2c 20 20 20 20 20 20 20 20 20 20  total,          
a300: 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53     1, 0, 0, sumS
a310: 74 65 70 2c 20 20 20 20 20 20 20 20 20 74 6f 74  tep,         tot
a320: 61 6c 46 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c  alFinalize    ),
a330: 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28 61  .    AGGREGATE(a
a340: 76 67 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  vg,             
a350: 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53 74    1, 0, 0, sumSt
a360: 65 70 2c 20 20 20 20 20 20 20 20 20 61 76 67 46  ep,         avgF
a370: 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c 0a 20 2f  inalize    ),. /
a380: 2a 20 41 47 47 52 45 47 41 54 45 28 63 6f 75 6e  * AGGREGATE(coun
a390: 74 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 30  t,             0
a3a0: 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65  , 0, 0, countSte
a3b0: 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46 69  p,       countFi
a3c0: 6e 61 6c 69 7a 65 20 20 29 2c 20 2a 2f 0a 20 20  nalize  ), */.  
a3d0: 20 20 7b 30 2c 53 51 4c 49 54 45 5f 55 54 46 38    {0,SQLITE_UTF8
a3e0: 2c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 4f 55  ,SQLITE_FUNC_COU
a3f0: 4e 54 2c 30 2c 30 2c 30 2c 63 6f 75 6e 74 53 74  NT,0,0,0,countSt
a400: 65 70 2c 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65  ep,countFinalize
a410: 2c 22 63 6f 75 6e 74 22 2c 30 7d 2c 0a 20 20 20  ,"count",0},.   
a420: 20 41 47 47 52 45 47 41 54 45 28 63 6f 75 6e 74   AGGREGATE(count
a430: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c  ,             1,
a440: 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65 70   0, 0, countStep
a450: 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46 69 6e  ,       countFin
a460: 61 6c 69 7a 65 20 20 29 2c 0a 20 20 20 20 41 47  alize  ),.    AG
a470: 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f 63 6f  GREGATE(group_co
a480: 6e 63 61 74 2c 20 20 20 20 20 20 31 2c 20 30 2c  ncat,      1, 0,
a490: 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74 53   0, groupConcatS
a4a0: 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74  tep, groupConcat
a4b0: 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 20 20 41  Finalize),.    A
a4c0: 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f 63  GGREGATE(group_c
a4d0: 6f 6e 63 61 74 2c 20 20 20 20 20 20 32 2c 20 30  oncat,      2, 0
a4e0: 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74  , 0, groupConcat
a4f0: 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63 61  Step, groupConca
a500: 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 0a 20  tFinalize),.  . 
a510: 20 20 20 4c 49 4b 45 46 55 4e 43 28 67 6c 6f 62     LIKEFUNC(glob
a520: 2c 20 32 2c 20 26 67 6c 6f 62 49 6e 66 6f 2c 20  , 2, &globInfo, 
a530: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45  SQLITE_FUNC_LIKE
a540: 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53  |SQLITE_FUNC_CAS
a550: 45 29 2c 0a 20 20 23 69 66 64 65 66 20 53 51 4c  E),.  #ifdef SQL
a560: 49 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54 49  ITE_CASE_SENSITI
a570: 56 45 5f 4c 49 4b 45 0a 20 20 20 20 4c 49 4b 45  VE_LIKE.    LIKE
a580: 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26 6c  FUNC(like, 2, &l
a590: 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c 49  ikeInfoAlt, SQLI
a5a0: 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51 4c  TE_FUNC_LIKE|SQL
a5b0: 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c 0a  ITE_FUNC_CASE),.
a5c0: 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b      LIKEFUNC(lik
a5d0: 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f 41  e, 3, &likeInfoA
a5e0: 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  lt, SQLITE_FUNC_
a5f0: 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43  LIKE|SQLITE_FUNC
a600: 5f 43 41 53 45 29 2c 0a 20 20 23 65 6c 73 65 0a  _CASE),.  #else.
a610: 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b      LIKEFUNC(lik
a620: 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f 4e  e, 2, &likeInfoN
a630: 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43  orm, SQLITE_FUNC
a640: 5f 4c 49 4b 45 29 2c 0a 20 20 20 20 4c 49 4b 45  _LIKE),.    LIKE
a650: 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26 6c  FUNC(like, 3, &l
a660: 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51 4c  ikeInfoNorm, SQL
a670: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c 0a  ITE_FUNC_LIKE),.
a680: 20 20 23 65 6e 64 69 66 0a 20 20 7d 3b 0a 0a 20    #endif.  };.. 
a690: 20 69 6e 74 20 69 3b 0a 20 20 46 75 6e 63 44 65   int i;.  FuncDe
a6a0: 66 48 61 73 68 20 2a 70 48 61 73 68 20 3d 20 26  fHash *pHash = &
a6b0: 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66 48 61  GLOBAL(FuncDefHa
a6c0: 73 68 2c 20 73 71 6c 69 74 65 33 47 6c 6f 62 61  sh, sqlite3Globa
a6d0: 6c 46 75 6e 63 74 69 6f 6e 73 29 3b 0a 20 20 46  lFunctions);.  F
a6e0: 75 6e 63 44 65 66 20 2a 61 46 75 6e 63 20 3d 20  uncDef *aFunc = 
a6f0: 28 46 75 6e 63 44 65 66 2a 29 26 47 4c 4f 42 41  (FuncDef*)&GLOBA
a700: 4c 28 46 75 6e 63 44 65 66 2c 20 61 42 75 69 6c  L(FuncDef, aBuil
a710: 74 69 6e 46 75 6e 63 29 3b 0a 0a 20 20 66 6f 72  tinFunc);..  for
a720: 28 69 3d 30 3b 20 69 3c 41 72 72 61 79 53 69 7a  (i=0; i<ArraySiz
a730: 65 28 61 42 75 69 6c 74 69 6e 46 75 6e 63 29 3b  e(aBuiltinFunc);
a740: 20 69 2b 2b 29 7b 0a 20 20 20 20 73 71 6c 69 74   i++){.    sqlit
a750: 65 33 46 75 6e 63 44 65 66 49 6e 73 65 72 74 28  e3FuncDefInsert(
a760: 70 48 61 73 68 2c 20 26 61 46 75 6e 63 5b 69 5d  pHash, &aFunc[i]
a770: 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  );.  }.  sqlite3
a780: 52 65 67 69 73 74 65 72 44 61 74 65 54 69 6d 65  RegisterDateTime
a790: 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 7d 0a     Functions();.}.