/ Hex Artifact Content
Login

Artifact 5c50c1ea31fd864b0fe921fe1a8d4c55acd609ef:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61 74  C functions that
01a0: 20 69 6d 70 6c 65 6d 65 6e 74 20 76 61 72 69 6f   implement vario
01b0: 75 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69  us SQL.** functi
01c0: 6f 6e 73 20 6f 66 20 53 51 4c 69 74 65 2e 20 20  ons of SQLite.  
01d0: 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 69 73 20  .**.** There is 
01e0: 6f 6e 6c 79 20 6f 6e 65 20 65 78 70 6f 72 74 65  only one exporte
01f0: 64 20 73 79 6d 62 6f 6c 20 69 6e 20 74 68 69 73  d symbol in this
0200: 20 66 69 6c 65 20 2d 20 74 68 65 20 66 75 6e 63   file - the func
0210: 74 69 6f 6e 0a 2a 2a 20 73 71 6c 69 74 65 52 65  tion.** sqliteRe
0220: 67 69 73 74 65 72 42 75 69 6c 64 69 6e 46 75 6e  gisterBuildinFun
0230: 63 74 69 6f 6e 73 28 29 20 66 6f 75 6e 64 20 61  ctions() found a
0240: 74 20 74 68 65 20 62 6f 74 74 6f 6d 20 6f 66 20  t the bottom of 
0250: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 20 41 6c 6c  the file..** All
0260: 20 6f 74 68 65 72 20 63 6f 64 65 20 68 61 73 20   other code has 
0270: 66 69 6c 65 20 73 63 6f 70 65 2e 0a 2a 2f 0a 23  file scope..*/.#
0280: 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49  include "sqliteI
0290: 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c  nt.h".#include <
02a0: 73 74 64 6c 69 62 2e 68 3e 0a 23 69 6e 63 6c 75  stdlib.h>.#inclu
02b0: 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69  de <assert.h>.#i
02c0: 6e 63 6c 75 64 65 20 22 76 64 62 65 49 6e 74 2e  nclude "vdbeInt.
02d0: 68 22 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e  h"../*.** Return
02e0: 20 74 68 65 20 63 6f 6c 6c 61 74 69 6e 67 20 66   the collating f
02f0: 75 6e 63 74 69 6f 6e 20 61 73 73 6f 63 69 61 74  unction associat
0300: 65 64 20 77 69 74 68 20 61 20 66 75 6e 63 74 69  ed with a functi
0310: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 43 6f  on..*/.static Co
0320: 6c 6c 53 65 71 20 2a 73 71 6c 69 74 65 33 47 65  llSeq *sqlite3Ge
0330: 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 73 71 6c  tFuncCollSeq(sql
0340: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0350: 6e 74 65 78 74 29 7b 0a 20 20 72 65 74 75 72 6e  ntext){.  return
0360: 20 63 6f 6e 74 65 78 74 2d 3e 70 43 6f 6c 6c 3b   context->pColl;
0370: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 64 69 63 61  .}../*.** Indica
0380: 74 65 20 74 68 61 74 20 74 68 65 20 61 63 63 75  te that the accu
0390: 6d 75 6c 61 74 6f 72 20 6c 6f 61 64 20 73 68 6f  mulator load sho
03a0: 75 6c 64 20 62 65 20 73 6b 69 70 70 65 64 20 6f  uld be skipped o
03b0: 6e 20 74 68 69 73 0a 2a 2a 20 69 74 65 72 61 74  n this.** iterat
03c0: 69 6f 6e 20 6f 66 20 74 68 65 20 61 67 67 72 65  ion of the aggre
03d0: 67 61 74 65 20 6c 6f 6f 70 2e 0a 2a 2f 0a 73 74  gate loop..*/.st
03e0: 61 74 69 63 20 76 6f 69 64 20 73 71 6c 69 74 65  atic void sqlite
03f0: 33 53 6b 69 70 41 63 63 75 6d 75 6c 61 74 6f 72  3SkipAccumulator
0400: 4c 6f 61 64 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Load(sqlite3_con
0410: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
0420: 20 20 63 6f 6e 74 65 78 74 2d 3e 73 6b 69 70 46    context->skipF
0430: 6c 61 67 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a  lag = 1;.}../*.*
0440: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
0450: 20 6f 66 20 74 68 65 20 6e 6f 6e 2d 61 67 67 72   of the non-aggr
0460: 65 67 61 74 65 20 6d 69 6e 28 29 20 61 6e 64 20  egate min() and 
0470: 6d 61 78 28 29 20 66 75 6e 63 74 69 6f 6e 73 0a  max() functions.
0480: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d  */.static void m
0490: 69 6e 6d 61 78 46 75 6e 63 28 0a 20 20 73 71 6c  inmaxFunc(.  sql
04a0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
04b0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
04c0: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
04d0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
04e0: 6e 74 20 69 3b 0a 20 20 69 6e 74 20 6d 61 73 6b  nt i;.  int mask
04f0: 3b 20 20 20 20 2f 2a 20 30 20 66 6f 72 20 6d 69  ;    /* 0 for mi
0500: 6e 28 29 20 6f 72 20 30 78 66 66 66 66 66 66 66  n() or 0xfffffff
0510: 66 20 66 6f 72 20 6d 61 78 28 29 20 2a 2f 0a 20  f for max() */. 
0520: 20 69 6e 74 20 69 42 65 73 74 3b 0a 20 20 43 6f   int iBest;.  Co
0530: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 3b 0a 0a 20  llSeq *pColl;.. 
0540: 20 61 73 73 65 72 74 28 20 61 72 67 63 3e 31 20   assert( argc>1 
0550: 29 3b 0a 20 20 6d 61 73 6b 20 3d 20 73 71 6c 69  );.  mask = sqli
0560: 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f  te3_user_data(co
0570: 6e 74 65 78 74 29 3d 3d 30 20 3f 20 30 20 3a 20  ntext)==0 ? 0 : 
0580: 2d 31 3b 0a 20 20 70 43 6f 6c 6c 20 3d 20 73 71  -1;.  pColl = sq
0590: 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c  lite3GetFuncColl
05a0: 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  Seq(context);.  
05b0: 61 73 73 65 72 74 28 20 70 43 6f 6c 6c 20 29 3b  assert( pColl );
05c0: 0a 20 20 61 73 73 65 72 74 28 20 6d 61 73 6b 3d  .  assert( mask=
05d0: 3d 2d 31 20 7c 7c 20 6d 61 73 6b 3d 3d 30 20 29  =-1 || mask==0 )
05e0: 3b 0a 20 20 69 42 65 73 74 20 3d 20 30 3b 0a 20  ;.  iBest = 0;. 
05f0: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
0600: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
0610: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20  ==SQLITE_NULL ) 
0620: 72 65 74 75 72 6e 3b 0a 20 20 66 6f 72 28 69 3d  return;.  for(i=
0630: 31 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29 7b  1; i<argc; i++){
0640: 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33  .    if( sqlite3
0650: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
0660: 5b 69 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [i])==SQLITE_NUL
0670: 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  L ) return;.    
0680: 69 66 28 20 28 73 71 6c 69 74 65 33 4d 65 6d 43  if( (sqlite3MemC
0690: 6f 6d 70 61 72 65 28 61 72 67 76 5b 69 42 65 73  ompare(argv[iBes
06a0: 74 5d 2c 20 61 72 67 76 5b 69 5d 2c 20 70 43 6f  t], argv[i], pCo
06b0: 6c 6c 29 5e 6d 61 73 6b 29 3e 3d 30 20 29 7b 0a  ll)^mask)>=0 ){.
06c0: 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28 20        testcase( 
06d0: 6d 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 20 20 20  mask==0 );.     
06e0: 20 69 42 65 73 74 20 3d 20 69 3b 0a 20 20 20 20   iBest = i;.    
06f0: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  }.  }.  sqlite3_
0700: 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e  result_value(con
0710: 74 65 78 74 2c 20 61 72 67 76 5b 69 42 65 73 74  text, argv[iBest
0720: 5d 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74  ]);.}../*.** Ret
0730: 75 72 6e 20 74 68 65 20 74 79 70 65 20 6f 66 20  urn the type of 
0740: 74 68 65 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f  the argument..*/
0750: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 79 70  .static void typ
0760: 65 6f 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  eofFunc(.  sqlit
0770: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
0780: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
0790: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
07a0: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
07b0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d 20  const char *z = 
07c0: 30 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  0;.  UNUSED_PARA
07d0: 4d 45 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a  METER(NotUsed);.
07e0: 20 20 73 77 69 74 63 68 28 20 73 71 6c 69 74 65    switch( sqlite
07f0: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
0800: 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73  v[0]) ){.    cas
0810: 65 20 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52  e SQLITE_INTEGER
0820: 3a 20 7a 20 3d 20 22 69 6e 74 65 67 65 72 22 3b  : z = "integer";
0830: 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65   break;.    case
0840: 20 53 51 4c 49 54 45 5f 54 45 58 54 3a 20 20 20   SQLITE_TEXT:   
0850: 20 7a 20 3d 20 22 74 65 78 74 22 3b 20 20 20 20   z = "text";    
0860: 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20  break;.    case 
0870: 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 20 20  SQLITE_FLOAT:   
0880: 7a 20 3d 20 22 72 65 61 6c 22 3b 20 20 20 20 62  z = "real";    b
0890: 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20 53  reak;.    case S
08a0: 51 4c 49 54 45 5f 42 4c 4f 42 3a 20 20 20 20 7a  QLITE_BLOB:    z
08b0: 20 3d 20 22 62 6c 6f 62 22 3b 20 20 20 20 62 72   = "blob";    br
08c0: 65 61 6b 3b 0a 20 20 20 20 64 65 66 61 75 6c 74  eak;.    default
08d0: 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 7a 20  :             z 
08e0: 3d 20 22 6e 75 6c 6c 22 3b 20 20 20 20 62 72 65  = "null";    bre
08f0: 61 6b 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  ak;.  }.  sqlite
0900: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
0910: 6e 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 53 51  ntext, z, -1, SQ
0920: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a  LITE_STATIC);.}.
0930: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
0940: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 65  tation of the le
0950: 6e 67 74 68 28 29 20 66 75 6e 63 74 69 6f 6e 0a  ngth() function.
0960: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
0970: 65 6e 67 74 68 46 75 6e 63 28 0a 20 20 73 71 6c  engthFunc(.  sql
0980: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0990: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
09a0: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
09b0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
09c0: 6e 74 20 6c 65 6e 3b 0a 0a 20 20 61 73 73 65 72  nt len;..  asser
09d0: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
09e0: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
09f0: 28 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68  (argc);.  switch
0a00: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
0a10: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
0a20: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0a30: 5f 42 4c 4f 42 3a 0a 20 20 20 20 63 61 73 65 20  _BLOB:.    case 
0a40: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 0a  SQLITE_INTEGER:.
0a50: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
0a60: 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 73  FLOAT: {.      s
0a70: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
0a80: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
0a90: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
0aa0: 72 67 76 5b 30 5d 29 29 3b 0a 20 20 20 20 20 20  rgv[0]));.      
0ab0: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
0ac0: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58   case SQLITE_TEX
0ad0: 54 3a 20 7b 0a 20 20 20 20 20 20 63 6f 6e 73 74  T: {.      const
0ae0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
0af0: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  z = sqlite3_valu
0b00: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
0b10: 0a 20 20 20 20 20 20 69 66 28 20 7a 3d 3d 30 20  .      if( z==0 
0b20: 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20  ) return;.      
0b30: 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 77  len = 0;.      w
0b40: 68 69 6c 65 28 20 2a 7a 20 29 7b 0a 20 20 20 20  hile( *z ){.    
0b50: 20 20 20 20 6c 65 6e 2b 2b 3b 0a 20 20 20 20 20      len++;.     
0b60: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
0b70: 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 7d 0a  TF8(z);.      }.
0b80: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
0b90: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
0ba0: 2c 20 6c 65 6e 29 3b 0a 20 20 20 20 20 20 62 72  , len);.      br
0bb0: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64  eak;.    }.    d
0bc0: 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20  efault: {.      
0bd0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e  sqlite3_result_n
0be0: 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  ull(context);.  
0bf0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
0c00: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
0c10: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
0c20: 74 68 65 20 61 62 73 28 29 20 66 75 6e 63 74 69  the abs() functi
0c30: 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52  on..**.** IMP: R
0c40: 2d 32 33 39 37 39 2d 32 36 38 35 35 20 54 68 65  -23979-26855 The
0c50: 20 61 62 73 28 58 29 20 66 75 6e 63 74 69 6f 6e   abs(X) function
0c60: 20 72 65 74 75 72 6e 73 20 74 68 65 20 61 62 73   returns the abs
0c70: 6f 6c 75 74 65 20 76 61 6c 75 65 20 6f 66 0a 2a  olute value of.*
0c80: 2a 20 74 68 65 20 6e 75 6d 65 72 69 63 20 61 72  * the numeric ar
0c90: 67 75 6d 65 6e 74 20 58 2e 20 0a 2a 2f 0a 73 74  gument X. .*/.st
0ca0: 61 74 69 63 20 76 6f 69 64 20 61 62 73 46 75 6e  atic void absFun
0cb0: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
0cc0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
0cd0: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
0ce0: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 61  lue **argv){.  a
0cf0: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
0d00: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
0d10: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 73 77  ETER(argc);.  sw
0d20: 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f 76 61  itch( sqlite3_va
0d30: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
0d40: 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51  ) ){.    case SQ
0d50: 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 20 7b 0a  LITE_INTEGER: {.
0d60: 20 20 20 20 20 20 69 36 34 20 69 56 61 6c 20 3d        i64 iVal =
0d70: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
0d80: 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b 0a 20  nt64(argv[0]);. 
0d90: 20 20 20 20 20 69 66 28 20 69 56 61 6c 3c 30 20       if( iVal<0 
0da0: 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 28  ){.        if( (
0db0: 69 56 61 6c 3c 3c 31 29 3d 3d 30 20 29 7b 0a 20  iVal<<1)==0 ){. 
0dc0: 20 20 20 20 20 20 20 20 20 2f 2a 20 49 4d 50 3a           /* IMP:
0dd0: 20 52 2d 33 35 34 36 30 2d 31 35 30 38 34 20 49   R-35460-15084 I
0de0: 66 20 58 20 69 73 20 74 68 65 20 69 6e 74 65 67  f X is the integ
0df0: 65 72 20 2d 39 32 32 33 33 37 32 30 33 36 38 35  er -922337203685
0e00: 34 37 37 35 38 30 37 20 74 68 65 6e 0a 20 20 20  4775807 then.   
0e10: 20 20 20 20 20 20 20 2a 2a 20 61 62 73 28 58 29         ** abs(X)
0e20: 20 74 68 72 6f 77 73 20 61 6e 20 69 6e 74 65 67   throws an integ
0e30: 65 72 20 6f 76 65 72 66 6c 6f 77 20 65 72 72 6f  er overflow erro
0e40: 72 20 73 69 6e 63 65 20 74 68 65 72 65 20 69 73  r since there is
0e50: 20 6e 6f 0a 20 20 20 20 20 20 20 20 20 20 2a 2a   no.          **
0e60: 20 65 71 75 69 76 61 6c 65 6e 74 20 70 6f 73 69   equivalent posi
0e70: 74 69 76 65 20 36 34 2d 62 69 74 20 74 77 6f 20  tive 64-bit two 
0e80: 63 6f 6d 70 6c 65 6d 65 6e 74 20 76 61 6c 75 65  complement value
0e90: 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 73  . */.          s
0ea0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
0eb0: 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 69 6e  ror(context, "in
0ec0: 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 22 2c  teger overflow",
0ed0: 20 2d 31 29 3b 0a 20 20 20 20 20 20 20 20 20 20   -1);.          
0ee0: 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 20 20  return;.        
0ef0: 7d 0a 20 20 20 20 20 20 20 20 69 56 61 6c 20 3d  }.        iVal =
0f00: 20 2d 69 56 61 6c 3b 0a 20 20 20 20 20 20 7d 20   -iVal;.      } 
0f10: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
0f20: 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e 74  esult_int64(cont
0f30: 65 78 74 2c 20 69 56 61 6c 29 3b 0a 20 20 20 20  ext, iVal);.    
0f40: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
0f50: 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 4e     case SQLITE_N
0f60: 55 4c 4c 3a 20 7b 0a 20 20 20 20 20 20 2f 2a 20  ULL: {.      /* 
0f70: 49 4d 50 3a 20 52 2d 33 37 34 33 34 2d 31 39 39  IMP: R-37434-199
0f80: 32 39 20 41 62 73 28 58 29 20 72 65 74 75 72 6e  29 Abs(X) return
0f90: 73 20 4e 55 4c 4c 20 69 66 20 58 20 69 73 20 4e  s NULL if X is N
0fa0: 55 4c 4c 2e 20 2a 2f 0a 20 20 20 20 20 20 73 71  ULL. */.      sq
0fb0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e 75 6c  lite3_result_nul
0fc0: 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  l(context);.    
0fd0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
0fe0: 20 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a 20 20     default: {.  
0ff0: 20 20 20 20 2f 2a 20 42 65 63 61 75 73 65 20 73      /* Because s
1000: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75  qlite3_value_dou
1010: 62 6c 65 28 29 20 72 65 74 75 72 6e 73 20 30 2e  ble() returns 0.
1020: 30 20 69 66 20 74 68 65 20 61 72 67 75 6d 65 6e  0 if the argumen
1030: 74 20 69 73 20 6e 6f 74 0a 20 20 20 20 20 20 2a  t is not.      *
1040: 2a 20 73 6f 6d 65 74 68 69 6e 67 20 74 68 61 74  * something that
1050: 20 63 61 6e 20 62 65 20 63 6f 6e 76 65 72 74 65   can be converte
1060: 64 20 69 6e 74 6f 20 61 20 6e 75 6d 62 65 72 2c  d into a number,
1070: 20 77 65 20 68 61 76 65 3a 0a 20 20 20 20 20 20   we have:.      
1080: 2a 2a 20 49 4d 50 3a 20 52 2d 35 37 33 32 36 2d  ** IMP: R-57326-
1090: 33 31 35 34 31 20 41 62 73 28 58 29 20 72 65 74  31541 Abs(X) ret
10a0: 75 72 6e 20 30 2e 30 20 69 66 20 58 20 69 73 20  urn 0.0 if X is 
10b0: 61 20 73 74 72 69 6e 67 20 6f 72 20 62 6c 6f 62  a string or blob
10c0: 20 74 68 61 74 0a 20 20 20 20 20 20 2a 2a 20 63   that.      ** c
10d0: 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 76 65 72 74  annot be convert
10e0: 65 64 20 74 6f 20 61 20 6e 75 6d 65 72 69 63 20  ed to a numeric 
10f0: 76 61 6c 75 65 2e 20 0a 20 20 20 20 20 20 2a 2f  value. .      */
1100: 0a 20 20 20 20 20 20 64 6f 75 62 6c 65 20 72 56  .      double rV
1110: 61 6c 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  al = sqlite3_val
1120: 75 65 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30  ue_double(argv[0
1130: 5d 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72 56  ]);.      if( rV
1140: 61 6c 3c 30 20 29 20 72 56 61 6c 20 3d 20 2d 72  al<0 ) rVal = -r
1150: 56 61 6c 3b 0a 20 20 20 20 20 20 73 71 6c 69 74  Val;.      sqlit
1160: 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65  e3_result_double
1170: 28 63 6f 6e 74 65 78 74 2c 20 72 56 61 6c 29 3b  (context, rVal);
1180: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  .      break;.  
1190: 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a    }.  }.}../*.**
11a0: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
11b0: 6f 66 20 74 68 65 20 69 6e 73 74 72 28 29 20 66  of the instr() f
11c0: 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 69  unction..**.** i
11d0: 6e 73 74 72 28 68 61 79 73 74 61 63 6b 2c 6e 65  nstr(haystack,ne
11e0: 65 64 6c 65 29 20 66 69 6e 64 73 20 74 68 65 20  edle) finds the 
11f0: 66 69 72 73 74 20 6f 63 63 75 72 72 65 6e 63 65  first occurrence
1200: 20 6f 66 20 6e 65 65 64 6c 65 0a 2a 2a 20 69 6e   of needle.** in
1210: 20 68 61 79 73 74 61 63 6b 20 61 6e 64 20 72 65   haystack and re
1220: 74 75 72 6e 73 20 74 68 65 20 6e 75 6d 62 65 72  turns the number
1230: 20 6f 66 20 70 72 65 76 69 6f 75 73 20 63 68 61   of previous cha
1240: 72 61 63 74 65 72 73 20 70 6c 75 73 20 31 2c 0a  racters plus 1,.
1250: 2a 2a 20 6f 72 20 30 20 69 66 20 6e 65 65 64 6c  ** or 0 if needl
1260: 65 20 64 6f 65 73 20 6e 6f 74 20 6f 63 63 75 72  e does not occur
1270: 20 77 69 74 68 69 6e 20 68 61 79 73 74 61 63 6b   within haystack
1280: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 62 6f 74 68 20  ..**.** If both 
1290: 68 61 79 73 74 61 63 6b 20 61 6e 64 20 6e 65 65  haystack and nee
12a0: 64 6c 65 20 61 72 65 20 42 4c 4f 42 73 2c 20 74  dle are BLOBs, t
12b0: 68 65 6e 20 74 68 65 20 72 65 73 75 6c 74 20 69  hen the result i
12c0: 73 20 6f 6e 65 20 6d 6f 72 65 20 74 68 61 6e 0a  s one more than.
12d0: 2a 2a 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66  ** the number of
12e0: 20 62 79 74 65 73 20 69 6e 20 68 61 79 73 74 61   bytes in haysta
12f0: 63 6b 20 70 72 69 6f 72 20 74 6f 20 74 68 65 20  ck prior to the 
1300: 66 69 72 73 74 20 6f 63 63 75 72 72 65 6e 63 65  first occurrence
1310: 20 6f 66 20 6e 65 65 64 6c 65 2c 0a 2a 2a 20 6f   of needle,.** o
1320: 72 20 30 20 69 66 20 6e 65 65 64 6c 65 20 6e 65  r 0 if needle ne
1330: 76 65 72 20 6f 63 63 75 72 73 20 69 6e 20 68 61  ver occurs in ha
1340: 79 73 74 61 63 6b 2e 0a 2a 2f 0a 73 74 61 74 69  ystack..*/.stati
1350: 63 20 76 6f 69 64 20 69 6e 73 74 72 46 75 6e 63  c void instrFunc
1360: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
1370: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
1380: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
1390: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
13a0: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69  .){.  const unsi
13b0: 67 6e 65 64 20 63 68 61 72 20 2a 7a 48 61 79 73  gned char *zHays
13c0: 74 61 63 6b 3b 0a 20 20 63 6f 6e 73 74 20 75 6e  tack;.  const un
13d0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 4e 65  signed char *zNe
13e0: 65 64 6c 65 3b 0a 20 20 69 6e 74 20 6e 48 61 79  edle;.  int nHay
13f0: 73 74 61 63 6b 3b 0a 20 20 69 6e 74 20 6e 4e 65  stack;.  int nNe
1400: 65 64 6c 65 3b 0a 20 20 69 6e 74 20 74 79 70 65  edle;.  int type
1410: 48 61 79 73 74 61 63 6b 2c 20 74 79 70 65 4e 65  Haystack, typeNe
1420: 65 64 6c 65 3b 0a 20 20 69 6e 74 20 4e 20 3d 20  edle;.  int N = 
1430: 31 3b 0a 20 20 69 6e 74 20 69 73 54 65 78 74 3b  1;.  int isText;
1440: 0a 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ..  UNUSED_PARAM
1450: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 74 79  ETER(argc);.  ty
1460: 70 65 48 61 79 73 74 61 63 6b 20 3d 20 73 71 6c  peHaystack = sql
1470: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
1480: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 74 79 70 65  argv[0]);.  type
1490: 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74 65 33  Needle = sqlite3
14a0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
14b0: 5b 31 5d 29 3b 0a 20 20 69 66 28 20 74 79 70 65  [1]);.  if( type
14c0: 48 61 79 73 74 61 63 6b 3d 3d 53 51 4c 49 54 45  Haystack==SQLITE
14d0: 5f 4e 55 4c 4c 20 7c 7c 20 74 79 70 65 4e 65 65  _NULL || typeNee
14e0: 64 6c 65 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c  dle==SQLITE_NULL
14f0: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 48 61   ) return;.  nHa
1500: 79 73 74 61 63 6b 20 3d 20 73 71 6c 69 74 65 33  ystack = sqlite3
1510: 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67  _value_bytes(arg
1520: 76 5b 30 5d 29 3b 0a 20 20 6e 4e 65 65 64 6c 65  v[0]);.  nNeedle
1530: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1540: 5f 62 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b  _bytes(argv[1]);
1550: 0a 20 20 69 66 28 20 74 79 70 65 48 61 79 73 74  .  if( typeHayst
1560: 61 63 6b 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42  ack==SQLITE_BLOB
1570: 20 26 26 20 74 79 70 65 4e 65 65 64 6c 65 3d 3d   && typeNeedle==
1580: 53 51 4c 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20  SQLITE_BLOB ){. 
1590: 20 20 20 7a 48 61 79 73 74 61 63 6b 20 3d 20 73     zHaystack = s
15a0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f  qlite3_value_blo
15b0: 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  b(argv[0]);.    
15c0: 7a 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74 65  zNeedle = sqlite
15d0: 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67  3_value_blob(arg
15e0: 76 5b 31 5d 29 3b 0a 20 20 20 20 69 73 54 65 78  v[1]);.    isTex
15f0: 74 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a  t = 0;.  }else{.
1600: 20 20 20 20 7a 48 61 79 73 74 61 63 6b 20 3d 20      zHaystack = 
1610: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
1620: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20  xt(argv[0]);.   
1630: 20 7a 4e 65 65 64 6c 65 20 3d 20 73 71 6c 69 74   zNeedle = sqlit
1640: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
1650: 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 73 54 65  gv[1]);.    isTe
1660: 78 74 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 77 68  xt = 1;.  }.  wh
1670: 69 6c 65 28 20 6e 4e 65 65 64 6c 65 3c 3d 6e 48  ile( nNeedle<=nH
1680: 61 79 73 74 61 63 6b 20 26 26 20 6d 65 6d 63 6d  aystack && memcm
1690: 70 28 7a 48 61 79 73 74 61 63 6b 2c 20 7a 4e 65  p(zHaystack, zNe
16a0: 65 64 6c 65 2c 20 6e 4e 65 65 64 6c 65 29 21 3d  edle, nNeedle)!=
16b0: 30 20 29 7b 0a 20 20 20 20 4e 2b 2b 3b 0a 20 20  0 ){.    N++;.  
16c0: 20 20 64 6f 7b 0a 20 20 20 20 20 20 6e 48 61 79    do{.      nHay
16d0: 73 74 61 63 6b 2d 2d 3b 0a 20 20 20 20 20 20 7a  stack--;.      z
16e0: 48 61 79 73 74 61 63 6b 2b 2b 3b 0a 20 20 20 20  Haystack++;.    
16f0: 7d 77 68 69 6c 65 28 20 69 73 54 65 78 74 20 26  }while( isText &
1700: 26 20 28 7a 48 61 79 73 74 61 63 6b 5b 30 5d 26  & (zHaystack[0]&
1710: 30 78 63 30 29 3d 3d 30 78 38 30 20 29 3b 0a 20  0xc0)==0x80 );. 
1720: 20 7d 0a 20 20 69 66 28 20 6e 4e 65 65 64 6c 65   }.  if( nNeedle
1730: 3e 6e 48 61 79 73 74 61 63 6b 20 29 20 4e 20 3d  >nHaystack ) N =
1740: 20 30 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65   0;.  sqlite3_re
1750: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
1760: 2c 20 4e 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  , N);.}../*.** I
1770: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
1780: 20 74 68 65 20 73 75 62 73 74 72 28 29 20 66 75   the substr() fu
1790: 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 73 75  nction..**.** su
17a0: 62 73 74 72 28 78 2c 70 31 2c 70 32 29 20 20 72  bstr(x,p1,p2)  r
17b0: 65 74 75 72 6e 73 20 70 32 20 63 68 61 72 61 63  eturns p2 charac
17c0: 74 65 72 73 20 6f 66 20 78 5b 5d 20 62 65 67 69  ters of x[] begi
17d0: 6e 6e 69 6e 67 20 77 69 74 68 20 70 31 2e 0a 2a  nning with p1..*
17e0: 2a 20 70 31 20 69 73 20 31 2d 69 6e 64 65 78 65  * p1 is 1-indexe
17f0: 64 2e 20 20 53 6f 20 73 75 62 73 74 72 28 78 2c  d.  So substr(x,
1800: 31 2c 31 29 20 72 65 74 75 72 6e 73 20 74 68 65  1,1) returns the
1810: 20 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72   first character
1820: 0a 2a 2a 20 6f 66 20 78 2e 20 20 49 66 20 78 20  .** of x.  If x 
1830: 69 73 20 74 65 78 74 2c 20 74 68 65 6e 20 77 65  is text, then we
1840: 20 61 63 74 75 61 6c 6c 79 20 63 6f 75 6e 74 20   actually count 
1850: 55 54 46 2d 38 20 63 68 61 72 61 63 74 65 72 73  UTF-8 characters
1860: 2e 0a 2a 2a 20 49 66 20 78 20 69 73 20 61 20 62  ..** If x is a b
1870: 6c 6f 62 2c 20 74 68 65 6e 20 77 65 20 63 6f 75  lob, then we cou
1880: 6e 74 20 62 79 74 65 73 2e 0a 2a 2a 0a 2a 2a 20  nt bytes..**.** 
1890: 49 66 20 70 31 20 69 73 20 6e 65 67 61 74 69 76  If p1 is negativ
18a0: 65 2c 20 74 68 65 6e 20 77 65 20 62 65 67 69 6e  e, then we begin
18b0: 20 61 62 73 28 70 31 29 20 66 72 6f 6d 20 74 68   abs(p1) from th
18c0: 65 20 65 6e 64 20 6f 66 20 78 5b 5d 2e 0a 2a 2a  e end of x[]..**
18d0: 0a 2a 2a 20 49 66 20 70 32 20 69 73 20 6e 65 67  .** If p2 is neg
18e0: 61 74 69 76 65 2c 20 72 65 74 75 72 6e 20 74 68  ative, return th
18f0: 65 20 70 32 20 63 68 61 72 61 63 74 65 72 73 20  e p2 characters 
1900: 70 72 65 63 65 64 69 6e 67 20 70 31 2e 0a 2a 2f  preceding p1..*/
1910: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 75 62  .static void sub
1920: 73 74 72 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  strFunc(.  sqlit
1930: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
1940: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
1950: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
1960: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e   **argv.){.  con
1970: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
1980: 20 2a 7a 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73   *z;.  const uns
1990: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 32 3b 0a  igned char *z2;.
19a0: 20 20 69 6e 74 20 6c 65 6e 3b 0a 20 20 69 6e 74    int len;.  int
19b0: 20 70 30 74 79 70 65 3b 0a 20 20 69 36 34 20 70   p0type;.  i64 p
19c0: 31 2c 20 70 32 3b 0a 20 20 69 6e 74 20 6e 65 67  1, p2;.  int neg
19d0: 50 32 20 3d 20 30 3b 0a 0a 20 20 61 73 73 65 72  P2 = 0;..  asser
19e0: 74 28 20 61 72 67 63 3d 3d 33 20 7c 7c 20 61 72  t( argc==3 || ar
19f0: 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20 73  gc==2 );.  if( s
1a00: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
1a10: 65 28 61 72 67 76 5b 31 5d 29 3d 3d 53 51 4c 49  e(argv[1])==SQLI
1a20: 54 45 5f 4e 55 4c 4c 0a 20 20 20 7c 7c 20 28 61  TE_NULL.   || (a
1a30: 72 67 63 3d 3d 33 20 26 26 20 73 71 6c 69 74 65  rgc==3 && sqlite
1a40: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
1a50: 76 5b 32 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[2])==SQLITE_NU
1a60: 4c 4c 29 0a 20 20 29 7b 0a 20 20 20 20 72 65 74  LL).  ){.    ret
1a70: 75 72 6e 3b 0a 20 20 7d 0a 20 20 70 30 74 79 70  urn;.  }.  p0typ
1a80: 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  e = sqlite3_valu
1a90: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3b  e_type(argv[0]);
1aa0: 0a 20 20 70 31 20 3d 20 73 71 6c 69 74 65 33 5f  .  p1 = sqlite3_
1ab0: 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 31  value_int(argv[1
1ac0: 5d 29 3b 0a 20 20 69 66 28 20 70 30 74 79 70 65  ]);.  if( p0type
1ad0: 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 20 29 7b  ==SQLITE_BLOB ){
1ae0: 0a 20 20 20 20 6c 65 6e 20 3d 20 73 71 6c 69 74  .    len = sqlit
1af0: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
1b00: 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 7a 20 3d  rgv[0]);.    z =
1b10: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
1b20: 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  lob(argv[0]);.  
1b30: 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74    if( z==0 ) ret
1b40: 75 72 6e 3b 0a 20 20 20 20 61 73 73 65 72 74 28  urn;.    assert(
1b50: 20 6c 65 6e 3d 3d 73 71 6c 69 74 65 33 5f 76 61   len==sqlite3_va
1b60: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
1b70: 5d 29 20 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  ]) );.  }else{. 
1b80: 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76     z = sqlite3_v
1b90: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
1ba0: 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 3d 3d 30  ]);.    if( z==0
1bb0: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 6c   ) return;.    l
1bc0: 65 6e 20 3d 20 30 3b 0a 20 20 20 20 69 66 28 20  en = 0;.    if( 
1bd0: 70 31 3c 30 20 29 7b 0a 20 20 20 20 20 20 66 6f  p1<0 ){.      fo
1be0: 72 28 7a 32 3d 7a 3b 20 2a 7a 32 3b 20 6c 65 6e  r(z2=z; *z2; len
1bf0: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 53 51 4c  ++){.        SQL
1c00: 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 32  ITE_SKIP_UTF8(z2
1c10: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  );.      }.    }
1c20: 0a 20 20 7d 0a 20 20 69 66 28 20 61 72 67 63 3d  .  }.  if( argc=
1c30: 3d 33 20 29 7b 0a 20 20 20 20 70 32 20 3d 20 73  =3 ){.    p2 = s
1c40: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
1c50: 28 61 72 67 76 5b 32 5d 29 3b 0a 20 20 20 20 69  (argv[2]);.    i
1c60: 66 28 20 70 32 3c 30 20 29 7b 0a 20 20 20 20 20  f( p2<0 ){.     
1c70: 20 70 32 20 3d 20 2d 70 32 3b 0a 20 20 20 20 20   p2 = -p2;.     
1c80: 20 6e 65 67 50 32 20 3d 20 31 3b 0a 20 20 20 20   negP2 = 1;.    
1c90: 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70  }.  }else{.    p
1ca0: 32 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  2 = sqlite3_cont
1cb0: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
1cc0: 6e 74 65 78 74 29 2d 3e 61 4c 69 6d 69 74 5b 53  ntext)->aLimit[S
1cd0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47  QLITE_LIMIT_LENG
1ce0: 54 48 5d 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70  TH];.  }.  if( p
1cf0: 31 3c 30 20 29 7b 0a 20 20 20 20 70 31 20 2b 3d  1<0 ){.    p1 +=
1d00: 20 6c 65 6e 3b 0a 20 20 20 20 69 66 28 20 70 31   len;.    if( p1
1d10: 3c 30 20 29 7b 0a 20 20 20 20 20 20 70 32 20 2b  <0 ){.      p2 +
1d20: 3d 20 70 31 3b 0a 20 20 20 20 20 20 69 66 28 20  = p1;.      if( 
1d30: 70 32 3c 30 20 29 20 70 32 20 3d 20 30 3b 0a 20  p2<0 ) p2 = 0;. 
1d40: 20 20 20 20 20 70 31 20 3d 20 30 3b 0a 20 20 20       p1 = 0;.   
1d50: 20 7d 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 70   }.  }else if( p
1d60: 31 3e 30 20 29 7b 0a 20 20 20 20 70 31 2d 2d 3b  1>0 ){.    p1--;
1d70: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 70 32 3e  .  }else if( p2>
1d80: 30 20 29 7b 0a 20 20 20 20 70 32 2d 2d 3b 0a 20  0 ){.    p2--;. 
1d90: 20 7d 0a 20 20 69 66 28 20 6e 65 67 50 32 20 29   }.  if( negP2 )
1da0: 7b 0a 20 20 20 20 70 31 20 2d 3d 20 70 32 3b 0a  {.    p1 -= p2;.
1db0: 20 20 20 20 69 66 28 20 70 31 3c 30 20 29 7b 0a      if( p1<0 ){.
1dc0: 20 20 20 20 20 20 70 32 20 2b 3d 20 70 31 3b 0a        p2 += p1;.
1dd0: 20 20 20 20 20 20 70 31 20 3d 20 30 3b 0a 20 20        p1 = 0;.  
1de0: 20 20 7d 0a 20 20 7d 0a 20 20 61 73 73 65 72 74    }.  }.  assert
1df0: 28 20 70 31 3e 3d 30 20 26 26 20 70 32 3e 3d 30  ( p1>=0 && p2>=0
1e00: 20 29 3b 0a 20 20 69 66 28 20 70 30 74 79 70 65   );.  if( p0type
1e10: 21 3d 53 51 4c 49 54 45 5f 42 4c 4f 42 20 29 7b  !=SQLITE_BLOB ){
1e20: 0a 20 20 20 20 77 68 69 6c 65 28 20 2a 7a 20 26  .    while( *z &
1e30: 26 20 70 31 20 29 7b 0a 20 20 20 20 20 20 53 51  & p1 ){.      SQ
1e40: 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a  LITE_SKIP_UTF8(z
1e50: 29 3b 0a 20 20 20 20 20 20 70 31 2d 2d 3b 0a 20  );.      p1--;. 
1e60: 20 20 20 7d 0a 20 20 20 20 66 6f 72 28 7a 32 3d     }.    for(z2=
1e70: 7a 3b 20 2a 7a 32 20 26 26 20 70 32 3b 20 70 32  z; *z2 && p2; p2
1e80: 2d 2d 29 7b 0a 20 20 20 20 20 20 53 51 4c 49 54  --){.      SQLIT
1e90: 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a 32 29 3b  E_SKIP_UTF8(z2);
1ea0: 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74  .    }.    sqlit
1eb0: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
1ec0: 6f 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a  ontext, (char*)z
1ed0: 2c 20 28 69 6e 74 29 28 7a 32 2d 7a 29 2c 20 53  , (int)(z2-z), S
1ee0: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29  QLITE_TRANSIENT)
1ef0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 69  ;.  }else{.    i
1f00: 66 28 20 70 31 2b 70 32 3e 6c 65 6e 20 29 7b 0a  f( p1+p2>len ){.
1f10: 20 20 20 20 20 20 70 32 20 3d 20 6c 65 6e 2d 70        p2 = len-p
1f20: 31 3b 0a 20 20 20 20 20 20 69 66 28 20 70 32 3c  1;.      if( p2<
1f30: 30 20 29 20 70 32 20 3d 20 30 3b 0a 20 20 20 20  0 ) p2 = 0;.    
1f40: 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  }.    sqlite3_re
1f50: 73 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e 74 65 78  sult_blob(contex
1f60: 74 2c 20 28 63 68 61 72 2a 29 26 7a 5b 70 31 5d  t, (char*)&z[p1]
1f70: 2c 20 28 69 6e 74 29 70 32 2c 20 53 51 4c 49 54  , (int)p2, SQLIT
1f80: 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20  E_TRANSIENT);.  
1f90: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  }.}../*.** Imple
1fa0: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
1fb0: 20 72 6f 75 6e 64 28 29 20 66 75 6e 63 74 69 6f   round() functio
1fc0: 6e 0a 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c  n.*/.#ifndef SQL
1fd0: 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e  ITE_OMIT_FLOATIN
1fe0: 47 5f 50 4f 49 4e 54 0a 73 74 61 74 69 63 20 76  G_POINT.static v
1ff0: 6f 69 64 20 72 6f 75 6e 64 46 75 6e 63 28 73 71  oid roundFunc(sq
2000: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
2010: 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63  ontext, int argc
2020: 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20  , sqlite3_value 
2030: 2a 2a 61 72 67 76 29 7b 0a 20 20 69 6e 74 20 6e  **argv){.  int n
2040: 20 3d 20 30 3b 0a 20 20 64 6f 75 62 6c 65 20 72   = 0;.  double r
2050: 3b 0a 20 20 63 68 61 72 20 2a 7a 42 75 66 3b 0a  ;.  char *zBuf;.
2060: 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d    assert( argc==
2070: 31 20 7c 7c 20 61 72 67 63 3d 3d 32 20 29 3b 0a  1 || argc==2 );.
2080: 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29 7b    if( argc==2 ){
2090: 0a 20 20 20 20 69 66 28 20 53 51 4c 49 54 45 5f  .    if( SQLITE_
20a0: 4e 55 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61  NULL==sqlite3_va
20b0: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 31 5d  lue_type(argv[1]
20c0: 29 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  ) ) return;.    
20d0: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  n = sqlite3_valu
20e0: 65 5f 69 6e 74 28 61 72 67 76 5b 31 5d 29 3b 0a  e_int(argv[1]);.
20f0: 20 20 20 20 69 66 28 20 6e 3e 33 30 20 29 20 6e      if( n>30 ) n
2100: 20 3d 20 33 30 3b 0a 20 20 20 20 69 66 28 20 6e   = 30;.    if( n
2110: 3c 30 20 29 20 6e 20 3d 20 30 3b 0a 20 20 7d 0a  <0 ) n = 0;.  }.
2120: 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61    if( sqlite3_va
2130: 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d  lue_type(argv[0]
2140: 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29  )==SQLITE_NULL )
2150: 20 72 65 74 75 72 6e 3b 0a 20 20 72 20 3d 20 73   return;.  r = s
2160: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75  qlite3_value_dou
2170: 62 6c 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ble(argv[0]);.  
2180: 2f 2a 20 49 66 20 59 3d 3d 30 20 61 6e 64 20 58  /* If Y==0 and X
2190: 20 77 69 6c 6c 20 66 69 74 20 69 6e 20 61 20 36   will fit in a 6
21a0: 34 2d 62 69 74 20 69 6e 74 2c 0a 20 20 2a 2a 20  4-bit int,.  ** 
21b0: 68 61 6e 64 6c 65 20 74 68 65 20 72 6f 75 6e 64  handle the round
21c0: 69 6e 67 20 64 69 72 65 63 74 6c 79 2c 0a 20 20  ing directly,.  
21d0: 2a 2a 20 6f 74 68 65 72 77 69 73 65 20 75 73 65  ** otherwise use
21e0: 20 70 72 69 6e 74 66 2e 0a 20 20 2a 2f 0a 20 20   printf..  */.  
21f0: 69 66 28 20 6e 3d 3d 30 20 26 26 20 72 3e 3d 30  if( n==0 && r>=0
2200: 20 26 26 20 72 3c 4c 41 52 47 45 53 54 5f 49 4e   && r<LARGEST_IN
2210: 54 36 34 2d 31 20 29 7b 0a 20 20 20 20 72 20 3d  T64-1 ){.    r =
2220: 20 28 64 6f 75 62 6c 65 29 28 28 73 71 6c 69 74   (double)((sqlit
2230: 65 5f 69 6e 74 36 34 29 28 72 2b 30 2e 35 29 29  e_int64)(r+0.5))
2240: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 6e 3d  ;.  }else if( n=
2250: 3d 30 20 26 26 20 72 3c 30 20 26 26 20 28 2d 72  =0 && r<0 && (-r
2260: 29 3c 4c 41 52 47 45 53 54 5f 49 4e 54 36 34 2d  )<LARGEST_INT64-
2270: 31 20 29 7b 0a 20 20 20 20 72 20 3d 20 2d 28 64  1 ){.    r = -(d
2280: 6f 75 62 6c 65 29 28 28 73 71 6c 69 74 65 5f 69  ouble)((sqlite_i
2290: 6e 74 36 34 29 28 28 2d 72 29 2b 30 2e 35 29 29  nt64)((-r)+0.5))
22a0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a  ;.  }else{.    z
22b0: 42 75 66 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70  Buf = sqlite3_mp
22c0: 72 69 6e 74 66 28 22 25 2e 2a 66 22 2c 6e 2c 72  rintf("%.*f",n,r
22d0: 29 3b 0a 20 20 20 20 69 66 28 20 7a 42 75 66 3d  );.    if( zBuf=
22e0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  =0 ){.      sqli
22f0: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
2300: 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b  _nomem(context);
2310: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  .      return;. 
2320: 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33     }.    sqlite3
2330: 41 74 6f 46 28 7a 42 75 66 2c 20 26 72 2c 20 73  AtoF(zBuf, &r, s
2340: 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30 28 7a  qlite3Strlen30(z
2350: 42 75 66 29 2c 20 53 51 4c 49 54 45 5f 55 54 46  Buf), SQLITE_UTF
2360: 38 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f  8);.    sqlite3_
2370: 66 72 65 65 28 7a 42 75 66 29 3b 0a 20 20 7d 0a  free(zBuf);.  }.
2380: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2390: 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74 2c  _double(context,
23a0: 20 72 29 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f   r);.}.#endif../
23b0: 2a 0a 2a 2a 20 41 6c 6c 6f 63 61 74 65 20 6e 42  *.** Allocate nB
23c0: 79 74 65 20 62 79 74 65 73 20 6f 66 20 73 70 61  yte bytes of spa
23d0: 63 65 20 75 73 69 6e 67 20 73 71 6c 69 74 65 33  ce using sqlite3
23e0: 5f 6d 61 6c 6c 6f 63 28 29 2e 20 49 66 20 74 68  _malloc(). If th
23f0: 65 0a 2a 2a 20 61 6c 6c 6f 63 61 74 69 6f 6e 20  e.** allocation 
2400: 66 61 69 6c 73 2c 20 63 61 6c 6c 20 73 71 6c 69  fails, call sqli
2410: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
2420: 5f 6e 6f 6d 65 6d 28 29 20 74 6f 20 6e 6f 74 69  _nomem() to noti
2430: 66 79 0a 2a 2a 20 74 68 65 20 64 61 74 61 62 61  fy.** the databa
2440: 73 65 20 68 61 6e 64 6c 65 20 74 68 61 74 20 6d  se handle that m
2450: 61 6c 6c 6f 63 28 29 20 68 61 73 20 66 61 69 6c  alloc() has fail
2460: 65 64 20 61 6e 64 20 72 65 74 75 72 6e 20 4e 55  ed and return NU
2470: 4c 4c 2e 0a 2a 2a 20 49 66 20 6e 42 79 74 65 20  LL..** If nByte 
2480: 69 73 20 6c 61 72 67 65 72 20 74 68 61 6e 20 74  is larger than t
2490: 68 65 20 6d 61 78 69 6d 75 6d 20 73 74 72 69 6e  he maximum strin
24a0: 67 20 6f 72 20 62 6c 6f 62 20 6c 65 6e 67 74 68  g or blob length
24b0: 2c 20 74 68 65 6e 0a 2a 2a 20 72 61 69 73 65 20  , then.** raise 
24c0: 61 6e 20 53 51 4c 49 54 45 5f 54 4f 4f 42 49 47  an SQLITE_TOOBIG
24d0: 20 65 78 63 65 70 74 69 6f 6e 20 61 6e 64 20 72   exception and r
24e0: 65 74 75 72 6e 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73  eturn NULL..*/.s
24f0: 74 61 74 69 63 20 76 6f 69 64 20 2a 63 6f 6e 74  tatic void *cont
2500: 65 78 74 4d 61 6c 6c 6f 63 28 73 71 6c 69 74 65  extMalloc(sqlite
2510: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
2520: 78 74 2c 20 69 36 34 20 6e 42 79 74 65 29 7b 0a  xt, i64 nByte){.
2530: 20 20 63 68 61 72 20 2a 7a 3b 0a 20 20 73 71 6c    char *z;.  sql
2540: 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74  ite3 *db = sqlit
2550: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
2560: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20  ndle(context);. 
2570: 20 61 73 73 65 72 74 28 20 6e 42 79 74 65 3e 30   assert( nByte>0
2580: 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20   );.  testcase( 
2590: 6e 42 79 74 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69  nByte==db->aLimi
25a0: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
25b0: 45 4e 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74  ENGTH] );.  test
25c0: 63 61 73 65 28 20 6e 42 79 74 65 3d 3d 64 62 2d  case( nByte==db-
25d0: 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c  >aLimit[SQLITE_L
25e0: 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 2b 31 20 29  IMIT_LENGTH]+1 )
25f0: 3b 0a 20 20 69 66 28 20 6e 42 79 74 65 3e 64 62  ;.  if( nByte>db
2600: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
2610: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 7b  LIMIT_LENGTH] ){
2620: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
2630: 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67  ult_error_toobig
2640: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7a  (context);.    z
2650: 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20   = 0;.  }else{. 
2660: 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 4d 61     z = sqlite3Ma
2670: 6c 6c 6f 63 28 28 69 6e 74 29 6e 42 79 74 65 29  lloc((int)nByte)
2680: 3b 0a 20 20 20 20 69 66 28 20 21 7a 20 29 7b 0a  ;.    if( !z ){.
2690: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
26a0: 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d  sult_error_nomem
26b0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7d  (context);.    }
26c0: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 7a 3b  .  }.  return z;
26d0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
26e0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
26f0: 75 70 70 65 72 28 29 20 61 6e 64 20 6c 6f 77 65  upper() and lowe
2700: 72 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  r() SQL function
2710: 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  s..*/.static voi
2720: 64 20 75 70 70 65 72 46 75 6e 63 28 73 71 6c 69  d upperFunc(sqli
2730: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
2740: 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20  text, int argc, 
2750: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
2760: 61 72 67 76 29 7b 0a 20 20 63 68 61 72 20 2a 7a  argv){.  char *z
2770: 31 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  1;.  const char 
2780: 2a 7a 32 3b 0a 20 20 69 6e 74 20 69 2c 20 6e 3b  *z2;.  int i, n;
2790: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
27a0: 54 45 52 28 61 72 67 63 29 3b 0a 20 20 7a 32 20  TER(argc);.  z2 
27b0: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
27c0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
27d0: 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69  [0]);.  n = sqli
27e0: 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28  te3_value_bytes(
27f0: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56  argv[0]);.  /* V
2800: 65 72 69 66 79 20 74 68 61 74 20 74 68 65 20 63  erify that the c
2810: 61 6c 6c 20 74 6f 20 5f 62 79 74 65 73 28 29 20  all to _bytes() 
2820: 64 6f 65 73 20 6e 6f 74 20 69 6e 76 61 6c 69 64  does not invalid
2830: 61 74 65 20 74 68 65 20 5f 74 65 78 74 28 29 20  ate the _text() 
2840: 70 6f 69 6e 74 65 72 20 2a 2f 0a 20 20 61 73 73  pointer */.  ass
2850: 65 72 74 28 20 7a 32 3d 3d 28 63 68 61 72 2a 29  ert( z2==(char*)
2860: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
2870: 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 0a 20  xt(argv[0]) );. 
2880: 20 69 66 28 20 7a 32 20 29 7b 0a 20 20 20 20 7a   if( z2 ){.    z
2890: 31 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  1 = contextMallo
28a0: 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34  c(context, ((i64
28b0: 29 6e 29 2b 31 29 3b 0a 20 20 20 20 69 66 28 20  )n)+1);.    if( 
28c0: 7a 31 20 29 7b 0a 20 20 20 20 20 20 66 6f 72 28  z1 ){.      for(
28d0: 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b 29 7b 0a  i=0; i<n; i++){.
28e0: 20 20 20 20 20 20 20 20 7a 31 5b 69 5d 20 3d 20          z1[i] = 
28f0: 28 63 68 61 72 29 73 71 6c 69 74 65 33 54 6f 75  (char)sqlite3Tou
2900: 70 70 65 72 28 7a 32 5b 69 5d 29 3b 0a 20 20 20  pper(z2[i]);.   
2910: 20 20 20 7d 0a 20 20 20 20 20 20 73 71 6c 69 74     }.      sqlit
2920: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
2930: 6f 6e 74 65 78 74 2c 20 7a 31 2c 20 6e 2c 20 73  ontext, z1, n, s
2940: 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20  qlite3_free);.  
2950: 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63    }.  }.}.static
2960: 20 76 6f 69 64 20 6c 6f 77 65 72 46 75 6e 63 28   void lowerFunc(
2970: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
2980: 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72  *context, int ar
2990: 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  gc, sqlite3_valu
29a0: 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 68 61  e **argv){.  cha
29b0: 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73 74 20 63  r *z1;.  const c
29c0: 68 61 72 20 2a 7a 32 3b 0a 20 20 69 6e 74 20 69  har *z2;.  int i
29d0: 2c 20 6e 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  , n;.  UNUSED_PA
29e0: 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20  RAMETER(argc);. 
29f0: 20 7a 32 20 3d 20 28 63 68 61 72 2a 29 73 71 6c   z2 = (char*)sql
2a00: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
2a10: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20  argv[0]);.  n = 
2a20: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
2a30: 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  tes(argv[0]);.  
2a40: 2f 2a 20 56 65 72 69 66 79 20 74 68 61 74 20 74  /* Verify that t
2a50: 68 65 20 63 61 6c 6c 20 74 6f 20 5f 62 79 74 65  he call to _byte
2a60: 73 28 29 20 64 6f 65 73 20 6e 6f 74 20 69 6e 76  s() does not inv
2a70: 61 6c 69 64 61 74 65 20 74 68 65 20 5f 74 65 78  alidate the _tex
2a80: 74 28 29 20 70 6f 69 6e 74 65 72 20 2a 2f 0a 20  t() pointer */. 
2a90: 20 61 73 73 65 72 74 28 20 7a 32 3d 3d 28 63 68   assert( z2==(ch
2aa0: 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75  ar*)sqlite3_valu
2ab0: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20  e_text(argv[0]) 
2ac0: 29 3b 0a 20 20 69 66 28 20 7a 32 20 29 7b 0a 20  );.  if( z2 ){. 
2ad0: 20 20 20 7a 31 20 3d 20 63 6f 6e 74 65 78 74 4d     z1 = contextM
2ae0: 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28  alloc(context, (
2af0: 28 69 36 34 29 6e 29 2b 31 29 3b 0a 20 20 20 20  (i64)n)+1);.    
2b00: 69 66 28 20 7a 31 20 29 7b 0a 20 20 20 20 20 20  if( z1 ){.      
2b10: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b  for(i=0; i<n; i+
2b20: 2b 29 7b 0a 20 20 20 20 20 20 20 20 7a 31 5b 69  +){.        z1[i
2b30: 5d 20 3d 20 73 71 6c 69 74 65 33 54 6f 6c 6f 77  ] = sqlite3Tolow
2b40: 65 72 28 7a 32 5b 69 5d 29 3b 0a 20 20 20 20 20  er(z2[i]);.     
2b50: 20 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33   }.      sqlite3
2b60: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
2b70: 74 65 78 74 2c 20 7a 31 2c 20 6e 2c 20 73 71 6c  text, z1, n, sql
2b80: 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20  ite3_free);.    
2b90: 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  }.  }.}../*.** T
2ba0: 68 65 20 43 4f 41 4c 45 53 43 45 28 29 20 61 6e  he COALESCE() an
2bb0: 64 20 49 46 4e 55 4c 4c 28 29 20 66 75 6e 63 74  d IFNULL() funct
2bc0: 69 6f 6e 73 20 61 72 65 20 69 6d 70 6c 65 6d 65  ions are impleme
2bd0: 6e 74 65 64 20 61 73 20 56 44 42 45 20 63 6f 64  nted as VDBE cod
2be0: 65 20 73 6f 0a 2a 2a 20 74 68 61 74 20 75 6e 75  e so.** that unu
2bf0: 73 65 64 20 61 72 67 75 6d 65 6e 74 20 76 61 6c  sed argument val
2c00: 75 65 73 20 64 6f 20 6e 6f 74 20 68 61 76 65 20  ues do not have 
2c10: 74 6f 20 62 65 20 63 6f 6d 70 75 74 65 64 2e 20  to be computed. 
2c20: 20 48 6f 77 65 76 65 72 2c 20 77 65 0a 2a 2a 20   However, we.** 
2c30: 73 74 69 6c 6c 20 6e 65 65 64 20 73 6f 6d 65 20  still need some 
2c40: 6b 69 6e 64 20 6f 66 20 66 75 6e 63 74 69 6f 6e  kind of function
2c50: 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   implementation 
2c60: 66 6f 72 20 74 68 69 73 20 72 6f 75 74 69 6e 65  for this routine
2c70: 73 20 69 6e 0a 2a 2a 20 74 68 65 20 66 75 6e 63  s in.** the func
2c80: 74 69 6f 6e 20 74 61 62 6c 65 2e 20 20 54 68 61  tion table.  Tha
2c90: 74 20 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65  t function imple
2ca0: 6d 65 6e 74 61 74 69 6f 6e 20 77 69 6c 6c 20 6e  mentation will n
2cb0: 65 76 65 72 20 62 65 20 63 61 6c 6c 65 64 0a 2a  ever be called.*
2cc0: 2a 20 73 6f 20 69 74 20 64 6f 65 73 6e 27 74 20  * so it doesn't 
2cd0: 6d 61 74 74 65 72 20 77 68 61 74 20 74 68 65 20  matter what the 
2ce0: 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 69  implementation i
2cf0: 73 2e 20 20 57 65 20 6d 69 67 68 74 20 61 73 20  s.  We might as 
2d00: 77 65 6c 6c 20 75 73 65 0a 2a 2a 20 74 68 65 20  well use.** the 
2d10: 22 76 65 72 73 69 6f 6e 28 29 22 20 66 75 6e 63  "version()" func
2d20: 74 69 6f 6e 20 61 73 20 61 20 73 75 62 73 74 69  tion as a substi
2d30: 74 75 74 65 2e 0a 2a 2f 0a 23 64 65 66 69 6e 65  tute..*/.#define
2d40: 20 69 66 6e 75 6c 6c 46 75 6e 63 20 76 65 72 73   ifnullFunc vers
2d50: 69 6f 6e 46 75 6e 63 20 20 20 2f 2a 20 53 75 62  ionFunc   /* Sub
2d60: 73 74 69 74 75 74 65 20 66 75 6e 63 74 69 6f 6e  stitute function
2d70: 20 2d 20 6e 65 76 65 72 20 63 61 6c 6c 65 64 20   - never called 
2d80: 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  */../*.** Implem
2d90: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 72 61 6e 64  entation of rand
2da0: 6f 6d 28 29 2e 20 20 52 65 74 75 72 6e 20 61 20  om().  Return a 
2db0: 72 61 6e 64 6f 6d 20 69 6e 74 65 67 65 72 2e 20  random integer. 
2dc0: 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64   .*/.static void
2dd0: 20 72 61 6e 64 6f 6d 46 75 6e 63 28 0a 20 20 73   randomFunc(.  s
2de0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
2df0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e  context,.  int N
2e00: 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65  otUsed,.  sqlite
2e10: 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65  3_value **NotUse
2e20: 64 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 5f 69  d2.){.  sqlite_i
2e30: 6e 74 36 34 20 72 3b 0a 20 20 55 4e 55 53 45 44  nt64 r;.  UNUSED
2e40: 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55  _PARAMETER2(NotU
2e50: 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a  sed, NotUsed2);.
2e60: 20 20 73 71 6c 69 74 65 33 5f 72 61 6e 64 6f 6d    sqlite3_random
2e70: 6e 65 73 73 28 73 69 7a 65 6f 66 28 72 29 2c 20  ness(sizeof(r), 
2e80: 26 72 29 3b 0a 20 20 69 66 28 20 72 3c 30 20 29  &r);.  if( r<0 )
2e90: 7b 0a 20 20 20 20 2f 2a 20 57 65 20 6e 65 65 64  {.    /* We need
2ea0: 20 74 6f 20 70 72 65 76 65 6e 74 20 61 20 72 61   to prevent a ra
2eb0: 6e 64 6f 6d 20 6e 75 6d 62 65 72 20 6f 66 20 30  ndom number of 0
2ec0: 78 38 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x800000000000000
2ed0: 30 20 0a 20 20 20 20 2a 2a 20 28 6f 72 20 2d 39  0 .    ** (or -9
2ee0: 32 32 33 33 37 32 30 33 36 38 35 34 37 37 35 38  2233720368547758
2ef0: 30 38 29 20 73 69 6e 63 65 20 77 68 65 6e 20 79  08) since when y
2f00: 6f 75 20 64 6f 20 61 62 73 28 29 20 6f 66 20 74  ou do abs() of t
2f10: 68 61 74 0a 20 20 20 20 2a 2a 20 6e 75 6d 62 65  hat.    ** numbe
2f20: 72 20 6f 66 20 79 6f 75 20 67 65 74 20 74 68 65  r of you get the
2f30: 20 73 61 6d 65 20 76 61 6c 75 65 20 62 61 63 6b   same value back
2f40: 20 61 67 61 69 6e 2e 20 20 54 6f 20 64 6f 20 74   again.  To do t
2f50: 68 69 73 0a 20 20 20 20 2a 2a 20 69 6e 20 61 20  his.    ** in a 
2f60: 77 61 79 20 74 68 61 74 20 69 73 20 74 65 73 74  way that is test
2f70: 61 62 6c 65 2c 20 6d 61 73 6b 20 74 68 65 20 73  able, mask the s
2f80: 69 67 6e 20 62 69 74 20 6f 66 66 20 6f 66 20 6e  ign bit off of n
2f90: 65 67 61 74 69 76 65 0a 20 20 20 20 2a 2a 20 76  egative.    ** v
2fa0: 61 6c 75 65 73 2c 20 72 65 73 75 6c 74 69 6e 67  alues, resulting
2fb0: 20 69 6e 20 61 20 70 6f 73 69 74 69 76 65 20 76   in a positive v
2fc0: 61 6c 75 65 2e 20 20 54 68 65 6e 20 74 61 6b 65  alue.  Then take
2fd0: 20 74 68 65 20 0a 20 20 20 20 2a 2a 20 32 73 20   the .    ** 2s 
2fe0: 63 6f 6d 70 6c 65 6d 65 6e 74 20 6f 66 20 74 68  complement of th
2ff0: 61 74 20 70 6f 73 69 74 69 76 65 20 76 61 6c 75  at positive valu
3000: 65 2e 20 20 54 68 65 20 65 6e 64 20 72 65 73 75  e.  The end resu
3010: 6c 74 20 63 61 6e 0a 20 20 20 20 2a 2a 20 74 68  lt can.    ** th
3020: 65 72 65 66 6f 72 65 20 62 65 20 6e 6f 20 6c 65  erefore be no le
3030: 73 73 20 74 68 61 6e 20 2d 39 32 32 33 33 37 32  ss than -9223372
3040: 30 33 36 38 35 34 37 37 35 38 30 37 2e 0a 20 20  036854775807..  
3050: 20 20 2a 2f 0a 20 20 20 20 72 20 3d 20 2d 28 72    */.    r = -(r
3060: 20 26 20 4c 41 52 47 45 53 54 5f 49 4e 54 36 34   & LARGEST_INT64
3070: 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  );.  }.  sqlite3
3080: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f  _result_int64(co
3090: 6e 74 65 78 74 2c 20 72 29 3b 0a 7d 0a 0a 2f 2a  ntext, r);.}../*
30a0: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
30b0: 6f 6e 20 6f 66 20 72 61 6e 64 6f 6d 62 6c 6f 62  on of randomblob
30c0: 28 4e 29 2e 20 20 52 65 74 75 72 6e 20 61 20 72  (N).  Return a r
30d0: 61 6e 64 6f 6d 20 62 6c 6f 62 0a 2a 2a 20 74 68  andom blob.** th
30e0: 61 74 20 69 73 20 4e 20 62 79 74 65 73 20 6c 6f  at is N bytes lo
30f0: 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  ng..*/.static vo
3100: 69 64 20 72 61 6e 64 6f 6d 42 6c 6f 62 28 0a 20  id randomBlob(. 
3110: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
3120: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
3130: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
3140: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
3150: 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 75 6e 73 69  .  int n;.  unsi
3160: 67 6e 65 64 20 63 68 61 72 20 2a 70 3b 0a 20 20  gned char *p;.  
3170: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
3180: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
3190: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 6e  METER(argc);.  n
31a0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
31b0: 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  _int(argv[0]);. 
31c0: 20 69 66 28 20 6e 3c 31 20 29 7b 0a 20 20 20 20   if( n<1 ){.    
31d0: 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 70 20 3d  n = 1;.  }.  p =
31e0: 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63   contextMalloc(c
31f0: 6f 6e 74 65 78 74 2c 20 6e 29 3b 0a 20 20 69 66  ontext, n);.  if
3200: 28 20 70 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  ( p ){.    sqlit
3210: 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73 28 6e 2c  e3_randomness(n,
3220: 20 70 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33   p);.    sqlite3
3230: 5f 72 65 73 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e  _result_blob(con
3240: 74 65 78 74 2c 20 28 63 68 61 72 2a 29 70 2c 20  text, (char*)p, 
3250: 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29  n, sqlite3_free)
3260: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  ;.  }.}../*.** I
3270: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
3280: 20 74 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74   the last_insert
3290: 5f 72 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e  _rowid() SQL fun
32a0: 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 74 75  ction.  The retu
32b0: 72 6e 0a 2a 2a 20 76 61 6c 75 65 20 69 73 20 74  rn.** value is t
32c0: 68 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 73  he same as the s
32d0: 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65  qlite3_last_inse
32e0: 72 74 5f 72 6f 77 69 64 28 29 20 41 50 49 20 66  rt_rowid() API f
32f0: 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74  unction..*/.stat
3300: 69 63 20 76 6f 69 64 20 6c 61 73 74 5f 69 6e 73  ic void last_ins
3310: 65 72 74 5f 72 6f 77 69 64 28 0a 20 20 73 71 6c  ert_rowid(.  sql
3320: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
3330: 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 4e 6f  ntext, .  int No
3340: 74 55 73 65 64 2c 20 0a 20 20 73 71 6c 69 74 65  tUsed, .  sqlite
3350: 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65  3_value **NotUse
3360: 64 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20  d2.){.  sqlite3 
3370: 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f  *db = sqlite3_co
3380: 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28  ntext_db_handle(
3390: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53  context);.  UNUS
33a0: 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f  ED_PARAMETER2(No
33b0: 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29  tUsed, NotUsed2)
33c0: 3b 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 35 31  ;.  /* IMP: R-51
33d0: 35 31 33 2d 31 32 30 32 36 20 54 68 65 20 6c 61  513-12026 The la
33e0: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
33f0: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 69  ) SQL function i
3400: 73 20 61 0a 20 20 2a 2a 20 77 72 61 70 70 65 72  s a.  ** wrapper
3410: 20 61 72 6f 75 6e 64 20 74 68 65 20 73 71 6c 69   around the sqli
3420: 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f  te3_last_insert_
3430: 72 6f 77 69 64 28 29 20 43 2f 43 2b 2b 20 69 6e  rowid() C/C++ in
3440: 74 65 72 66 61 63 65 0a 20 20 2a 2a 20 66 75 6e  terface.  ** fun
3450: 63 74 69 6f 6e 2e 20 2a 2f 0a 20 20 73 71 6c 69  ction. */.  sqli
3460: 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34  te3_result_int64
3470: 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65  (context, sqlite
3480: 33 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f  3_last_insert_ro
3490: 77 69 64 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a  wid(db));.}../*.
34a0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
34b0: 6e 20 6f 66 20 74 68 65 20 63 68 61 6e 67 65 73  n of the changes
34c0: 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e  () SQL function.
34d0: 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52 2d 36 32  .**.** IMP: R-62
34e0: 30 37 33 2d 31 31 32 30 39 20 54 68 65 20 63 68  073-11209 The ch
34f0: 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75 6e 63  anges() SQL func
3500: 74 69 6f 6e 20 69 73 20 61 20 77 72 61 70 70 65  tion is a wrappe
3510: 72 0a 2a 2a 20 61 72 6f 75 6e 64 20 74 68 65 20  r.** around the 
3520: 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28  sqlite3_changes(
3530: 29 20 43 2f 43 2b 2b 20 66 75 6e 63 74 69 6f 6e  ) C/C++ function
3540: 20 61 6e 64 20 68 65 6e 63 65 20 66 6f 6c 6c 6f   and hence follo
3550: 77 73 20 74 68 65 20 73 61 6d 65 0a 2a 2a 20 72  ws the same.** r
3560: 75 6c 65 73 20 66 6f 72 20 63 6f 75 6e 74 69 6e  ules for countin
3570: 67 20 63 68 61 6e 67 65 73 2e 0a 2a 2f 0a 73 74  g changes..*/.st
3580: 61 74 69 63 20 76 6f 69 64 20 63 68 61 6e 67 65  atic void change
3590: 73 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  s(.  sqlite3_con
35a0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
35b0: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20   int NotUsed,.  
35c0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
35d0: 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71  NotUsed2.){.  sq
35e0: 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69  lite3 *db = sqli
35f0: 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68  te3_context_db_h
3600: 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a  andle(context);.
3610: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
3620: 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e 6f 74  ER2(NotUsed, Not
3630: 55 73 65 64 32 29 3b 0a 20 20 73 71 6c 69 74 65  Used2);.  sqlite
3640: 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e  3_result_int(con
3650: 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 63 68  text, sqlite3_ch
3660: 61 6e 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f  anges(db));.}../
3670: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
3680: 69 6f 6e 20 6f 66 20 74 68 65 20 74 6f 74 61 6c  ion of the total
3690: 5f 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66  _changes() SQL f
36a0: 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65  unction.  The re
36b0: 74 75 72 6e 20 76 61 6c 75 65 20 69 73 0a 2a 2a  turn value is.**
36c0: 20 74 68 65 20 73 61 6d 65 20 61 73 20 74 68 65   the same as the
36d0: 20 73 71 6c 69 74 65 33 5f 74 6f 74 61 6c 5f 63   sqlite3_total_c
36e0: 68 61 6e 67 65 73 28 29 20 41 50 49 20 66 75 6e  hanges() API fun
36f0: 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63  ction..*/.static
3700: 20 76 6f 69 64 20 74 6f 74 61 6c 5f 63 68 61 6e   void total_chan
3710: 67 65 73 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  ges(.  sqlite3_c
3720: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
3730: 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a  .  int NotUsed,.
3740: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
3750: 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20  **NotUsed2.){.  
3760: 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71  sqlite3 *db = sq
3770: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62  lite3_context_db
3780: 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29  _handle(context)
3790: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
37a0: 45 54 45 52 32 28 4e 6f 74 55 73 65 64 2c 20 4e  ETER2(NotUsed, N
37b0: 6f 74 55 73 65 64 32 29 3b 0a 20 20 2f 2a 20 49  otUsed2);.  /* I
37c0: 4d 50 3a 20 52 2d 35 32 37 35 36 2d 34 31 39 39  MP: R-52756-4199
37d0: 33 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20  3 This function 
37e0: 69 73 20 61 20 77 72 61 70 70 65 72 20 61 72 6f  is a wrapper aro
37f0: 75 6e 64 20 74 68 65 0a 20 20 2a 2a 20 73 71 6c  und the.  ** sql
3800: 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67  ite3_total_chang
3810: 65 73 28 29 20 43 2f 43 2b 2b 20 69 6e 74 65 72  es() C/C++ inter
3820: 66 61 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69 74  face. */.  sqlit
3830: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f  e3_result_int(co
3840: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 74  ntext, sqlite3_t
3850: 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 64 62 29  otal_changes(db)
3860: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 20 73 74  );.}../*.** A st
3870: 72 75 63 74 75 72 65 20 64 65 66 69 6e 69 6e 67  ructure defining
3880: 20 68 6f 77 20 74 6f 20 64 6f 20 47 4c 4f 42 2d   how to do GLOB-
3890: 73 74 79 6c 65 20 63 6f 6d 70 61 72 69 73 6f 6e  style comparison
38a0: 73 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 63 6f 6d  s..*/.struct com
38b0: 70 61 72 65 49 6e 66 6f 20 7b 0a 20 20 75 38 20  pareInfo {.  u8 
38c0: 6d 61 74 63 68 41 6c 6c 3b 0a 20 20 75 38 20 6d  matchAll;.  u8 m
38d0: 61 74 63 68 4f 6e 65 3b 0a 20 20 75 38 20 6d 61  atchOne;.  u8 ma
38e0: 74 63 68 53 65 74 3b 0a 20 20 75 38 20 6e 6f 43  tchSet;.  u8 noC
38f0: 61 73 65 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 46  ase;.};../*.** F
3900: 6f 72 20 4c 49 4b 45 20 61 6e 64 20 47 4c 4f 42  or LIKE and GLOB
3910: 20 6d 61 74 63 68 69 6e 67 20 6f 6e 20 45 42 43   matching on EBC
3920: 44 49 43 20 6d 61 63 68 69 6e 65 73 2c 20 61 73  DIC machines, as
3930: 73 75 6d 65 20 74 68 61 74 20 65 76 65 72 79 0a  sume that every.
3940: 2a 2a 20 63 68 61 72 61 63 74 65 72 20 69 73 20  ** character is 
3950: 65 78 61 63 74 6c 79 20 6f 6e 65 20 62 79 74 65  exactly one byte
3960: 20 69 6e 20 73 69 7a 65 2e 20 20 41 6c 73 6f 2c   in size.  Also,
3970: 20 61 6c 6c 20 63 68 61 72 61 63 74 65 72 73 20   all characters 
3980: 61 72 65 0a 2a 2a 20 61 62 6c 65 20 74 6f 20 70  are.** able to p
3990: 61 72 74 69 63 69 70 61 74 65 20 69 6e 20 75 70  articipate in up
39a0: 70 65 72 2d 63 61 73 65 2d 74 6f 2d 6c 6f 77 65  per-case-to-lowe
39b0: 72 2d 63 61 73 65 20 6d 61 70 70 69 6e 67 73 20  r-case mappings 
39c0: 69 6e 20 45 42 43 44 49 43 0a 2a 2a 20 77 68 65  in EBCDIC.** whe
39d0: 72 65 61 73 20 6f 6e 6c 79 20 63 68 61 72 61 63  reas only charac
39e0: 74 65 72 73 20 6c 65 73 73 20 74 68 61 6e 20 30  ters less than 0
39f0: 78 38 30 20 64 6f 20 69 6e 20 41 53 43 49 49 2e  x80 do in ASCII.
3a00: 0a 2a 2f 0a 23 69 66 20 64 65 66 69 6e 65 64 28  .*/.#if defined(
3a10: 53 51 4c 49 54 45 5f 45 42 43 44 49 43 29 0a 23  SQLITE_EBCDIC).#
3a20: 20 64 65 66 69 6e 65 20 73 71 6c 69 74 65 33 55   define sqlite3U
3a30: 74 66 38 52 65 61 64 28 41 29 20 20 20 20 28 2a  tf8Read(A)    (*
3a40: 28 28 2a 41 29 2b 2b 29 29 0a 23 20 64 65 66 69  ((*A)++)).# defi
3a50: 6e 65 20 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f  ne GlogUpperToLo
3a60: 77 65 72 28 41 29 20 20 20 41 20 3d 20 73 71 6c  wer(A)   A = sql
3a70: 69 74 65 33 55 70 70 65 72 54 6f 4c 6f 77 65 72  ite3UpperToLower
3a80: 5b 41 5d 0a 23 65 6c 73 65 0a 23 20 64 65 66 69  [A].#else.# defi
3a90: 6e 65 20 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f  ne GlogUpperToLo
3aa0: 77 65 72 28 41 29 20 20 20 69 66 28 20 21 28 28  wer(A)   if( !((
3ab0: 41 29 26 7e 30 78 37 66 29 20 29 7b 20 41 20 3d  A)&~0x7f) ){ A =
3ac0: 20 73 71 6c 69 74 65 33 55 70 70 65 72 54 6f 4c   sqlite3UpperToL
3ad0: 6f 77 65 72 5b 41 5d 3b 20 7d 0a 23 65 6e 64 69  ower[A]; }.#endi
3ae0: 66 0a 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20  f..static const 
3af0: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
3b00: 66 6f 20 67 6c 6f 62 49 6e 66 6f 20 3d 20 7b 20  fo globInfo = { 
3b10: 27 2a 27 2c 20 27 3f 27 2c 20 27 5b 27 2c 20 30  '*', '?', '[', 0
3b20: 20 7d 3b 0a 2f 2a 20 54 68 65 20 63 6f 72 72 65   };./* The corre
3b30: 63 74 20 53 51 4c 2d 39 32 20 62 65 68 61 76 69  ct SQL-92 behavi
3b40: 6f 72 20 69 73 20 66 6f 72 20 74 68 65 20 4c 49  or is for the LI
3b50: 4b 45 20 6f 70 65 72 61 74 6f 72 20 74 6f 20 69  KE operator to i
3b60: 67 6e 6f 72 65 0a 2a 2a 20 63 61 73 65 2e 20 20  gnore.** case.  
3b70: 54 68 75 73 20 20 27 61 27 20 4c 49 4b 45 20 27  Thus  'a' LIKE '
3b80: 41 27 20 77 6f 75 6c 64 20 62 65 20 74 72 75 65  A' would be true
3b90: 2e 20 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73  . */.static cons
3ba0: 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65  t struct compare
3bb0: 49 6e 66 6f 20 6c 69 6b 65 49 6e 66 6f 4e 6f 72  Info likeInfoNor
3bc0: 6d 20 3d 20 7b 20 27 25 27 2c 20 27 5f 27 2c 20  m = { '%', '_', 
3bd0: 20 20 30 2c 20 31 20 7d 3b 0a 2f 2a 20 49 66 20    0, 1 };./* If 
3be0: 53 51 4c 49 54 45 5f 43 41 53 45 5f 53 45 4e 53  SQLITE_CASE_SENS
3bf0: 49 54 49 56 45 5f 4c 49 4b 45 20 69 73 20 64 65  ITIVE_LIKE is de
3c00: 66 69 6e 65 64 2c 20 74 68 65 6e 20 74 68 65 20  fined, then the 
3c10: 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 0a 2a 2a  LIKE operator.**
3c20: 20 69 73 20 63 61 73 65 20 73 65 6e 73 69 74 69   is case sensiti
3c30: 76 65 20 63 61 75 73 69 6e 67 20 27 61 27 20 4c  ve causing 'a' L
3c40: 49 4b 45 20 27 41 27 20 74 6f 20 62 65 20 66 61  IKE 'A' to be fa
3c50: 6c 73 65 20 2a 2f 0a 73 74 61 74 69 63 20 63 6f  lse */.static co
3c60: 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61  nst struct compa
3c70: 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e 66 6f 41  reInfo likeInfoA
3c80: 6c 74 20 3d 20 7b 20 27 25 27 2c 20 27 5f 27 2c  lt = { '%', '_',
3c90: 20 20 20 30 2c 20 30 20 7d 3b 0a 0a 2f 2a 0a 2a     0, 0 };../*.*
3ca0: 2a 20 43 6f 6d 70 61 72 65 20 74 77 6f 20 55 54  * Compare two UT
3cb0: 46 2d 38 20 73 74 72 69 6e 67 73 20 66 6f 72 20  F-8 strings for 
3cc0: 65 71 75 61 6c 69 74 79 20 77 68 65 72 65 20 74  equality where t
3cd0: 68 65 20 66 69 72 73 74 20 73 74 72 69 6e 67 20  he first string 
3ce0: 63 61 6e 0a 2a 2a 20 70 6f 74 65 6e 74 69 61 6c  can.** potential
3cf0: 6c 79 20 62 65 20 61 20 22 67 6c 6f 62 22 20 65  ly be a "glob" e
3d00: 78 70 72 65 73 73 69 6f 6e 2e 20 20 52 65 74 75  xpression.  Retu
3d10: 72 6e 20 74 72 75 65 20 28 31 29 20 69 66 20 74  rn true (1) if t
3d20: 68 65 79 0a 2a 2a 20 61 72 65 20 74 68 65 20 73  hey.** are the s
3d30: 61 6d 65 20 61 6e 64 20 66 61 6c 73 65 20 28 30  ame and false (0
3d40: 29 20 69 66 20 74 68 65 79 20 61 72 65 20 64 69  ) if they are di
3d50: 66 66 65 72 65 6e 74 2e 0a 2a 2a 0a 2a 2a 20 47  fferent..**.** G
3d60: 6c 6f 62 62 69 6e 67 20 72 75 6c 65 73 3a 0a 2a  lobbing rules:.*
3d70: 2a 0a 2a 2a 20 20 20 20 20 20 27 2a 27 20 20 20  *.**      '*'   
3d80: 20 20 20 20 4d 61 74 63 68 65 73 20 61 6e 79 20      Matches any 
3d90: 73 65 71 75 65 6e 63 65 20 6f 66 20 7a 65 72 6f  sequence of zero
3da0: 20 6f 72 20 6d 6f 72 65 20 63 68 61 72 61 63 74   or more charact
3db0: 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  ers..**.**      
3dc0: 27 3f 27 20 20 20 20 20 20 20 4d 61 74 63 68 65  '?'       Matche
3dd0: 73 20 65 78 61 63 74 6c 79 20 6f 6e 65 20 63 68  s exactly one ch
3de0: 61 72 61 63 74 65 72 2e 0a 2a 2a 0a 2a 2a 20 20  aracter..**.**  
3df0: 20 20 20 5b 2e 2e 2e 5d 20 20 20 20 20 20 4d 61     [...]      Ma
3e00: 74 63 68 65 73 20 6f 6e 65 20 63 68 61 72 61 63  tches one charac
3e10: 74 65 72 20 66 72 6f 6d 20 74 68 65 20 65 6e 63  ter from the enc
3e20: 6c 6f 73 65 64 20 6c 69 73 74 20 6f 66 0a 2a 2a  losed list of.**
3e30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
3e40: 63 68 61 72 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a  characters..**.*
3e50: 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d 20 20 20 20  *     [^...]    
3e60: 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68 61   Matches one cha
3e70: 72 61 63 74 65 72 20 6e 6f 74 20 69 6e 20 74 68  racter not in th
3e80: 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74 2e  e enclosed list.
3e90: 0a 2a 2a 0a 2a 2a 20 57 69 74 68 20 74 68 65 20  .**.** With the 
3ea0: 5b 2e 2e 2e 5d 20 61 6e 64 20 5b 5e 2e 2e 2e 5d  [...] and [^...]
3eb0: 20 6d 61 74 63 68 69 6e 67 2c 20 61 20 27 5d 27   matching, a ']'
3ec0: 20 63 68 61 72 61 63 74 65 72 20 63 61 6e 20 62   character can b
3ed0: 65 20 69 6e 63 6c 75 64 65 64 0a 2a 2a 20 69 6e  e included.** in
3ee0: 20 74 68 65 20 6c 69 73 74 20 62 79 20 6d 61 6b   the list by mak
3ef0: 69 6e 67 20 69 74 20 74 68 65 20 66 69 72 73 74  ing it the first
3f00: 20 63 68 61 72 61 63 74 65 72 20 61 66 74 65 72   character after
3f10: 20 27 5b 27 20 6f 72 20 27 5e 27 2e 20 20 41 0a   '[' or '^'.  A.
3f20: 2a 2a 20 72 61 6e 67 65 20 6f 66 20 63 68 61 72  ** range of char
3f30: 61 63 74 65 72 73 20 63 61 6e 20 62 65 20 73 70  acters can be sp
3f40: 65 63 69 66 69 65 64 20 75 73 69 6e 67 20 27 2d  ecified using '-
3f50: 27 2e 20 20 45 78 61 6d 70 6c 65 3a 0a 2a 2a 20  '.  Example:.** 
3f60: 22 5b 61 2d 7a 5d 22 20 6d 61 74 63 68 65 73 20  "[a-z]" matches 
3f70: 61 6e 79 20 73 69 6e 67 6c 65 20 6c 6f 77 65 72  any single lower
3f80: 2d 63 61 73 65 20 6c 65 74 74 65 72 2e 20 20 54  -case letter.  T
3f90: 6f 20 6d 61 74 63 68 20 61 20 27 2d 27 2c 20 6d  o match a '-', m
3fa0: 61 6b 65 0a 2a 2a 20 69 74 20 74 68 65 20 6c 61  ake.** it the la
3fb0: 73 74 20 63 68 61 72 61 63 74 65 72 20 69 6e 20  st character in 
3fc0: 74 68 65 20 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a 20  the list..**.** 
3fd0: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20  This routine is 
3fe0: 75 73 75 61 6c 6c 79 20 71 75 69 63 6b 2c 20 62  usually quick, b
3ff0: 75 74 20 63 61 6e 20 62 65 20 4e 2a 2a 32 20 69  ut can be N**2 i
4000: 6e 20 74 68 65 20 77 6f 72 73 74 20 63 61 73 65  n the worst case
4010: 2e 0a 2a 2a 0a 2a 2a 20 48 69 6e 74 73 3a 20 74  ..**.** Hints: t
4020: 6f 20 6d 61 74 63 68 20 27 2a 27 20 6f 72 20 27  o match '*' or '
4030: 3f 27 2c 20 70 75 74 20 74 68 65 6d 20 69 6e 20  ?', put them in 
4040: 22 5b 5d 22 2e 20 20 4c 69 6b 65 20 74 68 69 73  "[]".  Like this
4050: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 20 20  :.**.**         
4060: 61 62 63 5b 2a 5d 78 79 7a 20 20 20 20 20 20 20  abc[*]xyz       
4070: 20 4d 61 74 63 68 65 73 20 22 61 62 63 2a 78 79   Matches "abc*xy
4080: 7a 22 20 6f 6e 6c 79 0a 2a 2f 0a 73 74 61 74 69  z" only.*/.stati
4090: 63 20 69 6e 74 20 70 61 74 74 65 72 6e 43 6f 6d  c int patternCom
40a0: 70 61 72 65 28 0a 20 20 63 6f 6e 73 74 20 75 38  pare(.  const u8
40b0: 20 2a 7a 50 61 74 74 65 72 6e 2c 20 20 20 20 20   *zPattern,     
40c0: 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20           /* The 
40d0: 67 6c 6f 62 20 70 61 74 74 65 72 6e 20 2a 2f 0a  glob pattern */.
40e0: 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 53 74 72    const u8 *zStr
40f0: 69 6e 67 2c 20 20 20 20 20 20 20 20 20 20 20 20  ing,            
4100: 20 20 20 2f 2a 20 54 68 65 20 73 74 72 69 6e 67     /* The string
4110: 20 74 6f 20 63 6f 6d 70 61 72 65 20 61 67 61 69   to compare agai
4120: 6e 73 74 20 74 68 65 20 67 6c 6f 62 20 2a 2f 0a  nst the glob */.
4130: 20 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63    const struct c
4140: 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70 49 6e 66  ompareInfo *pInf
4150: 6f 2c 20 2f 2a 20 49 6e 66 6f 72 6d 61 74 69 6f  o, /* Informatio
4160: 6e 20 61 62 6f 75 74 20 68 6f 77 20 74 6f 20 64  n about how to d
4170: 6f 20 74 68 65 20 63 6f 6d 70 61 72 65 20 2a 2f  o the compare */
4180: 0a 20 20 75 33 32 20 65 73 63 20 20 20 20 20 20  .  u32 esc      
4190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
41a0: 20 20 20 20 2f 2a 20 54 68 65 20 65 73 63 61 70      /* The escap
41b0: 65 20 63 68 61 72 61 63 74 65 72 20 2a 2f 0a 29  e character */.)
41c0: 7b 0a 20 20 75 33 32 20 63 2c 20 63 32 3b 0a 20  {.  u32 c, c2;. 
41d0: 20 69 6e 74 20 69 6e 76 65 72 74 3b 0a 20 20 69   int invert;.  i
41e0: 6e 74 20 73 65 65 6e 3b 0a 20 20 75 38 20 6d 61  nt seen;.  u8 ma
41f0: 74 63 68 4f 6e 65 20 3d 20 70 49 6e 66 6f 2d 3e  tchOne = pInfo->
4200: 6d 61 74 63 68 4f 6e 65 3b 0a 20 20 75 38 20 6d  matchOne;.  u8 m
4210: 61 74 63 68 41 6c 6c 20 3d 20 70 49 6e 66 6f 2d  atchAll = pInfo-
4220: 3e 6d 61 74 63 68 41 6c 6c 3b 0a 20 20 75 38 20  >matchAll;.  u8 
4230: 6d 61 74 63 68 53 65 74 20 3d 20 70 49 6e 66 6f  matchSet = pInfo
4240: 2d 3e 6d 61 74 63 68 53 65 74 3b 0a 20 20 75 38  ->matchSet;.  u8
4250: 20 6e 6f 43 61 73 65 20 3d 20 70 49 6e 66 6f 2d   noCase = pInfo-
4260: 3e 6e 6f 43 61 73 65 3b 20 0a 20 20 69 6e 74 20  >noCase; .  int 
4270: 70 72 65 76 45 73 63 61 70 65 20 3d 20 30 3b 20  prevEscape = 0; 
4280: 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 74      /* True if t
4290: 68 65 20 70 72 65 76 69 6f 75 73 20 63 68 61 72  he previous char
42a0: 61 63 74 65 72 20 77 61 73 20 27 65 73 63 61 70  acter was 'escap
42b0: 65 27 20 2a 2f 0a 0a 20 20 77 68 69 6c 65 28 20  e' */..  while( 
42c0: 28 63 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  (c = sqlite3Utf8
42d0: 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e 29 29  Read(&zPattern))
42e0: 21 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 63  !=0 ){.    if( c
42f0: 3d 3d 6d 61 74 63 68 41 6c 6c 20 26 26 20 21 70  ==matchAll && !p
4300: 72 65 76 45 73 63 61 70 65 20 29 7b 0a 20 20 20  revEscape ){.   
4310: 20 20 20 77 68 69 6c 65 28 20 28 63 3d 73 71 6c     while( (c=sql
4320: 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a 50  ite3Utf8Read(&zP
4330: 61 74 74 65 72 6e 29 29 20 3d 3d 20 6d 61 74 63  attern)) == matc
4340: 68 41 6c 6c 0a 20 20 20 20 20 20 20 20 20 20 20  hAll.           
4350: 20 20 20 20 7c 7c 20 63 20 3d 3d 20 6d 61 74 63      || c == matc
4360: 68 4f 6e 65 20 29 7b 0a 20 20 20 20 20 20 20 20  hOne ){.        
4370: 69 66 28 20 63 3d 3d 6d 61 74 63 68 4f 6e 65 20  if( c==matchOne 
4380: 26 26 20 73 71 6c 69 74 65 33 55 74 66 38 52 65  && sqlite3Utf8Re
4390: 61 64 28 26 7a 53 74 72 69 6e 67 29 3d 3d 30 20  ad(&zString)==0 
43a0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65 74  ){.          ret
43b0: 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d  urn 0;.        }
43c0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
43d0: 66 28 20 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20  f( c==0 ){.     
43e0: 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20     return 1;.   
43f0: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d     }else if( c==
4400: 65 73 63 20 29 7b 0a 20 20 20 20 20 20 20 20 63  esc ){.        c
4410: 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65   = sqlite3Utf8Re
4420: 61 64 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20  ad(&zPattern);. 
4430: 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20         if( c==0 
4440: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65 74  ){.          ret
4450: 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d  urn 0;.        }
4460: 0a 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28  .      }else if(
4470: 20 63 3d 3d 6d 61 74 63 68 53 65 74 20 29 7b 0a   c==matchSet ){.
4480: 20 20 20 20 20 20 20 20 61 73 73 65 72 74 28 20          assert( 
4490: 65 73 63 3d 3d 30 20 29 3b 20 20 20 20 20 20 20  esc==0 );       
44a0: 20 20 2f 2a 20 54 68 69 73 20 69 73 20 47 4c 4f    /* This is GLO
44b0: 42 2c 20 6e 6f 74 20 4c 49 4b 45 20 2a 2f 0a 20  B, not LIKE */. 
44c0: 20 20 20 20 20 20 20 61 73 73 65 72 74 28 20 6d         assert( m
44d0: 61 74 63 68 53 65 74 3c 30 78 38 30 20 29 3b 20  atchSet<0x80 ); 
44e0: 20 2f 2a 20 27 5b 27 20 69 73 20 61 20 73 69 6e   /* '[' is a sin
44f0: 67 6c 65 2d 62 79 74 65 20 63 68 61 72 61 63 74  gle-byte charact
4500: 65 72 20 2a 2f 0a 20 20 20 20 20 20 20 20 77 68  er */.        wh
4510: 69 6c 65 28 20 2a 7a 53 74 72 69 6e 67 20 26 26  ile( *zString &&
4520: 20 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28   patternCompare(
4530: 26 7a 50 61 74 74 65 72 6e 5b 2d 31 5d 2c 7a 53  &zPattern[-1],zS
4540: 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65 73 63 29  tring,pInfo,esc)
4550: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20  ==0 ){.         
4560: 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46   SQLITE_SKIP_UTF
4570: 38 28 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20  8(zString);.    
4580: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 72 65      }.        re
4590: 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 21 3d 30  turn *zString!=0
45a0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
45b0: 77 68 69 6c 65 28 20 28 63 32 20 3d 20 73 71 6c  while( (c2 = sql
45c0: 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a 53  ite3Utf8Read(&zS
45d0: 74 72 69 6e 67 29 29 21 3d 30 20 29 7b 0a 20 20  tring))!=0 ){.  
45e0: 20 20 20 20 20 20 69 66 28 20 6e 6f 43 61 73 65        if( noCase
45f0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 47 6c   ){.          Gl
4600: 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63  ogUpperToLower(c
4610: 32 29 3b 0a 20 20 20 20 20 20 20 20 20 20 47 6c  2);.          Gl
4620: 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63  ogUpperToLower(c
4630: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 77 68 69  );.          whi
4640: 6c 65 28 20 63 32 20 21 3d 20 30 20 26 26 20 63  le( c2 != 0 && c
4650: 32 20 21 3d 20 63 20 29 7b 0a 20 20 20 20 20 20  2 != c ){.      
4660: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
4670: 65 33 55 74 66 38 52 65 61 64 28 26 7a 53 74 72  e3Utf8Read(&zStr
4680: 69 6e 67 29 3b 0a 20 20 20 20 20 20 20 20 20 20  ing);.          
4690: 20 20 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f 77    GlogUpperToLow
46a0: 65 72 28 63 32 29 3b 0a 20 20 20 20 20 20 20 20  er(c2);.        
46b0: 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 65 6c 73    }.        }els
46c0: 65 7b 0a 20 20 20 20 20 20 20 20 20 20 77 68 69  e{.          whi
46d0: 6c 65 28 20 63 32 20 21 3d 20 30 20 26 26 20 63  le( c2 != 0 && c
46e0: 32 20 21 3d 20 63 20 29 7b 0a 20 20 20 20 20 20  2 != c ){.      
46f0: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
4700: 65 33 55 74 66 38 52 65 61 64 28 26 7a 53 74 72  e3Utf8Read(&zStr
4710: 69 6e 67 29 3b 0a 20 20 20 20 20 20 20 20 20 20  ing);.          
4720: 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  }.        }.    
4730: 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20 29 20      if( c2==0 ) 
4740: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20  return 0;.      
4750: 20 20 69 66 28 20 70 61 74 74 65 72 6e 43 6f 6d    if( patternCom
4760: 70 61 72 65 28 7a 50 61 74 74 65 72 6e 2c 7a 53  pare(zPattern,zS
4770: 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65 73 63 29  tring,pInfo,esc)
4780: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20   ) return 1;.   
4790: 20 20 20 7d 0a 20 20 20 20 20 20 72 65 74 75 72     }.      retur
47a0: 6e 20 30 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69  n 0;.    }else i
47b0: 66 28 20 63 3d 3d 6d 61 74 63 68 4f 6e 65 20 26  f( c==matchOne &
47c0: 26 20 21 70 72 65 76 45 73 63 61 70 65 20 29 7b  & !prevEscape ){
47d0: 0a 20 20 20 20 20 20 69 66 28 20 73 71 6c 69 74  .      if( sqlit
47e0: 65 33 55 74 66 38 52 65 61 64 28 26 7a 53 74 72  e3Utf8Read(&zStr
47f0: 69 6e 67 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  ing)==0 ){.     
4800: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20     return 0;.   
4810: 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 20 69     }.    }else i
4820: 66 28 20 63 3d 3d 6d 61 74 63 68 53 65 74 20 29  f( c==matchSet )
4830: 7b 0a 20 20 20 20 20 20 75 33 32 20 70 72 69 6f  {.      u32 prio
4840: 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20 61  r_c = 0;.      a
4850: 73 73 65 72 74 28 20 65 73 63 3d 3d 30 20 29 3b  ssert( esc==0 );
4860: 20 20 20 20 2f 2a 20 54 68 69 73 20 6f 6e 6c 79      /* This only
4870: 20 6f 63 63 75 72 73 20 66 6f 72 20 47 4c 4f 42   occurs for GLOB
4880: 2c 20 6e 6f 74 20 4c 49 4b 45 20 2a 2f 0a 20 20  , not LIKE */.  
4890: 20 20 20 20 73 65 65 6e 20 3d 20 30 3b 0a 20 20      seen = 0;.  
48a0: 20 20 20 20 69 6e 76 65 72 74 20 3d 20 30 3b 0a      invert = 0;.
48b0: 20 20 20 20 20 20 63 20 3d 20 73 71 6c 69 74 65        c = sqlite
48c0: 33 55 74 66 38 52 65 61 64 28 26 7a 53 74 72 69  3Utf8Read(&zStri
48d0: 6e 67 29 3b 0a 20 20 20 20 20 20 69 66 28 20 63  ng);.      if( c
48e0: 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a  ==0 ) return 0;.
48f0: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
4900: 65 33 55 74 66 38 52 65 61 64 28 26 7a 50 61 74  e3Utf8Read(&zPat
4910: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 69 66 28  tern);.      if(
4920: 20 63 32 3d 3d 27 5e 27 20 29 7b 0a 20 20 20 20   c2=='^' ){.    
4930: 20 20 20 20 69 6e 76 65 72 74 20 3d 20 31 3b 0a      invert = 1;.
4940: 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c          c2 = sql
4950: 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a 50  ite3Utf8Read(&zP
4960: 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 7d  attern);.      }
4970: 0a 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 27  .      if( c2=='
4980: 5d 27 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66  ]' ){.        if
4990: 28 20 63 3d 3d 27 5d 27 20 29 20 73 65 65 6e 20  ( c==']' ) seen 
49a0: 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 63 32 20  = 1;.        c2 
49b0: 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61  = sqlite3Utf8Rea
49c0: 64 28 26 7a 50 61 74 74 65 72 6e 29 3b 0a 20 20  d(&zPattern);.  
49d0: 20 20 20 20 7d 0a 20 20 20 20 20 20 77 68 69 6c      }.      whil
49e0: 65 28 20 63 32 20 26 26 20 63 32 21 3d 27 5d 27  e( c2 && c2!=']'
49f0: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20   ){.        if( 
4a00: 63 32 3d 3d 27 2d 27 20 26 26 20 7a 50 61 74 74  c2=='-' && zPatt
4a10: 65 72 6e 5b 30 5d 21 3d 27 5d 27 20 26 26 20 7a  ern[0]!=']' && z
4a20: 50 61 74 74 65 72 6e 5b 30 5d 21 3d 30 20 26 26  Pattern[0]!=0 &&
4a30: 20 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a 20 20   prior_c>0 ){.  
4a40: 20 20 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c          c2 = sql
4a50: 69 74 65 33 55 74 66 38 52 65 61 64 28 26 7a 50  ite3Utf8Read(&zP
4a60: 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20  attern);.       
4a70: 20 20 20 69 66 28 20 63 3e 3d 70 72 69 6f 72 5f     if( c>=prior_
4a80: 63 20 26 26 20 63 3c 3d 63 32 20 29 20 73 65 65  c && c<=c2 ) see
4a90: 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20  n = 1;.         
4aa0: 20 70 72 69 6f 72 5f 63 20 3d 20 30 3b 0a 20 20   prior_c = 0;.  
4ab0: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20        }else{.   
4ac0: 20 20 20 20 20 20 20 69 66 28 20 63 3d 3d 63 32         if( c==c2
4ad0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20   ){.            
4ae0: 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20  seen = 1;.      
4af0: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 20 20      }.          
4b00: 70 72 69 6f 72 5f 63 20 3d 20 63 32 3b 0a 20 20  prior_c = c2;.  
4b10: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20        }.        
4b20: 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  c2 = sqlite3Utf8
4b30: 52 65 61 64 28 26 7a 50 61 74 74 65 72 6e 29 3b  Read(&zPattern);
4b40: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
4b50: 66 28 20 63 32 3d 3d 30 20 7c 7c 20 28 73 65 65  f( c2==0 || (see
4b60: 6e 20 5e 20 69 6e 76 65 72 74 29 3d 3d 30 20 29  n ^ invert)==0 )
4b70: 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e  {.        return
4b80: 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   0;.      }.    
4b90: 7d 65 6c 73 65 20 69 66 28 20 65 73 63 3d 3d 63  }else if( esc==c
4ba0: 20 26 26 20 21 70 72 65 76 45 73 63 61 70 65 20   && !prevEscape 
4bb0: 29 7b 0a 20 20 20 20 20 20 70 72 65 76 45 73 63  ){.      prevEsc
4bc0: 61 70 65 20 3d 20 31 3b 0a 20 20 20 20 7d 65 6c  ape = 1;.    }el
4bd0: 73 65 7b 0a 20 20 20 20 20 20 63 32 20 3d 20 73  se{.      c2 = s
4be0: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 26  qlite3Utf8Read(&
4bf0: 7a 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20  zString);.      
4c00: 69 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a 20 20  if( noCase ){.  
4c10: 20 20 20 20 20 20 47 6c 6f 67 55 70 70 65 72 54        GlogUpperT
4c20: 6f 4c 6f 77 65 72 28 63 29 3b 0a 20 20 20 20 20  oLower(c);.     
4c30: 20 20 20 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f     GlogUpperToLo
4c40: 77 65 72 28 63 32 29 3b 0a 20 20 20 20 20 20 7d  wer(c2);.      }
4c50: 0a 20 20 20 20 20 20 69 66 28 20 63 21 3d 63 32  .      if( c!=c2
4c60: 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75   ){.        retu
4c70: 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20  rn 0;.      }.  
4c80: 20 20 20 20 70 72 65 76 45 73 63 61 70 65 20 3d      prevEscape =
4c90: 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20   0;.    }.  }.  
4ca0: 72 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 3d  return *zString=
4cb0: 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65  =0;.}../*.** The
4cc0: 20 73 71 6c 69 74 65 33 5f 73 74 72 67 6c 6f 62   sqlite3_strglob
4cd0: 28 29 20 69 6e 74 65 72 66 61 63 65 2e 0a 2a 2f  () interface..*/
4ce0: 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 73 74 72  .int sqlite3_str
4cf0: 67 6c 6f 62 28 63 6f 6e 73 74 20 63 68 61 72 20  glob(const char 
4d00: 2a 7a 47 6c 6f 62 50 61 74 74 65 72 6e 2c 20 63  *zGlobPattern, c
4d10: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 74 72 69  onst char *zStri
4d20: 6e 67 29 7b 0a 20 20 72 65 74 75 72 6e 20 70 61  ng){.  return pa
4d30: 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 28 75 38  tternCompare((u8
4d40: 2a 29 7a 47 6c 6f 62 50 61 74 74 65 72 6e 2c 20  *)zGlobPattern, 
4d50: 28 75 38 2a 29 7a 53 74 72 69 6e 67 2c 20 26 67  (u8*)zString, &g
4d60: 6c 6f 62 49 6e 66 6f 2c 20 30 29 3d 3d 30 3b 0a  lobInfo, 0)==0;.
4d70: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74  }../*.** Count t
4d80: 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 74 69 6d  he number of tim
4d90: 65 73 20 74 68 61 74 20 74 68 65 20 4c 49 4b 45  es that the LIKE
4da0: 20 6f 70 65 72 61 74 6f 72 20 28 6f 72 20 47 4c   operator (or GL
4db0: 4f 42 20 77 68 69 63 68 20 69 73 0a 2a 2a 20 6a  OB which is.** j
4dc0: 75 73 74 20 61 20 76 61 72 69 61 74 69 6f 6e 20  ust a variation 
4dd0: 6f 66 20 4c 49 4b 45 29 20 67 65 74 73 20 63 61  of LIKE) gets ca
4de0: 6c 6c 65 64 2e 20 20 54 68 69 73 20 69 73 20 75  lled.  This is u
4df0: 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e 67 0a  sed for testing.
4e00: 2a 2a 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23 69 66 64  ** only..*/.#ifd
4e10: 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 69  ef SQLITE_TEST.i
4e20: 6e 74 20 73 71 6c 69 74 65 33 5f 6c 69 6b 65 5f  nt sqlite3_like_
4e30: 63 6f 75 6e 74 20 3d 20 30 3b 0a 23 65 6e 64 69  count = 0;.#endi
4e40: 66 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  f.../*.** Implem
4e50: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
4e60: 6c 69 6b 65 28 29 20 53 51 4c 20 66 75 6e 63 74  like() SQL funct
4e70: 69 6f 6e 2e 20 20 54 68 69 73 20 66 75 6e 63 74  ion.  This funct
4e80: 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a  ion implements.*
4e90: 2a 20 74 68 65 20 62 75 69 6c 64 2d 69 6e 20 4c  * the build-in L
4ea0: 49 4b 45 20 6f 70 65 72 61 74 6f 72 2e 20 20 54  IKE operator.  T
4eb0: 68 65 20 66 69 72 73 74 20 61 72 67 75 6d 65 6e  he first argumen
4ec0: 74 20 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f  t to the functio
4ed0: 6e 20 69 73 20 74 68 65 0a 2a 2a 20 70 61 74 74  n is the.** patt
4ee0: 65 72 6e 20 61 6e 64 20 74 68 65 20 73 65 63 6f  ern and the seco
4ef0: 6e 64 20 61 72 67 75 6d 65 6e 74 20 69 73 20 74  nd argument is t
4f00: 68 65 20 73 74 72 69 6e 67 2e 20 20 53 6f 2c 20  he string.  So, 
4f10: 74 68 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e  the SQL statemen
4f20: 74 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20  ts:.**.**       
4f30: 41 20 4c 49 4b 45 20 42 0a 2a 2a 0a 2a 2a 20 69  A LIKE B.**.** i
4f40: 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 61 73  s implemented as
4f50: 20 6c 69 6b 65 28 42 2c 41 29 2e 0a 2a 2a 0a 2a   like(B,A)..**.*
4f60: 2a 20 54 68 69 73 20 73 61 6d 65 20 66 75 6e 63  * This same func
4f70: 74 69 6f 6e 20 28 77 69 74 68 20 61 20 64 69 66  tion (with a dif
4f80: 66 65 72 65 6e 74 20 63 6f 6d 70 61 72 65 49 6e  ferent compareIn
4f90: 66 6f 20 73 74 72 75 63 74 75 72 65 29 20 63 6f  fo structure) co
4fa0: 6d 70 75 74 65 73 0a 2a 2a 20 74 68 65 20 47 4c  mputes.** the GL
4fb0: 4f 42 20 6f 70 65 72 61 74 6f 72 2e 0a 2a 2f 0a  OB operator..*/.
4fc0: 73 74 61 74 69 63 20 76 6f 69 64 20 6c 69 6b 65  static void like
4fd0: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
4fe0: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
4ff0: 2c 20 0a 20 20 69 6e 74 20 61 72 67 63 2c 20 0a  , .  int argc, .
5000: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
5010: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73  **argv.){.  cons
5020: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
5030: 2a 7a 41 2c 20 2a 7a 42 3b 0a 20 20 75 33 32 20  *zA, *zB;.  u32 
5040: 65 73 63 61 70 65 20 3d 20 30 3b 0a 20 20 69 6e  escape = 0;.  in
5050: 74 20 6e 50 61 74 3b 0a 20 20 73 71 6c 69 74 65  t nPat;.  sqlite
5060: 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  3 *db = sqlite3_
5070: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
5080: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 0a 20 20 7a  e(context);..  z
5090: 42 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  B = sqlite3_valu
50a0: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
50b0: 0a 20 20 7a 41 20 3d 20 73 71 6c 69 74 65 33 5f  .  zA = sqlite3_
50c0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
50d0: 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c 69 6d 69 74  1]);..  /* Limit
50e0: 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 74   the length of t
50f0: 68 65 20 4c 49 4b 45 20 6f 72 20 47 4c 4f 42 20  he LIKE or GLOB 
5100: 70 61 74 74 65 72 6e 20 74 6f 20 61 76 6f 69 64  pattern to avoid
5110: 20 70 72 6f 62 6c 65 6d 73 0a 20 20 2a 2a 20 6f   problems.  ** o
5120: 66 20 64 65 65 70 20 72 65 63 75 72 73 69 6f 6e  f deep recursion
5130: 20 61 6e 64 20 4e 2a 4e 20 62 65 68 61 76 69 6f   and N*N behavio
5140: 72 20 69 6e 20 70 61 74 74 65 72 6e 43 6f 6d 70  r in patternComp
5150: 61 72 65 28 29 2e 0a 20 20 2a 2f 0a 20 20 6e 50  are()..  */.  nP
5160: 61 74 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  at = sqlite3_val
5170: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
5180: 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e  );.  testcase( n
5190: 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b  Pat==db->aLimit[
51a0: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49 4b  SQLITE_LIMIT_LIK
51b0: 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54 48  E_PATTERN_LENGTH
51c0: 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28  ] );.  testcase(
51d0: 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d 69   nPat==db->aLimi
51e0: 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c  t[SQLITE_LIMIT_L
51f0: 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47  IKE_PATTERN_LENG
5200: 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e  TH]+1 );.  if( n
5210: 50 61 74 20 3e 20 64 62 2d 3e 61 4c 69 6d 69 74  Pat > db->aLimit
5220: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 49  [SQLITE_LIMIT_LI
5230: 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e 47 54  KE_PATTERN_LENGT
5240: 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  H] ){.    sqlite
5250: 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63  3_result_error(c
5260: 6f 6e 74 65 78 74 2c 20 22 4c 49 4b 45 20 6f 72  ontext, "LIKE or
5270: 20 47 4c 4f 42 20 70 61 74 74 65 72 6e 20 74 6f   GLOB pattern to
5280: 6f 20 63 6f 6d 70 6c 65 78 22 2c 20 2d 31 29 3b  o complex", -1);
5290: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
52a0: 0a 20 20 61 73 73 65 72 74 28 20 7a 42 3d 3d 73  .  assert( zB==s
52b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
52c0: 74 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f  t(argv[0]) );  /
52d0: 2a 20 45 6e 63 6f 64 69 6e 67 20 64 69 64 20 6e  * Encoding did n
52e0: 6f 74 20 63 68 61 6e 67 65 20 2a 2f 0a 0a 20 20  ot change */..  
52f0: 69 66 28 20 61 72 67 63 3d 3d 33 20 29 7b 0a 20  if( argc==3 ){. 
5300: 20 20 20 2f 2a 20 54 68 65 20 65 73 63 61 70 65     /* The escape
5310: 20 63 68 61 72 61 63 74 65 72 20 73 74 72 69 6e   character strin
5320: 67 20 6d 75 73 74 20 63 6f 6e 73 69 73 74 20 6f  g must consist o
5330: 66 20 61 20 73 69 6e 67 6c 65 20 55 54 46 2d 38  f a single UTF-8
5340: 20 63 68 61 72 61 63 74 65 72 2e 0a 20 20 20 20   character..    
5350: 2a 2a 20 4f 74 68 65 72 77 69 73 65 2c 20 72 65  ** Otherwise, re
5360: 74 75 72 6e 20 61 6e 20 65 72 72 6f 72 2e 0a 20  turn an error.. 
5370: 20 20 20 2a 2f 0a 20 20 20 20 63 6f 6e 73 74 20     */.    const 
5380: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a  unsigned char *z
5390: 45 73 63 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  Esc = sqlite3_va
53a0: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d  lue_text(argv[2]
53b0: 29 3b 0a 20 20 20 20 69 66 28 20 7a 45 73 63 3d  );.    if( zEsc=
53c0: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20  =0 ) return;.   
53d0: 20 69 66 28 20 73 71 6c 69 74 65 33 55 74 66 38   if( sqlite3Utf8
53e0: 43 68 61 72 4c 65 6e 28 28 63 68 61 72 2a 29 7a  CharLen((char*)z
53f0: 45 73 63 2c 20 2d 31 29 21 3d 31 20 29 7b 0a 20  Esc, -1)!=1 ){. 
5400: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
5410: 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78  ult_error(contex
5420: 74 2c 20 0a 20 20 20 20 20 20 20 20 20 20 22 45  t, .          "E
5430: 53 43 41 50 45 20 65 78 70 72 65 73 73 69 6f 6e  SCAPE expression
5440: 20 6d 75 73 74 20 62 65 20 61 20 73 69 6e 67 6c   must be a singl
5450: 65 20 63 68 61 72 61 63 74 65 72 22 2c 20 2d 31  e character", -1
5460: 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b  );.      return;
5470: 0a 20 20 20 20 7d 0a 20 20 20 20 65 73 63 61 70  .    }.    escap
5480: 65 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52  e = sqlite3Utf8R
5490: 65 61 64 28 26 7a 45 73 63 29 3b 0a 20 20 7d 0a  ead(&zEsc);.  }.
54a0: 20 20 69 66 28 20 7a 41 20 26 26 20 7a 42 20 29    if( zA && zB )
54b0: 7b 0a 20 20 20 20 73 74 72 75 63 74 20 63 6f 6d  {.    struct com
54c0: 70 61 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 20  pareInfo *pInfo 
54d0: 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64  = sqlite3_user_d
54e0: 61 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a 23 69  ata(context);.#i
54f0: 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54  fdef SQLITE_TEST
5500: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6c 69 6b  .    sqlite3_lik
5510: 65 5f 63 6f 75 6e 74 2b 2b 3b 0a 23 65 6e 64 69  e_count++;.#endi
5520: 66 0a 20 20 20 20 0a 20 20 20 20 73 71 6c 69 74  f.    .    sqlit
5530: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f  e3_result_int(co
5540: 6e 74 65 78 74 2c 20 70 61 74 74 65 72 6e 43 6f  ntext, patternCo
5550: 6d 70 61 72 65 28 7a 42 2c 20 7a 41 2c 20 70 49  mpare(zB, zA, pI
5560: 6e 66 6f 2c 20 65 73 63 61 70 65 29 29 3b 0a 20  nfo, escape));. 
5570: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c   }.}../*.** Impl
5580: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
5590: 65 20 4e 55 4c 4c 49 46 28 78 2c 79 29 20 66 75  e NULLIF(x,y) fu
55a0: 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73  nction.  The res
55b0: 75 6c 74 20 69 73 20 74 68 65 20 66 69 72 73 74  ult is the first
55c0: 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 20 69 66 20  .** argument if 
55d0: 74 68 65 20 61 72 67 75 6d 65 6e 74 73 20 61 72  the arguments ar
55e0: 65 20 64 69 66 66 65 72 65 6e 74 2e 20 20 54 68  e different.  Th
55f0: 65 20 72 65 73 75 6c 74 20 69 73 20 4e 55 4c 4c  e result is NULL
5600: 20 69 66 20 74 68 65 0a 2a 2a 20 61 72 67 75 6d   if the.** argum
5610: 65 6e 74 73 20 61 72 65 20 65 71 75 61 6c 20 74  ents are equal t
5620: 6f 20 65 61 63 68 20 6f 74 68 65 72 2e 0a 2a 2f  o each other..*/
5630: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6e 75 6c  .static void nul
5640: 6c 69 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  lifFunc(.  sqlit
5650: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
5660: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
5670: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
5680: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
5690: 43 6f 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 20 3d  CollSeq *pColl =
56a0: 20 73 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43   sqlite3GetFuncC
56b0: 6f 6c 6c 53 65 71 28 63 6f 6e 74 65 78 74 29 3b  ollSeq(context);
56c0: 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45  .  UNUSED_PARAME
56d0: 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a 20 20  TER(NotUsed);.  
56e0: 69 66 28 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f  if( sqlite3MemCo
56f0: 6d 70 61 72 65 28 61 72 67 76 5b 30 5d 2c 20 61  mpare(argv[0], a
5700: 72 67 76 5b 31 5d 2c 20 70 43 6f 6c 6c 29 21 3d  rgv[1], pColl)!=
5710: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  0 ){.    sqlite3
5720: 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f  _result_value(co
5730: 6e 74 65 78 74 2c 20 61 72 67 76 5b 30 5d 29 3b  ntext, argv[0]);
5740: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
5750: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
5760: 74 68 65 20 73 71 6c 69 74 65 5f 76 65 72 73 69  the sqlite_versi
5770: 6f 6e 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20  on() function.  
5780: 54 68 65 20 72 65 73 75 6c 74 20 69 73 20 74 68  The result is th
5790: 65 20 76 65 72 73 69 6f 6e 0a 2a 2a 20 6f 66 20  e version.** of 
57a0: 74 68 65 20 53 51 4c 69 74 65 20 6c 69 62 72 61  the SQLite libra
57b0: 72 79 20 74 68 61 74 20 69 73 20 72 75 6e 6e 69  ry that is runni
57c0: 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  ng..*/.static vo
57d0: 69 64 20 76 65 72 73 69 6f 6e 46 75 6e 63 28 0a  id versionFunc(.
57e0: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
57f0: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
5800: 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c  t NotUsed,.  sql
5810: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74  ite3_value **Not
5820: 55 73 65 64 32 0a 29 7b 0a 20 20 55 4e 55 53 45  Used2.){.  UNUSE
5830: 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74  D_PARAMETER2(Not
5840: 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b  Used, NotUsed2);
5850: 0a 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 34 38 36  .  /* IMP: R-486
5860: 39 39 2d 34 38 36 31 37 20 54 68 69 73 20 66 75  99-48617 This fu
5870: 6e 63 74 69 6f 6e 20 69 73 20 61 6e 20 53 51 4c  nction is an SQL
5880: 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20   wrapper around 
5890: 74 68 65 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33  the.  ** sqlite3
58a0: 5f 6c 69 62 76 65 72 73 69 6f 6e 28 29 20 43 2d  _libversion() C-
58b0: 69 6e 74 65 72 66 61 63 65 2e 20 2a 2f 0a 20 20  interface. */.  
58c0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
58d0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  ext(context, sql
58e0: 69 74 65 33 5f 6c 69 62 76 65 72 73 69 6f 6e 28  ite3_libversion(
58f0: 29 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54  ), -1, SQLITE_ST
5900: 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  ATIC);.}../*.** 
5910: 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  Implementation o
5920: 66 20 74 68 65 20 73 71 6c 69 74 65 5f 73 6f 75  f the sqlite_sou
5930: 72 63 65 5f 69 64 28 29 20 66 75 6e 63 74 69 6f  rce_id() functio
5940: 6e 2e 20 54 68 65 20 72 65 73 75 6c 74 20 69 73  n. The result is
5950: 20 61 20 73 74 72 69 6e 67 0a 2a 2a 20 74 68 61   a string.** tha
5960: 74 20 69 64 65 6e 74 69 66 69 65 73 20 74 68 65  t identifies the
5970: 20 70 61 72 74 69 63 75 6c 61 72 20 76 65 72 73   particular vers
5980: 69 6f 6e 20 6f 66 20 74 68 65 20 73 6f 75 72 63  ion of the sourc
5990: 65 20 63 6f 64 65 20 75 73 65 64 20 74 6f 20 62  e code used to b
59a0: 75 69 6c 64 0a 2a 2a 20 53 51 4c 69 74 65 2e 0a  uild.** SQLite..
59b0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73  */.static void s
59c0: 6f 75 72 63 65 69 64 46 75 6e 63 28 0a 20 20 73  ourceidFunc(.  s
59d0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
59e0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e  context,.  int N
59f0: 6f 74 55 73 65 64 2c 0a 20 20 73 71 6c 69 74 65  otUsed,.  sqlite
5a00: 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65  3_value **NotUse
5a10: 64 32 0a 29 7b 0a 20 20 55 4e 55 53 45 44 5f 50  d2.){.  UNUSED_P
5a20: 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65  ARAMETER2(NotUse
5a30: 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20  d, NotUsed2);.  
5a40: 2f 2a 20 49 4d 50 3a 20 52 2d 32 34 34 37 30 2d  /* IMP: R-24470-
5a50: 33 31 31 33 36 20 54 68 69 73 20 66 75 6e 63 74  31136 This funct
5a60: 69 6f 6e 20 69 73 20 61 6e 20 53 51 4c 20 77 72  ion is an SQL wr
5a70: 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65  apper around the
5a80: 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 73 6f  .  ** sqlite3_so
5a90: 75 72 63 65 69 64 28 29 20 43 20 69 6e 74 65 72  urceid() C inter
5aa0: 66 61 63 65 2e 20 2a 2f 0a 20 20 73 71 6c 69 74  face. */.  sqlit
5ab0: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
5ac0: 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f  ontext, sqlite3_
5ad0: 73 6f 75 72 63 65 69 64 28 29 2c 20 2d 31 2c 20  sourceid(), -1, 
5ae0: 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a  SQLITE_STATIC);.
5af0: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
5b00: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73  ntation of the s
5b10: 71 6c 69 74 65 5f 6c 6f 67 28 29 20 66 75 6e 63  qlite_log() func
5b20: 74 69 6f 6e 2e 20 20 54 68 69 73 20 69 73 20 61  tion.  This is a
5b30: 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 0a   wrapper around.
5b40: 2a 2a 20 73 71 6c 69 74 65 33 5f 6c 6f 67 28 29  ** sqlite3_log()
5b50: 2e 20 20 54 68 65 20 72 65 74 75 72 6e 20 76 61  .  The return va
5b60: 6c 75 65 20 69 73 20 4e 55 4c 4c 2e 20 20 54 68  lue is NULL.  Th
5b70: 65 20 66 75 6e 63 74 69 6f 6e 20 65 78 69 73 74  e function exist
5b80: 73 20 70 75 72 65 6c 79 20 66 6f 72 0a 2a 2a 20  s purely for.** 
5b90: 69 74 73 20 73 69 64 65 2d 65 66 66 65 63 74 73  its side-effects
5ba0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
5bb0: 20 65 72 72 6c 6f 67 46 75 6e 63 28 0a 20 20 73   errlogFunc(.  s
5bc0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
5bd0: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
5be0: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
5bf0: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
5c00: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
5c10: 52 28 61 72 67 63 29 3b 0a 20 20 55 4e 55 53 45  R(argc);.  UNUSE
5c20: 44 5f 50 41 52 41 4d 45 54 45 52 28 63 6f 6e 74  D_PARAMETER(cont
5c30: 65 78 74 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f  ext);.  sqlite3_
5c40: 6c 6f 67 28 73 71 6c 69 74 65 33 5f 76 61 6c 75  log(sqlite3_valu
5c50: 65 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 2c 20  e_int(argv[0]), 
5c60: 22 25 73 22 2c 20 73 71 6c 69 74 65 33 5f 76 61  "%s", sqlite3_va
5c70: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d  lue_text(argv[1]
5c80: 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  ));.}../*.** Imp
5c90: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
5ca0: 68 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c  he sqlite_compil
5cb0: 65 6f 70 74 69 6f 6e 5f 75 73 65 64 28 29 20 66  eoption_used() f
5cc0: 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 20 54 68 65 20  unction..** The 
5cd0: 72 65 73 75 6c 74 20 69 73 20 61 6e 20 69 6e 74  result is an int
5ce0: 65 67 65 72 20 74 68 61 74 20 69 64 65 6e 74 69  eger that identi
5cf0: 66 69 65 73 20 69 66 20 74 68 65 20 63 6f 6d 70  fies if the comp
5d00: 69 6c 65 72 20 6f 70 74 69 6f 6e 0a 2a 2a 20 77  iler option.** w
5d10: 61 73 20 75 73 65 64 20 74 6f 20 62 75 69 6c 64  as used to build
5d20: 20 53 51 4c 69 74 65 2e 0a 2a 2f 0a 23 69 66 6e   SQLite..*/.#ifn
5d30: 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f  def SQLITE_OMIT_
5d40: 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49  COMPILEOPTION_DI
5d50: 41 47 53 0a 73 74 61 74 69 63 20 76 6f 69 64 20  AGS.static void 
5d60: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 75 73 65  compileoptionuse
5d70: 64 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  dFunc(.  sqlite3
5d80: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
5d90: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
5da0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
5db0: 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74  *argv.){.  const
5dc0: 20 63 68 61 72 20 2a 7a 4f 70 74 4e 61 6d 65 3b   char *zOptName;
5dd0: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63 3d  .  assert( argc=
5de0: 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50  =1 );.  UNUSED_P
5df0: 41 52 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a  ARAMETER(argc);.
5e00: 20 20 2f 2a 20 49 4d 50 3a 20 52 2d 33 39 35 36    /* IMP: R-3956
5e10: 34 2d 33 36 33 30 35 20 54 68 65 20 73 71 6c 69  4-36305 The sqli
5e20: 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  te_compileoption
5e30: 5f 75 73 65 64 28 29 20 53 51 4c 0a 20 20 2a 2a  _used() SQL.  **
5e40: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 61 20 77   function is a w
5e50: 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68  rapper around th
5e60: 65 20 73 71 6c 69 74 65 33 5f 63 6f 6d 70 69 6c  e sqlite3_compil
5e70: 65 6f 70 74 69 6f 6e 5f 75 73 65 64 28 29 20 43  eoption_used() C
5e80: 2f 43 2b 2b 0a 20 20 2a 2a 20 66 75 6e 63 74 69  /C++.  ** functi
5e90: 6f 6e 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 28  on..  */.  if( (
5ea0: 7a 4f 70 74 4e 61 6d 65 20 3d 20 28 63 6f 6e 73  zOptName = (cons
5eb0: 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f  t char*)sqlite3_
5ec0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
5ed0: 30 5d 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 73  0]))!=0 ){.    s
5ee0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
5ef0: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
5f00: 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  e3_compileoption
5f10: 5f 75 73 65 64 28 7a 4f 70 74 4e 61 6d 65 29 29  _used(zOptName))
5f20: 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 20 2f  ;.  }.}.#endif /
5f30: 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 4f  * SQLITE_OMIT_CO
5f40: 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41 47  MPILEOPTION_DIAG
5f50: 53 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  S */../*.** Impl
5f60: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
5f70: 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c 65  e sqlite_compile
5f80: 6f 70 74 69 6f 6e 5f 67 65 74 28 29 20 66 75 6e  option_get() fun
5f90: 63 74 69 6f 6e 2e 20 0a 2a 2a 20 54 68 65 20 72  ction. .** The r
5fa0: 65 73 75 6c 74 20 69 73 20 61 20 73 74 72 69 6e  esult is a strin
5fb0: 67 20 74 68 61 74 20 69 64 65 6e 74 69 66 69 65  g that identifie
5fc0: 73 20 74 68 65 20 63 6f 6d 70 69 6c 65 72 20 6f  s the compiler o
5fd0: 70 74 69 6f 6e 73 20 0a 2a 2a 20 75 73 65 64 20  ptions .** used 
5fe0: 74 6f 20 62 75 69 6c 64 20 53 51 4c 69 74 65 2e  to build SQLite.
5ff0: 0a 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49  .*/.#ifndef SQLI
6000: 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f  TE_OMIT_COMPILEO
6010: 50 54 49 4f 4e 5f 44 49 41 47 53 0a 73 74 61 74  PTION_DIAGS.stat
6020: 69 63 20 76 6f 69 64 20 63 6f 6d 70 69 6c 65 6f  ic void compileo
6030: 70 74 69 6f 6e 67 65 74 46 75 6e 63 28 0a 20 20  ptiongetFunc(.  
6040: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
6050: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
6060: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
6070: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
6080: 20 20 69 6e 74 20 6e 3b 0a 20 20 61 73 73 65 72    int n;.  asser
6090: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
60a0: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
60b0: 28 61 72 67 63 29 3b 0a 20 20 2f 2a 20 49 4d 50  (argc);.  /* IMP
60c0: 3a 20 52 2d 30 34 39 32 32 2d 32 34 30 37 36 20  : R-04922-24076 
60d0: 54 68 65 20 73 71 6c 69 74 65 5f 63 6f 6d 70 69  The sqlite_compi
60e0: 6c 65 6f 70 74 69 6f 6e 5f 67 65 74 28 29 20 53  leoption_get() S
60f0: 51 4c 20 66 75 6e 63 74 69 6f 6e 0a 20 20 2a 2a  QL function.  **
6100: 20 69 73 20 61 20 77 72 61 70 70 65 72 20 61 72   is a wrapper ar
6110: 6f 75 6e 64 20 74 68 65 20 73 71 6c 69 74 65 33  ound the sqlite3
6120: 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 5f 67  _compileoption_g
6130: 65 74 28 29 20 43 2f 43 2b 2b 20 66 75 6e 63 74  et() C/C++ funct
6140: 69 6f 6e 2e 0a 20 20 2a 2f 0a 20 20 6e 20 3d 20  ion..  */.  n = 
6150: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
6160: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 73 71  t(argv[0]);.  sq
6170: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
6180: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
6190: 65 33 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e  e3_compileoption
61a0: 5f 67 65 74 28 6e 29 2c 20 2d 31 2c 20 53 51 4c  _get(n), -1, SQL
61b0: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 23  ITE_STATIC);.}.#
61c0: 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f  endif /* SQLITE_
61d0: 4f 4d 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49  OMIT_COMPILEOPTI
61e0: 4f 4e 5f 44 49 41 47 53 20 2a 2f 0a 0a 2f 2a 20  ON_DIAGS */../* 
61f0: 41 72 72 61 79 20 66 6f 72 20 63 6f 6e 76 65 72  Array for conver
6200: 74 69 6e 67 20 66 72 6f 6d 20 68 61 6c 66 2d 62  ting from half-b
6210: 79 74 65 73 20 28 6e 79 62 62 6c 65 73 29 20 69  ytes (nybbles) i
6220: 6e 74 6f 20 41 53 43 49 49 20 68 65 78 0a 2a 2a  nto ASCII hex.**
6230: 20 64 69 67 69 74 73 2e 20 2a 2f 0a 73 74 61 74   digits. */.stat
6240: 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 68 65  ic const char he
6250: 78 64 69 67 69 74 73 5b 5d 20 3d 20 7b 0a 20 20  xdigits[] = {.  
6260: 27 30 27 2c 20 27 31 27 2c 20 27 32 27 2c 20 27  '0', '1', '2', '
6270: 33 27 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36  3', '4', '5', '6
6280: 27 2c 20 27 37 27 2c 0a 20 20 27 38 27 2c 20 27  ', '7',.  '8', '
6290: 39 27 2c 20 27 41 27 2c 20 27 42 27 2c 20 27 43  9', 'A', 'B', 'C
62a0: 27 2c 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27  ', 'D', 'E', 'F'
62b0: 20 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c   .};../*.** Impl
62c0: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
62d0: 65 20 51 55 4f 54 45 28 29 20 66 75 6e 63 74 69  e QUOTE() functi
62e0: 6f 6e 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69  on.  This functi
62f0: 6f 6e 20 74 61 6b 65 73 20 61 20 73 69 6e 67 6c  on takes a singl
6300: 65 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 20 20  e.** argument.  
6310: 49 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20  If the argument 
6320: 69 73 20 6e 75 6d 65 72 69 63 2c 20 74 68 65 20  is numeric, the 
6330: 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20  return value is 
6340: 74 68 65 20 73 61 6d 65 20 61 73 0a 2a 2a 20 74  the same as.** t
6350: 68 65 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66  he argument.  If
6360: 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73   the argument is
6370: 20 4e 55 4c 4c 2c 20 74 68 65 20 72 65 74 75 72   NULL, the retur
6380: 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65 20 73  n value is the s
6390: 74 72 69 6e 67 0a 2a 2a 20 22 4e 55 4c 4c 22 2e  tring.** "NULL".
63a0: 20 20 4f 74 68 65 72 77 69 73 65 2c 20 74 68 65    Otherwise, the
63b0: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 65 6e 63   argument is enc
63c0: 6c 6f 73 65 64 20 69 6e 20 73 69 6e 67 6c 65 20  losed in single 
63d0: 71 75 6f 74 65 73 20 77 69 74 68 0a 2a 2a 20 73  quotes with.** s
63e0: 69 6e 67 6c 65 2d 71 75 6f 74 65 20 65 73 63 61  ingle-quote esca
63f0: 70 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  pes..*/.static v
6400: 6f 69 64 20 71 75 6f 74 65 46 75 6e 63 28 73 71  oid quoteFunc(sq
6410: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
6420: 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63  ontext, int argc
6430: 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20  , sqlite3_value 
6440: 2a 2a 61 72 67 76 29 7b 0a 20 20 61 73 73 65 72  **argv){.  asser
6450: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
6460: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
6470: 28 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68  (argc);.  switch
6480: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
6490: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
64a0: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
64b0: 5f 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20  _FLOAT: {.      
64c0: 64 6f 75 62 6c 65 20 72 31 2c 20 72 32 3b 0a 20  double r1, r2;. 
64d0: 20 20 20 20 20 63 68 61 72 20 7a 42 75 66 5b 35       char zBuf[5
64e0: 30 5d 3b 0a 20 20 20 20 20 20 72 31 20 3d 20 73  0];.      r1 = s
64f0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75  qlite3_value_dou
6500: 62 6c 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ble(argv[0]);.  
6510: 20 20 20 20 73 71 6c 69 74 65 33 5f 73 6e 70 72      sqlite3_snpr
6520: 69 6e 74 66 28 73 69 7a 65 6f 66 28 7a 42 75 66  intf(sizeof(zBuf
6530: 29 2c 20 7a 42 75 66 2c 20 22 25 21 2e 31 35 67  ), zBuf, "%!.15g
6540: 22 2c 20 72 31 29 3b 0a 20 20 20 20 20 20 73 71  ", r1);.      sq
6550: 6c 69 74 65 33 41 74 6f 46 28 7a 42 75 66 2c 20  lite3AtoF(zBuf, 
6560: 26 72 32 2c 20 32 30 2c 20 53 51 4c 49 54 45 5f  &r2, 20, SQLITE_
6570: 55 54 46 38 29 3b 0a 20 20 20 20 20 20 69 66 28  UTF8);.      if(
6580: 20 72 31 21 3d 72 32 20 29 7b 0a 20 20 20 20 20   r1!=r2 ){.     
6590: 20 20 20 73 71 6c 69 74 65 33 5f 73 6e 70 72 69     sqlite3_snpri
65a0: 6e 74 66 28 73 69 7a 65 6f 66 28 7a 42 75 66 29  ntf(sizeof(zBuf)
65b0: 2c 20 7a 42 75 66 2c 20 22 25 21 2e 32 30 65 22  , zBuf, "%!.20e"
65c0: 2c 20 72 31 29 3b 0a 20 20 20 20 20 20 7d 0a 20  , r1);.      }. 
65d0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
65e0: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
65f0: 2c 20 7a 42 75 66 2c 20 2d 31 2c 20 53 51 4c 49  , zBuf, -1, SQLI
6600: 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20  TE_TRANSIENT);. 
6610: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
6620: 7d 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54  }.    case SQLIT
6630: 45 5f 49 4e 54 45 47 45 52 3a 20 7b 0a 20 20 20  E_INTEGER: {.   
6640: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
6650: 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c  t_value(context,
6660: 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20   argv[0]);.     
6670: 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20   break;.    }.  
6680: 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f 42 4c    case SQLITE_BL
6690: 4f 42 3a 20 7b 0a 20 20 20 20 20 20 63 68 61 72  OB: {.      char
66a0: 20 2a 7a 54 65 78 74 20 3d 20 30 3b 0a 20 20 20   *zText = 0;.   
66b0: 20 20 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 7a     char const *z
66c0: 42 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76  Blob = sqlite3_v
66d0: 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30  alue_blob(argv[0
66e0: 5d 29 3b 0a 20 20 20 20 20 20 69 6e 74 20 6e 42  ]);.      int nB
66f0: 6c 6f 62 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  lob = sqlite3_va
6700: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
6710: 5d 29 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74  ]);.      assert
6720: 28 20 7a 42 6c 6f 62 3d 3d 73 71 6c 69 74 65 33  ( zBlob==sqlite3
6730: 5f 76 61 6c 75 65 5f 62 6c 6f 62 28 61 72 67 76  _value_blob(argv
6740: 5b 30 5d 29 20 29 3b 20 2f 2a 20 4e 6f 20 65 6e  [0]) ); /* No en
6750: 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f  coding change */
6760: 0a 20 20 20 20 20 20 7a 54 65 78 74 20 3d 20 28  .      zText = (
6770: 63 68 61 72 20 2a 29 63 6f 6e 74 65 78 74 4d 61  char *)contextMa
6780: 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 32  lloc(context, (2
6790: 2a 28 69 36 34 29 6e 42 6c 6f 62 29 2b 34 29 3b  *(i64)nBlob)+4);
67a0: 20 0a 20 20 20 20 20 20 69 66 28 20 7a 54 65 78   .      if( zTex
67b0: 74 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74  t ){.        int
67c0: 20 69 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28   i;.        for(
67d0: 69 3d 30 3b 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b  i=0; i<nBlob; i+
67e0: 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 54  +){.          zT
67f0: 65 78 74 5b 28 69 2a 32 29 2b 32 5d 20 3d 20 68  ext[(i*2)+2] = h
6800: 65 78 64 69 67 69 74 73 5b 28 7a 42 6c 6f 62 5b  exdigits[(zBlob[
6810: 69 5d 3e 3e 34 29 26 30 78 30 46 5d 3b 0a 20 20  i]>>4)&0x0F];.  
6820: 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 69          zText[(i
6830: 2a 32 29 2b 33 5d 20 3d 20 68 65 78 64 69 67 69  *2)+3] = hexdigi
6840: 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 29 26 30 78  ts[(zBlob[i])&0x
6850: 30 46 5d 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  0F];.        }. 
6860: 20 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42         zText[(nB
6870: 6c 6f 62 2a 32 29 2b 32 5d 20 3d 20 27 5c 27 27  lob*2)+2] = '\''
6880: 3b 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b  ;.        zText[
6890: 28 6e 42 6c 6f 62 2a 32 29 2b 33 5d 20 3d 20 27  (nBlob*2)+3] = '
68a0: 5c 30 27 3b 0a 20 20 20 20 20 20 20 20 7a 54 65  \0';.        zTe
68b0: 78 74 5b 30 5d 20 3d 20 27 58 27 3b 0a 20 20 20  xt[0] = 'X';.   
68c0: 20 20 20 20 20 7a 54 65 78 74 5b 31 5d 20 3d 20       zText[1] = 
68d0: 27 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 73 71  '\'';.        sq
68e0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
68f0: 74 28 63 6f 6e 74 65 78 74 2c 20 7a 54 65 78 74  t(context, zText
6900: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41  , -1, SQLITE_TRA
6910: 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20 20 20 20  NSIENT);.       
6920: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 54   sqlite3_free(zT
6930: 65 78 74 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  ext);.      }.  
6940: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
6950: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
6960: 5f 54 45 58 54 3a 20 7b 0a 20 20 20 20 20 20 69  _TEXT: {.      i
6970: 6e 74 20 69 2c 6a 3b 0a 20 20 20 20 20 20 75 36  nt i,j;.      u6
6980: 34 20 6e 3b 0a 20 20 20 20 20 20 63 6f 6e 73 74  4 n;.      const
6990: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
69a0: 7a 41 72 67 20 3d 20 73 71 6c 69 74 65 33 5f 76  zArg = sqlite3_v
69b0: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
69c0: 5d 29 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a  ]);.      char *
69d0: 7a 3b 0a 0a 20 20 20 20 20 20 69 66 28 20 7a 41  z;..      if( zA
69e0: 72 67 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a  rg==0 ) return;.
69f0: 20 20 20 20 20 20 66 6f 72 28 69 3d 30 2c 20 6e        for(i=0, n
6a00: 3d 30 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b  =0; zArg[i]; i++
6a10: 29 7b 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d  ){ if( zArg[i]==
6a20: 27 5c 27 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20 20  '\'' ) n++; }.  
6a30: 20 20 20 20 7a 20 3d 20 63 6f 6e 74 65 78 74 4d      z = contextM
6a40: 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28  alloc(context, (
6a50: 28 69 36 34 29 69 29 2b 28 28 69 36 34 29 6e 29  (i64)i)+((i64)n)
6a60: 2b 33 29 3b 0a 20 20 20 20 20 20 69 66 28 20 7a  +3);.      if( z
6a70: 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 5b 30 5d   ){.        z[0]
6a80: 20 3d 20 27 5c 27 27 3b 0a 20 20 20 20 20 20 20   = '\'';.       
6a90: 20 66 6f 72 28 69 3d 30 2c 20 6a 3d 31 3b 20 7a   for(i=0, j=1; z
6aa0: 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20  Arg[i]; i++){.  
6ab0: 20 20 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d          z[j++] =
6ac0: 20 7a 41 72 67 5b 69 5d 3b 0a 20 20 20 20 20 20   zArg[i];.      
6ad0: 20 20 20 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d      if( zArg[i]=
6ae0: 3d 27 5c 27 27 20 29 7b 0a 20 20 20 20 20 20 20  ='\'' ){.       
6af0: 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c       z[j++] = '\
6b00: 27 27 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a  '';.          }.
6b10: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
6b20: 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b    z[j++] = '\'';
6b30: 0a 20 20 20 20 20 20 20 20 7a 5b 6a 5d 20 3d 20  .        z[j] = 
6b40: 30 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  0;.        sqlit
6b50: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
6b60: 6f 6e 74 65 78 74 2c 20 7a 2c 20 6a 2c 20 73 71  ontext, z, j, sq
6b70: 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20  lite3_free);.   
6b80: 20 20 20 7d 0a 20 20 20 20 20 20 62 72 65 61 6b     }.      break
6b90: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61  ;.    }.    defa
6ba0: 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20 61 73 73  ult: {.      ass
6bb0: 65 72 74 28 20 73 71 6c 69 74 65 33 5f 76 61 6c  ert( sqlite3_val
6bc0: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
6bd0: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b  ==SQLITE_NULL );
6be0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
6bf0: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
6c00: 78 74 2c 20 22 4e 55 4c 4c 22 2c 20 34 2c 20 53  xt, "NULL", 4, S
6c10: 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20  QLITE_STATIC);. 
6c20: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
6c30: 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  }.  }.}../*.** T
6c40: 68 65 20 75 6e 69 63 6f 64 65 28 29 20 66 75 6e  he unicode() fun
6c50: 63 74 69 6f 6e 2e 20 20 52 65 74 75 72 6e 20 74  ction.  Return t
6c60: 68 65 20 69 6e 74 65 67 65 72 20 75 6e 69 63 6f  he integer unico
6c70: 64 65 20 63 6f 64 65 2d 70 6f 69 6e 74 20 76 61  de code-point va
6c80: 6c 75 65 0a 2a 2a 20 66 6f 72 20 74 68 65 20 66  lue.** for the f
6c90: 69 72 73 74 20 63 68 61 72 61 63 74 65 72 20 6f  irst character o
6ca0: 66 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69  f the input stri
6cb0: 6e 67 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ng. .*/.static v
6cc0: 6f 69 64 20 75 6e 69 63 6f 64 65 46 75 6e 63 28  oid unicodeFunc(
6cd0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
6ce0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
6cf0: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
6d00: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
6d10: 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  ){.  const unsig
6d20: 6e 65 64 20 63 68 61 72 20 2a 7a 20 3d 20 73 71  ned char *z = sq
6d30: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
6d40: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 28 76 6f  (argv[0]);.  (vo
6d50: 69 64 29 61 72 67 63 3b 0a 20 20 69 66 28 20 7a  id)argc;.  if( z
6d60: 20 26 26 20 7a 5b 30 5d 20 29 20 73 71 6c 69 74   && z[0] ) sqlit
6d70: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f  e3_result_int(co
6d80: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 55 74  ntext, sqlite3Ut
6d90: 66 38 52 65 61 64 28 26 7a 29 29 3b 0a 7d 0a 0a  f8Read(&z));.}..
6da0: 2f 2a 0a 2a 2a 20 54 68 65 20 63 68 61 72 28 29  /*.** The char()
6db0: 20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20   function takes 
6dc0: 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 61 72 67  zero or more arg
6dd0: 75 6d 65 6e 74 73 2c 20 65 61 63 68 20 6f 66 20  uments, each of 
6de0: 77 68 69 63 68 20 69 73 0a 2a 2a 20 61 6e 20 69  which is.** an i
6df0: 6e 74 65 67 65 72 2e 20 20 49 74 20 63 6f 6e 73  nteger.  It cons
6e00: 74 72 75 63 74 73 20 61 20 73 74 72 69 6e 67 20  tructs a string 
6e10: 77 68 65 72 65 20 65 61 63 68 20 63 68 61 72 61  where each chara
6e20: 63 74 65 72 20 6f 66 20 74 68 65 20 73 74 72 69  cter of the stri
6e30: 6e 67 0a 2a 2a 20 69 73 20 74 68 65 20 75 6e 69  ng.** is the uni
6e40: 63 6f 64 65 20 63 68 61 72 61 63 74 65 72 20 66  code character f
6e50: 6f 72 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e  or the correspon
6e60: 64 69 6e 67 20 69 6e 74 65 67 65 72 20 61 72 67  ding integer arg
6e70: 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69 63  ument..*/.static
6e80: 20 76 6f 69 64 20 63 68 61 72 46 75 6e 63 28 0a   void charFunc(.
6e90: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
6ea0: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
6eb0: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
6ec0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
6ed0: 7b 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61  {.  unsigned cha
6ee0: 72 20 2a 7a 2c 20 2a 7a 4f 75 74 3b 0a 20 20 69  r *z, *zOut;.  i
6ef0: 6e 74 20 69 3b 0a 20 20 7a 4f 75 74 20 3d 20 7a  nt i;.  zOut = z
6f00: 20 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f   = sqlite3_mallo
6f10: 63 28 20 61 72 67 63 2a 34 20 29 3b 0a 20 20 69  c( argc*4 );.  i
6f20: 66 28 20 7a 3d 3d 30 20 29 7b 0a 20 20 20 20 73  f( z==0 ){.    s
6f30: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
6f40: 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78  ror_nomem(contex
6f50: 74 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  t);.    return;.
6f60: 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69    }.  for(i=0; i
6f70: 3c 61 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20  <argc; i++){.   
6f80: 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 78   sqlite3_int64 x
6f90: 3b 0a 20 20 20 20 75 6e 73 69 67 6e 65 64 20 63  ;.    unsigned c
6fa0: 3b 0a 20 20 20 20 78 20 3d 20 73 71 6c 69 74 65  ;.    x = sqlite
6fb0: 33 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72  3_value_int64(ar
6fc0: 67 76 5b 69 5d 29 3b 0a 20 20 20 20 69 66 28 20  gv[i]);.    if( 
6fd0: 78 3c 30 20 7c 7c 20 78 3e 30 78 31 30 66 66 66  x<0 || x>0x10fff
6fe0: 66 20 29 20 78 20 3d 20 30 78 66 66 66 64 3b 0a  f ) x = 0xfffd;.
6ff0: 20 20 20 20 63 20 3d 20 28 75 6e 73 69 67 6e 65      c = (unsigne
7000: 64 29 28 78 20 26 20 30 78 31 66 66 66 66 66 29  d)(x & 0x1fffff)
7010: 3b 0a 20 20 20 20 69 66 28 20 63 3c 30 78 30 30  ;.    if( c<0x00
7020: 30 38 30 20 29 7b 0a 20 20 20 20 20 20 2a 7a 4f  080 ){.      *zO
7030: 75 74 2b 2b 20 3d 20 28 75 38 29 28 63 26 30 78  ut++ = (u8)(c&0x
7040: 46 46 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69  FF);.    }else i
7050: 66 28 20 63 3c 30 78 30 30 38 30 30 20 29 7b 0a  f( c<0x00800 ){.
7060: 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20        *zOut++ = 
7070: 30 78 43 30 20 2b 20 28 75 38 29 28 28 63 3e 3e  0xC0 + (u8)((c>>
7080: 36 29 26 30 78 31 46 29 3b 0a 20 20 20 20 20 20  6)&0x1F);.      
7090: 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b  *zOut++ = 0x80 +
70a0: 20 28 75 38 29 28 63 20 26 20 30 78 33 46 29 3b   (u8)(c & 0x3F);
70b0: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63  .    }else if( c
70c0: 3c 30 78 31 30 30 30 30 20 29 7b 0a 20 20 20 20  <0x10000 ){.    
70d0: 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 45 30    *zOut++ = 0xE0
70e0: 20 2b 20 28 75 38 29 28 28 63 3e 3e 31 32 29 26   + (u8)((c>>12)&
70f0: 30 78 30 46 29 3b 0a 20 20 20 20 20 20 2a 7a 4f  0x0F);.      *zO
7100: 75 74 2b 2b 20 3d 20 30 78 38 30 20 2b 20 28 75  ut++ = 0x80 + (u
7110: 38 29 28 28 63 3e 3e 36 29 20 26 20 30 78 33 46  8)((c>>6) & 0x3F
7120: 29 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b  );.      *zOut++
7130: 20 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 63   = 0x80 + (u8)(c
7140: 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20 7d 65   & 0x3F);.    }e
7150: 6c 73 65 7b 0a 20 20 20 20 20 20 2a 7a 4f 75 74  lse{.      *zOut
7160: 2b 2b 20 3d 20 30 78 46 30 20 2b 20 28 75 38 29  ++ = 0xF0 + (u8)
7170: 28 28 63 3e 3e 31 38 29 20 26 20 30 78 30 37 29  ((c>>18) & 0x07)
7180: 3b 0a 20 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20  ;.      *zOut++ 
7190: 3d 20 30 78 38 30 20 2b 20 28 75 38 29 28 28 63  = 0x80 + (u8)((c
71a0: 3e 3e 31 32 29 20 26 20 30 78 33 46 29 3b 0a 20  >>12) & 0x3F);. 
71b0: 20 20 20 20 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30       *zOut++ = 0
71c0: 78 38 30 20 2b 20 28 75 38 29 28 28 63 3e 3e 36  x80 + (u8)((c>>6
71d0: 29 20 26 20 30 78 33 46 29 3b 0a 20 20 20 20 20  ) & 0x3F);.     
71e0: 20 2a 7a 4f 75 74 2b 2b 20 3d 20 30 78 38 30 20   *zOut++ = 0x80 
71f0: 2b 20 28 75 38 29 28 63 20 26 20 30 78 33 46 29  + (u8)(c & 0x3F)
7200: 3b 0a 20 20 20 20 7d 20 20 20 20 20 20 20 20 20  ;.    }         
7210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7230: 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 7d             \.  }
7240: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
7250: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
7260: 28 63 68 61 72 2a 29 7a 2c 20 28 69 6e 74 29 28  (char*)z, (int)(
7270: 7a 4f 75 74 2d 7a 29 2c 20 73 71 6c 69 74 65 33  zOut-z), sqlite3
7280: 5f 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  _free);.}../*.**
7290: 20 54 68 65 20 68 65 78 28 29 20 66 75 6e 63 74   The hex() funct
72a0: 69 6f 6e 2e 20 20 49 6e 74 65 72 70 72 65 74 20  ion.  Interpret 
72b0: 74 68 65 20 61 72 67 75 6d 65 6e 74 20 61 73 20  the argument as 
72c0: 61 20 62 6c 6f 62 2e 20 20 52 65 74 75 72 6e 0a  a blob.  Return.
72d0: 2a 2a 20 61 20 68 65 78 61 64 65 63 69 6d 61 6c  ** a hexadecimal
72e0: 20 72 65 6e 64 65 72 69 6e 67 20 61 73 20 74 65   rendering as te
72f0: 78 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  xt..*/.static vo
7300: 69 64 20 68 65 78 46 75 6e 63 28 0a 20 20 73 71  id hexFunc(.  sq
7310: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
7320: 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72  ontext,.  int ar
7330: 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  gc,.  sqlite3_va
7340: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
7350: 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 63 6f 6e 73  int i, n;.  cons
7360: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
7370: 2a 70 42 6c 6f 62 3b 0a 20 20 63 68 61 72 20 2a  *pBlob;.  char *
7380: 7a 48 65 78 2c 20 2a 7a 3b 0a 20 20 61 73 73 65  zHex, *z;.  asse
7390: 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20  rt( argc==1 );. 
73a0: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
73b0: 52 28 61 72 67 63 29 3b 0a 20 20 70 42 6c 6f 62  R(argc);.  pBlob
73c0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
73d0: 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a  _blob(argv[0]);.
73e0: 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61    n = sqlite3_va
73f0: 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30  lue_bytes(argv[0
7400: 5d 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 42  ]);.  assert( pB
7410: 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c  lob==sqlite3_val
7420: 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29  ue_blob(argv[0])
7430: 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64   );  /* No encod
7440: 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20  ing change */.  
7450: 7a 20 3d 20 7a 48 65 78 20 3d 20 63 6f 6e 74 65  z = zHex = conte
7460: 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e 74 65 78 74  xtMalloc(context
7470: 2c 20 28 28 69 36 34 29 6e 29 2a 32 20 2b 20 31  , ((i64)n)*2 + 1
7480: 29 3b 0a 20 20 69 66 28 20 7a 48 65 78 20 29 7b  );.  if( zHex ){
7490: 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c  .    for(i=0; i<
74a0: 6e 3b 20 69 2b 2b 2c 20 70 42 6c 6f 62 2b 2b 29  n; i++, pBlob++)
74b0: 7b 0a 20 20 20 20 20 20 75 6e 73 69 67 6e 65 64  {.      unsigned
74c0: 20 63 68 61 72 20 63 20 3d 20 2a 70 42 6c 6f 62   char c = *pBlob
74d0: 3b 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20 3d  ;.      *(z++) =
74e0: 20 68 65 78 64 69 67 69 74 73 5b 28 63 3e 3e 34   hexdigits[(c>>4
74f0: 29 26 30 78 66 5d 3b 0a 20 20 20 20 20 20 2a 28  )&0xf];.      *(
7500: 7a 2b 2b 29 20 3d 20 68 65 78 64 69 67 69 74 73  z++) = hexdigits
7510: 5b 63 26 30 78 66 5d 3b 0a 20 20 20 20 7d 0a 20  [c&0xf];.    }. 
7520: 20 20 20 2a 7a 20 3d 20 30 3b 0a 20 20 20 20 73     *z = 0;.    s
7530: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
7540: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 48 65 78  xt(context, zHex
7550: 2c 20 6e 2a 32 2c 20 73 71 6c 69 74 65 33 5f 66  , n*2, sqlite3_f
7560: 72 65 65 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  ree);.  }.}../*.
7570: 2a 2a 20 54 68 65 20 7a 65 72 6f 62 6c 6f 62 28  ** The zeroblob(
7580: 4e 29 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75  N) function retu
7590: 72 6e 73 20 61 20 7a 65 72 6f 2d 66 69 6c 6c 65  rns a zero-fille
75a0: 64 20 62 6c 6f 62 20 6f 66 20 73 69 7a 65 20 4e  d blob of size N
75b0: 20 62 79 74 65 73 2e 0a 2a 2f 0a 73 74 61 74 69   bytes..*/.stati
75c0: 63 20 76 6f 69 64 20 7a 65 72 6f 62 6c 6f 62 46  c void zeroblobF
75d0: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
75e0: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
75f0: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
7600: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
7610: 72 67 76 0a 29 7b 0a 20 20 69 36 34 20 6e 3b 0a  rgv.){.  i64 n;.
7620: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20    sqlite3 *db = 
7630: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
7640: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
7650: 74 29 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72  t);.  assert( ar
7660: 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45  gc==1 );.  UNUSE
7670: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
7680: 29 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33  );.  n = sqlite3
7690: 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67  _value_int64(arg
76a0: 76 5b 30 5d 29 3b 0a 20 20 74 65 73 74 63 61 73  v[0]);.  testcas
76b0: 65 28 20 6e 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74  e( n==db->aLimit
76c0: 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45  [SQLITE_LIMIT_LE
76d0: 4e 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74 63  NGTH] );.  testc
76e0: 61 73 65 28 20 6e 3d 3d 64 62 2d 3e 61 4c 69 6d  ase( n==db->aLim
76f0: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
7700: 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69  LENGTH]+1 );.  i
7710: 66 28 20 6e 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b  f( n>db->aLimit[
7720: 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e  SQLITE_LIMIT_LEN
7730: 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c 69  GTH] ){.    sqli
7740: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
7750: 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74 29  _toobig(context)
7760: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73  ;.  }else{.    s
7770: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 7a 65  qlite3_result_ze
7780: 72 6f 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20  roblob(context, 
7790: 28 69 6e 74 29 6e 29 3b 20 2f 2a 20 49 4d 50 3a  (int)n); /* IMP:
77a0: 20 52 2d 30 30 32 39 33 2d 36 34 39 39 34 20 2a   R-00293-64994 *
77b0: 2f 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  /.  }.}../*.** T
77c0: 68 65 20 72 65 70 6c 61 63 65 28 29 20 66 75 6e  he replace() fun
77d0: 63 74 69 6f 6e 2e 20 20 54 68 72 65 65 20 61 72  ction.  Three ar
77e0: 67 75 6d 65 6e 74 73 20 61 72 65 20 61 6c 6c 20  guments are all 
77f0: 73 74 72 69 6e 67 73 3a 20 63 61 6c 6c 0a 2a 2a  strings: call.**
7800: 20 74 68 65 6d 20 41 2c 20 42 2c 20 61 6e 64 20   them A, B, and 
7810: 43 2e 20 54 68 65 20 72 65 73 75 6c 74 20 69 73  C. The result is
7820: 20 61 6c 73 6f 20 61 20 73 74 72 69 6e 67 20 77   also a string w
7830: 68 69 63 68 20 69 73 20 64 65 72 69 76 65 64 0a  hich is derived.
7840: 2a 2a 20 66 72 6f 6d 20 41 20 62 79 20 72 65 70  ** from A by rep
7850: 6c 61 63 69 6e 67 20 65 76 65 72 79 20 6f 63 63  lacing every occ
7860: 75 72 72 65 6e 63 65 20 6f 66 20 42 20 77 69 74  urrence of B wit
7870: 68 20 43 2e 20 20 54 68 65 20 6d 61 74 63 68 0a  h C.  The match.
7880: 2a 2a 20 6d 75 73 74 20 62 65 20 65 78 61 63 74  ** must be exact
7890: 2e 20 20 43 6f 6c 6c 61 74 69 6e 67 20 73 65 71  .  Collating seq
78a0: 75 65 6e 63 65 73 20 61 72 65 20 6e 6f 74 20 75  uences are not u
78b0: 73 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  sed..*/.static v
78c0: 6f 69 64 20 72 65 70 6c 61 63 65 46 75 6e 63 28  oid replaceFunc(
78d0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
78e0: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
78f0: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
7900: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
7910: 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  ){.  const unsig
7920: 6e 65 64 20 63 68 61 72 20 2a 7a 53 74 72 3b 20  ned char *zStr; 
7930: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 69 6e         /* The in
7940: 70 75 74 20 73 74 72 69 6e 67 20 41 20 2a 2f 0a  put string A */.
7950: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
7960: 20 63 68 61 72 20 2a 7a 50 61 74 74 65 72 6e 3b   char *zPattern;
7970: 20 20 20 20 2f 2a 20 54 68 65 20 70 61 74 74 65      /* The patte
7980: 72 6e 20 73 74 72 69 6e 67 20 42 20 2a 2f 0a 20  rn string B */. 
7990: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
79a0: 63 68 61 72 20 2a 7a 52 65 70 3b 20 20 20 20 20  char *zRep;     
79b0: 20 20 20 2f 2a 20 54 68 65 20 72 65 70 6c 61 63     /* The replac
79c0: 65 6d 65 6e 74 20 73 74 72 69 6e 67 20 43 20 2a  ement string C *
79d0: 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61  /.  unsigned cha
79e0: 72 20 2a 7a 4f 75 74 3b 20 20 20 20 20 20 20 20  r *zOut;        
79f0: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 6f 75 74        /* The out
7a00: 70 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 53 74  put */.  int nSt
7a10: 72 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  r;              
7a20: 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 53 74    /* Size of zSt
7a30: 72 20 2a 2f 0a 20 20 69 6e 74 20 6e 50 61 74 74  r */.  int nPatt
7a40: 65 72 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20  ern;            
7a50: 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 50 61 74 74  /* Size of zPatt
7a60: 65 72 6e 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65  ern */.  int nRe
7a70: 70 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  p;              
7a80: 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 52 65    /* Size of zRe
7a90: 70 20 2a 2f 0a 20 20 69 36 34 20 6e 4f 75 74 3b  p */.  i64 nOut;
7aa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7ab0: 2f 2a 20 4d 61 78 69 6d 75 6d 20 73 69 7a 65 20  /* Maximum size 
7ac0: 6f 66 20 7a 4f 75 74 20 2a 2f 0a 20 20 69 6e 74  of zOut */.  int
7ad0: 20 6c 6f 6f 70 4c 69 6d 69 74 3b 20 20 20 20 20   loopLimit;     
7ae0: 20 20 20 20 20 20 2f 2a 20 4c 61 73 74 20 7a 53        /* Last zS
7af0: 74 72 5b 5d 20 74 68 61 74 20 6d 69 67 68 74 20  tr[] that might 
7b00: 6d 61 74 63 68 20 7a 50 61 74 74 65 72 6e 5b 5d  match zPattern[]
7b10: 20 2a 2f 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 20   */.  int i, j; 
7b20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
7b30: 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 73 20  * Loop counters 
7b40: 2a 2f 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72  */..  assert( ar
7b50: 67 63 3d 3d 33 20 29 3b 0a 20 20 55 4e 55 53 45  gc==3 );.  UNUSE
7b60: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
7b70: 29 3b 0a 20 20 7a 53 74 72 20 3d 20 73 71 6c 69  );.  zStr = sqli
7b80: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
7b90: 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a  rgv[0]);.  if( z
7ba0: 53 74 72 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b  Str==0 ) return;
7bb0: 0a 20 20 6e 53 74 72 20 3d 20 73 71 6c 69 74 65  .  nStr = sqlite
7bc0: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
7bd0: 67 76 5b 30 5d 29 3b 0a 20 20 61 73 73 65 72 74  gv[0]);.  assert
7be0: 28 20 7a 53 74 72 3d 3d 73 71 6c 69 74 65 33 5f  ( zStr==sqlite3_
7bf0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
7c00: 30 5d 29 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e  0]) );  /* No en
7c10: 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f  coding change */
7c20: 0a 20 20 7a 50 61 74 74 65 72 6e 20 3d 20 73 71  .  zPattern = sq
7c30: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
7c40: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28  (argv[1]);.  if(
7c50: 20 7a 50 61 74 74 65 72 6e 3d 3d 30 20 29 7b 0a   zPattern==0 ){.
7c60: 20 20 20 20 61 73 73 65 72 74 28 20 73 71 6c 69      assert( sqli
7c70: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
7c80: 72 67 76 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f  rgv[1])==SQLITE_
7c90: 4e 55 4c 4c 0a 20 20 20 20 20 20 20 20 20 20 20  NULL.           
7ca0: 20 7c 7c 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74   || sqlite3_cont
7cb0: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
7cc0: 6e 74 65 78 74 29 2d 3e 6d 61 6c 6c 6f 63 46 61  ntext)->mallocFa
7cd0: 69 6c 65 64 20 29 3b 0a 20 20 20 20 72 65 74 75  iled );.    retu
7ce0: 72 6e 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 50  rn;.  }.  if( zP
7cf0: 61 74 74 65 72 6e 5b 30 5d 3d 3d 30 20 29 7b 0a  attern[0]==0 ){.
7d00: 20 20 20 20 61 73 73 65 72 74 28 20 73 71 6c 69      assert( sqli
7d10: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
7d20: 72 67 76 5b 31 5d 29 21 3d 53 51 4c 49 54 45 5f  rgv[1])!=SQLITE_
7d30: 4e 55 4c 4c 20 29 3b 0a 20 20 20 20 73 71 6c 69  NULL );.    sqli
7d40: 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65  te3_result_value
7d50: 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 30  (context, argv[0
7d60: 5d 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  ]);.    return;.
7d70: 20 20 7d 0a 20 20 6e 50 61 74 74 65 72 6e 20 3d    }.  nPattern =
7d80: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
7d90: 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b 0a 20  ytes(argv[1]);. 
7da0: 20 61 73 73 65 72 74 28 20 7a 50 61 74 74 65 72   assert( zPatter
7db0: 6e 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  n==sqlite3_value
7dc0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 20 29  _text(argv[1]) )
7dd0: 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e  ;  /* No encodin
7de0: 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 52  g change */.  zR
7df0: 65 70 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ep = sqlite3_val
7e00: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d 29  ue_text(argv[2])
7e10: 3b 0a 20 20 69 66 28 20 7a 52 65 70 3d 3d 30 20  ;.  if( zRep==0 
7e20: 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 52 65 70  ) return;.  nRep
7e30: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
7e40: 5f 62 79 74 65 73 28 61 72 67 76 5b 32 5d 29 3b  _bytes(argv[2]);
7e50: 0a 20 20 61 73 73 65 72 74 28 20 7a 52 65 70 3d  .  assert( zRep=
7e60: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
7e70: 65 78 74 28 61 72 67 76 5b 32 5d 29 20 29 3b 0a  ext(argv[2]) );.
7e80: 20 20 6e 4f 75 74 20 3d 20 6e 53 74 72 20 2b 20    nOut = nStr + 
7e90: 31 3b 0a 20 20 61 73 73 65 72 74 28 20 6e 4f 75  1;.  assert( nOu
7ea0: 74 3c 53 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e  t<SQLITE_MAX_LEN
7eb0: 47 54 48 20 29 3b 0a 20 20 7a 4f 75 74 20 3d 20  GTH );.  zOut = 
7ec0: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
7ed0: 6e 74 65 78 74 2c 20 28 69 36 34 29 6e 4f 75 74  ntext, (i64)nOut
7ee0: 29 3b 0a 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30  );.  if( zOut==0
7ef0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a   ){.    return;.
7f00: 20 20 7d 0a 20 20 6c 6f 6f 70 4c 69 6d 69 74 20    }.  loopLimit 
7f10: 3d 20 6e 53 74 72 20 2d 20 6e 50 61 74 74 65 72  = nStr - nPatter
7f20: 6e 3b 20 20 0a 20 20 66 6f 72 28 69 3d 6a 3d 30  n;  .  for(i=j=0
7f30: 3b 20 69 3c 3d 6c 6f 6f 70 4c 69 6d 69 74 3b 20  ; i<=loopLimit; 
7f40: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 53  i++){.    if( zS
7f50: 74 72 5b 69 5d 21 3d 7a 50 61 74 74 65 72 6e 5b  tr[i]!=zPattern[
7f60: 30 5d 20 7c 7c 20 6d 65 6d 63 6d 70 28 26 7a 53  0] || memcmp(&zS
7f70: 74 72 5b 69 5d 2c 20 7a 50 61 74 74 65 72 6e 2c  tr[i], zPattern,
7f80: 20 6e 50 61 74 74 65 72 6e 29 20 29 7b 0a 20 20   nPattern) ){.  
7f90: 20 20 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20      zOut[j++] = 
7fa0: 7a 53 74 72 5b 69 5d 3b 0a 20 20 20 20 7d 65 6c  zStr[i];.    }el
7fb0: 73 65 7b 0a 20 20 20 20 20 20 75 38 20 2a 7a 4f  se{.      u8 *zO
7fc0: 6c 64 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  ld;.      sqlite
7fd0: 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  3 *db = sqlite3_
7fe0: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
7ff0: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  e(context);.    
8000: 20 20 6e 4f 75 74 20 2b 3d 20 6e 52 65 70 20 2d    nOut += nRep -
8010: 20 6e 50 61 74 74 65 72 6e 3b 0a 20 20 20 20 20   nPattern;.     
8020: 20 74 65 73 74 63 61 73 65 28 20 6e 4f 75 74 2d   testcase( nOut-
8030: 31 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  1==db->aLimit[SQ
8040: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
8050: 48 5d 20 29 3b 0a 20 20 20 20 20 20 74 65 73 74  H] );.      test
8060: 63 61 73 65 28 20 6e 4f 75 74 2d 32 3d 3d 64 62  case( nOut-2==db
8070: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
8080: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b  LIMIT_LENGTH] );
8090: 0a 20 20 20 20 20 20 69 66 28 20 6e 4f 75 74 2d  .      if( nOut-
80a0: 31 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  1>db->aLimit[SQL
80b0: 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48  ITE_LIMIT_LENGTH
80c0: 5d 20 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c  ] ){.        sql
80d0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
80e0: 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74  r_toobig(context
80f0: 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  );.        sqlit
8100: 65 33 5f 66 72 65 65 28 7a 4f 75 74 29 3b 0a 20  e3_free(zOut);. 
8110: 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20         return;. 
8120: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7a 4f 6c       }.      zOl
8130: 64 20 3d 20 7a 4f 75 74 3b 0a 20 20 20 20 20 20  d = zOut;.      
8140: 7a 4f 75 74 20 3d 20 73 71 6c 69 74 65 33 5f 72  zOut = sqlite3_r
8150: 65 61 6c 6c 6f 63 28 7a 4f 75 74 2c 20 28 69 6e  ealloc(zOut, (in
8160: 74 29 6e 4f 75 74 29 3b 0a 20 20 20 20 20 20 69  t)nOut);.      i
8170: 66 28 20 7a 4f 75 74 3d 3d 30 20 29 7b 0a 20 20  f( zOut==0 ){.  
8180: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
8190: 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d  sult_error_nomem
81a0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 20  (context);.     
81b0: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28     sqlite3_free(
81c0: 7a 4f 6c 64 29 3b 0a 20 20 20 20 20 20 20 20 72  zOld);.        r
81d0: 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20  eturn;.      }. 
81e0: 20 20 20 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75       memcpy(&zOu
81f0: 74 5b 6a 5d 2c 20 7a 52 65 70 2c 20 6e 52 65 70  t[j], zRep, nRep
8200: 29 3b 0a 20 20 20 20 20 20 6a 20 2b 3d 20 6e 52  );.      j += nR
8210: 65 70 3b 0a 20 20 20 20 20 20 69 20 2b 3d 20 6e  ep;.      i += n
8220: 50 61 74 74 65 72 6e 2d 31 3b 0a 20 20 20 20 7d  Pattern-1;.    }
8230: 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 6a  .  }.  assert( j
8240: 2b 6e 53 74 72 2d 69 2b 31 3d 3d 6e 4f 75 74 20  +nStr-i+1==nOut 
8250: 29 3b 0a 20 20 6d 65 6d 63 70 79 28 26 7a 4f 75  );.  memcpy(&zOu
8260: 74 5b 6a 5d 2c 20 26 7a 53 74 72 5b 69 5d 2c 20  t[j], &zStr[i], 
8270: 6e 53 74 72 2d 69 29 3b 0a 20 20 6a 20 2b 3d 20  nStr-i);.  j += 
8280: 6e 53 74 72 20 2d 20 69 3b 0a 20 20 61 73 73 65  nStr - i;.  asse
8290: 72 74 28 20 6a 3c 3d 6e 4f 75 74 20 29 3b 0a 20  rt( j<=nOut );. 
82a0: 20 7a 4f 75 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20   zOut[j] = 0;.  
82b0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74  sqlite3_result_t
82c0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68  ext(context, (ch
82d0: 61 72 2a 29 7a 4f 75 74 2c 20 6a 2c 20 73 71 6c  ar*)zOut, j, sql
82e0: 69 74 65 33 5f 66 72 65 65 29 3b 0a 7d 0a 0a 2f  ite3_free);.}../
82f0: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
8300: 69 6f 6e 20 6f 66 20 74 68 65 20 54 52 49 4d 28  ion of the TRIM(
8310: 29 2c 20 4c 54 52 49 4d 28 29 2c 20 61 6e 64 20  ), LTRIM(), and 
8320: 52 54 52 49 4d 28 29 20 66 75 6e 63 74 69 6f 6e  RTRIM() function
8330: 73 2e 0a 2a 2a 20 54 68 65 20 75 73 65 72 64 61  s..** The userda
8340: 74 61 20 69 73 20 30 78 31 20 66 6f 72 20 6c 65  ta is 0x1 for le
8350: 66 74 20 74 72 69 6d 2c 20 30 78 32 20 66 6f 72  ft trim, 0x2 for
8360: 20 72 69 67 68 74 20 74 72 69 6d 2c 20 30 78 33   right trim, 0x3
8370: 20 66 6f 72 20 62 6f 74 68 2e 0a 2a 2f 0a 73 74   for both..*/.st
8380: 61 74 69 63 20 76 6f 69 64 20 74 72 69 6d 46 75  atic void trimFu
8390: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
83a0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
83b0: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
83c0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
83d0: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  gv.){.  const un
83e0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 49 6e  signed char *zIn
83f0: 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 49 6e 70  ;         /* Inp
8400: 75 74 20 73 74 72 69 6e 67 20 2a 2f 0a 20 20 63  ut string */.  c
8410: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
8420: 61 72 20 2a 7a 43 68 61 72 53 65 74 3b 20 20 20  ar *zCharSet;   
8430: 20 2f 2a 20 53 65 74 20 6f 66 20 63 68 61 72 61   /* Set of chara
8440: 63 74 65 72 73 20 74 6f 20 74 72 69 6d 20 2a 2f  cters to trim */
8450: 0a 20 20 69 6e 74 20 6e 49 6e 3b 20 20 20 20 20  .  int nIn;     
8460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8470: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
8480: 66 20 62 79 74 65 73 20 69 6e 20 69 6e 70 75 74  f bytes in input
8490: 20 2a 2f 0a 20 20 69 6e 74 20 66 6c 61 67 73 3b   */.  int flags;
84a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
84b0: 20 20 20 20 20 20 20 20 2f 2a 20 31 3a 20 74 72          /* 1: tr
84c0: 69 6d 6c 65 66 74 20 20 32 3a 20 74 72 69 6d 72  imleft  2: trimr
84d0: 69 67 68 74 20 20 33 3a 20 74 72 69 6d 20 2a 2f  ight  3: trim */
84e0: 0a 20 20 69 6e 74 20 69 3b 20 20 20 20 20 20 20  .  int i;       
84f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8500: 20 20 20 20 20 2f 2a 20 4c 6f 6f 70 20 63 6f 75       /* Loop cou
8510: 6e 74 65 72 20 2a 2f 0a 20 20 75 6e 73 69 67 6e  nter */.  unsign
8520: 65 64 20 63 68 61 72 20 2a 61 4c 65 6e 20 3d 20  ed char *aLen = 
8530: 30 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c  0;          /* L
8540: 65 6e 67 74 68 20 6f 66 20 65 61 63 68 20 63 68  ength of each ch
8550: 61 72 61 63 74 65 72 20 69 6e 20 7a 43 68 61 72  aracter in zChar
8560: 53 65 74 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65  Set */.  unsigne
8570: 64 20 63 68 61 72 20 2a 2a 61 7a 43 68 61 72 20  d char **azChar 
8580: 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a 20 49 6e  = 0;       /* In
8590: 64 69 76 69 64 75 61 6c 20 63 68 61 72 61 63 74  dividual charact
85a0: 65 72 73 20 69 6e 20 7a 43 68 61 72 53 65 74 20  ers in zCharSet 
85b0: 2a 2f 0a 20 20 69 6e 74 20 6e 43 68 61 72 3b 20  */.  int nChar; 
85c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
85d0: 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72         /* Number
85e0: 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 69   of characters i
85f0: 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a 0a 20  n zCharSet */.. 
8600: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
8610: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
8620: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b  ==SQLITE_NULL ){
8630: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
8640: 0a 20 20 7a 49 6e 20 3d 20 73 71 6c 69 74 65 33  .  zIn = sqlite3
8650: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
8660: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 49 6e 3d  [0]);.  if( zIn=
8670: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e  =0 ) return;.  n
8680: 49 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  In = sqlite3_val
8690: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d  ue_bytes(argv[0]
86a0: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 7a 49 6e  );.  assert( zIn
86b0: 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ==sqlite3_value_
86c0: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b  text(argv[0]) );
86d0: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 31 20 29  .  if( argc==1 )
86e0: 7b 0a 20 20 20 20 73 74 61 74 69 63 20 63 6f 6e  {.    static con
86f0: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
8700: 20 6c 65 6e 4f 6e 65 5b 5d 20 3d 20 7b 20 31 20   lenOne[] = { 1 
8710: 7d 3b 0a 20 20 20 20 73 74 61 74 69 63 20 75 6e  };.    static un
8720: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 20 63 6f  signed char * co
8730: 6e 73 74 20 61 7a 4f 6e 65 5b 5d 20 3d 20 7b 20  nst azOne[] = { 
8740: 28 75 38 2a 29 22 20 22 20 7d 3b 0a 20 20 20 20  (u8*)" " };.    
8750: 6e 43 68 61 72 20 3d 20 31 3b 0a 20 20 20 20 61  nChar = 1;.    a
8760: 4c 65 6e 20 3d 20 28 75 38 2a 29 6c 65 6e 4f 6e  Len = (u8*)lenOn
8770: 65 3b 0a 20 20 20 20 61 7a 43 68 61 72 20 3d 20  e;.    azChar = 
8780: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a  (unsigned char *
8790: 2a 29 61 7a 4f 6e 65 3b 0a 20 20 20 20 7a 43 68  *)azOne;.    zCh
87a0: 61 72 53 65 74 20 3d 20 30 3b 0a 20 20 7d 65 6c  arSet = 0;.  }el
87b0: 73 65 20 69 66 28 20 28 7a 43 68 61 72 53 65 74  se if( (zCharSet
87c0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
87d0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 29 3d  _text(argv[1]))=
87e0: 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  =0 ){.    return
87f0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 63  ;.  }else{.    c
8800: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
8810: 61 72 20 2a 7a 3b 0a 20 20 20 20 66 6f 72 28 7a  ar *z;.    for(z
8820: 3d 7a 43 68 61 72 53 65 74 2c 20 6e 43 68 61 72  =zCharSet, nChar
8830: 3d 30 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29  =0; *z; nChar++)
8840: 7b 0a 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53  {.      SQLITE_S
8850: 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20 20 20  KIP_UTF8(z);.   
8860: 20 7d 0a 20 20 20 20 69 66 28 20 6e 43 68 61 72   }.    if( nChar
8870: 3e 30 20 29 7b 0a 20 20 20 20 20 20 61 7a 43 68  >0 ){.      azCh
8880: 61 72 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c  ar = contextMall
8890: 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36  oc(context, ((i6
88a0: 34 29 6e 43 68 61 72 29 2a 28 73 69 7a 65 6f 66  4)nChar)*(sizeof
88b0: 28 63 68 61 72 2a 29 2b 31 29 29 3b 0a 20 20 20  (char*)+1));.   
88c0: 20 20 20 69 66 28 20 61 7a 43 68 61 72 3d 3d 30     if( azChar==0
88d0: 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75   ){.        retu
88e0: 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  rn;.      }.    
88f0: 20 20 61 4c 65 6e 20 3d 20 28 75 6e 73 69 67 6e    aLen = (unsign
8900: 65 64 20 63 68 61 72 2a 29 26 61 7a 43 68 61 72  ed char*)&azChar
8910: 5b 6e 43 68 61 72 5d 3b 0a 20 20 20 20 20 20 66  [nChar];.      f
8920: 6f 72 28 7a 3d 7a 43 68 61 72 53 65 74 2c 20 6e  or(z=zCharSet, n
8930: 43 68 61 72 3d 30 3b 20 2a 7a 3b 20 6e 43 68 61  Char=0; *z; nCha
8940: 72 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 61 7a  r++){.        az
8950: 43 68 61 72 5b 6e 43 68 61 72 5d 20 3d 20 28 75  Char[nChar] = (u
8960: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 7a  nsigned char *)z
8970: 3b 0a 20 20 20 20 20 20 20 20 53 51 4c 49 54 45  ;.        SQLITE
8980: 5f 53 4b 49 50 5f 55 54 46 38 28 7a 29 3b 0a 20  _SKIP_UTF8(z);. 
8990: 20 20 20 20 20 20 20 61 4c 65 6e 5b 6e 43 68 61         aLen[nCha
89a0: 72 5d 20 3d 20 28 75 38 29 28 7a 20 2d 20 61 7a  r] = (u8)(z - az
89b0: 43 68 61 72 5b 6e 43 68 61 72 5d 29 3b 0a 20 20  Char[nChar]);.  
89c0: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a      }.    }.  }.
89d0: 20 20 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b    if( nChar>0 ){
89e0: 0a 20 20 20 20 66 6c 61 67 73 20 3d 20 53 51 4c  .    flags = SQL
89f0: 49 54 45 5f 50 54 52 5f 54 4f 5f 49 4e 54 28 73  ITE_PTR_TO_INT(s
8a00: 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61  qlite3_user_data
8a10: 28 63 6f 6e 74 65 78 74 29 29 3b 0a 20 20 20 20  (context));.    
8a20: 69 66 28 20 66 6c 61 67 73 20 26 20 31 20 29 7b  if( flags & 1 ){
8a30: 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 6e 49  .      while( nI
8a40: 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69  n>0 ){.        i
8a50: 6e 74 20 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20  nt len = 0;.    
8a60: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e      for(i=0; i<n
8a70: 43 68 61 72 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  Char; i++){.    
8a80: 20 20 20 20 20 20 6c 65 6e 20 3d 20 61 4c 65 6e        len = aLen
8a90: 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69  [i];.          i
8aa0: 66 28 20 6c 65 6e 3c 3d 6e 49 6e 20 26 26 20 6d  f( len<=nIn && m
8ab0: 65 6d 63 6d 70 28 7a 49 6e 2c 20 61 7a 43 68 61  emcmp(zIn, azCha
8ac0: 72 5b 69 5d 2c 20 6c 65 6e 29 3d 3d 30 20 29 20  r[i], len)==0 ) 
8ad0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 7d  break;.        }
8ae0: 0a 20 20 20 20 20 20 20 20 69 66 28 20 69 3e 3d  .        if( i>=
8af0: 6e 43 68 61 72 20 29 20 62 72 65 61 6b 3b 0a 20  nChar ) break;. 
8b00: 20 20 20 20 20 20 20 7a 49 6e 20 2b 3d 20 6c 65         zIn += le
8b10: 6e 3b 0a 20 20 20 20 20 20 20 20 6e 49 6e 20 2d  n;.        nIn -
8b20: 3d 20 6c 65 6e 3b 0a 20 20 20 20 20 20 7d 0a 20  = len;.      }. 
8b30: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 66 6c 61     }.    if( fla
8b40: 67 73 20 26 20 32 20 29 7b 0a 20 20 20 20 20 20  gs & 2 ){.      
8b50: 77 68 69 6c 65 28 20 6e 49 6e 3e 30 20 29 7b 0a  while( nIn>0 ){.
8b60: 20 20 20 20 20 20 20 20 69 6e 74 20 6c 65 6e 20          int len 
8b70: 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 66 6f 72  = 0;.        for
8b80: 28 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20 69  (i=0; i<nChar; i
8b90: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 6c  ++){.          l
8ba0: 65 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20 20  en = aLen[i];.  
8bb0: 20 20 20 20 20 20 20 20 69 66 28 20 6c 65 6e 3c          if( len<
8bc0: 3d 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28 26  =nIn && memcmp(&
8bd0: 7a 49 6e 5b 6e 49 6e 2d 6c 65 6e 5d 2c 61 7a 43  zIn[nIn-len],azC
8be0: 68 61 72 5b 69 5d 2c 6c 65 6e 29 3d 3d 30 20 29  har[i],len)==0 )
8bf0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20   break;.        
8c00: 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 69 3e  }.        if( i>
8c10: 3d 6e 43 68 61 72 20 29 20 62 72 65 61 6b 3b 0a  =nChar ) break;.
8c20: 20 20 20 20 20 20 20 20 6e 49 6e 20 2d 3d 20 6c          nIn -= l
8c30: 65 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  en;.      }.    
8c40: 7d 0a 20 20 20 20 69 66 28 20 7a 43 68 61 72 53  }.    if( zCharS
8c50: 65 74 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  et ){.      sqli
8c60: 74 65 33 5f 66 72 65 65 28 61 7a 43 68 61 72 29  te3_free(azChar)
8c70: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71  ;.    }.  }.  sq
8c80: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
8c90: 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72  t(context, (char
8ca0: 2a 29 7a 49 6e 2c 20 6e 49 6e 2c 20 53 51 4c 49  *)zIn, nIn, SQLI
8cb0: 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 7d  TE_TRANSIENT);.}
8cc0: 0a 0a 0a 2f 2a 20 49 4d 50 3a 20 52 2d 32 35 33  .../* IMP: R-253
8cd0: 36 31 2d 31 36 31 35 30 20 54 68 69 73 20 66 75  61-16150 This fu
8ce0: 6e 63 74 69 6f 6e 20 69 73 20 6f 6d 69 74 74 65  nction is omitte
8cf0: 64 20 66 72 6f 6d 20 53 51 4c 69 74 65 20 62 79  d from SQLite by
8d00: 20 64 65 66 61 75 6c 74 2e 20 49 74 0a 2a 2a 20   default. It.** 
8d10: 69 73 20 6f 6e 6c 79 20 61 76 61 69 6c 61 62 6c  is only availabl
8d20: 65 20 69 66 20 74 68 65 20 53 51 4c 49 54 45 5f  e if the SQLITE_
8d30: 53 4f 55 4e 44 45 58 20 63 6f 6d 70 69 6c 65 2d  SOUNDEX compile-
8d40: 74 69 6d 65 20 6f 70 74 69 6f 6e 20 69 73 20 75  time option is u
8d50: 73 65 64 0a 2a 2a 20 77 68 65 6e 20 53 51 4c 69  sed.** when SQLi
8d60: 74 65 20 69 73 20 62 75 69 6c 74 2e 0a 2a 2f 0a  te is built..*/.
8d70: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f  #ifdef SQLITE_SO
8d80: 55 4e 44 45 58 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70  UNDEX./*.** Comp
8d90: 75 74 65 20 74 68 65 20 73 6f 75 6e 64 65 78 20  ute the soundex 
8da0: 65 6e 63 6f 64 69 6e 67 20 6f 66 20 61 20 77 6f  encoding of a wo
8db0: 72 64 2e 0a 2a 2a 0a 2a 2a 20 49 4d 50 3a 20 52  rd..**.** IMP: R
8dc0: 2d 35 39 37 38 32 2d 30 30 30 37 32 20 54 68 65  -59782-00072 The
8dd0: 20 73 6f 75 6e 64 65 78 28 58 29 20 66 75 6e 63   soundex(X) func
8de0: 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 61 20 73  tion returns a s
8df0: 74 72 69 6e 67 20 74 68 61 74 20 69 73 20 74 68  tring that is th
8e00: 65 0a 2a 2a 20 73 6f 75 6e 64 65 78 20 65 6e 63  e.** soundex enc
8e10: 6f 64 69 6e 67 20 6f 66 20 74 68 65 20 73 74 72  oding of the str
8e20: 69 6e 67 20 58 2e 20 0a 2a 2f 0a 73 74 61 74 69  ing X. .*/.stati
8e30: 63 20 76 6f 69 64 20 73 6f 75 6e 64 65 78 46 75  c void soundexFu
8e40: 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f  nc(.  sqlite3_co
8e50: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a  ntext *context,.
8e60: 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71    int argc,.  sq
8e70: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
8e80: 67 76 0a 29 7b 0a 20 20 63 68 61 72 20 7a 52 65  gv.){.  char zRe
8e90: 73 75 6c 74 5b 38 5d 3b 0a 20 20 63 6f 6e 73 74  sult[8];.  const
8ea0: 20 75 38 20 2a 7a 49 6e 3b 0a 20 20 69 6e 74 20   u8 *zIn;.  int 
8eb0: 69 2c 20 6a 3b 0a 20 20 73 74 61 74 69 63 20 63  i, j;.  static c
8ec0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
8ed0: 61 72 20 69 43 6f 64 65 5b 5d 20 3d 20 7b 0a 20  ar iCode[] = {. 
8ee0: 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30     0, 0, 0, 0, 0
8ef0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8f00: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
8f10: 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20  0,.    0, 0, 0, 
8f20: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
8f30: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8f40: 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c   0, 0,.    0, 0,
8f50: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
8f60: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
8f70: 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30  , 0, 0, 0,.    0
8f80: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
8f90: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
8fa0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20  0, 0, 0, 0, 0,. 
8fb0: 20 20 20 30 2c 20 30 2c 20 31 2c 20 32 2c 20 33     0, 0, 1, 2, 3
8fc0: 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c 20 30 2c  , 0, 1, 2, 0, 0,
8fd0: 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20 35 2c 20   2, 2, 4, 5, 5, 
8fe0: 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20 36 2c 20  0,.    1, 2, 6, 
8ff0: 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30 2c 20 32  2, 3, 0, 1, 0, 2
9000: 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 2, 0, 0, 0,
9010: 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c   0, 0,.    0, 0,
9020: 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20   1, 2, 3, 0, 1, 
9030: 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32 2c 20 34  2, 0, 0, 2, 2, 4
9040: 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20 20 20 31  , 5, 5, 0,.    1
9050: 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c 20 30 2c  , 2, 6, 2, 3, 0,
9060: 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20 32 2c 20   1, 0, 2, 0, 2, 
9070: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20  0, 0, 0, 0, 0,. 
9080: 20 7d 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72   };.  assert( ar
9090: 67 63 3d 3d 31 20 29 3b 0a 20 20 7a 49 6e 20 3d  gc==1 );.  zIn =
90a0: 20 28 75 38 2a 29 73 71 6c 69 74 65 33 5f 76 61   (u8*)sqlite3_va
90b0: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
90c0: 29 3b 0a 20 20 69 66 28 20 7a 49 6e 3d 3d 30 20  );.  if( zIn==0 
90d0: 29 20 7a 49 6e 20 3d 20 28 75 38 2a 29 22 22 3b  ) zIn = (u8*)"";
90e0: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 7a 49 6e 5b  .  for(i=0; zIn[
90f0: 69 5d 20 26 26 20 21 73 71 6c 69 74 65 33 49 73  i] && !sqlite3Is
9100: 61 6c 70 68 61 28 7a 49 6e 5b 69 5d 29 3b 20 69  alpha(zIn[i]); i
9110: 2b 2b 29 7b 7d 0a 20 20 69 66 28 20 7a 49 6e 5b  ++){}.  if( zIn[
9120: 69 5d 20 29 7b 0a 20 20 20 20 75 38 20 70 72 65  i] ){.    u8 pre
9130: 76 63 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49  vcode = iCode[zI
9140: 6e 5b 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20  n[i]&0x7f];.    
9150: 7a 52 65 73 75 6c 74 5b 30 5d 20 3d 20 73 71 6c  zResult[0] = sql
9160: 69 74 65 33 54 6f 75 70 70 65 72 28 7a 49 6e 5b  ite3Toupper(zIn[
9170: 69 5d 29 3b 0a 20 20 20 20 66 6f 72 28 6a 3d 31  i]);.    for(j=1
9180: 3b 20 6a 3c 34 20 26 26 20 7a 49 6e 5b 69 5d 3b  ; j<4 && zIn[i];
9190: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74   i++){.      int
91a0: 20 63 6f 64 65 20 3d 20 69 43 6f 64 65 5b 7a 49   code = iCode[zI
91b0: 6e 5b 69 5d 26 30 78 37 66 5d 3b 0a 20 20 20 20  n[i]&0x7f];.    
91c0: 20 20 69 66 28 20 63 6f 64 65 3e 30 20 29 7b 0a    if( code>0 ){.
91d0: 20 20 20 20 20 20 20 20 69 66 28 20 63 6f 64 65          if( code
91e0: 21 3d 70 72 65 76 63 6f 64 65 20 29 7b 0a 20 20  !=prevcode ){.  
91f0: 20 20 20 20 20 20 20 20 70 72 65 76 63 6f 64 65          prevcode
9200: 20 3d 20 63 6f 64 65 3b 0a 20 20 20 20 20 20 20   = code;.       
9210: 20 20 20 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20     zResult[j++] 
9220: 3d 20 63 6f 64 65 20 2b 20 27 30 27 3b 0a 20 20  = code + '0';.  
9230: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 65        }.      }e
9240: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 70 72 65  lse{.        pre
9250: 76 63 6f 64 65 20 3d 20 30 3b 0a 20 20 20 20 20  vcode = 0;.     
9260: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 77 68 69   }.    }.    whi
9270: 6c 65 28 20 6a 3c 34 20 29 7b 0a 20 20 20 20 20  le( j<4 ){.     
9280: 20 7a 52 65 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20   zResult[j++] = 
9290: 27 30 27 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a  '0';.    }.    z
92a0: 52 65 73 75 6c 74 5b 6a 5d 20 3d 20 30 3b 0a 20  Result[j] = 0;. 
92b0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
92c0: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
92d0: 7a 52 65 73 75 6c 74 2c 20 34 2c 20 53 51 4c 49  zResult, 4, SQLI
92e0: 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20  TE_TRANSIENT);. 
92f0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 49   }else{.    /* I
9300: 4d 50 3a 20 52 2d 36 34 38 39 34 2d 35 30 33 32  MP: R-64894-5032
9310: 31 20 54 68 65 20 73 74 72 69 6e 67 20 22 3f 30  1 The string "?0
9320: 30 30 22 20 69 73 20 72 65 74 75 72 6e 65 64 20  00" is returned 
9330: 69 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 0a  if the argument.
9340: 20 20 20 20 2a 2a 20 69 73 20 4e 55 4c 4c 20 6f      ** is NULL o
9350: 72 20 63 6f 6e 74 61 69 6e 73 20 6e 6f 20 41 53  r contains no AS
9360: 43 49 49 20 61 6c 70 68 61 62 65 74 69 63 20 63  CII alphabetic c
9370: 68 61 72 61 63 74 65 72 73 2e 20 2a 2f 0a 20 20  haracters. */.  
9380: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
9390: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 22  _text(context, "
93a0: 3f 30 30 30 22 2c 20 34 2c 20 53 51 4c 49 54 45  ?000", 4, SQLITE
93b0: 5f 53 54 41 54 49 43 29 3b 0a 20 20 7d 0a 7d 0a  _STATIC);.  }.}.
93c0: 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45  #endif /* SQLITE
93d0: 5f 53 4f 55 4e 44 45 58 20 2a 2f 0a 0a 23 69 66  _SOUNDEX */..#if
93e0: 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54  ndef SQLITE_OMIT
93f0: 5f 4c 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e 0a  _LOAD_EXTENSION.
9400: 2f 2a 0a 2a 2a 20 41 20 66 75 6e 63 74 69 6f 6e  /*.** A function
9410: 20 74 68 61 74 20 6c 6f 61 64 73 20 61 20 73 68   that loads a sh
9420: 61 72 65 64 2d 6c 69 62 72 61 72 79 20 65 78 74  ared-library ext
9430: 65 6e 73 69 6f 6e 20 74 68 65 6e 20 72 65 74 75  ension then retu
9440: 72 6e 73 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61  rns NULL..*/.sta
9450: 74 69 63 20 76 6f 69 64 20 6c 6f 61 64 45 78 74  tic void loadExt
9460: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
9470: 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61   *context, int a
9480: 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  rgc, sqlite3_val
9490: 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 6f  ue **argv){.  co
94a0: 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 20  nst char *zFile 
94b0: 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 29  = (const char *)
94c0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65  sqlite3_value_te
94d0: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 63  xt(argv[0]);.  c
94e0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 72 6f 63  onst char *zProc
94f0: 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20  ;.  sqlite3 *db 
9500: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
9510: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
9520: 65 78 74 29 3b 0a 20 20 63 68 61 72 20 2a 7a 45  ext);.  char *zE
9530: 72 72 4d 73 67 20 3d 20 30 3b 0a 0a 20 20 69 66  rrMsg = 0;..  if
9540: 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20  ( argc==2 ){.   
9550: 20 7a 50 72 6f 63 20 3d 20 28 63 6f 6e 73 74 20   zProc = (const 
9560: 63 68 61 72 20 2a 29 73 71 6c 69 74 65 33 5f 76  char *)sqlite3_v
9570: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31  alue_text(argv[1
9580: 5d 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ]);.  }else{.   
9590: 20 7a 50 72 6f 63 20 3d 20 30 3b 0a 20 20 7d 0a   zProc = 0;.  }.
95a0: 20 20 69 66 28 20 7a 46 69 6c 65 20 26 26 20 73    if( zFile && s
95b0: 71 6c 69 74 65 33 5f 6c 6f 61 64 5f 65 78 74 65  qlite3_load_exte
95c0: 6e 73 69 6f 6e 28 64 62 2c 20 7a 46 69 6c 65 2c  nsion(db, zFile,
95d0: 20 7a 50 72 6f 63 2c 20 26 7a 45 72 72 4d 73 67   zProc, &zErrMsg
95e0: 29 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  ) ){.    sqlite3
95f0: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
9600: 6e 74 65 78 74 2c 20 7a 45 72 72 4d 73 67 2c 20  ntext, zErrMsg, 
9610: 2d 31 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  -1);.    sqlite3
9620: 5f 66 72 65 65 28 7a 45 72 72 4d 73 67 29 3b 0a  _free(zErrMsg);.
9630: 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 0a 2f    }.}.#endif.../
9640: 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65  *.** An instance
9650: 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e   of the followin
9660: 67 20 73 74 72 75 63 74 75 72 65 20 68 6f 6c 64  g structure hold
9670: 73 20 74 68 65 20 63 6f 6e 74 65 78 74 20 6f 66  s the context of
9680: 20 61 0a 2a 2a 20 73 75 6d 28 29 20 6f 72 20 61   a.** sum() or a
9690: 76 67 28 29 20 61 67 67 72 65 67 61 74 65 20 63  vg() aggregate c
96a0: 6f 6d 70 75 74 61 74 69 6f 6e 2e 0a 2a 2f 0a 74  omputation..*/.t
96b0: 79 70 65 64 65 66 20 73 74 72 75 63 74 20 53 75  ypedef struct Su
96c0: 6d 43 74 78 20 53 75 6d 43 74 78 3b 0a 73 74 72  mCtx SumCtx;.str
96d0: 75 63 74 20 53 75 6d 43 74 78 20 7b 0a 20 20 64  uct SumCtx {.  d
96e0: 6f 75 62 6c 65 20 72 53 75 6d 3b 20 20 20 20 20  ouble rSum;     
96f0: 20 2f 2a 20 46 6c 6f 61 74 69 6e 67 20 70 6f 69   /* Floating poi
9700: 6e 74 20 73 75 6d 20 2a 2f 0a 20 20 69 36 34 20  nt sum */.  i64 
9710: 69 53 75 6d 3b 20 20 20 20 20 20 20 20 20 2f 2a  iSum;         /*
9720: 20 49 6e 74 65 67 65 72 20 73 75 6d 20 2a 2f 20   Integer sum */ 
9730: 20 20 0a 20 20 69 36 34 20 63 6e 74 3b 20 20 20    .  i64 cnt;   
9740: 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72         /* Number
9750: 20 6f 66 20 65 6c 65 6d 65 6e 74 73 20 73 75 6d   of elements sum
9760: 6d 65 64 20 2a 2f 0a 20 20 75 38 20 6f 76 65 72  med */.  u8 over
9770: 66 6c 6f 77 3b 20 20 20 20 20 20 2f 2a 20 54 72  flow;      /* Tr
9780: 75 65 20 69 66 20 69 6e 74 65 67 65 72 20 6f 76  ue if integer ov
9790: 65 72 66 6c 6f 77 20 73 65 65 6e 20 2a 2f 0a 20  erflow seen */. 
97a0: 20 75 38 20 61 70 70 72 6f 78 3b 20 20 20 20 20   u8 approx;     
97b0: 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 6e 6f     /* True if no
97c0: 6e 2d 69 6e 74 65 67 65 72 20 76 61 6c 75 65 20  n-integer value 
97d0: 77 61 73 20 69 6e 70 75 74 20 74 6f 20 74 68 65  was input to the
97e0: 20 73 75 6d 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a   sum */.};../*.*
97f0: 2a 20 52 6f 75 74 69 6e 65 73 20 75 73 65 64 20  * Routines used 
9800: 74 6f 20 63 6f 6d 70 75 74 65 20 74 68 65 20 73  to compute the s
9810: 75 6d 2c 20 61 76 65 72 61 67 65 2c 20 61 6e 64  um, average, and
9820: 20 74 6f 74 61 6c 2e 0a 2a 2a 0a 2a 2a 20 54 68   total..**.** Th
9830: 65 20 53 55 4d 28 29 20 66 75 6e 63 74 69 6f 6e  e SUM() function
9840: 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 28 62 72   follows the (br
9850: 6f 6b 65 6e 29 20 53 51 4c 20 73 74 61 6e 64 61  oken) SQL standa
9860: 72 64 20 77 68 69 63 68 20 6d 65 61 6e 73 0a 2a  rd which means.*
9870: 2a 20 74 68 61 74 20 69 74 20 72 65 74 75 72 6e  * that it return
9880: 73 20 4e 55 4c 4c 20 69 66 20 69 74 20 73 75 6d  s NULL if it sum
9890: 73 20 6f 76 65 72 20 6e 6f 20 69 6e 70 75 74 73  s over no inputs
98a0: 2e 20 20 54 4f 54 41 4c 20 72 65 74 75 72 6e 73  .  TOTAL returns
98b0: 0a 2a 2a 20 30 2e 30 20 69 6e 20 74 68 61 74 20  .** 0.0 in that 
98c0: 63 61 73 65 2e 20 20 49 6e 20 61 64 64 69 74 69  case.  In additi
98d0: 6f 6e 2c 20 54 4f 54 41 4c 20 61 6c 77 61 79 73  on, TOTAL always
98e0: 20 72 65 74 75 72 6e 73 20 61 20 66 6c 6f 61 74   returns a float
98f0: 20 77 68 65 72 65 0a 2a 2a 20 53 55 4d 20 6d 69   where.** SUM mi
9900: 67 68 74 20 72 65 74 75 72 6e 20 61 6e 20 69 6e  ght return an in
9910: 74 65 67 65 72 20 69 66 20 69 74 20 6e 65 76 65  teger if it neve
9920: 72 20 65 6e 63 6f 75 6e 74 65 72 73 20 61 20 66  r encounters a f
9930: 6c 6f 61 74 69 6e 67 20 70 6f 69 6e 74 0a 2a 2a  loating point.**
9940: 20 76 61 6c 75 65 2e 20 20 54 4f 54 41 4c 20 6e   value.  TOTAL n
9950: 65 76 65 72 20 66 61 69 6c 73 2c 20 62 75 74 20  ever fails, but 
9960: 53 55 4d 20 6d 69 67 68 74 20 74 68 72 6f 75 67  SUM might throug
9970: 68 20 61 6e 20 65 78 63 65 70 74 69 6f 6e 20 69  h an exception i
9980: 66 0a 2a 2a 20 69 74 20 6f 76 65 72 66 6c 6f 77  f.** it overflow
9990: 73 20 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a 2f  s an integer..*/
99a0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 75 6d  .static void sum
99b0: 53 74 65 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Step(sqlite3_con
99c0: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
99d0: 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33  nt argc, sqlite3
99e0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a  _value **argv){.
99f0: 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 69    SumCtx *p;.  i
9a00: 6e 74 20 74 79 70 65 3b 0a 20 20 61 73 73 65 72  nt type;.  asser
9a10: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
9a20: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
9a30: 28 61 72 67 63 29 3b 0a 20 20 70 20 3d 20 73 71  (argc);.  p = sq
9a40: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
9a50: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
9a60: 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20   sizeof(*p));.  
9a70: 74 79 70 65 20 3d 20 73 71 6c 69 74 65 33 5f 76  type = sqlite3_v
9a80: 61 6c 75 65 5f 6e 75 6d 65 72 69 63 5f 74 79 70  alue_numeric_typ
9a90: 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66  e(argv[0]);.  if
9aa0: 28 20 70 20 26 26 20 74 79 70 65 21 3d 53 51 4c  ( p && type!=SQL
9ab0: 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20  ITE_NULL ){.    
9ac0: 70 2d 3e 63 6e 74 2b 2b 3b 0a 20 20 20 20 69 66  p->cnt++;.    if
9ad0: 28 20 74 79 70 65 3d 3d 53 51 4c 49 54 45 5f 49  ( type==SQLITE_I
9ae0: 4e 54 45 47 45 52 20 29 7b 0a 20 20 20 20 20 20  NTEGER ){.      
9af0: 69 36 34 20 76 20 3d 20 73 71 6c 69 74 65 33 5f  i64 v = sqlite3_
9b00: 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67 76  value_int64(argv
9b10: 5b 30 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e 72  [0]);.      p->r
9b20: 53 75 6d 20 2b 3d 20 76 3b 0a 20 20 20 20 20 20  Sum += v;.      
9b30: 69 66 28 20 28 70 2d 3e 61 70 70 72 6f 78 7c 70  if( (p->approx|p
9b40: 2d 3e 6f 76 65 72 66 6c 6f 77 29 3d 3d 30 20 26  ->overflow)==0 &
9b50: 26 20 73 71 6c 69 74 65 33 41 64 64 49 6e 74 36  & sqlite3AddInt6
9b60: 34 28 26 70 2d 3e 69 53 75 6d 2c 20 76 29 20 29  4(&p->iSum, v) )
9b70: 7b 0a 20 20 20 20 20 20 20 20 70 2d 3e 6f 76 65  {.        p->ove
9b80: 72 66 6c 6f 77 20 3d 20 31 3b 0a 20 20 20 20 20  rflow = 1;.     
9b90: 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20   }.    }else{.  
9ba0: 20 20 20 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 73      p->rSum += s
9bb0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75  qlite3_value_dou
9bc0: 62 6c 65 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  ble(argv[0]);.  
9bd0: 20 20 20 20 70 2d 3e 61 70 70 72 6f 78 20 3d 20      p->approx = 
9be0: 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73  1;.    }.  }.}.s
9bf0: 74 61 74 69 63 20 76 6f 69 64 20 73 75 6d 46 69  tatic void sumFi
9c00: 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63  nalize(sqlite3_c
9c10: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29  ontext *context)
9c20: 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20  {.  SumCtx *p;. 
9c30: 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67   p = sqlite3_agg
9c40: 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63  regate_context(c
9c50: 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66  ontext, 0);.  if
9c60: 28 20 70 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20  ( p && p->cnt>0 
9c70: 29 7b 0a 20 20 20 20 69 66 28 20 70 2d 3e 6f 76  ){.    if( p->ov
9c80: 65 72 66 6c 6f 77 20 29 7b 0a 20 20 20 20 20 20  erflow ){.      
9c90: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
9ca0: 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 22 69 6e  rror(context,"in
9cb0: 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77 22 2c  teger overflow",
9cc0: 2d 31 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69  -1);.    }else i
9cd0: 66 28 20 70 2d 3e 61 70 70 72 6f 78 20 29 7b 0a  f( p->approx ){.
9ce0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
9cf0: 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74  sult_double(cont
9d00: 65 78 74 2c 20 70 2d 3e 72 53 75 6d 29 3b 0a 20  ext, p->rSum);. 
9d10: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
9d20: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
9d30: 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 70 2d  nt64(context, p-
9d40: 3e 69 53 75 6d 29 3b 0a 20 20 20 20 7d 0a 20 20  >iSum);.    }.  
9d50: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
9d60: 61 76 67 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69  avgFinalize(sqli
9d70: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
9d80: 74 65 78 74 29 7b 0a 20 20 53 75 6d 43 74 78 20  text){.  SumCtx 
9d90: 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65  *p;.  p = sqlite
9da0: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
9db0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b  ext(context, 0);
9dc0: 0a 20 20 69 66 28 20 70 20 26 26 20 70 2d 3e 63  .  if( p && p->c
9dd0: 6e 74 3e 30 20 29 7b 0a 20 20 20 20 73 71 6c 69  nt>0 ){.    sqli
9de0: 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c  te3_result_doubl
9df0: 65 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 72 53  e(context, p->rS
9e00: 75 6d 2f 28 64 6f 75 62 6c 65 29 70 2d 3e 63 6e  um/(double)p->cn
9e10: 74 29 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63  t);.  }.}.static
9e20: 20 76 6f 69 64 20 74 6f 74 61 6c 46 69 6e 61 6c   void totalFinal
9e30: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
9e40: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
9e50: 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20   SumCtx *p;.  p 
9e60: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
9e70: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
9e80: 65 78 74 2c 20 30 29 3b 0a 20 20 2f 2a 20 28 64  ext, 0);.  /* (d
9e90: 6f 75 62 6c 65 29 30 20 49 6e 20 63 61 73 65 20  ouble)0 In case 
9ea0: 6f 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46  of SQLITE_OMIT_F
9eb0: 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 2e 2e 2e  LOATING_POINT...
9ec0: 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 72 65   */.  sqlite3_re
9ed0: 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74  sult_double(cont
9ee0: 65 78 74 2c 20 70 20 3f 20 70 2d 3e 72 53 75 6d  ext, p ? p->rSum
9ef0: 20 3a 20 28 64 6f 75 62 6c 65 29 30 29 3b 0a 7d   : (double)0);.}
9f00: 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c  ../*.** The foll
9f10: 6f 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 20  owing structure 
9f20: 6b 65 65 70 73 20 74 72 61 63 6b 20 6f 66 20 73  keeps track of s
9f30: 74 61 74 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e  tate information
9f40: 20 66 6f 72 20 74 68 65 0a 2a 2a 20 63 6f 75 6e   for the.** coun
9f50: 74 28 29 20 61 67 67 72 65 67 61 74 65 20 66 75  t() aggregate fu
9f60: 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64  nction..*/.typed
9f70: 65 66 20 73 74 72 75 63 74 20 43 6f 75 6e 74 43  ef struct CountC
9f80: 74 78 20 43 6f 75 6e 74 43 74 78 3b 0a 73 74 72  tx CountCtx;.str
9f90: 75 63 74 20 43 6f 75 6e 74 43 74 78 20 7b 0a 20  uct CountCtx {. 
9fa0: 20 69 36 34 20 6e 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a   i64 n;.};../*.*
9fb0: 2a 20 52 6f 75 74 69 6e 65 73 20 74 6f 20 69 6d  * Routines to im
9fc0: 70 6c 65 6d 65 6e 74 20 74 68 65 20 63 6f 75 6e  plement the coun
9fd0: 74 28 29 20 61 67 67 72 65 67 61 74 65 20 66 75  t() aggregate fu
9fe0: 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69  nction..*/.stati
9ff0: 63 20 76 6f 69 64 20 63 6f 75 6e 74 53 74 65 70  c void countStep
a000: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
a010: 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61   *context, int a
a020: 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  rgc, sqlite3_val
a030: 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 43 6f  ue **argv){.  Co
a040: 75 6e 74 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d  untCtx *p;.  p =
a050: 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61   sqlite3_aggrega
a060: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
a070: 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b  xt, sizeof(*p));
a080: 0a 20 20 69 66 28 20 28 61 72 67 63 3d 3d 30 20  .  if( (argc==0 
a090: 7c 7c 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 21 3d  || SQLITE_NULL!=
a0a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79  sqlite3_value_ty
a0b0: 70 65 28 61 72 67 76 5b 30 5d 29 29 20 26 26 20  pe(argv[0])) && 
a0c0: 70 20 29 7b 0a 20 20 20 20 70 2d 3e 6e 2b 2b 3b  p ){.    p->n++;
a0d0: 0a 20 20 7d 0a 0a 23 69 66 6e 64 65 66 20 53 51  .  }..#ifndef SQ
a0e0: 4c 49 54 45 5f 4f 4d 49 54 5f 44 45 50 52 45 43  LITE_OMIT_DEPREC
a0f0: 41 54 45 44 0a 20 20 2f 2a 20 54 68 65 20 73 71  ATED.  /* The sq
a100: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
a110: 63 6f 75 6e 74 28 29 20 66 75 6e 63 74 69 6f 6e  count() function
a120: 20 69 73 20 64 65 70 72 65 63 61 74 65 64 2e 20   is deprecated. 
a130: 20 42 75 74 20 6a 75 73 74 20 74 6f 20 6d 61 6b   But just to mak
a140: 65 0a 20 20 2a 2a 20 73 75 72 65 20 69 74 20 73  e.  ** sure it s
a150: 74 69 6c 6c 20 6f 70 65 72 61 74 65 73 20 63 6f  till operates co
a160: 72 72 65 63 74 6c 79 2c 20 76 65 72 69 66 79 20  rrectly, verify 
a170: 74 68 61 74 20 69 74 73 20 63 6f 75 6e 74 20 61  that its count a
a180: 67 72 65 65 73 20 77 69 74 68 20 6f 75 72 20 0a  grees with our .
a190: 20 20 2a 2a 20 69 6e 74 65 72 6e 61 6c 20 63 6f    ** internal co
a1a0: 75 6e 74 20 77 68 65 6e 20 75 73 69 6e 67 20 63  unt when using c
a1b0: 6f 75 6e 74 28 2a 29 20 61 6e 64 20 77 68 65 6e  ount(*) and when
a1c0: 20 74 68 65 20 74 6f 74 61 6c 20 63 6f 75 6e 74   the total count
a1d0: 20 63 61 6e 20 62 65 0a 20 20 2a 2a 20 65 78 70   can be.  ** exp
a1e0: 72 65 73 73 65 64 20 61 73 20 61 20 33 32 2d 62  ressed as a 32-b
a1f0: 69 74 20 69 6e 74 65 67 65 72 2e 20 2a 2f 0a 20  it integer. */. 
a200: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
a210: 20 7c 7c 20 70 3d 3d 30 20 7c 7c 20 70 2d 3e 6e   || p==0 || p->n
a220: 3e 30 78 37 66 66 66 66 66 66 66 0a 20 20 20 20  >0x7fffffff.    
a230: 20 20 20 20 20 20 7c 7c 20 70 2d 3e 6e 3d 3d 73        || p->n==s
a240: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
a250: 5f 63 6f 75 6e 74 28 63 6f 6e 74 65 78 74 29 20  _count(context) 
a260: 29 3b 0a 23 65 6e 64 69 66 0a 7d 20 20 20 0a 73  );.#endif.}   .s
a270: 74 61 74 69 63 20 76 6f 69 64 20 63 6f 75 6e 74  tatic void count
a280: 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33  Finalize(sqlite3
a290: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
a2a0: 74 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a  t){.  CountCtx *
a2b0: 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  p;.  p = sqlite3
a2c0: 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65  _aggregate_conte
a2d0: 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a  xt(context, 0);.
a2e0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
a2f0: 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c 20  _int64(context, 
a300: 70 20 3f 20 70 2d 3e 6e 20 3a 20 30 29 3b 0a 7d  p ? p->n : 0);.}
a310: 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73  ../*.** Routines
a320: 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 6d 69   to implement mi
a330: 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20 61 67  n() and max() ag
a340: 67 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f 6e  gregate function
a350: 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  s..*/.static voi
a360: 64 20 6d 69 6e 6d 61 78 53 74 65 70 28 0a 20 20  d minmaxStep(.  
a370: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
a380: 2a 63 6f 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74  *context, .  int
a390: 20 4e 6f 74 55 73 65 64 2c 20 0a 20 20 73 71 6c   NotUsed, .  sql
a3a0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
a3b0: 76 0a 29 7b 0a 20 20 4d 65 6d 20 2a 70 41 72 67  v.){.  Mem *pArg
a3c0: 20 20 3d 20 28 4d 65 6d 20 2a 29 61 72 67 76 5b    = (Mem *)argv[
a3d0: 30 5d 3b 0a 20 20 4d 65 6d 20 2a 70 42 65 73 74  0];.  Mem *pBest
a3e0: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
a3f0: 45 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a 0a  ETER(NotUsed);..
a400: 20 20 70 42 65 73 74 20 3d 20 28 4d 65 6d 20 2a    pBest = (Mem *
a410: 29 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61  )sqlite3_aggrega
a420: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
a430: 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 42 65 73  xt, sizeof(*pBes
a440: 74 29 29 3b 0a 20 20 69 66 28 20 21 70 42 65 73  t));.  if( !pBes
a450: 74 20 29 20 72 65 74 75 72 6e 3b 0a 0a 20 20 69  t ) return;..  i
a460: 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  f( sqlite3_value
a470: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d  _type(argv[0])==
a480: 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20  SQLITE_NULL ){. 
a490: 20 20 20 69 66 28 20 70 42 65 73 74 2d 3e 66 6c     if( pBest->fl
a4a0: 61 67 73 20 29 20 73 71 6c 69 74 65 33 53 6b 69  ags ) sqlite3Ski
a4b0: 70 41 63 63 75 6d 75 6c 61 74 6f 72 4c 6f 61 64  pAccumulatorLoad
a4c0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65 6c  (context);.  }el
a4d0: 73 65 20 69 66 28 20 70 42 65 73 74 2d 3e 66 6c  se if( pBest->fl
a4e0: 61 67 73 20 29 7b 0a 20 20 20 20 69 6e 74 20 6d  ags ){.    int m
a4f0: 61 78 3b 0a 20 20 20 20 69 6e 74 20 63 6d 70 3b  ax;.    int cmp;
a500: 0a 20 20 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43  .    CollSeq *pC
a510: 6f 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47 65 74  oll = sqlite3Get
a520: 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f 6e 74  FuncCollSeq(cont
a530: 65 78 74 29 3b 0a 20 20 20 20 2f 2a 20 54 68 69  ext);.    /* Thi
a540: 73 20 73 74 65 70 20 66 75 6e 63 74 69 6f 6e 20  s step function 
a550: 69 73 20 75 73 65 64 20 66 6f 72 20 62 6f 74 68  is used for both
a560: 20 74 68 65 20 6d 69 6e 28 29 20 61 6e 64 20 6d   the min() and m
a570: 61 78 28 29 20 61 67 67 72 65 67 61 74 65 73 2c  ax() aggregates,
a580: 0a 20 20 20 20 2a 2a 20 74 68 65 20 6f 6e 6c 79  .    ** the only
a590: 20 64 69 66 66 65 72 65 6e 63 65 20 62 65 74 77   difference betw
a5a0: 65 65 6e 20 74 68 65 20 74 77 6f 20 62 65 69 6e  een the two bein
a5b0: 67 20 74 68 61 74 20 74 68 65 20 73 65 6e 73 65  g that the sense
a5c0: 20 6f 66 20 74 68 65 0a 20 20 20 20 2a 2a 20 63   of the.    ** c
a5d0: 6f 6d 70 61 72 69 73 6f 6e 20 69 73 20 69 6e 76  omparison is inv
a5e0: 65 72 74 65 64 2e 20 46 6f 72 20 74 68 65 20 6d  erted. For the m
a5f0: 61 78 28 29 20 61 67 67 72 65 67 61 74 65 2c 20  ax() aggregate, 
a600: 74 68 65 0a 20 20 20 20 2a 2a 20 73 71 6c 69 74  the.    ** sqlit
a610: 65 33 5f 75 73 65 72 5f 64 61 74 61 28 29 20 66  e3_user_data() f
a620: 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20  unction returns 
a630: 28 76 6f 69 64 20 2a 29 2d 31 2e 20 46 6f 72 20  (void *)-1. For 
a640: 6d 69 6e 28 29 20 69 74 0a 20 20 20 20 2a 2a 20  min() it.    ** 
a650: 72 65 74 75 72 6e 73 20 28 76 6f 69 64 20 2a 29  returns (void *)
a660: 64 62 2c 20 77 68 65 72 65 20 64 62 20 69 73 20  db, where db is 
a670: 74 68 65 20 73 71 6c 69 74 65 33 2a 20 64 61 74  the sqlite3* dat
a680: 61 62 61 73 65 20 70 6f 69 6e 74 65 72 2e 0a 20  abase pointer.. 
a690: 20 20 20 2a 2a 20 54 68 65 72 65 66 6f 72 65 20     ** Therefore 
a6a0: 74 68 65 20 6e 65 78 74 20 73 74 61 74 65 6d 65  the next stateme
a6b0: 6e 74 20 73 65 74 73 20 76 61 72 69 61 62 6c 65  nt sets variable
a6c0: 20 27 6d 61 78 27 20 74 6f 20 31 20 66 6f 72 20   'max' to 1 for 
a6d0: 74 68 65 20 6d 61 78 28 29 0a 20 20 20 20 2a 2a  the max().    **
a6e0: 20 61 67 67 72 65 67 61 74 65 2c 20 6f 72 20 30   aggregate, or 0
a6f0: 20 66 6f 72 20 6d 69 6e 28 29 2e 0a 20 20 20 20   for min()..    
a700: 2a 2f 0a 20 20 20 20 6d 61 78 20 3d 20 73 71 6c  */.    max = sql
a710: 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63  ite3_user_data(c
a720: 6f 6e 74 65 78 74 29 21 3d 30 3b 0a 20 20 20 20  ontext)!=0;.    
a730: 63 6d 70 20 3d 20 73 71 6c 69 74 65 33 4d 65 6d  cmp = sqlite3Mem
a740: 43 6f 6d 70 61 72 65 28 70 42 65 73 74 2c 20 70  Compare(pBest, p
a750: 41 72 67 2c 20 70 43 6f 6c 6c 29 3b 0a 20 20 20  Arg, pColl);.   
a760: 20 69 66 28 20 28 6d 61 78 20 26 26 20 63 6d 70   if( (max && cmp
a770: 3c 30 29 20 7c 7c 20 28 21 6d 61 78 20 26 26 20  <0) || (!max && 
a780: 63 6d 70 3e 30 29 20 29 7b 0a 20 20 20 20 20 20  cmp>0) ){.      
a790: 73 71 6c 69 74 65 33 56 64 62 65 4d 65 6d 43 6f  sqlite3VdbeMemCo
a7a0: 70 79 28 70 42 65 73 74 2c 20 70 41 72 67 29 3b  py(pBest, pArg);
a7b0: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
a7c0: 20 20 73 71 6c 69 74 65 33 53 6b 69 70 41 63 63    sqlite3SkipAcc
a7d0: 75 6d 75 6c 61 74 6f 72 4c 6f 61 64 28 63 6f 6e  umulatorLoad(con
a7e0: 74 65 78 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  text);.    }.  }
a7f0: 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65  else{.    sqlite
a800: 33 56 64 62 65 4d 65 6d 43 6f 70 79 28 70 42 65  3VdbeMemCopy(pBe
a810: 73 74 2c 20 70 41 72 67 29 3b 0a 20 20 7d 0a 7d  st, pArg);.  }.}
a820: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d 69 6e  .static void min
a830: 4d 61 78 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69  MaxFinalize(sqli
a840: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
a850: 74 65 78 74 29 7b 0a 20 20 73 71 6c 69 74 65 33  text){.  sqlite3
a860: 5f 76 61 6c 75 65 20 2a 70 52 65 73 3b 0a 20 20  _value *pRes;.  
a870: 70 52 65 73 20 3d 20 28 73 71 6c 69 74 65 33 5f  pRes = (sqlite3_
a880: 76 61 6c 75 65 20 2a 29 73 71 6c 69 74 65 33 5f  value *)sqlite3_
a890: 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78  aggregate_contex
a8a0: 74 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20  t(context, 0);. 
a8b0: 20 69 66 28 20 70 52 65 73 20 29 7b 0a 20 20 20   if( pRes ){.   
a8c0: 20 69 66 28 20 70 52 65 73 2d 3e 66 6c 61 67 73   if( pRes->flags
a8d0: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   ){.      sqlite
a8e0: 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63  3_result_value(c
a8f0: 6f 6e 74 65 78 74 2c 20 70 52 65 73 29 3b 0a 20  ontext, pRes);. 
a900: 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33     }.    sqlite3
a910: 56 64 62 65 4d 65 6d 52 65 6c 65 61 73 65 28 70  VdbeMemRelease(p
a920: 52 65 73 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  Res);.  }.}../*.
a930: 2a 2a 20 67 72 6f 75 70 5f 63 6f 6e 63 61 74 28  ** group_concat(
a940: 45 58 50 52 2c 20 3f 53 45 50 41 52 41 54 4f 52  EXPR, ?SEPARATOR
a950: 3f 29 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  ?).*/.static voi
a960: 64 20 67 72 6f 75 70 43 6f 6e 63 61 74 53 74 65  d groupConcatSte
a970: 70 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  p(.  sqlite3_con
a980: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
a990: 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c   int argc,.  sql
a9a0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
a9b0: 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61  v.){.  const cha
a9c0: 72 20 2a 7a 56 61 6c 3b 0a 20 20 53 74 72 41 63  r *zVal;.  StrAc
a9d0: 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a 20 20 63  cum *pAccum;.  c
a9e0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 65 70 3b  onst char *zSep;
a9f0: 0a 20 20 69 6e 74 20 6e 56 61 6c 2c 20 6e 53 65  .  int nVal, nSe
aa00: 70 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67  p;.  assert( arg
aa10: 63 3d 3d 31 20 7c 7c 20 61 72 67 63 3d 3d 32 20  c==1 || argc==2 
aa20: 29 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33  );.  if( sqlite3
aa30: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
aa40: 5b 30 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [0])==SQLITE_NUL
aa50: 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 70 41  L ) return;.  pA
aa60: 63 63 75 6d 20 3d 20 28 53 74 72 41 63 63 75 6d  ccum = (StrAccum
aa70: 2a 29 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  *)sqlite3_aggreg
aa80: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
aa90: 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 41 63  ext, sizeof(*pAc
aaa0: 63 75 6d 29 29 3b 0a 0a 20 20 69 66 28 20 70 41  cum));..  if( pA
aab0: 63 63 75 6d 20 29 7b 0a 20 20 20 20 73 71 6c 69  ccum ){.    sqli
aac0: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
aad0: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
aae0: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  dle(context);.  
aaf0: 20 20 69 6e 74 20 66 69 72 73 74 54 65 72 6d 20    int firstTerm 
ab00: 3d 20 70 41 63 63 75 6d 2d 3e 75 73 65 4d 61 6c  = pAccum->useMal
ab10: 6c 6f 63 3d 3d 30 3b 0a 20 20 20 20 70 41 63 63  loc==0;.    pAcc
ab20: 75 6d 2d 3e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20  um->useMalloc = 
ab30: 32 3b 0a 20 20 20 20 70 41 63 63 75 6d 2d 3e 6d  2;.    pAccum->m
ab40: 78 41 6c 6c 6f 63 20 3d 20 64 62 2d 3e 61 4c 69  xAlloc = db->aLi
ab50: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
ab60: 5f 4c 45 4e 47 54 48 5d 3b 0a 20 20 20 20 69 66  _LENGTH];.    if
ab70: 28 20 21 66 69 72 73 74 54 65 72 6d 20 29 7b 0a  ( !firstTerm ){.
ab80: 20 20 20 20 20 20 69 66 28 20 61 72 67 63 3d 3d        if( argc==
ab90: 32 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 53 65  2 ){.        zSe
aba0: 70 20 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74  p = (char*)sqlit
abb0: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
abc0: 67 76 5b 31 5d 29 3b 0a 20 20 20 20 20 20 20 20  gv[1]);.        
abd0: 6e 53 65 70 20 3d 20 73 71 6c 69 74 65 33 5f 76  nSep = sqlite3_v
abe0: 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b  alue_bytes(argv[
abf0: 31 5d 29 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  1]);.      }else
ac00: 7b 0a 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d  {.        zSep =
ac10: 20 22 2c 22 3b 0a 20 20 20 20 20 20 20 20 6e 53   ",";.        nS
ac20: 65 70 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a  ep = 1;.      }.
ac30: 20 20 20 20 20 20 73 71 6c 69 74 65 33 53 74 72        sqlite3Str
ac40: 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63  AccumAppend(pAcc
ac50: 75 6d 2c 20 7a 53 65 70 2c 20 6e 53 65 70 29 3b  um, zSep, nSep);
ac60: 0a 20 20 20 20 7d 0a 20 20 20 20 7a 56 61 6c 20  .    }.    zVal 
ac70: 3d 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33  = (char*)sqlite3
ac80: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
ac90: 5b 30 5d 29 3b 0a 20 20 20 20 6e 56 61 6c 20 3d  [0]);.    nVal =
aca0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
acb0: 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20  ytes(argv[0]);. 
acc0: 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63     sqlite3StrAcc
acd0: 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 6d 2c  umAppend(pAccum,
ace0: 20 7a 56 61 6c 2c 20 6e 56 61 6c 29 3b 0a 20 20   zVal, nVal);.  
acf0: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
ad00: 67 72 6f 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c  groupConcatFinal
ad10: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
ad20: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
ad30: 20 53 74 72 41 63 63 75 6d 20 2a 70 41 63 63 75   StrAccum *pAccu
ad40: 6d 3b 0a 20 20 70 41 63 63 75 6d 20 3d 20 73 71  m;.  pAccum = sq
ad50: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
ad60: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
ad70: 20 30 29 3b 0a 20 20 69 66 28 20 70 41 63 63 75   0);.  if( pAccu
ad80: 6d 20 29 7b 0a 20 20 20 20 69 66 28 20 70 41 63  m ){.    if( pAc
ad90: 63 75 6d 2d 3e 74 6f 6f 42 69 67 20 29 7b 0a 20  cum->tooBig ){. 
ada0: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73       sqlite3_res
adb0: 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67  ult_error_toobig
adc0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7d  (context);.    }
add0: 65 6c 73 65 20 69 66 28 20 70 41 63 63 75 6d 2d  else if( pAccum-
ade0: 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 29 7b  >mallocFailed ){
adf0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72  .      sqlite3_r
ae00: 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65  esult_error_nome
ae10: 6d 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  m(context);.    
ae20: 7d 65 6c 73 65 7b 20 20 20 20 0a 20 20 20 20 20  }else{    .     
ae30: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
ae40: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  text(context, sq
ae50: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e  lite3StrAccumFin
ae60: 69 73 68 28 70 41 63 63 75 6d 29 2c 20 2d 31 2c  ish(pAccum), -1,
ae70: 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   .              
ae80: 20 20 20 20 20 20 20 20 20 20 20 20 73 71 6c 69              sqli
ae90: 74 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d  te3_free);.    }
aea0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  .  }.}../*.** Th
aeb0: 69 73 20 72 6f 75 74 69 6e 65 20 64 6f 65 73 20  is routine does 
aec0: 70 65 72 2d 63 6f 6e 6e 65 63 74 69 6f 6e 20 66  per-connection f
aed0: 75 6e 63 74 69 6f 6e 20 72 65 67 69 73 74 72 61  unction registra
aee0: 74 69 6f 6e 2e 20 20 4d 6f 73 74 0a 2a 2a 20 6f  tion.  Most.** o
aef0: 66 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20 66  f the built-in f
af00: 75 6e 63 74 69 6f 6e 73 20 61 62 6f 76 65 20 61  unctions above a
af10: 72 65 20 70 61 72 74 20 6f 66 20 74 68 65 20 67  re part of the g
af20: 6c 6f 62 61 6c 20 66 75 6e 63 74 69 6f 6e 20 73  lobal function s
af30: 65 74 2e 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74  et..** This rout
af40: 69 6e 65 20 6f 6e 6c 79 20 64 65 61 6c 73 20 77  ine only deals w
af50: 69 74 68 20 74 68 6f 73 65 20 74 68 61 74 20 61  ith those that a
af60: 72 65 20 6e 6f 74 20 67 6c 6f 62 61 6c 2e 0a 2a  re not global..*
af70: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65  /.void sqlite3Re
af80: 67 69 73 74 65 72 42 75 69 6c 74 69 6e 46 75 6e  gisterBuiltinFun
af90: 63 74 69 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a  ctions(sqlite3 *
afa0: 64 62 29 7b 0a 20 20 69 6e 74 20 72 63 20 3d 20  db){.  int rc = 
afb0: 73 71 6c 69 74 65 33 5f 6f 76 65 72 6c 6f 61 64  sqlite3_overload
afc0: 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 4d  _function(db, "M
afd0: 41 54 43 48 22 2c 20 32 29 3b 0a 20 20 61 73 73  ATCH", 2);.  ass
afe0: 65 72 74 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f  ert( rc==SQLITE_
aff0: 4e 4f 4d 45 4d 20 7c 7c 20 72 63 3d 3d 53 51 4c  NOMEM || rc==SQL
b000: 49 54 45 5f 4f 4b 20 29 3b 0a 20 20 69 66 28 20  ITE_OK );.  if( 
b010: 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d  rc==SQLITE_NOMEM
b020: 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d 61 6c 6c   ){.    db->mall
b030: 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b 0a 20 20  ocFailed = 1;.  
b040: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74  }.}../*.** Set t
b050: 68 65 20 4c 49 4b 45 4f 50 54 20 66 6c 61 67 20  he LIKEOPT flag 
b060: 6f 6e 20 74 68 65 20 32 2d 61 72 67 75 6d 65 6e  on the 2-argumen
b070: 74 20 66 75 6e 63 74 69 6f 6e 20 77 69 74 68 20  t function with 
b080: 74 68 65 20 67 69 76 65 6e 20 6e 61 6d 65 2e 0a  the given name..
b090: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73  */.static void s
b0a0: 65 74 4c 69 6b 65 4f 70 74 46 6c 61 67 28 73 71  etLikeOptFlag(sq
b0b0: 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e 73 74  lite3 *db, const
b0c0: 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 75 38   char *zName, u8
b0d0: 20 66 6c 61 67 56 61 6c 29 7b 0a 20 20 46 75 6e   flagVal){.  Fun
b0e0: 63 44 65 66 20 2a 70 44 65 66 3b 0a 20 20 70 44  cDef *pDef;.  pD
b0f0: 65 66 20 3d 20 73 71 6c 69 74 65 33 46 69 6e 64  ef = sqlite3Find
b100: 46 75 6e 63 74 69 6f 6e 28 64 62 2c 20 7a 4e 61  Function(db, zNa
b110: 6d 65 2c 20 73 71 6c 69 74 65 33 53 74 72 6c 65  me, sqlite3Strle
b120: 6e 33 30 28 7a 4e 61 6d 65 29 2c 0a 20 20 20 20  n30(zName),.    
b130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b140: 20 20 20 20 20 20 20 20 20 32 2c 20 53 51 4c 49           2, SQLI
b150: 54 45 5f 55 54 46 38 2c 20 30 29 3b 0a 20 20 69  TE_UTF8, 0);.  i
b160: 66 28 20 41 4c 57 41 59 53 28 70 44 65 66 29 20  f( ALWAYS(pDef) 
b170: 29 7b 0a 20 20 20 20 70 44 65 66 2d 3e 66 6c 61  ){.    pDef->fla
b180: 67 73 20 3d 20 66 6c 61 67 56 61 6c 3b 0a 20 20  gs = flagVal;.  
b190: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 67 69 73  }.}../*.** Regis
b1a0: 74 65 72 20 74 68 65 20 62 75 69 6c 74 2d 69 6e  ter the built-in
b1b0: 20 4c 49 4b 45 20 61 6e 64 20 47 4c 4f 42 20 66   LIKE and GLOB f
b1c0: 75 6e 63 74 69 6f 6e 73 2e 20 20 54 68 65 20 63  unctions.  The c
b1d0: 61 73 65 53 65 6e 73 69 74 69 76 65 0a 2a 2a 20  aseSensitive.** 
b1e0: 70 61 72 61 6d 65 74 65 72 20 64 65 74 65 72 6d  parameter determ
b1f0: 69 6e 65 73 20 77 68 65 74 68 65 72 20 6f 72 20  ines whether or 
b200: 6e 6f 74 20 74 68 65 20 4c 49 4b 45 20 6f 70 65  not the LIKE ope
b210: 72 61 74 6f 72 20 69 73 20 63 61 73 65 0a 2a 2a  rator is case.**
b220: 20 73 65 6e 73 69 74 69 76 65 2e 20 20 47 4c 4f   sensitive.  GLO
b230: 42 20 69 73 20 61 6c 77 61 79 73 20 63 61 73 65  B is always case
b240: 20 73 65 6e 73 69 74 69 76 65 2e 0a 2a 2f 0a 76   sensitive..*/.v
b250: 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67 69 73  oid sqlite3Regis
b260: 74 65 72 4c 69 6b 65 46 75 6e 63 74 69 6f 6e 73  terLikeFunctions
b270: 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 69 6e  (sqlite3 *db, in
b280: 74 20 63 61 73 65 53 65 6e 73 69 74 69 76 65 29  t caseSensitive)
b290: 7b 0a 20 20 73 74 72 75 63 74 20 63 6f 6d 70 61  {.  struct compa
b2a0: 72 65 49 6e 66 6f 20 2a 70 49 6e 66 6f 3b 0a 20  reInfo *pInfo;. 
b2b0: 20 69 66 28 20 63 61 73 65 53 65 6e 73 69 74 69   if( caseSensiti
b2c0: 76 65 20 29 7b 0a 20 20 20 20 70 49 6e 66 6f 20  ve ){.    pInfo 
b2d0: 3d 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72  = (struct compar
b2e0: 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49 6e 66 6f  eInfo*)&likeInfo
b2f0: 41 6c 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  Alt;.  }else{.  
b300: 20 20 70 49 6e 66 6f 20 3d 20 28 73 74 72 75 63    pInfo = (struc
b310: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 2a 29 26  t compareInfo*)&
b320: 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 3b 0a 20 20  likeInfoNorm;.  
b330: 7d 0a 20 20 73 71 6c 69 74 65 33 43 72 65 61 74  }.  sqlite3Creat
b340: 65 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b 65 22  eFunc(db, "like"
b350: 2c 20 32 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  , 2, SQLITE_UTF8
b360: 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46 75 6e  , pInfo, likeFun
b370: 63 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 73  c, 0, 0, 0);.  s
b380: 71 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e 63  qlite3CreateFunc
b390: 28 64 62 2c 20 22 6c 69 6b 65 22 2c 20 33 2c 20  (db, "like", 3, 
b3a0: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 70 49 6e  SQLITE_UTF8, pIn
b3b0: 66 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c  fo, likeFunc, 0,
b3c0: 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65   0, 0);.  sqlite
b3d0: 33 43 72 65 61 74 65 46 75 6e 63 28 64 62 2c 20  3CreateFunc(db, 
b3e0: 22 67 6c 6f 62 22 2c 20 32 2c 20 53 51 4c 49 54  "glob", 2, SQLIT
b3f0: 45 5f 55 54 46 38 2c 20 0a 20 20 20 20 20 20 28  E_UTF8, .      (
b400: 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e  struct compareIn
b410: 66 6f 2a 29 26 67 6c 6f 62 49 6e 66 6f 2c 20 6c  fo*)&globInfo, l
b420: 69 6b 65 46 75 6e 63 2c 20 30 2c 20 30 2c 20 30  ikeFunc, 0, 0, 0
b430: 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74 46  );.  setLikeOptF
b440: 6c 61 67 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20  lag(db, "glob", 
b450: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45  SQLITE_FUNC_LIKE
b460: 20 7c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43   | SQLITE_FUNC_C
b470: 41 53 45 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f  ASE);.  setLikeO
b480: 70 74 46 6c 61 67 28 64 62 2c 20 22 6c 69 6b 65  ptFlag(db, "like
b490: 22 2c 20 0a 20 20 20 20 20 20 63 61 73 65 53 65  ", .      caseSe
b4a0: 6e 73 69 74 69 76 65 20 3f 20 28 53 51 4c 49 54  nsitive ? (SQLIT
b4b0: 45 5f 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51  E_FUNC_LIKE | SQ
b4c0: 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 20  LITE_FUNC_CASE) 
b4d0: 3a 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49  : SQLITE_FUNC_LI
b4e0: 4b 45 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 70 45  KE);.}../*.** pE
b4f0: 78 70 72 20 70 6f 69 6e 74 73 20 74 6f 20 61 6e  xpr points to an
b500: 20 65 78 70 72 65 73 73 69 6f 6e 20 77 68 69 63   expression whic
b510: 68 20 69 6d 70 6c 65 6d 65 6e 74 73 20 61 20 66  h implements a f
b520: 75 6e 63 74 69 6f 6e 2e 20 20 49 66 0a 2a 2a 20  unction.  If.** 
b530: 69 74 20 69 73 20 61 70 70 72 6f 70 72 69 61 74  it is appropriat
b540: 65 20 74 6f 20 61 70 70 6c 79 20 74 68 65 20 4c  e to apply the L
b550: 49 4b 45 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e  IKE optimization
b560: 20 74 6f 20 74 68 61 74 20 66 75 6e 63 74 69 6f   to that functio
b570: 6e 0a 2a 2a 20 74 68 65 6e 20 73 65 74 20 61 57  n.** then set aW
b580: 63 5b 30 5d 20 74 68 72 6f 75 67 68 20 61 57 63  c[0] through aWc
b590: 5b 32 5d 20 74 6f 20 74 68 65 20 77 69 6c 64 63  [2] to the wildc
b5a0: 61 72 64 20 63 68 61 72 61 63 74 65 72 73 20 61  ard characters a
b5b0: 6e 64 0a 2a 2a 20 72 65 74 75 72 6e 20 54 52 55  nd.** return TRU
b5c0: 45 2e 20 20 49 66 20 74 68 65 20 66 75 6e 63 74  E.  If the funct
b5d0: 69 6f 6e 20 69 73 20 6e 6f 74 20 61 20 4c 49 4b  ion is not a LIK
b5e0: 45 2d 73 74 79 6c 65 20 66 75 6e 63 74 69 6f 6e  E-style function
b5f0: 20 74 68 65 6e 0a 2a 2a 20 72 65 74 75 72 6e 20   then.** return 
b600: 46 41 4c 53 45 2e 0a 2a 2f 0a 69 6e 74 20 73 71  FALSE..*/.int sq
b610: 6c 69 74 65 33 49 73 4c 69 6b 65 46 75 6e 63 74  lite3IsLikeFunct
b620: 69 6f 6e 28 73 71 6c 69 74 65 33 20 2a 64 62 2c  ion(sqlite3 *db,
b630: 20 45 78 70 72 20 2a 70 45 78 70 72 2c 20 69 6e   Expr *pExpr, in
b640: 74 20 2a 70 49 73 4e 6f 63 61 73 65 2c 20 63 68  t *pIsNocase, ch
b650: 61 72 20 2a 61 57 63 29 7b 0a 20 20 46 75 6e 63  ar *aWc){.  Func
b660: 44 65 66 20 2a 70 44 65 66 3b 0a 20 20 69 66 28  Def *pDef;.  if(
b670: 20 70 45 78 70 72 2d 3e 6f 70 21 3d 54 4b 5f 46   pExpr->op!=TK_F
b680: 55 4e 43 54 49 4f 4e 20 0a 20 20 20 7c 7c 20 21  UNCTION .   || !
b690: 70 45 78 70 72 2d 3e 78 2e 70 4c 69 73 74 20 0a  pExpr->x.pList .
b6a0: 20 20 20 7c 7c 20 70 45 78 70 72 2d 3e 78 2e 70     || pExpr->x.p
b6b0: 4c 69 73 74 2d 3e 6e 45 78 70 72 21 3d 32 0a 20  List->nExpr!=2. 
b6c0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30   ){.    return 0
b6d0: 3b 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20  ;.  }.  assert( 
b6e0: 21 45 78 70 72 48 61 73 50 72 6f 70 65 72 74 79  !ExprHasProperty
b6f0: 28 70 45 78 70 72 2c 20 45 50 5f 78 49 73 53 65  (pExpr, EP_xIsSe
b700: 6c 65 63 74 29 20 29 3b 0a 20 20 70 44 65 66 20  lect) );.  pDef 
b710: 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e  = sqlite3FindFun
b720: 63 74 69 6f 6e 28 64 62 2c 20 70 45 78 70 72 2d  ction(db, pExpr-
b730: 3e 75 2e 7a 54 6f 6b 65 6e 2c 20 0a 20 20 20 20  >u.zToken, .    
b740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b750: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33           sqlite3
b760: 53 74 72 6c 65 6e 33 30 28 70 45 78 70 72 2d 3e  Strlen30(pExpr->
b770: 75 2e 7a 54 6f 6b 65 6e 29 2c 0a 20 20 20 20 20  u.zToken),.     
b780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b790: 20 20 20 20 20 20 20 20 32 2c 20 53 51 4c 49 54          2, SQLIT
b7a0: 45 5f 55 54 46 38 2c 20 30 29 3b 0a 20 20 69 66  E_UTF8, 0);.  if
b7b0: 28 20 4e 45 56 45 52 28 70 44 65 66 3d 3d 30 29  ( NEVER(pDef==0)
b7c0: 20 7c 7c 20 28 70 44 65 66 2d 3e 66 6c 61 67 73   || (pDef->flags
b7d0: 20 26 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c   & SQLITE_FUNC_L
b7e0: 49 4b 45 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72  IKE)==0 ){.    r
b7f0: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 0a 20 20  eturn 0;.  }..  
b800: 2f 2a 20 54 68 65 20 6d 65 6d 63 70 79 28 29 20  /* The memcpy() 
b810: 73 74 61 74 65 6d 65 6e 74 20 61 73 73 75 6d 65  statement assume
b820: 73 20 74 68 61 74 20 74 68 65 20 77 69 6c 64 63  s that the wildc
b830: 61 72 64 20 63 68 61 72 61 63 74 65 72 73 20 61  ard characters a
b840: 72 65 0a 20 20 2a 2a 20 74 68 65 20 66 69 72 73  re.  ** the firs
b850: 74 20 74 68 72 65 65 20 73 74 61 74 65 6d 65 6e  t three statemen
b860: 74 73 20 69 6e 20 74 68 65 20 63 6f 6d 70 61 72  ts in the compar
b870: 65 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65 2e  eInfo structure.
b880: 20 20 54 68 65 0a 20 20 2a 2a 20 61 73 73 65 72    The.  ** asser
b890: 74 73 28 29 20 74 68 61 74 20 66 6f 6c 6c 6f 77  ts() that follow
b8a0: 20 76 65 72 69 66 79 20 74 68 61 74 20 61 73 73   verify that ass
b8b0: 75 6d 70 74 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6d  umption.  */.  m
b8c0: 65 6d 63 70 79 28 61 57 63 2c 20 70 44 65 66 2d  emcpy(aWc, pDef-
b8d0: 3e 70 55 73 65 72 44 61 74 61 2c 20 33 29 3b 0a  >pUserData, 3);.
b8e0: 20 20 61 73 73 65 72 74 28 20 28 63 68 61 72 2a    assert( (char*
b8f0: 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d 3d  )&likeInfoAlt ==
b900: 20 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66   (char*)&likeInf
b910: 6f 41 6c 74 2e 6d 61 74 63 68 41 6c 6c 20 29 3b  oAlt.matchAll );
b920: 0a 20 20 61 73 73 65 72 74 28 20 26 28 28 63 68  .  assert( &((ch
b930: 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74  ar*)&likeInfoAlt
b940: 29 5b 31 5d 20 3d 3d 20 28 63 68 61 72 2a 29 26  )[1] == (char*)&
b950: 6c 69 6b 65 49 6e 66 6f 41 6c 74 2e 6d 61 74 63  likeInfoAlt.matc
b960: 68 4f 6e 65 20 29 3b 0a 20 20 61 73 73 65 72 74  hOne );.  assert
b970: 28 20 26 28 28 63 68 61 72 2a 29 26 6c 69 6b 65  ( &((char*)&like
b980: 49 6e 66 6f 41 6c 74 29 5b 32 5d 20 3d 3d 20 28  InfoAlt)[2] == (
b990: 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41  char*)&likeInfoA
b9a0: 6c 74 2e 6d 61 74 63 68 53 65 74 20 29 3b 0a 20  lt.matchSet );. 
b9b0: 20 2a 70 49 73 4e 6f 63 61 73 65 20 3d 20 28 70   *pIsNocase = (p
b9c0: 44 65 66 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c  Def->flags & SQL
b9d0: 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d 3d  ITE_FUNC_CASE)==
b9e0: 30 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d  0;.  return 1;.}
b9f0: 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 20 61 6c 6c 20  ../*.** All all 
ba00: 6f 66 20 74 68 65 20 46 75 6e 63 44 65 66 20 73  of the FuncDef s
ba10: 74 72 75 63 74 75 72 65 73 20 69 6e 20 74 68 65  tructures in the
ba20: 20 61 42 75 69 6c 74 69 6e 46 75 6e 63 5b 5d 20   aBuiltinFunc[] 
ba30: 61 72 72 61 79 20 61 62 6f 76 65 0a 2a 2a 20 74  array above.** t
ba40: 6f 20 74 68 65 20 67 6c 6f 62 61 6c 20 66 75 6e  o the global fun
ba50: 63 74 69 6f 6e 20 68 61 73 68 20 74 61 62 6c 65  ction hash table
ba60: 2e 20 20 54 68 69 73 20 6f 63 63 75 72 73 20 61  .  This occurs a
ba70: 74 20 73 74 61 72 74 2d 74 69 6d 65 20 28 61 73  t start-time (as
ba80: 0a 2a 2a 20 61 20 63 6f 6e 73 65 71 75 65 6e 63  .** a consequenc
ba90: 65 20 6f 66 20 63 61 6c 6c 69 6e 67 20 73 71 6c  e of calling sql
baa0: 69 74 65 33 5f 69 6e 69 74 69 61 6c 69 7a 65 28  ite3_initialize(
bab0: 29 29 2e 0a 2a 2a 0a 2a 2a 20 41 66 74 65 72 20  ))..**.** After 
bac0: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 75 6e  this routine run
bad0: 73 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65  s.*/.void sqlite
bae0: 33 52 65 67 69 73 74 65 72 47 6c 6f 62 61 6c 46  3RegisterGlobalF
baf0: 75 6e 63 74 69 6f 6e 73 28 76 6f 69 64 29 7b 0a  unctions(void){.
bb00: 20 20 2f 2a 0a 20 20 2a 2a 20 54 68 65 20 66 6f    /*.  ** The fo
bb10: 6c 6c 6f 77 69 6e 67 20 61 72 72 61 79 20 68 6f  llowing array ho
bb20: 6c 64 73 20 46 75 6e 63 44 65 66 20 73 74 72 75  lds FuncDef stru
bb30: 63 74 75 72 65 73 20 66 6f 72 20 61 6c 6c 20 6f  ctures for all o
bb40: 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 73 0a  f the functions.
bb50: 20 20 2a 2a 20 64 65 66 69 6e 65 64 20 69 6e 20    ** defined in 
bb60: 74 68 69 73 20 66 69 6c 65 2e 0a 20 20 2a 2a 0a  this file..  **.
bb70: 20 20 2a 2a 20 54 68 65 20 61 72 72 61 79 20 63    ** The array c
bb80: 61 6e 6e 6f 74 20 62 65 20 63 6f 6e 73 74 61 6e  annot be constan
bb90: 74 20 73 69 6e 63 65 20 63 68 61 6e 67 65 73 20  t since changes 
bba0: 61 72 65 20 6d 61 64 65 20 74 6f 20 74 68 65 0a  are made to the.
bbb0: 20 20 2a 2a 20 46 75 6e 63 44 65 66 2e 70 48 61    ** FuncDef.pHa
bbc0: 73 68 20 65 6c 65 6d 65 6e 74 73 20 61 74 20 73  sh elements at s
bbd0: 74 61 72 74 2d 74 69 6d 65 2e 20 20 54 68 65 20  tart-time.  The 
bbe0: 65 6c 65 6d 65 6e 74 73 20 6f 66 20 74 68 69 73  elements of this
bbf0: 20 61 72 72 61 79 0a 20 20 2a 2a 20 61 72 65 20   array.  ** are 
bc00: 72 65 61 64 2d 6f 6e 6c 79 20 61 66 74 65 72 20  read-only after 
bc10: 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 20 69  initialization i
bc20: 73 20 63 6f 6d 70 6c 65 74 65 2e 0a 20 20 2a 2f  s complete..  */
bc30: 0a 20 20 73 74 61 74 69 63 20 53 51 4c 49 54 45  .  static SQLITE
bc40: 5f 57 53 44 20 46 75 6e 63 44 65 66 20 61 42 75  _WSD FuncDef aBu
bc50: 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 3d 20 7b 0a  iltinFunc[] = {.
bc60: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74 72      FUNCTION(ltr
bc70: 69 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  im,             
bc80: 20 31 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46 75   1, 1, 0, trimFu
bc90: 6e 63 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20  nc         ),.  
bca0: 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d    FUNCTION(ltrim
bcb0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32  ,              2
bcc0: 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63  , 1, 0, trimFunc
bcd0: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20           ),.    
bce0: 46 55 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c 20  FUNCTION(rtrim, 
bcf0: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
bd00: 32 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20  2, 0, trimFunc  
bd10: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
bd20: 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20  NCTION(rtrim,   
bd30: 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 32 2c             2, 2,
bd40: 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20   0, trimFunc    
bd50: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
bd60: 54 49 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20 20  TION(trim,      
bd70: 20 20 20 20 20 20 20 20 20 31 2c 20 33 2c 20 30           1, 3, 0
bd80: 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20  , trimFunc      
bd90: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
bda0: 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20 20 20 20  ON(trim,        
bdb0: 20 20 20 20 20 20 20 32 2c 20 33 2c 20 30 2c 20         2, 3, 0, 
bdc0: 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20  trimFunc        
bdd0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
bde0: 28 6d 69 6e 2c 20 20 20 20 20 20 20 20 20 20 20  (min,           
bdf0: 20 20 20 20 2d 31 2c 20 30 2c 20 31 2c 20 6d 69      -1, 0, 1, mi
be00: 6e 6d 61 78 46 75 6e 63 20 20 20 20 20 20 20 29  nmaxFunc       )
be10: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d  ,.    FUNCTION(m
be20: 69 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  in,             
be30: 20 20 20 30 2c 20 30 2c 20 31 2c 20 30 20 20 20     0, 0, 1, 0   
be40: 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a               ),.
be50: 20 20 20 20 41 47 47 52 45 47 41 54 45 28 6d 69      AGGREGATE(mi
be60: 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  n,              
be70: 20 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78   1, 0, 1, minmax
be80: 53 74 65 70 2c 20 20 20 20 20 20 6d 69 6e 4d 61  Step,      minMa
be90: 78 46 69 6e 61 6c 69 7a 65 20 29 2c 0a 20 20 20  xFinalize ),.   
bea0: 20 46 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20 20   FUNCTION(max,  
beb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c               -1,
bec0: 20 31 2c 20 31 2c 20 6d 69 6e 6d 61 78 46 75 6e   1, 1, minmaxFun
bed0: 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46  c       ),.    F
bee0: 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20 20  UNCTION(max,    
bef0: 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 31              0, 1
bf00: 2c 20 31 2c 20 30 20 20 20 20 20 20 20 20 20 20  , 1, 0          
bf10: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47        ),.    AGG
bf20: 52 45 47 41 54 45 28 6d 61 78 2c 20 20 20 20 20  REGATE(max,     
bf30: 20 20 20 20 20 20 20 20 20 20 31 2c 20 31 2c 20            1, 1, 
bf40: 31 2c 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20 20  1, minmaxStep,  
bf50: 20 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c 69      minMaxFinali
bf60: 7a 65 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49  ze ),.    FUNCTI
bf70: 4f 4e 32 28 74 79 70 65 6f 66 2c 20 20 20 20 20  ON2(typeof,     
bf80: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
bf90: 74 79 70 65 6f 66 46 75 6e 63 2c 20 20 53 51 4c  typeofFunc,  SQL
bfa0: 49 54 45 5f 46 55 4e 43 5f 54 59 50 45 4f 46 29  ITE_FUNC_TYPEOF)
bfb0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 32 28  ,.    FUNCTION2(
bfc0: 6c 65 6e 67 74 68 2c 20 20 20 20 20 20 20 20 20  length,         
bfd0: 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c 65 6e 67     1, 0, 0, leng
bfe0: 74 68 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f  thFunc,  SQLITE_
bff0: 46 55 4e 43 5f 4c 45 4e 47 54 48 29 2c 0a 20 20  FUNC_LENGTH),.  
c000: 20 20 46 55 4e 43 54 49 4f 4e 28 69 6e 73 74 72    FUNCTION(instr
c010: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32  ,              2
c020: 2c 20 30 2c 20 30 2c 20 69 6e 73 74 72 46 75 6e  , 0, 0, instrFun
c030: 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  c        ),.    
c040: 46 55 4e 43 54 49 4f 4e 28 73 75 62 73 74 72 2c  FUNCTION(substr,
c050: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20               2, 
c060: 30 2c 20 30 2c 20 73 75 62 73 74 72 46 75 6e 63  0, 0, substrFunc
c070: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
c080: 4e 43 54 49 4f 4e 28 73 75 62 73 74 72 2c 20 20  NCTION(substr,  
c090: 20 20 20 20 20 20 20 20 20 20 20 33 2c 20 30 2c             3, 0,
c0a0: 20 30 2c 20 73 75 62 73 74 72 46 75 6e 63 20 20   0, substrFunc  
c0b0: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c0c0: 54 49 4f 4e 28 75 6e 69 63 6f 64 65 2c 20 20 20  TION(unicode,   
c0d0: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
c0e0: 2c 20 75 6e 69 63 6f 64 65 46 75 6e 63 20 20 20  , unicodeFunc   
c0f0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
c100: 4f 4e 28 63 68 61 72 2c 20 20 20 20 20 20 20 20  ON(char,        
c110: 20 20 20 20 20 20 2d 31 2c 20 30 2c 20 30 2c 20        -1, 0, 0, 
c120: 63 68 61 72 46 75 6e 63 20 20 20 20 20 20 20 20  charFunc        
c130: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c140: 28 61 62 73 2c 20 20 20 20 20 20 20 20 20 20 20  (abs,           
c150: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 61 62       1, 0, 0, ab
c160: 73 46 75 6e 63 20 20 20 20 20 20 20 20 20 20 29  sFunc          )
c170: 2c 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45  ,.#ifndef SQLITE
c180: 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50  _OMIT_FLOATING_P
c190: 4f 49 4e 54 0a 20 20 20 20 46 55 4e 43 54 49 4f  OINT.    FUNCTIO
c1a0: 4e 28 72 6f 75 6e 64 2c 20 20 20 20 20 20 20 20  N(round,        
c1b0: 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 72        1, 0, 0, r
c1c0: 6f 75 6e 64 46 75 6e 63 20 20 20 20 20 20 20 20  oundFunc        
c1d0: 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28  ),.    FUNCTION(
c1e0: 72 6f 75 6e 64 2c 20 20 20 20 20 20 20 20 20 20  round,          
c1f0: 20 20 20 20 32 2c 20 30 2c 20 30 2c 20 72 6f 75      2, 0, 0, rou
c200: 6e 64 46 75 6e 63 20 20 20 20 20 20 20 20 29 2c  ndFunc        ),
c210: 0a 23 65 6e 64 69 66 0a 20 20 20 20 46 55 4e 43  .#endif.    FUNC
c220: 54 49 4f 4e 28 75 70 70 65 72 2c 20 20 20 20 20  TION(upper,     
c230: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
c240: 2c 20 75 70 70 65 72 46 75 6e 63 20 20 20 20 20  , upperFunc     
c250: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
c260: 4f 4e 28 6c 6f 77 65 72 2c 20 20 20 20 20 20 20  ON(lower,       
c270: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
c280: 6c 6f 77 65 72 46 75 6e 63 20 20 20 20 20 20 20  lowerFunc       
c290: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c2a0: 28 63 6f 61 6c 65 73 63 65 2c 20 20 20 20 20 20  (coalesce,      
c2b0: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 30 20       1, 0, 0, 0 
c2c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29                 )
c2d0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 63  ,.    FUNCTION(c
c2e0: 6f 61 6c 65 73 63 65 2c 20 20 20 20 20 20 20 20  oalesce,        
c2f0: 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 20 20 20     0, 0, 0, 0   
c300: 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a               ),.
c310: 20 20 20 20 46 55 4e 43 54 49 4f 4e 32 28 63 6f      FUNCTION2(co
c320: 61 6c 65 73 63 65 2c 20 20 20 20 20 20 20 20 20  alesce,         
c330: 2d 31 2c 20 30 2c 20 30 2c 20 69 66 6e 75 6c 6c  -1, 0, 0, ifnull
c340: 46 75 6e 63 2c 20 20 53 51 4c 49 54 45 5f 46 55  Func,  SQLITE_FU
c350: 4e 43 5f 43 4f 41 4c 45 53 43 45 29 2c 0a 20 20  NC_COALESCE),.  
c360: 20 20 46 55 4e 43 54 49 4f 4e 28 68 65 78 2c 20    FUNCTION(hex, 
c370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                 1
c380: 2c 20 30 2c 20 30 2c 20 68 65 78 46 75 6e 63 20  , 0, 0, hexFunc 
c390: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20           ),.    
c3a0: 46 55 4e 43 54 49 4f 4e 32 28 69 66 6e 75 6c 6c  FUNCTION2(ifnull
c3b0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20  ,            2, 
c3c0: 30 2c 20 30 2c 20 69 66 6e 75 6c 6c 46 75 6e 63  0, 0, ifnullFunc
c3d0: 2c 20 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43  ,  SQLITE_FUNC_C
c3e0: 4f 41 4c 45 53 43 45 29 2c 0a 20 20 20 20 46 55  OALESCE),.    FU
c3f0: 4e 43 54 49 4f 4e 28 72 61 6e 64 6f 6d 2c 20 20  NCTION(random,  
c400: 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c             0, 0,
c410: 20 30 2c 20 72 61 6e 64 6f 6d 46 75 6e 63 20 20   0, randomFunc  
c420: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
c430: 54 49 4f 4e 28 72 61 6e 64 6f 6d 62 6c 6f 62 2c  TION(randomblob,
c440: 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30           1, 0, 0
c450: 2c 20 72 61 6e 64 6f 6d 42 6c 6f 62 20 20 20 20  , randomBlob    
c460: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
c470: 4f 4e 28 6e 75 6c 6c 69 66 2c 20 20 20 20 20 20  ON(nullif,      
c480: 20 20 20 20 20 20 20 32 2c 20 30 2c 20 31 2c 20         2, 0, 1, 
c490: 6e 75 6c 6c 69 66 46 75 6e 63 20 20 20 20 20 20  nullifFunc      
c4a0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c4b0: 28 73 71 6c 69 74 65 5f 76 65 72 73 69 6f 6e 2c  (sqlite_version,
c4c0: 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 76 65       0, 0, 0, ve
c4d0: 72 73 69 6f 6e 46 75 6e 63 20 20 20 20 20 20 29  rsionFunc      )
c4e0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73  ,.    FUNCTION(s
c4f0: 71 6c 69 74 65 5f 73 6f 75 72 63 65 5f 69 64 2c  qlite_source_id,
c500: 20 20 20 30 2c 20 30 2c 20 30 2c 20 73 6f 75 72     0, 0, 0, sour
c510: 63 65 69 64 46 75 6e 63 20 20 20 20 20 29 2c 0a  ceidFunc     ),.
c520: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 71 6c      FUNCTION(sql
c530: 69 74 65 5f 6c 6f 67 2c 20 20 20 20 20 20 20 20  ite_log,        
c540: 20 32 2c 20 30 2c 20 30 2c 20 65 72 72 6c 6f 67   2, 0, 0, errlog
c550: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 23 69  Func       ),.#i
c560: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
c570: 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f  T_COMPILEOPTION_
c580: 44 49 41 47 53 0a 20 20 20 20 46 55 4e 43 54 49  DIAGS.    FUNCTI
c590: 4f 4e 28 73 71 6c 69 74 65 5f 63 6f 6d 70 69 6c  ON(sqlite_compil
c5a0: 65 6f 70 74 69 6f 6e 5f 75 73 65 64 2c 31 2c 20  eoption_used,1, 
c5b0: 30 2c 20 30 2c 20 63 6f 6d 70 69 6c 65 6f 70 74  0, 0, compileopt
c5c0: 69 6f 6e 75 73 65 64 46 75 6e 63 20 20 29 2c 0a  ionusedFunc  ),.
c5d0: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 71 6c      FUNCTION(sql
c5e0: 69 74 65 5f 63 6f 6d 70 69 6c 65 6f 70 74 69 6f  ite_compileoptio
c5f0: 6e 5f 67 65 74 2c 20 31 2c 20 30 2c 20 30 2c 20  n_get, 1, 0, 0, 
c600: 63 6f 6d 70 69 6c 65 6f 70 74 69 6f 6e 67 65 74  compileoptionget
c610: 46 75 6e 63 20 20 29 2c 0a 23 65 6e 64 69 66 20  Func  ),.#endif 
c620: 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43  /* SQLITE_OMIT_C
c630: 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e 5f 44 49 41  OMPILEOPTION_DIA
c640: 47 53 20 2a 2f 0a 20 20 20 20 46 55 4e 43 54 49  GS */.    FUNCTI
c650: 4f 4e 28 71 75 6f 74 65 2c 20 20 20 20 20 20 20  ON(quote,       
c660: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
c670: 71 75 6f 74 65 46 75 6e 63 20 20 20 20 20 20 20  quoteFunc       
c680: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
c690: 28 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77  (last_insert_row
c6a0: 69 64 2c 20 20 30 2c 20 30 2c 20 30 2c 20 6c 61  id,  0, 0, 0, la
c6b0: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 29  st_insert_rowid)
c6c0: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 63  ,.    FUNCTION(c
c6d0: 68 61 6e 67 65 73 2c 20 20 20 20 20 20 20 20 20  hanges,         
c6e0: 20 20 20 30 2c 20 30 2c 20 30 2c 20 63 68 61 6e     0, 0, 0, chan
c6f0: 67 65 73 20 20 20 20 20 20 20 20 20 20 29 2c 0a  ges          ),.
c700: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 74 6f 74      FUNCTION(tot
c710: 61 6c 5f 63 68 61 6e 67 65 73 2c 20 20 20 20 20  al_changes,     
c720: 20 30 2c 20 30 2c 20 30 2c 20 74 6f 74 61 6c 5f   0, 0, 0, total_
c730: 63 68 61 6e 67 65 73 20 20 20 20 29 2c 0a 20 20  changes    ),.  
c740: 20 20 46 55 4e 43 54 49 4f 4e 28 72 65 70 6c 61    FUNCTION(repla
c750: 63 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 33  ce,            3
c760: 2c 20 30 2c 20 30 2c 20 72 65 70 6c 61 63 65 46  , 0, 0, replaceF
c770: 75 6e 63 20 20 20 20 20 20 29 2c 0a 20 20 20 20  unc      ),.    
c780: 46 55 4e 43 54 49 4f 4e 28 7a 65 72 6f 62 6c 6f  FUNCTION(zeroblo
c790: 62 2c 20 20 20 20 20 20 20 20 20 20 20 31 2c 20  b,           1, 
c7a0: 30 2c 20 30 2c 20 7a 65 72 6f 62 6c 6f 62 46 75  0, 0, zeroblobFu
c7b0: 6e 63 20 20 20 20 20 29 2c 0a 20 20 23 69 66 64  nc     ),.  #ifd
c7c0: 65 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44 45  ef SQLITE_SOUNDE
c7d0: 58 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73  X.    FUNCTION(s
c7e0: 6f 75 6e 64 65 78 2c 20 20 20 20 20 20 20 20 20  oundex,         
c7f0: 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 6f 75 6e     1, 0, 0, soun
c800: 64 65 78 46 75 6e 63 20 20 20 20 20 20 29 2c 0a  dexFunc      ),.
c810: 20 20 23 65 6e 64 69 66 0a 20 20 23 69 66 6e 64    #endif.  #ifnd
c820: 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 4c  ef SQLITE_OMIT_L
c830: 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e 0a 20 20  OAD_EXTENSION.  
c840: 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 61 64 5f    FUNCTION(load_
c850: 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20 20 31  extension,     1
c860: 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78 74 20  , 0, 0, loadExt 
c870: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20           ),.    
c880: 46 55 4e 43 54 49 4f 4e 28 6c 6f 61 64 5f 65 78  FUNCTION(load_ex
c890: 74 65 6e 73 69 6f 6e 2c 20 20 20 20 20 32 2c 20  tension,     2, 
c8a0: 30 2c 20 30 2c 20 6c 6f 61 64 45 78 74 20 20 20  0, 0, loadExt   
c8b0: 20 20 20 20 20 20 20 29 2c 0a 20 20 23 65 6e 64         ),.  #end
c8c0: 69 66 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  if.    AGGREGATE
c8d0: 28 73 75 6d 2c 20 20 20 20 20 20 20 20 20 20 20  (sum,           
c8e0: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d      1, 0, 0, sum
c8f0: 53 74 65 70 2c 20 20 20 20 20 20 20 20 20 73 75  Step,         su
c900: 6d 46 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c 0a  mFinalize    ),.
c910: 20 20 20 20 41 47 47 52 45 47 41 54 45 28 74 6f      AGGREGATE(to
c920: 74 61 6c 2c 20 20 20 20 20 20 20 20 20 20 20 20  tal,            
c930: 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53 74 65   1, 0, 0, sumSte
c940: 70 2c 20 20 20 20 20 20 20 20 20 74 6f 74 61 6c  p,         total
c950: 46 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c 0a 20  Finalize    ),. 
c960: 20 20 20 41 47 47 52 45 47 41 54 45 28 61 76 67     AGGREGATE(avg
c970: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
c980: 31 2c 20 30 2c 20 30 2c 20 73 75 6d 53 74 65 70  1, 0, 0, sumStep
c990: 2c 20 20 20 20 20 20 20 20 20 61 76 67 46 69 6e  ,         avgFin
c9a0: 61 6c 69 7a 65 20 20 20 20 29 2c 0a 20 2f 2a 20  alize    ),. /* 
c9b0: 41 47 47 52 45 47 41 54 45 28 63 6f 75 6e 74 2c  AGGREGATE(count,
c9c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20               0, 
c9d0: 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65 70 2c  0, 0, countStep,
c9e0: 20 20 20 20 20 20 20 63 6f 75 6e 74 46 69 6e 61         countFina
c9f0: 6c 69 7a 65 20 20 29 2c 20 2a 2f 0a 20 20 20 20  lize  ), */.    
ca00: 7b 30 2c 53 51 4c 49 54 45 5f 55 54 46 38 2c 53  {0,SQLITE_UTF8,S
ca10: 51 4c 49 54 45 5f 46 55 4e 43 5f 43 4f 55 4e 54  QLITE_FUNC_COUNT
ca20: 2c 30 2c 30 2c 30 2c 63 6f 75 6e 74 53 74 65 70  ,0,0,0,countStep
ca30: 2c 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 2c 22  ,countFinalize,"
ca40: 63 6f 75 6e 74 22 2c 30 2c 30 7d 2c 0a 20 20 20  count",0,0},.   
ca50: 20 41 47 47 52 45 47 41 54 45 28 63 6f 75 6e 74   AGGREGATE(count
ca60: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c  ,             1,
ca70: 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74 65 70   0, 0, countStep
ca80: 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46 69 6e  ,       countFin
ca90: 61 6c 69 7a 65 20 20 29 2c 0a 20 20 20 20 41 47  alize  ),.    AG
caa0: 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f 63 6f  GREGATE(group_co
cab0: 6e 63 61 74 2c 20 20 20 20 20 20 31 2c 20 30 2c  ncat,      1, 0,
cac0: 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74 53   0, groupConcatS
cad0: 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74  tep, groupConcat
cae0: 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 20 20 41  Finalize),.    A
caf0: 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f 63  GGREGATE(group_c
cb00: 6f 6e 63 61 74 2c 20 20 20 20 20 20 32 2c 20 30  oncat,      2, 0
cb10: 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61 74  , 0, groupConcat
cb20: 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63 61  Step, groupConca
cb30: 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 0a 20  tFinalize),.  . 
cb40: 20 20 20 4c 49 4b 45 46 55 4e 43 28 67 6c 6f 62     LIKEFUNC(glob
cb50: 2c 20 32 2c 20 26 67 6c 6f 62 49 6e 66 6f 2c 20  , 2, &globInfo, 
cb60: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45  SQLITE_FUNC_LIKE
cb70: 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53  |SQLITE_FUNC_CAS
cb80: 45 29 2c 0a 20 20 23 69 66 64 65 66 20 53 51 4c  E),.  #ifdef SQL
cb90: 49 54 45 5f 43 41 53 45 5f 53 45 4e 53 49 54 49  ITE_CASE_SENSITI
cba0: 56 45 5f 4c 49 4b 45 0a 20 20 20 20 4c 49 4b 45  VE_LIKE.    LIKE
cbb0: 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20 26 6c  FUNC(like, 2, &l
cbc0: 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51 4c 49  ikeInfoAlt, SQLI
cbd0: 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53 51 4c  TE_FUNC_LIKE|SQL
cbe0: 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 2c 0a  ITE_FUNC_CASE),.
cbf0: 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b      LIKEFUNC(lik
cc00: 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66 6f 41  e, 3, &likeInfoA
cc10: 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f  lt, SQLITE_FUNC_
cc20: 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43  LIKE|SQLITE_FUNC
cc30: 5f 43 41 53 45 29 2c 0a 20 20 23 65 6c 73 65 0a  _CASE),.  #else.
cc40: 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c 69 6b      LIKEFUNC(lik
cc50: 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66 6f 4e  e, 2, &likeInfoN
cc60: 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43  orm, SQLITE_FUNC
cc70: 5f 4c 49 4b 45 29 2c 0a 20 20 20 20 4c 49 4b 45  _LIKE),.    LIKE
cc80: 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20 26 6c  FUNC(like, 3, &l
cc90: 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53 51 4c  ikeInfoNorm, SQL
cca0: 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29 2c 0a  ITE_FUNC_LIKE),.
ccb0: 20 20 23 65 6e 64 69 66 0a 20 20 7d 3b 0a 0a 20    #endif.  };.. 
ccc0: 20 69 6e 74 20 69 3b 0a 20 20 46 75 6e 63 44 65   int i;.  FuncDe
ccd0: 66 48 61 73 68 20 2a 70 48 61 73 68 20 3d 20 26  fHash *pHash = &
cce0: 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66 48 61  GLOBAL(FuncDefHa
ccf0: 73 68 2c 20 73 71 6c 69 74 65 33 47 6c 6f 62 61  sh, sqlite3Globa
cd00: 6c 46 75 6e 63 74 69 6f 6e 73 29 3b 0a 20 20 46  lFunctions);.  F
cd10: 75 6e 63 44 65 66 20 2a 61 46 75 6e 63 20 3d 20  uncDef *aFunc = 
cd20: 28 46 75 6e 63 44 65 66 2a 29 26 47 4c 4f 42 41  (FuncDef*)&GLOBA
cd30: 4c 28 46 75 6e 63 44 65 66 2c 20 61 42 75 69 6c  L(FuncDef, aBuil
cd40: 74 69 6e 46 75 6e 63 29 3b 0a 0a 20 20 66 6f 72  tinFunc);..  for
cd50: 28 69 3d 30 3b 20 69 3c 41 72 72 61 79 53 69 7a  (i=0; i<ArraySiz
cd60: 65 28 61 42 75 69 6c 74 69 6e 46 75 6e 63 29 3b  e(aBuiltinFunc);
cd70: 20 69 2b 2b 29 7b 0a 20 20 20 20 73 71 6c 69 74   i++){.    sqlit
cd80: 65 33 46 75 6e 63 44 65 66 49 6e 73 65 72 74 28  e3FuncDefInsert(
cd90: 70 48 61 73 68 2c 20 26 61 46 75 6e 63 5b 69 5d  pHash, &aFunc[i]
cda0: 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  );.  }.  sqlite3
cdb0: 52 65 67 69 73 74 65 72 44 61 74 65 54 69 6d 65  RegisterDateTime
cdc0: 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 23 69 66  Functions();.#if
cdd0: 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54  ndef SQLITE_OMIT
cde0: 5f 41 4c 54 45 52 54 41 42 4c 45 0a 20 20 73 71  _ALTERTABLE.  sq
cdf0: 6c 69 74 65 33 41 6c 74 65 72 46 75 6e 63 74 69  lite3AlterFuncti
ce00: 6f 6e 73 28 29 3b 0a 23 65 6e 64 69 66 0a 7d 0a  ons();.#endif.}.