/ Hex Artifact Content
Login

Artifact 6325ac2ec10833ccf4d5c36d323709221d37ea19:


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 28  ){.        if( (
0db0: 69 56 61 6c 3c 3c 31 29 3d 3d 30 20 29 7b 0a 20  iVal<<1)==0 ){. 
0dc0: 20 20 20 20 20 20 20 20 20 2f 2a 20 49 4d 50 3a           /* IMP:
0dd0: 20 52 2d 33 31 36 37 36 2d 34 35 35 30 39 20 49   R-31676-45509 I
0de0: 66 20 58 20 69 73 20 74 68 65 20 69 6e 74 65 67  f X is the integ
0df0: 65 72 20 2d 39 32 32 33 33 37 32 30 33 36 38 35  er -922337203685
0e00: 34 37 37 35 38 30 38 0a 20 20 20 20 20 20 20 20  4775808.        
0e10: 20 20 2a 2a 20 74 68 65 6e 20 61 62 73 28 58 29    ** then abs(X)
0e20: 20 74 68 72 6f 77 73 20 61 6e 20 69 6e 74 65 67   throws an integ
0e30: 65 72 20 6f 76 65 72 66 6c 6f 77 20 65 72 72 6f  er overflow erro
0e40: 72 20 73 69 6e 63 65 20 74 68 65 72 65 20 69 73  r since there is
0e50: 20 6e 6f 0a 20 20 20 20 20 20 20 20 20 20 2a 2a   no.          **
0e60: 20 65 71 75 69 76 61 6c 65 6e 74 20 70 6f 73 69   equivalent posi
0e70: 74 69 76 65 20 36 34 2d 62 69 74 20 74 77 6f 20  tive 64-bit two 
0e80: 63 6f 6d 70 6c 65 6d 65 6e 74 20 76 61 6c 75 65  complement value
0e90: 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 73  . */.          s
0ea0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
0eb0: 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 69 6e  ror(context, "in
0ec0: 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 22 2c  teger overflow",
0ed0: 20 2d 31 29 3b 0a 20 20 20 20 20 20 20 20 20 20   -1);.          
0ee0: 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 20 20  return;.        
0ef0: 7d 0a 20 20 20 20 20 20 20 20 69 56 61 6c 20 3d  }.        iVal =
0f00: 20 2d 69 56 61 6c 3b 0a 20 20 20 20 20 20 7d 20   -iVal;.      } 
0f10: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
0f20: 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74  esult_int64(cont
0f30: 65 78 74 2c 20 69 56 61 6c 29 3b 0a 20 20 20 20  ext, iVal);.    
0f40: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
0f50: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 4e     case SQLITE_N
0f60: 55 4c 4c 3a 20 7b 0a 20 20 20 20 20 20 2f 2a 20  ULL: {.      /* 
0f70: 49 4d 50 3a 20 52 2d 33 37 34 33 34 2d 31 39 39  IMP: R-37434-199
0f80: 32 39 20 41 62 73 28 58 29 20 72 65 74 75 72 6e  29 Abs(X) return
0f90: 73 20 4e 55 4c 4c 20 69 66 20 58 20 69 73 20 4e  s NULL if X is N
0fa0: 55 4c 4c 2e 20 2a 2f 0a 20 20 20 20 20 20 73 71  ULL. */.      sq
0fb0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e 75 6c  lite3_result_nul
0fc0: 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  l(context);.    
0fd0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
0fe0: 20 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a 20 20     default: {.  
0ff0: 20 20 20 20 2f 2a 20 42 65 63 61 75 73 65 20 73      /* Because s
1000: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75  qlite3_value_dou
1010: 62 6c 65 28 29 20 72 65 74 75 72 6e 73 20 30 2e  ble() returns 0.
1020: 30 20 69 66 20 74 68 65 20 61 72 67 75 6d 65 6e  0 if the argumen
1030: 74 20 69 73 20 6e 6f 74 0a 20 20 20 20 20 20 2a  t is not.      *
1040: 2a 20 73 6f 6d 65 74 68 69 6e 67 20 74 68 61 74  * something that
1050: 20 63 61 6e 20 62 65 20 63 6f 6e 76 65 72 74 65   can be converte
1060: 64 20 69 6e 74 6f 20 61 20 6e 75 6d 62 65 72 2c  d into a number,
1070: 20 77 65 20 68 61 76 65 3a 0a 20 20 20 20 20 20   we have:.      
1080: 2a 2a 20 49 4d 50 3a 20 52 2d 35 37 33 32 36 2d  ** IMP: R-57326-
1090: 33 31 35 34 31 20 41 62 73 28 58 29 20 72 65 74  31541 Abs(X) ret
10a0: 75 72 6e 20 30 2e 30 20 69 66 20 58 20 69 73 20  urn 0.0 if X is 
10b0: 61 20 73 74 72 69 6e 67 20 6f 72 20 62 6c 6f 62  a string or blob
10c0: 20 74 68 61 74 0a 20 20 20 20 20 20 2a 2a 20 63   that.      ** c
10d0: 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 76 65 72 74  annot be convert
10e0: 65 64 20 74 6f 20 61 20 6e 75 6d 65 72 69 63 20  ed to a numeric 
10f0: 76 61 6c 75 65 2e 20 0a 20 20 20 20 20 20 2a 2f  value. .      */
1100: 0a 20 20 20 20 20 20 64 6f 75 62 6c 65 20 72 56  .      double rV
1110: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  al = sqlite3_val
1120: 75 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30  ue_double(argv[0
1130: 5d 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72 56  ]);.      if( rV
1140: 61 6c 3c 30 20 29 20 72 56 61 6c 20 3d 20 2d 72  al<0 ) rVal = -r
1150: 56 61 6c 3b 0a 20 20 20 20 20 20 73 71 6c 69 74  Val;.      sqlit
1160: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
1170: 28 63 6f 6e 74 65 78 74 2c 20 72 56 61 6c 29 3b  (context, rVal);
1180: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  .      break;.  
1190: 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a    }.  }.}../*.**
11a0: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
11b0: 6f 66 20 74 68 65 20 69 6e 73 74 72 28 29 20 66  of the instr() f
11c0: 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 69  unction..**.** i
11d0: 6e 73 74 72 28 68 61 79 73 74 61 63 6b 2c 6e 65  nstr(haystack,ne
11e0: 65 64 6c 65 29 20 66 69 6e 64 73 20 74 68 65 20  edle) finds the 
11f0: 66 69 72 73 74 20 6f 63 63 75 72 72 65 6e 63 65  first occurrence
1200: 20 6f 66 20 6e 65 65 64 6c 65 0a 2a 2a 20 69 6e   of needle.** in
1210: 20 68 61 79 73 74 61 63 6b 20 61 6e 64 20 72 65   haystack and re
1220: 74 75 72 6e 73 20 74 68 65 20 6e 75 6d 62 65 72  turns the number
1230: 20 6f 66 20 70 72 65 76 69 6f 75 73 20 63 68 61   of previous cha
1240: 72 61 63 74 65 72 73 20 70 6c 75 73 20 31 2c 0a  racters plus 1,.
1250: 2a 2a 20 6f 72 20 30 20 69 66 20 6e 65 65 64 6c  ** or 0 if needl
1260: 65 20 64 6f 65 73 20 6e 6f 74 20 6f 63 63 75 72  e does not occur
1270: 20 77 69 74 68 69 6e 20 68 61 79 73 74 61 63 6b   within haystack
1280: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 62 6f 74 68 20  ..**.** If both 
1290: 68 61 79 73 74 61 63 6b 20 61 6e 64 20 6e 65 65  haystack and nee
12a0: 64 6c 65 20 61 72 65 20 42 4c 4f 42 73 2c 20 74  dle are BLOBs, t
12b0: 68 65 6e 20 74 68 65 20 72 65 73 75 6c 74 20 69  hen the result i
12c0: 73 20 6f 6e 65 20 6d 6f 72 65 20 74 68 61 6e 0a  s one more than.
12d0: 2a 2a 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66  ** the number of
12e0: 20 62 79 74 65 73 20 69 6e 20 68 61 79 73 74 61   bytes in haysta
12f0: 63 6b 20 70 72 69 6f 72 20 74 6f 20 74 68 65 20  ck prior to the 
1300: 66 69 72 73 74 20 6f 63 63 75 72 72 65 6e 63 65  first occurrence
1310: 20 6f 66 20 6e 65 65 64 6c 65 2c 0a 2a 2a 20 6f   of needle,.** o
1320: 72 20 30 20 69 66 20 6e 65 65 64 6c 65 20 6e 65  r 0 if needle ne
1330: 76 65 72 20 6f 63 63 75 72 73 20 69 6e 20 68 61  ver occurs in ha
1340: 79 73 74 61 63 6b 2e 0a 2a 2f 0a 73 74 61 74 69  ystack..*/.stati
1350: 63 20 76 6f 69 64 20 69 6e 73 74 72 46 75 6e 63  c void instrFunc
1360: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
1370: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
1380: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
1390: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
13a0: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69  .){.  const unsi
13b0: 67 6e 65 64 20 63 68 61 72 20 2a 7a 48 61 79 73  gned char *zHays
13c0: 74 61 63 6b 3b 0a 20 20 63 6f 6e 73 74 20 75 6e  tack;.  const un
13d0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 4e 65  signed char *zNe
13e0: 65 64 6c 65 3b 0a 20 20 69 6e 74 20 6e 48 61 79  edle;.  int nHay
13f0: 73 74 61 63 6b 3b 0a 20 20 69 6e 74 20 6e 4e 65  stack;.  int nNe
1400: 65 64 6c 65 3b 0a 20 20 69 6e 74 20 74 79 70 65  edle;.  int type
1410: 48 61 79 73 74 61 63 6b 2c 20 74 79 70 65 4e 65  Haystack, typeNe
1420: 65 64 6c 65 3b 0a 20 20 69 6e 74 20 4e 20 3d 20  edle;.  int N = 
1430: 31 3b 0a 20 20 69 6e 74 20 69 73 54 65 78 74 3b  1;.  int isText;
1440: 0a 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ..  UNUSED_PARAM
1450: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 74 79  ETER(argc);.  ty
1460: 70 65 48 61 79 73 74 61 63 6b 20 3d 20 73 71 6c  peHaystack = sql
1470: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
1480: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 74 79 70 65  argv[0]);.  type
1490: 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74 65 33  Needle = sqlite3
14a0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
14b0: 5b 31 5d 29 3b 0a 20 20 69 66 28 20 74 79 70 65  [1]);.  if( type
14c0: 48 61 79 73 74 61 63 6b 3d 3d 53 51 4c 49 54 45  Haystack==SQLITE
14d0: 5f 4e 55 4c 4c 20 7c 7c 20 74 79 70 65 4e 65 65  _NULL || typeNee
14e0: 64 6c 65 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  dle==SQLITE_NULL
14f0: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 48 61   ) return;.  nHa
1500: 79 73 74 61 63 6b 20 3d 20 73 71 6c 69 74 65 33  ystack = sqlite3
1510: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
1520: 76 5b 30 5d 29 3b 0a 20 20 6e 4e 65 65 64 6c 65  v[0]);.  nNeedle
1530: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1540: 5f 62 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b  _bytes(argv[1]);
1550: 0a 20 20 69 66 28 20 74 79 70 65 48 61 79 73 74  .  if( typeHayst
1560: 61 63 6b 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42  ack==SQLITE_BLOB
1570: 20 26 26 20 74 79 70 65 4e 65 65 64 6c 65 3d 3d   && typeNeedle==
1580: 53 51 4c 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20  SQLITE_BLOB ){. 
1590: 20 20 20 7a 48 61 79 73 74 61 63 6b 20 3d 20 73     zHaystack = s
15a0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f  qlite3_value_blo
15b0: 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  b(argv[0]);.    
15c0: 7a 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74 65  zNeedle = sqlite
15d0: 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67  3_value_blob(arg
15e0: 76 5b 31 5d 29 3b 0a 20 20 20 20 69 73 54 65 78  v[1]);.    isTex
15f0: 74 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a  t = 0;.  }else{.
1600: 20 20 20 20 7a 48 61 79 73 74 61 63 6b 20 3d 20      zHaystack = 
1610: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
1620: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20  xt(argv[0]);.   
1630: 20 7a 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74   zNeedle = sqlit
1640: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
1650: 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 73 54 65  gv[1]);.    isTe
1660: 78 74 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 77 68  xt = 1;.  }.  wh
1670: 69 6c 65 28 20 6e 4e 65 65 64 6c 65 3c 3d 6e 48  ile( nNeedle<=nH
1680: 61 79 73 74 61 63 6b 20 26 26 20 6d 65 6d 63 6d  aystack && memcm
1690: 70 28 7a 48 61 79 73 74 61 63 6b 2c 20 7a 4e 65  p(zHaystack, zNe
16a0: 65 64 6c 65 2c 20 6e 4e 65 65 64 6c 65 29 21 3d  edle, nNeedle)!=
16b0: 30 20 29 7b 0a 20 20 20 20 4e 2b 2b 3b 0a 20 20  0 ){.    N++;.  
16c0: 20 20 64 6f 7b 0a 20 20 20 20 20 20 6e 48 61 79    do{.      nHay
16d0: 73 74 61 63 6b 2d 2d 3b 0a 20 20 20 20 20 20 7a  stack--;.      z
16e0: 48 61 79 73 74 61 63 6b 2b 2b 3b 0a 20 20 20 20  Haystack++;.    
16f0: 7d 77 68 69 6c 65 28 20 69 73 54 65 78 74 20 26  }while( isText &
1700: 26 20 28 7a 48 61 79 73 74 61 63 6b 5b 30 5d 26  & (zHaystack[0]&
1710: 30 78 63 30 29 3d 3d 30 78 38 30 20 29 3b 0a 20  0xc0)==0x80 );. 
1720: 20 7d 0a 20 20 69 66 28 20 6e 4e 65 65 64 6c 65   }.  if( nNeedle
1730: 3e 6e 48 61 79 73 74 61 63 6b 20 29 20 4e 20 3d  >nHaystack ) N =
1740: 20 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65   0;.  sqlite3_re
1750: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
1760: 2c 20 4e 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  , N);.}../*.** I
1770: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
1780: 20 74 68 65 20 70 72 69 6e 74 66 28 29 20 66 75   the printf() fu
1790: 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69  nction..*/.stati
17a0: 63 20 76 6f 69 64 20 70 72 69 6e 74 66 46 75 6e  c void printfFun
17b0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
17c0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
17d0: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
17e0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
17f0: 76 0a 29 7b 0a 20 20 50 72 69 6e 74 66 41 72 67  v.){.  PrintfArg
1800: 75 6d 65 6e 74 73 20 78 3b 0a 20 20 53 74 72 41  uments x;.  StrA
1810: 63 63 75 6d 20 73 74 72 3b 0a 20 20 63 6f 6e 73  ccum str;.  cons
1820: 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 3b  t char *zFormat;
1830: 0a 20 20 69 6e 74 20 6e 3b 0a 0a 20 20 69 66 28  .  int n;..  if(
1840: 20 61 72 67 63 3e 3d 31 20 26 26 20 28 7a 46 6f   argc>=1 && (zFo
1850: 72 6d 61 74 20 3d 20 28 63 6f 6e 73 74 20 63 68  rmat = (const ch
1860: 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  ar*)sqlite3_valu
1870: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 29  e_text(argv[0]))
1880: 21 3d 30 20 29 7b 0a 20 20 20 20 78 2e 6e 41 72  !=0 ){.    x.nAr
1890: 67 20 3d 20 61 72 67 63 2d 31 3b 0a 20 20 20 20  g = argc-1;.    
18a0: 78 2e 6e 55 73 65 64 20 3d 20 30 3b 0a 20 20 20  x.nUsed = 0;.   
18b0: 20 78 2e 61 70 41 72 67 20 3d 20 61 72 67 76 2b   x.apArg = argv+
18c0: 31 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 53 74  1;.    sqlite3St
18d0: 72 41 63 63 75 6d 49 6e 69 74 28 26 73 74 72 2c  rAccumInit(&str,
18e0: 20 30 2c 20 30 2c 20 53 51 4c 49 54 45 5f 4d 41   0, 0, SQLITE_MA
18f0: 58 5f 4c 45 4e 47 54 48 29 3b 0a 20 20 20 20 73  X_LENGTH);.    s
1900: 74 72 2e 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  tr.db = sqlite3_
1910: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
1920: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  e(context);.    
1930: 73 71 6c 69 74 65 33 58 50 72 69 6e 74 66 28 26  sqlite3XPrintf(&
1940: 73 74 72 2c 20 53 51 4c 49 54 45 5f 50 52 49 4e  str, SQLITE_PRIN
1950: 54 46 5f 53 51 4c 46 55 4e 43 2c 20 7a 46 6f 72  TF_SQLFUNC, zFor
1960: 6d 61 74 2c 20 26 78 29 3b 0a 20 20 20 20 6e 20  mat, &x);.    n 
1970: 3d 20 73 74 72 2e 6e 43 68 61 72 3b 0a 20 20 20  = str.nChar;.   
1980: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
1990: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  text(context, sq
19a0: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e  lite3StrAccumFin
19b0: 69 73 68 28 26 73 74 72 29 2c 20 6e 2c 0a 20 20  ish(&str), n,.  
19c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
19d0: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 44 59 4e        SQLITE_DYN
19e0: 41 4d 49 43 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a  AMIC);.  }.}../*
19f0: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
1a00: 6f 6e 20 6f 66 20 74 68 65 20 73 75 62 73 74 72  on of the substr
1a10: 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a  () function..**.
1a20: 2a 2a 20 73 75 62 73 74 72 28 78 2c 70 31 2c 70  ** substr(x,p1,p
1a30: 32 29 20 20 72 65 74 75 72 6e 73 20 70 32 20 63  2)  returns p2 c
1a40: 68 61 72 61 63 74 65 72 73 20 6f 66 20 78 5b 5d  haracters of x[]
1a50: 20 62 65 67 69 6e 6e 69 6e 67 20 77 69 74 68 20   beginning with 
1a60: 70 31 2e 0a 2a 2a 20 70 31 20 69 73 20 31 2d 69  p1..** p1 is 1-i
1a70: 6e 64 65 78 65 64 2e 20 20 53 6f 20 73 75 62 73  ndexed.  So subs
1a80: 74 72 28 78 2c 31 2c 31 29 20 72 65 74 75 72 6e  tr(x,1,1) return
1a90: 73 20 74 68 65 20 66 69 72 73 74 20 63 68 61 72  s the first char
1aa0: 61 63 74 65 72 0a 2a 2a 20 6f 66 20 78 2e 20 20  acter.** of x.  
1ab0: 49 66 20 78 20 69 73 20 74 65 78 74 2c 20 74 68  If x is text, th
1ac0: 65 6e 20 77 65 20 61 63 74 75 61 6c 6c 79 20 63  en we actually c
1ad0: 6f 75 6e 74 20 55 54 46 2d 38 20 63 68 61 72 61  ount UTF-8 chara
1ae0: 63 74 65 72 73 2e 0a 2a 2a 20 49 66 20 78 20 69  cters..** If x i
1af0: 73 20 61 20 62 6c 6f 62 2c 20 74 68 65 6e 20 77  s a blob, then w
1b00: 65 20 63 6f 75 6e 74 20 62 79 74 65 73 2e 0a 2a  e count bytes..*
1b10: 2a 0a 2a 2a 20 49 66 20 70 31 20 69 73 20 6e 65  *.** If p1 is ne
1b20: 67 61 74 69 76 65 2c 20 74 68 65 6e 20 77 65 20  gative, then we 
1b30: 62 65 67 69 6e 20 61 62 73 28 70 31 29 20 66 72  begin abs(p1) fr
1b40: 6f 6d 20 74 68 65 20 65 6e 64 20 6f 66 20 78 5b  om the end of x[
1b50: 5d 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 70 32 20 69  ]..**.** If p2 i
1b60: 73 20 6e 65 67 61 74 69 76 65 2c 20 72 65 74 75  s negative, retu
1b70: 72 6e 20 74 68 65 20 70 32 20 63 68 61 72 61 63  rn the p2 charac
1b80: 74 65 72 73 20 70 72 65 63 65 64 69 6e 67 20 70  ters preceding p
1b90: 31 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  1..*/.static voi
1ba0: 64 20 73 75 62 73 74 72 46 75 6e 63 28 0a 20 20  d substrFunc(.  
1bb0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
1bc0: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
1bd0: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
1be0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
1bf0: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
1c00: 20 63 68 61 72 20 2a 7a 3b 0a 20 20 63 6f 6e 73   char *z;.  cons
1c10: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
1c20: 2a 7a 32 3b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a  *z2;.  int len;.
1c30: 20 20 69 6e 74 20 70 30 74 79 70 65 3b 0a 20 20    int p0type;.  
1c40: 69 36 34 20 70 31 2c 20 70 32 3b 0a 20 20 69 6e  i64 p1, p2;.  in
1c50: 74 20 6e 65 67 50 32 20 3d 20 30 3b 0a 0a 20 20  t negP2 = 0;..  
1c60: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 33 20  assert( argc==3 
1c70: 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20  || argc==2 );.  
1c80: 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  if( sqlite3_valu
1c90: 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d 29 3d  e_type(argv[1])=
1ca0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 0a 20 20 20  =SQLITE_NULL.   
1cb0: 7c 7c 20 28 61 72 67 63 3d 3d 33 20 26 26 20 73  || (argc==3 && s
1cc0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
1cd0: 65 28 61 72 67 76 5b 32 5d 29 3d 3d 53 51 4c 49  e(argv[2])==SQLI
1ce0: 54 45 5f 4e 55 4c 4c 29 0a 20 20 29 7b 0a 20 20  TE_NULL).  ){.  
1cf0: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20    return;.  }.  
1d00: 70 30 74 79 70 65 20 3d 20 73 71 6c 69 74 65 33  p0type = sqlite3
1d10: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
1d20: 5b 30 5d 29 3b 0a 20 20 70 31 20 3d 20 73 71 6c  [0]);.  p1 = sql
1d30: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61  ite3_value_int(a
1d40: 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 70  rgv[1]);.  if( p
1d50: 30 74 79 70 65 3d 3d 53 51 4c 49 54 45 5f 42 4c  0type==SQLITE_BL
1d60: 4f 42 20 29 7b 0a 20 20 20 20 6c 65 6e 20 3d 20  OB ){.    len = 
1d70: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
1d80: 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  tes(argv[0]);.  
1d90: 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61    z = sqlite3_va
1da0: 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d  lue_blob(argv[0]
1db0: 29 3b 0a 20 20 20 20 69 66 28 20 7a 3d 3d 30 20  );.    if( z==0 
1dc0: 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 61 73  ) return;.    as
1dd0: 73 65 72 74 28 20 6c 65 6e 3d 3d 73 71 6c 69 74  sert( len==sqlit
1de0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
1df0: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 7d 65 6c  rgv[0]) );.  }el
1e00: 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73 71 6c 69  se{.    z = sqli
1e10: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
1e20: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28  rgv[0]);.    if(
1e30: 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a   z==0 ) return;.
1e40: 20 20 20 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20      len = 0;.   
1e50: 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20   if( p1<0 ){.   
1e60: 20 20 20 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32     for(z2=z; *z2
1e70: 3b 20 6c 65 6e 2b 2b 29 7b 0a 20 20 20 20 20 20  ; len++){.      
1e80: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
1e90: 46 38 28 7a 32 29 3b 0a 20 20 20 20 20 20 7d 0a  F8(z2);.      }.
1ea0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20      }.  }.  if( 
1eb0: 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20 20 20 70  argc==3 ){.    p
1ec0: 32 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  2 = sqlite3_valu
1ed0: 65 5f 69 6e 74 28 61 72 67 76 5b 32 5d 29 3b 0a  e_int(argv[2]);.
1ee0: 20 20 20 20 69 66 28 20 70 32 3c 30 20 29 7b 0a      if( p2<0 ){.
1ef0: 20 20 20 20 20 20 70 32 20 3d 20 2d 70 32 3b 0a        p2 = -p2;.
1f00: 20 20 20 20 20 20 6e 65 67 50 32 20 3d 20 31 3b        negP2 = 1;
1f10: 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a  .    }.  }else{.
1f20: 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74 65 33      p2 = sqlite3
1f30: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
1f40: 6c 65 28 63 6f 6e 74 65 78 74 29 2d 3e 61 4c 69  le(context)->aLi
1f50: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
1f60: 5f 4c 45 4e 47 54 48 5d 3b 0a 20 20 7d 0a 20 20  _LENGTH];.  }.  
1f70: 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20  if( p1<0 ){.    
1f80: 70 31 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20 69  p1 += len;.    i
1f90: 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 20  f( p1<0 ){.     
1fa0: 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20 20   p2 += p1;.     
1fb0: 20 69 66 28 20 70 32 3c 30 20 29 20 70 32 20 3d   if( p2<0 ) p2 =
1fc0: 20 30 3b 0a 20 20 20 20 20 20 70 31 20 3d 20 30   0;.      p1 = 0
1fd0: 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 20  ;.    }.  }else 
1fe0: 69 66 28 20 70 31 3e 30 20 29 7b 0a 20 20 20 20  if( p1>0 ){.    
1ff0: 70 31 2d 2d 3b 0a 20 20 7d 65 6c 73 65 20 69 66  p1--;.  }else if
2000: 28 20 70 32 3e 30 20 29 7b 0a 20 20 20 20 70 32  ( p2>0 ){.    p2
2010: 2d 2d 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 65  --;.  }.  if( ne
2020: 67 50 32 20 29 7b 0a 20 20 20 20 70 31 20 2d 3d  gP2 ){.    p1 -=
2030: 20 70 32 3b 0a 20 20 20 20 69 66 28 20 70 31 3c   p2;.    if( p1<
2040: 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20 2b 3d  0 ){.      p2 +=
2050: 20 70 31 3b 0a 20 20 20 20 20 20 70 31 20 3d 20   p1;.      p1 = 
2060: 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61  0;.    }.  }.  a
2070: 73 73 65 72 74 28 20 70 31 3e 3d 30 20 26 26 20  ssert( p1>=0 && 
2080: 70 32 3e 3d 30 20 29 3b 0a 20 20 69 66 28 20 70  p2>=0 );.  if( p
2090: 30 74 79 70 65 21 3d 53 51 4c 49 54 45 5f 42 4c  0type!=SQLITE_BL
20a0: 4f 42 20 29 7b 0a 20 20 20 20 77 68 69 6c 65 28  OB ){.    while(
20b0: 20 2a 7a 20 26 26 20 70 31 20 29 7b 0a 20 20 20   *z && p1 ){.   
20c0: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
20d0: 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 70 31  TF8(z);.      p1
20e0: 2d 2d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 66 6f  --;.    }.    fo
20f0: 72 28 7a 32 3d 7a 3b 20 2a 7a 32 20 26 26 20 70  r(z2=z; *z2 && p
2100: 32 3b 20 70 32 2d 2d 29 7b 0a 20 20 20 20 20 20  2; p2--){.      
2110: 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38  SQLITE_SKIP_UTF8
2120: 28 7a 32 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20  (z2);.    }.    
2130: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
2140: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68  ext(context, (ch
2150: 61 72 2a 29 7a 2c 20 28 69 6e 74 29 28 7a 32 2d  ar*)z, (int)(z2-
2160: 7a 29 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53  z), SQLITE_TRANS
2170: 49 45 4e 54 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  IENT);.  }else{.
2180: 20 20 20 20 69 66 28 20 70 31 2b 70 32 3e 6c 65      if( p1+p2>le
2190: 6e 20 29 7b 0a 20 20 20 20 20 20 70 32 20 3d 20  n ){.      p2 = 
21a0: 6c 65 6e 2d 70 31 3b 0a 20 20 20 20 20 20 69 66  len-p1;.      if
21b0: 28 20 70 32 3c 30 20 29 20 70 32 20 3d 20 30 3b  ( p2<0 ) p2 = 0;
21c0: 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74  .    }.    sqlit
21d0: 65 33 5f 72 65 73 75 6c 74 5f 62 6c 6f 62 28 63  e3_result_blob(c
21e0: 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 26  ontext, (char*)&
21f0: 7a 5b 70 31 5d 2c 20 28 69 6e 74 29 70 32 2c 20  z[p1], (int)p2, 
2200: 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54  SQLITE_TRANSIENT
2210: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
2220: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
2230: 66 20 74 68 65 20 72 6f 75 6e 64 28 29 20 66 75  f the round() fu
2240: 6e 63 74 69 6f 6e 0a 2a 2f 0a 23 69 66 6e 64 65  nction.*/.#ifnde
2250: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c  f SQLITE_OMIT_FL
2260: 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 0a 73 74 61  OATING_POINT.sta
2270: 74 69 63 20 76 6f 69 64 20 72 6f 75 6e 64 46 75  tic void roundFu
2280: 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  nc(sqlite3_conte
2290: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
22a0: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
22b0: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
22c0: 69 6e 74 20 6e 20 3d 20 30 3b 0a 20 20 64 6f 75  int n = 0;.  dou
22d0: 62 6c 65 20 72 3b 0a 20 20 63 68 61 72 20 2a 7a  ble r;.  char *z
22e0: 42 75 66 3b 0a 20 20 61 73 73 65 72 74 28 20 61  Buf;.  assert( a
22f0: 72 67 63 3d 3d 31 20 7c 7c 20 61 72 67 63 3d 3d  rgc==1 || argc==
2300: 32 20 29 3b 0a 20 20 69 66 28 20 61 72 67 63 3d  2 );.  if( argc=
2310: 3d 32 20 29 7b 0a 20 20 20 20 69 66 28 20 53 51  =2 ){.    if( SQ
2320: 4c 49 54 45 5f 4e 55 4c 4c 3d 3d 73 71 6c 69 74  LITE_NULL==sqlit
2330: 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72  e3_value_type(ar
2340: 67 76 5b 31 5d 29 20 29 20 72 65 74 75 72 6e 3b  gv[1]) ) return;
2350: 0a 20 20 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  .    n = sqlite3
2360: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
2370: 31 5d 29 3b 0a 20 20 20 20 69 66 28 20 6e 3e 33  1]);.    if( n>3
2380: 30 20 29 20 6e 20 3d 20 33 30 3b 0a 20 20 20 20  0 ) n = 30;.    
2390: 69 66 28 20 6e 3c 30 20 29 20 6e 20 3d 20 30 3b  if( n<0 ) n = 0;
23a0: 0a 20 20 7d 0a 20 20 69 66 28 20 73 71 6c 69 74  .  }.  if( sqlit
23b0: 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72  e3_value_type(ar
23c0: 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e  gv[0])==SQLITE_N
23d0: 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ULL ) return;.  
23e0: 72 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  r = sqlite3_valu
23f0: 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d  e_double(argv[0]
2400: 29 3b 0a 20 20 2f 2a 20 49 66 20 59 3d 3d 30 20  );.  /* If Y==0 
2410: 61 6e 64 20 58 20 77 69 6c 6c 20 66 69 74 20 69  and X will fit i
2420: 6e 20 61 20 36 34 2d 62 69 74 20 69 6e 74 2c 0a  n a 64-bit int,.
2430: 20 20 2a 2a 20 68 61 6e 64 6c 65 20 74 68 65 20    ** handle the 
2440: 72 6f 75 6e 64 69 6e 67 20 64 69 72 65 63 74 6c  rounding directl
2450: 79 2c 0a 20 20 2a 2a 20 6f 74 68 65 72 77 69 73  y,.  ** otherwis
2460: 65 20 75 73 65 20 70 72 69 6e 74 66 2e 0a 20 20  e use printf..  
2470: 2a 2f 0a 20 20 69 66 28 20 6e 3d 3d 30 20 26 26  */.  if( n==0 &&
2480: 20 72 3e 3d 30 20 26 26 20 72 3c 4c 41 52 47 45   r>=0 && r<LARGE
2490: 53 54 5f 49 4e 54 36 34 2d 31 20 29 7b 0a 20 20  ST_INT64-1 ){.  
24a0: 20 20 72 20 3d 20 28 64 6f 75 62 6c 65 29 28 28    r = (double)((
24b0: 73 71 6c 69 74 65 5f 69 6e 74 36 34 29 28 72 2b  sqlite_int64)(r+
24c0: 30 2e 35 29 29 3b 0a 20 20 7d 65 6c 73 65 20 69  0.5));.  }else i
24d0: 66 28 20 6e 3d 3d 30 20 26 26 20 72 3c 30 20 26  f( n==0 && r<0 &
24e0: 26 20 28 2d 72 29 3c 4c 41 52 47 45 53 54 5f 49  & (-r)<LARGEST_I
24f0: 4e 54 36 34 2d 31 20 29 7b 0a 20 20 20 20 72 20  NT64-1 ){.    r 
2500: 3d 20 2d 28 64 6f 75 62 6c 65 29 28 28 73 71 6c  = -(double)((sql
2510: 69 74 65 5f 69 6e 74 36 34 29 28 28 2d 72 29 2b  ite_int64)((-r)+
2520: 30 2e 35 29 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  0.5));.  }else{.
2530: 20 20 20 20 7a 42 75 66 20 3d 20 73 71 6c 69 74      zBuf = sqlit
2540: 65 33 5f 6d 70 72 69 6e 74 66 28 22 25 2e 2a 66  e3_mprintf("%.*f
2550: 22 2c 6e 2c 72 29 3b 0a 20 20 20 20 69 66 28 20  ",n,r);.    if( 
2560: 7a 42 75 66 3d 3d 30 20 29 7b 0a 20 20 20 20 20  zBuf==0 ){.     
2570: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
2580: 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74  error_nomem(cont
2590: 65 78 74 29 3b 0a 20 20 20 20 20 20 72 65 74 75  ext);.      retu
25a0: 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71  rn;.    }.    sq
25b0: 6c 69 74 65 33 41 74 6f 46 28 7a 42 75 66 2c 20  lite3AtoF(zBuf, 
25c0: 26 72 2c 20 73 71 6c 69 74 65 33 53 74 72 6c 65  &r, sqlite3Strle
25d0: 6e 33 30 28 7a 42 75 66 29 2c 20 53 51 4c 49 54  n30(zBuf), SQLIT
25e0: 45 5f 55 54 46 38 29 3b 0a 20 20 20 20 73 71 6c  E_UTF8);.    sql
25f0: 69 74 65 33 5f 66 72 65 65 28 7a 42 75 66 29 3b  ite3_free(zBuf);
2600: 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72  .  }.  sqlite3_r
2610: 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e  esult_double(con
2620: 74 65 78 74 2c 20 72 29 3b 0a 7d 0a 23 65 6e 64  text, r);.}.#end
2630: 69 66 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 6f 63 61  if../*.** Alloca
2640: 74 65 20 6e 42 79 74 65 20 62 79 74 65 73 20 6f  te nByte bytes o
2650: 66 20 73 70 61 63 65 20 75 73 69 6e 67 20 73 71  f space using sq
2660: 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 29 2e 20  lite3_malloc(). 
2670: 49 66 20 74 68 65 0a 2a 2a 20 61 6c 6c 6f 63 61  If the.** alloca
2680: 74 69 6f 6e 20 66 61 69 6c 73 2c 20 63 61 6c 6c  tion fails, call
2690: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
26a0: 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 29 20 74 6f  error_nomem() to
26b0: 20 6e 6f 74 69 66 79 0a 2a 2a 20 74 68 65 20 64   notify.** the d
26c0: 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65 20 74  atabase handle t
26d0: 68 61 74 20 6d 61 6c 6c 6f 63 28 29 20 68 61 73  hat malloc() has
26e0: 20 66 61 69 6c 65 64 20 61 6e 64 20 72 65 74 75   failed and retu
26f0: 72 6e 20 4e 55 4c 4c 2e 0a 2a 2a 20 49 66 20 6e  rn NULL..** If n
2700: 42 79 74 65 20 69 73 20 6c 61 72 67 65 72 20 74  Byte is larger t
2710: 68 61 6e 20 74 68 65 20 6d 61 78 69 6d 75 6d 20  han the maximum 
2720: 73 74 72 69 6e 67 20 6f 72 20 62 6c 6f 62 20 6c  string or blob l
2730: 65 6e 67 74 68 2c 20 74 68 65 6e 0a 2a 2a 20 72  ength, then.** r
2740: 61 69 73 65 20 61 6e 20 53 51 4c 49 54 45 5f 54  aise an SQLITE_T
2750: 4f 4f 42 49 47 20 65 78 63 65 70 74 69 6f 6e 20  OOBIG exception 
2760: 61 6e 64 20 72 65 74 75 72 6e 20 4e 55 4c 4c 2e  and return NULL.
2770: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
2780: 2a 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 73  *contextMalloc(s
2790: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
27a0: 63 6f 6e 74 65 78 74 2c 20 69 36 34 20 6e 42 79  context, i64 nBy
27b0: 74 65 29 7b 0a 20 20 63 68 61 72 20 2a 7a 3b 0a  te){.  char *z;.
27c0: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20    sqlite3 *db = 
27d0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
27e0: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
27f0: 74 29 3b 0a 20 20 61 73 73 65 72 74 28 20 6e 42  t);.  assert( nB
2800: 79 74 65 3e 30 20 29 3b 0a 20 20 74 65 73 74 63  yte>0 );.  testc
2810: 61 73 65 28 20 6e 42 79 74 65 3d 3d 64 62 2d 3e  ase( nByte==db->
2820: 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49  aLimit[SQLITE_LI
2830: 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20  MIT_LENGTH] );. 
2840: 20 74 65 73 74 63 61 73 65 28 20 6e 42 79 74 65   testcase( nByte
2850: 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  ==db->aLimit[SQL
2860: 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48  ITE_LIMIT_LENGTH
2870: 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e 42 79  ]+1 );.  if( nBy
2880: 74 65 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  te>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 7b 0a 20 20 20 20 73 71 6c 69 74 65  H] ){.    sqlite
28b0: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74  3_result_error_t
28c0: 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a  oobig(context);.
28d0: 20 20 20 20 7a 20 3d 20 30 3b 0a 20 20 7d 65 6c      z = 0;.  }el
28e0: 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73 71 6c 69  se{.    z = sqli
28f0: 74 65 33 4d 61 6c 6c 6f 63 28 28 69 6e 74 29 6e  te3Malloc((int)n
2900: 42 79 74 65 29 3b 0a 20 20 20 20 69 66 28 20 21  Byte);.    if( !
2910: 7a 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  z ){.      sqlit
2920: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
2930: 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a  nomem(context);.
2940: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74 75      }.  }.  retu
2950: 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  rn z;.}../*.** I
2960: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
2970: 20 74 68 65 20 75 70 70 65 72 28 29 20 61 6e 64   the upper() and
2980: 20 6c 6f 77 65 72 28 29 20 53 51 4c 20 66 75 6e   lower() SQL fun
2990: 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69  ctions..*/.stati
29a0: 63 20 76 6f 69 64 20 75 70 70 65 72 46 75 6e 63  c void upperFunc
29b0: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
29c0: 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61   *context, int a
29d0: 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  rgc, sqlite3_val
29e0: 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 68  ue **argv){.  ch
29f0: 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73 74 20  ar *z1;.  const 
2a00: 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74 20  char *z2;.  int 
2a10: 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44 5f 50  i, n;.  UNUSED_P
2a20: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
2a30: 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29 73 71    z2 = (char*)sq
2a40: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
2a50: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d  (argv[0]);.  n =
2a60: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
2a70: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
2a80: 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61 74 20   /* Verify that 
2a90: 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62 79 74  the call to _byt
2aa0: 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20 69 6e  es() does not in
2ab0: 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f 74 65  validate the _te
2ac0: 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a 2f 0a  xt() pointer */.
2ad0: 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d 28 63    assert( z2==(c
2ae0: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
2af0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
2b00: 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29 7b 0a   );.  if( z2 ){.
2b10: 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65 78 74      z1 = context
2b20: 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20  Malloc(context, 
2b30: 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20 20 20  ((i64)n)+1);.   
2b40: 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20 20 20   if( z1 ){.     
2b50: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69   for(i=0; i<n; i
2b60: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a 31 5b  ++){.        z1[
2b70: 69 5d 20 3d 20 28 63 68 61 72 29 73 71 6c 69 74  i] = (char)sqlit
2b80: 65 33 54 6f 75 70 70 65 72 28 7a 32 5b 69 5d 29  e3Toupper(z2[i])
2b90: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
2ba0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
2bb0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 31 2c  ext(context, z1,
2bc0: 20 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65   n, sqlite3_free
2bd0: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73  );.    }.  }.}.s
2be0: 74 61 74 69 63 20 76 6f 69 64 20 6c 6f 77 65 72  tatic void lower
2bf0: 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Func(sqlite3_con
2c00: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
2c10: 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33  nt argc, sqlite3
2c20: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a  _value **argv){.
2c30: 20 20 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f    char *z1;.  co
2c40: 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20  nst char *z2;.  
2c50: 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53  int i, n;.  UNUS
2c60: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
2c70: 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63 68 61 72  c);.  z2 = (char
2c80: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  *)sqlite3_value_
2c90: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
2ca0: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   n = sqlite3_val
2cb0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
2cc0: 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66 79 20 74  );.  /* Verify t
2cd0: 68 61 74 20 74 68 65 20 63 61 6c 6c 20 74 6f 20  hat the call to 
2ce0: 5f 62 79 74 65 73 28 29 20 64 6f 65 73 20 6e 6f  _bytes() does no
2cf0: 74 20 69 6e 76 61 6c 69 64 61 74 65 20 74 68 65  t invalidate the
2d00: 20 5f 74 65 78 74 28 29 20 70 6f 69 6e 74 65 72   _text() pointer
2d10: 20 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 7a 32   */.  assert( z2
2d20: 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  ==(char*)sqlite3
2d30: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
2d40: 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28 20 7a 32  [0]) );.  if( z2
2d50: 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e   ){.    z1 = con
2d60: 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65  textMalloc(conte
2d70: 78 74 2c 20 28 28 69 36 34 29 6e 29 2b 31 29 3b  xt, ((i64)n)+1);
2d80: 0a 20 20 20 20 69 66 28 20 7a 31 20 29 7b 0a 20  .    if( z1 ){. 
2d90: 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c       for(i=0; i<
2da0: 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  n; i++){.       
2db0: 20 7a 31 5b 69 5d 20 3d 20 73 71 6c 69 74 65 33   z1[i] = sqlite3
2dc0: 54 6f 6c 6f 77 65 72 28 7a 32 5b 69 5d 29 3b 0a  Tolower(z2[i]);.
2dd0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71        }.      sq
2de0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
2df0: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 31 2c 20 6e  t(context, z1, n
2e00: 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b  , sqlite3_free);
2e10: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
2e20: 0a 2a 2a 20 53 6f 6d 65 20 66 75 6e 63 74 69 6f  .** Some functio
2e30: 6e 73 20 6c 69 6b 65 20 43 4f 41 4c 45 53 43 45  ns like COALESCE
2e40: 28 29 20 61 6e 64 20 49 46 4e 55 4c 4c 28 29 20  () and IFNULL() 
2e50: 61 6e 64 20 55 4e 4c 49 4b 45 4c 59 28 29 20 61  and UNLIKELY() a
2e60: 72 65 20 69 6d 70 6c 65 6d 65 6e 74 65 64 0a 2a  re implemented.*
2e70: 2a 20 61 73 20 56 44 42 45 20 63 6f 64 65 20 73  * as VDBE code s
2e80: 6f 20 74 68 61 74 20 75 6e 75 73 65 64 20 61 72  o that unused ar
2e90: 67 75 6d 65 6e 74 20 76 61 6c 75 65 73 20 64 6f  gument values do
2ea0: 20 6e 6f 74 20 68 61 76 65 20 74 6f 20 62 65 20   not have to be 
2eb0: 63 6f 6d 70 75 74 65 64 2e 0a 2a 2a 20 48 6f 77  computed..** How
2ec0: 65 76 65 72 2c 20 77 65 20 73 74 69 6c 6c 20 6e  ever, we still n
2ed0: 65 65 64 20 73 6f 6d 65 20 6b 69 6e 64 20 6f 66  eed some kind of
2ee0: 20 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d   function implem
2ef0: 65 6e 74 61 74 69 6f 6e 20 66 6f 72 20 74 68 69  entation for thi
2f00: 73 0a 2a 2a 20 72 6f 75 74 69 6e 65 73 20 69 6e  s.** routines in
2f10: 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 74 61   the function ta
2f20: 62 6c 65 2e 20 20 54 68 65 20 6e 6f 6f 70 46 75  ble.  The noopFu
2f30: 6e 63 20 6d 61 63 72 6f 20 70 72 6f 76 69 64 65  nc macro provide
2f40: 73 20 74 68 69 73 2e 0a 2a 2a 20 6e 6f 6f 70 46  s this..** noopF
2f50: 75 6e 63 20 77 69 6c 6c 20 6e 65 76 65 72 20 62  unc will never b
2f60: 65 20 63 61 6c 6c 65 64 20 73 6f 20 69 74 20 64  e called so it d
2f70: 6f 65 73 6e 27 74 20 6d 61 74 74 65 72 20 77 68  oesn't matter wh
2f80: 61 74 20 74 68 65 20 69 6d 70 6c 65 6d 65 6e 74  at the implement
2f90: 61 74 69 6f 6e 0a 2a 2a 20 69 73 2e 20 20 57 65  ation.** is.  We
2fa0: 20 6d 69 67 68 74 20 61 73 20 77 65 6c 6c 20 75   might as well u
2fb0: 73 65 20 74 68 65 20 22 76 65 72 73 69 6f 6e 28  se the "version(
2fc0: 29 22 20 66 75 6e 63 74 69 6f 6e 20 61 73 20 61  )" function as a
2fd0: 20 73 75 62 73 74 69 74 75 74 65 2e 0a 2a 2f 0a   substitute..*/.
2fe0: 23 64 65 66 69 6e 65 20 6e 6f 6f 70 46 75 6e 63  #define noopFunc
2ff0: 20 76 65 72 73 69 6f 6e 46 75 6e 63 20 20 20 2f   versionFunc   /
3000: 2a 20 53 75 62 73 74 69 74 75 74 65 20 66 75 6e  * Substitute fun
3010: 63 74 69 6f 6e 20 2d 20 6e 65 76 65 72 20 63 61  ction - never ca
3020: 6c 6c 65 64 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49  lled */../*.** I
3030: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
3040: 20 72 61 6e 64 6f 6d 28 29 2e 20 20 52 65 74 75   random().  Retu
3050: 72 6e 20 61 20 72 61 6e 64 6f 6d 20 69 6e 74 65  rn a random inte
3060: 67 65 72 2e 20 20 0a 2a 2f 0a 73 74 61 74 69 63  ger.  .*/.static
3070: 20 76 6f 69 64 20 72 61 6e 64 6f 6d 46 75 6e 63   void randomFunc
3080: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
3090: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
30a0: 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73  int NotUsed,.  s
30b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e  qlite3_value **N
30c0: 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c  otUsed2.){.  sql
30d0: 69 74 65 5f 69 6e 74 36 34 20 72 3b 0a 20 20 55  ite_int64 r;.  U
30e0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32  NUSED_PARAMETER2
30f0: 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65  (NotUsed, NotUse
3100: 64 32 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72  d2);.  sqlite3_r
3110: 61 6e 64 6f 6d 6e 65 73 73 28 73 69 7a 65 6f 66  andomness(sizeof
3120: 28 72 29 2c 20 26 72 29 3b 0a 20 20 69 66 28 20  (r), &r);.  if( 
3130: 72 3c 30 20 29 7b 0a 20 20 20 20 2f 2a 20 57 65  r<0 ){.    /* We
3140: 20 6e 65 65 64 20 74 6f 20 70 72 65 76 65 6e 74   need to prevent
3150: 20 61 20 72 61 6e 64 6f 6d 20 6e 75 6d 62 65 72   a random number
3160: 20 6f 66 20 30 78 38 30 30 30 30 30 30 30 30 30   of 0x8000000000
3170: 30 30 30 30 30 30 20 0a 20 20 20 20 2a 2a 20 28  000000 .    ** (
3180: 6f 72 20 2d 39 32 32 33 33 37 32 30 33 36 38 35  or -922337203685
3190: 34 37 37 35 38 30 38 29 20 73 69 6e 63 65 20 77  4775808) since w
31a0: 68 65 6e 20 79 6f 75 20 64 6f 20 61 62 73 28 29  hen you do abs()
31b0: 20 6f 66 20 74 68 61 74 0a 20 20 20 20 2a 2a 20   of that.    ** 
31c0: 6e 75 6d 62 65 72 20 6f 66 20 79 6f 75 20 67 65  number of you ge
31d0: 74 20 74 68 65 20 73 61 6d 65 20 76 61 6c 75 65  t the same value
31e0: 20 62 61 63 6b 20 61 67 61 69 6e 2e 20 20 54 6f   back again.  To
31f0: 20 64 6f 20 74 68 69 73 0a 20 20 20 20 2a 2a 20   do this.    ** 
3200: 69 6e 20 61 20 77 61 79 20 74 68 61 74 20 69 73  in a way that is
3210: 20 74 65 73 74 61 62 6c 65 2c 20 6d 61 73 6b 20   testable, mask 
3220: 74 68 65 20 73 69 67 6e 20 62 69 74 20 6f 66 66  the sign bit off
3230: 20 6f 66 20 6e 65 67 61 74 69 76 65 0a 20 20 20   of negative.   
3240: 20 2a 2a 20 76 61 6c 75 65 73 2c 20 72 65 73 75   ** values, resu
3250: 6c 74 69 6e 67 20 69 6e 20 61 20 70 6f 73 69 74  lting in a posit
3260: 69 76 65 20 76 61 6c 75 65 2e 20 20 54 68 65 6e  ive value.  Then
3270: 20 74 61 6b 65 20 74 68 65 20 0a 20 20 20 20 2a   take the .    *
3280: 2a 20 32 73 20 63 6f 6d 70 6c 65 6d 65 6e 74 20  * 2s complement 
3290: 6f 66 20 74 68 61 74 20 70 6f 73 69 74 69 76 65  of that positive
32a0: 20 76 61 6c 75 65 2e 20 20 54 68 65 20 65 6e 64   value.  The end
32b0: 20 72 65 73 75 6c 74 20 63 61 6e 0a 20 20 20 20   result can.    
32c0: 2a 2a 20 74 68 65 72 65 66 6f 72 65 20 62 65 20  ** therefore be 
32d0: 6e 6f 20 6c 65 73 73 20 74 68 61 6e 20 2d 39 32  no less than -92
32e0: 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38 30  2337203685477580
32f0: 37 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 72 20  7..    */.    r 
3300: 3d 20 2d 28 72 20 26 20 4c 41 52 47 45 53 54 5f  = -(r & LARGEST_
3310: 49 4e 54 36 34 29 3b 0a 20 20 7d 0a 20 20 73 71  INT64);.  }.  sq
3320: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
3330: 36 34 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b 0a  64(context, r);.
3340: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
3350: 6e 74 61 74 69 6f 6e 20 6f 66 20 72 61 6e 64 6f  ntation of rando
3360: 6d 62 6c 6f 62 28 4e 29 2e 20 20 52 65 74 75 72  mblob(N).  Retur
3370: 6e 20 61 20 72 61 6e 64 6f 6d 20 62 6c 6f 62 0a  n a random blob.
3380: 2a 2a 20 74 68 61 74 20 69 73 20 4e 20 62 79 74  ** that is N byt
3390: 65 73 20 6c 6f 6e 67 2e 0a 2a 2f 0a 73 74 61 74  es long..*/.stat
33a0: 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d 42 6c  ic void randomBl
33b0: 6f 62 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  ob(.  sqlite3_co
33c0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
33d0: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
33e0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
33f0: 67 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20  gv.){.  int n;. 
3400: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
3410: 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  p;.  assert( arg
3420: 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44  c==1 );.  UNUSED
3430: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
3440: 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  n = sqlite3_
3450: 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 30  value_int(argv[0
3460: 5d 29 3b 0a 20 20 69 66 28 20 6e 3c 31 20 29 7b  ]);.  if( n<1 ){
3470: 0a 20 20 20 20 6e 20 3d 20 31 3b 0a 20 20 7d 0a  .    n = 1;.  }.
3480: 20 20 70 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c    p = contextMal
3490: 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 6e 29 3b  loc(context, n);
34a0: 0a 20 20 69 66 28 20 70 20 29 7b 0a 20 20 20 20  .  if( p ){.    
34b0: 73 71 6c 69 74 65 33 5f 72 61 6e 64 6f 6d 6e 65  sqlite3_randomne
34c0: 73 73 28 6e 2c 20 70 29 3b 0a 20 20 20 20 73 71  ss(n, p);.    sq
34d0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62 6c 6f  lite3_result_blo
34e0: 62 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72  b(context, (char
34f0: 2a 29 70 2c 20 6e 2c 20 73 71 6c 69 74 65 33 5f  *)p, n, sqlite3_
3500: 66 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a  free);.  }.}../*
3510: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
3520: 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73 74 5f 69  on of the last_i
3530: 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 53 51  nsert_rowid() SQ
3540: 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65  L function.  The
3550: 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c 75 65   return.** value
3560: 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73 20   is the same as 
3570: 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 61 73 74  the sqlite3_last
3580: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20  _insert_rowid() 
3590: 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f  API function..*/
35a0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 61 73  .static void las
35b0: 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 0a  t_insert_rowid(.
35c0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
35d0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20 20 69  t *context, .  i
35e0: 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a 20 20 73  nt NotUsed, .  s
35f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e  qlite3_value **N
3600: 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c  otUsed2.){.  sql
3610: 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74  ite3 *db = sqlit
3620: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
3630: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20  ndle(context);. 
3640: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
3650: 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55  R2(NotUsed, NotU
3660: 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a  sed2);.  /* IMP:
3670: 20 52 2d 35 31 35 31 33 2d 31 32 30 32 36 20 54   R-51513-12026 T
3680: 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72  he last_insert_r
3690: 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e 63 74  owid() SQL funct
36a0: 69 6f 6e 20 69 73 20 61 0a 20 20 2a 2a 20 77 72  ion is a.  ** wr
36b0: 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65  apper around the
36c0: 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e   sqlite3_last_in
36d0: 73 65 72 74 5f 72 6f 77 69 64 28 29 20 43 2f 43  sert_rowid() C/C
36e0: 2b 2b 20 69 6e 74 65 72 66 61 63 65 0a 20 20 2a  ++ interface.  *
36f0: 2a 20 66 75 6e 63 74 69 6f 6e 2e 20 2a 2f 0a 20  * function. */. 
3700: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
3710: 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 73  int64(context, s
3720: 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65  qlite3_last_inse
3730: 72 74 5f 72 6f 77 69 64 28 64 62 29 29 3b 0a 7d  rt_rowid(db));.}
3740: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
3750: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 63 68  tation of the ch
3760: 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75 6e 63  anges() SQL func
3770: 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a  tion..**.** IMP:
3780: 20 52 2d 36 32 30 37 33 2d 31 31 32 30 39 20 54   R-62073-11209 T
3790: 68 65 20 63 68 61 6e 67 65 73 28 29 20 53 51 4c  he changes() SQL
37a0: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20 77   function is a w
37b0: 72 61 70 70 65 72 0a 2a 2a 20 61 72 6f 75 6e 64  rapper.** around
37c0: 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63 68 61   the sqlite3_cha
37d0: 6e 67 65 73 28 29 20 43 2f 43 2b 2b 20 66 75 6e  nges() C/C++ fun
37e0: 63 74 69 6f 6e 20 61 6e 64 20 68 65 6e 63 65 20  ction and hence 
37f0: 66 6f 6c 6c 6f 77 73 20 74 68 65 20 73 61 6d 65  follows the same
3800: 0a 2a 2a 20 72 75 6c 65 73 20 66 6f 72 20 63 6f  .** rules for co
3810: 75 6e 74 69 6e 67 20 63 68 61 6e 67 65 73 2e 0a  unting changes..
3820: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63  */.static void c
3830: 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69 74 65  hanges(.  sqlite
3840: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
3850: 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  xt,.  int NotUse
3860: 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  d,.  sqlite3_val
3870: 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b  ue **NotUsed2.){
3880: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d  .  sqlite3 *db =
3890: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
38a0: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
38b0: 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  xt);.  UNUSED_PA
38c0: 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64  RAMETER2(NotUsed
38d0: 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 73  , NotUsed2);.  s
38e0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
38f0: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
3900: 65 33 5f 63 68 61 6e 67 65 73 28 64 62 29 29 3b  e3_changes(db));
3910: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
3920: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
3930: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20  total_changes() 
3940: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54  SQL function.  T
3950: 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20  he return value 
3960: 69 73 0a 2a 2a 20 74 68 65 20 73 61 6d 65 20 61  is.** the same a
3970: 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 74 6f  s the sqlite3_to
3980: 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20 41 50  tal_changes() AP
3990: 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73  I function..*/.s
39a0: 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74 61 6c  tatic void total
39b0: 5f 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69  _changes(.  sqli
39c0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
39d0: 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55  text,.  int NotU
39e0: 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  sed,.  sqlite3_v
39f0: 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a  alue **NotUsed2.
3a00: 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62  ){.  sqlite3 *db
3a10: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65   = sqlite3_conte
3a20: 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e  xt_db_handle(con
3a30: 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f  text);.  UNUSED_
3a40: 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73  PARAMETER2(NotUs
3a50: 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20  ed, NotUsed2);. 
3a60: 20 2f 2a 20 49 4d 50 3a 20 52 2d 35 32 37 35 36   /* IMP: R-52756
3a70: 2d 34 31 39 39 33 20 54 68 69 73 20 66 75 6e 63  -41993 This func
3a80: 74 69 6f 6e 20 69 73 20 61 20 77 72 61 70 70 65  tion is a wrappe
3a90: 72 20 61 72 6f 75 6e 64 20 74 68 65 0a 20 20 2a  r around the.  *
3aa0: 2a 20 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c 5f  * sqlite3_total_
3ab0: 63 68 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b 20  changes() C/C++ 
3ac0: 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20 20  interface. */.  
3ad0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
3ae0: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  nt(context, sqli
3af0: 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67 65  te3_total_change
3b00: 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  s(db));.}../*.**
3b10: 20 41 20 73 74 72 75 63 74 75 72 65 20 64 65 66   A structure def
3b20: 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64 6f 20  ining how to do 
3b30: 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d 70 61  GLOB-style compa
3b40: 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72 75 63  risons..*/.struc
3b50: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 7b 0a  t compareInfo {.
3b60: 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b 0a 20    u8 matchAll;. 
3b70: 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a 20 20   u8 matchOne;.  
3b80: 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20 20 75  u8 matchSet;.  u
3b90: 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a 2f 2a  8 noCase;.};../*
3ba0: 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45 20 61 6e 64  .** For LIKE and
3bb0: 20 47 4c 4f 42 20 6d 61 74 63 68 69 6e 67 20 6f   GLOB matching o
3bc0: 6e 20 45 42 43 44 49 43 20 6d 61 63 68 69 6e 65  n EBCDIC machine
3bd0: 73 2c 20 61 73 73 75 6d 65 20 74 68 61 74 20 65  s, assume that e
3be0: 76 65 72 79 0a 2a 2a 20 63 68 61 72 61 63 74 65  very.** characte
3bf0: 72 20 69 73 20 65 78 61 63 74 6c 79 20 6f 6e 65  r is exactly one
3c00: 20 62 79 74 65 20 69 6e 20 73 69 7a 65 2e 20 20   byte in size.  
3c10: 41 6c 73 6f 2c 20 61 6c 6c 20 63 68 61 72 61 63  Also, all charac
3c20: 74 65 72 73 20 61 72 65 0a 2a 2a 20 61 62 6c 65  ters are.** able
3c30: 20 74 6f 20 70 61 72 74 69 63 69 70 61 74 65 20   to participate 
3c40: 69 6e 20 75 70 70 65 72 2d 63 61 73 65 2d 74 6f  in upper-case-to
3c50: 2d 6c 6f 77 65 72 2d 63 61 73 65 20 6d 61 70 70  -lower-case mapp
3c60: 69 6e 67 73 20 69 6e 20 45 42 43 44 49 43 0a 2a  ings in EBCDIC.*
3c70: 2a 20 77 68 65 72 65 61 73 20 6f 6e 6c 79 20 63  * whereas only c
3c80: 68 61 72 61 63 74 65 72 73 20 6c 65 73 73 20 74  haracters less t
3c90: 68 61 6e 20 30 78 38 30 20 64 6f 20 69 6e 20 41  han 0x80 do in A
3ca0: 53 43 49 49 2e 0a 2a 2f 0a 23 69 66 20 64 65 66  SCII..*/.#if def
3cb0: 69 6e 65 64 28 53 51 4c 49 54 45 5f 45 42 43 44  ined(SQLITE_EBCD
3cc0: 49 43 29 0a 23 20 64 65 66 69 6e 65 20 73 71 6c  IC).# define sql
3cd0: 69 74 65 33 55 74 66 38 52 65 61 64 28 41 29 20  ite3Utf8Read(A) 
3ce0: 20 20 20 28 2a 28 28 2a 41 29 2b 2b 29 29 0a 23     (*((*A)++)).#
3cf0: 20 64 65 66 69 6e 65 20 47 6c 6f 62 55 70 70 65   define GlobUppe
3d00: 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20 41 20  rToLower(A)   A 
3d10: 3d 20 73 71 6c 69 74 65 33 55 70 70 65 72 54 6f  = sqlite3UpperTo
3d20: 4c 6f 77 65 72 5b 41 5d 0a 23 65 6c 73 65 0a 23  Lower[A].#else.#
3d30: 20 64 65 66 69 6e 65 20 47 6c 6f 62 55 70 70 65   define GlobUppe
3d40: 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20 69 66  rToLower(A)   if
3d50: 28 20 21 28 28 41 29 26 7e 30 78 37 66 29 20 29  ( !((A)&~0x7f) )
3d60: 7b 20 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70  { A = sqlite3Upp
3d70: 65 72 54 6f 4c 6f 77 65 72 5b 41 5d 3b 20 7d 0a  erToLower[A]; }.
3d80: 23 65 6e 64 69 66 0a 0a 73 74 61 74 69 63 20 63  #endif..static c
3d90: 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70  onst struct comp
3da0: 61 72 65 49 6e 66 6f 20 67 6c 6f 62 49 6e 66 6f  areInfo globInfo
3db0: 20 3d 20 7b 20 27 2a 27 2c 20 27 3f 27 2c 20 27   = { '*', '?', '
3dc0: 5b 27 2c 20 30 20 7d 3b 0a 2f 2a 20 54 68 65 20  [', 0 };./* The 
3dd0: 63 6f 72 72 65 63 74 20 53 51 4c 2d 39 32 20 62  correct SQL-92 b
3de0: 65 68 61 76 69 6f 72 20 69 73 20 66 6f 72 20 74  ehavior is for t
3df0: 68 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72  he LIKE operator
3e00: 20 74 6f 20 69 67 6e 6f 72 65 0a 2a 2a 20 63 61   to ignore.** ca
3e10: 73 65 2e 20 20 54 68 75 73 20 20 27 61 27 20 4c  se.  Thus  'a' L
3e20: 49 4b 45 20 27 41 27 20 77 6f 75 6c 64 20 62 65  IKE 'A' would be
3e30: 20 74 72 75 65 2e 20 2a 2f 0a 73 74 61 74 69 63   true. */.static
3e40: 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f   const struct co
3e50: 6d 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e  mpareInfo likeIn
3e60: 66 6f 4e 6f 72 6d 20 3d 20 7b 20 27 25 27 2c 20  foNorm = { '%', 
3e70: 27 5f 27 2c 20 20 20 30 2c 20 31 20 7d 3b 0a 2f  '_',   0, 1 };./
3e80: 2a 20 49 66 20 53 51 4c 49 54 45 5f 43 41 53 45  * If SQLITE_CASE
3e90: 5f 53 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45 20  _SENSITIVE_LIKE 
3ea0: 69 73 20 64 65 66 69 6e 65 64 2c 20 74 68 65 6e  is defined, then
3eb0: 20 74 68 65 20 4c 49 4b 45 20 6f 70 65 72 61 74   the LIKE operat
3ec0: 6f 72 0a 2a 2a 20 69 73 20 63 61 73 65 20 73 65  or.** is case se
3ed0: 6e 73 69 74 69 76 65 20 63 61 75 73 69 6e 67 20  nsitive causing 
3ee0: 27 61 27 20 4c 49 4b 45 20 27 41 27 20 74 6f 20  'a' LIKE 'A' to 
3ef0: 62 65 20 66 61 6c 73 65 20 2a 2f 0a 73 74 61 74  be false */.stat
3f00: 69 63 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20  ic const struct 
3f10: 63 6f 6d 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65  compareInfo like
3f20: 49 6e 66 6f 41 6c 74 20 3d 20 7b 20 27 25 27 2c  InfoAlt = { '%',
3f30: 20 27 5f 27 2c 20 20 20 30 2c 20 30 20 7d 3b 0a   '_',   0, 0 };.
3f40: 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 61 72 65 20 74  ./*.** Compare t
3f50: 77 6f 20 55 54 46 2d 38 20 73 74 72 69 6e 67 73  wo UTF-8 strings
3f60: 20 66 6f 72 20 65 71 75 61 6c 69 74 79 20 77 68   for equality wh
3f70: 65 72 65 20 74 68 65 20 66 69 72 73 74 20 73 74  ere the first st
3f80: 72 69 6e 67 20 63 61 6e 0a 2a 2a 20 70 6f 74 65  ring can.** pote
3f90: 6e 74 69 61 6c 6c 79 20 62 65 20 61 20 22 67 6c  ntially be a "gl
3fa0: 6f 62 22 20 65 78 70 72 65 73 73 69 6f 6e 2e 20  ob" expression. 
3fb0: 20 52 65 74 75 72 6e 20 74 72 75 65 20 28 31 29   Return true (1)
3fc0: 20 69 66 20 74 68 65 79 0a 2a 2a 20 61 72 65 20   if they.** are 
3fd0: 74 68 65 20 73 61 6d 65 20 61 6e 64 20 66 61 6c  the same and fal
3fe0: 73 65 20 28 30 29 20 69 66 20 74 68 65 79 20 61  se (0) if they a
3ff0: 72 65 20 64 69 66 66 65 72 65 6e 74 2e 0a 2a 2a  re different..**
4000: 0a 2a 2a 20 47 6c 6f 62 62 69 6e 67 20 72 75 6c  .** Globbing rul
4010: 65 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27  es:.**.**      '
4020: 2a 27 20 20 20 20 20 20 20 4d 61 74 63 68 65 73  *'       Matches
4030: 20 61 6e 79 20 73 65 71 75 65 6e 63 65 20 6f 66   any sequence of
4040: 20 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68   zero or more ch
4050: 61 72 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20  aracters..**.** 
4060: 20 20 20 20 20 27 3f 27 20 20 20 20 20 20 20 4d       '?'       M
4070: 61 74 63 68 65 73 20 65 78 61 63 74 6c 79 20 6f  atches exactly o
4080: 6e 65 20 63 68 61 72 61 63 74 65 72 2e 0a 2a 2a  ne character..**
4090: 0a 2a 2a 20 20 20 20 20 5b 2e 2e 2e 5d 20 20 20  .**     [...]   
40a0: 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63     Matches one c
40b0: 68 61 72 61 63 74 65 72 20 66 72 6f 6d 20 74 68  haracter from th
40c0: 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74 20  e enclosed list 
40d0: 6f 66 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20  of.**           
40e0: 20 20 20 20 20 63 68 61 72 61 63 74 65 72 73 2e       characters.
40f0: 0a 2a 2a 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e  .**.**     [^...
4100: 5d 20 20 20 20 20 4d 61 74 63 68 65 73 20 6f 6e  ]     Matches on
4110: 65 20 63 68 61 72 61 63 74 65 72 20 6e 6f 74 20  e character not 
4120: 69 6e 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20  in the enclosed 
4130: 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 57 69 74 68  list..**.** With
4140: 20 74 68 65 20 5b 2e 2e 2e 5d 20 61 6e 64 20 5b   the [...] and [
4150: 5e 2e 2e 2e 5d 20 6d 61 74 63 68 69 6e 67 2c 20  ^...] matching, 
4160: 61 20 27 5d 27 20 63 68 61 72 61 63 74 65 72 20  a ']' character 
4170: 63 61 6e 20 62 65 20 69 6e 63 6c 75 64 65 64 0a  can be included.
4180: 2a 2a 20 69 6e 20 74 68 65 20 6c 69 73 74 20 62  ** in the list b
4190: 79 20 6d 61 6b 69 6e 67 20 69 74 20 74 68 65 20  y making it the 
41a0: 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72 20  first character 
41b0: 61 66 74 65 72 20 27 5b 27 20 6f 72 20 27 5e 27  after '[' or '^'
41c0: 2e 20 20 41 0a 2a 2a 20 72 61 6e 67 65 20 6f 66  .  A.** range of
41d0: 20 63 68 61 72 61 63 74 65 72 73 20 63 61 6e 20   characters can 
41e0: 62 65 20 73 70 65 63 69 66 69 65 64 20 75 73 69  be specified usi
41f0: 6e 67 20 27 2d 27 2e 20 20 45 78 61 6d 70 6c 65  ng '-'.  Example
4200: 3a 0a 2a 2a 20 22 5b 61 2d 7a 5d 22 20 6d 61 74  :.** "[a-z]" mat
4210: 63 68 65 73 20 61 6e 79 20 73 69 6e 67 6c 65 20  ches any single 
4220: 6c 6f 77 65 72 2d 63 61 73 65 20 6c 65 74 74 65  lower-case lette
4230: 72 2e 20 20 54 6f 20 6d 61 74 63 68 20 61 20 27  r.  To match a '
4240: 2d 27 2c 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 74  -', make.** it t
4250: 68 65 20 6c 61 73 74 20 63 68 61 72 61 63 74 65  he last characte
4260: 72 20 69 6e 20 74 68 65 20 6c 69 73 74 2e 0a 2a  r in the list..*
4270: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e  *.** This routin
4280: 65 20 69 73 20 75 73 75 61 6c 6c 79 20 71 75 69  e is usually qui
4290: 63 6b 2c 20 62 75 74 20 63 61 6e 20 62 65 20 4e  ck, but can be N
42a0: 2a 2a 32 20 69 6e 20 74 68 65 20 77 6f 72 73 74  **2 in the worst
42b0: 20 63 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 48 69 6e   case..**.** Hin
42c0: 74 73 3a 20 74 6f 20 6d 61 74 63 68 20 27 2a 27  ts: to match '*'
42d0: 20 6f 72 20 27 3f 27 2c 20 70 75 74 20 74 68 65   or '?', put the
42e0: 6d 20 69 6e 20 22 5b 5d 22 2e 20 20 4c 69 6b 65  m in "[]".  Like
42f0: 20 74 68 69 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20   this:.**.**    
4300: 20 20 20 20 20 61 62 63 5b 2a 5d 78 79 7a 20 20       abc[*]xyz  
4310: 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 22 61        Matches "a
4320: 62 63 2a 78 79 7a 22 20 6f 6e 6c 79 0a 2a 2f 0a  bc*xyz" only.*/.
4330: 73 74 61 74 69 63 20 69 6e 74 20 70 61 74 74 65  static int patte
4340: 72 6e 43 6f 6d 70 61 72 65 28 0a 20 20 63 6f 6e  rnCompare(.  con
4350: 73 74 20 75 38 20 2a 7a 50 61 74 74 65 72 6e 2c  st u8 *zPattern,
4360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
4370: 20 54 68 65 20 67 6c 6f 62 20 70 61 74 74 65 72   The glob patter
4380: 6e 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 38 20  n */.  const u8 
4390: 2a 7a 53 74 72 69 6e 67 2c 20 20 20 20 20 20 20  *zString,       
43a0: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 73          /* The s
43b0: 74 72 69 6e 67 20 74 6f 20 63 6f 6d 70 61 72 65  tring to compare
43c0: 20 61 67 61 69 6e 73 74 20 74 68 65 20 67 6c 6f   against the glo
43d0: 62 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 73 74 72  b */.  const str
43e0: 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20  uct compareInfo 
43f0: 2a 70 49 6e 66 6f 2c 20 2f 2a 20 49 6e 66 6f 72  *pInfo, /* Infor
4400: 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 68 6f 77  mation about how
4410: 20 74 6f 20 64 6f 20 74 68 65 20 63 6f 6d 70 61   to do the compa
4420: 72 65 20 2a 2f 0a 20 20 75 33 32 20 65 73 63 20  re */.  u32 esc 
4430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4440: 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20           /* The 
4450: 65 73 63 61 70 65 20 63 68 61 72 61 63 74 65 72  escape character
4460: 20 2a 2f 0a 29 7b 0a 20 20 75 33 32 20 63 2c 20   */.){.  u32 c, 
4470: 63 32 3b 0a 20 20 69 6e 74 20 69 6e 76 65 72 74  c2;.  int invert
4480: 3b 0a 20 20 69 6e 74 20 73 65 65 6e 3b 0a 20 20  ;.  int seen;.  
4490: 75 38 20 6d 61 74 63 68 4f 6e 65 20 3d 20 70 49  u8 matchOne = pI
44a0: 6e 66 6f 2d 3e 6d 61 74 63 68 4f 6e 65 3b 0a 20  nfo->matchOne;. 
44b0: 20 75 38 20 6d 61 74 63 68 41 6c 6c 20 3d 20 70   u8 matchAll = p
44c0: 49 6e 66 6f 2d 3e 6d 61 74 63 68 41 6c 6c 3b 0a  Info->matchAll;.
44d0: 20 20 75 38 20 6d 61 74 63 68 53 65 74 20 3d 20    u8 matchSet = 
44e0: 70 49 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74 3b  pInfo->matchSet;
44f0: 0a 20 20 75 38 20 6e 6f 43 61 73 65 20 3d 20 70  .  u8 noCase = p
4500: 49 6e 66 6f 2d 3e 6e 6f 43 61 73 65 3b 20 0a 20  Info->noCase; . 
4510: 20 69 6e 74 20 70 72 65 76 45 73 63 61 70 65 20   int prevEscape 
4520: 3d 20 30 3b 20 20 20 20 20 2f 2a 20 54 72 75 65  = 0;     /* True
4530: 20 69 66 20 74 68 65 20 70 72 65 76 69 6f 75 73   if the previous
4540: 20 63 68 61 72 61 63 74 65 72 20 77 61 73 20 27   character was '
4550: 65 73 63 61 70 65 27 20 2a 2f 0a 0a 20 20 77 68  escape' */..  wh
4560: 69 6c 65 28 20 28 63 20 3d 20 73 71 6c 69 74 65  ile( (c = sqlite
4570: 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74  3Utf8Read(&zPatt
4580: 65 72 6e 29 29 21 3d 30 20 29 7b 0a 20 20 20 20  ern))!=0 ){.    
4590: 69 66 28 20 63 3d 3d 6d 61 74 63 68 41 6c 6c 20  if( c==matchAll 
45a0: 26 26 20 21 70 72 65 76 45 73 63 61 70 65 20 29  && !prevEscape )
45b0: 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 28  {.      while( (
45c0: 63 3d 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  c=sqlite3Utf8Rea
45d0: 64 28 26 7a 50 61 74 74 65 72 6e 29 29 20 3d 3d  d(&zPattern)) ==
45e0: 20 6d 61 74 63 68 41 6c 6c 0a 20 20 20 20 20 20   matchAll.      
45f0: 20 20 20 20 20 20 20 20 20 7c 7c 20 63 20 3d 3d           || c ==
4600: 20 6d 61 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20   matchOne ){.   
4610: 20 20 20 20 20 69 66 28 20 63 3d 3d 6d 61 74 63       if( c==matc
4620: 68 4f 6e 65 20 26 26 20 73 71 6c 69 74 65 33 55  hOne && sqlite3U
4630: 74 66 38 52 65 61 64 28 26 7a 53 74 72 69 6e 67  tf8Read(&zString
4640: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )==0 ){.        
4650: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20    return 0;.    
4660: 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20      }.      }.  
4670: 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29 7b 0a      if( c==0 ){.
4680: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 31          return 1
4690: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66  ;.      }else if
46a0: 28 20 63 3d 3d 65 73 63 20 29 7b 0a 20 20 20 20  ( c==esc ){.    
46b0: 20 20 20 20 63 20 3d 20 73 71 6c 69 74 65 33 55      c = sqlite3U
46c0: 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72  tf8Read(&zPatter
46d0: 6e 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20  n);.        if( 
46e0: 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  c==0 ){.        
46f0: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20    return 0;.    
4700: 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 65 6c 73      }.      }els
4710: 65 20 69 66 28 20 63 3d 3d 6d 61 74 63 68 53 65  e if( c==matchSe
4720: 74 20 29 7b 0a 20 20 20 20 20 20 20 20 61 73 73  t ){.        ass
4730: 65 72 74 28 20 65 73 63 3d 3d 30 20 29 3b 20 20  ert( esc==0 );  
4740: 20 20 20 20 20 20 20 2f 2a 20 54 68 69 73 20 69         /* This i
4750: 73 20 47 4c 4f 42 2c 20 6e 6f 74 20 4c 49 4b 45  s GLOB, not LIKE
4760: 20 2a 2f 0a 20 20 20 20 20 20 20 20 61 73 73 65   */.        asse
4770: 72 74 28 20 6d 61 74 63 68 53 65 74 3c 30 78 38  rt( matchSet<0x8
4780: 30 20 29 3b 20 20 2f 2a 20 27 5b 27 20 69 73 20  0 );  /* '[' is 
4790: 61 20 73 69 6e 67 6c 65 2d 62 79 74 65 20 63 68  a single-byte ch
47a0: 61 72 61 63 74 65 72 20 2a 2f 0a 20 20 20 20 20  aracter */.     
47b0: 20 20 20 77 68 69 6c 65 28 20 2a 7a 53 74 72 69     while( *zStri
47c0: 6e 67 20 26 26 20 70 61 74 74 65 72 6e 43 6f 6d  ng && patternCom
47d0: 70 61 72 65 28 26 7a 50 61 74 74 65 72 6e 5b 2d  pare(&zPattern[-
47e0: 31 5d 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f  1],zString,pInfo
47f0: 2c 65 73 63 29 3d 3d 30 20 29 7b 0a 20 20 20 20  ,esc)==0 ){.    
4800: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
4810: 50 5f 55 54 46 38 28 7a 53 74 72 69 6e 67 29 3b  P_UTF8(zString);
4820: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
4830: 20 20 20 72 65 74 75 72 6e 20 2a 7a 53 74 72 69     return *zStri
4840: 6e 67 21 3d 30 3b 0a 20 20 20 20 20 20 7d 0a 20  ng!=0;.      }. 
4850: 20 20 20 20 20 77 68 69 6c 65 28 20 28 63 32 20       while( (c2 
4860: 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  = sqlite3Utf8Rea
4870: 64 28 26 7a 53 74 72 69 6e 67 29 29 21 3d 30 20  d(&zString))!=0 
4880: 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 6e  ){.        if( n
4890: 6f 43 61 73 65 20 29 7b 0a 20 20 20 20 20 20 20  oCase ){.       
48a0: 20 20 20 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f     GlobUpperToLo
48b0: 77 65 72 28 63 32 29 3b 0a 20 20 20 20 20 20 20  wer(c2);.       
48c0: 20 20 20 47 6c 6f 62 55 70 70 65 72 54 6f 4c 6f     GlobUpperToLo
48d0: 77 65 72 28 63 29 3b 0a 20 20 20 20 20 20 20 20  wer(c);.        
48e0: 20 20 77 68 69 6c 65 28 20 63 32 20 21 3d 20 30    while( c2 != 0
48f0: 20 26 26 20 63 32 20 21 3d 20 63 20 29 7b 0a 20   && c2 != c ){. 
4900: 20 20 20 20 20 20 20 20 20 20 20 63 32 20 3d 20             c2 = 
4910: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
4920: 26 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20  &zString);.     
4930: 20 20 20 20 20 20 20 47 6c 6f 62 55 70 70 65 72         GlobUpper
4940: 54 6f 4c 6f 77 65 72 28 63 32 29 3b 0a 20 20 20  ToLower(c2);.   
4950: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
4960: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
4970: 20 20 77 68 69 6c 65 28 20 63 32 20 21 3d 20 30    while( c2 != 0
4980: 20 26 26 20 63 32 20 21 3d 20 63 20 29 7b 0a 20   && c2 != c ){. 
4990: 20 20 20 20 20 20 20 20 20 20 20 63 32 20 3d 20             c2 = 
49a0: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
49b0: 26 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20  &zString);.     
49c0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d       }.        }
49d0: 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 32 3d  .        if( c2=
49e0: 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20  =0 ) return 0;. 
49f0: 20 20 20 20 20 20 20 69 66 28 20 70 61 74 74 65         if( patte
4a00: 72 6e 43 6f 6d 70 61 72 65 28 7a 50 61 74 74 65  rnCompare(zPatte
4a10: 72 6e 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f  rn,zString,pInfo
4a20: 2c 65 73 63 29 20 29 20 72 65 74 75 72 6e 20 31  ,esc) ) return 1
4a30: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
4a40: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 7d 65  return 0;.    }e
4a50: 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61 74 63 68  lse if( c==match
4a60: 4f 6e 65 20 26 26 20 21 70 72 65 76 45 73 63 61  One && !prevEsca
4a70: 70 65 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20  pe ){.      if( 
4a80: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
4a90: 26 7a 53 74 72 69 6e 67 29 3d 3d 30 20 29 7b 0a  &zString)==0 ){.
4aa0: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 30          return 0
4ab0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65  ;.      }.    }e
4ac0: 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61 74 63 68  lse if( c==match
4ad0: 53 65 74 20 29 7b 0a 20 20 20 20 20 20 75 33 32  Set ){.      u32
4ae0: 20 70 72 69 6f 72 5f 63 20 3d 20 30 3b 0a 20 20   prior_c = 0;.  
4af0: 20 20 20 20 61 73 73 65 72 74 28 20 65 73 63 3d      assert( esc=
4b00: 3d 30 20 29 3b 20 20 20 20 2f 2a 20 54 68 69 73  =0 );    /* This
4b10: 20 6f 6e 6c 79 20 6f 63 63 75 72 73 20 66 6f 72   only occurs for
4b20: 20 47 4c 4f 42 2c 20 6e 6f 74 20 4c 49 4b 45 20   GLOB, not LIKE 
4b30: 2a 2f 0a 20 20 20 20 20 20 73 65 65 6e 20 3d 20  */.      seen = 
4b40: 30 3b 0a 20 20 20 20 20 20 69 6e 76 65 72 74 20  0;.      invert 
4b50: 3d 20 30 3b 0a 20 20 20 20 20 20 63 20 3d 20 73  = 0;.      c = s
4b60: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26  qlite3Utf8Read(&
4b70: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
4b80: 69 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72  if( c==0 ) retur
4b90: 6e 20 30 3b 0a 20 20 20 20 20 20 63 32 20 3d 20  n 0;.      c2 = 
4ba0: 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28  sqlite3Utf8Read(
4bb0: 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20  &zPattern);.    
4bc0: 20 20 69 66 28 20 63 32 3d 3d 27 5e 27 20 29 7b    if( c2=='^' ){
4bd0: 0a 20 20 20 20 20 20 20 20 69 6e 76 65 72 74 20  .        invert 
4be0: 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 63 32 20  = 1;.        c2 
4bf0: 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  = sqlite3Utf8Rea
4c00: 64 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20  d(&zPattern);.  
4c10: 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20      }.      if( 
4c20: 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20 20 20 20  c2==']' ){.     
4c30: 20 20 20 69 66 28 20 63 3d 3d 27 5d 27 20 29 20     if( c==']' ) 
4c40: 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20  seen = 1;.      
4c50: 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74    c2 = sqlite3Ut
4c60: 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e  f8Read(&zPattern
4c70: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  );.      }.     
4c80: 20 77 68 69 6c 65 28 20 63 32 20 26 26 20 63 32   while( c2 && c2
4c90: 21 3d 27 5d 27 20 29 7b 0a 20 20 20 20 20 20 20  !=']' ){.       
4ca0: 20 69 66 28 20 63 32 3d 3d 27 2d 27 20 26 26 20   if( c2=='-' && 
4cb0: 7a 50 61 74 74 65 72 6e 5b 30 5d 21 3d 27 5d 27  zPattern[0]!=']'
4cc0: 20 26 26 20 7a 50 61 74 74 65 72 6e 5b 30 5d 21   && zPattern[0]!
4cd0: 3d 30 20 26 26 20 70 72 69 6f 72 5f 63 3e 30 20  =0 && prior_c>0 
4ce0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 63 32 20  ){.          c2 
4cf0: 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  = sqlite3Utf8Rea
4d00: 64 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20  d(&zPattern);.  
4d10: 20 20 20 20 20 20 20 20 69 66 28 20 63 3e 3d 70          if( c>=p
4d20: 72 69 6f 72 5f 63 20 26 26 20 63 3c 3d 63 32 20  rior_c && c<=c2 
4d30: 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20  ) seen = 1;.    
4d40: 20 20 20 20 20 20 70 72 69 6f 72 5f 63 20 3d 20        prior_c = 
4d50: 30 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65  0;.        }else
4d60: 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20  {.          if( 
4d70: 63 3d 3d 63 32 20 29 7b 0a 20 20 20 20 20 20 20  c==c2 ){.       
4d80: 20 20 20 20 20 73 65 65 6e 20 3d 20 31 3b 0a 20       seen = 1;. 
4d90: 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20           }.     
4da0: 20 20 20 20 20 70 72 69 6f 72 5f 63 20 3d 20 63       prior_c = c
4db0: 32 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  2;.        }.   
4dc0: 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65       c2 = sqlite
4dd0: 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74 74  3Utf8Read(&zPatt
4de0: 65 72 6e 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  ern);.      }.  
4df0: 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20 7c 7c      if( c2==0 ||
4e00: 20 28 73 65 65 6e 20 5e 20 69 6e 76 65 72 74 29   (seen ^ invert)
4e10: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72  ==0 ){.        r
4e20: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d  eturn 0;.      }
4e30: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 65  .    }else if( e
4e40: 73 63 3d 3d 63 20 26 26 20 21 70 72 65 76 45 73  sc==c && !prevEs
4e50: 63 61 70 65 20 29 7b 0a 20 20 20 20 20 20 70 72  cape ){.      pr
4e60: 65 76 45 73 63 61 70 65 20 3d 20 31 3b 0a 20 20  evEscape = 1;.  
4e70: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 63    }else{.      c
4e80: 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52  2 = sqlite3Utf8R
4e90: 65 61 64 28 26 7a 53 74 72 69 6e 67 29 3b 0a 20  ead(&zString);. 
4ea0: 20 20 20 20 20 69 66 28 20 6e 6f 43 61 73 65 20       if( noCase 
4eb0: 29 7b 0a 20 20 20 20 20 20 20 20 47 6c 6f 62 55  ){.        GlobU
4ec0: 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 29 3b 0a  pperToLower(c);.
4ed0: 20 20 20 20 20 20 20 20 47 6c 6f 62 55 70 70 65          GlobUppe
4ee0: 72 54 6f 4c 6f 77 65 72 28 63 32 29 3b 0a 20 20  rToLower(c2);.  
4ef0: 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20      }.      if( 
4f00: 63 21 3d 63 32 20 29 7b 0a 20 20 20 20 20 20 20  c!=c2 ){.       
4f10: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20   return 0;.     
4f20: 20 7d 0a 20 20 20 20 20 20 70 72 65 76 45 73 63   }.      prevEsc
4f30: 61 70 65 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20  ape = 0;.    }. 
4f40: 20 7d 0a 20 20 72 65 74 75 72 6e 20 2a 7a 53 74   }.  return *zSt
4f50: 72 69 6e 67 3d 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a  ring==0;.}../*.*
4f60: 2a 20 54 68 65 20 73 71 6c 69 74 65 33 5f 73 74  * The sqlite3_st
4f70: 72 67 6c 6f 62 28 29 20 69 6e 74 65 72 66 61 63  rglob() interfac
4f80: 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  e..*/.int sqlite
4f90: 33 5f 73 74 72 67 6c 6f 62 28 63 6f 6e 73 74 20  3_strglob(const 
4fa0: 63 68 61 72 20 2a 7a 47 6c 6f 62 50 61 74 74 65  char *zGlobPatte
4fb0: 72 6e 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  rn, const char *
4fc0: 7a 53 74 72 69 6e 67 29 7b 0a 20 20 72 65 74 75  zString){.  retu
4fd0: 72 6e 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72  rn patternCompar
4fe0: 65 28 28 75 38 2a 29 7a 47 6c 6f 62 50 61 74 74  e((u8*)zGlobPatt
4ff0: 65 72 6e 2c 20 28 75 38 2a 29 7a 53 74 72 69 6e  ern, (u8*)zStrin
5000: 67 2c 20 26 67 6c 6f 62 49 6e 66 6f 2c 20 30 29  g, &globInfo, 0)
5010: 3d 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f  ==0;.}../*.** Co
5020: 75 6e 74 20 74 68 65 20 6e 75 6d 62 65 72 20 6f  unt the number o
5030: 66 20 74 69 6d 65 73 20 74 68 61 74 20 74 68 65  f times that the
5040: 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 28   LIKE operator (
5050: 6f 72 20 47 4c 4f 42 20 77 68 69 63 68 20 69 73  or GLOB which is
5060: 0a 2a 2a 20 6a 75 73 74 20 61 20 76 61 72 69 61  .** just a varia
5070: 74 69 6f 6e 20 6f 66 20 4c 49 4b 45 29 20 67 65  tion of LIKE) ge
5080: 74 73 20 63 61 6c 6c 65 64 2e 20 20 54 68 69 73  ts called.  This
5090: 20 69 73 20 75 73 65 64 20 66 6f 72 20 74 65 73   is used for tes
50a0: 74 69 6e 67 0a 2a 2a 20 6f 6e 6c 79 2e 0a 2a 2f  ting.** only..*/
50b0: 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54  .#ifdef SQLITE_T
50c0: 45 53 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f  EST.int sqlite3_
50d0: 6c 69 6b 65 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a  like_count = 0;.
50e0: 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 49  #endif.../*.** I
50f0: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
5100: 20 74 68 65 20 6c 69 6b 65 28 29 20 53 51 4c 20   the like() SQL 
5110: 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20  function.  This 
5120: 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65  function impleme
5130: 6e 74 73 0a 2a 2a 20 74 68 65 20 62 75 69 6c 64  nts.** the build
5140: 2d 69 6e 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f  -in LIKE operato
5150: 72 2e 20 20 54 68 65 20 66 69 72 73 74 20 61 72  r.  The first ar
5160: 67 75 6d 65 6e 74 20 74 6f 20 74 68 65 20 66 75  gument to the fu
5170: 6e 63 74 69 6f 6e 20 69 73 20 74 68 65 0a 2a 2a  nction is the.**
5180: 20 70 61 74 74 65 72 6e 20 61 6e 64 20 74 68 65   pattern and the
5190: 20 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74   second argument
51a0: 20 69 73 20 74 68 65 20 73 74 72 69 6e 67 2e 20   is the string. 
51b0: 20 53 6f 2c 20 74 68 65 20 53 51 4c 20 73 74 61   So, the SQL sta
51c0: 74 65 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20 20  tements:.**.**  
51d0: 20 20 20 20 20 41 20 4c 49 4b 45 20 42 0a 2a 2a       A LIKE B.**
51e0: 0a 2a 2a 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74  .** is implement
51f0: 65 64 20 61 73 20 6c 69 6b 65 28 42 2c 41 29 2e  ed as like(B,A).
5200: 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 73 61 6d 65  .**.** This same
5210: 20 66 75 6e 63 74 69 6f 6e 20 28 77 69 74 68 20   function (with 
5220: 61 20 64 69 66 66 65 72 65 6e 74 20 63 6f 6d 70  a different comp
5230: 61 72 65 49 6e 66 6f 20 73 74 72 75 63 74 75 72  areInfo structur
5240: 65 29 20 63 6f 6d 70 75 74 65 73 0a 2a 2a 20 74  e) computes.** t
5250: 68 65 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f 72  he GLOB operator
5260: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
5270: 20 6c 69 6b 65 46 75 6e 63 28 0a 20 20 73 71 6c   likeFunc(.  sql
5280: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
5290: 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 61 72  ntext, .  int ar
52a0: 67 63 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76  gc, .  sqlite3_v
52b0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
52c0: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
52d0: 63 68 61 72 20 2a 7a 41 2c 20 2a 7a 42 3b 0a 20  char *zA, *zB;. 
52e0: 20 75 33 32 20 65 73 63 61 70 65 20 3d 20 30 3b   u32 escape = 0;
52f0: 0a 20 20 69 6e 74 20 6e 50 61 74 3b 0a 20 20 73  .  int nPat;.  s
5300: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c  qlite3 *db = sql
5310: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
5320: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b  handle(context);
5330: 0a 0a 20 20 7a 42 20 3d 20 73 71 6c 69 74 65 33  ..  zB = sqlite3
5340: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
5350: 5b 30 5d 29 3b 0a 20 20 7a 41 20 3d 20 73 71 6c  [0]);.  zA = sql
5360: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
5370: 61 72 67 76 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20  argv[1]);..  /* 
5380: 4c 69 6d 69 74 20 74 68 65 20 6c 65 6e 67 74 68  Limit the length
5390: 20 6f 66 20 74 68 65 20 4c 49 4b 45 20 6f 72 20   of the LIKE or 
53a0: 47 4c 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 20  GLOB pattern to 
53b0: 61 76 6f 69 64 20 70 72 6f 62 6c 65 6d 73 0a 20  avoid problems. 
53c0: 20 2a 2a 20 6f 66 20 64 65 65 70 20 72 65 63 75   ** of deep recu
53d0: 72 73 69 6f 6e 20 61 6e 64 20 4e 2a 4e 20 62 65  rsion and N*N be
53e0: 68 61 76 69 6f 72 20 69 6e 20 70 61 74 74 65 72  havior in patter
53f0: 6e 43 6f 6d 70 61 72 65 28 29 2e 0a 20 20 2a 2f  nCompare()..  */
5400: 0a 20 20 6e 50 61 74 20 3d 20 73 71 6c 69 74 65  .  nPat = sqlite
5410: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
5420: 67 76 5b 30 5d 29 3b 0a 20 20 74 65 73 74 63 61  gv[0]);.  testca
5430: 73 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c  se( nPat==db->aL
5440: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
5450: 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c  T_LIKE_PATTERN_L
5460: 45 4e 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74  ENGTH] );.  test
5470: 63 61 73 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e  case( nPat==db->
5480: 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49  aLimit[SQLITE_LI
5490: 4d 49 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e  MIT_LIKE_PATTERN
54a0: 5f 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20  _LENGTH]+1 );.  
54b0: 69 66 28 20 6e 50 61 74 20 3e 20 64 62 2d 3e 61  if( nPat > db->a
54c0: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
54d0: 49 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f  IT_LIKE_PATTERN_
54e0: 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73  LENGTH] ){.    s
54f0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
5500: 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 4c 49  ror(context, "LI
5510: 4b 45 20 6f 72 20 47 4c 4f 42 20 70 61 74 74 65  KE or GLOB patte
5520: 72 6e 20 74 6f 6f 20 63 6f 6d 70 6c 65 78 22 2c  rn too complex",
5530: 20 2d 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e   -1);.    return
5540: 3b 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20  ;.  }.  assert( 
5550: 7a 42 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75  zB==sqlite3_valu
5560: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20  e_text(argv[0]) 
5570: 29 3b 20 20 2f 2a 20 45 6e 63 6f 64 69 6e 67 20  );  /* Encoding 
5580: 64 69 64 20 6e 6f 74 20 63 68 61 6e 67 65 20 2a  did not change *
5590: 2f 0a 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33  /..  if( argc==3
55a0: 20 29 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 65   ){.    /* The e
55b0: 73 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20  scape character 
55c0: 73 74 72 69 6e 67 20 6d 75 73 74 20 63 6f 6e 73  string must cons
55d0: 69 73 74 20 6f 66 20 61 20 73 69 6e 67 6c 65 20  ist of a single 
55e0: 55 54 46 2d 38 20 63 68 61 72 61 63 74 65 72 2e  UTF-8 character.
55f0: 0a 20 20 20 20 2a 2a 20 4f 74 68 65 72 77 69 73  .    ** Otherwis
5600: 65 2c 20 72 65 74 75 72 6e 20 61 6e 20 65 72 72  e, return an err
5610: 6f 72 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 63  or..    */.    c
5620: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
5630: 61 72 20 2a 7a 45 73 63 20 3d 20 73 71 6c 69 74  ar *zEsc = sqlit
5640: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
5650: 67 76 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20  gv[2]);.    if( 
5660: 7a 45 73 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  zEsc==0 ) return
5670: 3b 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65  ;.    if( sqlite
5680: 33 55 74 66 38 43 68 61 72 4c 65 6e 28 28 63 68  3Utf8CharLen((ch
5690: 61 72 2a 29 7a 45 73 63 2c 20 2d 31 29 21 3d 31  ar*)zEsc, -1)!=1
56a0: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
56b0: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63  3_result_error(c
56c0: 6f 6e 74 65 78 74 2c 20 0a 20 20 20 20 20 20 20  ontext, .       
56d0: 20 20 20 22 45 53 43 41 50 45 20 65 78 70 72 65     "ESCAPE expre
56e0: 73 73 69 6f 6e 20 6d 75 73 74 20 62 65 20 61 20  ssion must be a 
56f0: 73 69 6e 67 6c 65 20 63 68 61 72 61 63 74 65 72  single character
5700: 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 72 65  ", -1);.      re
5710: 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20  turn;.    }.    
5720: 65 73 63 61 70 65 20 3d 20 73 71 6c 69 74 65 33  escape = sqlite3
5730: 55 74 66 38 52 65 61 64 28 26 7a 45 73 63 29 3b  Utf8Read(&zEsc);
5740: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 41 20 26 26  .  }.  if( zA &&
5750: 20 7a 42 20 29 7b 0a 20 20 20 20 73 74 72 75 63   zB ){.    struc
5760: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70  t compareInfo *p
5770: 49 6e 66 6f 20 3d 20 73 71 6c 69 74 65 33 5f 75  Info = sqlite3_u
5780: 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74  ser_data(context
5790: 29 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  );.#ifdef SQLITE
57a0: 5f 54 45 53 54 0a 20 20 20 20 73 71 6c 69 74 65  _TEST.    sqlite
57b0: 33 5f 6c 69 6b 65 5f 63 6f 75 6e 74 2b 2b 3b 0a  3_like_count++;.
57c0: 23 65 6e 64 69 66 0a 20 20 20 20 0a 20 20 20 20  #endif.    .    
57d0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
57e0: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 70 61 74 74  nt(context, patt
57f0: 65 72 6e 43 6f 6d 70 61 72 65 28 7a 42 2c 20 7a  ernCompare(zB, z
5800: 41 2c 20 70 49 6e 66 6f 2c 20 65 73 63 61 70 65  A, pInfo, escape
5810: 29 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  ));.  }.}../*.**
5820: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
5830: 6f 66 20 74 68 65 20 4e 55 4c 4c 49 46 28 78 2c  of the NULLIF(x,
5840: 79 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68  y) function.  Th
5850: 65 20 72 65 73 75 6c 74 20 69 73 20 74 68 65 20  e result is the 
5860: 66 69 72 73 74 0a 2a 2a 20 61 72 67 75 6d 65 6e  first.** argumen
5870: 74 20 69 66 20 74 68 65 20 61 72 67 75 6d 65 6e  t if the argumen
5880: 74 73 20 61 72 65 20 64 69 66 66 65 72 65 6e 74  ts are different
5890: 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20 69 73  .  The result is
58a0: 20 4e 55 4c 4c 20 69 66 20 74 68 65 0a 2a 2a 20   NULL if the.** 
58b0: 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20 65 71  arguments are eq
58c0: 75 61 6c 20 74 6f 20 65 61 63 68 20 6f 74 68 65  ual to each othe
58d0: 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  r..*/.static voi
58e0: 64 20 6e 75 6c 6c 69 66 46 75 6e 63 28 0a 20 20  d nullifFunc(.  
58f0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
5900: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
5910: 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74  NotUsed,.  sqlit
5920: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
5930: 29 7b 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43  ){.  CollSeq *pC
5940: 6f 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74  oll = sqlite3Get
5950: 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74  FuncCollSeq(cont
5960: 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  ext);.  UNUSED_P
5970: 41 52 41 4d 45 54 45 52 28 4e 6f 74 55 73 65 64  ARAMETER(NotUsed
5980: 29 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33  );.  if( sqlite3
5990: 4d 65 6d 43 6f 6d 70 61 72 65 28 61 72 67 76 5b  MemCompare(argv[
59a0: 30 5d 2c 20 61 72 67 76 5b 31 5d 2c 20 70 43 6f  0], argv[1], pCo
59b0: 6c 6c 29 21 3d 30 20 29 7b 0a 20 20 20 20 73 71  ll)!=0 ){.    sq
59c0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c  lite3_result_val
59d0: 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76  ue(context, argv
59e0: 5b 30 5d 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  [0]);.  }.}../*.
59f0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
5a00: 6e 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f  n of the sqlite_
5a10: 76 65 72 73 69 6f 6e 28 29 20 66 75 6e 63 74 69  version() functi
5a20: 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20  on.  The result 
5a30: 69 73 20 74 68 65 20 76 65 72 73 69 6f 6e 0a 2a  is the version.*
5a40: 2a 20 6f 66 20 74 68 65 20 53 51 4c 69 74 65 20  * of the SQLite 
5a50: 6c 69 62 72 61 72 79 20 74 68 61 74 20 69 73 20  library that is 
5a60: 72 75 6e 6e 69 6e 67 2e 0a 2a 2f 0a 73 74 61 74  running..*/.stat
5a70: 69 63 20 76 6f 69 64 20 76 65 72 73 69 6f 6e 46  ic void versionF
5a80: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
5a90: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
5aa0: 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a  .  int NotUsed,.
5ab0: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
5ac0: 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20  **NotUsed2.){.  
5ad0: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
5ae0: 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73  2(NotUsed, NotUs
5af0: 65 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20  ed2);.  /* IMP: 
5b00: 52 2d 34 38 36 39 39 2d 34 38 36 31 37 20 54 68  R-48699-48617 Th
5b10: 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61  is function is a
5b20: 6e 20 53 51 4c 20 77 72 61 70 70 65 72 20 61 72  n SQL wrapper ar
5b30: 6f 75 6e 64 20 74 68 65 0a 20 20 2a 2a 20 73 71  ound the.  ** sq
5b40: 6c 69 74 65 33 5f 6c 69 62 76 65 72 73 69 6f 6e  lite3_libversion
5b50: 28 29 20 43 2d 69 6e 74 65 72 66 61 63 65 2e 20  () C-interface. 
5b60: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  */.  sqlite3_res
5b70: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
5b80: 2c 20 73 71 6c 69 74 65 33 5f 6c 69 62 76 65 72  , sqlite3_libver
5b90: 73 69 6f 6e 28 29 2c 20 2d 31 2c 20 53 51 4c 49  sion(), -1, SQLI
5ba0: 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f  TE_STATIC);.}../
5bb0: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
5bc0: 69 6f 6e 20 6f 66 20 74 68 65 20 73 71 6c 69 74  ion of the sqlit
5bd0: 65 5f 73 6f 75 72 63 65 5f 69 64 28 29 20 66 75  e_source_id() fu
5be0: 6e 63 74 69 6f 6e 2e 20 54 68 65 20 72 65 73 75  nction. The resu
5bf0: 6c 74 20 69 73 20 61 20 73 74 72 69 6e 67 0a 2a  lt is a string.*
5c00: 2a 20 74 68 61 74 20 69 64 65 6e 74 69 66 69 65  * that identifie
5c10: 73 20 74 68 65 20 70 61 72 74 69 63 75 6c 61 72  s the particular
5c20: 20 76 65 72 73 69 6f 6e 20 6f 66 20 74 68 65 20   version of the 
5c30: 73 6f 75 72 63 65 20 63 6f 64 65 20 75 73 65 64  source code used
5c40: 20 74 6f 20 62 75 69 6c 64 0a 2a 2a 20 53 51 4c   to build.** SQL
5c50: 69 74 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ite..*/.static v
5c60: 6f 69 64 20 73 6f 75 72 63 65 69 64 46 75 6e 63  oid sourceidFunc
5c70: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
5c80: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
5c90: 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73  int NotUsed,.  s
5ca0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e  qlite3_value **N
5cb0: 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 55 4e 55  otUsed2.){.  UNU
5cc0: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e  SED_PARAMETER2(N
5cd0: 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32  otUsed, NotUsed2
5ce0: 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 32  );.  /* IMP: R-2
5cf0: 34 34 37 30 2d 33 31 31 33 36 20 54 68 69 73 20  4470-31136 This 
5d00: 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 6e 20 53  function is an S
5d10: 51 4c 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e  QL wrapper aroun
5d20: 64 20 74 68 65 0a 20 20 2a 2a 20 73 71 6c 69 74  d the.  ** sqlit
5d30: 65 33 5f 73 6f 75 72 63 65 69 64 28 29 20 43 20  e3_sourceid() C 
5d40: 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20 20  interface. */.  
5d50: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
5d60: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  ext(context, sql
5d70: 69 74 65 33 5f 73 6f 75 72 63 65 69 64 28 29 2c  ite3_sourceid(),
5d80: 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54   -1, SQLITE_STAT
5d90: 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  IC);.}../*.** Im
5da0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
5db0: 74 68 65 20 73 71 6c 69 74 65 5f 6c 6f 67 28 29  the sqlite_log()
5dc0: 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73   function.  This
5dd0: 20 69 73 20 61 20 77 72 61 70 70 65 72 20 61 72   is a wrapper ar
5de0: 6f 75 6e 64 0a 2a 2a 20 73 71 6c 69 74 65 33 5f  ound.** sqlite3_
5df0: 6c 6f 67 28 29 2e 20 20 54 68 65 20 72 65 74 75  log().  The retu
5e00: 72 6e 20 76 61 6c 75 65 20 69 73 20 4e 55 4c 4c  rn value is NULL
5e10: 2e 20 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20  .  The function 
5e20: 65 78 69 73 74 73 20 70 75 72 65 6c 79 20 66 6f  exists purely fo
5e30: 72 0a 2a 2a 20 69 74 73 20 73 69 64 65 2d 65 66  r.** its side-ef
5e40: 66 65 63 74 73 2e 0a 2a 2f 0a 73 74 61 74 69 63  fects..*/.static
5e50: 20 76 6f 69 64 20 65 72 72 6c 6f 67 46 75 6e 63   void errlogFunc
5e60: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
5e70: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
5e80: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
5e90: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
5ea0: 0a 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52  .){.  UNUSED_PAR
5eb0: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
5ec0: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
5ed0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 73 71 6c  (context);.  sql
5ee0: 69 74 65 33 5f 6c 6f 67 28 73 71 6c 69 74 65 33  ite3_log(sqlite3
5ef0: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
5f00: 30 5d 29 2c 20 22 25 73 22 2c 20 73 71 6c 69 74  0]), "%s", sqlit
5f10: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
5f20: 67 76 5b 31 5d 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  gv[1]));.}../*.*
5f30: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
5f40: 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f 63   of the sqlite_c
5f50: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65  ompileoption_use
5f60: 64 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a  d() function..**
5f70: 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61   The result is a
5f80: 6e 20 69 6e 74 65 67 65 72 20 74 68 61 74 20 69  n integer that i
5f90: 64 65 6e 74 69 66 69 65 73 20 69 66 20 74 68 65  dentifies if the
5fa0: 20 63 6f 6d 70 69 6c 65 72 20 6f 70 74 69 6f 6e   compiler option
5fb0: 0a 2a 2a 20 77 61 73 20 75 73 65 64 20 74 6f 20  .** was used to 
5fc0: 62 75 69 6c 64 20 53 51 4c 69 74 65 2e 0a 2a 2f  build SQLite..*/
5fd0: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f  .#ifndef SQLITE_
5fe0: 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49  OMIT_COMPILEOPTI
5ff0: 4f 4e 5f 44 49 41 47 53 0a 73 74 61 74 69 63 20  ON_DIAGS.static 
6000: 76 6f 69 64 20 63 6f 6d 70 69 6c 65 6f 70 74 69  void compileopti
6010: 6f 6e 75 73 65 64 46 75 6e 63 28 0a 20 20 73 71  onusedFunc(.  sq
6020: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
6030: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
6040: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
6050: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
6060: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4f 70 74  const char *zOpt
6070: 4e 61 6d 65 3b 0a 20 20 61 73 73 65 72 74 28 20  Name;.  assert( 
6080: 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55  argc==1 );.  UNU
6090: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72  SED_PARAMETER(ar
60a0: 67 63 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52  gc);.  /* IMP: R
60b0: 2d 33 39 35 36 34 2d 33 36 33 30 35 20 54 68 65  -39564-36305 The
60c0: 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f   sqlite_compileo
60d0: 70 74 69 6f 6e 5f 75 73 65 64 28 29 20 53 51 4c  ption_used() SQL
60e0: 0a 20 20 2a 2a 20 66 75 6e 63 74 69 6f 6e 20 69  .  ** function i
60f0: 73 20 61 20 77 72 61 70 70 65 72 20 61 72 6f 75  s a wrapper arou
6100: 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63  nd the sqlite3_c
6110: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65  ompileoption_use
6120: 64 28 29 20 43 2f 43 2b 2b 0a 20 20 2a 2a 20 66  d() C/C++.  ** f
6130: 75 6e 63 74 69 6f 6e 2e 0a 20 20 2a 2f 0a 20 20  unction..  */.  
6140: 69 66 28 20 28 7a 4f 70 74 4e 61 6d 65 20 3d 20  if( (zOptName = 
6150: 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 6c  (const char*)sql
6160: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
6170: 61 72 67 76 5b 30 5d 29 29 21 3d 30 20 29 7b 0a  argv[0]))!=0 ){.
6180: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
6190: 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20  lt_int(context, 
61a0: 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f  sqlite3_compileo
61b0: 70 74 69 6f 6e 5f 75 73 65 64 28 7a 4f 70 74 4e  ption_used(zOptN
61c0: 61 6d 65 29 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e  ame));.  }.}.#en
61d0: 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d  dif /* SQLITE_OM
61e0: 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e  IT_COMPILEOPTION
61f0: 5f 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a 0a 2a 2a  _DIAGS */../*.**
6200: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
6210: 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f 63 6f  of the sqlite_co
6220: 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28  mpileoption_get(
6230: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 0a 2a 2a 20  ) function. .** 
6240: 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61 20  The result is a 
6250: 73 74 72 69 6e 67 20 74 68 61 74 20 69 64 65 6e  string that iden
6260: 74 69 66 69 65 73 20 74 68 65 20 63 6f 6d 70 69  tifies the compi
6270: 6c 65 72 20 6f 70 74 69 6f 6e 73 20 0a 2a 2a 20  ler options .** 
6280: 75 73 65 64 20 74 6f 20 62 75 69 6c 64 20 53 51  used to build SQ
6290: 4c 69 74 65 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66  Lite..*/.#ifndef
62a0: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d   SQLITE_OMIT_COM
62b0: 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53  PILEOPTION_DIAGS
62c0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 6d  .static void com
62d0: 70 69 6c 65 6f 70 74 69 6f 6e 67 65 74 46 75 6e  pileoptiongetFun
62e0: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
62f0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
6300: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
6310: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
6320: 76 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20  v.){.  int n;.  
6330: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
6340: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
6350: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 2f  METER(argc);.  /
6360: 2a 20 49 4d 50 3a 20 52 2d 30 34 39 32 32 2d 32  * IMP: R-04922-2
6370: 34 30 37 36 20 54 68 65 20 73 71 6c 69 74 65 5f  4076 The sqlite_
6380: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65  compileoption_ge
6390: 74 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  t() SQL function
63a0: 0a 20 20 2a 2a 20 69 73 20 61 20 77 72 61 70 70  .  ** is a wrapp
63b0: 65 72 20 61 72 6f 75 6e 64 20 74 68 65 20 73 71  er around the sq
63c0: 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74  lite3_compileopt
63d0: 69 6f 6e 5f 67 65 74 28 29 20 43 2f 43 2b 2b 20  ion_get() C/C++ 
63e0: 66 75 6e 63 74 69 6f 6e 2e 0a 20 20 2a 2f 0a 20  function..  */. 
63f0: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   n = sqlite3_val
6400: 75 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b  ue_int(argv[0]);
6410: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
6420: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
6430: 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f  sqlite3_compileo
6440: 70 74 69 6f 6e 5f 67 65 74 28 6e 29 2c 20 2d 31  ption_get(n), -1
6450: 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29  , SQLITE_STATIC)
6460: 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51  ;.}.#endif /* SQ
6470: 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c  LITE_OMIT_COMPIL
6480: 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f  EOPTION_DIAGS */
6490: 0a 0a 2f 2a 20 41 72 72 61 79 20 66 6f 72 20 63  ../* Array for c
64a0: 6f 6e 76 65 72 74 69 6e 67 20 66 72 6f 6d 20 68  onverting from h
64b0: 61 6c 66 2d 62 79 74 65 73 20 28 6e 79 62 62 6c  alf-bytes (nybbl
64c0: 65 73 29 20 69 6e 74 6f 20 41 53 43 49 49 20 68  es) into ASCII h
64d0: 65 78 0a 2a 2a 20 64 69 67 69 74 73 2e 20 2a 2f  ex.** digits. */
64e0: 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68  .static const ch
64f0: 61 72 20 68 65 78 64 69 67 69 74 73 5b 5d 20 3d  ar hexdigits[] =
6500: 20 7b 0a 20 20 27 30 27 2c 20 27 31 27 2c 20 27   {.  '0', '1', '
6510: 32 27 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35  2', '3', '4', '5
6520: 27 2c 20 27 36 27 2c 20 27 37 27 2c 0a 20 20 27  ', '6', '7',.  '
6530: 38 27 2c 20 27 39 27 2c 20 27 41 27 2c 20 27 42  8', '9', 'A', 'B
6540: 27 2c 20 27 43 27 2c 20 27 44 27 2c 20 27 45 27  ', 'C', 'D', 'E'
6550: 2c 20 27 46 27 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a  , 'F' .};../*.**
6560: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
6570: 6f 66 20 74 68 65 20 51 55 4f 54 45 28 29 20 66  of the QUOTE() f
6580: 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 66  unction.  This f
6590: 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20 61 20  unction takes a 
65a0: 73 69 6e 67 6c 65 0a 2a 2a 20 61 72 67 75 6d 65  single.** argume
65b0: 6e 74 2e 20 20 49 66 20 74 68 65 20 61 72 67 75  nt.  If the argu
65c0: 6d 65 6e 74 20 69 73 20 6e 75 6d 65 72 69 63 2c  ment is numeric,
65d0: 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75   the return valu
65e0: 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73  e is the same as
65f0: 0a 2a 2a 20 74 68 65 20 61 72 67 75 6d 65 6e 74  .** the argument
6600: 2e 20 20 49 66 20 74 68 65 20 61 72 67 75 6d 65  .  If the argume
6610: 6e 74 20 69 73 20 4e 55 4c 4c 2c 20 74 68 65 20  nt is NULL, the 
6620: 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20  return value is 
6630: 74 68 65 20 73 74 72 69 6e 67 0a 2a 2a 20 22 4e  the string.** "N
6640: 55 4c 4c 22 2e 20 20 4f 74 68 65 72 77 69 73 65  ULL".  Otherwise
6650: 2c 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69  , the argument i
6660: 73 20 65 6e 63 6c 6f 73 65 64 20 69 6e 20 73 69  s enclosed in si
6670: 6e 67 6c 65 20 71 75 6f 74 65 73 20 77 69 74 68  ngle quotes with
6680: 0a 2a 2a 20 73 69 6e 67 6c 65 2d 71 75 6f 74 65  .** single-quote
6690: 20 65 73 63 61 70 65 73 2e 0a 2a 2f 0a 73 74 61   escapes..*/.sta
66a0: 74 69 63 20 76 6f 69 64 20 71 75 6f 74 65 46 75  tic void quoteFu
66b0: 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  nc(sqlite3_conte
66c0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
66d0: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
66e0: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
66f0: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
6700: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
6710: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 73  METER(argc);.  s
6720: 77 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76  witch( sqlite3_v
6730: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
6740: 5d 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53  ]) ){.    case S
6750: 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20  QLITE_FLOAT: {. 
6760: 20 20 20 20 20 64 6f 75 62 6c 65 20 72 31 2c 20       double r1, 
6770: 72 32 3b 0a 20 20 20 20 20 20 63 68 61 72 20 7a  r2;.      char z
6780: 42 75 66 5b 35 30 5d 3b 0a 20 20 20 20 20 20 72  Buf[50];.      r
6790: 31 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  1 = sqlite3_valu
67a0: 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d  e_double(argv[0]
67b0: 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  );.      sqlite3
67c0: 5f 73 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66  _snprintf(sizeof
67d0: 28 7a 42 75 66 29 2c 20 7a 42 75 66 2c 20 22 25  (zBuf), zBuf, "%
67e0: 21 2e 31 35 67 22 2c 20 72 31 29 3b 0a 20 20 20  !.15g", r1);.   
67f0: 20 20 20 73 71 6c 69 74 65 33 41 74 6f 46 28 7a     sqlite3AtoF(z
6800: 42 75 66 2c 20 26 72 32 2c 20 32 30 2c 20 53 51  Buf, &r2, 20, SQ
6810: 4c 49 54 45 5f 55 54 46 38 29 3b 0a 20 20 20 20  LITE_UTF8);.    
6820: 20 20 69 66 28 20 72 31 21 3d 72 32 20 29 7b 0a    if( r1!=r2 ){.
6830: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
6840: 73 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66 28  snprintf(sizeof(
6850: 7a 42 75 66 29 2c 20 7a 42 75 66 2c 20 22 25 21  zBuf), zBuf, "%!
6860: 2e 32 30 65 22 2c 20 72 31 29 3b 0a 20 20 20 20  .20e", r1);.    
6870: 20 20 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65    }.      sqlite
6880: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
6890: 6e 74 65 78 74 2c 20 7a 42 75 66 2c 20 2d 31 2c  ntext, zBuf, -1,
68a0: 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e   SQLITE_TRANSIEN
68b0: 54 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  T);.      break;
68c0: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20  .    }.    case 
68d0: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 20  SQLITE_INTEGER: 
68e0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
68f0: 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e  result_value(con
6900: 74 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a  text, argv[0]);.
6910: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
6920: 20 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49   }.    case SQLI
6930: 54 45 5f 42 4c 4f 42 3a 20 7b 0a 20 20 20 20 20  TE_BLOB: {.     
6940: 20 63 68 61 72 20 2a 7a 54 65 78 74 20 3d 20 30   char *zText = 0
6950: 3b 0a 20 20 20 20 20 20 63 68 61 72 20 63 6f 6e  ;.      char con
6960: 73 74 20 2a 7a 42 6c 6f 62 20 3d 20 73 71 6c 69  st *zBlob = sqli
6970: 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61  te3_value_blob(a
6980: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69  rgv[0]);.      i
6990: 6e 74 20 6e 42 6c 6f 62 20 3d 20 73 71 6c 69 74  nt nBlob = sqlit
69a0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
69b0: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 61  rgv[0]);.      a
69c0: 73 73 65 72 74 28 20 7a 42 6c 6f 62 3d 3d 73 71  ssert( zBlob==sq
69d0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62  lite3_value_blob
69e0: 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 2f 2a 20  (argv[0]) ); /* 
69f0: 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e  No encoding chan
6a00: 67 65 20 2a 2f 0a 20 20 20 20 20 20 7a 54 65 78  ge */.      zTex
6a10: 74 20 3d 20 28 63 68 61 72 20 2a 29 63 6f 6e 74  t = (char *)cont
6a20: 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78  extMalloc(contex
6a30: 74 2c 20 28 32 2a 28 69 36 34 29 6e 42 6c 6f 62  t, (2*(i64)nBlob
6a40: 29 2b 34 29 3b 20 0a 20 20 20 20 20 20 69 66 28  )+4); .      if(
6a50: 20 7a 54 65 78 74 20 29 7b 0a 20 20 20 20 20 20   zText ){.      
6a60: 20 20 69 6e 74 20 69 3b 0a 20 20 20 20 20 20 20    int i;.       
6a70: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 42 6c 6f   for(i=0; i<nBlo
6a80: 62 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  b; i++){.       
6a90: 20 20 20 7a 54 65 78 74 5b 28 69 2a 32 29 2b 32     zText[(i*2)+2
6aa0: 5d 20 3d 20 68 65 78 64 69 67 69 74 73 5b 28 7a  ] = hexdigits[(z
6ab0: 42 6c 6f 62 5b 69 5d 3e 3e 34 29 26 30 78 30 46  Blob[i]>>4)&0x0F
6ac0: 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 7a 54 65  ];.          zTe
6ad0: 78 74 5b 28 69 2a 32 29 2b 33 5d 20 3d 20 68 65  xt[(i*2)+3] = he
6ae0: 78 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69  xdigits[(zBlob[i
6af0: 5d 29 26 30 78 30 46 5d 3b 0a 20 20 20 20 20 20  ])&0x0F];.      
6b00: 20 20 7d 0a 20 20 20 20 20 20 20 20 7a 54 65 78    }.        zTex
6b10: 74 5b 28 6e 42 6c 6f 62 2a 32 29 2b 32 5d 20 3d  t[(nBlob*2)+2] =
6b20: 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 7a   '\'';.        z
6b30: 54 65 78 74 5b 28 6e 42 6c 6f 62 2a 32 29 2b 33  Text[(nBlob*2)+3
6b40: 5d 20 3d 20 27 5c 30 27 3b 0a 20 20 20 20 20 20  ] = '\0';.      
6b50: 20 20 7a 54 65 78 74 5b 30 5d 20 3d 20 27 58 27    zText[0] = 'X'
6b60: 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b  ;.        zText[
6b70: 31 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20  1] = '\'';.     
6b80: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
6b90: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
6ba0: 7a 54 65 78 74 2c 20 2d 31 2c 20 53 51 4c 49 54  zText, -1, SQLIT
6bb0: 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20  E_TRANSIENT);.  
6bc0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72        sqlite3_fr
6bd0: 65 65 28 7a 54 65 78 74 29 3b 0a 20 20 20 20 20  ee(zText);.     
6be0: 20 7d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a   }.      break;.
6bf0: 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 53      }.    case S
6c00: 51 4c 49 54 45 5f 54 45 58 54 3a 20 7b 0a 20 20  QLITE_TEXT: {.  
6c10: 20 20 20 20 69 6e 74 20 69 2c 6a 3b 0a 20 20 20      int i,j;.   
6c20: 20 20 20 75 36 34 20 6e 3b 0a 20 20 20 20 20 20     u64 n;.      
6c30: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
6c40: 68 61 72 20 2a 7a 41 72 67 20 3d 20 73 71 6c 69  har *zArg = sqli
6c50: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
6c60: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 63  rgv[0]);.      c
6c70: 68 61 72 20 2a 7a 3b 0a 0a 20 20 20 20 20 20 69  har *z;..      i
6c80: 66 28 20 7a 41 72 67 3d 3d 30 20 29 20 72 65 74  f( zArg==0 ) ret
6c90: 75 72 6e 3b 0a 20 20 20 20 20 20 66 6f 72 28 69  urn;.      for(i
6ca0: 3d 30 2c 20 6e 3d 30 3b 20 7a 41 72 67 5b 69 5d  =0, n=0; zArg[i]
6cb0: 3b 20 69 2b 2b 29 7b 20 69 66 28 20 7a 41 72 67  ; i++){ if( zArg
6cc0: 5b 69 5d 3d 3d 27 5c 27 27 20 29 20 6e 2b 2b 3b  [i]=='\'' ) n++;
6cd0: 20 7d 0a 20 20 20 20 20 20 7a 20 3d 20 63 6f 6e   }.      z = con
6ce0: 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65  textMalloc(conte
6cf0: 78 74 2c 20 28 28 69 36 34 29 69 29 2b 28 28 69  xt, ((i64)i)+((i
6d00: 36 34 29 6e 29 2b 33 29 3b 0a 20 20 20 20 20 20  64)n)+3);.      
6d10: 69 66 28 20 7a 20 29 7b 0a 20 20 20 20 20 20 20  if( z ){.       
6d20: 20 7a 5b 30 5d 20 3d 20 27 5c 27 27 3b 0a 20 20   z[0] = '\'';.  
6d30: 20 20 20 20 20 20 66 6f 72 28 69 3d 30 2c 20 6a        for(i=0, j
6d40: 3d 31 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b  =1; zArg[i]; i++
6d50: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 5b 6a  ){.          z[j
6d60: 2b 2b 5d 20 3d 20 7a 41 72 67 5b 69 5d 3b 0a 20  ++] = zArg[i];. 
6d70: 20 20 20 20 20 20 20 20 20 69 66 28 20 7a 41 72           if( zAr
6d80: 67 5b 69 5d 3d 3d 27 5c 27 27 20 29 7b 0a 20 20  g[i]=='\'' ){.  
6d90: 20 20 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d            z[j++]
6da0: 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20   = '\'';.       
6db0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20     }.        }. 
6dc0: 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20         z[j++] = 
6dd0: 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 7a 5b  '\'';.        z[
6de0: 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20  j] = 0;.        
6df0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
6e00: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 2c 20  ext(context, z, 
6e10: 6a 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29  j, sqlite3_free)
6e20: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
6e30: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
6e40: 20 64 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20   default: {.    
6e50: 20 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65    assert( sqlite
6e60: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
6e70: 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[0])==SQLITE_NU
6e80: 4c 4c 20 29 3b 0a 20 20 20 20 20 20 73 71 6c 69  LL );.      sqli
6e90: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
6ea0: 63 6f 6e 74 65 78 74 2c 20 22 4e 55 4c 4c 22 2c  context, "NULL",
6eb0: 20 34 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49   4, SQLITE_STATI
6ec0: 43 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  C);.      break;
6ed0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
6ee0: 0a 2a 2a 20 54 68 65 20 75 6e 69 63 6f 64 65 28  .** The unicode(
6ef0: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 52 65 74  ) function.  Ret
6f00: 75 72 6e 20 74 68 65 20 69 6e 74 65 67 65 72 20  urn the integer 
6f10: 75 6e 69 63 6f 64 65 20 63 6f 64 65 2d 70 6f 69  unicode code-poi
6f20: 6e 74 20 76 61 6c 75 65 0a 2a 2a 20 66 6f 72 20  nt value.** for 
6f30: 74 68 65 20 66 69 72 73 74 20 63 68 61 72 61 63  the first charac
6f40: 74 65 72 20 6f 66 20 74 68 65 20 69 6e 70 75 74  ter of the input
6f50: 20 73 74 72 69 6e 67 2e 20 0a 2a 2f 0a 73 74 61   string. .*/.sta
6f60: 74 69 63 20 76 6f 69 64 20 75 6e 69 63 6f 64 65  tic void unicode
6f70: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
6f80: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
6f90: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
6fa0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
6fb0: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
6fc0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
6fd0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
6fe0: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
6ff0: 20 20 28 76 6f 69 64 29 61 72 67 63 3b 0a 20 20    (void)argc;.  
7000: 69 66 28 20 7a 20 26 26 20 7a 5b 30 5d 20 29 20  if( z && z[0] ) 
7010: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
7020: 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  nt(context, sqli
7030: 74 65 33 55 74 66 38 52 65 61 64 28 26 7a 29 29  te3Utf8Read(&z))
7040: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 63  ;.}../*.** The c
7050: 68 61 72 28 29 20 66 75 6e 63 74 69 6f 6e 20 74  har() function t
7060: 61 6b 65 73 20 7a 65 72 6f 20 6f 72 20 6d 6f 72  akes zero or mor
7070: 65 20 61 72 67 75 6d 65 6e 74 73 2c 20 65 61 63  e arguments, eac
7080: 68 20 6f 66 20 77 68 69 63 68 20 69 73 0a 2a 2a  h of which is.**
7090: 20 61 6e 20 69 6e 74 65 67 65 72 2e 20 20 49 74   an integer.  It
70a0: 20 63 6f 6e 73 74 72 75 63 74 73 20 61 20 73 74   constructs a st
70b0: 72 69 6e 67 20 77 68 65 72 65 20 65 61 63 68 20  ring where each 
70c0: 63 68 61 72 61 63 74 65 72 20 6f 66 20 74 68 65  character of the
70d0: 20 73 74 72 69 6e 67 0a 2a 2a 20 69 73 20 74 68   string.** is th
70e0: 65 20 75 6e 69 63 6f 64 65 20 63 68 61 72 61 63  e unicode charac
70f0: 74 65 72 20 66 6f 72 20 74 68 65 20 63 6f 72 72  ter for the corr
7100: 65 73 70 6f 6e 64 69 6e 67 20 69 6e 74 65 67 65  esponding intege
7110: 72 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73  r argument..*/.s
7120: 74 61 74 69 63 20 76 6f 69 64 20 63 68 61 72 46  tatic void charF
7130: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
7140: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
7150: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
7160: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
7170: 72 67 76 0a 29 7b 0a 20 20 75 6e 73 69 67 6e 65  rgv.){.  unsigne
7180: 64 20 63 68 61 72 20 2a 7a 2c 20 2a 7a 4f 75 74  d char *z, *zOut
7190: 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 7a 4f 75  ;.  int i;.  zOu
71a0: 74 20 3d 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f  t = z = sqlite3_
71b0: 6d 61 6c 6c 6f 63 28 20 61 72 67 63 2a 34 20 29  malloc( argc*4 )
71c0: 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 7b 0a  ;.  if( z==0 ){.
71d0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
71e0: 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63  lt_error_nomem(c
71f0: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 72 65 74  ontext);.    ret
7200: 75 72 6e 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69  urn;.  }.  for(i
7210: 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29  =0; i<argc; i++)
7220: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 69 6e  {.    sqlite3_in
7230: 74 36 34 20 78 3b 0a 20 20 20 20 75 6e 73 69 67  t64 x;.    unsig
7240: 6e 65 64 20 63 3b 0a 20 20 20 20 78 20 3d 20 73  ned c;.    x = s
7250: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
7260: 36 34 28 61 72 67 76 5b 69 5d 29 3b 0a 20 20 20  64(argv[i]);.   
7270: 20 69 66 28 20 78 3c 30 20 7c 7c 20 78 3e 30 78   if( x<0 || x>0x
7280: 31 30 66 66 66 66 20 29 20 78 20 3d 20 30 78 66  10ffff ) x = 0xf
7290: 66 66 64 3b 0a 20 20 20 20 63 20 3d 20 28 75 6e  ffd;.    c = (un
72a0: 73 69 67 6e 65 64 29 28 78 20 26 20 30 78 31 66  signed)(x & 0x1f
72b0: 66 66 66 66 29 3b 0a 20 20 20 20 69 66 28 20 63  ffff);.    if( c
72c0: 3c 30 78 30 30 30 38 30 20 29 7b 0a 20 20 20 20  <0x00080 ){.    
72d0: 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 28 75 38 29    *zOut++ = (u8)
72e0: 28 63 26 30 78 46 46 29 3b 0a 20 20 20 20 7d 65  (c&0xFF);.    }e
72f0: 6c 73 65 20 69 66 28 20 63 3c 30 78 30 30 38 30  lse if( c<0x0080
7300: 30 20 29 7b 0a 20 20 20 20 20 20 2a 7a 4f 75 74  0 ){.      *zOut
7310: 2b 2b 20 3d 20 30 78 43 30 20 2b 20 28 75 38 29  ++ = 0xC0 + (u8)
7320: 28 28 63 3e 3e 36 29 26 30 78 31 46 29 3b 0a 20  ((c>>6)&0x1F);. 
7330: 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30       *zOut++ = 0
7340: 78 38 30 20 2b 20 28 75 38 29 28 63 20 26 20 30  x80 + (u8)(c & 0
7350: 78 33 46 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20  x3F);.    }else 
7360: 69 66 28 20 63 3c 30 78 31 30 30 30 30 20 29 7b  if( c<0x10000 ){
7370: 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d  .      *zOut++ =
7380: 20 30 78 45 30 20 2b 20 28 75 38 29 28 28 63 3e   0xE0 + (u8)((c>
7390: 3e 31 32 29 26 30 78 30 46 29 3b 0a 20 20 20 20  >12)&0x0F);.    
73a0: 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30    *zOut++ = 0x80
73b0: 20 2b 20 28 75 38 29 28 28 63 3e 3e 36 29 20 26   + (u8)((c>>6) &
73c0: 20 30 78 33 46 29 3b 0a 20 20 20 20 20 20 2a 7a   0x3F);.      *z
73d0: 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28  Out++ = 0x80 + (
73e0: 75 38 29 28 63 20 26 20 30 78 33 46 29 3b 0a 20  u8)(c & 0x3F);. 
73f0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
7400: 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 46 30 20 2b  *zOut++ = 0xF0 +
7410: 20 28 75 38 29 28 28 63 3e 3e 31 38 29 20 26 20   (u8)((c>>18) & 
7420: 30 78 30 37 29 3b 0a 20 20 20 20 20 20 2a 7a 4f  0x07);.      *zO
7430: 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28 75  ut++ = 0x80 + (u
7440: 38 29 28 28 63 3e 3e 31 32 29 20 26 20 30 78 33  8)((c>>12) & 0x3
7450: 46 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b  F);.      *zOut+
7460: 2b 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28  + = 0x80 + (u8)(
7470: 28 63 3e 3e 36 29 20 26 20 30 78 33 46 29 3b 0a  (c>>6) & 0x3F);.
7480: 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20        *zOut++ = 
7490: 30 78 38 30 20 2b 20 28 75 38 29 28 63 20 26 20  0x80 + (u8)(c & 
74a0: 30 78 33 46 29 3b 0a 20 20 20 20 7d 20 20 20 20  0x3F);.    }    
74b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
74c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
74d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
74e0: 5c 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  \.  }.  sqlite3_
74f0: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
7500: 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 2c 20 28  ext, (char*)z, (
7510: 69 6e 74 29 28 7a 4f 75 74 2d 7a 29 2c 20 73 71  int)(zOut-z), sq
7520: 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 7d 0a 0a  lite3_free);.}..
7530: 2f 2a 0a 2a 2a 20 54 68 65 20 68 65 78 28 29 20  /*.** The hex() 
7540: 66 75 6e 63 74 69 6f 6e 2e 20 20 49 6e 74 65 72  function.  Inter
7550: 70 72 65 74 20 74 68 65 20 61 72 67 75 6d 65 6e  pret the argumen
7560: 74 20 61 73 20 61 20 62 6c 6f 62 2e 20 20 52 65  t as a blob.  Re
7570: 74 75 72 6e 0a 2a 2a 20 61 20 68 65 78 61 64 65  turn.** a hexade
7580: 63 69 6d 61 6c 20 72 65 6e 64 65 72 69 6e 67 20  cimal rendering 
7590: 61 73 20 74 65 78 74 2e 0a 2a 2f 0a 73 74 61 74  as text..*/.stat
75a0: 69 63 20 76 6f 69 64 20 68 65 78 46 75 6e 63 28  ic void hexFunc(
75b0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
75c0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
75d0: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
75e0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
75f0: 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20  ){.  int i, n;. 
7600: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
7610: 63 68 61 72 20 2a 70 42 6c 6f 62 3b 0a 20 20 63  char *pBlob;.  c
7620: 68 61 72 20 2a 7a 48 65 78 2c 20 2a 7a 3b 0a 20  har *zHex, *z;. 
7630: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
7640: 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   );.  UNUSED_PAR
7650: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
7660: 70 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f  pBlob = sqlite3_
7670: 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b  value_blob(argv[
7680: 30 5d 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74  0]);.  n = sqlit
7690: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
76a0: 72 67 76 5b 30 5d 29 3b 0a 20 20 61 73 73 65 72  rgv[0]);.  asser
76b0: 74 28 20 70 42 6c 6f 62 3d 3d 73 71 6c 69 74 65  t( pBlob==sqlite
76c0: 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67  3_value_blob(arg
76d0: 76 5b 30 5d 29 20 29 3b 20 20 2f 2a 20 4e 6f 20  v[0]) );  /* No 
76e0: 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20  encoding change 
76f0: 2a 2f 0a 20 20 7a 20 3d 20 7a 48 65 78 20 3d 20  */.  z = zHex = 
7700: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
7710: 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2a  ntext, ((i64)n)*
7720: 32 20 2b 20 31 29 3b 0a 20 20 69 66 28 20 7a 48  2 + 1);.  if( zH
7730: 65 78 20 29 7b 0a 20 20 20 20 66 6f 72 28 69 3d  ex ){.    for(i=
7740: 30 3b 20 69 3c 6e 3b 20 69 2b 2b 2c 20 70 42 6c  0; i<n; i++, pBl
7750: 6f 62 2b 2b 29 7b 0a 20 20 20 20 20 20 75 6e 73  ob++){.      uns
7760: 69 67 6e 65 64 20 63 68 61 72 20 63 20 3d 20 2a  igned char c = *
7770: 70 42 6c 6f 62 3b 0a 20 20 20 20 20 20 2a 28 7a  pBlob;.      *(z
7780: 2b 2b 29 20 3d 20 68 65 78 64 69 67 69 74 73 5b  ++) = hexdigits[
7790: 28 63 3e 3e 34 29 26 30 78 66 5d 3b 0a 20 20 20  (c>>4)&0xf];.   
77a0: 20 20 20 2a 28 7a 2b 2b 29 20 3d 20 68 65 78 64     *(z++) = hexd
77b0: 69 67 69 74 73 5b 63 26 30 78 66 5d 3b 0a 20 20  igits[c&0xf];.  
77c0: 20 20 7d 0a 20 20 20 20 2a 7a 20 3d 20 30 3b 0a    }.    *z = 0;.
77d0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
77e0: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
77f0: 20 7a 48 65 78 2c 20 6e 2a 32 2c 20 73 71 6c 69   zHex, n*2, sqli
7800: 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 7d 0a 7d  te3_free);.  }.}
7810: 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 7a 65 72 6f  ../*.** The zero
7820: 62 6c 6f 62 28 4e 29 20 66 75 6e 63 74 69 6f 6e  blob(N) function
7830: 20 72 65 74 75 72 6e 73 20 61 20 7a 65 72 6f 2d   returns a zero-
7840: 66 69 6c 6c 65 64 20 62 6c 6f 62 20 6f 66 20 73  filled blob of s
7850: 69 7a 65 20 4e 20 62 79 74 65 73 2e 0a 2a 2f 0a  ize N bytes..*/.
7860: 73 74 61 74 69 63 20 76 6f 69 64 20 7a 65 72 6f  static void zero
7870: 62 6c 6f 62 46 75 6e 63 28 0a 20 20 73 71 6c 69  blobFunc(.  sqli
7880: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
7890: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
78a0: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
78b0: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 36  e **argv.){.  i6
78c0: 34 20 6e 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a  4 n;.  sqlite3 *
78d0: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
78e0: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
78f0: 6f 6e 74 65 78 74 29 3b 0a 20 20 61 73 73 65 72  ontext);.  asser
7900: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
7910: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
7920: 28 61 72 67 63 29 3b 0a 20 20 6e 20 3d 20 73 71  (argc);.  n = sq
7930: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36  lite3_value_int6
7940: 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 74 65  4(argv[0]);.  te
7950: 73 74 63 61 73 65 28 20 6e 3d 3d 64 62 2d 3e 61  stcase( n==db->a
7960: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
7970: 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20 20  IT_LENGTH] );.  
7980: 74 65 73 74 63 61 73 65 28 20 6e 3d 3d 64 62 2d  testcase( n==db-
7990: 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c  >aLimit[SQLITE_L
79a0: 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 2b 31 20 29  IMIT_LENGTH]+1 )
79b0: 3b 0a 20 20 69 66 28 20 6e 3e 64 62 2d 3e 61 4c  ;.  if( n>db->aL
79c0: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
79d0: 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20  T_LENGTH] ){.   
79e0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
79f0: 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f 6e  error_toobig(con
7a00: 74 65 78 74 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a  text);.  }else{.
7a10: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
7a20: 6c 74 5f 7a 65 72 6f 62 6c 6f 62 28 63 6f 6e 74  lt_zeroblob(cont
7a30: 65 78 74 2c 20 28 69 6e 74 29 6e 29 3b 20 2f 2a  ext, (int)n); /*
7a40: 20 49 4d 50 3a 20 52 2d 30 30 32 39 33 2d 36 34   IMP: R-00293-64
7a50: 39 39 34 20 2a 2f 0a 20 20 7d 0a 7d 0a 0a 2f 2a  994 */.  }.}../*
7a60: 0a 2a 2a 20 54 68 65 20 72 65 70 6c 61 63 65 28  .** The replace(
7a70: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 72  ) function.  Thr
7a80: 65 65 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65  ee arguments are
7a90: 20 61 6c 6c 20 73 74 72 69 6e 67 73 3a 20 63 61   all strings: ca
7aa0: 6c 6c 0a 2a 2a 20 74 68 65 6d 20 41 2c 20 42 2c  ll.** them A, B,
7ab0: 20 61 6e 64 20 43 2e 20 54 68 65 20 72 65 73 75   and C. The resu
7ac0: 6c 74 20 69 73 20 61 6c 73 6f 20 61 20 73 74 72  lt is also a str
7ad0: 69 6e 67 20 77 68 69 63 68 20 69 73 20 64 65 72  ing which is der
7ae0: 69 76 65 64 0a 2a 2a 20 66 72 6f 6d 20 41 20 62  ived.** from A b
7af0: 79 20 72 65 70 6c 61 63 69 6e 67 20 65 76 65 72  y replacing ever
7b00: 79 20 6f 63 63 75 72 72 65 6e 63 65 20 6f 66 20  y occurrence of 
7b10: 42 20 77 69 74 68 20 43 2e 20 20 54 68 65 20 6d  B with C.  The m
7b20: 61 74 63 68 0a 2a 2a 20 6d 75 73 74 20 62 65 20  atch.** must be 
7b30: 65 78 61 63 74 2e 20 20 43 6f 6c 6c 61 74 69 6e  exact.  Collatin
7b40: 67 20 73 65 71 75 65 6e 63 65 73 20 61 72 65 20  g sequences are 
7b50: 6e 6f 74 20 75 73 65 64 2e 0a 2a 2f 0a 73 74 61  not used..*/.sta
7b60: 74 69 63 20 76 6f 69 64 20 72 65 70 6c 61 63 65  tic void replace
7b70: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
7b80: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
7b90: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
7ba0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
7bb0: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
7bc0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
7bd0: 53 74 72 3b 20 20 20 20 20 20 20 20 2f 2a 20 54  Str;        /* T
7be0: 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20  he input string 
7bf0: 41 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 6e 73  A */.  const uns
7c00: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 50 61 74  igned char *zPat
7c10: 74 65 72 6e 3b 20 20 20 20 2f 2a 20 54 68 65 20  tern;    /* The 
7c20: 70 61 74 74 65 72 6e 20 73 74 72 69 6e 67 20 42  pattern string B
7c30: 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69   */.  const unsi
7c40: 67 6e 65 64 20 63 68 61 72 20 2a 7a 52 65 70 3b  gned char *zRep;
7c50: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 72          /* The r
7c60: 65 70 6c 61 63 65 6d 65 6e 74 20 73 74 72 69 6e  eplacement strin
7c70: 67 20 43 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65  g C */.  unsigne
7c80: 64 20 63 68 61 72 20 2a 7a 4f 75 74 3b 20 20 20  d char *zOut;   
7c90: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68             /* Th
7ca0: 65 20 6f 75 74 70 75 74 20 2a 2f 0a 20 20 69 6e  e output */.  in
7cb0: 74 20 6e 53 74 72 3b 20 20 20 20 20 20 20 20 20  t nStr;         
7cc0: 20 20 20 20 20 20 20 2f 2a 20 53 69 7a 65 20 6f         /* Size o
7cd0: 66 20 7a 53 74 72 20 2a 2f 0a 20 20 69 6e 74 20  f zStr */.  int 
7ce0: 6e 50 61 74 74 65 72 6e 3b 20 20 20 20 20 20 20  nPattern;       
7cf0: 20 20 20 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20       /* Size of 
7d00: 7a 50 61 74 74 65 72 6e 20 2a 2f 0a 20 20 69 6e  zPattern */.  in
7d10: 74 20 6e 52 65 70 3b 20 20 20 20 20 20 20 20 20  t nRep;         
7d20: 20 20 20 20 20 20 20 2f 2a 20 53 69 7a 65 20 6f         /* Size o
7d30: 66 20 7a 52 65 70 20 2a 2f 0a 20 20 69 36 34 20  f zRep */.  i64 
7d40: 6e 4f 75 74 3b 20 20 20 20 20 20 20 20 20 20 20  nOut;           
7d50: 20 20 20 20 20 2f 2a 20 4d 61 78 69 6d 75 6d 20       /* Maximum 
7d60: 73 69 7a 65 20 6f 66 20 7a 4f 75 74 20 2a 2f 0a  size of zOut */.
7d70: 20 20 69 6e 74 20 6c 6f 6f 70 4c 69 6d 69 74 3b    int loopLimit;
7d80: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 61             /* La
7d90: 73 74 20 7a 53 74 72 5b 5d 20 74 68 61 74 20 6d  st zStr[] that m
7da0: 69 67 68 74 20 6d 61 74 63 68 20 7a 50 61 74 74  ight match zPatt
7db0: 65 72 6e 5b 5d 20 2a 2f 0a 20 20 69 6e 74 20 69  ern[] */.  int i
7dc0: 2c 20 6a 3b 20 20 20 20 20 20 20 20 20 20 20 20  , j;            
7dd0: 20 20 20 20 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e      /* Loop coun
7de0: 74 65 72 73 20 2a 2f 0a 0a 20 20 61 73 73 65 72  ters */..  asser
7df0: 74 28 20 61 72 67 63 3d 3d 33 20 29 3b 0a 20 20  t( argc==3 );.  
7e00: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
7e10: 28 61 72 67 63 29 3b 0a 20 20 7a 53 74 72 20 3d  (argc);.  zStr =
7e20: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
7e30: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ext(argv[0]);.  
7e40: 69 66 28 20 7a 53 74 72 3d 3d 30 20 29 20 72 65  if( zStr==0 ) re
7e50: 74 75 72 6e 3b 0a 20 20 6e 53 74 72 20 3d 20 73  turn;.  nStr = s
7e60: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
7e70: 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61  es(argv[0]);.  a
7e80: 73 73 65 72 74 28 20 7a 53 74 72 3d 3d 73 71 6c  ssert( zStr==sql
7e90: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
7ea0: 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f 2a 20  argv[0]) );  /* 
7eb0: 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e  No encoding chan
7ec0: 67 65 20 2a 2f 0a 20 20 7a 50 61 74 74 65 72 6e  ge */.  zPattern
7ed0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
7ee0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a  _text(argv[1]);.
7ef0: 20 20 69 66 28 20 7a 50 61 74 74 65 72 6e 3d 3d    if( zPattern==
7f00: 30 20 29 7b 0a 20 20 20 20 61 73 73 65 72 74 28  0 ){.    assert(
7f10: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
7f20: 79 70 65 28 61 72 67 76 5b 31 5d 29 3d 3d 53 51  ype(argv[1])==SQ
7f30: 4c 49 54 45 5f 4e 55 4c 4c 0a 20 20 20 20 20 20  LITE_NULL.      
7f40: 20 20 20 20 20 20 7c 7c 20 73 71 6c 69 74 65 33        || sqlite3
7f50: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
7f60: 6c 65 28 63 6f 6e 74 65 78 74 29 2d 3e 6d 61 6c  le(context)->mal
7f70: 6c 6f 63 46 61 69 6c 65 64 20 29 3b 0a 20 20 20  locFailed );.   
7f80: 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 69   return;.  }.  i
7f90: 66 28 20 7a 50 61 74 74 65 72 6e 5b 30 5d 3d 3d  f( zPattern[0]==
7fa0: 30 20 29 7b 0a 20 20 20 20 61 73 73 65 72 74 28  0 ){.    assert(
7fb0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
7fc0: 79 70 65 28 61 72 67 76 5b 31 5d 29 21 3d 53 51  ype(argv[1])!=SQ
7fd0: 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b 0a 20 20 20  LITE_NULL );.   
7fe0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
7ff0: 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61  value(context, a
8000: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 72 65 74  rgv[0]);.    ret
8010: 75 72 6e 3b 0a 20 20 7d 0a 20 20 6e 50 61 74 74  urn;.  }.  nPatt
8020: 65 72 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  ern = sqlite3_va
8030: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 31  lue_bytes(argv[1
8040: 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20 7a 50  ]);.  assert( zP
8050: 61 74 74 65 72 6e 3d 3d 73 71 6c 69 74 65 33 5f  attern==sqlite3_
8060: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
8070: 31 5d 29 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e  1]) );  /* No en
8080: 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f  coding change */
8090: 0a 20 20 7a 52 65 70 20 3d 20 73 71 6c 69 74 65  .  zRep = sqlite
80a0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
80b0: 76 5b 32 5d 29 3b 0a 20 20 69 66 28 20 7a 52 65  v[2]);.  if( zRe
80c0: 70 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20  p==0 ) return;. 
80d0: 20 6e 52 65 70 20 3d 20 73 71 6c 69 74 65 33 5f   nRep = sqlite3_
80e0: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
80f0: 5b 32 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20  [2]);.  assert( 
8100: 7a 52 65 70 3d 3d 73 71 6c 69 74 65 33 5f 76 61  zRep==sqlite3_va
8110: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d  lue_text(argv[2]
8120: 29 20 29 3b 0a 20 20 6e 4f 75 74 20 3d 20 6e 53  ) );.  nOut = nS
8130: 74 72 20 2b 20 31 3b 0a 20 20 61 73 73 65 72 74  tr + 1;.  assert
8140: 28 20 6e 4f 75 74 3c 53 51 4c 49 54 45 5f 4d 41  ( nOut<SQLITE_MA
8150: 58 5f 4c 45 4e 47 54 48 20 29 3b 0a 20 20 7a 4f  X_LENGTH );.  zO
8160: 75 74 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c  ut = contextMall
8170: 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 69 36 34  oc(context, (i64
8180: 29 6e 4f 75 74 29 3b 0a 20 20 69 66 28 20 7a 4f  )nOut);.  if( zO
8190: 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74  ut==0 ){.    ret
81a0: 75 72 6e 3b 0a 20 20 7d 0a 20 20 6c 6f 6f 70 4c  urn;.  }.  loopL
81b0: 69 6d 69 74 20 3d 20 6e 53 74 72 20 2d 20 6e 50  imit = nStr - nP
81c0: 61 74 74 65 72 6e 3b 20 20 0a 20 20 66 6f 72 28  attern;  .  for(
81d0: 69 3d 6a 3d 30 3b 20 69 3c 3d 6c 6f 6f 70 4c 69  i=j=0; i<=loopLi
81e0: 6d 69 74 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69  mit; i++){.    i
81f0: 66 28 20 7a 53 74 72 5b 69 5d 21 3d 7a 50 61 74  f( zStr[i]!=zPat
8200: 74 65 72 6e 5b 30 5d 20 7c 7c 20 6d 65 6d 63 6d  tern[0] || memcm
8210: 70 28 26 7a 53 74 72 5b 69 5d 2c 20 7a 50 61 74  p(&zStr[i], zPat
8220: 74 65 72 6e 2c 20 6e 50 61 74 74 65 72 6e 29 20  tern, nPattern) 
8230: 29 7b 0a 20 20 20 20 20 20 7a 4f 75 74 5b 6a 2b  ){.      zOut[j+
8240: 2b 5d 20 3d 20 7a 53 74 72 5b 69 5d 3b 0a 20 20  +] = zStr[i];.  
8250: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 75    }else{.      u
8260: 38 20 2a 7a 4f 6c 64 3b 0a 20 20 20 20 20 20 73  8 *zOld;.      s
8270: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c  qlite3 *db = sql
8280: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
8290: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b  handle(context);
82a0: 0a 20 20 20 20 20 20 6e 4f 75 74 20 2b 3d 20 6e  .      nOut += n
82b0: 52 65 70 20 2d 20 6e 50 61 74 74 65 72 6e 3b 0a  Rep - nPattern;.
82c0: 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28 20        testcase( 
82d0: 6e 4f 75 74 2d 31 3d 3d 64 62 2d 3e 61 4c 69 6d  nOut-1==db->aLim
82e0: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
82f0: 4c 45 4e 47 54 48 5d 20 29 3b 0a 20 20 20 20 20  LENGTH] );.     
8300: 20 74 65 73 74 63 61 73 65 28 20 6e 4f 75 74 2d   testcase( nOut-
8310: 32 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  2==db->aLimit[SQ
8320: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
8330: 48 5d 20 29 3b 0a 20 20 20 20 20 20 69 66 28 20  H] );.      if( 
8340: 6e 4f 75 74 2d 31 3e 64 62 2d 3e 61 4c 69 6d 69  nOut-1>db->aLimi
8350: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
8360: 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 20 20  ENGTH] ){.      
8370: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
8380: 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f  _error_toobig(co
8390: 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 20 20  ntext);.        
83a0: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 4f 75  sqlite3_free(zOu
83b0: 74 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75  t);.        retu
83c0: 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  rn;.      }.    
83d0: 20 20 7a 4f 6c 64 20 3d 20 7a 4f 75 74 3b 0a 20    zOld = zOut;. 
83e0: 20 20 20 20 20 7a 4f 75 74 20 3d 20 73 71 6c 69       zOut = sqli
83f0: 74 65 33 5f 72 65 61 6c 6c 6f 63 28 7a 4f 75 74  te3_realloc(zOut
8400: 2c 20 28 69 6e 74 29 6e 4f 75 74 29 3b 0a 20 20  , (int)nOut);.  
8410: 20 20 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20      if( zOut==0 
8420: 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  ){.        sqlit
8430: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
8440: 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a  nomem(context);.
8450: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
8460: 66 72 65 65 28 7a 4f 6c 64 29 3b 0a 20 20 20 20  free(zOld);.    
8470: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20      return;.    
8480: 20 20 7d 0a 20 20 20 20 20 20 6d 65 6d 63 70 79    }.      memcpy
8490: 28 26 7a 4f 75 74 5b 6a 5d 2c 20 7a 52 65 70 2c  (&zOut[j], zRep,
84a0: 20 6e 52 65 70 29 3b 0a 20 20 20 20 20 20 6a 20   nRep);.      j 
84b0: 2b 3d 20 6e 52 65 70 3b 0a 20 20 20 20 20 20 69  += nRep;.      i
84c0: 20 2b 3d 20 6e 50 61 74 74 65 72 6e 2d 31 3b 0a   += nPattern-1;.
84d0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61 73 73 65      }.  }.  asse
84e0: 72 74 28 20 6a 2b 6e 53 74 72 2d 69 2b 31 3d 3d  rt( j+nStr-i+1==
84f0: 6e 4f 75 74 20 29 3b 0a 20 20 6d 65 6d 63 70 79  nOut );.  memcpy
8500: 28 26 7a 4f 75 74 5b 6a 5d 2c 20 26 7a 53 74 72  (&zOut[j], &zStr
8510: 5b 69 5d 2c 20 6e 53 74 72 2d 69 29 3b 0a 20 20  [i], nStr-i);.  
8520: 6a 20 2b 3d 20 6e 53 74 72 20 2d 20 69 3b 0a 20  j += nStr - i;. 
8530: 20 61 73 73 65 72 74 28 20 6a 3c 3d 6e 4f 75 74   assert( j<=nOut
8540: 20 29 3b 0a 20 20 7a 4f 75 74 5b 6a 5d 20 3d 20   );.  zOut[j] = 
8550: 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  0;.  sqlite3_res
8560: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
8570: 2c 20 28 63 68 61 72 2a 29 7a 4f 75 74 2c 20 6a  , (char*)zOut, j
8580: 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b  , sqlite3_free);
8590: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
85a0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
85b0: 54 52 49 4d 28 29 2c 20 4c 54 52 49 4d 28 29 2c  TRIM(), LTRIM(),
85c0: 20 61 6e 64 20 52 54 52 49 4d 28 29 20 66 75 6e   and RTRIM() fun
85d0: 63 74 69 6f 6e 73 2e 0a 2a 2a 20 54 68 65 20 75  ctions..** The u
85e0: 73 65 72 64 61 74 61 20 69 73 20 30 78 31 20 66  serdata is 0x1 f
85f0: 6f 72 20 6c 65 66 74 20 74 72 69 6d 2c 20 30 78  or left trim, 0x
8600: 32 20 66 6f 72 20 72 69 67 68 74 20 74 72 69 6d  2 for right trim
8610: 2c 20 30 78 33 20 66 6f 72 20 62 6f 74 68 2e 0a  , 0x3 for both..
8620: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74  */.static void t
8630: 72 69 6d 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  rimFunc(.  sqlit
8640: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
8650: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
8660: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
8670: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e   **argv.){.  con
8680: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
8690: 20 2a 7a 49 6e 3b 20 20 20 20 20 20 20 20 20 2f   *zIn;         /
86a0: 2a 20 49 6e 70 75 74 20 73 74 72 69 6e 67 20 2a  * Input string *
86b0: 2f 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  /.  const unsign
86c0: 65 64 20 63 68 61 72 20 2a 7a 43 68 61 72 53 65  ed char *zCharSe
86d0: 74 3b 20 20 20 20 2f 2a 20 53 65 74 20 6f 66 20  t;    /* Set of 
86e0: 63 68 61 72 61 63 74 65 72 73 20 74 6f 20 74 72  characters to tr
86f0: 69 6d 20 2a 2f 0a 20 20 69 6e 74 20 6e 49 6e 3b  im */.  int nIn;
8700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8710: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d            /* Num
8720: 62 65 72 20 6f 66 20 62 79 74 65 73 20 69 6e 20  ber of bytes in 
8730: 69 6e 70 75 74 20 2a 2f 0a 20 20 69 6e 74 20 66  input */.  int f
8740: 6c 61 67 73 3b 20 20 20 20 20 20 20 20 20 20 20  lags;           
8750: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
8760: 31 3a 20 74 72 69 6d 6c 65 66 74 20 20 32 3a 20  1: trimleft  2: 
8770: 74 72 69 6d 72 69 67 68 74 20 20 33 3a 20 74 72  trimright  3: tr
8780: 69 6d 20 2a 2f 0a 20 20 69 6e 74 20 69 3b 20 20  im */.  int i;  
8790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
87a0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f            /* Loo
87b0: 70 20 63 6f 75 6e 74 65 72 20 2a 2f 0a 20 20 75  p counter */.  u
87c0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 61 4c  nsigned char *aL
87d0: 65 6e 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20  en = 0;         
87e0: 20 2f 2a 20 4c 65 6e 67 74 68 20 6f 66 20 65 61   /* Length of ea
87f0: 63 68 20 63 68 61 72 61 63 74 65 72 20 69 6e 20  ch character in 
8800: 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20 20 75 6e  zCharSet */.  un
8810: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 2a 61 7a  signed char **az
8820: 43 68 61 72 20 3d 20 30 3b 20 20 20 20 20 20 20  Char = 0;       
8830: 2f 2a 20 49 6e 64 69 76 69 64 75 61 6c 20 63 68  /* Individual ch
8840: 61 72 61 63 74 65 72 73 20 69 6e 20 7a 43 68 61  aracters in zCha
8850: 72 53 65 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 43  rSet */.  int nC
8860: 68 61 72 3b 20 20 20 20 20 20 20 20 20 20 20 20  har;            
8870: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e              /* N
8880: 75 6d 62 65 72 20 6f 66 20 63 68 61 72 61 63 74  umber of charact
8890: 65 72 73 20 69 6e 20 7a 43 68 61 72 53 65 74 20  ers in zCharSet 
88a0: 2a 2f 0a 0a 20 20 69 66 28 20 73 71 6c 69 74 65  */..  if( sqlite
88b0: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
88c0: 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[0])==SQLITE_NU
88d0: 4c 4c 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  LL ){.    return
88e0: 3b 0a 20 20 7d 0a 20 20 7a 49 6e 20 3d 20 73 71  ;.  }.  zIn = sq
88f0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
8900: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28  (argv[0]);.  if(
8910: 20 7a 49 6e 3d 3d 30 20 29 20 72 65 74 75 72 6e   zIn==0 ) return
8920: 3b 0a 20 20 6e 49 6e 20 3d 20 73 71 6c 69 74 65  ;.  nIn = sqlite
8930: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
8940: 67 76 5b 30 5d 29 3b 0a 20 20 61 73 73 65 72 74  gv[0]);.  assert
8950: 28 20 7a 49 6e 3d 3d 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 20 29 3b 0a 20 20 69 66 28 20 61 72 67 63  ]) );.  if( argc
8980: 3d 3d 31 20 29 7b 0a 20 20 20 20 73 74 61 74 69  ==1 ){.    stati
8990: 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64  c const unsigned
89a0: 20 63 68 61 72 20 6c 65 6e 4f 6e 65 5b 5d 20 3d   char lenOne[] =
89b0: 20 7b 20 31 20 7d 3b 0a 20 20 20 20 73 74 61 74   { 1 };.    stat
89c0: 69 63 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  ic unsigned char
89d0: 20 2a 20 63 6f 6e 73 74 20 61 7a 4f 6e 65 5b 5d   * const azOne[]
89e0: 20 3d 20 7b 20 28 75 38 2a 29 22 20 22 20 7d 3b   = { (u8*)" " };
89f0: 0a 20 20 20 20 6e 43 68 61 72 20 3d 20 31 3b 0a  .    nChar = 1;.
8a00: 20 20 20 20 61 4c 65 6e 20 3d 20 28 75 38 2a 29      aLen = (u8*)
8a10: 6c 65 6e 4f 6e 65 3b 0a 20 20 20 20 61 7a 43 68  lenOne;.    azCh
8a20: 61 72 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63  ar = (unsigned c
8a30: 68 61 72 20 2a 2a 29 61 7a 4f 6e 65 3b 0a 20 20  har **)azOne;.  
8a40: 20 20 7a 43 68 61 72 53 65 74 20 3d 20 30 3b 0a    zCharSet = 0;.
8a50: 20 20 7d 65 6c 73 65 20 69 66 28 20 28 7a 43 68    }else if( (zCh
8a60: 61 72 53 65 74 20 3d 20 73 71 6c 69 74 65 33 5f  arSet = sqlite3_
8a70: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
8a80: 31 5d 29 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72  1]))==0 ){.    r
8a90: 65 74 75 72 6e 3b 0a 20 20 7d 65 6c 73 65 7b 0a  eturn;.  }else{.
8aa0: 20 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e      const unsign
8ab0: 65 64 20 63 68 61 72 20 2a 7a 3b 0a 20 20 20 20  ed char *z;.    
8ac0: 66 6f 72 28 7a 3d 7a 43 68 61 72 53 65 74 2c 20  for(z=zCharSet, 
8ad0: 6e 43 68 61 72 3d 30 3b 20 2a 7a 3b 20 6e 43 68  nChar=0; *z; nCh
8ae0: 61 72 2b 2b 29 7b 0a 20 20 20 20 20 20 53 51 4c  ar++){.      SQL
8af0: 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29  ITE_SKIP_UTF8(z)
8b00: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20  ;.    }.    if( 
8b10: 6e 43 68 61 72 3e 30 20 29 7b 0a 20 20 20 20 20  nChar>0 ){.     
8b20: 20 61 7a 43 68 61 72 20 3d 20 63 6f 6e 74 65 78   azChar = contex
8b30: 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c  tMalloc(context,
8b40: 20 28 28 69 36 34 29 6e 43 68 61 72 29 2a 28 73   ((i64)nChar)*(s
8b50: 69 7a 65 6f 66 28 63 68 61 72 2a 29 2b 31 29 29  izeof(char*)+1))
8b60: 3b 0a 20 20 20 20 20 20 69 66 28 20 61 7a 43 68  ;.      if( azCh
8b70: 61 72 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  ar==0 ){.       
8b80: 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d   return;.      }
8b90: 0a 20 20 20 20 20 20 61 4c 65 6e 20 3d 20 28 75  .      aLen = (u
8ba0: 6e 73 69 67 6e 65 64 20 63 68 61 72 2a 29 26 61  nsigned char*)&a
8bb0: 7a 43 68 61 72 5b 6e 43 68 61 72 5d 3b 0a 20 20  zChar[nChar];.  
8bc0: 20 20 20 20 66 6f 72 28 7a 3d 7a 43 68 61 72 53      for(z=zCharS
8bd0: 65 74 2c 20 6e 43 68 61 72 3d 30 3b 20 2a 7a 3b  et, nChar=0; *z;
8be0: 20 6e 43 68 61 72 2b 2b 29 7b 0a 20 20 20 20 20   nChar++){.     
8bf0: 20 20 20 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d     azChar[nChar]
8c00: 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61   = (unsigned cha
8c10: 72 20 2a 29 7a 3b 0a 20 20 20 20 20 20 20 20 53  r *)z;.        S
8c20: 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28  QLITE_SKIP_UTF8(
8c30: 7a 29 3b 0a 20 20 20 20 20 20 20 20 61 4c 65 6e  z);.        aLen
8c40: 5b 6e 43 68 61 72 5d 20 3d 20 28 75 38 29 28 7a  [nChar] = (u8)(z
8c50: 20 2d 20 61 7a 43 68 61 72 5b 6e 43 68 61 72 5d   - azChar[nChar]
8c60: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  );.      }.    }
8c70: 0a 20 20 7d 0a 20 20 69 66 28 20 6e 43 68 61 72  .  }.  if( nChar
8c80: 3e 30 20 29 7b 0a 20 20 20 20 66 6c 61 67 73 20  >0 ){.    flags 
8c90: 3d 20 53 51 4c 49 54 45 5f 50 54 52 5f 54 4f 5f  = SQLITE_PTR_TO_
8ca0: 49 4e 54 28 73 71 6c 69 74 65 33 5f 75 73 65 72  INT(sqlite3_user
8cb0: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 29 3b  _data(context));
8cc0: 0a 20 20 20 20 69 66 28 20 66 6c 61 67 73 20 26  .    if( flags &
8cd0: 20 31 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c   1 ){.      whil
8ce0: 65 28 20 6e 49 6e 3e 30 20 29 7b 0a 20 20 20 20  e( nIn>0 ){.    
8cf0: 20 20 20 20 69 6e 74 20 6c 65 6e 20 3d 20 30 3b      int len = 0;
8d00: 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30  .        for(i=0
8d10: 3b 20 69 3c 6e 43 68 61 72 3b 20 69 2b 2b 29 7b  ; i<nChar; i++){
8d20: 0a 20 20 20 20 20 20 20 20 20 20 6c 65 6e 20 3d  .          len =
8d30: 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20 20 20 20 20   aLen[i];.      
8d40: 20 20 20 20 69 66 28 20 6c 65 6e 3c 3d 6e 49 6e      if( len<=nIn
8d50: 20 26 26 20 6d 65 6d 63 6d 70 28 7a 49 6e 2c 20   && memcmp(zIn, 
8d60: 61 7a 43 68 61 72 5b 69 5d 2c 20 6c 65 6e 29 3d  azChar[i], len)=
8d70: 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20  =0 ) break;.    
8d80: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66      }.        if
8d90: 28 20 69 3e 3d 6e 43 68 61 72 20 29 20 62 72 65  ( i>=nChar ) bre
8da0: 61 6b 3b 0a 20 20 20 20 20 20 20 20 7a 49 6e 20  ak;.        zIn 
8db0: 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 20 20  += len;.        
8dc0: 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20  nIn -= len;.    
8dd0: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 66    }.    }.    if
8de0: 28 20 66 6c 61 67 73 20 26 20 32 20 29 7b 0a 20  ( flags & 2 ){. 
8df0: 20 20 20 20 20 77 68 69 6c 65 28 20 6e 49 6e 3e       while( nIn>
8e00: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74  0 ){.        int
8e10: 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20   len = 0;.      
8e20: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 43 68    for(i=0; i<nCh
8e30: 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  ar; i++){.      
8e40: 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e 5b 69      len = aLen[i
8e50: 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28  ];.          if(
8e60: 20 6c 65 6e 3c 3d 6e 49 6e 20 26 26 20 6d 65 6d   len<=nIn && mem
8e70: 63 6d 70 28 26 7a 49 6e 5b 6e 49 6e 2d 6c 65 6e  cmp(&zIn[nIn-len
8e80: 5d 2c 61 7a 43 68 61 72 5b 69 5d 2c 6c 65 6e 29  ],azChar[i],len)
8e90: 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20  ==0 ) break;.   
8ea0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69       }.        i
8eb0: 66 28 20 69 3e 3d 6e 43 68 61 72 20 29 20 62 72  f( i>=nChar ) br
8ec0: 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 6e 49 6e  eak;.        nIn
8ed0: 20 2d 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 7d   -= len;.      }
8ee0: 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 7a  .    }.    if( z
8ef0: 43 68 61 72 53 65 74 20 29 7b 0a 20 20 20 20 20  CharSet ){.     
8f00: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 61 7a   sqlite3_free(az
8f10: 43 68 61 72 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  Char);.    }.  }
8f20: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
8f30: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
8f40: 28 63 68 61 72 2a 29 7a 49 6e 2c 20 6e 49 6e 2c  (char*)zIn, nIn,
8f50: 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e   SQLITE_TRANSIEN
8f60: 54 29 3b 0a 7d 0a 0a 0a 2f 2a 20 49 4d 50 3a 20  T);.}.../* IMP: 
8f70: 52 2d 32 35 33 36 31 2d 31 36 31 35 30 20 54 68  R-25361-16150 Th
8f80: 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6f  is function is o
8f90: 6d 69 74 74 65 64 20 66 72 6f 6d 20 53 51 4c 69  mitted from SQLi
8fa0: 74 65 20 62 79 20 64 65 66 61 75 6c 74 2e 20 49  te by default. I
8fb0: 74 0a 2a 2a 20 69 73 20 6f 6e 6c 79 20 61 76 61  t.** is only ava
8fc0: 69 6c 61 62 6c 65 20 69 66 20 74 68 65 20 53 51  ilable if the SQ
8fd0: 4c 49 54 45 5f 53 4f 55 4e 44 45 58 20 63 6f 6d  LITE_SOUNDEX com
8fe0: 70 69 6c 65 2d 74 69 6d 65 20 6f 70 74 69 6f 6e  pile-time option
8ff0: 20 69 73 20 75 73 65 64 0a 2a 2a 20 77 68 65 6e   is used.** when
9000: 20 53 51 4c 69 74 65 20 69 73 20 62 75 69 6c 74   SQLite is built
9010: 2e 0a 2a 2f 0a 23 69 66 64 65 66 20 53 51 4c 49  ..*/.#ifdef SQLI
9020: 54 45 5f 53 4f 55 4e 44 45 58 0a 2f 2a 0a 2a 2a  TE_SOUNDEX./*.**
9030: 20 43 6f 6d 70 75 74 65 20 74 68 65 20 73 6f 75   Compute the sou
9040: 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67 20 6f 66  ndex encoding of
9050: 20 61 20 77 6f 72 64 2e 0a 2a 2a 0a 2a 2a 20 49   a word..**.** I
9060: 4d 50 3a 20 52 2d 35 39 37 38 32 2d 30 30 30 37  MP: R-59782-0007
9070: 32 20 54 68 65 20 73 6f 75 6e 64 65 78 28 58 29  2 The soundex(X)
9080: 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e   function return
9090: 73 20 61 20 73 74 72 69 6e 67 20 74 68 61 74 20  s a string that 
90a0: 69 73 20 74 68 65 0a 2a 2a 20 73 6f 75 6e 64 65  is the.** sounde
90b0: 78 20 65 6e 63 6f 64 69 6e 67 20 6f 66 20 74 68  x encoding of th
90c0: 65 20 73 74 72 69 6e 67 20 58 2e 20 0a 2a 2f 0a  e string X. .*/.
90d0: 73 74 61 74 69 63 20 76 6f 69 64 20 73 6f 75 6e  static void soun
90e0: 64 65 78 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  dexFunc(.  sqlit
90f0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
9100: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
9110: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
9120: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 68 61   **argv.){.  cha
9130: 72 20 7a 52 65 73 75 6c 74 5b 38 5d 3b 0a 20 20  r zResult[8];.  
9140: 63 6f 6e 73 74 20 75 38 20 2a 7a 49 6e 3b 0a 20  const u8 *zIn;. 
9150: 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20 73 74 61   int i, j;.  sta
9160: 74 69 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  tic const unsign
9170: 65 64 20 63 68 61 72 20 69 43 6f 64 65 5b 5d 20  ed char iCode[] 
9180: 3d 20 7b 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c  = {.    0, 0, 0,
9190: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
91a0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
91b0: 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30  , 0, 0,.    0, 0
91c0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
91d0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
91e0: 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20  0, 0, 0, 0,.    
91f0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9200: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9210: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a   0, 0, 0, 0, 0,.
9220: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20      0, 0, 0, 0, 
9230: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9240: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9250: 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 31 2c   0,.    0, 0, 1,
9260: 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 32 2c 20   2, 3, 0, 1, 2, 
9270: 30 2c 20 30 2c 20 32 2c 20 32 2c 20 34 2c 20 35  0, 0, 2, 2, 4, 5
9280: 2c 20 35 2c 20 30 2c 0a 20 20 20 20 31 2c 20 32  , 5, 0,.    1, 2
9290: 2c 20 36 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c  , 6, 2, 3, 0, 1,
92a0: 20 30 2c 20 32 2c 20 30 2c 20 32 2c 20 30 2c 20   0, 2, 0, 2, 0, 
92b0: 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20  0, 0, 0, 0,.    
92c0: 30 2c 20 30 2c 20 31 2c 20 32 2c 20 33 2c 20 30  0, 0, 1, 2, 3, 0
92d0: 2c 20 31 2c 20 32 2c 20 30 2c 20 30 2c 20 32 2c  , 1, 2, 0, 0, 2,
92e0: 20 32 2c 20 34 2c 20 35 2c 20 35 2c 20 30 2c 0a   2, 4, 5, 5, 0,.
92f0: 20 20 20 20 31 2c 20 32 2c 20 36 2c 20 32 2c 20      1, 2, 6, 2, 
9300: 33 2c 20 30 2c 20 31 2c 20 30 2c 20 32 2c 20 30  3, 0, 1, 0, 2, 0
9310: 2c 20 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 2, 0, 0, 0, 0,
9320: 20 30 2c 0a 20 20 7d 3b 0a 20 20 61 73 73 65 72   0,.  };.  asser
9330: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
9340: 7a 49 6e 20 3d 20 28 75 38 2a 29 73 71 6c 69 74  zIn = (u8*)sqlit
9350: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
9360: 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 49  gv[0]);.  if( zI
9370: 6e 3d 3d 30 20 29 20 7a 49 6e 20 3d 20 28 75 38  n==0 ) zIn = (u8
9380: 2a 29 22 22 3b 0a 20 20 66 6f 72 28 69 3d 30 3b  *)"";.  for(i=0;
9390: 20 7a 49 6e 5b 69 5d 20 26 26 20 21 73 71 6c 69   zIn[i] && !sqli
93a0: 74 65 33 49 73 61 6c 70 68 61 28 7a 49 6e 5b 69  te3Isalpha(zIn[i
93b0: 5d 29 3b 20 69 2b 2b 29 7b 7d 0a 20 20 69 66 28  ]); i++){}.  if(
93c0: 20 7a 49 6e 5b 69 5d 20 29 7b 0a 20 20 20 20 75   zIn[i] ){.    u
93d0: 38 20 70 72 65 76 63 6f 64 65 20 3d 20 69 43 6f  8 prevcode = iCo
93e0: 64 65 5b 7a 49 6e 5b 69 5d 26 30 78 37 66 5d 3b  de[zIn[i]&0x7f];
93f0: 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b 30 5d 20  .    zResult[0] 
9400: 3d 20 73 71 6c 69 74 65 33 54 6f 75 70 70 65 72  = sqlite3Toupper
9410: 28 7a 49 6e 5b 69 5d 29 3b 0a 20 20 20 20 66 6f  (zIn[i]);.    fo
9420: 72 28 6a 3d 31 3b 20 6a 3c 34 20 26 26 20 7a 49  r(j=1; j<4 && zI
9430: 6e 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  n[i]; i++){.    
9440: 20 20 69 6e 74 20 63 6f 64 65 20 3d 20 69 43 6f    int code = iCo
9450: 64 65 5b 7a 49 6e 5b 69 5d 26 30 78 37 66 5d 3b  de[zIn[i]&0x7f];
9460: 0a 20 20 20 20 20 20 69 66 28 20 63 6f 64 65 3e  .      if( code>
9470: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28  0 ){.        if(
9480: 20 63 6f 64 65 21 3d 70 72 65 76 63 6f 64 65 20   code!=prevcode 
9490: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 70 72 65  ){.          pre
94a0: 76 63 6f 64 65 20 3d 20 63 6f 64 65 3b 0a 20 20  vcode = code;.  
94b0: 20 20 20 20 20 20 20 20 7a 52 65 73 75 6c 74 5b          zResult[
94c0: 6a 2b 2b 5d 20 3d 20 63 6f 64 65 20 2b 20 27 30  j++] = code + '0
94d0: 27 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  ';.        }.   
94e0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
94f0: 20 20 70 72 65 76 63 6f 64 65 20 3d 20 30 3b 0a    prevcode = 0;.
9500: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20        }.    }.  
9510: 20 20 77 68 69 6c 65 28 20 6a 3c 34 20 29 7b 0a    while( j<4 ){.
9520: 20 20 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a 2b        zResult[j+
9530: 2b 5d 20 3d 20 27 30 27 3b 0a 20 20 20 20 7d 0a  +] = '0';.    }.
9540: 20 20 20 20 7a 52 65 73 75 6c 74 5b 6a 5d 20 3d      zResult[j] =
9550: 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   0;.    sqlite3_
9560: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
9570: 65 78 74 2c 20 7a 52 65 73 75 6c 74 2c 20 34 2c  ext, zResult, 4,
9580: 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e   SQLITE_TRANSIEN
9590: 54 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  T);.  }else{.   
95a0: 20 2f 2a 20 49 4d 50 3a 20 52 2d 36 34 38 39 34   /* IMP: R-64894
95b0: 2d 35 30 33 32 31 20 54 68 65 20 73 74 72 69 6e  -50321 The strin
95c0: 67 20 22 3f 30 30 30 22 20 69 73 20 72 65 74 75  g "?000" is retu
95d0: 72 6e 65 64 20 69 66 20 74 68 65 20 61 72 67 75  rned if the argu
95e0: 6d 65 6e 74 0a 20 20 20 20 2a 2a 20 69 73 20 4e  ment.    ** is N
95f0: 55 4c 4c 20 6f 72 20 63 6f 6e 74 61 69 6e 73 20  ULL or contains 
9600: 6e 6f 20 41 53 43 49 49 20 61 6c 70 68 61 62 65  no ASCII alphabe
9610: 74 69 63 20 63 68 61 72 61 63 74 65 72 73 2e 20  tic characters. 
9620: 2a 2f 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  */.    sqlite3_r
9630: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
9640: 78 74 2c 20 22 3f 30 30 30 22 2c 20 34 2c 20 53  xt, "?000", 4, S
9650: 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20  QLITE_STATIC);. 
9660: 20 7d 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53   }.}.#endif /* S
9670: 51 4c 49 54 45 5f 53 4f 55 4e 44 45 58 20 2a 2f  QLITE_SOUNDEX */
9680: 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  ..#ifndef SQLITE
9690: 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54 45 4e  _OMIT_LOAD_EXTEN
96a0: 53 49 4f 4e 0a 2f 2a 0a 2a 2a 20 41 20 66 75 6e  SION./*.** A fun
96b0: 63 74 69 6f 6e 20 74 68 61 74 20 6c 6f 61 64 73  ction that loads
96c0: 20 61 20 73 68 61 72 65 64 2d 6c 69 62 72 61 72   a shared-librar
96d0: 79 20 65 78 74 65 6e 73 69 6f 6e 20 74 68 65 6e  y extension then
96e0: 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 2e 0a 2a   returns NULL..*
96f0: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 6f  /.static void lo
9700: 61 64 45 78 74 28 73 71 6c 69 74 65 33 5f 63 6f  adExt(sqlite3_co
9710: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
9720: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
9730: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
9740: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
9750: 46 69 6c 65 20 3d 20 28 63 6f 6e 73 74 20 63 68  File = (const ch
9760: 61 72 20 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  ar *)sqlite3_val
9770: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
9780: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
9790: 7a 50 72 6f 63 3b 0a 20 20 73 71 6c 69 74 65 33  zProc;.  sqlite3
97a0: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
97b0: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
97c0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 63 68 61  (context);.  cha
97d0: 72 20 2a 7a 45 72 72 4d 73 67 20 3d 20 30 3b 0a  r *zErrMsg = 0;.
97e0: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29  .  if( argc==2 )
97f0: 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d 20 28 63  {.    zProc = (c
9800: 6f 6e 73 74 20 63 68 61 72 20 2a 29 73 71 6c 69  onst char *)sqli
9810: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
9820: 72 67 76 5b 31 5d 29 3b 0a 20 20 7d 65 6c 73 65  rgv[1]);.  }else
9830: 7b 0a 20 20 20 20 7a 50 72 6f 63 20 3d 20 30 3b  {.    zProc = 0;
9840: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 46 69 6c 65  .  }.  if( zFile
9850: 20 26 26 20 73 71 6c 69 74 65 33 5f 6c 6f 61 64   && sqlite3_load
9860: 5f 65 78 74 65 6e 73 69 6f 6e 28 64 62 2c 20 7a  _extension(db, z
9870: 46 69 6c 65 2c 20 7a 50 72 6f 63 2c 20 26 7a 45  File, zProc, &zE
9880: 72 72 4d 73 67 29 20 29 7b 0a 20 20 20 20 73 71  rrMsg) ){.    sq
9890: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
98a0: 6f 72 28 63 6f 6e 74 65 78 74 2c 20 7a 45 72 72  or(context, zErr
98b0: 4d 73 67 2c 20 2d 31 29 3b 0a 20 20 20 20 73 71  Msg, -1);.    sq
98c0: 6c 69 74 65 33 5f 66 72 65 65 28 7a 45 72 72 4d  lite3_free(zErrM
98d0: 73 67 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69  sg);.  }.}.#endi
98e0: 66 0a 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73  f.../*.** An ins
98f0: 74 61 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c  tance of the fol
9900: 6c 6f 77 69 6e 67 20 73 74 72 75 63 74 75 72 65  lowing structure
9910: 20 68 6f 6c 64 73 20 74 68 65 20 63 6f 6e 74 65   holds the conte
9920: 78 74 20 6f 66 20 61 0a 2a 2a 20 73 75 6d 28 29  xt of a.** sum()
9930: 20 6f 72 20 61 76 67 28 29 20 61 67 67 72 65 67   or avg() aggreg
9940: 61 74 65 20 63 6f 6d 70 75 74 61 74 69 6f 6e 2e  ate computation.
9950: 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75  .*/.typedef stru
9960: 63 74 20 53 75 6d 43 74 78 20 53 75 6d 43 74 78  ct SumCtx SumCtx
9970: 3b 0a 73 74 72 75 63 74 20 53 75 6d 43 74 78 20  ;.struct SumCtx 
9980: 7b 0a 20 20 64 6f 75 62 6c 65 20 72 53 75 6d 3b  {.  double rSum;
9990: 20 20 20 20 20 20 2f 2a 20 46 6c 6f 61 74 69 6e        /* Floatin
99a0: 67 20 70 6f 69 6e 74 20 73 75 6d 20 2a 2f 0a 20  g point sum */. 
99b0: 20 69 36 34 20 69 53 75 6d 3b 20 20 20 20 20 20   i64 iSum;      
99c0: 20 20 20 2f 2a 20 49 6e 74 65 67 65 72 20 73 75     /* Integer su
99d0: 6d 20 2a 2f 20 20 20 0a 20 20 69 36 34 20 63 6e  m */   .  i64 cn
99e0: 74 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e  t;          /* N
99f0: 75 6d 62 65 72 20 6f 66 20 65 6c 65 6d 65 6e 74  umber of element
9a00: 73 20 73 75 6d 6d 65 64 20 2a 2f 0a 20 20 75 38  s summed */.  u8
9a10: 20 6f 76 65 72 66 6c 6f 77 3b 20 20 20 20 20 20   overflow;      
9a20: 2f 2a 20 54 72 75 65 20 69 66 20 69 6e 74 65 67  /* True if integ
9a30: 65 72 20 6f 76 65 72 66 6c 6f 77 20 73 65 65 6e  er overflow seen
9a40: 20 2a 2f 0a 20 20 75 38 20 61 70 70 72 6f 78 3b   */.  u8 approx;
9a50: 20 20 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20          /* True 
9a60: 69 66 20 6e 6f 6e 2d 69 6e 74 65 67 65 72 20 76  if non-integer v
9a70: 61 6c 75 65 20 77 61 73 20 69 6e 70 75 74 20 74  alue was input t
9a80: 6f 20 74 68 65 20 73 75 6d 20 2a 2f 0a 7d 3b 0a  o the sum */.};.
9a90: 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20  ./*.** Routines 
9aa0: 75 73 65 64 20 74 6f 20 63 6f 6d 70 75 74 65 20  used to compute 
9ab0: 74 68 65 20 73 75 6d 2c 20 61 76 65 72 61 67 65  the sum, average
9ac0: 2c 20 61 6e 64 20 74 6f 74 61 6c 2e 0a 2a 2a 0a  , and total..**.
9ad0: 2a 2a 20 54 68 65 20 53 55 4d 28 29 20 66 75 6e  ** The SUM() fun
9ae0: 63 74 69 6f 6e 20 66 6f 6c 6c 6f 77 73 20 74 68  ction follows th
9af0: 65 20 28 62 72 6f 6b 65 6e 29 20 53 51 4c 20 73  e (broken) SQL s
9b00: 74 61 6e 64 61 72 64 20 77 68 69 63 68 20 6d 65  tandard which me
9b10: 61 6e 73 0a 2a 2a 20 74 68 61 74 20 69 74 20 72  ans.** that it r
9b20: 65 74 75 72 6e 73 20 4e 55 4c 4c 20 69 66 20 69  eturns NULL if i
9b30: 74 20 73 75 6d 73 20 6f 76 65 72 20 6e 6f 20 69  t sums over no i
9b40: 6e 70 75 74 73 2e 20 20 54 4f 54 41 4c 20 72 65  nputs.  TOTAL re
9b50: 74 75 72 6e 73 0a 2a 2a 20 30 2e 30 20 69 6e 20  turns.** 0.0 in 
9b60: 74 68 61 74 20 63 61 73 65 2e 20 20 49 6e 20 61  that case.  In a
9b70: 64 64 69 74 69 6f 6e 2c 20 54 4f 54 41 4c 20 61  ddition, TOTAL a
9b80: 6c 77 61 79 73 20 72 65 74 75 72 6e 73 20 61 20  lways returns a 
9b90: 66 6c 6f 61 74 20 77 68 65 72 65 0a 2a 2a 20 53  float where.** S
9ba0: 55 4d 20 6d 69 67 68 74 20 72 65 74 75 72 6e 20  UM might return 
9bb0: 61 6e 20 69 6e 74 65 67 65 72 20 69 66 20 69 74  an integer if it
9bc0: 20 6e 65 76 65 72 20 65 6e 63 6f 75 6e 74 65 72   never encounter
9bd0: 73 20 61 20 66 6c 6f 61 74 69 6e 67 20 70 6f 69  s a floating poi
9be0: 6e 74 0a 2a 2a 20 76 61 6c 75 65 2e 20 20 54 4f  nt.** value.  TO
9bf0: 54 41 4c 20 6e 65 76 65 72 20 66 61 69 6c 73 2c  TAL never fails,
9c00: 20 62 75 74 20 53 55 4d 20 6d 69 67 68 74 20 74   but SUM might t
9c10: 68 72 6f 75 67 68 20 61 6e 20 65 78 63 65 70 74  hrough an except
9c20: 69 6f 6e 20 69 66 0a 2a 2a 20 69 74 20 6f 76 65  ion if.** it ove
9c30: 72 66 6c 6f 77 73 20 61 6e 20 69 6e 74 65 67 65  rflows an intege
9c40: 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  r..*/.static voi
9c50: 64 20 73 75 6d 53 74 65 70 28 73 71 6c 69 74 65  d sumStep(sqlite
9c60: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
9c70: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
9c80: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
9c90: 67 76 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70  gv){.  SumCtx *p
9ca0: 3b 0a 20 20 69 6e 74 20 74 79 70 65 3b 0a 20 20  ;.  int type;.  
9cb0: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
9cc0: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
9cd0: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 70  METER(argc);.  p
9ce0: 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65   = sqlite3_aggre
9cf0: 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  gate_context(con
9d00: 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29  text, sizeof(*p)
9d10: 29 3b 0a 20 20 74 79 70 65 20 3d 20 73 71 6c 69  );.  type = sqli
9d20: 74 65 33 5f 76 61 6c 75 65 5f 6e 75 6d 65 72 69  te3_value_numeri
9d30: 63 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3b  c_type(argv[0]);
9d40: 0a 20 20 69 66 28 20 70 20 26 26 20 74 79 70 65  .  if( p && type
9d50: 21 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b  !=SQLITE_NULL ){
9d60: 0a 20 20 20 20 70 2d 3e 63 6e 74 2b 2b 3b 0a 20  .    p->cnt++;. 
9d70: 20 20 20 69 66 28 20 74 79 70 65 3d 3d 53 51 4c     if( type==SQL
9d80: 49 54 45 5f 49 4e 54 45 47 45 52 20 29 7b 0a 20  ITE_INTEGER ){. 
9d90: 20 20 20 20 20 69 36 34 20 76 20 3d 20 73 71 6c       i64 v = sql
9da0: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34  ite3_value_int64
9db0: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20  (argv[0]);.     
9dc0: 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 76 3b 0a 20   p->rSum += v;. 
9dd0: 20 20 20 20 20 69 66 28 20 28 70 2d 3e 61 70 70       if( (p->app
9de0: 72 6f 78 7c 70 2d 3e 6f 76 65 72 66 6c 6f 77 29  rox|p->overflow)
9df0: 3d 3d 30 20 26 26 20 73 71 6c 69 74 65 33 41 64  ==0 && sqlite3Ad
9e00: 64 49 6e 74 36 34 28 26 70 2d 3e 69 53 75 6d 2c  dInt64(&p->iSum,
9e10: 20 76 29 20 29 7b 0a 20 20 20 20 20 20 20 20 70   v) ){.        p
9e20: 2d 3e 6f 76 65 72 66 6c 6f 77 20 3d 20 31 3b 0a  ->overflow = 1;.
9e30: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73        }.    }els
9e40: 65 7b 0a 20 20 20 20 20 20 70 2d 3e 72 53 75 6d  e{.      p->rSum
9e50: 20 2b 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75   += sqlite3_valu
9e60: 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d  e_double(argv[0]
9e70: 29 3b 0a 20 20 20 20 20 20 70 2d 3e 61 70 70 72  );.      p->appr
9e80: 6f 78 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20  ox = 1;.    }.  
9e90: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
9ea0: 73 75 6d 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69  sumFinalize(sqli
9eb0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
9ec0: 74 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20  text){.  SumCtx 
9ed0: 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65  *p;.  p = sqlite
9ee0: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
9ef0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b  ext(context, 0);
9f00: 0a 20 20 69 66 28 20 70 20 26 26 20 70 2d 3e 63  .  if( p && p->c
9f10: 6e 74 3e 30 20 29 7b 0a 20 20 20 20 69 66 28 20  nt>0 ){.    if( 
9f20: 70 2d 3e 6f 76 65 72 66 6c 6f 77 20 29 7b 0a 20  p->overflow ){. 
9f30: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
9f40: 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78  ult_error(contex
9f50: 74 2c 22 69 6e 74 65 67 65 72 20 6f 76 65 72 66  t,"integer overf
9f60: 6c 6f 77 22 2c 2d 31 29 3b 0a 20 20 20 20 7d 65  low",-1);.    }e
9f70: 6c 73 65 20 69 66 28 20 70 2d 3e 61 70 70 72 6f  lse if( p->appro
9f80: 78 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  x ){.      sqlit
9f90: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
9fa0: 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 72 53 75  (context, p->rSu
9fb0: 6d 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20  m);.    }else{. 
9fc0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
9fd0: 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78  ult_int64(contex
9fe0: 74 2c 20 70 2d 3e 69 53 75 6d 29 3b 0a 20 20 20  t, p->iSum);.   
9ff0: 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20   }.  }.}.static 
a000: 76 6f 69 64 20 61 76 67 46 69 6e 61 6c 69 7a 65  void avgFinalize
a010: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
a020: 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75   *context){.  Su
a030: 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73  mCtx *p;.  p = s
a040: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
a050: 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74  _context(context
a060: 2c 20 30 29 3b 0a 20 20 69 66 28 20 70 20 26 26  , 0);.  if( p &&
a070: 20 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20   p->cnt>0 ){.   
a080: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
a090: 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c 20  double(context, 
a0a0: 70 2d 3e 72 53 75 6d 2f 28 64 6f 75 62 6c 65 29  p->rSum/(double)
a0b0: 70 2d 3e 63 6e 74 29 3b 0a 20 20 7d 0a 7d 0a 73  p->cnt);.  }.}.s
a0c0: 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74 61 6c  tatic void total
a0d0: 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33  Finalize(sqlite3
a0e0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
a0f0: 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70 3b  t){.  SumCtx *p;
a100: 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61  .  p = sqlite3_a
a110: 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74  ggregate_context
a120: 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20  (context, 0);.  
a130: 2f 2a 20 28 64 6f 75 62 6c 65 29 30 20 49 6e 20  /* (double)0 In 
a140: 63 61 73 65 20 6f 66 20 53 51 4c 49 54 45 5f 4f  case of SQLITE_O
a150: 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49  MIT_FLOATING_POI
a160: 4e 54 2e 2e 2e 20 2a 2f 0a 20 20 73 71 6c 69 74  NT... */.  sqlit
a170: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
a180: 28 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20 70 2d  (context, p ? p-
a190: 3e 72 53 75 6d 20 3a 20 28 64 6f 75 62 6c 65 29  >rSum : (double)
a1a0: 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65  0);.}../*.** The
a1b0: 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63   following struc
a1c0: 74 75 72 65 20 6b 65 65 70 73 20 74 72 61 63 6b  ture keeps track
a1d0: 20 6f 66 20 73 74 61 74 65 20 69 6e 66 6f 72 6d   of state inform
a1e0: 61 74 69 6f 6e 20 66 6f 72 20 74 68 65 0a 2a 2a  ation for the.**
a1f0: 20 63 6f 75 6e 74 28 29 20 61 67 67 72 65 67 61   count() aggrega
a200: 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a  te function..*/.
a210: 74 79 70 65 64 65 66 20 73 74 72 75 63 74 20 43  typedef struct C
a220: 6f 75 6e 74 43 74 78 20 43 6f 75 6e 74 43 74 78  ountCtx CountCtx
a230: 3b 0a 73 74 72 75 63 74 20 43 6f 75 6e 74 43 74  ;.struct CountCt
a240: 78 20 7b 0a 20 20 69 36 34 20 6e 3b 0a 7d 3b 0a  x {.  i64 n;.};.
a250: 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20  ./*.** Routines 
a260: 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 74 68 65  to implement the
a270: 20 63 6f 75 6e 74 28 29 20 61 67 67 72 65 67 61   count() aggrega
a280: 74 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a  te function..*/.
a290: 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 75 6e  static void coun
a2a0: 74 53 74 65 70 28 73 71 6c 69 74 65 33 5f 63 6f  tStep(sqlite3_co
a2b0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
a2c0: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
a2d0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
a2e0: 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a 70 3b 0a  .  CountCtx *p;.
a2f0: 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67    p = sqlite3_ag
a300: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
a310: 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28  context, sizeof(
a320: 2a 70 29 29 3b 0a 20 20 69 66 28 20 28 61 72 67  *p));.  if( (arg
a330: 63 3d 3d 30 20 7c 7c 20 53 51 4c 49 54 45 5f 4e  c==0 || SQLITE_N
a340: 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f 76 61 6c  ULL!=sqlite3_val
a350: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
a360: 29 20 26 26 20 70 20 29 7b 0a 20 20 20 20 70 2d  ) && p ){.    p-
a370: 3e 6e 2b 2b 3b 0a 20 20 7d 0a 0a 23 69 66 6e 64  >n++;.  }..#ifnd
a380: 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 44  ef SQLITE_OMIT_D
a390: 45 50 52 45 43 41 54 45 44 0a 20 20 2f 2a 20 54  EPRECATED.  /* T
a3a0: 68 65 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65  he sqlite3_aggre
a3b0: 67 61 74 65 5f 63 6f 75 6e 74 28 29 20 66 75 6e  gate_count() fun
a3c0: 63 74 69 6f 6e 20 69 73 20 64 65 70 72 65 63 61  ction is depreca
a3d0: 74 65 64 2e 20 20 42 75 74 20 6a 75 73 74 20 74  ted.  But just t
a3e0: 6f 20 6d 61 6b 65 0a 20 20 2a 2a 20 73 75 72 65  o make.  ** sure
a3f0: 20 69 74 20 73 74 69 6c 6c 20 6f 70 65 72 61 74   it still operat
a400: 65 73 20 63 6f 72 72 65 63 74 6c 79 2c 20 76 65  es correctly, ve
a410: 72 69 66 79 20 74 68 61 74 20 69 74 73 20 63 6f  rify that its co
a420: 75 6e 74 20 61 67 72 65 65 73 20 77 69 74 68 20  unt agrees with 
a430: 6f 75 72 20 0a 20 20 2a 2a 20 69 6e 74 65 72 6e  our .  ** intern
a440: 61 6c 20 63 6f 75 6e 74 20 77 68 65 6e 20 75 73  al count when us
a450: 69 6e 67 20 63 6f 75 6e 74 28 2a 29 20 61 6e 64  ing count(*) and
a460: 20 77 68 65 6e 20 74 68 65 20 74 6f 74 61 6c 20   when the total 
a470: 63 6f 75 6e 74 20 63 61 6e 20 62 65 0a 20 20 2a  count can be.  *
a480: 2a 20 65 78 70 72 65 73 73 65 64 20 61 73 20 61  * expressed as a
a490: 20 33 32 2d 62 69 74 20 69 6e 74 65 67 65 72 2e   32-bit integer.
a4a0: 20 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 61 72   */.  assert( ar
a4b0: 67 63 3d 3d 31 20 7c 7c 20 70 3d 3d 30 20 7c 7c  gc==1 || p==0 ||
a4c0: 20 70 2d 3e 6e 3e 30 78 37 66 66 66 66 66 66 66   p->n>0x7fffffff
a4d0: 0a 20 20 20 20 20 20 20 20 20 20 7c 7c 20 70 2d  .          || p-
a4e0: 3e 6e 3d 3d 73 71 6c 69 74 65 33 5f 61 67 67 72  >n==sqlite3_aggr
a4f0: 65 67 61 74 65 5f 63 6f 75 6e 74 28 63 6f 6e 74  egate_count(cont
a500: 65 78 74 29 20 29 3b 0a 23 65 6e 64 69 66 0a 7d  ext) );.#endif.}
a510: 20 20 20 0a 73 74 61 74 69 63 20 76 6f 69 64 20     .static void 
a520: 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 28 73 71  countFinalize(sq
a530: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
a540: 6f 6e 74 65 78 74 29 7b 0a 20 20 43 6f 75 6e 74  ontext){.  Count
a550: 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71  Ctx *p;.  p = sq
a560: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
a570: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
a580: 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72   0);.  sqlite3_r
a590: 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74  esult_int64(cont
a5a0: 65 78 74 2c 20 70 20 3f 20 70 2d 3e 6e 20 3a 20  ext, p ? p->n : 
a5b0: 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75  0);.}../*.** Rou
a5c0: 74 69 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65  tines to impleme
a5d0: 6e 74 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78  nt min() and max
a5e0: 28 29 20 61 67 67 72 65 67 61 74 65 20 66 75 6e  () aggregate fun
a5f0: 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69  ctions..*/.stati
a600: 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78 53 74 65  c void minmaxSte
a610: 70 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  p(.  sqlite3_con
a620: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a  text *context, .
a630: 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 20 0a    int NotUsed, .
a640: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
a650: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 4d 65 6d 20  **argv.){.  Mem 
a660: 2a 70 41 72 67 20 20 3d 20 28 4d 65 6d 20 2a 29  *pArg  = (Mem *)
a670: 61 72 67 76 5b 30 5d 3b 0a 20 20 4d 65 6d 20 2a  argv[0];.  Mem *
a680: 70 42 65 73 74 3b 0a 20 20 55 4e 55 53 45 44 5f  pBest;.  UNUSED_
a690: 50 41 52 41 4d 45 54 45 52 28 4e 6f 74 55 73 65  PARAMETER(NotUse
a6a0: 64 29 3b 0a 0a 20 20 70 42 65 73 74 20 3d 20 28  d);..  pBest = (
a6b0: 4d 65 6d 20 2a 29 73 71 6c 69 74 65 33 5f 61 67  Mem *)sqlite3_ag
a6c0: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
a6d0: 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28  context, sizeof(
a6e0: 2a 70 42 65 73 74 29 29 3b 0a 20 20 69 66 28 20  *pBest));.  if( 
a6f0: 21 70 42 65 73 74 20 29 20 72 65 74 75 72 6e 3b  !pBest ) return;
a700: 0a 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f  ..  if( sqlite3_
a710: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
a720: 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  0])==SQLITE_NULL
a730: 20 29 7b 0a 20 20 20 20 69 66 28 20 70 42 65 73   ){.    if( pBes
a740: 74 2d 3e 66 6c 61 67 73 20 29 20 73 71 6c 69 74  t->flags ) sqlit
a750: 65 33 53 6b 69 70 41 63 63 75 6d 75 6c 61 74 6f  e3SkipAccumulato
a760: 72 4c 6f 61 64 28 63 6f 6e 74 65 78 74 29 3b 0a  rLoad(context);.
a770: 20 20 7d 65 6c 73 65 20 69 66 28 20 70 42 65 73    }else if( pBes
a780: 74 2d 3e 66 6c 61 67 73 20 29 7b 0a 20 20 20 20  t->flags ){.    
a790: 69 6e 74 20 6d 61 78 3b 0a 20 20 20 20 69 6e 74  int max;.    int
a7a0: 20 63 6d 70 3b 0a 20 20 20 20 43 6f 6c 6c 53 65   cmp;.    CollSe
a7b0: 71 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74  q *pColl = sqlit
a7c0: 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71  e3GetFuncCollSeq
a7d0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 2f  (context);.    /
a7e0: 2a 20 54 68 69 73 20 73 74 65 70 20 66 75 6e 63  * This step func
a7f0: 74 69 6f 6e 20 69 73 20 75 73 65 64 20 66 6f 72  tion is used for
a800: 20 62 6f 74 68 20 74 68 65 20 6d 69 6e 28 29 20   both the min() 
a810: 61 6e 64 20 6d 61 78 28 29 20 61 67 67 72 65 67  and max() aggreg
a820: 61 74 65 73 2c 0a 20 20 20 20 2a 2a 20 74 68 65  ates,.    ** the
a830: 20 6f 6e 6c 79 20 64 69 66 66 65 72 65 6e 63 65   only difference
a840: 20 62 65 74 77 65 65 6e 20 74 68 65 20 74 77 6f   between the two
a850: 20 62 65 69 6e 67 20 74 68 61 74 20 74 68 65 20   being that the 
a860: 73 65 6e 73 65 20 6f 66 20 74 68 65 0a 20 20 20  sense of the.   
a870: 20 2a 2a 20 63 6f 6d 70 61 72 69 73 6f 6e 20 69   ** comparison i
a880: 73 20 69 6e 76 65 72 74 65 64 2e 20 46 6f 72 20  s inverted. For 
a890: 74 68 65 20 6d 61 78 28 29 20 61 67 67 72 65 67  the max() aggreg
a8a0: 61 74 65 2c 20 74 68 65 0a 20 20 20 20 2a 2a 20  ate, the.    ** 
a8b0: 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74  sqlite3_user_dat
a8c0: 61 28 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74  a() function ret
a8d0: 75 72 6e 73 20 28 76 6f 69 64 20 2a 29 2d 31 2e  urns (void *)-1.
a8e0: 20 46 6f 72 20 6d 69 6e 28 29 20 69 74 0a 20 20   For min() it.  
a8f0: 20 20 2a 2a 20 72 65 74 75 72 6e 73 20 28 76 6f    ** returns (vo
a900: 69 64 20 2a 29 64 62 2c 20 77 68 65 72 65 20 64  id *)db, where d
a910: 62 20 69 73 20 74 68 65 20 73 71 6c 69 74 65 33  b is the sqlite3
a920: 2a 20 64 61 74 61 62 61 73 65 20 70 6f 69 6e 74  * database point
a930: 65 72 2e 0a 20 20 20 20 2a 2a 20 54 68 65 72 65  er..    ** There
a940: 66 6f 72 65 20 74 68 65 20 6e 65 78 74 20 73 74  fore the next st
a950: 61 74 65 6d 65 6e 74 20 73 65 74 73 20 76 61 72  atement sets var
a960: 69 61 62 6c 65 20 27 6d 61 78 27 20 74 6f 20 31  iable 'max' to 1
a970: 20 66 6f 72 20 74 68 65 20 6d 61 78 28 29 0a 20   for the max(). 
a980: 20 20 20 2a 2a 20 61 67 67 72 65 67 61 74 65 2c     ** aggregate,
a990: 20 6f 72 20 30 20 66 6f 72 20 6d 69 6e 28 29 2e   or 0 for min().
a9a0: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 6d 61 78 20  .    */.    max 
a9b0: 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64  = sqlite3_user_d
a9c0: 61 74 61 28 63 6f 6e 74 65 78 74 29 21 3d 30 3b  ata(context)!=0;
a9d0: 0a 20 20 20 20 63 6d 70 20 3d 20 73 71 6c 69 74  .    cmp = sqlit
a9e0: 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28 70 42 65  e3MemCompare(pBe
a9f0: 73 74 2c 20 70 41 72 67 2c 20 70 43 6f 6c 6c 29  st, pArg, pColl)
aa00: 3b 0a 20 20 20 20 69 66 28 20 28 6d 61 78 20 26  ;.    if( (max &
aa10: 26 20 63 6d 70 3c 30 29 20 7c 7c 20 28 21 6d 61  & cmp<0) || (!ma
aa20: 78 20 26 26 20 63 6d 70 3e 30 29 20 29 7b 0a 20  x && cmp>0) ){. 
aa30: 20 20 20 20 20 73 71 6c 69 74 65 33 56 64 62 65       sqlite3Vdbe
aa40: 4d 65 6d 43 6f 70 79 28 70 42 65 73 74 2c 20 70  MemCopy(pBest, p
aa50: 41 72 67 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b  Arg);.    }else{
aa60: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 53 6b  .      sqlite3Sk
aa70: 69 70 41 63 63 75 6d 75 6c 61 74 6f 72 4c 6f 61  ipAccumulatorLoa
aa80: 64 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  d(context);.    
aa90: 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73  }.  }else{.    s
aaa0: 71 6c 69 74 65 33 56 64 62 65 4d 65 6d 43 6f 70  qlite3VdbeMemCop
aab0: 79 28 70 42 65 73 74 2c 20 70 41 72 67 29 3b 0a  y(pBest, pArg);.
aac0: 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69    }.}.static voi
aad0: 64 20 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65  d minMaxFinalize
aae0: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
aaf0: 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 73 71   *context){.  sq
ab00: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 70 52 65  lite3_value *pRe
ab10: 73 3b 0a 20 20 70 52 65 73 20 3d 20 28 73 71 6c  s;.  pRes = (sql
ab20: 69 74 65 33 5f 76 61 6c 75 65 20 2a 29 73 71 6c  ite3_value *)sql
ab30: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
ab40: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
ab50: 30 29 3b 0a 20 20 69 66 28 20 70 52 65 73 20 29  0);.  if( pRes )
ab60: 7b 0a 20 20 20 20 69 66 28 20 70 52 65 73 2d 3e  {.    if( pRes->
ab70: 66 6c 61 67 73 20 29 7b 0a 20 20 20 20 20 20 73  flags ){.      s
ab80: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61  qlite3_result_va
ab90: 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 70 52 65  lue(context, pRe
aba0: 73 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71  s);.    }.    sq
abb0: 6c 69 74 65 33 56 64 62 65 4d 65 6d 52 65 6c 65  lite3VdbeMemRele
abc0: 61 73 65 28 70 52 65 73 29 3b 0a 20 20 7d 0a 7d  ase(pRes);.  }.}
abd0: 0a 0a 2f 2a 0a 2a 2a 20 67 72 6f 75 70 5f 63 6f  ../*.** group_co
abe0: 6e 63 61 74 28 45 58 50 52 2c 20 3f 53 45 50 41  ncat(EXPR, ?SEPA
abf0: 52 41 54 4f 52 3f 29 0a 2a 2f 0a 73 74 61 74 69  RATOR?).*/.stati
ac00: 63 20 76 6f 69 64 20 67 72 6f 75 70 43 6f 6e 63  c void groupConc
ac10: 61 74 53 74 65 70 28 0a 20 20 73 71 6c 69 74 65  atStep(.  sqlite
ac20: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
ac30: 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a  xt,.  int argc,.
ac40: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
ac50: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73  **argv.){.  cons
ac60: 74 20 63 68 61 72 20 2a 7a 56 61 6c 3b 0a 20 20  t char *zVal;.  
ac70: 53 74 72 41 63 63 75 6d 20 2a 70 41 63 63 75 6d  StrAccum *pAccum
ac80: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
ac90: 7a 53 65 70 3b 0a 20 20 69 6e 74 20 6e 56 61 6c  zSep;.  int nVal
aca0: 2c 20 6e 53 65 70 3b 0a 20 20 61 73 73 65 72 74  , nSep;.  assert
acb0: 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20 61 72 67  ( argc==1 || arg
acc0: 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20 73 71  c==2 );.  if( sq
acd0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
ace0: 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54  (argv[0])==SQLIT
acf0: 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b  E_NULL ) return;
ad00: 0a 20 20 70 41 63 63 75 6d 20 3d 20 28 53 74 72  .  pAccum = (Str
ad10: 41 63 63 75 6d 2a 29 73 71 6c 69 74 65 33 5f 61  Accum*)sqlite3_a
ad20: 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74  ggregate_context
ad30: 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66  (context, sizeof
ad40: 28 2a 70 41 63 63 75 6d 29 29 3b 0a 0a 20 20 69  (*pAccum));..  i
ad50: 66 28 20 70 41 63 63 75 6d 20 29 7b 0a 20 20 20  f( pAccum ){.   
ad60: 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73   sqlite3 *db = s
ad70: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
ad80: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
ad90: 29 3b 0a 20 20 20 20 69 6e 74 20 66 69 72 73 74  );.    int first
ada0: 54 65 72 6d 20 3d 20 70 41 63 63 75 6d 2d 3e 75  Term = pAccum->u
adb0: 73 65 4d 61 6c 6c 6f 63 3d 3d 30 3b 0a 20 20 20  seMalloc==0;.   
adc0: 20 70 41 63 63 75 6d 2d 3e 75 73 65 4d 61 6c 6c   pAccum->useMall
add0: 6f 63 20 3d 20 32 3b 0a 20 20 20 20 70 41 63 63  oc = 2;.    pAcc
ade0: 75 6d 2d 3e 6d 78 41 6c 6c 6f 63 20 3d 20 64 62  um->mxAlloc = db
adf0: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
ae00: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a 20  LIMIT_LENGTH];. 
ae10: 20 20 20 69 66 28 20 21 66 69 72 73 74 54 65 72     if( !firstTer
ae20: 6d 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20 61  m ){.      if( a
ae30: 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 20 20  rgc==2 ){.      
ae40: 20 20 7a 53 65 70 20 3d 20 28 63 68 61 72 2a 29    zSep = (char*)
ae50: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
ae60: 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20  xt(argv[1]);.   
ae70: 20 20 20 20 20 6e 53 65 70 20 3d 20 73 71 6c 69       nSep = sqli
ae80: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
ae90: 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 20 20  argv[1]);.      
aea0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 7a  }else{.        z
aeb0: 53 65 70 20 3d 20 22 2c 22 3b 0a 20 20 20 20 20  Sep = ",";.     
aec0: 20 20 20 6e 53 65 70 20 3d 20 31 3b 0a 20 20 20     nSep = 1;.   
aed0: 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20 6e     }.      if( n
aee0: 53 65 70 20 29 20 73 71 6c 69 74 65 33 53 74 72  Sep ) sqlite3Str
aef0: 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63  AccumAppend(pAcc
af00: 75 6d 2c 20 7a 53 65 70 2c 20 6e 53 65 70 29 3b  um, zSep, nSep);
af10: 0a 20 20 20 20 7d 0a 20 20 20 20 7a 56 61 6c 20  .    }.    zVal 
af20: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
af30: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
af40: 5b 30 5d 29 3b 0a 20 20 20 20 6e 56 61 6c 20 3d  [0]);.    nVal =
af50: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
af60: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
af70: 20 20 20 69 66 28 20 6e 56 61 6c 20 29 20 73 71     if( nVal ) sq
af80: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70  lite3StrAccumApp
af90: 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 56 61 6c  end(pAccum, zVal
afa0: 2c 20 6e 56 61 6c 29 3b 0a 20 20 7d 0a 7d 0a 73  , nVal);.  }.}.s
afb0: 74 61 74 69 63 20 76 6f 69 64 20 67 72 6f 75 70  tatic void group
afc0: 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 28 73  ConcatFinalize(s
afd0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
afe0: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 74 72 41  context){.  StrA
aff0: 63 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20  ccum *pAccum;.  
b000: 70 41 63 63 75 6d 20 3d 20 73 71 6c 69 74 65 33  pAccum = sqlite3
b010: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
b020: 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a  xt(context, 0);.
b030: 20 20 69 66 28 20 70 41 63 63 75 6d 20 29 7b 0a    if( pAccum ){.
b040: 20 20 20 20 69 66 28 20 70 41 63 63 75 6d 2d 3e      if( pAccum->
b050: 61 63 63 45 72 72 6f 72 3d 3d 53 54 52 41 43 43  accError==STRACC
b060: 55 4d 5f 54 4f 4f 42 49 47 20 29 7b 0a 20 20 20  UM_TOOBIG ){.   
b070: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
b080: 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63  t_error_toobig(c
b090: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c  ontext);.    }el
b0a0: 73 65 20 69 66 28 20 70 41 63 63 75 6d 2d 3e 61  se if( pAccum->a
b0b0: 63 63 45 72 72 6f 72 3d 3d 53 54 52 41 43 43 55  ccError==STRACCU
b0c0: 4d 5f 4e 4f 4d 45 4d 20 29 7b 0a 20 20 20 20 20  M_NOMEM ){.     
b0d0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
b0e0: 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74  error_nomem(cont
b0f0: 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b  ext);.    }else{
b100: 20 20 20 20 0a 20 20 20 20 20 20 73 71 6c 69 74      .      sqlit
b110: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
b120: 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 53  ontext, sqlite3S
b130: 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 70 41  trAccumFinish(pA
b140: 63 63 75 6d 29 2c 20 2d 31 2c 20 0a 20 20 20 20  ccum), -1, .    
b150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b160: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72        sqlite3_fr
b170: 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  ee);.    }.  }.}
b180: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75  ../*.** This rou
b190: 74 69 6e 65 20 64 6f 65 73 20 70 65 72 2d 63 6f  tine does per-co
b1a0: 6e 6e 65 63 74 69 6f 6e 20 66 75 6e 63 74 69 6f  nnection functio
b1b0: 6e 20 72 65 67 69 73 74 72 61 74 69 6f 6e 2e 20  n registration. 
b1c0: 20 4d 6f 73 74 0a 2a 2a 20 6f 66 20 74 68 65 20   Most.** of the 
b1d0: 62 75 69 6c 74 2d 69 6e 20 66 75 6e 63 74 69 6f  built-in functio
b1e0: 6e 73 20 61 62 6f 76 65 20 61 72 65 20 70 61 72  ns above are par
b1f0: 74 20 6f 66 20 74 68 65 20 67 6c 6f 62 61 6c 20  t of the global 
b200: 66 75 6e 63 74 69 6f 6e 20 73 65 74 2e 0a 2a 2a  function set..**
b210: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 6f 6e   This routine on
b220: 6c 79 20 64 65 61 6c 73 20 77 69 74 68 20 74 68  ly deals with th
b230: 6f 73 65 20 74 68 61 74 20 61 72 65 20 6e 6f 74  ose that are not
b240: 20 67 6c 6f 62 61 6c 2e 0a 2a 2f 0a 76 6f 69 64   global..*/.void
b250: 20 73 71 6c 69 74 65 33 52 65 67 69 73 74 65 72   sqlite3Register
b260: 42 75 69 6c 74 69 6e 46 75 6e 63 74 69 6f 6e 73  BuiltinFunctions
b270: 28 73 71 6c 69 74 65 33 20 2a 64 62 29 7b 0a 20  (sqlite3 *db){. 
b280: 20 69 6e 74 20 72 63 20 3d 20 73 71 6c 69 74 65   int rc = sqlite
b290: 33 5f 6f 76 65 72 6c 6f 61 64 5f 66 75 6e 63 74  3_overload_funct
b2a0: 69 6f 6e 28 64 62 2c 20 22 4d 41 54 43 48 22 2c  ion(db, "MATCH",
b2b0: 20 32 29 3b 0a 20 20 61 73 73 65 72 74 28 20 72   2);.  assert( r
b2c0: 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 20  c==SQLITE_NOMEM 
b2d0: 7c 7c 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b  || rc==SQLITE_OK
b2e0: 20 29 3b 0a 20 20 69 66 28 20 72 63 3d 3d 53 51   );.  if( rc==SQ
b2f0: 4c 49 54 45 5f 4e 4f 4d 45 4d 20 29 7b 0a 20 20  LITE_NOMEM ){.  
b300: 20 20 64 62 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c    db->mallocFail
b310: 65 64 20 3d 20 31 3b 0a 20 20 7d 0a 7d 0a 0a 2f  ed = 1;.  }.}../
b320: 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 4c 49 4b  *.** Set the LIK
b330: 45 4f 50 54 20 66 6c 61 67 20 6f 6e 20 74 68 65  EOPT flag on the
b340: 20 32 2d 61 72 67 75 6d 65 6e 74 20 66 75 6e 63   2-argument func
b350: 74 69 6f 6e 20 77 69 74 68 20 74 68 65 20 67 69  tion with the gi
b360: 76 65 6e 20 6e 61 6d 65 2e 0a 2a 2f 0a 73 74 61  ven name..*/.sta
b370: 74 69 63 20 76 6f 69 64 20 73 65 74 4c 69 6b 65  tic void setLike
b380: 4f 70 74 46 6c 61 67 28 73 71 6c 69 74 65 33 20  OptFlag(sqlite3 
b390: 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  *db, const char 
b3a0: 2a 7a 4e 61 6d 65 2c 20 75 38 20 66 6c 61 67 56  *zName, u8 flagV
b3b0: 61 6c 29 7b 0a 20 20 46 75 6e 63 44 65 66 20 2a  al){.  FuncDef *
b3c0: 70 44 65 66 3b 0a 20 20 70 44 65 66 20 3d 20 73  pDef;.  pDef = s
b3d0: 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69  qlite3FindFuncti
b3e0: 6f 6e 28 64 62 2c 20 7a 4e 61 6d 65 2c 20 73 71  on(db, zName, sq
b3f0: 6c 69 74 65 33 53 74 72 6c 65 6e 33 30 28 7a 4e  lite3Strlen30(zN
b400: 61 6d 65 29 2c 0a 20 20 20 20 20 20 20 20 20 20  ame),.          
b410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b420: 20 20 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46     2, SQLITE_UTF
b430: 38 2c 20 30 29 3b 0a 20 20 69 66 28 20 41 4c 57  8, 0);.  if( ALW
b440: 41 59 53 28 70 44 65 66 29 20 29 7b 0a 20 20 20  AYS(pDef) ){.   
b450: 20 70 44 65 66 2d 3e 66 75 6e 63 46 6c 61 67 73   pDef->funcFlags
b460: 20 7c 3d 20 66 6c 61 67 56 61 6c 3b 0a 20 20 7d   |= flagVal;.  }
b470: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 67 69 73 74  .}../*.** Regist
b480: 65 72 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20  er the built-in 
b490: 4c 49 4b 45 20 61 6e 64 20 47 4c 4f 42 20 66 75  LIKE and GLOB fu
b4a0: 6e 63 74 69 6f 6e 73 2e 20 20 54 68 65 20 63 61  nctions.  The ca
b4b0: 73 65 53 65 6e 73 69 74 69 76 65 0a 2a 2a 20 70  seSensitive.** p
b4c0: 61 72 61 6d 65 74 65 72 20 64 65 74 65 72 6d 69  arameter determi
b4d0: 6e 65 73 20 77 68 65 74 68 65 72 20 6f 72 20 6e  nes whether or n
b4e0: 6f 74 20 74 68 65 20 4c 49 4b 45 20 6f 70 65 72  ot the LIKE oper
b4f0: 61 74 6f 72 20 69 73 20 63 61 73 65 0a 2a 2a 20  ator is case.** 
b500: 73 65 6e 73 69 74 69 76 65 2e 20 20 47 4c 4f 42  sensitive.  GLOB
b510: 20 69 73 20 61 6c 77 61 79 73 20 63 61 73 65 20   is always case 
b520: 73 65 6e 73 69 74 69 76 65 2e 0a 2a 2f 0a 76 6f  sensitive..*/.vo
b530: 69 64 20 73 71 6c 69 74 65 33 52 65 67 69 73 74  id sqlite3Regist
b540: 65 72 4c 69 6b 65 46 75 6e 63 74 69 6f 6e 73 28  erLikeFunctions(
b550: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e 74  sqlite3 *db, int
b560: 20 63 61 73 65 53 65 6e 73 69 74 69 76 65 29 7b   caseSensitive){
b570: 0a 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72  .  struct compar
b580: 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 3b 0a 20 20  eInfo *pInfo;.  
b590: 69 66 28 20 63 61 73 65 53 65 6e 73 69 74 69 76  if( caseSensitiv
b5a0: 65 20 29 7b 0a 20 20 20 20 70 49 6e 66 6f 20 3d  e ){.    pInfo =
b5b0: 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65   (struct compare
b5c0: 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66 6f 41  Info*)&likeInfoA
b5d0: 6c 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  lt;.  }else{.   
b5e0: 20 70 49 6e 66 6f 20 3d 20 28 73 74 72 75 63 74   pInfo = (struct
b5f0: 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26 6c   compareInfo*)&l
b600: 69 6b 65 49 6e 66 6f 4e 6f 72 6d 3b 0a 20 20 7d  ikeInfoNorm;.  }
b610: 0a 20 20 73 71 6c 69 74 65 33 43 72 65 61 74 65  .  sqlite3Create
b620: 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b 65 22 2c  Func(db, "like",
b630: 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c   2, SQLITE_UTF8,
b640: 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e 63   pInfo, likeFunc
b650: 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73 71  , 0, 0, 0);.  sq
b660: 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e 63 28  lite3CreateFunc(
b670: 64 62 2c 20 22 6c 69 6b 65 22 2c 20 33 2c 20 53  db, "like", 3, S
b680: 51 4c 49 54 45 5f 55 54 46 38 2c 20 70 49 6e 66  QLITE_UTF8, pInf
b690: 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 20  o, likeFunc, 0, 
b6a0: 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33  0, 0);.  sqlite3
b6b0: 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c 20 22  CreateFunc(db, "
b6c0: 67 6c 6f 62 22 2c 20 32 2c 20 53 51 4c 49 54 45  glob", 2, SQLITE
b6d0: 5f 55 54 46 38 2c 20 0a 20 20 20 20 20 20 28 73  _UTF8, .      (s
b6e0: 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66  truct compareInf
b6f0: 6f 2a 29 26 67 6c 6f 62 49 6e 66 6f 2c 20 6c 69  o*)&globInfo, li
b700: 6b 65 46 75 6e 63 2c 20 30 2c 20 30 2c 20 30 29  keFunc, 0, 0, 0)
b710: 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c  ;.  setLikeOptFl
b720: 61 67 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20 53  ag(db, "glob", S
b730: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 20  QLITE_FUNC_LIKE 
b740: 7c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41  | SQLITE_FUNC_CA
b750: 53 45 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70  SE);.  setLikeOp
b760: 74 46 6c 61 67 28 64 62 2c 20 22 6c 69 6b 65 22  tFlag(db, "like"
b770: 2c 20 0a 20 20 20 20 20 20 63 61 73 65 53 65 6e  , .      caseSen
b780: 73 69 74 69 76 65 20 3f 20 28 53 51 4c 49 54 45  sitive ? (SQLITE
b790: 5f 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c  _FUNC_LIKE | SQL
b7a0: 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 20 3a  ITE_FUNC_CASE) :
b7b0: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b   SQLITE_FUNC_LIK
b7c0: 45 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 70 45 78  E);.}../*.** pEx
b7d0: 70 72 20 70 6f 69 6e 74 73 20 74 6f 20 61 6e 20  pr points to an 
b7e0: 65 78 70 72 65 73 73 69 6f 6e 20 77 68 69 63 68  expression which
b7f0: 20 69 6d 70 6c 65 6d 65 6e 74 73 20 61 20 66 75   implements a fu
b800: 6e 63 74 69 6f 6e 2e 20 20 49 66 0a 2a 2a 20 69  nction.  If.** i
b810: 74 20 69 73 20 61 70 70 72 6f 70 72 69 61 74 65  t is appropriate
b820: 20 74 6f 20 61 70 70 6c 79 20 74 68 65 20 4c 49   to apply the LI
b830: 4b 45 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 20  KE optimization 
b840: 74 6f 20 74 68 61 74 20 66 75 6e 63 74 69 6f 6e  to that function
b850: 0a 2a 2a 20 74 68 65 6e 20 73 65 74 20 61 57 63  .** then set aWc
b860: 5b 30 5d 20 74 68 72 6f 75 67 68 20 61 57 63 5b  [0] through aWc[
b870: 32 5d 20 74 6f 20 74 68 65 20 77 69 6c 64 63 61  2] to the wildca
b880: 72 64 20 63 68 61 72 61 63 74 65 72 73 20 61 6e  rd characters an
b890: 64 0a 2a 2a 20 72 65 74 75 72 6e 20 54 52 55 45  d.** return TRUE
b8a0: 2e 20 20 49 66 20 74 68 65 20 66 75 6e 63 74 69  .  If the functi
b8b0: 6f 6e 20 69 73 20 6e 6f 74 20 61 20 4c 49 4b 45  on is not a LIKE
b8c0: 2d 73 74 79 6c 65 20 66 75 6e 63 74 69 6f 6e 20  -style function 
b8d0: 74 68 65 6e 0a 2a 2a 20 72 65 74 75 72 6e 20 46  then.** return F
b8e0: 41 4c 53 45 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  ALSE..*/.int sql
b8f0: 69 74 65 33 49 73 4c 69 6b 65 46 75 6e 63 74 69  ite3IsLikeFuncti
b900: 6f 6e 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20  on(sqlite3 *db, 
b910: 45 78 70 72 20 2a 70 45 78 70 72 2c 20 69 6e 74  Expr *pExpr, int
b920: 20 2a 70 49 73 4e 6f 63 61 73 65 2c 20 63 68 61   *pIsNocase, cha
b930: 72 20 2a 61 57 63 29 7b 0a 20 20 46 75 6e 63 44  r *aWc){.  FuncD
b940: 65 66 20 2a 70 44 65 66 3b 0a 20 20 69 66 28 20  ef *pDef;.  if( 
b950: 70 45 78 70 72 2d 3e 6f 70 21 3d 54 4b 5f 46 55  pExpr->op!=TK_FU
b960: 4e 43 54 49 4f 4e 20 0a 20 20 20 7c 7c 20 21 70  NCTION .   || !p
b970: 45 78 70 72 2d 3e 78 2e 70 4c 69 73 74 20 0a 20  Expr->x.pList . 
b980: 20 20 7c 7c 20 70 45 78 70 72 2d 3e 78 2e 70 4c    || pExpr->x.pL
b990: 69 73 74 2d 3e 6e 45 78 70 72 21 3d 32 0a 20 20  ist->nExpr!=2.  
b9a0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b  ){.    return 0;
b9b0: 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 21  .  }.  assert( !
b9c0: 45 78 70 72 48 61 73 50 72 6f 70 65 72 74 79 28  ExprHasProperty(
b9d0: 70 45 78 70 72 2c 20 45 50 5f 78 49 73 53 65 6c  pExpr, EP_xIsSel
b9e0: 65 63 74 29 20 29 3b 0a 20 20 70 44 65 66 20 3d  ect) );.  pDef =
b9f0: 20 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63   sqlite3FindFunc
ba00: 74 69 6f 6e 28 64 62 2c 20 70 45 78 70 72 2d 3e  tion(db, pExpr->
ba10: 75 2e 7a 54 6f 6b 65 6e 2c 20 0a 20 20 20 20 20  u.zToken, .     
ba20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ba30: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 53          sqlite3S
ba40: 74 72 6c 65 6e 33 30 28 70 45 78 70 72 2d 3e 75  trlen30(pExpr->u
ba50: 2e 7a 54 6f 6b 65 6e 29 2c 0a 20 20 20 20 20 20  .zToken),.      
ba60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ba70: 20 20 20 20 20 20 20 32 2c 20 53 51 4c 49 54 45         2, SQLITE
ba80: 5f 55 54 46 38 2c 20 30 29 3b 0a 20 20 69 66 28  _UTF8, 0);.  if(
ba90: 20 4e 45 56 45 52 28 70 44 65 66 3d 3d 30 29 20   NEVER(pDef==0) 
baa0: 7c 7c 20 28 70 44 65 66 2d 3e 66 75 6e 63 46 6c  || (pDef->funcFl
bab0: 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e  ags & SQLITE_FUN
bac0: 43 5f 4c 49 4b 45 29 3d 3d 30 20 29 7b 0a 20 20  C_LIKE)==0 ){.  
bad0: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a    return 0;.  }.
bae0: 0a 20 20 2f 2a 20 54 68 65 20 6d 65 6d 63 70 79  .  /* The memcpy
baf0: 28 29 20 73 74 61 74 65 6d 65 6e 74 20 61 73 73  () statement ass
bb00: 75 6d 65 73 20 74 68 61 74 20 74 68 65 20 77 69  umes that the wi
bb10: 6c 64 63 61 72 64 20 63 68 61 72 61 63 74 65 72  ldcard character
bb20: 73 20 61 72 65 0a 20 20 2a 2a 20 74 68 65 20 66  s are.  ** the f
bb30: 69 72 73 74 20 74 68 72 65 65 20 73 74 61 74 65  irst three state
bb40: 6d 65 6e 74 73 20 69 6e 20 74 68 65 20 63 6f 6d  ments in the com
bb50: 70 61 72 65 49 6e 66 6f 20 73 74 72 75 63 74 75  pareInfo structu
bb60: 72 65 2e 20 20 54 68 65 0a 20 20 2a 2a 20 61 73  re.  The.  ** as
bb70: 73 65 72 74 73 28 29 20 74 68 61 74 20 66 6f 6c  serts() that fol
bb80: 6c 6f 77 20 76 65 72 69 66 79 20 74 68 61 74 20  low verify that 
bb90: 61 73 73 75 6d 70 74 69 6f 6e 0a 20 20 2a 2f 0a  assumption.  */.
bba0: 20 20 6d 65 6d 63 70 79 28 61 57 63 2c 20 70 44    memcpy(aWc, pD
bbb0: 65 66 2d 3e 70 55 73 65 72 44 61 74 61 2c 20 33  ef->pUserData, 3
bbc0: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 28 63 68  );.  assert( (ch
bbd0: 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74  ar*)&likeInfoAlt
bbe0: 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65   == (char*)&like
bbf0: 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 41 6c 6c  InfoAlt.matchAll
bc00: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28   );.  assert( &(
bc10: 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f  (char*)&likeInfo
bc20: 41 6c 74 29 5b 31 5d 20 3d 3d 20 28 63 68 61 72  Alt)[1] == (char
bc30: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d  *)&likeInfoAlt.m
bc40: 61 74 63 68 4f 6e 65 20 29 3b 0a 20 20 61 73 73  atchOne );.  ass
bc50: 65 72 74 28 20 26 28 28 63 68 61 72 2a 29 26 6c  ert( &((char*)&l
bc60: 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 32 5d 20 3d  ikeInfoAlt)[2] =
bc70: 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e  = (char*)&likeIn
bc80: 66 6f 41 6c 74 2e 6d 61 74 63 68 53 65 74 20 29  foAlt.matchSet )
bc90: 3b 0a 20 20 2a 70 49 73 4e 6f 63 61 73 65 20 3d  ;.  *pIsNocase =
bca0: 20 28 70 44 65 66 2d 3e 66 75 6e 63 46 6c 61 67   (pDef->funcFlag
bcb0: 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  s & SQLITE_FUNC_
bcc0: 43 41 53 45 29 3d 3d 30 3b 0a 20 20 72 65 74 75  CASE)==0;.  retu
bcd0: 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41  rn 1;.}../*.** A
bce0: 6c 6c 20 61 6c 6c 20 6f 66 20 74 68 65 20 46 75  ll all of the Fu
bcf0: 6e 63 44 65 66 20 73 74 72 75 63 74 75 72 65 73  ncDef structures
bd00: 20 69 6e 20 74 68 65 20 61 42 75 69 6c 74 69 6e   in the aBuiltin
bd10: 46 75 6e 63 5b 5d 20 61 72 72 61 79 20 61 62 6f  Func[] array abo
bd20: 76 65 0a 2a 2a 20 74 6f 20 74 68 65 20 67 6c 6f  ve.** to the glo
bd30: 62 61 6c 20 66 75 6e 63 74 69 6f 6e 20 68 61 73  bal function has
bd40: 68 20 74 61 62 6c 65 2e 20 20 54 68 69 73 20 6f  h table.  This o
bd50: 63 63 75 72 73 20 61 74 20 73 74 61 72 74 2d 74  ccurs at start-t
bd60: 69 6d 65 20 28 61 73 0a 2a 2a 20 61 20 63 6f 6e  ime (as.** a con
bd70: 73 65 71 75 65 6e 63 65 20 6f 66 20 63 61 6c 6c  sequence of call
bd80: 69 6e 67 20 73 71 6c 69 74 65 33 5f 69 6e 69 74  ing sqlite3_init
bd90: 69 61 6c 69 7a 65 28 29 29 2e 0a 2a 2a 0a 2a 2a  ialize())..**.**
bda0: 20 41 66 74 65 72 20 74 68 69 73 20 72 6f 75 74   After this rout
bdb0: 69 6e 65 20 72 75 6e 73 0a 2a 2f 0a 76 6f 69 64  ine runs.*/.void
bdc0: 20 73 71 6c 69 74 65 33 52 65 67 69 73 74 65 72   sqlite3Register
bdd0: 47 6c 6f 62 61 6c 46 75 6e 63 74 69 6f 6e 73 28  GlobalFunctions(
bde0: 76 6f 69 64 29 7b 0a 20 20 2f 2a 0a 20 20 2a 2a  void){.  /*.  **
bdf0: 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 61   The following a
be00: 72 72 61 79 20 68 6f 6c 64 73 20 46 75 6e 63 44  rray holds FuncD
be10: 65 66 20 73 74 72 75 63 74 75 72 65 73 20 66 6f  ef structures fo
be20: 72 20 61 6c 6c 20 6f 66 20 74 68 65 20 66 75 6e  r all of the fun
be30: 63 74 69 6f 6e 73 0a 20 20 2a 2a 20 64 65 66 69  ctions.  ** defi
be40: 6e 65 64 20 69 6e 20 74 68 69 73 20 66 69 6c 65  ned in this file
be50: 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 68 65 20  ..  **.  ** The 
be60: 61 72 72 61 79 20 63 61 6e 6e 6f 74 20 62 65 20  array cannot be 
be70: 63 6f 6e 73 74 61 6e 74 20 73 69 6e 63 65 20 63  constant since c
be80: 68 61 6e 67 65 73 20 61 72 65 20 6d 61 64 65 20  hanges are made 
be90: 74 6f 20 74 68 65 0a 20 20 2a 2a 20 46 75 6e 63  to the.  ** Func
bea0: 44 65 66 2e 70 48 61 73 68 20 65 6c 65 6d 65 6e  Def.pHash elemen
beb0: 74 73 20 61 74 20 73 74 61 72 74 2d 74 69 6d 65  ts at start-time
bec0: 2e 20 20 54 68 65 20 65 6c 65 6d 65 6e 74 73 20  .  The elements 
bed0: 6f 66 20 74 68 69 73 20 61 72 72 61 79 0a 20 20  of this array.  
bee0: 2a 2a 20 61 72 65 20 72 65 61 64 2d 6f 6e 6c 79  ** are read-only
bef0: 20 61 66 74 65 72 20 69 6e 69 74 69 61 6c 69 7a   after initializ
bf00: 61 74 69 6f 6e 20 69 73 20 63 6f 6d 70 6c 65 74  ation is complet
bf10: 65 2e 0a 20 20 2a 2f 0a 20 20 73 74 61 74 69 63  e..  */.  static
bf20: 20 53 51 4c 49 54 45 5f 57 53 44 20 46 75 6e 63   SQLITE_WSD Func
bf30: 44 65 66 20 61 42 75 69 6c 74 69 6e 46 75 6e 63  Def aBuiltinFunc
bf40: 5b 5d 20 3d 20 7b 0a 20 20 20 20 46 55 4e 43 54  [] = {.    FUNCT
bf50: 49 4f 4e 28 6c 74 72 69 6d 2c 20 20 20 20 20 20  ION(ltrim,      
bf60: 20 20 20 20 20 20 20 20 31 2c 20 31 2c 20 30 2c          1, 1, 0,
bf70: 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20   trimFunc       
bf80: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
bf90: 4e 28 6c 74 72 69 6d 2c 20 20 20 20 20 20 20 20  N(ltrim,        
bfa0: 20 20 20 20 20 20 32 2c 20 31 2c 20 30 2c 20 74        2, 1, 0, t
bfb0: 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20  rimFunc         
bfc0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
bfd0: 72 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20  rtrim,          
bfe0: 20 20 20 20 31 2c 20 32 2c 20 30 2c 20 74 72 69      1, 2, 0, tri
bff0: 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c  mFunc         ),
c000: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 74  .    FUNCTION(rt
c010: 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  rim,            
c020: 20 20 32 2c 20 32 2c 20 30 2c 20 74 72 69 6d 46    2, 2, 0, trimF
c030: 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20  unc         ),. 
c040: 20 20 20 46 55 4e 43 54 49 4f 4e 28 74 72 69 6d     FUNCTION(trim
c050: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
c060: 31 2c 20 33 2c 20 30 2c 20 74 72 69 6d 46 75 6e  1, 3, 0, trimFun
c070: 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20  c         ),.   
c080: 20 46 55 4e 43 54 49 4f 4e 28 74 72 69 6d 2c 20   FUNCTION(trim, 
c090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c                2,
c0a0: 20 33 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20   3, 0, trimFunc 
c0b0: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
c0c0: 55 4e 43 54 49 4f 4e 28 6d 69 6e 2c 20 20 20 20  UNCTION(min,    
c0d0: 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 30             -1, 0
c0e0: 2c 20 31 2c 20 6d 69 6e 6d 61 78 46 75 6e 63 20  , 1, minmaxFunc 
c0f0: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
c100: 43 54 49 4f 4e 28 6d 69 6e 2c 20 20 20 20 20 20  CTION(min,      
c110: 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20            0, 0, 
c120: 31 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20  1, 0            
c130: 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45      ),.    AGGRE
c140: 47 41 54 45 28 6d 69 6e 2c 20 20 20 20 20 20 20  GATE(min,       
c150: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 31 2c          1, 0, 1,
c160: 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20 20 20 20   minmaxStep,    
c170: 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65    minMaxFinalize
c180: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c190: 28 6d 61 78 2c 20 20 20 20 20 20 20 20 20 20 20  (max,           
c1a0: 20 20 20 20 2d 31 2c 20 31 2c 20 31 2c 20 6d 69      -1, 1, 1, mi
c1b0: 6e 6d 61 78 46 75 6e 63 20 20 20 20 20 20 20 29  nmaxFunc       )
c1c0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d  ,.    FUNCTION(m
c1d0: 61 78 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  ax,             
c1e0: 20 20 20 30 2c 20 31 2c 20 31 2c 20 30 20 20 20     0, 1, 1, 0   
c1f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a               ),.
c200: 20 20 20 20 41 47 47 52 45 47 41 54 45 28 6d 61      AGGREGATE(ma
c210: 78 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  x,              
c220: 20 31 2c 20 31 2c 20 31 2c 20 6d 69 6e 6d 61 78   1, 1, 1, minmax
c230: 53 74 65 70 2c 20 20 20 20 20 20 6d 69 6e 4d 61  Step,      minMa
c240: 78 46 69 6e 61 6c 69 7a 65 20 29 2c 0a 20 20 20  xFinalize ),.   
c250: 20 46 55 4e 43 54 49 4f 4e 32 28 74 79 70 65 6f   FUNCTION2(typeo
c260: 66 2c 20 20 20 20 20 20 20 20 20 20 20 20 31 2c  f,            1,
c270: 20 30 2c 20 30 2c 20 74 79 70 65 6f 66 46 75 6e   0, 0, typeofFun
c280: 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  c,  SQLITE_FUNC_
c290: 54 59 50 45 4f 46 29 2c 0a 20 20 20 20 46 55 4e  TYPEOF),.    FUN
c2a0: 43 54 49 4f 4e 32 28 6c 65 6e 67 74 68 2c 20 20  CTION2(length,  
c2b0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
c2c0: 30 2c 20 6c 65 6e 67 74 68 46 75 6e 63 2c 20 20  0, lengthFunc,  
c2d0: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 45 4e 47  SQLITE_FUNC_LENG
c2e0: 54 48 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f  TH),.    FUNCTIO
c2f0: 4e 28 69 6e 73 74 72 2c 20 20 20 20 20 20 20 20  N(instr,        
c300: 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 69        2, 0, 0, i
c310: 6e 73 74 72 46 75 6e 63 20 20 20 20 20 20 20 20  nstrFunc        
c320: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
c330: 73 75 62 73 74 72 2c 20 20 20 20 20 20 20 20 20  substr,         
c340: 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 73 75 62      2, 0, 0, sub
c350: 73 74 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c  strFunc       ),
c360: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 75  .    FUNCTION(su
c370: 62 73 74 72 2c 20 20 20 20 20 20 20 20 20 20 20  bstr,           
c380: 20 20 33 2c 20 30 2c 20 30 2c 20 73 75 62 73 74    3, 0, 0, subst
c390: 72 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20  rFunc       ),. 
c3a0: 20 20 20 46 55 4e 43 54 49 4f 4e 28 70 72 69 6e     FUNCTION(prin
c3b0: 74 66 2c 20 20 20 20 20 20 20 20 20 20 20 20 2d  tf,            -
c3c0: 31 2c 20 30 2c 20 30 2c 20 70 72 69 6e 74 66 46  1, 0, 0, printfF
c3d0: 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20  unc       ),.   
c3e0: 20 46 55 4e 43 54 49 4f 4e 28 75 6e 69 63 6f 64   FUNCTION(unicod
c3f0: 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 31 2c  e,            1,
c400: 20 30 2c 20 30 2c 20 75 6e 69 63 6f 64 65 46 75   0, 0, unicodeFu
c410: 6e 63 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46  nc      ),.    F
c420: 55 4e 43 54 49 4f 4e 28 63 68 61 72 2c 20 20 20  UNCTION(char,   
c430: 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 30             -1, 0
c440: 2c 20 30 2c 20 63 68 61 72 46 75 6e 63 20 20 20  , 0, charFunc   
c450: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
c460: 43 54 49 4f 4e 28 61 62 73 2c 20 20 20 20 20 20  CTION(abs,      
c470: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
c480: 30 2c 20 61 62 73 46 75 6e 63 20 20 20 20 20 20  0, absFunc      
c490: 20 20 20 20 29 2c 0a 23 69 66 6e 64 65 66 20 53      ),.#ifndef S
c4a0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54  QLITE_OMIT_FLOAT
c4b0: 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20 46 55  ING_POINT.    FU
c4c0: 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20  NCTION(round,   
c4d0: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
c4e0: 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20   0, roundFunc   
c4f0: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c500: 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20 20 20 20  TION(round,     
c510: 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30           2, 0, 0
c520: 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20 20 20 20  , roundFunc     
c530: 20 20 20 29 2c 0a 23 65 6e 64 69 66 0a 20 20 20     ),.#endif.   
c540: 20 46 55 4e 43 54 49 4f 4e 28 75 70 70 65 72 2c   FUNCTION(upper,
c550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
c560: 20 30 2c 20 30 2c 20 75 70 70 65 72 46 75 6e 63   0, 0, upperFunc
c570: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
c580: 55 4e 43 54 49 4f 4e 28 6c 6f 77 65 72 2c 20 20  UNCTION(lower,  
c590: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
c5a0: 2c 20 30 2c 20 6c 6f 77 65 72 46 75 6e 63 20 20  , 0, lowerFunc  
c5b0: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
c5c0: 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20  CTION(coalesce, 
c5d0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
c5e0: 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20  0, 0            
c5f0: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
c600: 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20 20  ION(coalesce,   
c610: 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c          0, 0, 0,
c620: 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20   0              
c630: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
c640: 4e 32 28 63 6f 61 6c 65 73 63 65 2c 20 20 20 20  N2(coalesce,    
c650: 20 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c 20 6e       -1, 0, 0, n
c660: 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49 54 45  oopFunc,  SQLITE
c670: 5f 46 55 4e 43 5f 43 4f 41 4c 45 53 43 45 29 2c  _FUNC_COALESCE),
c680: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 68 65  .    FUNCTION(he
c690: 78 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  x,              
c6a0: 20 20 31 2c 20 30 2c 20 30 2c 20 68 65 78 46 75    1, 0, 0, hexFu
c6b0: 6e 63 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20  nc          ),. 
c6c0: 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 69 66 6e     FUNCTION2(ifn
c6d0: 75 6c 6c 2c 20 20 20 20 20 20 20 20 20 20 20 20  ull,            
c6e0: 32 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e  2, 0, 0, noopFun
c6f0: 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  c,  SQLITE_FUNC_
c700: 43 4f 41 4c 45 53 43 45 29 2c 0a 20 20 20 20 46  COALESCE),.    F
c710: 55 4e 43 54 49 4f 4e 32 28 75 6e 6c 69 6b 65 6c  UNCTION2(unlikel
c720: 79 2c 20 20 20 20 20 20 20 20 20 20 31 2c 20 30  y,          1, 0
c730: 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e 63 2c 20 20  , 0, noopFunc,  
c740: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 55 4e 4c 49  SQLITE_FUNC_UNLI
c750: 4b 45 4c 59 29 2c 0a 20 20 20 20 46 55 4e 43 54  KELY),.    FUNCT
c760: 49 4f 4e 32 28 6c 69 6b 65 6c 69 68 6f 6f 64 2c  ION2(likelihood,
c770: 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c          2, 0, 0,
c780: 20 6e 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49   noopFunc,  SQLI
c790: 54 45 5f 46 55 4e 43 5f 55 4e 4c 49 4b 45 4c 59  TE_FUNC_UNLIKELY
c7a0: 29 2c 0a 20 20 20 20 56 46 55 4e 43 54 49 4f 4e  ),.    VFUNCTION
c7b0: 28 72 61 6e 64 6f 6d 2c 20 20 20 20 20 20 20 20  (random,        
c7c0: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 72 61 6e      0, 0, 0, ran
c7d0: 64 6f 6d 46 75 6e 63 20 20 20 20 20 20 20 29 2c  domFunc       ),
c7e0: 0a 20 20 20 20 56 46 55 4e 43 54 49 4f 4e 28 72  .    VFUNCTION(r
c7f0: 61 6e 64 6f 6d 62 6c 6f 62 2c 20 20 20 20 20 20  andomblob,      
c800: 20 20 31 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f    1, 0, 0, rando
c810: 6d 42 6c 6f 62 20 20 20 20 20 20 20 29 2c 0a 20  mBlob       ),. 
c820: 20 20 20 46 55 4e 43 54 49 4f 4e 28 6e 75 6c 6c     FUNCTION(null
c830: 69 66 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  if,             
c840: 32 2c 20 30 2c 20 31 2c 20 6e 75 6c 6c 69 66 46  2, 0, 1, nullifF
c850: 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20  unc       ),.   
c860: 20 46 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65   FUNCTION(sqlite
c870: 5f 76 65 72 73 69 6f 6e 2c 20 20 20 20 20 30 2c  _version,     0,
c880: 20 30 2c 20 30 2c 20 76 65 72 73 69 6f 6e 46 75   0, 0, versionFu
c890: 6e 63 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46  nc      ),.    F
c8a0: 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 73  UNCTION(sqlite_s
c8b0: 6f 75 72 63 65 5f 69 64 2c 20 20 20 30 2c 20 30  ource_id,   0, 0
c8c0: 2c 20 30 2c 20 73 6f 75 72 63 65 69 64 46 75 6e  , 0, sourceidFun
c8d0: 63 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e  c     ),.    FUN
c8e0: 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 6c 6f 67  CTION(sqlite_log
c8f0: 2c 20 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20  ,         2, 0, 
c900: 30 2c 20 65 72 72 6c 6f 67 46 75 6e 63 20 20 20  0, errlogFunc   
c910: 20 20 20 20 29 2c 0a 23 69 66 6e 64 65 66 20 53      ),.#ifndef S
c920: 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49  QLITE_OMIT_COMPI
c930: 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 0a 20  LEOPTION_DIAGS. 
c940: 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 71 6c 69     FUNCTION(sqli
c950: 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  te_compileoption
c960: 5f 75 73 65 64 2c 31 2c 20 30 2c 20 30 2c 20 63  _used,1, 0, 0, c
c970: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73 65 64  ompileoptionused
c980: 46 75 6e 63 20 20 29 2c 0a 20 20 20 20 46 55 4e  Func  ),.    FUN
c990: 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d  CTION(sqlite_com
c9a0: 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 2c 20  pileoption_get, 
c9b0: 31 2c 20 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65  1, 0, 0, compile
c9c0: 6f 70 74 69 6f 6e 67 65 74 46 75 6e 63 20 20 29  optiongetFunc  )
c9d0: 2c 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49  ,.#endif /* SQLI
c9e0: 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f  TE_OMIT_COMPILEO
c9f0: 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 20  PTION_DIAGS */. 
ca00: 20 20 20 46 55 4e 43 54 49 4f 4e 28 71 75 6f 74     FUNCTION(quot
ca10: 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  e,              
ca20: 31 2c 20 30 2c 20 30 2c 20 71 75 6f 74 65 46 75  1, 0, 0, quoteFu
ca30: 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20  nc        ),.   
ca40: 20 56 46 55 4e 43 54 49 4f 4e 28 6c 61 73 74 5f   VFUNCTION(last_
ca50: 69 6e 73 65 72 74 5f 72 6f 77 69 64 2c 20 30 2c  insert_rowid, 0,
ca60: 20 30 2c 20 30 2c 20 6c 61 73 74 5f 69 6e 73 65   0, 0, last_inse
ca70: 72 74 5f 72 6f 77 69 64 29 2c 0a 20 20 20 20 56  rt_rowid),.    V
ca80: 46 55 4e 43 54 49 4f 4e 28 63 68 61 6e 67 65 73  FUNCTION(changes
ca90: 2c 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 30  ,           0, 0
caa0: 2c 20 30 2c 20 63 68 61 6e 67 65 73 20 20 20 20  , 0, changes    
cab0: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 56 46 55        ),.    VFU
cac0: 4e 43 54 49 4f 4e 28 74 6f 74 61 6c 5f 63 68 61  NCTION(total_cha
cad0: 6e 67 65 73 2c 20 20 20 20 20 30 2c 20 30 2c 20  nges,     0, 0, 
cae0: 30 2c 20 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73  0, total_changes
caf0: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
cb00: 49 4f 4e 28 72 65 70 6c 61 63 65 2c 20 20 20 20  ION(replace,    
cb10: 20 20 20 20 20 20 20 20 33 2c 20 30 2c 20 30 2c          3, 0, 0,
cb20: 20 72 65 70 6c 61 63 65 46 75 6e 63 20 20 20 20   replaceFunc    
cb30: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
cb40: 4e 28 7a 65 72 6f 62 6c 6f 62 2c 20 20 20 20 20  N(zeroblob,     
cb50: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 7a        1, 0, 0, z
cb60: 65 72 6f 62 6c 6f 62 46 75 6e 63 20 20 20 20 20  eroblobFunc     
cb70: 29 2c 0a 20 20 23 69 66 64 65 66 20 53 51 4c 49  ),.  #ifdef SQLI
cb80: 54 45 5f 53 4f 55 4e 44 45 58 0a 20 20 20 20 46  TE_SOUNDEX.    F
cb90: 55 4e 43 54 49 4f 4e 28 73 6f 75 6e 64 65 78 2c  UNCTION(soundex,
cba0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
cbb0: 2c 20 30 2c 20 73 6f 75 6e 64 65 78 46 75 6e 63  , 0, soundexFunc
cbc0: 20 20 20 20 20 20 29 2c 0a 20 20 23 65 6e 64 69        ),.  #endi
cbd0: 66 0a 20 20 23 69 66 6e 64 65 66 20 53 51 4c 49  f.  #ifndef SQLI
cbe0: 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45 58 54  TE_OMIT_LOAD_EXT
cbf0: 45 4e 53 49 4f 4e 0a 20 20 20 20 46 55 4e 43 54  ENSION.    FUNCT
cc00: 49 4f 4e 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69  ION(load_extensi
cc10: 6f 6e 2c 20 20 20 20 20 31 2c 20 30 2c 20 30 2c  on,     1, 0, 0,
cc20: 20 6c 6f 61 64 45 78 74 20 20 20 20 20 20 20 20   loadExt        
cc30: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
cc40: 4e 28 6c 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e  N(load_extension
cc50: 2c 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 6c  ,     2, 0, 0, l
cc60: 6f 61 64 45 78 74 20 20 20 20 20 20 20 20 20 20  oadExt          
cc70: 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 20 20  ),.  #endif.    
cc80: 41 47 47 52 45 47 41 54 45 28 73 75 6d 2c 20 20  AGGREGATE(sum,  
cc90: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
cca0: 30 2c 20 30 2c 20 73 75 6d 53 74 65 70 2c 20 20  0, 0, sumStep,  
ccb0: 20 20 20 20 20 20 20 73 75 6d 46 69 6e 61 6c 69         sumFinali
ccc0: 7a 65 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47  ze    ),.    AGG
ccd0: 52 45 47 41 54 45 28 74 6f 74 61 6c 2c 20 20 20  REGATE(total,   
cce0: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
ccf0: 30 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20  0, sumStep,     
cd00: 20 20 20 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a      totalFinaliz
cd10: 65 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52  e    ),.    AGGR
cd20: 45 47 41 54 45 28 61 76 67 2c 20 20 20 20 20 20  EGATE(avg,      
cd30: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
cd40: 2c 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20  , sumStep,      
cd50: 20 20 20 61 76 67 46 69 6e 61 6c 69 7a 65 20 20     avgFinalize  
cd60: 20 20 29 2c 0a 20 2f 2a 20 41 47 47 52 45 47 41    ),. /* AGGREGA
cd70: 54 45 28 63 6f 75 6e 74 2c 20 20 20 20 20 20 20  TE(count,       
cd80: 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 63        0, 0, 0, c
cd90: 6f 75 6e 74 53 74 65 70 2c 20 20 20 20 20 20 20  ountStep,       
cda0: 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20 29  countFinalize  )
cdb0: 2c 20 2a 2f 0a 20 20 20 20 7b 30 2c 53 51 4c 49  , */.    {0,SQLI
cdc0: 54 45 5f 55 54 46 38 7c 53 51 4c 49 54 45 5f 46  TE_UTF8|SQLITE_F
cdd0: 55 4e 43 5f 43 4f 55 4e 54 2c 30 2c 30 2c 30 2c  UNC_COUNT,0,0,0,
cde0: 63 6f 75 6e 74 53 74 65 70 2c 63 6f 75 6e 74 46  countStep,countF
cdf0: 69 6e 61 6c 69 7a 65 2c 22 63 6f 75 6e 74 22 2c  inalize,"count",
ce00: 30 2c 30 7d 2c 0a 20 20 20 20 41 47 47 52 45 47  0,0},.    AGGREG
ce10: 41 54 45 28 63 6f 75 6e 74 2c 20 20 20 20 20 20  ATE(count,      
ce20: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
ce30: 63 6f 75 6e 74 53 74 65 70 2c 20 20 20 20 20 20  countStep,      
ce40: 20 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20   countFinalize  
ce50: 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  ),.    AGGREGATE
ce60: 28 67 72 6f 75 70 5f 63 6f 6e 63 61 74 2c 20 20  (group_concat,  
ce70: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 67 72 6f      1, 0, 0, gro
ce80: 75 70 43 6f 6e 63 61 74 53 74 65 70 2c 20 67 72  upConcatStep, gr
ce90: 6f 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a  oupConcatFinaliz
cea0: 65 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54  e),.    AGGREGAT
ceb0: 45 28 67 72 6f 75 70 5f 63 6f 6e 63 61 74 2c 20  E(group_concat, 
cec0: 20 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 67 72       2, 0, 0, gr
ced0: 6f 75 70 43 6f 6e 63 61 74 53 74 65 70 2c 20 67  oupConcatStep, g
cee0: 72 6f 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69  roupConcatFinali
cef0: 7a 65 29 2c 0a 20 20 0a 20 20 20 20 4c 49 4b 45  ze),.  .    LIKE
cf00: 46 55 4e 43 28 67 6c 6f 62 2c 20 32 2c 20 26 67  FUNC(glob, 2, &g
cf10: 6c 6f 62 49 6e 66 6f 2c 20 53 51 4c 49 54 45 5f  lobInfo, SQLITE_
cf20: 46 55 4e 43 5f 4c 49 4b 45 7c 53 51 4c 49 54 45  FUNC_LIKE|SQLITE
cf30: 5f 46 55 4e 43 5f 43 41 53 45 29 2c 0a 20 20 23  _FUNC_CASE),.  #
cf40: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 43 41 53  ifdef SQLITE_CAS
cf50: 45 5f 53 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45  E_SENSITIVE_LIKE
cf60: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
cf70: 6b 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 2, &likeInfo
cf80: 41 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43  Alt, SQLITE_FUNC
cf90: 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e  _LIKE|SQLITE_FUN
cfa0: 43 5f 43 41 53 45 29 2c 0a 20 20 20 20 4c 49 4b  C_CASE),.    LIK
cfb0: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26  EFUNC(like, 3, &
cfc0: 6c 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c  likeInfoAlt, SQL
cfd0: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51  ITE_FUNC_LIKE|SQ
cfe0: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c  LITE_FUNC_CASE),
cff0: 0a 20 20 23 65 6c 73 65 0a 20 20 20 20 4c 49 4b  .  #else.    LIK
d000: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26  EFUNC(like, 2, &
d010: 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51  likeInfoNorm, SQ
d020: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c  LITE_FUNC_LIKE),
d030: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
d040: 6b 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 3, &likeInfo
d050: 4e 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e  Norm, SQLITE_FUN
d060: 43 5f 4c 49 4b 45 29 2c 0a 20 20 23 65 6e 64 69  C_LIKE),.  #endi
d070: 66 0a 20 20 7d 3b 0a 0a 20 20 69 6e 74 20 69 3b  f.  };..  int i;
d080: 0a 20 20 46 75 6e 63 44 65 66 48 61 73 68 20 2a  .  FuncDefHash *
d090: 70 48 61 73 68 20 3d 20 26 47 4c 4f 42 41 4c 28  pHash = &GLOBAL(
d0a0: 46 75 6e 63 44 65 66 48 61 73 68 2c 20 73 71 6c  FuncDefHash, sql
d0b0: 69 74 65 33 47 6c 6f 62 61 6c 46 75 6e 63 74 69  ite3GlobalFuncti
d0c0: 6f 6e 73 29 3b 0a 20 20 46 75 6e 63 44 65 66 20  ons);.  FuncDef 
d0d0: 2a 61 46 75 6e 63 20 3d 20 28 46 75 6e 63 44 65  *aFunc = (FuncDe
d0e0: 66 2a 29 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44  f*)&GLOBAL(FuncD
d0f0: 65 66 2c 20 61 42 75 69 6c 74 69 6e 46 75 6e 63  ef, aBuiltinFunc
d100: 29 3b 0a 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69  );..  for(i=0; i
d110: 3c 41 72 72 61 79 53 69 7a 65 28 61 42 75 69 6c  <ArraySize(aBuil
d120: 74 69 6e 46 75 6e 63 29 3b 20 69 2b 2b 29 7b 0a  tinFunc); i++){.
d130: 20 20 20 20 73 71 6c 69 74 65 33 46 75 6e 63 44      sqlite3FuncD
d140: 65 66 49 6e 73 65 72 74 28 70 48 61 73 68 2c 20  efInsert(pHash, 
d150: 26 61 46 75 6e 63 5b 69 5d 29 3b 0a 20 20 7d 0a  &aFunc[i]);.  }.
d160: 20 20 73 71 6c 69 74 65 33 52 65 67 69 73 74 65    sqlite3Registe
d170: 72 44 61 74 65 54 69 6d 65 46 75 6e 63 74 69 6f  rDateTimeFunctio
d180: 6e 73 28 29 3b 0a 23 69 66 6e 64 65 66 20 53 51  ns();.#ifndef SQ
d190: 4c 49 54 45 5f 4f 4d 49 54 5f 41 4c 54 45 52 54  LITE_OMIT_ALTERT
d1a0: 41 42 4c 45 0a 20 20 73 71 6c 69 74 65 33 41 6c  ABLE.  sqlite3Al
d1b0: 74 65 72 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a  terFunctions();.
d1c0: 23 65 6e 64 69 66 0a 23 69 66 20 64 65 66 69 6e  #endif.#if defin
d1d0: 65 64 28 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45  ed(SQLITE_ENABLE
d1e0: 5f 53 54 41 54 33 29 20 7c 7c 20 64 65 66 69 6e  _STAT3) || defin
d1f0: 65 64 28 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45  ed(SQLITE_ENABLE
d200: 5f 53 54 41 54 34 29 0a 20 20 73 71 6c 69 74 65  _STAT4).  sqlite
d210: 33 41 6e 61 6c 79 7a 65 46 75 6e 63 74 69 6f 6e  3AnalyzeFunction
d220: 73 28 29 3b 0a 23 65 6e 64 69 66 0a 7d 0a        s();.#endif.}.