/ Hex Artifact Content
Login

Artifact fe50a9ab977acc0bb0fcd46741e0071fa388888e:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 2d 6c 61 6e 67 75 61 67 65 20 69 6d 70 6c 65  C-language imple
01a0: 6d 65 6e 74 61 74 69 6f 6e 73 20 66 6f 72 20 6d  mentations for m
01b0: 61 6e 79 20 6f 66 20 74 68 65 20 53 51 4c 0a 2a  any of the SQL.*
01c0: 2a 20 66 75 6e 63 74 69 6f 6e 73 20 6f 66 20 53  * functions of S
01d0: 51 4c 69 74 65 2e 20 20 28 53 6f 6d 65 20 66 75  QLite.  (Some fu
01e0: 6e 63 74 69 6f 6e 2c 20 61 6e 64 20 69 6e 20 70  nction, and in p
01f0: 61 72 74 69 63 75 6c 61 72 20 74 68 65 20 64 61  articular the da
0200: 74 65 20 61 6e 64 0a 2a 2a 20 74 69 6d 65 20 66  te and.** time f
0210: 75 6e 63 74 69 6f 6e 73 2c 20 61 72 65 20 69 6d  unctions, are im
0220: 70 6c 65 6d 65 6e 74 65 64 20 73 65 70 61 72 61  plemented separa
0230: 74 65 6c 79 2e 29 0a 2a 2f 0a 23 69 6e 63 6c 75  tely.).*/.#inclu
0240: 64 65 20 22 73 71 6c 69 74 65 49 6e 74 2e 68 22  de "sqliteInt.h"
0250: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64 6c 69  .#include <stdli
0260: 62 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 61  b.h>.#include <a
0270: 73 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c 75 64  ssert.h>.#includ
0280: 65 20 22 76 64 62 65 49 6e 74 2e 68 22 0a 0a 2f  e "vdbeInt.h"../
0290: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20  *.** Return the 
02a0: 63 6f 6c 6c 61 74 69 6e 67 20 66 75 6e 63 74 69  collating functi
02b0: 6f 6e 20 61 73 73 6f 63 69 61 74 65 64 20 77 69  on associated wi
02c0: 74 68 20 61 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a  th a function..*
02d0: 2f 0a 73 74 61 74 69 63 20 43 6f 6c 6c 53 65 71  /.static CollSeq
02e0: 20 2a 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63   *sqlite3GetFunc
02f0: 43 6f 6c 6c 53 65 71 28 73 71 6c 69 74 65 33 5f  CollSeq(sqlite3_
0300: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
0310: 29 7b 0a 20 20 56 64 62 65 4f 70 20 2a 70 4f 70  ){.  VdbeOp *pOp
0320: 3b 0a 20 20 61 73 73 65 72 74 28 20 63 6f 6e 74  ;.  assert( cont
0330: 65 78 74 2d 3e 70 56 64 62 65 21 3d 30 20 29 3b  ext->pVdbe!=0 );
0340: 0a 20 20 70 4f 70 20 3d 20 26 63 6f 6e 74 65 78  .  pOp = &contex
0350: 74 2d 3e 70 56 64 62 65 2d 3e 61 4f 70 5b 63 6f  t->pVdbe->aOp[co
0360: 6e 74 65 78 74 2d 3e 69 4f 70 2d 31 5d 3b 0a 20  ntext->iOp-1];. 
0370: 20 61 73 73 65 72 74 28 20 70 4f 70 2d 3e 6f 70   assert( pOp->op
0380: 63 6f 64 65 3d 3d 4f 50 5f 43 6f 6c 6c 53 65 71  code==OP_CollSeq
0390: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 4f   );.  assert( pO
03a0: 70 2d 3e 70 34 74 79 70 65 3d 3d 50 34 5f 43 4f  p->p4type==P4_CO
03b0: 4c 4c 53 45 51 20 29 3b 0a 20 20 72 65 74 75 72  LLSEQ );.  retur
03c0: 6e 20 70 4f 70 2d 3e 70 34 2e 70 43 6f 6c 6c 3b  n pOp->p4.pColl;
03d0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 64 69 63 61  .}../*.** Indica
03e0: 74 65 20 74 68 61 74 20 74 68 65 20 61 63 63 75  te that the accu
03f0: 6d 75 6c 61 74 6f 72 20 6c 6f 61 64 20 73 68 6f  mulator load sho
0400: 75 6c 64 20 62 65 20 73 6b 69 70 70 65 64 20 6f  uld be skipped o
0410: 6e 20 74 68 69 73 0a 2a 2a 20 69 74 65 72 61 74  n this.** iterat
0420: 69 6f 6e 20 6f 66 20 74 68 65 20 61 67 67 72 65  ion of the aggre
0430: 67 61 74 65 20 6c 6f 6f 70 2e 0a 2a 2f 0a 73 74  gate loop..*/.st
0440: 61 74 69 63 20 76 6f 69 64 20 73 71 6c 69 74 65  atic void sqlite
0450: 33 53 6b 69 70 41 63 63 75 6d 75 6c 61 74 6f 72  3SkipAccumulator
0460: 4c 6f 61 64 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Load(sqlite3_con
0470: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
0480: 20 20 63 6f 6e 74 65 78 74 2d 3e 73 6b 69 70 46    context->skipF
0490: 6c 61 67 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a  lag = 1;.}../*.*
04a0: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
04b0: 20 6f 66 20 74 68 65 20 6e 6f 6e 2d 61 67 67 72   of the non-aggr
04c0: 65 67 61 74 65 20 6d 69 6e 28 29 20 61 6e 64 20  egate min() and 
04d0: 6d 61 78 28 29 20 66 75 6e 63 74 69 6f 6e 73 0a  max() functions.
04e0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d  */.static void m
04f0: 69 6e 6d 61 78 46 75 6e 63 28 0a 20 20 73 71 6c  inmaxFunc(.  sql
0500: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0510: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
0520: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
0530: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
0540: 6e 74 20 69 3b 0a 20 20 69 6e 74 20 6d 61 73 6b  nt i;.  int mask
0550: 3b 20 20 20 20 2f 2a 20 30 20 66 6f 72 20 6d 69  ;    /* 0 for mi
0560: 6e 28 29 20 6f 72 20 30 78 66 66 66 66 66 66 66  n() or 0xfffffff
0570: 66 20 66 6f 72 20 6d 61 78 28 29 20 2a 2f 0a 20  f for max() */. 
0580: 20 69 6e 74 20 69 42 65 73 74 3b 0a 20 20 43 6f   int iBest;.  Co
0590: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 3b 0a 0a 20  llSeq *pColl;.. 
05a0: 20 61 73 73 65 72 74 28 20 61 72 67 63 3e 31 20   assert( argc>1 
05b0: 29 3b 0a 20 20 6d 61 73 6b 20 3d 20 73 71 6c 69  );.  mask = sqli
05c0: 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f  te3_user_data(co
05d0: 6e 74 65 78 74 29 3d 3d 30 20 3f 20 30 20 3a 20  ntext)==0 ? 0 : 
05e0: 2d 31 3b 0a 20 20 70 43 6f 6c 6c 20 3d 20 73 71  -1;.  pColl = sq
05f0: 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c  lite3GetFuncColl
0600: 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  Seq(context);.  
0610: 61 73 73 65 72 74 28 20 70 43 6f 6c 6c 20 29 3b  assert( pColl );
0620: 0a 20 20 61 73 73 65 72 74 28 20 6d 61 73 6b 3d  .  assert( mask=
0630: 3d 2d 31 20 7c 7c 20 6d 61 73 6b 3d 3d 30 20 29  =-1 || mask==0 )
0640: 3b 0a 20 20 69 42 65 73 74 20 3d 20 30 3b 0a 20  ;.  iBest = 0;. 
0650: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
0660: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
0670: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20  ==SQLITE_NULL ) 
0680: 72 65 74 75 72 6e 3b 0a 20 20 66 6f 72 28 69 3d  return;.  for(i=
0690: 31 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29 7b  1; i<argc; i++){
06a0: 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33  .    if( sqlite3
06b0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
06c0: 5b 69 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [i])==SQLITE_NUL
06d0: 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  L ) return;.    
06e0: 69 66 28 20 28 73 71 6c 69 74 65 33 4d 65 6d 43  if( (sqlite3MemC
06f0: 6f 6d 70 61 72 65 28 61 72 67 76 5b 69 42 65 73  ompare(argv[iBes
0700: 74 5d 2c 20 61 72 67 76 5b 69 5d 2c 20 70 43 6f  t], argv[i], pCo
0710: 6c 6c 29 5e 6d 61 73 6b 29 3e 3d 30 20 29 7b 0a  ll)^mask)>=0 ){.
0720: 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28 20        testcase( 
0730: 6d 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 20 20 20  mask==0 );.     
0740: 20 69 42 65 73 74 20 3d 20 69 3b 0a 20 20 20 20   iBest = i;.    
0750: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  }.  }.  sqlite3_
0760: 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e  result_value(con
0770: 74 65 78 74 2c 20 61 72 67 76 5b 69 42 65 73 74  text, argv[iBest
0780: 5d 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74  ]);.}../*.** Ret
0790: 75 72 6e 20 74 68 65 20 74 79 70 65 20 6f 66 20  urn the type of 
07a0: 74 68 65 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f  the argument..*/
07b0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 79 70  .static void typ
07c0: 65 6f 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  eofFunc(.  sqlit
07d0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
07e0: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
07f0: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
0800: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
0810: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d 20  const char *z = 
0820: 30 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  0;.  UNUSED_PARA
0830: 4d 45 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a  METER(NotUsed);.
0840: 20 20 73 77 69 74 63 68 28 20 73 71 6c 69 74 65    switch( sqlite
0850: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
0860: 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73  v[0]) ){.    cas
0870: 65 20 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52  e SQLITE_INTEGER
0880: 3a 20 7a 20 3d 20 22 69 6e 74 65 67 65 72 22 3b  : z = "integer";
0890: 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65   break;.    case
08a0: 20 53 51 4c 49 54 45 5f 54 45 58 54 3a 20 20 20   SQLITE_TEXT:   
08b0: 20 7a 20 3d 20 22 74 65 78 74 22 3b 20 20 20 20   z = "text";    
08c0: 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20  break;.    case 
08d0: 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 20 20  SQLITE_FLOAT:   
08e0: 7a 20 3d 20 22 72 65 61 6c 22 3b 20 20 20 20 62  z = "real";    b
08f0: 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20 53  reak;.    case S
0900: 51 4c 49 54 45 5f 42 4c 4f 42 3a 20 20 20 20 7a  QLITE_BLOB:    z
0910: 20 3d 20 22 62 6c 6f 62 22 3b 20 20 20 20 62 72   = "blob";    br
0920: 65 61 6b 3b 0a 20 20 20 20 64 65 66 61 75 6c 74  eak;.    default
0930: 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 7a 20  :             z 
0940: 3d 20 22 6e 75 6c 6c 22 3b 20 20 20 20 62 72 65  = "null";    bre
0950: 61 6b 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  ak;.  }.  sqlite
0960: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
0970: 6e 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 53 51  ntext, z, -1, SQ
0980: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a  LITE_STATIC);.}.
0990: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
09a0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 65  tation of the le
09b0: 6e 67 74 68 28 29 20 66 75 6e 63 74 69 6f 6e 0a  ngth() function.
09c0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
09d0: 65 6e 67 74 68 46 75 6e 63 28 0a 20 20 73 71 6c  engthFunc(.  sql
09e0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
09f0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
0a00: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
0a10: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
0a20: 6e 74 20 6c 65 6e 3b 0a 0a 20 20 61 73 73 65 72  nt len;..  asser
0a30: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
0a40: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
0a50: 28 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68  (argc);.  switch
0a60: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
0a70: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
0a80: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0a90: 5f 42 4c 4f 42 3a 0a 20 20 20 20 63 61 73 65 20  _BLOB:.    case 
0aa0: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 0a  SQLITE_INTEGER:.
0ab0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
0ac0: 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 73  FLOAT: {.      s
0ad0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
0ae0: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
0af0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
0b00: 72 67 76 5b 30 5d 29 29 3b 0a 20 20 20 20 20 20  rgv[0]));.      
0b10: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
0b20: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58   case SQLITE_TEX
0b30: 54 3a 20 7b 0a 20 20 20 20 20 20 63 6f 6e 73 74  T: {.      const
0b40: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
0b50: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  z = sqlite3_valu
0b60: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
0b70: 0a 20 20 20 20 20 20 69 66 28 20 7a 3d 3d 30 20  .      if( z==0 
0b80: 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20  ) return;.      
0b90: 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 77  len = 0;.      w
0ba0: 68 69 6c 65 28 20 2a 7a 20 29 7b 0a 20 20 20 20  hile( *z ){.    
0bb0: 20 20 20 20 6c 65 6e 2b 2b 3b 0a 20 20 20 20 20      len++;.     
0bc0: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
0bd0: 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 7d 0a  TF8(z);.      }.
0be0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
0bf0: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
0c00: 2c 20 6c 65 6e 29 3b 0a 20 20 20 20 20 20 62 72  , len);.      br
0c10: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64  eak;.    }.    d
0c20: 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20  efault: {.      
0c30: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e  sqlite3_result_n
0c40: 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  ull(context);.  
0c50: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
0c60: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
0c70: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
0c80: 74 68 65 20 61 62 73 28 29 20 66 75 6e 63 74 69  the abs() functi
0c90: 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52  on..**.** IMP: R
0ca0: 2d 32 33 39 37 39 2d 32 36 38 35 35 20 54 68 65  -23979-26855 The
0cb0: 20 61 62 73 28 58 29 20 66 75 6e 63 74 69 6f 6e   abs(X) function
0cc0: 20 72 65 74 75 72 6e 73 20 74 68 65 20 61 62 73   returns the abs
0cd0: 6f 6c 75 74 65 20 76 61 6c 75 65 20 6f 66 0a 2a  olute value of.*
0ce0: 2a 20 74 68 65 20 6e 75 6d 65 72 69 63 20 61 72  * the numeric ar
0cf0: 67 75 6d 65 6e 74 20 58 2e 20 0a 2a 2f 0a 73 74  gument X. .*/.st
0d00: 61 74 69 63 20 76 6f 69 64 20 61 62 73 46 75 6e  atic void absFun
0d10: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
0d20: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
0d30: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
0d40: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 61  lue **argv){.  a
0d50: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
0d60: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
0d70: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 73 77  ETER(argc);.  sw
0d80: 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61  itch( sqlite3_va
0d90: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
0da0: 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51  ) ){.    case SQ
0db0: 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 20 7b 0a  LITE_INTEGER: {.
0dc0: 20 20 20 20 20 20 69 36 34 20 69 56 61 6c 20 3d        i64 iVal =
0dd0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
0de0: 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20  nt64(argv[0]);. 
0df0: 20 20 20 20 20 69 66 28 20 69 56 61 6c 3c 30 20       if( iVal<0 
0e00: 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 69  ){.        if( i
0e10: 56 61 6c 3d 3d 53 4d 41 4c 4c 45 53 54 5f 49 4e  Val==SMALLEST_IN
0e20: 54 36 34 20 29 7b 0a 20 20 20 20 20 20 20 20 20  T64 ){.         
0e30: 20 2f 2a 20 49 4d 50 3a 20 52 2d 33 31 36 37 36   /* IMP: R-31676
0e40: 2d 34 35 35 30 39 20 49 66 20 58 20 69 73 20 74  -45509 If X is t
0e50: 68 65 20 69 6e 74 65 67 65 72 20 2d 39 32 32 33  he integer -9223
0e60: 33 37 32 30 33 36 38 35 34 37 37 35 38 30 38 0a  372036854775808.
0e70: 20 20 20 20 20 20 20 20 20 20 2a 2a 20 74 68 65            ** the
0e80: 6e 20 61 62 73 28 58 29 20 74 68 72 6f 77 73 20  n abs(X) throws 
0e90: 61 6e 20 69 6e 74 65 67 65 72 20 6f 76 65 72 66  an integer overf
0ea0: 6c 6f 77 20 65 72 72 6f 72 20 73 69 6e 63 65 20  low error since 
0eb0: 74 68 65 72 65 20 69 73 20 6e 6f 0a 20 20 20 20  there is no.    
0ec0: 20 20 20 20 20 20 2a 2a 20 65 71 75 69 76 61 6c        ** equival
0ed0: 65 6e 74 20 70 6f 73 69 74 69 76 65 20 36 34 2d  ent positive 64-
0ee0: 62 69 74 20 74 77 6f 20 63 6f 6d 70 6c 65 6d 65  bit two compleme
0ef0: 6e 74 20 76 61 6c 75 65 2e 20 2a 2f 0a 20 20 20  nt value. */.   
0f00: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72         sqlite3_r
0f10: 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74  esult_error(cont
0f20: 65 78 74 2c 20 22 69 6e 74 65 67 65 72 20 6f 76  ext, "integer ov
0f30: 65 72 66 6c 6f 77 22 2c 20 2d 31 29 3b 0a 20 20  erflow", -1);.  
0f40: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a          return;.
0f50: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
0f60: 20 20 69 56 61 6c 20 3d 20 2d 69 56 61 6c 3b 0a    iVal = -iVal;.
0f70: 20 20 20 20 20 20 7d 20 0a 20 20 20 20 20 20 73        } .      s
0f80: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
0f90: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 69 56 61  t64(context, iVa
0fa0: 6c 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  l);.      break;
0fb0: 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20  .    }.    case 
0fc0: 53 51 4c 49 54 45 5f 4e 55 4c 4c 3a 20 7b 0a 20  SQLITE_NULL: {. 
0fd0: 20 20 20 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 33       /* IMP: R-3
0fe0: 37 34 33 34 2d 31 39 39 32 39 20 41 62 73 28 58  7434-19929 Abs(X
0ff0: 29 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c 20 69  ) returns NULL i
1000: 66 20 58 20 69 73 20 4e 55 4c 4c 2e 20 2a 2f 0a  f X is NULL. */.
1010: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
1020: 73 75 6c 74 5f 6e 75 6c 6c 28 63 6f 6e 74 65 78  sult_null(contex
1030: 74 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b  t);.      break;
1040: 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75  .    }.    defau
1050: 6c 74 3a 20 7b 0a 20 20 20 20 20 20 2f 2a 20 42  lt: {.      /* B
1060: 65 63 61 75 73 65 20 73 71 6c 69 74 65 33 5f 76  ecause sqlite3_v
1070: 61 6c 75 65 5f 64 6f 75 62 6c 65 28 29 20 72 65  alue_double() re
1080: 74 75 72 6e 73 20 30 2e 30 20 69 66 20 74 68 65  turns 0.0 if the
1090: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e 6f 74   argument is not
10a0: 0a 20 20 20 20 20 20 2a 2a 20 73 6f 6d 65 74 68  .      ** someth
10b0: 69 6e 67 20 74 68 61 74 20 63 61 6e 20 62 65 20  ing that can be 
10c0: 63 6f 6e 76 65 72 74 65 64 20 69 6e 74 6f 20 61  converted into a
10d0: 20 6e 75 6d 62 65 72 2c 20 77 65 20 68 61 76 65   number, we have
10e0: 3a 0a 20 20 20 20 20 20 2a 2a 20 49 4d 50 3a 20  :.      ** IMP: 
10f0: 52 2d 30 31 39 39 32 2d 30 30 35 31 39 20 41 62  R-01992-00519 Ab
1100: 73 28 58 29 20 72 65 74 75 72 6e 73 20 30 2e 30  s(X) returns 0.0
1110: 20 69 66 20 58 20 69 73 20 61 20 73 74 72 69 6e   if X is a strin
1120: 67 20 6f 72 20 62 6c 6f 62 0a 20 20 20 20 20 20  g or blob.      
1130: 2a 2a 20 74 68 61 74 20 63 61 6e 6e 6f 74 20 62  ** that cannot b
1140: 65 20 63 6f 6e 76 65 72 74 65 64 20 74 6f 20 61  e converted to a
1150: 20 6e 75 6d 65 72 69 63 20 76 61 6c 75 65 2e 0a   numeric value..
1160: 20 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 64        */.      d
1170: 6f 75 62 6c 65 20 72 56 61 6c 20 3d 20 73 71 6c  ouble rVal = sql
1180: 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c  ite3_value_doubl
1190: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  e(argv[0]);.    
11a0: 20 20 69 66 28 20 72 56 61 6c 3c 30 20 29 20 72    if( rVal<0 ) r
11b0: 56 61 6c 20 3d 20 2d 72 56 61 6c 3b 0a 20 20 20  Val = -rVal;.   
11c0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
11d0: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
11e0: 2c 20 72 56 61 6c 29 3b 0a 20 20 20 20 20 20 62  , rVal);.      b
11f0: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  reak;.    }.  }.
1200: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
1210: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 69  ntation of the i
1220: 6e 73 74 72 28 29 20 66 75 6e 63 74 69 6f 6e 2e  nstr() function.
1230: 0a 2a 2a 0a 2a 2a 20 69 6e 73 74 72 28 68 61 79  .**.** instr(hay
1240: 73 74 61 63 6b 2c 6e 65 65 64 6c 65 29 20 66 69  stack,needle) fi
1250: 6e 64 73 20 74 68 65 20 66 69 72 73 74 20 6f 63  nds the first oc
1260: 63 75 72 72 65 6e 63 65 20 6f 66 20 6e 65 65 64  currence of need
1270: 6c 65 0a 2a 2a 20 69 6e 20 68 61 79 73 74 61 63  le.** in haystac
1280: 6b 20 61 6e 64 20 72 65 74 75 72 6e 73 20 74 68  k and returns th
1290: 65 20 6e 75 6d 62 65 72 20 6f 66 20 70 72 65 76  e number of prev
12a0: 69 6f 75 73 20 63 68 61 72 61 63 74 65 72 73 20  ious characters 
12b0: 70 6c 75 73 20 31 2c 0a 2a 2a 20 6f 72 20 30 20  plus 1,.** or 0 
12c0: 69 66 20 6e 65 65 64 6c 65 20 64 6f 65 73 20 6e  if needle does n
12d0: 6f 74 20 6f 63 63 75 72 20 77 69 74 68 69 6e 20  ot occur within 
12e0: 68 61 79 73 74 61 63 6b 2e 0a 2a 2a 0a 2a 2a 20  haystack..**.** 
12f0: 49 66 20 62 6f 74 68 20 68 61 79 73 74 61 63 6b  If both haystack
1300: 20 61 6e 64 20 6e 65 65 64 6c 65 20 61 72 65 20   and needle are 
1310: 42 4c 4f 42 73 2c 20 74 68 65 6e 20 74 68 65 20  BLOBs, then the 
1320: 72 65 73 75 6c 74 20 69 73 20 6f 6e 65 20 6d 6f  result is one mo
1330: 72 65 20 74 68 61 6e 0a 2a 2a 20 74 68 65 20 6e  re than.** the n
1340: 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 69  umber of bytes i
1350: 6e 20 68 61 79 73 74 61 63 6b 20 70 72 69 6f 72  n haystack prior
1360: 20 74 6f 20 74 68 65 20 66 69 72 73 74 20 6f 63   to the first oc
1370: 63 75 72 72 65 6e 63 65 20 6f 66 20 6e 65 65 64  currence of need
1380: 6c 65 2c 0a 2a 2a 20 6f 72 20 30 20 69 66 20 6e  le,.** or 0 if n
1390: 65 65 64 6c 65 20 6e 65 76 65 72 20 6f 63 63 75  eedle never occu
13a0: 72 73 20 69 6e 20 68 61 79 73 74 61 63 6b 2e 0a  rs in haystack..
13b0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 69  */.static void i
13c0: 6e 73 74 72 46 75 6e 63 28 0a 20 20 73 71 6c 69  nstrFunc(.  sqli
13d0: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
13e0: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
13f0: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
1400: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f  e **argv.){.  co
1410: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
1420: 72 20 2a 7a 48 61 79 73 74 61 63 6b 3b 0a 20 20  r *zHaystack;.  
1430: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
1440: 68 61 72 20 2a 7a 4e 65 65 64 6c 65 3b 0a 20 20  har *zNeedle;.  
1450: 69 6e 74 20 6e 48 61 79 73 74 61 63 6b 3b 0a 20  int nHaystack;. 
1460: 20 69 6e 74 20 6e 4e 65 65 64 6c 65 3b 0a 20 20   int nNeedle;.  
1470: 69 6e 74 20 74 79 70 65 48 61 79 73 74 61 63 6b  int typeHaystack
1480: 2c 20 74 79 70 65 4e 65 65 64 6c 65 3b 0a 20 20  , typeNeedle;.  
1490: 69 6e 74 20 4e 20 3d 20 31 3b 0a 20 20 69 6e 74  int N = 1;.  int
14a0: 20 69 73 54 65 78 74 3b 0a 0a 20 20 55 4e 55 53   isText;..  UNUS
14b0: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
14c0: 63 29 3b 0a 20 20 74 79 70 65 48 61 79 73 74 61  c);.  typeHaysta
14d0: 63 6b 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ck = sqlite3_val
14e0: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
14f0: 3b 0a 20 20 74 79 70 65 4e 65 65 64 6c 65 20 3d  ;.  typeNeedle =
1500: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
1510: 79 70 65 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20  ype(argv[1]);.  
1520: 69 66 28 20 74 79 70 65 48 61 79 73 74 61 63 6b  if( typeHaystack
1530: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 7c 7c  ==SQLITE_NULL ||
1540: 20 74 79 70 65 4e 65 65 64 6c 65 3d 3d 53 51 4c   typeNeedle==SQL
1550: 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72  ITE_NULL ) retur
1560: 6e 3b 0a 20 20 6e 48 61 79 73 74 61 63 6b 20 3d  n;.  nHaystack =
1570: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
1580: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
1590: 20 6e 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74   nNeedle = sqlit
15a0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
15b0: 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 74  rgv[1]);.  if( t
15c0: 79 70 65 48 61 79 73 74 61 63 6b 3d 3d 53 51 4c  ypeHaystack==SQL
15d0: 49 54 45 5f 42 4c 4f 42 20 26 26 20 74 79 70 65  ITE_BLOB && type
15e0: 4e 65 65 64 6c 65 3d 3d 53 51 4c 49 54 45 5f 42  Needle==SQLITE_B
15f0: 4c 4f 42 20 29 7b 0a 20 20 20 20 7a 48 61 79 73  LOB ){.    zHays
1600: 74 61 63 6b 20 3d 20 73 71 6c 69 74 65 33 5f 76  tack = sqlite3_v
1610: 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30  alue_blob(argv[0
1620: 5d 29 3b 0a 20 20 20 20 7a 4e 65 65 64 6c 65 20  ]);.    zNeedle 
1630: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
1640: 62 6c 6f 62 28 61 72 67 76 5b 31 5d 29 3b 0a 20  blob(argv[1]);. 
1650: 20 20 20 69 73 54 65 78 74 20 3d 20 30 3b 0a 20     isText = 0;. 
1660: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 48 61 79   }else{.    zHay
1670: 73 74 61 63 6b 20 3d 20 73 71 6c 69 74 65 33 5f  stack = sqlite3_
1680: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
1690: 30 5d 29 3b 0a 20 20 20 20 7a 4e 65 65 64 6c 65  0]);.    zNeedle
16a0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
16b0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a  _text(argv[1]);.
16c0: 20 20 20 20 69 73 54 65 78 74 20 3d 20 31 3b 0a      isText = 1;.
16d0: 20 20 7d 0a 20 20 77 68 69 6c 65 28 20 6e 4e 65    }.  while( nNe
16e0: 65 64 6c 65 3c 3d 6e 48 61 79 73 74 61 63 6b 20  edle<=nHaystack 
16f0: 26 26 20 6d 65 6d 63 6d 70 28 7a 48 61 79 73 74  && memcmp(zHayst
1700: 61 63 6b 2c 20 7a 4e 65 65 64 6c 65 2c 20 6e 4e  ack, zNeedle, nN
1710: 65 65 64 6c 65 29 21 3d 30 20 29 7b 0a 20 20 20  eedle)!=0 ){.   
1720: 20 4e 2b 2b 3b 0a 20 20 20 20 64 6f 7b 0a 20 20   N++;.    do{.  
1730: 20 20 20 20 6e 48 61 79 73 74 61 63 6b 2d 2d 3b      nHaystack--;
1740: 0a 20 20 20 20 20 20 7a 48 61 79 73 74 61 63 6b  .      zHaystack
1750: 2b 2b 3b 0a 20 20 20 20 7d 77 68 69 6c 65 28 20  ++;.    }while( 
1760: 69 73 54 65 78 74 20 26 26 20 28 7a 48 61 79 73  isText && (zHays
1770: 74 61 63 6b 5b 30 5d 26 30 78 63 30 29 3d 3d 30  tack[0]&0xc0)==0
1780: 78 38 30 20 29 3b 0a 20 20 7d 0a 20 20 69 66 28  x80 );.  }.  if(
1790: 20 6e 4e 65 65 64 6c 65 3e 6e 48 61 79 73 74 61   nNeedle>nHaysta
17a0: 63 6b 20 29 20 4e 20 3d 20 30 3b 0a 20 20 73 71  ck ) N = 0;.  sq
17b0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
17c0: 28 63 6f 6e 74 65 78 74 2c 20 4e 29 3b 0a 7d 0a  (context, N);.}.
17d0: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
17e0: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 70 72 69  ation of the pri
17f0: 6e 74 66 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a  ntf() function..
1800: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 70  */.static void p
1810: 72 69 6e 74 66 46 75 6e 63 28 0a 20 20 73 71 6c  rintfFunc(.  sql
1820: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
1830: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
1840: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
1850: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 50  ue **argv.){.  P
1860: 72 69 6e 74 66 41 72 67 75 6d 65 6e 74 73 20 78  rintfArguments x
1870: 3b 0a 20 20 53 74 72 41 63 63 75 6d 20 73 74 72  ;.  StrAccum str
1880: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
1890: 7a 46 6f 72 6d 61 74 3b 0a 20 20 69 6e 74 20 6e  zFormat;.  int n
18a0: 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  ;.  sqlite3 *db 
18b0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
18c0: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
18d0: 65 78 74 29 3b 0a 0a 20 20 69 66 28 20 61 72 67  ext);..  if( arg
18e0: 63 3e 3d 31 20 26 26 20 28 7a 46 6f 72 6d 61 74  c>=1 && (zFormat
18f0: 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29   = (const char*)
1900: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
1910: 78 74 28 61 72 67 76 5b 30 5d 29 29 21 3d 30 20  xt(argv[0]))!=0 
1920: 29 7b 0a 20 20 20 20 78 2e 6e 41 72 67 20 3d 20  ){.    x.nArg = 
1930: 61 72 67 63 2d 31 3b 0a 20 20 20 20 78 2e 6e 55  argc-1;.    x.nU
1940: 73 65 64 20 3d 20 30 3b 0a 20 20 20 20 78 2e 61  sed = 0;.    x.a
1950: 70 41 72 67 20 3d 20 61 72 67 76 2b 31 3b 0a 20  pArg = argv+1;. 
1960: 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63     sqlite3StrAcc
1970: 75 6d 49 6e 69 74 28 26 73 74 72 2c 20 64 62 2c  umInit(&str, db,
1980: 20 30 2c 20 30 2c 20 64 62 2d 3e 61 4c 69 6d 69   0, 0, db->aLimi
1990: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
19a0: 45 4e 47 54 48 5d 29 3b 0a 20 20 20 20 73 71 6c  ENGTH]);.    sql
19b0: 69 74 65 33 58 50 72 69 6e 74 66 28 26 73 74 72  ite3XPrintf(&str
19c0: 2c 20 53 51 4c 49 54 45 5f 50 52 49 4e 54 46 5f  , SQLITE_PRINTF_
19d0: 53 51 4c 46 55 4e 43 2c 20 7a 46 6f 72 6d 61 74  SQLFUNC, zFormat
19e0: 2c 20 26 78 29 3b 0a 20 20 20 20 6e 20 3d 20 73  , &x);.    n = s
19f0: 74 72 2e 6e 43 68 61 72 3b 0a 20 20 20 20 73 71  tr.nChar;.    sq
1a00: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
1a10: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
1a20: 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68  e3StrAccumFinish
1a30: 28 26 73 74 72 29 2c 20 6e 2c 0a 20 20 20 20 20  (&str), n,.     
1a40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1a50: 20 20 20 53 51 4c 49 54 45 5f 44 59 4e 41 4d 49     SQLITE_DYNAMI
1a60: 43 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  C);.  }.}../*.**
1a70: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
1a80: 6f 66 20 74 68 65 20 73 75 62 73 74 72 28 29 20  of the substr() 
1a90: 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20  function..**.** 
1aa0: 73 75 62 73 74 72 28 78 2c 70 31 2c 70 32 29 20  substr(x,p1,p2) 
1ab0: 20 72 65 74 75 72 6e 73 20 70 32 20 63 68 61 72   returns p2 char
1ac0: 61 63 74 65 72 73 20 6f 66 20 78 5b 5d 20 62 65  acters of x[] be
1ad0: 67 69 6e 6e 69 6e 67 20 77 69 74 68 20 70 31 2e  ginning with p1.
1ae0: 0a 2a 2a 20 70 31 20 69 73 20 31 2d 69 6e 64 65  .** p1 is 1-inde
1af0: 78 65 64 2e 20 20 53 6f 20 73 75 62 73 74 72 28  xed.  So substr(
1b00: 78 2c 31 2c 31 29 20 72 65 74 75 72 6e 73 20 74  x,1,1) returns t
1b10: 68 65 20 66 69 72 73 74 20 63 68 61 72 61 63 74  he first charact
1b20: 65 72 0a 2a 2a 20 6f 66 20 78 2e 20 20 49 66 20  er.** of x.  If 
1b30: 78 20 69 73 20 74 65 78 74 2c 20 74 68 65 6e 20  x is text, then 
1b40: 77 65 20 61 63 74 75 61 6c 6c 79 20 63 6f 75 6e  we actually coun
1b50: 74 20 55 54 46 2d 38 20 63 68 61 72 61 63 74 65  t UTF-8 characte
1b60: 72 73 2e 0a 2a 2a 20 49 66 20 78 20 69 73 20 61  rs..** If x is a
1b70: 20 62 6c 6f 62 2c 20 74 68 65 6e 20 77 65 20 63   blob, then we c
1b80: 6f 75 6e 74 20 62 79 74 65 73 2e 0a 2a 2a 0a 2a  ount bytes..**.*
1b90: 2a 20 49 66 20 70 31 20 69 73 20 6e 65 67 61 74  * If p1 is negat
1ba0: 69 76 65 2c 20 74 68 65 6e 20 77 65 20 62 65 67  ive, then we beg
1bb0: 69 6e 20 61 62 73 28 70 31 29 20 66 72 6f 6d 20  in abs(p1) from 
1bc0: 74 68 65 20 65 6e 64 20 6f 66 20 78 5b 5d 2e 0a  the end of x[]..
1bd0: 2a 2a 0a 2a 2a 20 49 66 20 70 32 20 69 73 20 6e  **.** If p2 is n
1be0: 65 67 61 74 69 76 65 2c 20 72 65 74 75 72 6e 20  egative, return 
1bf0: 74 68 65 20 70 32 20 63 68 61 72 61 63 74 65 72  the p2 character
1c00: 73 20 70 72 65 63 65 64 69 6e 67 20 70 31 2e 0a  s preceding p1..
1c10: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73  */.static void s
1c20: 75 62 73 74 72 46 75 6e 63 28 0a 20 20 73 71 6c  ubstrFunc(.  sql
1c30: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
1c40: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
1c50: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
1c60: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63  ue **argv.){.  c
1c70: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
1c80: 61 72 20 2a 7a 3b 0a 20 20 63 6f 6e 73 74 20 75  ar *z;.  const u
1c90: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 32  nsigned char *z2
1ca0: 3b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a 20 20 69  ;.  int len;.  i
1cb0: 6e 74 20 70 30 74 79 70 65 3b 0a 20 20 69 36 34  nt p0type;.  i64
1cc0: 20 70 31 2c 20 70 32 3b 0a 20 20 69 6e 74 20 6e   p1, p2;.  int n
1cd0: 65 67 50 32 20 3d 20 30 3b 0a 0a 20 20 61 73 73  egP2 = 0;..  ass
1ce0: 65 72 74 28 20 61 72 67 63 3d 3d 33 20 7c 7c 20  ert( argc==3 || 
1cf0: 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28  argc==2 );.  if(
1d00: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
1d10: 79 70 65 28 61 72 67 76 5b 31 5d 29 3d 3d 53 51  ype(argv[1])==SQ
1d20: 4c 49 54 45 5f 4e 55 4c 4c 0a 20 20 20 7c 7c 20  LITE_NULL.   || 
1d30: 28 61 72 67 63 3d 3d 33 20 26 26 20 73 71 6c 69  (argc==3 && sqli
1d40: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
1d50: 72 67 76 5b 32 5d 29 3d 3d 53 51 4c 49 54 45 5f  rgv[2])==SQLITE_
1d60: 4e 55 4c 4c 29 0a 20 20 29 7b 0a 20 20 20 20 72  NULL).  ){.    r
1d70: 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 70 30 74  eturn;.  }.  p0t
1d80: 79 70 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  ype = sqlite3_va
1d90: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
1da0: 29 3b 0a 20 20 70 31 20 3d 20 73 71 6c 69 74 65  );.  p1 = sqlite
1db0: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76  3_value_int(argv
1dc0: 5b 31 5d 29 3b 0a 20 20 69 66 28 20 70 30 74 79  [1]);.  if( p0ty
1dd0: 70 65 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 20  pe==SQLITE_BLOB 
1de0: 29 7b 0a 20 20 20 20 6c 65 6e 20 3d 20 73 71 6c  ){.    len = sql
1df0: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
1e00: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 7a  (argv[0]);.    z
1e10: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1e20: 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a  _blob(argv[0]);.
1e30: 20 20 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72      if( z==0 ) r
1e40: 65 74 75 72 6e 3b 0a 20 20 20 20 61 73 73 65 72  eturn;.    asser
1e50: 74 28 20 6c 65 6e 3d 3d 73 71 6c 69 74 65 33 5f  t( len==sqlite3_
1e60: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
1e70: 5b 30 5d 29 20 29 3b 0a 20 20 7d 65 6c 73 65 7b  [0]) );.  }else{
1e80: 0a 20 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33  .    z = sqlite3
1e90: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
1ea0: 5b 30 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 3d  [0]);.    if( z=
1eb0: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20  =0 ) return;.   
1ec0: 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 69 66   len = 0;.    if
1ed0: 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 20 20  ( p1<0 ){.      
1ee0: 66 6f 72 28 7a 32 3d 7a 3b 20 2a 7a 32 3b 20 6c  for(z2=z; *z2; l
1ef0: 65 6e 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 53  en++){.        S
1f00: 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28  QLITE_SKIP_UTF8(
1f10: 7a 32 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  z2);.      }.   
1f20: 20 7d 0a 20 20 7d 0a 23 69 66 64 65 66 20 53 51   }.  }.#ifdef SQ
1f30: 4c 49 54 45 5f 53 55 42 53 54 52 5f 43 4f 4d 50  LITE_SUBSTR_COMP
1f40: 41 54 49 42 49 4c 49 54 59 0a 20 20 2f 2a 20 49  ATIBILITY.  /* I
1f50: 66 20 53 55 42 53 54 52 5f 43 4f 4d 50 41 54 49  f SUBSTR_COMPATI
1f60: 42 49 4c 49 54 59 20 69 73 20 64 65 66 69 6e 65  BILITY is define
1f70: 64 20 74 68 65 6e 20 73 75 62 73 74 72 28 58 2c  d then substr(X,
1f80: 30 2c 4e 29 20 77 6f 72 6b 20 74 68 65 20 73 61  0,N) work the sa
1f90: 6d 65 20 61 73 0a 20 20 2a 2a 20 61 73 20 73 75  me as.  ** as su
1fa0: 62 73 74 72 28 58 2c 31 2c 4e 29 20 2d 20 69 74  bstr(X,1,N) - it
1fb0: 20 72 65 74 75 72 6e 73 20 74 68 65 20 66 69 72   returns the fir
1fc0: 73 74 20 4e 20 63 68 61 72 61 63 74 65 72 73 20  st N characters 
1fd0: 6f 66 20 58 2e 20 20 54 68 69 73 0a 20 20 2a 2a  of X.  This.  **
1fe0: 20 69 73 20 65 73 73 65 6e 74 69 61 6c 6c 79 20   is essentially 
1ff0: 61 20 62 61 63 6b 2d 6f 75 74 20 6f 66 20 74 68  a back-out of th
2000: 65 20 62 75 67 2d 66 69 78 20 69 6e 20 63 68 65  e bug-fix in che
2010: 63 6b 2d 69 6e 20 5b 35 66 63 31 32 35 64 33 36  ck-in [5fc125d36
2020: 32 64 66 34 62 38 5d 0a 20 20 2a 2a 20 66 72 6f  2df4b8].  ** fro
2030: 6d 20 32 30 30 39 2d 30 32 2d 30 32 20 66 6f 72  m 2009-02-02 for
2040: 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 6f   compatibility o
2050: 66 20 61 70 70 6c 69 63 61 74 69 6f 6e 73 20 74  f applications t
2060: 68 61 74 20 65 78 70 6c 6f 69 74 65 64 20 74 68  hat exploited th
2070: 65 0a 20 20 2a 2a 20 6f 6c 64 20 62 75 67 67 79  e.  ** old buggy
2080: 20 62 65 68 61 76 69 6f 72 2e 20 2a 2f 0a 20 20   behavior. */.  
2090: 69 66 28 20 70 31 3d 3d 30 20 29 20 70 31 20 3d  if( p1==0 ) p1 =
20a0: 20 31 3b 20 2f 2a 20 3c 72 64 61 72 3a 2f 2f 70   1; /* <rdar://p
20b0: 72 6f 62 6c 65 6d 2f 36 37 37 38 33 33 39 3e 20  roblem/6778339> 
20c0: 2a 2f 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20  */.#endif.  if( 
20d0: 61 72 67 63 3d 3d 33 20 29 7b 0a 20 20 20 20 70  argc==3 ){.    p
20e0: 32 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  2 = sqlite3_valu
20f0: 65 5f 69 6e 74 28 61 72 67 76 5b 32 5d 29 3b 0a  e_int(argv[2]);.
2100: 20 20 20 20 69 66 28 20 70 32 3c 30 20 29 7b 0a      if( p2<0 ){.
2110: 20 20 20 20 20 20 70 32 20 3d 20 2d 70 32 3b 0a        p2 = -p2;.
2120: 20 20 20 20 20 20 6e 65 67 50 32 20 3d 20 31 3b        negP2 = 1;
2130: 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a  .    }.  }else{.
2140: 20 20 20 20 70 32 20 3d 20 73 71 6c 69 74 65 33      p2 = sqlite3
2150: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
2160: 6c 65 28 63 6f 6e 74 65 78 74 29 2d 3e 61 4c 69  le(context)->aLi
2170: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
2180: 5f 4c 45 4e 47 54 48 5d 3b 0a 20 20 7d 0a 20 20  _LENGTH];.  }.  
2190: 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20  if( p1<0 ){.    
21a0: 70 31 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20 69  p1 += len;.    i
21b0: 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 20  f( p1<0 ){.     
21c0: 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20 20   p2 += p1;.     
21d0: 20 69 66 28 20 70 32 3c 30 20 29 20 70 32 20 3d   if( p2<0 ) p2 =
21e0: 20 30 3b 0a 20 20 20 20 20 20 70 31 20 3d 20 30   0;.      p1 = 0
21f0: 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 20  ;.    }.  }else 
2200: 69 66 28 20 70 31 3e 30 20 29 7b 0a 20 20 20 20  if( p1>0 ){.    
2210: 70 31 2d 2d 3b 0a 20 20 7d 65 6c 73 65 20 69 66  p1--;.  }else if
2220: 28 20 70 32 3e 30 20 29 7b 0a 20 20 20 20 70 32  ( p2>0 ){.    p2
2230: 2d 2d 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 65  --;.  }.  if( ne
2240: 67 50 32 20 29 7b 0a 20 20 20 20 70 31 20 2d 3d  gP2 ){.    p1 -=
2250: 20 70 32 3b 0a 20 20 20 20 69 66 28 20 70 31 3c   p2;.    if( p1<
2260: 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20 2b 3d  0 ){.      p2 +=
2270: 20 70 31 3b 0a 20 20 20 20 20 20 70 31 20 3d 20   p1;.      p1 = 
2280: 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61  0;.    }.  }.  a
2290: 73 73 65 72 74 28 20 70 31 3e 3d 30 20 26 26 20  ssert( p1>=0 && 
22a0: 70 32 3e 3d 30 20 29 3b 0a 20 20 69 66 28 20 70  p2>=0 );.  if( p
22b0: 30 74 79 70 65 21 3d 53 51 4c 49 54 45 5f 42 4c  0type!=SQLITE_BL
22c0: 4f 42 20 29 7b 0a 20 20 20 20 77 68 69 6c 65 28  OB ){.    while(
22d0: 20 2a 7a 20 26 26 20 70 31 20 29 7b 0a 20 20 20   *z && p1 ){.   
22e0: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
22f0: 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 70 31  TF8(z);.      p1
2300: 2d 2d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 66 6f  --;.    }.    fo
2310: 72 28 7a 32 3d 7a 3b 20 2a 7a 32 20 26 26 20 70  r(z2=z; *z2 && p
2320: 32 3b 20 70 32 2d 2d 29 7b 0a 20 20 20 20 20 20  2; p2--){.      
2330: 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38  SQLITE_SKIP_UTF8
2340: 28 7a 32 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20  (z2);.    }.    
2350: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
2360: 65 78 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 28  ext64(context, (
2370: 63 68 61 72 2a 29 7a 2c 20 7a 32 2d 7a 2c 20 53  char*)z, z2-z, S
2380: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 2c  QLITE_TRANSIENT,
2390: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
23a0: 20 20 20 20 20 20 20 20 20 20 20 53 51 4c 49 54             SQLIT
23b0: 45 5f 55 54 46 38 29 3b 0a 20 20 7d 65 6c 73 65  E_UTF8);.  }else
23c0: 7b 0a 20 20 20 20 69 66 28 20 70 31 2b 70 32 3e  {.    if( p1+p2>
23d0: 6c 65 6e 20 29 7b 0a 20 20 20 20 20 20 70 32 20  len ){.      p2 
23e0: 3d 20 6c 65 6e 2d 70 31 3b 0a 20 20 20 20 20 20  = len-p1;.      
23f0: 69 66 28 20 70 32 3c 30 20 29 20 70 32 20 3d 20  if( p2<0 ) p2 = 
2400: 30 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c  0;.    }.    sql
2410: 69 74 65 33 5f 72 65 73 75 6c 74 5f 62 6c 6f 62  ite3_result_blob
2420: 36 34 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61  64(context, (cha
2430: 72 2a 29 26 7a 5b 70 31 5d 2c 20 28 75 36 34 29  r*)&z[p1], (u64)
2440: 70 32 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53  p2, SQLITE_TRANS
2450: 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a  IENT);.  }.}../*
2460: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
2470: 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75 6e 64 28  on of the round(
2480: 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 23 69  ) function.*/.#i
2490: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
24a0: 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54  T_FLOATING_POINT
24b0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 6f 75  .static void rou
24c0: 6e 64 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63  ndFunc(sqlite3_c
24d0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
24e0: 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74   int argc, sqlit
24f0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29  e3_value **argv)
2500: 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30 3b 0a 20  {.  int n = 0;. 
2510: 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20 63 68 61   double r;.  cha
2520: 72 20 2a 7a 42 75 66 3b 0a 20 20 61 73 73 65 72  r *zBuf;.  asser
2530: 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20 61 72  t( argc==1 || ar
2540: 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20 61  gc==2 );.  if( a
2550: 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 69 66  rgc==2 ){.    if
2560: 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 3d 3d 73  ( SQLITE_NULL==s
2570: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
2580: 65 28 61 72 67 76 5b 31 5d 29 20 29 20 72 65 74  e(argv[1]) ) ret
2590: 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20 73 71 6c  urn;.    n = sql
25a0: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61  ite3_value_int(a
25b0: 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 66 28  rgv[1]);.    if(
25c0: 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33 30 3b 0a   n>30 ) n = 30;.
25d0: 20 20 20 20 69 66 28 20 6e 3c 30 20 29 20 6e 20      if( n<0 ) n 
25e0: 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 73  = 0;.  }.  if( s
25f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
2600: 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49  e(argv[0])==SQLI
2610: 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e  TE_NULL ) return
2620: 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  r = sqlite3_
2630: 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28 61 72 67  value_double(arg
2640: 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 49 66 20 59  v[0]);.  /* If Y
2650: 3d 3d 30 20 61 6e 64 20 58 20 77 69 6c 6c 20 66  ==0 and X will f
2660: 69 74 20 69 6e 20 61 20 36 34 2d 62 69 74 20 69  it in a 64-bit i
2670: 6e 74 2c 0a 20 20 2a 2a 20 68 61 6e 64 6c 65 20  nt,.  ** handle 
2680: 74 68 65 20 72 6f 75 6e 64 69 6e 67 20 64 69 72  the rounding dir
2690: 65 63 74 6c 79 2c 0a 20 20 2a 2a 20 6f 74 68 65  ectly,.  ** othe
26a0: 72 77 69 73 65 20 75 73 65 20 70 72 69 6e 74 66  rwise use printf
26b0: 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6e 3d 3d  ..  */.  if( n==
26c0: 30 20 26 26 20 72 3e 3d 30 20 26 26 20 72 3c 4c  0 && r>=0 && r<L
26d0: 41 52 47 45 53 54 5f 49 4e 54 36 34 2d 31 20 29  ARGEST_INT64-1 )
26e0: 7b 0a 20 20 20 20 72 20 3d 20 28 64 6f 75 62 6c  {.    r = (doubl
26f0: 65 29 28 28 73 71 6c 69 74 65 5f 69 6e 74 36 34  e)((sqlite_int64
2700: 29 28 72 2b 30 2e 35 29 29 3b 0a 20 20 7d 65 6c  )(r+0.5));.  }el
2710: 73 65 20 69 66 28 20 6e 3d 3d 30 20 26 26 20 72  se if( n==0 && r
2720: 3c 30 20 26 26 20 28 2d 72 29 3c 4c 41 52 47 45  <0 && (-r)<LARGE
2730: 53 54 5f 49 4e 54 36 34 2d 31 20 29 7b 0a 20 20  ST_INT64-1 ){.  
2740: 20 20 72 20 3d 20 2d 28 64 6f 75 62 6c 65 29 28    r = -(double)(
2750: 28 73 71 6c 69 74 65 5f 69 6e 74 36 34 29 28 28  (sqlite_int64)((
2760: 2d 72 29 2b 30 2e 35 29 29 3b 0a 20 20 7d 65 6c  -r)+0.5));.  }el
2770: 73 65 7b 0a 20 20 20 20 7a 42 75 66 20 3d 20 73  se{.    zBuf = s
2780: 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22  qlite3_mprintf("
2790: 25 2e 2a 66 22 2c 6e 2c 72 29 3b 0a 20 20 20 20  %.*f",n,r);.    
27a0: 69 66 28 20 7a 42 75 66 3d 3d 30 20 29 7b 0a 20  if( zBuf==0 ){. 
27b0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
27c0: 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28  ult_error_nomem(
27d0: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20  context);.      
27e0: 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20  return;.    }.  
27f0: 20 20 73 71 6c 69 74 65 33 41 74 6f 46 28 7a 42    sqlite3AtoF(zB
2800: 75 66 2c 20 26 72 2c 20 73 71 6c 69 74 65 33 53  uf, &r, sqlite3S
2810: 74 72 6c 65 6e 33 30 28 7a 42 75 66 29 2c 20 53  trlen30(zBuf), S
2820: 51 4c 49 54 45 5f 55 54 46 38 29 3b 0a 20 20 20  QLITE_UTF8);.   
2830: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 42   sqlite3_free(zB
2840: 75 66 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  uf);.  }.  sqlit
2850: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
2860: 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b 0a 7d 0a  (context, r);.}.
2870: 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 41 6c  #endif../*.** Al
2880: 6c 6f 63 61 74 65 20 6e 42 79 74 65 20 62 79 74  locate nByte byt
2890: 65 73 20 6f 66 20 73 70 61 63 65 20 75 73 69 6e  es of space usin
28a0: 67 20 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 28  g sqlite3Malloc(
28b0: 29 2e 20 49 66 20 74 68 65 0a 2a 2a 20 61 6c 6c  ). If the.** all
28c0: 6f 63 61 74 69 6f 6e 20 66 61 69 6c 73 2c 20 63  ocation fails, c
28d0: 61 6c 6c 20 73 71 6c 69 74 65 33 5f 72 65 73 75  all sqlite3_resu
28e0: 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 29  lt_error_nomem()
28f0: 20 74 6f 20 6e 6f 74 69 66 79 0a 2a 2a 20 74 68   to notify.** th
2900: 65 20 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c  e database handl
2910: 65 20 74 68 61 74 20 6d 61 6c 6c 6f 63 28 29 20  e that malloc() 
2920: 68 61 73 20 66 61 69 6c 65 64 20 61 6e 64 20 72  has failed and r
2930: 65 74 75 72 6e 20 4e 55 4c 4c 2e 0a 2a 2a 20 49  eturn NULL..** I
2940: 66 20 6e 42 79 74 65 20 69 73 20 6c 61 72 67 65  f nByte is large
2950: 72 20 74 68 61 6e 20 74 68 65 20 6d 61 78 69 6d  r than the maxim
2960: 75 6d 20 73 74 72 69 6e 67 20 6f 72 20 62 6c 6f  um string or blo
2970: 62 20 6c 65 6e 67 74 68 2c 20 74 68 65 6e 0a 2a  b length, then.*
2980: 2a 20 72 61 69 73 65 20 61 6e 20 53 51 4c 49 54  * raise an SQLIT
2990: 45 5f 54 4f 4f 42 49 47 20 65 78 63 65 70 74 69  E_TOOBIG excepti
29a0: 6f 6e 20 61 6e 64 20 72 65 74 75 72 6e 20 4e 55  on and return NU
29b0: 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  LL..*/.static vo
29c0: 69 64 20 2a 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  id *contextMallo
29d0: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
29e0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 36 34 20  t *context, i64 
29f0: 6e 42 79 74 65 29 7b 0a 20 20 63 68 61 72 20 2a  nByte){.  char *
2a00: 7a 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62  z;.  sqlite3 *db
2a10: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65   = sqlite3_conte
2a20: 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e  xt_db_handle(con
2a30: 74 65 78 74 29 3b 0a 20 20 61 73 73 65 72 74 28  text);.  assert(
2a40: 20 6e 42 79 74 65 3e 30 20 29 3b 0a 20 20 74 65   nByte>0 );.  te
2a50: 73 74 63 61 73 65 28 20 6e 42 79 74 65 3d 3d 64  stcase( nByte==d
2a60: 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45  b->aLimit[SQLITE
2a70: 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29  _LIMIT_LENGTH] )
2a80: 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 42  ;.  testcase( nB
2a90: 79 74 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b  yte==db->aLimit[
2aa0: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e  SQLITE_LIMIT_LEN
2ab0: 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20  GTH]+1 );.  if( 
2ac0: 6e 42 79 74 65 3e 64 62 2d 3e 61 4c 69 6d 69 74  nByte>db->aLimit
2ad0: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45  [SQLITE_LIMIT_LE
2ae0: 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c  NGTH] ){.    sql
2af0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
2b00: 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74  r_toobig(context
2b10: 29 3b 0a 20 20 20 20 7a 20 3d 20 30 3b 0a 20 20  );.    z = 0;.  
2b20: 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 20 3d 20 73  }else{.    z = s
2b30: 71 6c 69 74 65 33 4d 61 6c 6c 6f 63 28 6e 42 79  qlite3Malloc(nBy
2b40: 74 65 29 3b 0a 20 20 20 20 69 66 28 20 21 7a 20  te);.    if( !z 
2b50: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
2b60: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f  _result_error_no
2b70: 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  mem(context);.  
2b80: 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e    }.  }.  return
2b90: 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70   z;.}../*.** Imp
2ba0: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
2bb0: 68 65 20 75 70 70 65 72 28 29 20 61 6e 64 20 6c  he upper() and l
2bc0: 6f 77 65 72 28 29 20 53 51 4c 20 66 75 6e 63 74  ower() SQL funct
2bd0: 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  ions..*/.static 
2be0: 76 6f 69 64 20 75 70 70 65 72 46 75 6e 63 28 73  void upperFunc(s
2bf0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
2c00: 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67  context, int arg
2c10: 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  c, sqlite3_value
2c20: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 68 61 72   **argv){.  char
2c30: 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73 74 20 63 68   *z1;.  const ch
2c40: 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74 20 69 2c  ar *z2;.  int i,
2c50: 20 6e 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   n;.  UNUSED_PAR
2c60: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
2c70: 7a 32 20 3d 20 28 63 68 61 72 2a 29 73 71 6c 69  z2 = (char*)sqli
2c80: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
2c90: 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20 73  rgv[0]);.  n = s
2ca0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
2cb0: 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f  es(argv[0]);.  /
2cc0: 2a 20 56 65 72 69 66 79 20 74 68 61 74 20 74 68  * Verify that th
2cd0: 65 20 63 61 6c 6c 20 74 6f 20 5f 62 79 74 65 73  e call to _bytes
2ce0: 28 29 20 64 6f 65 73 20 6e 6f 74 20 69 6e 76 61  () does not inva
2cf0: 6c 69 64 61 74 65 20 74 68 65 20 5f 74 65 78 74  lidate the _text
2d00: 28 29 20 70 6f 69 6e 74 65 72 20 2a 2f 0a 20 20  () pointer */.  
2d10: 61 73 73 65 72 74 28 20 7a 32 3d 3d 28 63 68 61  assert( z2==(cha
2d20: 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  r*)sqlite3_value
2d30: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29  _text(argv[0]) )
2d40: 3b 0a 20 20 69 66 28 20 7a 32 20 29 7b 0a 20 20  ;.  if( z2 ){.  
2d50: 20 20 7a 31 20 3d 20 63 6f 6e 74 65 78 74 4d 61    z1 = contextMa
2d60: 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28  lloc(context, ((
2d70: 69 36 34 29 6e 29 2b 31 29 3b 0a 20 20 20 20 69  i64)n)+1);.    i
2d80: 66 28 20 7a 31 20 29 7b 0a 20 20 20 20 20 20 66  f( z1 ){.      f
2d90: 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b  or(i=0; i<n; i++
2da0: 29 7b 0a 20 20 20 20 20 20 20 20 7a 31 5b 69 5d  ){.        z1[i]
2db0: 20 3d 20 28 63 68 61 72 29 73 71 6c 69 74 65 33   = (char)sqlite3
2dc0: 54 6f 75 70 70 65 72 28 7a 32 5b 69 5d 29 3b 0a  Toupper(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 73 74 61  .    }.  }.}.sta
2e20: 74 69 63 20 76 6f 69 64 20 6c 6f 77 65 72 46 75  tic void lowerFu
2e30: 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  nc(sqlite3_conte
2e40: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
2e50: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
2e60: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
2e70: 63 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73  char *z1;.  cons
2e80: 74 20 63 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e  t char *z2;.  in
2e90: 74 20 69 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44  t i, n;.  UNUSED
2ea0: 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63 29  _PARAMETER(argc)
2eb0: 3b 0a 20 20 7a 32 20 3d 20 28 63 68 61 72 2a 29  ;.  z2 = (char*)
2ec0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
2ed0: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e  xt(argv[0]);.  n
2ee0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
2ef0: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
2f00: 0a 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61  .  /* Verify tha
2f10: 74 20 74 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62  t the call to _b
2f20: 79 74 65 73 28 29 20 64 6f 65 73 20 6e 6f 74 20  ytes() does not 
2f30: 69 6e 76 61 6c 69 64 61 74 65 20 74 68 65 20 5f  invalidate the _
2f40: 74 65 78 74 28 29 20 70 6f 69 6e 74 65 72 20 2a  text() pointer *
2f50: 2f 0a 20 20 61 73 73 65 72 74 28 20 7a 32 3d 3d  /.  assert( z2==
2f60: 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76  (char*)sqlite3_v
2f70: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
2f80: 5d 29 20 29 3b 0a 20 20 69 66 28 20 7a 32 20 29  ]) );.  if( z2 )
2f90: 7b 0a 20 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65  {.    z1 = conte
2fa0: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
2fb0: 2c 20 28 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20  , ((i64)n)+1);. 
2fc0: 20 20 20 69 66 28 20 7a 31 20 29 7b 0a 20 20 20     if( z1 ){.   
2fd0: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b     for(i=0; i<n;
2fe0: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a   i++){.        z
2ff0: 31 5b 69 5d 20 3d 20 73 71 6c 69 74 65 33 54 6f  1[i] = sqlite3To
3000: 6c 6f 77 65 72 28 7a 32 5b 69 5d 29 3b 0a 20 20  lower(z2[i]);.  
3010: 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71 6c 69      }.      sqli
3020: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
3030: 63 6f 6e 74 65 78 74 2c 20 7a 31 2c 20 6e 2c 20  context, z1, n, 
3040: 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20  sqlite3_free);. 
3050: 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a     }.  }.}../*.*
3060: 2a 20 53 6f 6d 65 20 66 75 6e 63 74 69 6f 6e 73  * Some functions
3070: 20 6c 69 6b 65 20 43 4f 41 4c 45 53 43 45 28 29   like COALESCE()
3080: 20 61 6e 64 20 49 46 4e 55 4c 4c 28 29 20 61 6e   and IFNULL() an
3090: 64 20 55 4e 4c 49 4b 45 4c 59 28 29 20 61 72 65  d UNLIKELY() are
30a0: 20 69 6d 70 6c 65 6d 65 6e 74 65 64 0a 2a 2a 20   implemented.** 
30b0: 61 73 20 56 44 42 45 20 63 6f 64 65 20 73 6f 20  as VDBE code so 
30c0: 74 68 61 74 20 75 6e 75 73 65 64 20 61 72 67 75  that unused argu
30d0: 6d 65 6e 74 20 76 61 6c 75 65 73 20 64 6f 20 6e  ment values do n
30e0: 6f 74 20 68 61 76 65 20 74 6f 20 62 65 20 63 6f  ot have to be co
30f0: 6d 70 75 74 65 64 2e 0a 2a 2a 20 48 6f 77 65 76  mputed..** Howev
3100: 65 72 2c 20 77 65 20 73 74 69 6c 6c 20 6e 65 65  er, we still nee
3110: 64 20 73 6f 6d 65 20 6b 69 6e 64 20 6f 66 20 66  d some kind of f
3120: 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e  unction implemen
3130: 74 61 74 69 6f 6e 20 66 6f 72 20 74 68 69 73 0a  tation for this.
3140: 2a 2a 20 72 6f 75 74 69 6e 65 73 20 69 6e 20 74  ** routines in t
3150: 68 65 20 66 75 6e 63 74 69 6f 6e 20 74 61 62 6c  he function tabl
3160: 65 2e 20 20 54 68 65 20 6e 6f 6f 70 46 75 6e 63  e.  The noopFunc
3170: 20 6d 61 63 72 6f 20 70 72 6f 76 69 64 65 73 20   macro provides 
3180: 74 68 69 73 2e 0a 2a 2a 20 6e 6f 6f 70 46 75 6e  this..** noopFun
3190: 63 20 77 69 6c 6c 20 6e 65 76 65 72 20 62 65 20  c will never be 
31a0: 63 61 6c 6c 65 64 20 73 6f 20 69 74 20 64 6f 65  called so it doe
31b0: 73 6e 27 74 20 6d 61 74 74 65 72 20 77 68 61 74  sn't matter what
31c0: 20 74 68 65 20 69 6d 70 6c 65 6d 65 6e 74 61 74   the implementat
31d0: 69 6f 6e 0a 2a 2a 20 69 73 2e 20 20 57 65 20 6d  ion.** is.  We m
31e0: 69 67 68 74 20 61 73 20 77 65 6c 6c 20 75 73 65  ight as well use
31f0: 20 74 68 65 20 22 76 65 72 73 69 6f 6e 28 29 22   the "version()"
3200: 20 66 75 6e 63 74 69 6f 6e 20 61 73 20 61 20 73   function as a s
3210: 75 62 73 74 69 74 75 74 65 2e 0a 2a 2f 0a 23 64  ubstitute..*/.#d
3220: 65 66 69 6e 65 20 6e 6f 6f 70 46 75 6e 63 20 76  efine noopFunc v
3230: 65 72 73 69 6f 6e 46 75 6e 63 20 20 20 2f 2a 20  ersionFunc   /* 
3240: 53 75 62 73 74 69 74 75 74 65 20 66 75 6e 63 74  Substitute funct
3250: 69 6f 6e 20 2d 20 6e 65 76 65 72 20 63 61 6c 6c  ion - never call
3260: 65 64 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  ed */../*.** Imp
3270: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72  lementation of r
3280: 61 6e 64 6f 6d 28 29 2e 20 20 52 65 74 75 72 6e  andom().  Return
3290: 20 61 20 72 61 6e 64 6f 6d 20 69 6e 74 65 67 65   a random intege
32a0: 72 2e 20 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76  r.  .*/.static v
32b0: 6f 69 64 20 72 61 6e 64 6f 6d 46 75 6e 63 28 0a  oid randomFunc(.
32c0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
32d0: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
32e0: 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c  t NotUsed,.  sql
32f0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74  ite3_value **Not
3300: 55 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c 69 74  Used2.){.  sqlit
3310: 65 5f 69 6e 74 36 34 20 72 3b 0a 20 20 55 4e 55  e_int64 r;.  UNU
3320: 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e  SED_PARAMETER2(N
3330: 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32  otUsed, NotUsed2
3340: 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 61 6e  );.  sqlite3_ran
3350: 64 6f 6d 6e 65 73 73 28 73 69 7a 65 6f 66 28 72  domness(sizeof(r
3360: 29 2c 20 26 72 29 3b 0a 20 20 69 66 28 20 72 3c  ), &r);.  if( r<
3370: 30 20 29 7b 0a 20 20 20 20 2f 2a 20 57 65 20 6e  0 ){.    /* We n
3380: 65 65 64 20 74 6f 20 70 72 65 76 65 6e 74 20 61  eed to prevent a
3390: 20 72 61 6e 64 6f 6d 20 6e 75 6d 62 65 72 20 6f   random number o
33a0: 66 20 30 78 38 30 30 30 30 30 30 30 30 30 30 30  f 0x800000000000
33b0: 30 30 30 30 20 0a 20 20 20 20 2a 2a 20 28 6f 72  0000 .    ** (or
33c0: 20 2d 39 32 32 33 33 37 32 30 33 36 38 35 34 37   -92233720368547
33d0: 37 35 38 30 38 29 20 73 69 6e 63 65 20 77 68 65  75808) since whe
33e0: 6e 20 79 6f 75 20 64 6f 20 61 62 73 28 29 20 6f  n you do abs() o
33f0: 66 20 74 68 61 74 0a 20 20 20 20 2a 2a 20 6e 75  f that.    ** nu
3400: 6d 62 65 72 20 6f 66 20 79 6f 75 20 67 65 74 20  mber of you get 
3410: 74 68 65 20 73 61 6d 65 20 76 61 6c 75 65 20 62  the same value b
3420: 61 63 6b 20 61 67 61 69 6e 2e 20 20 54 6f 20 64  ack again.  To d
3430: 6f 20 74 68 69 73 0a 20 20 20 20 2a 2a 20 69 6e  o this.    ** in
3440: 20 61 20 77 61 79 20 74 68 61 74 20 69 73 20 74   a way that is t
3450: 65 73 74 61 62 6c 65 2c 20 6d 61 73 6b 20 74 68  estable, mask th
3460: 65 20 73 69 67 6e 20 62 69 74 20 6f 66 66 20 6f  e sign bit off o
3470: 66 20 6e 65 67 61 74 69 76 65 0a 20 20 20 20 2a  f negative.    *
3480: 2a 20 76 61 6c 75 65 73 2c 20 72 65 73 75 6c 74  * values, result
3490: 69 6e 67 20 69 6e 20 61 20 70 6f 73 69 74 69 76  ing in a positiv
34a0: 65 20 76 61 6c 75 65 2e 20 20 54 68 65 6e 20 74  e value.  Then t
34b0: 61 6b 65 20 74 68 65 20 0a 20 20 20 20 2a 2a 20  ake the .    ** 
34c0: 32 73 20 63 6f 6d 70 6c 65 6d 65 6e 74 20 6f 66  2s complement of
34d0: 20 74 68 61 74 20 70 6f 73 69 74 69 76 65 20 76   that positive v
34e0: 61 6c 75 65 2e 20 20 54 68 65 20 65 6e 64 20 72  alue.  The end r
34f0: 65 73 75 6c 74 20 63 61 6e 0a 20 20 20 20 2a 2a  esult can.    **
3500: 20 74 68 65 72 65 66 6f 72 65 20 62 65 20 6e 6f   therefore be no
3510: 20 6c 65 73 73 20 74 68 61 6e 20 2d 39 32 32 33   less than -9223
3520: 33 37 32 30 33 36 38 35 34 37 37 35 38 30 37 2e  372036854775807.
3530: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 72 20 3d 20  .    */.    r = 
3540: 2d 28 72 20 26 20 4c 41 52 47 45 53 54 5f 49 4e  -(r & LARGEST_IN
3550: 54 36 34 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69  T64);.  }.  sqli
3560: 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34  te3_result_int64
3570: 28 63 6f 6e 74 65 78 74 2c 20 72 29 3b 0a 7d 0a  (context, r);.}.
3580: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
3590: 61 74 69 6f 6e 20 6f 66 20 72 61 6e 64 6f 6d 62  ation of randomb
35a0: 6c 6f 62 28 4e 29 2e 20 20 52 65 74 75 72 6e 20  lob(N).  Return 
35b0: 61 20 72 61 6e 64 6f 6d 20 62 6c 6f 62 0a 2a 2a  a random blob.**
35c0: 20 74 68 61 74 20 69 73 20 4e 20 62 79 74 65 73   that is N bytes
35d0: 20 6c 6f 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63   long..*/.static
35e0: 20 76 6f 69 64 20 72 61 6e 64 6f 6d 42 6c 6f 62   void randomBlob
35f0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
3600: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
3610: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
3620: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
3630: 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 75  .){.  int n;.  u
3640: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 70 3b  nsigned char *p;
3650: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
3660: 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =1 );.  UNUSED_P
3670: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
3680: 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61    n = sqlite3_va
3690: 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29  lue_int(argv[0])
36a0: 3b 0a 20 20 69 66 28 20 6e 3c 31 20 29 7b 0a 20  ;.  if( n<1 ){. 
36b0: 20 20 20 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20 20     n = 1;.  }.  
36c0: 70 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  p = contextMallo
36d0: 63 28 63 6f 6e 74 65 78 74 2c 20 6e 29 3b 0a 20  c(context, n);. 
36e0: 20 69 66 28 20 70 20 29 7b 0a 20 20 20 20 73 71   if( p ){.    sq
36f0: 6c 69 74 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73  lite3_randomness
3700: 28 6e 2c 20 70 29 3b 0a 20 20 20 20 73 71 6c 69  (n, p);.    sqli
3710: 74 65 33 5f 72 65 73 75 6c 74 5f 62 6c 6f 62 28  te3_result_blob(
3720: 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29  context, (char*)
3730: 70 2c 20 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72  p, n, sqlite3_fr
3740: 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  ee);.  }.}../*.*
3750: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
3760: 20 6f 66 20 74 68 65 20 6c 61 73 74 5f 69 6e 73   of the last_ins
3770: 65 72 74 5f 72 6f 77 69 64 28 29 20 53 51 4c 20  ert_rowid() SQL 
3780: 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72  function.  The r
3790: 65 74 75 72 6e 0a 2a 2a 20 76 61 6c 75 65 20 69  eturn.** value i
37a0: 73 20 74 68 65 20 73 61 6d 65 20 61 73 20 74 68  s the same as th
37b0: 65 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69  e sqlite3_last_i
37c0: 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20 41 50  nsert_rowid() AP
37d0: 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73  I function..*/.s
37e0: 74 61 74 69 63 20 76 6f 69 64 20 6c 61 73 74 5f  tatic void last_
37f0: 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 0a 20 20  insert_rowid(.  
3800: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
3810: 2a 63 6f 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74  *context, .  int
3820: 20 4e 6f 74 55 73 65 64 2c 20 0a 20 20 73 71 6c   NotUsed, .  sql
3830: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74  ite3_value **Not
3840: 55 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c 69 74  Used2.){.  sqlit
3850: 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33  e3 *db = sqlite3
3860: 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64  _context_db_hand
3870: 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55  le(context);.  U
3880: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32  NUSED_PARAMETER2
3890: 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65  (NotUsed, NotUse
38a0: 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52  d2);.  /* IMP: R
38b0: 2d 35 31 35 31 33 2d 31 32 30 32 36 20 54 68 65  -51513-12026 The
38c0: 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77   last_insert_row
38d0: 69 64 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f  id() SQL functio
38e0: 6e 20 69 73 20 61 0a 20 20 2a 2a 20 77 72 61 70  n is a.  ** wrap
38f0: 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 20 73  per around the s
3900: 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65  qlite3_last_inse
3910: 72 74 5f 72 6f 77 69 64 28 29 20 43 2f 43 2b 2b  rt_rowid() C/C++
3920: 20 69 6e 74 65 72 66 61 63 65 0a 20 20 2a 2a 20   interface.  ** 
3930: 66 75 6e 63 74 69 6f 6e 2e 20 2a 2f 0a 20 20 73  function. */.  s
3940: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
3950: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  t64(context, sql
3960: 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74  ite3_last_insert
3970: 5f 72 6f 77 69 64 28 64 62 29 29 3b 0a 7d 0a 0a  _rowid(db));.}..
3980: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
3990: 74 69 6f 6e 20 6f 66 20 74 68 65 20 63 68 61 6e  tion of the chan
39a0: 67 65 73 28 29 20 53 51 4c 20 66 75 6e 63 74 69  ges() SQL functi
39b0: 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52  on..**.** IMP: R
39c0: 2d 36 32 30 37 33 2d 31 31 32 30 39 20 54 68 65  -62073-11209 The
39d0: 20 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66   changes() SQL f
39e0: 75 6e 63 74 69 6f 6e 20 69 73 20 61 20 77 72 61  unction is a wra
39f0: 70 70 65 72 0a 2a 2a 20 61 72 6f 75 6e 64 20 74  pper.** around t
3a00: 68 65 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67  he sqlite3_chang
3a10: 65 73 28 29 20 43 2f 43 2b 2b 20 66 75 6e 63 74  es() C/C++ funct
3a20: 69 6f 6e 20 61 6e 64 20 68 65 6e 63 65 20 66 6f  ion and hence fo
3a30: 6c 6c 6f 77 73 20 74 68 65 20 73 61 6d 65 0a 2a  llows the same.*
3a40: 2a 20 72 75 6c 65 73 20 66 6f 72 20 63 6f 75 6e  * rules for coun
3a50: 74 69 6e 67 20 63 68 61 6e 67 65 73 2e 0a 2a 2f  ting changes..*/
3a60: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 68 61  .static void cha
3a70: 6e 67 65 73 28 0a 20 20 73 71 6c 69 74 65 33 5f  nges(.  sqlite3_
3a80: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
3a90: 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c  ,.  int NotUsed,
3aa0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
3ab0: 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20   **NotUsed2.){. 
3ac0: 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73   sqlite3 *db = s
3ad0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64  qlite3_context_d
3ae0: 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74  b_handle(context
3af0: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
3b00: 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20  METER2(NotUsed, 
3b10: 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 73 71 6c  NotUsed2);.  sql
3b20: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28  ite3_result_int(
3b30: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
3b40: 5f 63 68 61 6e 67 65 73 28 64 62 29 29 3b 0a 7d  _changes(db));.}
3b50: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
3b60: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 74 6f  tation of the to
3b70: 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20 53 51  tal_changes() SQ
3b80: 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65  L function.  The
3b90: 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73   return value is
3ba0: 0a 2a 2a 20 74 68 65 20 73 61 6d 65 20 61 73 20  .** the same as 
3bb0: 74 68 65 20 73 71 6c 69 74 65 33 5f 74 6f 74 61  the sqlite3_tota
3bc0: 6c 5f 63 68 61 6e 67 65 73 28 29 20 41 50 49 20  l_changes() API 
3bd0: 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61  function..*/.sta
3be0: 74 69 63 20 76 6f 69 64 20 74 6f 74 61 6c 5f 63  tic void total_c
3bf0: 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69 74 65  hanges(.  sqlite
3c00: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
3c10: 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  xt,.  int NotUse
3c20: 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  d,.  sqlite3_val
3c30: 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b  ue **NotUsed2.){
3c40: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d  .  sqlite3 *db =
3c50: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
3c60: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
3c70: 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  xt);.  UNUSED_PA
3c80: 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64  RAMETER2(NotUsed
3c90: 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f  , NotUsed2);.  /
3ca0: 2a 20 49 4d 50 3a 20 52 2d 35 32 37 35 36 2d 34  * IMP: R-52756-4
3cb0: 31 39 39 33 20 54 68 69 73 20 66 75 6e 63 74 69  1993 This functi
3cc0: 6f 6e 20 69 73 20 61 20 77 72 61 70 70 65 72 20  on is a wrapper 
3cd0: 61 72 6f 75 6e 64 20 74 68 65 0a 20 20 2a 2a 20  around the.  ** 
3ce0: 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68  sqlite3_total_ch
3cf0: 61 6e 67 65 73 28 29 20 43 2f 43 2b 2b 20 69 6e  anges() C/C++ in
3d00: 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20 20 73 71  terface. */.  sq
3d10: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
3d20: 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65  (context, sqlite
3d30: 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28  3_total_changes(
3d40: 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41  db));.}../*.** A
3d50: 20 73 74 72 75 63 74 75 72 65 20 64 65 66 69 6e   structure defin
3d60: 69 6e 67 20 68 6f 77 20 74 6f 20 64 6f 20 47 4c  ing how to do GL
3d70: 4f 42 2d 73 74 79 6c 65 20 63 6f 6d 70 61 72 69  OB-style compari
3d80: 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72 75 63 74 20  sons..*/.struct 
3d90: 63 6f 6d 70 61 72 65 49 6e 66 6f 20 7b 0a 20 20  compareInfo {.  
3da0: 75 38 20 6d 61 74 63 68 41 6c 6c 3b 0a 20 20 75  u8 matchAll;.  u
3db0: 38 20 6d 61 74 63 68 4f 6e 65 3b 0a 20 20 75 38  8 matchOne;.  u8
3dc0: 20 6d 61 74 63 68 53 65 74 3b 0a 20 20 75 38 20   matchSet;.  u8 
3dd0: 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a  noCase;.};../*.*
3de0: 2a 20 46 6f 72 20 4c 49 4b 45 20 61 6e 64 20 47  * For LIKE and G
3df0: 4c 4f 42 20 6d 61 74 63 68 69 6e 67 20 6f 6e 20  LOB matching on 
3e00: 45 42 43 44 49 43 20 6d 61 63 68 69 6e 65 73 2c  EBCDIC machines,
3e10: 20 61 73 73 75 6d 65 20 74 68 61 74 20 65 76 65   assume that eve
3e20: 72 79 0a 2a 2a 20 63 68 61 72 61 63 74 65 72 20  ry.** character 
3e30: 69 73 20 65 78 61 63 74 6c 79 20 6f 6e 65 20 62  is exactly one b
3e40: 79 74 65 20 69 6e 20 73 69 7a 65 2e 20 20 41 6c  yte in size.  Al
3e50: 73 6f 2c 20 70 72 6f 76 64 65 20 74 68 65 20 55  so, provde the U
3e60: 74 66 38 52 65 61 64 28 29 0a 2a 2a 20 6d 61 63  tf8Read().** mac
3e70: 72 6f 20 66 6f 72 20 66 61 73 74 20 72 65 61 64  ro for fast read
3e80: 69 6e 67 20 6f 66 20 74 68 65 20 6e 65 78 74 20  ing of the next 
3e90: 63 68 61 72 61 63 74 65 72 20 69 6e 20 74 68 65  character in the
3ea0: 20 63 6f 6d 6d 6f 6e 20 63 61 73 65 20 77 68 65   common case whe
3eb0: 72 65 0a 2a 2a 20 74 68 65 20 6e 65 78 74 20 63  re.** the next c
3ec0: 68 61 72 61 63 74 65 72 20 69 73 20 41 53 43 49  haracter is ASCI
3ed0: 49 2e 0a 2a 2f 0a 23 69 66 20 64 65 66 69 6e 65  I..*/.#if define
3ee0: 64 28 53 51 4c 49 54 45 5f 45 42 43 44 49 43 29  d(SQLITE_EBCDIC)
3ef0: 0a 23 20 64 65 66 69 6e 65 20 73 71 6c 69 74 65  .# define sqlite
3f00: 33 55 74 66 38 52 65 61 64 28 41 29 20 20 20 20  3Utf8Read(A)    
3f10: 20 20 20 20 28 2a 28 28 2a 41 29 2b 2b 29 29 0a      (*((*A)++)).
3f20: 23 20 64 65 66 69 6e 65 20 55 74 66 38 52 65 61  # define Utf8Rea
3f30: 64 28 41 29 20 20 20 20 20 20 20 20 20 20 20 20  d(A)            
3f40: 20 20 20 28 2a 28 41 2b 2b 29 29 0a 23 65 6c 73     (*(A++)).#els
3f50: 65 0a 23 20 64 65 66 69 6e 65 20 55 74 66 38 52  e.# define Utf8R
3f60: 65 61 64 28 41 29 20 20 20 20 20 20 20 20 20 20  ead(A)          
3f70: 20 20 20 20 20 28 41 5b 30 5d 3c 30 78 38 30 3f       (A[0]<0x80?
3f80: 2a 28 41 2b 2b 29 3a 73 71 6c 69 74 65 33 55 74  *(A++):sqlite3Ut
3f90: 66 38 52 65 61 64 28 26 41 29 29 0a 23 65 6e 64  f8Read(&A)).#end
3fa0: 69 66 0a 0a 73 74 61 74 69 63 20 63 6f 6e 73 74  if..static const
3fb0: 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49   struct compareI
3fc0: 6e 66 6f 20 67 6c 6f 62 49 6e 66 6f 20 3d 20 7b  nfo globInfo = {
3fd0: 20 27 2a 27 2c 20 27 3f 27 2c 20 27 5b 27 2c 20   '*', '?', '[', 
3fe0: 30 20 7d 3b 0a 2f 2a 20 54 68 65 20 63 6f 72 72  0 };./* The corr
3ff0: 65 63 74 20 53 51 4c 2d 39 32 20 62 65 68 61 76  ect SQL-92 behav
4000: 69 6f 72 20 69 73 20 66 6f 72 20 74 68 65 20 4c  ior is for the L
4010: 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 74 6f 20  IKE operator to 
4020: 69 67 6e 6f 72 65 0a 2a 2a 20 63 61 73 65 2e 20  ignore.** case. 
4030: 20 54 68 75 73 20 20 27 61 27 20 4c 49 4b 45 20   Thus  'a' LIKE 
4040: 27 41 27 20 77 6f 75 6c 64 20 62 65 20 74 72 75  'A' would be tru
4050: 65 2e 20 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e  e. */.static con
4060: 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72  st struct compar
4070: 65 49 6e 66 6f 20 6c 69 6b 65 49 6e 66 6f 4e 6f  eInfo likeInfoNo
4080: 72 6d 20 3d 20 7b 20 27 25 27 2c 20 27 5f 27 2c  rm = { '%', '_',
4090: 20 20 20 30 2c 20 31 20 7d 3b 0a 2f 2a 20 49 66     0, 1 };./* If
40a0: 20 53 51 4c 49 54 45 5f 43 41 53 45 5f 53 45 4e   SQLITE_CASE_SEN
40b0: 53 49 54 49 56 45 5f 4c 49 4b 45 20 69 73 20 64  SITIVE_LIKE is d
40c0: 65 66 69 6e 65 64 2c 20 74 68 65 6e 20 74 68 65  efined, then the
40d0: 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 0a 2a   LIKE operator.*
40e0: 2a 20 69 73 20 63 61 73 65 20 73 65 6e 73 69 74  * is case sensit
40f0: 69 76 65 20 63 61 75 73 69 6e 67 20 27 61 27 20  ive causing 'a' 
4100: 4c 49 4b 45 20 27 41 27 20 74 6f 20 62 65 20 66  LIKE 'A' to be f
4110: 61 6c 73 65 20 2a 2f 0a 73 74 61 74 69 63 20 63  alse */.static c
4120: 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70  onst struct comp
4130: 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e 66 6f  areInfo likeInfo
4140: 41 6c 74 20 3d 20 7b 20 27 25 27 2c 20 27 5f 27  Alt = { '%', '_'
4150: 2c 20 20 20 30 2c 20 30 20 7d 3b 0a 0a 2f 2a 0a  ,   0, 0 };../*.
4160: 2a 2a 20 43 6f 6d 70 61 72 65 20 74 77 6f 20 55  ** Compare two U
4170: 54 46 2d 38 20 73 74 72 69 6e 67 73 20 66 6f 72  TF-8 strings for
4180: 20 65 71 75 61 6c 69 74 79 20 77 68 65 72 65 20   equality where 
4190: 74 68 65 20 66 69 72 73 74 20 73 74 72 69 6e 67  the first string
41a0: 20 63 61 6e 0a 2a 2a 20 70 6f 74 65 6e 74 69 61   can.** potentia
41b0: 6c 6c 79 20 62 65 20 61 20 22 67 6c 6f 62 22 20  lly be a "glob" 
41c0: 6f 72 20 22 6c 69 6b 65 22 20 65 78 70 72 65 73  or "like" expres
41d0: 73 69 6f 6e 2e 20 20 52 65 74 75 72 6e 20 74 72  sion.  Return tr
41e0: 75 65 20 28 31 29 20 69 66 20 74 68 65 79 0a 2a  ue (1) if they.*
41f0: 2a 20 61 72 65 20 74 68 65 20 73 61 6d 65 20 61  * are the same a
4200: 6e 64 20 66 61 6c 73 65 20 28 30 29 20 69 66 20  nd false (0) if 
4210: 74 68 65 79 20 61 72 65 20 64 69 66 66 65 72 65  they are differe
4220: 6e 74 2e 0a 2a 2a 0a 2a 2a 20 47 6c 6f 62 62 69  nt..**.** Globbi
4230: 6e 67 20 72 75 6c 65 73 3a 0a 2a 2a 0a 2a 2a 20  ng rules:.**.** 
4240: 20 20 20 20 20 27 2a 27 20 20 20 20 20 20 20 4d       '*'       M
4250: 61 74 63 68 65 73 20 61 6e 79 20 73 65 71 75 65  atches any seque
4260: 6e 63 65 20 6f 66 20 7a 65 72 6f 20 6f 72 20 6d  nce of zero or m
4270: 6f 72 65 20 63 68 61 72 61 63 74 65 72 73 2e 0a  ore characters..
4280: 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 3f 27 20 20  **.**      '?'  
4290: 20 20 20 20 20 4d 61 74 63 68 65 73 20 65 78 61       Matches exa
42a0: 63 74 6c 79 20 6f 6e 65 20 63 68 61 72 61 63 74  ctly one charact
42b0: 65 72 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 5b 2e  er..**.**     [.
42c0: 2e 2e 5d 20 20 20 20 20 20 4d 61 74 63 68 65 73  ..]      Matches
42d0: 20 6f 6e 65 20 63 68 61 72 61 63 74 65 72 20 66   one character f
42e0: 72 6f 6d 20 74 68 65 20 65 6e 63 6c 6f 73 65 64  rom the enclosed
42f0: 20 6c 69 73 74 20 6f 66 0a 2a 2a 20 20 20 20 20   list of.**     
4300: 20 20 20 20 20 20 20 20 20 20 20 63 68 61 72 61             chara
4310: 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 20  cters..**.**    
4320: 20 5b 5e 2e 2e 2e 5d 20 20 20 20 20 4d 61 74 63   [^...]     Matc
4330: 68 65 73 20 6f 6e 65 20 63 68 61 72 61 63 74 65  hes one characte
4340: 72 20 6e 6f 74 20 69 6e 20 74 68 65 20 65 6e 63  r not in the enc
4350: 6c 6f 73 65 64 20 6c 69 73 74 2e 0a 2a 2a 0a 2a  losed list..**.*
4360: 2a 20 57 69 74 68 20 74 68 65 20 5b 2e 2e 2e 5d  * With the [...]
4370: 20 61 6e 64 20 5b 5e 2e 2e 2e 5d 20 6d 61 74 63   and [^...] matc
4380: 68 69 6e 67 2c 20 61 20 27 5d 27 20 63 68 61 72  hing, a ']' char
4390: 61 63 74 65 72 20 63 61 6e 20 62 65 20 69 6e 63  acter can be inc
43a0: 6c 75 64 65 64 0a 2a 2a 20 69 6e 20 74 68 65 20  luded.** in the 
43b0: 6c 69 73 74 20 62 79 20 6d 61 6b 69 6e 67 20 69  list by making i
43c0: 74 20 74 68 65 20 66 69 72 73 74 20 63 68 61 72  t the first char
43d0: 61 63 74 65 72 20 61 66 74 65 72 20 27 5b 27 20  acter after '[' 
43e0: 6f 72 20 27 5e 27 2e 20 20 41 0a 2a 2a 20 72 61  or '^'.  A.** ra
43f0: 6e 67 65 20 6f 66 20 63 68 61 72 61 63 74 65 72  nge of character
4400: 73 20 63 61 6e 20 62 65 20 73 70 65 63 69 66 69  s can be specifi
4410: 65 64 20 75 73 69 6e 67 20 27 2d 27 2e 20 20 45  ed using '-'.  E
4420: 78 61 6d 70 6c 65 3a 0a 2a 2a 20 22 5b 61 2d 7a  xample:.** "[a-z
4430: 5d 22 20 6d 61 74 63 68 65 73 20 61 6e 79 20 73  ]" matches any s
4440: 69 6e 67 6c 65 20 6c 6f 77 65 72 2d 63 61 73 65  ingle lower-case
4450: 20 6c 65 74 74 65 72 2e 20 20 54 6f 20 6d 61 74   letter.  To mat
4460: 63 68 20 61 20 27 2d 27 2c 20 6d 61 6b 65 0a 2a  ch a '-', make.*
4470: 2a 20 69 74 20 74 68 65 20 6c 61 73 74 20 63 68  * it the last ch
4480: 61 72 61 63 74 65 72 20 69 6e 20 74 68 65 20 6c  aracter in the l
4490: 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 4c 69 6b 65 20  ist..**.** Like 
44a0: 6d 61 74 63 68 69 6e 67 20 72 75 6c 65 73 3a 0a  matching rules:.
44b0: 2a 2a 20 0a 2a 2a 20 20 20 20 20 20 27 25 27 20  ** .**      '%' 
44c0: 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 61 6e        Matches an
44d0: 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20 7a 65  y sequence of ze
44e0: 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61 72 61  ro or more chara
44f0: 63 74 65 72 73 0a 2a 2a 0a 2a 2a 2a 20 20 20 20  cters.**.***    
4500: 20 27 5f 27 20 20 20 20 20 20 20 4d 61 74 63 68   '_'       Match
4510: 65 73 20 61 6e 79 20 6f 6e 65 20 63 68 61 72 61  es any one chara
4520: 63 74 65 72 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  cter.**.**      
4530: 45 63 20 20 20 20 20 20 20 20 57 68 65 72 65 20  Ec        Where 
4540: 45 20 69 73 20 74 68 65 20 22 65 73 63 22 20 63  E is the "esc" c
4550: 68 61 72 61 63 74 65 72 20 61 6e 64 20 63 20 69  haracter and c i
4560: 73 20 61 6e 79 20 6f 74 68 65 72 0a 2a 2a 20 20  s any other.**  
4570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 68                ch
4580: 61 72 61 63 74 65 72 2c 20 69 6e 63 6c 75 64 69  aracter, includi
4590: 6e 67 20 27 25 27 2c 20 27 5f 27 2c 20 61 6e 64  ng '%', '_', and
45a0: 20 65 73 63 2c 20 6d 61 74 63 68 20 65 78 61 63   esc, match exac
45b0: 74 6c 79 20 63 2e 0a 2a 2a 0a 2a 2a 20 54 68 65  tly c..**.** The
45c0: 20 63 6f 6d 6d 65 6e 74 73 20 77 69 74 68 69 6e   comments within
45d0: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 75 73   this routine us
45e0: 75 61 6c 6c 79 20 61 73 73 75 6d 65 20 67 6c 6f  ually assume glo
45f0: 62 20 6d 61 74 63 68 69 6e 67 2e 0a 2a 2a 0a 2a  b matching..**.*
4600: 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69  * This routine i
4610: 73 20 75 73 75 61 6c 6c 79 20 71 75 69 63 6b 2c  s usually quick,
4620: 20 62 75 74 20 63 61 6e 20 62 65 20 4e 2a 2a 32   but can be N**2
4630: 20 69 6e 20 74 68 65 20 77 6f 72 73 74 20 63 61   in the worst ca
4640: 73 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  se..*/.static in
4650: 74 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65  t patternCompare
4660: 28 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 50  (.  const u8 *zP
4670: 61 74 74 65 72 6e 2c 20 20 20 20 20 20 20 20 20  attern,         
4680: 20 20 20 20 20 2f 2a 20 54 68 65 20 67 6c 6f 62       /* The glob
4690: 20 70 61 74 74 65 72 6e 20 2a 2f 0a 20 20 63 6f   pattern */.  co
46a0: 6e 73 74 20 75 38 20 2a 7a 53 74 72 69 6e 67 2c  nst u8 *zString,
46b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
46c0: 2a 20 54 68 65 20 73 74 72 69 6e 67 20 74 6f 20  * The string to 
46d0: 63 6f 6d 70 61 72 65 20 61 67 61 69 6e 73 74 20  compare against 
46e0: 74 68 65 20 67 6c 6f 62 20 2a 2f 0a 20 20 63 6f  the glob */.  co
46f0: 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61  nst struct compa
4700: 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 2c 20 2f  reInfo *pInfo, /
4710: 2a 20 49 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62  * Information ab
4720: 6f 75 74 20 68 6f 77 20 74 6f 20 64 6f 20 74 68  out how to do th
4730: 65 20 63 6f 6d 70 61 72 65 20 2a 2f 0a 20 20 75  e compare */.  u
4740: 33 32 20 65 73 63 20 20 20 20 20 20 20 20 20 20  32 esc          
4750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4760: 2f 2a 20 54 68 65 20 65 73 63 61 70 65 20 63 68  /* The escape ch
4770: 61 72 61 63 74 65 72 20 2a 2f 0a 29 7b 0a 20 20  aracter */.){.  
4780: 75 33 32 20 63 2c 20 63 32 3b 20 20 20 20 20 20  u32 c, c2;      
4790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
47a0: 20 2f 2a 20 4e 65 78 74 20 70 61 74 74 65 72 6e   /* Next pattern
47b0: 20 61 6e 64 20 69 6e 70 75 74 20 73 74 72 69 6e   and input strin
47c0: 67 20 63 68 61 72 73 20 2a 2f 0a 20 20 75 33 32  g chars */.  u32
47d0: 20 6d 61 74 63 68 4f 6e 65 20 3d 20 70 49 6e 66   matchOne = pInf
47e0: 6f 2d 3e 6d 61 74 63 68 4f 6e 65 3b 20 20 2f 2a  o->matchOne;  /*
47f0: 20 22 3f 22 20 6f 72 20 22 5f 22 20 2a 2f 0a 20   "?" or "_" */. 
4800: 20 75 33 32 20 6d 61 74 63 68 41 6c 6c 20 3d 20   u32 matchAll = 
4810: 70 49 6e 66 6f 2d 3e 6d 61 74 63 68 41 6c 6c 3b  pInfo->matchAll;
4820: 20 20 2f 2a 20 22 2a 22 20 6f 72 20 22 25 22 20    /* "*" or "%" 
4830: 2a 2f 0a 20 20 75 33 32 20 6d 61 74 63 68 4f 74  */.  u32 matchOt
4840: 68 65 72 3b 20 20 20 20 20 20 20 20 20 20 20 20  her;            
4850: 20 20 20 20 20 20 2f 2a 20 22 5b 22 20 6f 72 20        /* "[" or 
4860: 74 68 65 20 65 73 63 61 70 65 20 63 68 61 72 61  the escape chara
4870: 63 74 65 72 20 2a 2f 0a 20 20 75 38 20 6e 6f 43  cter */.  u8 noC
4880: 61 73 65 20 3d 20 70 49 6e 66 6f 2d 3e 6e 6f 43  ase = pInfo->noC
4890: 61 73 65 3b 20 20 20 20 20 20 20 2f 2a 20 54 72  ase;       /* Tr
48a0: 75 65 20 69 66 20 75 70 70 65 72 63 61 73 65 3d  ue if uppercase=
48b0: 3d 6c 6f 77 65 72 63 61 73 65 20 2a 2f 0a 20 20  =lowercase */.  
48c0: 63 6f 6e 73 74 20 75 38 20 2a 7a 45 73 63 61 70  const u8 *zEscap
48d0: 65 64 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20  ed = 0;         
48e0: 20 2f 2a 20 4f 6e 65 20 70 61 73 74 20 74 68 65   /* One past the
48f0: 20 6c 61 73 74 20 65 73 63 61 70 65 64 20 69 6e   last escaped in
4900: 70 75 74 20 63 68 61 72 20 2a 2f 0a 20 20 0a 20  put char */.  . 
4910: 20 2f 2a 20 54 68 65 20 47 4c 4f 42 20 6f 70 65   /* The GLOB ope
4920: 72 61 74 6f 72 20 64 6f 65 73 20 6e 6f 74 20 68  rator does not h
4930: 61 76 65 20 61 6e 20 45 53 43 41 50 45 20 63 6c  ave an ESCAPE cl
4940: 61 75 73 65 2e 20 20 41 6e 64 20 4c 49 4b 45 20  ause.  And LIKE 
4950: 64 6f 65 73 20 6e 6f 74 0a 20 20 2a 2a 20 68 61  does not.  ** ha
4960: 76 65 20 74 68 65 20 6d 61 74 63 68 53 65 74 20  ve the matchSet 
4970: 6f 70 65 72 61 74 6f 72 2e 20 20 53 6f 20 77 65  operator.  So we
4980: 20 65 69 74 68 65 72 20 68 61 76 65 20 74 6f 20   either have to 
4990: 6c 6f 6f 6b 20 66 6f 72 20 6f 6e 65 20 6f 72 0a  look for one or.
49a0: 20 20 2a 2a 20 74 68 65 20 6f 74 68 65 72 2c 20    ** the other, 
49b0: 6e 65 76 65 72 20 62 6f 74 68 2e 20 20 48 65 6e  never both.  Hen
49c0: 63 65 20 74 68 65 20 73 69 6e 67 6c 65 20 76 61  ce the single va
49d0: 72 69 61 62 6c 65 20 6d 61 74 63 68 4f 74 68 65  riable matchOthe
49e0: 72 20 69 73 20 75 73 65 64 0a 20 20 2a 2a 20 74  r is used.  ** t
49f0: 6f 20 73 74 6f 72 65 20 74 68 65 20 6f 6e 65 20  o store the one 
4a00: 77 65 20 68 61 76 65 20 74 6f 20 6c 6f 6f 6b 20  we have to look 
4a10: 66 6f 72 2e 0a 20 20 2a 2f 0a 20 20 6d 61 74 63  for..  */.  matc
4a20: 68 4f 74 68 65 72 20 3d 20 65 73 63 20 3f 20 65  hOther = esc ? e
4a30: 73 63 20 3a 20 70 49 6e 66 6f 2d 3e 6d 61 74 63  sc : pInfo->matc
4a40: 68 53 65 74 3b 0a 0a 20 20 77 68 69 6c 65 28 20  hSet;..  while( 
4a50: 28 63 20 3d 20 55 74 66 38 52 65 61 64 28 7a 50  (c = Utf8Read(zP
4a60: 61 74 74 65 72 6e 29 29 21 3d 30 20 29 7b 0a 20  attern))!=0 ){. 
4a70: 20 20 20 69 66 28 20 63 3d 3d 6d 61 74 63 68 41     if( c==matchA
4a80: 6c 6c 20 29 7b 20 20 2f 2a 20 4d 61 74 63 68 20  ll ){  /* Match 
4a90: 22 2a 22 20 2a 2f 0a 20 20 20 20 20 20 2f 2a 20  "*" */.      /* 
4aa0: 53 6b 69 70 20 6f 76 65 72 20 6d 75 6c 74 69 70  Skip over multip
4ab0: 6c 65 20 22 2a 22 20 63 68 61 72 61 63 74 65 72  le "*" character
4ac0: 73 20 69 6e 20 74 68 65 20 70 61 74 74 65 72 6e  s in the pattern
4ad0: 2e 20 20 49 66 20 74 68 65 72 65 0a 20 20 20 20  .  If there.    
4ae0: 20 20 2a 2a 20 61 72 65 20 61 6c 73 6f 20 22 3f    ** are also "?
4af0: 22 20 63 68 61 72 61 63 74 65 72 73 2c 20 73 6b  " characters, sk
4b00: 69 70 20 74 68 6f 73 65 20 61 73 20 77 65 6c 6c  ip those as well
4b10: 2c 20 62 75 74 20 63 6f 6e 73 75 6d 65 20 61 0a  , but consume a.
4b20: 20 20 20 20 20 20 2a 2a 20 73 69 6e 67 6c 65 20        ** single 
4b30: 63 68 61 72 61 63 74 65 72 20 6f 66 20 74 68 65  character of the
4b40: 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 66 6f   input string fo
4b50: 72 20 65 61 63 68 20 22 3f 22 20 73 6b 69 70 70  r each "?" skipp
4b60: 65 64 20 2a 2f 0a 20 20 20 20 20 20 77 68 69 6c  ed */.      whil
4b70: 65 28 20 28 63 3d 55 74 66 38 52 65 61 64 28 7a  e( (c=Utf8Read(z
4b80: 50 61 74 74 65 72 6e 29 29 20 3d 3d 20 6d 61 74  Pattern)) == mat
4b90: 63 68 41 6c 6c 20 7c 7c 20 63 20 3d 3d 20 6d 61  chAll || c == ma
4ba0: 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20 20 20 20  tchOne ){.      
4bb0: 20 20 69 66 28 20 63 3d 3d 6d 61 74 63 68 4f 6e    if( c==matchOn
4bc0: 65 20 26 26 20 73 71 6c 69 74 65 33 55 74 66 38  e && sqlite3Utf8
4bd0: 52 65 61 64 28 26 7a 53 74 72 69 6e 67 29 3d 3d  Read(&zString)==
4be0: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72  0 ){.          r
4bf0: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 20  eturn 0;.       
4c00: 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20   }.      }.     
4c10: 20 69 66 28 20 63 3d 3d 30 20 29 7b 0a 20 20 20   if( c==0 ){.   
4c20: 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b 20 20       return 1;  
4c30: 20 2f 2a 20 22 2a 22 20 61 74 20 74 68 65 20 65   /* "*" at the e
4c40: 6e 64 20 6f 66 20 74 68 65 20 70 61 74 74 65 72  nd of the patter
4c50: 6e 20 6d 61 74 63 68 65 73 20 2a 2f 0a 20 20 20  n matches */.   
4c60: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d     }else if( c==
4c70: 6d 61 74 63 68 4f 74 68 65 72 20 29 7b 0a 20 20  matchOther ){.  
4c80: 20 20 20 20 20 20 69 66 28 20 65 73 63 20 29 7b        if( esc ){
4c90: 0a 20 20 20 20 20 20 20 20 20 20 63 20 3d 20 73  .          c = s
4ca0: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26  qlite3Utf8Read(&
4cb0: 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20  zPattern);.     
4cc0: 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29 20       if( c==0 ) 
4cd0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20  return 0;.      
4ce0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20    }else{.       
4cf0: 20 20 20 2f 2a 20 22 5b 2e 2e 2e 5d 22 20 69 6d     /* "[...]" im
4d00: 6d 65 64 69 61 74 65 6c 79 20 66 6f 6c 6c 6f 77  mediately follow
4d10: 73 20 74 68 65 20 22 2a 22 2e 20 20 57 65 20 68  s the "*".  We h
4d20: 61 76 65 20 74 6f 20 64 6f 20 61 20 73 6c 6f 77  ave to do a slow
4d30: 0a 20 20 20 20 20 20 20 20 20 20 2a 2a 20 72 65  .          ** re
4d40: 63 75 72 73 69 76 65 20 73 65 61 72 63 68 20 69  cursive search i
4d50: 6e 20 74 68 69 73 20 63 61 73 65 2c 20 62 75 74  n this case, but
4d60: 20 69 74 20 69 73 20 61 6e 20 75 6e 75 73 75 61   it is an unusua
4d70: 6c 20 63 61 73 65 2e 20 2a 2f 0a 20 20 20 20 20  l case. */.     
4d80: 20 20 20 20 20 61 73 73 65 72 74 28 20 6d 61 74       assert( mat
4d90: 63 68 4f 74 68 65 72 3c 30 78 38 30 20 29 3b 20  chOther<0x80 ); 
4da0: 20 2f 2a 20 27 5b 27 20 69 73 20 61 20 73 69 6e   /* '[' is a sin
4db0: 67 6c 65 2d 62 79 74 65 20 63 68 61 72 61 63 74  gle-byte charact
4dc0: 65 72 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20  er */.          
4dd0: 77 68 69 6c 65 28 20 2a 7a 53 74 72 69 6e 67 0a  while( *zString.
4de0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4df0: 20 26 26 20 70 61 74 74 65 72 6e 43 6f 6d 70 61   && patternCompa
4e00: 72 65 28 26 7a 50 61 74 74 65 72 6e 5b 2d 31 5d  re(&zPattern[-1]
4e10: 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65  ,zString,pInfo,e
4e20: 73 63 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  sc)==0 ){.      
4e30: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
4e40: 50 5f 55 54 46 38 28 7a 53 74 72 69 6e 67 29 3b  P_UTF8(zString);
4e50: 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20  .          }.   
4e60: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 2a 7a         return *z
4e70: 53 74 72 69 6e 67 21 3d 30 3b 0a 20 20 20 20 20  String!=0;.     
4e80: 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 0a 20 20     }.      }..  
4e90: 20 20 20 20 2f 2a 20 41 74 20 74 68 69 73 20 70      /* At this p
4ea0: 6f 69 6e 74 20 76 61 72 69 61 62 6c 65 20 63 20  oint variable c 
4eb0: 63 6f 6e 74 61 69 6e 73 20 74 68 65 20 66 69 72  contains the fir
4ec0: 73 74 20 63 68 61 72 61 63 74 65 72 20 6f 66 20  st character of 
4ed0: 74 68 65 0a 20 20 20 20 20 20 2a 2a 20 70 61 74  the.      ** pat
4ee0: 74 65 72 6e 20 73 74 72 69 6e 67 20 70 61 73 74  tern string past
4ef0: 20 74 68 65 20 22 2a 22 2e 20 20 53 65 61 72 63   the "*".  Searc
4f00: 68 20 69 6e 20 74 68 65 20 69 6e 70 75 74 20 73  h in the input s
4f10: 74 72 69 6e 67 20 66 6f 72 20 74 68 65 0a 20 20  tring for the.  
4f20: 20 20 20 20 2a 2a 20 66 69 72 73 74 20 6d 61 74      ** first mat
4f30: 63 68 69 6e 67 20 63 68 61 72 61 63 74 65 72 20  ching character 
4f40: 61 6e 64 20 72 65 63 75 72 73 69 76 65 6c 79 20  and recursively 
4f50: 63 6f 6e 74 69 6e 65 20 74 68 65 20 6d 61 74 63  contine the matc
4f60: 68 20 66 72 6f 6d 0a 20 20 20 20 20 20 2a 2a 20  h from.      ** 
4f70: 74 68 61 74 20 70 6f 69 6e 74 2e 0a 20 20 20 20  that point..    
4f80: 20 20 2a 2a 0a 20 20 20 20 20 20 2a 2a 20 46 6f    **.      ** Fo
4f90: 72 20 61 20 63 61 73 65 2d 69 6e 73 65 6e 73 69  r a case-insensi
4fa0: 74 69 76 65 20 73 65 61 72 63 68 2c 20 73 65 74  tive search, set
4fb0: 20 76 61 72 69 61 62 6c 65 20 63 78 20 74 6f 20   variable cx to 
4fc0: 62 65 20 74 68 65 20 73 61 6d 65 20 61 73 0a 20  be the same as. 
4fd0: 20 20 20 20 20 2a 2a 20 63 20 62 75 74 20 69 6e       ** c but in
4fe0: 20 74 68 65 20 6f 74 68 65 72 20 63 61 73 65 20   the other case 
4ff0: 61 6e 64 20 73 65 61 72 63 68 20 74 68 65 20 69  and search the i
5000: 6e 70 75 74 20 73 74 72 69 6e 67 20 66 6f 72 20  nput string for 
5010: 65 69 74 68 65 72 0a 20 20 20 20 20 20 2a 2a 20  either.      ** 
5020: 63 20 6f 72 20 63 78 2e 0a 20 20 20 20 20 20 2a  c or cx..      *
5030: 2f 0a 20 20 20 20 20 20 69 66 28 20 63 3c 3d 30  /.      if( c<=0
5040: 78 38 30 20 29 7b 0a 20 20 20 20 20 20 20 20 75  x80 ){.        u
5050: 33 32 20 63 78 3b 0a 20 20 20 20 20 20 20 20 69  32 cx;.        i
5060: 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a 20 20 20  f( noCase ){.   
5070: 20 20 20 20 20 20 20 63 78 20 3d 20 73 71 6c 69         cx = sqli
5080: 74 65 33 54 6f 75 70 70 65 72 28 63 29 3b 0a 20  te3Toupper(c);. 
5090: 20 20 20 20 20 20 20 20 20 63 20 3d 20 73 71 6c           c = sql
50a0: 69 74 65 33 54 6f 6c 6f 77 65 72 28 63 29 3b 0a  ite3Tolower(c);.
50b0: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20          }else{. 
50c0: 20 20 20 20 20 20 20 20 20 63 78 20 3d 20 63 3b           cx = c;
50d0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
50e0: 20 20 20 77 68 69 6c 65 28 20 28 63 32 20 3d 20     while( (c2 = 
50f0: 2a 28 7a 53 74 72 69 6e 67 2b 2b 29 29 21 3d 30  *(zString++))!=0
5100: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66   ){.          if
5110: 28 20 63 32 21 3d 63 20 26 26 20 63 32 21 3d 63  ( c2!=c && c2!=c
5120: 78 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20  x ) continue;.  
5130: 20 20 20 20 20 20 20 20 69 66 28 20 70 61 74 74          if( patt
5140: 65 72 6e 43 6f 6d 70 61 72 65 28 7a 50 61 74 74  ernCompare(zPatt
5150: 65 72 6e 2c 7a 53 74 72 69 6e 67 2c 70 49 6e 66  ern,zString,pInf
5160: 6f 2c 65 73 63 29 20 29 20 72 65 74 75 72 6e 20  o,esc) ) return 
5170: 31 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  1;.        }.   
5180: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
5190: 20 20 77 68 69 6c 65 28 20 28 63 32 20 3d 20 55    while( (c2 = U
51a0: 74 66 38 52 65 61 64 28 7a 53 74 72 69 6e 67 29  tf8Read(zString)
51b0: 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )!=0 ){.        
51c0: 20 20 69 66 28 20 63 32 21 3d 63 20 29 20 63 6f    if( c2!=c ) co
51d0: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 20 20  ntinue;.        
51e0: 20 20 69 66 28 20 70 61 74 74 65 72 6e 43 6f 6d    if( patternCom
51f0: 70 61 72 65 28 7a 50 61 74 74 65 72 6e 2c 7a 53  pare(zPattern,zS
5200: 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65 73 63 29  tring,pInfo,esc)
5210: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20   ) return 1;.   
5220: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20       }.      }. 
5230: 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20       return 0;. 
5240: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 63 3d 3d     }.    if( c==
5250: 6d 61 74 63 68 4f 74 68 65 72 20 29 7b 0a 20 20  matchOther ){.  
5260: 20 20 20 20 69 66 28 20 65 73 63 20 29 7b 0a 20      if( esc ){. 
5270: 20 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74         c = sqlit
5280: 65 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74  e3Utf8Read(&zPat
5290: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 69  tern);.        i
52a0: 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( c==0 ) return
52b0: 20 30 3b 0a 20 20 20 20 20 20 20 20 7a 45 73 63   0;.        zEsc
52c0: 61 70 65 64 20 3d 20 7a 50 61 74 74 65 72 6e 3b  aped = zPattern;
52d0: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
52e0: 20 20 20 20 20 20 75 33 32 20 70 72 69 6f 72 5f        u32 prior_
52f0: 63 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 69  c = 0;.        i
5300: 6e 74 20 73 65 65 6e 20 3d 20 30 3b 0a 20 20 20  nt seen = 0;.   
5310: 20 20 20 20 20 69 6e 74 20 69 6e 76 65 72 74 20       int invert 
5320: 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 63 20 3d  = 0;.        c =
5330: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
5340: 28 26 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20  (&zString);.    
5350: 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29 20 72      if( c==0 ) r
5360: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 20  eturn 0;.       
5370: 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66   c2 = sqlite3Utf
5380: 38 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e 29  8Read(&zPattern)
5390: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 32  ;.        if( c2
53a0: 3d 3d 27 5e 27 20 29 7b 0a 20 20 20 20 20 20 20  =='^' ){.       
53b0: 20 20 20 69 6e 76 65 72 74 20 3d 20 31 3b 0a 20     invert = 1;. 
53c0: 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71           c2 = sq
53d0: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
53e0: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
53f0: 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20    }.        if( 
5400: 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20 20 20 20  c2==']' ){.     
5410: 20 20 20 20 20 69 66 28 20 63 3d 3d 27 5d 27 20       if( c==']' 
5420: 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20  ) seen = 1;.    
5430: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
5440: 65 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74  e3Utf8Read(&zPat
5450: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d  tern);.        }
5460: 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20  .        while( 
5470: 63 32 20 26 26 20 63 32 21 3d 27 5d 27 20 29 7b  c2 && c2!=']' ){
5480: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 63  .          if( c
5490: 32 3d 3d 27 2d 27 20 26 26 20 7a 50 61 74 74 65  2=='-' && zPatte
54a0: 72 6e 5b 30 5d 21 3d 27 5d 27 20 26 26 20 7a 50  rn[0]!=']' && zP
54b0: 61 74 74 65 72 6e 5b 30 5d 21 3d 30 20 26 26 20  attern[0]!=0 && 
54c0: 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a 20 20 20  prior_c>0 ){.   
54d0: 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71           c2 = sq
54e0: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a  lite3Utf8Read(&z
54f0: 50 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20  Pattern);.      
5500: 20 20 20 20 20 20 69 66 28 20 63 3e 3d 70 72 69        if( c>=pri
5510: 6f 72 5f 63 20 26 26 20 63 3c 3d 63 32 20 29 20  or_c && c<=c2 ) 
5520: 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20  seen = 1;.      
5530: 20 20 20 20 20 20 70 72 69 6f 72 5f 63 20 3d 20        prior_c = 
5540: 30 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 65 6c  0;.          }el
5550: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20  se{.            
5560: 69 66 28 20 63 3d 3d 63 32 20 29 7b 0a 20 20 20  if( c==c2 ){.   
5570: 20 20 20 20 20 20 20 20 20 20 20 73 65 65 6e 20             seen 
5580: 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20 20  = 1;.           
5590: 20 7d 0a 20 20 20 20 20 20 20 20 20 20 20 20 70   }.            p
55a0: 72 69 6f 72 5f 63 20 3d 20 63 32 3b 0a 20 20 20  rior_c = c2;.   
55b0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
55c0: 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65 33 55     c2 = sqlite3U
55d0: 74 66 38 52 65 61 64 28 26 7a 50 61 74 74 65 72  tf8Read(&zPatter
55e0: 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20  n);.        }.  
55f0: 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20        if( c2==0 
5600: 7c 7c 20 28 73 65 65 6e 20 5e 20 69 6e 76 65 72  || (seen ^ inver
5610: 74 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  t)==0 ){.       
5620: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20     return 0;.   
5630: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 63       }.        c
5640: 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 7d  ontinue;.      }
5650: 0a 20 20 20 20 7d 0a 20 20 20 20 63 32 20 3d 20  .    }.    c2 = 
5660: 55 74 66 38 52 65 61 64 28 7a 53 74 72 69 6e 67  Utf8Read(zString
5670: 29 3b 0a 20 20 20 20 69 66 28 20 63 3d 3d 63 32  );.    if( c==c2
5680: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20   ) continue;.   
5690: 20 69 66 28 20 6e 6f 43 61 73 65 20 26 26 20 63   if( noCase && c
56a0: 3c 30 78 38 30 20 26 26 20 63 32 3c 30 78 38 30  <0x80 && c2<0x80
56b0: 20 26 26 20 73 71 6c 69 74 65 33 54 6f 6c 6f 77   && sqlite3Tolow
56c0: 65 72 28 63 29 3d 3d 73 71 6c 69 74 65 33 54 6f  er(c)==sqlite3To
56d0: 6c 6f 77 65 72 28 63 32 29 20 29 7b 0a 20 20 20  lower(c2) ){.   
56e0: 20 20 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20     continue;.   
56f0: 20 7d 0a 20 20 20 20 69 66 28 20 63 3d 3d 6d 61   }.    if( c==ma
5700: 74 63 68 4f 6e 65 20 26 26 20 7a 50 61 74 74 65  tchOne && zPatte
5710: 72 6e 21 3d 7a 45 73 63 61 70 65 64 20 26 26 20  rn!=zEscaped && 
5720: 63 32 21 3d 30 20 29 20 63 6f 6e 74 69 6e 75 65  c2!=0 ) continue
5730: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a  ;.    return 0;.
5740: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 2a 7a 53    }.  return *zS
5750: 74 72 69 6e 67 3d 3d 30 3b 0a 7d 0a 0a 2f 2a 0a  tring==0;.}../*.
5760: 2a 2a 20 54 68 65 20 73 71 6c 69 74 65 33 5f 73  ** The sqlite3_s
5770: 74 72 67 6c 6f 62 28 29 20 69 6e 74 65 72 66 61  trglob() interfa
5780: 63 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  ce..*/.int sqlit
5790: 65 33 5f 73 74 72 67 6c 6f 62 28 63 6f 6e 73 74  e3_strglob(const
57a0: 20 63 68 61 72 20 2a 7a 47 6c 6f 62 50 61 74 74   char *zGlobPatt
57b0: 65 72 6e 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  ern, const char 
57c0: 2a 7a 53 74 72 69 6e 67 29 7b 0a 20 20 72 65 74  *zString){.  ret
57d0: 75 72 6e 20 70 61 74 74 65 72 6e 43 6f 6d 70 61  urn patternCompa
57e0: 72 65 28 28 75 38 2a 29 7a 47 6c 6f 62 50 61 74  re((u8*)zGlobPat
57f0: 74 65 72 6e 2c 20 28 75 38 2a 29 7a 53 74 72 69  tern, (u8*)zStri
5800: 6e 67 2c 20 26 67 6c 6f 62 49 6e 66 6f 2c 20 30  ng, &globInfo, 0
5810: 29 3d 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  )==0;.}../*.** T
5820: 68 65 20 73 71 6c 69 74 65 33 5f 73 74 72 6c 69  he sqlite3_strli
5830: 6b 65 28 29 20 69 6e 74 65 72 66 61 63 65 2e 0a  ke() interface..
5840: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 73  */.int sqlite3_s
5850: 74 72 6c 69 6b 65 28 63 6f 6e 73 74 20 63 68 61  trlike(const cha
5860: 72 20 2a 7a 50 61 74 74 65 72 6e 2c 20 63 6f 6e  r *zPattern, con
5870: 73 74 20 63 68 61 72 20 2a 7a 53 74 72 2c 20 75  st char *zStr, u
5880: 6e 73 69 67 6e 65 64 20 69 6e 74 20 65 73 63 29  nsigned int esc)
5890: 7b 0a 20 20 72 65 74 75 72 6e 20 70 61 74 74 65  {.  return patte
58a0: 72 6e 43 6f 6d 70 61 72 65 28 28 75 38 2a 29 7a  rnCompare((u8*)z
58b0: 50 61 74 74 65 72 6e 2c 20 28 75 38 2a 29 7a 53  Pattern, (u8*)zS
58c0: 74 72 2c 20 26 6c 69 6b 65 49 6e 66 6f 4e 6f 72  tr, &likeInfoNor
58d0: 6d 2c 20 65 73 63 29 3d 3d 30 3b 0a 7d 0a 0a 2f  m, esc)==0;.}../
58e0: 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74 68 65 20 6e  *.** Count the n
58f0: 75 6d 62 65 72 20 6f 66 20 74 69 6d 65 73 20 74  umber of times t
5900: 68 61 74 20 74 68 65 20 4c 49 4b 45 20 6f 70 65  hat the LIKE ope
5910: 72 61 74 6f 72 20 28 6f 72 20 47 4c 4f 42 20 77  rator (or GLOB w
5920: 68 69 63 68 20 69 73 0a 2a 2a 20 6a 75 73 74 20  hich is.** just 
5930: 61 20 76 61 72 69 61 74 69 6f 6e 20 6f 66 20 4c  a variation of L
5940: 49 4b 45 29 20 67 65 74 73 20 63 61 6c 6c 65 64  IKE) gets called
5950: 2e 20 20 54 68 69 73 20 69 73 20 75 73 65 64 20  .  This is used 
5960: 66 6f 72 20 74 65 73 74 69 6e 67 0a 2a 2a 20 6f  for testing.** o
5970: 6e 6c 79 2e 0a 2a 2f 0a 23 69 66 64 65 66 20 53  nly..*/.#ifdef S
5980: 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e 74 20 73  QLITE_TEST.int s
5990: 71 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f 75 6e  qlite3_like_coun
59a0: 74 20 3d 20 30 3b 0a 23 65 6e 64 69 66 0a 0a 0a  t = 0;.#endif...
59b0: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
59c0: 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 69 6b 65  tion of the like
59d0: 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e  () SQL function.
59e0: 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20    This function 
59f0: 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a 2a 20 74 68  implements.** th
5a00: 65 20 62 75 69 6c 64 2d 69 6e 20 4c 49 4b 45 20  e build-in LIKE 
5a10: 6f 70 65 72 61 74 6f 72 2e 20 20 54 68 65 20 66  operator.  The f
5a20: 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20 74 6f  irst argument to
5a30: 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 69 73   the function is
5a40: 20 74 68 65 0a 2a 2a 20 70 61 74 74 65 72 6e 20   the.** pattern 
5a50: 61 6e 64 20 74 68 65 20 73 65 63 6f 6e 64 20 61  and the second a
5a60: 72 67 75 6d 65 6e 74 20 69 73 20 74 68 65 20 73  rgument is the s
5a70: 74 72 69 6e 67 2e 20 20 53 6f 2c 20 74 68 65 20  tring.  So, the 
5a80: 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 73 3a 0a  SQL statements:.
5a90: 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 41 20 4c 49  **.**       A LI
5aa0: 4b 45 20 42 0a 2a 2a 0a 2a 2a 20 69 73 20 69 6d  KE B.**.** is im
5ab0: 70 6c 65 6d 65 6e 74 65 64 20 61 73 20 6c 69 6b  plemented as lik
5ac0: 65 28 42 2c 41 29 2e 0a 2a 2a 0a 2a 2a 20 54 68  e(B,A)..**.** Th
5ad0: 69 73 20 73 61 6d 65 20 66 75 6e 63 74 69 6f 6e  is same function
5ae0: 20 28 77 69 74 68 20 61 20 64 69 66 66 65 72 65   (with a differe
5af0: 6e 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 73  nt compareInfo s
5b00: 74 72 75 63 74 75 72 65 29 20 63 6f 6d 70 75 74  tructure) comput
5b10: 65 73 0a 2a 2a 20 74 68 65 20 47 4c 4f 42 20 6f  es.** the GLOB o
5b20: 70 65 72 61 74 6f 72 2e 0a 2a 2f 0a 73 74 61 74  perator..*/.stat
5b30: 69 63 20 76 6f 69 64 20 6c 69 6b 65 46 75 6e 63  ic void likeFunc
5b40: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
5b50: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20  ext *context, . 
5b60: 20 69 6e 74 20 61 72 67 63 2c 20 0a 20 20 73 71   int argc, .  sq
5b70: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
5b80: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  gv.){.  const un
5b90: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41 2c  signed char *zA,
5ba0: 20 2a 7a 42 3b 0a 20 20 75 33 32 20 65 73 63 61   *zB;.  u32 esca
5bb0: 70 65 20 3d 20 30 3b 0a 20 20 69 6e 74 20 6e 50  pe = 0;.  int nP
5bc0: 61 74 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  at;.  sqlite3 *d
5bd0: 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  b = sqlite3_cont
5be0: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
5bf0: 6e 74 65 78 74 29 3b 0a 0a 23 69 66 64 65 66 20  ntext);..#ifdef 
5c00: 53 51 4c 49 54 45 5f 4c 49 4b 45 5f 44 4f 45 53  SQLITE_LIKE_DOES
5c10: 4e 54 5f 4d 41 54 43 48 5f 42 4c 4f 42 53 0a 20  NT_MATCH_BLOBS. 
5c20: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
5c30: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
5c40: 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 0a 20 20  ==SQLITE_BLOB.  
5c50: 20 7c 7c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75   || sqlite3_valu
5c60: 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d 29 3d  e_type(argv[1])=
5c70: 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 0a 20 20 29  =SQLITE_BLOB.  )
5c80: 7b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  {.#ifdef SQLITE_
5c90: 54 45 53 54 0a 20 20 20 20 73 71 6c 69 74 65 33  TEST.    sqlite3
5ca0: 5f 6c 69 6b 65 5f 63 6f 75 6e 74 2b 2b 3b 0a 23  _like_count++;.#
5cb0: 65 6e 64 69 66 0a 20 20 20 20 73 71 6c 69 74 65  endif.    sqlite
5cc0: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e  3_result_int(con
5cd0: 74 65 78 74 2c 20 30 29 3b 0a 20 20 20 20 72 65  text, 0);.    re
5ce0: 74 75 72 6e 3b 0a 20 20 7d 0a 23 65 6e 64 69 66  turn;.  }.#endif
5cf0: 0a 20 20 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f  .  zB = sqlite3_
5d00: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
5d10: 30 5d 29 3b 0a 20 20 7a 41 20 3d 20 73 71 6c 69  0]);.  zA = sqli
5d20: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
5d30: 72 67 76 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c  rgv[1]);..  /* L
5d40: 69 6d 69 74 20 74 68 65 20 6c 65 6e 67 74 68 20  imit the length 
5d50: 6f 66 20 74 68 65 20 4c 49 4b 45 20 6f 72 20 47  of the LIKE or G
5d60: 4c 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 20 61  LOB pattern to a
5d70: 76 6f 69 64 20 70 72 6f 62 6c 65 6d 73 0a 20 20  void problems.  
5d80: 2a 2a 20 6f 66 20 64 65 65 70 20 72 65 63 75 72  ** of deep recur
5d90: 73 69 6f 6e 20 61 6e 64 20 4e 2a 4e 20 62 65 68  sion and N*N beh
5da0: 61 76 69 6f 72 20 69 6e 20 70 61 74 74 65 72 6e  avior in pattern
5db0: 43 6f 6d 70 61 72 65 28 29 2e 0a 20 20 2a 2f 0a  Compare()..  */.
5dc0: 20 20 6e 50 61 74 20 3d 20 73 71 6c 69 74 65 33    nPat = sqlite3
5dd0: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
5de0: 76 5b 30 5d 29 3b 0a 20 20 74 65 73 74 63 61 73  v[0]);.  testcas
5df0: 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69  e( nPat==db->aLi
5e00: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
5e10: 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45  _LIKE_PATTERN_LE
5e20: 4e 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74 63  NGTH] );.  testc
5e30: 61 73 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61  ase( nPat==db->a
5e40: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
5e50: 49 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f  IT_LIKE_PATTERN_
5e60: 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69  LENGTH]+1 );.  i
5e70: 66 28 20 6e 50 61 74 20 3e 20 64 62 2d 3e 61 4c  f( nPat > db->aL
5e80: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
5e90: 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c  T_LIKE_PATTERN_L
5ea0: 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71  ENGTH] ){.    sq
5eb0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
5ec0: 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 4c 49 4b  or(context, "LIK
5ed0: 45 20 6f 72 20 47 4c 4f 42 20 70 61 74 74 65 72  E or GLOB patter
5ee0: 6e 20 74 6f 6f 20 63 6f 6d 70 6c 65 78 22 2c 20  n too complex", 
5ef0: 2d 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b  -1);.    return;
5f00: 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 7a  .  }.  assert( z
5f10: 42 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  B==sqlite3_value
5f20: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29  _text(argv[0]) )
5f30: 3b 20 20 2f 2a 20 45 6e 63 6f 64 69 6e 67 20 64  ;  /* Encoding d
5f40: 69 64 20 6e 6f 74 20 63 68 61 6e 67 65 20 2a 2f  id not change */
5f50: 0a 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20  ..  if( argc==3 
5f60: 29 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 65 73  ){.    /* The es
5f70: 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20 73  cape character s
5f80: 74 72 69 6e 67 20 6d 75 73 74 20 63 6f 6e 73 69  tring must consi
5f90: 73 74 20 6f 66 20 61 20 73 69 6e 67 6c 65 20 55  st of a single U
5fa0: 54 46 2d 38 20 63 68 61 72 61 63 74 65 72 2e 0a  TF-8 character..
5fb0: 20 20 20 20 2a 2a 20 4f 74 68 65 72 77 69 73 65      ** Otherwise
5fc0: 2c 20 72 65 74 75 72 6e 20 61 6e 20 65 72 72 6f  , return an erro
5fd0: 72 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 63 6f  r..    */.    co
5fe0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
5ff0: 72 20 2a 7a 45 73 63 20 3d 20 73 71 6c 69 74 65  r *zEsc = sqlite
6000: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
6010: 76 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a  v[2]);.    if( z
6020: 45 73 63 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b  Esc==0 ) return;
6030: 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33  .    if( sqlite3
6040: 55 74 66 38 43 68 61 72 4c 65 6e 28 28 63 68 61  Utf8CharLen((cha
6050: 72 2a 29 7a 45 73 63 2c 20 2d 31 29 21 3d 31 20  r*)zEsc, -1)!=1 
6060: 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  ){.      sqlite3
6070: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
6080: 6e 74 65 78 74 2c 20 0a 20 20 20 20 20 20 20 20  ntext, .        
6090: 20 20 22 45 53 43 41 50 45 20 65 78 70 72 65 73    "ESCAPE expres
60a0: 73 69 6f 6e 20 6d 75 73 74 20 62 65 20 61 20 73  sion must be a s
60b0: 69 6e 67 6c 65 20 63 68 61 72 61 63 74 65 72 22  ingle character"
60c0: 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 72 65 74  , -1);.      ret
60d0: 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65  urn;.    }.    e
60e0: 73 63 61 70 65 20 3d 20 73 71 6c 69 74 65 33 55  scape = sqlite3U
60f0: 74 66 38 52 65 61 64 28 26 7a 45 73 63 29 3b 0a  tf8Read(&zEsc);.
6100: 20 20 7d 0a 20 20 69 66 28 20 7a 41 20 26 26 20    }.  if( zA && 
6110: 7a 42 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74  zB ){.    struct
6120: 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70 49   compareInfo *pI
6130: 6e 66 6f 20 3d 20 73 71 6c 69 74 65 33 5f 75 73  nfo = sqlite3_us
6140: 65 72 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29  er_data(context)
6150: 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  ;.#ifdef SQLITE_
6160: 54 45 53 54 0a 20 20 20 20 73 71 6c 69 74 65 33  TEST.    sqlite3
6170: 5f 6c 69 6b 65 5f 63 6f 75 6e 74 2b 2b 3b 0a 23  _like_count++;.#
6180: 65 6e 64 69 66 0a 20 20 20 20 0a 20 20 20 20 73  endif.    .    s
6190: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
61a0: 74 28 63 6f 6e 74 65 78 74 2c 20 70 61 74 74 65  t(context, patte
61b0: 72 6e 43 6f 6d 70 61 72 65 28 7a 42 2c 20 7a 41  rnCompare(zB, zA
61c0: 2c 20 70 49 6e 66 6f 2c 20 65 73 63 61 70 65 29  , pInfo, escape)
61d0: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
61e0: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
61f0: 66 20 74 68 65 20 4e 55 4c 4c 49 46 28 78 2c 79  f the NULLIF(x,y
6200: 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65  ) function.  The
6210: 20 72 65 73 75 6c 74 20 69 73 20 74 68 65 20 66   result is the f
6220: 69 72 73 74 0a 2a 2a 20 61 72 67 75 6d 65 6e 74  irst.** argument
6230: 20 69 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74   if the argument
6240: 73 20 61 72 65 20 64 69 66 66 65 72 65 6e 74 2e  s are different.
6250: 20 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20    The result is 
6260: 4e 55 4c 4c 20 69 66 20 74 68 65 0a 2a 2a 20 61  NULL if the.** a
6270: 72 67 75 6d 65 6e 74 73 20 61 72 65 20 65 71 75  rguments are equ
6280: 61 6c 20 74 6f 20 65 61 63 68 20 6f 74 68 65 72  al to each other
6290: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
62a0: 20 6e 75 6c 6c 69 66 46 75 6e 63 28 0a 20 20 73   nullifFunc(.  s
62b0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
62c0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e  context,.  int N
62d0: 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65  otUsed,.  sqlite
62e0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
62f0: 7b 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f  {.  CollSeq *pCo
6300: 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74 46  ll = sqlite3GetF
6310: 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74 65  uncCollSeq(conte
6320: 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  xt);.  UNUSED_PA
6330: 52 41 4d 45 54 45 52 28 4e 6f 74 55 73 65 64 29  RAMETER(NotUsed)
6340: 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 4d  ;.  if( sqlite3M
6350: 65 6d 43 6f 6d 70 61 72 65 28 61 72 67 76 5b 30  emCompare(argv[0
6360: 5d 2c 20 61 72 67 76 5b 31 5d 2c 20 70 43 6f 6c  ], argv[1], pCol
6370: 6c 29 21 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c  l)!=0 ){.    sql
6380: 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75  ite3_result_valu
6390: 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b  e(context, argv[
63a0: 30 5d 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  0]);.  }.}../*.*
63b0: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
63c0: 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f 76   of the sqlite_v
63d0: 65 72 73 69 6f 6e 28 29 20 66 75 6e 63 74 69 6f  ersion() functio
63e0: 6e 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20 69  n.  The result i
63f0: 73 20 74 68 65 20 76 65 72 73 69 6f 6e 0a 2a 2a  s the version.**
6400: 20 6f 66 20 74 68 65 20 53 51 4c 69 74 65 20 6c   of the SQLite l
6410: 69 62 72 61 72 79 20 74 68 61 74 20 69 73 20 72  ibrary that is r
6420: 75 6e 6e 69 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69  unning..*/.stati
6430: 63 20 76 6f 69 64 20 76 65 72 73 69 6f 6e 46 75  c void versionFu
6440: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
6450: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
6460: 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20    int NotUsed,. 
6470: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
6480: 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 55  *NotUsed2.){.  U
6490: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32  NUSED_PARAMETER2
64a0: 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65  (NotUsed, NotUse
64b0: 64 32 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52  d2);.  /* IMP: R
64c0: 2d 34 38 36 39 39 2d 34 38 36 31 37 20 54 68 69  -48699-48617 Thi
64d0: 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 6e  s function is an
64e0: 20 53 51 4c 20 77 72 61 70 70 65 72 20 61 72 6f   SQL wrapper aro
64f0: 75 6e 64 20 74 68 65 0a 20 20 2a 2a 20 73 71 6c  und the.  ** sql
6500: 69 74 65 33 5f 6c 69 62 76 65 72 73 69 6f 6e 28  ite3_libversion(
6510: 29 20 43 2d 69 6e 74 65 72 66 61 63 65 2e 20 2a  ) C-interface. *
6520: 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  /.  sqlite3_resu
6530: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
6540: 20 73 71 6c 69 74 65 33 5f 6c 69 62 76 65 72 73   sqlite3_libvers
6550: 69 6f 6e 28 29 2c 20 2d 31 2c 20 53 51 4c 49 54  ion(), -1, SQLIT
6560: 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a  E_STATIC);.}../*
6570: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
6580: 6f 6e 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65  on of the sqlite
6590: 5f 73 6f 75 72 63 65 5f 69 64 28 29 20 66 75 6e  _source_id() fun
65a0: 63 74 69 6f 6e 2e 20 54 68 65 20 72 65 73 75 6c  ction. The resul
65b0: 74 20 69 73 20 61 20 73 74 72 69 6e 67 0a 2a 2a  t is a string.**
65c0: 20 74 68 61 74 20 69 64 65 6e 74 69 66 69 65 73   that identifies
65d0: 20 74 68 65 20 70 61 72 74 69 63 75 6c 61 72 20   the particular 
65e0: 76 65 72 73 69 6f 6e 20 6f 66 20 74 68 65 20 73  version of the s
65f0: 6f 75 72 63 65 20 63 6f 64 65 20 75 73 65 64 20  ource code used 
6600: 74 6f 20 62 75 69 6c 64 0a 2a 2a 20 53 51 4c 69  to build.** SQLi
6610: 74 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  te..*/.static vo
6620: 69 64 20 73 6f 75 72 63 65 69 64 46 75 6e 63 28  id sourceidFunc(
6630: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
6640: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
6650: 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71  nt NotUsed,.  sq
6660: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f  lite3_value **No
6670: 74 55 73 65 64 32 0a 29 7b 0a 20 20 55 4e 55 53  tUsed2.){.  UNUS
6680: 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f  ED_PARAMETER2(No
6690: 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29  tUsed, NotUsed2)
66a0: 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 32 34  ;.  /* IMP: R-24
66b0: 34 37 30 2d 33 31 31 33 36 20 54 68 69 73 20 66  470-31136 This f
66c0: 75 6e 63 74 69 6f 6e 20 69 73 20 61 6e 20 53 51  unction is an SQ
66d0: 4c 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64  L wrapper around
66e0: 20 74 68 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65   the.  ** sqlite
66f0: 33 5f 73 6f 75 72 63 65 69 64 28 29 20 43 20 69  3_sourceid() C i
6700: 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20 20 73  nterface. */.  s
6710: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
6720: 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  xt(context, sqli
6730: 74 65 33 5f 73 6f 75 72 63 65 69 64 28 29 2c 20  te3_sourceid(), 
6740: 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49  -1, SQLITE_STATI
6750: 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  C);.}../*.** Imp
6760: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
6770: 68 65 20 73 71 6c 69 74 65 5f 6c 6f 67 28 29 20  he sqlite_log() 
6780: 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20  function.  This 
6790: 69 73 20 61 20 77 72 61 70 70 65 72 20 61 72 6f  is a wrapper aro
67a0: 75 6e 64 0a 2a 2a 20 73 71 6c 69 74 65 33 5f 6c  und.** sqlite3_l
67b0: 6f 67 28 29 2e 20 20 54 68 65 20 72 65 74 75 72  og().  The retur
67c0: 6e 20 76 61 6c 75 65 20 69 73 20 4e 55 4c 4c 2e  n value is NULL.
67d0: 20 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 65    The function e
67e0: 78 69 73 74 73 20 70 75 72 65 6c 79 20 66 6f 72  xists purely for
67f0: 0a 2a 2a 20 69 74 73 20 73 69 64 65 2d 65 66 66  .** its side-eff
6800: 65 63 74 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  ects..*/.static 
6810: 76 6f 69 64 20 65 72 72 6c 6f 67 46 75 6e 63 28  void errlogFunc(
6820: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
6830: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
6840: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
6850: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
6860: 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  ){.  UNUSED_PARA
6870: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 55  METER(argc);.  U
6880: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
6890: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 73 71 6c 69  context);.  sqli
68a0: 74 65 33 5f 6c 6f 67 28 73 71 6c 69 74 65 33 5f  te3_log(sqlite3_
68b0: 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 30  value_int(argv[0
68c0: 5d 29 2c 20 22 25 73 22 2c 20 73 71 6c 69 74 65  ]), "%s", sqlite
68d0: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
68e0: 76 5b 31 5d 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  v[1]));.}../*.**
68f0: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
6900: 6f 66 20 74 68 65 20 73 71 6c 69 74 65 5f 63 6f  of the sqlite_co
6910: 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64  mpileoption_used
6920: 28 29 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 20  () function..** 
6930: 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61 6e  The result is an
6940: 20 69 6e 74 65 67 65 72 20 74 68 61 74 20 69 64   integer that id
6950: 65 6e 74 69 66 69 65 73 20 69 66 20 74 68 65 20  entifies if the 
6960: 63 6f 6d 70 69 6c 65 72 20 6f 70 74 69 6f 6e 0a  compiler option.
6970: 2a 2a 20 77 61 73 20 75 73 65 64 20 74 6f 20 62  ** was used to b
6980: 75 69 6c 64 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a  uild SQLite..*/.
6990: 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f  #ifndef SQLITE_O
69a0: 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f  MIT_COMPILEOPTIO
69b0: 4e 5f 44 49 41 47 53 0a 73 74 61 74 69 63 20 76  N_DIAGS.static v
69c0: 6f 69 64 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f  oid compileoptio
69d0: 6e 75 73 65 64 46 75 6e 63 28 0a 20 20 73 71 6c  nusedFunc(.  sql
69e0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
69f0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
6a00: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
6a10: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63  ue **argv.){.  c
6a20: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4f 70 74 4e  onst char *zOptN
6a30: 61 6d 65 3b 0a 20 20 61 73 73 65 72 74 28 20 61  ame;.  assert( a
6a40: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
6a50: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
6a60: 63 29 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d  c);.  /* IMP: R-
6a70: 33 39 35 36 34 2d 33 36 33 30 35 20 54 68 65 20  39564-36305 The 
6a80: 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70  sqlite_compileop
6a90: 74 69 6f 6e 5f 75 73 65 64 28 29 20 53 51 4c 0a  tion_used() SQL.
6aa0: 20 20 2a 2a 20 66 75 6e 63 74 69 6f 6e 20 69 73    ** function is
6ab0: 20 61 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e   a wrapper aroun
6ac0: 64 20 74 68 65 20 73 71 6c 69 74 65 33 5f 63 6f  d the sqlite3_co
6ad0: 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64  mpileoption_used
6ae0: 28 29 20 43 2f 43 2b 2b 0a 20 20 2a 2a 20 66 75  () C/C++.  ** fu
6af0: 6e 63 74 69 6f 6e 2e 0a 20 20 2a 2f 0a 20 20 69  nction..  */.  i
6b00: 66 28 20 28 7a 4f 70 74 4e 61 6d 65 20 3d 20 28  f( (zOptName = (
6b10: 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69  const char*)sqli
6b20: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
6b30: 72 67 76 5b 30 5d 29 29 21 3d 30 20 29 7b 0a 20  rgv[0]))!=0 ){. 
6b40: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
6b50: 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73  t_int(context, s
6b60: 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70  qlite3_compileop
6b70: 74 69 6f 6e 5f 75 73 65 64 28 7a 4f 70 74 4e 61  tion_used(zOptNa
6b80: 6d 65 29 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64  me));.  }.}.#end
6b90: 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49  if /* SQLITE_OMI
6ba0: 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f  T_COMPILEOPTION_
6bb0: 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20  DIAGS */../*.** 
6bc0: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
6bd0: 66 20 74 68 65 20 73 71 6c 69 74 65 5f 63 6f 6d  f the sqlite_com
6be0: 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28 29  pileoption_get()
6bf0: 20 66 75 6e 63 74 69 6f 6e 2e 20 0a 2a 2a 20 54   function. .** T
6c00: 68 65 20 72 65 73 75 6c 74 20 69 73 20 61 20 73  he result is a s
6c10: 74 72 69 6e 67 20 74 68 61 74 20 69 64 65 6e 74  tring that ident
6c20: 69 66 69 65 73 20 74 68 65 20 63 6f 6d 70 69 6c  ifies the compil
6c30: 65 72 20 6f 70 74 69 6f 6e 73 20 0a 2a 2a 20 75  er options .** u
6c40: 73 65 64 20 74 6f 20 62 75 69 6c 64 20 53 51 4c  sed to build SQL
6c50: 69 74 65 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66 20  ite..*/.#ifndef 
6c60: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50  SQLITE_OMIT_COMP
6c70: 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47 53 0a  ILEOPTION_DIAGS.
6c80: 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 6d 70  static void comp
6c90: 69 6c 65 6f 70 74 69 6f 6e 67 65 74 46 75 6e 63  ileoptiongetFunc
6ca0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
6cb0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
6cc0: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
6cd0: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
6ce0: 0a 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 61  .){.  int n;.  a
6cf0: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
6d00: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
6d10: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 2f 2a  ETER(argc);.  /*
6d20: 20 49 4d 50 3a 20 52 2d 30 34 39 32 32 2d 32 34   IMP: R-04922-24
6d30: 30 37 36 20 54 68 65 20 73 71 6c 69 74 65 5f 63  076 The sqlite_c
6d40: 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67 65 74  ompileoption_get
6d50: 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 0a  () SQL function.
6d60: 20 20 2a 2a 20 69 73 20 61 20 77 72 61 70 70 65    ** is a wrappe
6d70: 72 20 61 72 6f 75 6e 64 20 74 68 65 20 73 71 6c  r around the sql
6d80: 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69  ite3_compileopti
6d90: 6f 6e 5f 67 65 74 28 29 20 43 2f 43 2b 2b 20 66  on_get() C/C++ f
6da0: 75 6e 63 74 69 6f 6e 2e 0a 20 20 2a 2f 0a 20 20  unction..  */.  
6db0: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
6dc0: 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a  e_int(argv[0]);.
6dd0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
6de0: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  _text(context, s
6df0: 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c 65 6f 70  qlite3_compileop
6e00: 74 69 6f 6e 5f 67 65 74 28 6e 29 2c 20 2d 31 2c  tion_get(n), -1,
6e10: 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b   SQLITE_STATIC);
6e20: 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c  .}.#endif /* SQL
6e30: 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45  ITE_OMIT_COMPILE
6e40: 4f 50 54 49 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a  OPTION_DIAGS */.
6e50: 0a 2f 2a 20 41 72 72 61 79 20 66 6f 72 20 63 6f  ./* Array for co
6e60: 6e 76 65 72 74 69 6e 67 20 66 72 6f 6d 20 68 61  nverting from ha
6e70: 6c 66 2d 62 79 74 65 73 20 28 6e 79 62 62 6c 65  lf-bytes (nybble
6e80: 73 29 20 69 6e 74 6f 20 41 53 43 49 49 20 68 65  s) into ASCII he
6e90: 78 0a 2a 2a 20 64 69 67 69 74 73 2e 20 2a 2f 0a  x.** digits. */.
6ea0: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61  static const cha
6eb0: 72 20 68 65 78 64 69 67 69 74 73 5b 5d 20 3d 20  r hexdigits[] = 
6ec0: 7b 0a 20 20 27 30 27 2c 20 27 31 27 2c 20 27 32  {.  '0', '1', '2
6ed0: 27 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35 27  ', '3', '4', '5'
6ee0: 2c 20 27 36 27 2c 20 27 37 27 2c 0a 20 20 27 38  , '6', '7',.  '8
6ef0: 27 2c 20 27 39 27 2c 20 27 41 27 2c 20 27 42 27  ', '9', 'A', 'B'
6f00: 2c 20 27 43 27 2c 20 27 44 27 2c 20 27 45 27 2c  , 'C', 'D', 'E',
6f10: 20 27 46 27 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20   'F' .};../*.** 
6f20: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
6f30: 66 20 74 68 65 20 51 55 4f 54 45 28 29 20 66 75  f the QUOTE() fu
6f40: 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 66 75  nction.  This fu
6f50: 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20 61 20 73  nction takes a s
6f60: 69 6e 67 6c 65 0a 2a 2a 20 61 72 67 75 6d 65 6e  ingle.** argumen
6f70: 74 2e 20 20 49 66 20 74 68 65 20 61 72 67 75 6d  t.  If the argum
6f80: 65 6e 74 20 69 73 20 6e 75 6d 65 72 69 63 2c 20  ent is numeric, 
6f90: 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65  the return value
6fa0: 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73 0a   is the same as.
6fb0: 2a 2a 20 74 68 65 20 61 72 67 75 6d 65 6e 74 2e  ** the argument.
6fc0: 20 20 49 66 20 74 68 65 20 61 72 67 75 6d 65 6e    If the argumen
6fd0: 74 20 69 73 20 4e 55 4c 4c 2c 20 74 68 65 20 72  t is NULL, the r
6fe0: 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74  eturn value is t
6ff0: 68 65 20 73 74 72 69 6e 67 0a 2a 2a 20 22 4e 55  he string.** "NU
7000: 4c 4c 22 2e 20 20 4f 74 68 65 72 77 69 73 65 2c  LL".  Otherwise,
7010: 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73   the argument is
7020: 20 65 6e 63 6c 6f 73 65 64 20 69 6e 20 73 69 6e   enclosed in sin
7030: 67 6c 65 20 71 75 6f 74 65 73 20 77 69 74 68 0a  gle quotes with.
7040: 2a 2a 20 73 69 6e 67 6c 65 2d 71 75 6f 74 65 20  ** single-quote 
7050: 65 73 63 61 70 65 73 2e 0a 2a 2f 0a 73 74 61 74  escapes..*/.stat
7060: 69 63 20 76 6f 69 64 20 71 75 6f 74 65 46 75 6e  ic void quoteFun
7070: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
7080: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
7090: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
70a0: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 61  lue **argv){.  a
70b0: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
70c0: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
70d0: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 73 77  ETER(argc);.  sw
70e0: 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61  itch( sqlite3_va
70f0: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
7100: 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51  ) ){.    case SQ
7110: 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 7b 0a 20 20  LITE_FLOAT: {.  
7120: 20 20 20 20 64 6f 75 62 6c 65 20 72 31 2c 20 72      double r1, r
7130: 32 3b 0a 20 20 20 20 20 20 63 68 61 72 20 7a 42  2;.      char zB
7140: 75 66 5b 35 30 5d 3b 0a 20 20 20 20 20 20 72 31  uf[50];.      r1
7150: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
7160: 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d 29  _double(argv[0])
7170: 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  ;.      sqlite3_
7180: 73 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66 28  snprintf(sizeof(
7190: 7a 42 75 66 29 2c 20 7a 42 75 66 2c 20 22 25 21  zBuf), zBuf, "%!
71a0: 2e 31 35 67 22 2c 20 72 31 29 3b 0a 20 20 20 20  .15g", r1);.    
71b0: 20 20 73 71 6c 69 74 65 33 41 74 6f 46 28 7a 42    sqlite3AtoF(zB
71c0: 75 66 2c 20 26 72 32 2c 20 32 30 2c 20 53 51 4c  uf, &r2, 20, SQL
71d0: 49 54 45 5f 55 54 46 38 29 3b 0a 20 20 20 20 20  ITE_UTF8);.     
71e0: 20 69 66 28 20 72 31 21 3d 72 32 20 29 7b 0a 20   if( r1!=r2 ){. 
71f0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 73         sqlite3_s
7200: 6e 70 72 69 6e 74 66 28 73 69 7a 65 6f 66 28 7a  nprintf(sizeof(z
7210: 42 75 66 29 2c 20 7a 42 75 66 2c 20 22 25 21 2e  Buf), zBuf, "%!.
7220: 32 30 65 22 2c 20 72 31 29 3b 0a 20 20 20 20 20  20e", r1);.     
7230: 20 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33   }.      sqlite3
7240: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
7250: 74 65 78 74 2c 20 7a 42 75 66 2c 20 2d 31 2c 20  text, zBuf, -1, 
7260: 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54  SQLITE_TRANSIENT
7270: 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  );.      break;.
7280: 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 53      }.    case S
7290: 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 20 7b  QLITE_INTEGER: {
72a0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
72b0: 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74  esult_value(cont
72c0: 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20  ext, argv[0]);. 
72d0: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
72e0: 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  }.    case SQLIT
72f0: 45 5f 42 4c 4f 42 3a 20 7b 0a 20 20 20 20 20 20  E_BLOB: {.      
7300: 63 68 61 72 20 2a 7a 54 65 78 74 20 3d 20 30 3b  char *zText = 0;
7310: 0a 20 20 20 20 20 20 63 68 61 72 20 63 6f 6e 73  .      char cons
7320: 74 20 2a 7a 42 6c 6f 62 20 3d 20 73 71 6c 69 74  t *zBlob = sqlit
7330: 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72  e3_value_blob(ar
7340: 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 6e  gv[0]);.      in
7350: 74 20 6e 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65  t nBlob = sqlite
7360: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
7370: 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 61 73  gv[0]);.      as
7380: 73 65 72 74 28 20 7a 42 6c 6f 62 3d 3d 73 71 6c  sert( zBlob==sql
7390: 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28  ite3_value_blob(
73a0: 61 72 67 76 5b 30 5d 29 20 29 3b 20 2f 2a 20 4e  argv[0]) ); /* N
73b0: 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68 61 6e 67  o encoding chang
73c0: 65 20 2a 2f 0a 20 20 20 20 20 20 7a 54 65 78 74  e */.      zText
73d0: 20 3d 20 28 63 68 61 72 20 2a 29 63 6f 6e 74 65   = (char *)conte
73e0: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
73f0: 2c 20 28 32 2a 28 69 36 34 29 6e 42 6c 6f 62 29  , (2*(i64)nBlob)
7400: 2b 34 29 3b 20 0a 20 20 20 20 20 20 69 66 28 20  +4); .      if( 
7410: 7a 54 65 78 74 20 29 7b 0a 20 20 20 20 20 20 20  zText ){.       
7420: 20 69 6e 74 20 69 3b 0a 20 20 20 20 20 20 20 20   int i;.        
7430: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 42 6c 6f 62  for(i=0; i<nBlob
7440: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20  ; i++){.        
7450: 20 20 7a 54 65 78 74 5b 28 69 2a 32 29 2b 32 5d    zText[(i*2)+2]
7460: 20 3d 20 68 65 78 64 69 67 69 74 73 5b 28 7a 42   = hexdigits[(zB
7470: 6c 6f 62 5b 69 5d 3e 3e 34 29 26 30 78 30 46 5d  lob[i]>>4)&0x0F]
7480: 3b 0a 20 20 20 20 20 20 20 20 20 20 7a 54 65 78  ;.          zTex
7490: 74 5b 28 69 2a 32 29 2b 33 5d 20 3d 20 68 65 78  t[(i*2)+3] = hex
74a0: 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d  digits[(zBlob[i]
74b0: 29 26 30 78 30 46 5d 3b 0a 20 20 20 20 20 20 20  )&0x0F];.       
74c0: 20 7d 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74   }.        zText
74d0: 5b 28 6e 42 6c 6f 62 2a 32 29 2b 32 5d 20 3d 20  [(nBlob*2)+2] = 
74e0: 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 7a 54  '\'';.        zT
74f0: 65 78 74 5b 28 6e 42 6c 6f 62 2a 32 29 2b 33 5d  ext[(nBlob*2)+3]
7500: 20 3d 20 27 5c 30 27 3b 0a 20 20 20 20 20 20 20   = '\0';.       
7510: 20 7a 54 65 78 74 5b 30 5d 20 3d 20 27 58 27 3b   zText[0] = 'X';
7520: 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 31  .        zText[1
7530: 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20  ] = '\'';.      
7540: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
7550: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a  _text(context, z
7560: 54 65 78 74 2c 20 2d 31 2c 20 53 51 4c 49 54 45  Text, -1, SQLITE
7570: 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 20  _TRANSIENT);.   
7580: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65       sqlite3_fre
7590: 65 28 7a 54 65 78 74 29 3b 0a 20 20 20 20 20 20  e(zText);.      
75a0: 7d 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20  }.      break;. 
75b0: 20 20 20 7d 0a 20 20 20 20 63 61 73 65 20 53 51     }.    case SQ
75c0: 4c 49 54 45 5f 54 45 58 54 3a 20 7b 0a 20 20 20  LITE_TEXT: {.   
75d0: 20 20 20 69 6e 74 20 69 2c 6a 3b 0a 20 20 20 20     int i,j;.    
75e0: 20 20 75 36 34 20 6e 3b 0a 20 20 20 20 20 20 63    u64 n;.      c
75f0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
7600: 61 72 20 2a 7a 41 72 67 20 3d 20 73 71 6c 69 74  ar *zArg = sqlit
7610: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
7620: 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 63 68  gv[0]);.      ch
7630: 61 72 20 2a 7a 3b 0a 0a 20 20 20 20 20 20 69 66  ar *z;..      if
7640: 28 20 7a 41 72 67 3d 3d 30 20 29 20 72 65 74 75  ( zArg==0 ) retu
7650: 72 6e 3b 0a 20 20 20 20 20 20 66 6f 72 28 69 3d  rn;.      for(i=
7660: 30 2c 20 6e 3d 30 3b 20 7a 41 72 67 5b 69 5d 3b  0, n=0; zArg[i];
7670: 20 69 2b 2b 29 7b 20 69 66 28 20 7a 41 72 67 5b   i++){ if( zArg[
7680: 69 5d 3d 3d 27 5c 27 27 20 29 20 6e 2b 2b 3b 20  i]=='\'' ) n++; 
7690: 7d 0a 20 20 20 20 20 20 7a 20 3d 20 63 6f 6e 74  }.      z = cont
76a0: 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78  extMalloc(contex
76b0: 74 2c 20 28 28 69 36 34 29 69 29 2b 28 28 69 36  t, ((i64)i)+((i6
76c0: 34 29 6e 29 2b 33 29 3b 0a 20 20 20 20 20 20 69  4)n)+3);.      i
76d0: 66 28 20 7a 20 29 7b 0a 20 20 20 20 20 20 20 20  f( z ){.        
76e0: 7a 5b 30 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20  z[0] = '\'';.   
76f0: 20 20 20 20 20 66 6f 72 28 69 3d 30 2c 20 6a 3d       for(i=0, j=
7700: 31 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29  1; zArg[i]; i++)
7710: 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 5b 6a 2b  {.          z[j+
7720: 2b 5d 20 3d 20 7a 41 72 67 5b 69 5d 3b 0a 20 20  +] = zArg[i];.  
7730: 20 20 20 20 20 20 20 20 69 66 28 20 7a 41 72 67          if( zArg
7740: 5b 69 5d 3d 3d 27 5c 27 27 20 29 7b 0a 20 20 20  [i]=='\'' ){.   
7750: 20 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20           z[j++] 
7760: 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20  = '\'';.        
7770: 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20    }.        }.  
7780: 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27        z[j++] = '
7790: 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 7a 5b 6a  \'';.        z[j
77a0: 5d 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 73  ] = 0;.        s
77b0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
77c0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 2c 20 6a  xt(context, z, j
77d0: 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b  , sqlite3_free);
77e0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 62  .      }.      b
77f0: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20  reak;.    }.    
7800: 64 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20  default: {.     
7810: 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 33   assert( sqlite3
7820: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
7830: 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [0])==SQLITE_NUL
7840: 4c 20 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74  L );.      sqlit
7850: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
7860: 6f 6e 74 65 78 74 2c 20 22 4e 55 4c 4c 22 2c 20  ontext, "NULL", 
7870: 34 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 43  4, SQLITE_STATIC
7880: 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  );.      break;.
7890: 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a      }.  }.}../*.
78a0: 2a 2a 20 54 68 65 20 75 6e 69 63 6f 64 65 28 29  ** The unicode()
78b0: 20 66 75 6e 63 74 69 6f 6e 2e 20 20 52 65 74 75   function.  Retu
78c0: 72 6e 20 74 68 65 20 69 6e 74 65 67 65 72 20 75  rn the integer u
78d0: 6e 69 63 6f 64 65 20 63 6f 64 65 2d 70 6f 69 6e  nicode code-poin
78e0: 74 20 76 61 6c 75 65 0a 2a 2a 20 66 6f 72 20 74  t value.** for t
78f0: 68 65 20 66 69 72 73 74 20 63 68 61 72 61 63 74  he first charact
7900: 65 72 20 6f 66 20 74 68 65 20 69 6e 70 75 74 20  er of the input 
7910: 73 74 72 69 6e 67 2e 20 0a 2a 2f 0a 73 74 61 74  string. .*/.stat
7920: 69 63 20 76 6f 69 64 20 75 6e 69 63 6f 64 65 46  ic void unicodeF
7930: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
7940: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
7950: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
7960: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
7970: 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75  rgv.){.  const u
7980: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 20  nsigned char *z 
7990: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
79a0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
79b0: 20 28 76 6f 69 64 29 61 72 67 63 3b 0a 20 20 69   (void)argc;.  i
79c0: 66 28 20 7a 20 26 26 20 7a 5b 30 5d 20 29 20 73  f( z && z[0] ) s
79d0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
79e0: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
79f0: 65 33 55 74 66 38 52 65 61 64 28 26 7a 29 29 3b  e3Utf8Read(&z));
7a00: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 63 68  .}../*.** The ch
7a10: 61 72 28 29 20 66 75 6e 63 74 69 6f 6e 20 74 61  ar() function ta
7a20: 6b 65 73 20 7a 65 72 6f 20 6f 72 20 6d 6f 72 65  kes zero or more
7a30: 20 61 72 67 75 6d 65 6e 74 73 2c 20 65 61 63 68   arguments, each
7a40: 20 6f 66 20 77 68 69 63 68 20 69 73 0a 2a 2a 20   of which is.** 
7a50: 61 6e 20 69 6e 74 65 67 65 72 2e 20 20 49 74 20  an integer.  It 
7a60: 63 6f 6e 73 74 72 75 63 74 73 20 61 20 73 74 72  constructs a str
7a70: 69 6e 67 20 77 68 65 72 65 20 65 61 63 68 20 63  ing where each c
7a80: 68 61 72 61 63 74 65 72 20 6f 66 20 74 68 65 20  haracter of the 
7a90: 73 74 72 69 6e 67 0a 2a 2a 20 69 73 20 74 68 65  string.** is the
7aa0: 20 75 6e 69 63 6f 64 65 20 63 68 61 72 61 63 74   unicode charact
7ab0: 65 72 20 66 6f 72 20 74 68 65 20 63 6f 72 72 65  er for the corre
7ac0: 73 70 6f 6e 64 69 6e 67 20 69 6e 74 65 67 65 72  sponding integer
7ad0: 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74   argument..*/.st
7ae0: 61 74 69 63 20 76 6f 69 64 20 63 68 61 72 46 75  atic void charFu
7af0: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
7b00: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
7b10: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
7b20: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
7b30: 67 76 0a 29 7b 0a 20 20 75 6e 73 69 67 6e 65 64  gv.){.  unsigned
7b40: 20 63 68 61 72 20 2a 7a 2c 20 2a 7a 4f 75 74 3b   char *z, *zOut;
7b50: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 7a 4f 75 74  .  int i;.  zOut
7b60: 20 3d 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f 6d   = z = sqlite3_m
7b70: 61 6c 6c 6f 63 36 34 28 20 61 72 67 63 2a 34 2b  alloc64( argc*4+
7b80: 31 20 29 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20  1 );.  if( z==0 
7b90: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
7ba0: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65  esult_error_nome
7bb0: 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  m(context);.    
7bc0: 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 66 6f  return;.  }.  fo
7bd0: 72 28 69 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69  r(i=0; i<argc; i
7be0: 2b 2b 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  ++){.    sqlite3
7bf0: 5f 69 6e 74 36 34 20 78 3b 0a 20 20 20 20 75 6e  _int64 x;.    un
7c00: 73 69 67 6e 65 64 20 63 3b 0a 20 20 20 20 78 20  signed c;.    x 
7c10: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
7c20: 69 6e 74 36 34 28 61 72 67 76 5b 69 5d 29 3b 0a  int64(argv[i]);.
7c30: 20 20 20 20 69 66 28 20 78 3c 30 20 7c 7c 20 78      if( x<0 || x
7c40: 3e 30 78 31 30 66 66 66 66 20 29 20 78 20 3d 20  >0x10ffff ) x = 
7c50: 30 78 66 66 66 64 3b 0a 20 20 20 20 63 20 3d 20  0xfffd;.    c = 
7c60: 28 75 6e 73 69 67 6e 65 64 29 28 78 20 26 20 30  (unsigned)(x & 0
7c70: 78 31 66 66 66 66 66 29 3b 0a 20 20 20 20 69 66  x1fffff);.    if
7c80: 28 20 63 3c 30 78 30 30 30 38 30 20 29 7b 0a 20  ( c<0x00080 ){. 
7c90: 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 28       *zOut++ = (
7ca0: 75 38 29 28 63 26 30 78 46 46 29 3b 0a 20 20 20  u8)(c&0xFF);.   
7cb0: 20 7d 65 6c 73 65 20 69 66 28 20 63 3c 30 78 30   }else if( c<0x0
7cc0: 30 38 30 30 20 29 7b 0a 20 20 20 20 20 20 2a 7a  0800 ){.      *z
7cd0: 4f 75 74 2b 2b 20 3d 20 30 78 43 30 20 2b 20 28  Out++ = 0xC0 + (
7ce0: 75 38 29 28 28 63 3e 3e 36 29 26 30 78 31 46 29  u8)((c>>6)&0x1F)
7cf0: 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20  ;.      *zOut++ 
7d00: 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 63 20  = 0x80 + (u8)(c 
7d10: 26 20 30 78 33 46 29 3b 0a 20 20 20 20 7d 65 6c  & 0x3F);.    }el
7d20: 73 65 20 69 66 28 20 63 3c 30 78 31 30 30 30 30  se if( c<0x10000
7d30: 20 29 7b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b   ){.      *zOut+
7d40: 2b 20 3d 20 30 78 45 30 20 2b 20 28 75 38 29 28  + = 0xE0 + (u8)(
7d50: 28 63 3e 3e 31 32 29 26 30 78 30 46 29 3b 0a 20  (c>>12)&0x0F);. 
7d60: 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30       *zOut++ = 0
7d70: 78 38 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 36  x80 + (u8)((c>>6
7d80: 29 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20 20  ) & 0x3F);.     
7d90: 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20   *zOut++ = 0x80 
7da0: 2b 20 28 75 38 29 28 63 20 26 20 30 78 33 46 29  + (u8)(c & 0x3F)
7db0: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ;.    }else{.   
7dc0: 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 46     *zOut++ = 0xF
7dd0: 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 31 38 29  0 + (u8)((c>>18)
7de0: 20 26 20 30 78 30 37 29 3b 0a 20 20 20 20 20 20   & 0x07);.      
7df0: 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b  *zOut++ = 0x80 +
7e00: 20 28 75 38 29 28 28 63 3e 3e 31 32 29 20 26 20   (u8)((c>>12) & 
7e10: 30 78 33 46 29 3b 0a 20 20 20 20 20 20 2a 7a 4f  0x3F);.      *zO
7e20: 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28 75  ut++ = 0x80 + (u
7e30: 38 29 28 28 63 3e 3e 36 29 20 26 20 30 78 33 46  8)((c>>6) & 0x3F
7e40: 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b  );.      *zOut++
7e50: 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 63   = 0x80 + (u8)(c
7e60: 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20 7d 20   & 0x3F);.    } 
7e70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7e80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7e90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7ea0: 20 20 20 5c 0a 20 20 7d 0a 20 20 73 71 6c 69 74     \.  }.  sqlit
7eb0: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 36 34  e3_result_text64
7ec0: 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a  (context, (char*
7ed0: 29 7a 2c 20 7a 4f 75 74 2d 7a 2c 20 73 71 6c 69  )z, zOut-z, sqli
7ee0: 74 65 33 5f 66 72 65 65 2c 20 53 51 4c 49 54 45  te3_free, SQLITE
7ef0: 5f 55 54 46 38 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  _UTF8);.}../*.**
7f00: 20 54 68 65 20 68 65 78 28 29 20 66 75 6e 63 74   The hex() funct
7f10: 69 6f 6e 2e 20 20 49 6e 74 65 72 70 72 65 74 20  ion.  Interpret 
7f20: 74 68 65 20 61 72 67 75 6d 65 6e 74 20 61 73 20  the argument as 
7f30: 61 20 62 6c 6f 62 2e 20 20 52 65 74 75 72 6e 0a  a blob.  Return.
7f40: 2a 2a 20 61 20 68 65 78 61 64 65 63 69 6d 61 6c  ** a hexadecimal
7f50: 20 72 65 6e 64 65 72 69 6e 67 20 61 73 20 74 65   rendering as te
7f60: 78 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  xt..*/.static vo
7f70: 69 64 20 68 65 78 46 75 6e 63 28 0a 20 20 73 71  id hexFunc(.  sq
7f80: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
7f90: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
7fa0: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
7fb0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
7fc0: 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 63 6f 6e 73  int i, n;.  cons
7fd0: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
7fe0: 2a 70 42 6c 6f 62 3b 0a 20 20 63 68 61 72 20 2a  *pBlob;.  char *
7ff0: 7a 48 65 78 2c 20 2a 7a 3b 0a 20 20 61 73 73 65  zHex, *z;.  asse
8000: 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20  rt( argc==1 );. 
8010: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
8020: 52 28 61 72 67 63 29 3b 0a 20 20 70 42 6c 6f 62  R(argc);.  pBlob
8030: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
8040: 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a  _blob(argv[0]);.
8050: 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61    n = sqlite3_va
8060: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
8070: 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 42  ]);.  assert( pB
8080: 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c  lob==sqlite3_val
8090: 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29  ue_blob(argv[0])
80a0: 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64   );  /* No encod
80b0: 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20  ing change */.  
80c0: 7a 20 3d 20 7a 48 65 78 20 3d 20 63 6f 6e 74 65  z = zHex = conte
80d0: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
80e0: 2c 20 28 28 69 36 34 29 6e 29 2a 32 20 2b 20 31  , ((i64)n)*2 + 1
80f0: 29 3b 0a 20 20 69 66 28 20 7a 48 65 78 20 29 7b  );.  if( zHex ){
8100: 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c  .    for(i=0; i<
8110: 6e 3b 20 69 2b 2b 2c 20 70 42 6c 6f 62 2b 2b 29  n; i++, pBlob++)
8120: 7b 0a 20 20 20 20 20 20 75 6e 73 69 67 6e 65 64  {.      unsigned
8130: 20 63 68 61 72 20 63 20 3d 20 2a 70 42 6c 6f 62   char c = *pBlob
8140: 3b 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20 3d  ;.      *(z++) =
8150: 20 68 65 78 64 69 67 69 74 73 5b 28 63 3e 3e 34   hexdigits[(c>>4
8160: 29 26 30 78 66 5d 3b 0a 20 20 20 20 20 20 2a 28  )&0xf];.      *(
8170: 7a 2b 2b 29 20 3d 20 68 65 78 64 69 67 69 74 73  z++) = hexdigits
8180: 5b 63 26 30 78 66 5d 3b 0a 20 20 20 20 7d 0a 20  [c&0xf];.    }. 
8190: 20 20 20 2a 7a 20 3d 20 30 3b 0a 20 20 20 20 73     *z = 0;.    s
81a0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
81b0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 48 65 78  xt(context, zHex
81c0: 2c 20 6e 2a 32 2c 20 73 71 6c 69 74 65 33 5f 66  , n*2, sqlite3_f
81d0: 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  ree);.  }.}../*.
81e0: 2a 2a 20 54 68 65 20 7a 65 72 6f 62 6c 6f 62 28  ** The zeroblob(
81f0: 4e 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75  N) function retu
8200: 72 6e 73 20 61 20 7a 65 72 6f 2d 66 69 6c 6c 65  rns a zero-fille
8210: 64 20 62 6c 6f 62 20 6f 66 20 73 69 7a 65 20 4e  d blob of size N
8220: 20 62 79 74 65 73 2e 0a 2a 2f 0a 73 74 61 74 69   bytes..*/.stati
8230: 63 20 76 6f 69 64 20 7a 65 72 6f 62 6c 6f 62 46  c void zeroblobF
8240: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
8250: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
8260: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
8270: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
8280: 72 67 76 0a 29 7b 0a 20 20 69 36 34 20 6e 3b 0a  rgv.){.  i64 n;.
8290: 20 20 69 6e 74 20 72 63 3b 0a 20 20 61 73 73 65    int rc;.  asse
82a0: 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20  rt( argc==1 );. 
82b0: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
82c0: 52 28 61 72 67 63 29 3b 0a 20 20 6e 20 3d 20 73  R(argc);.  n = s
82d0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
82e0: 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69  64(argv[0]);.  i
82f0: 66 28 20 6e 3c 30 20 29 20 6e 20 3d 20 30 3b 0a  f( n<0 ) n = 0;.
8300: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 72    rc = sqlite3_r
8310: 65 73 75 6c 74 5f 7a 65 72 6f 62 6c 6f 62 36 34  esult_zeroblob64
8320: 28 63 6f 6e 74 65 78 74 2c 20 6e 29 3b 20 2f 2a  (context, n); /*
8330: 20 49 4d 50 3a 20 52 2d 30 30 32 39 33 2d 36 34   IMP: R-00293-64
8340: 39 39 34 20 2a 2f 0a 20 20 69 66 28 20 72 63 20  994 */.  if( rc 
8350: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
8360: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 63 6f 64 65  esult_error_code
8370: 28 63 6f 6e 74 65 78 74 2c 20 72 63 29 3b 0a 20  (context, rc);. 
8380: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20   }.}../*.** The 
8390: 72 65 70 6c 61 63 65 28 29 20 66 75 6e 63 74 69  replace() functi
83a0: 6f 6e 2e 20 20 54 68 72 65 65 20 61 72 67 75 6d  on.  Three argum
83b0: 65 6e 74 73 20 61 72 65 20 61 6c 6c 20 73 74 72  ents are all str
83c0: 69 6e 67 73 3a 20 63 61 6c 6c 0a 2a 2a 20 74 68  ings: call.** th
83d0: 65 6d 20 41 2c 20 42 2c 20 61 6e 64 20 43 2e 20  em A, B, and C. 
83e0: 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 61 6c  The result is al
83f0: 73 6f 20 61 20 73 74 72 69 6e 67 20 77 68 69 63  so a string whic
8400: 68 20 69 73 20 64 65 72 69 76 65 64 0a 2a 2a 20  h is derived.** 
8410: 66 72 6f 6d 20 41 20 62 79 20 72 65 70 6c 61 63  from A by replac
8420: 69 6e 67 20 65 76 65 72 79 20 6f 63 63 75 72 72  ing every occurr
8430: 65 6e 63 65 20 6f 66 20 42 20 77 69 74 68 20 43  ence of B with C
8440: 2e 20 20 54 68 65 20 6d 61 74 63 68 0a 2a 2a 20  .  The match.** 
8450: 6d 75 73 74 20 62 65 20 65 78 61 63 74 2e 20 20  must be exact.  
8460: 43 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e  Collating sequen
8470: 63 65 73 20 61 72 65 20 6e 6f 74 20 75 73 65 64  ces are not used
8480: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
8490: 20 72 65 70 6c 61 63 65 46 75 6e 63 28 0a 20 20   replaceFunc(.  
84a0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
84b0: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
84c0: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
84d0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
84e0: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
84f0: 20 63 68 61 72 20 2a 7a 53 74 72 3b 20 20 20 20   char *zStr;    
8500: 20 20 20 20 2f 2a 20 54 68 65 20 69 6e 70 75 74      /* The input
8510: 20 73 74 72 69 6e 67 20 41 20 2a 2f 0a 20 20 63   string A */.  c
8520: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
8530: 61 72 20 2a 7a 50 61 74 74 65 72 6e 3b 20 20 20  ar *zPattern;   
8540: 20 2f 2a 20 54 68 65 20 70 61 74 74 65 72 6e 20   /* The pattern 
8550: 73 74 72 69 6e 67 20 42 20 2a 2f 0a 20 20 63 6f  string B */.  co
8560: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
8570: 72 20 2a 7a 52 65 70 3b 20 20 20 20 20 20 20 20  r *zRep;        
8580: 2f 2a 20 54 68 65 20 72 65 70 6c 61 63 65 6d 65  /* The replaceme
8590: 6e 74 20 73 74 72 69 6e 67 20 43 20 2a 2f 0a 20  nt string C */. 
85a0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
85b0: 7a 4f 75 74 3b 20 20 20 20 20 20 20 20 20 20 20  zOut;           
85c0: 20 20 20 2f 2a 20 54 68 65 20 6f 75 74 70 75 74     /* The output
85d0: 20 2a 2f 0a 20 20 69 6e 74 20 6e 53 74 72 3b 20   */.  int nStr; 
85e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
85f0: 2a 20 53 69 7a 65 20 6f 66 20 7a 53 74 72 20 2a  * Size of zStr *
8600: 2f 0a 20 20 69 6e 74 20 6e 50 61 74 74 65 72 6e  /.  int nPattern
8610: 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ;            /* 
8620: 53 69 7a 65 20 6f 66 20 7a 50 61 74 74 65 72 6e  Size of zPattern
8630: 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 70 3b 20   */.  int nRep; 
8640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
8650: 2a 20 53 69 7a 65 20 6f 66 20 7a 52 65 70 20 2a  * Size of zRep *
8660: 2f 0a 20 20 69 36 34 20 6e 4f 75 74 3b 20 20 20  /.  i64 nOut;   
8670: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
8680: 4d 61 78 69 6d 75 6d 20 73 69 7a 65 20 6f 66 20  Maximum size of 
8690: 7a 4f 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6c 6f  zOut */.  int lo
86a0: 6f 70 4c 69 6d 69 74 3b 20 20 20 20 20 20 20 20  opLimit;        
86b0: 20 20 20 2f 2a 20 4c 61 73 74 20 7a 53 74 72 5b     /* Last zStr[
86c0: 5d 20 74 68 61 74 20 6d 69 67 68 74 20 6d 61 74  ] that might mat
86d0: 63 68 20 7a 50 61 74 74 65 72 6e 5b 5d 20 2a 2f  ch zPattern[] */
86e0: 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 20 20 20 20  .  int i, j;    
86f0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c              /* L
8700: 6f 6f 70 20 63 6f 75 6e 74 65 72 73 20 2a 2f 0a  oop counters */.
8710: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
8720: 3d 33 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =3 );.  UNUSED_P
8730: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
8740: 20 20 7a 53 74 72 20 3d 20 73 71 6c 69 74 65 33    zStr = sqlite3
8750: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
8760: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 53 74 72  [0]);.  if( zStr
8770: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
8780: 6e 53 74 72 20 3d 20 73 71 6c 69 74 65 33 5f 76  nStr = sqlite3_v
8790: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
87a0: 30 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20 7a  0]);.  assert( z
87b0: 53 74 72 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c  Str==sqlite3_val
87c0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
87d0: 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64   );  /* No encod
87e0: 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20  ing change */.  
87f0: 7a 50 61 74 74 65 72 6e 20 3d 20 73 71 6c 69 74  zPattern = sqlit
8800: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
8810: 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a 50  gv[1]);.  if( zP
8820: 61 74 74 65 72 6e 3d 3d 30 20 29 7b 0a 20 20 20  attern==0 ){.   
8830: 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 33   assert( sqlite3
8840: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
8850: 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [1])==SQLITE_NUL
8860: 4c 0a 20 20 20 20 20 20 20 20 20 20 20 20 7c 7c  L.            ||
8870: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
8880: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
8890: 78 74 29 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65  xt)->mallocFaile
88a0: 64 20 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b  d );.    return;
88b0: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 50 61 74 74  .  }.  if( zPatt
88c0: 65 72 6e 5b 30 5d 3d 3d 30 20 29 7b 0a 20 20 20  ern[0]==0 ){.   
88d0: 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 33   assert( sqlite3
88e0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
88f0: 5b 31 5d 29 21 3d 53 51 4c 49 54 45 5f 4e 55 4c  [1])!=SQLITE_NUL
8900: 4c 20 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  L );.    sqlite3
8910: 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f  _result_value(co
8920: 6e 74 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b  ntext, argv[0]);
8930: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
8940: 0a 20 20 6e 50 61 74 74 65 72 6e 20 3d 20 73 71  .  nPattern = sq
8950: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
8960: 73 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 61 73  s(argv[1]);.  as
8970: 73 65 72 74 28 20 7a 50 61 74 74 65 72 6e 3d 3d  sert( zPattern==
8980: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
8990: 78 74 28 61 72 67 76 5b 31 5d 29 20 29 3b 20 20  xt(argv[1]) );  
89a0: 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63  /* No encoding c
89b0: 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 52 65 70 20  hange */.  zRep 
89c0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
89d0: 74 65 78 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20  text(argv[2]);. 
89e0: 20 69 66 28 20 7a 52 65 70 3d 3d 30 20 29 20 72   if( zRep==0 ) r
89f0: 65 74 75 72 6e 3b 0a 20 20 6e 52 65 70 20 3d 20  eturn;.  nRep = 
8a00: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
8a10: 74 65 73 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20  tes(argv[2]);.  
8a20: 61 73 73 65 72 74 28 20 7a 52 65 70 3d 3d 73 71  assert( zRep==sq
8a30: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
8a40: 28 61 72 67 76 5b 32 5d 29 20 29 3b 0a 20 20 6e  (argv[2]) );.  n
8a50: 4f 75 74 20 3d 20 6e 53 74 72 20 2b 20 31 3b 0a  Out = nStr + 1;.
8a60: 20 20 61 73 73 65 72 74 28 20 6e 4f 75 74 3c 53    assert( nOut<S
8a70: 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48  QLITE_MAX_LENGTH
8a80: 20 29 3b 0a 20 20 7a 4f 75 74 20 3d 20 63 6f 6e   );.  zOut = con
8a90: 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65  textMalloc(conte
8aa0: 78 74 2c 20 28 69 36 34 29 6e 4f 75 74 29 3b 0a  xt, (i64)nOut);.
8ab0: 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29 7b    if( zOut==0 ){
8ac0: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
8ad0: 0a 20 20 6c 6f 6f 70 4c 69 6d 69 74 20 3d 20 6e  .  loopLimit = n
8ae0: 53 74 72 20 2d 20 6e 50 61 74 74 65 72 6e 3b 20  Str - nPattern; 
8af0: 20 0a 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 69   .  for(i=j=0; i
8b00: 3c 3d 6c 6f 6f 70 4c 69 6d 69 74 3b 20 69 2b 2b  <=loopLimit; i++
8b10: 29 7b 0a 20 20 20 20 69 66 28 20 7a 53 74 72 5b  ){.    if( zStr[
8b20: 69 5d 21 3d 7a 50 61 74 74 65 72 6e 5b 30 5d 20  i]!=zPattern[0] 
8b30: 7c 7c 20 6d 65 6d 63 6d 70 28 26 7a 53 74 72 5b  || memcmp(&zStr[
8b40: 69 5d 2c 20 7a 50 61 74 74 65 72 6e 2c 20 6e 50  i], zPattern, nP
8b50: 61 74 74 65 72 6e 29 20 29 7b 0a 20 20 20 20 20  attern) ){.     
8b60: 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20 7a 53 74   zOut[j++] = zSt
8b70: 72 5b 69 5d 3b 0a 20 20 20 20 7d 65 6c 73 65 7b  r[i];.    }else{
8b80: 0a 20 20 20 20 20 20 75 38 20 2a 7a 4f 6c 64 3b  .      u8 *zOld;
8b90: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 20 2a  .      sqlite3 *
8ba0: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
8bb0: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
8bc0: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20 6e  ontext);.      n
8bd0: 4f 75 74 20 2b 3d 20 6e 52 65 70 20 2d 20 6e 50  Out += nRep - nP
8be0: 61 74 74 65 72 6e 3b 0a 20 20 20 20 20 20 74 65  attern;.      te
8bf0: 73 74 63 61 73 65 28 20 6e 4f 75 74 2d 31 3d 3d  stcase( nOut-1==
8c00: 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  db->aLimit[SQLIT
8c10: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20  E_LIMIT_LENGTH] 
8c20: 29 3b 0a 20 20 20 20 20 20 74 65 73 74 63 61 73  );.      testcas
8c30: 65 28 20 6e 4f 75 74 2d 32 3d 3d 64 62 2d 3e 61  e( nOut-2==db->a
8c40: 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d  Limit[SQLITE_LIM
8c50: 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b 0a 20 20  IT_LENGTH] );.  
8c60: 20 20 20 20 69 66 28 20 6e 4f 75 74 2d 31 3e 64      if( nOut-1>d
8c70: 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45  b->aLimit[SQLITE
8c80: 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29  _LIMIT_LENGTH] )
8c90: 7b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65  {.        sqlite
8ca0: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 74  3_result_error_t
8cb0: 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29 3b 0a  oobig(context);.
8cc0: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
8cd0: 66 72 65 65 28 7a 4f 75 74 29 3b 0a 20 20 20 20  free(zOut);.    
8ce0: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20      return;.    
8cf0: 20 20 7d 0a 20 20 20 20 20 20 7a 4f 6c 64 20 3d    }.      zOld =
8d00: 20 7a 4f 75 74 3b 0a 20 20 20 20 20 20 7a 4f 75   zOut;.      zOu
8d10: 74 20 3d 20 73 71 6c 69 74 65 33 5f 72 65 61 6c  t = sqlite3_real
8d20: 6c 6f 63 36 34 28 7a 4f 75 74 2c 20 28 69 6e 74  loc64(zOut, (int
8d30: 29 6e 4f 75 74 29 3b 0a 20 20 20 20 20 20 69 66  )nOut);.      if
8d40: 28 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20 20 20  ( zOut==0 ){.   
8d50: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
8d60: 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28  ult_error_nomem(
8d70: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20 20  context);.      
8d80: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a    sqlite3_free(z
8d90: 4f 6c 64 29 3b 0a 20 20 20 20 20 20 20 20 72 65  Old);.        re
8da0: 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20  turn;.      }.  
8db0: 20 20 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75 74      memcpy(&zOut
8dc0: 5b 6a 5d 2c 20 7a 52 65 70 2c 20 6e 52 65 70 29  [j], zRep, nRep)
8dd0: 3b 0a 20 20 20 20 20 20 6a 20 2b 3d 20 6e 52 65  ;.      j += nRe
8de0: 70 3b 0a 20 20 20 20 20 20 69 20 2b 3d 20 6e 50  p;.      i += nP
8df0: 61 74 74 65 72 6e 2d 31 3b 0a 20 20 20 20 7d 0a  attern-1;.    }.
8e00: 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 6a 2b    }.  assert( j+
8e10: 6e 53 74 72 2d 69 2b 31 3d 3d 6e 4f 75 74 20 29  nStr-i+1==nOut )
8e20: 3b 0a 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75 74  ;.  memcpy(&zOut
8e30: 5b 6a 5d 2c 20 26 7a 53 74 72 5b 69 5d 2c 20 6e  [j], &zStr[i], n
8e40: 53 74 72 2d 69 29 3b 0a 20 20 6a 20 2b 3d 20 6e  Str-i);.  j += n
8e50: 53 74 72 20 2d 20 69 3b 0a 20 20 61 73 73 65 72  Str - i;.  asser
8e60: 74 28 20 6a 3c 3d 6e 4f 75 74 20 29 3b 0a 20 20  t( j<=nOut );.  
8e70: 7a 4f 75 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 73  zOut[j] = 0;.  s
8e80: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
8e90: 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61  xt(context, (cha
8ea0: 72 2a 29 7a 4f 75 74 2c 20 6a 2c 20 73 71 6c 69  r*)zOut, j, sqli
8eb0: 74 65 33 5f 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a  te3_free);.}../*
8ec0: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
8ed0: 6f 6e 20 6f 66 20 74 68 65 20 54 52 49 4d 28 29  on of the TRIM()
8ee0: 2c 20 4c 54 52 49 4d 28 29 2c 20 61 6e 64 20 52  , LTRIM(), and R
8ef0: 54 52 49 4d 28 29 20 66 75 6e 63 74 69 6f 6e 73  TRIM() functions
8f00: 2e 0a 2a 2a 20 54 68 65 20 75 73 65 72 64 61 74  ..** The userdat
8f10: 61 20 69 73 20 30 78 31 20 66 6f 72 20 6c 65 66  a is 0x1 for lef
8f20: 74 20 74 72 69 6d 2c 20 30 78 32 20 66 6f 72 20  t trim, 0x2 for 
8f30: 72 69 67 68 74 20 74 72 69 6d 2c 20 30 78 33 20  right trim, 0x3 
8f40: 66 6f 72 20 62 6f 74 68 2e 0a 2a 2f 0a 73 74 61  for both..*/.sta
8f50: 74 69 63 20 76 6f 69 64 20 74 72 69 6d 46 75 6e  tic void trimFun
8f60: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
8f70: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
8f80: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
8f90: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
8fa0: 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73  v.){.  const uns
8fb0: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 49 6e 3b  igned char *zIn;
8fc0: 20 20 20 20 20 20 20 20 20 2f 2a 20 49 6e 70 75           /* Inpu
8fd0: 74 20 73 74 72 69 6e 67 20 2a 2f 0a 20 20 63 6f  t string */.  co
8fe0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
8ff0: 72 20 2a 7a 43 68 61 72 53 65 74 3b 20 20 20 20  r *zCharSet;    
9000: 2f 2a 20 53 65 74 20 6f 66 20 63 68 61 72 61 63  /* Set of charac
9010: 74 65 72 73 20 74 6f 20 74 72 69 6d 20 2a 2f 0a  ters to trim */.
9020: 20 20 69 6e 74 20 6e 49 6e 3b 20 20 20 20 20 20    int nIn;      
9030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
9040: 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66      /* Number of
9050: 20 62 79 74 65 73 20 69 6e 20 69 6e 70 75 74 20   bytes in input 
9060: 2a 2f 0a 20 20 69 6e 74 20 66 6c 61 67 73 3b 20  */.  int flags; 
9070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
9080: 20 20 20 20 20 20 20 2f 2a 20 31 3a 20 74 72 69         /* 1: tri
9090: 6d 6c 65 66 74 20 20 32 3a 20 74 72 69 6d 72 69  mleft  2: trimri
90a0: 67 68 74 20 20 33 3a 20 74 72 69 6d 20 2a 2f 0a  ght  3: trim */.
90b0: 20 20 69 6e 74 20 69 3b 20 20 20 20 20 20 20 20    int i;        
90c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
90d0: 20 20 20 20 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e      /* Loop coun
90e0: 74 65 72 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65  ter */.  unsigne
90f0: 64 20 63 68 61 72 20 2a 61 4c 65 6e 20 3d 20 30  d char *aLen = 0
9100: 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 65  ;          /* Le
9110: 6e 67 74 68 20 6f 66 20 65 61 63 68 20 63 68 61  ngth of each cha
9120: 72 61 63 74 65 72 20 69 6e 20 7a 43 68 61 72 53  racter in zCharS
9130: 65 74 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 64  et */.  unsigned
9140: 20 63 68 61 72 20 2a 2a 61 7a 43 68 61 72 20 3d   char **azChar =
9150: 20 30 3b 20 20 20 20 20 20 20 2f 2a 20 49 6e 64   0;       /* Ind
9160: 69 76 69 64 75 61 6c 20 63 68 61 72 61 63 74 65  ividual characte
9170: 72 73 20 69 6e 20 7a 43 68 61 72 53 65 74 20 2a  rs in zCharSet *
9180: 2f 0a 20 20 69 6e 74 20 6e 43 68 61 72 3b 20 20  /.  int nChar;  
9190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
91a0: 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20        /* Number 
91b0: 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 69 6e  of characters in
91c0: 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a 0a 20 20   zCharSet */..  
91d0: 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  if( sqlite3_valu
91e0: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d  e_type(argv[0])=
91f0: 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a  =SQLITE_NULL ){.
9200: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
9210: 20 20 7a 49 6e 20 3d 20 73 71 6c 69 74 65 33 5f    zIn = sqlite3_
9220: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
9230: 30 5d 29 3b 0a 20 20 69 66 28 20 7a 49 6e 3d 3d  0]);.  if( zIn==
9240: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 49  0 ) return;.  nI
9250: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
9260: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29  e_bytes(argv[0])
9270: 3b 0a 20 20 61 73 73 65 72 74 28 20 7a 49 6e 3d  ;.  assert( zIn=
9280: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
9290: 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a  ext(argv[0]) );.
92a0: 20 20 69 66 28 20 61 72 67 63 3d 3d 31 20 29 7b    if( argc==1 ){
92b0: 0a 20 20 20 20 73 74 61 74 69 63 20 63 6f 6e 73  .    static cons
92c0: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
92d0: 6c 65 6e 4f 6e 65 5b 5d 20 3d 20 7b 20 31 20 7d  lenOne[] = { 1 }
92e0: 3b 0a 20 20 20 20 73 74 61 74 69 63 20 75 6e 73  ;.    static uns
92f0: 69 67 6e 65 64 20 63 68 61 72 20 2a 20 63 6f 6e  igned char * con
9300: 73 74 20 61 7a 4f 6e 65 5b 5d 20 3d 20 7b 20 28  st azOne[] = { (
9310: 75 38 2a 29 22 20 22 20 7d 3b 0a 20 20 20 20 6e  u8*)" " };.    n
9320: 43 68 61 72 20 3d 20 31 3b 0a 20 20 20 20 61 4c  Char = 1;.    aL
9330: 65 6e 20 3d 20 28 75 38 2a 29 6c 65 6e 4f 6e 65  en = (u8*)lenOne
9340: 3b 0a 20 20 20 20 61 7a 43 68 61 72 20 3d 20 28  ;.    azChar = (
9350: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 2a  unsigned char **
9360: 29 61 7a 4f 6e 65 3b 0a 20 20 20 20 7a 43 68 61  )azOne;.    zCha
9370: 72 53 65 74 20 3d 20 30 3b 0a 20 20 7d 65 6c 73  rSet = 0;.  }els
9380: 65 20 69 66 28 20 28 7a 43 68 61 72 53 65 74 20  e if( (zCharSet 
9390: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
93a0: 74 65 78 74 28 61 72 67 76 5b 31 5d 29 29 3d 3d  text(argv[1]))==
93b0: 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b  0 ){.    return;
93c0: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 63 6f  .  }else{.    co
93d0: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
93e0: 72 20 2a 7a 3b 0a 20 20 20 20 66 6f 72 28 7a 3d  r *z;.    for(z=
93f0: 7a 43 68 61 72 53 65 74 2c 20 6e 43 68 61 72 3d  zCharSet, nChar=
9400: 30 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b  0; *z; nChar++){
9410: 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b  .      SQLITE_SK
9420: 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20 20  IP_UTF8(z);.    
9430: 7d 0a 20 20 20 20 69 66 28 20 6e 43 68 61 72 3e  }.    if( nChar>
9440: 30 20 29 7b 0a 20 20 20 20 20 20 61 7a 43 68 61  0 ){.      azCha
9450: 72 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  r = contextMallo
9460: 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34  c(context, ((i64
9470: 29 6e 43 68 61 72 29 2a 28 73 69 7a 65 6f 66 28  )nChar)*(sizeof(
9480: 63 68 61 72 2a 29 2b 31 29 29 3b 0a 20 20 20 20  char*)+1));.    
9490: 20 20 69 66 28 20 61 7a 43 68 61 72 3d 3d 30 20    if( azChar==0 
94a0: 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72  ){.        retur
94b0: 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  n;.      }.     
94c0: 20 61 4c 65 6e 20 3d 20 28 75 6e 73 69 67 6e 65   aLen = (unsigne
94d0: 64 20 63 68 61 72 2a 29 26 61 7a 43 68 61 72 5b  d char*)&azChar[
94e0: 6e 43 68 61 72 5d 3b 0a 20 20 20 20 20 20 66 6f  nChar];.      fo
94f0: 72 28 7a 3d 7a 43 68 61 72 53 65 74 2c 20 6e 43  r(z=zCharSet, nC
9500: 68 61 72 3d 30 3b 20 2a 7a 3b 20 6e 43 68 61 72  har=0; *z; nChar
9510: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 61 7a 43  ++){.        azC
9520: 68 61 72 5b 6e 43 68 61 72 5d 20 3d 20 28 75 6e  har[nChar] = (un
9530: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a 3b  signed char *)z;
9540: 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f  .        SQLITE_
9550: 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20  SKIP_UTF8(z);.  
9560: 20 20 20 20 20 20 61 4c 65 6e 5b 6e 43 68 61 72        aLen[nChar
9570: 5d 20 3d 20 28 75 38 29 28 7a 20 2d 20 61 7a 43  ] = (u8)(z - azC
9580: 68 61 72 5b 6e 43 68 61 72 5d 29 3b 0a 20 20 20  har[nChar]);.   
9590: 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 20     }.    }.  }. 
95a0: 20 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b 0a   if( nChar>0 ){.
95b0: 20 20 20 20 66 6c 61 67 73 20 3d 20 53 51 4c 49      flags = SQLI
95c0: 54 45 5f 50 54 52 5f 54 4f 5f 49 4e 54 28 73 71  TE_PTR_TO_INT(sq
95d0: 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28  lite3_user_data(
95e0: 63 6f 6e 74 65 78 74 29 29 3b 0a 20 20 20 20 69  context));.    i
95f0: 66 28 20 66 6c 61 67 73 20 26 20 31 20 29 7b 0a  f( flags & 1 ){.
9600: 20 20 20 20 20 20 77 68 69 6c 65 28 20 6e 49 6e        while( nIn
9610: 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e  >0 ){.        in
9620: 74 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20  t len = 0;.     
9630: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 43     for(i=0; i<nC
9640: 68 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20  har; i++){.     
9650: 20 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e 5b       len = aLen[
9660: 69 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66  i];.          if
9670: 28 20 6c 65 6e 3c 3d 6e 49 6e 20 26 26 20 6d 65  ( len<=nIn && me
9680: 6d 63 6d 70 28 7a 49 6e 2c 20 61 7a 43 68 61 72  mcmp(zIn, azChar
9690: 5b 69 5d 2c 20 6c 65 6e 29 3d 3d 30 20 29 20 62  [i], len)==0 ) b
96a0: 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 7d 0a  reak;.        }.
96b0: 20 20 20 20 20 20 20 20 69 66 28 20 69 3e 3d 6e          if( i>=n
96c0: 43 68 61 72 20 29 20 62 72 65 61 6b 3b 0a 20 20  Char ) break;.  
96d0: 20 20 20 20 20 20 7a 49 6e 20 2b 3d 20 6c 65 6e        zIn += len
96e0: 3b 0a 20 20 20 20 20 20 20 20 6e 49 6e 20 2d 3d  ;.        nIn -=
96f0: 20 6c 65 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20   len;.      }.  
9700: 20 20 7d 0a 20 20 20 20 69 66 28 20 66 6c 61 67    }.    if( flag
9710: 73 20 26 20 32 20 29 7b 0a 20 20 20 20 20 20 77  s & 2 ){.      w
9720: 68 69 6c 65 28 20 6e 49 6e 3e 30 20 29 7b 0a 20  hile( nIn>0 ){. 
9730: 20 20 20 20 20 20 20 69 6e 74 20 6c 65 6e 20 3d         int len =
9740: 20 30 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28   0;.        for(
9750: 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20 69 2b  i=0; i<nChar; i+
9760: 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6c 65  +){.          le
9770: 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20 20  n = aLen[i];.   
9780: 20 20 20 20 20 20 20 69 66 28 20 6c 65 6e 3c 3d         if( len<=
9790: 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28 26 7a  nIn && memcmp(&z
97a0: 49 6e 5b 6e 49 6e 2d 6c 65 6e 5d 2c 61 7a 43 68  In[nIn-len],azCh
97b0: 61 72 5b 69 5d 2c 6c 65 6e 29 3d 3d 30 20 29 20  ar[i],len)==0 ) 
97c0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 7d  break;.        }
97d0: 0a 20 20 20 20 20 20 20 20 69 66 28 20 69 3e 3d  .        if( i>=
97e0: 6e 43 68 61 72 20 29 20 62 72 65 61 6b 3b 0a 20  nChar ) break;. 
97f0: 20 20 20 20 20 20 20 6e 49 6e 20 2d 3d 20 6c 65         nIn -= le
9800: 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  n;.      }.    }
9810: 0a 20 20 20 20 69 66 28 20 7a 43 68 61 72 53 65  .    if( zCharSe
9820: 74 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  t ){.      sqlit
9830: 65 33 5f 66 72 65 65 28 61 7a 43 68 61 72 29 3b  e3_free(azChar);
9840: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c  .    }.  }.  sql
9850: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
9860: 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a  (context, (char*
9870: 29 7a 49 6e 2c 20 6e 49 6e 2c 20 53 51 4c 49 54  )zIn, nIn, SQLIT
9880: 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 7d 0a  E_TRANSIENT);.}.
9890: 0a 0a 2f 2a 20 49 4d 50 3a 20 52 2d 32 35 33 36  ../* IMP: R-2536
98a0: 31 2d 31 36 31 35 30 20 54 68 69 73 20 66 75 6e  1-16150 This fun
98b0: 63 74 69 6f 6e 20 69 73 20 6f 6d 69 74 74 65 64  ction is omitted
98c0: 20 66 72 6f 6d 20 53 51 4c 69 74 65 20 62 79 20   from SQLite by 
98d0: 64 65 66 61 75 6c 74 2e 20 49 74 0a 2a 2a 20 69  default. It.** i
98e0: 73 20 6f 6e 6c 79 20 61 76 61 69 6c 61 62 6c 65  s only available
98f0: 20 69 66 20 74 68 65 20 53 51 4c 49 54 45 5f 53   if the SQLITE_S
9900: 4f 55 4e 44 45 58 20 63 6f 6d 70 69 6c 65 2d 74  OUNDEX compile-t
9910: 69 6d 65 20 6f 70 74 69 6f 6e 20 69 73 20 75 73  ime option is us
9920: 65 64 0a 2a 2a 20 77 68 65 6e 20 53 51 4c 69 74  ed.** when SQLit
9930: 65 20 69 73 20 62 75 69 6c 74 2e 0a 2a 2f 0a 23  e is built..*/.#
9940: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55  ifdef SQLITE_SOU
9950: 4e 44 45 58 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 75  NDEX./*.** Compu
9960: 74 65 20 74 68 65 20 73 6f 75 6e 64 65 78 20 65  te the soundex e
9970: 6e 63 6f 64 69 6e 67 20 6f 66 20 61 20 77 6f 72  ncoding of a wor
9980: 64 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52 2d  d..**.** IMP: R-
9990: 35 39 37 38 32 2d 30 30 30 37 32 20 54 68 65 20  59782-00072 The 
99a0: 73 6f 75 6e 64 65 78 28 58 29 20 66 75 6e 63 74  soundex(X) funct
99b0: 69 6f 6e 20 72 65 74 75 72 6e 73 20 61 20 73 74  ion returns a st
99c0: 72 69 6e 67 20 74 68 61 74 20 69 73 20 74 68 65  ring that is the
99d0: 0a 2a 2a 20 73 6f 75 6e 64 65 78 20 65 6e 63 6f  .** soundex enco
99e0: 64 69 6e 67 20 6f 66 20 74 68 65 20 73 74 72 69  ding of the stri
99f0: 6e 67 20 58 2e 20 0a 2a 2f 0a 73 74 61 74 69 63  ng X. .*/.static
9a00: 20 76 6f 69 64 20 73 6f 75 6e 64 65 78 46 75 6e   void soundexFun
9a10: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
9a20: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
9a30: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
9a40: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
9a50: 76 0a 29 7b 0a 20 20 63 68 61 72 20 7a 52 65 73  v.){.  char zRes
9a60: 75 6c 74 5b 38 5d 3b 0a 20 20 63 6f 6e 73 74 20  ult[8];.  const 
9a70: 75 38 20 2a 7a 49 6e 3b 0a 20 20 69 6e 74 20 69  u8 *zIn;.  int i
9a80: 2c 20 6a 3b 0a 20 20 73 74 61 74 69 63 20 63 6f  , j;.  static co
9a90: 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61  nst unsigned cha
9aa0: 72 20 69 43 6f 64 65 5b 5d 20 3d 20 7b 0a 20 20  r iCode[] = {.  
9ab0: 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c    0, 0, 0, 0, 0,
9ac0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9ad0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9ae0: 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30  ,.    0, 0, 0, 0
9af0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9b00: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9b10: 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20  0, 0,.    0, 0, 
9b20: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9b30: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
9b40: 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c   0, 0, 0,.    0,
9b50: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
9b60: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
9b70: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20  , 0, 0, 0, 0,.  
9b80: 20 20 30 2c 20 30 2c 20 31 2c 20 32 2c 20 33 2c    0, 0, 1, 2, 3,
9b90: 20 30 2c 20 31 2c 20 32 2c 20 30 2c 20 30 2c 20   0, 1, 2, 0, 0, 
9ba0: 32 2c 20 32 2c 20 34 2c 20 35 2c 20 35 2c 20 30  2, 2, 4, 5, 5, 0
9bb0: 2c 0a 20 20 20 20 31 2c 20 32 2c 20 36 2c 20 32  ,.    1, 2, 6, 2
9bc0: 2c 20 33 2c 20 30 2c 20 31 2c 20 30 2c 20 32 2c  , 3, 0, 1, 0, 2,
9bd0: 20 30 2c 20 32 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 2, 0, 0, 0, 
9be0: 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20  0, 0,.    0, 0, 
9bf0: 31 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 32  1, 2, 3, 0, 1, 2
9c00: 2c 20 30 2c 20 30 2c 20 32 2c 20 32 2c 20 34 2c  , 0, 0, 2, 2, 4,
9c10: 20 35 2c 20 35 2c 20 30 2c 0a 20 20 20 20 31 2c   5, 5, 0,.    1,
9c20: 20 32 2c 20 36 2c 20 32 2c 20 33 2c 20 30 2c 20   2, 6, 2, 3, 0, 
9c30: 31 2c 20 30 2c 20 32 2c 20 30 2c 20 32 2c 20 30  1, 0, 2, 0, 2, 0
9c40: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20  , 0, 0, 0, 0,.  
9c50: 7d 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  };.  assert( arg
9c60: 63 3d 3d 31 20 29 3b 0a 20 20 7a 49 6e 20 3d 20  c==1 );.  zIn = 
9c70: 28 75 38 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  (u8*)sqlite3_val
9c80: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
9c90: 3b 0a 20 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29  ;.  if( zIn==0 )
9ca0: 20 7a 49 6e 20 3d 20 28 75 38 2a 29 22 22 3b 0a   zIn = (u8*)"";.
9cb0: 20 20 66 6f 72 28 69 3d 30 3b 20 7a 49 6e 5b 69    for(i=0; zIn[i
9cc0: 5d 20 26 26 20 21 73 71 6c 69 74 65 33 49 73 61  ] && !sqlite3Isa
9cd0: 6c 70 68 61 28 7a 49 6e 5b 69 5d 29 3b 20 69 2b  lpha(zIn[i]); i+
9ce0: 2b 29 7b 7d 0a 20 20 69 66 28 20 7a 49 6e 5b 69  +){}.  if( zIn[i
9cf0: 5d 20 29 7b 0a 20 20 20 20 75 38 20 70 72 65 76  ] ){.    u8 prev
9d00: 63 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49 6e  code = iCode[zIn
9d10: 5b 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20 7a  [i]&0x7f];.    z
9d20: 52 65 73 75 6c 74 5b 30 5d 20 3d 20 73 71 6c 69  Result[0] = sqli
9d30: 74 65 33 54 6f 75 70 70 65 72 28 7a 49 6e 5b 69  te3Toupper(zIn[i
9d40: 5d 29 3b 0a 20 20 20 20 66 6f 72 28 6a 3d 31 3b  ]);.    for(j=1;
9d50: 20 6a 3c 34 20 26 26 20 7a 49 6e 5b 69 5d 3b 20   j<4 && zIn[i]; 
9d60: 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74 20  i++){.      int 
9d70: 63 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49 6e  code = iCode[zIn
9d80: 5b 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20 20  [i]&0x7f];.     
9d90: 20 69 66 28 20 63 6f 64 65 3e 30 20 29 7b 0a 20   if( code>0 ){. 
9da0: 20 20 20 20 20 20 20 69 66 28 20 63 6f 64 65 21         if( code!
9db0: 3d 70 72 65 76 63 6f 64 65 20 29 7b 0a 20 20 20  =prevcode ){.   
9dc0: 20 20 20 20 20 20 20 70 72 65 76 63 6f 64 65 20         prevcode 
9dd0: 3d 20 63 6f 64 65 3b 0a 20 20 20 20 20 20 20 20  = code;.        
9de0: 20 20 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20 3d    zResult[j++] =
9df0: 20 63 6f 64 65 20 2b 20 27 30 27 3b 0a 20 20 20   code + '0';.   
9e00: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 65 6c       }.      }el
9e10: 73 65 7b 0a 20 20 20 20 20 20 20 20 70 72 65 76  se{.        prev
9e20: 63 6f 64 65 20 3d 20 30 3b 0a 20 20 20 20 20 20  code = 0;.      
9e30: 7d 0a 20 20 20 20 7d 0a 20 20 20 20 77 68 69 6c  }.    }.    whil
9e40: 65 28 20 6a 3c 34 20 29 7b 0a 20 20 20 20 20 20  e( j<4 ){.      
9e50: 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 27  zResult[j++] = '
9e60: 30 27 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 52  0';.    }.    zR
9e70: 65 73 75 6c 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20  esult[j] = 0;.  
9e80: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
9e90: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a  _text(context, z
9ea0: 52 65 73 75 6c 74 2c 20 34 2c 20 53 51 4c 49 54  Result, 4, SQLIT
9eb0: 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20  E_TRANSIENT);.  
9ec0: 7d 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 49 4d  }else{.    /* IM
9ed0: 50 3a 20 52 2d 36 34 38 39 34 2d 35 30 33 32 31  P: R-64894-50321
9ee0: 20 54 68 65 20 73 74 72 69 6e 67 20 22 3f 30 30   The string "?00
9ef0: 30 22 20 69 73 20 72 65 74 75 72 6e 65 64 20 69  0" is returned i
9f00: 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 0a 20  f the argument. 
9f10: 20 20 20 2a 2a 20 69 73 20 4e 55 4c 4c 20 6f 72     ** is NULL or
9f20: 20 63 6f 6e 74 61 69 6e 73 20 6e 6f 20 41 53 43   contains no ASC
9f30: 49 49 20 61 6c 70 68 61 62 65 74 69 63 20 63 68  II alphabetic ch
9f40: 61 72 61 63 74 65 72 73 2e 20 2a 2f 0a 20 20 20  aracters. */.   
9f50: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
9f60: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 22 3f  text(context, "?
9f70: 30 30 30 22 2c 20 34 2c 20 53 51 4c 49 54 45 5f  000", 4, SQLITE_
9f80: 53 54 41 54 49 43 29 3b 0a 20 20 7d 0a 7d 0a 23  STATIC);.  }.}.#
9f90: 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f  endif /* SQLITE_
9fa0: 53 4f 55 4e 44 45 58 20 2a 2f 0a 0a 23 69 66 6e  SOUNDEX */..#ifn
9fb0: 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f  def SQLITE_OMIT_
9fc0: 4c 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e 0a 2f  LOAD_EXTENSION./
9fd0: 2a 0a 2a 2a 20 41 20 66 75 6e 63 74 69 6f 6e 20  *.** A function 
9fe0: 74 68 61 74 20 6c 6f 61 64 73 20 61 20 73 68 61  that loads a sha
9ff0: 72 65 64 2d 6c 69 62 72 61 72 79 20 65 78 74 65  red-library exte
a000: 6e 73 69 6f 6e 20 74 68 65 6e 20 72 65 74 75 72  nsion then retur
a010: 6e 73 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74  ns NULL..*/.stat
a020: 69 63 20 76 6f 69 64 20 6c 6f 61 64 45 78 74 28  ic void loadExt(
a030: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
a040: 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72  *context, int ar
a050: 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  gc, sqlite3_valu
a060: 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 6f 6e  e **argv){.  con
a070: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 20 3d  st char *zFile =
a080: 20 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 73   (const char *)s
a090: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
a0a0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 63 6f  t(argv[0]);.  co
a0b0: 6e 73 74 20 63 68 61 72 20 2a 7a 50 72 6f 63 3b  nst char *zProc;
a0c0: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d  .  sqlite3 *db =
a0d0: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
a0e0: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
a0f0: 78 74 29 3b 0a 20 20 63 68 61 72 20 2a 7a 45 72  xt);.  char *zEr
a100: 72 4d 73 67 20 3d 20 30 3b 0a 0a 20 20 69 66 28  rMsg = 0;..  if(
a110: 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20   argc==2 ){.    
a120: 7a 50 72 6f 63 20 3d 20 28 63 6f 6e 73 74 20 63  zProc = (const c
a130: 68 61 72 20 2a 29 73 71 6c 69 74 65 33 5f 76 61  har *)sqlite3_va
a140: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d  lue_text(argv[1]
a150: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
a160: 7a 50 72 6f 63 20 3d 20 30 3b 0a 20 20 7d 0a 20  zProc = 0;.  }. 
a170: 20 69 66 28 20 7a 46 69 6c 65 20 26 26 20 73 71   if( zFile && sq
a180: 6c 69 74 65 33 5f 6c 6f 61 64 5f 65 78 74 65 6e  lite3_load_exten
a190: 73 69 6f 6e 28 64 62 2c 20 7a 46 69 6c 65 2c 20  sion(db, zFile, 
a1a0: 7a 50 72 6f 63 2c 20 26 7a 45 72 72 4d 73 67 29  zProc, &zErrMsg)
a1b0: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f   ){.    sqlite3_
a1c0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
a1d0: 74 65 78 74 2c 20 7a 45 72 72 4d 73 67 2c 20 2d  text, zErrMsg, -
a1e0: 31 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f  1);.    sqlite3_
a1f0: 66 72 65 65 28 7a 45 72 72 4d 73 67 29 3b 0a 20  free(zErrMsg);. 
a200: 20 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a   }.}.#endif.../*
a210: 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 20  .** An instance 
a220: 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67  of the following
a230: 20 73 74 72 75 63 74 75 72 65 20 68 6f 6c 64 73   structure holds
a240: 20 74 68 65 20 63 6f 6e 74 65 78 74 20 6f 66 20   the context of 
a250: 61 0a 2a 2a 20 73 75 6d 28 29 20 6f 72 20 61 76  a.** sum() or av
a260: 67 28 29 20 61 67 67 72 65 67 61 74 65 20 63 6f  g() aggregate co
a270: 6d 70 75 74 61 74 69 6f 6e 2e 0a 2a 2f 0a 74 79  mputation..*/.ty
a280: 70 65 64 65 66 20 73 74 72 75 63 74 20 53 75 6d  pedef struct Sum
a290: 43 74 78 20 53 75 6d 43 74 78 3b 0a 73 74 72 75  Ctx SumCtx;.stru
a2a0: 63 74 20 53 75 6d 43 74 78 20 7b 0a 20 20 64 6f  ct SumCtx {.  do
a2b0: 75 62 6c 65 20 72 53 75 6d 3b 20 20 20 20 20 20  uble rSum;      
a2c0: 2f 2a 20 46 6c 6f 61 74 69 6e 67 20 70 6f 69 6e  /* Floating poin
a2d0: 74 20 73 75 6d 20 2a 2f 0a 20 20 69 36 34 20 69  t sum */.  i64 i
a2e0: 53 75 6d 3b 20 20 20 20 20 20 20 20 20 2f 2a 20  Sum;         /* 
a2f0: 49 6e 74 65 67 65 72 20 73 75 6d 20 2a 2f 20 20  Integer sum */  
a300: 20 0a 20 20 69 36 34 20 63 6e 74 3b 20 20 20 20   .  i64 cnt;    
a310: 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20        /* Number 
a320: 6f 66 20 65 6c 65 6d 65 6e 74 73 20 73 75 6d 6d  of elements summ
a330: 65 64 20 2a 2f 0a 20 20 75 38 20 6f 76 65 72 66  ed */.  u8 overf
a340: 6c 6f 77 3b 20 20 20 20 20 20 2f 2a 20 54 72 75  low;      /* Tru
a350: 65 20 69 66 20 69 6e 74 65 67 65 72 20 6f 76 65  e if integer ove
a360: 72 66 6c 6f 77 20 73 65 65 6e 20 2a 2f 0a 20 20  rflow seen */.  
a370: 75 38 20 61 70 70 72 6f 78 3b 20 20 20 20 20 20  u8 approx;      
a380: 20 20 2f 2a 20 54 72 75 65 20 69 66 20 6e 6f 6e    /* True if non
a390: 2d 69 6e 74 65 67 65 72 20 76 61 6c 75 65 20 77  -integer value w
a3a0: 61 73 20 69 6e 70 75 74 20 74 6f 20 74 68 65 20  as input to the 
a3b0: 73 75 6d 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a  sum */.};../*.**
a3c0: 20 52 6f 75 74 69 6e 65 73 20 75 73 65 64 20 74   Routines used t
a3d0: 6f 20 63 6f 6d 70 75 74 65 20 74 68 65 20 73 75  o compute the su
a3e0: 6d 2c 20 61 76 65 72 61 67 65 2c 20 61 6e 64 20  m, average, and 
a3f0: 74 6f 74 61 6c 2e 0a 2a 2a 0a 2a 2a 20 54 68 65  total..**.** The
a400: 20 53 55 4d 28 29 20 66 75 6e 63 74 69 6f 6e 20   SUM() function 
a410: 66 6f 6c 6c 6f 77 73 20 74 68 65 20 28 62 72 6f  follows the (bro
a420: 6b 65 6e 29 20 53 51 4c 20 73 74 61 6e 64 61 72  ken) SQL standar
a430: 64 20 77 68 69 63 68 20 6d 65 61 6e 73 0a 2a 2a  d which means.**
a440: 20 74 68 61 74 20 69 74 20 72 65 74 75 72 6e 73   that it returns
a450: 20 4e 55 4c 4c 20 69 66 20 69 74 20 73 75 6d 73   NULL if it sums
a460: 20 6f 76 65 72 20 6e 6f 20 69 6e 70 75 74 73 2e   over no inputs.
a470: 20 20 54 4f 54 41 4c 20 72 65 74 75 72 6e 73 0a    TOTAL returns.
a480: 2a 2a 20 30 2e 30 20 69 6e 20 74 68 61 74 20 63  ** 0.0 in that c
a490: 61 73 65 2e 20 20 49 6e 20 61 64 64 69 74 69 6f  ase.  In additio
a4a0: 6e 2c 20 54 4f 54 41 4c 20 61 6c 77 61 79 73 20  n, TOTAL always 
a4b0: 72 65 74 75 72 6e 73 20 61 20 66 6c 6f 61 74 20  returns a float 
a4c0: 77 68 65 72 65 0a 2a 2a 20 53 55 4d 20 6d 69 67  where.** SUM mig
a4d0: 68 74 20 72 65 74 75 72 6e 20 61 6e 20 69 6e 74  ht return an int
a4e0: 65 67 65 72 20 69 66 20 69 74 20 6e 65 76 65 72  eger if it never
a4f0: 20 65 6e 63 6f 75 6e 74 65 72 73 20 61 20 66 6c   encounters a fl
a500: 6f 61 74 69 6e 67 20 70 6f 69 6e 74 0a 2a 2a 20  oating point.** 
a510: 76 61 6c 75 65 2e 20 20 54 4f 54 41 4c 20 6e 65  value.  TOTAL ne
a520: 76 65 72 20 66 61 69 6c 73 2c 20 62 75 74 20 53  ver fails, but S
a530: 55 4d 20 6d 69 67 68 74 20 74 68 72 6f 75 67 68  UM might through
a540: 20 61 6e 20 65 78 63 65 70 74 69 6f 6e 20 69 66   an exception if
a550: 0a 2a 2a 20 69 74 20 6f 76 65 72 66 6c 6f 77 73  .** it overflows
a560: 20 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a   an integer..*/.
a570: 73 74 61 74 69 63 20 76 6f 69 64 20 73 75 6d 53  static void sumS
a580: 74 65 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  tep(sqlite3_cont
a590: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
a5a0: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
a5b0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
a5c0: 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 69 6e   SumCtx *p;.  in
a5d0: 74 20 74 79 70 65 3b 0a 20 20 61 73 73 65 72 74  t type;.  assert
a5e0: 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55  ( argc==1 );.  U
a5f0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
a600: 61 72 67 63 29 3b 0a 20 20 70 20 3d 20 73 71 6c  argc);.  p = sql
a610: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
a620: 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  ontext(context, 
a630: 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 74  sizeof(*p));.  t
a640: 79 70 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  ype = sqlite3_va
a650: 6c 75 65 5f 6e 75 6d 65 72 69 63 5f 74 79 70 65  lue_numeric_type
a660: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28  (argv[0]);.  if(
a670: 20 70 20 26 26 20 74 79 70 65 21 3d 53 51 4c 49   p && type!=SQLI
a680: 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 70  TE_NULL ){.    p
a690: 2d 3e 63 6e 74 2b 2b 3b 0a 20 20 20 20 69 66 28  ->cnt++;.    if(
a6a0: 20 74 79 70 65 3d 3d 53 51 4c 49 54 45 5f 49 4e   type==SQLITE_IN
a6b0: 54 45 47 45 52 20 29 7b 0a 20 20 20 20 20 20 69  TEGER ){.      i
a6c0: 36 34 20 76 20 3d 20 73 71 6c 69 74 65 33 5f 76  64 v = sqlite3_v
a6d0: 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67 76 5b  alue_int64(argv[
a6e0: 30 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e 72 53  0]);.      p->rS
a6f0: 75 6d 20 2b 3d 20 76 3b 0a 20 20 20 20 20 20 69  um += v;.      i
a700: 66 28 20 28 70 2d 3e 61 70 70 72 6f 78 7c 70 2d  f( (p->approx|p-
a710: 3e 6f 76 65 72 66 6c 6f 77 29 3d 3d 30 20 26 26  >overflow)==0 &&
a720: 20 73 71 6c 69 74 65 33 41 64 64 49 6e 74 36 34   sqlite3AddInt64
a730: 28 26 70 2d 3e 69 53 75 6d 2c 20 76 29 20 29 7b  (&p->iSum, v) ){
a740: 0a 20 20 20 20 20 20 20 20 70 2d 3e 6f 76 65 72  .        p->over
a750: 66 6c 6f 77 20 3d 20 31 3b 0a 20 20 20 20 20 20  flow = 1;.      
a760: 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  }.    }else{.   
a770: 20 20 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 73 71     p->rSum += sq
a780: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62  lite3_value_doub
a790: 6c 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20  le(argv[0]);.   
a7a0: 20 20 20 70 2d 3e 61 70 70 72 6f 78 20 3d 20 31     p->approx = 1
a7b0: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74  ;.    }.  }.}.st
a7c0: 61 74 69 63 20 76 6f 69 64 20 73 75 6d 46 69 6e  atic void sumFin
a7d0: 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f  alize(sqlite3_co
a7e0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b  ntext *context){
a7f0: 0a 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20  .  SumCtx *p;.  
a800: 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72  p = sqlite3_aggr
a810: 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f  egate_context(co
a820: 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28  ntext, 0);.  if(
a830: 20 70 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29   p && p->cnt>0 )
a840: 7b 0a 20 20 20 20 69 66 28 20 70 2d 3e 6f 76 65  {.    if( p->ove
a850: 72 66 6c 6f 77 20 29 7b 0a 20 20 20 20 20 20 73  rflow ){.      s
a860: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
a870: 72 6f 72 28 63 6f 6e 74 65 78 74 2c 22 69 6e 74  ror(context,"int
a880: 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 22 2c 2d  eger overflow",-
a890: 31 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66  1);.    }else if
a8a0: 28 20 70 2d 3e 61 70 70 72 6f 78 20 29 7b 0a 20  ( p->approx ){. 
a8b0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
a8c0: 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65  ult_double(conte
a8d0: 78 74 2c 20 70 2d 3e 72 53 75 6d 29 3b 0a 20 20  xt, p->rSum);.  
a8e0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73    }else{.      s
a8f0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
a900: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e  t64(context, p->
a910: 69 53 75 6d 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  iSum);.    }.  }
a920: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 61  .}.static void a
a930: 76 67 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  vgFinalize(sqlit
a940: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
a950: 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a  ext){.  SumCtx *
a960: 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  p;.  p = sqlite3
a970: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
a980: 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a  xt(context, 0);.
a990: 20 20 69 66 28 20 70 20 26 26 20 70 2d 3e 63 6e    if( p && p->cn
a9a0: 74 3e 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  t>0 ){.    sqlit
a9b0: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
a9c0: 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 72 53 75  (context, p->rSu
a9d0: 6d 2f 28 64 6f 75 62 6c 65 29 70 2d 3e 63 6e 74  m/(double)p->cnt
a9e0: 29 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20  );.  }.}.static 
a9f0: 76 6f 69 64 20 74 6f 74 61 6c 46 69 6e 61 6c 69  void totalFinali
aa00: 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  ze(sqlite3_conte
aa10: 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20  xt *context){.  
aa20: 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d  SumCtx *p;.  p =
aa30: 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61   sqlite3_aggrega
aa40: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
aa50: 78 74 2c 20 30 29 3b 0a 20 20 2f 2a 20 28 64 6f  xt, 0);.  /* (do
aa60: 75 62 6c 65 29 30 20 49 6e 20 63 61 73 65 20 6f  uble)0 In case o
aa70: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c  f SQLITE_OMIT_FL
aa80: 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 2e 2e 2e 20  OATING_POINT... 
aa90: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73  */.  sqlite3_res
aaa0: 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65  ult_double(conte
aab0: 78 74 2c 20 70 20 3f 20 70 2d 3e 72 53 75 6d 20  xt, p ? p->rSum 
aac0: 3a 20 28 64 6f 75 62 6c 65 29 30 29 3b 0a 7d 0a  : (double)0);.}.
aad0: 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f  ./*.** The follo
aae0: 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 6b  wing structure k
aaf0: 65 65 70 73 20 74 72 61 63 6b 20 6f 66 20 73 74  eeps track of st
ab00: 61 74 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20  ate information 
ab10: 66 6f 72 20 74 68 65 0a 2a 2a 20 63 6f 75 6e 74  for the.** count
ab20: 28 29 20 61 67 67 72 65 67 61 74 65 20 66 75 6e  () aggregate fun
ab30: 63 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65  ction..*/.typede
ab40: 66 20 73 74 72 75 63 74 20 43 6f 75 6e 74 43 74  f struct CountCt
ab50: 78 20 43 6f 75 6e 74 43 74 78 3b 0a 73 74 72 75  x CountCtx;.stru
ab60: 63 74 20 43 6f 75 6e 74 43 74 78 20 7b 0a 20 20  ct CountCtx {.  
ab70: 69 36 34 20 6e 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a  i64 n;.};../*.**
ab80: 20 52 6f 75 74 69 6e 65 73 20 74 6f 20 69 6d 70   Routines to imp
ab90: 6c 65 6d 65 6e 74 20 74 68 65 20 63 6f 75 6e 74  lement the count
aba0: 28 29 20 61 67 67 72 65 67 61 74 65 20 66 75 6e  () aggregate fun
abb0: 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63  ction..*/.static
abc0: 20 76 6f 69 64 20 63 6f 75 6e 74 53 74 65 70 28   void countStep(
abd0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
abe0: 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72  *context, int ar
abf0: 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  gc, sqlite3_valu
ac00: 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 43 6f 75  e **argv){.  Cou
ac10: 6e 74 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20  ntCtx *p;.  p = 
ac20: 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74  sqlite3_aggregat
ac30: 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78  e_context(contex
ac40: 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a  t, sizeof(*p));.
ac50: 20 20 69 66 28 20 28 61 72 67 63 3d 3d 30 20 7c    if( (argc==0 |
ac60: 7c 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 21 3d 73  | SQLITE_NULL!=s
ac70: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
ac80: 65 28 61 72 67 76 5b 30 5d 29 29 20 26 26 20 70  e(argv[0])) && p
ac90: 20 29 7b 0a 20 20 20 20 70 2d 3e 6e 2b 2b 3b 0a   ){.    p->n++;.
aca0: 20 20 7d 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c    }..#ifndef SQL
acb0: 49 54 45 5f 4f 4d 49 54 5f 44 45 50 52 45 43 41  ITE_OMIT_DEPRECA
acc0: 54 45 44 0a 20 20 2f 2a 20 54 68 65 20 73 71 6c  TED.  /* The sql
acd0: 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63  ite3_aggregate_c
ace0: 6f 75 6e 74 28 29 20 66 75 6e 63 74 69 6f 6e 20  ount() function 
acf0: 69 73 20 64 65 70 72 65 63 61 74 65 64 2e 20 20  is deprecated.  
ad00: 42 75 74 20 6a 75 73 74 20 74 6f 20 6d 61 6b 65  But just to make
ad10: 0a 20 20 2a 2a 20 73 75 72 65 20 69 74 20 73 74  .  ** sure it st
ad20: 69 6c 6c 20 6f 70 65 72 61 74 65 73 20 63 6f 72  ill operates cor
ad30: 72 65 63 74 6c 79 2c 20 76 65 72 69 66 79 20 74  rectly, verify t
ad40: 68 61 74 20 69 74 73 20 63 6f 75 6e 74 20 61 67  hat its count ag
ad50: 72 65 65 73 20 77 69 74 68 20 6f 75 72 20 0a 20  rees with our . 
ad60: 20 2a 2a 20 69 6e 74 65 72 6e 61 6c 20 63 6f 75   ** internal cou
ad70: 6e 74 20 77 68 65 6e 20 75 73 69 6e 67 20 63 6f  nt when using co
ad80: 75 6e 74 28 2a 29 20 61 6e 64 20 77 68 65 6e 20  unt(*) and when 
ad90: 74 68 65 20 74 6f 74 61 6c 20 63 6f 75 6e 74 20  the total count 
ada0: 63 61 6e 20 62 65 0a 20 20 2a 2a 20 65 78 70 72  can be.  ** expr
adb0: 65 73 73 65 64 20 61 73 20 61 20 33 32 2d 62 69  essed as a 32-bi
adc0: 74 20 69 6e 74 65 67 65 72 2e 20 2a 2f 0a 20 20  t integer. */.  
add0: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
ade0: 7c 7c 20 70 3d 3d 30 20 7c 7c 20 70 2d 3e 6e 3e  || p==0 || p->n>
adf0: 30 78 37 66 66 66 66 66 66 66 0a 20 20 20 20 20  0x7fffffff.     
ae00: 20 20 20 20 20 7c 7c 20 70 2d 3e 6e 3d 3d 73 71       || p->n==sq
ae10: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
ae20: 63 6f 75 6e 74 28 63 6f 6e 74 65 78 74 29 20 29  count(context) )
ae30: 3b 0a 23 65 6e 64 69 66 0a 7d 20 20 20 0a 73 74  ;.#endif.}   .st
ae40: 61 74 69 63 20 76 6f 69 64 20 63 6f 75 6e 74 46  atic void countF
ae50: 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f  inalize(sqlite3_
ae60: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
ae70: 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a 70  ){.  CountCtx *p
ae80: 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  p = sqlite3_
ae90: 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78  aggregate_contex
aea0: 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20  t(context, 0);. 
aeb0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
aec0: 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 70  int64(context, p
aed0: 20 3f 20 70 2d 3e 6e 20 3a 20 30 29 3b 0a 7d 0a   ? p->n : 0);.}.
aee0: 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20  ./*.** Routines 
aef0: 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 6d 69 6e  to implement min
af00: 28 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67 67  () and max() agg
af10: 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 73  regate functions
af20: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
af30: 20 6d 69 6e 6d 61 78 53 74 65 70 28 0a 20 20 73   minmaxStep(.  s
af40: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
af50: 63 6f 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74 20  context, .  int 
af60: 4e 6f 74 55 73 65 64 2c 20 0a 20 20 73 71 6c 69  NotUsed, .  sqli
af70: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
af80: 0a 29 7b 0a 20 20 4d 65 6d 20 2a 70 41 72 67 20  .){.  Mem *pArg 
af90: 20 3d 20 28 4d 65 6d 20 2a 29 61 72 67 76 5b 30   = (Mem *)argv[0
afa0: 5d 3b 0a 20 20 4d 65 6d 20 2a 70 42 65 73 74 3b  ];.  Mem *pBest;
afb0: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
afc0: 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a 0a 20  TER(NotUsed);.. 
afd0: 20 70 42 65 73 74 20 3d 20 28 4d 65 6d 20 2a 29   pBest = (Mem *)
afe0: 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74  sqlite3_aggregat
aff0: 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78  e_context(contex
b000: 74 2c 20 73 69 7a 65 6f 66 28 2a 70 42 65 73 74  t, sizeof(*pBest
b010: 29 29 3b 0a 20 20 69 66 28 20 21 70 42 65 73 74  ));.  if( !pBest
b020: 20 29 20 72 65 74 75 72 6e 3b 0a 0a 20 20 69 66   ) return;..  if
b030: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
b040: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53  type(argv[0])==S
b050: 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20  QLITE_NULL ){.  
b060: 20 20 69 66 28 20 70 42 65 73 74 2d 3e 66 6c 61    if( pBest->fla
b070: 67 73 20 29 20 73 71 6c 69 74 65 33 53 6b 69 70  gs ) sqlite3Skip
b080: 41 63 63 75 6d 75 6c 61 74 6f 72 4c 6f 61 64 28  AccumulatorLoad(
b090: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65 6c 73  context);.  }els
b0a0: 65 20 69 66 28 20 70 42 65 73 74 2d 3e 66 6c 61  e if( pBest->fla
b0b0: 67 73 20 29 7b 0a 20 20 20 20 69 6e 74 20 6d 61  gs ){.    int ma
b0c0: 78 3b 0a 20 20 20 20 69 6e 74 20 63 6d 70 3b 0a  x;.    int cmp;.
b0d0: 20 20 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43 6f      CollSeq *pCo
b0e0: 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74 46  ll = sqlite3GetF
b0f0: 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74 65  uncCollSeq(conte
b100: 78 74 29 3b 0a 20 20 20 20 2f 2a 20 54 68 69 73  xt);.    /* This
b110: 20 73 74 65 70 20 66 75 6e 63 74 69 6f 6e 20 69   step function i
b120: 73 20 75 73 65 64 20 66 6f 72 20 62 6f 74 68 20  s used for both 
b130: 74 68 65 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61  the min() and ma
b140: 78 28 29 20 61 67 67 72 65 67 61 74 65 73 2c 0a  x() aggregates,.
b150: 20 20 20 20 2a 2a 20 74 68 65 20 6f 6e 6c 79 20      ** the only 
b160: 64 69 66 66 65 72 65 6e 63 65 20 62 65 74 77 65  difference betwe
b170: 65 6e 20 74 68 65 20 74 77 6f 20 62 65 69 6e 67  en the two being
b180: 20 74 68 61 74 20 74 68 65 20 73 65 6e 73 65 20   that the sense 
b190: 6f 66 20 74 68 65 0a 20 20 20 20 2a 2a 20 63 6f  of the.    ** co
b1a0: 6d 70 61 72 69 73 6f 6e 20 69 73 20 69 6e 76 65  mparison is inve
b1b0: 72 74 65 64 2e 20 46 6f 72 20 74 68 65 20 6d 61  rted. For the ma
b1c0: 78 28 29 20 61 67 67 72 65 67 61 74 65 2c 20 74  x() aggregate, t
b1d0: 68 65 0a 20 20 20 20 2a 2a 20 73 71 6c 69 74 65  he.    ** sqlite
b1e0: 33 5f 75 73 65 72 5f 64 61 74 61 28 29 20 66 75  3_user_data() fu
b1f0: 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 28  nction returns (
b200: 76 6f 69 64 20 2a 29 2d 31 2e 20 46 6f 72 20 6d  void *)-1. For m
b210: 69 6e 28 29 20 69 74 0a 20 20 20 20 2a 2a 20 72  in() it.    ** r
b220: 65 74 75 72 6e 73 20 28 76 6f 69 64 20 2a 29 64  eturns (void *)d
b230: 62 2c 20 77 68 65 72 65 20 64 62 20 69 73 20 74  b, where db is t
b240: 68 65 20 73 71 6c 69 74 65 33 2a 20 64 61 74 61  he sqlite3* data
b250: 62 61 73 65 20 70 6f 69 6e 74 65 72 2e 0a 20 20  base pointer..  
b260: 20 20 2a 2a 20 54 68 65 72 65 66 6f 72 65 20 74    ** Therefore t
b270: 68 65 20 6e 65 78 74 20 73 74 61 74 65 6d 65 6e  he next statemen
b280: 74 20 73 65 74 73 20 76 61 72 69 61 62 6c 65 20  t sets variable 
b290: 27 6d 61 78 27 20 74 6f 20 31 20 66 6f 72 20 74  'max' to 1 for t
b2a0: 68 65 20 6d 61 78 28 29 0a 20 20 20 20 2a 2a 20  he max().    ** 
b2b0: 61 67 67 72 65 67 61 74 65 2c 20 6f 72 20 30 20  aggregate, or 0 
b2c0: 66 6f 72 20 6d 69 6e 28 29 2e 0a 20 20 20 20 2a  for min()..    *
b2d0: 2f 0a 20 20 20 20 6d 61 78 20 3d 20 73 71 6c 69  /.    max = sqli
b2e0: 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f  te3_user_data(co
b2f0: 6e 74 65 78 74 29 21 3d 30 3b 0a 20 20 20 20 63  ntext)!=0;.    c
b300: 6d 70 20 3d 20 73 71 6c 69 74 65 33 4d 65 6d 43  mp = sqlite3MemC
b310: 6f 6d 70 61 72 65 28 70 42 65 73 74 2c 20 70 41  ompare(pBest, pA
b320: 72 67 2c 20 70 43 6f 6c 6c 29 3b 0a 20 20 20 20  rg, pColl);.    
b330: 69 66 28 20 28 6d 61 78 20 26 26 20 63 6d 70 3c  if( (max && cmp<
b340: 30 29 20 7c 7c 20 28 21 6d 61 78 20 26 26 20 63  0) || (!max && c
b350: 6d 70 3e 30 29 20 29 7b 0a 20 20 20 20 20 20 73  mp>0) ){.      s
b360: 71 6c 69 74 65 33 56 64 62 65 4d 65 6d 43 6f 70  qlite3VdbeMemCop
b370: 79 28 70 42 65 73 74 2c 20 70 41 72 67 29 3b 0a  y(pBest, pArg);.
b380: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
b390: 20 73 71 6c 69 74 65 33 53 6b 69 70 41 63 63 75   sqlite3SkipAccu
b3a0: 6d 75 6c 61 74 6f 72 4c 6f 61 64 28 63 6f 6e 74  mulatorLoad(cont
b3b0: 65 78 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 65  ext);.    }.  }e
b3c0: 6c 73 65 7b 0a 20 20 20 20 70 42 65 73 74 2d 3e  lse{.    pBest->
b3d0: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
b3e0: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
b3f0: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 73 71 6c  ontext);.    sql
b400: 69 74 65 33 56 64 62 65 4d 65 6d 43 6f 70 79 28  ite3VdbeMemCopy(
b410: 70 42 65 73 74 2c 20 70 41 72 67 29 3b 0a 20 20  pBest, pArg);.  
b420: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
b430: 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 28 73  minMaxFinalize(s
b440: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
b450: 63 6f 6e 74 65 78 74 29 7b 0a 20 20 73 71 6c 69  context){.  sqli
b460: 74 65 33 5f 76 61 6c 75 65 20 2a 70 52 65 73 3b  te3_value *pRes;
b470: 0a 20 20 70 52 65 73 20 3d 20 28 73 71 6c 69 74  .  pRes = (sqlit
b480: 65 33 5f 76 61 6c 75 65 20 2a 29 73 71 6c 69 74  e3_value *)sqlit
b490: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
b4a0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29  text(context, 0)
b4b0: 3b 0a 20 20 69 66 28 20 70 52 65 73 20 29 7b 0a  ;.  if( pRes ){.
b4c0: 20 20 20 20 69 66 28 20 70 52 65 73 2d 3e 66 6c      if( pRes->fl
b4d0: 61 67 73 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  ags ){.      sql
b4e0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75  ite3_result_valu
b4f0: 65 28 63 6f 6e 74 65 78 74 2c 20 70 52 65 73 29  e(context, pRes)
b500: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69  ;.    }.    sqli
b510: 74 65 33 56 64 62 65 4d 65 6d 52 65 6c 65 61 73  te3VdbeMemReleas
b520: 65 28 70 52 65 73 29 3b 0a 20 20 7d 0a 7d 0a 0a  e(pRes);.  }.}..
b530: 2f 2a 0a 2a 2a 20 67 72 6f 75 70 5f 63 6f 6e 63  /*.** group_conc
b540: 61 74 28 45 58 50 52 2c 20 3f 53 45 50 41 52 41  at(EXPR, ?SEPARA
b550: 54 4f 52 3f 29 0a 2a 2f 0a 73 74 61 74 69 63 20  TOR?).*/.static 
b560: 76 6f 69 64 20 67 72 6f 75 70 43 6f 6e 63 61 74  void groupConcat
b570: 53 74 65 70 28 0a 20 20 73 71 6c 69 74 65 33 5f  Step(.  sqlite3_
b580: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
b590: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
b5a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
b5b0: 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20  argv.){.  const 
b5c0: 63 68 61 72 20 2a 7a 56 61 6c 3b 0a 20 20 53 74  char *zVal;.  St
b5d0: 72 41 63 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a  rAccum *pAccum;.
b5e0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53    const char *zS
b5f0: 65 70 3b 0a 20 20 69 6e 74 20 6e 56 61 6c 2c 20  ep;.  int nVal, 
b600: 6e 53 65 70 3b 0a 20 20 61 73 73 65 72 74 28 20  nSep;.  assert( 
b610: 61 72 67 63 3d 3d 31 20 7c 7c 20 61 72 67 63 3d  argc==1 || argc=
b620: 3d 32 20 29 3b 0a 20 20 69 66 28 20 73 71 6c 69  =2 );.  if( sqli
b630: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
b640: 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f  rgv[0])==SQLITE_
b650: 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20  NULL ) return;. 
b660: 20 70 41 63 63 75 6d 20 3d 20 28 53 74 72 41 63   pAccum = (StrAc
b670: 63 75 6d 2a 29 73 71 6c 69 74 65 33 5f 61 67 67  cum*)sqlite3_agg
b680: 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63  regate_context(c
b690: 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a  ontext, sizeof(*
b6a0: 70 41 63 63 75 6d 29 29 3b 0a 0a 20 20 69 66 28  pAccum));..  if(
b6b0: 20 70 41 63 63 75 6d 20 29 7b 0a 20 20 20 20 73   pAccum ){.    s
b6c0: 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c  qlite3 *db = sql
b6d0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
b6e0: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b  handle(context);
b6f0: 0a 20 20 20 20 69 6e 74 20 66 69 72 73 74 54 65  .    int firstTe
b700: 72 6d 20 3d 20 70 41 63 63 75 6d 2d 3e 6d 78 41  rm = pAccum->mxA
b710: 6c 6c 6f 63 3d 3d 30 3b 0a 20 20 20 20 70 41 63  lloc==0;.    pAc
b720: 63 75 6d 2d 3e 6d 78 41 6c 6c 6f 63 20 3d 20 64  cum->mxAlloc = d
b730: 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45  b->aLimit[SQLITE
b740: 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a  _LIMIT_LENGTH];.
b750: 20 20 20 20 69 66 28 20 21 66 69 72 73 74 54 65      if( !firstTe
b760: 72 6d 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20  rm ){.      if( 
b770: 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 20  argc==2 ){.     
b780: 20 20 20 7a 53 65 70 20 3d 20 28 63 68 61 72 2a     zSep = (char*
b790: 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  )sqlite3_value_t
b7a0: 65 78 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20  ext(argv[1]);.  
b7b0: 20 20 20 20 20 20 6e 53 65 70 20 3d 20 73 71 6c        nSep = sql
b7c0: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
b7d0: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 20  (argv[1]);.     
b7e0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
b7f0: 7a 53 65 70 20 3d 20 22 2c 22 3b 0a 20 20 20 20  zSep = ",";.    
b800: 20 20 20 20 6e 53 65 70 20 3d 20 31 3b 0a 20 20      nSep = 1;.  
b810: 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20      }.      if( 
b820: 6e 53 65 70 20 29 20 73 71 6c 69 74 65 33 53 74  nSep ) sqlite3St
b830: 72 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63  rAccumAppend(pAc
b840: 63 75 6d 2c 20 7a 53 65 70 2c 20 6e 53 65 70 29  cum, zSep, nSep)
b850: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 56 61 6c  ;.    }.    zVal
b860: 20 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65   = (char*)sqlite
b870: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
b880: 76 5b 30 5d 29 3b 0a 20 20 20 20 6e 56 61 6c 20  v[0]);.    nVal 
b890: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
b8a0: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
b8b0: 20 20 20 20 69 66 28 20 7a 56 61 6c 20 29 20 73      if( zVal ) s
b8c0: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70  qlite3StrAccumAp
b8d0: 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 56 61  pend(pAccum, zVa
b8e0: 6c 2c 20 6e 56 61 6c 29 3b 0a 20 20 7d 0a 7d 0a  l, nVal);.  }.}.
b8f0: 73 74 61 74 69 63 20 76 6f 69 64 20 67 72 6f 75  static void grou
b900: 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65 28  pConcatFinalize(
b910: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
b920: 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 74 72  *context){.  Str
b930: 41 63 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20  Accum *pAccum;. 
b940: 20 70 41 63 63 75 6d 20 3d 20 73 71 6c 69 74 65   pAccum = sqlite
b950: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
b960: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b  ext(context, 0);
b970: 0a 20 20 69 66 28 20 70 41 63 63 75 6d 20 29 7b  .  if( pAccum ){
b980: 0a 20 20 20 20 69 66 28 20 70 41 63 63 75 6d 2d  .    if( pAccum-
b990: 3e 61 63 63 45 72 72 6f 72 3d 3d 53 54 52 41 43  >accError==STRAC
b9a0: 43 55 4d 5f 54 4f 4f 42 49 47 20 29 7b 0a 20 20  CUM_TOOBIG ){.  
b9b0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
b9c0: 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28  lt_error_toobig(
b9d0: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7d 65  context);.    }e
b9e0: 6c 73 65 20 69 66 28 20 70 41 63 63 75 6d 2d 3e  lse if( pAccum->
b9f0: 61 63 63 45 72 72 6f 72 3d 3d 53 54 52 41 43 43  accError==STRACC
ba00: 55 4d 5f 4e 4f 4d 45 4d 20 29 7b 0a 20 20 20 20  UM_NOMEM ){.    
ba10: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
ba20: 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e  _error_nomem(con
ba30: 74 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c 73 65  text);.    }else
ba40: 7b 20 20 20 20 0a 20 20 20 20 20 20 73 71 6c 69  {    .      sqli
ba50: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
ba60: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
ba70: 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 70  StrAccumFinish(p
ba80: 41 63 63 75 6d 29 2c 20 2d 31 2c 20 0a 20 20 20  Accum), -1, .   
ba90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
baa0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66         sqlite3_f
bab0: 72 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  ree);.    }.  }.
bac0: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f  }../*.** This ro
bad0: 75 74 69 6e 65 20 64 6f 65 73 20 70 65 72 2d 63  utine does per-c
bae0: 6f 6e 6e 65 63 74 69 6f 6e 20 66 75 6e 63 74 69  onnection functi
baf0: 6f 6e 20 72 65 67 69 73 74 72 61 74 69 6f 6e 2e  on registration.
bb00: 20 20 4d 6f 73 74 0a 2a 2a 20 6f 66 20 74 68 65    Most.** of the
bb10: 20 62 75 69 6c 74 2d 69 6e 20 66 75 6e 63 74 69   built-in functi
bb20: 6f 6e 73 20 61 62 6f 76 65 20 61 72 65 20 70 61  ons above are pa
bb30: 72 74 20 6f 66 20 74 68 65 20 67 6c 6f 62 61 6c  rt of the global
bb40: 20 66 75 6e 63 74 69 6f 6e 20 73 65 74 2e 0a 2a   function set..*
bb50: 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 6f  * This routine o
bb60: 6e 6c 79 20 64 65 61 6c 73 20 77 69 74 68 20 74  nly deals with t
bb70: 68 6f 73 65 20 74 68 61 74 20 61 72 65 20 6e 6f  hose that are no
bb80: 74 20 67 6c 6f 62 61 6c 2e 0a 2a 2f 0a 76 6f 69  t global..*/.voi
bb90: 64 20 73 71 6c 69 74 65 33 52 65 67 69 73 74 65  d sqlite3Registe
bba0: 72 42 75 69 6c 74 69 6e 46 75 6e 63 74 69 6f 6e  rBuiltinFunction
bbb0: 73 28 73 71 6c 69 74 65 33 20 2a 64 62 29 7b 0a  s(sqlite3 *db){.
bbc0: 20 20 69 6e 74 20 72 63 20 3d 20 73 71 6c 69 74    int rc = sqlit
bbd0: 65 33 5f 6f 76 65 72 6c 6f 61 64 5f 66 75 6e 63  e3_overload_func
bbe0: 74 69 6f 6e 28 64 62 2c 20 22 4d 41 54 43 48 22  tion(db, "MATCH"
bbf0: 2c 20 32 29 3b 0a 20 20 61 73 73 65 72 74 28 20  , 2);.  assert( 
bc00: 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d  rc==SQLITE_NOMEM
bc10: 20 7c 7c 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f   || rc==SQLITE_O
bc20: 4b 20 29 3b 0a 20 20 69 66 28 20 72 63 3d 3d 53  K );.  if( rc==S
bc30: 51 4c 49 54 45 5f 4e 4f 4d 45 4d 20 29 7b 0a 20  QLITE_NOMEM ){. 
bc40: 20 20 20 64 62 2d 3e 6d 61 6c 6c 6f 63 46 61 69     db->mallocFai
bc50: 6c 65 64 20 3d 20 31 3b 0a 20 20 7d 0a 7d 0a 0a  led = 1;.  }.}..
bc60: 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 4c 49  /*.** Set the LI
bc70: 4b 45 4f 50 54 20 66 6c 61 67 20 6f 6e 20 74 68  KEOPT flag on th
bc80: 65 20 32 2d 61 72 67 75 6d 65 6e 74 20 66 75 6e  e 2-argument fun
bc90: 63 74 69 6f 6e 20 77 69 74 68 20 74 68 65 20 67  ction with the g
bca0: 69 76 65 6e 20 6e 61 6d 65 2e 0a 2a 2f 0a 73 74  iven name..*/.st
bcb0: 61 74 69 63 20 76 6f 69 64 20 73 65 74 4c 69 6b  atic void setLik
bcc0: 65 4f 70 74 46 6c 61 67 28 73 71 6c 69 74 65 33  eOptFlag(sqlite3
bcd0: 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72   *db, const char
bce0: 20 2a 7a 4e 61 6d 65 2c 20 75 38 20 66 6c 61 67   *zName, u8 flag
bcf0: 56 61 6c 29 7b 0a 20 20 46 75 6e 63 44 65 66 20  Val){.  FuncDef 
bd00: 2a 70 44 65 66 3b 0a 20 20 70 44 65 66 20 3d 20  *pDef;.  pDef = 
bd10: 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74  sqlite3FindFunct
bd20: 69 6f 6e 28 64 62 2c 20 7a 4e 61 6d 65 2c 20 73  ion(db, zName, s
bd30: 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30 28 7a  qlite3Strlen30(z
bd40: 4e 61 6d 65 29 2c 0a 20 20 20 20 20 20 20 20 20  Name),.         
bd50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
bd60: 20 20 20 20 32 2c 20 53 51 4c 49 54 45 5f 55 54      2, SQLITE_UT
bd70: 46 38 2c 20 30 29 3b 0a 20 20 69 66 28 20 41 4c  F8, 0);.  if( AL
bd80: 57 41 59 53 28 70 44 65 66 29 20 29 7b 0a 20 20  WAYS(pDef) ){.  
bd90: 20 20 70 44 65 66 2d 3e 66 75 6e 63 46 6c 61 67    pDef->funcFlag
bda0: 73 20 7c 3d 20 66 6c 61 67 56 61 6c 3b 0a 20 20  s |= flagVal;.  
bdb0: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 67 69 73  }.}../*.** Regis
bdc0: 74 65 72 20 74 68 65 20 62 75 69 6c 74 2d 69 6e  ter the built-in
bdd0: 20 4c 49 4b 45 20 61 6e 64 20 47 4c 4f 42 20 66   LIKE and GLOB f
bde0: 75 6e 63 74 69 6f 6e 73 2e 20 20 54 68 65 20 63  unctions.  The c
bdf0: 61 73 65 53 65 6e 73 69 74 69 76 65 0a 2a 2a 20  aseSensitive.** 
be00: 70 61 72 61 6d 65 74 65 72 20 64 65 74 65 72 6d  parameter determ
be10: 69 6e 65 73 20 77 68 65 74 68 65 72 20 6f 72 20  ines whether or 
be20: 6e 6f 74 20 74 68 65 20 4c 49 4b 45 20 6f 70 65  not the LIKE ope
be30: 72 61 74 6f 72 20 69 73 20 63 61 73 65 0a 2a 2a  rator is case.**
be40: 20 73 65 6e 73 69 74 69 76 65 2e 20 20 47 4c 4f   sensitive.  GLO
be50: 42 20 69 73 20 61 6c 77 61 79 73 20 63 61 73 65  B is always case
be60: 20 73 65 6e 73 69 74 69 76 65 2e 0a 2a 2f 0a 76   sensitive..*/.v
be70: 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67 69 73  oid sqlite3Regis
be80: 74 65 72 4c 69 6b 65 46 75 6e 63 74 69 6f 6e 73  terLikeFunctions
be90: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e  (sqlite3 *db, in
bea0: 74 20 63 61 73 65 53 65 6e 73 69 74 69 76 65 29  t caseSensitive)
beb0: 7b 0a 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61  {.  struct compa
bec0: 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 3b 0a 20  reInfo *pInfo;. 
bed0: 20 69 66 28 20 63 61 73 65 53 65 6e 73 69 74 69   if( caseSensiti
bee0: 76 65 20 29 7b 0a 20 20 20 20 70 49 6e 66 6f 20  ve ){.    pInfo 
bef0: 3d 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72  = (struct compar
bf00: 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66 6f  eInfo*)&likeInfo
bf10: 41 6c 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  Alt;.  }else{.  
bf20: 20 20 70 49 6e 66 6f 20 3d 20 28 73 74 72 75 63    pInfo = (struc
bf30: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26  t compareInfo*)&
bf40: 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 3b 0a 20 20  likeInfoNorm;.  
bf50: 7d 0a 20 20 73 71 6c 69 74 65 33 43 72 65 61 74  }.  sqlite3Creat
bf60: 65 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b 65 22  eFunc(db, "like"
bf70: 2c 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  , 2, SQLITE_UTF8
bf80: 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e  , pInfo, likeFun
bf90: 63 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73  c, 0, 0, 0);.  s
bfa0: 71 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e 63  qlite3CreateFunc
bfb0: 28 64 62 2c 20 22 6c 69 6b 65 22 2c 20 33 2c 20  (db, "like", 3, 
bfc0: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 70 49 6e  SQLITE_UTF8, pIn
bfd0: 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c  fo, likeFunc, 0,
bfe0: 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65   0, 0);.  sqlite
bff0: 33 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c 20  3CreateFunc(db, 
c000: 22 67 6c 6f 62 22 2c 20 32 2c 20 53 51 4c 49 54  "glob", 2, SQLIT
c010: 45 5f 55 54 46 38 2c 20 0a 20 20 20 20 20 20 28  E_UTF8, .      (
c020: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
c030: 66 6f 2a 29 26 67 6c 6f 62 49 6e 66 6f 2c 20 6c  fo*)&globInfo, l
c040: 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30 2c 20 30  ikeFunc, 0, 0, 0
c050: 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74 46  );.  setLikeOptF
c060: 6c 61 67 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20  lag(db, "glob", 
c070: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45  SQLITE_FUNC_LIKE
c080: 20 7c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43   | SQLITE_FUNC_C
c090: 41 53 45 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f  ASE);.  setLikeO
c0a0: 70 74 46 6c 61 67 28 64 62 2c 20 22 6c 69 6b 65  ptFlag(db, "like
c0b0: 22 2c 20 0a 20 20 20 20 20 20 63 61 73 65 53 65  ", .      caseSe
c0c0: 6e 73 69 74 69 76 65 20 3f 20 28 53 51 4c 49 54  nsitive ? (SQLIT
c0d0: 45 5f 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51  E_FUNC_LIKE | SQ
c0e0: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 20  LITE_FUNC_CASE) 
c0f0: 3a 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49  : SQLITE_FUNC_LI
c100: 4b 45 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 70 45  KE);.}../*.** pE
c110: 78 70 72 20 70 6f 69 6e 74 73 20 74 6f 20 61 6e  xpr points to an
c120: 20 65 78 70 72 65 73 73 69 6f 6e 20 77 68 69 63   expression whic
c130: 68 20 69 6d 70 6c 65 6d 65 6e 74 73 20 61 20 66  h implements a f
c140: 75 6e 63 74 69 6f 6e 2e 20 20 49 66 0a 2a 2a 20  unction.  If.** 
c150: 69 74 20 69 73 20 61 70 70 72 6f 70 72 69 61 74  it is appropriat
c160: 65 20 74 6f 20 61 70 70 6c 79 20 74 68 65 20 4c  e to apply the L
c170: 49 4b 45 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e  IKE optimization
c180: 20 74 6f 20 74 68 61 74 20 66 75 6e 63 74 69 6f   to that functio
c190: 6e 0a 2a 2a 20 74 68 65 6e 20 73 65 74 20 61 57  n.** then set aW
c1a0: 63 5b 30 5d 20 74 68 72 6f 75 67 68 20 61 57 63  c[0] through aWc
c1b0: 5b 32 5d 20 74 6f 20 74 68 65 20 77 69 6c 64 63  [2] to the wildc
c1c0: 61 72 64 20 63 68 61 72 61 63 74 65 72 73 20 61  ard characters a
c1d0: 6e 64 0a 2a 2a 20 72 65 74 75 72 6e 20 54 52 55  nd.** return TRU
c1e0: 45 2e 20 20 49 66 20 74 68 65 20 66 75 6e 63 74  E.  If the funct
c1f0: 69 6f 6e 20 69 73 20 6e 6f 74 20 61 20 4c 49 4b  ion is not a LIK
c200: 45 2d 73 74 79 6c 65 20 66 75 6e 63 74 69 6f 6e  E-style function
c210: 20 74 68 65 6e 0a 2a 2a 20 72 65 74 75 72 6e 20   then.** return 
c220: 46 41 4c 53 45 2e 0a 2a 2a 0a 2a 2a 20 2a 70 49  FALSE..**.** *pI
c230: 73 4e 6f 63 61 73 65 20 69 73 20 73 65 74 20 74  sNocase is set t
c240: 6f 20 74 72 75 65 20 69 66 20 75 70 70 65 72 63  o true if upperc
c250: 61 73 65 20 61 6e 64 20 6c 6f 77 65 72 63 61 73  ase and lowercas
c260: 65 20 61 72 65 20 65 71 75 69 76 61 6c 65 6e 74  e are equivalent
c270: 20 66 6f 72 0a 2a 2a 20 74 68 65 20 66 75 6e 63   for.** the func
c280: 74 69 6f 6e 20 28 64 65 66 61 75 6c 74 20 66 6f  tion (default fo
c290: 72 20 4c 49 4b 45 29 2e 20 20 49 66 20 74 68 65  r LIKE).  If the
c2a0: 20 66 75 6e 63 74 69 6f 6e 20 6d 61 6b 65 73 20   function makes 
c2b0: 74 68 65 20 64 69 73 74 69 6e 63 74 69 6f 6e 0a  the distinction.
c2c0: 2a 2a 20 62 65 74 77 65 65 6e 20 75 70 70 65 72  ** between upper
c2d0: 63 61 73 65 20 61 6e 64 20 6c 6f 77 65 72 63 61  case and lowerca
c2e0: 73 65 20 28 61 73 20 64 6f 65 73 20 47 4c 4f 42  se (as does GLOB
c2f0: 29 20 74 68 65 6e 20 2a 70 49 73 4e 6f 63 61 73  ) then *pIsNocas
c300: 65 20 69 73 20 73 65 74 20 74 6f 0a 2a 2a 20 66  e is set to.** f
c310: 61 6c 73 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  alse..*/.int sql
c320: 69 74 65 33 49 73 4c 69 6b 65 46 75 6e 63 74 69  ite3IsLikeFuncti
c330: 6f 6e 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20  on(sqlite3 *db, 
c340: 45 78 70 72 20 2a 70 45 78 70 72 2c 20 69 6e 74  Expr *pExpr, int
c350: 20 2a 70 49 73 4e 6f 63 61 73 65 2c 20 63 68 61   *pIsNocase, cha
c360: 72 20 2a 61 57 63 29 7b 0a 20 20 46 75 6e 63 44  r *aWc){.  FuncD
c370: 65 66 20 2a 70 44 65 66 3b 0a 20 20 69 66 28 20  ef *pDef;.  if( 
c380: 70 45 78 70 72 2d 3e 6f 70 21 3d 54 4b 5f 46 55  pExpr->op!=TK_FU
c390: 4e 43 54 49 4f 4e 20 0a 20 20 20 7c 7c 20 21 70  NCTION .   || !p
c3a0: 45 78 70 72 2d 3e 78 2e 70 4c 69 73 74 20 0a 20  Expr->x.pList . 
c3b0: 20 20 7c 7c 20 70 45 78 70 72 2d 3e 78 2e 70 4c    || pExpr->x.pL
c3c0: 69 73 74 2d 3e 6e 45 78 70 72 21 3d 32 0a 20 20  ist->nExpr!=2.  
c3d0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b  ){.    return 0;
c3e0: 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 21  .  }.  assert( !
c3f0: 45 78 70 72 48 61 73 50 72 6f 70 65 72 74 79 28  ExprHasProperty(
c400: 70 45 78 70 72 2c 20 45 50 5f 78 49 73 53 65 6c  pExpr, EP_xIsSel
c410: 65 63 74 29 20 29 3b 0a 20 20 70 44 65 66 20 3d  ect) );.  pDef =
c420: 20 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63   sqlite3FindFunc
c430: 74 69 6f 6e 28 64 62 2c 20 70 45 78 70 72 2d 3e  tion(db, pExpr->
c440: 75 2e 7a 54 6f 6b 65 6e 2c 20 0a 20 20 20 20 20  u.zToken, .     
c450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c460: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 53          sqlite3S
c470: 74 72 6c 65 6e 33 30 28 70 45 78 70 72 2d 3e 75  trlen30(pExpr->u
c480: 2e 7a 54 6f 6b 65 6e 29 2c 0a 20 20 20 20 20 20  .zToken),.      
c490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
c4a0: 20 20 20 20 20 20 20 32 2c 20 53 51 4c 49 54 45         2, SQLITE
c4b0: 5f 55 54 46 38 2c 20 30 29 3b 0a 20 20 69 66 28  _UTF8, 0);.  if(
c4c0: 20 4e 45 56 45 52 28 70 44 65 66 3d 3d 30 29 20   NEVER(pDef==0) 
c4d0: 7c 7c 20 28 70 44 65 66 2d 3e 66 75 6e 63 46 6c  || (pDef->funcFl
c4e0: 61 67 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e  ags & SQLITE_FUN
c4f0: 43 5f 4c 49 4b 45 29 3d 3d 30 20 29 7b 0a 20 20  C_LIKE)==0 ){.  
c500: 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a    return 0;.  }.
c510: 0a 20 20 2f 2a 20 54 68 65 20 6d 65 6d 63 70 79  .  /* The memcpy
c520: 28 29 20 73 74 61 74 65 6d 65 6e 74 20 61 73 73  () statement ass
c530: 75 6d 65 73 20 74 68 61 74 20 74 68 65 20 77 69  umes that the wi
c540: 6c 64 63 61 72 64 20 63 68 61 72 61 63 74 65 72  ldcard character
c550: 73 20 61 72 65 0a 20 20 2a 2a 20 74 68 65 20 66  s are.  ** the f
c560: 69 72 73 74 20 74 68 72 65 65 20 73 74 61 74 65  irst three state
c570: 6d 65 6e 74 73 20 69 6e 20 74 68 65 20 63 6f 6d  ments in the com
c580: 70 61 72 65 49 6e 66 6f 20 73 74 72 75 63 74 75  pareInfo structu
c590: 72 65 2e 20 20 54 68 65 0a 20 20 2a 2a 20 61 73  re.  The.  ** as
c5a0: 73 65 72 74 73 28 29 20 74 68 61 74 20 66 6f 6c  serts() that fol
c5b0: 6c 6f 77 20 76 65 72 69 66 79 20 74 68 61 74 20  low verify that 
c5c0: 61 73 73 75 6d 70 74 69 6f 6e 0a 20 20 2a 2f 0a  assumption.  */.
c5d0: 20 20 6d 65 6d 63 70 79 28 61 57 63 2c 20 70 44    memcpy(aWc, pD
c5e0: 65 66 2d 3e 70 55 73 65 72 44 61 74 61 2c 20 33  ef->pUserData, 3
c5f0: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 28 63 68  );.  assert( (ch
c600: 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74  ar*)&likeInfoAlt
c610: 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65   == (char*)&like
c620: 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 41 6c 6c  InfoAlt.matchAll
c630: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 26 28   );.  assert( &(
c640: 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f  (char*)&likeInfo
c650: 41 6c 74 29 5b 31 5d 20 3d 3d 20 28 63 68 61 72  Alt)[1] == (char
c660: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d  *)&likeInfoAlt.m
c670: 61 74 63 68 4f 6e 65 20 29 3b 0a 20 20 61 73 73  atchOne );.  ass
c680: 65 72 74 28 20 26 28 28 63 68 61 72 2a 29 26 6c  ert( &((char*)&l
c690: 69 6b 65 49 6e 66 6f 41 6c 74 29 5b 32 5d 20 3d  ikeInfoAlt)[2] =
c6a0: 3d 20 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e  = (char*)&likeIn
c6b0: 66 6f 41 6c 74 2e 6d 61 74 63 68 53 65 74 20 29  foAlt.matchSet )
c6c0: 3b 0a 20 20 2a 70 49 73 4e 6f 63 61 73 65 20 3d  ;.  *pIsNocase =
c6d0: 20 28 70 44 65 66 2d 3e 66 75 6e 63 46 6c 61 67   (pDef->funcFlag
c6e0: 73 20 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  s & SQLITE_FUNC_
c6f0: 43 41 53 45 29 3d 3d 30 3b 0a 20 20 72 65 74 75  CASE)==0;.  retu
c700: 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41  rn 1;.}../*.** A
c710: 6c 6c 20 6f 66 20 74 68 65 20 46 75 6e 63 44 65  ll of the FuncDe
c720: 66 20 73 74 72 75 63 74 75 72 65 73 20 69 6e 20  f structures in 
c730: 74 68 65 20 61 42 75 69 6c 74 69 6e 46 75 6e 63  the aBuiltinFunc
c740: 5b 5d 20 61 72 72 61 79 20 61 62 6f 76 65 0a 2a  [] array above.*
c750: 2a 20 74 6f 20 74 68 65 20 67 6c 6f 62 61 6c 20  * to the global 
c760: 66 75 6e 63 74 69 6f 6e 20 68 61 73 68 20 74 61  function hash ta
c770: 62 6c 65 2e 20 20 54 68 69 73 20 6f 63 63 75 72  ble.  This occur
c780: 73 20 61 74 20 73 74 61 72 74 2d 74 69 6d 65 20  s at start-time 
c790: 28 61 73 0a 2a 2a 20 61 20 63 6f 6e 73 65 71 75  (as.** a consequ
c7a0: 65 6e 63 65 20 6f 66 20 63 61 6c 6c 69 6e 67 20  ence of calling 
c7b0: 73 71 6c 69 74 65 33 5f 69 6e 69 74 69 61 6c 69  sqlite3_initiali
c7c0: 7a 65 28 29 29 2e 0a 2a 2a 0a 2a 2a 20 41 66 74  ze())..**.** Aft
c7d0: 65 72 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20  er this routine 
c7e0: 72 75 6e 73 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c  runs.*/.void sql
c7f0: 69 74 65 33 52 65 67 69 73 74 65 72 47 6c 6f 62  ite3RegisterGlob
c800: 61 6c 46 75 6e 63 74 69 6f 6e 73 28 76 6f 69 64  alFunctions(void
c810: 29 7b 0a 20 20 2f 2a 0a 20 20 2a 2a 20 54 68 65  ){.  /*.  ** The
c820: 20 66 6f 6c 6c 6f 77 69 6e 67 20 61 72 72 61 79   following array
c830: 20 68 6f 6c 64 73 20 46 75 6e 63 44 65 66 20 73   holds FuncDef s
c840: 74 72 75 63 74 75 72 65 73 20 66 6f 72 20 61 6c  tructures for al
c850: 6c 20 6f 66 20 74 68 65 20 66 75 6e 63 74 69 6f  l of the functio
c860: 6e 73 0a 20 20 2a 2a 20 64 65 66 69 6e 65 64 20  ns.  ** defined 
c870: 69 6e 20 74 68 69 73 20 66 69 6c 65 2e 0a 20 20  in this file..  
c880: 2a 2a 0a 20 20 2a 2a 20 54 68 65 20 61 72 72 61  **.  ** The arra
c890: 79 20 63 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 73  y cannot be cons
c8a0: 74 61 6e 74 20 73 69 6e 63 65 20 63 68 61 6e 67  tant since chang
c8b0: 65 73 20 61 72 65 20 6d 61 64 65 20 74 6f 20 74  es are made to t
c8c0: 68 65 0a 20 20 2a 2a 20 46 75 6e 63 44 65 66 2e  he.  ** FuncDef.
c8d0: 70 48 61 73 68 20 65 6c 65 6d 65 6e 74 73 20 61  pHash elements a
c8e0: 74 20 73 74 61 72 74 2d 74 69 6d 65 2e 20 20 54  t start-time.  T
c8f0: 68 65 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 74  he elements of t
c900: 68 69 73 20 61 72 72 61 79 0a 20 20 2a 2a 20 61  his array.  ** a
c910: 72 65 20 72 65 61 64 2d 6f 6e 6c 79 20 61 66 74  re read-only aft
c920: 65 72 20 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f  er initializatio
c930: 6e 20 69 73 20 63 6f 6d 70 6c 65 74 65 2e 0a 20  n is complete.. 
c940: 20 2a 2f 0a 20 20 73 74 61 74 69 63 20 53 51 4c   */.  static SQL
c950: 49 54 45 5f 57 53 44 20 46 75 6e 63 44 65 66 20  ITE_WSD FuncDef 
c960: 61 42 75 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 3d  aBuiltinFunc[] =
c970: 20 7b 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28   {.    FUNCTION(
c980: 6c 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20  ltrim,          
c990: 20 20 20 20 31 2c 20 31 2c 20 30 2c 20 74 72 69      1, 1, 0, tri
c9a0: 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c  mFunc         ),
c9b0: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74  .    FUNCTION(lt
c9c0: 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  rim,            
c9d0: 20 20 32 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46    2, 1, 0, trimF
c9e0: 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20  unc         ),. 
c9f0: 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 74 72 69     FUNCTION(rtri
ca00: 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  m,              
ca10: 31 2c 20 32 2c 20 30 2c 20 74 72 69 6d 46 75 6e  1, 2, 0, trimFun
ca20: 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20  c         ),.   
ca30: 20 46 55 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c   FUNCTION(rtrim,
ca40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c                2,
ca50: 20 32 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20   2, 0, trimFunc 
ca60: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
ca70: 55 4e 43 54 49 4f 4e 28 74 72 69 6d 2c 20 20 20  UNCTION(trim,   
ca80: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 33              1, 3
ca90: 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20  , 0, trimFunc   
caa0: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
cab0: 43 54 49 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20  CTION(trim,     
cac0: 20 20 20 20 20 20 20 20 20 20 32 2c 20 33 2c 20            2, 3, 
cad0: 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20  0, trimFunc     
cae0: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
caf0: 49 4f 4e 28 6d 69 6e 2c 20 20 20 20 20 20 20 20  ION(min,        
cb00: 20 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 31 2c         -1, 0, 1,
cb10: 20 6d 69 6e 6d 61 78 46 75 6e 63 20 20 20 20 20   minmaxFunc     
cb20: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
cb30: 4e 28 6d 69 6e 2c 20 20 20 20 20 20 20 20 20 20  N(min,          
cb40: 20 20 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 30        0, 0, 1, 0
cb50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
cb60: 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  ),.    AGGREGATE
cb70: 32 28 6d 69 6e 2c 20 20 20 20 20 20 20 20 20 20  2(min,          
cb80: 20 20 20 20 31 2c 20 30 2c 20 31 2c 20 6d 69 6e      1, 0, 1, min
cb90: 6d 61 78 53 74 65 70 2c 20 20 20 20 20 20 6d 69  maxStep,      mi
cba0: 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 2c 0a 20 20  nMaxFinalize,.  
cbb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
cbc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
cbd0: 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 46          SQLITE_F
cbe0: 55 4e 43 5f 4d 49 4e 4d 41 58 20 29 2c 0a 20 20  UNC_MINMAX ),.  
cbf0: 20 20 46 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20    FUNCTION(max, 
cc00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 31                -1
cc10: 2c 20 31 2c 20 31 2c 20 6d 69 6e 6d 61 78 46 75  , 1, 1, minmaxFu
cc20: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
cc30: 46 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20  FUNCTION(max,   
cc40: 20 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20               0, 
cc50: 31 2c 20 31 2c 20 30 20 20 20 20 20 20 20 20 20  1, 1, 0         
cc60: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 41 47         ),.    AG
cc70: 47 52 45 47 41 54 45 32 28 6d 61 78 2c 20 20 20  GREGATE2(max,   
cc80: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 31 2c             1, 1,
cc90: 20 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20   1, minmaxStep, 
cca0: 20 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c       minMaxFinal
ccb0: 69 7a 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20  ize,.           
ccc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ccd0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53                 S
cce0: 51 4c 49 54 45 5f 46 55 4e 43 5f 4d 49 4e 4d 41  QLITE_FUNC_MINMA
ccf0: 58 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f  X ),.    FUNCTIO
cd00: 4e 32 28 74 79 70 65 6f 66 2c 20 20 20 20 20 20  N2(typeof,      
cd10: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 74        1, 0, 0, t
cd20: 79 70 65 6f 66 46 75 6e 63 2c 20 20 53 51 4c 49  ypeofFunc,  SQLI
cd30: 54 45 5f 46 55 4e 43 5f 54 59 50 45 4f 46 29 2c  TE_FUNC_TYPEOF),
cd40: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 6c  .    FUNCTION2(l
cd50: 65 6e 67 74 68 2c 20 20 20 20 20 20 20 20 20 20  ength,          
cd60: 20 20 31 2c 20 30 2c 20 30 2c 20 6c 65 6e 67 74    1, 0, 0, lengt
cd70: 68 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46  hFunc,  SQLITE_F
cd80: 55 4e 43 5f 4c 45 4e 47 54 48 29 2c 0a 20 20 20  UNC_LENGTH),.   
cd90: 20 46 55 4e 43 54 49 4f 4e 28 69 6e 73 74 72 2c   FUNCTION(instr,
cda0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c                2,
cdb0: 20 30 2c 20 30 2c 20 69 6e 73 74 72 46 75 6e 63   0, 0, instrFunc
cdc0: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
cdd0: 55 4e 43 54 49 4f 4e 28 73 75 62 73 74 72 2c 20  UNCTION(substr, 
cde0: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30              2, 0
cdf0: 2c 20 30 2c 20 73 75 62 73 74 72 46 75 6e 63 20  , 0, substrFunc 
ce00: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
ce10: 43 54 49 4f 4e 28 73 75 62 73 74 72 2c 20 20 20  CTION(substr,   
ce20: 20 20 20 20 20 20 20 20 20 20 33 2c 20 30 2c 20            3, 0, 
ce30: 30 2c 20 73 75 62 73 74 72 46 75 6e 63 20 20 20  0, substrFunc   
ce40: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
ce50: 49 4f 4e 28 70 72 69 6e 74 66 2c 20 20 20 20 20  ION(printf,     
ce60: 20 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c         -1, 0, 0,
ce70: 20 70 72 69 6e 74 66 46 75 6e 63 20 20 20 20 20   printfFunc     
ce80: 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f    ),.    FUNCTIO
ce90: 4e 28 75 6e 69 63 6f 64 65 2c 20 20 20 20 20 20  N(unicode,      
cea0: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 75        1, 0, 0, u
ceb0: 6e 69 63 6f 64 65 46 75 6e 63 20 20 20 20 20 20  nicodeFunc      
cec0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
ced0: 63 68 61 72 2c 20 20 20 20 20 20 20 20 20 20 20  char,           
cee0: 20 20 20 2d 31 2c 20 30 2c 20 30 2c 20 63 68 61     -1, 0, 0, cha
cef0: 72 46 75 6e 63 20 20 20 20 20 20 20 20 20 29 2c  rFunc         ),
cf00: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 61 62  .    FUNCTION(ab
cf10: 73 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  s,              
cf20: 20 20 31 2c 20 30 2c 20 30 2c 20 61 62 73 46 75    1, 0, 0, absFu
cf30: 6e 63 20 20 20 20 20 20 20 20 20 20 29 2c 0a 23  nc          ),.#
cf40: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
cf50: 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e  IT_FLOATING_POIN
cf60: 54 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72  T.    FUNCTION(r
cf70: 6f 75 6e 64 2c 20 20 20 20 20 20 20 20 20 20 20  ound,           
cf80: 20 20 20 31 2c 20 30 2c 20 30 2c 20 72 6f 75 6e     1, 0, 0, roun
cf90: 64 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c 0a  dFunc        ),.
cfa0: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 6f 75      FUNCTION(rou
cfb0: 6e 64 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  nd,             
cfc0: 20 32 2c 20 30 2c 20 30 2c 20 72 6f 75 6e 64 46   2, 0, 0, roundF
cfd0: 75 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 23 65  unc        ),.#e
cfe0: 6e 64 69 66 0a 20 20 20 20 46 55 4e 43 54 49 4f  ndif.    FUNCTIO
cff0: 4e 28 75 70 70 65 72 2c 20 20 20 20 20 20 20 20  N(upper,        
d000: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 75        1, 0, 0, u
d010: 70 70 65 72 46 75 6e 63 20 20 20 20 20 20 20 20  pperFunc        
d020: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
d030: 6c 6f 77 65 72 2c 20 20 20 20 20 20 20 20 20 20  lower,          
d040: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c 6f 77      1, 0, 0, low
d050: 65 72 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c  erFunc        ),
d060: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 63 6f  .    FUNCTION(co
d070: 61 6c 65 73 63 65 2c 20 20 20 20 20 20 20 20 20  alesce,         
d080: 20 20 31 2c 20 30 2c 20 30 2c 20 30 20 20 20 20    1, 0, 0, 0    
d090: 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20              ),. 
d0a0: 20 20 20 46 55 4e 43 54 49 4f 4e 28 63 6f 61 6c     FUNCTION(coal
d0b0: 65 73 63 65 2c 20 20 20 20 20 20 20 20 20 20 20  esce,           
d0c0: 30 2c 20 30 2c 20 30 2c 20 30 20 20 20 20 20 20  0, 0, 0, 0      
d0d0: 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20            ),.   
d0e0: 20 46 55 4e 43 54 49 4f 4e 32 28 63 6f 61 6c 65   FUNCTION2(coale
d0f0: 73 63 65 2c 20 20 20 20 20 20 20 20 20 2d 31 2c  sce,         -1,
d100: 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e 63 2c   0, 0, noopFunc,
d110: 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 4f    SQLITE_FUNC_CO
d120: 41 4c 45 53 43 45 29 2c 0a 20 20 20 20 46 55 4e  ALESCE),.    FUN
d130: 43 54 49 4f 4e 28 68 65 78 2c 20 20 20 20 20 20  CTION(hex,      
d140: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
d150: 30 2c 20 68 65 78 46 75 6e 63 20 20 20 20 20 20  0, hexFunc      
d160: 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54      ),.    FUNCT
d170: 49 4f 4e 32 28 69 66 6e 75 6c 6c 2c 20 20 20 20  ION2(ifnull,    
d180: 20 20 20 20 20 20 20 20 32 2c 20 30 2c 20 30 2c          2, 0, 0,
d190: 20 6e 6f 6f 70 46 75 6e 63 2c 20 20 53 51 4c 49   noopFunc,  SQLI
d1a0: 54 45 5f 46 55 4e 43 5f 43 4f 41 4c 45 53 43 45  TE_FUNC_COALESCE
d1b0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 32  ),.    FUNCTION2
d1c0: 28 75 6e 6c 69 6b 65 6c 79 2c 20 20 20 20 20 20  (unlikely,      
d1d0: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 6e 6f 6f      1, 0, 0, noo
d1e0: 70 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46  pFunc,  SQLITE_F
d1f0: 55 4e 43 5f 55 4e 4c 49 4b 45 4c 59 29 2c 0a 20  UNC_UNLIKELY),. 
d200: 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 6c 69 6b     FUNCTION2(lik
d210: 65 6c 69 68 6f 6f 64 2c 20 20 20 20 20 20 20 20  elihood,        
d220: 32 2c 20 30 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e  2, 0, 0, noopFun
d230: 63 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  c,  SQLITE_FUNC_
d240: 55 4e 4c 49 4b 45 4c 59 29 2c 0a 20 20 20 20 46  UNLIKELY),.    F
d250: 55 4e 43 54 49 4f 4e 32 28 6c 69 6b 65 6c 79 2c  UNCTION2(likely,
d260: 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30              1, 0
d270: 2c 20 30 2c 20 6e 6f 6f 70 46 75 6e 63 2c 20 20  , 0, noopFunc,  
d280: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 55 4e 4c 49  SQLITE_FUNC_UNLI
d290: 4b 45 4c 59 29 2c 0a 20 20 20 20 56 46 55 4e 43  KELY),.    VFUNC
d2a0: 54 49 4f 4e 28 72 61 6e 64 6f 6d 2c 20 20 20 20  TION(random,    
d2b0: 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c          0, 0, 0,
d2c0: 20 72 61 6e 64 6f 6d 46 75 6e 63 20 20 20 20 20   randomFunc     
d2d0: 20 20 29 2c 0a 20 20 20 20 56 46 55 4e 43 54 49    ),.    VFUNCTI
d2e0: 4f 4e 28 72 61 6e 64 6f 6d 62 6c 6f 62 2c 20 20  ON(randomblob,  
d2f0: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 72        1, 0, 0, r
d300: 61 6e 64 6f 6d 42 6c 6f 62 20 20 20 20 20 20 20  andomBlob       
d310: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
d320: 6e 75 6c 6c 69 66 2c 20 20 20 20 20 20 20 20 20  nullif,         
d330: 20 20 20 20 32 2c 20 30 2c 20 31 2c 20 6e 75 6c      2, 0, 1, nul
d340: 6c 69 66 46 75 6e 63 20 20 20 20 20 20 20 29 2c  lifFunc       ),
d350: 0a 20 20 20 20 44 46 55 4e 43 54 49 4f 4e 28 73  .    DFUNCTION(s
d360: 71 6c 69 74 65 5f 76 65 72 73 69 6f 6e 2c 20 20  qlite_version,  
d370: 20 20 30 2c 20 30 2c 20 30 2c 20 76 65 72 73 69    0, 0, 0, versi
d380: 6f 6e 46 75 6e 63 20 20 20 20 20 20 29 2c 0a 20  onFunc      ),. 
d390: 20 20 20 44 46 55 4e 43 54 49 4f 4e 28 73 71 6c     DFUNCTION(sql
d3a0: 69 74 65 5f 73 6f 75 72 63 65 5f 69 64 2c 20 20  ite_source_id,  
d3b0: 30 2c 20 30 2c 20 30 2c 20 73 6f 75 72 63 65 69  0, 0, 0, sourcei
d3c0: 64 46 75 6e 63 20 20 20 20 20 29 2c 0a 20 20 20  dFunc     ),.   
d3d0: 20 46 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65   FUNCTION(sqlite
d3e0: 5f 6c 6f 67 2c 20 20 20 20 20 20 20 20 20 32 2c  _log,         2,
d3f0: 20 30 2c 20 30 2c 20 65 72 72 6c 6f 67 46 75 6e   0, 0, errlogFun
d400: 63 20 20 20 20 20 20 20 29 2c 0a 23 69 66 20 53  c       ),.#if S
d410: 51 4c 49 54 45 5f 55 53 45 52 5f 41 55 54 48 45  QLITE_USER_AUTHE
d420: 4e 54 49 43 41 54 49 4f 4e 0a 20 20 20 20 46 55  NTICATION.    FU
d430: 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f 63 72  NCTION(sqlite_cr
d440: 79 70 74 2c 20 20 20 20 20 20 20 32 2c 20 30 2c  ypt,       2, 0,
d450: 20 30 2c 20 73 71 6c 69 74 65 33 43 72 79 70 74   0, sqlite3Crypt
d460: 46 75 6e 63 20 29 2c 0a 23 65 6e 64 69 66 0a 23  Func ),.#endif.#
d470: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
d480: 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e  IT_COMPILEOPTION
d490: 5f 44 49 41 47 53 0a 20 20 20 20 44 46 55 4e 43  _DIAGS.    DFUNC
d4a0: 54 49 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d 70  TION(sqlite_comp
d4b0: 69 6c 65 6f 70 74 69 6f 6e 5f 75 73 65 64 2c 31  ileoption_used,1
d4c0: 2c 20 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65 6f  , 0, 0, compileo
d4d0: 70 74 69 6f 6e 75 73 65 64 46 75 6e 63 20 20 29  ptionusedFunc  )
d4e0: 2c 0a 20 20 20 20 44 46 55 4e 43 54 49 4f 4e 28  ,.    DFUNCTION(
d4f0: 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70  sqlite_compileop
d500: 74 69 6f 6e 5f 67 65 74 2c 20 31 2c 20 30 2c 20  tion_get, 1, 0, 
d510: 30 2c 20 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  0, compileoption
d520: 67 65 74 46 75 6e 63 20 20 29 2c 0a 23 65 6e 64  getFunc  ),.#end
d530: 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49  if /* SQLITE_OMI
d540: 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f  T_COMPILEOPTION_
d550: 44 49 41 47 53 20 2a 2f 0a 20 20 20 20 46 55 4e  DIAGS */.    FUN
d560: 43 54 49 4f 4e 28 71 75 6f 74 65 2c 20 20 20 20  CTION(quote,    
d570: 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20            1, 0, 
d580: 30 2c 20 71 75 6f 74 65 46 75 6e 63 20 20 20 20  0, quoteFunc    
d590: 20 20 20 20 29 2c 0a 20 20 20 20 56 46 55 4e 43      ),.    VFUNC
d5a0: 54 49 4f 4e 28 6c 61 73 74 5f 69 6e 73 65 72 74  TION(last_insert
d5b0: 5f 72 6f 77 69 64 2c 20 30 2c 20 30 2c 20 30 2c  _rowid, 0, 0, 0,
d5c0: 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77   last_insert_row
d5d0: 69 64 29 2c 0a 20 20 20 20 56 46 55 4e 43 54 49  id),.    VFUNCTI
d5e0: 4f 4e 28 63 68 61 6e 67 65 73 2c 20 20 20 20 20  ON(changes,     
d5f0: 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 63        0, 0, 0, c
d600: 68 61 6e 67 65 73 20 20 20 20 20 20 20 20 20 20  hanges          
d610: 29 2c 0a 20 20 20 20 56 46 55 4e 43 54 49 4f 4e  ),.    VFUNCTION
d620: 28 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 2c 20  (total_changes, 
d630: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 74 6f 74      0, 0, 0, tot
d640: 61 6c 5f 63 68 61 6e 67 65 73 20 20 20 20 29 2c  al_changes    ),
d650: 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 65  .    FUNCTION(re
d660: 70 6c 61 63 65 2c 20 20 20 20 20 20 20 20 20 20  place,          
d670: 20 20 33 2c 20 30 2c 20 30 2c 20 72 65 70 6c 61    3, 0, 0, repla
d680: 63 65 46 75 6e 63 20 20 20 20 20 20 29 2c 0a 20  ceFunc      ),. 
d690: 20 20 20 46 55 4e 43 54 49 4f 4e 28 7a 65 72 6f     FUNCTION(zero
d6a0: 62 6c 6f 62 2c 20 20 20 20 20 20 20 20 20 20 20  blob,           
d6b0: 31 2c 20 30 2c 20 30 2c 20 7a 65 72 6f 62 6c 6f  1, 0, 0, zeroblo
d6c0: 62 46 75 6e 63 20 20 20 20 20 29 2c 0a 20 20 23  bFunc     ),.  #
d6d0: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55  ifdef SQLITE_SOU
d6e0: 4e 44 45 58 0a 20 20 20 20 46 55 4e 43 54 49 4f  NDEX.    FUNCTIO
d6f0: 4e 28 73 6f 75 6e 64 65 78 2c 20 20 20 20 20 20  N(soundex,      
d700: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73        1, 0, 0, s
d710: 6f 75 6e 64 65 78 46 75 6e 63 20 20 20 20 20 20  oundexFunc      
d720: 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 23 69  ),.  #endif.  #i
d730: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
d740: 54 5f 4c 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e  T_LOAD_EXTENSION
d750: 0a 20 20 20 20 56 46 55 4e 43 54 49 4f 4e 28 6c  .    VFUNCTION(l
d760: 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20  oad_extension,  
d770: 20 20 31 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45    1, 0, 0, loadE
d780: 78 74 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20  xt          ),. 
d790: 20 20 20 56 46 55 4e 43 54 49 4f 4e 28 6c 6f 61     VFUNCTION(loa
d7a0: 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20  d_extension,    
d7b0: 32 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78 74  2, 0, 0, loadExt
d7c0: 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 23            ),.  #
d7d0: 65 6e 64 69 66 0a 20 20 20 20 41 47 47 52 45 47  endif.    AGGREG
d7e0: 41 54 45 28 73 75 6d 2c 20 20 20 20 20 20 20 20  ATE(sum,        
d7f0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
d800: 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20 20  sumStep,        
d810: 20 73 75 6d 46 69 6e 61 6c 69 7a 65 20 20 20 20   sumFinalize    
d820: 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  ),.    AGGREGATE
d830: 28 74 6f 74 61 6c 2c 20 20 20 20 20 20 20 20 20  (total,         
d840: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d      1, 0, 0, sum
d850: 53 74 65 70 2c 20 20 20 20 20 20 20 20 20 74 6f  Step,         to
d860: 74 61 6c 46 69 6e 61 6c 69 7a 65 20 20 20 20 29  talFinalize    )
d870: 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45 28  ,.    AGGREGATE(
d880: 61 76 67 2c 20 20 20 20 20 20 20 20 20 20 20 20  avg,            
d890: 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53     1, 0, 0, sumS
d8a0: 74 65 70 2c 20 20 20 20 20 20 20 20 20 61 76 67  tep,         avg
d8b0: 46 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c 0a 20  Finalize    ),. 
d8c0: 20 20 20 41 47 47 52 45 47 41 54 45 32 28 63 6f     AGGREGATE2(co
d8d0: 75 6e 74 2c 20 20 20 20 20 20 20 20 20 20 20 20  unt,            
d8e0: 30 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74  0, 0, 0, countSt
d8f0: 65 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46  ep,       countF
d900: 69 6e 61 6c 69 7a 65 2c 0a 20 20 20 20 20 20 20  inalize,.       
d910: 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 46          SQLITE_F
d920: 55 4e 43 5f 43 4f 55 4e 54 20 20 29 2c 0a 20 20  UNC_COUNT  ),.  
d930: 20 20 41 47 47 52 45 47 41 54 45 28 63 6f 75 6e    AGGREGATE(coun
d940: 74 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 31  t,             1
d950: 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65  , 0, 0, countSte
d960: 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46 69  p,       countFi
d970: 6e 61 6c 69 7a 65 20 20 29 2c 0a 20 20 20 20 41  nalize  ),.    A
d980: 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f 63  GGREGATE(group_c
d990: 6f 6e 63 61 74 2c 20 20 20 20 20 20 31 2c 20 30  oncat,      1, 0
d9a0: 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74  , 0, groupConcat
d9b0: 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63 61  Step, groupConca
d9c0: 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 20 20  tFinalize),.    
d9d0: 41 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f  AGGREGATE(group_
d9e0: 63 6f 6e 63 61 74 2c 20 20 20 20 20 20 32 2c 20  concat,      2, 
d9f0: 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61  0, 0, groupConca
da00: 74 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63  tStep, groupConc
da10: 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 0a  atFinalize),.  .
da20: 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 67 6c 6f      LIKEFUNC(glo
da30: 62 2c 20 32 2c 20 26 67 6c 6f 62 49 6e 66 6f 2c  b, 2, &globInfo,
da40: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b   SQLITE_FUNC_LIK
da50: 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41  E|SQLITE_FUNC_CA
da60: 53 45 29 2c 0a 20 20 23 69 66 64 65 66 20 53 51  SE),.  #ifdef SQ
da70: 4c 49 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54  LITE_CASE_SENSIT
da80: 49 56 45 5f 4c 49 4b 45 0a 20 20 20 20 4c 49 4b  IVE_LIKE.    LIK
da90: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26  EFUNC(like, 2, &
daa0: 6c 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c  likeInfoAlt, SQL
dab0: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51  ITE_FUNC_LIKE|SQ
dac0: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c  LITE_FUNC_CASE),
dad0: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
dae0: 6b 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 3, &likeInfo
daf0: 41 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43  Alt, SQLITE_FUNC
db00: 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e  _LIKE|SQLITE_FUN
db10: 43 5f 43 41 53 45 29 2c 0a 20 20 23 65 6c 73 65  C_CASE),.  #else
db20: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69  .    LIKEFUNC(li
db30: 6b 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f  ke, 2, &likeInfo
db40: 4e 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e  Norm, SQLITE_FUN
db50: 43 5f 4c 49 4b 45 29 2c 0a 20 20 20 20 4c 49 4b  C_LIKE),.    LIK
db60: 45 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26  EFUNC(like, 3, &
db70: 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51  likeInfoNorm, SQ
db80: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c  LITE_FUNC_LIKE),
db90: 0a 20 20 23 65 6e 64 69 66 0a 20 20 7d 3b 0a 0a  .  #endif.  };..
dba0: 20 20 69 6e 74 20 69 3b 0a 20 20 46 75 6e 63 44    int i;.  FuncD
dbb0: 65 66 48 61 73 68 20 2a 70 48 61 73 68 20 3d 20  efHash *pHash = 
dbc0: 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66 48  &GLOBAL(FuncDefH
dbd0: 61 73 68 2c 20 73 71 6c 69 74 65 33 47 6c 6f 62  ash, sqlite3Glob
dbe0: 61 6c 46 75 6e 63 74 69 6f 6e 73 29 3b 0a 20 20  alFunctions);.  
dbf0: 46 75 6e 63 44 65 66 20 2a 61 46 75 6e 63 20 3d  FuncDef *aFunc =
dc00: 20 28 46 75 6e 63 44 65 66 2a 29 26 47 4c 4f 42   (FuncDef*)&GLOB
dc10: 41 4c 28 46 75 6e 63 44 65 66 2c 20 61 42 75 69  AL(FuncDef, aBui
dc20: 6c 74 69 6e 46 75 6e 63 29 3b 0a 0a 20 20 66 6f  ltinFunc);..  fo
dc30: 72 28 69 3d 30 3b 20 69 3c 41 72 72 61 79 53 69  r(i=0; i<ArraySi
dc40: 7a 65 28 61 42 75 69 6c 74 69 6e 46 75 6e 63 29  ze(aBuiltinFunc)
dc50: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 73 71 6c 69  ; i++){.    sqli
dc60: 74 65 33 46 75 6e 63 44 65 66 49 6e 73 65 72 74  te3FuncDefInsert
dc70: 28 70 48 61 73 68 2c 20 26 61 46 75 6e 63 5b 69  (pHash, &aFunc[i
dc80: 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  ]);.  }.  sqlite
dc90: 33 52 65 67 69 73 74 65 72 44 61 74 65 54 69 6d  3RegisterDateTim
dca0: 65 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 23 69  eFunctions();.#i
dcb0: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
dcc0: 54 5f 41 4c 54 45 52 54 41 42 4c 45 0a 20 20 73  T_ALTERTABLE.  s
dcd0: 71 6c 69 74 65 33 41 6c 74 65 72 46 75 6e 63 74  qlite3AlterFunct
dce0: 69 6f 6e 73 28 29 3b 0a 23 65 6e 64 69 66 0a 23  ions();.#endif.#
dcf0: 69 66 20 64 65 66 69 6e 65 64 28 53 51 4c 49 54  if defined(SQLIT
dd00: 45 5f 45 4e 41 42 4c 45 5f 53 54 41 54 33 29 20  E_ENABLE_STAT3) 
dd10: 7c 7c 20 64 65 66 69 6e 65 64 28 53 51 4c 49 54  || defined(SQLIT
dd20: 45 5f 45 4e 41 42 4c 45 5f 53 54 41 54 34 29 0a  E_ENABLE_STAT4).
dd30: 20 20 73 71 6c 69 74 65 33 41 6e 61 6c 79 7a 65    sqlite3Analyze
dd40: 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 23 65 6e  Functions();.#en
dd50: 64 69 66 0a 7d 0a                                dif.}.