/ Hex Artifact Content
Login

Artifact 6ace0c0c0d5f0a23273a0c74b35b5f41113f09eb:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61 74  C functions that
01a0: 20 69 6d 70 6c 65 6d 65 6e 74 20 76 61 72 69 6f   implement vario
01b0: 75 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69  us SQL.** functi
01c0: 6f 6e 73 20 6f 66 20 53 51 4c 69 74 65 2e 20 20  ons of SQLite.  
01d0: 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 69 73 20  .**.** There is 
01e0: 6f 6e 6c 79 20 6f 6e 65 20 65 78 70 6f 72 74 65  only one exporte
01f0: 64 20 73 79 6d 62 6f 6c 20 69 6e 20 74 68 69 73  d symbol in this
0200: 20 66 69 6c 65 20 2d 20 74 68 65 20 66 75 6e 63   file - the func
0210: 74 69 6f 6e 0a 2a 2a 20 73 71 6c 69 74 65 52 65  tion.** sqliteRe
0220: 67 69 73 74 65 72 42 75 69 6c 64 69 6e 46 75 6e  gisterBuildinFun
0230: 63 74 69 6f 6e 73 28 29 20 66 6f 75 6e 64 20 61  ctions() found a
0240: 74 20 74 68 65 20 62 6f 74 74 6f 6d 20 6f 66 20  t the bottom of 
0250: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 20 41 6c 6c  the file..** All
0260: 20 6f 74 68 65 72 20 63 6f 64 65 20 68 61 73 20   other code has 
0270: 66 69 6c 65 20 73 63 6f 70 65 2e 0a 2a 2f 0a 23  file scope..*/.#
0280: 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49  include "sqliteI
0290: 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c  nt.h".#include <
02a0: 73 74 64 6c 69 62 2e 68 3e 0a 23 69 6e 63 6c 75  stdlib.h>.#inclu
02b0: 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69  de <assert.h>.#i
02c0: 6e 63 6c 75 64 65 20 22 76 64 62 65 49 6e 74 2e  nclude "vdbeInt.
02d0: 68 22 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e  h"../*.** Return
02e0: 20 74 68 65 20 63 6f 6c 6c 61 74 69 6e 67 20 66   the collating f
02f0: 75 6e 63 74 69 6f 6e 20 61 73 73 6f 63 69 61 74  unction associat
0300: 65 64 20 77 69 74 68 20 61 20 66 75 6e 63 74 69  ed with a functi
0310: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 43 6f  on..*/.static Co
0320: 6c 6c 53 65 71 20 2a 73 71 6c 69 74 65 33 47 65  llSeq *sqlite3Ge
0330: 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 73 71 6c  tFuncCollSeq(sql
0340: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0350: 6e 74 65 78 74 29 7b 0a 20 20 72 65 74 75 72 6e  ntext){.  return
0360: 20 63 6f 6e 74 65 78 74 2d 3e 70 43 6f 6c 6c 3b   context->pColl;
0370: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 64 69 63 61  .}../*.** Indica
0380: 74 65 20 74 68 61 74 20 74 68 65 20 61 63 63 75  te that the accu
0390: 6d 75 6c 61 74 6f 72 20 6c 6f 61 64 20 73 68 6f  mulator load sho
03a0: 75 6c 64 20 62 65 20 73 6b 69 70 70 65 64 20 6f  uld be skipped o
03b0: 6e 20 74 68 69 73 0a 2a 2a 20 69 74 65 72 61 74  n this.** iterat
03c0: 69 6f 6e 20 6f 66 20 74 68 65 20 61 67 67 72 65  ion of the aggre
03d0: 67 61 74 65 20 6c 6f 6f 70 2e 0a 2a 2f 0a 73 74  gate loop..*/.st
03e0: 61 74 69 63 20 76 6f 69 64 20 73 71 6c 69 74 65  atic void sqlite
03f0: 33 53 6b 69 70 41 63 63 75 6d 75 6c 61 74 6f 72  3SkipAccumulator
0400: 4c 6f 61 64 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Load(sqlite3_con
0410: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
0420: 20 20 63 6f 6e 74 65 78 74 2d 3e 73 6b 69 70 46    context->skipF
0430: 6c 61 67 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a  lag = 1;.}../*.*
0440: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
0450: 20 6f 66 20 74 68 65 20 6e 6f 6e 2d 61 67 67 72   of the non-aggr
0460: 65 67 61 74 65 20 6d 69 6e 28 29 20 61 6e 64 20  egate min() and 
0470: 6d 61 78 28 29 20 66 75 6e 63 74 69 6f 6e 73 0a  max() functions.
0480: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d  */.static void m
0490: 69 6e 6d 61 78 46 75 6e 63 28 0a 20 20 73 71 6c  inmaxFunc(.  sql
04a0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
04b0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
04c0: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
04d0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
04e0: 6e 74 20 69 3b 0a 20 20 69 6e 74 20 6d 61 73 6b  nt i;.  int mask
04f0: 3b 20 20 20 20 2f 2a 20 30 20 66 6f 72 20 6d 69  ;    /* 0 for mi
0500: 6e 28 29 20 6f 72 20 30 78 66 66 66 66 66 66 66  n() or 0xfffffff
0510: 66 20 66 6f 72 20 6d 61 78 28 29 20 2a 2f 0a 20  f for max() */. 
0520: 20 69 6e 74 20 69 42 65 73 74 3b 0a 20 20 43 6f   int iBest;.  Co
0530: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 3b 0a 0a 20  llSeq *pColl;.. 
0540: 20 61 73 73 65 72 74 28 20 61 72 67 63 3e 31 20   assert( argc>1 
0550: 29 3b 0a 20 20 6d 61 73 6b 20 3d 20 73 71 6c 69  );.  mask = sqli
0560: 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f  te3_user_data(co
0570: 6e 74 65 78 74 29 3d 3d 30 20 3f 20 30 20 3a 20  ntext)==0 ? 0 : 
0580: 2d 31 3b 0a 20 20 70 43 6f 6c 6c 20 3d 20 73 71  -1;.  pColl = sq
0590: 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c  lite3GetFuncColl
05a0: 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  Seq(context);.  
05b0: 61 73 73 65 72 74 28 20 70 43 6f 6c 6c 20 29 3b  assert( pColl );
05c0: 0a 20 20 61 73 73 65 72 74 28 20 6d 61 73 6b 3d  .  assert( mask=
05d0: 3d 2d 31 20 7c 7c 20 6d 61 73 6b 3d 3d 30 20 29  =-1 || mask==0 )
05e0: 3b 0a 20 20 69 42 65 73 74 20 3d 20 30 3b 0a 20  ;.  iBest = 0;. 
05f0: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
0600: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
0610: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20  ==SQLITE_NULL ) 
0620: 72 65 74 75 72 6e 3b 0a 20 20 66 6f 72 28 69 3d  return;.  for(i=
0630: 31 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29 7b  1; i<argc; i++){
0640: 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33  .    if( sqlite3
0650: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
0660: 5b 69 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [i])==SQLITE_NUL
0670: 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  L ) return;.    
0680: 69 66 28 20 28 73 71 6c 69 74 65 33 4d 65 6d 43  if( (sqlite3MemC
0690: 6f 6d 70 61 72 65 28 61 72 67 76 5b 69 42 65 73  ompare(argv[iBes
06a0: 74 5d 2c 20 61 72 67 76 5b 69 5d 2c 20 70 43 6f  t], argv[i], pCo
06b0: 6c 6c 29 5e 6d 61 73 6b 29 3e 3d 30 20 29 7b 0a  ll)^mask)>=0 ){.
06c0: 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28 20        testcase( 
06d0: 6d 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 20 20 20  mask==0 );.     
06e0: 20 69 42 65 73 74 20 3d 20 69 3b 0a 20 20 20 20   iBest = i;.    
06f0: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  }.  }.  sqlite3_
0700: 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e  result_value(con
0710: 74 65 78 74 2c 20 61 72 67 76 5b 69 42 65 73 74  text, argv[iBest
0720: 5d 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74  ]);.}../*.** Ret
0730: 75 72 6e 20 74 68 65 20 74 79 70 65 20 6f 66 20  urn the type of 
0740: 74 68 65 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f  the argument..*/
0750: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 79 70  .static void typ
0760: 65 6f 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  eofFunc(.  sqlit
0770: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
0780: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
0790: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
07a0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
07b0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d 20  const char *z = 
07c0: 30 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  0;.  UNUSED_PARA
07d0: 4d 45 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a  METER(NotUsed);.
07e0: 20 20 73 77 69 74 63 68 28 20 73 71 6c 69 74 65    switch( sqlite
07f0: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
0800: 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73  v[0]) ){.    cas
0810: 65 20 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52  e SQLITE_INTEGER
0820: 3a 20 7a 20 3d 20 22 69 6e 74 65 67 65 72 22 3b  : z = "integer";
0830: 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65   break;.    case
0840: 20 53 51 4c 49 54 45 5f 54 45 58 54 3a 20 20 20   SQLITE_TEXT:   
0850: 20 7a 20 3d 20 22 74 65 78 74 22 3b 20 20 20 20   z = "text";    
0860: 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20  break;.    case 
0870: 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 20 20  SQLITE_FLOAT:   
0880: 7a 20 3d 20 22 72 65 61 6c 22 3b 20 20 20 20 62  z = "real";    b
0890: 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20 53  reak;.    case S
08a0: 51 4c 49 54 45 5f 42 4c 4f 42 3a 20 20 20 20 7a  QLITE_BLOB:    z
08b0: 20 3d 20 22 62 6c 6f 62 22 3b 20 20 20 20 62 72   = "blob";    br
08c0: 65 61 6b 3b 0a 20 20 20 20 64 65 66 61 75 6c 74  eak;.    default
08d0: 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 7a 20  :             z 
08e0: 3d 20 22 6e 75 6c 6c 22 3b 20 20 20 20 62 72 65  = "null";    bre
08f0: 61 6b 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  ak;.  }.  sqlite
0900: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
0910: 6e 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 53 51  ntext, z, -1, SQ
0920: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a  LITE_STATIC);.}.
0930: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
0940: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 65  tation of the le
0950: 6e 67 74 68 28 29 20 66 75 6e 63 74 69 6f 6e 0a  ngth() function.
0960: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
0970: 65 6e 67 74 68 46 75 6e 63 28 0a 20 20 73 71 6c  engthFunc(.  sql
0980: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0990: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
09a0: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
09b0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
09c0: 6e 74 20 6c 65 6e 3b 0a 0a 20 20 61 73 73 65 72  nt len;..  asser
09d0: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
09e0: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
09f0: 28 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68  (argc);.  switch
0a00: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
0a10: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
0a20: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0a30: 5f 42 4c 4f 42 3a 0a 20 20 20 20 63 61 73 65 20  _BLOB:.    case 
0a40: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 0a  SQLITE_INTEGER:.
0a50: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
0a60: 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 73  FLOAT: {.      s
0a70: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
0a80: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
0a90: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
0aa0: 72 67 76 5b 30 5d 29 29 3b 0a 20 20 20 20 20 20  rgv[0]));.      
0ab0: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
0ac0: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58   case SQLITE_TEX
0ad0: 54 3a 20 7b 0a 20 20 20 20 20 20 63 6f 6e 73 74  T: {.      const
0ae0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
0af0: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  z = sqlite3_valu
0b00: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
0b10: 0a 20 20 20 20 20 20 69 66 28 20 7a 3d 3d 30 20  .      if( z==0 
0b20: 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20  ) return;.      
0b30: 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 77  len = 0;.      w
0b40: 68 69 6c 65 28 20 2a 7a 20 29 7b 0a 20 20 20 20  hile( *z ){.    
0b50: 20 20 20 20 6c 65 6e 2b 2b 3b 0a 20 20 20 20 20      len++;.     
0b60: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
0b70: 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 7d 0a  TF8(z);.      }.
0b80: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
0b90: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
0ba0: 2c 20 6c 65 6e 29 3b 0a 20 20 20 20 20 20 62 72  , len);.      br
0bb0: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64  eak;.    }.    d
0bc0: 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20  efault: {.      
0bd0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e  sqlite3_result_n
0be0: 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  ull(context);.  
0bf0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
0c00: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
0c10: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
0c20: 74 68 65 20 61 62 73 28 29 20 66 75 6e 63 74 69  the abs() functi
0c30: 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52  on..**.** IMP: R
0c40: 2d 32 33 39 37 39 2d 32 36 38 35 35 20 54 68 65  -23979-26855 The
0c50: 20 61 62 73 28 58 29 20 66 75 6e 63 74 69 6f 6e   abs(X) function
0c60: 20 72 65 74 75 72 6e 73 20 74 68 65 20 61 62 73   returns the abs
0c70: 6f 6c 75 74 65 20 76 61 6c 75 65 20 6f 66 0a 2a  olute value of.*
0c80: 2a 20 74 68 65 20 6e 75 6d 65 72 69 63 20 61 72  * the numeric ar
0c90: 67 75 6d 65 6e 74 20 58 2e 20 0a 2a 2f 0a 73 74  gument X. .*/.st
0ca0: 61 74 69 63 20 76 6f 69 64 20 61 62 73 46 75 6e  atic void absFun
0cb0: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
0cc0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
0cd0: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
0ce0: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 61  lue **argv){.  a
0cf0: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
0d00: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
0d10: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 73 77  ETER(argc);.  sw
0d20: 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61  itch( sqlite3_va
0d30: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
0d40: 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51  ) ){.    case SQ
0d50: 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 20 7b 0a  LITE_INTEGER: {.
0d60: 20 20 20 20 20 20 69 36 34 20 69 56 61 6c 20 3d        i64 iVal =
0d70: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
0d80: 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20  nt64(argv[0]);. 
0d90: 20 20 20 20 20 69 66 28 20 69 56 61 6c 3c 30 20       if( iVal<0 
0da0: 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 69  ){.        if( i
0db0: 56 61 6c 3d 3d 53 4d 41 4c 4c 45 53 54 5f 49 4e  Val==SMALLEST_IN
0dc0: 54 36 34 20 29 7b 0a 20 20 20 20 20 20 20 20 20  T64 ){.         
0dd0: 20 2f 2a 20 49 4d 50 3a 20 52 2d 33 31 36 37 36   /* IMP: R-31676
0de0: 2d 34 35 35 30 39 20 49 66 20 58 20 69 73 20 74  -45509 If X is t
0df0: 68 65 20 69 6e 74 65 67 65 72 20 2d 39 32 32 33  he integer -9223
0e00: 33 37 32 30 33 36 38 35 34 37 37 35 38 30 38 0a  372036854775808.
0e10: 20 20 20 20 20 20 20 20 20 20 2a 2a 20 74 68 65            ** the
0e20: 6e 20 61 62 73 28 58 29 20 74 68 72 6f 77 73 20  n abs(X) throws 
0e30: 61 6e 20 69 6e 74 65 67 65 72 20 6f 76 65 72 66  an integer overf
0e40: 6c 6f 77 20 65 72 72 6f 72 20 73 69 6e 63 65 20  low error since 
0e50: 74 68 65 72 65 20 69 73 20 6e 6f 0a 20 20 20 20  there is no.    
0e60: 20 20 20 20 20 20 2a 2a 20 65 71 75 69 76 61 6c        ** equival
0e70: 65 6e 74 20 70 6f 73 69 74 69 76 65 20 36 34 2d  ent positive 64-
0e80: 62 69 74 20 74 77 6f 20 63 6f 6d 70 6c 65 6d 65  bit two compleme
0e90: 6e 74 20 76 61 6c 75 65 2e 20 2a 2f 0a 20 20 20  nt value. */.   
0ea0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72         sqlite3_r
0eb0: 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74  esult_error(cont
0ec0: 65 78 74 2c 20 22 69 6e 74 65 67 65 72 20 6f 76  ext, "integer ov
0ed0: 65 72 66 6c 6f 77 22 2c 20 2d 31 29 3b 0a 20 20  erflow", -1);.  
0ee0: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a          return;.
0ef0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
0f00: 20 20 69 56 61 6c 20 3d 20 2d 69 56 61 6c 3b 0a    iVal = -iVal;.
0f10: 20 20 20 20 20 20 7d 20 0a 20 20 20 20 20 20 73        } .      s
0f20: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
0f30: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 69 56 61  t64(context, iVa
0f40: 6c 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  l);.      break;
0f50: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20  .    }.    case 
0f60: 53 51 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a 20  SQLITE_NULL: {. 
0f70: 20 20 20 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 33       /* IMP: R-3
0f80: 37 34 33 34 2d 31 39 39 32 39 20 41 62 73 28 58  7434-19929 Abs(X
0f90: 29 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 20 69  ) returns NULL i
0fa0: 66 20 58 20 69 73 20 4e 55 4c 4c 2e 20 2a 2f 0a  f X is NULL. */.
0fb0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
0fc0: 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78  sult_null(contex
0fd0: 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  t);.      break;
0fe0: 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75  .    }.    defau
0ff0: 6c 74 3a 20 7b 0a 20 20 20 20 20 20 2f 2a 20 42  lt: {.      /* B
1000: 65 63 61 75 73 65 20 73 71 6c 69 74 65 33 5f 76  ecause sqlite3_v
1010: 61 6c 75 65 5f 64 6f 75 62 6c 65 28 29 20 72 65  alue_double() re
1020: 74 75 72 6e 73 20 30 2e 30 20 69 66 20 74 68 65  turns 0.0 if the
1030: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e 6f 74   argument is not
1040: 0a 20 20 20 20 20 20 2a 2a 20 73 6f 6d 65 74 68  .      ** someth
1050: 69 6e 67 20 74 68 61 74 20 63 61 6e 20 62 65 20  ing that can be 
1060: 63 6f 6e 76 65 72 74 65 64 20 69 6e 74 6f 20 61  converted into a
1070: 20 6e 75 6d 62 65 72 2c 20 77 65 20 68 61 76 65   number, we have
1080: 3a 0a 20 20 20 20 20 20 2a 2a 20 49 4d 50 3a 20  :.      ** IMP: 
1090: 52 2d 35 37 33 32 36 2d 33 31 35 34 31 20 41 62  R-57326-31541 Ab
10a0: 73 28 58 29 20 72 65 74 75 72 6e 20 30 2e 30 20  s(X) return 0.0 
10b0: 69 66 20 58 20 69 73 20 61 20 73 74 72 69 6e 67  if X is a string
10c0: 20 6f 72 20 62 6c 6f 62 20 74 68 61 74 0a 20 20   or blob that.  
10d0: 20 20 20 20 2a 2a 20 63 61 6e 6e 6f 74 20 62 65      ** cannot be
10e0: 20 63 6f 6e 76 65 72 74 65 64 20 74 6f 20 61 20   converted to a 
10f0: 6e 75 6d 65 72 69 63 20 76 61 6c 75 65 2e 20 0a  numeric value. .
1100: 20 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 64        */.      d
1110: 6f 75 62 6c 65 20 72 56 61 6c 20 3d 20 73 71 6c  ouble rVal = sql
1120: 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c  ite3_value_doubl
1130: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  e(argv[0]);.    
1140: 20 20 69 66 28 20 72 56 61 6c 3c 30 20 29 20 72    if( rVal<0 ) r
1150: 56 61 6c 20 3d 20 2d 72 56 61 6c 3b 0a 20 20 20  Val = -rVal;.   
1160: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
1170: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
1180: 2c 20 72 56 61 6c 29 3b 0a 20 20 20 20 20 20 62  , rVal);.      b
1190: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  reak;.    }.  }.
11a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
11b0: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 69  ntation of the i
11c0: 6e 73 74 72 28 29 20 66 75 6e 63 74 69 6f 6e 2e  nstr() function.
11d0: 0a 2a 2a 0a 2a 2a 20 69 6e 73 74 72 28 68 61 79  .**.** instr(hay
11e0: 73 74 61 63 6b 2c 6e 65 65 64 6c 65 29 20 66 69  stack,needle) fi
11f0: 6e 64 73 20 74 68 65 20 66 69 72 73 74 20 6f 63  nds the first oc
1200: 63 75 72 72 65 6e 63 65 20 6f 66 20 6e 65 65 64  currence of need
1210: 6c 65 0a 2a 2a 20 69 6e 20 68 61 79 73 74 61 63  le.** in haystac
1220: 6b 20 61 6e 64 20 72 65 74 75 72 6e 73 20 74 68  k and returns th
1230: 65 20 6e 75 6d 62 65 72 20 6f 66 20 70 72 65 76  e number of prev
1240: 69 6f 75 73 20 63 68 61 72 61 63 74 65 72 73 20  ious characters 
1250: 70 6c 75 73 20 31 2c 0a 2a 2a 20 6f 72 20 30 20  plus 1,.** or 0 
1260: 69 66 20 6e 65 65 64 6c 65 20 64 6f 65 73 20 6e  if needle does n
1270: 6f 74 20 6f 63 63 75 72 20 77 69 74 68 69 6e 20  ot occur within 
1280: 68 61 79 73 74 61 63 6b 2e 0a 2a 2a 0a 2a 2a 20  haystack..**.** 
1290: 49 66 20 62 6f 74 68 20 68 61 79 73 74 61 63 6b  If both haystack
12a0: 20 61 6e 64 20 6e 65 65 64 6c 65 20 61 72 65 20   and needle are 
12b0: 42 4c 4f 42 73 2c 20 74 68 65 6e 20 74 68 65 20  BLOBs, then the 
12c0: 72 65 73 75 6c 74 20 69 73 20 6f 6e 65 20 6d 6f  result is one mo
12d0: 72 65 20 74 68 61 6e 0a 2a 2a 20 74 68 65 20 6e  re than.** the n
12e0: 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 69  umber of bytes i
12f0: 6e 20 68 61 79 73 74 61 63 6b 20 70 72 69 6f 72  n haystack prior
1300: 20 74 6f 20 74 68 65 20 66 69 72 73 74 20 6f 63   to the first oc
1310: 63 75 72 72 65 6e 63 65 20 6f 66 20 6e 65 65 64  currence of need
1320: 6c 65 2c 0a 2a 2a 20 6f 72 20 30 20 69 66 20 6e  le,.** or 0 if n
1330: 65 65 64 6c 65 20 6e 65 76 65 72 20 6f 63 63 75  eedle never occu
1340: 72 73 20 69 6e 20 68 61 79 73 74 61 63 6b 2e 0a  rs in haystack..
1350: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 69  */.static void i
1360: 6e 73 74 72 46 75 6e 63 28 0a 20 20 73 71 6c 69  nstrFunc(.  sqli
1370: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
1380: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
1390: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
13a0: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f  e **argv.){.  co
13b0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
13c0: 72 20 2a 7a 48 61 79 73 74 61 63 6b 3b 0a 20 20  r *zHaystack;.  
13d0: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
13e0: 68 61 72 20 2a 7a 4e 65 65 64 6c 65 3b 0a 20 20  har *zNeedle;.  
13f0: 69 6e 74 20 6e 48 61 79 73 74 61 63 6b 3b 0a 20  int nHaystack;. 
1400: 20 69 6e 74 20 6e 4e 65 65 64 6c 65 3b 0a 20 20   int nNeedle;.  
1410: 69 6e 74 20 74 79 70 65 48 61 79 73 74 61 63 6b  int typeHaystack
1420: 2c 20 74 79 70 65 4e 65 65 64 6c 65 3b 0a 20 20  , typeNeedle;.  
1430: 69 6e 74 20 4e 20 3d 20 31 3b 0a 20 20 69 6e 74  int N = 1;.  int
1440: 20 69 73 54 65 78 74 3b 0a 0a 20 20 55 4e 55 53   isText;..  UNUS
1450: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
1460: 63 29 3b 0a 20 20 74 79 70 65 48 61 79 73 74 61  c);.  typeHaysta
1470: 63 6b 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ck = sqlite3_val
1480: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
1490: 3b 0a 20 20 74 79 70 65 4e 65 65 64 6c 65 20 3d  ;.  typeNeedle =
14a0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
14b0: 79 70 65 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20  ype(argv[1]);.  
14c0: 69 66 28 20 74 79 70 65 48 61 79 73 74 61 63 6b  if( typeHaystack
14d0: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 7c 7c  ==SQLITE_NULL ||
14e0: 20 74 79 70 65 4e 65 65 64 6c 65 3d 3d 53 51 4c   typeNeedle==SQL
14f0: 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72  ITE_NULL ) retur
1500: 6e 3b 0a 20 20 6e 48 61 79 73 74 61 63 6b 20 3d  n;.  nHaystack =
1510: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
1520: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
1530: 20 6e 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74   nNeedle = sqlit
1540: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
1550: 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 74  rgv[1]);.  if( t
1560: 79 70 65 48 61 79 73 74 61 63 6b 3d 3d 53 51 4c  ypeHaystack==SQL
1570: 49 54 45 5f 42 4c 4f 42 20 26 26 20 74 79 70 65  ITE_BLOB && type
1580: 4e 65 65 64 6c 65 3d 3d 53 51 4c 49 54 45 5f 42  Needle==SQLITE_B
1590: 4c 4f 42 20 29 7b 0a 20 20 20 20 7a 48 61 79 73  LOB ){.    zHays
15a0: 74 61 63 6b 20 3d 20 73 71 6c 69 74 65 33 5f 76  tack = sqlite3_v
15b0: 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30  alue_blob(argv[0
15c0: 5d 29 3b 0a 20 20 20 20 7a 4e 65 65 64 6c 65 20  ]);.    zNeedle 
15d0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
15e0: 62 6c 6f 62 28 61 72 67 76 5b 31 5d 29 3b 0a 20  blob(argv[1]);. 
15f0: 20 20 20 69 73 54 65 78 74 20 3d 20 30 3b 0a 20     isText = 0;. 
1600: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 48 61 79   }else{.    zHay
1610: 73 74 61 63 6b 20 3d 20 73 71 6c 69 74 65 33 5f  stack = sqlite3_
1620: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
1630: 30 5d 29 3b 0a 20 20 20 20 7a 4e 65 65 64 6c 65  0]);.    zNeedle
1640: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1650: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a  _text(argv[1]);.
1660: 20 20 20 20 69 73 54 65 78 74 20 3d 20 31 3b 0a      isText = 1;.
1670: 20 20 7d 0a 20 20 77 68 69 6c 65 28 20 6e 4e 65    }.  while( nNe
1680: 65 64 6c 65 3c 3d 6e 48 61 79 73 74 61 63 6b 20  edle<=nHaystack 
1690: 26 26 20 6d 65 6d 63 6d 70 28 7a 48 61 79 73 74  && memcmp(zHayst
16a0: 61 63 6b 2c 20 7a 4e 65 65 64 6c 65 2c 20 6e 4e  ack, zNeedle, nN
16b0: 65 65 64 6c 65 29 21 3d 30 20 29 7b 0a 20 20 20  eedle)!=0 ){.   
16c0: 20 4e 2b 2b 3b 0a 20 20 20 20 64 6f 7b 0a 20 20   N++;.    do{.  
16d0: 20 20 20 20 6e 48 61 79 73 74 61 63 6b 2d 2d 3b      nHaystack--;
16e0: 0a 20 20 20 20 20 20 7a 48 61 79 73 74 61 63 6b  .      zHaystack
16f0: 2b 2b 3b 0a 20 20 20 20 7d 77 68 69 6c 65 28 20  ++;.    }while( 
1700: 69 73 54 65 78 74 20 26 26 20 28 7a 48 61 79 73  isText && (zHays
1710: 74 61 63 6b 5b 30 5d 26 30 78 63 30 29 3d 3d 30  tack[0]&0xc0)==0
1720: 78 38 30 20 29 3b 0a 20 20 7d 0a 20 20 69 66 28  x80 );.  }.  if(
1730: 20 6e 4e 65 65 64 6c 65 3e 6e 48 61 79 73 74 61   nNeedle>nHaysta
1740: 63 6b 20 29 20 4e 20 3d 20 30 3b 0a 20 20 73 71  ck ) N = 0;.  sq
1750: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
1760: 28 63 6f 6e 74 65 78 74 2c 20 4e 29 3b 0a 7d 0a  (context, N);.}.
1770: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
1780: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 70 72 69  ation of the pri
1790: 6e 74 66 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a  ntf() function..
17a0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 70  */.static void p
17b0: 72 69 6e 74 66 46 75 6e 63 28 0a 20 20 73 71 6c  rintfFunc(.  sql
17c0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
17d0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
17e0: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
17f0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 50  ue **argv.){.  P
1800: 72 69 6e 74 66 41 72 67 75 6d 65 6e 74 73 20 78  rintfArguments x
1810: 3b 0a 20 20 53 74 72 41 63 63 75 6d 20 73 74 72  ;.  StrAccum str
1820: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
1830: 7a 46 6f 72 6d 61 74 3b 0a 20 20 69 6e 74 20 6e  zFormat;.  int n
1840: 3b 0a 0a 20 20 69 66 28 20 61 72 67 63 3e 3d 31  ;..  if( argc>=1
1850: 20 26 26 20 28 7a 46 6f 72 6d 61 74 20 3d 20 28   && (zFormat = (
1860: 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69  const char*)sqli
1870: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
1880: 72 67 76 5b 30 5d 29 29 21 3d 30 20 29 7b 0a 20  rgv[0]))!=0 ){. 
1890: 20 20 20 78 2e 6e 41 72 67 20 3d 20 61 72 67 63     x.nArg = argc
18a0: 2d 31 3b 0a 20 20 20 20 78 2e 6e 55 73 65 64 20  -1;.    x.nUsed 
18b0: 3d 20 30 3b 0a 20 20 20 20 78 2e 61 70 41 72 67  = 0;.    x.apArg
18c0: 20 3d 20 61 72 67 76 2b 31 3b 0a 20 20 20 20 73   = argv+1;.    s
18d0: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 49 6e  qlite3StrAccumIn
18e0: 69 74 28 26 73 74 72 2c 20 30 2c 20 30 2c 20 53  it(&str, 0, 0, S
18f0: 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48  QLITE_MAX_LENGTH
1900: 29 3b 0a 20 20 20 20 73 74 72 2e 64 62 20 3d 20  );.    str.db = 
1910: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
1920: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
1930: 74 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 58  t);.    sqlite3X
1940: 50 72 69 6e 74 66 28 26 73 74 72 2c 20 53 51 4c  Printf(&str, SQL
1950: 49 54 45 5f 50 52 49 4e 54 46 5f 53 51 4c 46 55  ITE_PRINTF_SQLFU
1960: 4e 43 2c 20 7a 46 6f 72 6d 61 74 2c 20 26 78 29  NC, zFormat, &x)
1970: 3b 0a 20 20 20 20 6e 20 3d 20 73 74 72 2e 6e 43  ;.    n = str.nC
1980: 68 61 72 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  har;.    sqlite3
1990: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
19a0: 74 65 78 74 2c 20 73 71 6c 69 74 65 33 53 74 72  text, sqlite3Str
19b0: 41 63 63 75 6d 46 69 6e 69 73 68 28 26 73 74 72  AccumFinish(&str
19c0: 29 2c 20 6e 2c 0a 20 20 20 20 20 20 20 20 20 20  ), n,.          
19d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 51                SQ
19e0: 4c 49 54 45 5f 44 59 4e 41 4d 49 43 29 3b 0a 20  LITE_DYNAMIC);. 
19f0: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c   }.}../*.** Impl
1a00: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
1a10: 65 20 73 75 62 73 74 72 28 29 20 66 75 6e 63 74  e substr() funct
1a20: 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 73 75 62 73 74  ion..**.** subst
1a30: 72 28 78 2c 70 31 2c 70 32 29 20 20 72 65 74 75  r(x,p1,p2)  retu
1a40: 72 6e 73 20 70 32 20 63 68 61 72 61 63 74 65 72  rns p2 character
1a50: 73 20 6f 66 20 78 5b 5d 20 62 65 67 69 6e 6e 69  s of x[] beginni
1a60: 6e 67 20 77 69 74 68 20 70 31 2e 0a 2a 2a 20 70  ng with p1..** p
1a70: 31 20 69 73 20 31 2d 69 6e 64 65 78 65 64 2e 20  1 is 1-indexed. 
1a80: 20 53 6f 20 73 75 62 73 74 72 28 78 2c 31 2c 31   So substr(x,1,1
1a90: 29 20 72 65 74 75 72 6e 73 20 74 68 65 20 66 69  ) returns the fi
1aa0: 72 73 74 20 63 68 61 72 61 63 74 65 72 0a 2a 2a  rst character.**
1ab0: 20 6f 66 20 78 2e 20 20 49 66 20 78 20 69 73 20   of x.  If x is 
1ac0: 74 65 78 74 2c 20 74 68 65 6e 20 77 65 20 61 63  text, then we ac
1ad0: 74 75 61 6c 6c 79 20 63 6f 75 6e 74 20 55 54 46  tually count UTF
1ae0: 2d 38 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a  -8 characters..*
1af0: 2a 20 49 66 20 78 20 69 73 20 61 20 62 6c 6f 62  * If x is a blob
1b00: 2c 20 74 68 65 6e 20 77 65 20 63 6f 75 6e 74 20  , then we count 
1b10: 62 79 74 65 73 2e 0a 2a 2a 0a 2a 2a 20 49 66 20  bytes..**.** If 
1b20: 70 31 20 69 73 20 6e 65 67 61 74 69 76 65 2c 20  p1 is negative, 
1b30: 74 68 65 6e 20 77 65 20 62 65 67 69 6e 20 61 62  then we begin ab
1b40: 73 28 70 31 29 20 66 72 6f 6d 20 74 68 65 20 65  s(p1) from the e
1b50: 6e 64 20 6f 66 20 78 5b 5d 2e 0a 2a 2a 0a 2a 2a  nd of x[]..**.**
1b60: 20 49 66 20 70 32 20 69 73 20 6e 65 67 61 74 69   If p2 is negati
1b70: 76 65 2c 20 72 65 74 75 72 6e 20 74 68 65 20 70  ve, return the p
1b80: 32 20 63 68 61 72 61 63 74 65 72 73 20 70 72 65  2 characters pre
1b90: 63 65 64 69 6e 67 20 70 31 2e 0a 2a 2f 0a 73 74  ceding p1..*/.st
1ba0: 61 74 69 63 20 76 6f 69 64 20 73 75 62 73 74 72  atic void substr
1bb0: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
1bc0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
1bd0: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
1be0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
1bf0: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
1c00: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
1c10: 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  ;.  const unsign
1c20: 65 64 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69  ed char *z2;.  i
1c30: 6e 74 20 6c 65 6e 3b 0a 20 20 69 6e 74 20 70 30  nt len;.  int p0
1c40: 74 79 70 65 3b 0a 20 20 69 36 34 20 70 31 2c 20  type;.  i64 p1, 
1c50: 70 32 3b 0a 20 20 69 6e 74 20 6e 65 67 50 32 20  p2;.  int negP2 
1c60: 3d 20 30 3b 0a 0a 20 20 61 73 73 65 72 74 28 20  = 0;..  assert( 
1c70: 61 72 67 63 3d 3d 33 20 7c 7c 20 61 72 67 63 3d  argc==3 || argc=
1c80: 3d 32 20 29 3b 0a 20 20 69 66 28 20 73 71 6c 69  =2 );.  if( sqli
1c90: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
1ca0: 72 67 76 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f  rgv[1])==SQLITE_
1cb0: 4e 55 4c 4c 0a 20 20 20 7c 7c 20 28 61 72 67 63  NULL.   || (argc
1cc0: 3d 3d 33 20 26 26 20 73 71 6c 69 74 65 33 5f 76  ==3 && sqlite3_v
1cd0: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 32  alue_type(argv[2
1ce0: 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 29  ])==SQLITE_NULL)
1cf0: 0a 20 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  .  ){.    return
1d00: 3b 0a 20 20 7d 0a 20 20 70 30 74 79 70 65 20 3d  ;.  }.  p0type =
1d10: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
1d20: 79 70 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ype(argv[0]);.  
1d30: 70 31 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  p1 = sqlite3_val
1d40: 75 65 5f 69 6e 74 28 61 72 67 76 5b 31 5d 29 3b  ue_int(argv[1]);
1d50: 0a 20 20 69 66 28 20 70 30 74 79 70 65 3d 3d 53  .  if( p0type==S
1d60: 51 4c 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20  QLITE_BLOB ){.  
1d70: 20 20 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 5f    len = sqlite3_
1d80: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
1d90: 5b 30 5d 29 3b 0a 20 20 20 20 7a 20 3d 20 73 71  [0]);.    z = sq
1da0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62  lite3_value_blob
1db0: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69  (argv[0]);.    i
1dc0: 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( z==0 ) return
1dd0: 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 6c 65  ;.    assert( le
1de0: 6e 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  n==sqlite3_value
1df0: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 20  _bytes(argv[0]) 
1e00: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
1e10: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  z = sqlite3_valu
1e20: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
1e30: 0a 20 20 20 20 69 66 28 20 7a 3d 3d 30 20 29 20  .    if( z==0 ) 
1e40: 72 65 74 75 72 6e 3b 0a 20 20 20 20 6c 65 6e 20  return;.    len 
1e50: 3d 20 30 3b 0a 20 20 20 20 69 66 28 20 70 31 3c  = 0;.    if( p1<
1e60: 30 20 29 7b 0a 20 20 20 20 20 20 66 6f 72 28 7a  0 ){.      for(z
1e70: 32 3d 7a 3b 20 2a 7a 32 3b 20 6c 65 6e 2b 2b 29  2=z; *z2; len++)
1e80: 7b 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54 45  {.        SQLITE
1e90: 5f 53 4b 49 50 5f 55 54 46 38 28 7a 32 29 3b 0a  _SKIP_UTF8(z2);.
1ea0: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20        }.    }.  
1eb0: 7d 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  }.#ifdef SQLITE_
1ec0: 53 55 42 53 54 52 5f 43 4f 4d 50 41 54 49 42 49  SUBSTR_COMPATIBI
1ed0: 4c 49 54 59 0a 20 20 69 66 28 20 70 31 3d 3d 30  LITY.  if( p1==0
1ee0: 20 29 20 70 31 20 3d 20 31 3b 20 2f 2a 20 3c 72   ) p1 = 1; /* <r
1ef0: 64 61 72 3a 2f 2f 70 72 6f 62 6c 65 6d 2f 36 37  dar://problem/67
1f00: 37 38 33 33 39 3e 20 2a 2f 0a 23 65 6e 64 69 66  78339> */.#endif
1f10: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29  .  if( argc==3 )
1f20: 7b 0a 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74  {.    p2 = sqlit
1f30: 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67  e3_value_int(arg
1f40: 76 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 70  v[2]);.    if( p
1f50: 32 3c 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20  2<0 ){.      p2 
1f60: 3d 20 2d 70 32 3b 0a 20 20 20 20 20 20 6e 65 67  = -p2;.      neg
1f70: 50 32 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20  P2 = 1;.    }.  
1f80: 7d 65 6c 73 65 7b 0a 20 20 20 20 70 32 20 3d 20  }else{.    p2 = 
1f90: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
1fa0: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
1fb0: 74 29 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  t)->aLimit[SQLIT
1fc0: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b  E_LIMIT_LENGTH];
1fd0: 0a 20 20 7d 0a 20 20 69 66 28 20 70 31 3c 30 20  .  }.  if( p1<0 
1fe0: 29 7b 0a 20 20 20 20 70 31 20 2b 3d 20 6c 65 6e  ){.    p1 += len
1ff0: 3b 0a 20 20 20 20 69 66 28 20 70 31 3c 30 20 29  ;.    if( p1<0 )
2000: 7b 0a 20 20 20 20 20 20 70 32 20 2b 3d 20 70 31  {.      p2 += p1
2010: 3b 0a 20 20 20 20 20 20 69 66 28 20 70 32 3c 30  ;.      if( p2<0
2020: 20 29 20 70 32 20 3d 20 30 3b 0a 20 20 20 20 20   ) p2 = 0;.     
2030: 20 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20   p1 = 0;.    }. 
2040: 20 7d 65 6c 73 65 20 69 66 28 20 70 31 3e 30 20   }else if( p1>0 
2050: 29 7b 0a 20 20 20 20 70 31 2d 2d 3b 0a 20 20 7d  ){.    p1--;.  }
2060: 65 6c 73 65 20 69 66 28 20 70 32 3e 30 20 29 7b  else if( p2>0 ){
2070: 0a 20 20 20 20 70 32 2d 2d 3b 0a 20 20 7d 0a 20  .    p2--;.  }. 
2080: 20 69 66 28 20 6e 65 67 50 32 20 29 7b 0a 20 20   if( negP2 ){.  
2090: 20 20 70 31 20 2d 3d 20 70 32 3b 0a 20 20 20 20    p1 -= p2;.    
20a0: 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20  if( p1<0 ){.    
20b0: 20 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20    p2 += p1;.    
20c0: 20 20 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a    p1 = 0;.    }.
20d0: 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 31    }.  assert( p1
20e0: 3e 3d 30 20 26 26 20 70 32 3e 3d 30 20 29 3b 0a  >=0 && p2>=0 );.
20f0: 20 20 69 66 28 20 70 30 74 79 70 65 21 3d 53 51    if( p0type!=SQ
2100: 4c 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20 20  LITE_BLOB ){.   
2110: 20 77 68 69 6c 65 28 20 2a 7a 20 26 26 20 70 31   while( *z && p1
2120: 20 29 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45   ){.      SQLITE
2130: 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20  _SKIP_UTF8(z);. 
2140: 20 20 20 20 20 70 31 2d 2d 3b 0a 20 20 20 20 7d       p1--;.    }
2150: 0a 20 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a  .    for(z2=z; *
2160: 7a 32 20 26 26 20 70 32 3b 20 70 32 2d 2d 29 7b  z2 && p2; p2--){
2170: 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b  .      SQLITE_SK
2180: 49 50 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20 20  IP_UTF8(z2);.   
2190: 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72   }.    sqlite3_r
21a0: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
21b0: 78 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 28 69  xt, (char*)z, (i
21c0: 6e 74 29 28 7a 32 2d 7a 29 2c 20 53 51 4c 49 54  nt)(z2-z), SQLIT
21d0: 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20  E_TRANSIENT);.  
21e0: 7d 65 6c 73 65 7b 0a 20 20 20 20 69 66 28 20 70  }else{.    if( p
21f0: 31 2b 70 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20  1+p2>len ){.    
2200: 20 20 70 32 20 3d 20 6c 65 6e 2d 70 31 3b 0a 20    p2 = len-p1;. 
2210: 20 20 20 20 20 69 66 28 20 70 32 3c 30 20 29 20       if( p2<0 ) 
2220: 70 32 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20  p2 = 0;.    }.  
2230: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2240: 5f 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28  _blob(context, (
2250: 63 68 61 72 2a 29 26 7a 5b 70 31 5d 2c 20 28 69  char*)&z[p1], (i
2260: 6e 74 29 70 32 2c 20 53 51 4c 49 54 45 5f 54 52  nt)p2, SQLITE_TR
2270: 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a  ANSIENT);.  }.}.
2280: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
2290: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75  ation of the rou
22a0: 6e 64 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f  nd() function.*/
22b0: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f  .#ifndef SQLITE_
22c0: 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f  OMIT_FLOATING_PO
22d0: 49 4e 54 0a 73 74 61 74 69 63 20 76 6f 69 64 20  INT.static void 
22e0: 72 6f 75 6e 64 46 75 6e 63 28 73 71 6c 69 74 65  roundFunc(sqlite
22f0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
2300: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
2310: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
2320: 67 76 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30  gv){.  int n = 0
2330: 3b 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20  ;.  double r;.  
2340: 63 68 61 72 20 2a 7a 42 75 66 3b 0a 20 20 61 73  char *zBuf;.  as
2350: 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c  sert( argc==1 ||
2360: 20 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66   argc==2 );.  if
2370: 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20  ( argc==2 ){.   
2380: 20 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c   if( SQLITE_NULL
2390: 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ==sqlite3_value_
23a0: 74 79 70 65 28 61 72 67 76 5b 31 5d 29 20 29 20  type(argv[1]) ) 
23b0: 72 65 74 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20  return;.    n = 
23c0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
23d0: 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20  t(argv[1]);.    
23e0: 69 66 28 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33  if( n>30 ) n = 3
23f0: 30 3b 0a 20 20 20 20 69 66 28 20 6e 3c 30 20 29  0;.    if( n<0 )
2400: 20 6e 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66   n = 0;.  }.  if
2410: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
2420: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53  type(argv[0])==S
2430: 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74  QLITE_NULL ) ret
2440: 75 72 6e 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74  urn;.  r = sqlit
2450: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28  e3_value_double(
2460: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 49  argv[0]);.  /* I
2470: 66 20 59 3d 3d 30 20 61 6e 64 20 58 20 77 69 6c  f Y==0 and X wil
2480: 6c 20 66 69 74 20 69 6e 20 61 20 36 34 2d 62 69  l fit in a 64-bi
2490: 74 20 69 6e 74 2c 0a 20 20 2a 2a 20 68 61 6e 64  t int,.  ** hand
24a0: 6c 65 20 74 68 65 20 72 6f 75 6e 64 69 6e 67 20  le the rounding 
24b0: 64 69 72 65 63 74 6c 79 2c 0a 20 20 2a 2a 20 6f  directly,.  ** o
24c0: 74 68 65 72 77 69 73 65 20 75 73 65 20 70 72 69  therwise use pri
24d0: 6e 74 66 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20  ntf..  */.  if( 
24e0: 6e 3d 3d 30 20 26 26 20 72 3e 3d 30 20 26 26 20  n==0 && r>=0 && 
24f0: 72 3c 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2d  r<LARGEST_INT64-
2500: 31 20 29 7b 0a 20 20 20 20 72 20 3d 20 28 64 6f  1 ){.    r = (do
2510: 75 62 6c 65 29 28 28 73 71 6c 69 74 65 5f 69 6e  uble)((sqlite_in
2520: 74 36 34 29 28 72 2b 30 2e 35 29 29 3b 0a 20 20  t64)(r+0.5));.  
2530: 7d 65 6c 73 65 20 69 66 28 20 6e 3d 3d 30 20 26  }else if( n==0 &
2540: 26 20 72 3c 30 20 26 26 20 28 2d 72 29 3c 4c 41  & r<0 && (-r)<LA
2550: 52 47 45 53 54 5f 49 4e 54 36 34 2d 31 20 29 7b  RGEST_INT64-1 ){
2560: 0a 20 20 20 20 72 20 3d 20 2d 28 64 6f 75 62 6c  .    r = -(doubl
2570: 65 29 28 28 73 71 6c 69 74 65 5f 69 6e 74 36 34  e)((sqlite_int64
2580: 29 28 28 2d 72 29 2b 30 2e 35 29 29 3b 0a 20 20  )((-r)+0.5));.  
2590: 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 42 75 66 20  }else{.    zBuf 
25a0: 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74  = sqlite3_mprint
25b0: 66 28 22 25 2e 2a 66 22 2c 6e 2c 72 29 3b 0a 20  f("%.*f",n,r);. 
25c0: 20 20 20 69 66 28 20 7a 42 75 66 3d 3d 30 20 29     if( zBuf==0 )
25d0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
25e0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d  result_error_nom
25f0: 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  em(context);.   
2600: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d     return;.    }
2610: 0a 20 20 20 20 73 71 6c 69 74 65 33 41 74 6f 46  .    sqlite3AtoF
2620: 28 7a 42 75 66 2c 20 26 72 2c 20 73 71 6c 69 74  (zBuf, &r, sqlit
2630: 65 33 53 74 72 6c 65 6e 33 30 28 7a 42 75 66 29  e3Strlen30(zBuf)
2640: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 29 3b 0a  , SQLITE_UTF8);.
2650: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
2660: 28 7a 42 75 66 29 3b 0a 20 20 7d 0a 20 20 73 71  (zBuf);.  }.  sq
2670: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75  lite3_result_dou
2680: 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b  ble(context, r);
2690: 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a  .}.#endif../*.**
26a0: 20 41 6c 6c 6f 63 61 74 65 20 6e 42 79 74 65 20   Allocate nByte 
26b0: 62 79 74 65 73 20 6f 66 20 73 70 61 63 65 20 75  bytes of space u
26c0: 73 69 6e 67 20 73 71 6c 69 74 65 33 5f 6d 61 6c  sing sqlite3_mal
26d0: 6c 6f 63 28 29 2e 20 49 66 20 74 68 65 0a 2a 2a  loc(). If the.**
26e0: 20 61 6c 6c 6f 63 61 74 69 6f 6e 20 66 61 69 6c   allocation fail
26f0: 73 2c 20 63 61 6c 6c 20 73 71 6c 69 74 65 33 5f  s, call sqlite3_
2700: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d  result_error_nom
2710: 65 6d 28 29 20 74 6f 20 6e 6f 74 69 66 79 0a 2a  em() to notify.*
2720: 2a 20 74 68 65 20 64 61 74 61 62 61 73 65 20 68  * the database h
2730: 61 6e 64 6c 65 20 74 68 61 74 20 6d 61 6c 6c 6f  andle that mallo
2740: 63 28 29 20 68 61 73 20 66 61 69 6c 65 64 20 61  c() has failed a
2750: 6e 64 20 72 65 74 75 72 6e 20 4e 55 4c 4c 2e 0a  nd return NULL..
2760: 2a 2a 20 49 66 20 6e 42 79 74 65 20 69 73 20 6c  ** If nByte is l
2770: 61 72 67 65 72 20 74 68 61 6e 20 74 68 65 20 6d  arger than the m
2780: 61 78 69 6d 75 6d 20 73 74 72 69 6e 67 20 6f 72  aximum string or
2790: 20 62 6c 6f 62 20 6c 65 6e 67 74 68 2c 20 74 68   blob length, th
27a0: 65 6e 0a 2a 2a 20 72 61 69 73 65 20 61 6e 20 53  en.** raise an S
27b0: 51 4c 49 54 45 5f 54 4f 4f 42 49 47 20 65 78 63  QLITE_TOOBIG exc
27c0: 65 70 74 69 6f 6e 20 61 6e 64 20 72 65 74 75 72  eption and retur
27d0: 6e 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69  n NULL..*/.stati
27e0: 63 20 76 6f 69 64 20 2a 63 6f 6e 74 65 78 74 4d  c void *contextM
27f0: 61 6c 6c 6f 63 28 73 71 6c 69 74 65 33 5f 63 6f  alloc(sqlite3_co
2800: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
2810: 69 36 34 20 6e 42 79 74 65 29 7b 0a 20 20 63 68  i64 nByte){.  ch
2820: 61 72 20 2a 7a 3b 0a 20 20 73 71 6c 69 74 65 33  ar *z;.  sqlite3
2830: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
2840: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
2850: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61 73 73  (context);.  ass
2860: 65 72 74 28 20 6e 42 79 74 65 3e 30 20 29 3b 0a  ert( nByte>0 );.
2870: 20 20 74 65 73 74 63 61 73 65 28 20 6e 42 79 74    testcase( nByt
2880: 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  e==db->aLimit[SQ
2890: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
28a0: 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65  H] );.  testcase
28b0: 28 20 6e 42 79 74 65 3d 3d 64 62 2d 3e 61 4c 69  ( nByte==db->aLi
28c0: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
28d0: 5f 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20  _LENGTH]+1 );.  
28e0: 69 66 28 20 6e 42 79 74 65 3e 64 62 2d 3e 61 4c  if( nByte>db->aL
28f0: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
2900: 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20  T_LENGTH] ){.   
2910: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
2920: 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f 6e  error_toobig(con
2930: 74 65 78 74 29 3b 0a 20 20 20 20 7a 20 3d 20 30  text);.    z = 0
2940: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a  ;.  }else{.    z
2950: 20 3d 20 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63   = sqlite3Malloc
2960: 28 28 69 6e 74 29 6e 42 79 74 65 29 3b 0a 20 20  ((int)nByte);.  
2970: 20 20 69 66 28 20 21 7a 20 29 7b 0a 20 20 20 20    if( !z ){.    
2980: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2990: 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e  _error_nomem(con
29a0: 74 65 78 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  text);.    }.  }
29b0: 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a  .  return z;.}..
29c0: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
29d0: 74 69 6f 6e 20 6f 66 20 74 68 65 20 75 70 70 65  tion of the uppe
29e0: 72 28 29 20 61 6e 64 20 6c 6f 77 65 72 28 29 20  r() and lower() 
29f0: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a  SQL functions..*
2a00: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 75 70  /.static void up
2a10: 70 65 72 46 75 6e 63 28 73 71 6c 69 74 65 33 5f  perFunc(sqlite3_
2a20: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
2a30: 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69  , int argc, sqli
2a40: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
2a50: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 31 3b 0a 20  ){.  char *z1;. 
2a60: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b   const char *z2;
2a70: 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55  .  int i, n;.  U
2a80: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
2a90: 61 72 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63  argc);.  z2 = (c
2aa0: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
2ab0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
2ac0: 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  n = sqlite3_
2ad0: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
2ae0: 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66  [0]);.  /* Verif
2af0: 79 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c 20  y that the call 
2b00: 74 6f 20 5f 62 79 74 65 73 28 29 20 64 6f 65 73  to _bytes() does
2b10: 20 6e 6f 74 20 69 6e 76 61 6c 69 64 61 74 65 20   not invalidate 
2b20: 74 68 65 20 5f 74 65 78 74 28 29 20 70 6f 69 6e  the _text() poin
2b30: 74 65 72 20 2a 2f 0a 20 20 61 73 73 65 72 74 28  ter */.  assert(
2b40: 20 7a 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69   z2==(char*)sqli
2b50: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
2b60: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28  rgv[0]) );.  if(
2b70: 20 7a 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20   z2 ){.    z1 = 
2b80: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
2b90: 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2b  ntext, ((i64)n)+
2ba0: 31 29 3b 0a 20 20 20 20 69 66 28 20 7a 31 20 29  1);.    if( z1 )
2bb0: 7b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b  {.      for(i=0;
2bc0: 20 69 3c 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20   i<n; i++){.    
2bd0: 20 20 20 20 7a 31 5b 69 5d 20 3d 20 28 63 68 61      z1[i] = (cha
2be0: 72 29 73 71 6c 69 74 65 33 54 6f 75 70 70 65 72  r)sqlite3Toupper
2bf0: 28 7a 32 5b 69 5d 29 3b 0a 20 20 20 20 20 20 7d  (z2[i]);.      }
2c00: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
2c10: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
2c20: 78 74 2c 20 7a 31 2c 20 6e 2c 20 73 71 6c 69 74  xt, z1, n, sqlit
2c30: 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a  e3_free);.    }.
2c40: 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69    }.}.static voi
2c50: 64 20 6c 6f 77 65 72 46 75 6e 63 28 73 71 6c 69  d lowerFunc(sqli
2c60: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
2c70: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20  text, int argc, 
2c80: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
2c90: 61 72 67 76 29 7b 0a 20 20 63 68 61 72 20 2a 7a  argv){.  char *z
2ca0: 31 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  1;.  const char 
2cb0: 2a 7a 32 3b 0a 20 20 69 6e 74 20 69 2c 20 6e 3b  *z2;.  int i, n;
2cc0: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
2cd0: 54 45 52 28 61 72 67 63 29 3b 0a 20 20 7a 32 20  TER(argc);.  z2 
2ce0: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
2cf0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
2d00: 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69  [0]);.  n = sqli
2d10: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
2d20: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56  argv[0]);.  /* V
2d30: 65 72 69 66 79 20 74 68 61 74 20 74 68 65 20 63  erify that the c
2d40: 61 6c 6c 20 74 6f 20 5f 62 79 74 65 73 28 29 20  all to _bytes() 
2d50: 64 6f 65 73 20 6e 6f 74 20 69 6e 76 61 6c 69 64  does not invalid
2d60: 61 74 65 20 74 68 65 20 5f 74 65 78 74 28 29 20  ate the _text() 
2d70: 70 6f 69 6e 74 65 72 20 2a 2f 0a 20 20 61 73 73  pointer */.  ass
2d80: 65 72 74 28 20 7a 32 3d 3d 28 63 68 61 72 2a 29  ert( z2==(char*)
2d90: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
2da0: 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20  xt(argv[0]) );. 
2db0: 20 69 66 28 20 7a 32 20 29 7b 0a 20 20 20 20 7a   if( z2 ){.    z
2dc0: 31 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  1 = contextMallo
2dd0: 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34  c(context, ((i64
2de0: 29 6e 29 2b 31 29 3b 0a 20 20 20 20 69 66 28 20  )n)+1);.    if( 
2df0: 7a 31 20 29 7b 0a 20 20 20 20 20 20 66 6f 72 28  z1 ){.      for(
2e00: 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b 29 7b 0a  i=0; i<n; i++){.
2e10: 20 20 20 20 20 20 20 20 7a 31 5b 69 5d 20 3d 20          z1[i] = 
2e20: 73 71 6c 69 74 65 33 54 6f 6c 6f 77 65 72 28 7a  sqlite3Tolower(z
2e30: 32 5b 69 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20  2[i]);.      }. 
2e40: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
2e50: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
2e60: 2c 20 7a 31 2c 20 6e 2c 20 73 71 6c 69 74 65 33  , z1, n, sqlite3
2e70: 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20  _free);.    }.  
2e80: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 6f 6d 65 20  }.}../*.** Some 
2e90: 66 75 6e 63 74 69 6f 6e 73 20 6c 69 6b 65 20 43  functions like C
2ea0: 4f 41 4c 45 53 43 45 28 29 20 61 6e 64 20 49 46  OALESCE() and IF
2eb0: 4e 55 4c 4c 28 29 20 61 6e 64 20 55 4e 4c 49 4b  NULL() and UNLIK
2ec0: 45 4c 59 28 29 20 61 72 65 20 69 6d 70 6c 65 6d  ELY() are implem
2ed0: 65 6e 74 65 64 0a 2a 2a 20 61 73 20 56 44 42 45  ented.** as VDBE
2ee0: 20 63 6f 64 65 20 73 6f 20 74 68 61 74 20 75 6e   code so that un
2ef0: 75 73 65 64 20 61 72 67 75 6d 65 6e 74 20 76 61  used argument va
2f00: 6c 75 65 73 20 64 6f 20 6e 6f 74 20 68 61 76 65  lues do not have
2f10: 20 74 6f 20 62 65 20 63 6f 6d 70 75 74 65 64 2e   to be computed.
2f20: 0a 2a 2a 20 48 6f 77 65 76 65 72 2c 20 77 65 20  .** However, we 
2f30: 73 74 69 6c 6c 20 6e 65 65 64 20 73 6f 6d 65 20  still need some 
2f40: 6b 69 6e 64 20 6f 66 20 66 75 6e 63 74 69 6f 6e  kind of function
2f50: 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   implementation 
2f60: 66 6f 72 20 74 68 69 73 0a 2a 2a 20 72 6f 75 74  for this.** rout
2f70: 69 6e 65 73 20 69 6e 20 74 68 65 20 66 75 6e 63  ines in the func
2f80: 74 69 6f 6e 20 74 61 62 6c 65 2e 20 20 54 68 65  tion table.  The
2f90: 20 6e 6f 6f 70 46 75 6e 63 20 6d 61 63 72 6f 20   noopFunc macro 
2fa0: 70 72 6f 76 69 64 65 73 20 74 68 69 73 2e 0a 2a  provides this..*
2fb0: 2a 20 6e 6f 6f 70 46 75 6e 63 20 77 69 6c 6c 20  * noopFunc will 
2fc0: 6e 65 76 65 72 20 62 65 20 63 61 6c 6c 65 64 20  never be called 
2fd0: 73 6f 20 69 74 20 64 6f 65 73 6e 27 74 20 6d 61  so it doesn't ma
2fe0: 74 74 65 72 20 77 68 61 74 20 74 68 65 20 69 6d  tter what the im
2ff0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 0a 2a 2a 20  plementation.** 
3000: 69 73 2e 20 20 57 65 20 6d 69 67 68 74 20 61 73  is.  We might as
3010: 20 77 65 6c 6c 20 75 73 65 20 74 68 65 20 22 76   well use the "v
3020: 65 72 73 69 6f 6e 28 29 22 20 66 75 6e 63 74 69  ersion()" functi
3030: 6f 6e 20 61 73 20 61 20 73 75 62 73 74 69 74 75  on as a substitu
3040: 74 65 2e 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 6e  te..*/.#define n
3050: 6f 6f 70 46 75 6e 63 20 76 65 72 73 69 6f 6e 46  oopFunc versionF
3060: 75 6e 63 20 20 20 2f 2a 20 53 75 62 73 74 69 74  unc   /* Substit
3070: 75 74 65 20 66 75 6e 63 74 69 6f 6e 20 2d 20 6e  ute function - n
3080: 65 76 65 72 20 63 61 6c 6c 65 64 20 2a 2f 0a 0a  ever called */..
3090: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
30a0: 74 69 6f 6e 20 6f 66 20 72 61 6e 64 6f 6d 28 29  tion of random()
30b0: 2e 20 20 52 65 74 75 72 6e 20 61 20 72 61 6e 64  .  Return a rand
30c0: 6f 6d 20 69 6e 74 65 67 65 72 2e 20 20 0a 2a 2f  om integer.  .*/
30d0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 61 6e  .static void ran
30e0: 64 6f 6d 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  domFunc(.  sqlit
30f0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
3100: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
3110: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
3120: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
3130: 7b 0a 20 20 73 71 6c 69 74 65 5f 69 6e 74 36 34  {.  sqlite_int64
3140: 20 72 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   r;.  UNUSED_PAR
3150: 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c  AMETER2(NotUsed,
3160: 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 73 71   NotUsed2);.  sq
3170: 6c 69 74 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73  lite3_randomness
3180: 28 73 69 7a 65 6f 66 28 72 29 2c 20 26 72 29 3b  (sizeof(r), &r);
3190: 0a 20 20 69 66 28 20 72 3c 30 20 29 7b 0a 20 20  .  if( r<0 ){.  
31a0: 20 20 2f 2a 20 57 65 20 6e 65 65 64 20 74 6f 20    /* We need to 
31b0: 70 72 65 76 65 6e 74 20 61 20 72 61 6e 64 6f 6d  prevent a random
31c0: 20 6e 75 6d 62 65 72 20 6f 66 20 30 78 38 30 30   number of 0x800
31d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 20 0a 20  0000000000000 . 
31e0: 20 20 20 2a 2a 20 28 6f 72 20 2d 39 32 32 33 33     ** (or -92233
31f0: 37 32 30 33 36 38 35 34 37 37 35 38 30 38 29 20  72036854775808) 
3200: 73 69 6e 63 65 20 77 68 65 6e 20 79 6f 75 20 64  since when you d
3210: 6f 20 61 62 73 28 29 20 6f 66 20 74 68 61 74 0a  o abs() of that.
3220: 20 20 20 20 2a 2a 20 6e 75 6d 62 65 72 20 6f 66      ** number of
3230: 20 79 6f 75 20 67 65 74 20 74 68 65 20 73 61 6d   you get the sam
3240: 65 20 76 61 6c 75 65 20 62 61 63 6b 20 61 67 61  e value back aga
3250: 69 6e 2e 20 20 54 6f 20 64 6f 20 74 68 69 73 0a  in.  To do this.
3260: 20 20 20 20 2a 2a 20 69 6e 20 61 20 77 61 79 20      ** in a way 
3270: 74 68 61 74 20 69 73 20 74 65 73 74 61 62 6c 65  that is testable
3280: 2c 20 6d 61 73 6b 20 74 68 65 20 73 69 67 6e 20  , mask the sign 
3290: 62 69 74 20 6f 66 66 20 6f 66 20 6e 65 67 61 74  bit off of negat
32a0: 69 76 65 0a 20 20 20 20 2a 2a 20 76 61 6c 75 65  ive.    ** value
32b0: 73 2c 20 72 65 73 75 6c 74 69 6e 67 20 69 6e 20  s, resulting in 
32c0: 61 20 70 6f 73 69 74 69 76 65 20 76 61 6c 75 65  a positive value
32d0: 2e 20 20 54 68 65 6e 20 74 61 6b 65 20 74 68 65  .  Then take the
32e0: 20 0a 20 20 20 20 2a 2a 20 32 73 20 63 6f 6d 70   .    ** 2s comp
32f0: 6c 65 6d 65 6e 74 20 6f 66 20 74 68 61 74 20 70  lement of that p
3300: 6f 73 69 74 69 76 65 20 76 61 6c 75 65 2e 20 20  ositive value.  
3310: 54 68 65 20 65 6e 64 20 72 65 73 75 6c 74 20 63  The end result c
3320: 61 6e 0a 20 20 20 20 2a 2a 20 74 68 65 72 65 66  an.    ** theref
3330: 6f 72 65 20 62 65 20 6e 6f 20 6c 65 73 73 20 74  ore be no less t
3340: 68 61 6e 20 2d 39 32 32 33 33 37 32 30 33 36 38  han -92233720368
3350: 35 34 37 37 35 38 30 37 2e 0a 20 20 20 20 2a 2f  54775807..    */
3360: 0a 20 20 20 20 72 20 3d 20 2d 28 72 20 26 20 4c  .    r = -(r & L
3370: 41 52 47 45 53 54 5f 49 4e 54 36 34 29 3b 0a 20  ARGEST_INT64);. 
3380: 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73   }.  sqlite3_res
3390: 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78  ult_int64(contex
33a0: 74 2c 20 72 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  t, r);.}../*.** 
33b0: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
33c0: 66 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 4e 29 2e  f randomblob(N).
33d0: 20 20 52 65 74 75 72 6e 20 61 20 72 61 6e 64 6f    Return a rando
33e0: 6d 20 62 6c 6f 62 0a 2a 2a 20 74 68 61 74 20 69  m blob.** that i
33f0: 73 20 4e 20 62 79 74 65 73 20 6c 6f 6e 67 2e 0a  s N bytes long..
3400: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72  */.static void r
3410: 61 6e 64 6f 6d 42 6c 6f 62 28 0a 20 20 73 71 6c  andomBlob(.  sql
3420: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
3430: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
3440: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
3450: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
3460: 6e 74 20 6e 3b 0a 20 20 75 6e 73 69 67 6e 65 64  nt n;.  unsigned
3470: 20 63 68 61 72 20 2a 70 3b 0a 20 20 61 73 73 65   char *p;.  asse
3480: 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20  rt( argc==1 );. 
3490: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
34a0: 52 28 61 72 67 63 29 3b 0a 20 20 6e 20 3d 20 73  R(argc);.  n = s
34b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
34c0: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28  (argv[0]);.  if(
34d0: 20 6e 3c 31 20 29 7b 0a 20 20 20 20 6e 20 3d 20   n<1 ){.    n = 
34e0: 31 3b 0a 20 20 7d 0a 20 20 70 20 3d 20 63 6f 6e  1;.  }.  p = con
34f0: 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65  textMalloc(conte
3500: 78 74 2c 20 6e 29 3b 0a 20 20 69 66 28 20 70 20  xt, n);.  if( p 
3510: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
3520: 61 6e 64 6f 6d 6e 65 73 73 28 6e 2c 20 70 29 3b  andomness(n, p);
3530: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
3540: 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e 74 65 78 74  ult_blob(context
3550: 2c 20 28 63 68 61 72 2a 29 70 2c 20 6e 2c 20 73  , (char*)p, n, s
3560: 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20  qlite3_free);.  
3570: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  }.}../*.** Imple
3580: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
3590: 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77   last_insert_row
35a0: 69 64 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f  id() SQL functio
35b0: 6e 2e 20 20 54 68 65 20 72 65 74 75 72 6e 0a 2a  n.  The return.*
35c0: 2a 20 76 61 6c 75 65 20 69 73 20 74 68 65 20 73  * value is the s
35d0: 61 6d 65 20 61 73 20 74 68 65 20 73 71 6c 69 74  ame as the sqlit
35e0: 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72  e3_last_insert_r
35f0: 6f 77 69 64 28 29 20 41 50 49 20 66 75 6e 63 74  owid() API funct
3600: 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ion..*/.static v
3610: 6f 69 64 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f  oid last_insert_
3620: 72 6f 77 69 64 28 0a 20 20 73 71 6c 69 74 65 33  rowid(.  sqlite3
3630: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
3640: 74 2c 20 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  t, .  int NotUse
3650: 64 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  d, .  sqlite3_va
3660: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
3670: 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  {.  sqlite3 *db 
3680: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
3690: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
36a0: 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  ext);.  UNUSED_P
36b0: 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65  ARAMETER2(NotUse
36c0: 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20  d, NotUsed2);.  
36d0: 2f 2a 20 49 4d 50 3a 20 52 2d 35 31 35 31 33 2d  /* IMP: R-51513-
36e0: 31 32 30 32 36 20 54 68 65 20 6c 61 73 74 5f 69  12026 The last_i
36f0: 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 53 51  nsert_rowid() SQ
3700: 4c 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 0a  L function is a.
3710: 20 20 2a 2a 20 77 72 61 70 70 65 72 20 61 72 6f    ** wrapper aro
3720: 75 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f  und the sqlite3_
3730: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69  last_insert_rowi
3740: 64 28 29 20 43 2f 43 2b 2b 20 69 6e 74 65 72 66  d() C/C++ interf
3750: 61 63 65 0a 20 20 2a 2a 20 66 75 6e 63 74 69 6f  ace.  ** functio
3760: 6e 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f  n. */.  sqlite3_
3770: 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e  result_int64(con
3780: 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 6c 61  text, sqlite3_la
3790: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
37a0: 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  db));.}../*.** I
37b0: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
37c0: 20 74 68 65 20 63 68 61 6e 67 65 73 28 29 20 53   the changes() S
37d0: 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a  QL function..**.
37e0: 2a 2a 20 49 4d 50 3a 20 52 2d 36 32 30 37 33 2d  ** IMP: R-62073-
37f0: 31 31 32 30 39 20 54 68 65 20 63 68 61 6e 67 65  11209 The change
3800: 73 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  s() SQL function
3810: 20 69 73 20 61 20 77 72 61 70 70 65 72 0a 2a 2a   is a wrapper.**
3820: 20 61 72 6f 75 6e 64 20 74 68 65 20 73 71 6c 69   around the sqli
3830: 74 65 33 5f 63 68 61 6e 67 65 73 28 29 20 43 2f  te3_changes() C/
3840: 43 2b 2b 20 66 75 6e 63 74 69 6f 6e 20 61 6e 64  C++ function and
3850: 20 68 65 6e 63 65 20 66 6f 6c 6c 6f 77 73 20 74   hence follows t
3860: 68 65 20 73 61 6d 65 0a 2a 2a 20 72 75 6c 65 73  he same.** rules
3870: 20 66 6f 72 20 63 6f 75 6e 74 69 6e 67 20 63 68   for counting ch
3880: 61 6e 67 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63  anges..*/.static
3890: 20 76 6f 69 64 20 63 68 61 6e 67 65 73 28 0a 20   void changes(. 
38a0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
38b0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
38c0: 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69   NotUsed,.  sqli
38d0: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55  te3_value **NotU
38e0: 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65  sed2.){.  sqlite
38f0: 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  3 *db = sqlite3_
3900: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
3910: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e  e(context);.  UN
3920: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28  USED_PARAMETER2(
3930: 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64  NotUsed, NotUsed
3940: 32 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65  2);.  sqlite3_re
3950: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
3960: 2c 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65  , sqlite3_change
3970: 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  s(db));.}../*.**
3980: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
3990: 6f 66 20 74 68 65 20 74 6f 74 61 6c 5f 63 68 61  of the total_cha
39a0: 6e 67 65 73 28 29 20 53 51 4c 20 66 75 6e 63 74  nges() SQL funct
39b0: 69 6f 6e 2e 20 20 54 68 65 20 72 65 74 75 72 6e  ion.  The return
39c0: 20 76 61 6c 75 65 20 69 73 0a 2a 2a 20 74 68 65   value is.** the
39d0: 20 73 61 6d 65 20 61 73 20 74 68 65 20 73 71 6c   same as the sql
39e0: 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67  ite3_total_chang
39f0: 65 73 28 29 20 41 50 49 20 66 75 6e 63 74 69 6f  es() API functio
3a00: 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  n..*/.static voi
3a10: 64 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28  d total_changes(
3a20: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
3a30: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
3a40: 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71  nt NotUsed,.  sq
3a50: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f  lite3_value **No
3a60: 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c 69  tUsed2.){.  sqli
3a70: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
3a80: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
3a90: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  dle(context);.  
3aa0: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
3ab0: 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73  2(NotUsed, NotUs
3ac0: 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20  ed2);.  /* IMP: 
3ad0: 52 2d 35 32 37 35 36 2d 34 31 39 39 33 20 54 68  R-52756-41993 Th
3ae0: 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61  is function is a
3af0: 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20   wrapper around 
3b00: 74 68 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33  the.  ** sqlite3
3b10: 5f 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29  _total_changes()
3b20: 20 43 2f 43 2b 2b 20 69 6e 74 65 72 66 61 63 65   C/C++ interface
3b30: 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72  . */.  sqlite3_r
3b40: 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78  esult_int(contex
3b50: 74 2c 20 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c  t, sqlite3_total
3b60: 5f 63 68 61 6e 67 65 73 28 64 62 29 29 3b 0a 7d  _changes(db));.}
3b70: 0a 0a 2f 2a 0a 2a 2a 20 41 20 73 74 72 75 63 74  ../*.** A struct
3b80: 75 72 65 20 64 65 66 69 6e 69 6e 67 20 68 6f 77  ure defining how
3b90: 20 74 6f 20 64 6f 20 47 4c 4f 42 2d 73 74 79 6c   to do GLOB-styl
3ba0: 65 20 63 6f 6d 70 61 72 69 73 6f 6e 73 2e 0a 2a  e comparisons..*
3bb0: 2f 0a 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65  /.struct compare
3bc0: 49 6e 66 6f 20 7b 0a 20 20 75 38 20 6d 61 74 63  Info {.  u8 matc
3bd0: 68 41 6c 6c 3b 0a 20 20 75 38 20 6d 61 74 63 68  hAll;.  u8 match
3be0: 4f 6e 65 3b 0a 20 20 75 38 20 6d 61 74 63 68 53  One;.  u8 matchS
3bf0: 65 74 3b 0a 20 20 75 38 20 6e 6f 43 61 73 65 3b  et;.  u8 noCase;
3c00: 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 46 6f 72 20 4c  .};../*.** For L
3c10: 49 4b 45 20 61 6e 64 20 47 4c 4f 42 20 6d 61 74  IKE and GLOB mat
3c20: 63 68 69 6e 67 20 6f 6e 20 45 42 43 44 49 43 20  ching on EBCDIC 
3c30: 6d 61 63 68 69 6e 65 73 2c 20 61 73 73 75 6d 65  machines, assume
3c40: 20 74 68 61 74 20 65 76 65 72 79 0a 2a 2a 20 63   that every.** c
3c50: 68 61 72 61 63 74 65 72 20 69 73 20 65 78 61 63  haracter is exac
3c60: 74 6c 79 20 6f 6e 65 20 62 79 74 65 20 69 6e 20  tly one byte in 
3c70: 73 69 7a 65 2e 20 20 41 6c 73 6f 2c 20 61 6c 6c  size.  Also, all
3c80: 20 63 68 61 72 61 63 74 65 72 73 20 61 72 65 0a   characters are.
3c90: 2a 2a 20 61 62 6c 65 20 74 6f 20 70 61 72 74 69  ** able to parti
3ca0: 63 69 70 61 74 65 20 69 6e 20 75 70 70 65 72 2d  cipate in upper-
3cb0: 63 61 73 65 2d 74 6f 2d 6c 6f 77 65 72 2d 63 61  case-to-lower-ca
3cc0: 73 65 20 6d 61 70 70 69 6e 67 73 20 69 6e 20 45  se mappings in E
3cd0: 42 43 44 49 43 0a 2a 2a 20 77 68 65 72 65 61 73  BCDIC.** whereas
3ce0: 20 6f 6e 6c 79 20 63 68 61 72 61 63 74 65 72 73   only characters
3cf0: 20 6c 65 73 73 20 74 68 61 6e 20 30 78 38 30 20   less than 0x80 
3d00: 64 6f 20 69 6e 20 41 53 43 49 49 2e 0a 2a 2f 0a  do in ASCII..*/.
3d10: 23 69 66 20 64 65 66 69 6e 65 64 28 53 51 4c 49  #if defined(SQLI
3d20: 54 45 5f 45 42 43 44 49 43 29 0a 23 20 64 65 66  TE_EBCDIC).# def
3d30: 69 6e 65 20 73 71 6c 69 74 65 33 55 74 66 38 52  ine sqlite3Utf8R
3d40: 65 61 64 28 41 29 20 20 20 20 28 2a 28 28 2a 41  ead(A)    (*((*A
3d50: 29 2b 2b 29 29 0a 23 20 64 65 66 69 6e 65 20 47  )++)).# define G
3d60: 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 28  lobUpperToLower(
3d70: 41 29 20 20 20 41 20 3d 20 73 71 6c 69 74 65 33  A)   A = sqlite3
3d80: 55 70 70 65 72 54 6f 4c 6f 77 65 72 5b 41 5d 0a  UpperToLower[A].
3d90: 23 65 6c 73 65 0a 23 20 64 65 66 69 6e 65 20 47  #else.# define G
3da0: 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 28  lobUpperToLower(
3db0: 41 29 20 20 20 69 66 28 20 21 28 28 41 29 26 7e  A)   if( !((A)&~
3dc0: 30 78 37 66 29 20 29 7b 20 41 20 3d 20 73 71 6c  0x7f) ){ A = sql
3dd0: 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72  ite3UpperToLower
3de0: 5b 41 5d 3b 20 7d 0a 23 65 6e 64 69 66 0a 0a 73  [A]; }.#endif..s
3df0: 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74 72 75  tatic const stru
3e00: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 67  ct compareInfo g
3e10: 6c 6f 62 49 6e 66 6f 20 3d 20 7b 20 27 2a 27 2c  lobInfo = { '*',
3e20: 20 27 3f 27 2c 20 27 5b 27 2c 20 30 20 7d 3b 0a   '?', '[', 0 };.
3e30: 2f 2a 20 54 68 65 20 63 6f 72 72 65 63 74 20 53  /* The correct S
3e40: 51 4c 2d 39 32 20 62 65 68 61 76 69 6f 72 20 69  QL-92 behavior i
3e50: 73 20 66 6f 72 20 74 68 65 20 4c 49 4b 45 20 6f  s for the LIKE o
3e60: 70 65 72 61 74 6f 72 20 74 6f 20 69 67 6e 6f 72  perator to ignor
3e70: 65 0a 2a 2a 20 63 61 73 65 2e 20 20 54 68 75 73  e.** case.  Thus
3e80: 20 20 27 61 27 20 4c 49 4b 45 20 27 41 27 20 77    'a' LIKE 'A' w
3e90: 6f 75 6c 64 20 62 65 20 74 72 75 65 2e 20 2a 2f  ould be true. */
3ea0: 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 73 74  .static const st
3eb0: 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  ruct compareInfo
3ec0: 20 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 20 3d 20   likeInfoNorm = 
3ed0: 7b 20 27 25 27 2c 20 27 5f 27 2c 20 20 20 30 2c  { '%', '_',   0,
3ee0: 20 31 20 7d 3b 0a 2f 2a 20 49 66 20 53 51 4c 49   1 };./* If SQLI
3ef0: 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54 49 56  TE_CASE_SENSITIV
3f00: 45 5f 4c 49 4b 45 20 69 73 20 64 65 66 69 6e 65  E_LIKE is define
3f10: 64 2c 20 74 68 65 6e 20 74 68 65 20 4c 49 4b 45  d, then the LIKE
3f20: 20 6f 70 65 72 61 74 6f 72 0a 2a 2a 20 69 73 20   operator.** is 
3f30: 63 61 73 65 20 73 65 6e 73 69 74 69 76 65 20 63  case sensitive c
3f40: 61 75 73 69 6e 67 20 27 61 27 20 4c 49 4b 45 20  ausing 'a' LIKE 
3f50: 27 41 27 20 74 6f 20 62 65 20 66 61 6c 73 65 20  'A' to be false 
3f60: 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20  */.static const 
3f70: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
3f80: 66 6f 20 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d  fo likeInfoAlt =
3f90: 20 7b 20 27 25 27 2c 20 27 5f 27 2c 20 20 20 30   { '%', '_',   0
3fa0: 2c 20 30 20 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 43 6f  , 0 };../*.** Co
3fb0: 6d 70 61 72 65 20 74 77 6f 20 55 54 46 2d 38 20  mpare two UTF-8 
3fc0: 73 74 72 69 6e 67 73 20 66 6f 72 20 65 71 75 61  strings for equa
3fd0: 6c 69 74 79 20 77 68 65 72 65 20 74 68 65 20 66  lity where the f
3fe0: 69 72 73 74 20 73 74 72 69 6e 67 20 63 61 6e 0a  irst string can.
3ff0: 2a 2a 20 70 6f 74 65 6e 74 69 61 6c 6c 79 20 62  ** potentially b
4000: 65 20 61 20 22 67 6c 6f 62 22 20 65 78 70 72 65  e a "glob" expre
4010: 73 73 69 6f 6e 2e 20 20 52 65 74 75 72 6e 20 74  ssion.  Return t
4020: 72 75 65 20 28 31 29 20 69 66 20 74 68 65 79 0a  rue (1) if they.
4030: 2a 2a 20 61 72 65 20 74 68 65 20 73 61 6d 65 20  ** are the same 
4040: 61 6e 64 20 66 61 6c 73 65 20 28 30 29 20 69 66  and false (0) if
4050: 20 74 68 65 79 20 61 72 65 20 64 69 66 66 65 72   they are differ
4060: 65 6e 74 2e 0a 2a 2a 0a 2a 2a 20 47 6c 6f 62 62  ent..**.** Globb
4070: 69 6e 67 20 72 75 6c 65 73 3a 0a 2a 2a 0a 2a 2a  ing rules:.**.**
4080: 20 20 20 20 20 20 27 2a 27 20 20 20 20 20 20 20        '*'       
4090: 4d 61 74 63 68 65 73 20 61 6e 79 20 73 65 71 75  Matches any sequ
40a0: 65 6e 63 65 20 6f 66 20 7a 65 72 6f 20 6f 72 20  ence of zero or 
40b0: 6d 6f 72 65 20 63 68 61 72 61 63 74 65 72 73 2e  more characters.
40c0: 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 3f 27 20  .**.**      '?' 
40d0: 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 65 78        Matches ex
40e0: 61 63 74 6c 79 20 6f 6e 65 20 63 68 61 72 61 63  actly one charac
40f0: 74 65 72 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 5b  ter..**.**     [
4100: 2e 2e 2e 5d 20 20 20 20 20 20 4d 61 74 63 68 65  ...]      Matche
4110: 73 20 6f 6e 65 20 63 68 61 72 61 63 74 65 72 20  s one character 
4120: 66 72 6f 6d 20 74 68 65 20 65 6e 63 6c 6f 73 65  from the enclose
4130: 64 20 6c 69 73 74 20 6f 66 0a 2a 2a 20 20 20 20  d list of.**    
4140: 20 20 20 20 20 20 20 20 20 20 20 20 63 68 61 72              char
4150: 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20  acters..**.**   
4160: 20 20 5b 5e 2e 2e 2e 5d 20 20 20 20 20 4d 61 74    [^...]     Mat
4170: 63 68 65 73 20 6f 6e 65 20 63 68 61 72 61 63 74  ches one charact
4180: 65 72 20 6e 6f 74 20 69 6e 20 74 68 65 20 65 6e  er not in the en
4190: 63 6c 6f 73 65 64 20 6c 69 73 74 2e 0a 2a 2a 0a  closed list..**.
41a0: 2a 2a 20 57 69 74 68 20 74 68 65 20 5b 2e 2e 2e  ** With the [...
41b0: 5d 20 61 6e 64 20 5b 5e 2e 2e 2e 5d 20 6d 61 74  ] and [^...] mat
41c0: 63 68 69 6e 67 2c 20 61 20 27 5d 27 20 63 68 61  ching, a ']' cha
41d0: 72 61 63 74 65 72 20 63 61 6e 20 62 65 20 69 6e  racter can be in
41e0: 63 6c 75 64 65 64 0a 2a 2a 20 69 6e 20 74 68 65  cluded.** in the
41f0: 20 6c 69 73 74 20 62 79 20 6d 61 6b 69 6e 67 20   list by making 
4200: 69 74 20 74 68 65 20 66 69 72 73 74 20 63 68 61  it the first cha
4210: 72 61 63 74 65 72 20 61 66 74 65 72 20 27 5b 27  racter after '['
4220: 20 6f 72 20 27 5e 27 2e 20 20 41 0a 2a 2a 20 72   or '^'.  A.** r
4230: 61 6e 67 65 20 6f 66 20 63 68 61 72 61 63 74 65  ange of characte
4240: 72 73 20 63 61 6e 20 62 65 20 73 70 65 63 69 66  rs can be specif
4250: 69 65 64 20 75 73 69 6e 67 20 27 2d 27 2e 20 20  ied using '-'.  
4260: 45 78 61 6d 70 6c 65 3a 0a 2a 2a 20 22 5b 61 2d  Example:.** "[a-
4270: 7a 5d 22 20 6d 61 74 63 68 65 73 20 61 6e 79 20  z]" matches any 
4280: 73 69 6e 67 6c 65 20 6c 6f 77 65 72 2d 63 61 73  single lower-cas
4290: 65 20 6c 65 74 74 65 72 2e 20 20 54 6f 20 6d 61  e letter.  To ma
42a0: 74 63 68 20 61 20 27 2d 27 2c 20 6d 61 6b 65 0a  tch a '-', make.
42b0: 2a 2a 20 69 74 20 74 68 65 20 6c 61 73 74 20 63  ** it the last c
42c0: 68 61 72 61 63 74 65 72 20 69 6e 20 74 68 65 20  haracter in the 
42d0: 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73  list..**.** This
42e0: 20 72 6f 75 74 69 6e 65 20 69 73 20 75 73 75 61   routine is usua
42f0: 6c 6c 79 20 71 75 69 63 6b 2c 20 62 75 74 20 63  lly quick, but c
4300: 61 6e 20 62 65 20 4e 2a 2a 32 20 69 6e 20 74 68  an be N**2 in th
4310: 65 20 77 6f 72 73 74 20 63 61 73 65 2e 0a 2a 2a  e worst case..**
4320: 0a 2a 2a 20 48 69 6e 74 73 3a 20 74 6f 20 6d 61  .** Hints: to ma
4330: 74 63 68 20 27 2a 27 20 6f 72 20 27 3f 27 2c 20  tch '*' or '?', 
4340: 70 75 74 20 74 68 65 6d 20 69 6e 20 22 5b 5d 22  put them in "[]"
4350: 2e 20 20 4c 69 6b 65 20 74 68 69 73 3a 0a 2a 2a  .  Like this:.**
4360: 0a 2a 2a 20 20 20 20 20 20 20 20 20 61 62 63 5b  .**         abc[
4370: 2a 5d 78 79 7a 20 20 20 20 20 20 20 20 4d 61 74  *]xyz        Mat
4380: 63 68 65 73 20 22 61 62 63 2a 78 79 7a 22 20 6f  ches "abc*xyz" o
4390: 6e 6c 79 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  nly.*/.static in
43a0: 74 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65  t patternCompare
43b0: 28 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 50  (.  const u8 *zP
43c0: 61 74 74 65 72 6e 2c 20 20 20 20 20 20 20 20 20  attern,         
43d0: 20 20 20 20 20 2f 2a 20 54 68 65 20 67 6c 6f 62       /* The glob
43e0: 20 70 61 74 74 65 72 6e 20 2a 2f 0a 20 20 63 6f   pattern */.  co
43f0: 6e 73 74 20 75 38 20 2a 7a 53 74 72 69 6e 67 2c  nst u8 *zString,
4400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
4410: 2a 20 54 68 65 20 73 74 72 69 6e 67 20 74 6f 20  * The string to 
4420: 63 6f 6d 70 61 72 65 20 61 67 61 69 6e 73 74 20  compare against 
4430: 74 68 65 20 67 6c 6f 62 20 2a 2f 0a 20 20 63 6f  the glob */.  co
4440: 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61  nst struct compa
4450: 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 2c 20 2f  reInfo *pInfo, /
4460: 2a 20 49 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62  * Information ab
4470: 6f 75 74 20 68 6f 77 20 74 6f 20 64 6f 20 74 68  out how to do th
4480: 65 20 63 6f 6d 70 61 72 65 20 2a 2f 0a 20 20 75  e compare */.  u
4490: 33 32 20 65 73 63 20 20 20 20 20 20 20 20 20 20  32 esc          
44a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
44b0: 2f 2a 20 54 68 65 20 65 73 63 61 70 65 20 63 68  /* The escape ch
44c0: 61 72 61 63 74 65 72 20 2a 2f 0a 29 7b 0a 20 20  aracter */.){.  
44d0: 75 33 32 20 63 2c 20 63 32 3b 0a 20 20 69 6e 74  u32 c, c2;.  int
44e0: 20 69 6e 76 65 72 74 3b 0a 20 20 69 6e 74 20 73   invert;.  int s
44f0: 65 65 6e 3b 0a 20 20 75 38 20 6d 61 74 63 68 4f  een;.  u8 matchO
4500: 6e 65 20 3d 20 70 49 6e 66 6f 2d 3e 6d 61 74 63  ne = pInfo->matc
4510: 68 4f 6e 65 3b 0a 20 20 75 38 20 6d 61 74 63 68  hOne;.  u8 match
4520: 41 6c 6c 20 3d 20 70 49 6e 66 6f 2d 3e 6d 61 74  All = pInfo->mat
4530: 63 68 41 6c 6c 3b 0a 20 20 75 38 20 6d 61 74 63  chAll;.  u8 matc
4540: 68 53 65 74 20 3d 20 70 49 6e 66 6f 2d 3e 6d 61  hSet = pInfo->ma
4550: 74 63 68 53 65 74 3b 0a 20 20 75 38 20 6e 6f 43  tchSet;.  u8 noC
4560: 61 73 65 20 3d 20 70 49 6e 66 6f 2d 3e 6e 6f 43  ase = pInfo->noC
4570: 61 73 65 3b 20 0a 20 20 69 6e 74 20 70 72 65 76  ase; .  int prev
4580: 45 73 63 61 70 65 20 3d 20 30 3b 20 20 20 20 20  Escape = 0;     
4590: 2f 2a 20 54 72 75 65 20 69 66 20 74 68 65 20 70  /* True if the p
45a0: 72 65 76 69 6f 75 73 20 63 68 61 72 61 63 74 65  revious characte
45b0: 72 20 77 61 73 20 27 65 73 63 61 70 65 27 20 2a  r was 'escape' *
45c0: 2f 0a 0a 20 20 77 68 69 6c 65 28 20 28 63 20 3d  /..  while( (c =
45d0: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
45e0: 28 26 7a 50 61 74 74 65 72 6e 29 29 21 3d 30 20  (&zPattern))!=0 
45f0: 29 7b 0a 20 20 20 20 69 66 28 20 63 3d 3d 6d 61  ){.    if( c==ma
4600: 74 63 68 41 6c 6c 20 26 26 20 21 70 72 65 76 45  tchAll && !prevE
4610: 73 63 61 70 65 20 29 7b 0a 20 20 20 20 20 20 77  scape ){.      w
4620: 68 69 6c 65 28 20 28 63 3d 73 71 6c 69 74 65 33  hile( (c=sqlite3
4630: 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65  Utf8Read(&zPatte
4640: 72 6e 29 29 20 3d 3d 20 6d 61 74 63 68 41 6c 6c  rn)) == matchAll
4650: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
4660: 7c 7c 20 63 20 3d 3d 20 6d 61 74 63 68 4f 6e 65  || c == matchOne
4670: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20   ){.        if( 
4680: 63 3d 3d 6d 61 74 63 68 4f 6e 65 20 26 26 20 73  c==matchOne && s
4690: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26  qlite3Utf8Read(&
46a0: 7a 53 74 72 69 6e 67 29 3d 3d 30 20 29 7b 0a 20  zString)==0 ){. 
46b0: 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20           return 
46c0: 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  0;.        }.   
46d0: 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20 63     }.      if( c
46e0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72  ==0 ){.        r
46f0: 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 7d  eturn 1;.      }
4700: 65 6c 73 65 20 69 66 28 20 63 3d 3d 65 73 63 20  else if( c==esc 
4710: 29 7b 0a 20 20 20 20 20 20 20 20 63 20 3d 20 73  ){.        c = s
4720: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26  qlite3Utf8Read(&
4730: 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20  zPattern);.     
4740: 20 20 20 69 66 28 20 63 3d 3d 30 20 29 7b 0a 20     if( c==0 ){. 
4750: 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20           return 
4760: 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  0;.        }.   
4770: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d     }else if( c==
4780: 6d 61 74 63 68 53 65 74 20 29 7b 0a 20 20 20 20  matchSet ){.    
4790: 20 20 20 20 61 73 73 65 72 74 28 20 65 73 63 3d      assert( esc=
47a0: 3d 30 20 29 3b 20 20 20 20 20 20 20 20 20 2f 2a  =0 );         /*
47b0: 20 54 68 69 73 20 69 73 20 47 4c 4f 42 2c 20 6e   This is GLOB, n
47c0: 6f 74 20 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20  ot LIKE */.     
47d0: 20 20 20 61 73 73 65 72 74 28 20 6d 61 74 63 68     assert( match
47e0: 53 65 74 3c 30 78 38 30 20 29 3b 20 20 2f 2a 20  Set<0x80 );  /* 
47f0: 27 5b 27 20 69 73 20 61 20 73 69 6e 67 6c 65 2d  '[' is a single-
4800: 62 79 74 65 20 63 68 61 72 61 63 74 65 72 20 2a  byte character *
4810: 2f 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 28  /.        while(
4820: 20 2a 7a 53 74 72 69 6e 67 20 26 26 20 70 61 74   *zString && pat
4830: 74 65 72 6e 43 6f 6d 70 61 72 65 28 26 7a 50 61  ternCompare(&zPa
4840: 74 74 65 72 6e 5b 2d 31 5d 2c 7a 53 74 72 69 6e  ttern[-1],zStrin
4850: 67 2c 70 49 6e 66 6f 2c 65 73 63 29 3d 3d 30 20  g,pInfo,esc)==0 
4860: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 53 51 4c  ){.          SQL
4870: 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 53  ITE_SKIP_UTF8(zS
4880: 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 20 20  tring);.        
4890: 7d 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e  }.        return
48a0: 20 2a 7a 53 74 72 69 6e 67 21 3d 30 3b 0a 20 20   *zString!=0;.  
48b0: 20 20 20 20 7d 0a 20 20 20 20 20 20 77 68 69 6c      }.      whil
48c0: 65 28 20 28 63 32 20 3d 20 73 71 6c 69 74 65 33  e( (c2 = sqlite3
48d0: 55 74 66 38 52 65 61 64 28 26 7a 53 74 72 69 6e  Utf8Read(&zStrin
48e0: 67 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20  g))!=0 ){.      
48f0: 20 20 69 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a    if( noCase ){.
4900: 20 20 20 20 20 20 20 20 20 20 47 6c 6f 62 55 70            GlobUp
4910: 70 65 72 54 6f 4c 6f 77 65 72 28 63 32 29 3b 0a  perToLower(c2);.
4920: 20 20 20 20 20 20 20 20 20 20 47 6c 6f 62 55 70            GlobUp
4930: 70 65 72 54 6f 4c 6f 77 65 72 28 63 29 3b 0a 20  perToLower(c);. 
4940: 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20           while( 
4950: 63 32 20 21 3d 20 30 20 26 26 20 63 32 20 21 3d  c2 != 0 && c2 !=
4960: 20 63 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20   c ){.          
4970: 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74    c2 = sqlite3Ut
4980: 66 38 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29  f8Read(&zString)
4990: 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 47 6c  ;.            Gl
49a0: 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63  obUpperToLower(c
49b0: 32 29 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a  2);.          }.
49c0: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20          }else{. 
49d0: 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20           while( 
49e0: 63 32 20 21 3d 20 30 20 26 26 20 63 32 20 21 3d  c2 != 0 && c2 !=
49f0: 20 63 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20   c ){.          
4a00: 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74    c2 = sqlite3Ut
4a10: 66 38 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29  f8Read(&zString)
4a20: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20  ;.          }.  
4a30: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20        }.        
4a40: 69 66 28 20 63 32 3d 3d 30 20 29 20 72 65 74 75  if( c2==0 ) retu
4a50: 72 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 69 66  rn 0;.        if
4a60: 28 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65  ( patternCompare
4a70: 28 7a 50 61 74 74 65 72 6e 2c 7a 53 74 72 69 6e  (zPattern,zStrin
4a80: 67 2c 70 49 6e 66 6f 2c 65 73 63 29 20 29 20 72  g,pInfo,esc) ) r
4a90: 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 7d  eturn 1;.      }
4aa0: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b  .      return 0;
4ab0: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63  .    }else if( c
4ac0: 3d 3d 6d 61 74 63 68 4f 6e 65 20 26 26 20 21 70  ==matchOne && !p
4ad0: 72 65 76 45 73 63 61 70 65 20 29 7b 0a 20 20 20  revEscape ){.   
4ae0: 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 55 74     if( sqlite3Ut
4af0: 66 38 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29  f8Read(&zString)
4b00: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72  ==0 ){.        r
4b10: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d  eturn 0;.      }
4b20: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63  .    }else if( c
4b30: 3d 3d 6d 61 74 63 68 53 65 74 20 29 7b 0a 20 20  ==matchSet ){.  
4b40: 20 20 20 20 75 33 32 20 70 72 69 6f 72 5f 63 20      u32 prior_c 
4b50: 3d 20 30 3b 0a 20 20 20 20 20 20 61 73 73 65 72  = 0;.      asser
4b60: 74 28 20 65 73 63 3d 3d 30 20 29 3b 20 20 20 20  t( esc==0 );    
4b70: 2f 2a 20 54 68 69 73 20 6f 6e 6c 79 20 6f 63 63  /* This only occ
4b80: 75 72 73 20 66 6f 72 20 47 4c 4f 42 2c 20 6e 6f  urs for GLOB, no
4b90: 74 20 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20  t LIKE */.      
4ba0: 73 65 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20  seen = 0;.      
4bb0: 69 6e 76 65 72 74 20 3d 20 30 3b 0a 20 20 20 20  invert = 0;.    
4bc0: 20 20 63 20 3d 20 73 71 6c 69 74 65 33 55 74 66    c = sqlite3Utf
4bd0: 38 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29 3b  8Read(&zString);
4be0: 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20  .      if( c==0 
4bf0: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
4c00: 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74    c2 = sqlite3Ut
4c10: 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e  f8Read(&zPattern
4c20: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 63 32 3d  );.      if( c2=
4c30: 3d 27 5e 27 20 29 7b 0a 20 20 20 20 20 20 20 20  ='^' ){.        
4c40: 69 6e 76 65 72 74 20 3d 20 31 3b 0a 20 20 20 20  invert = 1;.    
4c50: 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33      c2 = sqlite3
4c60: 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65  Utf8Read(&zPatte
4c70: 72 6e 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  rn);.      }.   
4c80: 20 20 20 69 66 28 20 63 32 3d 3d 27 5d 27 20 29     if( c2==']' )
4c90: 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 3d  {.        if( c=
4ca0: 3d 27 5d 27 20 29 20 73 65 65 6e 20 3d 20 31 3b  =']' ) seen = 1;
4cb0: 0a 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71  .        c2 = sq
4cc0: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
4cd0: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
4ce0: 7d 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 63  }.      while( c
4cf0: 32 20 26 26 20 63 32 21 3d 27 5d 27 20 29 7b 0a  2 && c2!=']' ){.
4d00: 20 20 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d          if( c2==
4d10: 27 2d 27 20 26 26 20 7a 50 61 74 74 65 72 6e 5b  '-' && zPattern[
4d20: 30 5d 21 3d 27 5d 27 20 26 26 20 7a 50 61 74 74  0]!=']' && zPatt
4d30: 65 72 6e 5b 30 5d 21 3d 30 20 26 26 20 70 72 69  ern[0]!=0 && pri
4d40: 6f 72 5f 63 3e 30 20 29 7b 0a 20 20 20 20 20 20  or_c>0 ){.      
4d50: 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33      c2 = sqlite3
4d60: 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65  Utf8Read(&zPatte
4d70: 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 69  rn);.          i
4d80: 66 28 20 63 3e 3d 70 72 69 6f 72 5f 63 20 26 26  f( c>=prior_c &&
4d90: 20 63 3c 3d 63 32 20 29 20 73 65 65 6e 20 3d 20   c<=c2 ) seen = 
4da0: 31 3b 0a 20 20 20 20 20 20 20 20 20 20 70 72 69  1;.          pri
4db0: 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20  or_c = 0;.      
4dc0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20    }else{.       
4dd0: 20 20 20 69 66 28 20 63 3d 3d 63 32 20 29 7b 0a     if( c==c2 ){.
4de0: 20 20 20 20 20 20 20 20 20 20 20 20 73 65 65 6e              seen
4df0: 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20   = 1;.          
4e00: 7d 0a 20 20 20 20 20 20 20 20 20 20 70 72 69 6f  }.          prio
4e10: 72 5f 63 20 3d 20 63 32 3b 0a 20 20 20 20 20 20  r_c = c2;.      
4e20: 20 20 7d 0a 20 20 20 20 20 20 20 20 63 32 20 3d    }.        c2 =
4e30: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
4e40: 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20  (&zPattern);.   
4e50: 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20 63     }.      if( c
4e60: 32 3d 3d 30 20 7c 7c 20 28 73 65 65 6e 20 5e 20  2==0 || (seen ^ 
4e70: 69 6e 76 65 72 74 29 3d 3d 30 20 29 7b 0a 20 20  invert)==0 ){.  
4e80: 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a        return 0;.
4e90: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73        }.    }els
4ea0: 65 20 69 66 28 20 65 73 63 3d 3d 63 20 26 26 20  e if( esc==c && 
4eb0: 21 70 72 65 76 45 73 63 61 70 65 20 29 7b 0a 20  !prevEscape ){. 
4ec0: 20 20 20 20 20 70 72 65 76 45 73 63 61 70 65 20       prevEscape 
4ed0: 3d 20 31 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a  = 1;.    }else{.
4ee0: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
4ef0: 65 33 55 74 66 38 52 65 61 64 28 26 7a 53 74 72  e3Utf8Read(&zStr
4f00: 69 6e 67 29 3b 0a 20 20 20 20 20 20 69 66 28 20  ing);.      if( 
4f10: 6e 6f 43 61 73 65 20 29 7b 0a 20 20 20 20 20 20  noCase ){.      
4f20: 20 20 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77    GlobUpperToLow
4f30: 65 72 28 63 29 3b 0a 20 20 20 20 20 20 20 20 47  er(c);.        G
4f40: 6c 6f 62 55 70 70 65 72 54 6f 4c 6f 77 65 72 28  lobUpperToLower(
4f50: 63 32 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  c2);.      }.   
4f60: 20 20 20 69 66 28 20 63 21 3d 63 32 20 29 7b 0a     if( c!=c2 ){.
4f70: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 30          return 0
4f80: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
4f90: 70 72 65 76 45 73 63 61 70 65 20 3d 20 30 3b 0a  prevEscape = 0;.
4fa0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74 75      }.  }.  retu
4fb0: 72 6e 20 2a 7a 53 74 72 69 6e 67 3d 3d 30 3b 0a  rn *zString==0;.
4fc0: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 73 71 6c  }../*.** The sql
4fd0: 69 74 65 33 5f 73 74 72 67 6c 6f 62 28 29 20 69  ite3_strglob() i
4fe0: 6e 74 65 72 66 61 63 65 2e 0a 2a 2f 0a 69 6e 74  nterface..*/.int
4ff0: 20 73 71 6c 69 74 65 33 5f 73 74 72 67 6c 6f 62   sqlite3_strglob
5000: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 47 6c  (const char *zGl
5010: 6f 62 50 61 74 74 65 72 6e 2c 20 63 6f 6e 73 74  obPattern, const
5020: 20 63 68 61 72 20 2a 7a 53 74 72 69 6e 67 29 7b   char *zString){
5030: 0a 20 20 72 65 74 75 72 6e 20 70 61 74 74 65 72  .  return patter
5040: 6e 43 6f 6d 70 61 72 65 28 28 75 38 2a 29 7a 47  nCompare((u8*)zG
5050: 6c 6f 62 50 61 74 74 65 72 6e 2c 20 28 75 38 2a  lobPattern, (u8*
5060: 29 7a 53 74 72 69 6e 67 2c 20 26 67 6c 6f 62 49  )zString, &globI
5070: 6e 66 6f 2c 20 30 29 3d 3d 30 3b 0a 7d 0a 0a 2f  nfo, 0)==0;.}../
5080: 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74 68 65 20 6e  *.** Count the n
5090: 75 6d 62 65 72 20 6f 66 20 74 69 6d 65 73 20 74  umber of times t
50a0: 68 61 74 20 74 68 65 20 4c 49 4b 45 20 6f 70 65  hat the LIKE ope
50b0: 72 61 74 6f 72 20 28 6f 72 20 47 4c 4f 42 20 77  rator (or GLOB w
50c0: 68 69 63 68 20 69 73 0a 2a 2a 20 6a 75 73 74 20  hich is.** just 
50d0: 61 20 76 61 72 69 61 74 69 6f 6e 20 6f 66 20 4c  a variation of L
50e0: 49 4b 45 29 20 67 65 74 73 20 63 61 6c 6c 65 64  IKE) gets called
50f0: 2e 20 20 54 68 69 73 20 69 73 20 75 73 65 64 20  .  This is used 
5100: 66 6f 72 20 74 65 73 74 69 6e 67 0a 2a 2a 20 6f  for testing.** o
5110: 6e 6c 79 2e 0a 2a 2f 0a 23 69 66 64 65 66 20 53  nly..*/.#ifdef S
5120: 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e 74 20 73  QLITE_TEST.int s
5130: 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f 75 6e  qlite3_like_coun
5140: 74 20 3d 20 30 3b 0a 23 65 6e 64 69 66 0a 0a 0a  t = 0;.#endif...
5150: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
5160: 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 69 6b 65  tion of the like
5170: 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e  () SQL function.
5180: 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20    This function 
5190: 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a 2a 20 74 68  implements.** th
51a0: 65 20 62 75 69 6c 64 2d 69 6e 20 4c 49 4b 45 20  e build-in LIKE 
51b0: 6f 70 65 72 61 74 6f 72 2e 20 20 54 68 65 20 66  operator.  The f
51c0: 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20 74 6f  irst argument to
51d0: 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 69 73   the function is
51e0: 20 74 68 65 0a 2a 2a 20 70 61 74 74 65 72 6e 20   the.** pattern 
51f0: 61 6e 64 20 74 68 65 20 73 65 63 6f 6e 64 20 61  and the second a
5200: 72 67 75 6d 65 6e 74 20 69 73 20 74 68 65 20 73  rgument is the s
5210: 74 72 69 6e 67 2e 20 20 53 6f 2c 20 74 68 65 20  tring.  So, the 
5220: 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 73 3a 0a  SQL statements:.
5230: 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 41 20 4c 49  **.**       A LI
5240: 4b 45 20 42 0a 2a 2a 0a 2a 2a 20 69 73 20 69 6d  KE B.**.** is im
5250: 70 6c 65 6d 65 6e 74 65 64 20 61 73 20 6c 69 6b  plemented as lik
5260: 65 28 42 2c 41 29 2e 0a 2a 2a 0a 2a 2a 20 54 68  e(B,A)..**.** Th
5270: 69 73 20 73 61 6d 65 20 66 75 6e 63 74 69 6f 6e  is same function
5280: 20 28 77 69 74 68 20 61 20 64 69 66 66 65 72 65   (with a differe
5290: 6e 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 73  nt compareInfo s
52a0: 74 72 75 63 74 75 72 65 29 20 63 6f 6d 70 75 74  tructure) comput
52b0: 65 73 0a 2a 2a 20 74 68 65 20 47 4c 4f 42 20 6f  es.** the GLOB o
52c0: 70 65 72 61 74 6f 72 2e 0a 2a 2f 0a 73 74 61 74  perator..*/.stat
52d0: 69 63 20 76 6f 69 64 20 6c 69 6b 65 46 75 6e 63  ic void likeFunc
52e0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
52f0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20  ext *context, . 
5300: 20 69 6e 74 20 61 72 67 63 2c 20 0a 20 20 73 71   int argc, .  sq
5310: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
5320: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  gv.){.  const un
5330: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41 2c  signed char *zA,
5340: 20 2a 7a 42 3b 0a 20 20 75 33 32 20 65 73 63 61   *zB;.  u32 esca
5350: 70 65 20 3d 20 30 3b 0a 20 20 69 6e 74 20 6e 50  pe = 0;.  int nP
5360: 61 74 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  at;.  sqlite3 *d
5370: 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  b = sqlite3_cont
5380: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
5390: 6e 74 65 78 74 29 3b 0a 0a 20 20 7a 42 20 3d 20  ntext);..  zB = 
53a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
53b0: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7a  xt(argv[0]);.  z
53c0: 41 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  A = sqlite3_valu
53d0: 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 3b  e_text(argv[1]);
53e0: 0a 0a 20 20 2f 2a 20 4c 69 6d 69 74 20 74 68 65  ..  /* Limit the
53f0: 20 6c 65 6e 67 74 68 20 6f 66 20 74 68 65 20 4c   length of the L
5400: 49 4b 45 20 6f 72 20 47 4c 4f 42 20 70 61 74 74  IKE or GLOB patt
5410: 65 72 6e 20 74 6f 20 61 76 6f 69 64 20 70 72 6f  ern to avoid pro
5420: 62 6c 65 6d 73 0a 20 20 2a 2a 20 6f 66 20 64 65  blems.  ** of de
5430: 65 70 20 72 65 63 75 72 73 69 6f 6e 20 61 6e 64  ep recursion and
5440: 20 4e 2a 4e 20 62 65 68 61 76 69 6f 72 20 69 6e   N*N behavior in
5450: 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28   patternCompare(
5460: 29 2e 0a 20 20 2a 2f 0a 20 20 6e 50 61 74 20 3d  )..  */.  nPat =
5470: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
5480: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
5490: 20 74 65 73 74 63 61 73 65 28 20 6e 50 61 74 3d   testcase( nPat=
54a0: 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49  =db->aLimit[SQLI
54b0: 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b 45 5f 50 41  TE_LIMIT_LIKE_PA
54c0: 54 54 45 52 4e 5f 4c 45 4e 47 54 48 5d 20 29 3b  TTERN_LENGTH] );
54d0: 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 50 61  .  testcase( nPa
54e0: 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  t==db->aLimit[SQ
54f0: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b 45 5f  LITE_LIMIT_LIKE_
5500: 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48 5d 2b  PATTERN_LENGTH]+
5510: 31 20 29 3b 0a 20 20 69 66 28 20 6e 50 61 74 20  1 );.  if( nPat 
5520: 3e 20 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  > db->aLimit[SQL
5530: 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b 45 5f 50  ITE_LIMIT_LIKE_P
5540: 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48 5d 20 29  ATTERN_LENGTH] )
5550: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  {.    sqlite3_re
5560: 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65  sult_error(conte
5570: 78 74 2c 20 22 4c 49 4b 45 20 6f 72 20 47 4c 4f  xt, "LIKE or GLO
5580: 42 20 70 61 74 74 65 72 6e 20 74 6f 6f 20 63 6f  B pattern too co
5590: 6d 70 6c 65 78 22 2c 20 2d 31 29 3b 0a 20 20 20  mplex", -1);.   
55a0: 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 61   return;.  }.  a
55b0: 73 73 65 72 74 28 20 7a 42 3d 3d 73 71 6c 69 74  ssert( zB==sqlit
55c0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
55d0: 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a 20 45 6e  gv[0]) );  /* En
55e0: 63 6f 64 69 6e 67 20 64 69 64 20 6e 6f 74 20 63  coding did not c
55f0: 68 61 6e 67 65 20 2a 2f 0a 0a 20 20 69 66 28 20  hange */..  if( 
5600: 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20 20 20 2f  argc==3 ){.    /
5610: 2a 20 54 68 65 20 65 73 63 61 70 65 20 63 68 61  * The escape cha
5620: 72 61 63 74 65 72 20 73 74 72 69 6e 67 20 6d 75  racter string mu
5630: 73 74 20 63 6f 6e 73 69 73 74 20 6f 66 20 61 20  st consist of a 
5640: 73 69 6e 67 6c 65 20 55 54 46 2d 38 20 63 68 61  single UTF-8 cha
5650: 72 61 63 74 65 72 2e 0a 20 20 20 20 2a 2a 20 4f  racter..    ** O
5660: 74 68 65 72 77 69 73 65 2c 20 72 65 74 75 72 6e  therwise, return
5670: 20 61 6e 20 65 72 72 6f 72 2e 0a 20 20 20 20 2a   an error..    *
5680: 2f 0a 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69  /.    const unsi
5690: 67 6e 65 64 20 63 68 61 72 20 2a 7a 45 73 63 20  gned char *zEsc 
56a0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
56b0: 74 65 78 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20  text(argv[2]);. 
56c0: 20 20 20 69 66 28 20 7a 45 73 63 3d 3d 30 20 29     if( zEsc==0 )
56d0: 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 69 66 28   return;.    if(
56e0: 20 73 71 6c 69 74 65 33 55 74 66 38 43 68 61 72   sqlite3Utf8Char
56f0: 4c 65 6e 28 28 63 68 61 72 2a 29 7a 45 73 63 2c  Len((char*)zEsc,
5700: 20 2d 31 29 21 3d 31 20 29 7b 0a 20 20 20 20 20   -1)!=1 ){.     
5710: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
5720: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 0a  error(context, .
5730: 20 20 20 20 20 20 20 20 20 20 22 45 53 43 41 50            "ESCAP
5740: 45 20 65 78 70 72 65 73 73 69 6f 6e 20 6d 75 73  E expression mus
5750: 74 20 62 65 20 61 20 73 69 6e 67 6c 65 20 63 68  t be a single ch
5760: 61 72 61 63 74 65 72 22 2c 20 2d 31 29 3b 0a 20  aracter", -1);. 
5770: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20       return;.   
5780: 20 7d 0a 20 20 20 20 65 73 63 61 70 65 20 3d 20   }.    escape = 
5790: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
57a0: 26 7a 45 73 63 29 3b 0a 20 20 7d 0a 20 20 69 66  &zEsc);.  }.  if
57b0: 28 20 7a 41 20 26 26 20 7a 42 20 29 7b 0a 20 20  ( zA && zB ){.  
57c0: 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65    struct compare
57d0: 49 6e 66 6f 20 2a 70 49 6e 66 6f 20 3d 20 73 71  Info *pInfo = sq
57e0: 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28  lite3_user_data(
57f0: 63 6f 6e 74 65 78 74 29 3b 0a 23 69 66 64 65 66  context);.#ifdef
5800: 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 20   SQLITE_TEST.   
5810: 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f   sqlite3_like_co
5820: 75 6e 74 2b 2b 3b 0a 23 65 6e 64 69 66 0a 20 20  unt++;.#endif.  
5830: 20 20 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72    .    sqlite3_r
5840: 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78  esult_int(contex
5850: 74 2c 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72  t, patternCompar
5860: 65 28 7a 42 2c 20 7a 41 2c 20 70 49 6e 66 6f 2c  e(zB, zA, pInfo,
5870: 20 65 73 63 61 70 65 29 29 3b 0a 20 20 7d 0a 7d   escape));.  }.}
5880: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
5890: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 4e 55  tation of the NU
58a0: 4c 4c 49 46 28 78 2c 79 29 20 66 75 6e 63 74 69  LLIF(x,y) functi
58b0: 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20  on.  The result 
58c0: 69 73 20 74 68 65 20 66 69 72 73 74 0a 2a 2a 20  is the first.** 
58d0: 61 72 67 75 6d 65 6e 74 20 69 66 20 74 68 65 20  argument if the 
58e0: 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20 64 69  arguments are di
58f0: 66 66 65 72 65 6e 74 2e 20 20 54 68 65 20 72 65  fferent.  The re
5900: 73 75 6c 74 20 69 73 20 4e 55 4c 4c 20 69 66 20  sult is NULL if 
5910: 74 68 65 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 73  the.** arguments
5920: 20 61 72 65 20 65 71 75 61 6c 20 74 6f 20 65 61   are equal to ea
5930: 63 68 20 6f 74 68 65 72 2e 0a 2a 2f 0a 73 74 61  ch other..*/.sta
5940: 74 69 63 20 76 6f 69 64 20 6e 75 6c 6c 69 66 46  tic void nullifF
5950: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
5960: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
5970: 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a  .  int NotUsed,.
5980: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
5990: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 43 6f 6c 6c  **argv.){.  Coll
59a0: 53 65 71 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c  Seq *pColl = sql
59b0: 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53  ite3GetFuncCollS
59c0: 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55  eq(context);.  U
59d0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
59e0: 4e 6f 74 55 73 65 64 29 3b 0a 20 20 69 66 28 20  NotUsed);.  if( 
59f0: 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72  sqlite3MemCompar
5a00: 65 28 61 72 67 76 5b 30 5d 2c 20 61 72 67 76 5b  e(argv[0], argv[
5a10: 31 5d 2c 20 70 43 6f 6c 6c 29 21 3d 30 20 29 7b  1], pColl)!=0 ){
5a20: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
5a30: 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78  ult_value(contex
5a40: 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7d  t, argv[0]);.  }
5a50: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
5a60: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
5a70: 73 71 6c 69 74 65 5f 76 65 72 73 69 6f 6e 28 29  sqlite_version()
5a80: 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20   function.  The 
5a90: 72 65 73 75 6c 74 20 69 73 20 74 68 65 20 76 65  result is the ve
5aa0: 72 73 69 6f 6e 0a 2a 2a 20 6f 66 20 74 68 65 20  rsion.** of the 
5ab0: 53 51 4c 69 74 65 20 6c 69 62 72 61 72 79 20 74  SQLite library t
5ac0: 68 61 74 20 69 73 20 72 75 6e 6e 69 6e 67 2e 0a  hat is running..
5ad0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 76  */.static void v
5ae0: 65 72 73 69 6f 6e 46 75 6e 63 28 0a 20 20 73 71  ersionFunc(.  sq
5af0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
5b00: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f  ontext,.  int No
5b10: 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33  tUsed,.  sqlite3
5b20: 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64  _value **NotUsed
5b30: 32 0a 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41  2.){.  UNUSED_PA
5b40: 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64  RAMETER2(NotUsed
5b50: 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f  , NotUsed2);.  /
5b60: 2a 20 49 4d 50 3a 20 52 2d 34 38 36 39 39 2d 34  * IMP: R-48699-4
5b70: 38 36 31 37 20 54 68 69 73 20 66 75 6e 63 74 69  8617 This functi
5b80: 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20 77 72 61  on is an SQL wra
5b90: 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 0a  pper around the.
5ba0: 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 6c 69 62    ** sqlite3_lib
5bb0: 76 65 72 73 69 6f 6e 28 29 20 43 2d 69 6e 74 65  version() C-inte
5bc0: 72 66 61 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69  rface. */.  sqli
5bd0: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
5be0: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
5bf0: 5f 6c 69 62 76 65 72 73 69 6f 6e 28 29 2c 20 2d  _libversion(), -
5c00: 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43  1, SQLITE_STATIC
5c10: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  );.}../*.** Impl
5c20: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
5c30: 65 20 73 71 6c 69 74 65 5f 73 6f 75 72 63 65 5f  e sqlite_source_
5c40: 69 64 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 54  id() function. T
5c50: 68 65 20 72 65 73 75 6c 74 20 69 73 20 61 20 73  he result is a s
5c60: 74 72 69 6e 67 0a 2a 2a 20 74 68 61 74 20 69 64  tring.** that id
5c70: 65 6e 74 69 66 69 65 73 20 74 68 65 20 70 61 72  entifies the par
5c80: 74 69 63 75 6c 61 72 20 76 65 72 73 69 6f 6e 20  ticular version 
5c90: 6f 66 20 74 68 65 20 73 6f 75 72 63 65 20 63 6f  of the source co
5ca0: 64 65 20 75 73 65 64 20 74 6f 20 62 75 69 6c 64  de used to build
5cb0: 0a 2a 2a 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a 73  .** SQLite..*/.s
5cc0: 74 61 74 69 63 20 76 6f 69 64 20 73 6f 75 72 63  tatic void sourc
5cd0: 65 69 64 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  eidFunc(.  sqlit
5ce0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
5cf0: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
5d00: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
5d10: 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29  lue **NotUsed2.)
5d20: 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  {.  UNUSED_PARAM
5d30: 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e  ETER2(NotUsed, N
5d40: 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49  otUsed2);.  /* I
5d50: 4d 50 3a 20 52 2d 32 34 34 37 30 2d 33 31 31 33  MP: R-24470-3113
5d60: 36 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20  6 This function 
5d70: 69 73 20 61 6e 20 53 51 4c 20 77 72 61 70 70 65  is an SQL wrappe
5d80: 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20 20 2a  r around the.  *
5d90: 2a 20 73 71 6c 69 74 65 33 5f 73 6f 75 72 63 65  * sqlite3_source
5da0: 69 64 28 29 20 43 20 69 6e 74 65 72 66 61 63 65  id() C interface
5db0: 2e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72  . */.  sqlite3_r
5dc0: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
5dd0: 78 74 2c 20 73 71 6c 69 74 65 33 5f 73 6f 75 72  xt, sqlite3_sour
5de0: 63 65 69 64 28 29 2c 20 2d 31 2c 20 53 51 4c 49  ceid(), -1, SQLI
5df0: 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f  TE_STATIC);.}../
5e00: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
5e10: 69 6f 6e 20 6f 66 20 74 68 65 20 73 71 6c 69 74  ion of the sqlit
5e20: 65 5f 6c 6f 67 28 29 20 66 75 6e 63 74 69 6f 6e  e_log() function
5e30: 2e 20 20 54 68 69 73 20 69 73 20 61 20 77 72 61  .  This is a wra
5e40: 70 70 65 72 20 61 72 6f 75 6e 64 0a 2a 2a 20 73  pper around.** s
5e50: 71 6c 69 74 65 33 5f 6c 6f 67 28 29 2e 20 20 54  qlite3_log().  T
5e60: 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20  he return value 
5e70: 69 73 20 4e 55 4c 4c 2e 20 20 54 68 65 20 66 75  is NULL.  The fu
5e80: 6e 63 74 69 6f 6e 20 65 78 69 73 74 73 20 70 75  nction exists pu
5e90: 72 65 6c 79 20 66 6f 72 0a 2a 2a 20 69 74 73 20  rely for.** its 
5ea0: 73 69 64 65 2d 65 66 66 65 63 74 73 2e 0a 2a 2f  side-effects..*/
5eb0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 65 72 72  .static void err
5ec0: 6c 6f 67 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  logFunc(.  sqlit
5ed0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
5ee0: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
5ef0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
5f00: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 55 4e 55   **argv.){.  UNU
5f10: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72  SED_PARAMETER(ar
5f20: 67 63 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  gc);.  UNUSED_PA
5f30: 52 41 4d 45 54 45 52 28 63 6f 6e 74 65 78 74 29  RAMETER(context)
5f40: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 6c 6f 67 28  ;.  sqlite3_log(
5f50: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
5f60: 74 28 61 72 67 76 5b 30 5d 29 2c 20 22 25 73 22  t(argv[0]), "%s"
5f70: 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  , sqlite3_value_
5f80: 74 65 78 74 28 61 72 67 76 5b 31 5d 29 29 3b 0a  text(argv[1]));.
5f90: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
5fa0: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73  ntation of the s
5fb0: 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74  qlite_compileopt
5fc0: 69 6f 6e 5f 75 73 65 64 28 29 20 66 75 6e 63 74  ion_used() funct
5fd0: 69 6f 6e 2e 0a 2a 2a 20 54 68 65 20 72 65 73 75  ion..** The resu
5fe0: 6c 74 20 69 73 20 61 6e 20 69 6e 74 65 67 65 72  lt is an integer
5ff0: 20 74 68 61 74 20 69 64 65 6e 74 69 66 69 65 73   that identifies
6000: 20 69 66 20 74 68 65 20 63 6f 6d 70 69 6c 65 72   if the compiler
6010: 20 6f 70 74 69 6f 6e 0a 2a 2a 20 77 61 73 20 75   option.** was u
6020: 73 65 64 20 74 6f 20 62 75 69 6c 64 20 53 51 4c  sed to build SQL
6030: 69 74 65 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66 20  ite..*/.#ifndef 
6040: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50  SQLITE_OMIT_COMP
6050: 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 0a  ILEOPTION_DIAGS.
6060: 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 6d 70  static void comp
6070: 69 6c 65 6f 70 74 69 6f 6e 75 73 65 64 46 75 6e  ileoptionusedFun
6080: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
6090: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
60a0: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
60b0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
60c0: 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61  v.){.  const cha
60d0: 72 20 2a 7a 4f 70 74 4e 61 6d 65 3b 0a 20 20 61  r *zOptName;.  a
60e0: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
60f0: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
6100: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 2f 2a  ETER(argc);.  /*
6110: 20 49 4d 50 3a 20 52 2d 33 39 35 36 34 2d 33 36   IMP: R-39564-36
6120: 33 30 35 20 54 68 65 20 73 71 6c 69 74 65 5f 63  305 The sqlite_c
6130: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65  ompileoption_use
6140: 64 28 29 20 53 51 4c 0a 20 20 2a 2a 20 66 75 6e  d() SQL.  ** fun
6150: 63 74 69 6f 6e 20 69 73 20 61 20 77 72 61 70 70  ction is a wrapp
6160: 65 72 20 61 72 6f 75 6e 64 20 74 68 65 20 73 71  er around the sq
6170: 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74  lite3_compileopt
6180: 69 6f 6e 5f 75 73 65 64 28 29 20 43 2f 43 2b 2b  ion_used() C/C++
6190: 0a 20 20 2a 2a 20 66 75 6e 63 74 69 6f 6e 2e 0a  .  ** function..
61a0: 20 20 2a 2f 0a 20 20 69 66 28 20 28 7a 4f 70 74    */.  if( (zOpt
61b0: 4e 61 6d 65 20 3d 20 28 63 6f 6e 73 74 20 63 68  Name = (const ch
61c0: 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  ar*)sqlite3_valu
61d0: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 29  e_text(argv[0]))
61e0: 21 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  !=0 ){.    sqlit
61f0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f  e3_result_int(co
6200: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 63  ntext, sqlite3_c
6210: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65  ompileoption_use
6220: 64 28 7a 4f 70 74 4e 61 6d 65 29 29 3b 0a 20 20  d(zOptName));.  
6230: 7d 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51  }.}.#endif /* SQ
6240: 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c  LITE_OMIT_COMPIL
6250: 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f  EOPTION_DIAGS */
6260: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
6270: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 71  tation of the sq
6280: 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69  lite_compileopti
6290: 6f 6e 5f 67 65 74 28 29 20 66 75 6e 63 74 69 6f  on_get() functio
62a0: 6e 2e 20 0a 2a 2a 20 54 68 65 20 72 65 73 75 6c  n. .** The resul
62b0: 74 20 69 73 20 61 20 73 74 72 69 6e 67 20 74 68  t is a string th
62c0: 61 74 20 69 64 65 6e 74 69 66 69 65 73 20 74 68  at identifies th
62d0: 65 20 63 6f 6d 70 69 6c 65 72 20 6f 70 74 69 6f  e compiler optio
62e0: 6e 73 20 0a 2a 2a 20 75 73 65 64 20 74 6f 20 62  ns .** used to b
62f0: 75 69 6c 64 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a  uild SQLite..*/.
6300: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f  #ifndef SQLITE_O
6310: 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f  MIT_COMPILEOPTIO
6320: 4e 5f 44 49 41 47 53 0a 73 74 61 74 69 63 20 76  N_DIAGS.static v
6330: 6f 69 64 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f  oid compileoptio
6340: 6e 67 65 74 46 75 6e 63 28 0a 20 20 73 71 6c 69  ngetFunc(.  sqli
6350: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
6360: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
6370: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
6380: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e  e **argv.){.  in
6390: 74 20 6e 3b 0a 20 20 61 73 73 65 72 74 28 20 61  t n;.  assert( a
63a0: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
63b0: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
63c0: 63 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d  c);.  /* IMP: R-
63d0: 30 34 39 32 32 2d 32 34 30 37 36 20 54 68 65 20  04922-24076 The 
63e0: 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70  sqlite_compileop
63f0: 74 69 6f 6e 5f 67 65 74 28 29 20 53 51 4c 20 66  tion_get() SQL f
6400: 75 6e 63 74 69 6f 6e 0a 20 20 2a 2a 20 69 73 20  unction.  ** is 
6410: 61 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64  a wrapper around
6420: 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63 6f 6d   the sqlite3_com
6430: 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28 29  pileoption_get()
6440: 20 43 2f 43 2b 2b 20 66 75 6e 63 74 69 6f 6e 2e   C/C++ function.
6450: 0a 20 20 2a 2f 0a 20 20 6e 20 3d 20 73 71 6c 69  .  */.  n = sqli
6460: 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72  te3_value_int(ar
6470: 67 76 5b 30 5d 29 3b 0a 20 20 73 71 6c 69 74 65  gv[0]);.  sqlite
6480: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
6490: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 63  ntext, sqlite3_c
64a0: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74  ompileoption_get
64b0: 28 6e 29 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f  (n), -1, SQLITE_
64c0: 53 54 41 54 49 43 29 3b 0a 7d 0a 23 65 6e 64 69  STATIC);.}.#endi
64d0: 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54  f /* SQLITE_OMIT
64e0: 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44  _COMPILEOPTION_D
64f0: 49 41 47 53 20 2a 2f 0a 0a 2f 2a 20 41 72 72 61  IAGS */../* Arra
6500: 79 20 66 6f 72 20 63 6f 6e 76 65 72 74 69 6e 67  y for converting
6510: 20 66 72 6f 6d 20 68 61 6c 66 2d 62 79 74 65 73   from half-bytes
6520: 20 28 6e 79 62 62 6c 65 73 29 20 69 6e 74 6f 20   (nybbles) into 
6530: 41 53 43 49 49 20 68 65 78 0a 2a 2a 20 64 69 67  ASCII hex.** dig
6540: 69 74 73 2e 20 2a 2f 0a 73 74 61 74 69 63 20 63  its. */.static c
6550: 6f 6e 73 74 20 63 68 61 72 20 68 65 78 64 69 67  onst char hexdig
6560: 69 74 73 5b 5d 20 3d 20 7b 0a 20 20 27 30 27 2c  its[] = {.  '0',
6570: 20 27 31 27 2c 20 27 32 27 2c 20 27 33 27 2c 20   '1', '2', '3', 
6580: 27 34 27 2c 20 27 35 27 2c 20 27 36 27 2c 20 27  '4', '5', '6', '
6590: 37 27 2c 0a 20 20 27 38 27 2c 20 27 39 27 2c 20  7',.  '8', '9', 
65a0: 27 41 27 2c 20 27 42 27 2c 20 27 43 27 2c 20 27  'A', 'B', 'C', '
65b0: 44 27 2c 20 27 45 27 2c 20 27 46 27 20 0a 7d 3b  D', 'E', 'F' .};
65c0: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
65d0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 51 55  tation of the QU
65e0: 4f 54 45 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20  OTE() function. 
65f0: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 74   This function t
6600: 61 6b 65 73 20 61 20 73 69 6e 67 6c 65 0a 2a 2a  akes a single.**
6610: 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74   argument.  If t
6620: 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e  he argument is n
6630: 75 6d 65 72 69 63 2c 20 74 68 65 20 72 65 74 75  umeric, the retu
6640: 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65 20  rn value is the 
6650: 73 61 6d 65 20 61 73 0a 2a 2a 20 74 68 65 20 61  same as.** the a
6660: 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74 68 65  rgument.  If the
6670: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 4e 55 4c   argument is NUL
6680: 4c 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76 61  L, the return va
6690: 6c 75 65 20 69 73 20 74 68 65 20 73 74 72 69 6e  lue is the strin
66a0: 67 0a 2a 2a 20 22 4e 55 4c 4c 22 2e 20 20 4f 74  g.** "NULL".  Ot
66b0: 68 65 72 77 69 73 65 2c 20 74 68 65 20 61 72 67  herwise, the arg
66c0: 75 6d 65 6e 74 20 69 73 20 65 6e 63 6c 6f 73 65  ument is enclose
66d0: 64 20 69 6e 20 73 69 6e 67 6c 65 20 71 75 6f 74  d in single quot
66e0: 65 73 20 77 69 74 68 0a 2a 2a 20 73 69 6e 67 6c  es with.** singl
66f0: 65 2d 71 75 6f 74 65 20 65 73 63 61 70 65 73 2e  e-quote escapes.
6700: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
6710: 71 75 6f 74 65 46 75 6e 63 28 73 71 6c 69 74 65  quoteFunc(sqlite
6720: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
6730: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
6740: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
6750: 67 76 29 7b 0a 20 20 61 73 73 65 72 74 28 20 61  gv){.  assert( a
6760: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
6770: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
6780: 63 29 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71  c);.  switch( sq
6790: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
67a0: 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20  (argv[0]) ){.   
67b0: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 46 4c 4f   case SQLITE_FLO
67c0: 41 54 3a 20 7b 0a 20 20 20 20 20 20 64 6f 75 62  AT: {.      doub
67d0: 6c 65 20 72 31 2c 20 72 32 3b 0a 20 20 20 20 20  le r1, r2;.     
67e0: 20 63 68 61 72 20 7a 42 75 66 5b 35 30 5d 3b 0a   char zBuf[50];.
67f0: 20 20 20 20 20 20 72 31 20 3d 20 73 71 6c 69 74        r1 = sqlit
6800: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28  e3_value_double(
6810: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20  argv[0]);.      
6820: 73 71 6c 69 74 65 33 5f 73 6e 70 72 69 6e 74 66  sqlite3_snprintf
6830: 28 73 69 7a 65 6f 66 28 7a 42 75 66 29 2c 20 7a  (sizeof(zBuf), z
6840: 42 75 66 2c 20 22 25 21 2e 31 35 67 22 2c 20 72  Buf, "%!.15g", r
6850: 31 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  1);.      sqlite
6860: 33 41 74 6f 46 28 7a 42 75 66 2c 20 26 72 32 2c  3AtoF(zBuf, &r2,
6870: 20 32 30 2c 20 53 51 4c 49 54 45 5f 55 54 46 38   20, SQLITE_UTF8
6880: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72 31 21  );.      if( r1!
6890: 3d 72 32 20 29 7b 0a 20 20 20 20 20 20 20 20 73  =r2 ){.        s
68a0: 71 6c 69 74 65 33 5f 73 6e 70 72 69 6e 74 66 28  qlite3_snprintf(
68b0: 73 69 7a 65 6f 66 28 7a 42 75 66 29 2c 20 7a 42  sizeof(zBuf), zB
68c0: 75 66 2c 20 22 25 21 2e 32 30 65 22 2c 20 72 31  uf, "%!.20e", r1
68d0: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
68e0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
68f0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 42  text(context, zB
6900: 75 66 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54  uf, -1, SQLITE_T
6910: 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20 20  RANSIENT);.     
6920: 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20   break;.    }.  
6930: 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e    case SQLITE_IN
6940: 54 45 47 45 52 3a 20 7b 0a 20 20 20 20 20 20 73  TEGER: {.      s
6950: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61  qlite3_result_va
6960: 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67  lue(context, arg
6970: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 62 72 65  v[0]);.      bre
6980: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61  ak;.    }.    ca
6990: 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a 20  se SQLITE_BLOB: 
69a0: 7b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a 54  {.      char *zT
69b0: 65 78 74 20 3d 20 30 3b 0a 20 20 20 20 20 20 63  ext = 0;.      c
69c0: 68 61 72 20 63 6f 6e 73 74 20 2a 7a 42 6c 6f 62  har const *zBlob
69d0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
69e0: 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a  _blob(argv[0]);.
69f0: 20 20 20 20 20 20 69 6e 74 20 6e 42 6c 6f 62 20        int nBlob 
6a00: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
6a10: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
6a20: 20 20 20 20 20 20 61 73 73 65 72 74 28 20 7a 42        assert( zB
6a30: 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c  lob==sqlite3_val
6a40: 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29  ue_blob(argv[0])
6a50: 20 29 3b 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69   ); /* No encodi
6a60: 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 20  ng change */.   
6a70: 20 20 20 7a 54 65 78 74 20 3d 20 28 63 68 61 72     zText = (char
6a80: 20 2a 29 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63   *)contextMalloc
6a90: 28 63 6f 6e 74 65 78 74 2c 20 28 32 2a 28 69 36  (context, (2*(i6
6aa0: 34 29 6e 42 6c 6f 62 29 2b 34 29 3b 20 0a 20 20  4)nBlob)+4); .  
6ab0: 20 20 20 20 69 66 28 20 7a 54 65 78 74 20 29 7b      if( zText ){
6ac0: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 69 3b 0a  .        int i;.
6ad0: 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b          for(i=0;
6ae0: 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b 2b 29 7b 0a   i<nBlob; i++){.
6af0: 20 20 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b            zText[
6b00: 28 69 2a 32 29 2b 32 5d 20 3d 20 68 65 78 64 69  (i*2)+2] = hexdi
6b10: 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 3e 3e  gits[(zBlob[i]>>
6b20: 34 29 26 30 78 30 46 5d 3b 0a 20 20 20 20 20 20  4)&0x0F];.      
6b30: 20 20 20 20 7a 54 65 78 74 5b 28 69 2a 32 29 2b      zText[(i*2)+
6b40: 33 5d 20 3d 20 68 65 78 64 69 67 69 74 73 5b 28  3] = hexdigits[(
6b50: 7a 42 6c 6f 62 5b 69 5d 29 26 30 78 30 46 5d 3b  zBlob[i])&0x0F];
6b60: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
6b70: 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c 6f 62 2a     zText[(nBlob*
6b80: 32 29 2b 32 5d 20 3d 20 27 5c 27 27 3b 0a 20 20  2)+2] = '\'';.  
6b90: 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c        zText[(nBl
6ba0: 6f 62 2a 32 29 2b 33 5d 20 3d 20 27 5c 30 27 3b  ob*2)+3] = '\0';
6bb0: 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 30  .        zText[0
6bc0: 5d 20 3d 20 27 58 27 3b 0a 20 20 20 20 20 20 20  ] = 'X';.       
6bd0: 20 7a 54 65 78 74 5b 31 5d 20 3d 20 27 5c 27 27   zText[1] = '\''
6be0: 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65  ;.        sqlite
6bf0: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
6c00: 6e 74 65 78 74 2c 20 7a 54 65 78 74 2c 20 2d 31  ntext, zText, -1
6c10: 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45  , SQLITE_TRANSIE
6c20: 4e 54 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c  NT);.        sql
6c30: 69 74 65 33 5f 66 72 65 65 28 7a 54 65 78 74 29  ite3_free(zText)
6c40: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
6c50: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
6c60: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58   case SQLITE_TEX
6c70: 54 3a 20 7b 0a 20 20 20 20 20 20 69 6e 74 20 69  T: {.      int i
6c80: 2c 6a 3b 0a 20 20 20 20 20 20 75 36 34 20 6e 3b  ,j;.      u64 n;
6c90: 0a 20 20 20 20 20 20 63 6f 6e 73 74 20 75 6e 73  .      const uns
6ca0: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41 72 67  igned char *zArg
6cb0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
6cc0: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
6cd0: 20 20 20 20 20 20 63 68 61 72 20 2a 7a 3b 0a 0a        char *z;..
6ce0: 20 20 20 20 20 20 69 66 28 20 7a 41 72 67 3d 3d        if( zArg==
6cf0: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  0 ) return;.    
6d00: 20 20 66 6f 72 28 69 3d 30 2c 20 6e 3d 30 3b 20    for(i=0, n=0; 
6d10: 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 20 69  zArg[i]; i++){ i
6d20: 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c 27 27  f( zArg[i]=='\''
6d30: 20 29 20 6e 2b 2b 3b 20 7d 0a 20 20 20 20 20 20   ) n++; }.      
6d40: 7a 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  z = contextMallo
6d50: 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34  c(context, ((i64
6d60: 29 69 29 2b 28 28 69 36 34 29 6e 29 2b 33 29 3b  )i)+((i64)n)+3);
6d70: 0a 20 20 20 20 20 20 69 66 28 20 7a 20 29 7b 0a  .      if( z ){.
6d80: 20 20 20 20 20 20 20 20 7a 5b 30 5d 20 3d 20 27          z[0] = '
6d90: 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 66 6f 72  \'';.        for
6da0: 28 69 3d 30 2c 20 6a 3d 31 3b 20 7a 41 72 67 5b  (i=0, j=1; zArg[
6db0: 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  i]; i++){.      
6dc0: 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a 41 72      z[j++] = zAr
6dd0: 67 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 20 20  g[i];.          
6de0: 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c 27  if( zArg[i]=='\'
6df0: 27 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20  ' ){.           
6e00: 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a   z[j++] = '\'';.
6e10: 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20            }.    
6e20: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7a 5b      }.        z[
6e30: 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20  j++] = '\'';.   
6e40: 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 30 3b 0a 20       z[j] = 0;. 
6e50: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72         sqlite3_r
6e60: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
6e70: 78 74 2c 20 7a 2c 20 6a 2c 20 73 71 6c 69 74 65  xt, z, j, sqlite
6e80: 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 20 20 7d  3_free);.      }
6e90: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  .      break;.  
6ea0: 20 20 7d 0a 20 20 20 20 64 65 66 61 75 6c 74 3a    }.    default:
6eb0: 20 7b 0a 20 20 20 20 20 20 61 73 73 65 72 74 28   {.      assert(
6ec0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
6ed0: 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51  ype(argv[0])==SQ
6ee0: 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b 0a 20 20 20  LITE_NULL );.   
6ef0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
6f00: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
6f10: 22 4e 55 4c 4c 22 2c 20 34 2c 20 53 51 4c 49 54  "NULL", 4, SQLIT
6f20: 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 20 20 20  E_STATIC);.     
6f30: 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20   break;.    }.  
6f40: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 75  }.}../*.** The u
6f50: 6e 69 63 6f 64 65 28 29 20 66 75 6e 63 74 69 6f  nicode() functio
6f60: 6e 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20 69  n.  Return the i
6f70: 6e 74 65 67 65 72 20 75 6e 69 63 6f 64 65 20 63  nteger unicode c
6f80: 6f 64 65 2d 70 6f 69 6e 74 20 76 61 6c 75 65 0a  ode-point value.
6f90: 2a 2a 20 66 6f 72 20 74 68 65 20 66 69 72 73 74  ** for the first
6fa0: 20 63 68 61 72 61 63 74 65 72 20 6f 66 20 74 68   character of th
6fb0: 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 2e 20  e input string. 
6fc0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
6fd0: 75 6e 69 63 6f 64 65 46 75 6e 63 28 0a 20 20 73  unicodeFunc(.  s
6fe0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
6ff0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
7000: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
7010: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
7020: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
7030: 63 68 61 72 20 2a 7a 20 3d 20 73 71 6c 69 74 65  char *z = sqlite
7040: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
7050: 76 5b 30 5d 29 3b 0a 20 20 28 76 6f 69 64 29 61  v[0]);.  (void)a
7060: 72 67 63 3b 0a 20 20 69 66 28 20 7a 20 26 26 20  rgc;.  if( z && 
7070: 7a 5b 30 5d 20 29 20 73 71 6c 69 74 65 33 5f 72  z[0] ) sqlite3_r
7080: 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78  esult_int(contex
7090: 74 2c 20 73 71 6c 69 74 65 33 55 74 66 38 52 65  t, sqlite3Utf8Re
70a0: 61 64 28 26 7a 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  ad(&z));.}../*.*
70b0: 2a 20 54 68 65 20 63 68 61 72 28 29 20 66 75 6e  * The char() fun
70c0: 63 74 69 6f 6e 20 74 61 6b 65 73 20 7a 65 72 6f  ction takes zero
70d0: 20 6f 72 20 6d 6f 72 65 20 61 72 67 75 6d 65 6e   or more argumen
70e0: 74 73 2c 20 65 61 63 68 20 6f 66 20 77 68 69 63  ts, each of whic
70f0: 68 20 69 73 0a 2a 2a 20 61 6e 20 69 6e 74 65 67  h is.** an integ
7100: 65 72 2e 20 20 49 74 20 63 6f 6e 73 74 72 75 63  er.  It construc
7110: 74 73 20 61 20 73 74 72 69 6e 67 20 77 68 65 72  ts a string wher
7120: 65 20 65 61 63 68 20 63 68 61 72 61 63 74 65 72  e each character
7130: 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67 0a 2a   of the string.*
7140: 2a 20 69 73 20 74 68 65 20 75 6e 69 63 6f 64 65  * is the unicode
7150: 20 63 68 61 72 61 63 74 65 72 20 66 6f 72 20 74   character for t
7160: 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67  he corresponding
7170: 20 69 6e 74 65 67 65 72 20 61 72 67 75 6d 65 6e   integer argumen
7180: 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  t..*/.static voi
7190: 64 20 63 68 61 72 46 75 6e 63 28 0a 20 20 73 71  d charFunc(.  sq
71a0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
71b0: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
71c0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
71d0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
71e0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
71f0: 2c 20 2a 7a 4f 75 74 3b 0a 20 20 69 6e 74 20 69  , *zOut;.  int i
7200: 3b 0a 20 20 7a 4f 75 74 20 3d 20 7a 20 3d 20 73  ;.  zOut = z = s
7210: 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 20 61  qlite3_malloc( a
7220: 72 67 63 2a 34 2b 31 20 29 3b 0a 20 20 69 66 28  rgc*4+1 );.  if(
7230: 20 7a 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c   z==0 ){.    sql
7240: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
7250: 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29  r_nomem(context)
7260: 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20  ;.    return;.  
7270: 7d 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 61  }.  for(i=0; i<a
7280: 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 73  rgc; i++){.    s
7290: 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 78 3b 0a  qlite3_int64 x;.
72a0: 20 20 20 20 75 6e 73 69 67 6e 65 64 20 63 3b 0a      unsigned c;.
72b0: 20 20 20 20 78 20 3d 20 73 71 6c 69 74 65 33 5f      x = sqlite3_
72c0: 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67 76  value_int64(argv
72d0: 5b 69 5d 29 3b 0a 20 20 20 20 69 66 28 20 78 3c  [i]);.    if( x<
72e0: 30 20 7c 7c 20 78 3e 30 78 31 30 66 66 66 66 20  0 || x>0x10ffff 
72f0: 29 20 78 20 3d 20 30 78 66 66 66 64 3b 0a 20 20  ) x = 0xfffd;.  
7300: 20 20 63 20 3d 20 28 75 6e 73 69 67 6e 65 64 29    c = (unsigned)
7310: 28 78 20 26 20 30 78 31 66 66 66 66 66 29 3b 0a  (x & 0x1fffff);.
7320: 20 20 20 20 69 66 28 20 63 3c 30 78 30 30 30 38      if( c<0x0008
7330: 30 20 29 7b 0a 20 20 20 20 20 20 2a 7a 4f 75 74  0 ){.      *zOut
7340: 2b 2b 20 3d 20 28 75 38 29 28 63 26 30 78 46 46  ++ = (u8)(c&0xFF
7350: 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28  );.    }else if(
7360: 20 63 3c 30 78 30 30 38 30 30 20 29 7b 0a 20 20   c<0x00800 ){.  
7370: 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78      *zOut++ = 0x
7380: 43 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 36 29  C0 + (u8)((c>>6)
7390: 26 30 78 31 46 29 3b 0a 20 20 20 20 20 20 2a 7a  &0x1F);.      *z
73a0: 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28  Out++ = 0x80 + (
73b0: 75 38 29 28 63 20 26 20 30 78 33 46 29 3b 0a 20  u8)(c & 0x3F);. 
73c0: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3c 30     }else if( c<0
73d0: 78 31 30 30 30 30 20 29 7b 0a 20 20 20 20 20 20  x10000 ){.      
73e0: 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 45 30 20 2b  *zOut++ = 0xE0 +
73f0: 20 28 75 38 29 28 28 63 3e 3e 31 32 29 26 30 78   (u8)((c>>12)&0x
7400: 30 46 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74  0F);.      *zOut
7410: 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29  ++ = 0x80 + (u8)
7420: 28 28 63 3e 3e 36 29 20 26 20 30 78 33 46 29 3b  ((c>>6) & 0x3F);
7430: 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d  .      *zOut++ =
7440: 20 30 78 38 30 20 2b 20 28 75 38 29 28 63 20 26   0x80 + (u8)(c &
7450: 20 30 78 33 46 29 3b 0a 20 20 20 20 7d 65 6c 73   0x3F);.    }els
7460: 65 7b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b  e{.      *zOut++
7470: 20 3d 20 30 78 46 30 20 2b 20 28 75 38 29 28 28   = 0xF0 + (u8)((
7480: 63 3e 3e 31 38 29 20 26 20 30 78 30 37 29 3b 0a  c>>18) & 0x07);.
7490: 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20        *zOut++ = 
74a0: 30 78 38 30 20 2b 20 28 75 38 29 28 28 63 3e 3e  0x80 + (u8)((c>>
74b0: 31 32 29 20 26 20 30 78 33 46 29 3b 0a 20 20 20  12) & 0x3F);.   
74c0: 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38     *zOut++ = 0x8
74d0: 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 36 29 20  0 + (u8)((c>>6) 
74e0: 26 20 30 78 33 46 29 3b 0a 20 20 20 20 20 20 2a  & 0x3F);.      *
74f0: 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20  zOut++ = 0x80 + 
7500: 28 75 38 29 28 63 20 26 20 30 78 33 46 29 3b 0a  (u8)(c & 0x3F);.
7510: 20 20 20 20 7d 20 20 20 20 20 20 20 20 20 20 20      }           
7520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7540: 20 20 20 20 20 20 20 20 20 5c 0a 20 20 7d 0a 20           \.  }. 
7550: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
7560: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63  text(context, (c
7570: 68 61 72 2a 29 7a 2c 20 28 69 6e 74 29 28 7a 4f  har*)z, (int)(zO
7580: 75 74 2d 7a 29 2c 20 73 71 6c 69 74 65 33 5f 66  ut-z), sqlite3_f
7590: 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  ree);.}../*.** T
75a0: 68 65 20 68 65 78 28 29 20 66 75 6e 63 74 69 6f  he hex() functio
75b0: 6e 2e 20 20 49 6e 74 65 72 70 72 65 74 20 74 68  n.  Interpret th
75c0: 65 20 61 72 67 75 6d 65 6e 74 20 61 73 20 61 20  e argument as a 
75d0: 62 6c 6f 62 2e 20 20 52 65 74 75 72 6e 0a 2a 2a  blob.  Return.**
75e0: 20 61 20 68 65 78 61 64 65 63 69 6d 61 6c 20 72   a hexadecimal r
75f0: 65 6e 64 65 72 69 6e 67 20 61 73 20 74 65 78 74  endering as text
7600: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
7610: 20 68 65 78 46 75 6e 63 28 0a 20 20 73 71 6c 69   hexFunc(.  sqli
7620: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
7630: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
7640: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
7650: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e  e **argv.){.  in
7660: 74 20 69 2c 20 6e 3b 0a 20 20 63 6f 6e 73 74 20  t i, n;.  const 
7670: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70  unsigned char *p
7680: 42 6c 6f 62 3b 0a 20 20 63 68 61 72 20 2a 7a 48  Blob;.  char *zH
7690: 65 78 2c 20 2a 7a 3b 0a 20 20 61 73 73 65 72 74  ex, *z;.  assert
76a0: 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55  ( argc==1 );.  U
76b0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
76c0: 61 72 67 63 29 3b 0a 20 20 70 42 6c 6f 62 20 3d  argc);.  pBlob =
76d0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
76e0: 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  lob(argv[0]);.  
76f0: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
7700: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29  e_bytes(argv[0])
7710: 3b 0a 20 20 61 73 73 65 72 74 28 20 70 42 6c 6f  ;.  assert( pBlo
7720: 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  b==sqlite3_value
7730: 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 20 29  _blob(argv[0]) )
7740: 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e  ;  /* No encodin
7750: 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 20  g change */.  z 
7760: 3d 20 7a 48 65 78 20 3d 20 63 6f 6e 74 65 78 74  = zHex = context
7770: 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20  Malloc(context, 
7780: 28 28 69 36 34 29 6e 29 2a 32 20 2b 20 31 29 3b  ((i64)n)*2 + 1);
7790: 0a 20 20 69 66 28 20 7a 48 65 78 20 29 7b 0a 20  .  if( zHex ){. 
77a0: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b     for(i=0; i<n;
77b0: 20 69 2b 2b 2c 20 70 42 6c 6f 62 2b 2b 29 7b 0a   i++, pBlob++){.
77c0: 20 20 20 20 20 20 75 6e 73 69 67 6e 65 64 20 63        unsigned c
77d0: 68 61 72 20 63 20 3d 20 2a 70 42 6c 6f 62 3b 0a  har c = *pBlob;.
77e0: 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20 3d 20 68        *(z++) = h
77f0: 65 78 64 69 67 69 74 73 5b 28 63 3e 3e 34 29 26  exdigits[(c>>4)&
7800: 30 78 66 5d 3b 0a 20 20 20 20 20 20 2a 28 7a 2b  0xf];.      *(z+
7810: 2b 29 20 3d 20 68 65 78 64 69 67 69 74 73 5b 63  +) = hexdigits[c
7820: 26 30 78 66 5d 3b 0a 20 20 20 20 7d 0a 20 20 20  &0xf];.    }.   
7830: 20 2a 7a 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c   *z = 0;.    sql
7840: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
7850: 28 63 6f 6e 74 65 78 74 2c 20 7a 48 65 78 2c 20  (context, zHex, 
7860: 6e 2a 32 2c 20 73 71 6c 69 74 65 33 5f 66 72 65  n*2, sqlite3_fre
7870: 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  e);.  }.}../*.**
7880: 20 54 68 65 20 7a 65 72 6f 62 6c 6f 62 28 4e 29   The zeroblob(N)
7890: 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e   function return
78a0: 73 20 61 20 7a 65 72 6f 2d 66 69 6c 6c 65 64 20  s a zero-filled 
78b0: 62 6c 6f 62 20 6f 66 20 73 69 7a 65 20 4e 20 62  blob of size N b
78c0: 79 74 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  ytes..*/.static 
78d0: 76 6f 69 64 20 7a 65 72 6f 62 6c 6f 62 46 75 6e  void zeroblobFun
78e0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
78f0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
7900: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
7910: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
7920: 76 0a 29 7b 0a 20 20 69 36 34 20 6e 3b 0a 20 20  v.){.  i64 n;.  
7930: 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71  sqlite3 *db = sq
7940: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62  lite3_context_db
7950: 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29  _handle(context)
7960: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
7970: 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f  ==1 );.  UNUSED_
7980: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
7990: 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76  .  n = sqlite3_v
79a0: 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67 76 5b  alue_int64(argv[
79b0: 30 5d 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28  0]);.  testcase(
79c0: 20 6e 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53   n==db->aLimit[S
79d0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47  QLITE_LIMIT_LENG
79e0: 54 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73  TH] );.  testcas
79f0: 65 28 20 6e 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74  e( n==db->aLimit
7a00: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45  [SQLITE_LIMIT_LE
7a10: 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28  NGTH]+1 );.  if(
7a20: 20 6e 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51   n>db->aLimit[SQ
7a30: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
7a40: 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  H] ){.    sqlite
7a50: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74  3_result_error_t
7a60: 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a  oobig(context);.
7a70: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c    }else{.    sql
7a80: 69 74 65 33 5f 72 65 73 75 6c 74 5f 7a 65 72 6f  ite3_result_zero
7a90: 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 69  blob(context, (i
7aa0: 6e 74 29 6e 29 3b 20 2f 2a 20 49 4d 50 3a 20 52  nt)n); /* IMP: R
7ab0: 2d 30 30 32 39 33 2d 36 34 39 39 34 20 2a 2f 0a  -00293-64994 */.
7ac0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65    }.}../*.** The
7ad0: 20 72 65 70 6c 61 63 65 28 29 20 66 75 6e 63 74   replace() funct
7ae0: 69 6f 6e 2e 20 20 54 68 72 65 65 20 61 72 67 75  ion.  Three argu
7af0: 6d 65 6e 74 73 20 61 72 65 20 61 6c 6c 20 73 74  ments are all st
7b00: 72 69 6e 67 73 3a 20 63 61 6c 6c 0a 2a 2a 20 74  rings: call.** t
7b10: 68 65 6d 20 41 2c 20 42 2c 20 61 6e 64 20 43 2e  hem A, B, and C.
7b20: 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61   The result is a
7b30: 6c 73 6f 20 61 20 73 74 72 69 6e 67 20 77 68 69  lso a string whi
7b40: 63 68 20 69 73 20 64 65 72 69 76 65 64 0a 2a 2a  ch is derived.**
7b50: 20 66 72 6f 6d 20 41 20 62 79 20 72 65 70 6c 61   from A by repla
7b60: 63 69 6e 67 20 65 76 65 72 79 20 6f 63 63 75 72  cing every occur
7b70: 72 65 6e 63 65 20 6f 66 20 42 20 77 69 74 68 20  rence of B with 
7b80: 43 2e 20 20 54 68 65 20 6d 61 74 63 68 0a 2a 2a  C.  The match.**
7b90: 20 6d 75 73 74 20 62 65 20 65 78 61 63 74 2e 20   must be exact. 
7ba0: 20 43 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75 65   Collating seque
7bb0: 6e 63 65 73 20 61 72 65 20 6e 6f 74 20 75 73 65  nces are not use
7bc0: 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  d..*/.static voi
7bd0: 64 20 72 65 70 6c 61 63 65 46 75 6e 63 28 0a 20  d replaceFunc(. 
7be0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
7bf0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
7c00: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
7c10: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
7c20: 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65  .  const unsigne
7c30: 64 20 63 68 61 72 20 2a 7a 53 74 72 3b 20 20 20  d char *zStr;   
7c40: 20 20 20 20 20 2f 2a 20 54 68 65 20 69 6e 70 75       /* The inpu
7c50: 74 20 73 74 72 69 6e 67 20 41 20 2a 2f 0a 20 20  t string A */.  
7c60: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
7c70: 68 61 72 20 2a 7a 50 61 74 74 65 72 6e 3b 20 20  har *zPattern;  
7c80: 20 20 2f 2a 20 54 68 65 20 70 61 74 74 65 72 6e    /* The pattern
7c90: 20 73 74 72 69 6e 67 20 42 20 2a 2f 0a 20 20 63   string B */.  c
7ca0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
7cb0: 61 72 20 2a 7a 52 65 70 3b 20 20 20 20 20 20 20  ar *zRep;       
7cc0: 20 2f 2a 20 54 68 65 20 72 65 70 6c 61 63 65 6d   /* The replacem
7cd0: 65 6e 74 20 73 74 72 69 6e 67 20 43 20 2a 2f 0a  ent string C */.
7ce0: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
7cf0: 2a 7a 4f 75 74 3b 20 20 20 20 20 20 20 20 20 20  *zOut;          
7d00: 20 20 20 20 2f 2a 20 54 68 65 20 6f 75 74 70 75      /* The outpu
7d10: 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 53 74 72 3b  t */.  int nStr;
7d20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7d30: 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 53 74 72 20  /* Size of zStr 
7d40: 2a 2f 0a 20 20 69 6e 74 20 6e 50 61 74 74 65 72  */.  int nPatter
7d50: 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a  n;            /*
7d60: 20 53 69 7a 65 20 6f 66 20 7a 50 61 74 74 65 72   Size of zPatter
7d70: 6e 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 70 3b  n */.  int nRep;
7d80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7d90: 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 52 65 70 20  /* Size of zRep 
7da0: 2a 2f 0a 20 20 69 36 34 20 6e 4f 75 74 3b 20 20  */.  i64 nOut;  
7db0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
7dc0: 20 4d 61 78 69 6d 75 6d 20 73 69 7a 65 20 6f 66   Maximum size of
7dd0: 20 7a 4f 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6c   zOut */.  int l
7de0: 6f 6f 70 4c 69 6d 69 74 3b 20 20 20 20 20 20 20  oopLimit;       
7df0: 20 20 20 20 2f 2a 20 4c 61 73 74 20 7a 53 74 72      /* Last zStr
7e00: 5b 5d 20 74 68 61 74 20 6d 69 67 68 74 20 6d 61  [] that might ma
7e10: 74 63 68 20 7a 50 61 74 74 65 72 6e 5b 5d 20 2a  tch zPattern[] *
7e20: 2f 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 20 20 20  /.  int i, j;   
7e30: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
7e40: 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 73 20 2a 2f  Loop counters */
7e50: 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ..  assert( argc
7e60: 3d 3d 33 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f  ==3 );.  UNUSED_
7e70: 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b  PARAMETER(argc);
7e80: 0a 20 20 7a 53 74 72 20 3d 20 73 71 6c 69 74 65  .  zStr = sqlite
7e90: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
7ea0: 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 53 74  v[0]);.  if( zSt
7eb0: 72 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20  r==0 ) return;. 
7ec0: 20 6e 53 74 72 20 3d 20 73 71 6c 69 74 65 33 5f   nStr = sqlite3_
7ed0: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
7ee0: 5b 30 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20  [0]);.  assert( 
7ef0: 7a 53 74 72 3d 3d 73 71 6c 69 74 65 33 5f 76 61  zStr==sqlite3_va
7f00: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
7f10: 29 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f  ) );  /* No enco
7f20: 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20  ding change */. 
7f30: 20 7a 50 61 74 74 65 72 6e 20 3d 20 73 71 6c 69   zPattern = sqli
7f40: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
7f50: 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a  rgv[1]);.  if( z
7f60: 50 61 74 74 65 72 6e 3d 3d 30 20 29 7b 0a 20 20  Pattern==0 ){.  
7f70: 20 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65    assert( sqlite
7f80: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
7f90: 76 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[1])==SQLITE_NU
7fa0: 4c 4c 0a 20 20 20 20 20 20 20 20 20 20 20 20 7c  LL.            |
7fb0: 7c 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  | sqlite3_contex
7fc0: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
7fd0: 65 78 74 29 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c  ext)->mallocFail
7fe0: 65 64 20 29 3b 0a 20 20 20 20 72 65 74 75 72 6e  ed );.    return
7ff0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 50 61 74  ;.  }.  if( zPat
8000: 74 65 72 6e 5b 30 5d 3d 3d 30 20 29 7b 0a 20 20  tern[0]==0 ){.  
8010: 20 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65    assert( sqlite
8020: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
8030: 76 5b 31 5d 29 21 3d 53 51 4c 49 54 45 5f 4e 55  v[1])!=SQLITE_NU
8040: 4c 4c 20 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  LL );.    sqlite
8050: 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63  3_result_value(c
8060: 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 30 5d 29  ontext, argv[0])
8070: 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20  ;.    return;.  
8080: 7d 0a 20 20 6e 50 61 74 74 65 72 6e 20 3d 20 73  }.  nPattern = s
8090: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
80a0: 65 73 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 61  es(argv[1]);.  a
80b0: 73 73 65 72 74 28 20 7a 50 61 74 74 65 72 6e 3d  ssert( zPattern=
80c0: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
80d0: 65 78 74 28 61 72 67 76 5b 31 5d 29 20 29 3b 20  ext(argv[1]) ); 
80e0: 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20   /* No encoding 
80f0: 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 52 65 70  change */.  zRep
8100: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
8110: 5f 74 65 78 74 28 61 72 67 76 5b 32 5d 29 3b 0a  _text(argv[2]);.
8120: 20 20 69 66 28 20 7a 52 65 70 3d 3d 30 20 29 20    if( zRep==0 ) 
8130: 72 65 74 75 72 6e 3b 0a 20 20 6e 52 65 70 20 3d  return;.  nRep =
8140: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
8150: 79 74 65 73 28 61 72 67 76 5b 32 5d 29 3b 0a 20  ytes(argv[2]);. 
8160: 20 61 73 73 65 72 74 28 20 7a 52 65 70 3d 3d 73   assert( zRep==s
8170: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
8180: 74 28 61 72 67 76 5b 32 5d 29 20 29 3b 0a 20 20  t(argv[2]) );.  
8190: 6e 4f 75 74 20 3d 20 6e 53 74 72 20 2b 20 31 3b  nOut = nStr + 1;
81a0: 0a 20 20 61 73 73 65 72 74 28 20 6e 4f 75 74 3c  .  assert( nOut<
81b0: 53 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54  SQLITE_MAX_LENGT
81c0: 48 20 29 3b 0a 20 20 7a 4f 75 74 20 3d 20 63 6f  H );.  zOut = co
81d0: 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74  ntextMalloc(cont
81e0: 65 78 74 2c 20 28 69 36 34 29 6e 4f 75 74 29 3b  ext, (i64)nOut);
81f0: 0a 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29  .  if( zOut==0 )
8200: 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20  {.    return;.  
8210: 7d 0a 20 20 6c 6f 6f 70 4c 69 6d 69 74 20 3d 20  }.  loopLimit = 
8220: 6e 53 74 72 20 2d 20 6e 50 61 74 74 65 72 6e 3b  nStr - nPattern;
8230: 20 20 0a 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20    .  for(i=j=0; 
8240: 69 3c 3d 6c 6f 6f 70 4c 69 6d 69 74 3b 20 69 2b  i<=loopLimit; i+
8250: 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 53 74 72  +){.    if( zStr
8260: 5b 69 5d 21 3d 7a 50 61 74 74 65 72 6e 5b 30 5d  [i]!=zPattern[0]
8270: 20 7c 7c 20 6d 65 6d 63 6d 70 28 26 7a 53 74 72   || memcmp(&zStr
8280: 5b 69 5d 2c 20 7a 50 61 74 74 65 72 6e 2c 20 6e  [i], zPattern, n
8290: 50 61 74 74 65 72 6e 29 20 29 7b 0a 20 20 20 20  Pattern) ){.    
82a0: 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20 7a 53    zOut[j++] = zS
82b0: 74 72 5b 69 5d 3b 0a 20 20 20 20 7d 65 6c 73 65  tr[i];.    }else
82c0: 7b 0a 20 20 20 20 20 20 75 38 20 2a 7a 4f 6c 64  {.      u8 *zOld
82d0: 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 20  ;.      sqlite3 
82e0: 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  *db = sqlite3_co
82f0: 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28  ntext_db_handle(
8300: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20  context);.      
8310: 6e 4f 75 74 20 2b 3d 20 6e 52 65 70 20 2d 20 6e  nOut += nRep - n
8320: 50 61 74 74 65 72 6e 3b 0a 20 20 20 20 20 20 74  Pattern;.      t
8330: 65 73 74 63 61 73 65 28 20 6e 4f 75 74 2d 31 3d  estcase( nOut-1=
8340: 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49  =db->aLimit[SQLI
8350: 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d  TE_LIMIT_LENGTH]
8360: 20 29 3b 0a 20 20 20 20 20 20 74 65 73 74 63 61   );.      testca
8370: 73 65 28 20 6e 4f 75 74 2d 32 3d 3d 64 62 2d 3e  se( nOut-2==db->
8380: 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49  aLimit[SQLITE_LI
8390: 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20  MIT_LENGTH] );. 
83a0: 20 20 20 20 20 69 66 28 20 6e 4f 75 74 2d 31 3e       if( nOut-1>
83b0: 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  db->aLimit[SQLIT
83c0: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20  E_LIMIT_LENGTH] 
83d0: 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  ){.        sqlit
83e0: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
83f0: 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29 3b  toobig(context);
8400: 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33  .        sqlite3
8410: 5f 66 72 65 65 28 7a 4f 75 74 29 3b 0a 20 20 20  _free(zOut);.   
8420: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20       return;.   
8430: 20 20 20 7d 0a 20 20 20 20 20 20 7a 4f 6c 64 20     }.      zOld 
8440: 3d 20 7a 4f 75 74 3b 0a 20 20 20 20 20 20 7a 4f  = zOut;.      zO
8450: 75 74 20 3d 20 73 71 6c 69 74 65 33 5f 72 65 61  ut = sqlite3_rea
8460: 6c 6c 6f 63 28 7a 4f 75 74 2c 20 28 69 6e 74 29  lloc(zOut, (int)
8470: 6e 4f 75 74 29 3b 0a 20 20 20 20 20 20 69 66 28  nOut);.      if(
8480: 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20   zOut==0 ){.    
8490: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
84a0: 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63  lt_error_nomem(c
84b0: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 20  ontext);.       
84c0: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 4f   sqlite3_free(zO
84d0: 6c 64 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74  ld);.        ret
84e0: 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  urn;.      }.   
84f0: 20 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75 74 5b     memcpy(&zOut[
8500: 6a 5d 2c 20 7a 52 65 70 2c 20 6e 52 65 70 29 3b  j], zRep, nRep);
8510: 0a 20 20 20 20 20 20 6a 20 2b 3d 20 6e 52 65 70  .      j += nRep
8520: 3b 0a 20 20 20 20 20 20 69 20 2b 3d 20 6e 50 61  ;.      i += nPa
8530: 74 74 65 72 6e 2d 31 3b 0a 20 20 20 20 7d 0a 20  ttern-1;.    }. 
8540: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 6a 2b 6e   }.  assert( j+n
8550: 53 74 72 2d 69 2b 31 3d 3d 6e 4f 75 74 20 29 3b  Str-i+1==nOut );
8560: 0a 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75 74 5b  .  memcpy(&zOut[
8570: 6a 5d 2c 20 26 7a 53 74 72 5b 69 5d 2c 20 6e 53  j], &zStr[i], nS
8580: 74 72 2d 69 29 3b 0a 20 20 6a 20 2b 3d 20 6e 53  tr-i);.  j += nS
8590: 74 72 20 2d 20 69 3b 0a 20 20 61 73 73 65 72 74  tr - i;.  assert
85a0: 28 20 6a 3c 3d 6e 4f 75 74 20 29 3b 0a 20 20 7a  ( j<=nOut );.  z
85b0: 4f 75 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 73 71  Out[j] = 0;.  sq
85c0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
85d0: 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72  t(context, (char
85e0: 2a 29 7a 4f 75 74 2c 20 6a 2c 20 73 71 6c 69 74  *)zOut, j, sqlit
85f0: 65 33 5f 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a  e3_free);.}../*.
8600: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
8610: 6e 20 6f 66 20 74 68 65 20 54 52 49 4d 28 29 2c  n of the TRIM(),
8620: 20 4c 54 52 49 4d 28 29 2c 20 61 6e 64 20 52 54   LTRIM(), and RT
8630: 52 49 4d 28 29 20 66 75 6e 63 74 69 6f 6e 73 2e  RIM() functions.
8640: 0a 2a 2a 20 54 68 65 20 75 73 65 72 64 61 74 61  .** The userdata
8650: 20 69 73 20 30 78 31 20 66 6f 72 20 6c 65 66 74   is 0x1 for left
8660: 20 74 72 69 6d 2c 20 30 78 32 20 66 6f 72 20 72   trim, 0x2 for r
8670: 69 67 68 74 20 74 72 69 6d 2c 20 30 78 33 20 66  ight trim, 0x3 f
8680: 6f 72 20 62 6f 74 68 2e 0a 2a 2f 0a 73 74 61 74  or both..*/.stat
8690: 69 63 20 76 6f 69 64 20 74 72 69 6d 46 75 6e 63  ic void trimFunc
86a0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
86b0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
86c0: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
86d0: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
86e0: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69  .){.  const unsi
86f0: 67 6e 65 64 20 63 68 61 72 20 2a 7a 49 6e 3b 20  gned char *zIn; 
8700: 20 20 20 20 20 20 20 20 2f 2a 20 49 6e 70 75 74          /* Input
8710: 20 73 74 72 69 6e 67 20 2a 2f 0a 20 20 63 6f 6e   string */.  con
8720: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
8730: 20 2a 7a 43 68 61 72 53 65 74 3b 20 20 20 20 2f   *zCharSet;    /
8740: 2a 20 53 65 74 20 6f 66 20 63 68 61 72 61 63 74  * Set of charact
8750: 65 72 73 20 74 6f 20 74 72 69 6d 20 2a 2f 0a 20  ers to trim */. 
8760: 20 69 6e 74 20 6e 49 6e 3b 20 20 20 20 20 20 20   int nIn;       
8770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8780: 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20     /* Number of 
8790: 62 79 74 65 73 20 69 6e 20 69 6e 70 75 74 20 2a  bytes in input *
87a0: 2f 0a 20 20 69 6e 74 20 66 6c 61 67 73 3b 20 20  /.  int flags;  
87b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
87c0: 20 20 20 20 20 20 2f 2a 20 31 3a 20 74 72 69 6d        /* 1: trim
87d0: 6c 65 66 74 20 20 32 3a 20 74 72 69 6d 72 69 67  left  2: trimrig
87e0: 68 74 20 20 33 3a 20 74 72 69 6d 20 2a 2f 0a 20  ht  3: trim */. 
87f0: 20 69 6e 74 20 69 3b 20 20 20 20 20 20 20 20 20   int i;         
8800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8810: 20 20 20 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74     /* Loop count
8820: 65 72 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 64  er */.  unsigned
8830: 20 63 68 61 72 20 2a 61 4c 65 6e 20 3d 20 30 3b   char *aLen = 0;
8840: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 65 6e            /* Len
8850: 67 74 68 20 6f 66 20 65 61 63 68 20 63 68 61 72  gth of each char
8860: 61 63 74 65 72 20 69 6e 20 7a 43 68 61 72 53 65  acter in zCharSe
8870: 74 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20  t */.  unsigned 
8880: 63 68 61 72 20 2a 2a 61 7a 43 68 61 72 20 3d 20  char **azChar = 
8890: 30 3b 20 20 20 20 20 20 20 2f 2a 20 49 6e 64 69  0;       /* Indi
88a0: 76 69 64 75 61 6c 20 63 68 61 72 61 63 74 65 72  vidual character
88b0: 73 20 69 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f  s in zCharSet */
88c0: 0a 20 20 69 6e 74 20 6e 43 68 61 72 3b 20 20 20  .  int nChar;   
88d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
88e0: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
88f0: 66 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 20  f characters in 
8900: 7a 43 68 61 72 53 65 74 20 2a 2f 0a 0a 20 20 69  zCharSet */..  i
8910: 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  f( sqlite3_value
8920: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d  _type(argv[0])==
8930: 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20  SQLITE_NULL ){. 
8940: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20     return;.  }. 
8950: 20 7a 49 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76   zIn = sqlite3_v
8960: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
8970: 5d 29 3b 0a 20 20 69 66 28 20 7a 49 6e 3d 3d 30  ]);.  if( zIn==0
8980: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 49 6e   ) return;.  nIn
8990: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
89a0: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
89b0: 0a 20 20 61 73 73 65 72 74 28 20 7a 49 6e 3d 3d  .  assert( zIn==
89c0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
89d0: 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20  xt(argv[0]) );. 
89e0: 20 69 66 28 20 61 72 67 63 3d 3d 31 20 29 7b 0a   if( argc==1 ){.
89f0: 20 20 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74      static const
8a00: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 6c   unsigned char l
8a10: 65 6e 4f 6e 65 5b 5d 20 3d 20 7b 20 31 20 7d 3b  enOne[] = { 1 };
8a20: 0a 20 20 20 20 73 74 61 74 69 63 20 75 6e 73 69  .    static unsi
8a30: 67 6e 65 64 20 63 68 61 72 20 2a 20 63 6f 6e 73  gned char * cons
8a40: 74 20 61 7a 4f 6e 65 5b 5d 20 3d 20 7b 20 28 75  t azOne[] = { (u
8a50: 38 2a 29 22 20 22 20 7d 3b 0a 20 20 20 20 6e 43  8*)" " };.    nC
8a60: 68 61 72 20 3d 20 31 3b 0a 20 20 20 20 61 4c 65  har = 1;.    aLe
8a70: 6e 20 3d 20 28 75 38 2a 29 6c 65 6e 4f 6e 65 3b  n = (u8*)lenOne;
8a80: 0a 20 20 20 20 61 7a 43 68 61 72 20 3d 20 28 75  .    azChar = (u
8a90: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 2a 29  nsigned char **)
8aa0: 61 7a 4f 6e 65 3b 0a 20 20 20 20 7a 43 68 61 72  azOne;.    zChar
8ab0: 53 65 74 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65  Set = 0;.  }else
8ac0: 20 69 66 28 20 28 7a 43 68 61 72 53 65 74 20 3d   if( (zCharSet =
8ad0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
8ae0: 65 78 74 28 61 72 67 76 5b 31 5d 29 29 3d 3d 30  ext(argv[1]))==0
8af0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a   ){.    return;.
8b00: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 63 6f 6e    }else{.    con
8b10: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
8b20: 20 2a 7a 3b 0a 20 20 20 20 66 6f 72 28 7a 3d 7a   *z;.    for(z=z
8b30: 43 68 61 72 53 65 74 2c 20 6e 43 68 61 72 3d 30  CharSet, nChar=0
8b40: 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a  ; *z; nChar++){.
8b50: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
8b60: 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20 20 7d  P_UTF8(z);.    }
8b70: 0a 20 20 20 20 69 66 28 20 6e 43 68 61 72 3e 30  .    if( nChar>0
8b80: 20 29 7b 0a 20 20 20 20 20 20 61 7a 43 68 61 72   ){.      azChar
8b90: 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63   = contextMalloc
8ba0: 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34 29  (context, ((i64)
8bb0: 6e 43 68 61 72 29 2a 28 73 69 7a 65 6f 66 28 63  nChar)*(sizeof(c
8bc0: 68 61 72 2a 29 2b 31 29 29 3b 0a 20 20 20 20 20  har*)+1));.     
8bd0: 20 69 66 28 20 61 7a 43 68 61 72 3d 3d 30 20 29   if( azChar==0 )
8be0: 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e  {.        return
8bf0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
8c00: 61 4c 65 6e 20 3d 20 28 75 6e 73 69 67 6e 65 64  aLen = (unsigned
8c10: 20 63 68 61 72 2a 29 26 61 7a 43 68 61 72 5b 6e   char*)&azChar[n
8c20: 43 68 61 72 5d 3b 0a 20 20 20 20 20 20 66 6f 72  Char];.      for
8c30: 28 7a 3d 7a 43 68 61 72 53 65 74 2c 20 6e 43 68  (z=zCharSet, nCh
8c40: 61 72 3d 30 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b  ar=0; *z; nChar+
8c50: 2b 29 7b 0a 20 20 20 20 20 20 20 20 61 7a 43 68  +){.        azCh
8c60: 61 72 5b 6e 43 68 61 72 5d 20 3d 20 28 75 6e 73  ar[nChar] = (uns
8c70: 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a 3b 0a  igned char *)z;.
8c80: 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53          SQLITE_S
8c90: 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20  KIP_UTF8(z);.   
8ca0: 20 20 20 20 20 61 4c 65 6e 5b 6e 43 68 61 72 5d       aLen[nChar]
8cb0: 20 3d 20 28 75 38 29 28 7a 20 2d 20 61 7a 43 68   = (u8)(z - azCh
8cc0: 61 72 5b 6e 43 68 61 72 5d 29 3b 0a 20 20 20 20  ar[nChar]);.    
8cd0: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20    }.    }.  }.  
8ce0: 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b 0a 20  if( nChar>0 ){. 
8cf0: 20 20 20 66 6c 61 67 73 20 3d 20 53 51 4c 49 54     flags = SQLIT
8d00: 45 5f 50 54 52 5f 54 4f 5f 49 4e 54 28 73 71 6c  E_PTR_TO_INT(sql
8d10: 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63  ite3_user_data(c
8d20: 6f 6e 74 65 78 74 29 29 3b 0a 20 20 20 20 69 66  ontext));.    if
8d30: 28 20 66 6c 61 67 73 20 26 20 31 20 29 7b 0a 20  ( flags & 1 ){. 
8d40: 20 20 20 20 20 77 68 69 6c 65 28 20 6e 49 6e 3e       while( nIn>
8d50: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74  0 ){.        int
8d60: 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20   len = 0;.      
8d70: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 43 68    for(i=0; i<nCh
8d80: 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  ar; i++){.      
8d90: 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e 5b 69      len = aLen[i
8da0: 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28  ];.          if(
8db0: 20 6c 65 6e 3c 3d 6e 49 6e 20 26 26 20 6d 65 6d   len<=nIn && mem
8dc0: 63 6d 70 28 7a 49 6e 2c 20 61 7a 43 68 61 72 5b  cmp(zIn, azChar[
8dd0: 69 5d 2c 20 6c 65 6e 29 3d 3d 30 20 29 20 62 72  i], len)==0 ) br
8de0: 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  eak;.        }. 
8df0: 20 20 20 20 20 20 20 69 66 28 20 69 3e 3d 6e 43         if( i>=nC
8e00: 68 61 72 20 29 20 62 72 65 61 6b 3b 0a 20 20 20  har ) break;.   
8e10: 20 20 20 20 20 7a 49 6e 20 2b 3d 20 6c 65 6e 3b       zIn += len;
8e20: 0a 20 20 20 20 20 20 20 20 6e 49 6e 20 2d 3d 20  .        nIn -= 
8e30: 6c 65 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  len;.      }.   
8e40: 20 7d 0a 20 20 20 20 69 66 28 20 66 6c 61 67 73   }.    if( flags
8e50: 20 26 20 32 20 29 7b 0a 20 20 20 20 20 20 77 68   & 2 ){.      wh
8e60: 69 6c 65 28 20 6e 49 6e 3e 30 20 29 7b 0a 20 20  ile( nIn>0 ){.  
8e70: 20 20 20 20 20 20 69 6e 74 20 6c 65 6e 20 3d 20        int len = 
8e80: 30 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69  0;.        for(i
8e90: 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20 69 2b 2b  =0; i<nChar; i++
8ea0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6c 65 6e  ){.          len
8eb0: 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20 20 20   = aLen[i];.    
8ec0: 20 20 20 20 20 20 69 66 28 20 6c 65 6e 3c 3d 6e        if( len<=n
8ed0: 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28 26 7a 49  In && memcmp(&zI
8ee0: 6e 5b 6e 49 6e 2d 6c 65 6e 5d 2c 61 7a 43 68 61  n[nIn-len],azCha
8ef0: 72 5b 69 5d 2c 6c 65 6e 29 3d 3d 30 20 29 20 62  r[i],len)==0 ) b
8f00: 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 7d 0a  reak;.        }.
8f10: 20 20 20 20 20 20 20 20 69 66 28 20 69 3e 3d 6e          if( i>=n
8f20: 43 68 61 72 20 29 20 62 72 65 61 6b 3b 0a 20 20  Char ) break;.  
8f30: 20 20 20 20 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e        nIn -= len
8f40: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a  ;.      }.    }.
8f50: 20 20 20 20 69 66 28 20 7a 43 68 61 72 53 65 74      if( zCharSet
8f60: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
8f70: 33 5f 66 72 65 65 28 61 7a 43 68 61 72 29 3b 0a  3_free(azChar);.
8f80: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69      }.  }.  sqli
8f90: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
8fa0: 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29  context, (char*)
8fb0: 7a 49 6e 2c 20 6e 49 6e 2c 20 53 51 4c 49 54 45  zIn, nIn, SQLITE
8fc0: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 7d 0a 0a  _TRANSIENT);.}..
8fd0: 0a 2f 2a 20 49 4d 50 3a 20 52 2d 32 35 33 36 31  ./* IMP: R-25361
8fe0: 2d 31 36 31 35 30 20 54 68 69 73 20 66 75 6e 63  -16150 This func
8ff0: 74 69 6f 6e 20 69 73 20 6f 6d 69 74 74 65 64 20  tion is omitted 
9000: 66 72 6f 6d 20 53 51 4c 69 74 65 20 62 79 20 64  from SQLite by d
9010: 65 66 61 75 6c 74 2e 20 49 74 0a 2a 2a 20 69 73  efault. It.** is
9020: 20 6f 6e 6c 79 20 61 76 61 69 6c 61 62 6c 65 20   only available 
9030: 69 66 20 74 68 65 20 53 51 4c 49 54 45 5f 53 4f  if the SQLITE_SO
9040: 55 4e 44 45 58 20 63 6f 6d 70 69 6c 65 2d 74 69  UNDEX compile-ti
9050: 6d 65 20 6f 70 74 69 6f 6e 20 69 73 20 75 73 65  me option is use
9060: 64 0a 2a 2a 20 77 68 65 6e 20 53 51 4c 69 74 65  d.** when SQLite
9070: 20 69 73 20 62 75 69 6c 74 2e 0a 2a 2f 0a 23 69   is built..*/.#i
9080: 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e  fdef SQLITE_SOUN
9090: 44 45 58 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 75 74  DEX./*.** Comput
90a0: 65 20 74 68 65 20 73 6f 75 6e 64 65 78 20 65 6e  e the soundex en
90b0: 63 6f 64 69 6e 67 20 6f 66 20 61 20 77 6f 72 64  coding of a word
90c0: 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52 2d 35  ..**.** IMP: R-5
90d0: 39 37 38 32 2d 30 30 30 37 32 20 54 68 65 20 73  9782-00072 The s
90e0: 6f 75 6e 64 65 78 28 58 29 20 66 75 6e 63 74 69  oundex(X) functi
90f0: 6f 6e 20 72 65 74 75 72 6e 73 20 61 20 73 74 72  on returns a str
9100: 69 6e 67 20 74 68 61 74 20 69 73 20 74 68 65 0a  ing that is the.
9110: 2a 2a 20 73 6f 75 6e 64 65 78 20 65 6e 63 6f 64  ** soundex encod
9120: 69 6e 67 20 6f 66 20 74 68 65 20 73 74 72 69 6e  ing of the strin
9130: 67 20 58 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20  g X. .*/.static 
9140: 76 6f 69 64 20 73 6f 75 6e 64 65 78 46 75 6e 63  void soundexFunc
9150: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
9160: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
9170: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
9180: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
9190: 0a 29 7b 0a 20 20 63 68 61 72 20 7a 52 65 73 75  .){.  char zResu
91a0: 6c 74 5b 38 5d 3b 0a 20 20 63 6f 6e 73 74 20 75  lt[8];.  const u
91b0: 38 20 2a 7a 49 6e 3b 0a 20 20 69 6e 74 20 69 2c  8 *zIn;.  int i,
91c0: 20 6a 3b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e   j;.  static con
91d0: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
91e0: 20 69 43 6f 64 65 5b 5d 20 3d 20 7b 0a 20 20 20   iCode[] = {.   
91f0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9200: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9210: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9220: 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c  .    0, 0, 0, 0,
9230: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9240: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9250: 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30  , 0,.    0, 0, 0
9260: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9270: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9280: 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20  0, 0, 0,.    0, 
9290: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
92a0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
92b0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20   0, 0, 0, 0,.   
92c0: 20 30 2c 20 30 2c 20 31 2c 20 32 2c 20 33 2c 20   0, 0, 1, 2, 3, 
92d0: 30 2c 20 31 2c 20 32 2c 20 30 2c 20 30 2c 20 32  0, 1, 2, 0, 0, 2
92e0: 2c 20 32 2c 20 34 2c 20 35 2c 20 35 2c 20 30 2c  , 2, 4, 5, 5, 0,
92f0: 0a 20 20 20 20 31 2c 20 32 2c 20 36 2c 20 32 2c  .    1, 2, 6, 2,
9300: 20 33 2c 20 30 2c 20 31 2c 20 30 2c 20 32 2c 20   3, 0, 1, 0, 2, 
9310: 30 2c 20 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 2, 0, 0, 0, 0
9320: 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 31  , 0,.    0, 0, 1
9330: 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 32 2c  , 2, 3, 0, 1, 2,
9340: 20 30 2c 20 30 2c 20 32 2c 20 32 2c 20 34 2c 20   0, 0, 2, 2, 4, 
9350: 35 2c 20 35 2c 20 30 2c 0a 20 20 20 20 31 2c 20  5, 5, 0,.    1, 
9360: 32 2c 20 36 2c 20 32 2c 20 33 2c 20 30 2c 20 31  2, 6, 2, 3, 0, 1
9370: 2c 20 30 2c 20 32 2c 20 30 2c 20 32 2c 20 30 2c  , 0, 2, 0, 2, 0,
9380: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 7d   0, 0, 0, 0,.  }
9390: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
93a0: 3d 3d 31 20 29 3b 0a 20 20 7a 49 6e 20 3d 20 28  ==1 );.  zIn = (
93b0: 75 38 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  u8*)sqlite3_valu
93c0: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
93d0: 0a 20 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20  .  if( zIn==0 ) 
93e0: 7a 49 6e 20 3d 20 28 75 38 2a 29 22 22 3b 0a 20  zIn = (u8*)"";. 
93f0: 20 66 6f 72 28 69 3d 30 3b 20 7a 49 6e 5b 69 5d   for(i=0; zIn[i]
9400: 20 26 26 20 21 73 71 6c 69 74 65 33 49 73 61 6c   && !sqlite3Isal
9410: 70 68 61 28 7a 49 6e 5b 69 5d 29 3b 20 69 2b 2b  pha(zIn[i]); i++
9420: 29 7b 7d 0a 20 20 69 66 28 20 7a 49 6e 5b 69 5d  ){}.  if( zIn[i]
9430: 20 29 7b 0a 20 20 20 20 75 38 20 70 72 65 76 63   ){.    u8 prevc
9440: 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49 6e 5b  ode = iCode[zIn[
9450: 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20 7a 52  i]&0x7f];.    zR
9460: 65 73 75 6c 74 5b 30 5d 20 3d 20 73 71 6c 69 74  esult[0] = sqlit
9470: 65 33 54 6f 75 70 70 65 72 28 7a 49 6e 5b 69 5d  e3Toupper(zIn[i]
9480: 29 3b 0a 20 20 20 20 66 6f 72 28 6a 3d 31 3b 20  );.    for(j=1; 
9490: 6a 3c 34 20 26 26 20 7a 49 6e 5b 69 5d 3b 20 69  j<4 && zIn[i]; i
94a0: 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 63  ++){.      int c
94b0: 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49 6e 5b  ode = iCode[zIn[
94c0: 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20 20 20  i]&0x7f];.      
94d0: 69 66 28 20 63 6f 64 65 3e 30 20 29 7b 0a 20 20  if( code>0 ){.  
94e0: 20 20 20 20 20 20 69 66 28 20 63 6f 64 65 21 3d        if( code!=
94f0: 70 72 65 76 63 6f 64 65 20 29 7b 0a 20 20 20 20  prevcode ){.    
9500: 20 20 20 20 20 20 70 72 65 76 63 6f 64 65 20 3d        prevcode =
9510: 20 63 6f 64 65 3b 0a 20 20 20 20 20 20 20 20 20   code;.         
9520: 20 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20   zResult[j++] = 
9530: 63 6f 64 65 20 2b 20 27 30 27 3b 0a 20 20 20 20  code + '0';.    
9540: 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 65 6c 73      }.      }els
9550: 65 7b 0a 20 20 20 20 20 20 20 20 70 72 65 76 63  e{.        prevc
9560: 6f 64 65 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d  ode = 0;.      }
9570: 0a 20 20 20 20 7d 0a 20 20 20 20 77 68 69 6c 65  .    }.    while
9580: 28 20 6a 3c 34 20 29 7b 0a 20 20 20 20 20 20 7a  ( j<4 ){.      z
9590: 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 27 30  Result[j++] = '0
95a0: 27 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 52 65  ';.    }.    zRe
95b0: 73 75 6c 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 20  sult[j] = 0;.   
95c0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
95d0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 52  text(context, zR
95e0: 65 73 75 6c 74 2c 20 34 2c 20 53 51 4c 49 54 45  esult, 4, SQLITE
95f0: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d  _TRANSIENT);.  }
9600: 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 49 4d 50  else{.    /* IMP
9610: 3a 20 52 2d 36 34 38 39 34 2d 35 30 33 32 31 20  : R-64894-50321 
9620: 54 68 65 20 73 74 72 69 6e 67 20 22 3f 30 30 30  The string "?000
9630: 22 20 69 73 20 72 65 74 75 72 6e 65 64 20 69 66  " is returned if
9640: 20 74 68 65 20 61 72 67 75 6d 65 6e 74 0a 20 20   the argument.  
9650: 20 20 2a 2a 20 69 73 20 4e 55 4c 4c 20 6f 72 20    ** is NULL or 
9660: 63 6f 6e 74 61 69 6e 73 20 6e 6f 20 41 53 43 49  contains no ASCI
9670: 49 20 61 6c 70 68 61 62 65 74 69 63 20 63 68 61  I alphabetic cha
9680: 72 61 63 74 65 72 73 2e 20 2a 2f 0a 20 20 20 20  racters. */.    
9690: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
96a0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 22 3f 30  ext(context, "?0
96b0: 30 30 22 2c 20 34 2c 20 53 51 4c 49 54 45 5f 53  00", 4, SQLITE_S
96c0: 54 41 54 49 43 29 3b 0a 20 20 7d 0a 7d 0a 23 65  TATIC);.  }.}.#e
96d0: 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 53  ndif /* SQLITE_S
96e0: 4f 55 4e 44 45 58 20 2a 2f 0a 0a 23 69 66 6e 64  OUNDEX */..#ifnd
96f0: 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 4c  ef SQLITE_OMIT_L
9700: 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e 0a 2f 2a  OAD_EXTENSION./*
9710: 0a 2a 2a 20 41 20 66 75 6e 63 74 69 6f 6e 20 74  .** A function t
9720: 68 61 74 20 6c 6f 61 64 73 20 61 20 73 68 61 72  hat loads a shar
9730: 65 64 2d 6c 69 62 72 61 72 79 20 65 78 74 65 6e  ed-library exten
9740: 73 69 6f 6e 20 74 68 65 6e 20 72 65 74 75 72 6e  sion then return
9750: 73 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69  s NULL..*/.stati
9760: 63 20 76 6f 69 64 20 6c 6f 61 64 45 78 74 28 73  c void loadExt(s
9770: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
9780: 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67  context, int arg
9790: 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  c, sqlite3_value
97a0: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 6f 6e 73   **argv){.  cons
97b0: 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 20 3d 20  t char *zFile = 
97c0: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 73 71  (const char *)sq
97d0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
97e0: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 63 6f 6e  (argv[0]);.  con
97f0: 73 74 20 63 68 61 72 20 2a 7a 50 72 6f 63 3b 0a  st char *zProc;.
9800: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20    sqlite3 *db = 
9810: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
9820: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
9830: 74 29 3b 0a 20 20 63 68 61 72 20 2a 7a 45 72 72  t);.  char *zErr
9840: 4d 73 67 20 3d 20 30 3b 0a 0a 20 20 69 66 28 20  Msg = 0;..  if( 
9850: 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 7a  argc==2 ){.    z
9860: 50 72 6f 63 20 3d 20 28 63 6f 6e 73 74 20 63 68  Proc = (const ch
9870: 61 72 20 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  ar *)sqlite3_val
9880: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29  ue_text(argv[1])
9890: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a  ;.  }else{.    z
98a0: 50 72 6f 63 20 3d 20 30 3b 0a 20 20 7d 0a 20 20  Proc = 0;.  }.  
98b0: 69 66 28 20 7a 46 69 6c 65 20 26 26 20 73 71 6c  if( zFile && sql
98c0: 69 74 65 33 5f 6c 6f 61 64 5f 65 78 74 65 6e 73  ite3_load_extens
98d0: 69 6f 6e 28 64 62 2c 20 7a 46 69 6c 65 2c 20 7a  ion(db, zFile, z
98e0: 50 72 6f 63 2c 20 26 7a 45 72 72 4d 73 67 29 20  Proc, &zErrMsg) 
98f0: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
9900: 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74  esult_error(cont
9910: 65 78 74 2c 20 7a 45 72 72 4d 73 67 2c 20 2d 31  ext, zErrMsg, -1
9920: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66  );.    sqlite3_f
9930: 72 65 65 28 7a 45 72 72 4d 73 67 29 3b 0a 20 20  ree(zErrMsg);.  
9940: 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a  }.}.#endif.../*.
9950: 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f  ** An instance o
9960: 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20  f the following 
9970: 73 74 72 75 63 74 75 72 65 20 68 6f 6c 64 73 20  structure holds 
9980: 74 68 65 20 63 6f 6e 74 65 78 74 20 6f 66 20 61  the context of a
9990: 0a 2a 2a 20 73 75 6d 28 29 20 6f 72 20 61 76 67  .** sum() or avg
99a0: 28 29 20 61 67 67 72 65 67 61 74 65 20 63 6f 6d  () aggregate com
99b0: 70 75 74 61 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70  putation..*/.typ
99c0: 65 64 65 66 20 73 74 72 75 63 74 20 53 75 6d 43  edef struct SumC
99d0: 74 78 20 53 75 6d 43 74 78 3b 0a 73 74 72 75 63  tx SumCtx;.struc
99e0: 74 20 53 75 6d 43 74 78 20 7b 0a 20 20 64 6f 75  t SumCtx {.  dou
99f0: 62 6c 65 20 72 53 75 6d 3b 20 20 20 20 20 20 2f  ble rSum;      /
9a00: 2a 20 46 6c 6f 61 74 69 6e 67 20 70 6f 69 6e 74  * Floating point
9a10: 20 73 75 6d 20 2a 2f 0a 20 20 69 36 34 20 69 53   sum */.  i64 iS
9a20: 75 6d 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 49  um;         /* I
9a30: 6e 74 65 67 65 72 20 73 75 6d 20 2a 2f 20 20 20  nteger sum */   
9a40: 0a 20 20 69 36 34 20 63 6e 74 3b 20 20 20 20 20  .  i64 cnt;     
9a50: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
9a60: 66 20 65 6c 65 6d 65 6e 74 73 20 73 75 6d 6d 65  f elements summe
9a70: 64 20 2a 2f 0a 20 20 75 38 20 6f 76 65 72 66 6c  d */.  u8 overfl
9a80: 6f 77 3b 20 20 20 20 20 20 2f 2a 20 54 72 75 65  ow;      /* True
9a90: 20 69 66 20 69 6e 74 65 67 65 72 20 6f 76 65 72   if integer over
9aa0: 66 6c 6f 77 20 73 65 65 6e 20 2a 2f 0a 20 20 75  flow seen */.  u
9ab0: 38 20 61 70 70 72 6f 78 3b 20 20 20 20 20 20 20  8 approx;       
9ac0: 20 2f 2a 20 54 72 75 65 20 69 66 20 6e 6f 6e 2d   /* True if non-
9ad0: 69 6e 74 65 67 65 72 20 76 61 6c 75 65 20 77 61  integer value wa
9ae0: 73 20 69 6e 70 75 74 20 74 6f 20 74 68 65 20 73  s input to the s
9af0: 75 6d 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  um */.};../*.** 
9b00: 52 6f 75 74 69 6e 65 73 20 75 73 65 64 20 74 6f  Routines used to
9b10: 20 63 6f 6d 70 75 74 65 20 74 68 65 20 73 75 6d   compute the sum
9b20: 2c 20 61 76 65 72 61 67 65 2c 20 61 6e 64 20 74  , average, and t
9b30: 6f 74 61 6c 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20  otal..**.** The 
9b40: 53 55 4d 28 29 20 66 75 6e 63 74 69 6f 6e 20 66  SUM() function f
9b50: 6f 6c 6c 6f 77 73 20 74 68 65 20 28 62 72 6f 6b  ollows the (brok
9b60: 65 6e 29 20 53 51 4c 20 73 74 61 6e 64 61 72 64  en) SQL standard
9b70: 20 77 68 69 63 68 20 6d 65 61 6e 73 0a 2a 2a 20   which means.** 
9b80: 74 68 61 74 20 69 74 20 72 65 74 75 72 6e 73 20  that it returns 
9b90: 4e 55 4c 4c 20 69 66 20 69 74 20 73 75 6d 73 20  NULL if it sums 
9ba0: 6f 76 65 72 20 6e 6f 20 69 6e 70 75 74 73 2e 20  over no inputs. 
9bb0: 20 54 4f 54 41 4c 20 72 65 74 75 72 6e 73 0a 2a   TOTAL returns.*
9bc0: 2a 20 30 2e 30 20 69 6e 20 74 68 61 74 20 63 61  * 0.0 in that ca
9bd0: 73 65 2e 20 20 49 6e 20 61 64 64 69 74 69 6f 6e  se.  In addition
9be0: 2c 20 54 4f 54 41 4c 20 61 6c 77 61 79 73 20 72  , TOTAL always r
9bf0: 65 74 75 72 6e 73 20 61 20 66 6c 6f 61 74 20 77  eturns a float w
9c00: 68 65 72 65 0a 2a 2a 20 53 55 4d 20 6d 69 67 68  here.** SUM migh
9c10: 74 20 72 65 74 75 72 6e 20 61 6e 20 69 6e 74 65  t return an inte
9c20: 67 65 72 20 69 66 20 69 74 20 6e 65 76 65 72 20  ger if it never 
9c30: 65 6e 63 6f 75 6e 74 65 72 73 20 61 20 66 6c 6f  encounters a flo
9c40: 61 74 69 6e 67 20 70 6f 69 6e 74 0a 2a 2a 20 76  ating point.** v
9c50: 61 6c 75 65 2e 20 20 54 4f 54 41 4c 20 6e 65 76  alue.  TOTAL nev
9c60: 65 72 20 66 61 69 6c 73 2c 20 62 75 74 20 53 55  er fails, but SU
9c70: 4d 20 6d 69 67 68 74 20 74 68 72 6f 75 67 68 20  M might through 
9c80: 61 6e 20 65 78 63 65 70 74 69 6f 6e 20 69 66 0a  an exception if.
9c90: 2a 2a 20 69 74 20 6f 76 65 72 66 6c 6f 77 73 20  ** it overflows 
9ca0: 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a 73  an integer..*/.s
9cb0: 74 61 74 69 63 20 76 6f 69 64 20 73 75 6d 53 74  tatic void sumSt
9cc0: 65 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  ep(sqlite3_conte
9cd0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
9ce0: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
9cf0: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
9d00: 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 69 6e 74  SumCtx *p;.  int
9d10: 20 74 79 70 65 3b 0a 20 20 61 73 73 65 72 74 28   type;.  assert(
9d20: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e   argc==1 );.  UN
9d30: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
9d40: 72 67 63 29 3b 0a 20 20 70 20 3d 20 73 71 6c 69  rgc);.  p = sqli
9d50: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
9d60: 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  ntext(context, s
9d70: 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 74 79  izeof(*p));.  ty
9d80: 70 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  pe = sqlite3_val
9d90: 75 65 5f 6e 75 6d 65 72 69 63 5f 74 79 70 65 28  ue_numeric_type(
9da0: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20  argv[0]);.  if( 
9db0: 70 20 26 26 20 74 79 70 65 21 3d 53 51 4c 49 54  p && type!=SQLIT
9dc0: 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 70 2d  E_NULL ){.    p-
9dd0: 3e 63 6e 74 2b 2b 3b 0a 20 20 20 20 69 66 28 20  >cnt++;.    if( 
9de0: 74 79 70 65 3d 3d 53 51 4c 49 54 45 5f 49 4e 54  type==SQLITE_INT
9df0: 45 47 45 52 20 29 7b 0a 20 20 20 20 20 20 69 36  EGER ){.      i6
9e00: 34 20 76 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  4 v = sqlite3_va
9e10: 6c 75 65 5f 69 6e 74 36 34 28 61 72 67 76 5b 30  lue_int64(argv[0
9e20: 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e 72 53 75  ]);.      p->rSu
9e30: 6d 20 2b 3d 20 76 3b 0a 20 20 20 20 20 20 69 66  m += v;.      if
9e40: 28 20 28 70 2d 3e 61 70 70 72 6f 78 7c 70 2d 3e  ( (p->approx|p->
9e50: 6f 76 65 72 66 6c 6f 77 29 3d 3d 30 20 26 26 20  overflow)==0 && 
9e60: 73 71 6c 69 74 65 33 41 64 64 49 6e 74 36 34 28  sqlite3AddInt64(
9e70: 26 70 2d 3e 69 53 75 6d 2c 20 76 29 20 29 7b 0a  &p->iSum, v) ){.
9e80: 20 20 20 20 20 20 20 20 70 2d 3e 6f 76 65 72 66          p->overf
9e90: 6c 6f 77 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d  low = 1;.      }
9ea0: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
9eb0: 20 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 73 71 6c    p->rSum += sql
9ec0: 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c  ite3_value_doubl
9ed0: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  e(argv[0]);.    
9ee0: 20 20 70 2d 3e 61 70 70 72 6f 78 20 3d 20 31 3b    p->approx = 1;
9ef0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61  .    }.  }.}.sta
9f00: 74 69 63 20 76 6f 69 64 20 73 75 6d 46 69 6e 61  tic void sumFina
9f10: 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e  lize(sqlite3_con
9f20: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
9f30: 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70    SumCtx *p;.  p
9f40: 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65   = sqlite3_aggre
9f50: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
9f60: 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20  text, 0);.  if( 
9f70: 70 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b  p && p->cnt>0 ){
9f80: 0a 20 20 20 20 69 66 28 20 70 2d 3e 6f 76 65 72  .    if( p->over
9f90: 66 6c 6f 77 20 29 7b 0a 20 20 20 20 20 20 73 71  flow ){.      sq
9fa0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
9fb0: 6f 72 28 63 6f 6e 74 65 78 74 2c 22 69 6e 74 65  or(context,"inte
9fc0: 67 65 72 20 6f 76 65 72 66 6c 6f 77 22 2c 2d 31  ger overflow",-1
9fd0: 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28  );.    }else if(
9fe0: 20 70 2d 3e 61 70 70 72 6f 78 20 29 7b 0a 20 20   p->approx ){.  
9ff0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
a000: 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78  lt_double(contex
a010: 74 2c 20 70 2d 3e 72 53 75 6d 29 3b 0a 20 20 20  t, p->rSum);.   
a020: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 71   }else{.      sq
a030: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
a040: 36 34 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 69  64(context, p->i
a050: 53 75 6d 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  Sum);.    }.  }.
a060: 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 61 76  }.static void av
a070: 67 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65  gFinalize(sqlite
a080: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
a090: 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70  xt){.  SumCtx *p
a0a0: 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  p = sqlite3_
a0b0: 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78  aggregate_contex
a0c0: 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20  t(context, 0);. 
a0d0: 20 69 66 28 20 70 20 26 26 20 70 2d 3e 63 6e 74   if( p && p->cnt
a0e0: 3e 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  >0 ){.    sqlite
a0f0: 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28  3_result_double(
a100: 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 72 53 75 6d  context, p->rSum
a110: 2f 28 64 6f 75 62 6c 65 29 70 2d 3e 63 6e 74 29  /(double)p->cnt)
a120: 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76  ;.  }.}.static v
a130: 6f 69 64 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a  oid totalFinaliz
a140: 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  e(sqlite3_contex
a150: 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53  t *context){.  S
a160: 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20  umCtx *p;.  p = 
a170: 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74  sqlite3_aggregat
a180: 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78  e_context(contex
a190: 74 2c 20 30 29 3b 0a 20 20 2f 2a 20 28 64 6f 75  t, 0);.  /* (dou
a1a0: 62 6c 65 29 30 20 49 6e 20 63 61 73 65 20 6f 66  ble)0 In case of
a1b0: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f   SQLITE_OMIT_FLO
a1c0: 41 54 49 4e 47 5f 50 4f 49 4e 54 2e 2e 2e 20 2a  ATING_POINT... *
a1d0: 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  /.  sqlite3_resu
a1e0: 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78  lt_double(contex
a1f0: 74 2c 20 70 20 3f 20 70 2d 3e 72 53 75 6d 20 3a  t, p ? p->rSum :
a200: 20 28 64 6f 75 62 6c 65 29 30 29 3b 0a 7d 0a 0a   (double)0);.}..
a210: 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77  /*.** The follow
a220: 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 6b 65  ing structure ke
a230: 65 70 73 20 74 72 61 63 6b 20 6f 66 20 73 74 61  eps track of sta
a240: 74 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66  te information f
a250: 6f 72 20 74 68 65 0a 2a 2a 20 63 6f 75 6e 74 28  or the.** count(
a260: 29 20 61 67 67 72 65 67 61 74 65 20 66 75 6e 63  ) aggregate func
a270: 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66  tion..*/.typedef
a280: 20 73 74 72 75 63 74 20 43 6f 75 6e 74 43 74 78   struct CountCtx
a290: 20 43 6f 75 6e 74 43 74 78 3b 0a 73 74 72 75 63   CountCtx;.struc
a2a0: 74 20 43 6f 75 6e 74 43 74 78 20 7b 0a 20 20 69  t CountCtx {.  i
a2b0: 36 34 20 6e 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  64 n;.};../*.** 
a2c0: 52 6f 75 74 69 6e 65 73 20 74 6f 20 69 6d 70 6c  Routines to impl
a2d0: 65 6d 65 6e 74 20 74 68 65 20 63 6f 75 6e 74 28  ement the count(
a2e0: 29 20 61 67 67 72 65 67 61 74 65 20 66 75 6e 63  ) aggregate func
a2f0: 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  tion..*/.static 
a300: 76 6f 69 64 20 63 6f 75 6e 74 53 74 65 70 28 73  void countStep(s
a310: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
a320: 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67  context, int arg
a330: 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  c, sqlite3_value
a340: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 43 6f 75 6e   **argv){.  Coun
a350: 74 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73  tCtx *p;.  p = s
a360: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
a370: 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74  _context(context
a380: 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20  , sizeof(*p));. 
a390: 20 69 66 28 20 28 61 72 67 63 3d 3d 30 20 7c 7c   if( (argc==0 ||
a3a0: 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 21 3d 73 71   SQLITE_NULL!=sq
a3b0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
a3c0: 28 61 72 67 76 5b 30 5d 29 29 20 26 26 20 70 20  (argv[0])) && p 
a3d0: 29 7b 0a 20 20 20 20 70 2d 3e 6e 2b 2b 3b 0a 20  ){.    p->n++;. 
a3e0: 20 7d 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c 49   }..#ifndef SQLI
a3f0: 54 45 5f 4f 4d 49 54 5f 44 45 50 52 45 43 41 54  TE_OMIT_DEPRECAT
a400: 45 44 0a 20 20 2f 2a 20 54 68 65 20 73 71 6c 69  ED.  /* The sqli
a410: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
a420: 75 6e 74 28 29 20 66 75 6e 63 74 69 6f 6e 20 69  unt() function i
a430: 73 20 64 65 70 72 65 63 61 74 65 64 2e 20 20 42  s deprecated.  B
a440: 75 74 20 6a 75 73 74 20 74 6f 20 6d 61 6b 65 0a  ut just to make.
a450: 20 20 2a 2a 20 73 75 72 65 20 69 74 20 73 74 69    ** sure it sti
a460: 6c 6c 20 6f 70 65 72 61 74 65 73 20 63 6f 72 72  ll operates corr
a470: 65 63 74 6c 79 2c 20 76 65 72 69 66 79 20 74 68  ectly, verify th
a480: 61 74 20 69 74 73 20 63 6f 75 6e 74 20 61 67 72  at its count agr
a490: 65 65 73 20 77 69 74 68 20 6f 75 72 20 0a 20 20  ees with our .  
a4a0: 2a 2a 20 69 6e 74 65 72 6e 61 6c 20 63 6f 75 6e  ** internal coun
a4b0: 74 20 77 68 65 6e 20 75 73 69 6e 67 20 63 6f 75  t when using cou
a4c0: 6e 74 28 2a 29 20 61 6e 64 20 77 68 65 6e 20 74  nt(*) and when t
a4d0: 68 65 20 74 6f 74 61 6c 20 63 6f 75 6e 74 20 63  he total count c
a4e0: 61 6e 20 62 65 0a 20 20 2a 2a 20 65 78 70 72 65  an be.  ** expre
a4f0: 73 73 65 64 20 61 73 20 61 20 33 32 2d 62 69 74  ssed as a 32-bit
a500: 20 69 6e 74 65 67 65 72 2e 20 2a 2f 0a 20 20 61   integer. */.  a
a510: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c  ssert( argc==1 |
a520: 7c 20 70 3d 3d 30 20 7c 7c 20 70 2d 3e 6e 3e 30  | p==0 || p->n>0
a530: 78 37 66 66 66 66 66 66 66 0a 20 20 20 20 20 20  x7fffffff.      
a540: 20 20 20 20 7c 7c 20 70 2d 3e 6e 3d 3d 73 71 6c      || p->n==sql
a550: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
a560: 6f 75 6e 74 28 63 6f 6e 74 65 78 74 29 20 29 3b  ount(context) );
a570: 0a 23 65 6e 64 69 66 0a 7d 20 20 20 0a 73 74 61  .#endif.}   .sta
a580: 74 69 63 20 76 6f 69 64 20 63 6f 75 6e 74 46 69  tic void countFi
a590: 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63  nalize(sqlite3_c
a5a0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29  ontext *context)
a5b0: 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a 70 3b  {.  CountCtx *p;
a5c0: 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61  .  p = sqlite3_a
a5d0: 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74  ggregate_context
a5e0: 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20  (context, 0);.  
a5f0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
a600: 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 70 20  nt64(context, p 
a610: 3f 20 70 2d 3e 6e 20 3a 20 30 29 3b 0a 7d 0a 0a  ? p->n : 0);.}..
a620: 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20 74  /*.** Routines t
a630: 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 6d 69 6e 28  o implement min(
a640: 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67 67 72  ) and max() aggr
a650: 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 73 2e  egate functions.
a660: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
a670: 6d 69 6e 6d 61 78 53 74 65 70 28 0a 20 20 73 71  minmaxStep(.  sq
a680: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
a690: 6f 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 4e  ontext, .  int N
a6a0: 6f 74 55 73 65 64 2c 20 0a 20 20 73 71 6c 69 74  otUsed, .  sqlit
a6b0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
a6c0: 29 7b 0a 20 20 4d 65 6d 20 2a 70 41 72 67 20 20  ){.  Mem *pArg  
a6d0: 3d 20 28 4d 65 6d 20 2a 29 61 72 67 76 5b 30 5d  = (Mem *)argv[0]
a6e0: 3b 0a 20 20 4d 65 6d 20 2a 70 42 65 73 74 3b 0a  ;.  Mem *pBest;.
a6f0: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
a700: 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a 0a 20 20  ER(NotUsed);..  
a710: 70 42 65 73 74 20 3d 20 28 4d 65 6d 20 2a 29 73  pBest = (Mem *)s
a720: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
a730: 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74  _context(context
a740: 2c 20 73 69 7a 65 6f 66 28 2a 70 42 65 73 74 29  , sizeof(*pBest)
a750: 29 3b 0a 20 20 69 66 28 20 21 70 42 65 73 74 20  );.  if( !pBest 
a760: 29 20 72 65 74 75 72 6e 3b 0a 0a 20 20 69 66 28  ) return;..  if(
a770: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
a780: 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51  ype(argv[0])==SQ
a790: 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20  LITE_NULL ){.   
a7a0: 20 69 66 28 20 70 42 65 73 74 2d 3e 66 6c 61 67   if( pBest->flag
a7b0: 73 20 29 20 73 71 6c 69 74 65 33 53 6b 69 70 41  s ) sqlite3SkipA
a7c0: 63 63 75 6d 75 6c 61 74 6f 72 4c 6f 61 64 28 63  ccumulatorLoad(c
a7d0: 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65 6c 73 65  ontext);.  }else
a7e0: 20 69 66 28 20 70 42 65 73 74 2d 3e 66 6c 61 67   if( pBest->flag
a7f0: 73 20 29 7b 0a 20 20 20 20 69 6e 74 20 6d 61 78  s ){.    int max
a800: 3b 0a 20 20 20 20 69 6e 74 20 63 6d 70 3b 0a 20  ;.    int cmp;. 
a810: 20 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c     CollSeq *pCol
a820: 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74 46 75  l = sqlite3GetFu
a830: 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74 65 78  ncCollSeq(contex
a840: 74 29 3b 0a 20 20 20 20 2f 2a 20 54 68 69 73 20  t);.    /* This 
a850: 73 74 65 70 20 66 75 6e 63 74 69 6f 6e 20 69 73  step function is
a860: 20 75 73 65 64 20 66 6f 72 20 62 6f 74 68 20 74   used for both t
a870: 68 65 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78  he min() and max
a880: 28 29 20 61 67 67 72 65 67 61 74 65 73 2c 0a 20  () aggregates,. 
a890: 20 20 20 2a 2a 20 74 68 65 20 6f 6e 6c 79 20 64     ** the only d
a8a0: 69 66 66 65 72 65 6e 63 65 20 62 65 74 77 65 65  ifference betwee
a8b0: 6e 20 74 68 65 20 74 77 6f 20 62 65 69 6e 67 20  n the two being 
a8c0: 74 68 61 74 20 74 68 65 20 73 65 6e 73 65 20 6f  that the sense o
a8d0: 66 20 74 68 65 0a 20 20 20 20 2a 2a 20 63 6f 6d  f the.    ** com
a8e0: 70 61 72 69 73 6f 6e 20 69 73 20 69 6e 76 65 72  parison is inver
a8f0: 74 65 64 2e 20 46 6f 72 20 74 68 65 20 6d 61 78  ted. For the max
a900: 28 29 20 61 67 67 72 65 67 61 74 65 2c 20 74 68  () aggregate, th
a910: 65 0a 20 20 20 20 2a 2a 20 73 71 6c 69 74 65 33  e.    ** sqlite3
a920: 5f 75 73 65 72 5f 64 61 74 61 28 29 20 66 75 6e  _user_data() fun
a930: 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 28 76  ction returns (v
a940: 6f 69 64 20 2a 29 2d 31 2e 20 46 6f 72 20 6d 69  oid *)-1. For mi
a950: 6e 28 29 20 69 74 0a 20 20 20 20 2a 2a 20 72 65  n() it.    ** re
a960: 74 75 72 6e 73 20 28 76 6f 69 64 20 2a 29 64 62  turns (void *)db
a970: 2c 20 77 68 65 72 65 20 64 62 20 69 73 20 74 68  , where db is th
a980: 65 20 73 71 6c 69 74 65 33 2a 20 64 61 74 61 62  e sqlite3* datab
a990: 61 73 65 20 70 6f 69 6e 74 65 72 2e 0a 20 20 20  ase pointer..   
a9a0: 20 2a 2a 20 54 68 65 72 65 66 6f 72 65 20 74 68   ** Therefore th
a9b0: 65 20 6e 65 78 74 20 73 74 61 74 65 6d 65 6e 74  e next statement
a9c0: 20 73 65 74 73 20 76 61 72 69 61 62 6c 65 20 27   sets variable '
a9d0: 6d 61 78 27 20 74 6f 20 31 20 66 6f 72 20 74 68  max' to 1 for th
a9e0: 65 20 6d 61 78 28 29 0a 20 20 20 20 2a 2a 20 61  e max().    ** a
a9f0: 67 67 72 65 67 61 74 65 2c 20 6f 72 20 30 20 66  ggregate, or 0 f
aa00: 6f 72 20 6d 69 6e 28 29 2e 0a 20 20 20 20 2a 2f  or min()..    */
aa10: 0a 20 20 20 20 6d 61 78 20 3d 20 73 71 6c 69 74  .    max = sqlit
aa20: 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e  e3_user_data(con
aa30: 74 65 78 74 29 21 3d 30 3b 0a 20 20 20 20 63 6d  text)!=0;.    cm
aa40: 70 20 3d 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f  p = sqlite3MemCo
aa50: 6d 70 61 72 65 28 70 42 65 73 74 2c 20 70 41 72  mpare(pBest, pAr
aa60: 67 2c 20 70 43 6f 6c 6c 29 3b 0a 20 20 20 20 69  g, pColl);.    i
aa70: 66 28 20 28 6d 61 78 20 26 26 20 63 6d 70 3c 30  f( (max && cmp<0
aa80: 29 20 7c 7c 20 28 21 6d 61 78 20 26 26 20 63 6d  ) || (!max && cm
aa90: 70 3e 30 29 20 29 7b 0a 20 20 20 20 20 20 73 71  p>0) ){.      sq
aaa0: 6c 69 74 65 33 56 64 62 65 4d 65 6d 43 6f 70 79  lite3VdbeMemCopy
aab0: 28 70 42 65 73 74 2c 20 70 41 72 67 29 3b 0a 20  (pBest, pArg);. 
aac0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
aad0: 73 71 6c 69 74 65 33 53 6b 69 70 41 63 63 75 6d  sqlite3SkipAccum
aae0: 75 6c 61 74 6f 72 4c 6f 61 64 28 63 6f 6e 74 65  ulatorLoad(conte
aaf0: 78 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c  xt);.    }.  }el
ab00: 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 56  se{.    sqlite3V
ab10: 64 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74  dbeMemCopy(pBest
ab20: 2c 20 70 41 72 67 29 3b 0a 20 20 7d 0a 7d 0a 73  , pArg);.  }.}.s
ab30: 74 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 4d 61  tatic void minMa
ab40: 78 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65  xFinalize(sqlite
ab50: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
ab60: 78 74 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76  xt){.  sqlite3_v
ab70: 61 6c 75 65 20 2a 70 52 65 73 3b 0a 20 20 70 52  alue *pRes;.  pR
ab80: 65 73 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 61  es = (sqlite3_va
ab90: 6c 75 65 20 2a 29 73 71 6c 69 74 65 33 5f 61 67  lue *)sqlite3_ag
aba0: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
abb0: 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 69  context, 0);.  i
abc0: 66 28 20 70 52 65 73 20 29 7b 0a 20 20 20 20 69  f( pRes ){.    i
abd0: 66 28 20 70 52 65 73 2d 3e 66 6c 61 67 73 20 29  f( pRes->flags )
abe0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
abf0: 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e  result_value(con
ac00: 74 65 78 74 2c 20 70 52 65 73 29 3b 0a 20 20 20  text, pRes);.   
ac10: 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 56 64   }.    sqlite3Vd
ac20: 62 65 4d 65 6d 52 65 6c 65 61 73 65 28 70 52 65  beMemRelease(pRe
ac30: 73 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  s);.  }.}../*.**
ac40: 20 67 72 6f 75 70 5f 63 6f 6e 63 61 74 28 45 58   group_concat(EX
ac50: 50 52 2c 20 3f 53 45 50 41 52 41 54 4f 52 3f 29  PR, ?SEPARATOR?)
ac60: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
ac70: 67 72 6f 75 70 43 6f 6e 63 61 74 53 74 65 70 28  groupConcatStep(
ac80: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
ac90: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
aca0: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
acb0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
acc0: 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  ){.  const char 
acd0: 2a 7a 56 61 6c 3b 0a 20 20 53 74 72 41 63 63 75  *zVal;.  StrAccu
ace0: 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20 63 6f 6e  m *pAccum;.  con
acf0: 73 74 20 63 68 61 72 20 2a 7a 53 65 70 3b 0a 20  st char *zSep;. 
ad00: 20 69 6e 74 20 6e 56 61 6c 2c 20 6e 53 65 70 3b   int nVal, nSep;
ad10: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
ad20: 3d 31 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b  =1 || argc==2 );
ad30: 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76  .  if( sqlite3_v
ad40: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
ad50: 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20  ])==SQLITE_NULL 
ad60: 29 20 72 65 74 75 72 6e 3b 0a 20 20 70 41 63 63  ) return;.  pAcc
ad70: 75 6d 20 3d 20 28 53 74 72 41 63 63 75 6d 2a 29  um = (StrAccum*)
ad80: 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74  sqlite3_aggregat
ad90: 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78  e_context(contex
ada0: 74 2c 20 73 69 7a 65 6f 66 28 2a 70 41 63 63 75  t, sizeof(*pAccu
adb0: 6d 29 29 3b 0a 0a 20 20 69 66 28 20 70 41 63 63  m));..  if( pAcc
adc0: 75 6d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  um ){.    sqlite
add0: 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  3 *db = sqlite3_
ade0: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
adf0: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  e(context);.    
ae00: 69 6e 74 20 66 69 72 73 74 54 65 72 6d 20 3d 20  int firstTerm = 
ae10: 70 41 63 63 75 6d 2d 3e 75 73 65 4d 61 6c 6c 6f  pAccum->useMallo
ae20: 63 3d 3d 30 3b 0a 20 20 20 20 70 41 63 63 75 6d  c==0;.    pAccum
ae30: 2d 3e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 32 3b  ->useMalloc = 2;
ae40: 0a 20 20 20 20 70 41 63 63 75 6d 2d 3e 6d 78 41  .    pAccum->mxA
ae50: 6c 6c 6f 63 20 3d 20 64 62 2d 3e 61 4c 69 6d 69  lloc = db->aLimi
ae60: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
ae70: 45 4e 47 54 48 5d 3b 0a 20 20 20 20 69 66 28 20  ENGTH];.    if( 
ae80: 21 66 69 72 73 74 54 65 72 6d 20 29 7b 0a 20 20  !firstTerm ){.  
ae90: 20 20 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20      if( argc==2 
aea0: 29 7b 0a 20 20 20 20 20 20 20 20 7a 53 65 70 20  ){.        zSep 
aeb0: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
aec0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
aed0: 5b 31 5d 29 3b 0a 20 20 20 20 20 20 20 20 6e 53  [1]);.        nS
aee0: 65 70 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ep = sqlite3_val
aef0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 31 5d  ue_bytes(argv[1]
af00: 29 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a  );.      }else{.
af10: 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d 20 22          zSep = "
af20: 2c 22 3b 0a 20 20 20 20 20 20 20 20 6e 53 65 70  ,";.        nSep
af30: 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20   = 1;.      }.  
af40: 20 20 20 20 69 66 28 20 6e 53 65 70 20 29 20 73      if( nSep ) s
af50: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70  qlite3StrAccumAp
af60: 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 53 65  pend(pAccum, zSe
af70: 70 2c 20 6e 53 65 70 29 3b 0a 20 20 20 20 7d 0a  p, nSep);.    }.
af80: 20 20 20 20 7a 56 61 6c 20 3d 20 28 63 68 61 72      zVal = (char
af90: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  *)sqlite3_value_
afa0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
afb0: 20 20 20 6e 56 61 6c 20 3d 20 73 71 6c 69 74 65     nVal = sqlite
afc0: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
afd0: 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28 20  gv[0]);.    if( 
afe0: 7a 56 61 6c 20 29 20 73 71 6c 69 74 65 33 53 74  zVal ) sqlite3St
aff0: 72 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63  rAccumAppend(pAc
b000: 63 75 6d 2c 20 7a 56 61 6c 2c 20 6e 56 61 6c 29  cum, zVal, nVal)
b010: 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76  ;.  }.}.static v
b020: 6f 69 64 20 67 72 6f 75 70 43 6f 6e 63 61 74 46  oid groupConcatF
b030: 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f  inalize(sqlite3_
b040: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
b050: 29 7b 0a 20 20 53 74 72 41 63 63 75 6d 20 2a 70  ){.  StrAccum *p
b060: 41 63 63 75 6d 3b 0a 20 20 70 41 63 63 75 6d 20  Accum;.  pAccum 
b070: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
b080: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
b090: 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70  ext, 0);.  if( p
b0a0: 41 63 63 75 6d 20 29 7b 0a 20 20 20 20 69 66 28  Accum ){.    if(
b0b0: 20 70 41 63 63 75 6d 2d 3e 61 63 63 45 72 72 6f   pAccum->accErro
b0c0: 72 3d 3d 53 54 52 41 43 43 55 4d 5f 54 4f 4f 42  r==STRACCUM_TOOB
b0d0: 49 47 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  IG ){.      sqli
b0e0: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
b0f0: 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29  _toobig(context)
b100: 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20  ;.    }else if( 
b110: 70 41 63 63 75 6d 2d 3e 61 63 63 45 72 72 6f 72  pAccum->accError
b120: 3d 3d 53 54 52 41 43 43 55 4d 5f 4e 4f 4d 45 4d  ==STRACCUM_NOMEM
b130: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
b140: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e  3_result_error_n
b150: 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20  omem(context);. 
b160: 20 20 20 7d 65 6c 73 65 7b 20 20 20 20 0a 20 20     }else{    .  
b170: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
b180: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
b190: 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d   sqlite3StrAccum
b1a0: 46 69 6e 69 73 68 28 70 41 63 63 75 6d 29 2c 20  Finish(pAccum), 
b1b0: 2d 31 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20  -1, .           
b1c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                 s
b1d0: 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20  qlite3_free);.  
b1e0: 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a    }.  }.}../*.**
b1f0: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 64 6f   This routine do
b200: 65 73 20 70 65 72 2d 63 6f 6e 6e 65 63 74 69 6f  es per-connectio
b210: 6e 20 66 75 6e 63 74 69 6f 6e 20 72 65 67 69 73  n function regis
b220: 74 72 61 74 69 6f 6e 2e 20 20 4d 6f 73 74 0a 2a  tration.  Most.*
b230: 2a 20 6f 66 20 74 68 65 20 62 75 69 6c 74 2d 69  * of the built-i
b240: 6e 20 66 75 6e 63 74 69 6f 6e 73 20 61 62 6f 76  n functions abov
b250: 65 20 61 72 65 20 70 61 72 74 20 6f 66 20 74 68  e are part of th
b260: 65 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f  e global functio
b270: 6e 20 73 65 74 2e 0a 2a 2a 20 54 68 69 73 20 72  n set..** This r
b280: 6f 75 74 69 6e 65 20 6f 6e 6c 79 20 64 65 61 6c  outine only deal
b290: 73 20 77 69 74 68 20 74 68 6f 73 65 20 74 68 61  s with those tha
b2a0: 74 20 61 72 65 20 6e 6f 74 20 67 6c 6f 62 61 6c  t are not global
b2b0: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65  ..*/.void sqlite
b2c0: 33 52 65 67 69 73 74 65 72 42 75 69 6c 74 69 6e  3RegisterBuiltin
b2d0: 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65  Functions(sqlite
b2e0: 33 20 2a 64 62 29 7b 0a 20 20 69 6e 74 20 72 63  3 *db){.  int rc
b2f0: 20 3d 20 73 71 6c 69 74 65 33 5f 6f 76 65 72 6c   = sqlite3_overl
b300: 6f 61 64 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c  oad_function(db,
b310: 20 22 4d 41 54 43 48 22 2c 20 32 29 3b 0a 20 20   "MATCH", 2);.  
b320: 61 73 73 65 72 74 28 20 72 63 3d 3d 53 51 4c 49  assert( rc==SQLI
b330: 54 45 5f 4e 4f 4d 45 4d 20 7c 7c 20 72 63 3d 3d  TE_NOMEM || rc==
b340: 53 51 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20 20 69  SQLITE_OK );.  i
b350: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f  f( rc==SQLITE_NO
b360: 4d 45 4d 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d  MEM ){.    db->m
b370: 61 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b  allocFailed = 1;
b380: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65  .  }.}../*.** Se
b390: 74 20 74 68 65 20 4c 49 4b 45 4f 50 54 20 66 6c  t the LIKEOPT fl
b3a0: 61 67 20 6f 6e 20 74 68 65 20 32 2d 61 72 67 75  ag on the 2-argu
b3b0: 6d 65 6e 74 20 66 75 6e 63 74 69 6f 6e 20 77 69  ment function wi
b3c0: 74 68 20 74 68 65 20 67 69 76 65 6e 20 6e 61 6d  th the given nam
b3d0: 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  e..*/.static voi
b3e0: 64 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67  d setLikeOptFlag
b3f0: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f  (sqlite3 *db, co
b400: 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c  nst char *zName,
b410: 20 75 38 20 66 6c 61 67 56 61 6c 29 7b 0a 20 20   u8 flagVal){.  
b420: 46 75 6e 63 44 65 66 20 2a 70 44 65 66 3b 0a 20  FuncDef *pDef;. 
b430: 20 70 44 65 66 20 3d 20 73 71 6c 69 74 65 33 46   pDef = sqlite3F
b440: 69 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20  indFunction(db, 
b450: 7a 4e 61 6d 65 2c 20 73 71 6c 69 74 65 33 53 74  zName, sqlite3St
b460: 72 6c 65 6e 33 30 28 7a 4e 61 6d 65 29 2c 0a 20  rlen30(zName),. 
b470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b480: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 53              2, S
b490: 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 29 3b 0a  QLITE_UTF8, 0);.
b4a0: 20 20 69 66 28 20 41 4c 57 41 59 53 28 70 44 65    if( ALWAYS(pDe
b4b0: 66 29 20 29 7b 0a 20 20 20 20 70 44 65 66 2d 3e  f) ){.    pDef->
b4c0: 66 75 6e 63 46 6c 61 67 73 20 7c 3d 20 66 6c 61  funcFlags |= fla
b4d0: 67 56 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  gVal;.  }.}../*.
b4e0: 2a 2a 20 52 65 67 69 73 74 65 72 20 74 68 65 20  ** Register the 
b4f0: 62 75 69 6c 74 2d 69 6e 20 4c 49 4b 45 20 61 6e  built-in LIKE an
b500: 64 20 47 4c 4f 42 20 66 75 6e 63 74 69 6f 6e 73  d GLOB functions
b510: 2e 20 20 54 68 65 20 63 61 73 65 53 65 6e 73 69  .  The caseSensi
b520: 74 69 76 65 0a 2a 2a 20 70 61 72 61 6d 65 74 65  tive.** paramete
b530: 72 20 64 65 74 65 72 6d 69 6e 65 73 20 77 68 65  r determines whe
b540: 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 65 20  ther or not the 
b550: 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 69 73  LIKE operator is
b560: 20 63 61 73 65 0a 2a 2a 20 73 65 6e 73 69 74 69   case.** sensiti
b570: 76 65 2e 20 20 47 4c 4f 42 20 69 73 20 61 6c 77  ve.  GLOB is alw
b580: 61 79 73 20 63 61 73 65 20 73 65 6e 73 69 74 69  ays case sensiti
b590: 76 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69  ve..*/.void sqli
b5a0: 74 65 33 52 65 67 69 73 74 65 72 4c 69 6b 65 46  te3RegisterLikeF
b5b0: 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69 74 65 33  unctions(sqlite3
b5c0: 20 2a 64 62 2c 20 69 6e 74 20 63 61 73 65 53 65   *db, int caseSe
b5d0: 6e 73 69 74 69 76 65 29 7b 0a 20 20 73 74 72 75  nsitive){.  stru
b5e0: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a  ct compareInfo *
b5f0: 70 49 6e 66 6f 3b 0a 20 20 69 66 28 20 63 61 73  pInfo;.  if( cas
b600: 65 53 65 6e 73 69 74 69 76 65 20 29 7b 0a 20 20  eSensitive ){.  
b610: 20 20 70 49 6e 66 6f 20 3d 20 28 73 74 72 75 63    pInfo = (struc
b620: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26  t compareInfo*)&
b630: 6c 69 6b 65 49 6e 66 6f 41 6c 74 3b 0a 20 20 7d  likeInfoAlt;.  }
b640: 65 6c 73 65 7b 0a 20 20 20 20 70 49 6e 66 6f 20  else{.    pInfo 
b650: 3d 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72  = (struct compar
b660: 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66 6f  eInfo*)&likeInfo
b670: 4e 6f 72 6d 3b 0a 20 20 7d 0a 20 20 73 71 6c 69  Norm;.  }.  sqli
b680: 74 65 33 43 72 65 61 74 65 46 75 6e 63 28 64 62  te3CreateFunc(db
b690: 2c 20 22 6c 69 6b 65 22 2c 20 32 2c 20 53 51 4c  , "like", 2, SQL
b6a0: 49 54 45 5f 55 54 46 38 2c 20 70 49 6e 66 6f 2c  ITE_UTF8, pInfo,
b6b0: 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30 2c   likeFunc, 0, 0,
b6c0: 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 43 72   0);.  sqlite3Cr
b6d0: 65 61 74 65 46 75 6e 63 28 64 62 2c 20 22 6c 69  eateFunc(db, "li
b6e0: 6b 65 22 2c 20 33 2c 20 53 51 4c 49 54 45 5f 55  ke", 3, SQLITE_U
b6f0: 54 46 38 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65  TF8, pInfo, like
b700: 46 75 6e 63 2c 20 30 2c 20 30 2c 20 30 29 3b 0a  Func, 0, 0, 0);.
b710: 20 20 73 71 6c 69 74 65 33 43 72 65 61 74 65 46    sqlite3CreateF
b720: 75 6e 63 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20  unc(db, "glob", 
b730: 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  2, SQLITE_UTF8, 
b740: 0a 20 20 20 20 20 20 28 73 74 72 75 63 74 20 63  .      (struct c
b750: 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26 67 6c 6f  ompareInfo*)&glo
b760: 62 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c  bInfo, likeFunc,
b770: 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73 65 74   0, 0, 0);.  set
b780: 4c 69 6b 65 4f 70 74 46 6c 61 67 28 64 62 2c 20  LikeOptFlag(db, 
b790: 22 67 6c 6f 62 22 2c 20 53 51 4c 49 54 45 5f 46  "glob", SQLITE_F
b7a0: 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49 54  UNC_LIKE | SQLIT
b7b0: 45 5f 46 55 4e 43 5f 43 41 53 45 29 3b 0a 20 20  E_FUNC_CASE);.  
b7c0: 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 64  setLikeOptFlag(d
b7d0: 62 2c 20 22 6c 69 6b 65 22 2c 20 0a 20 20 20 20  b, "like", .    
b7e0: 20 20 63 61 73 65 53 65 6e 73 69 74 69 76 65 20    caseSensitive 
b7f0: 3f 20 28 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c  ? (SQLITE_FUNC_L
b800: 49 4b 45 20 7c 20 53 51 4c 49 54 45 5f 46 55 4e  IKE | SQLITE_FUN
b810: 43 5f 43 41 53 45 29 20 3a 20 53 51 4c 49 54 45  C_CASE) : SQLITE
b820: 5f 46 55 4e 43 5f 4c 49 4b 45 29 3b 0a 7d 0a 0a  _FUNC_LIKE);.}..
b830: 2f 2a 0a 2a 2a 20 70 45 78 70 72 20 70 6f 69 6e  /*.** pExpr poin
b840: 74 73 20 74 6f 20 61 6e 20 65 78 70 72 65 73 73  ts to an express
b850: 69 6f 6e 20 77 68 69 63 68 20 69 6d 70 6c 65 6d  ion which implem
b860: 65 6e 74 73 20 61 20 66 75 6e 63 74 69 6f 6e 2e  ents a function.
b870: 20 20 49 66 0a 2a 2a 20 69 74 20 69 73 20 61 70    If.** it is ap
b880: 70 72 6f 70 72 69 61 74 65 20 74 6f 20 61 70 70  propriate to app
b890: 6c 79 20 74 68 65 20 4c 49 4b 45 20 6f 70 74 69  ly the LIKE opti
b8a0: 6d 69 7a 61 74 69 6f 6e 20 74 6f 20 74 68 61 74  mization to that
b8b0: 20 66 75 6e 63 74 69 6f 6e 0a 2a 2a 20 74 68 65   function.** the
b8c0: 6e 20 73 65 74 20 61 57 63 5b 30 5d 20 74 68 72  n set aWc[0] thr
b8d0: 6f 75 67 68 20 61 57 63 5b 32 5d 20 74 6f 20 74  ough aWc[2] to t
b8e0: 68 65 20 77 69 6c 64 63 61 72 64 20 63 68 61 72  he wildcard char
b8f0: 61 63 74 65 72 73 20 61 6e 64 0a 2a 2a 20 72 65  acters and.** re
b900: 74 75 72 6e 20 54 52 55 45 2e 20 20 49 66 20 74  turn TRUE.  If t
b910: 68 65 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6e  he function is n
b920: 6f 74 20 61 20 4c 49 4b 45 2d 73 74 79 6c 65 20  ot a LIKE-style 
b930: 66 75 6e 63 74 69 6f 6e 20 74 68 65 6e 0a 2a 2a  function then.**
b940: 20 72 65 74 75 72 6e 20 46 41 4c 53 45 2e 0a 2a   return FALSE..*
b950: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 49 73 4c  /.int sqlite3IsL
b960: 69 6b 65 46 75 6e 63 74 69 6f 6e 28 73 71 6c 69  ikeFunction(sqli
b970: 74 65 33 20 2a 64 62 2c 20 45 78 70 72 20 2a 70  te3 *db, Expr *p
b980: 45 78 70 72 2c 20 69 6e 74 20 2a 70 49 73 4e 6f  Expr, int *pIsNo
b990: 63 61 73 65 2c 20 63 68 61 72 20 2a 61 57 63 29  case, char *aWc)
b9a0: 7b 0a 20 20 46 75 6e 63 44 65 66 20 2a 70 44 65  {.  FuncDef *pDe
b9b0: 66 3b 0a 20 20 69 66 28 20 70 45 78 70 72 2d 3e  f;.  if( pExpr->
b9c0: 6f 70 21 3d 54 4b 5f 46 55 4e 43 54 49 4f 4e 20  op!=TK_FUNCTION 
b9d0: 0a 20 20 20 7c 7c 20 21 70 45 78 70 72 2d 3e 78  .   || !pExpr->x
b9e0: 2e 70 4c 69 73 74 20 0a 20 20 20 7c 7c 20 70 45  .pList .   || pE
b9f0: 78 70 72 2d 3e 78 2e 70 4c 69 73 74 2d 3e 6e 45  xpr->x.pList->nE
ba00: 78 70 72 21 3d 32 0a 20 20 29 7b 0a 20 20 20 20  xpr!=2.  ){.    
ba10: 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20  return 0;.  }.  
ba20: 61 73 73 65 72 74 28 20 21 45 78 70 72 48 61 73  assert( !ExprHas
ba30: 50 72 6f 70 65 72 74 79 28 70 45 78 70 72 2c 20  Property(pExpr, 
ba40: 45 50 5f 78 49 73 53 65 6c 65 63 74 29 20 29 3b  EP_xIsSelect) );
ba50: 0a 20 20 70 44 65 66 20 3d 20 73 71 6c 69 74 65  .  pDef = sqlite
ba60: 33 46 69 6e 64 46 75 6e 63 74 69 6f 6e 28 64 62  3FindFunction(db
ba70: 2c 20 70 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b 65  , pExpr->u.zToke
ba80: 6e 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20  n, .            
ba90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
baa0: 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30   sqlite3Strlen30
bab0: 28 70 45 78 70 72 2d 3e 75 2e 7a 54 6f 6b 65 6e  (pExpr->u.zToken
bac0: 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  ),.             
bad0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
bae0: 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20  2, SQLITE_UTF8, 
baf0: 30 29 3b 0a 20 20 69 66 28 20 4e 45 56 45 52 28  0);.  if( NEVER(
bb00: 70 44 65 66 3d 3d 30 29 20 7c 7c 20 28 70 44 65  pDef==0) || (pDe
bb10: 66 2d 3e 66 75 6e 63 46 6c 61 67 73 20 26 20 53  f->funcFlags & S
bb20: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29  QLITE_FUNC_LIKE)
bb30: 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  ==0 ){.    retur
bb40: 6e 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54  n 0;.  }..  /* T
bb50: 68 65 20 6d 65 6d 63 70 79 28 29 20 73 74 61 74  he memcpy() stat
bb60: 65 6d 65 6e 74 20 61 73 73 75 6d 65 73 20 74 68  ement assumes th
bb70: 61 74 20 74 68 65 20 77 69 6c 64 63 61 72 64 20  at the wildcard 
bb80: 63 68 61 72 61 63 74 65 72 73 20 61 72 65 0a 20  characters are. 
bb90: 20 2a 2a 20 74 68 65 20 66 69 72 73 74 20 74 68   ** the first th
bba0: 72 65 65 20 73 74 61 74 65 6d 65 6e 74 73 20 69  ree statements i
bbb0: 6e 20 74 68 65 20 63 6f 6d 70 61 72 65 49 6e 66  n the compareInf
bbc0: 6f 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68  o structure.  Th
bbd0: 65 0a 20 20 2a 2a 20 61 73 73 65 72 74 73 28 29  e.  ** asserts()
bbe0: 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 76 65 72   that follow ver
bbf0: 69 66 79 20 74 68 61 74 20 61 73 73 75 6d 70 74  ify that assumpt
bc00: 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6d 65 6d 63 70  ion.  */.  memcp
bc10: 79 28 61 57 63 2c 20 70 44 65 66 2d 3e 70 55 73  y(aWc, pDef->pUs
bc20: 65 72 44 61 74 61 2c 20 33 29 3b 0a 20 20 61 73  erData, 3);.  as
bc30: 73 65 72 74 28 20 28 63 68 61 72 2a 29 26 6c 69  sert( (char*)&li
bc40: 6b 65 49 6e 66 6f 41 6c 74 20 3d 3d 20 28 63 68  keInfoAlt == (ch
bc50: 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74  ar*)&likeInfoAlt
bc60: 2e 6d 61 74 63 68 41 6c 6c 20 29 3b 0a 20 20 61  .matchAll );.  a
bc70: 73 73 65 72 74 28 20 26 28 28 63 68 61 72 2a 29  ssert( &((char*)
bc80: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 31 5d  &likeInfoAlt)[1]
bc90: 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65   == (char*)&like
bca0: 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 4f 6e 65  InfoAlt.matchOne
bcb0: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28   );.  assert( &(
bcc0: 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f  (char*)&likeInfo
bcd0: 41 6c 74 29 5b 32 5d 20 3d 3d 20 28 63 68 61 72  Alt)[2] == (char
bce0: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d  *)&likeInfoAlt.m
bcf0: 61 74 63 68 53 65 74 20 29 3b 0a 20 20 2a 70 49  atchSet );.  *pI
bd00: 73 4e 6f 63 61 73 65 20 3d 20 28 70 44 65 66 2d  sNocase = (pDef-
bd10: 3e 66 75 6e 63 46 6c 61 67 73 20 26 20 53 51 4c  >funcFlags & SQL
bd20: 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d 3d  ITE_FUNC_CASE)==
bd30: 30 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d  0;.  return 1;.}
bd40: 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 20 61 6c 6c 20  ../*.** All all 
bd50: 6f 66 20 74 68 65 20 46 75 6e 63 44 65 66 20 73  of the FuncDef s
bd60: 74 72 75 63 74 75 72 65 73 20 69 6e 20 74 68 65  tructures in the
bd70: 20 61 42 75 69 6c 74 69 6e 46 75 6e 63 5b 5d 20   aBuiltinFunc[] 
bd80: 61 72 72 61 79 20 61 62 6f 76 65 0a 2a 2a 20 74  array above.** t
bd90: 6f 20 74 68 65 20 67 6c 6f 62 61 6c 20 66 75 6e  o the global fun
bda0: 63 74 69 6f 6e 20 68 61 73 68 20 74 61 62 6c 65  ction hash table
bdb0: 2e 20 20 54 68 69 73 20 6f 63 63 75 72 73 20 61  .  This occurs a
bdc0: 74 20 73 74 61 72 74 2d 74 69 6d 65 20 28 61 73  t start-time (as
bdd0: 0a 2a 2a 20 61 20 63 6f 6e 73 65 71 75 65 6e 63  .** a consequenc
bde0: 65 20 6f 66 20 63 61 6c 6c 69 6e 67 20 73 71 6c  e of calling sql
bdf0: 69 74 65 33 5f 69 6e 69 74 69 61 6c 69 7a 65 28  ite3_initialize(
be00: 29 29 2e 0a 2a 2a 0a 2a 2a 20 41 66 74 65 72 20  ))..**.** After 
be10: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 75 6e  this routine run
be20: 73 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65  s.*/.void sqlite
be30: 33 52 65 67 69 73 74 65 72 47 6c 6f 62 61 6c 46  3RegisterGlobalF
be40: 75 6e 63 74 69 6f 6e 73 28 76 6f 69 64 29 7b 0a  unctions(void){.
be50: 20 20 2f 2a 0a 20 20 2a 2a 20 54 68 65 20 66 6f    /*.  ** The fo
be60: 6c 6c 6f 77 69 6e 67 20 61 72 72 61 79 20 68 6f  llowing array ho
be70: 6c 64 73 20 46 75 6e 63 44 65 66 20 73 74 72 75  lds FuncDef stru
be80: 63 74 75 72 65 73 20 66 6f 72 20 61 6c 6c 20 6f  ctures for all o
be90: 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 73 0a  f the functions.
bea0: 20 20 2a 2a 20 64 65 66 69 6e 65 64 20 69 6e 20    ** defined in 
beb0: 74 68 69 73 20 66 69 6c 65 2e 0a 20 20 2a 2a 0a  this file..  **.
bec0: 20 20 2a 2a 20 54 68 65 20 61 72 72 61 79 20 63    ** The array c
bed0: 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 73 74 61 6e  annot be constan
bee0: 74 20 73 69 6e 63 65 20 63 68 61 6e 67 65 73 20  t since changes 
bef0: 61 72 65 20 6d 61 64 65 20 74 6f 20 74 68 65 0a  are made to the.
bf00: 20 20 2a 2a 20 46 75 6e 63 44 65 66 2e 70 48 61    ** FuncDef.pHa
bf10: 73 68 20 65 6c 65 6d 65 6e 74 73 20 61 74 20 73  sh elements at s
bf20: 74 61 72 74 2d 74 69 6d 65 2e 20 20 54 68 65 20  tart-time.  The 
bf30: 65 6c 65 6d 65 6e 74 73 20 6f 66 20 74 68 69 73  elements of this
bf40: 20 61 72 72 61 79 0a 20 20 2a 2a 20 61 72 65 20   array.  ** are 
bf50: 72 65 61 64 2d 6f 6e 6c 79 20 61 66 74 65 72 20  read-only after 
bf60: 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 20 69  initialization i
bf70: 73 20 63 6f 6d 70 6c 65 74 65 2e 0a 20 20 2a 2f  s complete..  */
bf80: 0a 20 20 73 74 61 74 69 63 20 53 51 4c 49 54 45  .  static SQLITE
bf90: 5f 57 53 44 20 46 75 6e 63 44 65 66 20 61 42 75  _WSD FuncDef aBu
bfa0: 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 3d 20 7b 0a  iltinFunc[] = {.
bfb0: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74 72      FUNCTION(ltr
bfc0: 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  im,             
bfd0: 20 31 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46 75   1, 1, 0, trimFu
bfe0: 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20  nc         ),.  
bff0: 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d    FUNCTION(ltrim
c000: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32  ,              2
c010: 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63  , 1, 0, trimFunc
c020: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20           ),.    
c030: 46 55 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c 20  FUNCTION(rtrim, 
c040: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
c050: 32 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20  2, 0, trimFunc  
c060: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
c070: 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20  NCTION(rtrim,   
c080: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 32 2c             2, 2,
c090: 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20   0, trimFunc    
c0a0: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c0b0: 54 49 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20 20  TION(trim,      
c0c0: 20 20 20 20 20 20 20 20 20 31 2c 20 33 2c 20 30           1, 3, 0
c0d0: 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20  , trimFunc      
c0e0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
c0f0: 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20 20 20 20  ON(trim,        
c100: 20 20 20 20 20 20 20 32 2c 20 33 2c 20 30 2c 20         2, 3, 0, 
c110: 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20  trimFunc        
c120: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c130: 28 6d 69 6e 2c 20 20 20 20 20 20 20 20 20 20 20  (min,           
c140: 20 20 20 20 2d 31 2c 20 30 2c 20 31 2c 20 6d 69      -1, 0, 1, mi
c150: 6e 6d 61 78 46 75 6e 63 20 20 20 20 20 20 20 29  nmaxFunc       )
c160: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d  ,.    FUNCTION(m
c170: 69 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  in,             
c180: 20 20 20 30 2c 20 30 2c 20 31 2c 20 30 20 20 20     0, 0, 1, 0   
c190: 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a               ),.
c1a0: 20 20 20 20 41 47 47 52 45 47 41 54 45 28 6d 69      AGGREGATE(mi
c1b0: 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  n,              
c1c0: 20 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78   1, 0, 1, minmax
c1d0: 53 74 65 70 2c 20 20 20 20 20 20 6d 69 6e 4d 61  Step,      minMa
c1e0: 78 46 69 6e 61 6c 69 7a 65 20 29 2c 0a 20 20 20  xFinalize ),.   
c1f0: 20 46 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20 20   FUNCTION(max,  
c200: 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c               -1,
c210: 20 31 2c 20 31 2c 20 6d 69 6e 6d 61 78 46 75 6e   1, 1, minmaxFun
c220: 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46  c       ),.    F
c230: 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20 20  UNCTION(max,    
c240: 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 31              0, 1
c250: 2c 20 31 2c 20 30 20 20 20 20 20 20 20 20 20 20  , 1, 0          
c260: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47        ),.    AGG
c270: 52 45 47 41 54 45 28 6d 61 78 2c 20 20 20 20 20  REGATE(max,     
c280: 20 20 20 20 20 20 20 20 20 20 31 2c 20 31 2c 20            1, 1, 
c290: 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20 20  1, minmaxStep,  
c2a0: 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c 69      minMaxFinali
c2b0: 7a 65 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49  ze ),.    FUNCTI
c2c0: 4f 4e 32 28 74 79 70 65 6f 66 2c 20 20 20 20 20  ON2(typeof,     
c2d0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
c2e0: 74 79 70 65 6f 66 46 75 6e 63 2c 20 20 53 51 4c  typeofFunc,  SQL
c2f0: 49 54 45 5f 46 55 4e 43 5f 54 59 50 45 4f 46 29  ITE_FUNC_TYPEOF)
c300: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 32 28  ,.    FUNCTION2(
c310: 6c 65 6e 67 74 68 2c 20 20 20 20 20 20 20 20 20  length,         
c320: 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c 65 6e 67     1, 0, 0, leng
c330: 74 68 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f  thFunc,  SQLITE_
c340: 46 55 4e 43 5f 4c 45 4e 47 54 48 29 2c 0a 20 20  FUNC_LENGTH),.  
c350: 20 20 46 55 4e 43 54 49 4f 4e 28 69 6e 73 74 72    FUNCTION(instr
c360: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32  ,              2
c370: 2c 20 30 2c 20 30 2c 20 69 6e 73 74 72 46 75 6e  , 0, 0, instrFun
c380: 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  c        ),.    
c390: 46 55 4e 43 54 49 4f 4e 28 73 75 62 73 74 72 2c  FUNCTION(substr,
c3a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20               2, 
c3b0: 30 2c 20 30 2c 20 73 75 62 73 74 72 46 75 6e 63  0, 0, substrFunc
c3c0: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
c3d0: 4e 43 54 49 4f 4e 28 73 75 62 73 74 72 2c 20 20  NCTION(substr,  
c3e0: 20 20 20 20 20 20 20 20 20 20 20 33 2c 20 30 2c             3, 0,
c3f0: 20 30 2c 20 73 75 62 73 74 72 46 75 6e 63 20 20   0, substrFunc  
c400: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c410: 54 49 4f 4e 28 70 72 69 6e 74 66 2c 20 20 20 20  TION(printf,    
c420: 20 20 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 30          -1, 0, 0
c430: 2c 20 70 72 69 6e 74 66 46 75 6e 63 20 20 20 20  , printfFunc    
c440: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
c450: 4f 4e 28 75 6e 69 63 6f 64 65 2c 20 20 20 20 20  ON(unicode,     
c460: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
c470: 75 6e 69 63 6f 64 65 46 75 6e 63 20 20 20 20 20  unicodeFunc     
c480: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c490: 28 63 68 61 72 2c 20 20 20 20 20 20 20 20 20 20  (char,          
c4a0: 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c 20 63 68      -1, 0, 0, ch
c4b0: 61 72 46 75 6e 63 20 20 20 20 20 20 20 20 20 29  arFunc         )
c4c0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 61  ,.    FUNCTION(a
c4d0: 62 73 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  bs,             
c4e0: 20 20 20 31 2c 20 30 2c 20 30 2c 20 61 62 73 46     1, 0, 0, absF
c4f0: 75 6e 63 20 20 20 20 20 20 20 20 20 20 29 2c 0a  unc          ),.
c500: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f  #ifndef SQLITE_O
c510: 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49  MIT_FLOATING_POI
c520: 4e 54 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  NT.    FUNCTION(
c530: 72 6f 75 6e 64 2c 20 20 20 20 20 20 20 20 20 20  round,          
c540: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 72 6f 75      1, 0, 0, rou
c550: 6e 64 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c  ndFunc        ),
c560: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 6f  .    FUNCTION(ro
c570: 75 6e 64 2c 20 20 20 20 20 20 20 20 20 20 20 20  und,            
c580: 20 20 32 2c 20 30 2c 20 30 2c 20 72 6f 75 6e 64    2, 0, 0, round
c590: 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 23  Func        ),.#
c5a0: 65 6e 64 69 66 0a 20 20 20 20 46 55 4e 43 54 49  endif.    FUNCTI
c5b0: 4f 4e 28 75 70 70 65 72 2c 20 20 20 20 20 20 20  ON(upper,       
c5c0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
c5d0: 75 70 70 65 72 46 75 6e 63 20 20 20 20 20 20 20  upperFunc       
c5e0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c5f0: 28 6c 6f 77 65 72 2c 20 20 20 20 20 20 20 20 20  (lower,         
c600: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c 6f       1, 0, 0, lo
c610: 77 65 72 46 75 6e 63 20 20 20 20 20 20 20 20 29  werFunc        )
c620: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 63  ,.    FUNCTION(c
c630: 6f 61 6c 65 73 63 65 2c 20 20 20 20 20 20 20 20  oalesce,        
c640: 20 20 20 31 2c 20 30 2c 20 30 2c 20 30 20 20 20     1, 0, 0, 0   
c650: 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a               ),.
c660: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 63 6f 61      FUNCTION(coa
c670: 6c 65 73 63 65 2c 20 20 20 20 20 20 20 20 20 20  lesce,          
c680: 20 30 2c 20 30 2c 20 30 2c 20 30 20 20 20 20 20   0, 0, 0, 0     
c690: 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20             ),.  
c6a0: 20 20 46 55 4e 43 54 49 4f 4e 32 28 63 6f 61 6c    FUNCTION2(coal
c6b0: 65 73 63 65 2c 20 20 20 20 20 20 20 20 20 2d 31  esce,         -1
c6c0: 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e 63  , 0, 0, noopFunc
c6d0: 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43  ,  SQLITE_FUNC_C
c6e0: 4f 41 4c 45 53 43 45 29 2c 0a 20 20 20 20 46 55  OALESCE),.    FU
c6f0: 4e 43 54 49 4f 4e 28 68 65 78 2c 20 20 20 20 20  NCTION(hex,     
c700: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
c710: 20 30 2c 20 68 65 78 46 75 6e 63 20 20 20 20 20   0, hexFunc     
c720: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c730: 54 49 4f 4e 32 28 69 66 6e 75 6c 6c 2c 20 20 20  TION2(ifnull,   
c740: 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30           2, 0, 0
c750: 2c 20 6e 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c  , noopFunc,  SQL
c760: 49 54 45 5f 46 55 4e 43 5f 43 4f 41 4c 45 53 43  ITE_FUNC_COALESC
c770: 45 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e  E),.    FUNCTION
c780: 32 28 75 6e 6c 69 6b 65 6c 79 2c 20 20 20 20 20  2(unlikely,     
c790: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6e 6f       1, 0, 0, no
c7a0: 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f  opFunc,  SQLITE_
c7b0: 46 55 4e 43 5f 55 4e 4c 49 4b 45 4c 59 29 2c 0a  FUNC_UNLIKELY),.
c7c0: 20 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 6c 69      FUNCTION2(li
c7d0: 6b 65 6c 69 68 6f 6f 64 2c 20 20 20 20 20 20 20  kelihood,       
c7e0: 20 32 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75   2, 0, 0, noopFu
c7f0: 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43  nc,  SQLITE_FUNC
c800: 5f 55 4e 4c 49 4b 45 4c 59 29 2c 0a 20 20 20 20  _UNLIKELY),.    
c810: 56 46 55 4e 43 54 49 4f 4e 28 72 61 6e 64 6f 6d  VFUNCTION(random
c820: 2c 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20  ,            0, 
c830: 30 2c 20 30 2c 20 72 61 6e 64 6f 6d 46 75 6e 63  0, 0, randomFunc
c840: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 56 46         ),.    VF
c850: 55 4e 43 54 49 4f 4e 28 72 61 6e 64 6f 6d 62 6c  UNCTION(randombl
c860: 6f 62 2c 20 20 20 20 20 20 20 20 31 2c 20 30 2c  ob,        1, 0,
c870: 20 30 2c 20 72 61 6e 64 6f 6d 42 6c 6f 62 20 20   0, randomBlob  
c880: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c890: 54 49 4f 4e 28 6e 75 6c 6c 69 66 2c 20 20 20 20  TION(nullif,    
c8a0: 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 31           2, 0, 1
c8b0: 2c 20 6e 75 6c 6c 69 66 46 75 6e 63 20 20 20 20  , nullifFunc    
c8c0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
c8d0: 4f 4e 28 73 71 6c 69 74 65 5f 76 65 72 73 69 6f  ON(sqlite_versio
c8e0: 6e 2c 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20  n,     0, 0, 0, 
c8f0: 76 65 72 73 69 6f 6e 46 75 6e 63 20 20 20 20 20  versionFunc     
c900: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c910: 28 73 71 6c 69 74 65 5f 73 6f 75 72 63 65 5f 69  (sqlite_source_i
c920: 64 2c 20 20 20 30 2c 20 30 2c 20 30 2c 20 73 6f  d,   0, 0, 0, so
c930: 75 72 63 65 69 64 46 75 6e 63 20 20 20 20 20 29  urceidFunc     )
c940: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73  ,.    FUNCTION(s
c950: 71 6c 69 74 65 5f 6c 6f 67 2c 20 20 20 20 20 20  qlite_log,      
c960: 20 20 20 32 2c 20 30 2c 20 30 2c 20 65 72 72 6c     2, 0, 0, errl
c970: 6f 67 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  ogFunc       ),.
c980: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f  #ifndef SQLITE_O
c990: 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f  MIT_COMPILEOPTIO
c9a0: 4e 5f 44 49 41 47 53 0a 20 20 20 20 46 55 4e 43  N_DIAGS.    FUNC
c9b0: 54 49 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d 70  TION(sqlite_comp
c9c0: 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64 2c 31  ileoption_used,1
c9d0: 2c 20 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65 6f  , 0, 0, compileo
c9e0: 70 74 69 6f 6e 75 73 65 64 46 75 6e 63 20 20 29  ptionusedFunc  )
c9f0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73  ,.    FUNCTION(s
ca00: 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74  qlite_compileopt
ca10: 69 6f 6e 5f 67 65 74 2c 20 31 2c 20 30 2c 20 30  ion_get, 1, 0, 0
ca20: 2c 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 67  , compileoptiong
ca30: 65 74 46 75 6e 63 20 20 29 2c 0a 23 65 6e 64 69  etFunc  ),.#endi
ca40: 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54  f /* SQLITE_OMIT
ca50: 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44  _COMPILEOPTION_D
ca60: 49 41 47 53 20 2a 2f 0a 20 20 20 20 46 55 4e 43  IAGS */.    FUNC
ca70: 54 49 4f 4e 28 71 75 6f 74 65 2c 20 20 20 20 20  TION(quote,     
ca80: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
ca90: 2c 20 71 75 6f 74 65 46 75 6e 63 20 20 20 20 20  , quoteFunc     
caa0: 20 20 20 29 2c 0a 20 20 20 20 56 46 55 4e 43 54     ),.    VFUNCT
cab0: 49 4f 4e 28 6c 61 73 74 5f 69 6e 73 65 72 74 5f  ION(last_insert_
cac0: 72 6f 77 69 64 2c 20 30 2c 20 30 2c 20 30 2c 20  rowid, 0, 0, 0, 
cad0: 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69  last_insert_rowi
cae0: 64 29 2c 0a 20 20 20 20 56 46 55 4e 43 54 49 4f  d),.    VFUNCTIO
caf0: 4e 28 63 68 61 6e 67 65 73 2c 20 20 20 20 20 20  N(changes,      
cb00: 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 63 68       0, 0, 0, ch
cb10: 61 6e 67 65 73 20 20 20 20 20 20 20 20 20 20 29  anges          )
cb20: 2c 0a 20 20 20 20 56 46 55 4e 43 54 49 4f 4e 28  ,.    VFUNCTION(
cb30: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 2c 20 20  total_changes,  
cb40: 20 20 20 30 2c 20 30 2c 20 30 2c 20 74 6f 74 61     0, 0, 0, tota
cb50: 6c 5f 63 68 61 6e 67 65 73 20 20 20 20 29 2c 0a  l_changes    ),.
cb60: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 65 70      FUNCTION(rep
cb70: 6c 61 63 65 2c 20 20 20 20 20 20 20 20 20 20 20  lace,           
cb80: 20 33 2c 20 30 2c 20 30 2c 20 72 65 70 6c 61 63   3, 0, 0, replac
cb90: 65 46 75 6e 63 20 20 20 20 20 20 29 2c 0a 20 20  eFunc      ),.  
cba0: 20 20 46 55 4e 43 54 49 4f 4e 28 7a 65 72 6f 62    FUNCTION(zerob
cbb0: 6c 6f 62 2c 20 20 20 20 20 20 20 20 20 20 20 31  lob,           1
cbc0: 2c 20 30 2c 20 30 2c 20 7a 65 72 6f 62 6c 6f 62  , 0, 0, zeroblob
cbd0: 46 75 6e 63 20 20 20 20 20 29 2c 0a 20 20 23 69  Func     ),.  #i
cbe0: 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e  fdef SQLITE_SOUN
cbf0: 44 45 58 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e  DEX.    FUNCTION
cc00: 28 73 6f 75 6e 64 65 78 2c 20 20 20 20 20 20 20  (soundex,       
cc10: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 6f       1, 0, 0, so
cc20: 75 6e 64 65 78 46 75 6e 63 20 20 20 20 20 20 29  undexFunc      )
cc30: 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 23 69 66  ,.  #endif.  #if
cc40: 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54  ndef SQLITE_OMIT
cc50: 5f 4c 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e 0a  _LOAD_EXTENSION.
cc60: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 61      FUNCTION(loa
cc70: 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20  d_extension,    
cc80: 20 31 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78   1, 0, 0, loadEx
cc90: 74 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20  t          ),.  
cca0: 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 61 64 5f    FUNCTION(load_
ccb0: 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20 20 32  extension,     2
ccc0: 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78 74 20  , 0, 0, loadExt 
ccd0: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 23 65           ),.  #e
cce0: 6e 64 69 66 0a 20 20 20 20 41 47 47 52 45 47 41  ndif.    AGGREGA
ccf0: 54 45 28 73 75 6d 2c 20 20 20 20 20 20 20 20 20  TE(sum,         
cd00: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73        1, 0, 0, s
cd10: 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20 20 20  umStep,         
cd20: 73 75 6d 46 69 6e 61 6c 69 7a 65 20 20 20 20 29  sumFinalize    )
cd30: 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28  ,.    AGGREGATE(
cd40: 74 6f 74 61 6c 2c 20 20 20 20 20 20 20 20 20 20  total,          
cd50: 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53     1, 0, 0, sumS
cd60: 74 65 70 2c 20 20 20 20 20 20 20 20 20 74 6f 74  tep,         tot
cd70: 61 6c 46 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c  alFinalize    ),
cd80: 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28 61  .    AGGREGATE(a
cd90: 76 67 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  vg,             
cda0: 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53 74    1, 0, 0, sumSt
cdb0: 65 70 2c 20 20 20 20 20 20 20 20 20 61 76 67 46  ep,         avgF
cdc0: 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c 0a 20 2f  inalize    ),. /
cdd0: 2a 20 41 47 47 52 45 47 41 54 45 28 63 6f 75 6e  * AGGREGATE(coun
cde0: 74 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 30  t,             0
cdf0: 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65  , 0, 0, countSte
ce00: 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46 69  p,       countFi
ce10: 6e 61 6c 69 7a 65 20 20 29 2c 20 2a 2f 0a 20 20  nalize  ), */.  
ce20: 20 20 7b 30 2c 53 51 4c 49 54 45 5f 55 54 46 38    {0,SQLITE_UTF8
ce30: 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 4f 55  |SQLITE_FUNC_COU
ce40: 4e 54 2c 30 2c 30 2c 30 2c 63 6f 75 6e 74 53 74  NT,0,0,0,countSt
ce50: 65 70 2c 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65  ep,countFinalize
ce60: 2c 22 63 6f 75 6e 74 22 2c 30 2c 30 7d 2c 0a 20  ,"count",0,0},. 
ce70: 20 20 20 41 47 47 52 45 47 41 54 45 28 63 6f 75     AGGREGATE(cou
ce80: 6e 74 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  nt,             
ce90: 31 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74  1, 0, 0, countSt
cea0: 65 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46  ep,       countF
ceb0: 69 6e 61 6c 69 7a 65 20 20 29 2c 0a 20 20 20 20  inalize  ),.    
cec0: 41 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f  AGGREGATE(group_
ced0: 63 6f 6e 63 61 74 2c 20 20 20 20 20 20 31 2c 20  concat,      1, 
cee0: 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61  0, 0, groupConca
cef0: 74 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63  tStep, groupConc
cf00: 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 20  atFinalize),.   
cf10: 20 41 47 47 52 45 47 41 54 45 28 67 72 6f 75 70   AGGREGATE(group
cf20: 5f 63 6f 6e 63 61 74 2c 20 20 20 20 20 20 32 2c  _concat,      2,
cf30: 20 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63   0, 0, groupConc
cf40: 61 74 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e  atStep, groupCon
cf50: 63 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20  catFinalize),.  
cf60: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 67 6c  .    LIKEFUNC(gl
cf70: 6f 62 2c 20 32 2c 20 26 67 6c 6f 62 49 6e 66 6f  ob, 2, &globInfo
cf80: 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49  , SQLITE_FUNC_LI
cf90: 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43  KE|SQLITE_FUNC_C
cfa0: 41 53 45 29 2c 0a 20 20 23 69 66 64 65 66 20 53  ASE),.  #ifdef S
cfb0: 51 4c 49 54 45 5f 43 41 53 45 5f 53 45 4e 53 49  QLITE_CASE_SENSI
cfc0: 54 49 56 45 5f 4c 49 4b 45 0a 20 20 20 20 4c 49  TIVE_LIKE.    LI
cfd0: 4b 45 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20  KEFUNC(like, 2, 
cfe0: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51  &likeInfoAlt, SQ
cff0: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53  LITE_FUNC_LIKE|S
d000: 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29  QLITE_FUNC_CASE)
d010: 2c 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c  ,.    LIKEFUNC(l
d020: 69 6b 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66  ike, 3, &likeInf
d030: 6f 41 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e  oAlt, SQLITE_FUN
d040: 43 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55  C_LIKE|SQLITE_FU
d050: 4e 43 5f 43 41 53 45 29 2c 0a 20 20 23 65 6c 73  NC_CASE),.  #els
d060: 65 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c  e.    LIKEFUNC(l
d070: 69 6b 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66  ike, 2, &likeInf
d080: 6f 4e 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55  oNorm, SQLITE_FU
d090: 4e 43 5f 4c 49 4b 45 29 2c 0a 20 20 20 20 4c 49  NC_LIKE),.    LI
d0a0: 4b 45 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20  KEFUNC(like, 3, 
d0b0: 26 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53  &likeInfoNorm, S
d0c0: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29  QLITE_FUNC_LIKE)
d0d0: 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 7d 3b 0a  ,.  #endif.  };.
d0e0: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 46 75 6e 63  .  int i;.  Func
d0f0: 44 65 66 48 61 73 68 20 2a 70 48 61 73 68 20 3d  DefHash *pHash =
d100: 20 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66   &GLOBAL(FuncDef
d110: 48 61 73 68 2c 20 73 71 6c 69 74 65 33 47 6c 6f  Hash, sqlite3Glo
d120: 62 61 6c 46 75 6e 63 74 69 6f 6e 73 29 3b 0a 20  balFunctions);. 
d130: 20 46 75 6e 63 44 65 66 20 2a 61 46 75 6e 63 20   FuncDef *aFunc 
d140: 3d 20 28 46 75 6e 63 44 65 66 2a 29 26 47 4c 4f  = (FuncDef*)&GLO
d150: 42 41 4c 28 46 75 6e 63 44 65 66 2c 20 61 42 75  BAL(FuncDef, aBu
d160: 69 6c 74 69 6e 46 75 6e 63 29 3b 0a 0a 20 20 66  iltinFunc);..  f
d170: 6f 72 28 69 3d 30 3b 20 69 3c 41 72 72 61 79 53  or(i=0; i<ArrayS
d180: 69 7a 65 28 61 42 75 69 6c 74 69 6e 46 75 6e 63  ize(aBuiltinFunc
d190: 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 73 71 6c  ); i++){.    sql
d1a0: 69 74 65 33 46 75 6e 63 44 65 66 49 6e 73 65 72  ite3FuncDefInser
d1b0: 74 28 70 48 61 73 68 2c 20 26 61 46 75 6e 63 5b  t(pHash, &aFunc[
d1c0: 69 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  i]);.  }.  sqlit
d1d0: 65 33 52 65 67 69 73 74 65 72 44 61 74 65 54 69  e3RegisterDateTi
d1e0: 6d 65 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 23  meFunctions();.#
d1f0: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
d200: 49 54 5f 41 4c 54 45 52 54 41 42 4c 45 0a 20 20  IT_ALTERTABLE.  
d210: 73 71 6c 69 74 65 33 41 6c 74 65 72 46 75 6e 63  sqlite3AlterFunc
d220: 74 69 6f 6e 73 28 29 3b 0a 23 65 6e 64 69 66 0a  tions();.#endif.
d230: 23 69 66 20 64 65 66 69 6e 65 64 28 53 51 4c 49  #if defined(SQLI
d240: 54 45 5f 45 4e 41 42 4c 45 5f 53 54 41 54 33 29  TE_ENABLE_STAT3)
d250: 20 7c 7c 20 64 65 66 69 6e 65 64 28 53 51 4c 49   || defined(SQLI
d260: 54 45 5f 45 4e 41 42 4c 45 5f 53 54 41 54 34 29  TE_ENABLE_STAT4)
d270: 0a 20 20 73 71 6c 69 74 65 33 41 6e 61 6c 79 7a  .  sqlite3Analyz
d280: 65 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 23 65  eFunctions();.#e
d290: 6e 64 69 66 0a 7d 0a                             ndif.}.